wine-20000526/0040755000175000001440000000000007113604277012454 5ustar julliarduserswine-20000526/console/0040755000175000001440000000000007113604145014110 5ustar julliarduserswine-20000526/console/.cvsignore0100644000175000001440000000001106631315721016100 0ustar julliardusersMakefile wine-20000526/console/Makefile.in0100644000175000001440000000040206633515207016154 0ustar julliardusersDEFS = @DLLFLAGS@ -D__WINE__ TOPSRCDIR = @top_srcdir@ TOPOBJDIR = .. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = console C_SRCS = \ generic.c \ interface.c \ ncurses.c \ tty.c \ xterm.c all: $(MODULE).o @MAKE_RULES@ ### Dependencies: wine-20000526/console/generic.c0100644000175000001440000001215007074147240015670 0ustar julliardusers/* generic.c */ /* Copyright 1999 - Joseph Pranevich */ /* This is a driver to implement, when possible, "high-level" routines using only low level calls. This is to make it possible to have accelerated functions for the individual drivers... or to simply not bother with them. */ /* When creating new drivers, you need to assign all the functions that that driver supports into the driver struct. If it is a supplementary driver, it should make sure to perserve the old values. */ #include #include "console.h" #include "config.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(console) static void GENERIC_MoveLine(char row1, char row2, char col1, char col2); static void GENERIC_ClearLine(char row, char col1, char col2, int bgcolor, int attribute); void GENERIC_Start(void) { /* Here, we only want to add a driver if there is not one already defined. */ TRACE("GENERIC_Start\n"); if (!driver.clearWindow) driver.clearWindow = GENERIC_ClearWindow; if (!driver.scrollUpWindow) driver.scrollUpWindow = GENERIC_ScrollUpWindow; if (!driver.scrollDownWindow) driver.scrollDownWindow = GENERIC_ScrollDownWindow; if (!driver.getCharacter) driver.getCharacter = GENERIC_GetCharacter; } void GENERIC_ClearWindow(char row1, char col1, char row2, char col2, int bg_color, int attribute) { char trow, tcol, x; int old_refresh; /* Abort if we have only partial functionality */ if (!(driver.getCursorPosition && driver.moveCursor && driver.write)) return; old_refresh = CONSOLE_GetRefresh(); CONSOLE_SetRefresh(FALSE); CONSOLE_GetCursorPosition(&trow, &tcol); for (x = row1; x <= row2; x++) GENERIC_ClearLine(x, col1, col2, bg_color, attribute); CONSOLE_MoveCursor(trow, tcol); CONSOLE_SetRefresh(old_refresh); } void GENERIC_ScrollUpWindow(char row1, char col1, char row2, char col2, char lines, int bg_color, int attribute) { /* Scroll Up Window: Characters go down */ char trow, tcol, x; int old_refresh; TRACE("Scroll Up %d lines from %d to %d.\n", lines, row1, row2); /* Abort if we have only partial functionality */ if (!(driver.getCursorPosition && driver.moveCursor && driver.write && driver.getCharacterAtCursor && driver.clearWindow)) return; /* Save initial state... */ old_refresh = CONSOLE_GetRefresh(); CONSOLE_SetRefresh(FALSE); CONSOLE_GetCursorPosition(&trow, &tcol); for (x = row1 + lines; x <= row2; x++) { GENERIC_MoveLine(x, x - lines, col1, col2); GENERIC_ClearLine(x, col1, col2, bg_color, attribute); } /* Restore State */ CONSOLE_MoveCursor(trow, tcol); CONSOLE_SetRefresh(old_refresh); } void GENERIC_ScrollDownWindow(char row1, char col1, char row2, char col2, char lines, int bg_color, int attribute) { /* Scroll Down Window: Characters go up */ char trow, tcol, x; int old_refresh; /* Abort if we have only partial functionality */ if (!(driver.getCursorPosition && driver.moveCursor && driver.write && driver.getCharacterAtCursor && driver.clearWindow)) return; /* Save initial state... */ old_refresh = CONSOLE_GetRefresh(); CONSOLE_SetRefresh(FALSE); CONSOLE_GetCursorPosition(&trow, &tcol); for (x = row2; x >= row1 + lines; x--) { GENERIC_MoveLine(x, x + lines, col1, col2); GENERIC_ClearLine(x, col1, col1, bg_color, attribute); } /* Restore State */ CONSOLE_MoveCursor(trow, tcol); CONSOLE_SetRefresh(old_refresh); } char GENERIC_GetCharacter() { /* Keep getting keys until we get one with a char value */ char ch = (char) 0, scan; while (!ch) { CONSOLE_GetKeystroke(&scan, &ch); } return ch; } static void GENERIC_ClearLine(char row, char col1, char col2, int bgcolor, int attribute) { /* This function is here to simplify the logic of the scroll and clear functions but may be useful elsewhere. If it can be used from outside here, it should be made non-static */ char x; TRACE("Clear Line: %d from %d to %d.\n", row, col1, col2); for (x = col1; x <= col2; x++) { CONSOLE_MoveCursor(row, x); CONSOLE_Write(' ', 0, 0, 0); } /* Assume that the calling function will make sure that the cursor is repositioned properly. If this becomes non-static, that will need to be changed. */ } static void GENERIC_MoveLine(char row1, char row2, char col1, char col2) { /* This function is here to simplify the logic of the scroll and clear functions but may be useful elsewhere. If it can be used from outside here, it should be made non-static */ char x; int bg_color, fg_color, attribute; char ch; TRACE("Move Line: Move %d to %d.\n", row1, row2); for (x = col1; x <= col2; x++) { CONSOLE_MoveCursor(row1, x); CONSOLE_GetCharacterAtCursor(&ch, &fg_color, &bg_color, &attribute); CONSOLE_MoveCursor(row2, x); CONSOLE_Write(ch, fg_color, bg_color, attribute); } /* Assume that the calling function will make sure that the cursor is repositioned properly. If this becomes non-static, that will need to be changed. */ } wine-20000526/console/interface.c0100644000175000001440000002211607053600770016216 0ustar julliardusers/* interface.c */ /* The primary purpose of this function is to provide CONSOLE_* reotines that immediately call the appropiate driver handler. This cleans up code in the individual modules considerably. This could be done using a macro, but additional functionality may be provided here in the future. */ #include #include #include #include "config.h" #include "windef.h" #include "console.h" #include "options.h" CONSOLE_device driver; static int pop_driver(char **, char **, int *); static int console_initialized = FALSE; static int CONSOLE_Init(void) { char buffer[256]; char *single, *drivers = buffer; int length; char initial_rows[5]; char initial_columns[5]; /* Suitable defaults... */ driver.console_out = stdout; driver.console_in = stdin; /* drivers should be a string that consists of driver names followed by plus (+) signs to denote additions. For example: drivers = tty Load just the tty driver drivers = ncurses+xterm Load ncurses then xterm The "default" value is just tty. */ PROFILE_GetWineIniString( "console", "Drivers", CONSOLE_DEFAULT_DRIVER, buffer, sizeof(buffer) ); while (pop_driver(&drivers, &single, &length)) { if (!strncmp(single, "tty", length)) TTY_Start(); #ifdef WINE_NCURSES else if (!strncmp(single, "ncurses", length)) NCURSES_Start(); #endif /* WINE_NCURSES */ else if (!strncmp(single, "xterm", length)) XTERM_Start(); } /* Read in generic configuration */ /* This is primarily to work around a limitation in nxterm where this information is not correctly passed to the ncurses layer through the terminal. At least, I'm not doing it correctly if there is a way. But this serves as a generic way to do the same anyway. */ /* We are setting this to 80x25 here which is *not* the default for most xterm variants... It is however the standard VGA resolution */ /* FIXME: We need to be able to be able to specify that the window's dimensions should be used. This is required for correct emulation of Win32's console and Win32's DOS emulation */ PROFILE_GetWineIniString("console", "InitialRows", "24", initial_rows, 5); PROFILE_GetWineIniString("console", "InitialColumns", "80", initial_columns, 5); sscanf(initial_rows, "%d", &driver.y_res); sscanf(initial_columns, "%d", &driver.x_res); GENERIC_Start(); if (driver.init) driver.init(); /* Not all terminals let our programs know the proper resolution if the resolution is set on the command-line... */ CONSOLE_NotifyResizeScreen(driver.x_res, driver.y_res); /* For now, always return TRUE */ return TRUE; } void CONSOLE_Write(char out, int fg_color, int bg_color, int attribute) { if (!console_initialized) console_initialized = CONSOLE_Init(); if (driver.write) { driver.write(out, fg_color, bg_color, attribute); if (!driver.norefresh) CONSOLE_Refresh(); } } void CONSOLE_Close() { if (driver.close) driver.close(); } void CONSOLE_MoveCursor(char row, char col) { if (!console_initialized) console_initialized = CONSOLE_Init(); if (driver.moveCursor) { driver.moveCursor(row, col); if (!driver.norefresh) CONSOLE_Refresh(); } } void CONSOLE_ClearWindow(char row1, char col1, char row2, char col2, int bg_color, int attribute) { if (!console_initialized) console_initialized = CONSOLE_Init(); if (driver.clearWindow) { driver.clearWindow(row1, col1, row2, col2, bg_color, attribute); if (!driver.norefresh) CONSOLE_Refresh(); } } void CONSOLE_ScrollUpWindow(char row1, char col1, char row2, char col2, char lines, int bg_color, int attribute) { if (!console_initialized) console_initialized = CONSOLE_Init(); if (driver.scrollUpWindow) { driver.scrollUpWindow(row1, col1, row2, col2, lines, bg_color, attribute); if (!driver.norefresh) CONSOLE_Refresh(); } } void CONSOLE_ScrollDownWindow(char row1, char col1, char row2, char col2, char lines, int bg_color, int attribute) { if (!console_initialized) console_initialized = CONSOLE_Init(); if (driver.scrollDownWindow) { driver.scrollDownWindow(row1, col1, row2, col2, lines, bg_color, attribute); if (!driver.norefresh) CONSOLE_Refresh(); } } int CONSOLE_CheckForKeystroke(char *scan, char *ascii) /* These functions need to go through a conversion layer. Scancodes should *not* be determined by the driver, rather they should have a conv_* function in int16.c. Yuck. */ { if (!console_initialized) console_initialized = CONSOLE_Init(); if (driver.checkForKeystroke) return driver.checkForKeystroke(scan, ascii); else return FALSE; } void CONSOLE_GetKeystroke(char *scan, char *ascii) { if (!console_initialized) console_initialized = CONSOLE_Init(); if (driver.getKeystroke) driver.getKeystroke(scan, ascii); } void CONSOLE_GetCursorPosition(char *row, char *col) { if (!console_initialized) console_initialized = CONSOLE_Init(); if (driver.getCursorPosition) driver.getCursorPosition(row, col); } void CONSOLE_GetCharacterAtCursor(char *ch, int *fg, int *bg, int *a) { if (!console_initialized) console_initialized = CONSOLE_Init(); if (driver.getCharacterAtCursor) driver.getCharacterAtCursor(ch, fg, bg, a); } void CONSOLE_Refresh() { if (!console_initialized) console_initialized = CONSOLE_Init(); if (driver.refresh) driver.refresh(); } int CONSOLE_AllocColor(int color) { if (!console_initialized) console_initialized = CONSOLE_Init(); if (driver.allocColor) return driver.allocColor(color); else return 0; } void CONSOLE_ClearScreen() { if (!console_initialized) console_initialized = CONSOLE_Init(); if (driver.clearScreen) { driver.clearScreen(); if (!driver.norefresh) CONSOLE_Refresh(); } } char CONSOLE_GetCharacter() { if (!console_initialized) console_initialized = CONSOLE_Init(); /* I'm not sure if we need this really. This is a function that can be accelerated that returns the next *non extended* keystroke */ if (driver.getCharacter) return driver.getCharacter(); else return (char) 0; /* Sure, this will probably break programs... */ } void CONSOLE_ResizeScreen(int x, int y) { if (!console_initialized) console_initialized = CONSOLE_Init(); if (driver.resizeScreen) driver.resizeScreen(x, y); } void CONSOLE_NotifyResizeScreen(int x, int y) { if (driver.notifyResizeScreen) driver.notifyResizeScreen(x, y); } void CONSOLE_SetBackgroundColor(int fg, int bg) { if (!console_initialized) console_initialized = CONSOLE_Init(); if (driver.setBackgroundColor) driver.setBackgroundColor(fg, bg); } void CONSOLE_GetBackgroundColor(int *fg, int *bg) { if (!console_initialized) console_initialized = CONSOLE_Init(); if (driver.getBackgroundColor) driver.getBackgroundColor(fg, bg); } void CONSOLE_WriteRawString(char *str) { if (!console_initialized) console_initialized = CONSOLE_Init(); /* This is a special function that is only for internal use and does not actually call any of the console drivers. It's primary purpose is to provide a way for higher-level drivers to write directly to the underlying terminal without worry that there will be any retranslation done by the assorted drivers. Care should be taken to ensure that this only gets called when the thing written does not actually produce any output or a CONSOLE_Redraw() is called immediately afterwards. CONSOLE_Redraw() is not yet implemented. */ fprintf(driver.console_out, "%s", str); } /* This function is only at the CONSOLE level. */ /* Admittably, calling the variable norefresh might be a bit dumb...*/ void CONSOLE_SetRefresh(int setting) { if (setting) driver.norefresh = FALSE; else driver.norefresh = TRUE; } /* This function is only at the CONSOLE level. */ int CONSOLE_GetRefresh() { if (driver.norefresh) return FALSE; else return TRUE; } /* Utility functions... */ int pop_driver(char **drivers, char **single, int *length) { /* Take the string in drivers and extract the first "driver" entry */ /* Advance the pointer in drivers to the next entry, put the origional pointer in single, and put the length in length. */ /* Return TRUE if we found one */ if (!*drivers) return FALSE; *single = *drivers; *length = 0; while ((*drivers[0] != NULL) && (*drivers[0] != '+')) { (*drivers)++; (*length)++; } while (*drivers[0] == '+') (*drivers)++; if (*length) return TRUE; else return FALSE; } wine-20000526/console/ncurses.c0100644000175000001440000001477307074147240015753 0ustar julliardusers/* ncurses.c */ /* Copyright 1999 - Joseph Pranevich */ #include #include "config.h" #include "console.h" /* Must define WINE_NCURSES */ #ifdef WINE_NCURSES /* This is the console driver for systems that support the ncurses interface. */ /* Actually, this should work for curses, as well. But there may be individual functions that are unsupported in plain curses or other variants. Those should be detected and special-cased by autoconf. */ /* When creating new drivers, you need to assign all the functions that that driver supports into the driver struct. If it is a supplementary driver, it should make sure to perserve the old values. */ #include "debugtools.h" #include "options.h" DEFAULT_DEBUG_CHANNEL(console) #undef ERR /* Use ncurses's err() */ #ifdef HAVE_NCURSES_H # include #else # ifdef HAVE_CURSES_H # include # endif #endif SCREEN *ncurses_screen; static int get_color_pair(int fg_color, int bg_color); const char *color_names[] = {"null", "black", "blue", "green", "cyan", "magenta", "brown", "red", "light gray", "dark gray", "light blue", "light green", "light red", "light magenta", "light cyan", "yellow", "white"}; void NCURSES_Start() { /* This should be the root driver so we can ignore anything already in the struct. */ driver.norefresh = FALSE; driver.init = NCURSES_Init; driver.write = NCURSES_Write; driver.close = NCURSES_Close; driver.moveCursor = NCURSES_MoveCursor; driver.getCursorPosition = NCURSES_GetCursorPosition; driver.getCharacterAtCursor = NCURSES_GetCharacterAtCursor; driver.clearScreen = NCURSES_ClearScreen; driver.allocColor = NCURSES_AllocColor; #ifdef HAVE_GETBKGD driver.setBackgroundColor = NCURSES_SetBackgroundColor; #endif #ifdef HAVE_RESIZETERM driver.notifyResizeScreen = NCURSES_NotifyResizeScreen; #endif /* HAVE_RESIZETERM */ driver.checkForKeystroke = NCURSES_CheckForKeystroke; driver.getKeystroke = NCURSES_GetKeystroke; driver.refresh = NCURSES_Refresh; } void NCURSES_Init() { char terminal_type[80]; PROFILE_GetWineIniString("console", "TerminalType", "xterm", terminal_type, 79); ncurses_screen = newterm(terminal_type, driver.console_out, driver.console_in); set_term(ncurses_screen); start_color(); raw(); noecho(); nonl(); intrflush(stdscr, FALSE); keypad(stdscr, TRUE); nodelay(stdscr, TRUE); } void NCURSES_Write(char output, int fg, int bg, int attribute) { char row, col; int pair; if (!fg) fg = COLOR_WHITE; /* Default */ if (!bg) bg = COLOR_BLACK; /* Default */ pair = get_color_pair(fg, bg); if (waddch(stdscr, output | COLOR_PAIR(pair)) == ERR) { NCURSES_GetCursorPosition(&row, &col); FIXME("NCURSES: waddch() failed at %d, %d.\n", row, col); } } void NCURSES_Close() { endwin(); } void NCURSES_GetKeystroke(char *scan, char *ascii) { while (!NCURSES_CheckForKeystroke(scan, ascii)) {} /* Wait until keystroke is detected */ /* When it is detected, we will already have the right value in scan and ascii, but we need to take this keystroke out of the buffer. */ wgetch(stdscr); } int NCURSES_CheckForKeystroke(char *scan, char *ascii) { /* We don't currently support scan codes here */ /* FIXME */ int temp; temp = wgetch(stdscr); if (temp == ERR) { return FALSE; } else { ungetch(temp); /* Keystroke not removed from buffer */ *ascii = (char) temp; return TRUE; } } void NCURSES_MoveCursor(char row, char col) { if (wmove(stdscr, row, col) == ERR) FIXME("NCURSES: wmove() failed to %d, %d.\n", row, col); } void NCURSES_GetCursorPosition(char *row, char *col) { int trow, tcol; getyx(stdscr, trow, tcol); /* MACRO, no need to pass pointer */ *row = (char) trow; *col = (char) tcol; } void NCURSES_GetCharacterAtCursor(char *ch, int *fg_color, int *bg_color, int *attribute) { /* If any of the pointers are NULL, ignore them */ /* We will eventually have to convert the color data */ if (ch) *ch = (char) winch(stdscr); if (fg_color) *fg_color = WINE_WHITE; if (bg_color) *bg_color = WINE_BLACK; if (attribute) *attribute = 0; } void NCURSES_Refresh() { wrefresh(stdscr); } void NCURSES_ClearScreen() { werase(stdscr); } int NCURSES_AllocColor(int color) { /* Currently support only internal colors */ switch (color) { case WINE_BLACK: return COLOR_BLACK; case WINE_WHITE: return COLOR_WHITE; case WINE_RED: return COLOR_RED; case WINE_GREEN: return COLOR_GREEN; case WINE_YELLOW: return COLOR_YELLOW; case WINE_BLUE: return COLOR_BLUE; case WINE_MAGENTA: return COLOR_MAGENTA; case WINE_CYAN: return COLOR_CYAN; } FIXME("Unable to allocate color %d (%s)\n", color, color_names[color]); /* Don't allocate a color... yet */ return 0; } void NCURSES_SetBackgroundColor(int fg, int bg) { int pair; pair = get_color_pair(fg, bg); wbkgd(stdscr, COLOR_PAIR(pair)); } #ifdef HAVE_GETBKGD void NCURSES_GetBackgroundColor(int *fg, int *bg) { chtype background; short pair, sfg, sbg; background = getbkgd(stdscr); pair = (!A_CHARTEXT & background); pair_content(pair, &sfg, &sbg); *fg = sfg; *bg = sbg; } #endif /* HAVE_GETBKGD */ #ifdef HAVE_RESIZETERM void NCURSES_NotifyResizeScreen(int x, int y) { /* Note: This function gets called *after* another driver in the chain calls ResizeScreen(). It is meant to resize the ncurses internal data structures to know about the new window dimensions. */ TRACE("Terminal resized to y: %d, x: %d\n", y, x); resizeterm(y, x); } #endif /* HAVE_RESIZETERM */ static int get_color_pair(int fg_color, int bg_color) { /* ncurses internally uses "color pairs" in addition to the "pallet" */ /* This isn't the best way to do this. Or even close */ static int current = 0; static int fg[255]; /* 16 x 16 is enough */ static int bg[255]; int x; /* The first pair is hardwired into ncurses */ fg[0] = COLOR_WHITE; bg[0] = COLOR_BLACK; for (x = 0; x <= current; x++) { if ((fg_color == fg[x]) && (bg_color == bg[x])) { TRACE("Color pair: already allocated\n"); return x; } } /* Need to allocate new color */ current++; fg[current] = fg_color; bg[current] = bg_color; TRACE("Color pair: allocated.\n"); return init_pair(current, fg_color, bg_color); } #endif /* WINE_NCURSES */ wine-20000526/console/tty.c0100644000175000001440000000212106672762471015105 0ustar julliardusers/* tty.c */ /* Copyright 1999 - Joseph Pranevich */ /* This is the console driver for TTY-based consoles, i.e. consoles without cursor placement, etc. It's also a pretty decent starting point for other driers. */ /* When creating new drivers, you need to assign all the functions that that driver supports into the driver struct. If it is a supplementary driver, it should make sure to perserve the old values. */ #include #include "console.h" #include "config.h" #include "windef.h" void TTY_Start() { /* This should be the root driver so we can ignore anything already in the struct. */ driver.norefresh = FALSE; driver.write = TTY_Write; driver.getKeystroke = TTY_GetKeystroke; } void TTY_Write(char output, int fg, int bg, int attribute) { /* We can discard all extended information. */ fprintf(driver.console_out, "%c", output); } void TTY_GetKeystroke(char *scan, char *ch) { /* All we have are character input things, nothing for extended */ /* This is just the TTY driver, after all. We'll cope. */ *ch = fgetc(driver.console_in); } wine-20000526/console/xterm.c0100644000175000001440000001120307074147240015411 0ustar julliardusers/* xterm.c */ /* This "driver" is designed to go on top of an existing driver to provide support for features only present if using an xterm or compatible program for your console output. Currently, it supports resizing and separating debug messages from program output. It does not currently support changing the title bar. */ #include #include #include #include #include #include #include #include #include "console.h" #include "options.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(console) char console_xterm_prog[80]; static BOOL wine_create_console(FILE **master, FILE **slave, pid_t *pid); int wine_openpty(int *master, int *slave, char *name, struct termios *term, struct winsize *winsize); /* The console -- I chose to keep the master and slave * (UNIX) file descriptors around in case they are needed for * ioctls later. The pid is needed to destroy the xterm on close */ typedef struct _XTERM_CONSOLE { FILE *master; /* xterm side of pty */ FILE *slave; /* wine side of pty */ pid_t pid; /* xterm's pid, -1 if no xterm */ } XTERM_CONSOLE; static XTERM_CONSOLE xterm_console; CONSOLE_device chain; FILE *old_in, *old_out; void XTERM_Start(void) { /* Here, this is a supplementary driver so we should remember to call the chain. */ chain.init = driver.init; driver.init = XTERM_Init; chain.close = driver.close; driver.close = XTERM_Close; chain.resizeScreen = driver.resizeScreen; driver.resizeScreen = XTERM_ResizeScreen; /* Read in driver configuration */ PROFILE_GetWineIniString("console", "XtermProg", "xterm", console_xterm_prog, 79); } void XTERM_Init() { wine_create_console(&xterm_console.master, &xterm_console.slave, &xterm_console.pid); old_in = driver.console_in; driver.console_in = xterm_console.slave; old_out = driver.console_out; driver.console_out = xterm_console.slave; /* Then call the chain... */ if (chain.init) chain.init(); } void XTERM_Close() { /* Call the chain first... */ if (chain.close) chain.close(); driver.console_in = old_in; driver.console_out = old_out; /* make sure a xterm exists to kill */ if (xterm_console.pid != -1) { kill(xterm_console.pid, SIGTERM); } } void XTERM_ResizeScreen(int x, int y) { char temp[100]; /* Call the chain first, there shoudln't be any... */ if (chain.resizeScreen) chain.resizeScreen(x, y); sprintf(temp, "\x1b[8;%d;%dt", y, x); CONSOLE_WriteRawString(temp); CONSOLE_NotifyResizeScreen(x, y); } static BOOL wine_create_console(FILE **master, FILE **slave, pid_t *pid) { /* There is definately a bug in this routine that causes a lot of garbage to be written to the screen, but I can't find it... */ struct termios term; char buf[1024]; char c = '\0'; int status = 0; int i; int tmaster, tslave; char xterm_resolution[10]; sprintf(xterm_resolution, "%dx%d", driver.x_res, driver.y_res); if (tcgetattr(0, &term) < 0) return FALSE; term.c_lflag |= ICANON; term.c_lflag &= ~ECHO; if (wine_openpty(&tmaster, &tslave, NULL, &term, NULL) < 0) return FALSE; *master = fdopen(tmaster, "r+"); *slave = fdopen(tslave, "r+"); if ((*pid=fork()) == 0) { tcsetattr(fileno(*slave), TCSADRAIN, &term); sprintf(buf, "-Sxx%d", fileno(*master)); execlp(console_xterm_prog, console_xterm_prog, buf, "-fg", "white", "-bg", "black", "-g", xterm_resolution, NULL); ERR("error creating xterm (file not found?)\n"); exit(1); } /* most xterms like to print their window ID when used with -S; * read it and continue before the user has a chance... * NOTE: this is the reason we started xterm with ECHO off, * we'll turn it back on below */ for (i=0; c!='\n'; (status=fread(&c, 1, 1, *slave)), i++) { if (status == -1 && c == '\0') { /* wait for xterm to be created */ usleep(100); } if (i > 10000) { WARN("can't read xterm WID\n"); kill(*pid, SIGKILL); return FALSE; } } term.c_lflag |= ECHO; tcsetattr(fileno(*master), TCSADRAIN, &term); return TRUE; } wine-20000526/.cvsignore0100644000175000001440000000011607101100675014435 0ustar julliardusersMake.rules Makefile config.cache config.log config.status libwine.so.1.0 wine wine-20000526/ANNOUNCE0100644000175000001440000000340607113604014013572 0ustar julliardusersThis is release 20000526 of Wine, a free implementation of Windows on Unix. This is still a developers only release. There are many bugs and unimplemented features. Most applications still do not work correctly. Patches should be submitted to "julliard@lrc.epfl.ch". Please don't forget to include a ChangeLog entry. WHAT'S NEW with Wine-20000526: (see ChangeLog for details) - New C preprocessor for the resource compiler - More built-in debugger improvements - OpenGL support - Many common controls fixes and merges from Corel tree - Lots of bug fixes. See the README file in the distribution for installation instructions. Because of lags created by using mirror, this message may reach you before the release is available at the ftp sites. The sources will be available from the following locations: ftp://metalab.unc.edu/pub/Linux/ALPHA/wine/development/Wine-20000526.tar.gz ftp://tsx-11.mit.edu/pub/linux/ALPHA/Wine/development/Wine-20000526.tar.gz ftp://ftp.infomagic.com/pub/mirrors/linux/sunsite/ALPHA/wine/development/Wine-20000526.tar.gz ftp://orcus.progsoc.uts.edu.au/pub/Wine/development/Wine-20000526.tar.gz It should also be available from any site that mirrors tsx-11 or sunsite. You can also get the current source directly from the CVS tree. Check http://www.winehq.com/dev.html for details. If you submitted a patch, please check to make sure it has been included in the new release. If you want to get the new releases faster, you can subscribe to the wine-patches mailing list by sending a mail containing 'subscribe wine-patches your_address' to majordomo@tiger.informatik.hu-berlin.de. Wine is available thanks to the work of many people. See the file AUTHORS in the distribution for the complete list. -- Alexandre Julliard julliard@lrc.epfl.ch wine-20000526/AUTHORS0100644000175000001440000001245007074677505013535 0ustar julliardusers@c This file is processed by GNU's TeXinfo @c If you modify it or move it to another location, make sure that @c TeXinfo works (type `make' in directory documentation). @c This is a list of the Wine authors and copyright holders. Wine is available thanks to the work of: James Abbatiello, Michael Abd-El-Malek, Howard Abrams, Mark G. Adams, Bruno Afonso, Samir Al-Battran, Guy Albertelli, Gustavo Junior Alves, Bob Amstadt, Dag Asheim, Jim Aston, Martin Ayotte, Viktor Babrian, Karl Backström, Bradley Baetz, Peter Bajusz, Andre Malafaya Baptista, Aaron Barnes, Jean-Claude Batista, Marcel Baur, Francis Beaudet, Tom Bech, Matthew Becker, Georg Beyerle, Ross Biro, Dennis Björklund, Zygo Blaxell, Martin Boehme, Francois Boisvert, Pim Bollen, Uwe Bonnes, Peter Bortas, Noel Borthwick, Erik Bos, Fons Botman, Sylvain Bouchard, Frederic Boulanger, Justin Bradford, John Brezak, Andrew Bulhak, John Burton, Jonathan Buzzard, Jose Marcos López Caravaca, Eddie Carpenter, Niels de Carpentier, Mike Castle, Ron Cemer, Gordon Chaffee, Gael de Chalendar, Jimen Ching, Geoff Clare, Robert 'Admiral' Coeyman, Richard Cohen, Jean-Claude Cote, Stephen Crowley, Pascal Cuoq, David A. Cuthbert, Brian Joseph Czapiga, Ulrich Czekalla, Huw D. M. Davies, Moses DeJong, Petar Djukic, Roman Dolejsi, Frans van Dorsselaer, Rikhardur Egilsson, Morten Eriksen, Chris Faherty, Carsten Fallesen, Paul Falstad, David Faure, Wesley Filardo, Claus Fischer, Olaf Flebbe, Chad Fraleigh, Matthew Francis, Philippe Froidevaux, Peter Galbavy, Peter Ganten, Ramon Garcia, Jeff Garzik, Julio Cesar Gazquez, Klaas van Gend, Abey George, Brian Gerst, Matthew Ghio, Jody Goldberg, David Golding, François Gouget, Hans de Graaff, David Grant, Albert den Haan, Jess Haas, Robert W Hall, Noomen Hamza, Charles M. Hannum, Adrian Harvey, John Harvey, James Hatheway, Kalevi J Hautaniemi, Bill Hawes, Lars Heete, Cameron Heide, Bernd Herd, Theodore S. Hetke, Haithem Hmida, Jochen Hoenicke, Henning Hoffmann, Kevin Holbrook, Nick Holloway, Onno Hovers, Jeffrey Hsu, Peter Hunnisett, Miguel de Icaza, Jukka Iivonen, Kostya Ivanov, Serge Ivanov, Lee Jaekil, Gautam Jain, Niels Kristian Bech Jensen, Rajeev Jhangiani, Bill Jin, Jeff Johann, Alexandre Julliard, Bang Jun-Young, James Juran, Achim Kaiser, Alexander Kanavin, Jukka Kangas, Pavel Kankovsky, Michael Karcher, Niclas Karlsson, Jochen Karrer, Don Kelly, Andreas Kirschbaum, Rein Klazes, Albrecht Kleine, Dietmar Kling, Eric Kohl, Jon Konrath, Alex Korobka, Zoltan Kovacs, Greg Kreider, Anand Kumria, Ove Kåven, Scott A. Laird, David Lee Lambert, Stephen Langasek, Sean Langley, Dan Langlois, Alexander Larsson, David Lassonde, Stefan Leichter, Karl Lessard, Pascal Lessard, Andrew Lewycky, John Li, Weisheng Li, Xiang Li, Per Lindström, Brian Litzinger, Juergen Lock, Martin von Loewis, Michiel van Loon, Richard A Lough, Alexander V. Lukyanov, Jiuming Luo, Stephane Lussier, David Luyer, José Marcos López, Kenneth MacDonald, Peter MacDonald, Pierre Mageau, William Magro, Juergen Marquardt, Ricardo Massaro, Keith Matthews, Joerg Mayer, Michael McCormack, Jason McMullan, Caolan McNamara, Marcus Meissner, Graham Menhennitt, David Metcalfe, Toufic Milan, Paul Millar, Bruce Milner, Steffen Moeller, Andreas Mohr, Slava Monich, James Moody, Chris Morgan, Kai Morich, Richard Mortimer, Vasudev Mulchandani, Rick Mutzke, Philippe De Muyter, Itai Nahshon, Jonathan Naylor, Tim Newsome, Thuy Nguyen, Kristian Nielsen, Damien O'Neill, Henrik Olsen, Gerard Patel, Michael Patra, Murali Pattathe, Dimitrie O. Paun, Bernd Paysan, Brad Pepers, Jim Peterson, Gerald Pfeifer, Dave Pickles, Ian Pilcher, Brian Pirie, Michael Poole, Eric Pouech, Robert Pouliot, Vahid Pourlotfali, Chad Powell, Joseph Pranevich, Alex Priem, Paul Quinn, Pete Ratzlaff, Ron Record, Petter Reinholdtsen, Keith Reynolds, Slaven Rezic, John Richardson, Rick Richardson, Douglas Ridgway, Robert Riggs, Bernhard Rosenkraenzer, Matthew Robertson, Pavel Roskin, Herbert Rosmanith, Lilia Roumiantseva, Johannes Ruscheinski, Adam Sacarny, Ivan de Saedeleer, Thomas Sandford, Constantine Sapuntzakis, Pablo Saratxaga, Carl van Schaik, Daniel Schepler, Christian Schlaile, Peter Schlaile, Ulrich Schmid, Bernd Schmidt, Ian Schmidt, Juergen Schmied, Ingo Schneider, Victor Schneider, John Sheets, Yngvi Sigurjonsson, Stephen Simmons, Jesper Skov, Rick Sladkey, William Smith, Jaroslaw Piotr Sobieszek, Patrick Spinler, Sylvain St-Germain, Gavriel State, Sheri Steeves, Norman Stevens, Dominik Strasser, Patrik Stridvall, Vadim Strizhevsky, Bertho Stultiens, Abraham Sudhakar, Charles Suprin, James Sutherland, Erik Svendsen, Tristan Tarrant, Andrew Taylor, Joshua Thielen, Dirk Thierbach, Jean-Louis Thirot, Duncan C Thomson, Adrian Thurston, Goran Thyni, Steve Tibbett, Dmitry Timoshkov, Jimmy Tirtawangsa, Jon Tombs, Linus Torvalds, Luc Tourangeau, Jeff Tranter, Gregory Trubetskoy, Petri Tuomola, Sergey Turchanov, Lionel Ulmer, Moshe Vainer, Michael Veksler, Sven Verdoolaege, Todd Vierling, Erez Volk, Jerome Vouillon, Duc Vuong, Ronan Waide, Martin Walker, Owen Wang, Eric Warnke, Leigh Wedding, Randy Weems, Manfred Weichel, Ulrich Weigand, Morten Welinder, Jeremy White, Len White, Lawson Whitney, Jan Willamowius, Carl Williams, Eric Williams, Cliff Wright, Karl Guenter Wuensch, Eric Youngdale, James Youngman, Nikita V. Youshchenko, Mikolaj Zalewski, John Zero, Yuxi Zhang, Nathan Zorich, Luiz Otavio L. Zorzella, and Per Ångström. wine-20000526/BUGS0100644000175000001440000000606507044653732013146 0ustar julliardusersFor information on how to post a useful bug report, please read documentation/bugreports. This is intended to be a place where you should look first if you want to contribute to Wine development. Add your e-mail address to the corresponding entry if you are working on/have done something for one of the problems. You are encouraged to add new entries and, more importantly, remove those for the bugs you fixed ;-) ------------------------------------------------------------ As of Jun 1998 - General: * TrueType, .FON rasterizer. * Incomplete thread/process scheduling support in Win32 code. * Threading for some operating systems still missing. (NetBSD? SCO? OS/2?) * Very alpha printing code using win16 drivers. * Very alpha internal PostScript driver. [h.davies1@physics.ox.ac.uk] * Extremely alpha Win95 interface code (some apps, like Opera, choke on it). * No OLE2 and OLE32 support (including OLE2 interfaces etc.). (started work on pidl-handling, IShellFolders IEnumIdLists and SH* functions juergen.schmied@metronet.de) (Corel is working on it) * No MS Video support. [just started, marcus@jet.franken.de] * COMDLG32 support not complete yet [bertho@akhphd.au.dk] * COMMCTRL/COMCTL32 support in progress [ekohl@abo.rhein-zeitung.de]. * No manual pages describing the various Windows calls. - You can find information about most of the Win32 API calls on the www.microsoft.com (go to 'search'). * A lot of the extensions to the GDI that were introduced with Win32 are not supported at all or only in a very rudimentary way. (World transforms, arc direction, GM_ADVANCED to name but a few) Miscellaneous: * Windows95 telnet.exe and NT 3.51 telnet.exe, and Borland Delphi is known to go into recursion with infinite resizing, possibly due to scroll bars. * mIRC 'commands' menu stays on top and will not refresh. * mIRC is unable to show 'Options' dialog. * Tab switching in mIRC 'Setup' dialog stops erasing background after a random number of repetitions. * GDI memory leaks apparent in Free Agent 16-bit. * nBytesWidth in CURSORICONINFO is bogus for some bpp (doesn't reflect the fact that bits are packed and 16-bit aligned). * Progman and AOL complain about being unable to convert bitmaps (probably because of bytes width stuff). * Netscape displays partially downloaded inline graphics with wrong offsets. * Text alignment problems in Word and Write (variable pitch fonts). * Font mapper weights are rather crude. * "Cursor XXXX has more than 1 bpp!" * SGI window manager treats Wine windows as topmost. * KDE window manager and icewm put popup windows like menus below the main window. * Write shows blank space instead of Paintbrush OLE1 object ( GetDIBits()? ). * AllocCSToDSAlias() shouldn't alloc alias for the same segment multiple times. * Some programs expect that menu window handles stay the same all the time. (chemdraw). This implies that the menu popupwindows are just hidden, not destroyed in real Windows. Where to look in source files: * grep for FIXME in the source files. wine-20000526/ChangeLog0100644000175000001440000313713107113604014014221 0ustar julliardusers---------------------------------------------------------------- 2000-05-26 Alexandre Julliard * controls/listbox.c: Serge Ivanov - Added handling of WM_MOUSEACTIVATE message - Added in_focus field to internal listbox's structure. This flag is set on receiving WM_SETFOCUS message and is reseted on WM_KILLFOCUS. All calls to GetFocus function were replaced with checks of this flag. - In LISTBOX_HandleLButtonDown: focus is set only if 'in_focus' flag is clear * dlls/dplayx/dplay.c, dlls/dplayx/dplayx_global.c, dlls/dplayx/dplayx_global.h, dlls/dplayx/name_server.c, dlls/dplayx/name_server.h: Peter Hunnisett Started local name server framework. * dlls/commdlg/finddlg.c, dlls/commdlg/fontdlg.c, dlls/commdlg/printdlg.c, include/commdlg.h, dlls/commdlg/cdlg.h, dlls/commdlg/cdlg_En.rc, dlls/commdlg/comdlg32.spec, dlls/commdlg/filedlg.c: Huw D M Davies Add PrintSetup dialog and support for hooks and templates. Move 16 bit api definitions out of commdlg.h to cdlg.h * controls/edit.c: Henning Hoffmann Don't send EN_CHANGE after painting the edit. Send it wherever text is changed. * controls/edit.c: Ulrich Czekalla Moved the EN_UPDATE notification out of the paint handler. Instead, the notification is sent when an InvalidateRect is made after modifying the text. * dlls/comctl32/tooltips.c: Francois Methot (Macadamian) Fixed the blank color palette tooltip bug by triggering a refresh of the tooltip with UpdateWindow function instead of calling directly the refresh function. * debugger/Makefile.in, debugger/external.c, misc/Makefile.in, misc/ext_debugger.c: James Juran DEBUG_ExternalDebugger() needs to be a part of wine, not winedbg. 2000-05-25 Alexandre Julliard * Make.rules.in: Do not clear suffixes list (breaks BSD make). * dlls/winspool/info.c, include/winspool.h: Huw D M Davies Move winspool to unicode. Minor bug fixes. * dlls/comctl32/trackbar.c: Aric Stewart Reworked the thumb drawing code, thumb calculation code, channel calculation code, and corrected some bugs in how tics are drawn and how clicks are handled. * controls/edit.c: Louis-Philippe Gagnon (of Macadamian Technologies for Corel) Added event handler for WM_MBUTTONDOWN (sends WM_PASTE message). * dlls/comctl32/toolbar.c: Chris Morgan Use clipping regions to reduce the amount of processing performed when the toolbar is repainting. Reduces processing by approximately 85-95% in most cases. * dlls/comctl32/treeview.c: Gerard Patel Fixes crash when calling Treeview_EndEditLabelNow and no node is currently edited. 2000-05-24 Alexandre Julliard * dlls/comctl32/flatsb.c: Susan Farley Defer to standard scrolling APIs for non-flatSB specific functions so that flatSBs show up and behave properly, just not with flat properties. * graphics/x11drv/dib.c: Rob Farnum Separate out the 32bit case from the 24bit case, and copy 3bytes of source for every 4bytes of input, into the destination for the 24bit case. * include/winbase.h, include/winnt.h, win32/file.c: Francois Gouget Sorted out a few misplaced definitions. Added some missing definitions related to file handling and virtual memory manipulation. Added IsTextUnicode. * dlls/comctl32/treeview.c: Aric Stewart Added handling for TVS_SINGLEEXPAND. * dlls/comctl32/tab.c: Aric Stewart Corrected the problem where a tab control marked multiline but has only one tab was being justified to fill the whole tab space. * msdos/dpmi.c: Marcus Meissner Commented out broken __asm__, added comments where it is broken. * dlls/comctl32/listview.c: Martin Fuchs Inserted a missing call to SetWindowPos(). With this change the header control is visible again in list views with report style. * Make.rules.in, tools/wrc/Makefile.in: Revived the GEN_C_SRCS variable to support wrc lex/yacc sources. 2000-05-23 Alexandre Julliard * windows/message.c: Alexandre Julliard (for Corel) Send a normal mouse message code in WM_PARENTNOTIFY, even if the actual message was a non-client one. * server/registry.c, dlls/ddraw/main.c, dlls/opengl32/wgl.c, dlls/x11drv/x11drv_main.c, include/x11drv.h: Patrik Stridvall Fixed issues found by winapi_check. * tools/winapi_check/modules.dat, tools/winapi_check/modules.pm, tools/winapi_check/nativeapi.dat, tools/winapi_check/win32/opengl32.api, tools/winapi_check/winapi.pm, tools/winapi_check/winapi_check, tools/winapi_check/winapi_function.pm, tools/winapi_check/winapi_local.pm, tools/winapi_check/winapi_options.pm: Patrik Stridvall - Updated API files - Better headers and prototype checking - Prototype checking now called --prototype instead of --headers - New options --headers-{duplicated,misplaced} for duplicated/misplaced functions checking of the headers. - Minor bug fixes. * Make.rules.in, configure, configure.in: Hidenori Takeshima If system doesn't have OpenGL, don't refer to libopengl32.so. * dlls/ole32/datacache.c, dlls/ole32/defaulthandler.c: Abey George (of Macadamian/Corel) When you open files with Embedded objects, they were not getting drawn correctly. When you paste OLE objects with presentation data, they were not getting drawn correctly. * controls/menu.c: Rob Farnum Post a WM_CANCELMODE message to wake up the internal menu handling code. This fixes the problem of a menu being orphaned when the parent window disappears, or if the parent loses focus. * dlls/winsock/socket.c: Gerald Pfeifer Fix a mismatch between format string and parameter. * dlls/comctl32/updown.c: Susan Farley SetBuddy no longer overwrites its superclass' WndProc property when the buddy has already been subclassed, eliminating the infinite loop that resulted. * configure, configure.in: John R. Sheets Cleaned up X11 extension tests. * controls/edit.c: Ulrich Czekalla Capture ^V,^X,^C and translate it to the corresponding message for paste, cut, copy. * dlls/opengl32/make_opengl_spec, dlls/opengl32/opengl32.spec, dlls/opengl32/wgl.c: Lionel Ulmer - fixed the OpenGL32 spec file (and the make_opengl_spec tool) - prevent HalfLife from crashing when it frees three times the same rendering context * graphics/vga.c, include/vga.h: Ove Kaaven Improved DirectDrawPalette handling (set it on init, not every time it changes). Added VGA_WriteChars() function. * msdos/int33.c: Ove Kaaven Scale mouse coordinates to default width 640. * dlls/ddraw/ddraw/main.c: Ove Kaaven Made WINE_DirectDraw a decorationless popup window. Fixes mouse coordinates previously offset by the invisible decorations. * include/winnt.h: Gerald Pfeifer #undef DELETE before (re)defining it. * dlls/comctl32/tooltips.c: Chris Morgan Fixed tooltips. * dlls/comctl32/toolbar.c: Chris Morgan Reduce toolbar redrawing and flicker by calling RedrawWindow() in TOOLBAR_MouseMove() only if hot effect applies to the current hot button. Restore bHot flag of hot button in TOOLBAR_LButtonUp() to restore hot effect properly. * controls/listbox.c: Serge Ivanov Fixed WM_LBUTTONDBLCLK handling. * include/win.h, include/x11drv.h, windows/defwnd.c, windows/nonclient.c, windows/x11drv/wnd.c: Susan Farley Set and retrieve the window icon that is drawn under managed mode (based on the work of Andrew Lewycky for Corel). * dlls/comctl32/toolbar.c: Aric Stewart Corrected a problem of when oldHit is negative and we try to use it as an index into the buttons array. * include/windows.h: Francois Gouget Should include commdlg.h. * include/windef.h: Francois Gouget Define the _X86_ macro on Intel processors. * controls/edit.c: Andreas Mohr Some part of EDIT_EM_LineLength code was commented (broken). Restored the capability to calculate the remaining non-selected chars of a selection area. * dlls/ddraw/ddraw/dga.c, dlls/ddraw/ddraw/x11.c: Lionel Ulmer Remove the PRIMARYSURFACE attribute from back buffers. * dlls/comctl32/listview.c: Aric Stewart If a listview is created with LVS_NOCOLUMNEHEADER then wine creates the header like normal but just sets it not visible. This fix lays out those supposedly nonexistent headers to size 0,0. So that even if they become visible they are not drawn. * dlls/commdlg/colordlg.c, include/wine/winuser16.h: Gerard Patel Remove the direct call into core (DIALOG_DoDialogBox). * dlls/ddraw/ddraw/dga.c, dlls/ddraw/ddraw/dga2.c, dlls/ddraw/dga_private.h: Lionel Ulmer Initialize the back-buffer with the correct VTable. * dlls/opengl32/opengl32.spec, dlls/opengl32/wgl.c, dlls/x11drv/x11drv_main.c, dlls/opengl32/make_opengl_spec, wine.ini: Lionel Ulmer - added option to get double-buffered desktop - implemented wglUseFontBitmapsA and wglDeleteContext * tools/wrc/CHANGES, tools/wrc/README.wrc, tools/wrc/dumpres.c, tools/wrc/dumpres.h, tools/wrc/genres.c, tools/wrc/newstruc.c, tools/wrc/newstruc.h, tools/wrc/parser.h, tools/wrc/parser.l, tools/wrc/parser.y, tools/wrc/utils.c, tools/wrc/utils.h, tools/wrc/wrc.h, tools/wrc/wrc.man, tools/wrc/wrctypes.h, tools/wrc/writeres.c: Bertho Stultiens - Implemented animated cursors and icons resource types. - Added partial support for font resources (user supplied fontdir is required). - All resources with inline data (a la RCDATA) now support language, version and characteristics data. - Implemented resource name duplicate checks. It is now an error if two resources of the same type have the same name. - Bugfix: Language propagation was not correct when .res files were generated. - Bugfix: VERSIONINFO now handles memory options. - Bugfix: resource names and the resource type may be equal (e.g. MENU MENU {...}). This support was mistakingly deleted in the upgrade to the builtin preprocessor. The standalone LANGUAGE setting became context sensitive as a consequence of this. Now it *must* end with a newline *after* both expressions and no newlines are allowed within the line (the statement must fit on one line). This is no practical problem though. * tools/winapi_check/output.pm: Francois Gouget Send regular messages to stdout so that they are separate from progress messages. * documentation/bugreports: Gerard Patel Regression testing using CVS. * dlls/dplayx/dplay.c, dlls/dplayx/dplayx_global.c, documentation/status/directplay: Peter Hunnisett - Small fixes/updates - Add support for the DPCONNECTION_DIRECTPLAYLOBBY flag * documentation/winedbg: Eric Pouech A bit of documentation on new debugging features. * files/directory.c: James Juran SearchPathA needs to set the last error to ERROR_FILE_NOT_FOUND when it does not find the file. * scheduler/debugger.c: Andreas Mohr Use WARN() instead of TRACE() in DebugOutputA(). * memory/heap.c: Huw D M Davies HeapFree on a NULL ptr should return TRUE. 2000-05-19 Alexandre Julliard * dlls/comctl32/listview.c: Chris Morgan Update nItemWidth in LISTVIEW_SetItem() if LVS_LIST or LVS_SMALLICON mode and item text is wider than the current nItemWidth. * loader/task.c: Ulrich Weigand U Fixed initialization of INSTANCEDATA in InitTask(). * dlls/ole32/storage.c: Uwe Bonnes StgOpenStorage16: correct arguments to the CreateFile call. * files/dos_fs.c: Uwe Bonnes DOSFS_DoGetFullPathName: terminate string weh called like .\\file * dlls/icmp/icmp_main.c: Francois Gouget Replace the calls to malloc by calls to HeapAlloc and friends. * dlls/comctl32/toolbar.c: Aric Stewart Fixes the line of garbage at the bottom of images and the fact that the buttons in the open dialog box where too tall. * dlls/ole32/Makefile.in, dlls/ole32/ole2conv.spec, dlls/ole32/ole2prox.spec, dlls/ole32/ole2thk.spec, if1632/.cvsignore, if1632/Makefile.in, if1632/ole2conv.spec, if1632/ole2prox.spec, if1632/ole2thk.spec, dlls/Makefile.in: Dimitrie O. Paun Moved if1632/ole2{conv,prox,thk}.spec into dlls/ole32. 2000-05-18 Alexandre Julliard * include/d3d.h, include/d3dcaps.h, include/d3dtypes.h, include/dsound.h: Peter Hunnisett - Added remaining DirectX 3D3 6&7 3D interfaces. - Added d3dcaps.h, d3dtypes.h and rearranged contents according to DirectX 7 headers. - Fixed dsound.h include list (d3d.h->d3dtypes.h). * programs/regapi/README: Juergen Lock Minor update. * misc/printdrv.c: Patrik Stridvall Fixed issues found by winapi_test. * dlls/gdi/gdi32.spec, include/wingdi.h, objects/dc.c, objects/dcvalues.c: Patrik Stridvall GetRelAbs for some reason takes 2 parameters, even though the second one is ignored at least on Windows NT 3.51 according to Marcus Meissner. * controls/edit.c: Sheri Steeves The edit is now detected correctly if the parent is a combo box. It wasn't working when the combobox was superclassed. * windows/nonclient.c: Francois Boisvert System icons in the small caption bars are displayed with the right size. * dlls/opengl32/make_opengl_norm, dlls/opengl32/opengl_norm.c, dlls/opengl32/wgl.c: Patrik Stridvall Fixed issues found by winapi_check. * tools/winapi_check/modules.dat, tools/winapi_check/win32/opengl32.api, tools/winapi_check/winapi.pm, tools/winapi_check/winapi_check, tools/winapi_check/winapi_options.pm, tools/winapi_check/winapi_parser.pm: Patrik Stridvall Minor bug fixes. * dlls/comctl32/tab.c: Francois Gouget Convert C++ comments to regular C comments. * dlls/ddraw/dga_private.h, dlls/ddraw/dsurface/dga.c, dlls/ddraw/dsurface/dga2.c, dlls/ddraw/dsurface/x11.c, dlls/ddraw/x11_private.h: Ove Kaaven Made IDirectDrawSurface::SetPalette set the surface's DIBSection color map to point to the IDirectDrawPalette's own depth conversion color map. * dlls/ddraw/ddraw/main.c, dlls/ddraw/main.c: Ove Kaaven Initialize an identity mapping in CreatePalette if no depth conversion is necessary. Also fixed a warning. * graphics/x11drv/dib.c: Ove Kaaven Made X11DRV_DIB_MapColor map back to the original color index if the XImage pixel's physical color is still the same. 2000-05-15 Alexandre Julliard * graphics/x11drv/xfont.c: Use the correct display for cached metrics file name. Store metrics in specified config dir. * dlls/x11drv/x11drv_main.c, include/options.h, wine.ini: Make sure all Wine processes share the same X display. Inherit --managed option across processes. Add support for specifying display and managed mode in config file. * dlls/ddraw/convert.c: Ove Kaaven Use unsigned int instead of unsigned short in DirectDraw depth-conversion color map. * controls/listbox.c: Susan Farley Avoid calls to SetFocus when they are unnecessary. 2000-05-14 Alexandre Julliard * dlls/comctl32/treeview.c: David Black Implemented TVM_EDITLABELA, plus some improvements to EndLabelEditNow. * dlls/winmm/wineoss/midi.c: Andreas Mohr More verbose errors. * windows/nonclient.c: Chris Morgan Fixed borders of windows while dragging or sizing to match TWEAK_WineLook setting. * relay32/builtin32.c: Gerald Pfeifer #include before . * misc/Makefile.in, misc/ddeml.c, dlls/Makefile.in, dlls/user/Makefile.in, dlls/user/ddeml.c, dlls/user/ddeml.spec, if1632/.cvsignore, if1632/Makefile.in, if1632/ddeml.spec, if1632/ole2nls.spec: Dimitrie O. Paun Moved DDEML into dlls/user. * dlls/advapi32/registry.c, include/server.h, misc/registry.c, server/registry.c, server/trace.c: Added support for registry values larger than the server buffer. When loading a registry file, automatically determine overlap between key name and file contents based on the first key name. Removed v1 saving code. Save USER\.Default separately into ~/.wine/userdef.reg. * dlls/ddraw/ddraw/dga.c, dlls/ddraw/ddraw/dga2.c, dlls/ddraw/ddraw/main.c, dlls/ddraw/ddraw/x11.c, dlls/ddraw/dga.c, dlls/ddraw/dga2.c, dlls/ddraw/dga_private.h, dlls/ddraw/dsurface/dga.c, dlls/ddraw/dsurface/dga2.c, dlls/ddraw/dsurface/main.c, dlls/ddraw/dsurface/x11.c: Ove Kaaven Improved DIBSection support for IDirectDrawSurface::GetDC. * graphics/x11drv/opengl.c, dlls/opengl32/wgl.c: Lionel Ulmer - set debug messages after a TRACE_ON test - prevent crash when making the NULL context current * controls/menu.c: Gerard Patel When new menu Id is not found or index > nitems, insert the new menu at end of current menu. 2000-05-13 Alexandre Julliard * dlls/ddraw/d3d_private.h, dlls/ddraw/ddraw.spec, dlls/ddraw/ddraw/x11.c, dlls/ddraw/direct3d/mesa.c, dlls/ddraw/main.c, dlls/ddraw/mesa_private.h, include/ddraw.h: Peter Hunnisett - Added ability to create 3D3 interfaces for Xlib - Changed DD_OK to D3D_OK in some places for consistency - Cleaned up some compiler warnings present without DGA2 - Changed order for DirectDrawEnumerateExA to enumerate at least what abilities are known rather than bailing on unsupported flags - Added DirectDrawCreateEx stub 2000-05-12 Alexandre Julliard * controls/menu.c: Susan Farley Distinguish RADIOCHECK style menu items from standard checkmark menu items. * controls/button.c: Susan Farley Like the AUTORADIOBUTTON, the parent of a RADIOBUTTON style button should be sent a BN_CLICKED when it receives the focus. * files/dos_fs.c: Uwe Bonnes GetFullPathname: add missing termination to the string. * tools/wrc/genres.c, tools/wrc/newstruc.c, tools/wrc/parser.y, tools/wrc/wrc.c: Patrik Stridvall Fixed byte order on Solaris and FreeBSD. * graphics/metafiledrv/init.c, graphics/psdrv/init.c, graphics/ttydrv/init.c, graphics/win16drv/init.c, graphics/x11drv/Makefile.in, graphics/x11drv/init.c, graphics/x11drv/opengl.c, include/acconfig.h, include/config.h.in, include/debugdefs.h, include/gdi.h, include/wine_gl.h, include/x11drv.h, loader/loadorder.c, dlls/Makefile.in, dlls/ddraw/d3dviewport.c, dlls/ddraw/ddraw/dga.c, dlls/ddraw/ddraw/x11.c, dlls/ddraw/dsurface/x11.c, dlls/ddraw/mesa_private.h, dlls/opengl32/.cvsignore, dlls/opengl32/Makefile.in, dlls/opengl32/make_opengl_ext, dlls/opengl32/make_opengl_norm, dlls/opengl32/make_opengl_spec, dlls/opengl32/opengl32.spec, dlls/opengl32/opengl_ext.c, dlls/opengl32/opengl_ext.h, dlls/opengl32/opengl_norm.c, dlls/opengl32/wgl.c, dlls/opengl32/wgl.h, graphics/enhmetafiledrv/init.c, graphics/painting.c, Make.rules.in, configure, configure.in: Lionel Ulmer Added support for OpenGL. * dlls/shell32/shlfolder.c: Eric Pouech Fixed absolute path to pidl generation. 2000-05-11 Alexandre Julliard * dlls/shell32/shlfolder.c: Alexandre Julliard (for Corel) Fixed buffer overflow. * dlls/imagehlp/access.c, dlls/imagehlp/integrity.c, dlls/imagehlp/symbol.c, dlls/shell32/brsfolder.c, dlls/shell32/shellord.c, dlls/tapi32/line.c, dlls/tapi32/phone.c, windows/driver.c: Patrik Stridvall Fixed some debug messages. * dlls/richedit/richedit.c, include/richedit.h, dlls/comctl32/listview.c: Patrik Stridvall Fixed issues found by winapi_check. * tools/winapi_check/modules.dat, tools/winapi_check/win16/ole2disp.api, tools/winapi_check/win32/advapi32.api, tools/winapi_check/win32/crtdll.api, tools/winapi_check/win32/imagehlp.api, tools/winapi_check/win32/kernel32.api, tools/winapi_check/win32/ntdll.api, tools/winapi_check/win32/oleaut32.api, tools/winapi_check/win32/riched32.api, tools/winapi_check/winapi.pm, tools/winapi_check/winapi_check, tools/winapi_check/winapi_function.pm, tools/winapi_check/winapi_local.pm, tools/winapi_check/winapi_options.pm, tools/winapi_check/winapi_parser.pm: Patrik Stridvall - Check for missing modules in modules.dat. - New options --debug-messages for debug message checking (turned off by default) - Do not discard the argument name (use in debug message checking) - Improved parsing - Minor bug fixes * graphics/x11drv/dib.c: Marcus Meissner Fixed asm() constraints. * debugger/dbg.y, debugger/debugger.h, debugger/info.c, debugger/intvar.h, debugger/stabs.c, debugger/stack.c, debugger/types.c, debugger/winedbg.c: Eric Pouech Fixed %p in printf (now using wsprintf which doesn't support it). Added ThreadId and ProcessId internal vars. Allow at startup to pick up a process to debug. * dlls/winmm/wineoss/audio.c: Eric Pouech Fixed division by zero. * dlls/comctl32/trackbar.c: Eric Pouech Fixed some quirks (range is 32 bit, page up/dn mismatch on HZ trackbars). * windows/scroll.c: Ove Kaaven Scroll off-screen controls when scroll rectangle is NULL. * dlls/comctl32/tab.c, include/tab.h: Ken Thomases Implemented tab control style TCS_HOTTRACK (tabs are highlighted on mouse-over). * dlls/comctl32/imagelist.c: Aric Stewart Remove the background from the new image when it is being replaced with a ReplaceImage. * loader/ne/module.c, loader/ne/segment.c, loader/task.c: Bernd Herd Make sure hInstance is a proper global handle and not a selector value. * dlls/commdlg/printdlg.c: Jean-Claude Batista PrintDialog now creates a DC when receiving a PD_RETURNDC flag. * dlls/comctl32/treeview.c: Aric Stewart Clean up the drawing code after a label update. There were problems if the new label is shorter that the old label fragments of the old label were left drawn. * windows/win.c: Guy Albertelli Clear menu handle after destroying menu. * controls/menu.c: Guy Albertelli Revalidate menu handle in mt.hTopMenu after DispatchMessage. * windows/dialog.c: Bernd Herd Pass CTLDATA as SEGPTR for 16-bit programs. * dlls/version/ver16.c: Alexander Frink Prevent possible NULL pointer access. 2000-05-10 Alexandre Julliard * controls/menu.c: Aric Stewart - Wine was passing the wrong hwnd as the owner when processing owner drawn menubars. - When doing MENU_CalcItemSize for the menu bar we were not properly padding the returned rect. * dlls/comctl32/treeview.c: Aric Stewart Allow the user to cancel label editing with esc and confirm with return. * dlls/comctl32/tab.c: Ken Thomases Restore accidentally undone changes. * dlls/comctl32/treeview.c: Aric Stewart - Wine was not properly reporting back the edited label to the application in a treeview when the label is a callback. - Because windows applications assume they get a new edit control every time they often subclass that edit box willy-nilly and do not clean up. So it is necessary to actually give them a new edit control each time. * dlls/comctl32/toolbar.c: Aric Stewart - Cleaned up some of the drawing code, specifically dealing with avoiding trying to draw invalid bitmaps. - Avoid directly calling drawing functions instead invalidating rects and relying on WM_PAINT. - For the dropdown event check the button style as opposed to the toolbar style. * dlls/dsound/dsound_main.c: Eric Pouech Make internal buffers size multiple of 4. * windows/mdi.c: Guy L. Albertelli Verify the menu handle is non-zero prior to use. * controls/menu.c: Ken Thomases Fixed to display popup-menu arrow on owner-drawn popup menus. Fixed positioning of submenus relative to parent menus. * windows/x11drv/event.c, dlls/comctl32/animate.c, dlls/winmm/time.c, graphics/vga.c, misc/system.c, scheduler/services.c, windows/timer.c: Specify the service thread timers in ms instead of us. * relay32/builtin32.c, relay32/relay386.c, tools/build.c, include/builtin32.h, include/winnt.h, misc/main.c: Reserve space for the PE header at the start of the .so file. Store the export table inside the data section so that sections can be properly aligned. Build the relay function table directly in the .spec.c file. Moved relay debugging functions to relay386.c. * dlls/comctl32/pager.c, dlls/comctl32/progress.c, dlls/comctl32/rebar.c, dlls/comctl32/status.c, dlls/comctl32/tab.c, dlls/comctl32/tooltips.c, dlls/comctl32/trackbar.c, dlls/comctl32/updown.c, dlls/comctl32/animate.c, dlls/comctl32/comboex.c, dlls/comctl32/header.c, dlls/comctl32/hotkey.c, dlls/comctl32/ipaddress.c, dlls/comctl32/listview.c, dlls/comctl32/monthcal.c: Gerard Patel Protect against use of comctl32 private control memory after it has been freed. * dlls/comctl32/status.c: Aric Stewart Some programs switch their status bar back and forth from simple mode while running. This fix corrects drawing and text setting problems that result from this behavior. 2000-05-09 Alexandre Julliard * memory/heap.c: Alexandre Julliard (for Corel) Fixed HeapAlloc(HEAP_ZERO_MEMORY) to clear the whole allocated block. Various optimizations. * dlls/winmm/wineoss/audio.c: Eric Pouech Changed WAVEHDR notification heuristic. Added preliminary support for loops in WAVEHDRs. Fixed issues when mixing open and getCaps calls. * tools/wrc/CHANGES, tools/wrc/Makefile.in, tools/wrc/README.wrc, tools/wrc/dumpres.c, tools/wrc/genres.c, tools/wrc/newstruc.c, tools/wrc/parser.h, tools/wrc/parser.l, tools/wrc/parser.y, tools/wrc/readres.c, tools/wrc/wrc.c, tools/wrc/wrc.h, tools/wrc/wrc.man, tools/wrc/wrctypes.h, tools/wrc/writeres.c: Bertho Stultiens - Bugfix: Corrected a SEGV in the rawdata handling. Mistakingly took the address of a pointer instead of its value. This probably slipped in during the merge of my tree into the winetree. Lesson learned: always double check. - Verified most resources so that win16 compile also generates correct output for reversed endian. - Implemented byte-ordering for resources. All resources can be forced to be little-, big- or native endian with command-line option -B. - Reading resources from .res-files are only accepted in native byte- ordering so that no additional semantic analysis is required. - Resource directory is still written in native-only format, including the strings. - Wrc is now installed through the makefile with 'make install' and also uninstalled with 'make uninstall'. - Wrote a man-page for better reference. The manpage also gets installed and uninstalled. - Cleaned up the namespace a bit by more agressive use of static. * dlls/comctl32/tab.c, include/tab.h: Aric Stewart Added the ability to use multiline tab controls to wine. * dlls/ddraw/dsurface/main.c, dlls/ddraw/dsurface/x11.c: Marcus Meissner Number of surface Lock/Unlocks must NOT match, so do NOT use it for reference counting. * tools/wineinstall: Ove Kaaven Update for new Wine features; use ttydrv instead of x11drv when running regapi, and set correct winedbg path in the registry. * scheduler/pthread.c: Ove Kaaven Fixed jump_alias for non-PIC, and disabled it for PIC, since it doesn't work for PIC right now. This fixes current crashing sigaction calls. * debugger/memory.c: Eric Pouech Fixed x /s command. * dlls/advapi32/registry.c: Andreas Mohr Added some reg temp file clutter check (more than 100 temp files in ~/.wine). 2000-05-07 Alexandre Julliard * graphics/x11drv/dib.c: Marcus Meissner SetImageBits_8: added ->15 conversion in optimized assembler. * dlls/richedit/Makefile.in, dlls/richedit/ansi_gen.h, dlls/richedit/ansi_sym.h, dlls/richedit/charlist.c, dlls/richedit/charlist.h, dlls/richedit/reader.c, dlls/richedit/riched32.h, dlls/richedit/riched32.spec, dlls/richedit/riched32_main.c, dlls/richedit/richedit.c, dlls/richedit/rtf.h, dlls/richedit/rtf2text.h, dlls/richedit/stdcharnames.h, dlls/richedit/text-writer.c, dlls/richedit/text_map.h, include/richedit.h: Jean-Claude Batista Wraps some RichEdit control functionality on an Edit control. It uses a free implementation of an RTF parser written by Paul DuBois http://www.primate.wisc.edu/software/RTF/ which I modified a bit to work with the control. * windows/winproc.c: Do not send WM_SIZING to 16-bit windows. * dlls/gdi/gdi_main.c, dlls/user/user_main.c: Cleaned up local heap initialisation. * dlls/commdlg/cdlg32.c, dlls/ole32/ole2.c, include/winbase.h, include/wine/winbase16.h, loader/pe_image.c, relay32/builtin32.c, windows/driver.c: Moved Load/FreeLibrary16 definition to winbase16.h. * dlls/Makefile.in, dlls/ole32/Makefile.in, dlls/ole32/ole2nls.c, dlls/ole32/ole2nls.spec, if1632/Makefile.in, ole/ole2nls.c: Dimitrie O. Paun Separate OLE2NLS out of KERNEL. * tools/winapi_check/modules.dat, tools/winapi_check/modules.pm, tools/winapi_check/winapi_check: Patrik Stridvall - Check for missing modules in modules.dat. - Minor bug fixes * graphics/x11drv/dib.c: Jean-Claude Batista (Macadamian/Corel) Top-down images have a negative biHeight, the scanlines of theses images were inverted in X11DRV_DIB_GetImageBits_xx. To prevent this I simply changed the sign of lines, the scanlines were correctly handled afterwards * debugger/stabs.c: Marcus Meissner Old versions of glibc might not have STN_UNDEF defined. * files/file.c: Gerard Patel Revert the test for Virtual_HandleFault in ReadFile/WriteFile. * dlls/comctl32/status.c: Gerard Patel Set the itemID member of the DRAWITEMSTRUCT to the number of the status part painted. * windows/mdi.c: Gerard Patel Always calls SetMenu in MDISetMenu. * dlls/tapi32/line.c: Dimitrie O. Paun Small debug channel cleanup. * controls/listbox.c: Chris Morgan Fixed scrolling bug. * dlls/comctl32/listview.c, include/listview.h: Chris Morgan Implemented ListView_SetHoverTime(), ListView_GetHoverTime(), initial support for the LVS_EX_TRACKSELECT flag. Added code to delete items in LISTVIEW_SetItemCount(). 2000-05-05 Alexandre Julliard * include/winuser.h, windows/nonclient.c: Aric Stewart Added WM_SIZING message support. * graphics/path.c: Rob Farnum Removed warnings from freeing path in DeleteDC. * dlls/comctl32/header.c: Aric Stewart Fixed a bug with the processing of HitTest. * controls/edit.c: Susan Farley Handle ^C, ^V and ^X in an edit control properly. * misc/registry.c: Huw D M Davies Strip the $$$PROTO.HIV bit from win2k SYSTEM and SOFTWARE hives. * dlls/comctl32/treeview.c: Huw D M Davies Fixed DC leak. * loader/pe_resource.c: Stephane Lussier If we do not find a resource for both (primary lang|sub lang), we try just (primary lang) before using the default. * dlls/comctl32/tooltips.c: Sheri Steeves Worked around some tooltips hide problems by checking the current tooltip. * documentation/distributors: Andreas Mohr Added a configuration hint for the CD-ROM "unhide" option. * ole/ole2nls.c: Henning Hoffmann (of Macadamian for Corel) Implemented SetLocaleInfo(). It required a change to GetLocaleInfo() as well, because GetLocaleInfo() has to get any values saved by SetLocaleInfo() in the registry. * debugger/break.c, debugger/dbg.y, debugger/debugger.h, debugger/intvar.h, debugger/module.c, debugger/stabs.c, debugger/winedbg.c: Eric Pouech Fixed some buffer overflows. Made stab parsing more robust (now ignores C++ stabs). Display correct backtrace at first when invoked on unhandled exception. Loads stabs from .so files when those are loaded. 2000-05-03 Alexandre Julliard * include/debugdefs.h: Generated again. * include/pe_image.h, loader/pe_image.c: PE_LoadImage: removed version parameter, set last error correctly. * scheduler/process.c, server/process.c, server/trace.c, include/process.h, include/server.h: Store process file name in startup info. Fixed exe_file handling. * dlls/Makefile.in: Fixed typo. * Make.rules.in, configure, configure.in, dlls/Makefile.in, dlls/richedit/.cvsignore, dlls/richedit/Makefile.in, dlls/richedit/riched32.spec, dlls/richedit/riched32_main.c: Hidenori Takeshima Added stubs for riched32.dll. * dlls/x11drv/x11drv_main.c: Lionel Ulmer Call XOpenIM on the large stack. * include/winsock.h: Bang Jun-Young FreeBSD 3.4 compile fix. * debugger/editline.c, debugger/winedbg.c, graphics/vga.c, include/winbase.h, include/wincon.h, relay32/kernel32.spec, server/console.c, win32/console.c: Fixed COORD structure definition. Fixed GetLargestConsoleWindowSize to not return a structure when called from the Window binary. * server/object.c: Small optimization. * scheduler/thread.c: Fixed default thread stack size. * objects/text.c: Fixed DrawTextW length handling. * dlls/ddraw/dsurface/main.c: Lionel Ulmer Remove the assertion when there is no source surface. * include/oleauto.h: Huw D M Davies Add DosDateTimeToVariantTime prototype. * dlls/shell32/shlwapi.spec: Huw D M Davies Map StrChrA to strchr. Fix StrChrW arg list. * include/winuser.h: Huw D M Davies Added HWND_MESSAGE. * dlls/ole32/stg_stream.c: Huw D M Davies Allow ISequentialStream_Write to work if access mode is STGM_READWRITE. * misc/registry.c: Bertho Stultiens Mmap does not fail on zero-length files. 2000-05-01 Alexandre Julliard * include/global.h, memory/virtual.c: Use exception handling to implement the IsBad* functions. Removed /proc/self/maps parsing as it is not very useful with .so libs. * include/process.h, include/thread.h, miscemu/main.c, scheduler/process.c, scheduler/thread.c: Setup the initial thread %fs from a constructor. * dlls/ddraw/dga.c, dlls/ddraw/dga2.c, dlls/ddraw/x11.c, include/winnt.h: Added DECL_GLOBAL_CONSTRUCTOR macro. * resources/user32.rc, tools/Makefile.in, tools/wrc/.cvsignore, tools/wrc/CHANGES, tools/wrc/Makefile.in, tools/wrc/README.wrc, tools/wrc/newstruc.c, tools/wrc/parser.h, tools/wrc/parser.l, tools/wrc/parser.y, tools/wrc/ppl.l, tools/wrc/ppy.y, tools/wrc/preproc.c, tools/wrc/preproc.h, tools/wrc/utils.c, tools/wrc/utils.h, tools/wrc/wrc.c, tools/wrc/wrc.h, tools/wrc/writeres.c, dlls/commdlg/rsrc.rc, dlls/display/disp.rc, dlls/shell32/shres.rc, programs/clock/Makefile.in, programs/notepad/Makefile.in, programs/progman/Makefile.in, programs/winemine/Makefile.in, programs/winhelp/Makefile.in, dlls/comctl32/rsrc.rc: Bertho Stultiens - Implemented a new preprocessor that is (nearly) ANSI-C compliant. The old parser has been stripped from the old preprocessor-code which cleaned up both resource-scanner and -parser. - Standard defines have been introduced (see README.wrc) - Both preprocessor- and resource-scanner have been optimized slightly so that no backing up is required (one char lookahead is enough). - Filename-scanning has been cleaned up, though not perfect yet. - User-type resources are compatible now. - Line-continuation in strings is corrected so that it does not introduce a newline in the output. * scheduler/thread.c, server/process.c, server/process.h, server/request.c, server/request.h, server/thread.c, server/thread.h, server/trace.c, windows/queue.c, loader/module.c, memory/environ.c, miscemu/main.c, scheduler/process.c, include/process.h, include/server.h, include/thread.h, loader/main.c: Rewrote Unix process launching to allow passing startup information to Winelib apps. Improved handling of execve() failures. * files/file.c: Added ENOEXEC error code. * scheduler/pthread.c: Added atfork support. * configure.in, dlls/ddraw/Makefile.in, dlls/ddraw/ddraw/dga.c, dlls/ddraw/ddraw/dga2.c, dlls/ddraw/dga.c, dlls/ddraw/dga2.c, dlls/ddraw/dga2_private.h, dlls/ddraw/dga_private.h, dlls/ddraw/dpalette/dga.c, dlls/ddraw/dsurface/dga.c, dlls/ddraw/dsurface/dga2.c, configure: Lionel Ulmer Added DGA2 driver to DirectDraw. * dlls/commdlg/cdlg32.c: Uwe Bonnes COMDLG32_DllEntryPoint,COMDLG32_SetCommDlgExtendedError: delay allocation of Tls for CommDlgExtendedError until it is needed. * debugger/winedbg.c: Eric Pouech Fixed segv when debugger registry key doesn't exist. * dlls/icmp/icmp_main.c: Gerald Pfeifer Use instead of the deprecated and non-portable . 2000-04-30 Alexandre Julliard * ANNOUNCE, ChangeLog, include/version.h: Release 20000430. * windows/x11drv/wnd.c: Gerard Patel X11DRV_SetFocus: really don't mess with focus for managed windows. * graphics/win16drv/graphics.c, graphics/x11drv/oembitmap.c, graphics/x11drv/text.c, include/heap.h, memory/heap.c, objects/text.c, windows/clipboard.c, windows/input.c, windows/winproc.c: Dimitrie O. Paun Removed HEAP_xalloc. * debugger/break.c, debugger/db_disasm.c, debugger/dbg.y, debugger/debug.l, debugger/debugger.h, debugger/display.c, debugger/editline.c, debugger/expr.c, debugger/hash.c, debugger/info.c, debugger/intvar.h, debugger/memory.c, debugger/registers.c, debugger/source.c, debugger/stabs.c, debugger/stack.c, debugger/types.c, debugger/winedbg.c, debugger/winedbg.spec: Eric Pouech - Enhanced internal variables framework (including read/save to registry and typing) - Finalized use of Windows' Console I/O interface (instead of Unix std streams) - Now handling registers as internal variables (they are no longer seen as a specific type) * win32/except.c: Eric Pouech Insure we always try to launch a debugger. * relay32/wowthunk.c: Uwe Bonnes Use Thread pseudo handle and not Thread Id as argument for the call to GetThreadSelectorEntry. ---------------------------------------------------------------- 2000-04-30 Alexandre Julliard * windows/x11drv/wnd.c: Gerard Patel X11DRV_SetFocus: really don't mess with focus for managed windows. * graphics/win16drv/graphics.c, graphics/x11drv/oembitmap.c, graphics/x11drv/text.c, include/heap.h, memory/heap.c, objects/text.c, windows/clipboard.c, windows/input.c, windows/winproc.c: Dimitrie O. Paun Removed HEAP_xalloc. * debugger/break.c, debugger/db_disasm.c, debugger/dbg.y, debugger/debug.l, debugger/debugger.h, debugger/display.c, debugger/editline.c, debugger/expr.c, debugger/hash.c, debugger/info.c, debugger/intvar.h, debugger/memory.c, debugger/registers.c, debugger/source.c, debugger/stabs.c, debugger/stack.c, debugger/types.c, debugger/winedbg.c, debugger/winedbg.spec: Eric Pouech - Enhanced internal variables framework (including read/save to registry and typing) - Finalized use of Windows' Console I/O interface (instead of Unix std streams) - Now handling registers as internal variables (they are no longer seen as a specific type) * win32/except.c: Eric Pouech Insure we always try to launch a debugger. * relay32/wowthunk.c: Uwe Bonnes Use Thread pseudo handle and not Thread Id as argument for the call to GetThreadSelectorEntry. 2000-04-29 Alexandre Julliard * loader/pe_image.c: Clear the remainder of the page when mapping a section whose size on disk is not a full page multiple. Temporarily commented out the VirtualFree call in PE_UnloadLibrary. * dlls/ddraw/ddraw/x11.c, include/ts_xlib.h, tsx11/X11_calls, tsx11/ts_xlib.c: Lionel Ulmer - added thread-safety protection to XListPixmapFormats - moved pixmap / image format matching ERRs to WARNs * win32/console.c, include/winbase.h: Eric Pouech Fixed GetLargestConsoleWindowSize prototype. * dlls/wininet/ftp.c: Gerald Pfeifer FreeBSD compile fix. * graphics/x11drv/dib.c, include/bitmap.h, include/gdi.h, include/x11drv.h, objects/dib.c: Ove Kaaven Added DIB_CreateDIBSection with extra parameter ovr_pitch, added ovr_pitch to pCreateDIBSection in DC_FUNCS. If ovr_pitch is nonzero, it is a pitch override (specifies bytes per line), and tells to treat the offset parameter as an already-mapped virtual memory address (if the section parameter is zero). Fixed a DIB status init bug in creating DIB sections from file mappings (if created from mapping, the DIB is *not* really InSync). * include/winbase.h, memory/virtual.c: Ove Kaaven Add Wine-internal allocation type MEM_SYSTEM for VirtualAlloc to register external mappings (like video frame buffers). * configure.in, include/config.h.in, scheduler/pthread.c, configure: Eric Pouech Enhanced libc's pthread configuration detection. * dlls/x11drv/x11drv_main.c, graphics/x11drv/bitmap.c, msdos/dosaspi.c, windows/multimon.c: Eric Pouech Fixed a few compilation warnings. * dlls/commdlg/colordlg.c, dlls/shell32/shellord.c: Patrik Stridvall Fixed some warnings. * dlls/dplayx/dpclassfactory.c, dlls/shell32/shell32.spec, dlls/urlmon/urlmon.spec, dlls/urlmon/urlmon_main.c, misc/comm.c: Patrik Stridvall Fixed issues reported by winapi_check. * tools/winapi_check/win32/shell32.api, tools/winapi_check/win32/shlwapi.api, tools/winapi_check/winapi_check, tools/winapi_check/winapi_local.pm, tools/winapi_check/winapi_options.pm, tools/winapi_check/winapi_parser.pm: Patrik Stridvall - API files update - Minor bug fixes. - Added new option --cross-call-unicode-ascii for checking illegal Unicode to ASCII calls. * configure, configure.in, include/config.h.in: Lionel Ulmer Added '--enable-opengl' flag to bypass the thread-safety check. * files/dos_fs.c, files/profile.c, graphics/painting.c, windows/x11drv/event.c, dlls/lzexpand/lzexpand_main.c: Dimitrie O. Paun Removed some HEAP_xalloc calls. * dlls/winmm/mci.c: Eric Pouech Fixed bug when file doesn't exist in MCI_OPEN handling. Reduced time spent with crit sect locked. * tools/build.c: Eric Pouech Fixed argv handling for cuiexe winelib programs. * scheduler/pthread.c: Ove Kaaven Made pthread_kill_other_threads_np and pthread_atfork fixmes less obtrusive. * windows/winhelp.c: Rein Klazes WinHelp must accept a NULL pointer to the help key string. 2000-04-28 Alexandre Julliard * dlls/commdlg/finddlg32.c: Guy L. Albertelli - Correct check for minimum buffer length. - Correct cases where ShowWindow is done/not done. * dlls/comctl32/commctrl.c: Chris Morgan , James Abbatiello Implemented TME_QUERY and TME_HOVER flags in _TrackMouseEvent and TrackMouseEventProc. Added code to allow addition/cancelation of tracking flags on existing entries rather than create extra entries. Fixed timer. Added check to _TrackMouseEvent to stop timer if the tracking list is empty. Fixed TME_CANCEL. Fixed TME_LEAVE/TME_HOVER when hwndTrack isn't the current hwnd. * files/dos_fs.c: Uwe Bonnes DOSFS_DoGetFullPathName: rewrite to return results like OSR2. * include/module.h, loader/module.c, loader/pe_image.c, memory/virtual.c: Gavriel State , Ulrich Czekalla Added support for memory mapping of 4k aligned PE binaries. This can speed up load times significantly for some applications. * dlls/shell32/brsfolder.c, dlls/shell32/shellguid.c, dlls/shell32/shellpath.c, dlls/shell32/shlfileop.c, dlls/shell32/shlfolder.c, dlls/shell32/shlmenu.c, dlls/shell32/shlwapi.spec, dlls/shell32/shres.rc, dlls/shell32/shresdef.h, dlls/shell32/shv_bg_cmenu.c, include/shell.h, include/shlobj.h, include/shlwapi.h, include/wine/obj_shellbrowser.h, include/wine/undocshell.h: Juergen Schmied Complete cleanup, bugfixes. New: PathStripPath, PathMakeUniqueName, PathStripToRoot, PathGetShortPath, PathParseIconLocation, PathRemoveExtension, PathRemoveArgs, PathAppend, PathBuildRoot, PathCanonicalize, PathFindNextComponent, PathRemoveFileSpec. * dlls/shell32/classes.c, include/wine/obj_queryassociations.h: Juergen Schmied Stubs for IQueryAssociations. * dlls/shell32/Makefile.in, dlls/shell32/dialogs.c, dlls/shell32/shellord.c, dlls/shell32/shpolicy.c: Juergen Schmied Moved policy related functions to shpolicy.c Moved dialog related functions to dialogs.c * dlls/shell32/shell32.spec: Juergen Schmied Explicit import user32.dll. Many corrections, exported some functions by name. * dlls/shell32/shell.c, dlls/shell32/shellole.c: Juergen Schmied Separated 32 bit functions to shellole.c. * dlls/shell32/pidl.c: Juergen Schmied Small fixes. * dlls/shell32/iconcache.c: Juergen Schmied Fixed: extract the icon by resource id. * dlls/shell32/shlview.c: Juergen Schmied Small fixes. * dlls/shell32/shell32_main.c, dlls/shell32/shell32_main.h: Juergen Schmied Fixes. Use GetModuleHandleA instead of LoadLibrary for dlls imported by the spec file. * wine.ini: Dmitry Timoshkov Make WineLook=Win95 the default setting. * dlls/dinput/dinput_main.c: Lionel Ulmer Added leaving of critical section on all return cases. * scheduler/pthread.c: Ove Kaaven Removed init_sect. Use Interlocked* functions instead. * misc/registry.c: Juergen Schmied Small fixes, removed asserts. * libtest/Makefile.in, programs/clock/Makefile.in, programs/cmdlgtst/Makefile.in, programs/notepad/Makefile.in, programs/progman/Makefile.in, programs/view/Makefile.in, programs/winhelp/Makefile.in: Changed imports of winspool to winspool.drv. * dlls/Makefile.in, dlls/user/Makefile.in: Added libkeyboard.so creation. * dlls/comctl32/header.c, include/header.h: Martin Fuchs - Return modified rectangle after layouting header control - Output text in header control when no other Flag specified - Delay bounding rectangle calculation for header control items * dlls/comctl32/toolbar.c: Chris Morgan Implemented TOOLBAR_MouseLeave to handle WM_MOUSELEAVE messages. Added TrackMouseEvent calls to TOOLBAR_MouseMove. Hot buttons now look/behave almost exactly the same as native windows. * windows/sysparams.c: Chris Morgan Added default values for SPI_GETMOUSEHOVERHEIGHT, SPI_GETMOUSEHOVERWIDTH and SPI_GETMOUSEHOVERTIME to SystemParametersInfo16(). * misc/comm.c: Rein Klazes Implement mark and space parity generation. Accept one-and- a-half stopbits: the most common uarts will generate this automatically when there are 5 databits. * scheduler/pthread.c: Ove Kaaven Override fork(). * debugger/debugger.h, include/heap.h, memory/heap.c: Dimitrie O. Paun Get rid of HEAP_xrealloc. 2000-04-25 Alexandre Julliard * Make.rules.in, configure, configure.in, dlls/Makefile.in, dlls/ddraw/Makefile.in: Patrik Stridvall Compile fix for --without-x. * loader/main.c, wine.ini: Patrik Stridvall Added new configuration file option for selecting graphics driver. * dlls/ttydrv/Makefile.in: Patrik Stridvall Link the TTY driver with the standard libs. * Make.rules.in, dlls/Makefile.in, dlls/commdlg/Makefile.in, dlls/winspool/.cvsignore, dlls/winspool/Makefile.in: Eric Pouech Fixed winspool(.drv) loading. * windows/x11drv/clipboard.c, windows/x11drv/event.c, windows/x11drv/init.c, windows/x11drv/keyboard.c, windows/x11drv/mouse.c, windows/x11drv/wnd.c, graphics/x11drv/bitblt.c, graphics/x11drv/bitmap.c, graphics/x11drv/brush.c, graphics/x11drv/clipping.c, graphics/x11drv/dib.c, graphics/x11drv/graphics.c, graphics/x11drv/init.c, graphics/x11drv/objects.c, graphics/x11drv/oembitmap.c, graphics/x11drv/palette.c, graphics/x11drv/pen.c, graphics/x11drv/text.c, graphics/x11drv/xfont.c, include/ts_xf86dga.h, include/ts_xf86dga2.h, include/ts_xf86vmode.h, include/ts_xlib.h, include/ts_xpm.h, include/ts_xresource.h, include/ts_xshm.h, include/ts_xutil.h, include/x11drv.h, tools/make_X11wrappers, tsx11/ts_xf86dga.c, tsx11/ts_xf86dga2.c, tsx11/ts_xf86vmode.c, tsx11/ts_xlib.c, tsx11/ts_xpm.c, tsx11/ts_xresource.c, tsx11/ts_xshm.c, tsx11/ts_xutil.c: Patrik Stridvall Removed X_DISPLAY_MISSING. * debugger/types.c, debugger/msc.c: Ulrich Weigand Improved CodeView type information loader. * dlls/commdlg/colordlg.c: Gerard Patel Don't use the template member unless the corresponding flag is set. 2000-04-24 Alexandre Julliard * LICENSE, WARRANTY: Switched to the X11 license. * server/registry.c, if1632/relay.c, misc/ddeml.c: Patrik Stridvall Fixed some warnings. * dlls/wininet/Makefile.in, dlls/wininet/wininet.spec, dlls/wininet/wininet_main.c, dlls/comctl32/comctl32.spec, dlls/comctl32/commctrl.c, dlls/dinput/dinput.spec, dlls/dinput/dinput_main.c, dlls/dplayx/dpclassfactory.c, dlls/dplayx/dplayx.spec, dlls/shell32/shell32.spec, dlls/shell32/shell32_main.c, dlls/urlmon/Makefile.in, dlls/urlmon/urlmon.spec, dlls/urlmon/urlmon_main.c: Patrik Stridvall Fixed issues found by winapi_check. * tools/winapi_check/win16/wprocs.api, tools/winapi_check/win32/dinput.api, tools/winapi_check/win32/kernel32.api, tools/winapi_check/win32/urlmon.api, tools/winapi_check/win32/wininet.api, tools/winapi_check/winapi_function.pm, tools/winapi_check/winapi_local.pm, tools/winapi_check/winapi_options.pm, tools/winapi_check/modules.dat, tools/winapi_check/modules.pm, tools/winapi_check/winapi.pm, tools/winapi_check/winapi_check: Patrik Stridvall - Updated API files. - Improved misplaced function checking. - Fixed minor bugs. * include/winnt.h: Francois Gouget Include string.h to make winnt.h self-sufficient. * dlls/comctl32/tooltips.c: Patrick Yang (Corel) infoPtr sometimes can be NULL. * dlls/commdlg/cdlg_Ca.rc, dlls/commdlg/cdlg_Cs.rc, dlls/commdlg/cdlg_Da.rc, dlls/commdlg/cdlg_De.rc, dlls/commdlg/cdlg_En.rc, dlls/commdlg/cdlg_Eo.rc, dlls/commdlg/cdlg_Es.rc, dlls/commdlg/cdlg_Fi.rc, dlls/commdlg/cdlg_Fr.rc, dlls/commdlg/cdlg_Hu.rc, dlls/commdlg/cdlg_It.rc, dlls/commdlg/cdlg_Ja.rc, dlls/commdlg/cdlg_Ko.rc, dlls/commdlg/cdlg_Nl.rc, dlls/commdlg/cdlg_No.rc, dlls/commdlg/cdlg_Pl.rc, dlls/commdlg/cdlg_Pt.rc, dlls/commdlg/cdlg_Ru.rc, dlls/commdlg/cdlg_Sk.rc, dlls/commdlg/cdlg_Sv.rc, dlls/commdlg/cdlg_Wa.rc, dlls/commdlg/colordlg.c, include/commdlg.h: Gerard Patel 32 bits message processing for color dialog. * dlls/comctl32/toolbar.c, dlls/comctl32/commctrl.c: Martin Fuchs Fixed toolbar bitmap size handling. * configure.in, configure: Rein Klazes Correct test for linux 2.2 joystick API, which returned true in every case. * dlls/version/install.c, graphics/x11drv/bitmap.c, include/xmalloc.h, misc/Makefile.in, misc/xmalloc.c: Dimitrie O. Paun Removed the last xmalloc calls. * programs/winver/Makefile.in, relay32/builtin32.c, programs/cmdlgtst/Makefile.in, programs/control/Makefile.in, programs/notepad/Makefile.in, programs/osversioncheck/Makefile.in, programs/progman/Makefile.in, programs/regapi/Makefile.in, programs/regtest/Makefile.in, programs/view/Makefile.in, programs/wcmd/Makefile.in, programs/winemine/Makefile.in, programs/winhelp/Makefile.in, dlls/commdlg/comdlg32.spec, dlls/shell32/shellord.c, dlls/x11drv/Makefile.in, if1632/builtin.c, include/module.h, libtest/Makefile.in, libtest/hello3res.rc, programs/avitools/Makefile.in, programs/clock/Makefile.in, configure.in, debugger/Makefile.in, dlls/Makedll.rules.in, dlls/Makefile.in, wine.ini, .cvsignore, Make.rules.in, Makefile.in, configure: Implemented on-demand loading of builtin dlls using dlopen(). 2000-04-23 Alexandre Julliard * Makefile.in, dlls/x11drv/Makefile.in: Build wineclipsrv as part of the x11drv dll. * dlls/commdlg/Makefile.in, dlls/commdlg/cdlg.h, dlls/commdlg/cdlg32.c, dlls/commdlg/filedlg95.c, dlls/commdlg/filedlgbrowser.c, dlls/commdlg/printdlg.c, dlls/shell32/Makefile.in, dlls/shell32/shlview.c: Removed a few inter-dll dependencies. * windows/painting.c: Rein Klazes Make RDW_ValidateParent() modify the update region of all parents, not just the direct parent. * relay32/snoop.c: Uwe Bonnes SNOOP_PrintArg: replaced IsBad* functions by exception handler. * configure, configure.in: Patrik Stridvall Added --without-curses compile option. * scheduler/pthread.c: Ove Kaaven Added some more pthread overrides. * winedefault.reg: Ove Kaaven Fixed debugger registry key location. * include/ddeml.h: Francois Gouget Use DECLARE_HANDLE to declare handles. * include/windef.h: Francois Gouget DECLARE_HANDLE should not be undef'ed after use. * controls/edit.c: Ove Kaaven Fix edit control's WM_GETTEXT behaviour. * misc/comm.c: Gerard Patel Do not initialize dcb in BuildCommDCB[AndTimeouts]. * include/casemap.h, tools/unimap.pl: Dmitry Timoshkov Adapted unimap.pl script and generated by it casemap.h to the Unicode Standard, Version 3.0. * windows/dialog.c: Gerard Patel Check if dialog is visible before setting the focus. * windows/defwnd.c: Dmitry Timoshkov Removed the longstanding hack in response to WM_ACTIVATE message. * include/winuser.h: Martin Fuchs Fixed GetNumberFormat declaration. * dlls/comctl32/toolbar.c: Chris Morgan James Abbatiello Redraw toolbar button inside TOOLBAR_EnableButton() only if the state of the button changes. Stops flickering in toolbars caused by excessive redrawing. * dlls/wininet/internet.c, dlls/wininet/wininet.spec: Gerard Patel Stub for InternetGetConnectedState. * include/winbase.h: Francois Gouget Fixed GetProcessHeap() for the STRICT mode. * dlls/ddraw/main.c: Marcus Meissner Also check for empty GUID in DirectDrawCreate. 2000-04-19 Alexandre Julliard * dlls/version/version.spec, dlls/winmm/joystick/joystick.spec, dlls/winmm/mcianim/mcianim.spec, dlls/winmm/mciavi/mciavi.spec, dlls/winmm/mcicda/mcicda.spec, dlls/winmm/mciseq/mciseq.spec, dlls/winmm/mciwave/mciwave.spec, dlls/winmm/midimap/midimap.spec, dlls/winmm/wavemap/msacm.spec, dlls/winmm/wineoss/wineoss.spec, dlls/avifil32/avifil32.spec, dlls/commdlg/comdlg32.spec, dlls/ddraw/ddraw.spec, dlls/dplayx/dplayx.spec, dlls/msvideo/msvfw32.spec, dlls/oleaut32/oleaut32.spec, dlls/olecli/olecli32.spec, dlls/shell32/shell32.spec, dlls/urlmon/urlmon.spec: Added some missing import directives. * dlls/oleaut32/Makefile.in, dlls/shell32/Makefile.in, dlls/comctl32/Makefile.in, dlls/commdlg/Makefile.in: Removed winmm from import list. * dlls/comctl32/animate.c, include/animate.h: Use GetProcAddress for mmio* functions to avoid importing winmm.dll. * programs/wcmd/builtins.c, programs/wcmd/wcmd.spec: Fixed resource loading. * tools/cvdump/cvcrunch.c, tools/cvdump/cvdump.c, tools/cvdump/cvinclude.h, tools/cvdump/cvload.c: John R. Sheets Minor cleanups, plus fixed a couple bugs in .DBG parsing code. Added dump for MISC section. * winedefault.reg: Andreas Mohr Added DirectPlay registry keys to winedefault.reg. * dlls/comctl32/treeview.c: Stephane Lussier Mousewheel support. 2000-04-18 Alexandre Julliard * tools/cvdump/cvcrunch.c, tools/cvdump/cvdump.h, tools/fnt2bdf.c, include/imagehlp.h, include/neexe.h, include/pe_image.h, include/peexe.h, include/winnt.h, loader/dos/module.c, loader/elf.c, loader/module.c, loader/ne/module.c, loader/pe_image.c, loader/task.c, relay32/builtin32.c, relay32/snoop.c, debugger/dbgmain.c, debugger/module.c, debugger/msc.c, debugger/types.c, dlls/shell32/iconcache.c, dlls/shell32/shell.c, dlls/version/resource.c: Moved PE header definitions to winnt.h where they belong. * windows/x11drv/event.c, controls/combo.c, controls/edit.c, controls/listbox.c, dlls/comctl32/listview.c, include/mouse.h, include/winuser.h, windows/input.c, windows/spy.c: Stephane Lussier Implemented Mousewheel support. * dlls/winsock/async.c: Rein Klazes Convert service and protocol names to lowercase before calling getservby{name|port} and getprotoby{name|port}. * objects/region.c: Huw D M Davies Fix return value for OffsetRgn if x and y are 0. * graphics/path.c: Huw D M Davies Implement StrokeAndFillPath. Call DeleteObject when finished with hrgn in PATH_FillPath. * include/wininet.h: Huw D M Davies Fixed typo. * graphics/enhmetafiledrv/objects.c: Sheri Steeves EMR_SELECTOBJECT records stock objects with their id as the object handle and the high bit set. * objects/enhmetafile.c: Huw D M Davies Tidy up of PlayEnhMetaFileRecord - fixes PolyPoly* functions. 2000-04-16 Alexandre Julliard * server/registry.c: Removed permission checks in create_key and delete_key. It seems Windows doesn't check anything. * loader/resource.c: Richard Cohen Wrap an exception handler around FindResource. * programs/regtest/regtest.c: Uwe Bonnes Corrected WinMain. Added test case for RegCreateKeyEx showing win95 behaviour. * debugger/dbg.y, debugger/debug.l, debugger/debugger.h, debugger/info.c: Implemented 'walk process' and 'walk threads' commands using toolhelp snapshots. * include/server.h, include/tlhelp32.h, include/toolhelp.h, misc/toolhelp.c, server/process.c, server/process.h, server/request.h, server/snapshot.c, server/thread.c, server/thread.h, server/trace.c: Implemented thread and (partial) module snapshots, based on the work of Andreas Mohr . * server/main.c, server/registry.c, server/request.h, server/trace.c, documentation/wine.conf.man.in, include/server.h, include/shell.h, loader/main.c, misc/registry.c, wine.ini: Save the registry on server exit without client intervention. Removed "alt" registry files since we now have symlinks and WINEPREFIX to replace them. * include/ts_xlib.h, tsx11/X11_calls, tsx11/ts_xlib.c, windows/x11drv/event.c: Stephane Lussier Support switching the keyboard layout with WINE running. * dlls/crtdll/crtdll_main.c: Uwe Bonnes fgets: Don't swallow \n, treat EOF feof: Crude implementation signal: Return error * winedefault.reg: Uwe Bonnes Add missing backslash in the debugger definition. * win32/time.c: Rein Klazes SetLocalTime() and SetSystemTime() bugfixes. Added a maximum clock adjustment of 2 minutes just in case... * dlls/dsound/dsound_main.c: Marcus Meissner DSOUND_MixerNorm: do not compare unrelated pointers. 2000-04-15 Alexandre Julliard * loader/module.c: Rewrote command-line parsing of CreateProcessA to be more compatible. * programs/winhelp/Makefile.in, programs/winver/Makefile.in, relay32/builtin32.c, scheduler/process.c, scheduler/thread.c, tools/build.c, programs/cmdlgtst/Makefile.in, programs/control/Makefile.in, programs/notepad/Makefile.in, programs/osversioncheck/Makefile.in, programs/osversioncheck/osversioncheck.c, programs/osversioncheck/osversioncheck.spec, programs/progman/Makefile.in, programs/regapi/Makefile.in, programs/regtest/Makefile.in, programs/view/Makefile.in, programs/wcmd/Makefile.in, programs/wcmd/wcmd.spec, programs/wcmd/wcmdmain.c, programs/winemine/Makefile.in, debugger/Makefile.in, include/callback.h, include/main.h, include/module.h, include/thread.h, libtest/Makefile.in, loader/main.c, loader/module.c, loader/pe_image.c, misc/options.c, programs/avitools/Makefile.in, programs/clock/Makefile.in, Make.rules.in: Improved Winelib apps initialisation code. No longer need to link winestub.o with Winelib apps. * include/wine/winbase16.h, relay32/utthunk.c, dlls/dinput/dinput_main.c, dlls/dplayx/dplayx.spec, dlls/icmp/icmp_main.c, dlls/ntdll/om.c, dlls/shell32/shlwapi.spec, dlls/win87em/emulate.c, dlls/wininet/ftp.c, dlls/wininet/internet.c, dlls/winmm/mcianim/mcianim.c, graphics/ttydrv/palette.c, dlls/ddraw/main.c, dlls/ddraw/x11.c: Patrik Stridvall Fixed some issues reported by winapi_check. * tools/winapi_check/*: Patrik Stridvall - API files update. - Add new options --all and --none that enable/disables all check respectively. - Fixed and improved stub statistics. - Fixed bug that prevented checking of the first function in the .spec files. - Partial implementation of a more advanced misplaced function checking. - Minor fixes. * dlls/comctl32/toolbar.c: Martin Fuchs Implement CCS_NOMOVEY for tool bars. * tools/wineinstall: Ove Kaaven Symlink root's registry to global registry. Minor cleanups. * ole/ole2nls.c: Owen Wang Added further implementation of WINAPI EnumDateFormats() to support three more locales: German(standard), French(standard) and French (canadian). All date formats follow conventions from Windows NT 4.0 * dlls/comctl32/treeview.c: Serge Ivanov Added proper handling TVIS_OVERLAYMASK flag and allows to display overlay images. Fixed off by one error with listitem in TREEVIEW_InsertItemA (uNumItems is 0 based, cChildren is a count). 2000-04-14 Alexandre Julliard * include/thread.h, scheduler/Makefile.in, scheduler/pthread.c: Ove Kaaven POSIX threads emulation, tricks glibc into being threadsafe. * scheduler/client.c, server/main.c, server/request.c: Made server launching somewhat cleaner and faster. * dlls/ddraw/ddraw/dga.c, dlls/ddraw/dga.c, include/x11drv.h, windows/x11drv/event.c: Marcus Meissner Detypoed X11DRV_EVENT_SetInputMethod. * windows/x11drv/keyboard.c: Stephane Lussier When dealing with XKB extensions, force the AltGr key mask to use the group index instead of the modifier. * include/windef.h: Huw D M Davies Define __fastcall. * include/commctrl.h: Huw D M Davies Added a few toolbar defines. * graphics/enhmetafiledrv/graphics.c, graphics/enhmetafiledrv/init.c: Huw D M Davies A few corrections to bounding boxes. * graphics/x11drv/graphics.c: Huw D M Davies Don't close groups of polylines. * misc/comm.c: Marcus Meissner Do not dereference a ptr we just checked being NULL. * dlls/ddraw/d3ddevice/main.c, dlls/ddraw/ddraw_private.h, dlls/ddraw/direct3d/main.c, dlls/ddraw/mesa_private.h: Francois Gouget Changed the placement of WINE_UNUSED to make gcc 2.7.2 happy. * misc/registry.c: Ove Kaaven Follow symlinks when saving registry. * debugger/Makefile.in: Added missing winestub dependency. * include/server.h, scheduler/process.c, server/event.c, server/object.h, server/process.c, server/thread.c, server/trace.c: Load done event now created by the server. 2000-04-13 Alexandre Julliard * debugger/.cvsignore, debugger/Makefile.in, debugger/break.c, debugger/db_disasm.c, debugger/dbg.y, debugger/debug.l, debugger/debugger.h, debugger/display.c, debugger/expr.c, debugger/hash.c, debugger/info.c, debugger/intvar.h, debugger/memory.c, debugger/module.c, debugger/msc.c, debugger/registers.c, debugger/source.c, debugger/stabs.c, debugger/stack.c, debugger/types.c, debugger/winedbg.c, debugger/winedbg.spec, include/stackframe.h, Makefile.in: Eric Pouech Made the winedbg an external and WineLib program. Centralized output handling (preparation for console usage). Fixed a few debug information reading options (stabs and sym). Started a framework to hold debugger's internal variables. * miscemu/main.c, documentation/wine.man.in, include/options.h, misc/main.c, misc/options.c: Eric Pouech Got rid of -debug wine's option (wine now requires an external debugger). * win32/except.c, winedefault.reg: Eric Pouech Added launching of a debugger when unhandled exception occurs. * relay32/builtin32.c: Eric Pouech Added a .xcnlnk section to builtin KERNEL32 PE header. * loader/module.c: Eric Pouech Let CreateProcess launch unix executable without a .exe extension. Fixed arguments passed when creating a unix process. * dlls/ntdll/signal_i386.c, include/acconfig.h, include/config.h.in, configure, configure.in: Fixed signal stack handling on Linux when sigaltstack is available. Added a direct sigaltstack syscall to work-around the glibc bug. * dlls/ntdll/signal_i386.c, include/global.h, memory/virtual.c: Implemented guard pages and stack overflow exceptions. * include/thread.h, scheduler/process.c, scheduler/thread.c: Cleanup thread stack allocation. Use a single VirtualAlloc for TEB and the various stacks. * files/profile.c: Make sure HKLM\Software\Wine\Wine is a non-volatile key. * dlls/x11drv/x11drv_main.c, windows/x11drv/keyboard.c: Stephane Lussier Fixed AltGr key handling. * dlls/ddraw/ddraw/dga.c, dlls/ddraw/dga.c, dlls/ddraw/dga_private.h, dlls/ddraw/dpalette/dga.c, dlls/ddraw/dsurface/dga.c: Marcus Meissner Make DirectDraw compile with DGA2 present. * files/file.c: Andreas Mohr FILE_CreateFile()'s read/write-check was broken due to checking of ERROR_xxx instead of STATUS_xxx. * objects/enhmetafile.c: Huw D M Davies Fixes and cleans up some of the GetEnhMetaFile* functions. Fixes scaling of EMFs in playback. Will probably be right when World Transforms work properly... * memory/global.c: Huw D M Davies GlobalReAlloc returns 0 on failure. * dlls/ntdll/ntdll.spec, dlls/ntdll/om.c: Andreas Mohr Stub for NtAllocateUuids. * dlls/comctl32/treeview.c: Huw D M Davies Clear TopRootItem when whole tree is deleted. Fix off by one lstrcpyn. Clean up and fix GetNextItem. 2000-04-11 Alexandre Julliard * documentation/.cvsignore: Ignore all output files. * dlls/wininet/.cvsignore, dlls/wininet/Makefile.in, dlls/wininet/ftp.c, dlls/wininet/internet.c, dlls/wininet/internet.h, dlls/wininet/utility.c, dlls/wininet/wininet.spec, include/debugdefs.h, include/urlmon.h, include/wininet.h, Make.rules.in, configure, configure.in, dlls/Makefile.in, dlls/urlmon/.cvsignore, dlls/urlmon/Makefile.in, dlls/urlmon/umon.c, dlls/urlmon/urlmon.spec: Merged urlmon.dll and wininet.dll from the Corel tree (implementation by Ulrich Czekalla ) * include/process.h, include/thread.h, include/winbase.h, scheduler/client.c, scheduler/process.c, scheduler/thread.c, windows/queue.c: Made GetProcessHeap(), GetCurrentProcessId(), GetCurrentThread() and GetCurrentProcess() inline. * AUTHORS, include/authors.h: Marcus Meissner Merged in Corel's AUTHORs. * graphics/x11drv/dib.c: Marcus Meissner Only copy dstwidth*3 bytes in the 24bit case. * dlls/ddraw/dsurface/x11.c: Marcus Meissner Free private structure in Xlib_DDS_Release. * windows/message.c: Ulrich Czekalla MSG_ProcessKbdMsg can be called from peek, so only process when remove is set. * dlls/comctl32/treeview.c: Serge Ivanov TreeView - minor bugfix and optimization: - GetDC call moved down to avoid possible resource leak. - Invariant code is moved out of loop. * dlls/shell32/pidl.c: Ulrich Czekalla _ILGetFileDate should convert the date to local time before generating the string (_ILGetFileDateTime does not). * dlls/winmm/mmio.c: Noomen Hamza Fixed other bugs within MMIO implementation. Now, it's possible to copy/cut from PhotoPaint and paste to CorelDraw. 2000-04-10 Alexandre Julliard * dlls/ddraw/d3ddevice/main.c, dlls/ddraw/d3ddevice/mesa.c: Marcus Meissner Use d3dexecutebuffer_create only when compiling with MESA. 2000-04-09 Alexandre Julliard * graphics/x11drv/bitmap.c, graphics/x11drv/palette.c, graphics/ttydrv/palette.c: Dimitrie O. Paun Replaced xmalloc calls with malloc/HeapAlloc calls. * console/generic.c, console/ncurses.c, console/xterm.c: Eric Pouech Cosmetics. * memory/heap.c: Andreas Mohr Implemented HeapWalk(). * dlls/ddraw/dsurface/x11.c: Marcus Meissner Two left over HeapValidate assertions removed. * server/debugger.c: Eric Pouech Clear status for sending exception event. * tools/genpatch: Eric Pouech Added ability to put new-lines in changelog entry. Added -p to locate destination directory. * dlls/comctl32/listview.c: Richard Cohen GetItem was returning the item instead of subitem info. * programs/winemine/main.c: Dave Pickles Registry key used in LoadBoard() was not the same as the one used in SaveBoard(). Also fixed a typo in the position saving code. * configure, configure.in: Create directories that don't contain a Makefile. * tools/wrc/Makefile.in, dlls/ttydrv/Makefile.in, dlls/winmm/Makefile.in, dlls/x11drv/Makefile.in, documentation/Makefile.in, include/Makefile.in, ole/Makefile.in, programs/Makefile.in, programs/winhelp/Makefile.in, tools/Makefile.in, Make.rules.in, Makefile.in, debugger/Makefile.in, dlls/Makefile.in, dlls/ddraw/Makefile.in: Improved support for Makefiles that need to recurse in subdirectories. * dlls/ddraw/dpalette/dga.c, dlls/ddraw/dpalette/main.c, dlls/ddraw/dpalette/x11.c, dlls/ddraw/dsurface/dga.c, dlls/ddraw/dsurface/main.c, dlls/ddraw/dsurface/x11.c, configure.in, dlls/ddraw/.cvsignore, dlls/ddraw/Makefile.in, dlls/ddraw/convert.c, dlls/ddraw/d3d_private.h, dlls/ddraw/d3dcommon.c, dlls/ddraw/d3ddevice/main.c, dlls/ddraw/d3ddevice/mesa.c, dlls/ddraw/d3ddevices.c, dlls/ddraw/d3dexecutebuffer.c, dlls/ddraw/d3dlight.c, dlls/ddraw/d3dmaterial.c, dlls/ddraw/d3dtexture.c, dlls/ddraw/dclipper/main.c, dlls/ddraw/ddraw.spec, dlls/ddraw/ddraw/dga.c, dlls/ddraw/ddraw/main.c, dlls/ddraw/ddraw/x11.c, dlls/ddraw/ddraw_main.c, dlls/ddraw/ddraw_private.h, dlls/ddraw/dga.c, dlls/ddraw/dga_private.h, dlls/ddraw/direct3d/main.c, dlls/ddraw/direct3d/mesa.c, dlls/ddraw/helper.c, dlls/ddraw/main.c, dlls/ddraw/mesa.c, dlls/ddraw/mesa_private.h, dlls/ddraw/x11.c, dlls/ddraw/x11_private.h, configure: Marcus Meissner Restructured DirectDraw. Split into X11 and DGA driver, and multiple files/dirs for easier maintenance. Cleaned up structs and include files. Reindented the code. Started the same for Direct3D. Driver inclusion now done by using configure/Makefile/ELF constructor tricks. 2000-04-08 Alexandre Julliard * windows/x11drv/event.c, files/profile.c, graphics/x11drv/xfont.c, include/cursoricon.h, include/message.h, loader/ne/module.c, memory/heap.c, scheduler/sysdeps.c, scheduler/syslevel.c, windows/cursoricon.c, windows/timer.c, dlls/shell32/changenotify.c, dlls/shell32/iconcache.c, dlls/user/user_main.c, dlls/x11drv/x11drv_main.c: Removed a number of global handle allocations and critical section initializations. * server/process.c, scheduler/process.c: Temporary hack to share handles between processes sharing the same address space. * include/winbase.h, scheduler/critsection.c: Added lazy initialization of critical sections, based on a patch by Andrew Lewycky. * dlls/comctl32/tab.c: Yuxi Zhang Stephen Mereu TabCtrl leftmostVisible is not updated properly. It caused the QP application bar on the bottom fail to bring back the items when there is no need to scrolling. Also fixed a bug that when an item is inserted, setItemBounds should be called first, then it's time to invalidate. * relay32/kernel32.spec, win32/newfns.c: Andreas Mohr Added PeekNamedPipe stub. * graphics/x11drv/init.c: Gerard Patel Fixed pixmap leak with the 1x1 bitmap in memory DCs. * tools/wineinstall: Ove Kaaven wineinstall now properly configures no-windows installs, and should now be easier to adapt for binary packages too. * documentation/samples/system.ini: Ove Kaaven Default system.ini (from documentation/status/multimedia). 2000-04-06 Alexandre Julliard * server/debugger.c, server/thread.c, server/thread.h: Do not send a debug event for a thread until the previous event for the same thread has been continued. * misc/registry.c, wine.ini: Moved SaveOnlyUpdatedKeys to wine.ini. Use get_config_dir() instead of hardcoding ~/.wine Simplified loading and saving routines. * files/profile.c, include/options.h, include/server.h, scheduler/client.c, server/request.c: Added support for WINEPREFIX environment variable. * windows/winpos.c, loader/ne/module.c, memory/selector.c, misc/lstr.c, misc/network.c, msdos/int21.c, objects/font.c, win32/console.c, win32/except.c, windows/dialog.c, windows/hook.c, windows/mdi.c, windows/message.c, dlls/win32s/w32sys.c, dlls/win87em/emulate.c, dlls/winmm/mmio.c, dlls/winmm/mmsystem.c, dlls/winmm/mmsystem.spec, graphics/painting.c, graphics/psdrv/driver.c, graphics/win16drv/font.c, loader/module.c, dlls/advapi32/advapi32.spec, dlls/advapi32/service.c, dlls/comctl32/comctl32.spec, dlls/comctl32/comctl32undoc.c, dlls/gdi/gdi.spec, dlls/msacm/msacm_main.c, dlls/ole32/storage32.c, dlls/oleaut32/stubs.c, dlls/olepro32/olepro32.spec, dlls/shell32/shell.c, dlls/shell32/shell32.spec, dlls/shell32/shellpath.c, dlls/shell32/shlwapi.spec: Patrik Stridvall Fixed some issues reported by winapi_check. * include/winuser.h, ole/ole2nls.c, relay32/kernel32.spec: Owen Wang Implemented API EnumTimeFormatsA(). It supports now all different English locales, as well as German(standard), French(standard) and French(Canadian). All time formats follow conventions in Windows NT 4.0 Haithem Hmida (of Macadamian for Corel) Implemented GetCurrencyFormatA() API: - GetCurrencyFormatA() calls GetNumberFormatA() to format the number (as a positive one), then formats the number depending on NegativeOrder/PositiveOrder fields. - GetNumberFormatA() has been slightly modified. * objects/text.c: Junichi Kuchinishi Added conversion from DBCS lpDx to WCHAR lpDx. * tools/winapi_check/win32/advapi32.api, tools/winapi_check/win32/shell32.api, tools/winapi_check/win32/shlwapi.api, tools/winapi_check/winapi.pm, tools/winapi_check/winapi_check, tools/winapi_check/winapi_options.pm, tools/winapi_check/winapi_parser.pm: Patrik Stridvall - Implemented stub statistics. Turned off by default. (Requested by Francois Gouget). - Implemented missing prototype checking. Turned off by default (Requested by Dimitry Timoshkov). - Implemented .spec file name sanity checking. Turned off by default. - Implemented documentation width checking. Turned off by default. - Minor bug fixes. * dlls/ole32/compobj.c: Andrew Lewycky Fix StringFromGUI2 return value as per documentation. * dlls/dsound/dsound_main.c: Marcus Meissner Make audiodevice blocking directly after the non-blocking open, since we use the write(2) also for synchronization. * dlls/winsock/async.c, dlls/winsock/socket.c: Rein Klazes Corrected error handling for ws_getprotobyname/number. Made the Async error returns the same as the normal functions. * files/dos_fs.c: Uwe Bonnes GetShortPathName: always erase characters at the end of the new string, and return only single backslashes. 2000-04-04 Alexandre Julliard * files/dos_fs.c, files/drive.c, files/file.c, include/drive.h, include/file.h, include/options.h, misc/main.c, misc/options.c, misc/registry.c, documentation/wine.conf.man.in, documentation/wine.man.in: Added a per-drive FailReadOnly flag, and removed the global --failreadonly option. * dlls/x11drv/x11drv_main.c, files/file.c, scheduler/client.c: Fixed file descriptor leaks. * misc/registry.c: Call PROFILE_GetWineIniBool before starting to fill the request buffer. Made new registry format the default. * server/ptrace.c: Increment suspend count before attempting attach in suspend_for_ptrace. * server/file.c, server/mapping.c, server/mutex.c, server/process.c, server/registry.c, server/request.h, server/semaphore.c, server/timer.c, server/trace.c, tools/make_requests, server/atom.c, server/console.c, server/event.c: Made request tracing more robust against bogus lengths. * documentation/Makefile.in, documentation/wine.conf.man.in, documentation/wine.man.in: Peter Ganten Adapted the manual pages to the new long options, updated the -debugmsg channels and added a small hack to get the @sysconfdir@ stuff in the manual pages right. * dlls/winmm/mmio.c: Noomen Hamza Fixed two small bugs within MMIO_InstallIOProc and MMIO_Destroy. * programs/winemine/main.c, programs/winemine/main.h: Joshua Thielen Added DestroyBoard function to delete bitmap handles. Moved SelectObject outside of DrawMine. Selected old object's back into hMemDC. * msdos/int21.c: Ian Schmidt Implemented FAT32 function 7302 (Get Extended DPB). * win32/device.c: Ian Schmidt Implemented DeviceIoControl VWIN32_DIOC_DOS_DRIVEINFO, needed by Internet Explorer. * programs/regapi/regapi.c: Gavriel State This patch adds the ability for regapi to call the DllRegisterServer or DllUnregisterServer for a list of DLLs. * dlls/ole32/ole2.c: Gavriel State OleRegGetUserType did return an unterminated ASCII string instead of an OLESTR (wide characters). * misc/main.c, ole/nls/ena.nls, ole/nls/enb.nls, ole/nls/enc.nls, ole/nls/eng.nls, ole/nls/eni.nls, ole/nls/enj.nls, ole/nls/enl.nls, ole/nls/ens.nls, ole/nls/ent.nls, ole/nls/enu.nls, ole/nls/enz.nls, ole/nls/irl.nls, ole/ole2nls.c: Michael Abd-El-Malek (Corel) Changed irl.nls to eni.nls. Reviewed and fixed a lot of the NLS files to be more compatible to Windows. Added en_GB (used by Corel Linux 1.0,1.1) as alias for en_UK. Jeff Tranter The measurement unit for Canadian English should be metric. LANG_SUB_ENTRY did always return the first language due to missing {}. 2000-03-30 Alexandre Julliard * documentation/distributors: Marcus Meissner Updated documentation/distributors in regards to shared libraries and some more windows specific dirs. * programs/winemine/README, programs/winemine/main.c, programs/winemine/main.h: Peter Hunnisett - Fix painting bug with middle button down when dragging mouse - Speed up drawing and hence overall speed - Fix compiler warnings - Added some optional debugging information - Added a new known bug to the list * misc/comm.c: Rein Klazes Added CTS, DSR and RingIndicator states to Window's semi-documented modem line status register. * include/wingdi.h, objects/enhmetafile.c: Huw D M Davies Delete objects after use in EnumEnhMetaFile. Make PlayEnhMetaFile call EnumEnhMetaFile. Move EnumEnhMetaFile prototype to wingdi.h. * dlls/dsound/dsound_main.c, dlls/winmm/wineoss/audio.c: Marcus Meissner open() the OSS sounddevice non-blocking in case another process has it open already. * scheduler/process.c: Commented out exit() call on ExitProcess for now. * server/context_i386.c, server/debugger.c, server/main.c, server/object.h, server/process.c, server/thread.c, server/thread.h: Set thread start address to 0 on events generated by DebugActiveProcess. Return a correct address in the simulated exception event. * dlls/ttydrv/ttydrv_main.c, graphics/ttydrv/dc.c, graphics/ttydrv/graphics.c, graphics/ttydrv/text.c, include/ttydrv.h, windows/ttydrv/wnd.c: Fixed ttydrv compile when using curses. Cleaned up a few #ifdefs. 2000-03-28 Alexandre Julliard * dlls/dsound/dsound_main.c, dlls/winaspi/winaspi16.c, graphics/path.c, programs/winhelp/macro.yacc.y: Niels Kristian Bech Jensen - Fix some compiler warnings. - Remove superfluous #include statement. * include/wine/winnet16.h, misc/network.c: Ron Gage Fixed bug reported by winapi_check. * */*.c: Patrik Stridvall Added/fixed some documentation reported by winapi_check. * graphics/x11drv/palette.c, objects/palette.c: Fixed memory allocations. * dlls/crtdll/crtdll.spec, dlls/crtdll/crtdll_main.c, dlls/user/user32.spec, include/winuser.h, windows/input.c: Patrik Stridvall - Added/fixed some documentation reported by winapi_check - Renamed MapVirtualKeyEx32A to MapVirtualKeyExA - Renamed CRTDLL__dllonexit to CRTDLL___dllinit * dlls/ole32/ifs.c, dlls/ttydrv/ttydrv_main.c, misc/printdrv.c: Patrik Stridvall Fixed some warnings. * tools/winapi_check/win32/kernel32.api, tools/winapi_check/winapi_check, tools/winapi_check/winapi_options.pm: Patrik Stridvall - Updated the API files. - Minor bug fixes * dlls/comctl32/animate.c: Andreas Mohr Do a LoadLibraryA of WINMM upon ANIMATE_Create and a FreeLibrary upon ANIMATE_Destroy. * tools/wrc/parser.l: Patrik Stridvall Minor fix in wrc to support the Solaris preprocessor. * debugger/msc.c: Patrik Stridvall Fixed some ANSI C violations. * documentation/no-windows: Ove Kaaven Add start menu directories. * scheduler/sysdeps.c, scheduler/thread.c: Put CLONE_FILES back in, it is still breaking too many things. * objects/bitmap.c, graphics/ttydrv/bitmap.c, graphics/x11drv/bitmap.c, graphics/x11drv/brush.c, graphics/x11drv/dib.c, graphics/x11drv/init.c, graphics/x11drv/oembitmap.c, include/bitmap.h, include/x11drv.h: Merged DDBitmap and physBitmap into the generic bitmap structure (suggested by Andrew Lewycky). * files/dos_fs.c: Ignore trailing spaces in DOSFS_ToDosFCBFormat. * dlls/winsock/socket.c: Fixed small bug in WSOCK32_accept 2000-03-26 Alexandre Julliard * include/version.h, ANNOUNCE, ChangeLog: Release 20000326. ---------------------------------------------------------------- 2000-03-26 Alexandre Julliard * files/dos_fs.c: Stefan Leichter DOSFS_ToDosFCBFormat: fail if extension longer than 3 characters. * tools/cvdump/.cvsignore, tools/cvdump/Makefile.in, tools/cvdump/cvcrunch.c, tools/cvdump/cvdump.c, tools/cvdump/cvdump.h, tools/cvdump/cvinclude.h, tools/cvdump/cvload.c, Makefile.in, configure, configure.in: John R. Sheets Added cvdump tool to dump CodeView symbol information. * dlls/winsock/socket.c, include/server.h, server/sock.c, server/trace.c: Ove Kaaven Handle POLLHUP better (delay FD_CLOSE notification until all data has been read). Made WSAEnumNetworkEvents atomic. Convert socket event error codes properly. Made accept()-ed sockets inherit the listening socket's WSAAsyncSelect(). * dlls/dsound/dsound_main.c: Andreas Mohr Fixed debug formatting. * dlls/advapi32/registry.c: Fixed error checking in registry saving. * misc/cdrom.c: Uwe Bonnes Use strerror in debug output. * dlls/shell32/changenotify.c: Uwe Bonnes SHChangeNotify[A|W]: free only items we allocated. * loader/resource.c, objects/enhmetafile.c, objects/font.c, objects/text.c, win32/console.c: Hidenori Takeshima Fixes for i18n. * debugger/stabs.c: Eric Pouech Now read .so list from debuggee's address space. * include/windowsx.h: Francois Gouget Added missing macros. * include/winnt.h, include/winreg.h, server/registry.c: Andreas Mohr Moved some registry definitions to winnt.h. * programs/winhelp/winhelp.spec, programs/cmdlgtst/cmdlgtst.spec, programs/notepad/notepad.spec, programs/progman/progman.spec: Hidenori Takeshima Added import of comdlg32.dll in spec file. * windows/winpos.c: Gerard Patel Activate a hidden window only when explicitely asked by the application. * debugger/Makefile.in, debugger/break.c, debugger/dbg.y, debugger/debugger.h, debugger/hash.c, debugger/info.c, debugger/module.c, debugger/msc.c, debugger/stabs.c, debugger/winedbg.c: Eric Pouech improved exception handling merged all module handling code in new module.c file reenabled 'walk module' and 'info module' commands added ability to drive break on thread startup * dlls/oleaut32/oleaut.c, dlls/oleaut32/oleaut32.spec: Marcus Meissner Stubs for DllRegisterServer/DllUnregisterServer. * dlls/winaspi/winaspi32.c: Marcus Meissner Fixed return value for SC_GET_DEV_TYPE. 2000-03-25 Alexandre Julliard * server/registry.c, server/trace.c, tools/build.c, windows/cursoricon.c, windows/dce.c, windows/msgbox.c, windows/nonclient.c, windows/rect.c, windows/timer.c, windows/user.c, windows/winpos.c, windows/winproc.c, loader/pe_image.c, loader/resource.c, memory/heap.c, memory/local.c, misc/version.c, msdos/int21.c, objects/enhmetafile.c, objects/region.c, programs/winhelp/hlpfile.c, programs/winhelp/macro.c, programs/winhelp/winhelp.c, dlls/winmm/wineoss/audio.c, files/dos_fs.c, files/drive.c, files/file.c, files/profile.c, graphics/enhmetafiledrv/graphics.c, graphics/enhmetafiledrv/init.c, graphics/metafiledrv/init.c, graphics/x11drv/graphics.c, graphics/x11drv/xfont.c, include/windef.h, dlls/comctl32/comctl32undoc.c, dlls/comctl32/trackbar.c, dlls/comctl32/updown.c, dlls/commdlg/colordlg.c, dlls/crtdll/crtdll_main.c, dlls/ole32/hglobalstream.c, dlls/ole32/memlockbytes.c, dlls/ole32/stg_stream.c, dlls/ole32/storage32.c, dlls/winmm/lolvldrv.c, dlls/winmm/mciwave/mciwave.c, dlls/winmm/mmio.c, dlls/winmm/mmsystem.c, dlls/winmm/time.c, controls/edit.c, controls/menu.c, controls/scroll.c: Francois Gouget Use min/max instead of MIN/MAX. * server/sock.c: Ove Kaaven Handle socket POLLERR/POLLHUP conditions properly. Clear error field for OOB notifications. * controls/listbox.c: Huw D M Davies Send the correct ODA_ code when deselecting an item. * windows/user.c, include/process.h, include/server.h, include/thread.h, loader/ne/module.c, loader/task.c, scheduler/process.c, scheduler/sysdeps.c, scheduler/thread.c, server/process.c, server/thread.c, server/trace.c: Fixed a couple of file descriptor leaks. Always call USER signal proc in the right context. Cleaned up THREAD_Create. * include/Makefile.in: Do not erase local files on uninstall if install dir does not exist. * windows/multimon.c, windows/sysparams.c, windows/ttydrv/Makefile.in, windows/ttydrv/desktop.c, windows/ttydrv/init.c, windows/ttydrv/monitor.c, windows/ttydrv/wnd.c, windows/user.c, windows/win.c, windows/x11drv/Makefile.in, windows/x11drv/init.c, windows/x11drv/monitor.c, controls/desktop.c, dlls/ttydrv/ttydrv_main.c, dlls/x11drv/x11drv_main.c, graphics/ttydrv/dc.c, include/desktop.h, include/monitor.h, include/ttydrv.h, include/user.h, include/x11drv.h, misc/main.c, windows/dce.c: Store monitor size and depth in the generic structure. Merged monitor driver into USER driver. * windows/ttydrv/Makefile.in, windows/ttydrv/main.c, windows/x11drv/Makefile.in, windows/x11drv/desktop.c, windows/x11drv/main.c, windows/x11drv/monitor.c, windows/x11drv/mouse.c, windows/x11drv/wnd.c, dlls/ddraw/ddraw_main.c, dlls/x11drv/x11drv_main.c, graphics/x11drv/bitmap.c, graphics/x11drv/brush.c, graphics/x11drv/dib.c, graphics/x11drv/graphics.c, graphics/x11drv/init.c, graphics/x11drv/oembitmap.c, graphics/x11drv/palette.c, include/x11drv.h: A few simplifications and optimizations in the x11 driver. * Make.rules.in, Makefile.in, dlls/ddraw/Makefile.in, dlls/ttydrv/Makefile.in, dlls/x11drv/Makefile.in: Link ttydrv and x11drv objects into their respective dll. * dlls/user/Makefile.in: Added missing keyboard.spec. 2000-03-24 Alexandre Julliard * windows/msgbox.c, misc/comm.c, misc/printdrv.c, win32/except.c: Moved FatalAppExit functions to win32/except.c. Added a few uses of Callout instead of referencing USER functions directly. * windows/cursoricon.c, include/bitmap.h, objects/bitmap.c: Moved LoadImage and related functions to cursoricon.c. * dlls/gdi/.cvsignore, dlls/gdi/Makefile.in, dlls/gdi/gdi.spec, dlls/gdi/thunk.c, dlls/user/.cvsignore, dlls/user/Makefile.in, dlls/user/keyboard.spec, dlls/user/thunk.c, dlls/user/user.spec, if1632/.cvsignore, if1632/Makefile.in, if1632/keyboard.spec, if1632/thunk.c, include/callback.h, objects/linedda.c, windows/win.c: Moved gdi/user thunking functions into their respective dlls. Moved keyboard.spec into user dll. * configure, configure.in: Lionel Ulmer Disable OpenGL support if the latter is thread safe. * debugger/dbg.y, debugger/memory.c, dlls/crtdll/wcstring.c, dlls/ole32/clipboard.c, dlls/ole32/storage32.h, graphics/win16drv/init.c, graphics/x11drv/dib.c, scheduler/sysdeps.c: Patrik Stridvall Fixed some warnings. * dlls/dinput/dinput_main.c, graphics/dispdib.c, include/animate.h, include/button.h, include/crtdll.h, include/dinput.h, include/dispdib.h, include/enhmetafile.h, include/imagelist.h, include/metafile.h, include/region.h, include/sqltypes.h, include/wine/icmpapi.h, include/wine/obj_commdlgbrowser.h, include/wine/obj_contextmenu.h, include/wine/obj_dockingwindowframe.h, include/wine/obj_property.h, include/wine/obj_shellextinit.h, include/wine/windef16.h, include/wine/wingdi16.h, include/winpos.h: Patrik Stridvall Made the include files self sufficient. * dlls/win32s/w32skernel.c, dlls/winmm/joystick.c, dlls/winmm/mmsystem.c, dlls/winmm/wineoss/audio.c, dlls/winsock/socket.c, dlls/winsock/wsock32.spec, misc/ddeml.c, dlls/oleaut32/oleaut.c, dlls/oleaut32/safearray.c, dlls/oleaut32/variant.c, dlls/olepro32/olepro32stubs.c, dlls/shell32/changenotify.c, dlls/shell32/iconcache.c, dlls/shell32/shell.c, dlls/shell32/shellord.c, dlls/shell32/shellpath.c, dlls/shell32/systray.c, dlls/tapi32/assisted.c, dlls/tapi32/line.c, dlls/tapi32/phone.c, dlls/version/install.c, dlls/dplayx/dpclassfactory.c, dlls/dsound/dsound_main.c, dlls/icmp/icmp_main.c, dlls/mpr/mpr_main.c, dlls/msvideo/msvideo_main.c, dlls/ntdll/nt.c, dlls/ntdll/rtl.c, dlls/ntdll/sec.c, dlls/ntdll/time.c, dlls/odbc32/proxyodbc.c, dlls/ole32/compositemoniker.c, dlls/avifil32/avifile.c, dlls/comctl32/comctl32undoc.c, dlls/comctl32/draglist.c, dlls/comctl32/flatsb.c, dlls/commdlg/finddlg32.c, dlls/ddraw/ddraw_main.c: Patrik Stridvall Added/fixed some documentation reported by winapi_check. * relay32/kernel32.spec, scheduler/critsection.c, win32/newfns.c, windows/painting.c, dlls/crtdll/crtdll.spec, dlls/ntdll/ntdll.spec, graphics/painting.c, include/ddeml.h, include/wingdi.h: Patrik Stridvall Fixed some issues reported by winapi_check. * include/winnt.h, ole/ole2nls.c, dlls/ntdll/signal_i386.c, dlls/ole32/storage32.c, dlls/shell32/shlview.c: Patrik Stridvall Fixed some ANSI C violations. * programs/cmdlgtst/cmdlgtst.c, programs/notepad/Da.rc, programs/notepad/De.rc, programs/notepad/dialog.c, programs/regapi/regapi.c, programs/regtest/regtest.c, programs/view/view.c, programs/wcmd/directory.c, programs/wcmd/wcmdmain.c, programs/avitools/aviplay.c: Patrik Stridvall Fixed ANSI C related compile problems. * tools/winapi_check/win32/gdi32.api, tools/winapi_check/win32/kernel32.api, tools/winapi_check/win32/ole32.api, tools/winapi_check/win32/oleaut32.api, tools/winapi_check/win32/user32.api, tools/winapi_check/win32/winmm.api, tools/winapi_check/win16/ddeml.api, tools/winapi_check/winapi_check, tools/winapi_check/winapi_function.pm, tools/winapi_check/winapi_options.pm, tools/winapi_check/winapi_parser.pm: Patrik Stridvall - Updated API files - Don't check the *.spec.c files - Better parsing of strings - Better documentation checking - Minor bug fixes * dlls/dinput/dinput_main.c: Lionel Ulmer - added some debug code and cleaned-up the mouse warping code - be ready once mouse will be reported relatively * windows/mdi.c: Huw D M Davies Fixed copying of the MDI 'Windows' menu items if the items are not of type MFT_STRING. * controls/menu.c: Huw D M Davies Set the correct value for the cch element of MENUITEMINFO in GetMenuItemInfo. * dlls/gdi/gdi32.spec: Huw D M Davies Fix spec file entries for EnumFontFamiliesEx*. * tools/bug_report.pl: Gerald Pfeifer Further code simplifications and interface (consistency) improvements. Fix selection of the Wine binary which was broken by a recent change. * windows/sysparams.c: Andreas Mohr Added proper termination upon failure. * debugger/types.c: Eric Pouech Fixed basic type evaluation. * server/registry.c: Huw D M Davies Ensure that non-NULL terminated stings are saved correctly. * windows/input.c: Rein Klazes Correct the NotifyCode in the WM_COMMAND message sent by KBD_translate_accelerator(). * dlls/winaspi/winaspi32.c: Marcus Meissner Slightly better REQUEST SENSE dumping, fixed GET_DEV_TYPE returns, work around EXEC SCSI commands which do not set the host<->target data flags, ignore errors on DVD REPORT KEY/DVD SEND KEY. * server/context_i386.c: Peter Hunnisett Changed PTRACE_PEEKUSER to PTRACE_PEEKUSR and PTRACE_POKEUSER to PTRACE_POKEUSR for libc5(?) compile. * controls/combo.c: Huw D M Davies Stop a WM_SETTEXT message (and friends) to a combo sending CBN_EDIT* messages to the parent. * include/winbase.h, memory/heap.c: Francois Gouget Added (correct) prototype for HeapWalk. * dlls/ole32/ifs.c, include/wine/obj_base.h: Francois Gouget - The ICOM_CMETHODxxx cause problems because the 'const' changes the signature. There's no such thing on Windows anyway (it's a shame) so just remove them altogether. - HeapMinimize returns a void, not a 'void*' 2000-03-20 Alexandre Julliard * windows/ttydrv/event.c, windows/ttydrv/init.c, windows/ttydrv/keyboard.c, windows/ttydrv/main.c, windows/x11drv/desktop.c, windows/x11drv/init.c, windows/x11drv/keyboard.c, windows/x11drv/main.c, loader/main.c, misc/main.c, objects/gdiobj.c, windows/event.c, windows/keyboard.c, windows/multimon.c, windows/ttydrv/desktop.c, windows/win.c, controls/desktop.c, dlls/dinput/dinput_main.c, dlls/display/display_main.c, dlls/mouse/mouse_main.c, dlls/ttydrv/ttydrv.spec, dlls/ttydrv/ttydrv_main.c, dlls/x11drv/x11drv.spec, dlls/x11drv/x11drv_main.c, graphics/ttydrv/init.c, graphics/x11drv/init.c, include/desktop.h, include/keyboard.h, include/message.h, include/monitor.h, include/mouse.h, include/ttydrv.h, include/user.h, include/x11drv.h: Moved graphics initialisation to the x11drv/ttydrv dll init code. Merged event, keyboard and mouse drivers into USER driver. 2000-03-19 Alexandre Julliard * ole/ole2nls.c: Andrew Lewycky Improved CompareStringA performance. * library/winestub.c: Added missing debugtools.h include. * programs/winhelp/hlpfile.c, programs/winhelp/macro.c, programs/winhelp/macro.lex.l, programs/winhelp/winhelp.c, programs/clock/language.c, programs/clock/main.h, programs/cmdlgtst/cmdlgtst.c, programs/notepad/dialog.c, programs/notepad/main.c, programs/notepad/search.c, programs/progman/dialog.c, programs/progman/group.c, programs/progman/main.c, programs/progman/program.c, programs/view/init.c, programs/view/view.c: Niels Kristian Bech Jensen Fixed some compiler errors and warnings. * ole/ole2nls.c: Steven Elliott Temporarily implemented the LCMAP_SORTKEY flag in the LCMapStringW() function pending a more complete implementation of locales. * loader/module.c: Hack: always try builtin module before elf or elfdll to avoid loading a builtin dll .so file in the wrong mode. * graphics/x11drv/xfont.c, objects/font.c: Moved font resource functions out of the X11 driver. * tools/makedep.c: Added support for source files stored in subdirectories. * graphics/enhmetafiledrv/init.c, graphics/metafiledrv/init.c, graphics/psdrv/init.c, graphics/ttydrv/init.c, graphics/win16drv/init.c, graphics/x11drv/graphics.c, graphics/x11drv/init.c, include/gdi.h, include/x11drv.h, objects/dc.c: Added GetDCOrgEx in graphics device interface and removed X11 code from dc.c. * dlls/winmm/mmio.c, dlls/winmm/mmsystem.spec, dlls/winmm/winemm.h, dlls/winmm/winmm.spec, include/mmsystem.h: Eric Pouech Fixed segmented/linear buffers manipulation. Better IO buffering. Added some missing prototypes. * dlls/comctl32/treeview.c, dlls/shell32/brsfolder.c: Francois Gouget Explicitly use the TVN_xxxA version of the macros. * include/commctrl.h: Francois Gouget - Added the TVN_xxxA macros - Added missing TBNOTIFY macros and types - Added SNDMSG * include/winuser.h: Francois Gouget Added WM_APP. * scheduler/client.c, scheduler/critsection.c, windows/clipboard.c, windows/ttydrv/clipboard.c, windows/ttydrv/keyboard.c, graphics/x11drv/graphics.c, graphics/x11drv/palette.c, include/x11drv.h, library/winestub.c, loader/ne/segment.c, memory/virtual.c, misc/main.c, misc/printdrv.c, misc/registry.c, misc/xmalloc.c, objects/palette.c, graphics/win16drv/init.c, graphics/x11drv/bitblt.c, graphics/x11drv/brush.c, graphics/x11drv/dib.c: Dimitrie O. Paun Removed most calls to xmalloc/xrealloc. * include/windef.h: Francois Gouget - Added missing definition for GLOBALHANDLE and LOCALHANDLE - Fixed the prototype of WNDENUMPROC * include/ddeml.h: Francois Gouget Added some missing defines. * windows/dialog.c: Andrew Lewycky Propagate IsDialogMessage to the parent if the dialog has the DS_CONTROL flag. * memory/string.c: Andreas Mohr Added an exception frame for lstrcpy16. * loader/main.c: Eric Pouech Now attaching imported DLLs of a winelib executable. * include/wine/obj_inplace.h: Marcus Meissner IOleItemContainer has OLEGUID(0x11c), not 0x11a. * dlls/ole32/compobj.c: Marcus Meissner Fixed memory corruption with CoTaskMemRealloc. * tools/genpatch: Steven Elliott Made various changes to tools/genpatch including suggestions from Ove Kaaven (Place added files last in the patch. Add a switch that specifies modified files.) * include/tchar.h, include/winnt.h: Francois Gouget Moved the definition of PTSTR and LPTSTR from tchar.h to winnt.h. * include/windows.h: Francois Gouget Should include 'winspool.h'. * tools/wrc/parser.h, tools/wrc/parser.l: Francois Gouget - An extern statement finishes with the first closing '}' or the first outer ';' - Handle '#error', '#line' and '#pragma' even when in the 'pp_strips', 'pp_stripe', 'pp_stripp' or 'pp_false' contexts (just like '#if' and co). But still don't issue an error if '#error' is found when in the 'pp_false' state. * tools/wrc/parser.y: Francois Gouget Make the first comma in the control's definition optional. * dlls/ole32/datacache.c: Andrew Lewycky Support loading any presentation aspect. * dlls/winaspi/aspi.c: Gerald Pfeifer Avoid a link error from another DLL on FreeBSD. * dlls/winmm/joystick.c, dlls/winmm/joystick/joystick.c: Eric Pouech Fixed joystick ID/deviceID/driver handle/instance ID mixup. * graphics/x11drv/dib.c: Andrew Lewycky Delete the shm segment as soon as wine and X have attached it. * dlls/winsock/socket.c: Lars Heete Corrected handling of proto==NULL in WINSOCK_getservbyname and WINSOCK_getservbyport. * windows/event.c, include/main.h, loader/main.c, misc/main.c, miscemu/main.c, objects/gdiobj.c, relay32/.cvsignore, relay32/Makefile.in, relay32/gdi32.spec, relay32/user32.spec, configure.in, dlls/Makefile.in, dlls/gdi/.cvsignore, dlls/gdi/Makefile.in, dlls/gdi/gdi.spec, dlls/gdi/gdi32.spec, dlls/gdi/gdi_main.c, dlls/ttydrv/.cvsignore, dlls/ttydrv/Makefile.in, dlls/ttydrv/ttydrv.spec, dlls/ttydrv/ttydrv_main.c, dlls/user/.cvsignore, dlls/user/Makefile.in, dlls/user/user.spec, dlls/user/user32.spec, dlls/user/user_main.c, dlls/x11drv/.cvsignore, dlls/x11drv/Makefile.in, dlls/x11drv/x11drv.spec, dlls/x11drv/x11drv_main.c, if1632/.cvsignore, if1632/Makefile.in, if1632/gdi.spec, if1632/user.spec, Make.rules.in, configure: Created separate dlls for user,gdi,ttydrv,x11drv. Fixed Winelib argc handling (thanks to Eric Pouech). 2000-03-18 Alexandre Julliard * graphics/psdrv/escape.c, include/dinput.h, include/keyboard.h, include/ttydrv.h, include/tweak.h, include/user.h, include/x11drv.h, loader/main.c, misc/tweak.c, ole/ole2nls.c, scheduler/synchro.c, windows/ttydrv/init.c, windows/ttydrv/keyboard.c, windows/ttydrv/main.c, windows/x11drv/init.c, windows/x11drv/main.c: Misc small cleanups. * windows/spy.c, windows/sysparams.c, graphics/x11drv/bitblt.c, loader/dos/dosvm.c, misc/Makefile.in, misc/main.c, misc/spy.c, objects/Makefile.in, objects/clipping.c, objects/cursoricon.c, objects/region.c, objects/text.c, windows/Makefile.in, windows/cursoricon.c, windows/message.c: Avoid calling the *Rect USER functions from inside GDI. Moved a few USER functions to a more appropriate location. * loader/main.c, misc/Makefile.in, misc/main.c, misc/options.c, misc/registry.c, misc/version.c, miscemu/main.c, windows/x11drv/main.c, windows/x11drv/monitor.c, dlls/ddraw/ddraw_main.c, documentation/wine.man.in, graphics/x11drv/bitblt.c, graphics/x11drv/palette.c, include/main.h, include/options.h, include/shell.h, wine.ini: Moved command-line option handling out of the X11 driver. Added support for "--" prefix on options. Replaced a few X11 command-line options by wine.conf parameters. 2000-03-17 Alexandre Julliard * graphics/Makefile.in, graphics/d3d_private.h, graphics/d3dcommon.c, graphics/d3ddevices.c, graphics/d3dexecutebuffer.c, graphics/d3dlight.c, graphics/d3dmaterial.c, graphics/d3dtexture.c, graphics/d3dviewport.c, graphics/ddraw.c, graphics/ddraw_private.h, graphics/vga.c, relay32/Makefile.in, relay32/ddraw.spec, relay32/dinput.spec, windows/Makefile.in, windows/dinput.c, Make.rules.in, configure, configure.in, dlls/Makefile.in, dlls/ddraw/.cvsignore, dlls/ddraw/Makefile.in, dlls/ddraw/d3d_private.h, dlls/ddraw/d3dcommon.c, dlls/ddraw/d3ddevices.c, dlls/ddraw/d3dexecutebuffer.c, dlls/ddraw/d3dlight.c, dlls/ddraw/d3dmaterial.c, dlls/ddraw/d3dtexture.c, dlls/ddraw/d3dviewport.c, dlls/ddraw/ddraw.spec, dlls/ddraw/ddraw_main.c, dlls/ddraw/ddraw_private.h, dlls/dinput/.cvsignore, dlls/dinput/Makefile.in, dlls/dinput/dinput.spec, dlls/dinput/dinput_main.c: Made ddraw and dinput separate dlls. * server/process.c, server/process.h, server/ptrace.c, server/request.c, server/request.h, server/thread.c, server/thread.h, server/trace.c, include/server.h, include/thread.h, include/winbase.h, include/windef.h, loader/module.c, scheduler/client.c, scheduler/process.c, scheduler/sysdeps.c, scheduler/thread.c: Have threads and processes exit more cleanly whenever possible. * relay32/builtin32.c: Include space for resources in the module header instead of doing a separate allocation. * Make.rules.in, Makefile.in, dlls/Makefile.in, dlls/mpr/.cvsignore, dlls/mpr/Makefile.in, misc/network.c: Made MPR a separate dll. * dlls/ole32/stg_bigblockfile.c, dlls/ole32/storage32.h: Andrew Lewycky Rewrite the BIGBLOCKFILE implementation for better performance. * tools/bug_report.pl: Gerald Pfeifer Further simplify the code and remove some redundant code. Make the user interface more consistent and appealing. * dlls/ole32/defaulthandler.c: Andrew Lewycky Avoid a refcount leak in QueryInterface when delegating. And a couple of minor bugs. 2000-03-15 Alexandre Julliard * debugger/info.c, debugger/memory.c, debugger/msc.c, debugger/source.c, debugger/stabs.c, debugger/stack.c, debugger/types.c, debugger/winedbg.c, debugger/break.c, debugger/db_disasm.c, debugger/dbg.y, debugger/dbgmain.c, debugger/debug.l, debugger/debugger.h, debugger/display.c, debugger/expr.c, debugger/hash.c: Eric Pouech Introduced DBG_VALUE struct to manipulate debugger/debuggee address space. Added watch (hardware assisted debugging) and whatis (type of expr) commands. Fixed some issues in local vars handling (stabs parsing & registers optimization). * graphics/x11drv/graphics.c, graphics/x11drv/text.c: Karl Lessard Update DIB sections in text output and for graphics primitives. * windows/dce.c, windows/x11drv/event.c: Michael Abd-El-Malek (on behalf of Corel) When we were switching to another desktop, the popup windows lost their WS_VISIBLE flag. * server/context_i386.c: Avoid SIGSTOP/SIGCONT race when ptrace is disabled. Fixed context flags handling (thanks to Eric Pouech). * server/process.c, server/ptrace.c, server/thread.c, server/thread.h: Avoid SIGSTOP/SIGCONT race when ptrace is disabled. * server/debugger.c: Fixed bug in generate_startup_debug_events(). * programs/Makefile.in, programs/winemine/.cvsignore, programs/winemine/Makefile.in, programs/winemine/README, programs/winemine/dialog.c, programs/winemine/dialog.h, programs/winemine/main.c, programs/winemine/main.h, programs/winemine/resource.h, programs/winemine/rsrc.rc, programs/winemine/winemine.spec, configure, configure.in: Joshua Thielen Added winemine app. * tools/bug_report.pl: Gerald Pfeifer Improved the visual appearence of the user interface. Made the code somewhat simpler. 2000-03-12 Alexandre Julliard * dlls/crtdll/crtdll_main.c, dlls/crtdll/crtdll.spec: Waldek Hebisch Implemented _read and _lseek. * dlls/winsock/socket.c: Rein Klazes Correct conversion of level parameter if WINSOCK_setsockopt is called for option WS_SO_DONTLINGER. * objects/gdiobj.c: Rein Klazes Correct rounding of the result in MulDiv16(). * dlls/winaspi/aspi.c, dlls/winaspi/winescsi.h: Gerald Pfeifer Fixed FreeBSD compilation. * dlls/dplayx/Makefile.in, dlls/dplayx/dplay.c, dlls/dplayx/dplobby.c, dlls/dplayx/name_server.c, dlls/dplayx/name_server.h, documentation/status/directplay: Peter Hunnisett - Make registry usage a little more correct and modern - Create home for all dplay name server functionality - Add the framework for EnumSessions - Documentation update * dlls/advapi32/security.c, dlls/avifil32/avifile.c, include/debugdefs.h: Dimitrie Paun Cleaned up debug channels a bit. * graphics/ddraw.c: Marcus Meissner Implemented stretched blts for depth 24 (unoptimized). 2000-03-10 Alexandre Julliard * debugger/winedbg.c: Fixed OUTPUT_DEBUG_STRING pointer handling. * include/process.h, memory/virtual.c, scheduler/process.c: Removed PROCESS_IsCurrent(). * include/server.h, scheduler/debugger.c, server/context_i386.c, server/debugger.c, server/file.c, server/main.c, server/object.h, server/process.c, server/request.c, server/request.h, server/thread.c, server/thread.h, server/trace.c, tools/make_requests, win32/except.c, dlls/ntdll/exception.c: Added specific routines for OUTPUT_DEBUG_STRING and EXCEPTION debug events. Generate a breakpoint event on process attach. Misc cleanups in request handling. 2000-03-09 Alexandre Julliard * debugger/break.c, debugger/dbg.y, debugger/debug.l, debugger/debugger.h: Eric Pouech Now relying on exception codes to know when debugger is entered for a single step trap. * debugger/winedbg.c, miscemu/main.c: Eric Pouech Added proc to start debugging process from its command line (by launching it). * debugger/expr.c: Eric Pouech Cleanup. * graphics/psdrv/afm.c: Huw D M Davies Add Black as a valid font weight. Cope with afm files that do not contain {Family|Full}Name entries. * dlls/winaspi/winaspi32.c: David Elliott - Got rid of PROFILE functions. - Use functionality of aspi.c. - Automagically read /proc/scsi/scsi (part of aspi.c which is already in tree). * graphics/x11drv/dib.c: Jim Aston Handle 24 bit DIBs <-> 24 bit deep/24 bits per pixel XImages. * programs/view/globals.h: Mike Castle Added resource.h include. * windows/rect.c: Marcus Meissner IsRectEmpty also returns true for negative width/heights (verified against Windows), found by Brad Oliver . * dlls/oleaut32/variant.c: Lawson Whitney Take type from referenced variant for VT_BYREF && VT_VARIANT. * relay32/builtin32.c, scheduler/client.c, scheduler/debugger.c, scheduler/process.c, server/debugger.c, server/object.h, server/process.c, server/process.h, server/ptrace.c, server/request.c, server/request.h, server/thread.c, server/trace.c, include/elfdll.h, include/module.h, include/pe_image.h, include/process.h, include/server.h, loader/elf.c, loader/elfdll.c, loader/module.c, loader/pe_image.c: Store the list of loaded dlls in the server, and generate debug events internally. 2000-03-08 Alexandre Julliard * server/thread.c, server/trace.c, tools/make_requests, include/server.h, scheduler/client.c: Added server protocol version check. * include/aspi.h, include/winaspi.h, include/wnaspi32.h, msdos/Makefile.in, msdos/dosaspi.c, Makefile.in, configure, configure.in, dlls/Makefile.in, dlls/winaspi/.cvsignore, dlls/winaspi/Makefile.in, dlls/winaspi/aspi.c, dlls/winaspi/winaspi16.c, dlls/winaspi/winaspi32.c, dlls/winaspi/winescsi.h, dlls/winaspi/wnaspi32.spec: David Elliott - Slightly reworked include files (less messy, more straightforward). - Moved DOS ASPI functionality to msdos/dosaspi.c. - Got rid using PROFILE to get SCSI info from wine.conf. - Read scsi info from /proc/scsi/scsi. - Added setting of a reasonable timeout when opening a SCSI device (5 minutes, defined in winescsi.h). - ExecScsiCommand now ALWAYS posts, even on error (which is the correct behavior). * dlls/commdlg/cdlg_Sk.rc, dlls/commdlg/rsrc.rc, dlls/shell32/shell32_Sk.rc, dlls/shell32/shres.rc, documentation/wine.man.in, include/options.h, misc/main.c, resources/sysres_Sk.rc, resources/user32.rc: Simen Zamecnik Added Slovak language support. * dlls/shell32/shell32_Ja.rc, dlls/shell32/shres.rc, include/options.h, misc/main.c, resources/.cvsignore, resources/sysres_Ja.rc, resources/user32.rc, dlls/commdlg/cdlg_Ja.rc, dlls/commdlg/rsrc.rc: Junichi Kuchinishi Added some Japanese resources. * dlls/ole32/Makefile.in, dlls/ole32/clipboard.c, dlls/ole32/datacache.c, dlls/ole32/ole2impl.c, dlls/ole32/ole2stubs.c, dlls/ole32/olestd.h, dlls/ole32/storage32.c, include/ole2.h, include/winerror.h: Abey George Implemented OLE clipboard functionality for Embed Source format. It helps you cut and paste data with Embed Source format between applications. It also implements OleCreateFromData and OleQueryCreateFromData and fixes some bugs in datacache.c. * loader/module.c: Ulrich Czekalla wm->modname might be invalid at the end of FreeLibrary. * loader/ne/module.c, misc/debugstr.c, misc/error.c, windows/defdlg.c, windows/defwnd.c, windows/dialog.c, windows/focus.c, windows/input.c, windows/user.c, windows/x11drv/event.c, windows/x11drv/keyboard.c, controls/edit.c, controls/menu.c, debugger/stack.c, dlls/comctl32/commctrl.c, dlls/winsock/async.c, dlls/winsock/socket.c, include/dce.h, include/menu.h, include/message.h, include/nonclient.h, include/queue.h, include/stackframe.h, include/struct32.h, include/thread.h, include/win.h, include/winbase.h, include/wine/winuser16.h, include/winpos.h, loader/module.c, controls/button.c: Patrik Stridvall Removed a lot of unnecessary includes and fixed the compile errors. * dlls/ole32/moniker.c, dlls/ole32/storage32.c, include/ole2.h, include/shell.h, memory/global.c, misc/registry.c, misc/wsprintf.c, server/registry.c, server/request.c: Patrik Stridvall Fixed some warnings. * dlls/oleaut32/variant.c: Lawson Whitney Corrected value for DAYS_IN_ONE_YEAR. * dlls/crtdll/crtdll_main.c: Alexandre Julliard (for Corel) Cleaned up CRTDLL__unlink. * controls/static.c: Ulrich Czekalla The static control only needs to invalidate its rect when we SetText. * include/winuser.h, misc/spy.c: Hidenori Takeshima Added a few messages for IME. * debugger/Makefile.in, debugger/break.c, debugger/db_disasm.c, debugger/dbg.y, debugger/debug.l, debugger/debugger.h, debugger/display.c, debugger/expr.c, debugger/hash.c, debugger/info.c, debugger/memory.c, debugger/registers.c, debugger/source.c, debugger/stabs.c, debugger/stack.c, debugger/types.c, debugger/winedbg.c, include/debugdefs.h, include/debugger.h, miscemu/main.c: Eric Pouech No longer directly accessing debuggee memory. Execution context (mode, steps...) are now linked to a thread. Removed some X11 crst hacks. Rewrote info/walk commands. Removed direct debugger invocation code (and moved the rest to the new winedbg.c file). * scheduler/debugger.c, scheduler/process.c, server/process.c, server/trace.c, win32/except.c, win32/newfns.c, include/ntddk.h, include/server.h, include/winbase.h, loader/module.c, dlls/ntdll/exception.c: Removed PDB32_DEBUGGED flag and send all debug events unconditionally. Implemented IsDebuggerPresent(). * server/debugger.c, server/object.h, server/process.c, server/process.h, server/thread.c, server/thread.h, server/trace.c, include/process.h, include/server.h, scheduler/client.c, scheduler/debugger.c, scheduler/process.c, scheduler/thread.c: Generate CREATE_PROCESS/THREAD debug events internally in the server. 2000-03-07 Alexandre Julliard * scheduler/critsection.c, scheduler/thread.c, win32/Makefile.in, win32/thread.c, include/thread.h, include/winbase.h: Better implementation of inline functions SetLastError and GetCurrentThreadId. Added asm inlines for Interlocked* functions. * dlls/ntdll/signal_i386.c, include/ntddk.h, dlls/ntdll/exception.c, dlls/ntdll/ntdll.spec: Added DbgBreakPoint. Fixed exception record contents on SIGTRAP. * loader/ne/module.c, loader/ne/segment.c: Andreas Mohr Fixed second instance DGROUP loading. * include/winuser.h, misc/main.c: Huw D M Davies Implement SPI_GETICONMETRICS. Change WARN -> FIXME for unimplemented SPI_s and set appropriate error. * memory/global.c: Marcus Meissner Actual write the cached struct in GlobalMemoryStatus. * documentation/fonts, graphics/x11drv/xfont.c: Rein Klazes Include in the AddFontResourceA/W fixme message a pointer to the fonts document. In this document tell the user how to find the needed tools. * dlls/winsock/socket.c: Rein Klazes Add a message and fix error code if __ws_getservbyname() and __ws_getservbyport() cannot find the requested service. Fix WINSOCK_setsockopt() when called with optval pointing to 16 bit int. * dlls/winmm/mmio.c: Ulrich Czekalla Check for existence if MMIO_EXIST is passed to MMIO_Open. * dlls/ole32/filemoniker.c: Jeff Tranter The pathname was stored in a string of size 100, which was not always large enough. It should be set to MAX_PATH (255). * loader/task.c: Andreas Mohr Several fixes to MakeProcInstance. 2000-03-05 Alexandre Julliard * dlls/winmm/Makefile.in, dlls/winsock/Makefile.in, dlls/ole32/Makefile.in, dlls/oleaut32/Makefile.in, dlls/olecli/Makefile.in, dlls/olesvr/Makefile.in, dlls/rasapi32/Makefile.in, dlls/shell32/Makefile.in, dlls/version/Makefile.in, dlls/win32s/Makefile.in, dlls/Makefile.in, dlls/avifil32/Makefile.in, dlls/commdlg/Makefile.in, dlls/dplayx/Makefile.in, dlls/lzexpand/Makefile.in, dlls/msvideo/Makefile.in, dlls/Makedll.rules.in: Added support for creating extra symlinks for .so files that contain multiple dlls. 2000-03-04 Alexandre Julliard * */Makefile.in, Make.rules.in, Makefile.in, configure, configure.in, dlls/.cvsignore, dlls/Makedll.rules.in: Moved dll-specific make rules to a separate Makedll.rules file. * misc/registry.c: Fixed error checking in registry saving. * dlls/winsock/socket.c: Ove Kaaven WSACleanup should set last error to WSANOTINITIALISED if failing because Winsock was not initialized... * dlls/ole32/compobj.c, include/ole.h, include/wine/obj_base.h: Marcus Meissner CoLoadLibrary gets UNICODE, not ASCII strings. (spotted by Lawson Whitney), removed the dllName component of the openDlls. Added some debugstr_guid(). * dlls/ntdll/nt.c: Dan Scott Fixed typos in _alldiv() and _allmul(). * configure.in, configure: Marcus Meissner Added message for missing xpm devel libs for debian/corel. * dlls/ole32/ole2.c: Pierre Mageau OleRegGetUserType did query wrong registry key. * memory/global.c: Marcus Meissner Some applications call GlobalMemoryStatus() very often. Cache the results of the call for 1 second (spotted by Corel). * windows/x11drv/event.c: Marcus Meissner GetClipboardData16 might return an invalid global handle (spotted by Corel). * objects/enhmetafile.c: Lilia Roumiantseva cbCountSizeOfEnhMetafile callback function instead of increasing a contents of the pointer to the size increased the pointer itself. * documentation/psdriver: Huw D M Davies Fix docs to reflect change to .winerc processing. * tools/wineinstall: Ove Kaaven Fixed a couple of config.cache problems. * dlls/comctl32/trackbar.c: Vahid Pourlotfali Trackbar contol did not have proper position value in case of SB_THUMBTRACK notification message: it was always sending 0. Jim Aston Made the slider control a rect. It had been trying to draw a notched slider, but the result didn't look right. * dlls/winsock/socket.c: Rein Klazes Made WINSOCK_setsockopt handle option SO_DONTLINGER correctly. * objects/cursoricon.c: Serge Ivanov CURSORICON_IconToCursor: inconsistent Lock/Unlock * files/profile.c: Uwe Bonnes PROFILE_GetString: only accept NULL for keyname to return the list of keys as Win95 does. * graphics/x11drv/dib.c: Joerg Mayer Fix a sign bug where memcpy was called with negative length. 2000-02-29 Alexandre Julliard * files/profile.c: Make profile key a global handle. * dlls/win32s/.cvsignore, dlls/win32s/Makefile.in, dlls/win32s/w32skernel.c, dlls/win32s/w32skrnl.c, Make.rules.in, dlls/Makefile.in: Renamed libwin32s to use the proper dll name (libw32skrnl). * windows/x11drv/keyboard.c, windows/x11drv/wnd.c, dlls/comctl32/monthcal.c, dlls/comctl32/toolbar.c, dlls/imm32/imm.c, dlls/msacm32/driver.c, dlls/msvideo/msvideo_main.c, dlls/shell32/iconcache.c, msdos/int21.c, windows/x11drv/clipboard.c: Niels Kristian Bech Jensen Removed superfluous #include statements for header files included twice. * dlls/comctl32/updown.c: Serge Ivanov Make updown control work. UpDown control always sends WM_*SCROLL message and uses SB_THUMBPOSITION code (not SB_LINE[UP|DOWN]). * dlls/comctl32/header.c: Pascal Lessard Implemented the behavior of sending WM_CONTEXTMENU when receiving a WM_RBUTTONUP. * dlls/ole32/storage32.c: Murali Pattathe This is the patch for the OleConvertOLESTREAMToIStorage wine API. This API calls another function called OLECONVERT_LoadOLE10 which basically read the OLE stream from the file through the callback function (this is passed by the application). The reading format was wrong. Still I am not very sure this is 100 % correct format. I did some reverse engineering and found the format. I have tried with different OLE object and its worked in paradox. I haven't tested with any other apps. * dlls/oleaut32/Makefile.in, dlls/oleaut32/oleaut32.spec, dlls/oleaut32/stubs.c, dlls/olepro32/olepro32.spec, dlls/olepro32/olepro32stubs.c: Patrik Stridvall Moved some stubs and added forwards in order to make both winapi_check and checklink happy. * tools/winapi_check/*: Patrik Stridvall Moved the rest of the API specification from the global file to the local files. 2000-02-27 Alexandre Julliard * ANNOUNCE, ChangeLog, include/version.h: Release 20000227. ---------------------------------------------------------------- 2000-02-27 Alexandre Julliard * win32/init.c: Uwe Bonnes GetComputerNameA(): added parameter check like Win95 does. * tools/build.c: Patrik Stridvall - Fixed some Solaris specific assembler problems - Fixed some missing .type @function (helps debugging with dbx) - Fixed code needing __attribute__((constructor))__ for non-GCC ELF compilers - Fixed use of zero width arrays (ANSI C violation) - @GOTOFF on Solaris doesn't work - use @GOT and redirection instead * memory/selector.c, include/selectors.h: Patrik Stridvall Fixed some Solaris specific assembler problems. * dlls/ole32/ole32.spec, dlls/shell32/shlwapi.spec: Patrik Stridvall Fixed some issues found by winapi_check. * tools/winapi_check/win32/ntdll.api, tools/winapi_check/win32/ole32.api, tools/winapi_check/win32/oleaut32.api: Patrik Stridvall Updated winapi_check. * tools/genpatch: Steven Elliott Added utility that generates patches for submission to wine-patches@winehq.com. * dlls/oleaut32/Makefile.in, dlls/oleaut32/oleaut32.spec: oleaut32 should not import functions from olepro32. * dlls/comctl32/listview.c, include/listview.h: Pierre Mageau Don't display the context menu on a double click. Ulrich Czekalla Set the font on the edit label control to that used by the listview control. It also uses text metrics to set a more reasonable initial edit control size. Pierre Mageau Handle M_SETREDRAW in ListView. Fix to EnsureVisible to handle small and large icon correctly. Add edit label functionnality to the listview and the file open dialog. Ulrich Czekalla RelaseDC in CreateEditLabel. Pierre Mageau Add functionnality to create new folder in the open dialog. Add support for right click menu in common file dialog. LISTVIEW_EndEditlabel is now handling NONLPSTR_TEXTCALLBACK listview items. Serge Ivanov LISTVIEW_GetColumnA fix (do not copy string, pass pointers). Luc Tourangeau Preventing a divide by zero when handling LVW_ENSUREVISIBLE message. Don Kelly -Implemented the sorting on insert of items into a ListView control with either LVS_SORTASCENDING or LVS_SORTDESCENDING set. -(helping evil applications): sometimes not so well structured apps (PFPI90, in this case) will not fully initialize structs. In the case of the LVM_GETITEM message the app may have only initialized the mask and iItem members of the struct. Added processing of the LVIF_PARAM mask in the case that iSubItem was set but is invalid/uninitialized. Pierre Mageau Fix for handling correctly the cancelling mode of the Edit label. Fix width calculation of the edit label. Pascal Lessard Implemented the behavior of sending WM_CONTEXTMENU when receiving a WM_RBUTTONUP. Ulrich Czekalla Fixed a painting problem with listview when the view changes and an edit label is active. Ulrich Czekalla Fixed a notification problem with listview. On creation if the user specifies an item with focus and/or selection we should send the proper notification. Insert was preventing LISTVIEW_SetItem from seeing the changes and sending the notification. Make the draw item rectangle consistent with the selection rectangle. This allows us to click on the folders and icons in the file open dialog box and the item actually gets selected. * files/drive.c: Petr Tomasek - Write serial numbers to the device (FAT) - DRIVE_ReadSuperblock: better checking for the FAT fs. * files/dos_fs.c: Uwe Bonnes GetFullPathName fixes. 2000-02-26 Alexandre Julliard * include/winbase.h, include/winnt.h, memory/string.c, dlls/ntdll/ntdll.spec, dlls/ntdll/rtl.c: Juergen Schmied Fixed definition of the RtlMemory functions. Use macros internally and for Winelib, use real functions for exports from ntdll. * include/ole2.h: Juergen Schmied Prototypes OleInitialize, OleUninitialize. * dlls/commdlg/filedlg95.c: Hidenori Takeshima ArrangeCtrlPositions: fix for user-defined template with no stc32. * controls/menu.c, include/menu.h, windows/message.c: Ulrich Czekalla Send WM_HELP message when F1 is pressed. * controls/listbox.c: Yuxi Zhang In the listbox, when the last item is selected and deleted, it still appeared in the window. Sheri Steeves In LISTBOX_UpdateScroll(), if the listbox did not have the WS_SCROLL style it would just return. This left the horizontal scroll bar uninitialized and it was appearing at the bottom of the listbox when it did not have to. Serge Ivanov LISTBOX_SetColumnWidth adds extra 2 pixels to the passed column width (it says it is for column margins). Obviously it is wrong, because margins must be internal. * dlls/ole32/Makefile.in, dlls/ole32/errorinfo.c, dlls/oleaut32/Makefile.in, dlls/oleaut32/errorinfo.c: ErrorInfo functions need to be in ole32, not oleaut32. * dlls/crtdll/wcstring.c: More portable CRTDLL_iswctype. * dlls/shell32/shlmenu.c, dlls/shell32/shlview.c, dlls/shell32/shlwapi.spec, dlls/shell32/shv_bg_cmenu.c, dlls/shell32/shv_item_cmenu.c, dlls/shell32/pidl.h, dlls/shell32/shlfileop.c, dlls/shell32/shlfolder.c: Juergen Schmied Moved file functions to shlfileop.c New SHELL_DeleteDirectoryA Use shell notifications. Enabled file manipulation functions. * dlls/shell32/folders.c, dlls/shell32/iconcache.c: Juergen Schmied Fix for OpenIcon. * dlls/shell32/shell32.spec, dlls/shell32/shellpath.c: Juergen Schmied Stub PathIsDirectory. * dlls/shell32/shellord.c: Juergen Schmied Fixes for ShellExecuteEx. * dlls/shell32/shell32_main.h, include/wine/undocshell.h, dlls/shell32/changenotify.c, dlls/shell32/shell32_main.c: Juergen Schmied Basic implementation of shell notifications. * documentation/shell32: Juergen Schmied Updated. * include/wine/obj_contextmenu.h, include/wine/obj_extracticon.h, include/wine/obj_shellfolder.h: Juergen Schmied Added Winelib types. * dlls/shell32/shres.rc: Juergen Schmied Added icon no 4 (open folder). * dlls/ole32/ole32.spec, dlls/oleaut32/Makefile.in, dlls/oleaut32/errorinfo.c, dlls/oleaut32/oleaut32.spec, include/oleauto.h: Patrik Stridvall Added stubs for {Create,Get,Set}ErrorInfo. * dlls/ole32/ole2stubs.c: Abey George Return an error instead of a success code in OleCreate stub function. * dlls/comctl32/tab.c, include/tab.h: Don Kelly In Windows Property Sheet can have any mix of icon-less tabs and tabs with icons. Adds a check to see if the icon we're adding is non-NULL (otherwise random junk from memory can be rendered) when the application has specified the PSP_USEICONID flag is set. Changes to the Tab control to only render icons for tabs that have the TCIF_IMAGE flag set (previously, if the flag was set the entire image list of icons was rendered). Stephane Lussier Fixes for some tab control bugs Henning Hoffmann Fixed some width problem with OWNERDRAW tab. Luc Tourangeau TCM_ADJUSTRECT is now returning consistant compare to Windows. Serge Ivanov Fixed problem with tab selection. When you select tab it becames first visible tab. Now leftmost visible tab is calculated properly. - Added code for correct handling of updown control. - Forced recalculation of tabs' coordinates when: a) all items are deleted, b) window style is canged * include/commctrl.h: Ian Schmidt Added necessary defines and structures to compile WineLib apps using MFC 6.0 headers. Fixed typo in TCM_SETMINTABWIDTH constant. * controls/button.c: Bill Jin Bitmap buttons were not refreshed correctly. * dlls/comctl32/propsheet.c: Jim Aston This reverts Matts patch. The messaging needs double checking. * windows/message.c, windows/winproc.c, memory/selector.c, misc/w32scomb.c, msdos/dpmi.c, relay32/relay386.c, scheduler/sysdeps.c, scheduler/syslevel.c, tools/build.c, win32/kernel32.c, controls/edit.c, controls/listbox.c, debugger/registers.c, dlls/ntdll/signal_i386.c, if1632/snoop.c, if1632/thunk.c, include/selectors.h, include/thread.h, include/winnt.h, loader/main.c: Improved the selector get/set functions. Support ANSI-compatible inline asm (with the help of Patrik Stridvall). * dlls/winmm/joystick/Makefile.in, dlls/winmm/mcianim/Makefile.in, dlls/winmm/mciavi/Makefile.in, dlls/winmm/mcicda/Makefile.in, dlls/winmm/mciseq/Makefile.in, dlls/winmm/mciwave/Makefile.in, dlls/winmm/midimap/Makefile.in, dlls/winmm/wavemap/Makefile.in, dlls/winmm/wineoss/Makefile.in, include/acconfig.h, include/config.h.in, dlls/Makefile.in, dlls/avifil32/Makefile.in, dlls/comctl32/Makefile.in, dlls/commdlg/Makefile.in, dlls/msvideo/Makefile.in, dlls/oleaut32/Makefile.in, dlls/shell32/Makefile.in, dlls/winmm/.cvsignore, dlls/winmm/Makefile.in, Make.rules.in, Makefile.in: Made winmm a separate shared library. * scheduler/process.c, tools/bin2res.c, include/wine/windef16.h, loader/ne/resource.c, misc/registry.c, objects/dib.c, ole/ole2nls.c, programs/clock/winclock.c, dlls/shell32/changenotify.c, dlls/shell32/shellord.c, graphics/x11drv/dib.c, if1632/builtin.c, include/dplobby.h, include/wingdi.h, dlls/dplayx/dplobby.c, dlls/icmp/icmp_main.c, dlls/ntdll/reg.c, dlls/odbc32/proxyodbc.c, dlls/oleaut32/typelib.c, dlls/commdlg/filedlg95.c: Patrik Stridvall Fixed ANSI C violations. * server/context_i386.c: Patrik Stridvall Fixed Solaris specific compiler issue. * files/dos_fs.c, win32/init.c: Patrik Stridvall Fixed some debug message crashes. * include/dinput.h, windows/dinput.c: Lionel Ulmer - implement EnumObjects and GetProperty for Mouse and Joystick drivers - implement SetDataFormat for the Mouse driver * dlls/winmm/joystick/.cvsignore, dlls/winmm/joystick/Makefile.in, dlls/winmm/joystick/joystick.c, dlls/winmm/joystick/joystick.spec, include/debugdefs.h, include/message.h, include/mmddk.h, windows/message.c, Make.rules.in, configure, configure.in, dlls/Makefile.in, dlls/winmm/Makefile.in, dlls/winmm/joystick.c: Eric Pouech Moved hardware related handling to dlls/winmm/joystick driver. Got rid of joySendMessages() hack (now implementation with a timer). 2000-02-25 Alexandre Julliard * misc/debugstr.c: Release unused space in debug strings to avoid too frequent wrap-arounds in the circular buffer. * dlls/oleaut32/Makefile.in: Added import of olepro32. * winedefault.reg: Andreas Mohr Added OLE entries and comments. * ole/nls/jpn.nls: Hidenori Takeshima Japanese support implemented. * ole/ole2nls.c: Steven Elliott Stubbed out the implementation of LCMAP_SORTKEY in LCMapStringW() in order to allow Windows 9x Perl to start. * dlls/winspool/info.c: Ulrich Czekalla This patch initializes the return buffer used in GetPrinterDriverA to zeros. This prevents buffer overruns caused by accessing garbage data. Some improvements to the NULL check patch. Gautam Jain EnumPrinters is not returning the number of printers found in case the parameter dwLevel is 1. * dlls/ntdll/reg.c: Dmitry Timoshkov Do not overwrite the valid ObjectAttributes->RootDirectory. Perform case insensitive comparison for the registry paths. * include/ntddk.h: Dmitry Timoshkov Added prototypes for registry functions. * include/winbase.h, include/winnls.h: Dmitry Timoshkov Move definition of CPINFO structure from winbase.h to winnls.h Add definition of CPINFOEX structure to winnls.h * include/crtdll.h: Dmitry Timoshkov Add prototype for CRTDLL_wcstol. * dlls/comctl32/toolbar.c: Hidenori Takeshima Fix for toolbar button size. * misc/lstr.c: Hidenori Takeshima Fixed CharNextA/CharNextExA for DBCS. * windows/multimon.c, windows/x11drv/monitor.c, include/debugger.h, misc/comm.c, ole/ole2nls.c, relay32/snoop.c, tools/build.c, debugger/msc.c, debugger/stabs.c, dlls/comctl32/draglist.c, graphics/ddraw.c: James Abbatiello Misc. fixes for compiler warnings. * dlls/ole32/stg_stream.c, dlls/ole32/storage32.c, dlls/ole32/storage32.h, include/ole2.h, include/wine/obj_base.h, include/winerror.h: Pierre Mageau Implementation of OleConvert routines. Thuy Nguyen Don't allow to resize stream open in read only mode Allow write access for stream/storage open with STGM_READWRITE. StgOpenStorage return values are now more detailed. Don't rely on STGM_CREATE flag in the Storage constructor. Preventing to write out of date property. Owen Wang Allow both positive & negative 32-bit integers as with MFC assumption. This patch improves the 32bit limit on IStream::*_Seek operations. John Li When WP opens a linked file, the malloc function in OLECONVERT_LoadOLE10(...) returns a NULL. This causes a later Wine crash. The actual problem is the function reading a large data length. * dlls/version/info.c: Patrik Stridvall Made some local functions static. * dlls/oleaut32/oleaut32.spec, server/context_i386.c: Patrik Stridvall Fixed some issues found by winapi_check. * tools/winapi_check/*: Patrik Stridvall Moved some of the API specification from the global file to the local files. * dlls/mouse/mouse_main.c, include/mouse.h, include/ttydrv.h, include/x11drv.h, windows/ttydrv/mouse.c, windows/x11drv/mouse.c: James Abbatiello Better thread safety for WarpPointer hack. * dlls/advapi32/advapi32.spec, dlls/advapi32/security.c: Juergen Schmied Added AddAccessAllowedAce. * include/commctrl.h: Juergen Schmied Some more ListView_ macros, winelib fixes. * objects/cursoricon.c: Juergen Schmied Fixed allocation of 16x16 icons. * dlls/commdlg/filedlg95.c: Juergen Schmied For unicode: give the selected filename back. * tools/wineinstall: Ove Kaaven Check for Xpm headers and add /usr/local/lib to /etc/ld.so.conf if necessary. * windows/painting.c: Serge Ivanov We don't need to call LPtoDP in here as far as PatBlt does it internally. * dlls/comctl32/propsheet.c: Serge Ivanov In Windows, if PropertySheet can't create some page it just skips it. This patch adds similar behaviour to Wine. It also adds some NULL checks. Fix property sheet initialization bugs. Matthew Robertson The template was calling GetActiveIndex which was not being set in the propsheet code, and the call was moved before we call SetActive - because that's where we query for the Active Index. Noomen Hamza Resize property sheet to the largest dialog size. Don Kelly In the WM_INITDIALOG handler for the prop sheet, there is a call to PROPSHEET_IsTooSmall() which, if it returns TRUE, calls PROPSHEET_AdjustSize(). Contrary to its comment, .._AdjustSize() actually aligns the sizes of the "largest" prop. sheet dialog template and the tab control. The IsTooSmall() call doesn't properly catch this mismatch. Modified the function to return TRUE if the sizes mismatch and renamed it to PROPSHEET_SizeMismatch() to reflect its proper use. * dlls/shell32/shlwapi.spec: Marcus Meissner We define PathISURLA, so use it. * dlls/comctl32/imagelist.c: Serge Ivanov In function IMAGELIST_InternalDrawMask we have to mask out overlay mask in fStyle. Otherwise comparison fStyle == ILD_NORMAL will not work, which leads to improper display of overlay images. * windows/win.c: Alexandre Julliard (for Corel) ATOMs are considered unique, so we don't need to check class pointers in FindWindow. * objects/region.c: Serge Ivanov Not all region functions updated 'type' field to reflect current region state. * programs/cmdlgtst/cmdlgr.rc, programs/cmdlgtst/cmdlgtst.c: Eric Williams Minor fixups and tweaking, and a dummy hook. * dlls/commdlg/filedlg.c: Juergen Schmied Fixed handling of filedlg flags. 2000-02-20 Alexandre Julliard * scheduler/process.c: Andreas Mohr Added FIXME comment for entry point parameter. * dlls/ole32/moniker.c, dlls/ole32/ole32.spec: Andreas Mohr - stub for OLE32.MkParseDisplayName - spelling fixes * windows/dialog.c, windows/win.c: Andreas Mohr - fixed my slightly incorrect EndDialog patch - cleaned up win.c * windows/x11drv/wnd.c, dlls/comctl32/tab.c, windows/winproc.c: Andreas Mohr Spelling fixes. * dlls/dsound/dsound_main.c: Marcus Meissner Made the buffer list in the directsound object thread-safe. * loader/module.c, loader/ne/module.c: Andreas Mohr It seems to be GetModuleFileName16 that checks exe version on whether to return long or short paths, not GetModuleFileNameA. * dlls/commdlg/filedlg.c: Gerard Patel Avoid too much refreshing when changing the drive in the 16 bits file dialog. * files/dos_fs.c: Petr Tomasek GetLongPathName rewrite. * dlls/commdlg/cdlg_En.rc, dlls/commdlg/filedlg95.c, dlls/commdlg/filedlgbrowser.c, dlls/commdlg/filedlgbrowser.h, dlls/commdlg/filetitle.c: Corel merge: Pierre Mageau Don't update the combo box selection when closing the dialog only when clicking on OK button. Adjust file dialog size when help button isn't present. Don Kelly. Fixes problems with open dialog box filters. Ulrich Czekalla Prevents the help button from displaying on OpenFile dialogs unless the proper flag is set in the OPENFILENAME struct. Yuxi Zhang Fixed memory leak. Jean-Claude Batista Add tooltips to the file Dialog toolbar. Sylvain Bouchard, Bill Jin Three new functions EnumSelectedPidls, GetNumSelected, FILEDLG95_OnOpenUsingView: corrections Instead of passing in a copy of ofn, passing in the pointer of ofn. David Golding A "!" was missing in a check against lpstrInitialDir. Rick Mutzke Fixed crash: if dialog has no filetypes appearing in the dropdown list. Matt Robertson, Ulrich Czekalla Fixed problems occurring with selection of files inside openfiledlg. * dlls/commdlg/filedlg.c: Juergen Schmied - activated use of templates - moved the creating of new folders to the shellview * dlls/shell32/shell32_main.c, dlls/shell32/shell32_main.h: Juergen Schmied Started with shell-clipboard handling (context menu cut&paste, drag&drop). * dlls/shell32/dataobject.c: Juergen Schmied Removed ItemIDListList, reorganisation, more formats. * dlls/shell32/shlview.c: Juergen Schmied - implemented rename, copy and delete file - "new file" is activating label edit for rename - implemented IShellView_SelectItem * dlls/shell32/shres.rc, dlls/shell32/shresdef.h, dlls/shell32/shv_bg_cmenu.c: Juergen Schmied Better context menus. * dlls/shell32/Makefile.in, dlls/shell32/clipboard.c, dlls/shell32/contmenu.c, dlls/shell32/shv_item_cmenu.c, include/wine/obj_contextmenu.h, include/wine/obj_shellview.h, include/wine/undocshell.h: Juergen Schmied - new files related to context menu and drag drop file operations - render functions for clipboardformats * dlls/shell32/shell.c, dlls/shell32/shellpath.c: Stephane Lussier Implemented PathIsURLA and modified ShellExecute16 to be able to load URL * dlls/shell32/shell32.spec, dlls/shell32/changenotify.c, dlls/shell32/shellord.c, include/shell.h, include/shellapi.h, include/shlobj.h: Juergen Schmied Started implementation of shell notifications. * dlls/shell32/shlfileop.c: Juergen Schmied New file (SHFileOperation). * dlls/shell32/classes.c: Juergen Schmied Fixes. * dlls/shell32/shellfolder.h, dlls/shell32/shlfolder.c: Juergen Schmied - new internal interface for item manipulation (cut/paste/new folder/delete/rename) - implemented IPersistFolder2 interface * dlls/shell32/pidl.c, dlls/shell32/pidl.h: Juergen Schmied New aPidl handling functions. * misc/main.c: Avoid crash on usage message. * dlls/advapi32/registry.c: Avoid crash on NULL data pointer. * dlls/ntdll/ntdll.spec, dlls/ntdll/rtl.c: Andreas Mohr Added stub for RtlAssert(). * windows/x11drv/keyboard.c: Hidenori Takeshima Added Japanese jp106 and pc98x1 keyboard layout. * dlls/winmm/mci.c: Eric Pouech Got rid of PROFILE_ functions, now accessing Wine config options through the registry. * files/profile.c: Eric Pouech While creating the wine config key, make sure that only Wine's subkeys are volatile. * graphics/psdrv/driver.c: Marcus Meissner Check for NULL ptr in PSDRV_GetDeviceCapabilities. * win32/console.c: Marcus Meissner Added a bit magic to CONSOLE_get_input so we don't get single Escapes from function key escape sequences. 2000-02-19 Alexandre Julliard * memory/atom.c: Bug fix for native USER. * loader/loadorder.c, wine.ini: Hard-coded DllPairs configuration; there is no need for the user to change it. * graphics/psdrv/afm.c, graphics/x11drv/xfont.c, include/console.h, include/main.h, include/options.h, misc/main.c, misc/version.c, windows/x11drv/main.c, windows/x11drv/wnd.c, console/interface.c, documentation/wine.man.in, files/profile.c: Store config file contents in the registry so we only have to load it once per session. Replaced PROFILE_EnumerateWineIniSection by PROFILE_EnumWineIniString. Removed a few unnecessary/unused command-line options. 2000-02-18 Alexandre Julliard * loader/dos/module.c, loader/ne/module.c, loader/pe_image.c, loader/task.c, scheduler/process.c, server/process.c, server/process.h, server/trace.c, include/process.h, include/server.h: Store the handle of the process exe file in the server. Removed PROCESS_Initial(). * dlls/oleaut32/variant.c: Owen Wang Set the type of VarBstrFromDate to dwFlags, instead of lcid. Ulrich Czekalla Fixed the problem with the date being off by one. Petar Djukic VariantCopy was ignoring VT_DISPATCH,VT_UNKNOWN, and VT_VARIANT. Same with VariantClear. Coerce function doesn't implement coercion for VT_DISPATCH type. * if1632/gdi.spec, if1632/kernel.spec, if1632/user.spec: Andreas Mohr Added/corrected ordinals of kernel, gdi, user. * include/win.h, windows/win.c: Noomen Hamza Popup windows will be hidden when minimizing the main frame. * dlls/oleaut32/typelib.c, dlls/oleaut32/typelib.h: Alexandre Julliard (for Corel) Changed the loading of typelib files to use a memory mapping instead of reading the file bit by bit. * files/drive.c: Andreas Mohr DRIVE_FindDriveRoot() always checked from drive A: to Z: for each path component even if a match already occurred. * dlls/oleaut32/ole2disp.c: Eric Pouech Fixed prototype for OleTranslateColor. * files/file.c: Matthew Cline Added WARN messages on open errors. * misc/wsprintf.c: Hidenori Takeshima The maximum size of the buffer is 1024 bytes in Win32. 2000-02-16 Alexandre Julliard * relay32/snoop.c, windows/driver.c, windows/hook.c, windows/win.c, windows/winproc.c, if1632/snoop.c, if1632/thunk.c, include/region.h, loader/loadorder.c, loader/ne/module.c, misc/ddeml.c, misc/toolhelp.c, objects/enhmetafile.c, objects/metafile.c, objects/region.c, files/drive.c, files/file.c, files/profile.c, graphics/driver.c, graphics/enhmetafiledrv/graphics.c, graphics/enhmetafiledrv/init.c, graphics/enhmetafiledrv/objects.c, graphics/metafiledrv/bitblt.c, graphics/metafiledrv/graphics.c, graphics/metafiledrv/init.c, graphics/metafiledrv/objects.c, graphics/win16drv/init.c, graphics/win16drv/prtdrv.c, graphics/x11drv/xfont.c, dlls/lzexpand/lzexpand_main.c, dlls/mpr/mpr_main.c, dlls/winaspi/winaspi16.c, dlls/winmm/lolvldrv.c, dlls/winmm/mci.c, dlls/winmm/wineoss/midi.c, dlls/wnaspi32/winaspi32.c, files/dos_fs.c, dlls/advapi32/security.c: Moved SystemHeap allocations to the process heap. * windows/win.c: Gerard Patel Do not use GlobalFindAtom with atom handles in CreateWindow* functions. * windows/defwnd.c: Ulrich Czekalla Send WM_HELP message when F1 is pressed. * ole/nls/brf.nls, ole/nls/cor.nls, ole/nls/cym.nls, ole/nls/gae.nls, ole/nls/gdh.nls, ole/nls/gdv.nls, documentation/wine.man.in, include/options.h, include/winnls.h, misc/main.c, ole/ole2nls.c: Alastair McKinstry Added support for the following celtic languages: Irish Gaelic, Scots Gaelic, Manx Gaelic, Breton, Welsh, Cornish. 2000-02-14 Alexandre Julliard * dlls/ole32/clipboard.c, dlls/ole32/compobj.c, dlls/ole32/ole32.spec: Juergen Schmied Added stub for CoResumeClassObjects. * windows/dinput.c: Lionel Ulmer - added argument printing to stubs - replaced memcmp by IsEqualGUID - implemented GetCapabilities for Mouse and Keyboard * dlls/winsock/socket.c: Ove Kaaven ioctlsocket() now returns success if the app sets nonblocking mode for WSAAsyncSelect()-ed sockets. * dlls/crtdll/wcstring.c: Gerald Pfeifer Fixed FreeBSD compile. * dlls/winmm/mci.c: Eric Pouech - fixed crash on mci channel tracing - fixed 16 to 32 bit translation for MCI_BREAK and MCI_SYSINFO messages 2000-02-13 Alexandre Julliard * graphics/x11drv/bitblt.c: James Abbatiello Moved CLIPPING_UpdateGCClipping call outside of the X11 section. * include/winbase.h, scheduler/process.c, scheduler/thread.c, server/process.c, server/thread.c: Dave Pickles Added definition for STILL_ACTIVE. * server/request.c, configure, configure.in, include/config.h.in, scheduler/client.c: Juergen Lock Added configure check for the unix domain sockaddr length. * misc/cdrom.c: Juergen Lock Fixed CDROM_Audio_Seek for non-linux systems. * objects/gdiobj.c, include/gdi.h: Matthew Cline GetObjectA() now rejects GDI handles which are invalid. * misc/version.c: Juergen Lock VERSION_GetSystemDLLVersion crashed when being called on a .so. * windows/defwnd.c: Martin Fuchs Display the system popup menu when clicking with the right mouse button in the window caption. * dlls/ole32/clipboard.c: Removed check for class existence. * dlls/comctl32/animate.c, dlls/comctl32/comboex.c, dlls/comctl32/datetime.c, dlls/comctl32/flatsb.c, dlls/comctl32/header.c, dlls/comctl32/hotkey.c, dlls/comctl32/ipaddress.c, dlls/comctl32/listview.c, dlls/comctl32/monthcal.c, dlls/comctl32/nativefont.c, dlls/comctl32/pager.c, dlls/comctl32/progress.c, dlls/comctl32/rebar.c, dlls/comctl32/status.c, dlls/comctl32/tab.c, dlls/comctl32/toolbar.c, dlls/comctl32/tooltips.c, dlls/comctl32/trackbar.c, dlls/comctl32/updown.c: Alexandre Julliard Removed superfluous GlobalFindAtom calls. * misc/registry.c: Juergen Schmied Reading of ri blocks. Better error handling. * windows/mdi.c: Matthew Cline Check that ci->hWindowMenu is not zero before using it. * dlls/crtdll/crtdll.spec, dlls/crtdll/wcstring.c, dlls/ntdll/ntdll.spec: David Howells Implemented isw*() wctype.h functions. * miscemu/main.c: Andreas Mohr Better error messages. * dlls/comctl32/treeview.c: Alex Priem Fixed off-by-one error. * memory/atom.c, server/Makefile.in, server/atom.c, server/main.c, server/object.h, server/request.h, server/trace.c, server/unicode.h, windows/class.c, windows/message.c, windows/win.c, if1632/kernel.spec, if1632/user.spec, include/server.h, include/wine/winbase16.h, include/wine/winuser16.h: Moved global atoms to the server (based on the work of Sergei Turchanov ). 2000-02-12 Alexandre Julliard * include/wingdi.h: Matthew Cline Added a PTEXTMETRIC[A|W] definition. * include/windef.h: Matthew Cline Added typedefs for PSHORT and PUSHORT. * windows/dialog.c: Andreas Mohr Protect EndDialog() from invalid window handles. * graphics/d3dlight.c, graphics/d3dmaterial.c, graphics/d3dtexture.c: Lionel Ulmer Replaced fprintfs by proper debug macros and fixed some compilation warnings. 2000-02-10 Alexandre Julliard * include/ddraw.h: Ian Schmidt Added GUIDs, defines, and structures for DirectX7. * dlls/winmm/winmm_Ru.rc, dlls/winmm/winmm_res.rc: Oleg Korda Added Russian translation. * windows/class.c: Phillip Ezolt Added missing goto in switch statement. * misc/main.c: Marcus Meissner Initialize the NONCLIENTMETRICS with 0 (helps moorhuhn.exe). * win32/kernel32.c, windows/x11drv/event.c, windows/x11drv/main.c, graphics/psdrv/afm.c, graphics/psdrv/ppd.c, graphics/psdrv/ps.c, if1632/builtin.c, include/debugdefs.h, include/debugtools.h, include/miscemu.h, memory/global.c, memory/heap.c, memory/ldt.c, memory/virtual.c, misc/cpu.c, misc/debugstr.c, misc/error.c, misc/main.c, misc/registry.c, msdos/dpmi.c, msdos/int2a.c, msdos/int3d.c, msdos/int41.c, msdos/int4b.c, msdos/ioports.c, relay32/snoop.c, tools/make_debug, dlls/winmm/mcicda/mcicda.c, dlls/winmm/mciseq/mcimidi.c, dlls/winmm/mmio.c, dlls/winmm/wineoss/mixer.c, dlls/wnaspi32/winaspi32.c, files/file.c, graphics/ddraw.c, dlls/ole32/compobj.c, dlls/ole32/compositemoniker.c, dlls/oleaut32/typelib.c, dlls/shell32/classes.c, dlls/shell32/shellord.c, dlls/version/install.c, dlls/version/resource.c, dlls/winaspi/winaspi16.c, dlls/advapi32/registry.c, dlls/comctl32/datetime.c, dlls/comctl32/ipaddress.c, dlls/comctl32/trackbar.c, dlls/commdlg/filedlg95.c, dlls/dplayx/dplayx_global.c, dlls/dsound/dsound_main.c, dlls/lzexpand/lzexpand_main.c, dlls/ntdll/misc.c, dlls/ntdll/ntdll_misc.h, dlls/ntdll/signal_i386.c: Optimized debugging API to reduce code size. * library/winestub.c, misc/cdrom.c, msdos/int2f.c, objects/linedda.c, dlls/oleaut32/variant.c, dlls/olecli/olecli_main.c, dlls/olesvr/olesvr_main.c, graphics/cache.c, graphics/escape.c, graphics/ttydrv/text.c, include/color.h, include/enhmetafiledrv.h, include/metafiledrv.h, include/ole.h, include/psdrv.h, include/win16drv.h, include/wingdi.h, dlls/ole32/compobj.c, dlls/ole32/datacache.c, dlls/ole32/storage.c: Removed extra includes from ole.h and wingdi.h. * */*: Jeremy White Removed #include of wingdi.h and windef.h from winuser.h (and resolved the resulting compilation failures). 2000-02-07 Alexandre Julliard * dlls/ole32/compobj.c: Owen Wang Make CLSIDFromString return a CLSID of zeros instead of crashing when passed a null pointer. * dlls/winmm/joystick.c: Gerald Pfeifer Fixed unconditional use of JOYDEV. * include/commdlg.h, include/windowsx.h, include/wingdi.h, include/winuser.h: Michael Cardenas Added a bunch of macros needed for compiling Winelib apps. * include/commctrl.h: Juergen Schmied Added ListView_EditLabel macros. * dlls/commdlg/cdlg32.c: Juergen Schmied Changed import to ordinal. * include/wine/obj_shellfolder.h: Juergen Schmied Added IPersistFolder2 interface. * misc/cdrom.c, msdos/int2f.c, dlls/winmm/mcicda/mcicda.c, dlls/winmm/mcicda/mcicda.spec, files/drive.c, include/cdrom.h, include/debugdefs.h: Andreas Mohr - implemented serial numbers for audio CDs and data CDs - big clean up of misc/cdrom.c and dlls/winmm/mcicda/mcicda.c function naming and such - split debug channel cdaudio into cdrom and mcicda - fixed some typos * dlls/oleaut32/olefont.c, include/olectl.h: Sean Langley Made OleCreateFontIndirect have the same signature (exactly) as the header file. Added olepro32 dll stubs. * Make.rules.in, configure, configure.in, dlls/Makefile.in, dlls/olepro32/.cvsignore, dlls/olepro32/Makefile.in, dlls/olepro32/README, dlls/olepro32/olepro32.spec, dlls/olepro32/olepro32stubs.c: Sean Langley OLEPRO32 stubs. * windows/clipboard.c: Juergen Schmied Added CF_HDROP. * dlls/winmm/joystick.c: Wolfgang Schwotzer Extended the winmm joystick API calls to support the new Linux joystick driver. * server/context_i386.c: Juergen Lock Added context functions for FreeBSD. * dlls/shell32/systray.c: Sheri Steeves Fix for the system tray, Icon and popup menu's now work. * graphics/ddraw.c: Marcus Meissner Use window properties instead of window long, also use them to determine if we really own a window and can destroy it. The pixelformat for 256 colors has PALETTE|RGB flags (Tomb Raider 2) Set paintable flag for application passed cooperative/drawing window. GetDisplayMode: We might have and do support 2 backbuffers. * dlls/ole32/moniker.c: Noomen Hamza Running object table are not using 0 as a valid index anymore. * controls/static.c: Luc Tourangeau Implementation of Static OwnerDraw. * dlls/comctl32/imagelist.c: Marcus Meissner Height calculation was 1 off in ImageList_Read. 2000-02-03 Alexandre Julliard * programs/view/init.c, programs/view/view.c, tools/wrc/wrc.c, windows/mdi.c, controls/edit.c, controls/menu.c, dlls/commdlg/colordlg.c, dlls/commdlg/filedlg.c, dlls/commdlg/finddlg.c, dlls/commdlg/fontdlg.c, dlls/commdlg/printdlg.c, dlls/shell32/brsfolder.c, dlls/shell32/shell32_main.c, graphics/psdrv/driver.c, include/resource.h, loader/ne/resource.c: Removed resource.h. * programs/regtest/Makefile.in, programs/regtest/regtest.spec, programs/view/.cvsignore, programs/view/Makefile.in, programs/view/view.spec, programs/wcmd/.cvsignore, programs/wcmd/Makefile.in, programs/wcmd/wcmd.spec, programs/winhelp/.cvsignore, programs/winhelp/Makefile.in, programs/winhelp/winhelp.spec, programs/winver/.cvsignore, programs/winver/Makefile.in, programs/winver/winver.spec, programs/avitools/.cvsignore, programs/avitools/Makefile.in, programs/avitools/aviinfo.spec, programs/avitools/aviplay.spec, programs/avitools/icinfo.spec, programs/clock/.cvsignore, programs/clock/Makefile.in, programs/clock/clock.spec, programs/cmdlgtst/.cvsignore, programs/cmdlgtst/Makefile.in, programs/cmdlgtst/cmdlgtst.spec, programs/control/.cvsignore, programs/control/Makefile.in, programs/control/control.spec, programs/notepad/.cvsignore, programs/notepad/Makefile.in, programs/notepad/notepad.spec, programs/osversioncheck/.cvsignore, programs/osversioncheck/Makefile.in, programs/osversioncheck/osversioncheck.spec, programs/progman/.cvsignore, programs/progman/Makefile.in, programs/progman/progman.spec, programs/regapi/.cvsignore, programs/regapi/Makefile.in, programs/regapi/regapi.spec, programs/regtest/.cvsignore, libtest/.cvsignore, libtest/Makefile.in, libtest/expand.spec, libtest/hello.spec, libtest/hello2.spec, libtest/hello3.spec, libtest/hello4.spec, libtest/hello5.spec, libtest/new.spec, libtest/rolex.spec, libtest/vartest.spec, libtest/volinfo.spec: Ulrich Weigand Added .spec files for all libtest/ and programs/ WineLib apps. Updated all Makefiles to use .spec files and new resource handling. * loader/libres.c, loader/main.c, loader/pe_resource.c, loader/resource.c, relay32/builtin32.c, resources/sysres.c, tools/build.c, include/builtin32.h, include/libres.h, include/module.h, include/pe_image.h, include/resource.h, loader/Makefile.in, loader/elf.c: Ulrich Weigand Added .spec keyword 'mode' to allow creating built-in EXE modules. Use built-in EXE modules for WineLib apps (instead of ELF modules). Removed dummy ELF module creation. Removed LIBRES handling. * programs/notepad/main.c: Ulrich Weigand Fixed memory overwrite bug. * include/windef.h, include/wine/windef16.h: Jeremy White Moved definitions such as BOOL16 and INT16 from windef.h into wine/windef16.h. * ole/ole2nls.c: Julio César Gázquez GetNumberFormatA implementation added. * win32/console.c: Marcus Meissner Save and restore cursor in WriteConsoleOutputA. * include/datetime.h, include/monthcal.h, dlls/comctl32/datetime.c, dlls/comctl32/monthcal.c: Alex Priem - Implementation of WM_SETFORMAT - Reworked drawing/selection - Implementation of WM_KEYDOWN * include/miscemu.h, msdos/int09.c, msdos/int16.c: Ove Kaaven Added INT_Int16ReadChar and made int09 handle special keys. * graphics/vga.c, include/vga.h: Ove Kaaven Added alphanumeric mode to the VGA emulation. Use service thread for the periodic refresh. * loader/dos/module.c: Ove Kaaven Cleanup VGA refresh when terminating. * win32/console.c: Ove Kaaven Handle backspace correctly. 2000-01-31 Alexandre Julliard * configure, Make.rules.in, */Makefile.in: Build most dlls as separate shared libraries. 2000-01-30 Alexandre Julliard * configure.in, include/config.h.in, server/context_i386.c, configure: Ulrich Weigand Added configure check for sys/reg.h. * dlls/comctl32/imagelist.c, include/imagelist.h: Marcus Meissner Overlay indices are signed shorts (-1 means no overlay) (ImageList_SetOverlayIndex) should accept -1 as overlayindex. (ImageList_Read) We can read a NxM bitmap from the stream and have to convert it into a 1x(M*N) bitmap, set cCurImage,cMaxImage. Added documentation. (others) removed some potential operator precendence problems. * objects/dc.c: Marcus Meissner GetDeviceCaps: spot yet unsupported accesses to the DeviceCaps struct. * include/wine/exception.h, miscemu/main.c, win32/except.c, Makefile.in, debugger/dbg.y, debugger/external.c, dlls/ntdll/exception.c, include/debugger.h, include/thread.h: Ulrich Weigand Moved debugger to libwine to make it available to WineLib apps. Try to invoke external debugger if internal debugger crashes. Try to handle early invocation of debugger more gracefully. * include/main.h, include/process.h, include/task.h, loader/main.c, scheduler/process.c, scheduler/thread.c: Ulrich Weigand Mark initial process as 32-bit for WineLib apps. Use teb->tibflags instead of teb->flags (for Win95 USER32 compatibility). Removed unused thread event. * files/profile.c: Andreas Mohr - Windows skips the '\t' and ' ' at the beginning and end of section key names of .INI files. - Fixed Get/WritePrivateProfileStructA(): - (re-)translate the binary data into ASCII hex chars - add checksum / checking of it ---------------------------------------------------------------- 2000-01-30 Alexandre Julliard * configure.in, include/config.h.in, server/context_i386.c, configure: Ulrich Weigand Added configure check for sys/reg.h. * dlls/comctl32/imagelist.c, include/imagelist.h: Marcus Meissner Overlay indices are signed shorts (-1 means no overlay) (ImageList_SetOverlayIndex) should accept -1 as overlayindex. (ImageList_Read) We can read a NxM bitmap from the stream and have to convert it into a 1x(M*N) bitmap, set cCurImage,cMaxImage. Added documentation. (others) removed some potential operator precendence problems. * objects/dc.c: Marcus Meissner GetDeviceCaps: spot yet unsupported accesses to the DeviceCaps struct. * include/wine/exception.h, miscemu/main.c, win32/except.c, Makefile.in, debugger/dbg.y, debugger/external.c, dlls/ntdll/exception.c, include/debugger.h, include/thread.h: Ulrich Weigand Moved debugger to libwine to make it available to WineLib apps. Try to invoke external debugger if internal debugger crashes. Try to handle early invocation of debugger more gracefully. * include/main.h, include/process.h, include/task.h, loader/main.c, scheduler/process.c, scheduler/thread.c: Ulrich Weigand Mark initial process as 32-bit for WineLib apps. Use teb->tibflags instead of teb->flags (for Win95 USER32 compatibility). Removed unused thread event. * files/profile.c: Andreas Mohr - Windows skips the '\t' and ' ' at the beginning and end of section key names of .INI files. - Fixed Get/WritePrivateProfileStructA(): - (re-)translate the binary data into ASCII hex chars - add checksum / checking of it * files/directory.c, misc/registry.c, documentation/wine.conf.man.in, wine.ini: Juergen Schmied - fixes, loading of settings per user - autodetecting of windows registry version * dlls/commdlg/filedlgbrowser.c, dlls/dplayx/dpclassfactory.c, dlls/dsound/dsound_main.c, dlls/ole32/oleobj.c, dlls/oleaut32/typelib.c, include/wine/obj_base.h: Francois Gouget The COM virtual tables must use the 'ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE' macro to provide padding in C++. * msdos/int09.c: Ove Kaaven Made int9 handler add keystroke to BIOS keyboard buffer. * loader/dos/dosmod.c, loader/dos/dosmod.h: Ove Kaaven dosmod protocol revision 3, featuring MPROTECT and ENTERIDLE. * include/wincon.h: Ove Kaaven Added a couple of prototypes. * winedefault.reg: Dmitry Timoshkov Add information about code pages to default registry. * configure.in, Make.rules.in, configure: Patrik Stridvall - Unixware (Solaris) linker typo fixed - Solaris (and possibly Unixware) specific linker support for the GNU:ism --[no-]whole-archive - Solaris make specific makefile fix * server/context_i386.c: Patrik Stridvall Solaris support for {set,get}_thread_context added. 2000-01-29 Alexandre Julliard * server/context_i386.c: Added our own user_regs_struct definition for better compatibility. * controls/button.c, windows/dialog.c: Dmitry Timoshkov Correct the behaviour of the accelerator keys in dialogs according to the Windows' one. * programs/notepad/.cvsignore, programs/notepad/Makefile.in, programs/notepad/dialog.c, programs/notepad/main.c, programs/notepad/main.h, programs/notepad/notepad.rc, programs/notepad/rsrc.rc, programs/progman/.cvsignore, programs/progman/Makefile.in, programs/progman/Xx.rc, programs/progman/accel.rc, programs/progman/main.c, programs/progman/rsrc.rc, programs/winhelp/.cvsignore, programs/winhelp/Makefile.in, programs/winhelp/Pt.rc, programs/winhelp/Xx.rc, programs/winhelp/rsrc.rc, programs/winhelp/winhelp.c, programs/clock/.cvsignore, programs/clock/Makefile.in, programs/clock/clock.rc, programs/clock/main.c, programs/clock/rsrc.rc: Ulrich Weigand Link only a single .rc file with application. * windows/x11drv/wnd.c, dlls/shell32/shlfolder.c, documentation/no-windows, documentation/wine.man.in, graphics/d3dtexture.c, if1632/snoop.c, loader/loadorder.c, loader/ne/module.c, loader/pe_image.c, scheduler/process.c, BUGS, README, dlls/comctl32/treeview.c, dlls/dplayx/dplay.c, dlls/ole32/storage32.c: Andreas Mohr - add some documentation items - fix some spelling - fix some warnings * dlls/winmm/mcicda/mcicda.c, documentation/cdrom-labels, files/drive.c, include/cdrom.h, include/debugdefs.h, include/drive.h, libtest/volinfo.c, misc/cdrom.c, msdos/int2f.c, wine.ini: Andreas Mohr - support for reading labels and serial nums from device - "reasonable" misc/cdrom.c device handling - much improved audio CD support - serial number overwrite bug fix - spelling fixes * Makefile.in, configure, configure.in, dlls/Makefile.in, dlls/setupx/.cvsignore, dlls/setupx/Makefile.in, dlls/setupx/setupx.spec, dlls/setupx/setupx_main.c: Andreas Mohr Added SETUPX dll. * dlls/ole32/ole2.spec, server/process.c: Patrik Stridvall Fixed minor issues found by winapi_check. * tools/winapi_check/*: Patrik Stridvall - Minor fixes. - Moved some of the API specifications from the global file to the local files. * include/imagelist.h, dlls/comctl32/imagelist.c: Marcus Meissner Implemented ImageList_Read (not 100% correct in regarding to setting the bitmap). Filled out unknown members of ILHEAD. Started reordering IMAGELIST to make it Windows binary compatible. * dlls/shell32/iconcache.c: Marcus Meissner nIconIndex == -1 should return nr of available icons, not 0. * Makefile.in: Fixed building of dosmod and wineclipsrv. * misc/debugstr.c: Bug fix: added temp structure to cope with debug traces during thread startup. * win32/newfns.c, windows/msgbox.c, dlls/avifil32/avifile.c, dlls/ntdll/misc.c, dlls/ntdll/nt.c, dlls/ntdll/sec.c, dlls/ntdll/sync.c, if1632/snoop.c, include/debugstr.h, libtest/vartest.c, loader/resource.c, objects/text.c, relay32/relay386.c, relay32/snoop.c, relay32/utthunk.c: Removed debugstr.h. * misc/debugstr.c, scheduler/thread.c, if1632/relay.c, include/debugtools.h, include/thread.h: Use a per-thread buffer and write(2) for debug traces. Removed debug_dumpstr. 2000-01-27 Alexandre Julliard * dlls/ntdll/rtlstr.c: Juergen Schmied Small fix. * server/registry.c: Juergen Schmied Get HCU name from unix user name. * scheduler/process.c, server/process.c, server/process.h, server/request.h, server/thread.c, server/trace.c, tools/make_requests, include/server.h, memory/selector.c: Implemented GetThreadSelectorEntry through the server. 2000-01-26 Alexandre Julliard * dlls/winmm/lolvldrv.c: Dynamically load version.dll in MMDRV_GetDescription32. * dlls/ole32/ole2.c: Use a linked list instead of a DPA for the hook list. * windows/x11drv/clipboard.c: Use a linked list instead of a DPA to manage pixmaps. * dlls/ole32/storage32.c, dlls/ole32/storage32.h, dlls/ole32/stg_stream.c: Gerard Patel Returns an error if trying to write to a stream opened for read. * files/directory.c: Andreas Mohr Add a newbie warning for slashes in the search Path= of wine.conf. * graphics/ddraw.c: Ove Kaaven Wait for ShmCompletion during Flip. * configure.in, libtest/Makefile.in, Make.rules.in, Makefile.in, configure: Made --enable-dll the default. Use $(MAKE) instead of $(SUBMAKE) for recursive makes. Cleaned up install targets in main Makefile. * dlls/ntdll/sync.c: Don't crash when ObjectAttributes is NULL. 2000-01-25 Alexandre Julliard * windows/x11drv/monitor.c, debugger/dbgmain.c, debugger/stabs.c, dlls/crtdll/crtdll_main.c, include/options.h, loader/dos/module.c, loader/main.c, misc/main.c, miscemu/main.c, scheduler/client.c: Use argv[0] to locate the server executable. * memory/heap.c, include/heap.h, include/process.h, include/winnt.h, memory/environ.c, memory/global.c: Alexandre Julliard Share the system heap between different address spaces. Made process heap per-address space instead of per-process. * server/thread.h, server/trace.c, Makefile.in, include/server.h, include/thread.h, loader/main.c, misc/registry.c, scheduler/client.c, scheduler/process.c, scheduler/thread.c, server/Makefile.in, server/main.c, server/object.c, server/object.h, server/process.c, server/process.h, server/request.c, server/request.h, server/select.c, server/thread.c: Alexandre Julliard Made the server listen for new clients on a Unix socket in $HOME/.wine. Newly started wine processes now attach to an existing server if one is running. * files/profile.c, include/options.h: Added PROFILE_GetConfigDir function. 2000-01-24 Alexandre Julliard * dlls/advapi32/registry.c, dlls/ntdll/reg.c, dlls/ntdll/sync.c, dlls/winsock/socket.c, include/server.h, scheduler/client.c, server/*.c: Changed the server to return STATUS_* error codes. * dlls/ntdll/Makefile.in, dlls/ntdll/error.c, dlls/ntdll/rtl.c: Built a complete translation table for RtlNtStatusToDosError. * include/winerror.h, include/winnt.h: Added some error codes. * windows/nonclient.c: Use GetProcAddress instead of calling ShellAboutA directly. 2000-01-23 Alexandre Julliard * Makefile.in, configure, configure.in, dlls/Makefile.in, dlls/version/Makefile.in, dlls/version/ver.spec, dlls/version/ver16.c: Merged dlls/ver into dlls/version. * dlls/advapi32/advapi32.spec, dlls/advapi32/security.c, dlls/ntdll/Makefile.in, dlls/ntdll/file.c, dlls/ntdll/misc.c, dlls/ntdll/nt.c, dlls/ntdll/ntdll.spec, dlls/ntdll/ntdll_misc.h, dlls/ntdll/om.c, dlls/ntdll/reg.c, dlls/ntdll/rtl.c, dlls/ntdll/rtlstr.c, dlls/ntdll/sec.c, dlls/ntdll/sync.c, include/ntddk.h, include/ntdef.h, include/ntsecapi.h, include/winbase.h: Juergen Schmied - implementation of RtlReg* (read access), RtlEvent*, RtlSemaphore*, NtAllocateLocallyUniqueId - implementation or stubs for NtAccessCheck, NtSetSecurityObject, RtlClearBits, RtlEqualPrefixSid, RtlFindClearBits, RtlFormatCurrentUserKeyPath, RtlGetControlSecurityDescriptor, RtlIdentifierAuthoritySid, RtlImpersonateSelf, RtlInitializeBitMap, RtlInitializeGenericTable, RtlMakeSelfRelativeSD, RtlPrefixUnicodeString, RtlSetBits, RtlUnicodeToMultiByteN, RtlUpcaseUnicodeStringToOemString, RtlUpcaseUnicodeToOemN, RtlValidSid, RtlxUnicodeStringToOemSize - corrected most RtlString* functions, added documentation - more fixes and partial implementations * misc/main.c, windows/x11drv/event.c, windows/x11drv/main.c, graphics/ddraw.c, include/options.h: Ove Kaaven Added -dxgrab command line option, which confines cursor motion to the DirectX primary surface. * dlls/commdlg/filedlg95.c: Marcus Meissner Replaced some weird C constructs (char[]="" ) with more compatible ones. Added another NULL ptr check in _OnOpen. * misc/winsock_async.c, relay32/Makefile.in, relay32/wsock32.spec, Makefile.in, configure, configure.in, dlls/Makefile.in, dlls/winsock/.cvsignore, dlls/winsock/Makefile.in, dlls/winsock/async.c, dlls/winsock/socket.c, dlls/winsock/winsock.spec, dlls/winsock/wsock32.spec, if1632/Makefile.in, if1632/winsock.spec, misc/Makefile.in, misc/winsock.c: Moved winsock implementation to dlls/winsock. * dlls/*/.cvsignore: Marcus Meissner Added *.spec.c, *.spec.glue.s, *.glue.c to .cvsignore that need them. * graphics/x11drv/dib.c: Marcus Meissner Corrected arguments to VirtualFree(). * dlls/shell32/pidl.c, dlls/shell32/shlfolder.c, include/wine/winestring.h, memory/string.c: Dmitry Timoshkov Replaced LocalToWideChar() by lstrcpynAtoW(), WideCharToLocal() by lstrcpynWtoA(). * windows/winproc.c: Gerard Patel Map WM_MENUSELECT 32->16 bits for closing menu. * windows/mdi.c: Gerard Patel Fix parameters for MDI_RestoreFrameMenu in WM_DESTROY msg. * dlls/oleaut32/oleaut.c: Marcus Meissner Implemented (Register|Get|Revoke)ActiveObject from the docs. * graphics/ddraw.c, include/x11drv.h, windows/x11drv/event.c: Ove Kaaven Supercharged XShm implementation for DirectDraw. * debugger/msc.c: Ulrich Weigand Bugfix: missing NULL pointer checks. * loader/pe_image.c: Uwe Bonnes Check for MZ header before trying to decipher the PE header. * relay32/kernel32.spec: Uwe Bonnes Export GetLongPathName[A|W]. * memory/global.c, memory/heap.c: Guy Albertelli Fix problems with GlobalHandle and GlobalFree so results match Win98. Restructure HEAP_ValidateInUseArena, HeapValidate, and add HEAP_IsRealArena to eliminate *bogus* error messages. * windows/message.c: Huw D M Davies Actually print return value of message. * objects/dib.c: Marcus Meissner Corrected arguments in DIB_DeleteDIBSection. * files/file.c: Marcus Meissner Handle \\.\ like in CreateFile. Tested with help of James Feeney . 2000-01-20 Alexandre Julliard * scheduler/debugger.c, scheduler/thread.c, server/Makefile.in, server/context_i386.c, server/debugger.c, server/object.h, server/request.h, server/trace.c, tools/make_requests, include/server.h: Alexandre Julliard Added Get/SetThreadContext support through the server. 2000-01-18 Alexandre Julliard * windows/dinput.c, dlls/oleaut32/ole2disp.c, dlls/oleaut32/oleaut.c, dlls/oleaut32/olefont.c, dlls/shell32/contmenu.c, dlls/shell32/dataobject.c, dlls/shell32/enumidlist.c, dlls/shell32/folders.c, dlls/shell32/memorystream.c, dlls/shell32/regstream.c, dlls/shell32/shelllink.c, dlls/shell32/shellole.c, dlls/shell32/shlfolder.c, dlls/shell32/shlview.c, dlls/shell32/shv_bg_cmenu.c, graphics/d3ddevices.c, graphics/d3dexecutebuffer.c, graphics/d3dlight.c, graphics/d3dmaterial.c, graphics/d3dtexture.c, graphics/d3dviewport.c, graphics/ddraw.c, include/debugstr.h, misc/debugstr.c, dlls/avifil32/avifile.c, dlls/dplayx/dpclassfactory.c, dlls/dplayx/dplay.c, dlls/dplayx/dplobby.c, dlls/dsound/dsound_main.c, dlls/ole32/clipboard.c, dlls/ole32/datacache.c, dlls/ole32/defaulthandler.c, dlls/ole32/ifs.c, dlls/ole32/storage.c: Added debugstr_guid function and used it to replace WINE_StringFromCLSID in all debugging messages. * dlls/winmm/wineoss/audio.c: Uwe Bonnes Always initialize lpWaveHdr->lpNext to NULL. Don't fail on strange fragment sizes. 2000-01-17 Alexandre Julliard * include/winnls.h: Dmitry Timoshkov Add some defines needed for Unicode to Ascii conversions. * misc/registry.c: Juergen Schmied Better error handling, less keys held open. * graphics/ddraw.c: Marcus Meissner EnumDisplayModes must pass lPitch. * controls/menu.c: Gerard Patel Validate the menu handles. * dlls/win87em/emulate.c: Gerard Patel Rounds to the lowest integer, not the nearest. * loader/task.c: Ulrich Weigand Fixed race between Win16 parent and child for first rescheduling of child process. This fixes WinExec returning too early. 2000-01-16 Alexandre Julliard * configure, configure.in: Eric Pouech Use --whole-archive to force linking all of libwine.a. into wine. * if1632/builtin.c, include/builtin16.h, include/builtin32.h, relay32/builtin32.c, tools/build.c: Added automatic registration of built-in DLLs. 2000-01-15 Alexandre Julliard * configure.in, configure: Aaron Hope Fixed IPX detection. * misc/registry.c: Juergen Schmied New implementation of the win95 registry loader. * dlls/advapi32/registry.c: Juergen Schmied If there is enough space in the buffer and the type is REG_SZ and the string is not 0-terminated RegQueryValue and RegEnumValue are appending a 0. * debugger/hash.c: Gerard Patel Display the external modules after the internal modules in crash report. * files/drive.c: Ove Kaaven Made SetVolumeLabel report failure on CD-ROM drives. * documentation/status/directplay: Peter Hunnisett Updated documentation. * dlls/winmm/lolvldrv.c, dlls/winmm/mci.c, include/driver.h, windows/driver.c: Eric Pouech Replaced Wine specific DRIVER_GetType by a correct implementation of GetDriverFlag. * configure, configure.in, include/wine_gl.h: Lionel Ulmer - (ugly) fix for the 'Xmd.h' problem - fix the detection of DGA 2 in configure script * include/thread.h, scheduler/thread.c: Juergen Schmied - added NT fields to TEB - moved tls-fields and some wine specific fields to a higher offset - added some documentation - initialisation of the UnicodeString * dlls/dsound/dsound_main.c: Todd T. Fries Add HAVE_SOUNDCARD_H to support OpenBSD. * include/wingdi.h, objects/enhmetafile.c, relay32/gdi32.spec: Peter Hunnisett - Added some missing EMR record types and updated and fixed others - Added stubs and headers for CreateColorSpace,DeleteColorSpace and SetColorSpace - Added header for SetICMMode - Added ability to play more enhanced metafile records * graphics/enhmetafiledrv/init.c: Peter Hunnisett Store reference hdc size into enhanced metafile header when creating. * dlls/ole32/moniker.c, dlls/ole32/ole2stubs.c: Marcus Meissner Implemented OleRun. * objects/dc.c: Gerard Patel Removed DeleteObject call left over from previous patch. * win32/thread.c: Ove Kaaven Fixed bad register constraint in InterlockedCompareExchange. * include/winbase.h: Ove Kaaven Added prototypes for the NT synchronization functions InterlockedCompareExchange and InterlockedExchangeAdd. * loader/module.c: Ulrich Weigand Don't access 'wm->modname' after the modref has been flushed. * memory/global.c: Guy Albertelli Added null check in GlobalHandle. 2000-01-12 Alexandre Julliard * dlls/comctl32/datetime.c, dlls/comctl32/monthcal.c, dlls/oleaut32/parsedt.c, include/monthcal.h: Removed a dependency between oleaut32 and comctl32. * include/winnt.h: Juergen Schmied More STATUS_ codes. * include/ddraw.h: Steve Langasek Fixed macro definition of IDirectDrawSurface_Restore. Added defines for Ddraw's WaitForVerticalDisplay(). * include/dsound.h: Steve Langasek Fixed typos in macro definitions for IDirectSoundBuffer_GetStatus, IDirectSoundBuffer_Unlock. * include/mmsystem.h: Steve Langasek Missing Winelib declarations for AUXCAPS. * tools/build.c: Ulrich Weigand Fix (harmless) assembler warnings. * dlls/dplayx/dplay.c: Peter Hunnisett Fix problem with initialization (reported by Andreas Mohr). * dlls/comctl32/treeview.c: Alex Priem InfoPtr checking mixed up WM_DESTROY and WM_CREATE. ---------------------------------------------------------------- Sun Jan 9 21:42:42 2000 Alexandre Julliard * dlls/wnaspi32/winaspi32.c: Patrik Stridvall Non-Linux compile fix. * files/dos_fs.c: Francois Gouget DOSFS_DoGetFullPathName would underflow (p would get past the beginning of buffer) if given the name "//..". Regrouped the handling of the directory separators. Directory separators in the returned path are now alway a single "\" which simplifies the handling of ".." in the name. * dlls/advapi32/registry.c: Juergen Schmied Corrected behaviour of RegOpenKey in case of failure. * misc/registry.c, server/registry.c, server/trace.c, include/server.h: Juergen Schmied - removed copying of HKEY_USERS to HKEY_CURRENT_USER - HKEY_CURRENT_USER is now subkey of HKEY_USERS - changed query_key_info_request to return the key name too (NtQueryKey needs this) - the rootkeys (MACHINE and USER) do have names * include/gdi.h, objects/dc.c, objects/gdiobj.c: Gerard Patel Avoid deleting of the default 1x1 bitmap for memory DCs. * include/builtin16.h, include/builtin32.h, loader/ne/module.c, relay32/builtin32.c, relay32/user32.spec, tools/build.c, dlls/comctl32/comctl32.spec, dlls/commdlg/comdlg32.spec, dlls/display/display.spec, dlls/mouse/mouse.spec, dlls/shell32/shell32.spec, dlls/winmm/winmm.spec, if1632/builtin.c: Built-in DLLs resources are now specified in spec file. Removed unnecessary flags in built-in DLLs tables. * if1632/dummy.c, if1632/gdi.spec, if1632/user.spec, misc/Makefile.in, misc/bidi16.c: Erez Volk Added stubs for some BiDi API functions. * dlls/winmm/mciwave/mciwave.c: Bradley Baetz Fixed race condition between app and wine in WAVE_mciPlay. * controls/menu.c: Pascal Lessard Stop menu tracking when clicking on the menu bar where there is no menu item. * win32/newfns.c: Erez Volk Better error reporting. Sat Jan 8 22:27:31 2000 Alexandre Julliard * graphics/x11drv/xfont.c: Backed out scalable bitmap change (gives ugly results). * controls/menu.c: Marcus Meissner GetMenuString should return itemlength on 0 nMax or NULL str InsertItem pos=-1, flags = 0 should append item (thanks to Sander van Leeuwen) * include/aspi.h, dlls/wnaspi32/winaspi32.c, dlls/wnaspi32/wnaspi32.spec: David Elliott Removed malloc/free hack and replaced with HeapAlloc/HeapFree throughout code. Added critical section around code dealing with global variables. Added a few comments about how ASPI is supposed to work. Copy sense info into the correct place (right after the fixed 16-byte CDB). Now returns target status (many Windows apps won't even look at the sense are unless they get an error code). Added SC_ABORT_SRB FIXME. Added SC_GET_DISK_INFO place holder for clarity. Updated Linux SG interface structure to include new kernel 2.2 status fields. * Make.rules.in: Marcus Meissner Look for our header files first, then for systems headers. * dlls/commdlg/filedlg.c: Marcus Meissner The new filedialog stuff does not handle template. So do not call if there are any. * windows/winpos.c: Rein Klazes Avoid problems during changing the Z-order if the window and the window to insert after are the same. * libtest/expand.c, libtest/hello5.c: Marcus Meissner Removed GUI junk from expand.c, so you can use it in commandline mode. Fixed hello5.c. * dlls/imagehlp/imagehlp.spec, dlls/imm32/imm32.spec: Patrik Stridvall Fixed some issues found by winapi_check. * tools/winapi_check/win32/shell32.api, tools/winapi_check/winapi.pm, tools/winapi_check/winapi_check, tools/winapi_check/winapi_local.pm: Patrik Stridvall - Added support for auto allocated ordinals - Fixed varargs (16 bit) bug - Minor fixes * dlls/version/info.c: Ulrich Weigand Fixed alignment problem with VERSION_INFO members. Wed Jan 5 03:24:52 2000 Alexandre Julliard * configure, configure.in: Marcus Meissner Add $X_EXTRA_LIBS to any X dependend checks or they will fail if some of the $X_EXTRA_LIBS are required. * windows/defwnd.c, windows/painting.c: Patrik Stridvall - Made FillRect behave like it does on Windows - Cleaned up WM_{,ICON}ERASEBACKGROUND default handling - Added some comments on how Windows behaves * windows/winhelp.c: Peter Ganten Check if winhelp is already running; use winhlp32.exe or winhelp.exe depending on the emulated version, relase win16lock before calling WinHelpA. * AUTHORS, include/authors.h: Updated authors list from the Changelog. Please let me know if you have been left out. * documentation/fonts: Marcus Meissner TrueType clarification. * configure, configure.in, graphics/d3ddevices.c, graphics/d3dtexture.c, include/acconfig.h, include/config.h.in: Lionel Ulmer - detect if the OpenGL implementation defines the paletted texture and color table extensions - small warning fixes - fix the double '-lXxf86dga' when having DGA 2.0 * include/winbase.h: Marcus Meissner Some comm clean up, much more error messages, only use TIOCOUTQ if defined [wine-bugs/104], tried implementing SetCommTimeouts. * dlls/comctl32/treeview.c: Alex Priem - When processing WM_PAINT messages, the treeview might sometimes use the wrong hdc. Fixed. - Better checking for TREEVIEW_INFO *infoPtr=NULL. Similar to code in toolbar.c - Other small fixes (subclassed edit control). * debugger/msc.c: Ulrich Weigand Bugfix: uninitialized pointer caused crashes. * loader/pe_image.c: Marcus Meissner Made virus warning a bit more drastic, since some people don't believe us. * misc/comm.c: Marcus Meissner Some comm clean up, much more error messages, only use TIOCOUTQ if defined [wine-bugs/104], tried implementing SetCommTimeouts. * files/profile.c: Rein Klazes Implement WritePrivateProfileSectionA(). * dlls/ntdll/rtl.c: Adam Sacarny Fix for compilers that don't support 'long long' (From Ove Kaaven). Tue Jan 4 02:40:22 2000 Alexandre Julliard * scheduler/thread.c, server/thread.c: Moved allocation of the socket pair for a new thread to the server. * server/debugger.c: Made debug events and contexts standard objects. Use sleep_on to wait on debug events. * server/request.c, server/request.h, server/thread.c, server/thread.h, server/trace.c: Made sleep_on usable from all requests. * dlls/winmm/lolvldrv.c, dlls/winmm/mmsystem.c, include/mmsystem.h: Eric Pouech Added more MIDI messages 16<=>32 mapping. Fixes some bugs in buffers handling and index for MAPPER. * include/callback.h, if1632/thunk.c: Eric Pouech Removed the obsoleted CallTimeFuncProc, CallDriverProc, CallDriverCallback. * dlls/winmm/.cvsignore, dlls/winmm/Makefile.in, dlls/winmm/time.c: Eric Pouech Put back visible minimum timer resolution to 1 ms. Decorrelate the service thread resolution from the user required timer & visible minimum resolutions. Removed the Callback.TimeFuncProc entry. * windows/x11drv/monitor.c: Lionel Ulmer Give +0+0 as a default position for the desktop window. * dlls/winmm/mmio.c: Bradley Baetz Convert mmio to allow the use of 32 bit mmio procedures. * dlls/shell32/shell32.spec, dlls/shell32/shell32_main.c, dlls/shell32/shell32_main.h, dlls/shell32/shellord.c, dlls/shell32/shellpath.c, dlls/shell32/shlmenu.c, dlls/shell32/systray.c: Juergen Schmied Small fixes. * dlls/odbc32/odbc32.spec, misc/registry.c, relay32/kernel32.spec: Patrik Stridvall Fixed some issues found by winapi_check. * tools/winapi_check/win32/advapi32.api, tools/winapi_check/win32/comctl32.api, tools/winapi_check/win32/odbc32.api, tools/winapi_check/winapi.pm: Patrik Stridvall Updated winapi_check to handle the new additions. * dlls/comctl32/monthcal.c, include/monthcal.h: Chris Morgan James Abbatiello Implemented WM_SIZE message support. Optimized drawing to use precalculated size values rather than recalculating during each call of MONTHCAL_Refresh. * relay32/user32.spec, windows/dialog.c: Juergen Schmied Corrected parameter count for DialogBoxIndirectParamAorW. * controls/scroll.c: Rein Klazes Don't show the scrollbar if SetScrollinfo() is called with only the SIF_DISABLENOSCROLL flag. * windows/x11drv/keyboard.c: Ove Kaaven Added extra US keymap with the infamous phantom key. * Makefile.in, dlls/winmm/wineoss/Makefile.in: Eric Pouech Use a uniform naming scheme for driver modules. * include/driver.h: Eric Pouech Encapsulated Wine internal data into an ifdef __WINE__. * windows/Makefile.in, windows/driver.c, windows/.cvsignore: Eric Pouech Moved the 16 bit driver functions callout into the dir. * dlls/winmm/wavemap/wavemap.c: Eric Pouech Added support for WODM_BREAKLOOP message. * dlls/winmm/wineoss/mixer.c: Eric Pouech Removed extraneous ERR message. * dlls/winmm/mciseq/mcimidi.c: Eric Pouech Added support for MCI_INFO_COPYRIGHT and MCI_INFO_NAME. * debugger/hash.c: Eric Pouech Use case insensitive comparison while searching for new modules. * dlls/ntdll/ntdll.spec: Andreas Mohr Added spec entry for _itoa. * tools/wrc/CHANGES, tools/wrc/wrc.h, tools/wrc/writeres.c: Bertho Stultiens Generated labels of resource names must be unique throughout the generated code. * windows/message.c: Andreas Mohr "resultp" can be NULL in SendMessageTimeout*(). * dlls/crtdll/crtdll.spec, dlls/crtdll/crtdll_main.c: Andreas Mohr - prevent mem leak of CRTDLL_acmdln_dll - better argument parsing - last xargv entry has to be NULL - return value is environment pointer instead of NULL - added a spec entry for bsearch() Sat Jan 1 22:38:21 2000 Alexandre Julliard * loader/module.c, scheduler/process.c, windows/message.c, windows/queue.c, windows/user.c, if1632/thunk.c, include/callback.h, include/process.h: Peter Ganten Implemented WaitForInputIdle. * misc/ddeml.c, windows/win.c: Fixed potential buffer overflows (spotted by Francois Gouget). * relay32/wow32.spec, dlls/mpr/mpr.spec, dlls/ntdll/ntdll.spec, dlls/psapi/psapi.spec, dlls/shell32/shlwapi.spec, dlls/tapi32/line.c, dlls/tapi32/tapi32.spec, dlls/version/version.spec, dlls/winmm/winmm.spec, relay32/ddraw.spec, relay32/dinput.spec, relay32/gdi32.spec, dlls/avifil32/avifil32.spec, dlls/crtdll/crtdll.spec, dlls/dciman32/dciman32.spec, dlls/dplayx/dplay.spec, dlls/icmp/icmp.spec, dlls/imagehlp/imagehlp.spec, dlls/imm32/imm32.spec, dlls/lzexpand/lz32.spec, dlls/advapi32/advapi32.spec: Make use of automatic ordinal allocation. * server/socket.c, server/device.c, server/event.c, server/file.c, server/handle.c, server/mapping.c, server/mutex.c, server/object.c, server/object.h, server/pipe.c, server/process.c, server/registry.c, server/request.c, server/request.h, server/select.c, server/semaphore.c, server/snapshot.c, server/sock.c, server/thread.c, server/thread.h, server/timer.c, server/trace.c, server/Makefile.in, server/change.c, server/console.c: Moved poll handling to the generic part of the server objects. Fixed busy waiting on POLLERR events. Merged struct client into struct thread. Mon Dec 27 05:26:01 1999 Alexandre Julliard * win32/process.c, windows/x11drv/wnd.c, dlls/odbc32/proxyodbc.c, dlls/ole32/bindctx.c, dlls/ole32/hglobalstream.c, graphics/ttydrv/bitmap.c, misc/ddeml.c, misc/version.c: Cosmetics. * memory/atom.c, memory/environ.c, misc/lstr.c, misc/registry.c, misc/winsock.c, programs/regapi/regapi.c, relay32/builtin32.c, windows/driver.c, windows/mdi.c, windows/x11drv/keyboard.c, dlls/winmm/lolvldrv.c, dlls/winmm/wineoss/mixer.c, files/profile.c, graphics/psdrv/driver.c, graphics/psdrv/font.c, loader/module.c, loader/ne/module.c, loader/task.c, dlls/commdlg/filedlg.c, dlls/commdlg/filetitle.c, dlls/shell32/pidl.c, dlls/shell32/shelllink.c, dlls/shell32/shlfolder.c, dlls/version/install.c: Francois Gouget Buffer overflows and strncpy fixes. * loader/pe_image.c: PE_FindExportedFunction: use a binary search for function names. Sun Dec 26 23:12:38 1999 Alexandre Julliard * dlls/advapi32/advapi32.spec, dlls/odbc32/odbc32.spec: Fixed/commented out duplicate entry point names. * relay32/builtin32.c, tools/build-spec.txt, tools/build.c: Added support for automatic ordinal allocation. Output list of function names in sorted order. Added support for nameless (ordinal-only) entry points. Cleaned up error handling. * include/metafiledrv.h, include/psdrv.h, include/ts_xlib.h, include/ttydrv.h, include/win16drv.h, include/x11drv.h, objects/font.c, objects/text.c, tsx11/X11_calls, tsx11/ts_xlib.c, graphics/metafiledrv/text.c, graphics/psdrv/font.c, graphics/psdrv/ps.c, graphics/psdrv/text.c, graphics/ttydrv/font.c, graphics/ttydrv/text.c, graphics/win16drv/font.c, graphics/win16drv/text.c, graphics/x11drv/text.c, graphics/x11drv/xfont.c, include/gdi.h: Huw D M Davies Move DCFuncs ExtTextOut and GetTextExtentPoint to Unicode. Map a few Unicode chars to the first 0xff in psdrv. Don't expect x11drv to display Unicode chars yet. * dlls/comctl32/tooltips.c, dlls/shell32/pidl.c, dlls/shell32/shellord.c, dlls/shell32/shellpath.c, dlls/shell32/shlfolder.c, memory/string.c, relay32/relay386.c, relay32/snoop.c: Francois Gouget Wrapped some strings in a debugstr_* call. Replaced some calls to debugstr_{a,w} by debugstr_{a,w}n. Removed redundant 'L's for Unicode strings. Tried to harmonize the traces a little bit. * misc/debugstr.c: Francois Gouget debugstr_w now returns something looking like 'L"xxxx"...' * dlls/commdlg/filedlg95.c: Francois Gouget FILEDLG95_HandleCustomDialogMessages: - for the three handled messages we must return the required buffer size - for CDM_GETFILEPATH paths like "dir\file" were handled incorrectly - fixed multiple potential buffer overflows. FILEDLG95_OnOpen: fixed a use of strncpy without '\0'. FILEDLG95_SHELL_NewFolder: the size of lpstrCaption was incorrect leading to a buffer overflow. Sat Dec 25 22:58:59 1999 Alexandre Julliard * objects/enhmetafile.c: Peter Hunnisett Added support for playing more record types (still more to come). * dlls/comctl32/listview.c: Francois Gouget Better support very long strings by avoiding to copy them in a fixed size buffer (one exception partly remains: callback strings). Raise the buffer size to 512 characters. Merge the handling of item 0 and other items together in GetItemA to reduce code duplication. * graphics/psdrv/bitmap.c: Huw D M Davies Fix PSDRV_StretchDIBits for non-integer byte src widths (1 & 4bpp). * dlls/winmm/wineoss/audio.c: Marcus Meissner Cast the unsigned int to signed, or NEAR_MATCH will not work. * misc/cdrom.c, msdos/int2f.c, include/cdrom.h: Eric Pouech Fixed first/last playable frame referencing. * include/mmsystem.h, dlls/winmm/mcicda/mcicda.c: Eric Pouech Fixed some bogus values in MCI_STATUS handling (position & length of tracks). Added support for MCI_INFO on MEDIA_UPC & MEDIA_IDENTITY commands. * windows/rect.c: Marcus Meissner Test pointers passed to copyrect for NULL. * windows/dialog.c: Dmitry Timoshkov Restore erroneously deleted lines. * dlls/comctl32/comctl32undoc.c: Huw D M Davies DPA_DeletePtr was resizing the array to a too small size. * windows/winpos.c: Huw D M Davies Avoid infinite loop in WINPOS_FindIconPos if the width of the parent client area is less than the icon spacing. * documentation/linux-fat-permissions: Steven Elliott Added a document that describes configuring FAT filesystem permissions for Wine. * scheduler/thread.c: Juergen Schmied NT allocates one page as TEB. Some native NT-dlls are using this. * graphics/x11drv/xfont.c: Dmitry Timoshkov Don't skip usable X fonts. Add support for koi8 fonts. * dlls/icmp/icmp_main.c: Francois Gouget Modified IcmpCloseHandle and IcmpSendEchoRequest so that we don't crash if the handle is INVALID_HANDLE_VALUE. * include/windef.h: Steven Elliott Changed the "this_is_a_syntax_error" error message to a more specific error message. Mon Dec 20 04:14:48 1999 Alexandre Julliard * graphics/metafiledrv/graphics.c, graphics/metafiledrv/init.c, graphics/painting.c, graphics/path.c, graphics/ttydrv/graphics.c, graphics/ttydrv/init.c, graphics/x11drv/graphics.c, graphics/x11drv/init.c, include/gdi.h, include/metafiledrv.h, include/path.h, include/ttydrv.h, include/x11drv.h: Huw D M Davies Move Bezier code out of x11drv into commmon GDI code; if any driver does not implement PolyBezier[To] the curve is approximated to lines and drawn with Polyline. Implement many GDI-Path recording functions (at least the win9x subset). Implement FlattenPath and FillPath. * dlls/dplayx/dplayx.spec: Peter Hunnisett Fixed ordinal numbering and added new spec stub. * configure, configure.in: Marcus Meissner Readded Xpm autoconf checks. * ole/ole2nls.c: Rein Klazes EnumSystemLocalesA should look for registry values, not subkeys. * dlls/wnaspi32/winaspi32.c: Marcus Meissner Small fix to get GET_DEVICE_TYPE working (verified by Dan Kegel). * dlls/comctl32/trackbar.c: Ian Schmidt Corrected background color and fixed leaking GDI brush. * misc/registry.c: Juergen Schmied NT loader: don't stop loading a hive when an error occurs. * objects/metafile.c: Huw D M Davies PlayMetaFile and EnumMetaFile should work if the hdc is a (enh)metafile DC. * README: Juergen Lock Updated the FreeBSD notes, the LDT patch finally made it into -current. * dlls/commdlg/filetitle.c: Francois Gouget If lpTitle==NULL and cbBuf==0 then we must return the required buffer size. * dlls/comctl32/comctl32.spec, dlls/comctl32/commctrl.c, include/commctrl.h: Shaun Morris Implemented _TrackMouseEvent for the TME_LEAVE flag. * graphics/ddraw.c, graphics/ddraw_private.h: Lionel Ulmer Adds resolution / depth switching with DGA 2.0. ---------------------------------------------------------------- Sun Dec 12 21:28:44 1999 Alexandre Julliard * windows/x11drv/event.c: Lionel Ulmer Fixed handling of DGA2.0 keyboard events. * dlls/msacm32/driver.c, dlls/msacm32/internal.c, dlls/msacm32/msacm32_main.c, dlls/msacm32/wineacm.h: Eric Pouech Added the ability to open several streams on the same driver. Added a few acmMetrics options. * dlls/oleaut32/ole2disp.c: Eric Pouech SysStringLen can get a NULL pointer (and shall return 0). * dlls/winmm/mmsystem.c: Eric Pouech Now using notification for detecting when a WAVEHDR has been played * dlls/winmm/mciwave/mciwave.c: Eric Pouech Enhanced synchronization between playback thread and stop/close commands Now using notification for detecting when a WAVEHDR has been played * controls/combo.c: Dmitry Timoshkov ComboBox should not send bogus messages to edit buddy and to itself. * files/dos_fs.c: Peter Ganten Fixed GetShortPathNameA. * Makefile.in, configure, configure.in: Moses DeJong Fixed missing libwine.so symlink during install. Set the runtime linker path. * windows/dialog.c: Murali Pattathe GetNextDlgGroupItem: needs to check the control parent is the main dialog. GetNextTabItem: make sure this control is visible and not disabled. * loader/module.c: Andreas Mohr Fixed cmd line length calculation. * include/x11drv.h, windows/x11drv/event.c, graphics/ddraw.c: Lionel Ulmer - added support of DGA-2.0 events - fixed the leaving of DGA-2.0 mode * controls/menu.c, include/menu.h, windows/winproc.c: Rein Klazes In win32 a WM_MENUSELECT message should contain the position when the item refers to a submenu, not the submenu's handle as in win16. * files/tape.c: Huw D M Davies Fixed arg types of FIXMEs. * windows/mdi.c: Marcus Meissner Check for passed invalid window handle in DefMDIChildProc*. * dlls/winmm/mmsystem.c: Huw D M Davies Fix no. of arguments in a WARN statement. * objects/text.c: Eric Pouech Allows DrawText(16|A|W) to get a NULL string as parameter. * scheduler/process.c, dlls/advapi32/service.c, dlls/comctl32/datetime.c, dlls/comctl32/tab.c, dlls/dplayx/dplay.c, graphics/ttydrv/objects.c: Andreas Mohr Fixed compiler warnings. * controls/listbox.c, misc/registry.c, misc/version.c: Marcus Meissner Removed 2 useless include winversion.h Do not make autodetected version fix on first calls if it is Win31. * dlls/shell32/shell32.spec: Juergen Schmied Added StrNCpyA, StrNCpyW. * windows/winproc.c: Juergen Schmied Message translation WM_CREATE fixed. Sat Dec 11 23:56:47 1999 Alexandre Julliard * relay32/builtin32.c, Makefile.in, configure, configure.in, dlls/Makefile.in, dlls/odbc32/.cvsignore, dlls/odbc32/Makefile.in, dlls/odbc32/odbc32.spec, dlls/odbc32/proxyodbc.c, dlls/odbc32/proxyodbc.h, include/debugdefs.h, include/sql.h, include/sqlext.h, include/sqltypes.h, loader/loadorder.c: Xiang Li Implementation of a proxy ODBC32 dll. * windows/x11drv/wnd.c, dlls/shell32/Makefile.in, dlls/shell32/shell32_main.c, dlls/shell32/systray.c, include/winuser.h, include/x11drv.h, windows/nonclient.c: Kai Morich Marcus Meissner Added systray support. Swallow the windows systray icons into kpanel systray if KDE/KWM is running. * documentation/wine.conf.man.in, misc/registry.c, wine.ini: Juergen Schmied Added loader for NT registry files. * dlls/ntdll/nt.c, include/ntsecapi.h, include/winnt.h, dlls/advapi32/advapi32.spec, dlls/advapi32/security.c: Juergen Schmied Stubs for LsaFreeMemory, LsaQueryInformationPolicy, LsaClose. Small fixes. * include/wingdi.h, objects/enhmetafile.c, objects/region.c, relay32/gdi32.spec: Peter Hunnisett - Implemented GetEnhMetaFilePaletteEntries - Added fixme stubs for SetMetaRgn and GetMetaRgn - Added support for playing several enhanced metafile records - Added beginnings of implementation for playing the rest of the enhanced metafile records * graphics/ttydrv/Makefile.in, graphics/ttydrv/bitmap.c, graphics/ttydrv/brush.c, graphics/ttydrv/clipping.c, graphics/ttydrv/dc.c, graphics/ttydrv/dib.c, graphics/ttydrv/font.c, graphics/ttydrv/graphics.c, graphics/ttydrv/init.c, graphics/ttydrv/objects.c, graphics/ttydrv/oembitmap.c, graphics/ttydrv/palette.c, graphics/ttydrv/pen.c, graphics/ttydrv/text.c, include/ttydrv.h, windows/ttydrv/main.c, windows/ttydrv/monitor.c, windows/ttydrv/wnd.c: Patrik Stridvall Improved the TTY driver. * files/file.c: Peter Ganten Return an error if lpOverlapped is provided to ReadFile / WriteFile. * misc/wsprintf.c: Marcus Meissner Do not confuse the 0 fill magic of wsprintf with the "0x" hex prefix. * dlls/winmm/mmsystem.c, dlls/winmm/wavemap/wavemap.c: Bradley Baetz The wavemap driver wasn't passing the callback type to the DriverCallback routine correctly. * files/tape.c: Added missing WINAPIs. * windows/syscolor.c: Marcus Meissner If we have registry entries, use them. Never mind which version we autodetected. * dlls/oleaut32/oleaut32.spec, misc/port.c, tools/bin2res.c: Patrik Stridvall Fixed some issues found by winapi_check. * tools/winapi_check/win16/display.api, tools/winapi_check/win16api.dat, tools/winapi_check/win32api.dat, tools/winapi_check/winapi.pm, tools/winapi_check/winapi_check, tools/winapi_check/winapi_local.pm, tools/winapi_check/winapi_parser.pm: Patrik Stridvall Minor fixes and additions. * loader/ne/resource.c: Ulrich Weigand Bugfix: Added missing 'return' statement. * dlls/commdlg/filedlg95.c: Juergen Schmied Small fixes. Fri Dec 10 03:47:14 1999 Alexandre Julliard * include/queue.h, windows/dialog.c, windows/message.c, windows/nonclient.c, windows/queue.c, controls/menu.c, include/message.h: Ulrich Weigand Perform 16/32A/32W message mapping for posted messages. * files/Makefile.in, files/tape.c, include/debugdefs.h, relay32/kernel32.spec: Chris Morgan James Abbatiello Added stubs for the WinNT tape backup functions. * debugger/msc.c, debugger/source.c: Ulrich Weigand Parse CodeView type/symbol info with 32-bit type indices. Added (partial) support for VC 5/6 .PDB files. Fixed treatment of source file names containing path. * server/registry.c: Ulrich Czekalla Fixed off-by-one error. * scheduler/process.c: Ulrich Weigand Bugfix: Show main window if CreateProcess was called without the STARTF_USESHOWWINDOW flag. * loader/pe_image.c: Ulrich Weigand Implemented PE_UnloadLibrary(). * include/dinput.h, windows/dinput.c: Lionel Ulmer - do not loose initial auto-repeat status when acquiring the keyboard more than one time - support of DirectX 7's DIMOUSESTATE2 structure * dlls/ntdll/nt.c, dlls/ntdll/ntdll.spec: Marcus Meissner Added NtPowerInformation stub. * dlls/ole32/bindctx.c: Gerard Patel Transfer only cbStruct size in BindCtxImpl_S(G)etOptions. Wed Dec 8 03:56:34 1999 Alexandre Julliard * windows/x11drv/event.c, windows/x11drv/keyboard.c, windows/message.c, windows/nonclient.c, windows/painting.c, windows/win.c, windows/keyboard.c, scheduler/critsection.c, scheduler/debugger.c, scheduler/process.c, win32/kernel32.c, win32/newfns.c, msdos/dosmem.c, objects/bitmap.c, objects/clipping.c, objects/font.c, ole/ole2nls.c, loader/elfdll.c, loader/module.c, loader/pe_image.c, loader/resource.c, loader/task.c, memory/instr.c, memory/local.c, misc/registry.c, graphics/bitblt.c, graphics/metafiledrv/objects.c, graphics/x11drv/dib.c, if1632/thunk.c, files/directory.c, files/dos_fs.c, files/drive.c, dlls/shell32/pidl.c, dlls/shell32/shell.c, dlls/shell32/shell32_main.c, dlls/shell32/shellole.c, dlls/tapi32/line.c, dlls/comctl32/comctl32undoc.c, dlls/comctl32/flatsb.c, dlls/ole32/storage.c, dlls/oleaut32/typelib.c, dlls/advapi32/crypt.c, dlls/advapi32/security.c, dlls/avifil32/avifile.c, controls/edit.c: Dimitrie O. Paun Make use of the DEFAULT_DEBUG_CHANNEL where appropriate. Use the default version of FIXME, ERR, WARN, TRACE for the default channel. * include/module.h, loader/module.c, scheduler/process.c: Ulrich Weigand Delay sending debug events until process initialization is complete. * documentation/status/multimedia: Eric Pouech Updated, added chapter on configuration and architecture. * dlls/winmm/mmio.c: Bradley Baetz - Fix MMIO_{Open,Rename} to check the filename (of the form file.ext+ABC) for the correct mmio procedure to use. - mmioStringToFOURCC now converts to uppercase if asked to, and handles strings of length < 4. * controls/edit.c: Dmitry Timoshkov Fix problem with EN_UPDATE notification sent by edit control. Mon Dec 6 01:20:01 1999 Alexandre Julliard * dlls/mouse/.cvsignore, dlls/mouse/Makefile.in, dlls/mouse/mouse.spec, dlls/mouse/mouse_main.c, dlls/mouse/mouserc.rc, documentation/resources, if1632/.cvsignore, if1632/Attic/display.spec, if1632/Attic/mouse.spec, if1632/Makefile.in, if1632/builtin.c, loader/ne/resource.c, windows/Attic/display.c, windows/Attic/mouse.c, windows/Makefile.in, Makefile.in, configure, configure.in, dlls/Makefile.in, dlls/display/.cvsignore, dlls/display/Makefile.in, dlls/display/disp.rc, dlls/display/display.spec, dlls/display/display_main.c: Andreas Mohr Added .rc file support for Win16 NE modules. Moved display.c and mouse.c to separate dll directories. * controls/combo.c: Dmitry Timoshkov Allow to deselect all items by sending CB_SETCURSEL(-1) to the combo. Sun Dec 5 23:54:04 1999 Alexandre Julliard * windows/painting.c, graphics/enhmetafiledrv/dc.c, graphics/enhmetafiledrv/graphics.c, graphics/enhmetafiledrv/init.c, graphics/metafiledrv/dc.c, graphics/metafiledrv/graphics.c, graphics/metafiledrv/init.c, graphics/psdrv/graphics.c, graphics/psdrv/init.c, graphics/ttydrv/graphics.c, graphics/ttydrv/init.c, graphics/win16drv/init.c, graphics/x11drv/graphics.c, graphics/x11drv/init.c, include/enhmetafiledrv.h, include/gdi.h, include/metafiledrv.h, include/path.h, include/psdrv.h, include/ttydrv.h, include/x11drv.h, graphics/painting.c, graphics/path.c: Huw D M Davies Fixes several bugs in gdi path handling. Adds *Path functions to dc funcs table + add EnhMetaFile recording. Separate out Polylne/PolylineTo and PolyBezier/PolyBezierTo in dc funcs table to enable proper enhmetafile recording. The current position update in *To functions is now handled by the main function and not in the drivers. Move USER functions from graphics/painting.c -> windows/painting.c * dlls/ole32/compobj.c, dlls/ole32/ole2.c, dlls/oleaut32/oleaut.c, dlls/oleaut32/typelib.c, dlls/oleaut32/typelib.spec, include/ole2ver.h, misc/version.c: Andreas Mohr - the OLE version returned was too low - renamed OABuildVersion16 to OaBuildVersion16 - spelling fixes * files/drive.c: Peter Ganten Fix GetCurrentDirectoryA and W to return the needed space for the CWD, if the buffer size is not large enough. * controls/button.c, windows/dialog.c: Dmitry Timoshkov Remove hack for keyboard messages in dialogs. * win32/device.c: Ian Schmidt Stubs for VMM GetDemandPageInfo function and VWin32 "Get VMCPD Version". Implementation for VWin32 Int31/DPMI dispatch call. Fixed "dangling else" compiler warning. * dlls/comctl32/listview.c: Francois Gouget Whenever we do an strncpy we should make sure we put a '\0' at the end of the buffer. * include/toolhelp.h, misc/toolhelp.c, relay32/kernel32.spec: Andreas Mohr Added Thread32First/Next stubs. * include/thread.h: Eric Pouech Moved wineserver's buffer & buffer_size at the end of TEB so that IE doesn't overwrite them. * dlls/winmm/mciwave/mciwave.c: Eric Pouech Fixed mciInfo. * dlls/winmm/wavemap/wavemap.c: Eric Pouech Added support for WAVE_FORMAT_QUERY flag in wodOpen. * dlls/msacm32/stream.c: Eric Pouech Correctly implement ACM_STREAMOPENF_QUERY flag in acmOpenStream. * dlls/winmm/mci.c: Eric Pouech Fixed MCI_OPEN command for types like "CDAUDIO!H:". * graphics/ddraw_private.h, graphics/ddraw.c: Marcus Meissner Merged _all_ lpClipper into common_surface. Add NULL ptr check to SetClipper. Some more debug output. * include/config.h.in, misc/port.c, configure, configure.in: Marcus Meissner Use the real glibc openpty if present. * loader/ne/segment.c: Eric Pouech Added typedef to insure compilation on all gcc&egcs versions. * misc/registry.c: Marcus Meissner Fixed _copy_registry(). * include/winnls.h, ole/nls/esa.nls, ole/nls/esc.nls, ole/nls/esd.nls, ole/nls/esg.nls, ole/nls/esm.nls, ole/nls/esn.nls, ole/nls/esp.nls: Juergen Schmied Added some constants for Spanish. * include/module.h, loader/ne/module.c, loader/ne/segment.c: Ulrich Weigand Bugfix: Call DllEntryPoint for *every* process that loads the DLL, not just for the first one. Bypass 32->16->32 transition when calling DllEntryPoint of built-in. * if1632/user.spec, windows/user.c: Ulrich Weigand Added USER.DllEntryPoint(). * if1632/thunk.c, include/process.h, loader/task.c, scheduler/process.c, scheduler/thread.c: Ulrich Weigand Call 16-bit instead of 32-bit UserSignalProc entry point. Don't load USER32.DLL unless requested by the program. Bugfix: Pass the correct thread ID to UserSignalProc. * loader/pe_image.c: Eric Pouech Fixed crash when map fails. * controls/combo.c: Dmitry Timoshkov Show use of undocumented messages. * include/keyboard.h, include/ttydrv.h, include/x11drv.h, windows/dinput.c, windows/ttydrv/init.c, windows/ttydrv/keyboard.c, windows/x11drv/init.c, windows/x11drv/keyboard.c: Lionel Ulmer - removed keyboard auto-repeat when DInput acquires it - removed some (now) obsolete fixme's * graphics/ddraw_private.h, graphics/ddraw.c: Marcus Meissner Moved lpClipper into common_directdrawsurface struct Release old clipper on new set * dlls/winmm/wineoss/midi.c, include/mmsystem.h: Eric Pouech Fake MIDI_IO_STATUS support in midi in open Fixed bug in midi in while reading data * dlls/winmm/wineoss/audio.c: Eric Pouech Fixed infinite loop for 0-length wavehdrs. * dlls/winmm/mciwave/mciwave.c: Eric Pouech Fixed buggy playback for non PCM files Added support for from & to indexes for playback Now using double wavehdr for better output Cleaned-up internal structs and removed last 16 bit API adherence * dlls/winmm/mmsystem.c: Eric Pouech Tried to reduce echo in playSound API (using two wavehdr instead of one). * dlls/winmm/lolvldrv.c: Eric Pouech Added callback mechanisms for MIDI IN. * dlls/msacm32/stream.c, dlls/msacm32/wineacm.h: Eric Pouech Fixed improper acm streams closing. * dlls/msacm32/driver.c: Eric Pouech Debug traces cosmetic fixes. * DEVELOPERS-HINTS: Eric Pouech Fixed some errors (thanks to F Gouget for reporting them). Added some bits on thunking and resources for DLLs. Sat Dec 4 04:22:04 1999 Alexandre Julliard * graphics/ddraw.c, graphics/ddraw_private.h, include/ts_xlib.h, tsx11/X11_calls, tsx11/ts_xlib.c: Lionel Ulmer First support of DGA 2.0 for DirectDraw. * include/winuser.h, relay32/user32.spec, win32/newfns.c: Erez Volk Stubs for Get/SetProcessDefaultLayout. * files/profile.c, relay32/kernel32.spec: Marcus Meissner Stub for CloseProfileUserMapping. * windows/dinput.c: Lionel Ulmer Use DInput's internal mouse event handler to handle the GetDeviceState function. * dlls/winmm/mmsystem.c: Peter Ganten waveHdr.lpData was eventually HeapFree()ed uninitialized. * loader/module.c: Sergei Turchanov Fix for GetBinaryType to return SCS_DOS_BINARY if extended signature is unknown. * loader/dos/module.c, loader/ne/module.c, relay32/builtin32.c, scheduler/process.c, include/dosexe.h, include/elfdll.h, include/module.h, include/pe_image.h, loader/elf.c, loader/elfdll.c, loader/main.c, loader/module.c, loader/pe_image.c: Ulrich Weigand Fixed 32-bit module name handling to conform better to Win9x. Removed OFSTRUCT passing during process creation sequence. Bugfix: don't set exe_modref when LOAD_LIBRARY_AS_DATAFILE is set. * dlls/advapi32/service.c, include/winsvc.h, dlls/advapi32/advapi32.spec: Michael McCormack Added code to some service functions (some untested), fixed declaration of service main function. * dlls/commdlg/filedlg95.c, dlls/commdlg/filedlgbrowser.h: Pierre Mageau Murali Pattathe Francois Boisvert Francis Baudet Henning Hoffmann Many fixes. * dlls/comctl32/comctl32.spec, dlls/comctl32/comctl32undoc.c: Huw D M Davies Added stubs for several MRU list functions and documented some others. * server/file.c: Marcus Meissner Flush handle in any access mode. * dlls/comctl32/header.c: Huw D M Davies Fixes off by one error in item insertion. * dlls/winmm/wineoss/audio.c: Marcus Meissner Allow 1% deviation from specified sampling rate for some soundcards. * include/d3d.h: Lionel Ulmer Suppressed the inclusion of OpenGL headers. * objects/enhmetafile.c: Peter Hunnisett - Added stub for conversion from meta to enhance meta files. - Implemented GetEnhMetaFileBits for enhanced meta files. * graphics/ddraw.c, graphics/ddraw_private.h: Peter Hunnisett Improved stubs for the ddraw clipper routines. Mon Nov 29 02:48:43 1999 Alexandre Julliard * win32/time.c: Made GetSystemTimeAsFileTime return value more precise. * server/event.c, server/file.c: Fixed get_event_obj/get_file_obj to use the process parameter (thanks to Eric Pouech). * server/process.h, scheduler/process.c, server/process.c: Fixed DEBUG_ONLY_THIS_PROCESS again (thanks to Ulrich Weigand). * scheduler/timer.c, server/Makefile.in, server/request.h, server/timer.c, server/trace.c, dlls/ntdll/nt.c, include/server.h, include/winbase.h, relay32/kernel32.spec, scheduler/Makefile.in: Implemented waitable timers. Sun Nov 28 21:03:46 1999 Alexandre Julliard * tools/bin2res.c: Bug fixes. * dlls/comctl32/comctl32.h, dlls/comctl32/propsheet.c, dlls/comctl32/rsrc.rc, include/prsht.h: Serge Ivanov Pierre Mageau Thy Nguyen Don Kelly Noomen Hamza Lots of bug fixes and new features in property sheets. * win32/newfns.c, windows/x11drv/clipboard.c, windows/x11drv/event.c, dlls/dplayx/dplobby.c, dlls/shell32/shlview.c, graphics/psdrv/font.c, dlls/comctl32/tab.c: Niels Kristian Bech Jensen Compiler warnings fixed. * graphics/x11drv/xfont.c: Bradley Baetz Give the app back the exact font name it asked for. * dlls/comctl32/toolbar.c: Dave Pickles Prevent a crash if messages are sent to a toolbar window before WM_NCCREATE or after WM_DESTROY. * dlls/winmm/winmm_Es.rc: Julio Cesar Gazquez Updated Spanish MM error string translation. * dlls/comctl32/comctl32.h, dlls/comctl32/rsrc.rc, dlls/comctl32/treeview.c, include/commctrl.h, include/treeview.h: Alex Priem - (final?) update of TreeView_* macro's. - implementation of TVM_SETINSERTMARK & TVM_SETINSERTMARKCOLOR - fixed some typo's - custom draw enhancements - implementation of state images - implementation of TVS_CHECKBOXES * dlls/comctl32/toolbar.c: Eric Kohl Fixed some visual toolbar bugs. * README: Juergen Lock Added notes about Wine-related FreeBSD kernel patches. * dlls/winspool/info.c: Huw D M Davies Use RegQueryInfoKey to count number of printers. * server/unicode.h: Juergen Lock Don't try to call towupper() when there's no wctype.h. * controls/combo.c: Dmitry Timoshkov When combobox selection changes, update its edit box accordingly. * controls/listbox.c: Dmitry Timoshkov Notify parent of listbox if requested. Thu Nov 25 23:42:54 1999 Alexandre Julliard * server/ptrace.c: More portability fixes (thanks to Juergen Lock). * dlls/ntdll/signal_i386.c: Juergen Lock Set/use fs/gs from the sigcontext struct, the corresponding kernel change now finally has been MFC'd to -stable. * documentation/fonts: Juergen Lock Mention free Truetype font servers (Xfstt and xfsft). * winedefault.reg: Juergen Lock Note what to do with the winedefault.reg in the file. * win32/device.c: Peter Ganten Implemented parts of _PageReserve() _PageCommit() _PageDecommit() _PageChangePermissions() and _PageFree() using the Virtual*()-Functions (with the great help of Ulrich Weigand). * memory/atom.c: Juergen Schmied Removed fixme. * misc/registry.c: Several bug fixes in save_key(). * dlls/advapi32/registry.c: Eric Pouech Fixed some bogus error detection for RegEnumValue[AW] and RegQueryValueEx[AW]. * dlls/dplayx/dplay.c, dlls/dplayx/dplayx_global.c, dlls/dplayx/dplayx_global.h, dlls/dplayx/dplobby.c: Peter Hunnisett - Added global data mutual exclusion - Removed hack for creating processes suspended now that it's implemented - Fixed ordinal numbering and added spec stubs - Fixed EnumConnections callback to fill in all parameters with valid data - Made direct play allocation/deallocation follow the same pattern as direct play lobby * dlls/win87em/emulate.c: Andreas Mohr Several improvements. * ole/ole2nls.c: Eric Pouech Removed invalid LCMapString fixme for NORM_IGNOREKANATYPE case. * include/comm.h, misc/comm.c: Ove Kaaven Made win16 serial comms less of a CPU hog. * include/server.h, memory/virtual.c, scheduler/event.c, scheduler/mutex.c, scheduler/semaphore.c, server/Makefile.in, server/event.c, server/handle.c, server/handle.h, server/mapping.c, server/mutex.c, server/object.c, server/object.h, server/registry.c, server/semaphore.c, server/trace.c, server/unicode.c, server/unicode.h: Store all object names as Unicode in the server. Wed Nov 24 19:34:32 1999 Alexandre Julliard * include/server.h, misc/registry.c, server/registry.c, server/trace.c, wine.ini: Added wine.conf option for new format registry files. Added optional periodic saving of the registry. * misc/registry.c, server/registry.c: Added support to the server for loading new format (version 2) files. * misc/registry.c: Bug fixes (thanks to Juergen Schmied). * include/process.h, include/server.h, scheduler/debugger.c, dlls/ntdll/exception.c: Added current context to the exception debug event sent to the server. * server/debugger.c, server/process.c, server/process.h, server/thread.c, server/thread.h: Fixed handling of debug events on thread/process exit. * debugger/dbg.y, include/winbase.h, scheduler/critsection.c: Raise an exception when a critical section wait failed. Tue Nov 23 23:43:29 1999 Alexandre Julliard * graphics/ttydrv/Makefile.in, graphics/ttydrv/bitblt.c, graphics/ttydrv/bitmap.c, graphics/ttydrv/brush.c, graphics/ttydrv/clipping.c, graphics/ttydrv/font.c, graphics/ttydrv/graphics.c, graphics/ttydrv/init.c, graphics/ttydrv/objects.c, graphics/ttydrv/oembitmap.c, graphics/ttydrv/palette.c, graphics/ttydrv/pen.c, graphics/ttydrv/text.c, include/ttydrv.h, windows/ttydrv/desktop.c, windows/ttydrv/main.c, windows/ttydrv/monitor.c, windows/ttydrv/wnd.c: Patrik Stridvall Improved the stubs. * dlls/comctl32/imagelist.c, include/imagelist.h: Eric Kohl - first 'dummy' implementation of ImageList_Read * include/rebar.h, dlls/comctl32/rebar.c: Eric Kohl - added version messages * dlls/comctl32/draglist.c: Eric Kohl - implemented LBItemFromPt * include/commctrl.h, dlls/comctl32/listview.c: Eric Kohl - implemented simple column order array functionality - implemented some virtual listview notifications * dlls/comctl32/comctl32.spec, dlls/comctl32/comctl32undoc.c: Eric Kohl - minor update to mru list functions - stubs for COMCTL32_411 to COMCTL32_413 * dlls/comctl32/toolbar.c, include/toolbar.h: Eric Kohl - added version messages and some simple get/set messages. - added unicode messages * include/shlguid.h, dlls/shell32/classes.c, dlls/shell32/iconcache.c, dlls/shell32/pidl.c, dlls/shell32/pidl.h, dlls/shell32/shellole.c, dlls/shell32/shellord.c, dlls/shell32/shellpath.c, dlls/shell32/shlfolder.c, dlls/shell32/shlview.c: Juergen Schmied - made IShellFolder a aggregable object - SHCoCreateInstance can create CSIDL_FSFolder now - browsing into folders on the desktop implemented - corrected returnvalue of Ico_ExtractIconEx - fixed SHGetDataFromIDList to return data of simple pidls * relay32/wsock32.spec, if1632/winsock.spec, include/winsock.h, misc/winsock.c: Moses DeJong Added implementation for WSARecvEx function. This is a Microsoft specific extension to the winsock API. * dlls/mpr/mpr.spec, dlls/mpr/pwcache.c, include/winnetwk.h: Juergen Schmied Corrected wrong parameter counts for WNetCachePassword and WNetEnumCachedPasswords. * dlls/shell32/shell32.spec, dlls/shell32/shell32_main.c: Ian Schmidt Added stub for DllInstall(). * misc/registry.c, include/wine/winbase16.h, include/winnt.h, include/winreg.h, dlls/advapi32/Makefile.in, dlls/advapi32/registry.c, dlls/shell32/shell.spec, if1632/kernel.spec: Changed to use new server-side registry support. * include/server.h, server/Makefile.in, server/main.c, server/object.c, server/object.h, server/registry.c, server/request.h, server/trace.c, server/unicode.h: Added registry support to the server. * tools/make_requests: Differentiate tracing functions between request and reply. Added possibility to have dumping functions for specific types. Sun Nov 21 21:02:06 1999 Alexandre Julliard * include/server.h, scheduler/client.c: Added server_call_noerr function that avoids touching the last error. * include/winerror.h: Added a few registry error codes. * graphics/x11drv/xfont.c, objects/font.c: Ulrich Weigand Removed some unaligned accesses. * dlls/commdlg/filedlg95.c: Juergen Schmied - the fodInfos were used before initialized - lpTemplateName can be a resource id - if lpTemplateName is a string don't free the original one * win32/console.c, win32/kernel32.c, windows/x11drv/main.c, loader/ne/convert.c, loader/ne/module.c, misc/cpu.c, msdos/ioports.c, ole/guid.c, programs/notepad/main.c, scheduler/critsection.c, scheduler/process.c, server/socket.c, tools/wrc/newstruc.c, dlls/winmm/mci.c, graphics/ddraw.c, graphics/x11drv/graphics.c, loader/loadorder.c, loader/main.c, loader/task.c, debugger/dbgmain.c, debugger/editline.c, debugger/source.c, debugger/stabs.c, debugger/types.c, dlls/icmp/icmp_main.c, dlls/ntdll/sec.c, dlls/ntdll/signal_i386.c, dlls/wing/wing_main.c: Niels Kristian Bech Jensen Removed extra #include statements. * files/file.c: Fixed MoveFileExA behavior when target file does not exist. * dlls/commdlg/cdlg_Pt.rc, programs/winhelp/.cvsignore, programs/winhelp/Makefile.in, programs/winhelp/Pt.rc: Gustavo Junior Alves Added Portuguese language support. * dlls/comctl32/monthcal.c, include/monthcal.h: Chris Morgan James Abbatiello Implemented current day circling. Fixed many bugs in the month calender control including control spacing and alignment. Fixed defines monthcal.h. Optimized control drawing and removed many extranious redraws. Improved control behavior. Fixed inconsistent formatting in both .c and .h files. * files/profile.c: Andreas Mohr Flush current profile before using a newly opened one. * memory/selector.c: Ulrich Weigand Bugfix: GetThreadSelectorEntry() sets read-write flag incorrectly. * include/wine/wingdi16.h, objects/font.c, if1632/gdi.spec: Huw D M Davies Stub for GetFontData16. * windows/Attic/display.c, if1632/Attic/display.spec: Andreas Mohr Added some ordinals and GetDriverResourceID(). * server/process.c, server/ptrace.c: Portability fixes. * scheduler/process.c: Fixed meaning of DEBUG_ONLY_THIS_PROCESS flag. * tools/bin2res.c: Peter Hunnisett Fixed compile error. * dlls/advapi32/service.c: Peter Schlaile Implemented StartServiceCtrlDispatcherA according to DispatcherW. * Makefile.in: Make sure we clean dlls/ too. * dlls/advapi32/service.c: Michael McCormack Implemented OpenSCManagerW, CloseServiceHandle, OpenServiceW, and some of QueryServiceStatus. * tools/wrc/parser.y: Eric Pouech Added missing ';'. * tools/wrc/parser.l: Eric Pouech Error reporting fix. * tools/bug_report.pl: Andreas Mohr Changed default relay line number from 100 to 200. * dlls/comctl32/toolbar.c, include/commctrl.h: Eric Pouech Added undocumented feature to InsertButtonA. Added dropdown button support. * dlls/comctl32/animate.c: Eric Pouech Fixed play back of uncompressed AVI file. Fixed exiting conditions. * graphics/ddraw.c: Eric Pouech Fixed a crash in IDirectDrawSurface:BltFast. * dlls/winmm/lolvldrv.c, dlls/winmm/midimap/midimap.c, dlls/winmm/wavemap/wavemap.c: Eric Pouech Fixed forwarding and handling messages directed to the mappers. * loader/ne/module.c, loader/ne/segment.c, include/module.h: Ulrich Weigand Simplified hInstance creation/handling. Fixes problems with self-loaders creating DGROUP themselves. * include/wingdi.h, objects/dc.c, relay32/gdi32.spec: Huw D M Davies Add stubs for Get/SetLayout(). * dlls/ole32/ole32.spec, dlls/ole32/storage32.c: Jim Aston Added stub for StgSetTimes. * dlls/shell32/shlmenu.c: Andreas Mohr SHFind_InitMenuPopup is supposed to return a pointer. * dlls/icmp/icmp_main.c: Ulrich Weigand u_int[16|32]_t might not be defined. * dlls/comctl32/treeview.c: Alex Priem - fixed crash when adding items with TVI_SORT and wineItem->pszText is set to LPSTR_TEXTCALLBACK. - ditto for TREEVIEW_DeleteItem, TREEVIEW_CreateDragImage. ---------------------------------------------------------------- Mon Nov 15 00:46:30 1999 Alexandre Julliard * memory/virtual.c: Fixed allocation rounding for MEM_RESERVE. * server/file.c: Eric Pouech Fixed hash function. Sun Nov 14 23:59:01 1999 Alexandre Julliard * dlls/winmm/mmio.c: Eric Pouech The adwInfo[0] field was no longer used on mmioOpen (may contain file handle). * dlls/ole32/ole2stubs.c, dlls/ole32/ole32.spec: Eric Pouech Added stubs for SetErrorInfo, PropVariantClear, PropVariantCopy, FreePropVariantArray. * dlls/dsound/dsound_main.c: Eric Pouech Removed suicide code when playback thread's father dies. * dlls/shell32/pidl.c, dlls/shell32/shell32_De.rc, dlls/shell32/shell32_En.rc, dlls/shell32/shell32_main.h, dlls/shell32/shellole.c, dlls/shell32/shlfolder.c, dlls/shell32/shlview.c, dlls/shell32/shres.rc, dlls/shell32/shresdef.h: Juergen Schmied - the colums in the shellview are now created depending on the attributes of the folder object shown - get all attributes from the shellfolder instead directly from the idlist - header fields localized (only engl. and german till now) - small fixes * dlls/commdlg/cdlg_En.rc, dlls/commdlg/filedlg95.c: Juergen Schmied - corrected control positions - use the icons from comctl32 for the buttons * relay32/kernel32.spec, relay32/relay386.c, relay32/snoop.c: Ulrich Weigand Bugfix: relay/snoop debugging was broken by last patch ... * server/Makefile.in, server/process.c, server/ptrace.c, server/thread.c, server/thread.h: Moved ptrace support to ptrace.c. Tried to improve portability. * server/debugger.c: Bug fixes. * if1632/relay.c: Ulrich Weigand Fixed some unresolved externals on non-Intel archs. * relay32/snoop.c: Rein Klazes Added missing WINAPI attribute to two forward declarations. * dlls/icmp/icmp_main.c: Francois Gouget Removed leftover #undefs. * dlls/winmm/mcicda/mcicda.c: Uwe Bonnes Ignore MCI_OPEN_ELEMENT in CDAUDIO_mciOpen. * dlls/crtdll/wcstring.c: Marcus Meissner Work around glibc bug, that does not handle latin-1 umlauts. Sat Nov 13 23:54:05 1999 Alexandre Julliard * loader/ne/module.c, memory/selector.c, relay32/kernel32.spec, relay32/relay386.c, relay32/snoop.c, win32/device.c, win32/kernel32.c, win32/ordinals.c, dlls/ntdll/exception.c, dlls/ntdll/ntdll.spec, dlls/ntdll/rtl.c, dlls/ntdll/signal_i386.c, dlls/ntdll/signal_sparc.c, if1632/kernel.spec, include/ntddk.h, include/wine/exception.h, loader/dos/dosvm.c: Ulrich Weigand Adapted to new register function handling. * tools/build.c, include/stackframe.h, include/winnt.h: Ulrich Weigand Modified Win32 register function handling. * configure, configure.in, dlls/icmp/icmp_main.c, dlls/icmp/ip.h, dlls/icmp/ip_icmp.h, include/config.h.in: Francois Gouget Use BSD headers for ICMP portability. * dlls/comctl32/rsrc.rc, dlls/commdlg/cdlg_xx.rc, dlls/shell32/shres.rc: Juergen Schmied - inserted markers for the bin2res tool - reformated hexdump in shres.rc * documentation/resources, tools/.cvsignore, tools/Makefile.in, tools/bin2res.c: Juergen Schmied New tool to convert the binary resources in *.rc files (hexdumps) from and to a binary. * include/wine/port.h, misc/port.c, misc/winsock.c, misc/winsock_async.c, scheduler/sysdeps.c, configure, configure.in, files/drive.c, include/config.h.in: Patrik Stridvall Added better missing function emulation. * include/debugger.h, debugger/break.c, debugger/db_disasm.c, debugger/dbg.y, debugger/expr.c, debugger/hash.c, debugger/memory.c, debugger/registers.c, debugger/source.c, debugger/stack.c: Ulrich Weigand Made debugger compile and marginally work on non-Intel archs. * dlls/ntdll/exception.c, include/winnt.h: Ulrich Weigand Moved GET_IP macro to winnt.h * documentation/printing, documentation/psdriver, documentation/psdrv.reg, graphics/psdrv/README: Huw D M Davies Move PostScript driver docs to documentation/ . Add instructions on how to use regapi to get information into the registry. Supply sample input to regapi. * dlls/commdlg/cdlg_En.rc, dlls/commdlg/printdlg.c: Klaas van Gend Implemented the PrintSetup dialog box for the PrintDlgA. * dlls/comctl32/propsheet.c: Adrian Thurston Added validations for page index before using it. * dlls/commdlg/filedlg95.c: Adrian Thurston - fixed the index of the item chosen in the filter combo box - added support for the OFN_OVERWRITEPROMPT flag - fixed positioning of controls in the user-defined templates * include/server.h, scheduler/process.c, server/process.c, server/request.h, server/trace.c: Added support for WriteProcessMemory through the server. * server/mapping.c, server/object.h: Added get_page_size function. Fri Nov 12 21:39:15 1999 Alexandre Julliard * server/file.c, server/process.c, server/request.h, server/thread.c, server/thread.h, server/trace.c, include/server.h, scheduler/process.c: Added support for ReadProcessMemory through the server. * include/server.h, loader/module.c, scheduler/process.c, server/process.c, server/process.h, server/request.h, server/thread.c, server/trace.c: Added support for CREATE_SUSPENDED flag in CreateProcess. * win32/device.c: Ian Schmidt Implemented VWin32 VxDCall mechanism and 2 calls. * dlls/winmm/joystick.c: Fixed joystick scaling. * dlls/commdlg/cdlg_Ca.rc, dlls/commdlg/cdlg_Cs.rc, dlls/commdlg/cdlg_Da.rc, dlls/commdlg/cdlg_De.rc, dlls/commdlg/cdlg_Eo.rc, dlls/commdlg/cdlg_Es.rc, dlls/commdlg/cdlg_Fi.rc, dlls/commdlg/cdlg_Hu.rc, dlls/commdlg/cdlg_It.rc, dlls/commdlg/cdlg_Ko.rc, dlls/commdlg/cdlg_Nl.rc, dlls/commdlg/cdlg_No.rc, dlls/commdlg/cdlg_Pl.rc, dlls/commdlg/cdlg_Pt.rc, dlls/commdlg/cdlg_Ru.rc, dlls/commdlg/cdlg_Sv.rc, dlls/commdlg/cdlg_Wa.rc, dlls/shell32/shell32_Ca.rc, dlls/shell32/shell32_Cs.rc, dlls/shell32/shell32_Da.rc, dlls/shell32/shell32_De.rc, dlls/shell32/shell32_En.rc, dlls/shell32/shell32_Es.rc, dlls/shell32/shell32_Fi.rc, dlls/shell32/shell32_Hu.rc, dlls/shell32/shell32_It.rc, dlls/shell32/shell32_Nl.rc, dlls/shell32/shell32_No.rc, dlls/shell32/shell32_Pl.rc, dlls/shell32/shell32_Pt.rc, dlls/shell32/shell32_Ru.rc, dlls/shell32/shell32_Sv.rc, dlls/shell32/shell32_Wa.rc: Gustavo Junior Alves Use constants IDOK and IDCANCEL in .rc files. * server/thread.c: Gerald Pfeifer Portability fix: renamed PTRACE_* into PT_*. * relay32/kernel32.spec, win32/device.c: Ulrich Weigand Allow for buggy apps that call the wrong VxDCall routine. * dlls/rasapi32/rasapi.c: Gerard Patel Complete stub for RasEnumEntries by saying we have 0 entries. * include/debugstr.h, misc/debugstr.c: Jeremy White Add debugstr_hex_dump to allow display hex dumps of data in any debugging message. * server/thread.c: Added use_ptrace flag to disable ptrace usage. Should eventually be made into an option. * dlls/commdlg/cdlg.h, dlls/commdlg/filedlg95.c, dlls/commdlg/filedlgbrowser.c, dlls/commdlg/filedlgbrowser.h, dlls/commdlg/rsrc.rc, dlls/shell32/shlview.c, include/dlgs.h, include/wine/obj_shellview.h: Juergen Schmied Made the buttons in the filedlg change when selecting a different view type by the context menu, cleanup. * dlls/winmm/winmm_Es.rc, dlls/winmm/winmm_res.rc: Julio Cesar Gazquez Added Spanish (pure Castillan) MM error string translation. * dlls/ntdll/Makefile.in, dlls/ntdll/signal_sparc.c: Ulrich Weigand Added signal handling for SPARC / Solaris. * programs/regapi/regapi.c: Huw D M Davies Comment out explicit call to SHELL_SaveRegistry since winelib programs now exit properly. Change several NULLs to '\0's. Fix some spelling. * windows/x11drv/event.c: Ove Kaaven Fixed XShm completion event leak. * dlls/winmm/mmsystem.c: Eric Pouech Fixed recursion count while calling midiStream(Pause|Restart). * misc/registry.c: Huw D M Davies Fix save_check_tainted to properly scan the tree so that all tainted branches get saved. * dlls/crtdll/crtdll.spec, dlls/crtdll/crtdll_main.c: Bernd Paysan Added a stub for setjmp. Wed Nov 10 20:25:19 1999 Alexandre Julliard * server/thread.c: Don't crash when we get a SIGCHLD for a removed thread. * dlls/icmp/icmp_main.c: Patrik Stridvall Solaris compile fixes. * dlls/ntdll/exception.c, include/winnt.h: Ulrich Weigand (Preliminary) CONTEXT structure for SPARC added. * include/process.h, loader/module.c, scheduler/debugger.c: Ulrich Weigand Bugfix: LOAD_DLL_DEBUG_EVENT lpImageName parameter was incorrect. * memory/virtual.c: Ulrich Weigand When decommitting, remap zero pages using MAP_FIXED. * dlls/ole32/compobj.c: Rein Klazes CoGetClassObject should complain about not being able to do out-of-process servers *only* if the application doesn't include the in-process options. * misc/version.c, controls/edit.c, include/winversion.h: Rein Klazes Send WM_CTLCOLOREDIT not WM_CTLCOLORSTATIC messages to parent of a disabled edit control if the application expects a windows version before WIN95 and NT40. * include/winbase.h, relay32/kernel32.spec, files/file.c: Moshe Vainer Stub for GetOverlappedResult. * relay32/builtin32.c, tools/build.c, include/module.h, include/pe_image.h, loader/dos/module.c, loader/main.c, loader/module.c, loader/ne/module.c, loader/pe_image.c: Ulrich Weigand Determine expected_version of PE buddies from the SubsystemVersion. * dlls/ntdll/exception.c, include/wine/exception.h, include/winnt.h, win32/except.c: Ulrich Weigand Bugfix: Exception handlers are *not* WINAPI. Mon Nov 8 05:31:47 1999 Alexandre Julliard * server/process.c, server/select.c, server/thread.c, server/thread.h: Preliminary ptrace support. * memory/virtual.c: Remap zero-pages when decomitting a page range (based on a patch by Gerard Patel). * Makefile.in, scheduler/Makefile.in, scheduler/client.c, server/main.c: Install the wine server in $(bindir) and exec it from there. Sun Nov 7 23:59:08 1999 Alexandre Julliard * server/debugger.c: Do not free the handles once they have been sent to the client (thanks to Jeremy White). * windows/msgbox.c: Eric Pouech Fixed crash when asked to use strings identified by resource id instead of pointer. * windows/dce.c: Jim Aston When window class has CS_CLASSDC style we should not remove the DC when destroying the window. * dlls/rasapi32/rasapi32.spec, dlls/win32s/w32skrnl.c: Patrik Stridvall Minor fixes. * tools/winapi_check/nativeapi.pm, tools/winapi_check/output.pm, tools/winapi_check/win32api.dat, tools/winapi_check/winapi_check, tools/winapi_check/winapi_options.pm: Patrik Stridvall Minor fixes and reorganizations. * dlls/shell32/if_macros.h, include/bit_array.h, include/ntdll.h, include/oleobj.h: Patrik Stridvall Removed obsolete files no longer in use. * tsx11/X11_calls, tsx11/ts_xlib.c, windows/x11drv/event.c, graphics/ddraw.c, graphics/ddraw_private.h, include/ts_xlib.h, include/x11drv.h: Ove Kaaven DirectX-XShm now waits for the X server to finish the previous frame before sending another frame down its pipe, avoiding the X server overload and resulting slowness that used to be. * dlls/comctl32/toolbar.c, dlls/commdlg/cdlg_En.rc, dlls/commdlg/cdlg_xx.rc, dlls/commdlg/filedlg95.c, dlls/commdlg/filedlgbrowser.h, include/dlgs.h: Juergen Schmied - unified templates for the open and the save dlg - replaced buttons with a toolbar * dlls/shell32/shlfolder.c, dlls/shell32/shlview.c, include/wine/obj_shellfolder.h: Juergen Schmied - new interface declaration for IShellfolder2 - added this interface to all shell folders - small fixes to shellview (crash with native comdlg32) * loader/pe_image.c: Marcus Meissner Fixed the relocation hack in PE_InitTls. Added some more for the other pointerfields in the TLS entry. (With testing help from Jussi Jumppanen ). * relay32/user32.spec, windows/user.c, include/winuser.h: Marcus Meissner Added ChangeDisplaySettingsExA stub and some flag defines. * include/console.h: Robert 'Admiral' Coeyman Added the hex triplets to the console color definitions. * windows/ttydrv/event.c, windows/ttydrv/init.c, windows/ttydrv/mouse.c, windows/x11drv/event.c, windows/x11drv/init.c, windows/x11drv/mouse.c, include/input.h, include/message.h, include/mouse.h, include/ttydrv.h, include/x11drv.h, objects/cursoricon.c, windows/dinput.c, windows/event.c, windows/input.c, windows/mouse.c, windows/winpos.c: Lionel Ulmer Added the possibility to have mouse movements reported relative to Wine's mouse driver. * Makefile.in, configure, configure.in, dlls/Makefile.in, dlls/icmp/.cvsignore, dlls/icmp/Makefile.in, dlls/icmp/icmp.spec, dlls/icmp/icmp_main.c, include/debugdefs.h, include/wine/icmpapi.h, include/wine/ipexport.h, loader/loadorder.c, relay32/builtin32.c, wine.ini: Francois Gouget Added ICMP DLL implementation. * tools/wrc/dumpres.c, tools/wrc/genres.c, tools/wrc/newstruc.c, tools/wrc/newstruc.h, tools/wrc/parser.y, tools/wrc/wrc.h, tools/wrc/wrctypes.h, tools/wrc/CHANGES: Juergen.Schmied@debitel.net - Bugfix: Styles were evaluated as expressions. The NOT in combination with style flags was not overwriting the default styles like WS_VISIBLE. Solved by introducing own rules for parsing styles. * controls/combo.c: Jim Aston Fixed the height of the ComboBox drop list. * windows/dialog.c: David Grant Windows sends WM_GETDLGCODE only in response to keyboard messages (WM_KEYDOWN, WM_CHAR, WM_SYSCHAR). * include/wine/obj_base.h: Peter Hunnisett - Added missing __attribute__ ((com_interface)) for IUnknown with. ICOM_USE_COM_INTERFACE_ATTRIBUTE - Small addition to comments surrounding ICOM_USE_COM_INTERFACE_ATTRIBUTE "option". * ole/ole2nls.c, if1632/ole2nls.spec: Andreas Mohr Implementation of RegisterNLSInfoChanged. * scheduler/critsection.c, windows/queue.c, memory/heap.c: James Abbatiello Addresses issues with multiple processes accessing non-global critical sections. * server/sock.c: Jeremy White Fixed bug in WINSOCK_accept when no event is present. * dlls/rasapi32/rasapi.c, include/lmcons.h, include/ras.h: Rein Klazes Added stubs for RasEnumEntriesA and RasGetEntryDialParamsA. * dlls/commdlg/filedlg95.c, dlls/commdlg/filedlgbrowser.c, dlls/commdlg/filedlgbrowser.h: Ulrich Czekalla Implementation of custom dialog messages and notifications. * dlls/comctl32/treeview.c: David Grant - Proper initialization of cchTextMax field was added for TVN_GETDISPINFO notification message. - TVM_SETITEM should update 'mask' field to synchronize it with current item state. * graphics/psdrv/ppd.c: Huw D M Davies If PageSize/InputSlot entry doesn't contain an options translation string use the option name instead. * dlls/comctl32/propsheet.c: Eric Pouech Fixed SetTitleA when string resources were to be loaded. * dlls/comctl32/listview.c: Pierre Mageau - Fixed an error for scrolling in Listview (sometimes a column would not be visible) due to my last checkin. - Fixed an error for the header control when the Listview is resized with WM_SIZE - Fixed the scrolling for small and large icon (this broke because of the use of SB_PAGE in scrollInfo) - Added a patch made by Noomen Hamza to update the item width when adding a new item * server/sock.c: Ove Kaaven Handle socket creation errors. * controls/menu.c: Karl Lessard When a popupmenu is currently active on the screen, it shouldn't remove mouse click messages that don't belong to it from the queue. * windows/x11drv/clipboard.c: Juergen Lock Exec `wineclipsrv' not `wineclipsvr', and don't inherit wine's X sockets to it (otherwise windows stay around when wine hangs). Thu Nov 4 02:51:24 1999 Alexandre Julliard * loader/main.c: Fixed -debugmsg +server. * scheduler/handle.c: Added special handling for the stdio handles in CloseHandle. * server/handle.c: Made all handles multiple of 4. Fixed semantics for pseudo-handles. * server/debugger.c: Free the handles of the event structure in the right process (thanks to Jeremy White). * dlls/dplayx/Makefile.in, dlls/dplayx/dplay.c, dlls/dplayx/dplayx.spec, dlls/dplayx/dplayx_global.c, dlls/dplayx/dplayx_global.h, dlls/dplayx/dplayx_main.c, dlls/dplayx/dplobby.c, documentation/status/directplay, include/dplay.h, include/dplobby.h: Peter Hunnisett - Added dplayx LibMain for initialization of all dplayx 'global' data - Added start for global data manipulation - TODO list updated - Added some missing header file definitions - Added the ansi versions of dplay and dplobby - Fixed invalid macro for IDirectPlay4 - Cleaned up compiler warnings - More implementation, bug fixes and critical region protection * windows/x11drv/event.c: Karl Lessard Never send a WM_CLOSE message to a popup window. * windows/x11drv/wnd.c: Karl Lessard Check if the window is managed before trying to give it focus. * configure, configure.in: Marcus Meissner Enhanced linux joystick api detection slightly. * windows/x11drv/keyboard.c: Jaroslaw Piotr Sobieszek Added Polish keyboard support. * graphics/win16drv/prtdrv.c: Huw D M Davies Add DC_VERSION and DC_TRUETYPE to win16drv DeviceCapabilities. * graphics/psdrv/ppd.c: Huw D M Davies Add `Cassette' to PPD -> windows printer-bin mapping. * memory/string.c: Michael McCormack Modified lstrcpynWtoA to put terminating null at end of string, not end of buffer. * include/wine/obj_storage.h: Francois Gouget Removed duplicate macro definitions for the IStorage and IStream COM interfaces. * windows/defwnd.c: Karl Lessard Fixed COLOR_MAX definition for new Win32 values. * objects/gdiobj.c: Ian Schmidt Removed unnecessary USER call from GetFontMetrics. Fixes native USER. * dlls/comctl32/listview.c, include/listview.h: Ulrich Czekalla Set proper item focus on DeleteItem. Clean up edit label implementation. * files/drive.c: Peter Schlaile Fixed a long standing (and annoying) typo, that prevented GetDiskFreeSpaceA from working... * misc/registry.c: Eric Pouech Enable safe reading of registry file, even if file is broken. * win32/newfns.c: Ian Schmidt Changed OpenDesktop stub to Win9x behavior for QuickTime 4. ---------------------------------------------------------------- Sun Oct 31 22:26:35 1999 Alexandre Julliard * scheduler/client.c: Set close-on-exec flag on server socket. * DEVELOPERS-HINTS: Eric Pouech Added explanation on creating a new DLL. * misc/version.c: Juergen Schmied Better version autodetection. * windows/dialog.c: Ulrich Czekalla Implemented support of DS_CONTROL and WS_EX_CONTROLPARENT styles. * graphics/ddraw.c: Ivan de Saedeleer Fail when LPRECT contains negative values. * windows/x11drv/event.c: Pierre Mageau On ConfigureNotify, find the first visible window above the current one. * debugger/db_disasm.c: Rein Klazes Corrected operand sizes for the "enter" instruction. * dlls/comctl32/propsheet.c: Thuy Nguyen PSM_ADDPAGE returns TRUE or FALSE. * dlls/msacm32/builtin.c, dlls/msacm32/Makefile.in, dlls/msacm32/driver.c, dlls/msacm32/internal.c, dlls/msacm32/msacm32_main.c, dlls/msacm32/stream.c, dlls/msacm32/wineacm.h, include/msacm.h: Eric Pouech Made msacm32 really load ACM drivers. * graphics/painting.c: Jim Aston Prevent FillRgn from using a NULL pointer. * misc/registry.c: Huw D M Davies Fixed a few problems with RegEnumKey*. * dlls/commdlg/filedlg95.c: Ulrich Czekalla Implementation of user defined templates. * dlls/ole32/ifs.c: Marcus Meissner IMalloc16_Constructor: moved ICOM_VTBL(This) where it belongs. * controls/static.c: Marcus Meissner Do not clear the drawing area for etched static controls. Replaced our own drawing stuff in etched static controls by DrawEdge. * dlls/comctl32/listview.c: Pierre Mageau In report view mode of the listview control, implemented the horizontal scrollbar functionality. * windows/mdi.c: Francis Beaudet Fixed a small bug in the behavior of maximized MDI children. * dlls/winspool/info.c: Huw D M Davies Rewrite of EnumPrinters. * dlls/comctl32/propsheet.c: Thuy Nguyen Fill in the hwndFrom field of the NMHDR structure when sending notifications. * files/profile.c: Eric Pouech When reading a profile entry remove trailing quote when there's an opening one. * objects/gdiobj.c: Francis Beaudet Return correct height and width for stock fonts in GetObject. * programs/avitools/aviplay.c: Compile fix. * programs/wcmd/.cvsignore: Added wmcdrc.h * dlls/winmm/mmio.c: Ulrich Czekalla Added support for the addition and removal of custom I/O preocedures. * dlls/ole32/compobj.c, dlls/ole32/ole32.spec: Abey George Implemented ProgIDFromCLSID. * dlls/comctl32/propsheet.c, dlls/comctl32/rsrc.rc: Thuy Nguyen Wizard mode property sheets have a tab control. * loader/loadorder.c, relay32/builtin32.c, Makefile.in, configure, configure.in, dlls/Makefile.in, dlls/winmm/midimap/.cvsignore, dlls/winmm/midimap/Makefile.in, dlls/winmm/midimap/midimap.c, dlls/winmm/midimap/midimap.spec, dlls/winmm/wavemap/.cvsignore, dlls/winmm/wavemap/Makefile.in, dlls/winmm/wavemap/msacm.spec, dlls/winmm/wavemap/wavemap.c, wine.ini: Eric Pouech Added built-in msacm.drv and midimap.drv drivers. * tools/winapi_check/nativeapi.pm, tools/winapi_check/winapi.pm, tools/winapi_check/winapi_check, tools/winapi_check/winapi_function.pm, tools/winapi_check/winapi_global.pm, tools/winapi_check/winapi_local.pm, tools/winapi_check/winapi_options.pm, tools/winapi_check/winapi_parser.pm: Patrik Stridvall - Minor fixes and reorganizations. - Added checks for documentation inconsistencies. * dlls/winmm/wineoss/audio.c, dlls/winmm/wineoss/midi.c, dlls/winmm/wineoss/mixer.c, dlls/winmm/wineoss/mmaux.c, misc/port.c, misc/winsock.c, misc/winsock_async.c, dlls/winmm/joystick.c: Patrik Stridvall Added missing configuration #if:s and #includes:s. * dlls/crtdll/crtdll_main.c, files/dos_fs.c, objects/dcvalues.c, dlls/advapi32/crypt.c: Patrik Stridvall Fixed documentation. * dlls/winmm/mciwave/Makefile.in: Patrik Stridvall Solaris make doesn't like unnecessary \. * programs/avitools/aviplay.c, windows/dinput.c, dlls/ole32/memlockbytes.c, dlls/ole32/moniker.c, dlls/ole32/oleobj.c, dlls/ole32/stg_stream.c, dlls/ole32/storage.c, dlls/ole32/storage32.c, dlls/ole32/storage32.h, dlls/shell32/contmenu.c, dlls/shell32/dataobject.c, dlls/shell32/enumidlist.c, dlls/shell32/folders.c, dlls/shell32/if_macros.h, dlls/shell32/regstream.c, dlls/shell32/shell32.spec, dlls/shell32/shelllink.c, dlls/shell32/shellole.c, dlls/shell32/shlfolder.c, dlls/shell32/shlview.c, dlls/shell32/shv_bg_cmenu.c, graphics/d3d_private.h, graphics/d3ddevices.c, graphics/d3dexecutebuffer.c, graphics/d3dlight.c, graphics/d3dmaterial.c, graphics/d3dtexture.c, graphics/d3dviewport.c, graphics/ddraw.c, graphics/ddraw_private.h, dlls/avifil32/avifile.c, dlls/dplayx/dpclassfactory.c, dlls/dsound/dsound_main.c, dlls/ole32/bindctx.c, dlls/ole32/clipboard.c, dlls/ole32/compositemoniker.c, dlls/ole32/hglobalstream.c, dlls/ole32/ifs.c: Francois Gouget Generalized the use of the new ICOM_VFIELD and ICOM_VTBL macros. * windows/win.c, windows/x11drv/wineclipsrv.c: Huw D M Davies Fixed a couple of compiler warnings. * dlls/shell32/pidl.c: Pierre Mageau A crash would occur if the file type in report mode was empty. * windows/keyboard.c: Lionel Ulmer Changed the initialisation of the KeyState array. * misc/lstr.c: Huw D M Davies Better handling of newlines in FormatMessage*. * dlls/winmm/wineoss/audio.c: Eric Pouech Fix (some) bad behavior with buffer underrun. * dlls/winmm/mmsystem.c: Eric Pouech Fixed PlaySound proc for non PCM content. * dlls/comctl32/treeview.c: Ulrich Czekalla - Treeview uses COLOR_WINDOW color instead of clrBk to fill background. - Treeview: colors returned by TVM_GET**COLOR are mixed up. * dlls/commdlg/filedlg95.c: Pierre Mageau Clicking the combo box would cause a crash if it was empty. * graphics/escape.c, graphics/win16drv/init.c, include/wine/wingdi16.h, misc/printdrv.c: Huw D M Davies It appears that StartDoc sends the STARTDOC escape with the DOCINFO structure pointed to with the output data parameter. * graphics/fontengine.c, if1632/gdi.spec: Huw D M Davies Stub for EngineRealizeFontExt (used by the win98 pscript driver). * dlls/comctl32/tab.c: Noomen Hamza Selected button within tab control will be painted with the right color brush. * dlls/comctl32/propsheet.c: Pierre Mageau Do not send two PSN_KILLACTIVE messages. * wine.ini: Marcus Meissner ini variables do not like ; comments after them (they are not shell scripts). Fixed a typo in one of the names. Mon Oct 25 15:43:36 1999 Alexandre Julliard * dlls/dplayx/dplay.c, dlls/dplayx/dplobby.c, dlls/ole32/compobj.c, dlls/ole32/ifs.c, include/wine/obj_base.h: Francois Gouget Added two macros, ICOM_VFIELD and ICOM_VTBL, so that when implementing a COM interface one never has to name the lpVtbl field explicitly. * dlls/oleaut32/ole2disp.c: Andreas Mohr SysAllocStringLen16 needs to handle NULL pointers, too. * memory/local.c: Andreas Mohr Bug fix. * tools/find_debug_channels: Francois Gouget Fixed small typos and slightly outdated comments. * dlls/shell32/shell32.spec, dlls/shell32/shellord.c: Ian Schmidt Partial implementation of the Shell32 call Win32DeleteFile(), required by IE5's Explorer. * programs/winhelp/Makefile.in, programs/winver/Makefile.in, programs/regapi/Makefile.in, programs/regtest/Makefile.in, programs/view/Makefile.in, programs/wcmd/Makefile.in, programs/notepad/Makefile.in, programs/progman/Makefile.in, Make.rules.in, programs/avitools/Makefile.in, programs/clock/Makefile.in, programs/cmdlgtst/Makefile.in, programs/control/Makefile.in: Added dependency on winestub.o Sun Oct 24 22:13:55 1999 Alexandre Julliard * windows/dinput.c, tools/build.c, tools/fnt2bdf.c, win32/console.c, win32/device.c, win32/file.c, win32/process.c, relay32/snoop.c, scheduler/client.c, scheduler/thread.c, server/console.c, server/file.c, server/pipe.c, server/sock.c, server/socket.c, msdos/int21.c, objects/gdiobj.c, include/config.h.in, loader/dos/dosmod.c, loader/dos/dosvm.c, loader/dos/module.c, loader/pe_image.c, memory/ldt.c, dlls/wnaspi32/winaspi32.c, files/directory.c, files/dos_fs.c, graphics/ddraw.c, graphics/x11drv/dib.c, dlls/ole32/compobj.c, dlls/oleaut32/variant.c, dlls/winaspi/winaspi16.c, configure.in, debugger/stabs.c, dlls/crtdll/crtdll_main.c, configure: Patrik Stridvall - Added missing configuration #if:s and #includes:s. - Minor configuration related changes. * misc/registry.c: Marcus Meissner Made LoadHomeRegistryFiles default to TRUE. * include/authors.h, include/comm.h, include/datetime.h, include/monthcal.h, include/netspi.h, include/ntsecapi.h, include/psdrv.h, include/wine/obj_connection.h, include/wine/obj_oleundo.h, include/wine/obj_picture.h, include/wine/obj_property.h, include/wine/obj_shellextinit.h, include/wine/winnet16.h, include/winspool.h, include/xmalloc.h, tools/make_authors: Patrik Stridvall Made the include files self-sufficient. * tools/winapi_check/*: Patrik Stridvall - Fixed the long long problem. - Added configure include consistancy checking. - Added progress indicator. - Began splitting up the win16api.dat and win32api.dat files. - Added various minor checks. - Minor fixes. * relay32/kernel32.spec, relay32/user32.spec, dlls/shell32/shell32.spec, dlls/shell32/shlwapi.spec, dlls/win32s/w32skrnl.spec, dlls/winspool/winspool.spec, dlls/wnaspi32/wnaspi32.spec, dlls/ole32/ole32.spec, dlls/oleaut32/oleaut32.spec, dlls/olecli/olecli32.spec, dlls/psapi/psapi.spec, dlls/avifil32/avifil32.spec, dlls/comctl32/comctl32.spec, dlls/comctl32/comctl32undoc.c, dlls/crtdll/crtdll.spec, dlls/ntdll/ntdll.spec, dlls/ntdll/reg.c: Patrik Stridvall Added spec file declarations for already implemented functions. * graphics/path.c, if1632/gdi.spec, objects/clipping.c: Patrik Stridvall Added Win16 variants of existing Win32 functions. * dlls/ntdll/signal_i386.c: Patrik Stridvall Solaris compile fix. * files/file.c: Gerard Patel Remove prefixing by a tilde for GetTempFileName 32bits. * debugger/expr.c: Marcus Meissner Added missing include. * windows/win.c: Uwe Bonnes Warn users to use -the -desktop option together with the native user DLLs. * loader/resource.c: Uwe Bonnes Return the size of the needed resource when buffer is NULL for LoadString(). * dlls/ole32/clipboard.c, windows/clipboard.c, windows/user.c, windows/x11drv/Makefile.in, windows/x11drv/clipboard.c, windows/x11drv/wineclipsrv.c, wine.ini: Francis Beaudet Enabled the persistent clipboard server. * misc/registry.c, wine.ini: Nathaniel Improved registry isolation possibilities. * multimedia/*.c: Eric Pouech Split the multimedia/ directory into dlls/ subdirectories. * multimedia/winmm.rc, multimedia/winmm_Pt.rc, programs/clock/ChangeLog, programs/clock/Pt.rc, programs/notepad/ChangeLog, programs/notepad/Fr.rc, programs/notepad/Pt.rc, programs/notepad/Wa.rc, programs/progman/.cvsignore, programs/progman/ChangeLog, programs/progman/Pt.rc, programs/winhelp/.cvsignore: Gustavo Junior Alves More Portuguese language support. * objects/dib.c: Matthew J. Francis Fixed top-down DIB handling in StretchDIBits32(). * include/windowsx.h: Peter Hunnisett Added macro definitions for memory allocation. * graphics/x11drv/xfont.c, include/gdi.h, include/x11font.h, objects/font.c: Ulrich Czekalla Make sure that all calls use the extended structures which are a superset of the regular structures. * dlls/comctl32/listview.c: Pierre Mageau Added the functionality of the thumb track. * windows/focus.c: Adrian Thurston Do not set focus to a disabled window. * windows/x11drv/keyboard.c: Pierre Mageau Fixed an entry in the keyboard translation table for Ctrl-Break. * include/debugdefs.h, scheduler/debugger.c: Ulrich Czekalla New channel 'debugstr' used to print OutputDebugString API calls. * windows/nonclient.c, windows/x11drv/event.c: Noomen Hamza Popup windows will be hidden when we minimize a main frame or shown when we maximize or restore a minimized main frame. Sat Oct 23 23:59:47 1999 Alexandre Julliard * dlls/comctl32/propsheet.c: Ulrich Czekalla PropertySheet didn't destroy page dialog's window while removing page. * dlls/comctl32/listview.c: Pierre Mageau Update the item width upon a new column in the header control. * dlls/ntdll/exception.c: Gerard Patel Reorder parameters to fix position of base reg relative to exception frame. * documentation/Makefile.in: Fixed typo. * include/*.h: Francois Gouget Define the COM macros even in C++. * controls/menu.c, windows/mdi.c: Pierre Mageau Fixed loop with WM_SYSCHAR. * dlls/comctl32/tooltips.c: Joshua Thielen Fixed tooltips positioning. * graphics/x11drv/dib.c: Re-applied lost change. * loader/task.c: Uwe Bonnes Ignore wrong hInstance. * include/miscemu.h, msdos/int10.c, msdos/interrupts.c: Robert 'Admiral' Coeyman Report non-hercules video. Turned on int 2a. * include/file.h, include/winbase.h, loader/module.c, files/file.c: Jim Aston Fixed compiling with STRICT. * dlls/comctl32/propsheet.c: Adrian Thurston Proper resource support for dialog title. * include/dlgs.h: Ulrich Czekalla Fixed some wrong defines. * objects/brush.c: Ulrich Czekalla Copy bitmaps properly. * include/debugger.h, debugger/dbg.y, debugger/hash.c, debugger/msc.c: Eric Pouech Allow loading of modules debug information after first invocation of debugger. * dlls/shell32/shellpath.c, dlls/shell32/shlwapi.spec: Jim Aston Added a few stubs. * include/listview.h, dlls/comctl32/listview.c: Ulrich Czekalla Implementation of edit labels. * graphics/d3ddevices.c, graphics/d3dtexture.c, graphics/ddraw.c: Ove Kaaven Fixed some anonymous union accesses. * controls/listbox.c: Abey George Draw the item text from the top of the item rect. * dlls/comctl32/comctl32undoc.c, dlls/shell32/shlview.c: Pierre Mageau Fixed the ascending and descending sort order for the File Dialog. * dlls/comctl32/propsheet.c: Ulrich Czekalla - adds calling application defined callback function once PropertSheet Dialogbox has been initialized just after creating the tab control - handle the case when pszCaption specifies a resource instead of a string * dlls/shell32/pidl.c, dlls/shell32/pidl.h, dlls/shell32/shlfolder.c, dlls/shell32/shv_bg_cmenu.c: Juergen Schmied - removed all unnecessary "winapi" from internal _IL* functions - better parameter checking for shellfolder - removed dead code from shv_bg_contextmenu * graphics/ddraw.c, graphics/vga.c, include/ddraw.h: Jim Aston Added another anonymous union using the DUMMYUNIONNAME style. * dlls/comctl32/listview.c: Ulrich Czekalla Properly copy text into user supplied buffer. * misc/winsock.c, relay32/wsock32.spec, server/object.h, server/sock.c, if1632/winsock.spec, include/task.h, include/winsock.h, loader/main.c, loader/task.c, misc/main.c: Ove Kaaven Winsock rewrite. Sockets are now proper win32 handles. Internal structures are now really internal. * dlls/comctl32/tab.c: Ulrich Czekalla Tab control doesn't refresh tab area on TCM_SETCURSEL. * dlls/shell32/shellord.c, dlls/shell32/shlwapi.spec: Ulrich Czekalla Implemented StrRChrA. * debugger/dbg.y, debugger/debug.l, debugger/expr.c, include/debugger.h: Ulrich Weigand Bugfix: Perform proper process shutdown on 'quit' and error. * dlls/advapi32/security.c: Gerard Patel Stub OpenThreadToken & OpenProcessToken for failure in Win9x mode. * include/winuser.h: Jim Aston Fixed a small typo. * windows/dialog.c: Adrian Thurston Protect against wrong return value from WM_INITDIALOG. * graphics/x11drv/bitmap.c: Francis Beaudet Removed an illegal character. * dlls/shell32/shell32_main.c: Ian Schmidt Now inits the policy cache when shell32 is first instantiated. Matches Windoze behavior. * dlls/shell32/Makefile.in, dlls/shell32/shellord.c, dlls/shell32/shpolicy.c, dlls/shell32/shpolicy.h: Ian Schmidt Real implementation of SHRestricted(), clarified SHInitRestricted()'s role a little, added policy data table. * dlls/ole32/ifs.c: Marcus Meissner Use segmented lpvtbl pointer for IMalloc16 interface, not linear one. * windows/x11drv/mouse.c: Francis Beaudet Replaced a X call with a TSX call in XDRV_MOUSE_SetCursor(). * dlls/comctl32/rsrc.rc: Ulrich Czekalla The property sheet dialog needs flag WS_VISIBLE. * dlls/commdlg/filedlg95.c: Pierre Mageau Set the default view button to List in the FileDialog. * loader/ne/module.c: Ulrich Weigand Bugfix: don't use GetModuleHandle16 in LoadModule16/NE_CreateProcess. * debugger/types.c: Eric Pouech Fixed potential crash in string variable printing. * dlls/comctl32/toolbar.c: Eric Pouech Added WM_GETFONT support. * include/main.h, loader/main.c, miscemu/main.c, scheduler/process.c: Ulrich Weigand Bugfix: don't call ExitProcess() before SYSLEVEL_Init(). * multimedia/mmio.c: Eric Pouech Fixed some bugs (mmioOpen with 16/32 bit strangeness, mmioAscend & mmioDescend offset and alignment issues). * windows/clipboard.c: Ulrich Czekalla We are supposed to delete the palette object with the DeleteObject function. * dlls/comctl32/listview.c: Noomen Hamza Listview items will be drawn with the right item dimensions. * graphics/psdrv/text.c: Luc Tourangeau Some small corrections to the ExtTextOut function. * dlls/ole32/ole2.c: Francis Beaudet Make sure that the drop effect of a DnD operation is set to DROPEFFECT_NONE if the user cancelled the operation. * dlls/comctl32/animate.c, include/animate.h: Eric Pouech First working version. * multimedia/mixer.c: Eric Pouech Added the mute capability to most control lines. * windows/win.c: Rein Klazes Use the module handle, if CreateWindowEx is called with hInstance==NULL. * include/wine/undocshell.h: Marcus Meissner Added missing prototypes for StrRetToBuf(A|W). Wed Oct 13 16:17:23 1999 Alexandre Julliard * programs/clock/.cvsignore, programs/notepad/.cvsignore, programs/progman/.cvsignore: Added Pt.s. * objects/dib.c: Backed out previous change (breaks with metafiles). * server/Makefile.in, server/request.h, server/sock.c, server/trace.c, include/server.h, include/winsock.h: Ove Kaaven Added socket interface to wineserver. * loader/loadorder.c, loader/main.c, miscemu/main.c, wine.ini: Eric Pouech Correct filename for kernel module is KRNL386.EXE. * dlls/winspool/winspool.spec, dlls/winmm/wineoss/wineoss.spec: Eric Pouech Added missing (and now required) filename directive. * tools/build.c, include/builtin32.h: Eric Pouech Added filename to 32 bit builtin module descriptors. * if1632/builtin.c, relay32/builtin32.c: Eric Pouech Fix loading of modules: now search key is module's filename, not module's name. * dlls/comctl32/propsheet.c, dlls/comctl32/tab.c: Pierre Mageau When an error occurred in a property sheet because of invalid data, clicking on another tab, would activate the new tab but keep the original property sheet. * dlls/comctl32/listview.c, dlls/shell32/pidl.c, dlls/shell32/pidl.h, dlls/shell32/shell32_main.c, dlls/shell32/shlview.c, dlls/shell32/shv_bg_cmenu.c: Juergen Schmied - implemented sorting the listview by clicking on the column header - implemented the context menu entrys for sorting - some more functions to gather data form pidls * dlls/commdlg/cdlg.h, dlls/commdlg/cdlg32.c, dlls/commdlg/filedlg95.c, dlls/commdlg/filedlgbrowser.c: Juergen Schmied Removed linking by GetProcAddress for StrRetToBuf sinc not all versions of shlwapi exporting this function. * loader/module.c: Chris Morgan James Abbatiello Removes extraneous comparison of data pointed to by the relocation offset when no relocation entries exist. * if1632/wprocs.spec, loader/ne/module.c: Marcus Meissner WPROCS.ENTRYADDRPROC needs to return something in CX too (fixes BLINKER selfextracting executables). * windows/dialog.c: Abey George Changed EndDialog to behave like as in Windows. Call SetWindowPos instead of ShowWindow in EndDialog. * windows/winpos.c: Abey George Changed WINPOS_CanActivate to not to consider WS_VISIBLE style. Code for activating and setting focus to other windows when a window is hidden, is moved to ShowWindow from SetWindowPos. Activate the top level window if it's not active in ShowWindow(SW_SHOW). * graphics/x11drv/dib.c: Eric Pouech Fixed X11DRV_DIB_SetImageBits when called for RLE encoded dibs. * objects/dib.c: Eric Pouech Optimized StretchDIBits to call SetDIBitsToDevice (when src & dst dimensions are equal). * programs/notepad/Makefile.in, programs/notepad/Pt.rc, programs/progman/Makefile.in, programs/progman/Pt.rc, programs/clock/Makefile.in, programs/clock/Pt.rc: Gustavo Junior Alves Added Portuguese language support. * dlls/avifil32/avifile.c, dlls/dplayx/dplay.c, dlls/dplayx/dplobby.c, dlls/oleaut32/typelib.c, dlls/shell32/brsfolder.c, dlls/shell32/shellord.c: Francois Gouget Use the COM macros rather than directly accessing the lpvtbl field. * include/wine/winuser16.h, misc/lstr.c, if1632/user.spec: Uwe Bonnes Use LoadString16 for FormatMessage16 and handle FORMAT_MESSAGE_ALLOCATE_BUFFER flag. * graphics/psdrv/text.c: Luc Tourangeau Some adjustments to ExtTextOut. * include/psdrv.h, graphics/psdrv/clipping.c, graphics/psdrv/init.c, graphics/psdrv/ps.c: Stephane Lussier Fixed the clipping for the postscript driver and turned it on (by setting PSDRV_SetDeviceClipping in the function table). * files/drive.c: Uwe Bonnes Account for the trailing NULL in GetLogicalDriveStringsA. * include/wine/obj_oleaut.h: Francois Gouget Fixed a typo in a function declaration. * windows/x11drv/keyboard.c: Zoltan Kovacs Added Hungarian keyboard support. * windows/mdi.c, windows/winpos.c: Thuy Nguyen We have to activate MDI child windows. * dlls/commdlg/filedlg.c: Uwe Bonnes Use Get|SetPropA to store lParam to retrieve the OPENFILENAME16 for a hWnd. * graphics/x11drv/graphics.c: Rein Klazes Correct usage of a scratch array in X11DRV_PolyBezier. * controls/combo.c: Gerard Patel Make WM_GETTEXTLENGTH return length for dropdownlist combos. * controls/button.c: Francois Boisvert Removed FillRect in the ownerdrawn button procedure. * windows/x11drv/event.c: Abey George Make sure the Focus Out window is still the Foreground window before doing SetForegroundWindow(0) in Event_FocusOut. * graphics/x11drv/palette.c: Chris Morgan James Abbatiello Fixes problems with color drift when switching to/from logical/physical colors. * dlls/comctl32/header.c: Thuy Nguyen Mouse position is signed. * windows/syscolor.c: Noomen Hamza Set the COLOR_3DLIGHT system color to the right window default value. * loader/pe_image.c: Marcus Meissner Small hack to check if we need to relocate the TLS directory or not (some seem to need this pointer relocateable, some already do relocate it by themselves). * Make.rules.in: Marcus Meissner Relink subdirectory objects on Makefile.in/Make.rules.in change. * dlls/comctl32/propsheet.c: Marcus Meissner Check for NULL ptr in Propsheet_RemovePage (Xing DVD Player). * multimedia/dsound.c: Marcus Meissner Don't ref NULL ptrs in debug. * windows/dinput.c: Marcus Meissner If the joydevice is not present, do not create a DirectInputDevice. * dlls/commdlg/commdlg.spec, dlls/commdlg/printdlg.c, include/commdlg.h: Huw D M Davies Map PrintDlg16 to PrintDlgA. * dlls/shell32/shlmenu.c: Juergen Schmied Small fixes. * controls/menu.c: Juergen Schmied Made TrackPopupMenu with TPM_RETURNCMD returning the id instead of true. * dlls/comctl32/treeview.c: Ulrich Czekalla Prevent self referencing next pointer during insert. * ole/nls/fra.nls: Eric Pouech Added some missing definitions. * multimedia/winmm.rc, multimedia/winmm_Nl.rc: Klaas van Gend Added Dutch to the languages supported by MCI. * documentation/status/internationalisation: Klaas van Gend Updated status of internationalisation. * loader/pe_image.c: Ulrich Weigand Bugfix: *Don't* resolve PE imports if asked not to ... * misc/ddeml.c: Ulrich Weigand Bugfix: DdeNameService was broken. * loader/ne/module.c: Ulrich Weigand Bugfix: When loading an executable module fails, don't perform module cleanup before the corresponding task is destroyed. * dlls/commdlg/cdlg_En.rc, dlls/commdlg/cdlg_xx.rc: Klaas van Gend Moved bitmap resource to language-independent resource file. * misc/version.c: Andreas Mohr Added warning for future VERSION_GetVersion() (mis-)users and made OSVERSIONINFO warning more detailed. * dlls/oleaut32/oleaut.c, dlls/oleaut32/oleaut32.spec: Marcus Meissner Added stubs for RevokeActiveObject, GetActiveObject, fixed RegisterActiveObject stub argtypes. * windows/x11drv/keyboard.c: Marcus Meissner Added german keyboard layout with "nodeadkeys" option enabled (just to apostrophes are switched). * dlls/msvideo/msvideo.spec, dlls/msvideo/msvideo_main.c: Marcus Meissner Stub for VideoCapDriverDescAndVer. * msdos/int21.c: Marcus Meissner Replicate CreateDirectory() LastError workaround for the LFN part. * misc/registry.c: Marcus Meissner Also escape characters >=0x80 within the wineregistry savefile. * dlls/wnaspi32/winaspi32.c: Marcus Meissner Don't use malloc/free in winaspi32. * graphics/ddraw.c: Marcus Meissner Use 1 macro for rgbbitdepth -> byte determination. xshm/image creation now uses 1/8 of the space for every image. * relay32/user32.spec: Marcus Meissner Replaced double ChangeDisplaySettingsA by (Ex)[AW]. Wed Sep 29 12:16:16 1999 Alexandre Julliard * if1632/builtin.c, loader/module.c, loader/ne/module.c: Ulrich Weigand Bugfix: Don't call GetVersionExA too early, to avoid breaking automatic emulated Windows version detection. * dlls/oleaut32/typelib.c, include/oleauto.h, dlls/oleaut32/oleaut32.spec: Rein Klazes First implementation of LoadTypeLibEx(). * if1632/mmsystem.spec, multimedia/mmsystem.c: Marcus Meissner Added stub for WMMMIDIRUNONCE called by midimap.drv. * misc/winsock.c: Marcus Meissner Set refcounter to 1 on initial init or WSAStartup/WSAStartup with following WSACleanup will already free the structures. * multimedia/dsound.c: Marcus Meissner Create DirectSound object even without sounddevice. Games can be played without sound, but not without DirectSound object (tested with Monkey Island 3). * dlls/oledlg/oledlg.spec, include/ntddk.h, relay32/kernel32.spec, relay32/user32.spec, tools/build.c, dlls/crtdll/crtdll.spec, dlls/ntdll/ntdll.spec, dlls/ntdll/rtl.c: Patrik Stridvall Fixed some of the issues reported by winapi-check, by adding arguments to varargs. * Make.rules.in, Makefile.in: Patrik Stridvall Added ability to call winapi_check from the Makefiles. * msdos/dpmi.c: Patrik Stridvall Modification due to problems with winapi-check. * tools/winapi_check/parser.pm, tools/winapi_check/win16api.dat, tools/winapi_check/win32api.dat, tools/winapi_check/winapi.pm, tools/winapi_check/winapi_check, tools/winapi_check/winapi_options.pm, tools/winapi_check/winapi_parser.pm: Patrik Stridvall - Adapted to changes in Wine. - Minor improvements. Tue Sep 28 16:40:07 1999 Alexandre Julliard * server/event.c, server/object.h: Made event manipulation routines public. * dlls/Makefile.in, dlls/dplayx/.cvsignore, dlls/dplayx/Makefile.in, dlls/dplayx/dpclassfactory.c, dlls/dplayx/dpinit.h, dlls/dplayx/dplay.c, dlls/dplayx/dplay.spec, dlls/dplayx/dplayx.spec, dlls/dplayx/dplobby.c, documentation/status/directplay, include/dplay.h, include/dplobby.h, multimedia/Makefile.in, multimedia/dplay.c, relay32/.cvsignore, relay32/dplay.spec, relay32/dplayx.spec, relay32/Makefile.in, Makefile.in, configure, configure.in: Peter Hunnisett - Moved dplay and dplayx to a proper home in the dlls directory. - Implemented new DirectPlay4 and DirectPlayLobby3 interfaces. - Implemented a class factory for dplay and dplobby. COM interfaces now work for dp and dpl. - Added a few more entries to dplayx.spec files. How do you find the ordinals? I just guessed :( - Seperated DirectPlay and DirectPlayLobby implementation into separate files. - Included some missing header file definitions. - Implemented the dplay dll in terms of the dplayx dll. I haven't tested it so it may not work... - A few bug fixes and a little new implementatioe.n - Updated document with a more detailed implementation plan. * windows/win.c: Noomen Hamza Rewrite the ShowOwnedPopups function with a safety algorithm. * controls/menu.c: Karl Lessard Make ExecFocusedItem return -1 on failure. * graphics/ddraw.c, multimedia/dsound.c: Peter Hunnisett - Changed return code for failure on *_DllGetClassObject to CLASS_E_CLASSNOTAVAILABLE from E_NOTAVAILABLE as documented. - Replaced memcmps with equivalent IsEqualCLSID or IsEqualGUID macros. - Changed "return 0;" with S_OK or DS_OK as appropriate. * dlls/ntdll/signal_i386.c: Support TRAP_sig for FreeBSD (with the help of Juergen Lock). * loader/module.c: Uwe Bonnes Remember the allocated string to free it. * controls/menu.c: Gerard Patel Force recalculation of menu when calling InsertMenuItem. * dlls/shell32/shell32.spec, dlls/shell32/shellord.c: Ian Schmidt Implementation of 2 Win98 by-ordinal SHELL32 routines. Helps Win98 Explorer work better. * multimedia/mci.c: Eric Pouech Fixed typo in hDrv for sending message. Mon Sep 27 13:38:57 1999 Alexandre Julliard * include/mmddk.h, multimedia/mci.c, multimedia/mcianim.c, multimedia/mciavi.c, multimedia/mcicda.c, multimedia/mcimidi.c, multimedia/mciwave.c: Eric Pouech Removed last dependancies between MCI drivers and WINMM/MMSYSTEM DLLs. * multimedia/mmsystem.c: Eric Pouech Got rid of hack on WAVEHDR's & MIDIHDR's reserved field for 16/32 bit discrimination. Fixed a few segptr/linear address bugs in WAVEHDR/MIDIHDR handling. * multimedia/mixer.c, multimedia/mmaux.c: Eric Pouech Check for OSS driver presence and return error accordingly. * multimedia/midi.c: Eric Pouech Got rid of hack on MIDHDR's reserved field for 16/32 bit discrimination. * multimedia/lolvldrv.c: Eric Pouech Fixed crash with mapper loading. Got rid of hack on WAVEHDR's reserved field for 16/32 bit discrimination. * multimedia/audio.c: Eric Pouech Got rid of hack on WAVEHDR's reserved field for 16/32 bit discrimination. * documentation/wine.texinfo: Eric Pouech Typo correction. * loader/libres.c: Ulrich Czekalla Fix integer based resource id assumption. Add support for string based type ids. * include/winsock2.h: Ove Kaaven Added some basic Winsock2 definitions. * server/object.h, server/select.c: Ove Kaaven Added EXCEPT_EVENT to wineserver select loop. * files/dos_fs.c: Peter Ganten Fix for VFAT_IOCTL_READDIR_BOTH. * dlls/wing/wing_main.c: Peter Ganten Small wing enhancement. * controls/edit.c: Stephane Lussier Return key should not be ignored in multiline edit even if ES_WANTRETURN flag isn't set. * include/gdi.h, objects/gdiobj.c: Francis Beaudet DPtoLP needs to round the result. Fixed MulDiv to deal better with negative numbers. * windows/painting.c: Francis Beaudet rcPaint has to be returned in logical coordinates but was intersected with a client rectangle in device coordinates. * objects/region.c: Richard Cohen Fixed GetRandomRgn. * files/drive.c: Abey George Made GetCurrentDirectory return long name of the current directory. * include/button.h, controls/button.c: Rein Klazes Use an extra bit in the button status byte to flag whether the DefButtonWndProc should process the WM_LBUTTONUP message. * scheduler/process.c, scheduler/sysdeps.c, dlls/ntdll/Makefile.in, dlls/ntdll/exception.c, dlls/ntdll/signal_i386.c, graphics/ddraw.c, include/sig_context.h, include/debugger.h, include/dosexe.h, include/miscemu.h, include/wine/exception.h, loader/signal.c, loader/Makefile.in, loader/main.c: Moved all signal support to a new platform-specific file. Make use of the per-thread signal stack (Juergen Lock). Fixed %fs in signal handler for non FS_sig case (Ulrich Weigand). ---------------------------------------------------------------- Thu Sep 23 16:14:44 1999 Alexandre Julliard * Makefile.in, windows/x11drv/.cvsignore, windows/x11drv/Makefile.in, windows/x11drv/wineclipsrv.c: Noel Borthwick Added clipboard server. * tools/Attic/winapi-check, tools/winapi_check/nativeapi.dat, tools/winapi_check/nativeapi.pm, tools/winapi_check/parser.pm, tools/winapi_check/win16api.dat, tools/winapi_check/win32api.dat, tools/winapi_check/winapi.pm, tools/winapi_check/winapi_check, tools/winapi_check/winapi_global.pm, tools/winapi_check/winapi_local.pm, tools/winapi_check/winapi_options.pm, tools/winapi_check/winapi_parser.pm: Patrik Stridvall Made a new improved version of winapi-check in perl. * msdos/int21.c: Implemented uppercasing functions (based on a patch by Robert 'Admiral' Coeyman). * windows/user.c, dlls/ole32/ole2stubs.c, dlls/ole32/storage.c, dlls/oleaut32/typelib.c, dlls/stress/stress_main.c, if1632/dummy.c, include/stress.h, include/wine/wingdi16.h, misc/printdrv.c, windows/input.c: Patrik Stridvall Fixed some of the issues reported by winapi-check. * misc/comm.c: Patrik Stridvall Modification due to problems with winapi-check. * windows/x11drv/event.c: Noomen Hamza WS_POPUP windows (excluding the WS_POPUPWINDOW windows) should be closed after loosing the focus. * objects/dib.c: Francois Boisvert CreateDIBitmap creates a monochrome bitmap only when the first color of the colormap is black followed by white. Otherwise it creates a color bitmap. * windows/defwnd.c, windows/nonclient.c: Noomen Hamza Non active window should be activated when it gets any client/non-client double/single left/medium/right mouse click(s). Wed Sep 22 16:53:54 1999 Alexandre Julliard * relay32/builtin32.c: Eric Pouech Added WINEOSS descriptor. * multimedia/mmsystem.c: Eric Pouech MMSYSTEM_GetIData() now dies when no iData is present Better error recovery when the process attachment fails PlaySound (and helper functions) now use the regular waveOutXXX (instead of wodMessage) Moved handling of hack for differenciating between 16 and 32 bit callback to lolvldrv.c Makes use of new lolvldrv.c interfaces * multimedia/.cvsignore, multimedia/Makefile.in, multimedia/lolvldrv.c, multimedia/oss.c, multimedia/oss.h, multimedia/winemm.h: Eric Pouech Added lolvldrv.c and oss.c. Thunks to 16 bit are now generated for the MMSYSTEM module. * configure.in, dlls/winmm/.cvsignore, dlls/winmm/Makefile.in, dlls/winmm/wineoss/.cvsignore, dlls/winmm/wineoss/Makefile.in, dlls/winmm/wineoss/wineoss.spec, Makefile.in, configure: Eric Pouech Added dlls/winmm and dlls/winmm/wineoss directories. * multimedia/time.c: Eric Pouech No longer checking for correct iData in code. * relay32/winmm.spec: Eric Pouech Added missing DriverCallBack function. * if1632/mmsystem.spec: Eric Pouech All headers (wave and midi functions) are now seen as segptr. Added stub for joyGetPosEx16(). * include/mmsystem.h: Eric Pouech Added some missing defines. * include/mmddk.h: Eric Pouech Now using the same structs for low-level drivers as Windows do. * multimedia/audio.c, multimedia/mixer.c, multimedia/mmaux.c: Eric Pouech Make it (almost) 32 bit only. Reflected creation of WINEOSS module. * multimedia/midi.c: Eric Pouech Make it (almost) 32 bit only. Reflected creation of WINEOSS module. No longer using ERR when no MIDI card is present. * multimedia/joystick.c: Eric Pouech Added stub for joyGetPosEx16(). * multimedia/mci.c: Eric Pouech No longer checking for correct iData in code. Added look-up tables to command tables (speeds up queries). * multimedia/mciwave.c: Eric Pouech Now using WAVEFORMATEX instead of PCMWAVEFORMAT. * multimedia/mcimidi.c: Eric Pouech Now using modReset() instead of tweaking MIDI controls. * multimedia/mcicda.c: Eric Pouech Fixed returned type upon open. Fixed some bogus error checking. * multimedia/mcianim.c, multimedia/mciavi.c: Eric Pouech Fixed returned type upon open. * dlls/ntdll/exception.c: Juergen Schmied Do not set EH_NONCONTINUABLE. * programs/osversioncheck/.cvsignore, programs/osversioncheck/ChangeLog, programs/osversioncheck/Makefile.in, programs/osversioncheck/osversioncheck.c, configure, configure.in, programs/Makefile.in: Morten Eriksen Added simple console mode example program which lists information about the version of Windows we're currently running on. * loader/module.c: Fixed memory allocation bug. * windows/x11drv/event.c: Gerard Patel Fix infinite loop with glastXFocusWindow. * dlls/comctl32/imagelist.c: Stephane Lussier Allow creation of empty imagelist. * objects/palette.c, relay32/gdi32.spec: Ian Schmidt Added partial implementation of GetICMProfileA, required by Paint Shop Pro 5. * controls/menu.c: Abey George Don't send WM_ENTERMENULOOP, WM_INITMENU & WM_INITMENUPOPUP messages when TPM_NONOTIFY flag is set in TrackPopupMenu. * misc/winsock.c: David Luyer getpeername() and getsockname() return errors in errno not h_errno. Mon Sep 20 18:52:06 1999 Alexandre Julliard * dlls/commdlg/filedlgbrowser.c, dlls/commdlg/printdlg.c, include/builtin16.h, misc/registry.c, objects/cursoricon.c, tools/build.c: Patrik Stridvall Fixed ANSI C violations. * windows/keyboard.c, windows/mouse.c, if1632/keyboard.spec, if1632/mouse.spec, windows/input.c: Ulrich Weigand Keyboard/mouse event proc thunk creation moved out of if1632/thunk.c. * if1632/kernel.spec, include/task.h, loader/.cvsignore, loader/Makefile.in, loader/ne/module.c, loader/ne/segment.c, loader/task.c: Ulrich Weigand Don't create thunk for task signal proc, call it directly. * if1632/gdi.spec, include/gdi.h, objects/.cvsignore, objects/Makefile.in, objects/clipping.c, objects/dc.c, windows/dce.c: Ulrich Weigand DC hook proc thunk management simplified. * misc/system.c: Ulrich Weigand System timer proc thunk creation moved out of if1632/thunk.c. * scheduler/thread.c: Ulrich Weigand Don't create thunk for CreateThread16 proc, call it directly. * windows/.cvsignore, windows/Makefile.in, windows/hook.c, dlls/shell32/shell.c, if1632/user.spec, include/hook.h: Ulrich Weigand Windows hook proc thunk management simplified. * include/callback.h, if1632/thunk.c: Ulrich Weigand Modified THUNK_Alloc so as to avoid 32->16->32 calling sequences. Removed persistent thunk creation routines. * configure, configure.in, include/acconfig.h, include/config.h.in, include/ts_xf86dga2.h, tools/make_X11wrappers, tsx11/Makefile.in, tsx11/X11_calls, tsx11/ts_xf86dga2.c: Lionel Ulmer Added the possibility to use DGA 2.0. * winedefault.reg: Ulrich Weigand Added HKEY_LOCAL_MACHINE\...\ProgramFilesDir registry key. * dlls/comctl32/commctrl.c: Dennis Borklund It's no error to send a WM_COMMAND to MenuHelp. * files/file.c: Francois Boisvert CreateFileA returns HFILE_ERROR when the filename contains a wild card. * controls/static.c: Francis Beaudet Fixed display bug in the static control. * controls/menu.c: Pascal Lessard Message removed when menu tracking finish on a WM_LBUTTONDOWN. * include/bitmap.h, include/ts_xlib.h, include/x11drv.h, objects/dib.c, tsx11/X11_calls, tsx11/ts_xlib.c, windows/clipboard.c, windows/x11drv/clipboard.c, windows/x11drv/event.c, graphics/x11drv/bitmap.c, graphics/x11drv/dib.c: Noel Borthwick - Add clipboard support for copying/pasting bitmaps or Pixmaps between Wine and native Linux applications. - Respond to the MULTIPLE selection request target when Wine is the selection owner. - Relax type checking for TARGETS selection. * if1632/builtin.c, loader/module.c: Ulrich Weigand Set 'expected_version' of built-in and dummy modules according to emulated Windows version. * if1632/relay.c, loader/main.c: Ulrich Weigand Make CallTo16 return stub segment owned by KERNEL. * include/wine/winbase16.h, loader/task.c: Ulrich Weigand Bugfix: Improved GetCodeHandle16 / GetCodeInfo16. * ole/nls/sve.nls: Dennis Bjorklund Added some values that were missing in the Swedish nls file. Sun Sep 19 18:58:16 1999 Alexandre Julliard * graphics/x11drv/dib.c: Ulrich Weigand Bugfix: create DDB in X11DRV_DIB_GetDIBits if necessary. * dlls/ole32/ole32.spec: Juergen Schmied Added missing export. * objects/cursoricon.c: Juergen Schmied Fixed crash when loading *.ani files. * ole/*, dlls/ole32/*, dlls/oleaut32/*, dlls/olecli/*, dlls/oledlg/*: Ulrich Weigand Moved bulk of OLE implementation to dlls/ subdirectories. * controls/menu.c: Dennis Björklund Send correct WM_MENUSELECT when menu closes. * dlls/commdlg/filedlg95.c, dlls/commdlg/filedlgbrowser.c, dlls/shell32/shres.rc: Francois Boisvert Added small feature in the file dialog. * win32/newfns.c, files/drive.c, include/winnt.h, include/wtypes.h, msdos/vxd.c, ole/antimoniker.c, ole/compositemoniker.c, ole/datacache.c, ole/filemoniker.c, ole/hglobalstream.c, ole/itemmoniker.c, ole/memlockbytes.c, ole/olefont.c, ole/stg_bigblockfile.c, ole/stg_stream.c, ole/storage.c, ole/storage32.c, ole/variant.c, dlls/advapi32/service.c, dlls/comctl32/comctl32undoc.c: Patrik Stridvall Added support for anonymous structs/unions on compilers that implement it. * include/wingdi.h, objects/text.c, relay32/gdi32.spec: Peter Ganten Stubs for PolyTextOutA/W. * graphics/x11drv/dib.c, objects/dib.c: Karl Lessard Some more minor GDI fixes. * dlls/comctl32/imagelist.c: Stephane Lussier In ImageList_Draw when drawing the bitmap with the transparent flag set, background color/foreground color should be set to white/black, when doing bitblt operation with the bitmap mask. * graphics/escape.c, graphics/win16drv/init.c, include/win16drv.h: Huw D M Davies Extend DRAWMODE struct to win95 spec. Add some more Escape -> Escape16 conversions. * graphics/win16drv/prtdrv.c: Huw D M Davies Stop trashing devmode if in and out devmodes are the same. * controls/widgets.c: Noomen Hamza The MDIClient class must be registered with the IDC_ARROW cursor. * controls/combo.c: Francis Beaudet Implemented the disabled state of the combobox. * controls/menu.c: Richard Cohen Protect SetMenu from rogue menu handle. GetMenu16 can just call GetMenu. * windows/mdi.c: Richard Cohen Protect MDISetMenu from rogue menu handles. * memory/local.c: Richard Cohen Tidy up TRACE etc to use default channel. * dlls/version/info.c, dlls/version/version.spec, include/winbase.h, include/winver.h, ole/ole2nls.c: Ulrich Weigand Move VerLanguageName[AW] back to base (exported from KERNEL32 ...). * dlls/comctl32/rsrc.rc, dlls/comctl32/comctl32.h, dlls/comctl32/propsheet.c: Thuy Nguyen Added support for wizard property sheets. * misc/lstr.c: Huw D M Davies Fix FormatMessage16 at least enough to get win95 16bit printdlg working. * dlls/comctl32/tab.c: David Luyer - iSelected should be -1 if no item selected (Gerard Patel) - some of the checks for invalid items where > when they should have been >= (Marcus Meissner) - made InsertItem behave similarly to DeleteItem, ie, if the current item is after where the item is inserted, increment the selected item (David Luyer) * if1632/thunk.c: Ulrich Weigand Bugfix: Declare CALL32_CBClient[Ex] without WINAPI. * debugger/db_disasm.c: Ulrich Weigand Bugfix: (E)IP-relative offsets depend on operand, not address, size. * include/winuser.h, relay32/user32.spec, windows/user.c, include/wingdi.h: Marcus Meissner Added stub implementation for EnumDisplayDevices*. * dlls/wnaspi32/winaspi32.c: Marcus Meissner Added SC_GET_DEVTYPE. * ole/compobj.c: Juergen Schmied Added stub for OLE32.DllGetClassObject. * dlls/shell32/pidl.h, dlls/shell32/shell32_main.c, include/shlguid.h, dlls/shell32/pidl.c: Juergen Schmied More support for special pidls in SHGetSpecialFolderLocation. * graphics/psdrv/graphics.c, graphics/psdrv/pen.c, include/psdrv.h: Luc Tourangeau Implemented invisible pens. * objects/dib.c, graphics/x11drv/dib.c: Huw D M Davies Small DIB fixes. * controls/menu.c: Pascal Lessard Added a case for menu handling in win31. Tue Sep 14 11:51:02 1999 Alexandre Julliard * include/x11drv.h, objects/dib.c, graphics/x11drv/dib.c: Karl Lessard Fixed GetDIBits problems. * misc/cpu.c, multimedia/mixer.c, include/commctrl.h, include/mmsystem.h, include/ntddk.h, include/prsht.h, include/shlobj.h, include/winbase.h, include/windef.h, include/wine/obj_dataobject.h, include/wine/obj_oleaut.h: Patrik Stridvall Add support for anonymous struct/unions on compilers that implement it. Mon Sep 13 16:06:17 1999 Alexandre Julliard * controls/button.c, controls/uitools.c: Dennis Bj|rklund Fixed win9x look on checkboxes and radiobuttons. * graphics/win16drv/.cvsignore, graphics/win16drv/Makefile.in, graphics/win16drv/init.c, graphics/win16drv/prtdrv.c, if1632/thunk.c, include/callback.h, include/gdi.h, misc/.cvsignore, misc/Makefile.in, misc/printdrv.c, objects/dc.c, graphics/escape.c, graphics/psdrv/escape.c: Huw D M Davies Change interfaces to THUNK_Alloc/Free slightly and make them non-static. Remove relays for win16drv from CallBack table, instead use build to generate them directly in graphics/win16drv/prtdrv.c. If Printer AbortProc is 16bit then allocate thunk and store that as a 32bit proc in DC. Setting of abortprocs now done in the correct place (i.e. not in the driver). * objects/dib.c: Kai Morich Relaxed parameter checking for GetDIBits. * win32/device.c: Ulrich Weigand Fixed last error code when trying to load unknown VxD with CreateFile. * dlls/shell32/shell32_main.c: Andreas Mohr Pretend successful execution of SHELL_NotifyIcon*(). * controls/menu.c, relay32/user32.spec: Eric Pouech Added MenuItemFromPoint stub. * dlls/comctl32/comctl32undoc.c: Eric Pouech Fixed off by one allocation error (DPA and DSA). * multimedia/mmsystem.c: Eric Pouech Fixed crash in PlaySound thread. Sat Sep 11 16:29:00 1999 Alexandre Julliard * controls/listbox.c: Nick Holloway For Win 3.x applications, if they have either horizontal or vertical scrollbars, enable both. * dlls/advapi32/crypt.c, dlls/msacm32/internal.c, dlls/shell32/pidl.c, include/wine/winestring.h, memory/string.c: Patrik Stridvall Eliminated warnings. * controls/combo.c, controls/listbox.c: Pierre Mageau Set the mouse capture on the combo listbox. * graphics/ddraw.c: Lionel Ulmer - fixed the creation of back-buffers in DGA mode - added a check on the validity of the Locking rectangle - fixed the enumeration for DX-6.0 * dlls/comctl32/commctrl.c: Stephane Lussier Fixed RGBQUAD/COLORREF mixup in CreateMappedBitmap(). * controls/button.c: Abey George Draw the focus rectangle for buttons with BS_3STATE, BS_RADIOBUTTON, BS_CHECKBOX, BS_AUTO* styles. Fri Sep 10 14:38:20 1999 Alexandre Julliard * graphics/psdrv/driver.c, graphics/win16drv/init.c, graphics/win16drv/prtdrv.c, if1632/thunk.c, include/callback.h, include/gdi.h, include/psdrv.h, include/win16drv.h, graphics/driver.c: Huw D M Davies Winspool DocumentProperties and DeviceCapabilities should now work on native 16 bit drivers. * dlls/winspool/info.c: Huw D M Davies Fixes DeviceCapabilities for DC_PAPERSIZE. Various fixes for OpenPrinter and EnumPrinters. Separation of GetPrinter in preparation for unification with EnumPrinters. * graphics/psdrv/ppd.c, include/wingdi.h: Huw D M Davies Add support for a large number of different paper sizes to PostScript driver. * include/d3d.h: Lionel Ulmer Added definitions of COM objects for D3D 6.x support. * graphics/psdrv/font.c: Nick Holloway If there is not an exact match found for the requested font name, instead of using the first font defined for the printer, map some common font families (e.g. Arial -> Helvetica), and search again. * if1632/kernel.spec, if1632/thunk.c: Ulrich Weigand Fixed bug in CBClient routines by storing the SEGPTR in the global table and translating it on every use. * include/bitmaps/oic_sample: Abey George Changed the pixmap to look like the windows default application icon. * files/drive.c: Richard Cohen Stop crash in GetDiskFreeSpaceEx. * windows/nonclient.c: Francis Beaudet Made sure that the windows with the WS_EX_TOOLWINDOW style didn't get handled by the window manager. * controls/edit.c: Pascal Lessard Implemented the behavior around the ES_WANTRETURN style in the edit control. * windows/x11drv/keyboard.c: Stephane Lussier Pressing the delete key using an extended keyboard with numlock on is not generating anymore a WM_CHAR message. * dlls/shell32/shellpath.c: Niclas Karlsson Fixed pattern matching in PathMatchSpecA/W * dlls/shell32/shlview.c: Francois Boisvert Tabbing in the listview of the shellview. * dlls/comctl32/listview.c: Luc Tourangeau Fixed LISTVIEW_GetItemRect: the calculations were off for LVIR_BOUNDS, LVIR_SELCTBOUNDS, LVIR_LABEL when the item width is greater than the column width. Fixed WM_GETDLGCODE by removing the DLGC_WANTRTAB and adding DLGC_WANTCHARS. * dlls/shell32/shell32_main.c: Juergen Schmied Fixed crash in detach sequence. * dlls/shell32/shlfolder.c: Juergen Schmied Fixed wrong return value. * dlls/crtdll/crtdll_main.c: Juergen Schmied Prevent endless loop in except2. * tools/bug_report.pl: Adam Sacarny Now works around wine never exiting the debugger. Should put bug reports in the right place now. * ole/oleaut32.c, ole/Makefile.in, relay32/oleaut32.spec: Marcus Meissner Added stub for RegisterActiveObject(). * dlls/win32s/w32sys.c, dlls/win32s/w32sys.spec: Marcus Meissner Added stub for WIN32S16.EXP1 (most likely LoadPeResource16). Sun Sep 5 16:48:17 1999 Alexandre Julliard * loader/main.c, loader/module.c, miscemu/main.c, include/windef.h: Removed __winelib flag. * windows/driver.c, multimedia/audio.c, multimedia/dsound.c, multimedia/mci.c, multimedia/mcianim.c, multimedia/mciavi.c, multimedia/mcicda.c, multimedia/midi.c, multimedia/mixer.c, multimedia/mmaux.c, multimedia/mmsystem.c, multimedia/time.c, multimedia/winmm.rc: Eric Pouech Updated to new MM header organization. * include/multimedia.h, include/mmddk.h, include/mmsystem.h, multimedia/oss.h, multimedia/winemm.h: Eric Pouech Moved DDK level material to new include/mmddk.h file. Copied some SDK level material from include/multimedia.h file. * multimedia/mciwave.c, multimedia/mcimidi.c: Eric Pouech Updated to new MM header organization. Cleaned-up internal structures (now 32 bit only). Now using the MMSYSTEM entry points rather than the low level driver ones directly. * include/sig_context.h: Juergen Lock Fix %fs for signal handlers in the FS_sig undefined case (this patch actually from Ulrich Weigand, I only tested it). * scheduler/sysdeps.c, configure, configure.in, include/acconfig.h, include/config.h.in: Ron Record Added support of __thr_errno for reentrance on UnixWare. * windows/dialog.c: Richard Cohen No longer needs to calculate its own character size. * misc/main.c: Richard Cohen Consequential changes to default system font sizes * graphics/x11drv/xfont.c, include/x11font.h: Richard Cohen Various fixes for the X11 font mapper, particularly: - size fonts with negative heights correctly - calculate average width correctly. * objects/cursoricon.c: Francis Beaudet Use a special value in the hotspot coordinate to identify which HICON are cursors and which are icons. * controls/combo.c: Pierre Mageau Modified CBDropDown to find the best height of the listbox. Sat Sep 4 14:36:03 1999 Alexandre Julliard * configure.in, include/config.h.in, include/wine/winestring.h, memory/string.c, misc/port.c, configure: Added configure check for str[n]casecmp. * windows/timer.c: Uwe Bonnes Allow timeout of 0. Cap timer rate to SYS_TIMER_RATE. * include/windef.h: Huw D M Davies Added type PWORD. * dlls/winspool/info.c, include/winspool.h: Huw D M Davies Added loads of types, defines and declarations to winspool.h. * dlls/commdlg/cdlg_En.rc, dlls/commdlg/filedlg95.c: Francois Boisvert Fixed the height of items in the lookin combobox of the filedlg95. * controls/edit.c: Stephane Lussier Initialize the enabling state variable in the edit. * graphics/bitblt.c: Noomen Hamza The fast window frame size should be the same as the frame size used by NC_DrawFrame function. * objects/region.c: Huw D M Davies Fixed compiler warnings. * programs/regapi/regapi.c: Huw D M Davies lstrncmpi isn't a windows API, use strncasecmp instead. * memory/global.c: Fixed GMEM_ZEROINIT in GlobalRealloc (thanks to Gerard Patel). * windows/msgbox.c: Added missing HFONT type. * dlls/comctl32/imagelist.c, include/cursoricon.h, loader/main.c, objects/bitmap.c, objects/cursoricon.c, windows/class.c: Pierre Mageau Changed CopyImage to accept desiredX, desiredY and LR_COPYFROMRESOURCE. CURSORICON_FindBestIcon changed to find the correct icon. ImageList_ReplaceIcon now calls CopyImage internally. Assign a value for the hIconSm CLASS member (using CopyImage). * win32/console.c: Guy Albertelli Fixed WriteConsoleOutput and GetNumberOfConsoleInputEvents. * dlls/comctl32/propsheet.c: Thuy Nguyen Give applications a copy of the property sheet dialog template as they might modify it. * relay32/relay386.c: Marcus Meissner Relay exclude lists were not working due to some CharUpperA() somewhere else. * loader/loadorder.c, wine.ini: Huw D M Davies winspool -> winspool.drv * dlls/comctl32/comctl32.spec, dlls/comctl32/comctl32undoc.c: Uwe Bonnes Implemented StrCmpNIA like the other StrCmpXX functions. * files/profile.c: Thuy Nguyen Resolve environment variable when enumerating values. * controls/edit.c: Pascal Lessard The format rect is recalculated for each font change. MoveEnd & MoveHome improved. Fri Sep 3 16:49:17 1999 Alexandre Julliard * graphics/x11drv/dib.c, include/x11drv.h, objects/dib.c: Karl Lessard Ian Ward Dan Langlois Speed up conversion between XImages and DIBSections. * dlls/commdlg/filedlg95.c, dlls/commdlg/filedlgbrowser.c, dlls/commdlg/filedlgbrowser.h, dlls/shell32/shlview.c: Francois Boisvert Some features in the file dialog 95. * include/winnt.h, scheduler/sysdeps.c: Ulrich Weigand Removed global variable pCurrentTeb. * memory/heap.c: Ulrich Weigand HEAP_Commit/Decommit were assuming a page size of 4KB unconditionally. * include/wingdi.h: Huw D M Davies A few more DC_ defines from Win2000. * dlls/comctl32/status.c: Huw D M Davies Check that lpCreate->lpszName is non-NULL. * windows/dialog.c: Marcus Meissner More restrictive checks, so DIALOG_IsAccelerator don't loop endlessly. * controls/menu.c: Pascal Lessard Menu hides when clicked for a second time. * windows/msgbox.c: Richard Cohen - select the font into the dc before calculating the extent - make buttonheight correspond to text height + width to caption - button was "flashing" on EndDialog (must delete font AFTER EndDialog) - #defines for DlgItemIds - implement MB_RETRYCANCEL * controls/edit.c: Stephane Lussier Keep the enable state in the edit structure instead of calling IsWindowEnabled(). * include/clipboard.h, include/ttydrv.h, include/x11drv.h, ole/clipboard.c, windows/clipboard.c, windows/ttydrv/clipboard.c, windows/ttydrv/init.c, windows/user.c, windows/x11drv/clipboard.c, windows/x11drv/event.c, windows/x11drv/init.c: Noel Borthwick - Implement interprocess clipboard communication. - Support for the PRIMARY and CLIPBOARD selection atoms. - Support for the TARGETS selection format. - Expose native Windows clipboard formats through X selection targets. * objects/gdiobj.c: Richard Cohen Make stock fonts independent of mapping mode. System font should only be bold for Win31. * windows/dialog.c: Francis Beaudet Removed truncating errors that happen when converting fom dialog units to pixels. * windows/winpos.c: Abey George Check new coordinates received in WM_NCCALCSIZE message. * controls/button.c: Francis Beaudet Slight 1 pixel adjustment on the position of the radio button bitmap. * dlls/commdlg/filedlg95.c: Eric Pouech Fixed off by one allocation errors. * controls/edit.c: Pascal Lessard The backspace is now handled in the WM_CHAR message. * windows/mdi.c, windows/nonclient.c: Francis Beaudet Make sure that all MDI children have the WS_EX_MDICHILD style set. * memory/string.c: Marcus Meissner Fixed prototype order. * dlls/ntdll/exception.c: Juergen Lock Fix EXC_segv for the TRAP_sig undefined case (eg FreeBSD). * debugger/stabs.c: Eric Pouech Fixed crash. * dlls/shell32/shell32_main.c: Francis Beaudet Fixed the support for the close button in the ShellAbout dialogs. * dlls/commdlg/cdlg_Nl.rc: Klaas van Gend Added Dutch resources for PrintDlg32. * dlls/commdlg/cdlg.h, dlls/commdlg/cdlg_En.rc, dlls/commdlg/printdlg.c: Klaas van Gend Completed PrintDlg32 resource stringtable. * dlls/comctl32/tooltips.c: Francis Beaudet Added sanity checks in the cleanup code. * windows/x11drv/keyboard.c: Guy Albertelli Completed GetKeyNameText for non-character keys. * dlls/shell32/brsfolder.c: Francois Boisvert Make directories name appear in the BrowseForFolder dialog. * loader/loadorder.c: Eric Pouech Do not remove .drv from filenames. * controls/button.c: Francis Beaudet Fixed a little positioning bug with the checkbox. * windows/nonclient.c, windows/win.c, windows/x11drv/wnd.c: Abey George Fixed resizing bugs for windows with WS_THICKFRAME and WS_DLGFRAME styles. * multimedia/mci.c: Michael McCormack Changed snprintf to wsnprintfA to remove unresolved external when compiling on Solaris/Sun. * dlls/comctl32/listview.c: Marcus Meissner Implemented LVM_INSERTCOLUMNW and LVM_INSERTITEMW by using the ascii equivalents. (WinWord 97, File Open dialog) * windows/class.c: Marcus Meissner Use in GetClassInfoW the same hack for systemclasses as in GetClassInfoA (winword 97 with native comctl32). * dlls/shell32/pidl.c: Marcus Meissner Handle SHGDFIL_FINDDATA correctly in SHGetDataFromIDListW. * controls/edit.c: Gerard Patel Implemented wParam of WM_PAINT msg for edit control. * dlls/winspool/info.c: Huw D M Davies Fix off by one error in WINSPOOL_GetOpenedPrinterA. * misc/registry.c: Marcus Meissner subkey_found did not search for _all_ sub keys. Sat Aug 21 14:47:29 1999 Alexandre Julliard * dlls/commdlg/filedlg95.c, dlls/commdlg/filedlgbrowser.c, dlls/commdlg/cdlg.h, dlls/commdlg/cdlg32.c: Francois Boisvert Implemented basic browsing in the file name edit of the filedlg 95. * controls/menu.c: Stephane Lussier Avoid changing the activation state in EnableMenuItem. * include/winnt.h: Fixed #ifdef symbol for PowerPC. * ole/parsedt.c, ole/parsedt.h: Eric Pouech Only declare DateStyle in a single compilation unit. * windows/nonclient.c: Pascal Lessard Added the case of a user defined icon for the sysbutton hittest. * ole/typelib.c: Rein Klazes Fixed typelib reading to correctly use the offset of the typelib that is embedded in for example a dll file. * graphics/x11drv/dib.c: Kristian Nielsen Fixed CreateDIBSection() called with negative height to set the height positive in the created DIBSECTION, as per MS knowledgebase Q186586. * windows/painting.c: Stephane Lussier The paint rectangle return in the PAINTSTRUCT in BeginPaint should never be bigger than the client area of the window. * controls/listbox.c: Rein Klazes Make sure that an empty string never matches a listbox entry in LISTBOX_FindString(). * dlls/version/info.c: Uwe Bonnes Alignment fix. * controls/menu.c: Eric Pouech Fixed crash when accessing sysmenu. * debugger/stack.c: Eric Pouech Really do a silent backtrace when requested. * debugger/hash.c: Eric Pouech Do not set the address if the symbol is still tagged INVALID. * debugger/stabs.c: Eric Pouech Added support for N_BINCL and N_EINCL instructions. Fixed type parsing (as generated by egcs). Wed Aug 18 18:40:52 1999 Alexandre Julliard * tools/build.c: Ulrich Weigand Use typedef to work around egcs problem. * ole/*.c: Michael Veksler Removed unnecessary includes from ole related files. * ole/compobj.c, multimedia/mmsystem.c: Ulrich Weigand Adapted to WOW changes. * include/callback.h, include/winbase.h, include/wine/winbase16.h, include/wownt32.h, loader/module.c, memory/global.c, memory/selector.c, relay32/Makefile.in, relay32/kernel32.spec, relay32/wow32.spec, relay32/wowthunk.c, win32/kernel32.c, win32/ordinals.c, if1632/kernel.spec, if1632/relay.c, if1632/thunk.c: Ulrich Weigand Moved implementation of WOW routines to single file. Added all missing WOW routines, fixed WOWCallback16Ex. * multimedia/mmio.c: Eric Pouech Fixed internal buffer for 16 bit mmio MEM files. * multimedia/mci.c: Eric Pouech - some errors in cleaning up values returned by MCI drivers: this should solve the issues reported with the CD player/writer - crash when command was requested with automatic open (note, this will now gracefully report an error, not do the correct thing). * dlls/comctl32/propsheet.c: Thuy Nguyen Implemented the PSH_USEICONID/PSH_USEHICON and the PSP_USETITLE flags. * tools/build.c: Ulrich Weigand Bugfix: EFlags were passed incorrectly by CallFrom16Register. * loader/task.c: Ulrich Weigand Bugfix: restore STACK16FRAME fields in SwitchStackBack16. * tools/wrc/wrc.h, dlls/commdlg/cdlg_En.rc, tools/wrc/CHANGES, tools/wrc/parser.y: Bertho Stultiens Wrc did not check any IDs which are only 16 bit. Common dialogs had some IDs larger and that caused problems. This is now solved (I hope). ---------------------------------------------------------------- Sun Aug 15 18:52:32 1999 Alexandre Julliard * objects/cursoricon.c: Steve Tibbett Fixed cursor stretch code. * memory/selector.c: Uwe Bonnes Inhibit wraparound in comparison. * dlls/shell32/.cvsignore, dlls/shell32/Makefile.in, dlls/shell32/shellord.c, dlls/shell32/shlwapi.spec, loader/loadorder.c, relay32/builtin32.c: Juergen Schmied New internal dll, exporting already existing path functions. * include/message.h, windows/dialog.c, windows/message.c, windows/nonclient.c, controls/menu.c: Francis Beaudet Ensure that the WM_ENTERIDLE message is not sent if the wake-up event for the MSG_InternalGetMessage() call is a WM_TIMER. * rc/winerc.c, include/resource.h, include/windef.h: Patrik Stridvall GCC 3.0 has not been released yet, but it is good to be prepared. * misc/spy.c: Juergen Schmied Added resolution of LVM messages. * objects/dib.c: Gerard Patel Added protection against possible memory corruption. * objects/cursoricon.c: Steve Tibbett Fixed cursor selection to find the correct cursor when more than one available. * dlls/winspool/Makefile.in, dlls/winspool/info.c, dlls/winspool/winspool.spec, dlls/winspool/wspool.c: Thuy Nguyen Replaced a static ten element array with a dynamic pointer array. * dlls/commdlg/printdlg.c: Gerard Patel Fix special case when no printer installed. * dlls/shell32/shell.c, dlls/shell32/shell.spec: James Juran New routine DllEntryPoint for shell.dll. Loads shell32.dll, since most shell.dll functions call their 32-bit counterparts. * dlls/version/info.c: Uwe Bonnes Fixed alignment. * controls/edit.c: Pascal Lessard EM_SETSEL scrolls if outside of the visible range. "shift+home" selection improved in the edit control. * ole/parsedt.c: Removed RCS keyword. * dlls/shell32/folders.c, dlls/shell32/pidl.c, dlls/shell32/shell32.spec, dlls/shell32/shell32_main.h, dlls/shell32/shelllink.c, dlls/shell32/shellole.c, dlls/shell32/shellord.c, dlls/shell32/shellpath.c, dlls/shell32/shres.rc, dlls/shell32/shresdef.h, dlls/shell32/shv_bg_cmenu.c, include/shell.h, include/wine/undocshell.h: Juergen Schmied More use of rc files for strings and menus, fixes. First internal icons. * dlls/shell32/shlview.c: Juergen Schmied New interface: DropSource. * dlls/shell32/shlfolder.c: Juergen Schmied Better DropTarget. * dlls/shell32/shell32_main.c: Juergen Schmied Implemented SHGetFileInfo better. * dlls/shell32/iconcache.c: Juergen Schmied Protect cache with critical section. Removed hack to load icons from external shell32.dll. * dlls/shell32/dataobject.c: Juergen Schmied QueryGetData, EnumFormatEtc implemented. * dlls/shell32/classes.c: Juergen Schmied Fixed mapping of file extensions to text. * misc/ddeml.c: Juergen Schmied Fixed ascii/unicode issue for naming of the mutexes. Made mutex handles global. Fixed incorrect interpretation of return values of WaitForSingleObject. * objects/font.c: Juergen Schmied First implementation of GetCharacterPlacementA. * windows/defwnd.c, include/winuser.h: Thuy Nguyen Implemented the WM_SETICON and WM_GETICON messages. * files/drive.c: Morten Eriksen FIXME on unimplemented feature made less obtrusive. * graphics/x11drv/bitblt.c: Pascal Lessard Now the conversion in the blt functions round up the result. * tools/build-spec.txt, tools/build.c: James Juran Document use of "init" in build-spec.txt, and make build.c print a warning if someone tries to use "init" in a Win16 spec file. * loader/ne/segment.c: Michael Karcher Make sure we have a dgroup before patching prologs. * */Makefile.in, */.cvsignore: Ulrich Weigand Adapted to glue code generation changes. * loader/ne/module.c, loader/ne/segment.c, windows/winproc.c, if1632/builtin.c, if1632/relay.c, if1632/snoop.c, if1632/thunk.c, include/callback.h, include/module.h, include/snoop.h, loader/module.c, loader/task.c: Ulrich Weigand Adapted to new-style Wine thunks. Removed some now unnecessary function pointers. * include/builtin16.h, include/stackframe.h, tools/build.c: Ulrich Weigand CallTo16... / CallFrom16... Wine thunks reorganized: - Cleaner separation between core and glue code. - Argument conversion glue code now in C. - Glue code needed for 16-bit .spec files inlined. Sat Aug 14 15:53:50 1999 Alexandre Julliard * misc/comm.c: Uwe Bonnes - implemented GetCommModemStatus - fixed the DTR, CTS and COMMBREAK related subfunctions of EscapeCommFunction - added more verbose TRACEing * misc/version.c: Morten Eriksen Made GetVersionEx() behave in accordance with the specification with regard to error handling. * dlls/msvideo/msvfw32.spec, dlls/msvideo/msvideo_main.c: Mark G. Adams Added stub for DrawDibClose. * controls/combo.c: Francis Beaudet Fixed the look of the combobox's drop down button when in Win95 look. * dlls/comctl32/propsheet.c: Thuy Nguyen Added support for icons in property sheet tabs. * include/commctrl.h, tools/wrc/CHANGES, tools/wrc/genres.c, tools/wrc/parser.l, tools/wrc/wrc.h: Bertho Stultiens Version 1.0.14 of wrc. Sun Aug 8 18:56:04 1999 Alexandre Julliard * include/winbase.h, win32/time.c: Fixed SetLocalTime prototype. * ole/ole2nls.c, win32/kernel32.c, dlls/commdlg/printdlg.c, dlls/ntdll/rtlstr.c, dlls/shell32/shell32_main.c, dlls/shell32/shellpath.c, dlls/version/info.c, files/dos_fs.c, if1632/thunk.c, include/wine/winestring.h, loader/libres.c, loader/pe_resource.c, dlls/comctl32/comctl32undoc.c: Replaced a few calls to lstr* functions by their CRTDLL or libc equivalent. * memory/string.c: Added an exception handler around a few lstr* functions. * dlls/crtdll/Makefile.in, dlls/crtdll/crtdll.spec, dlls/crtdll/crtdll_main.c, dlls/crtdll/mbstring.c, dlls/crtdll/wcstring.c, dlls/ntdll/ntdll.spec, include/crtdll.h: Reimplemented multi-byte and wide-chars functions to not depend on lstr* functions; added a few missing ones; fixed a couple of bugs. Sat Aug 7 14:32:34 1999 Alexandre Julliard * include/Attic/wnet.h, include/wine/winnet16.h, include/winerror.h, include/winnetwk.h, include/winuser.h, misc/network.c, relay32/.cvsignore, relay32/Attic/mpr.spec, relay32/Makefile.in, Makefile.in, configure, configure.in, dlls/Makefile.in, dlls/mpr/.cvsignore, dlls/mpr/Makefile.in, dlls/mpr/auth.c, dlls/mpr/mpr.spec, dlls/mpr/mpr_main.c, dlls/mpr/multinet.c, dlls/mpr/nps.c, dlls/mpr/pwcache.c, dlls/mpr/wnet.c, include/netspi.h: Ulrich Weigand Separated Win16 (USER) and Win32 (MPR) network routines. Moved implementation of MPR to dlls/mpr/. Added proper headers and stubs for missing MPR routines. * misc/registry.c: Andreas Mohr Improved (sort of) RegFlushKey. * windows/winpos.c: Francis Beaudet If the window is already the topmost window in ShowWindow(SW_SHOW), it must not be activated. * windows/x11drv/event.c: Stephane Lussier WM_SYSCOMMAND message (for SC_CLOSE) should be posted not sent. * windows/dce.c, windows/x11drv/wnd.c: Stephane Lussier X11drv SetDrawable function modifies the DC origin, this translation should be reflected for the dc clipping region for CS_OWNDC and CS_CLASSDC. * windows/defdlg.c, windows/dialog.c: Abey George Set focus to the dialog in EndDialog. * libtest/Makefile.in: James Juran Make sure we compile winestub.o before trying to build a Winelib test program. * files/directory.c: Andreas Mohr Fixed case sensitivity flag. * include/commdlg.h, dlls/commdlg/printdlg.c: Klaas van Gend Implemented the return of hDevModes and hDevNames in the PRINTDLG structure of PrintDlgA(). * windows/queue.c, include/queue.h: Ove Kaaven Made hardware_event use win32-conformant parameters. * dlls/commdlg/cdlg32.c: Juergen Schmied Explicitly load shell32.dll. * dlls/comctl32/tab.c: Thuy Nguyen Take into account icons when determining tab size. * files/drive.c: Morten Eriksen Improved GetDiskFreeSpaceEx() implementation a little bit. * misc/comm.c: Uwe Bonnes - added some more Baudrates - fixed a hang in tcsetattr when the input buffer isn't empty - added more verbosity for debugging * controls/uitools.c: Francis Beaudet Handle the case when the button is really small. * windows/nonclient.c: Thuy Nguyen WS_EX_DLGMODALFRAME alone does not mean title bar, you still have to specify WS_CAPTION. Wed Aug 4 15:07:57 1999 Alexandre Julliard * configure.in, include/acconfig.h, include/config.h.in, include/dinput.h, windows/dinput.c, configure: Marcus Meissner Implemented DirectInput Joystick support (tested with WC:Prophecy). * relay32/kernel32.spec, win32/time.c: Andreas Mohr Implemented SetLocalTime. * windows/x11drv/keyboard.c: Ivan De Saedeleer Minor fix to the French Canadian keyboard. * graphics/ddraw.c: Marcus Meissner When flipping backbuffer -> frontbuffer, first exchange surfaces, then copy XImage, since the palette might only be defined in the frontbuffer. * tools/wineinstall: Joerg Mayer Create sysconfdir on install. * dlls/stress/.cvsignore: Fixed typo. * dlls/wnaspi32/winaspi32.c, if1632/relay.c, include/debugtools.h, loader/pe_image.c, win32/kernel32.c, windows/x11drv/keyboard.c, controls/listbox.c, controls/menu.c, controls/scroll.c, dlls/version/info.c, dlls/winaspi/winaspi16.c: Got rid of dsprintf and related macros. * server/mutex.c: Remove the mutex from the thread list when destroying it. * */*: Ulrich Weigand Moved various DLLs to dlls/ Sun Aug 1 14:58:02 1999 Alexandre Julliard * dlls/winaspi/winaspi16.c, if1632/snoop.c, include/winnt.h, loader/ne/segment.c, misc/error.c, msdos/devices.c, msdos/dpmi.c, msdos/int21.c, msdos/int33.c, debugger/registers.c, debugger/stack.c: Removed IP_reg, SP_reg and FL_reg definitions to avoid potential aliasing optimization problems. * dlls/ntdll/exception.c, include/miscemu.h, loader/dos/module.c, loader/signal.c: Removed SIGNAL_MaskAsyncEvents and cleaned up signal handling. * include/Attic/async.h, win32/console.c, files/Attic/async.c, files/Makefile.in, files/file.c: Removed async I/O support. * include/comm.h, misc/comm.c: Use the service thread for comm notifications. * include/sig_context.h, include/stackframe.h, loader/task.c, msdos/dpmi.c, relay32/relay386.c, win32/kernel32.c, if1632/relay.c, if1632/thunk.c: Made stack manipulation macros into inline functions. Changed a few accesses to context registers to avoid potential aliasing optimization problems. * include/miscemu.h, include/sig_context.h, include/windef.h, loader/dos/dosvm.c, memory/instr.c, dlls/ntdll/exception.c: Changed INSTR_EmulateInstruction to use a CONTEXT86 instead of a SIGCONTEXT. * Makefile.in: Remove wine.conf.man on distclean ---------------------------------------------------------------- Sat Jul 31 19:35:58 1999 Alexandre Julliard * windows/nonclient.c: Noomen Hamza Close the right window when clicking on a non active window close button. * Makefile.in: Pavel Roskin Removed the dependency on "dummy" for wine and wine.sym. * files/profile.c: Remove file from cache when flushing it (based on a patch by Ian Schmidt). * include/winnt.h: Marcus Meissner Added CONTEXT for ALPHA and MIPS. * configure.in, Make.rules.in, Makefile.in, configure: Patrik Stridvall Added support for Solaris Lint. * scheduler/debugger.c, server/debugger.c, tools/make_debug, win32/console.c, console/generic.c, console/xterm.c, graphics/enhmetafiledrv/graphics.c, graphics/enhmetafiledrv/objects.c, graphics/metafiledrv/bitblt.c, graphics/metafiledrv/graphics.c, graphics/metafiledrv/objects.c, graphics/metafiledrv/text.c, include/debugdefs.h, include/xmalloc.h, misc/xmalloc.c: Patrik Stridvall Fixed some of the issues reported by Solaris Lint. * include/pshpack4.h: Patrik Stridvall Solaris C/C++ compile fix. * msdos/dosmem.c, ole/storage32.c, windows/painting.c, controls/button.c, dlls/comctl32/monthcal.c, dlls/commdlg/filedlg95.c, dlls/commdlg/filedlgbrowser.c, graphics/ddraw.c, include/wine/obj_base.h: Patrik Stridvall Various ANSI C compability fixes. * relay32/winmm.spec, if1632/builtin.c, if1632/gdi.spec, if1632/mmsystem.spec, if1632/user.spec, include/multimedia.h, include/ntddk.h, include/olectl.h, include/winsock.h, misc/network.c, misc/system.c, misc/winsock.c, multimedia/mmsystem.c, ole/olefont.c, relay32/kernel32.spec, relay32/oleaut32.spec, relay32/user32.spec, dlls/comctl32/comctl32.spec, dlls/ntdll/exception.c, dlls/ntdll/file.c, dlls/ntdll/ntdll.spec, dlls/ntdll/rtl.c, dlls/tapi32/tapi32.spec: Patrik Stridvall Fixed some of the issues reported by winapi-check. * documentation/Makefile.in: Marcus Meissner Actually create the man/ subdirectories before installing. * if1632/kernel.spec, include/wine/winbase16.h, loader/task.c, windows/queue.c: Ulrich Weigand Implemented KERNEL.447 (WIN32_OldYield16). * windows/event.c: Ulrich Weigand Suspend WND lock before EVENT_Synchronize. * win32/device.c: Ulrich Weigand Create VxD handle only for known VxDs. * Make.rules.in, relay32/Makefile.in: Patrik Stridvall Made compilation of *.spec.c files use -fno-builtin regardless of where they are. * include/tapi.h, include/winbase.h, scheduler/thread.c, dlls/comctl32/datetime.c, dlls/comctl32/flatsb.c, dlls/comctl32/header.c, dlls/comctl32/hotkey.c, dlls/comctl32/ipaddress.c, dlls/comctl32/listview.c, dlls/comctl32/monthcal.c, dlls/comctl32/nativefont.c, dlls/comctl32/pager.c, dlls/comctl32/progress.c, dlls/comctl32/rebar.c, dlls/comctl32/status.c, dlls/comctl32/tab.c, dlls/comctl32/toolbar.c, dlls/comctl32/tooltips.c, dlls/comctl32/trackbar.c, dlls/comctl32/treeview.c, dlls/comctl32/updown.c, dlls/shell32/brsfolder.c, dlls/shell32/contmenu.c, dlls/shell32/memorystream.c, graphics/ddraw.c, dlls/avifil32/avifile.c, dlls/comctl32/animate.c, dlls/comctl32/comboex.c: Patrik Stridvall Fixed/added missing/wrong function prototypes and made internal functions static. * tsx11/ts_xshm.c, tsx11/ts_xutil.c, tools/make_X11wrappers, tsx11/ts_xf86dga.c, tsx11/ts_xf86vmode.c, tsx11/ts_xlib.c, tsx11/ts_xpm.c, tsx11/ts_xresource.c: Patrik Stridvall Fixed missing prototypes and made it work with Solaris X11. * debugger/external.c, include/wine/undocshell.h, multimedia/mcimidi.c, ole/antimoniker.c, ole/compositemoniker.c, ole/datacache.c, ole/filemoniker.c, ole/itemmoniker.c, ole/olefont.c, scheduler/thread.c, dlls/shell32/contmenu.c, dlls/shell32/folders.c, dlls/shell32/shelllink.c, dlls/shell32/shlfolder.c, dlls/shell32/shlview.c: Patrik Stridvall Eliminated warnings. * loader/ne/segment.c: Andreas Mohr Fixed the DSEG value in the SEGTABLEENTRY struct. * dlls/comctl32/comctl32.h, dlls/comctl32/flatsb.c, dlls/comctl32/pager.c, dlls/comctl32/rsrc.rc, dlls/comctl32/toolbar.c, documentation/common_controls: Eric Kohl Added builtin toolbar bitmaps. * dlls/comctl32/listview.c, dlls/comctl32/treeview.c, include/listview.h, include/treeview.h: Eric Kohl Some more messages. * dlls/advapi32/advapi32.spec, dlls/advapi32/crypt.c: Eric Kohl Added stub for CryptSetKeyParams(). * dlls/shell32/shell32.spec, dlls/shell32/shellord.c: Eric Kohl Added stubs for DAD_SetDragImage() and PathCleanupSpec(). * misc/crtdll.c, relay32/crtdll.spec: Eric Kohl Added stub for _except_handler2(). * objects/region.c: Eric Kohl Improved GetRandomRegion(). * controls/menu.c, windows/nonclient.c: Pascal Lessard Implemented the system button behavior and associated it to the system menu in win95. Also permit the SC_CLOSE item to be disabled. * misc/comm.c: Ove Kaaven Bugfixes and a fake GETBASEIRQ. * files/async.c: Ove Kaaven Made async fds nonblocking. * windows/mdi.c: Dan Langlois Removed an inappropriate if statement from MDI_ChildActivate that prevented the activation code from executing. * dlls/comctl32/monthcal.c, include/monthcal.h: Alex Priem Bugfixes & further updates for the month calendar common control. * dlls/comctl32/datetime.c, include/commctrl.h, include/datetime.h: Alex Priem Started implementing date/time common control. * graphics/psdrv/graphics.c, graphics/psdrv/ps.c: Huw D M Davies PSDRV_WriteArc shouldn't write a newpath. * controls/button.c: Rein Klazes Fix handling of WM_LBUTTONDCLICK message for buttons with certain styles. * windows/dce.c: Abey George Bug fix for updating the clipping region in nested GetDCEx calls. * windows/winpos.c: Yuxi Zhang Tried to fix the code for SetWindowPos to erase the background properly. Fri Jul 30 18:10:21 1999 Alexandre Julliard * dlls/commdlg/cdlg_En.rc, dlls/commdlg/cdlg_xx.rc, dlls/commdlg/printdlg.c, dlls/commdlg/rsrc.rc, include/winspool.h: Klaas van Gend - added Collate/NoCollate Icons to Print32 dialog (unfortunately they don't display yet). - added status strings. - added string table for internationalisation of several internal message boxes. * include/commctrl.h, include/winuser.h: Yuxi Zhang Removed duplicated defines in winuser.h and commctrl.h. Also corrected a typo for SW_MAX value. * dlls/commdlg/cdlg.h, dlls/commdlg/cdlg32.c, dlls/commdlg/filedlg95.c: Francis Beaudet Fixed a memory leak in the file dialog. * loader/loadorder.c: Huw D M Davies Strip .drv extensions to MODULE_GetLoadOrder. * dlls/comctl32/tab.c: Francis Beaudet Fixed a memory leak. * scheduler/process.c, loader/task.c: Ulrich Weigand Bugfix: Install task-entry breakpoint *after* EXE module is initialized. * graphics/psdrv/ps.c, include/psdrv.h: Luc Tourangeau Added a call to the newpath operator immediately before the arc operator. * controls/button.c: Pierre Mageau Fixed a problem when the style is BS_BITMAP or BS_ICON: the bitmap or icon needed to be centered when the button is smaller than the bitmap. * windows/mdi.c: Francis Beaudet Fixed a memory leak that occurs when we maximize/minimize an MDI child. * dlls/comctl32/updown.c: Francis Beaudet Added more support for buddy windows in the updown control. * controls/edit.c: Francis Beaudet Implemented proper win95 support for the WS_BORDER style. * controls/listbox.c: Francis Beaudet Changed the WS_BORDER style to a WS_EX_CLIENTEDGE style for the listbox control. * controls/combo.c: Francis Beaudet Fixed the border for the listbox created by the simple combobox. * ole/compobj.c, if1632/compobj.spec: Andreas Mohr Implemented CoRevokeClassObject stub needed by Acrobat 3 16 bit. * loader/ne/module.c: Ulrich Weigand GetModuleHandle16: treat Win32 modules correctly. Wed Jul 28 16:38:45 1999 Alexandre Julliard * dlls/commdlg/filedlg95.c, dlls/commdlg/filedlgbrowser.c, dlls/shell32/brsfolder.c: Juergen Schmied Fixed use of StrRetToStrN. * dlls/shell32/shell32.spec, dlls/shell32/shellord.c: Juergen Schmied StrRetToStrN[A|W|AW] new independent unicode/ascii/export functions. * documentation/dlls: Klaas van Gend Added explanation of the current DLL support. * memory/global.c: Ulrich Weigand Bugfix: fixed freshly introduced bug in GlobalLock16. * dlls/comctl32/comctl32.spec, dlls/comctl32/comctl32undoc.c: Ian Schmidt Added stubs for InitMUILanguage and COMCTL32.410. Fixed some compiler warnings. Tue Jul 27 17:10:06 1999 Alexandre Julliard * if1632/gdi.spec, if1632/thunk.c, if1632/user.spec, include/callback.h, miscemu/main.c, objects/gdiobj.c, windows/user.c: Ulrich Weigand Added FinalUserInit16/FinalGdiInit16 stubs. Call out to FinalUserInit in MAIN_EmulatorRun. * if1632/kernel.spec, memory/selector.c: Ulrich Weigand Added IsBadFlatReadWritePtr16(). * controls/edit.c: Abey George Fixed incorrect edit control behaviour in mouse message handling. * windows/message.c: Abey George Send normal mouse messages to WM_SETCURSOR when non-client mouse messages occur. * windows/winpos.c: Thuy Nguyen Check if the window has the WS_CLIPSIBLINGS style before using the DCX_CLIPSIBLINGS flag. * dlls/commdlg/Makefile.in, dlls/commdlg/cdlg.h, dlls/commdlg/cdlg32.c, dlls/commdlg/cdlg_En.rc, dlls/commdlg/filedlg.c, dlls/commdlg/filedlg95.c, dlls/commdlg/filedlgbrowser.c, dlls/commdlg/filedlgbrowser.h, include/commdlg.h, include/dlgs.h, include/tchar.h: Francois Boisvert Implemented the Win95 file open/save dialogs. * Makefile.in: Marcus Meissner Do tools/ before any of the other subdirectories, even when doing parallel makes. * memory/global.c: Ulrich Weigand Bugfix: Return selector also in CX from GlobalLock16(). * if1632/thunk.c: Ulrich Weigand More gcc bug workarounds. * graphics/psdrv/ppd.c, include/wingdi.h: Huw D M Davies Added more paper sizes and bin names to PPD parser. * windows/dinput.c: Marcus Meissner Actually return the number of events in Mouse_GetDeviceData (fixes Wing Commander Prophecy). Added timestamp and sequence generation, critical section for mousedata. Disabled mouse warping in GetDeviceData for now (generates excess mouse events). Sun Jul 25 13:15:49 1999 Alexandre Julliard * */*.spec: Ulrich Weigand Moved .spec files to corresponding dlls/ directory. * controls/listbox.c: Gerard Patel Several focus and selection problems in listboxes. * windows/dce.c: Francis Beaudet Retrieve the clipping region before setting the drawable and reset the clipping region after. * relay32/Attic/shell32.spec, dlls/shell32/brsfolder.c, dlls/shell32/pidl.c, dlls/shell32/pidl.h, dlls/shell32/shell32_main.c, dlls/shell32/shell32_main.h, dlls/shell32/shlmenu.c, include/shell.h, include/shlguid.h, include/shlobj.h, include/wine/obj_enumidlist.h, include/wine/obj_shellfolder.h: Juergen Schmied Many fixes/reimplementations. * dlls/shell32/shlview.c: Juergen Schmied Removed experimental/unused code. Use ShellFolder to get ViewObjects. Started cleanup of the contextmenu code. * dlls/shell32/shlfolder.c: Juergen Schmied Complete redesign, split into 3 implementations (Desktop, MyComputer and filesystem folders). All parsing and binding is done recursive. * dlls/shell32/shellpath.c: Juergen Schmied Implemented SHGetSpecialFolderPathA. * dlls/shell32/shellord.c: Juergen Schmied Implemented SHCreateShellFolderViewEx. * dlls/shell32/shellole.c: Juergen Schmied Removed special CoCreateClassObject and use ole functions instead. SHCreateDefClassObject implemented. * dlls/shell32/shelllink.c: Juergen Schmied Implemented access to lnk's to a IStream interface. * dlls/shell32/iconcache.c: Juergen Schmied Fixed icon background (was black). * dlls/shell32/folders.c: Juergen Schmied Fixed getting icons from filetypes. * dlls/shell32/enumidlist.c: Juergen Schmied Implemented enumeration of shell extensions, seperated enum stuff for the 3 seperate shellfolder implementations. * dlls/shell32/dataobject.c: Juergen Schmied Rewrote GetData so support multiple selections. * dlls/shell32/contmenu.c: Juergen Schmied Separated stuff for shv background contextmenu to separate file. * dlls/shell32/classes.c: Juergen Schmied New functions to access attributes in HCR. * dlls/shell32/Makefile.in, dlls/shell32/shv_bg_cmenu.c: Juergen Schmied New file. Seperate implementation of the shellview background contextmenu. * include/wine/undocshell.h: Juergen Schmied New file. Contains functions not in the official headers but widely used from other dlls. * Makefile.in: Marcus Meissner Added X11OBJS and LIBOBJS to wine dependencies (we can't add ALT_LINK). * Makefile.in: Make sure we build tools first. * if1632/kernel.spec, if1632/relay.c, if1632/wprocs.spec, memory/global.c, tools/build-spec.txt, tools/build.c: Ulrich Weigand Relay code for Win16 register functions converts arguments. New 'interrupt' keyword added (for Win16 interrupt handlers). Adapted .spec files and implementations of register routines. * include/psdrv.h, include/wine/wingdi16.h, misc/printdrv.c, graphics/psdrv/escape.c, graphics/psdrv/init.c, graphics/psdrv/ps.c, if1632/gdi.spec: Huw D M Davies {Start|End}{Doc|Page} go through DCfuncs. Implement these in the PostScript driver. Change PSDRV_Escape to use them. * loader/dos/dosvm.c: Ulrich Weigand Work around 'local extern declaration with attribute' gcc bug. * windows/dinput.c: Lionel Ulmer Implementation of SetEventNotification for the mouse driver. * ole/compobj.c: Juergen Schmied Let CoCreateInstance use LOAD_WITH_ALTERED_SEARCHPATH. * include/ole2.h: Juergen Schmied Fixed incomplete proto. * winedefault.reg: Juergen Schmied New keys nessesary for running the new shell32. * controls/static.c: Huw D M Davies Use GDI APIs to access bitmap info. * graphics/psdrv/clipping.c: Huw D M Davies Rewrote PSDRV_SetDeviceClipping to use GetRegionData API. Sat Jul 24 12:20:25 1999 Alexandre Julliard * miscemu/main.c, if1632/thunk.c, include/main.h, loader/main.c, misc/Attic/callback.c, misc/Makefile.in: Ulrich Weigand Unify startup sequence for Wine and WineLib. * windows/clipboard.c, include/clipboard.h, memory/global.c: Noel Borthwick Fix bug with pasting Wine clipboard content to external applications, by storing clipboard data on the shared system heap. * windows/x11drv/mouse.c: Achim Kaiser Draw an additional white bit for each invert bit of a cursor. * windows/x11drv/event.c: Noel Borthwick While handling the X FocusIn message in managed mode, if the window has been disabled revert the X focus back to the last focus window. * dlls/shell32/brsfolder.c, include/commctrl.h, dlls/comctl32/treeview.c: Francois Boisvert Implemented TREEVIEW_InsertItemW. * graphics/escape.c: Huw D M Davies Implemented ExtEscape. * Makefile.in: Marcus Meissner Trying to fix parallel make by doing direct subdir/subdir.o rules. * include/win.h, windows/nonclient.c, windows/x11drv/wnd.c: Sylvain St-Germain Fixed inconsistency in conditions that determines if a window requires a WM border. * graphics/x11drv/xfont.c, include/x11font.h: Huw D M Davies For large font sizes call XLoadQueryFont with a 100 pixel high font and rescale the metrics. * misc/printdrv.c, objects/dc.c, graphics/psdrv/escape.c, graphics/win16drv/init.c, include/gdi.h: Huw D M Davies Implement handling of 32 bit AbortProc. * include/process.h, include/server.h, include/wine/exception.h, include/winnt.h: Lionel Ulmer Suppressed compiler warning by using the 'unused' attribute. * debugger/Makefile.in, debugger/external.c: Kevin Holbrook Added utility function to invoke external debugger. * multimedia/.cvsignore, multimedia/winmm.rc, multimedia/winmm_En.rc, multimedia/winmm_Fr.rc, relay32/builtin32.c: Eric Pouech Added WINMM resources. * multimedia/Attic/mcistring.c, multimedia/Makefile.in: Eric Pouech Removed obsoleted mcistring.c. Added support for resources. * multimedia/mcianim.c, multimedia/mciavi.c, multimedia/mcicda.c, multimedia/mcimidi.c, multimedia/mciwave.c: Eric Pouech Fixed return values for some messages in DriverProc (MCI_GETDEVCAPS & MCI_STATUS) for mciSendString. * multimedia/time.c: Eric Pouech Spread the use of MM crit sect. * multimedia/mmsystem.c: Eric Pouech Moved some MCI functions to mci.c. Now loads error messages from string table. Spread the use of MM crit sect. * multimedia/mci.c: Eric Pouech Added parsing & storing of command tables. Merged some MCI functions from mmsystem.c. * include/multimedia.h: Eric Pouech Removed some no longer used prototypes. Added command tables to MCI structure. * include/mmsystem.h: Eric Pouech Fixed buggy prototype. * debugger/types.c: Kevin Holbrook Avoid crashing on a bad symbol address of 0x0000. * misc/w32sys.c: Fixed GetW32SysVersion16 return type. * include/commdlg.h, include/module.h, loader/module.c, relay32/utthunk.c, dlls/commdlg/colordlg.c, dlls/commdlg/filedlg.c, dlls/commdlg/finddlg.c, dlls/commdlg/fontdlg.c, dlls/commdlg/printdlg.c, if1632/wprocs.spec: Ulrich Weigand Removed MODULE_GetWndProcEntry16(). Use 32-bit window procedures in COMMDLG instead. * configure, configure.in: Eric Pouech Fixed cut&paste bug. * include/docobj.h, include/wine/obj_base.h, include/wine/obj_dataobject.h, include/wine/obj_dragdrop.h, include/wine/obj_inplace.h, include/wine/obj_olefont.h, include/wine/obj_oleundo.h, include/wine/obj_propertystorage.h, include/wine/obj_storage.h: Paul Quinn Add a few stubs, some C++ compatibility, and fix a few types. * include/initguid.h, ole/guid.c: Albert den Haan Declare only one instance of GUID_NULL. * dlls/comctl32/imagelist.c: Pierre Mageau Fixed various problem with ImageList_Draw. * windows/dialog.c: Stephane Lussier Re-enable the owner window in the EndDialog(). * dlls/comctl32/propsheet.c: Thuy Nguyen Fixed notifications. * if1632/thunk.c: Ulrich Weigand Always retrieve Callout routines using GetProcAddress(). * windows/defwnd.c: Abey George Send WM_CONTEXTMENU on WM_RBUTTONUP, not WM_RBUTTONDOWN. * windows/x11drv/keyboard.c: Huw D M Davies Fixed compiler warning. * dlls/winspool/info.c: Huw D M Davies Let through more flags to EnumPrinters. Fixes for GetPrinter/GetPrinterDriver. * graphics/psdrv/color.c, graphics/psdrv/init.c, graphics/psdrv/ps.c: Huw D M Davies Fix stupid `rubbish at end of %%Title' bug. Don't complain about palette relative RGBs. If output param to CreateDC is NULL default to `LPT1:' - Hack. Fri Jul 23 19:33:24 1999 Alexandre Julliard * configure, configure.in, include/config.h.in, include/wine_gl.h: Lionel Ulmer Better detection of OpenGL. * include/callback.h, include/stackframe.h, misc/Attic/callback.c, tools/build.c, if1632/thunk.c: Ulrich Weigand Bugfix: Reverted CallTo16 routines to STDCALL convention. * objects/font.c: Huw D M Davies String to GetTextExtentPoint is not necessarily 0 terminated. Fix function name `32's in comments - API naming madness makes this worthwhile. * dlls/winspool/info.c, graphics/driver.c, graphics/psdrv/README, include/winspool.h, relay32/Attic/winspool.spec: Huw D M Davies EnumJobs stub. Update graphics/psdrv/README. Add warnings to DRIVER_GetDriverName. * windows/mdi.c: Eric Pouech Fixed some bad ptr occurrence in this class WndProc. * graphics/ddraw.c, include/options.h, misc/main.c, windows/x11drv/main.c: Lionel Ulmer - Added a new option 'noxshm' - Added a 16bpp -> 32 bpp conversion function * windows/syscolor.c: Gerard Patel Change color gray text to 128 128 128 for win9x look. Tue Jul 20 15:13:20 1999 Alexandre Julliard * scheduler/debugger.c: Do not output text in OutputDebugStrAW when not being debugged * windows/mdi.c: Noomen Hamza MDIDestroyChild: MDI window menu item was deleted only if the current destroyed child was active. * dlls/comctl32/propsheet.c: Gerard Patel Reset disabled style for the dialog boxes set on property pages. * tools/wrc/dumpres.c, tools/wrc/genres.c, tools/wrc/newstruc.c, tools/wrc/newstruc.h, tools/wrc/parser.l, tools/wrc/parser.y, tools/wrc/wrc.c, tools/wrc/wrc.h, tools/wrc/wrctypes.h, tools/wrc/CHANGES: Bertho Stultiens - Generalized the distinction between 2 and 4 byte integers slightly through a new parser state. The is now a warning when a 2 byte integer is larger than 16 bit (and is truncated). - Fixed a couple of cosmetic things in the DLGINIT stuff so that dumping of this type will work as expected. - Added generalized language/version/characteristics support to the DLGINIT resource type. Ulrich Czekalla - Added support for DLGINIT resource-type. - Added string continuation and embedded quoting. - Added numeric IDs for icons in controls. Eric Pouech - Bugfix: Distinguish between 2 and 4 byte integers in RCDATA. Sun Jul 18 18:42:29 1999 Alexandre Julliard * misc/Attic/string.c, misc/Makefile.in: Albert den Haan Remove string.c because all of its functions were moved to crtdll.c where they belonged. * tools/wrc/dumpres.c, tools/wrc/genres.c, tools/wrc/newstruc.c, tools/wrc/parser.l, tools/wrc/preproc.c, tools/wrc/readres.c, tools/wrc/utils.c, tools/wrc/wrc.c, tools/wrc/writeres.c, debugger/display.c, dlls/winaspi/winaspi16.c, dlls/wnaspi32/winaspi32.c: Patrik Stridvall Make it possible to compile with GNU C's -I- option. * loader/dos/dosvm.c: Eric Pouech Work around gcc sig11 fault. * objects/gdiobj.c: Thuy Nguyen Fixed rounding in MulDiv. * graphics/psdrv/Makefile.in, graphics/psdrv/clipping.c, graphics/psdrv/init.c, graphics/psdrv/ps.c, include/psdrv.h: Luc Tourangeau - implementation of SetDeviceClipping - coordinate system origin fix * win32/kernel32.c: Ulrich Weigand Work-around for compiler bug. * dlls/comctl32/treeview.c, include/commctrl.h, include/treeview.h: Alex Priem - Implementation of simple comctl32 v5.0 changes. - TVM_SORTCHILDRENCB also accepts TVI_ROOT as a valid hParent. * dlls/advapi32/security.c: Ian Schmidt Added pointer validation and additional sanity check to IsValidSid(). * controls/uitools.c: Dennis Bj|rklund Small fix in UITOOLS95_DrawRectEdge(). Also a fix to draw scrollbar-buttons more like in win9x. * windows/painting.c: Eric Pouech In WIN_UpdateNCRgn, do not send in WM_NCPAINT a region that is used afterwards, but a copy of it. * objects/region.c: Eric Pouech Check better that handles are actual handles to a region. * windows/dce.c: Lawson Whitney Stop DCE_GetVisRect dereferencing a null wndPtr. * configure.in, documentation/.cvsignore, documentation/Makefile.in, documentation/wine.conf.man.in, documentation/wine.man.in, Make.rules.in, README, configure: James Juran Andreas Mohr Updated README and man page. Split documentation for wine.conf into new wine.conf(5) manpage. * include/ole2.h, include/winerror.h, ole/Makefile.in, ole/clipboard.c, ole/ole2.c, ole/ole2stubs.c, ole/olecli.c: Noel Borthwick Implemented the OLE Clipboard API. * windows/winpos.c: Abey George Validate the parent with the child window client rectangle when the parent's update region is not empty. * include/win.h, windows/painting.c: Francis Beaudet Delay WM_NCPAINT message until the "painter's algorithm" kicks in. * controls/combo.c: Francis Beaudet Fixed fake WM_LBUTTONUP message. * include/winversion.h, misc/version.c: Ian Schmidt Added version information for Win98. * include/commctrl.h: Alex Priem Macro definitions used SNDMSG instead of SendMessage[AW]. Bad. * misc/main.c: Eric Pouech debug_(snoop|relay)_(exclude|include)list => fixed allocation, modules are now stored uppercase. * controls/button.c: Francis Beaudet Implemented the BS_ICON style. * windows/dialog.c: Ove Kaaven CreateDialogParamA should not call CreateDialogParamW, because that'd create a dialog box with a Unicode dialog procedure... * controls/scroll.c: Dennis Bj|rklund Win9x look & feel on scrollbars. * graphics/psdrv/README, graphics/psdrv/init.c, include/psdrv.h: Thuy Nguyen Introduced a [psdrv] section in wine.conf with a ppdfile value specifying the path and name of the PPD file. * dlls/comctl32/updown.c, include/updown.h: Sylvain St-Germain Implementation of the updown buddy windproc subclassing for the handling of keyboard up and down arrow. * DEVELOPERS-HINTS: Jim Aston Updated documentation to reflect renamed header. * misc/winsock.c: Ove Kaaven Added missing include netinet/tcp.h, for TCP_NODELAY. * dlls/comctl32/imagelist.c: Luc Tourangeau GetIcon bug fix. Thu Jul 15 16:09:05 1999 Alexandre Julliard * include/module.h, loader/ne/module.c: Uwe Bonnes Add WINAPI for EntryAddrProc. * misc/ddeml.c: Keith Matthews Minor bug fixes in DdeNameService, also changes to move towards process-safe code. * controls/button.c: Dennis Bj|rklund Win9x look & feel on buttons and a fix for ownerdrawn buttons (background set to COLOR_BTNFACE). * if1632/kernel.spec: Ulrich Weigand GlobalSmartPageUnlock() stub added. * miscemu/Attic/emulate.c, miscemu/Makefile.in, miscemu/main.c, relay32/Makefile.in, tools/build.c, Make.rules.in, Makefile.in, configure, configure.in, dlls/Makefile.in, dlls/win87em/.cvsignore, dlls/win87em/Makefile.in, dlls/win87em/emulate.c, graphics/win16drv/Makefile.in, if1632/Makefile.in, memory/instr.c: Ulrich Weigand Use position-independent code in assembly glue when building .so. Include if1632/ and graphics/win16drv/ into WineLib. Move miscemu/emulate.c into dlls/win87em/. * include/multimedia.h: Eric Pouech Changed way of allocation open mci drivers (array => list); this list is now stored on a per process basis. * multimedia/mcianim.c, multimedia/mciavi.c, multimedia/mcicda.c: Eric Pouech Removed fixed size array to store specific data (now using mci(Set|Get)DriverData to store specific data). Make use of default debugtools.h channel. Added CALLBACK attribute to DriverProc. * multimedia/mci.c: Eric Pouech Changed way of allocation open mci drivers (array => list). First valid ID for mci devices is now 1 (some progs were testing this value). Started implementing mci command table resources. Handled closing on MCI_ALL. * multimedia/mcimidi.c: Eric Pouech Removed fixed size array to store specific data (now using mci(Set|Get)DriverData to store specific data). Deferred opening of low-level device until play is requested. * multimedia/Attic/mcistring.c: Eric Pouech Fixed return value for 'open' command. Changed way of allocation open mci drivers (array => list). * multimedia/mciwave.c: Eric Pouech Removed fixed size array to store specific data (now using mci(Set|Get)DriverData to store specific data). Fixed mmio chunk lookup on odd size 'fmt ' chunks. * multimedia/midi.c: Eric Pouech Uniformized use of fd to midi device. Now allocating memory on system heap. Fixed bug when stopping all notes. * multimedia/mmsystem.c: Eric Pouech Cosmetic fixes. Changed way of allocation open mci drivers (array => list). Started implementing mci command table resources. * multimedia/time.c: Eric Pouech No longer calling mm timers callbacks with mm timer crit sect locked. * misc/registry.c: Marcus Meissner ERROR_MORE_DATA requires to write the needed number of bytes into the lpcchX value (verified against NT3.51 advapi32.dll). * include/winnt.h, win32/device.c: Ulrich Weigand Fixed some CONTEXT86 vs. CONTEXT mismatches. * include/neexe.h, loader/ne/segment.c: Ulrich Weigand Added support for 32-bit NE code segments. * dlls/comctl32/treeview.c: Alex Priem Fix a hang when we process WM_STYLECHANGED. Small optimization in TREEVIEW_DrawItem. Fix debugging crash in TREEVIEW_Expand. Mon Jul 12 13:46:38 1999 Alexandre Julliard * dlls/shell32/pidl.h: Marcus Meissner Added missing prototype for ILFindChild(). * dlls/advapi32/security.c, loader/dos/dosmod.c, misc/network.c: Eric Pouech Compiler warnings fix. * misc/comm.c: Eric Pouech Dumb fixes. * if1632/kernel.spec, loader/task.c: Ulrich Weigand Fixed bugs introduced by 'register' and 'return' function changes. * graphics/ddraw.c: Marcus Meissner Fixed DirectDrawSurface::Flip, do not change flags, exchange the low level physical surfaces (verified for XLIB with WC Prophecy). Sun Jul 11 17:20:06 1999 Alexandre Julliard * windows/keyboard.c, windows/user.c, windows/win.c, misc/system.c, misc/toolhelp.c, misc/w32sys.c, tools/build-spec.txt, tools/build.c, win32/kernel32.c, memory/global.c, memory/local.c, include/builtin16.h, loader/ne/module.c, loader/task.c, if1632/kernel.spec, if1632/keyboard.spec, if1632/system.spec, if1632/thunk.c, if1632/toolhelp.spec, if1632/user.spec, if1632/w32sys.spec, if1632/dummy.c: Take advantage of the new registers saved in the STACK16FRAME to turn some 'register' functions into normal functions. Removed the few remaining 'return' functions to simplify relay handling. * ipc/Attic/hash_test.c, ipc/Attic/run_tests, ipc/Attic/shm_block.c, ipc/Attic/shm_fragment.c, ipc/Attic/shm_fragment_test.c, ipc/Attic/shm_main_blk.c, ipc/Attic/shm_semaph.c, ipc/Attic/shm_semaph_test.c, ipc/Attic/wine_test_stub.c, loader/signal.c, loader/task.c, memory/atom.c, memory/global.c, misc/ddeml.c, windows/message.c, windows/win.c, windows/x11drv/event.c, Makefile.in, configure, configure.in, include/Attic/dde_atom.h, include/Attic/dde_mem.h, include/Attic/dde_proc.h, include/Attic/shm_block.h, include/Attic/shm_fragment.h, include/Attic/shm_main_blk.h, include/Attic/shm_semaph.h, include/dde.h, ipc/Attic/.cvsignore, ipc/Attic/Makefile.in, ipc/Attic/README, ipc/Attic/TEST_FRAGMENT.std, ipc/Attic/bit_array.c, ipc/Attic/bit_array_test.c, ipc/Attic/dde.tex, ipc/Attic/dde_atom.c, ipc/Attic/dde_atom_test.c, ipc/Attic/dde_mem.c, ipc/Attic/dde_mem_test.c, ipc/Attic/dde_proc.c, ipc/Attic/dde_proc_test.c, ipc/Attic/generic_hash.c, ipc/Attic/generic_hash.h: Marcus Meissner Removed the old, historical and no longer working IPC support. * if1632/.cvsignore, if1632/Makefile.in, if1632/builtin.c, if1632/relay.c, if1632/snoop.c, if1632/thunk.c, include/builtin16.h, include/callback.h, include/module.h, include/stackframe.h, misc/Attic/callback.c, miscemu/main.c, relay32/.cvsignore, relay32/Makefile.in, scheduler/syslevel.c, tools/build.c, Make.rules.in: Ulrich Weigand Modularized CallFrom/To16 routines. Adapted dependent routines, 16-bit snoop/relay debugging, and make rules. * windows/message.c: Gerard Patel Revert last change in window activation on mouse click. * memory/global.c: Rein Klazes Fixed a case when GlobalSize did not return zero after an error. Sat Jul 10 13:16:56 1999 Alexandre Julliard * server/socket.c: Howard Abrams Renamed static global variable 'iovec' to 'myiovec'. * windows/dinput.c, memory/virtual.c, misc/registry.c, misc/winsock.c, multimedia/joystick.c, scheduler/client.c, scheduler/thread.c, server/console.c, server/file.c, server/pipe.c, server/thread.c, win32/console.c, win32/device.c, win32/file.c, configure, configure.in, debugger/break.c, debugger/msc.c, debugger/source.c, debugger/stabs.c, files/directory.c, files/dos_fs.c, files/file.c, include/config.h.in, include/multimedia.h, include/windef.h, loader/pe_image.c: Howard Abrams Added checks for sys/errno.h, sys/signal.h and sys/mman.h. * windows/dialog.c: Ulrich Weigand Create dialog window using CreateWindowEx16/W depending on template type, not dialog procedure type. * dlls/shell32/shlfolder.c: Francois Boisvert Made IShellFolder::fnParseDisplayName return a relative pidl. * dlls/comctl32/comctl32.h, dlls/comctl32/monthcal.c, dlls/comctl32/rsrc.rc, include/commctrl.h, include/monthcal.h: Alex Priem First try at the month calendar common control. Main features basically OK. * graphics/psdrv/init.c, include/winspool.h, dlls/winspool/info.c: Huw D M Davies Implemented GetPrinterA and GetPrinterDriverA. * controls/button.c: Luc Tourangeau Added BN_CLICKED notification in WM_SETFOCUS. * dlls/shell32/shellpath.c, dlls/shell32/shlfolder.c, dlls/shell32/shlmenu.c, dlls/shell32/shlview.c, dlls/shell32/shres.rc, include/docobj.h: Juergen Schmied Small fixes. * relay32/Attic/shell32.spec, dlls/shell32/shellord.c: Juergen Schmied Implemented StrToOleStrN. Fixed crash in ShellExecuteEx. Implemented SHRegOpenKeyA, SHRegQueryValueExA, StrToOleStr[A|W]. Stubs for DoEnvironmentSubst[A|W], PathProcessCommand[A|W]. * dlls/shell32/Makefile.in, dlls/shell32/memorystream.c: Juergen Schmied IStream interface for file access. * dlls/shell32/iconcache.c, dlls/shell32/shell32_main.c, dlls/shell32/shell32_main.h: Juergen Schmied Fixed crash during second DLL_PROCESS_DETACH if the dll refcount reached zero after the second one (memory freed twice). * dlls/shell32/pidl.c, dlls/shell32/pidl.h: Juergen Schmied Some more pidl-types. Implementation of ILIsParent. * dlls/shell32/shelllink.c: Juergen Schmied Completely rewritten. IPersistStream interface implemented. * dlls/shell32/shellole.c: Juergen Schmied DLLGetClassObject/Classfactory: create objects by CLSID not IID. * misc/main.c: Ulrich Weigand Bugfix: exit() replaced by ExitProcess(). * memory/local.c: Ulrich Weigand Bugfix: correctly cope with end > 0xfffe. * library/winestub.c: Ulrich Weigand Call ExitProcess() after WinMain() returns. * loader/ne/module.c: Ulrich Weigand Improved behaviour of GetModuleHandle16 w.r.t dummy modules. Don't try to call WEP of dummy modules in FreeLibrary16(). * include/winreg.h, misc/registry.c: Huw D M Davies Added `const's to some registry API functions. * winedefault.reg: Ove Kaaven Added a couple of DirectX CLSID entries. This makes Unreal completely independent of a windows installation. * ole/ole2nls.c: Dave Pickles GetTimeFormat() should return LocalTime not SystemTime. * programs/wcmd/ChangeLog, programs/wcmd/README, programs/wcmd/batch.c, programs/wcmd/builtins.c, programs/wcmd/directory.c, programs/wcmd/wcmd.h, programs/wcmd/wcmdmain.c, programs/wcmd/wcmdrc.rc: Dave Pickles FOR and IF commands added. MOVE command added, but no wildcard support. Redirection added. Fixed TIME (was reporting in GMT). More help text. * dlls/comctl32/tab.c: Abey George Sometimes the text on a tab control got truncated. * controls/combo.c: Abey George Fixed the height of the dropped list when there are few items in the list. * include/message.h, include/ttydrv.h, include/x11drv.h, scheduler/synchro.c, windows/event.c, windows/ttydrv/event.c, windows/winpos.c, windows/x11drv/event.c, windows/x11drv/keyboard.c, windows/x11drv/monitor.c, windows/x11drv/wnd.c: Ulrich Weigand Removed all EVENT_Synchronize( FALSE ) calls; use a periodic callback calling XFlush() instead. * include/psdrv.h, graphics/psdrv/Makefile.in, graphics/psdrv/bitblt.c, graphics/psdrv/bitmap.c, graphics/psdrv/brush.c, graphics/psdrv/init.c, graphics/psdrv/ps.c: Huw D M Davies Added patterned brushes (level 2 PostScript only). Simple PatBlt for PATCOPY, WHITENESS and BLACKNESS. * dlls/comctl32/treeview.c: Alex Priem Implementation of TVM_SORTCHILDREN. Massaged TVM_SORTCHILDRENCB a bit to use the same code path. * loader/task.c: Ulrich Weigand Fix InitTask() to work if DGROUP was manually resized. * dlls/advapi32/security.c, relay32/Attic/advapi32.spec: Ian Schmidt Added stub for SetThreadToken(), required by Office 2000. * include/commdlg.h: Ulrich Weigand Bugfix: COMMDLG hook procedures were not CALLBACK. * ole/stg_stream.c: Thuy Nguyen It is possible for a stream to have both small block and big block chain as NULL. * loader/ne/module.c: Marcus Meissner Made string compare case insensitive in GetModuleHandle16() as a quick fix for WinWord 6. * misc/network.c, relay32/mpr.spec: Juergen Schmied Added stub for WNetGetUniversalName[A|W]. * graphics/x11drv/palette.c: Juergen Schmied Fixed crash due to invalid GDI_Obj. * objects/metafile.c: Juergen Schmied Fixed crash due to invalid pointer. ---------------------------------------------------------------- Sun Jul 4 16:09:20 1999 Alexandre Julliard * windows/*.c, ole/*.c, files/*.c, multimedia/*.c: Converted to the new debug interface, using script written by Patrik Stridvall. * include/windef.h, include/winreg.h, tools/make_X11wrappers, tsx11/ts_xf86vmode.c, Makefile.in, graphics/ddraw.c, include/basetsd.h, include/ntdef.h, include/ts_xf86vmode.h, include/winbase.h: Patrik Stridvall Started on an implementation of Win64 for use on 64 bit platforms. * windows/nonclient.c: Noomen Hamza Windows should be activated in these cases: 1- when we click on non active window. 2- when we cancel a moving or resizing of a non active window. * documentation/distributors: Marcus Meissner Added sample wine.conf. * graphics/ddraw.c, include/keyboard.h, include/ttydrv.h, include/x11drv.h, objects/dc.c, objects/gdiobj.c, windows/dinput.c, windows/ttydrv/init.c, windows/ttydrv/keyboard.c, windows/x11drv/init.c, windows/x11drv/keyboard.c: Patrik Stridvall Moved code to the X11 driver. * include/winuser.h, loader/resource.c, relay32/user32.spec: Joshua Thielen Fixed DestroyAcceleratorTable and implemented CreateAcceleratorTableW. * windows/win.c: Uwe Bonnes WIN_FindWindow: use GetExeptr(pWnd->hInstance) for CLASS_FindClassByAtom. * controls/scroll.c: Ove Kaaven Fixed check for whether to call SetWindowPos when showing a window scroll bar. * ole/typelib.c: Marcus Meissner Check for complete lcid or just the primary language id in the registry lookups (fixes one FirstClassClient 32 problem). * windows/message.c: Per Ångström Fixed a problem with apps that override the default behaviour on WM_MOUSEACTIVATE message (main window was not activated). * loader/pe_resource.c: Marcus Meissner When enumerating resource, only use the lower 31 bit of the name as the offset (for the highest bit is '1'). Should fix wine-net/257. * relay32/ntdll.spec, tools/wrc/writeres.c, dlls/ntdll/rtl.c, misc/wsprintf.c, multimedia/mcimidi.c: Patrik Stridvall Fixes for compile on non-Intel platforms. * dlls/advapi32/eventlog.c, dlls/advapi32/security.c, dlls/advapi32/service.c, include/ntddk.h, include/ntsecapi.h, include/winbase.h, include/windef.h, include/winnt.h, include/winreg.h, include/winsvc.h, include/wtypes.h: Patrik Stridvall Fixed/moved/added missing/wrong function prototypes. * dlls/commdlg/cdlg_Da.rc, documentation/status/internationalisation, programs/progman/Da.rc, resources/sysres_Da.rc: Henrik Olsen Cleanup of the Danish support. * windows/winpos.c: Yuxi Zhang Fix a bug in SetWindowPos to prevent parent from erasing its child painting area when parent window and child window don't have WS_CLIPCHILDREN and WS_CLIPSIBLINGS. * windows/defwnd.c: Yuxi Zhang Make defwndproc erase the correct location. Sat Jul 3 16:01:44 1999 Alexandre Julliard * relay32/crtdll.spec, windows/dinput.c, dlls/comctl32/propsheet.c, dlls/comctl32/trackbar.c, dlls/version/resource.c, if1632/relay.c, include/win.h, loader/elf.c, loader/pe_image.c, misc/crtdll.c, misc/shell.c, multimedia/dsound.c, dlls/advapi32/advapi.c, dlls/advapi32/eventlog.c, dlls/avifil32/avifile.c: Marcus Meissner some small include fixes, some checks for NULL ptrs, loader/elf.c: fixed the "lib" insertion crtdll: added fsopen() dinput: return that we are attached. * controls/button.c: Reverted previous change. * controls/edit.c: Gerard Patel Cancel pending notifications when EM_SETMODIFY is called. * dlls/comctl32/treeview.c: Alex Priem Fix a crash when doing sorted inserts at top level. * windows/nonclient.c: Ove Kaaven Reworked nonclient drawing code. Win31 look now works more like real Win31, so apps like Delphi 1.0 no longer go into infinite recursion etc. Fixed a couple of bugs in win95 look too, but not as thoroughly (e.g. WS_EX_WINDOWEDGE is still not handled). * windows/sysmetrics.c: Ove Kaaven SM_C[XY]FRAME is BorderWidth + 1. * memory/local.c: Ulrich Weigand Bugfix: LocalInit with start == 0 always places heap at end of segment. * loader/task.c: Ulrich Weigand Bugfix: TASK_CallToStart didn't pass correct hInstance to app. * loader/dos/module.c, loader/ne/module.c, loader/pe_image.c, loader/task.c, miscemu/main.c, scheduler/process.c, include/module.h, include/process.h, include/task.h, loader/main.c: Ulrich Weigand On NE process creation, move major part of NE EXE module loading and NE instance creation into the child process. * documentation/gui: Ove Kaaven Window style updates. * libtest/guitest.c: Ove Kaaven Some enhancements, and removal of C++ constructs. * graphics/d3ddevices.c, graphics/ddraw.c, graphics/ddraw_private.h: Marcus Meissner Implemented chains of surfaces. This allows an unlimited number of backbuffers, and other attached surfaces (zbuffers, alpha buffers, whatever). * files/file.c, relay32/kernel32.spec: Andreas Mohr Added UnlockFileEx stub. * documentation/status/internationalisation, resources/sysres_Ca.rc, resources/sysres_Es.rc: Jose Marcos Lopez Caravaca Added missing 61762 entry on system resources in Spanish and Catalonian languages. * controls/scroll.c: Gerard Patel Make GetScrollInfo return scroll pos when program requests thumb pos outside drag operation. Sun Jun 27 15:40:44 1999 Alexandre Julliard * graphics/d3d_private.h: Eric Pouech Converted to the new debug interface. * win32/console.c: Marcus Meissner ReadConsoleA: use ir as pointer to (req+1). * windows/painting.c: Gerard Patel Remove the validated child area from the update region of parent for windows without WS_CLIPCHILDREN style. * debugger/db_disasm.c: Ulrich Weigand Bugfix: Grp8 instructions have *byte* BitOffset operand. * msdos/vxd.c: Ulrich Weigand Bugfix: missing WINAPIs added. * ole/ole2.c: Marcus Meissner OleMetaFilePictFromIconAndLabel16: slightly broken, use LPOLESTR16. * files/file.c: Gerard Patel Return ERROR_DISK_FULL for WriteFile. * programs/cmdlgtst/cmdlgtst.c: Eric Williams Fixed missing return after about dialog. Sat Jun 26 19:09:11 1999 Alexandre Julliard * msdos/*.c, misc/*.c, miscemu/*.c, graphics/*.c: Converted to the new debug interface, using script written by Patrik Stridvall. * scheduler/thread.c, tools/build.c, win32/device.c, win32/kernel32.c, win32/ordinals.c, windows/win.c, loader/ne/module.c, loader/ne/segment.c, memory/global.c, memory/local.c, memory/selector.c, misc/callback.c, misc/error.c, misc/windebug.c, miscemu/emulate.c, msdos/devices.c, msdos/dpmi.c, msdos/int09.c, msdos/int10.c, msdos/int11.c, msdos/int12.c, msdos/int13.c, msdos/int15.c, msdos/int16.c, msdos/int17.c, msdos/int19.c, msdos/int1a.c, msdos/int20.c, msdos/int21.c, msdos/int25.c, msdos/int26.c, msdos/int29.c, msdos/int2a.c, msdos/int2f.c, msdos/int33.c, msdos/int3d.c, msdos/int41.c, msdos/int4b.c, msdos/int5c.c, msdos/interrupts.c, msdos/vxd.c, msdos/xms.c, dlls/ntdll/exception.c, dlls/ntdll/rtl.c, dlls/winaspi/winaspi16.c, if1632/builtin.c, if1632/relay.c, if1632/snoop.c, if1632/thunk.c, include/callback.h, include/dosexe.h, include/miscemu.h, include/msdos.h, loader/dos/dosvm.c, loader/task.c: Changed CONTEXT into CONTEXT86 everywhere we really want an i386 context. Added #ifdef __i386__ around accesses to 386 registers in the generic CONTEXT structure. * include/winnt.h: Added CONTEXT86 definition. Added PowerPC context as an example (not tested). * relay32/relay386.c, relay32/snoop.c, include/wine/exception.h: Fixes for non-i386 compiling. * */*: Patrik Stridvall ANSI C fixes. Removed warnings. Made the include files self-sufficient. Some Solaris fixes. * relay32/comctl32.spec, dlls/comctl32/comctl32undoc.c, include/commctrl.h: Eric Kohl Fixed DPA_LoadStream and improved DPA_Merge. * dlls/comctl32/treeview.c: Eric Kohl Added check for invalid parent item. * dlls/shell32/shellord.c, relay32/shell32.spec: Eric Kohl Added SHDoDragDrop() stub. * objects/region.c: Eric Kohl Improved GetRandomRegion(). * misc/network.c, relay32/mpr.spec: Eric Kohl Added WNetRemoveCachedPassword() stub. * dlls/comctl32/updown.c: Eric Kohl Store buddy window. * include/tooltips.h, dlls/comctl32/tooltips.c: Eric Kohl Started WM_NOTIFYFORMAT support. * dlls/comctl32/rebar.c: Eric Kohl Better ComboBoxEx placement. * loader/module.c: Dave Pickles Ensure that the command-line passed to the various *CreateProcess functions contains the path to the program being invoked. * windows/x11drv/wnd.c: Lars Heete Prevent bad window X error. * windows/mdi.c, windows/sysmetrics.c: Abey George The system menu icon on a MDI child window was corrupted when the child frame window is maximized within the main frame when the wine look is Windows 95. * controls/scroll.c, windows/defwnd.c: Slava Monich In case if scrollbar has the same background color as the window it belongs to, it needs to be filled with 0x55aa bitmap brush. * misc/registry.c: Marcus Meissner Fixed the stringcompare in _find_or_add_*() (was missing tolower()s). * debugger/memory.c: Juergen Lock Fix (well kludge around) FreeBSD's `Invalid address' errors. * controls/edit.c: Chris Morgan James Abbatiello Draw a 3D border around edit controls when not in WIN31_LOOK. * controls/button.c: Chris Morgan James Abbatiello Only draw a black border around normal buttons when in WIN31_LOOK. * multimedia/mmio.c: Eric Pouech Fixed alignment and position when looking for mmio chunks. * multimedia/mmsystem.c: Eric Pouech No longer using global vars (shared data) for mm timers, but a specific structure for each attached process. Fixed alignment and position when looking for mmio chunks. Fixed WAVE mapper handling in waveGetCaps. * include/multimedia.h, multimedia/time.c: Eric Pouech No longer using global vars (shared data) for mm timers, but a specific structure for each attached process. * documentation/distributors: Marcus Meissner Wrote a small document on how to package WINE for distributors. * windows/nonclient.c: Noomen Hamza SetCursorPos() function was called with a window coordinates parameter. * multimedia/mcistring.c: Eric Pouech Fixed null ptr deref introduced in last patch. * if1632/ole2.spec, ole/ole2.c: Andreas Mohr Kind of implemented OleMetaFilePictFromIconAndLabel. * include/toolbar.h, dlls/comctl32/toolbar.c: Chris Morgan James Abbatiello Fixed various problems related to bitmaps and flat toolbars. * dlls/comctl32/listview.c: Chris Morgan James Abbatiello Fixed problems with disappearing text. * dlls/comctl32/ipaddress.c: Chris Morgan James Abbatiello Complete rewrite of messaging code to implement/fix all input behaviors. Fixed a few fixmes. * programs/wcmd/ChangeLog, programs/wcmd/README, programs/wcmd/batch.c, programs/wcmd/builtins.c, programs/wcmd/wcmd.h, programs/wcmd/wcmdmain.c: Dave Pickles Added more batch functionality, including the CALL GOTO and SHIFT commands plus batch command arguments. * documentation/status/multimedia: Eric Pouech Updated to reflect current status. * loader/ne/module.c: Uwe Bonnes NE_LoadFileModule: Free module when NE_LoadDLLs fails. * graphics/psdrv/ps.c, graphics/psdrv/text.c, include/psdrv.h: Thuy Nguyen Implemented the underline and strikeout text attributes for the Wine PostScript driver. * windows/win.c: Pascal Lessard EnableWindow doesn't release the capture of a child window. * Makefile.in: James Juran Only test $(LIB_TARGET) = libwine.so.1.0 if $(LIB_TARGET) is non-blank. * controls/menu.c: Noomen Hamza Remove the WM_LBUTTONUP message from the queue after selecting a mouse menu item. * server/change.c, server/console.c, server/debugger.c, server/device.c, server/event.c, server/file.c, server/handle.c, server/mapping.c, server/mutex.c, server/object.c, server/object.h, server/pipe.c, server/process.c, server/request.c, server/request.h, server/semaphore.c, server/snapshot.c, server/socket.c, server/thread.c, server/thread.h, server/trace.c, tools/make_requests, win32/console.c, win32/device.c, include/server.h, include/thread.h, loader/dos/module.c, memory/virtual.c, misc/comm.c, misc/toolhelp.c, ole/parsedt.c, scheduler/client.c, scheduler/debugger.c, scheduler/event.c, scheduler/handle.c, scheduler/mutex.c, scheduler/pipe.c, scheduler/process.c, scheduler/semaphore.c, scheduler/synchro.c, scheduler/thread.c, files/change.c, files/dos_fs.c, files/file.c: Further server optimizations: - merged request and reply structures - build requests directly into the buffer to avoid a copy Tue Jun 22 19:14:41 1999 Alexandre Julliard * dlls/shell32/shell32_Ru.rc, graphics/x11drv/xfont.c, ole/nls/rus.nls, resources/sysres_Ru.rc, dlls/commdlg/cdlg_Ru.rc: Alexander Kanavin Standard dialog boxes resources and OLE strings are now in cp1251 encoding Font mapper does not anymore use fonts in -koi8-r encoding Font mapper now recognises fonts in -windows-* encodings (these are provided by xfstt TrueType server) Font mapper now sees max 16384 fonts (was 2048) * relay32/builtin32.c: Ulrich Weigand Share the HMODULE of built-in modules over all processes. Use the cached HMODULE to speed up relay debugging. Display the multi-instantiation warning only for 'dangerous' DLLs. * scheduler/process.c: Ulrich Weigand Load USER32.DLL before calling UserSignalProc. * windows/timer.c: Ulrich Weigand Use separate service for each windows timer. * if1632/compobj.spec, ole/compobj.c: Andreas Mohr Added COMPOBJ.DllEntryPoint (Acrobat3 16bit needs it). * ole/typelib.c, dlls/comctl32/listview.c, dlls/comctl32/treeview.c: Eric Pouech Thou shalt not use C++ comments. * include/driver.h, windows/driver.c: Eric Pouech Moved to new trace interface. Fixed driver closing. * multimedia/mcistring.c: Eric Pouech Better handling of double quotes in MCI string commands. * multimedia/mci.c: Eric Pouech Fixed memory leak in mci structures. * graphics/ddraw.c: Eric Pouech Fixed error handling in DGA_IDirectDraw2Impl_GetCaps(). * graphics/x11drv/clipping.c: Eric Pouech Added missing GDI heap unlock. Moved to new debug interface. * dlls/commdlg/filedlg.c: Eric Pouech Fixed GetOpenFileName when called with both OFN_ALLOWMULTISELECT and OFN_EXPLORER bits set. * dlls/comctl32/imagelist.c: Francois Boisvert Modified ImageList_LoadImageA to check the case where cx is set to zero. * windows/x11drv/keyboard.c: Philippe Froidevaux Added Swiss french keyboard layout. * server/select.c: Dump server objects on SIGHUP. * server/file.c, server/handle.c, server/handle.h, server/main.c, server/mapping.c, server/mutex.c, server/object.c, server/object.h, server/pipe.c, server/process.c, server/request.c, server/request.h, server/semaphore.c, server/snapshot.c, server/socket.c, server/thread.c, server/thread.h, server/trace.c, tools/make_requests, win32/console.c, include/server.h, include/server/Attic/request.h, include/thread.h, memory/virtual.c, misc/comm.c, scheduler/client.c, scheduler/debugger.c, scheduler/event.c, scheduler/mutex.c, scheduler/pipe.c, scheduler/semaphore.c, scheduler/thread.c, server/change.c, server/console.c, server/debugger.c, server/device.c, server/event.c, files/file.c: Made server communication faster by using a shared memory block. A few other optimizations in request processing in the server. Moved automatically generated request definitions to server.h and removed include/server/request.h. * windows/message.c, windows/queue.c, windows/win.c, windows/winproc.c, loader/main.c, loader/ne/segment.c, loader/task.c, miscemu/main.c, msdos/dpmi.c, scheduler/client.c, scheduler/process.c, scheduler/sysdeps.c, scheduler/syslevel.c, scheduler/thread.c, tools/build.c, win32/kernel32.c, debugger/stack.c, dlls/ntdll/exception.c, if1632/relay.c, if1632/thunk.c, include/process.h, include/queue.h, include/stackframe.h, include/task.h, include/thread.h, include/winbase.h, include/winnt.h: Merged THDB and TEB structures. Made SetLastError(), GetCurrentThreadId() and PROCESS_Current() inline. * programs/winhelp/.cvsignore, programs/clock/.cvsignore, programs/progman/.cvsignore: Added Wa.s Sun Jun 20 15:09:32 1999 Alexandre Julliard * memory/instr.c, miscemu/main.c, programs/clock/Wa.rc, programs/progman/Wa.rc, programs/winhelp/Wa.rc: Fixed Winelib compilation. Fri Jun 18 18:29:04 1999 Alexandre Julliard * memory/Makefile.in, memory/instr.c, miscemu/Attic/instr.c, miscemu/Makefile.in: Include instruction emulation in Winelib. * include/wine/exception.h, win32/except.c: A few optimizations. * loader/dos/dosvm.c: Use exceptions instead of ctx_debug_call. * include/winbase.h, relay32/kernel32.spec, scheduler/syslevel.c, windows/x11drv/main.c: Added DebugBreak. * debugger/break.c, debugger/dbg.y, debugger/debug.l, debugger/info.c, debugger/registers.c, include/debugger.h, miscemu/main.c: Debugger is now called by exception handling. Added 'pass' command to pass exceptions to the app. * include/miscemu.h, include/sig_context.h, loader/signal.c, dlls/ntdll/exception.c, graphics/ddraw.c: Moved signal handling to exception.c, generate exceptions on signals. Added hook for debugger in exception handling (temporary). * programs/progman/Makefile.in, programs/progman/Wa.rc, programs/winhelp/Makefile.in, programs/winhelp/Wa.rc, resources/sysres_Wa.rc, ole/nls/wal.nls, programs/clock/Makefile.in, programs/clock/Wa.rc, programs/notepad/Makefile.in, programs/notepad/Wa.rc, dlls/commdlg/cdlg_Wa.rc, dlls/shell32/shell32_Wa.rc: Pablo Saratxaga Walloon language update. * windows/winpos.c, windows/x11drv/event.c, windows/x11drv/wnd.c, include/winpos.h, include/winuser.h: Ulrich Weigand - Do not call XConfigureWindow if SetWindowPos was called due to a received ConfigureNotify event (to avoid recursion). - Use XTranslateCoordinates in EVENT_GetGeometry instead of manually walking the tree. - Set XSizeHint.win_gravity to StaticGravity for managed windows. * misc/version.c: Andreas Mohr Bug fix. * loader/pe_image.c: Ulrich Weigand Fix compiler warning. * documentation/Makefile.in, Makefile.in: Alexander V. Lukyanov Install wine.man from current directory. Remove wine.man on distclean, not on clean. ---------------------------------------------------------------- Sun Jun 13 08:49:47 1999 Alexandre Julliard * dlls/comctl32/listview.c, include/listview.h: Chris Morgan James Abbatiello Implemented LISTVIEW_SortItems() and LISTVIEW_CallBackCompare() * dlls/comctl32/status.c: Chris Morgan James Abbatiello Fixes a problem when using STATUSBAR_SetText() to toggle SBT_OWNERDRAW * dlls/comctl32/treeview.c: Chris Morgan James Abbatiello Adds some undocumented behavior to TREEVIEW_GetItemA(). * loader/module.c: Marcus Meissner Fixed ambigous else/brace problem, moved "name" computation in CreateProcess _before_ outputting it in the FIXME_()s. * objects/region.c: Marcus Meissner Do not reuse a passed CONST RECT * pointer. * windows/x11drv/mouse.c: Ulrich Weigand Bugfix: DISPLAY_SetCursor should not use USER-internals, as it is also used with native USER ... * loader/pe_image.c, scheduler/process.c: Ulrich Weigand Removed broken hack to support shared DLLs (e.g. USER32.DLL) and replaced it by a somewhat less broken hack :-/ * multimedia/mci.c: Marcus Meissner Fixed small memory corruption. Sat Jun 12 18:36:55 1999 Alexandre Julliard * include/*.h: Patrik Stridvall Mad the include files idempotent using a consistent macro naming scheme. * windows/painting.c: Noomen Hamza Avoid painting destroyed windows. * dlls/*.c, if1632/*.c, loader/*.c: Converted to the new debug interface, using script written by Patrik Stridvall. * if1632/builtin.c, loader/ne/module.c, loader/ne/segment.c, memory/atom.c, memory/string.c, objects/text.c, win32/thread.c, windows/property.c, windows/rect.c, windows/sysmetrics.c, dlls/advapi32/advapi.c, dlls/commdlg/filetitle.c, dlls/ntdll/nt.c, dlls/ntdll/sync.c: Patrik Stridvall Added missing/wrong includes. * windows/user.c, windows/x11drv/event.c, controls/icontitle.c, controls/menu.c, controls/widgets.c, debugger/dbg.y, debugger/dbgmain.c, loader/module.c, misc/spy.c, windows/message.c, windows/painting.c, windows/scroll.c: Patrik Stridvall Removed direct references to CLASS internals. * include/process.h, misc/version.c, scheduler/process.c: Andreas Mohr Rearrange winver detection code and cache the winver value we determined in the PDB to speed up. * windows/nonclient.c: Gerard Patel Draws a border around windows with old win31 style (only ws_border) in win95 look. * include/commctrl.h, include/prsht.h, include/wine/obj_dataobject.h, include/wtypes.h: Patrik Stridvall Added CINTERFACE and NONAMELESSUNION support. * include/*.h: Patrik Stridvall Added extern "C" if __cplusplus is defined. * include/combo.h, controls/combo.c, controls/listbox.c: Francis Beaudet Fixed a few behaviors of the combobox that were broken. * debugger/dbg.y, debugger/debug.l, debugger/info.c, include/module.h, include/process.h, loader/module.c, scheduler/process.c: Guy Albertelli Add new "walk" command options to list processes and modref's. * graphics/x11drv/dib.c: Uwe Bonnes X11DRV_DIB_SetImageBits_24/32: Fix the case for bits_per_pixel == 32 and negative lines. * dlls/comctl32/status.c, dlls/comctl32/tab.c, dlls/comctl32/tooltips.c, dlls/comctl32/trackbar.c, dlls/comctl32/updown.c, include/winuser.h, dlls/comctl32/comboex.c, dlls/comctl32/commctrl.c, dlls/comctl32/datetime.c, dlls/comctl32/flatsb.c, dlls/comctl32/header.c, dlls/comctl32/hotkey.c, dlls/comctl32/imagelist.c, dlls/comctl32/ipaddress.c, dlls/comctl32/monthcal.c, dlls/comctl32/nativefont.c, dlls/comctl32/pager.c, dlls/comctl32/progress.c, dlls/comctl32/rebar.c: Patrik Stridvall Changed xxx(VOID) to xxx(void). * multimedia/time.c: Eric Pouech - simplified internal data - thread safe access to internal structures - fixed bug on ONE_SHOT timers - deferred service thread call until really needed (no longer on WINMM or MMSYSTEM attachement) * include/process.h, include/services.h, loader/main.c, scheduler/services.c, scheduler/thread.c: Eric Pouech Made the service thread instanciable in every process. * Make.rules.in, Makefile.in, configure, configure.in: James Juran Use Autoconf to find path to ldconfig. * ole/typelib.c: Francis Beaudet Fixed a problem with the LoadTypeLib method. * misc/Makefile.in, misc/registry.c: Marcus Meissner Use @sysconfdir@ for the default registries in misc/registry.c too. * graphics/ddraw.c: Marcus Meissner Added generic pixel converter for 8->24. * windows/dialog.c: Pavel Roskin DIALOG_ParseTemplate16() supported up to 127 controls. Bigger values were expanded to WORD incorrectly. * loader/dos/dosvm.c, loader/dos/module.c, msdos/dpmi.c: Ove Kaaven Various DPMI fixes and preliminary DPMI raw mode switch handler. * windows/mdi.c: Noomen Hamza Fixed imprecision in the MDI tiling functionality. * objects/metafile.c: Huw D M Davies Open files with more appropriate sharing mode. * objects/enhmetafile.c: Huw D M Davies Small fixes for EnhMetaFile playback. * dlls/comctl32/comctl32undoc.c: Ian Schmidt Fixed an error and an off-by-one bug in DSA_SetItem(). This eliminates some crashes with Win98 native SHELL32. * graphics/ddraw.c: Marcus Meissner Remove DIABLO_HACK (does not work anymore), add 1 FIXME, fix GetCaps() with caps1==NULL. * windows/syscolor.c: Slava Monich dwDataSize needs to be reset before each RegQueryValueEx() call. * multimedia/dsound.c: Ove Kaaven Don't ignore application-requested primary buffer flags. * tools/build.c: Ove Kaaven Clear high word of %esp when returning from CallFrom16. * include/comm.h, misc/comm.c: Ove Kaaven Implementation of EV_RXFLAG. * windows/winpos.c, windows/x11drv/event.c: Ulrich Weigand Better implementation of [GS]etForegroundWindow. Fixed focus handling on inter-thread activation. Adapted FocusIn/Out event handling to per-queue focus. * loader/ne/module.c: Ulrich Weigand Release Win16Lock during PROCESS_Create. * dlls/comctl32/imagelist.c: Luc Tourangeau ImageList_GetIcon bug fix. * win32/time.c: Rein Klazes Corrected a problem in GetTimeZoneInformation() due a change to mktime() in glibc-2.1.1 when daylight saving time is in effect. * debugger/db_disasm.c: Patrik Stridvall Changed K&R C function definition to ANSI C. * graphics/psdrv/bitmap.c, include/psdrv.h: Huw D M Davies PSDRV_StretchDIBits should use logical co-ords. Some versions of ghostscript seem to eat one too many characters of image data. Add a '%' to the output file to work around this. * relay32/wnaspi32.spec: Andreas Mohr Fixed WNASPI32 ordinals. * include/winbase.h: Andreas Mohr Added the function definitions of GetStartupInfo*(). * documentation/status/dde, misc/ddeml.c: Keith Matthews 1st cut implementation of DdeNameService (omits monitor callback) 1st cut implementation of DdeKeepStringHandle (probably complete) DdeInitializeW - minor changes to initialise service names structure DdeGetLastError - start of proper last error retrieval DdeCreateStringHandle16 - added code for default codepage where not supplied. Various documentary/comment corrections. Fri Jun 11 18:33:46 1999 Alexandre Julliard * include/process.h, memory/environ.c, scheduler/process.c: Use the normal environment routines to build the env db of the initial process. * include/server.h, server/console.c, server/object.h, server/process.c, server/process.h, server/trace.c, tools/make_requests, win32/console.c: Return console handles in alloc_console request. Fixed read_console_input parameters to conform to the reply structure declaration. Mon Jun 7 17:46:39 1999 Alexandre Julliard * objects/bitmap.c: Eric Pouech Fixed CreateCompatibleBitmap when called with 0 width or height. * multimedia/mmio.c: Eric Pouech Fixed mmioDescend when called with a parent chunk. * loader/signal.c: Marcus Meissner Trying to fix sigaltstack() problem reported by Debian users. SIGTRAP might be undefined (beos). * ole/typelib.c: Marcus Meissner Fixed TLB_Read (can easily get count!=bytesread at the end of the file). Fixed TLB_FindTlb (strstr on binary data will not work). * dlls/comctl32/treeview.c: Marcus Meissner Fixed >> and * operator precedence problem. * windows/x11drv/mouse.c: Eric Pouech Fixed order for entering critical sections (X11 vs. WndLock) when calling X11DRV_MOUSE_SetCursor. * loader/module.c: Ulrich Weigand Consult ne.operating_system field for NE files in GetBinaryType(). * server/process.c: Fixed initial process refcount. Sun Jun 6 17:28:21 1999 Alexandre Julliard * documentation/status/directplay, loader/dos/Makefile.in, documentation/Makefile.in, documentation/cdrom-labels: Forced commit to get rid of the vendor branch * programs/cmdlgtst/.cvsignore: Added cmdlgr.h * programs/regapi/regapi.c: Avoid use of strncmpi (reported by Ron Cemer). * include/wine/winestring.h, multimedia/joystick.c, include/winbase.h, include/winuser.h: Moved inclusion of winestring.h to winebase.h. Added Winelib macros for lstrncmp functions. * controls/scroll.c: Ron Cemer Fixes for several bugs in which portions of the scrollbar were not being redrawn correctly, the focus rectangle was not being correctly removed from the thumb before redrawing, etc.; added complete Win9x and WinNT look and feel support. * windows/sysmetrics.c: Ron Cemer Fixes for Win9x and WinNT look and feel. * files/dos_fs.c: Chris Morgan James Abbatiello Fixed response of GetFullPathNameA when buffer==NULL. * files/file.c: Uwe Bonnes CreateFileA/FILE_DoOpenFile: add verbose reporting of arguments. * configure.in, programs/Makefile.in, programs/wcmd/.cvsignore, programs/wcmd/ChangeLog, programs/wcmd/Makefile.in, programs/wcmd/README, programs/wcmd/batch.c, programs/wcmd/builtins.c, programs/wcmd/directory.c, programs/wcmd/makefile.bcc, programs/wcmd/wcmd.h, programs/wcmd/wcmdmain.c, programs/wcmd/wcmdrc.rc, configure: Dave Pickles Added Wine command-line interpreter. * if1632/thunk.c, include/callback.h, misc/callback.c: Ulrich Weigand Removed Callback.CallTaskRescheduleProc(). * include/main.h, miscemu/main.c, tools/build.c: Ulrich Weigand Switch stacks in CALL32_Init(). * loader/task.c, scheduler/process.c, include/process.h, include/task.h: Ulrich Weigand 16-bit scheduler reorganized: run all tasks in their own thread. Process creation sequence adapted to new scheduler. * include/services.h, loader/main.c, scheduler/services.c: Ulrich Weigand Removed SERVICE_Exit(). * windows/queue.c: Ulrich Weigand Release WND lock before calling PostEvent16(). * include/wnaspi32.h: Uwe Bonnes Add some defines. * dlls/wnaspi32/winaspi32.c: Uwe Bonnes ASPI_ExecScsiCmd: better return value and verbose error when no device found. * loader/module.c: Guy Albertelli Use SearchPath to test for existance of programs in lpCmdLine processing. For lpApplName do not append ".exe" and use DOSFS_GetFullName to locate the program. Move module find process after flag testing and provide quick exit if not found. * windows/dialog.c: Slava Monich Implemented dialog units -> pixels conversion very close to how it's actually done by Windows. Sat Jun 5 15:23:20 1999 Alexandre Julliard * dlls/commdlg/colordlg.c, dlls/commdlg/filedlg.c, dlls/commdlg/fontdlg.c, include/commdlg.h, include/initguid.h, include/objbase.h, include/ole2.h, include/windef.h, include/wine/obj_dataobject.h, include/wine/obj_inplace.h, include/wine/obj_moniker.h, include/wine/obj_oleaut.h, include/wine/obj_oleobj.h, include/winerror.h, include/wingdi.h, include/winuser.h, include/wtypes.h, ole/bindctx.c, ole/moniker.c: Paul Quinn Some non-threatening fixes to some headers, as well as some casting changes that make winelib more win32 code compatible. * files/drive.c, include/winbase.h, relay32/kernel32.spec: Stub for SetVolumeLabel(). * windows/message.c: Uwe Bonnes Add back lost treatment of HWND_TOPMOST. * windows/x11drv/event.c: Ulrich Weigand Try to improve ConfigureNotify event processing. * objects/pen.c: Joshua Thielen Allow pens with styles greater than PS_INSIDEFRAME to be created with ExtCreatePen. * relay32/oleaut32.spec, include/debugdefs.h, include/wine/obj_oleaut.h, ole/typelib.c, ole/typelib.h: Rein Klazes Read/load type libraries. Implementation of ITypeLib, ITYpeInfo, ITypeLib2 and ITypeInfo2 methods. * ole/ole2disp.c: Rein Klazes Allow NULL as argument to SysFreeString in accordance with SDK. * DEVELOPERS-HINTS: Klaas van Gend - more up-to-date description of source tree - better example of required comments for an API implementation - replacement of WINE_PACKED by "pshpack1.h", etc. - naming conventions for non-api calls and types - location conventions for non-api header files and prototypes * relay32/mpr.spec, include/winnetwk.h, include/wnet.h, misc/network.c: Robert W Hall Added 2 stubs. * if1632/thunk.c: Ulrich Weigand Fixed behaviour of Alloc..ThunkletCallback[Ex] for NULL target. * windows/x11drv/event.c, windows/x11drv/wnd.c: Ulrich Weigand Fixed potential memory corruption in EVENT_QueryZOrder. Fixed potential X synchronization problem in X11DRV_WND_SetHostAttr. * files/directory.c: Guy Albertelli Correct search order in SearchPath for Win 3.1/95/98. Still broken for NT. * windows/win.c: Slava Monich o check for both CW_USEDEFAULT and CW_USEDEFAULT16. o if x is CW_USEDEFAULT (or CW_USEDEFAULT16) and y is *not* CW_USEDEFAULT (or CW_USEDEFAULT16) then use y as a second parameter to ShowWindow(). Some apps (CALC.EXE for Win98 is one of them) use this undocumented feature to create hidden window with WS_VISIBLE style set. * relay32/comctl32.spec, dlls/comctl32/comctl32undoc.c: Ian Schmidt Added partial implementation for DPA_LoadStream and stub for DPA_SaveStream. Thanks to Eric Kohl (ekohl@abo.rhein-zeitung.de) for the partial implementation and parameter information. * debugger/stabs.c: Pavel Roskin Make it possible to link Wine statically (at least on RedHat 6.0). * controls/menu.c: Eric Pouech When looking into sys menu, check if items are present before dereferencing. * documentation/Attic/wine.man: Marcus Meissner Autoconfigure the directories in the manpage. * include/message.h, include/ttydrv.h, include/x11drv.h, windows/event.c, windows/ttydrv/event.c, windows/ttydrv/init.c, windows/winpos.c, windows/x11drv/event.c, windows/x11drv/init.c: Ulrich Weigand Removed DummyMotionNotify EVENT driver routine. * configure, configure.in, documentation/.cvsignore, documentation/Makefile.in, documentation/wine.man.in: Marcus Meissner Autoconfigure the directories in the manpage. * files/file.c, include/winbase.h, relay32/kernel32.spec: James Juran Add stub for LockFileEx (KERNEL32.513). * documentation/status/internationalisation: Klaas van Gend Current status of Wine on internationalisation. * controls/button.c: Rein Klazes Do not process WM_LBUTTONUP message in ButtonWndProc() when the mouse is not captured. * graphics/psdrv/init.c, objects/dc.c: Noel Borthwick From CreateCompatibleDC, pass the device name associated with the source DC in order to allow PSDRV_CreateDC to locate the printer info for the device. * multimedia/mcistring.c: Eric Pouech Added some digital video interface Fixed a few bugs (device names are no longer converted to upper case, added call back window, all structures moved to 32 bit...). * if1632/thunk.c: Eric Pouech Workaroung gcc 2.7.2.x sig 11 issue. * include/multimedia.h, multimedia/mci.c, multimedia/mmsystem.c: Eric Pouech Added (still incomplete) handling of MCI_BREAK command. * documentation/no-windows: James Juran Updated documentation/no-windows. * graphics/ddraw.c: Marcus Meissner Speedup enhancement for the 8->16 and 8->32 copy loop hotspots, using a faster generic routine and some inline assembly for i386 (cleanups by Ove). Fri Jun 4 19:49:54 1999 Alexandre Julliard * server/handle.c, server/handle.h, server/process.c, server/process.h, server/thread.c: Made handle table a separate object. Global handle table is no longer bound to a process. Removed special handling of the initial process. * server/main.c, server/object.c, server/object.h: Added optional debugging code in object management. Sat May 29 14:27:27 1999 Alexandre Julliard * scheduler/client.c, scheduler/process.c, scheduler/sysdeps.c, scheduler/syslevel.c, scheduler/thread.c, windows/queue.c, windows/winproc.c, include/thread.h, loader/task.c: Got rid of THREAD_InitDone. Made THREAD_Current() inline. Moved server tid into TEB. * windows/dialog.c: Luc Tourangeau Reimplemented the CheckRadioButton function. * dlls/comctl32/tab.c: Chris Morgan James Abbatiello Fixed incorrect lookup of background color. * dlls/comctl32/commctrl.c, dlls/comctl32/status.c: Chris Morgan James Abbatiello Fixed problems when using multiple style flags together. * dlls/comctl32/tooltips.c: Chris Morgan James Abbatiello Fixed a problem when using string resources as tooltext. * windows/win.c: Francis Beaudet Fixed a behavior of the focus when a parent window is disabled. * graphics/x11drv/graphics.c: Joshua Thielen Fixed a bug which causes the PolyBezier to not be updated on redraw (when you want them to be). * windows/input.c: Gerard Patel Remove unnecessary warning in TranslateAccelator. * server/handle.c: Fixed duplicate_handle to work with pseudo-handles (reported by Marcus Meissner). * dlls/commdlg/cdlg_xx.rc, dlls/ver/ver16.c, dlls/version/info.c, dlls/version/install.c, dlls/version/resource.c, include/ver.h, include/winver.h, tools/wrc/wrctypes.h: Paul Quinn ver.h is a legacy header. winver.h should be used instead. * dlls/tapi32/phone.c, misc/crtdll.c: Marcus Meissner Fixed some warnings. * include/commctrl.h, include/listview.h, dlls/comctl32/listview.c: Luc Tourangeau - Reimplemented the scrolling using SetScrollInfo and GetScrollInfo. - Implemented LVM_FINDITEM message. - Added some new window styles. - Fixed some bugs and extended a number of existing functions. - Modified selection functions to support area selection (for group selection in LVS_ICON and LVS_SMALLICON). * misc/comm.c: Ove Kaaven Fixed a couple of missing event notifications. Some more debugging messages. * windows/x11drv/keyboard.c: Rikhardur Egilsson Icelandic keyboard support. * graphics/ddraw_private.h, graphics/ddraw.c: Lionel Ulmer - better debug output for surface creation - added (experimental) DIBSection implementation of GetDC / ReleaseDC * graphics/d3ddevices.c: Lionel Ulmer Corrected warning. * controls/menu.c: Pascal Lessard Support TPM_RETURNCMD in TrackPopupMenu. * win32/console.c: Marcus Meissner Fix key (somehow we get a control keystate). * loader/dos/module.c: Gerald Pfeifer Fixed compilation erros on non-Linux systems. * include/debugtools.h: Eric Pouech Added missing TRACE define when NO_DEBUG_MSGS was defined. * dlls/shell32/shellord.c: Ian Schmidt Added missing WINAPI for SHValidateUNC. * documentation/languages: Klaas van Gend Adapted to the new dll resource handling by Bertho Stultiens. Mon May 24 15:02:18 1999 Alexandre Julliard * misc/shell.c: Release the Win16Lock before calling WinExec. * scheduler/thread.c, include/process.h, loader/ne/module.c, loader/task.c: Removed process argument to PROCESS_CallUserSignalProc. * scheduler/process.c: Moved remaining initialisations to the new process context. Shuffled things around a bit in PROCESS_Start to avoid deadlocks. Changed PROCESS_CallUserSignalProc to avoid accessing another process address space. * include/server.h, server/process.c, server/trace.c, tools/make_requests: Added support for dumping variable-size data of server replies. Added cmd_line and cmd_show in new_process request. * if1632/mmsystem.spec: Eric Pouech fixed builtin mmsystem.dll init sequence * multimedia/Attic/init.c, multimedia/Makefile.in: Eric Pouech removed obsoleted init.c source file * include/multimedia.h: Eric Pouech removed unnecessary MCI drivers entry point added undocumented mmsystem functions * multimedia/time.c: Eric Pouech moved to new trace interface now calling time init function from mmsystem and/or winmm entry point * multimedia/mmsystem.c: Eric Pouech included DLL init sequence (from obsoleted init.c) fixed builtin mmsystem.dll init sequence fixed PlaySound when used with an asynchronous audio driver fixed midiStream functions for Stop/Pause/Restart functions fixed error handling in waveOutOpen with QUERY_FORMAT flag * multimedia/midi.c: Eric Pouech included midi init sequence (from obsoleted init.c) moved to new trace interface simplified code with using new configuration constant (HAVE_OSS_MIDI) fixed erroneous warnings * multimedia/mci.c: Eric Pouech included mci init sequence (from obsoleted init.c) moved to new trace interface * multimedia/audio.c: Eric Pouech output: better internal thread interface (orthogonalization of states and events) output: removed use of DSP_IOCTL_GETOSPACE output: fixed latency in reset messages handling output: replaced some polling mechanisms with blocking ones output: fixed get/set volume functions * multimedia/mciwave.c: Eric Pouech moved to the new debug interface fixed bugs in pause/play/stop functions fixed signature of driver entry point * multimedia/mcimidi.c: Eric Pouech moved to the new debug interface fixed bugs in pause/play functions fixed signature of driver entry point * multimedia/mixer.c: Eric Pouech Updated traces. * windows/driver.c: Eric Pouech Remove extraneous winuser16.h. * graphics/x11drv/dib.c: Eric Pouech Changed printf into TRACE. * debugger/expr.c: Eric Pouech Fixed a few typos. * debugger/stack.c: Eric Pouech Check when backtracking the stack if frames are correct (readable). * windows/event.c, include/message.h, include/winsock.h, loader/main.c, loader/task.c, misc/winsock.c: Ulrich Weigand Moved WINSOCK network IO event handling to special thread. Removed EVENT_WaitNetEvent, introduced a global scheduler event. * miscemu/main.c, scheduler/process.c: Ulrich Weigand Wait until child initialized before returning from PROCESS_Create. * relay32/kernel32.spec, win32/kernel32.c: Ulrich Weigand Use register functions with arguments for LogApiThk... * dlls/comctl32/listview.c: Chris Morgan James Abbatiello Cleaned up LISTVIEW_KeyDown by using LISTVIEW_GetNextItem. Removed unused variable in LISTVIEW_GetNextItem. Sun May 23 20:02:05 1999 Alexandre Julliard * include/dosexe.h, include/module.h, include/pe_image.h, include/process.h, include/thread.h, loader/dos/module.c, loader/module.c, loader/ne/module.c, loader/pe_image.c, relay32/kernel32.spec, scheduler/process.c, scheduler/thread.c, win32/except.c, dlls/ntdll/exception.c: Use the new debug functions to send debug events at appropriate places. Pass the process creation flags to PROCESS_Create. * scheduler/Makefile.in, scheduler/client.c, scheduler/debugger.c, win32/newfns.c, win32/process.c, include/winbase.h, misc/lstr.c: Implemented the Win32 debug API functions. * include/server.h, include/server/request.h, server/Makefile.in, server/debugger.c, server/object.h, server/process.c, server/thread.c, server/thread.h, server/trace.c: Added debug events support. ---------------------------------------------------------------- Sun May 23 10:25:26 1999 Alexandre Julliard * memory/global.c, memory/heap.c, memory/ldt.c, memory/selector.c, memory/string.c, memory/virtual.c, objects/brush.c, objects/color.c, objects/dc.c, objects/dib.c, objects/enhmetafile.c, objects/gdiobj.c, objects/metafile.c, objects/palette.c, objects/pen.c, objects/region.c, objects/text.c, scheduler/handle.c, scheduler/services.c, scheduler/synchro.c, scheduler/sysdeps.c, scheduler/syslevel.c, scheduler/thread.c, win32/code_page.c, win32/console.c, win32/error.c, win32/file.c, win32/init.c, win32/process.c, win32/struct32.c, win32/thread.c, win32/time.c, dlls/ntdll/file.c, dlls/ntdll/nt.c, dlls/ntdll/om.c, dlls/ntdll/reg.c, dlls/ntdll/rtl.c, dlls/ntdll/rtlstr.c, dlls/ntdll/sec.c, dlls/ntdll/sync.c, dlls/ntdll/time.c, memory/atom.c: Converted to the new debug interface, using script written by Patrik Stridvall. * scheduler/process.c: Ulrich Weigand Bugfix: dwFlags must describe target process in UserSignalProc. * dlls/shell32/shellord.c: Ian Schmidt Added missing WINAPI to SHELL32_654 stub. Fixes crash in Win98 Explorer. * dlls/comctl32/listview.c: Chris Morgan James Abbatiello LISTVIEW_KeyDown: Invalidate the listview window only when the selected item changes. * if1632/kernel.spec, misc/wsprintf.c, relay32/kernel32.spec, win32/kernel32.c: Ulrich Weigand Added _DebugOutput (KERNEL.328), LogApiThk (KERNEL.423), LogApiThkLSF (KERNEL32.42), LogApiThkSL (KERNEL32.44), LogCBThkSL (KERNEL32.47), and SSConfirmSmallStack (KERNEL.704). * if1632/display.spec, windows/display.c: Ulrich Weigand Fix typo (wrong DISPLAY.CheckCursor ordinal). Superfluous FIXME converted to TRACE in CheckCursor. * relay32/relay386.c: Ulrich Weigand Bugfix: syslevel relay check was too strict. * server/mapping.c: Marcus Meissner Do not use pagesize aligned size_low to grow mapped file, but original size_low. (fixes Heises Index Register) Sat May 22 19:22:26 1999 Alexandre Julliard * graphics/ddraw.c: Lionel Ulmer - added some more debug output - corrected a slight bug in DGA DirectDraw creation * windows/win.c: Francis Beaudet Fixed a major memory leak in the window management code. * windows/winpos.c: Eric Pouech In SetWindowPos if changing Z order and child window not yet in its parent list, do not link it in WINPOS_ShowIconTitle, check for retval of WIN_FindWndPtr. * graphics/x11drv/dib.c: Pavel Roskin Disable passing device context to X11DRV_DIB_BuildColorMap when RGB colormap is used. * debugger/dbg.y: Ulrich Weigand Don't freeze other thread while it may hold the X critical section. * include/display.h, loader/main.c, windows/display.c: Ulrich Weigand Added UserRepaintDisable16(). * windows/dinput.c, windows/message.c: Ulrich Weigand Removed EVENT_WaitNetEvent() calls. * windows/input.c: Ulrich Weigand Added IsUserIdle16(). * include/ttydrv.h, windows/ttydrv/event.c, windows/ttydrv/init.c: Ulrich Weigand Adapted to EVENT_ driver changes. * loader/task.c, scheduler/synchro.c: Ulrich Weigand Adapted to event synchronization changes. * include/message.h, include/x11drv.h, windows/event.c, windows/x11drv/event.c, windows/x11drv/init.c, windows/x11drv/wnd.c: Ulrich Weigand Moved X input event handling out of EVENT_WaitNetEvent and into service thread callback; moved EVENT_WaitNetEvent out of the EVENT_ driver. Changed winContext to hold HWND instead of WND *. * windows/winpos.c: Ulrich Weigand Don't change Z-order of child windows when activating. * dlls/winspool/info.c, include/wine/wingdi16.h, include/winerror.h, include/winspool.h, relay32/winspool.spec: Huw D M Davies Implemented AddPrinterA, AddPrinterDriverA and GetPrinterDriverDirectory Moved some 16bit GDI function declarations from winspool.h -> wingdi16.h * configure, configure.in, include/acconfig.h, include/config.h.in: Eric Pouech Create a new configuration manifest constant HAVE_OSS_MIDI. * loader/dos/module.c: Ove Kaaven Fixed silly EINTR bug with starting dosmod. * graphics/ddraw.c: Kevin Holbrook Should compare to X11 constant "None" since a colormap is an X Resource ID and not a pointer. * controls/listbox.c: Paul Quinn Stop a listbox bug that causes a div by zero when the item height is zero. Doesn't solve the root of the problem though. * dlls/shell32/shell32_Pt.rc: Andre Malafaya Baptista About dialog translated to Portuguese. * if1632/thunk.c: James Juran task.h was included twice. Removing one fixed a sig11 in gcc-2.7.2.3. * objects/cursoricon.c: Eric Pouech Check if dc has been created before using it. * graphics/escape.c: Huw D M Davies Add a few more 32->16 Escape conversions. * relay32/relay386.c, if1632/relay.c: Ulrich Weigand Check for syslevel violations while relay debugging. * if1632/kernel.spec, include/syslevel.h, include/thread.h, scheduler/syslevel.c, windows/win.c: Ulrich Weigand Improved syslevel handling, store currently held syslevels in thread database, WIN_CritSection converted to syslevel. * include/windows.h: Joshua Thielen Added mmsystem.h include. * loader/main.c, loader/task.c, scheduler/process.c, windows/user.c, if1632/kernel.spec, include/user.h, include/wine/winbase16.h: Ulrich Weigand Added ExitKernel16 (replacing USER_ExitWindows), ExitProcess16, and MapProcessHandle; stub for BUNNY_351. * if1632/thunk.c: Ulrich Weigand Handle proc == NULL in THUNK_SetDCHook correctly. * files/profile.c: Andreas Mohr Added support for the undocumented combination GetPrivateProfileStringA(section == NULL, entry == NULL, ... * dlls/comctl32/header.c: Chris Morgan James Abbatiello Cleaner null pointer check in HEADER_InsertItemA and HEADER_InsertItemW. * dlls/comctl32/listview.c: Chris Morgan James Abbatiello Implemented GetNextItem for the Listview control. * scheduler/services.c: Ove Kaaven Expire timers on expiry time too, not just after. * include/wine/obj_base.h, graphics/d3dexecutebuffer.c, graphics/d3dlight.c, graphics/d3dmaterial.c, graphics/d3dtexture.c, graphics/d3dviewport.c, graphics/ddraw.c, multimedia/dplay.c, multimedia/dsound.c, ole/antimoniker.c, ole/bindctx.c, ole/compositemoniker.c, ole/datacache.c, ole/defaulthandler.c, ole/filemoniker.c, ole/hglobalstream.c, ole/ifs.c, ole/itemmoniker.c, ole/memlockbytes.c, ole/moniker.c, ole/olefont.c, ole/oleobj.c, ole/stg_stream.c, ole/storage32.c, windows/dinput.c, dlls/avifil32/avifile.c, dlls/shell32/contmenu.c, dlls/shell32/dataobject.c, dlls/shell32/enumidlist.c, dlls/shell32/folders.c, dlls/shell32/regstream.c, dlls/shell32/shelllink.c, dlls/shell32/shellole.c, dlls/shell32/shlfolder.c, dlls/shell32/shlview.c, graphics/d3ddevices.c: Paul Quinn Microsoft com vtable compatibility workaround for g++. Basically adds an optional 8 bytes padding to COM objects where the RTTI would be. * include/sysmetrics.h, misc/shell.c, objects/bitmap.c, objects/cursoricon.c, windows/dce.c, windows/defwnd.c, windows/dialog.c, windows/dinput.c, windows/input.c, windows/mdi.c, windows/message.c, windows/nonclient.c, windows/scroll.c, windows/sysmetrics.c, windows/win.c, windows/winpos.c, controls/button.c, controls/combo.c, controls/icontitle.c, controls/menu.c, controls/scroll.c, dlls/commdlg/filedlg.c, dlls/commdlg/finddlg.c, dlls/commdlg/fontdlg.c, dlls/commdlg/printdlg.c, dlls/shell32/iconcache.c: Marcus Meissner Replaced all occurences of SYSMETRICS_xx and sysMetrics[SM_xx] by GetSystemMetrics(SM_xx), removed no longer needed includes of sysmetrics.h. * msdos/int16.c: Ove Kaaven Added INT_Int16AddChar. * loader/resource.c: Bertho Stultiens Bugfix: Prevent null-pointer dereference in TRACE argument list in RES_FindResource * loader/elfdll.c: Bertho Stultiens Fixed wrong NE module registration so that resources work. * if1632/thunk.c, tools/build.c, win32/kernel32.c: Ulrich Weigand Set %ebx to point to real 16-bit stack in CBClientThunkSL. Pass %esi back-and-forth in CBClientThunkSL(Ex). Copy modified buffers back after return from FT_Thunk. Fix broken recognition of LS thunklets. * dlls/comctl32/comctl32undoc.c, dlls/comctl32/rebar.c, dlls/comctl32/toolbar.c, dlls/comctl32/updown.c: Marcus Meissner Removed use of win.h, sysmetrics.h and associated WINE USER internal variables. Added missing infoPtr->Buddy = hwndBud; in updown.c * dlls/comctl32/Attic/propsheet.h, dlls/comctl32/comctl32.h, dlls/comctl32/propsheet.c, dlls/comctl32/rsrc.rc, dlls/comctl32/toolbar.c, include/commctrl.h, include/toolbar.h: Eric Kohl Toolbar customization dialog (take one). * windows/win.c: Francis Beaudet Fixed GetTopWindow so it will correctly handle the NULL parameter. * include/process.h, loader/module.c: Ulrich Weigand Fix swapped FreeLibary return values. Handle FreeLibrary( 0 ) better. Fix DLL_PROCESS_DETACH call sequence bugs resulting from nested FreeLibrary calls. * if1632/mmsystem.spec, multimedia/mmsystem.c: Marcus Meissner Fixed specs for mixerGetDevCaps16/mixerGetID16, fixed mixGetDevCaps16. * include/miscemu.h, msdos/devices.c, msdos/dosmem.c, msdos/int21.c: Ove Kaaven Changed global DOS_LOL into function DOSMEM_LOL() in order to operate on the correct address space. Added DOSMEM_MovePointers() that relocates selectors when the DOS address space changes (i.e. when dosmod is spawned, particularly from Win16 apps that uses DPMI to execute real-mode code). More complete DOS device implementation. * include/dosexe.h, loader/dos/dosvm.c, loader/dos/module.c: Ove Kaaven Added MZ_Current() (returns current LPDOSTASK) and DOSVM_Wait() (DOSVM idle message loop), and fields hConInput and hConOutput. * objects/bitmap.c: Pascal Lessard Add some null checking in the Get/SetBitmapBits functions. * misc/crtdll.c, relay32/crtdll.spec: Marcus Meissner Added init function for CRTDLL, allocate stdio/stderr/stdout on DLL_PROCESS_ATTACH, increase buffer for vfprintf() (Win95 arp.exe needs 1.3KB). * debugger/memory.c: Marcus Meissner Added support for FreeBSD 3.0 to DEBUG_checkmap_bad(). * misc/winsock.c: James Juran Print a more effective (and visible) error message when an application can't create a socket with type == SOCK_RAW. * include/mmreg.h: Eric Pouech Some more defines for multimedia. * msdos/vxd.c, win32/device.c: Juergen Schmied Some stubs for pccard vxd to debug the native shell32. * multimedia/time.c: Ove Kaaven Use service thread for "true" multimedia timers. Removed implementation of fake multimedia timers. Set minimum resolution to 10 ms (the timing resolution of the Linux kernel). Fixed a couple of flaws. * misc/spy.c: Juergen Schmied Implemented printing out of some structures. Thu May 20 16:40:23 1999 Alexandre Julliard * server/select.c, server/socket.c: Set only the client socket in non-blocking mode instead of all fds; should avoid problems with stdio handles. Mon May 17 16:20:53 1999 Alexandre Julliard * include/debugdefs.h, include/gdi.h, include/psdrv.h, include/ttydrv.h, include/wine/wingdi16.h, include/wingdi.h, include/winspool.h, misc/Attic/spooler.c, misc/Makefile.in, misc/printdrv.c, objects/dc.c, dlls/winspool/.cvsignore, dlls/winspool/Makefile.in, dlls/winspool/info.c, graphics/driver.c, graphics/enhmetafiledrv/init.c, graphics/env.c, graphics/escape.c, graphics/metafiledrv/init.c, graphics/psdrv/driver.c, graphics/psdrv/init.c, graphics/psdrv/ppd.c, graphics/psdrv/ps.c, graphics/ttydrv/init.c, graphics/win16drv/init.c, graphics/x11drv/init.c, Makefile.in, configure, configure.in: Huw D M Davies Implement DocumentProperties, DeviceCapabilities, beginnings of Open/Get/ClosePrinter. Additions to PSDRV_DeviceCapabilities. Split off WINSPOOL into its own directory. Several functions added to DC_Funcs. Based largely on a patch by Pascal Lessard * loader/loadorder.c: Marcus Meissner glide2x loadorder is "so,native". * msdos/dpmi.c: Ove Kaaven Improved shortcuts - follows jumps in trying to avoid switching to real mode unnecessarily. * documentation/no-windows: Ove Kaaven Updated and improved instructions. * debugger/expr.c: Ove Kaaven Made "Wine-dbg>set *seg:off = val" work (previously only "Wine-dbg>set *off = val" worked). * multimedia/mcimidi.c, multimedia/mciwave.c: Jukka Kangas When opening the file we don't need MMIO_EXCLUSIVE rights. MMIO_DENYWRITE should be sufficient. * dlls/shell32/shellpath.c: Juergen Schmied Prevent crash in stub of SheGetDirW. * dlls/shell32/shlmenu.c: Juergen Schmied Further implementation of the FileMenu. * windows/mdi.c: Juergen Schmied Set the default menu item of the window menu * wine.ini: James Juran Changed serial ports in wine.ini to /dev/ttySX from /dev/cuaX in accordance with Linux 2.2 Changes file. * if1632/kernel.spec, loader/module.c: Ulrich Weigand Release Win16Lock when calling LoadLibrary32 from 16-bit code. * if1632/thunk.c: Ulrich Weigand Fixed THUNK_SetDCHook when using native USER. * win32/kernel32.c: Ulrich Weigand Bugfix: FT_PrologPrime was broken due to relay changes. * misc/network.c, relay32/mpr.spec: Ulrich Weigand Some stubs added. * windows/hook.c: Ulrich Weigand Suspend window locks before calling hook procedure. * windows/dialog.c: Ulrich Weigand Fixed window refcount handling in GetNextDlgGroupItem. * controls/button.c: Ulrich Weigand Removed superfluous WIN_ReleaseWndPtr. * graphics/ddraw.c: Marcus Meissner Xlib_IDirectDrawSurface4Impl_Flip should show 'flipto' surface, not previous one. (reported by Ove) Sun May 16 17:11:58 1999 Alexandre Julliard * include/winbase.h, include/winnt.h: Added a few missing debug event definitions. * server/console.c, server/file.c, server/pipe.c, server/thread.c, server/thread.h: Adapted to new select interface. Fixed bug in *_signaled routines that could cause busy-waiting in the select loop. * server/object.c, server/object.h, server/request.c, server/select.c, server/socket.c: Changed select interface, separated timeouts from file descriptors. * server/handle.c, server/handle.h, server/process.c, server/process.h: Moved process structure definition to process.h. Added suspend/resume_process. Moved handle table back into the process structure. * scheduler/client.c, server/trace.c, include/server.h: Added TEB in init_thread request. Sat May 15 10:52:56 1999 Alexandre Julliard * miscemu/instr.c: Tried to add an error message when crashing on a selector load because of missing LDT sharing between threads (untested). * scheduler/event.c, scheduler/mutex.c, scheduler/semaphore.c, server/Makefile.in, server/change.c, server/console.c, server/device.c, server/event.c, server/file.c, server/handle.c, server/handle.h, server/main.c, server/mapping.c, server/mutex.c, server/object.c, server/object.h, server/pipe.c, server/process.c, server/process.h, server/request.c, server/select.c, server/semaphore.c, server/snapshot.c, server/socket.c, server/thread.c, server/thread.h, server/trace.c, tools/make_requests, include/server.h, include/server/Attic/object.h, include/server/Attic/process.h, include/server/Attic/thread.h, include/server/request.h, memory/virtual.c: Server reorganization: - moved request handlers to the specific C files - moved handle management to handle.c - moved server private includes to server/ instead of include/server/ * Make.rules.in: Get include files from the current directory first. Fri May 14 18:39:37 1999 Alexandre Julliard * dlls/commdlg/colordlg.c, dlls/commdlg/filedlg.c, dlls/commdlg/finddlg.c, dlls/commdlg/fontdlg.c, dlls/commdlg/printdlg.c, dlls/shell32/shell32_main.c, graphics/psdrv/driver.c, include/win.h, windows/msgbox.c, windows/queue.c, windows/win.c: Marcus Meissner Replaced WIN_GetWindowInstance by GetWindowLongA(GWL_HINSTANCE), removed unnecessary win.h includes, added syslevel.h to queue.c. * controls/combo.c: Francois Boisvert Changed CBGetDroppedControlRect to be compliant with Windows API. * include/wine/exception.h, win32/except.c: Fixed a few bugs, and improved the exception macros (based on suggestions by Sergei Turchanov). * dlls/ver/ver16.c, dlls/version/info.c, dlls/version/install.c, dlls/version/resource.c, ipc/dde_atom.c, ipc/dde_atom_test.c, ipc/shm_block.c, ipc/shm_fragment.c, ipc/shm_fragment_test.c, ipc/shm_main_blk.c, ipc/shm_semaph.c, ipc/shm_semaph_test.c, ipc/wine_test_stub.c, relay32/snoop.c, relay32/utthunk.c, dlls/advapi32/advapi.c, dlls/advapi32/crypt.c, dlls/advapi32/eventlog.c, dlls/advapi32/service.c, dlls/imagehlp/access.c, dlls/imagehlp/debug.c, dlls/imagehlp/imagehlp_main.c, dlls/imagehlp/integrity.c, dlls/imagehlp/internal.c, dlls/imagehlp/modify.c, dlls/imagehlp/symbol.c, dlls/msacm/msacm_main.c, dlls/msacm32/builtin.c, dlls/msacm32/driver.c, dlls/msacm32/filter.c, dlls/msacm32/format.c, dlls/msacm32/internal.c, dlls/msacm32/msacm32_main.c, dlls/msacm32/stream.c, dlls/psapi/psapi_main.c, dlls/rasapi32/rasapi.c, dlls/tapi32/assisted.c, dlls/tapi32/phone.c, console/generic.c, console/ncurses.c, console/xterm.c, controls/combo.c, controls/listbox.c, controls/menu.c, controls/scroll.c, controls/static.c, controls/uitools.c: Converted to the new debug interface, using script written by Patrik Stridvall. * tools/make_X11wrappers, tsx11/ts_xf86dga.c, tsx11/ts_xf86vmode.c, tsx11/ts_xlib.c, tsx11/ts_xpm.c, tsx11/ts_xresource.c, tsx11/ts_xshm.c, tsx11/ts_xutil.c: Converted to the new debug interface. * windows/painting.c: Ulrich Weigand Fixed invalid window refcount handling in RDW_Paint(). * windows/message.c: Noel Borthwick Fix a deadlock with the system message queue by ensuring the system message queue is unlocked while the actual message is being processed. * graphics/ddraw.c: Lionel Ulmer Check if in depth-conversion mode before returning an error message in IDirectDrawPaletteImpl_GetEntries. Thu May 13 18:53:05 1999 Alexandre Julliard * documentation/status/direct3D, graphics/d3d_private.h, graphics/d3dcommon.c, graphics/d3ddevices.c, graphics/d3dexecutebuffer.c, graphics/d3dlight.c, graphics/d3dmaterial.c, graphics/d3dtexture.c, graphics/d3dviewport.c, graphics/ddraw.c, graphics/ddraw_private.h, include/wine_gl.h: Lionel Ulmer Replaced all the Mesa specific code by GLX code. Should work now on any OpenGL implementation. * windows/x11drv/keyboard.c: Added Italian keyboard support. * graphics/enhmetafiledrv/graphics.c: Huw D M Davies Fixed a couple of memcpy errors. * graphics/psdrv/driver.c: Huw D M Davies Small fix to help native win95 PrintDlg on the way. * dlls/winaspi/winaspi16.c, if1632/winaspi.spec, include/aspi.h: Andreas Mohr Implemented InsertInASPIChain and fixed minor things. * windows/x11drv/mouse.c: Andreas Mohr Fixed quite ill window locking code. * windows/winpos.c: Francis Beaudet Fixed an infinite loop in ChildWindowFromPointEx. * controls/menu.c: Juergen Schmied - prevent crash when GetMenuDefaultItem is called on empty menu - set default item on system menu * loader/ne/module.c, memory/selector.c, relay32/ntdll.spec, win32/kernel32.c, win32/ordinals.c, dlls/ntdll/exception.c, dlls/ntdll/rtl.c, include/stackframe.h: Adapted for new register functions support (ESP_reg in register functions now points after the arguments). * relay32/builtin32.c, relay32/kernel32.spec, relay32/relay386.c, relay32/snoop.c, tools/build.c: Win32 register functions can now have arguments. Simplified relay debugging for register functions. * relay32/kernel32.spec, win32/device.c: VxDCall functions do not need to be 'register'. Wed May 12 16:10:53 1999 Alexandre Julliard * relay32/builtin32.c: Fixed bug I introduced in relay debugging. * dlls/ntdll/exception.c, if1632/thunk.c, include/Attic/except.h, include/wine/exception.h, win32/except.c: Added macros and definitions for using exception inside Wine or Winelib code. * include/Attic/except.h, include/ntddk.h, include/winnt.h, misc/crtdll.c, win32/init.c: Moved some exception definitions to winnt.h and ntddk.h. * msdos/devices.c: Marcus Meissner Added missing WINAPI for the callback procs. * include/sig_context.h: Added ERROR_sig. * ole/stg_bigblockfile.c: Francis Beaudet Bug fix. * misc/winsock.c, include/winsock.h: Marcus Meissner WSOCK32/WINSOCK uses SetLastError() to keep its own WSALastErrors, replaced all pwsi->err references. * loader/pe_image.c: Changed some error handling a bit. * windows/win.c: Ove Kaaven Cleaner Suspend/RestoreWndsLock, which should fix some slowness. * relay32/kernel32.spec, relay32/ntdll.spec: Added RtlUnwind in ntdll, and made kernel32 spec entry a forward to the ntdll one. * relay32/builtin32.c, tools/build-spec.txt, tools/build.c, include/builtin32.h: Added import declaration for Win32 built-ins. Mon May 10 14:44:48 1999 Alexandre Julliard * tools/build-spec.txt, tools/build.c, include/builtin32.h, relay32/builtin32.c: Added support for forwarded ordinals in built-in dlls. Sun May 9 16:15:28 1999 Alexandre Julliard * win32/console.c: Fixed request size for alloc_console and free_console. * relay32/kernel32.spec, relay32/ntdll.spec, win32/except.c, dlls/ntdll/Makefile.in, dlls/ntdll/exception.c, dlls/ntdll/rtl.c, include/Attic/except.h, include/debugdefs.h, include/ntddk.h, include/thread.h, include/winbase.h, include/winnt.h: Improved exception handling. Based on the work of Sergey Turchanov . * loader/module.c: Use OpenFile() to test for file existence, so that the path gets searched. * server/select.c: Ove Kaaven Restart interrupted select() (happens with -pg). * debugger/memory.c: Ove Kaaven Fixed off-by-one bug in memory access check. * misc/registry.c: Marcus Meissner More debug output for RegQueryInfoKey. * debugger/stack.c: Ove Kaaven Fixed a couple of bugs (silent backtrace not totally silent, crashes when the stack is corrupted or similar). ---------------------------------------------------------------- Sat May 8 18:39:05 1999 Alexandre Julliard * tools/wineconf.libs/autoconf.eng, tools/wineconf.libs/autoconf.tcl, tools/wineconf.libs/browsers.eng, tools/wineconf.libs/dirbrowser.tcl, tools/wineconf.libs/general.eng, tools/wineconf.libs/getfilename.tcl, tools/wineconf.libs/message.tcl, tools/wineconf.libs/message2.tcl, tools/wineconf.libs/saveRC.tcl, tools/wineconf.libs/wine-half.gif, tools/wineconf.libs/wineconf.eng, tools/wineconf.libs/wineconf.tcl, tools/wineconf.libs/wineconf1.tcl, tools/wineconf.tcl: Jean-Louis Thirot Added graphical configuration tool wineconf.tcl. * win32/console.c: Marcus Meissner Ignore ESC[%dc reports generated by 8bit control codes. Open console even if we already have one in the process. * files/profile.c: Marcus Meissner Fixed off by 1 error in section code (did not return len-2 on buffer overflow in some cases, but len-1). * dlls/comctl32/propsheet.c: Marcus Meissner Fixed warning. * graphics/x11drv/palette.c: Pavel Roskin Fixed palette handling for true/high-color X11. * loader/ne/module.c: Uwe Bonnes Fixed extension handling in LoadLibrary16. * windows/dce.c, windows/painting.c, windows/win.c, windows/winpos.c, windows/x11drv/event.c, include/win.h, objects/region.c: Alex Korobka Rearranged PAINT_RedrawWindow() so that it first recursively updates invalid regions and only then starts sending out messages. This should help with reentrancy during message processing and now it needs just one (or none) scratch region for all there is to do. Also, small fixes for SetWindowPos(). * configure, configure.in: Added check for missing __i386__ definition. * include/config.h.in, scheduler/client.c, server/socket.c, server/trace.c, configure, configure.in, tools/wrc/parser.y, ole/datacache.c, ole/defaulthandler.c, ole/hglobalstream.c, ole/memlockbytes.c, scheduler/sysdeps.c, tools/build.c, misc/wsprintf.c, miscemu/instr.c, msdos/ioports.c, if1632/snoop.c, include/server.h, include/stackframe.h, ipc/bit_array.c, controls/edit.c, controls/menu.c, debugger/dbg.y, graphics/x11drv/xfont.c: Patrik Stridvall ANSI C fixes. * dlls/comctl32/propsheet.c: Marcus Meissner Pass PROPSHEETPAGE to propertypage dialog as lParam. * misc/winsock.c, multimedia/dsound.c, objects/brush.c, objects/enhmetafile.c, ipc/dde_atom.c, ipc/generic_hash.c, ipc/shm_block.c, ipc/shm_main_blk.c, ipc/shm_semaph.c, loader/dos/dosmod.c, loader/signal.c, memory/ldt.c, graphics/psdrv/init.c, include/dplay.h, include/dplobby.h, include/heap.h, include/metafile.h, include/mmsystem.h, include/psdrv.h, include/shellapi.h, include/sig_context.h, include/winsock.h, dlls/ntdll/time.c, dlls/shell32/folders.c, dlls/shell32/shlfolder.c, dlls/shell32/shlview.c, graphics/ddraw.c, graphics/ddraw_private.h, graphics/dispdib.c, dlls/comctl32/pager.c, dlls/comctl32/rebar.c, dlls/comctl32/status.c, dlls/comctl32/toolbar.c, dlls/comctl32/tooltips.c, dlls/comctl32/treeview.c, dlls/commdlg/fontdlg.c, debugger/msc.c, dlls/comctl32/comboex.c, dlls/comctl32/header.c, dlls/comctl32/hotkey.c, dlls/comctl32/listview.c: Patrik Stridvall ANSI C fixes. * windows/caret.c, include/wine/wingdi16.h, include/wine/winuser16.h, misc/printdrv.c, objects/font.c, objects/linedda.c, objects/region.c, graphics/win16drv/font.c, include/gdi.h, include/windef.h, include/wingdi.h, include/winuser.h, graphics/psdrv/font.c: Huw D M Davies Split off wingdi16.h from wingdi.h. Add many more #defines/typedefs to bring wingdi.h almost upto a complete NT4.0 interface. Fix return value of SetRectRgn(). * windows/display.c, windows/focus.c, windows/nonclient.c, windows/ttydrv/mouse.c, windows/win.c, windows/winpos.c, include/ttydrv.h, include/winpos.h: Michael Veksler Removed #include "wine/winuser16.h" and use "struct tag????" instead. * debugger/stack.c: Ove Kaaven Improved Wine debugger backtrace. New features: - Displays ebp, in case you want to check stackframes manually - Detects far calls even when windows apps don't mark them - Tracks CallFrom16/CallTo16 relaying (thunking) * loader/elfdll.c: Ulrich Czekalla Bugfix: get_sobasename was off by one pointer increment. * multimedia/init.c: Kevin Holbrook Fixed implicit type warning. * controls/listbox.c: Gerard Patel Values returned from PtInRect and LB_ITEMFROMPOINT are reversed. * ole/datacache.c, ole/defaulthandler.c, ole/ole2.c, ole/ole2stubs.c, ole/oleobj.c: Francis Beaudet Second part of the OLE datacache implementation. * msdos/Makefile.in, msdos/devices.c, msdos/dosmem.c, msdos/int21.c, include/dosexe.h, include/miscemu.h, include/msdos.h: Ove Kaaven Moved DOS List of Lists initialization, and added the beginnings of the DOS device structures. * programs/regapi/regapi.c, include/winreg.h, misc/registry.c: Noomen Hamza Bug fixes. * ole/hglobalstream.c, relay32/ole32.spec: Thuy Nguyen Implemented GetHGlobalFromStream. * include/thread.h, scheduler/thread.c: Ulrich Weigand Call THREAD_FreeTHDB as service thread callback. * include/message.h, loader/task.c, windows/timer.c: Ulrich Weigand Removed TIMER_SwitchQueue. * debugger/memory.c: Uwe Bonnes Format output in DEBUG_ExamineMemory for "d" and "x" not to exceed 80 chars. * loader/signal.c: Marcus Meissner Stop winelib programs on fault instead of endless faultlooping. * Makefile.in: James Juran Run ldconfig in make install if using --enable-dll. Cleaned up uninstall_lib as well. * ole/storage.c, ole/storage32.c, ole/storage32.h, relay32/ole32.spec, ole/stg_bigblockfile.c, include/wine/obj_storage.h, ole/memlockbytes.c: Thuy Nguyen Implementation of IStorage supported by an implementation of ILockBytes on top of an HGLOBAL. * files/profile.c, relay32/kernel32.spec: Marcus Meissner Return the correct value from GetPrivateProfileSectionA. Copy/convert back the buffer in GetPrivateProfileSectionW. Replace some output pointers str/wstr->ptr in kernel32.spec. * loader/task.c, scheduler/process.c: Ulrich Weigand Some initialization sequence bugfixes: - Initialize process crst for 16-bit processes. - Don't crash due to uninitialized stack frames in WineLib. - Map system DLLs before calling UserSignalProc. - Signal USIG_PROCESS_CREATE only *after* the env_db is filled. * if1632/thunk.c: Ulrich Weigand Call Callout routines directly when using builtin USER. * loader/pe_image.c: Ulrich Weigand Bugfix: all PE modules were marked 'internal'. * include/dce.h, objects/dc.c, windows/dce.c: Ulrich Weigand Check for busy DCE moved to DCHook16(). * include/win.h, loader/main.c, windows/win.c: Ulrich Weigand Initialize WIN_CritSection earlier. * dlls/comctl32/trackbar.c, include/trackbar.h: Luc Tourangeau Removed the timer that was used to queue TRACKBAR_Refresh calls. Removed all direct calls to TRACKBAR_Refresh (except from within the WM_PAINT handling section) and replaced them by calls to InvalidateRect. Fixed a bug in the TRACKBAR_SetPos function. Fixed the behavior for different types of mouse input. * dlls/comctl32/toolbar.c: Yuxi Zhang Implemented toolbar multirow button layout. * dlls/comctl32/tooltips.c: Francois Boisvert Implementation of WM_GETTEXT and WM_GETTEXTLENGTH in tooltips. * ole/ole2disp.c: Thuy Nguyen Implemented OleTranslateColor. * include/winuser.h, windows/input.c: Francis Beaudet Changed the return value of GetKeyboardState and SetKeyboardState from VOID to BOOL. * controls/listbox.c: Francois Boisvert Prevented LISTBOX_RepaintItem from repainting a non visible item. * relay32/builtin32.c: Eric Pouech Fixed typo. * windows/class.c: Huw D M Davies Bugfix for TRACE in UnregisterClass. Wed May 5 13:20:50 1999 Alexandre Julliard * include/Attic/propsheet.h: No longer necessary. Tue May 4 16:55:23 1999 Alexandre Julliard * objects/dc.c, windows/dce.c, include/dce.h: Francis Beaudet Check if DC is busy before deleting it. * win32/newfns.c: Andreas Mohr GetMailslotInfo is supposed to check for pointer validity. * server/select.c: Ulrich Weigand Possible crash in select_loop() fixed. * include/services.h, loader/task.c, scheduler/services.c: Ulrich Weigand Fixed various stupid bugs in services thread routines. Added SERVICE_Exit routine to kill the services thread. * misc/main.c: Eric Pouech Inverted class/channel in __(SET|GET)_DEBUGGING macros. * windows/queue.c: Ulrich Weigand Correct implementation of GetWindowThreadProcessId(). * if1632/mmsystem.spec, multimedia/mmsystem.c: Ulrich Weigand Added PlaySound16, sndPlaySound16. * if1632/thunk.c: Ove Kaaven Fixes winproc deadlock for win16. Mon May 3 09:44:57 1999 Alexandre Julliard * windows/queue.c: Eric Pouech Fixed some deadlock(s) in message sending. * multimedia/mmsystem.c: Eric Pouech cleaned up debug channels to use default one (mmsys) more conversions from mixerXXXW and mixerXXXX16 to mixerXXXXA fixed callback bug in midiStream functions fixed compilation bug with egcs changed to the new debug channel interface * multimedia/mmaux.c: Eric Pouech small range fixes for OSS driver changed to the new debug channel interface * multimedia/mixer.c: Eric Pouech first (working) shot at OSS mixer low level interface changed to the new debug channel interface * misc/network.c, relay32/mpr.spec: Ulrich Weigand Fixed off-by-one ordinals in MPR. Added MPR_Alloc/ReAlloc/Free (MPR.22-24). * loader/module.c, if1632/relay.c: Ulrich Weigand Bugfix: release Win16Lock in WinExec16, CallProc[Ex]32W_16. * loader/main.c: Ulrich Weigand Load system DLLs into WineLib applications. * graphics/psdrv/ps.c: Huw D M Davies Small update to the PostScript encoding vector. * loader/module.c, loader/task.c: Bug fixes. Sun May 2 19:10:57 1999 Alexandre Julliard * scheduler/process.c: Moved a few more initialisations to the new process context. * loader/task.c: Don't initialise the stacks for 32-bit processes. * miscemu/main.c: Only check number of tasks after first message. Use a 16-bit module for creating the initial task. * include/authors.h, AUTHORS: Updated authors list from the Changelog. Please let me know if you have been left out. * loader/task.c, scheduler/process.c: Converted to the new debugging interface (done with the help of the script written by Patrik Stridvall). Some changes to the initialisation sequence for 32-bit processes. * */*.c: Converted to the new debugging interface (done with the help of the script written by Patrik Stridvall). * tools/make_debug, include/debugdefs.h, include/debugtools.h, misc/main.c: Misc fixes and improvements. * include/config.h.in, configure, configure.in: Added check for -lmmap for OS/2. * include/debugdefs.h, ole/hglobalstream.c, ole/stg_stream.c, ole/storage32.c: Francis Beaudet Fixed a few bugs in the OLE storage implementation, added a new set of trace statements for the OLE storage related methods and introduced a new debug channel for the storage subsystem. * multimedia/time.c, objects/dib.c, objects/palette.c, include/wine/winuser16.h, misc/spooler.c: Michael Veksler Removed redundant include of winbase.h from winuser16.h. Moved types from winbase.h to winuser16.h . * include/winuser.h: Juergen Schmied - default item handling - small drawing fixes * dlls/commdlg/cdlg_En.rc, dlls/commdlg/printdlg.c: Klaas van Gend More implementation of PrintDlgA. Conversion of resource identifiers of Print32 window to comply to the M$ numbering. * server/thread.c: Ulrich Weigand Don't crash if queuing an APC on a thread that doesn't wait. * windows/timer.c, windows/x11drv/event.c, include/message.h: Ulrich Weigand Use SERVICES callback to implement Windows timers. Timer expiration handling removed from EVENT_WaitNetEvent loop. * memory/heap.c: Huw D M Davies Call SetLastError in HeapCompact(). * include/winbase.h: Ove Kaaven Added prototype for TryEnterCriticalSection. * include/commdlg.h: Klaas van Gend Make all structures packed and removal of some WINE_PACKED. * controls/button.c: Pavel Roskin Pushbuttons should only be rounded in Win31 look. * controls/menu.c: Juergen Schmied - default item handling - small drawing fixes * windows/winpos.c: Noel Borthwick Fixed an unbalanced windows lock/unlock sequence in WINPOS_ActivateOtherWindow. * include/debugdefs.h: enhmetafile added * relay32/.cvsignore, relay32/Makefile.in, relay32/builtin32.c, relay32/mcianim.spec, relay32/mciavi.spec, relay32/mcicda.spec, relay32/mciseq.spec, relay32/mciwave.spec, relay32/winmm.spec, include/multimedia.h, loader/main.c, multimedia/audio.c, multimedia/init.c, multimedia/mci.c, multimedia/mcianim.c, multimedia/mciavi.c, multimedia/mcicda.c, multimedia/mcimidi.c, multimedia/mcistring.c, multimedia/mciwave.c, multimedia/mmsystem.c, documentation/status/multimedia, if1632/mmsystem.spec, wine.ini: Eric Pouech - got rid of all the internal MM tweaks to load builtin MCI drivers. They are all seen as drivers, loaded as DLLs and standard module loadorder is used to know which type to use (builtin vs native). - first full working implementation of mmThread??? functions (to support gracefully native MCI drivers). - support of mmShowMMCPLPropertySheet. - fix of some heap validate bugs (thanks to Ulrich for reporting them). * loader/module.c: Guy Albertelli Fix CreateProcessA to implement correct actions on ambiguous command line names (try longer and longer strings). * Makefile.in, configure, configure.in, graphics/enhmetafiledrv/.cvsignore, graphics/enhmetafiledrv/Makefile.in, graphics/enhmetafiledrv/dc.c, graphics/enhmetafiledrv/graphics.c, graphics/enhmetafiledrv/init.c, graphics/enhmetafiledrv/mapping.c, graphics/enhmetafiledrv/objects.c, graphics/metafiledrv/init.c, include/enhmetafiledrv.h: Huw D M Davies Started implementing Enhanced MetaFile driver. * include/ole2.h, include/wine/obj_oleobj.h, include/wine/obj_oleview.h, ole/Makefile.in, ole/datacache.c, ole/defaulthandler.c, ole/ole2.c, ole/ole2stubs.c, ole/oleobj.c, relay32/ole32.spec, dlls/shell32/shlview.c: Francis Beaudet Implemented the OLE object default handler and data cache. * include/enhmetafile.h, include/wingdi.h, objects/enhmetafile.c: Huw D M Davies Several improvements to Enhanced MetaFile playback. * loader/ne/module.c: Bertho Stultiens Only try to append ".dll" if a library is loaded implicitely. * dlls/shell32/shellord.c: Michael Veksler Fix TRACE formatting warnings. * dlls/shell32/shlfolder.c: Andreas Mohr Fixed a small syntax problem. * windows/winpos.c: Juergen Schmied - better stubs for Get/Set special (Progman/Taskman) window functions * relay32/user32.spec, windows/message.c: Juergen Schmied - new SendMessageCallbackW - some fixme's for missing A<->W conversion * windows/dialog.c: Noel Borthwick Fixed an unbalanced windows lock/unlock sequence in GetNextDlgTabItem. * misc/printdrv.c: Klaas van Gend Bugfix for EnumPrinters level 2. * windows/x11drv/keyboard.c: Guy Albertelli Correct logic in GetKeyNameText. * documentation/bugreports: Andreas Mohr Removed +snoop from documentation/bugreports. Sat May 1 10:41:02 1999 Alexandre Julliard * objects/bitmap.c: Pavel Roskin LoadImageW fixed for hicolor displays. * include/mmsystem.h, include/multimedia.h, multimedia/mmsystem.c: Marcus Meissner MCI_ANIM_OPEN_PARMSW should be LPCWSTR, MCI_DefYieldProc should be WINAPI. * dlls/comctl32/header.c: Chris Morgan James Abbatiello Fixed HEADER_InsertItemA and HEADER_InsertItemW null pointer checking to handle wide character strings properly. Fix of our previous patch for null pointer checking. * ole/Makefile.in, ole/memlockbytes.c, ole/ole2stubs.c: Thuy Nguyen Implemented CreateILockBytesOnHGloba, GetHGlobalFromILockBytes and the ILockBytes interface based on an HGLOBAL. * ole/compobj.c: Francis Beaudet Fixed a bug in CoRegisterClassObject. * dlls/comctl32/toolbar.c: Luc Tourangeau Removed some flickering when inserting or deleting buttons. * dlls/comctl32/listview.c: Chris Morgan James Abbatiello Fixed LISTVIEW_GetItemChanges() to perform a more complete comparison between lpItem and lpLVItem. Now compares the pszText string of the lpItem and lpLVItem structs. Fixes a bug where the old and new item have the same attributes but their text differs and GetItemChanges() compares them as equal. * dlls/comctl32/propsheet.c, dlls/comctl32/propsheet.h, dlls/comctl32/rsrc.rc, dlls/comctl32/tab.c: Thuy Nguyen Added support for adding and removing pages dynamically from a property sheet. * controls/button.c, controls/combo.c, controls/desktop.c, controls/listbox.c: Marcus Meissner Removed the gotos from the WndProcs, always use a small wrapper that locks the window, calls the real wndproc, unlocks the window. * dlls/shell32/contmenu.c: Juergen Schmied Fixed default menu item. * win32/code_page.c, misc/ddeml.c: Juergen Schmied Fixed typo. * windows/queue.c: Andreas Mohr Added a missing LeaveCriticalSection. * windows/mdi.c: Francois Boisvert Fixed a wrong usage of WIN_FindWndPtr/WIN_ReleaseWndPtr in TranslateMDISysAccel16. * misc/comm.c: Ove Kaaven Fixed off-by-one bug in async output buffers. * ole/ole2.c: Francis Beaudet Fixed a little Drag and Drop bug. ---------------------------------------------------------------- Mon Apr 26 14:58:59 1999 Alexandre Julliard * include/config.h.in, configure, configure.in: Marcus Meissner Added autoconf check for "inline". You can now use it, it will be defined to (empty) for compilers that do not have it. * tools/wrc/parser.y: Gerald Pfeifer Don't include alloca.h. * README, documentation/wine.man: James Juran Update to reflect recent changes and discussions. * loader/loadorder.c: Bertho Stultiens The load order parser should not always complain about extensions. * controls/menu.c: Juergen Schmied - align magic buttons right - shortcuts alignment working again * loader/ne/module.c: Eric Pouech Fixed loading of native NE dlls. Sun Apr 25 19:04:42 1999 Alexandre Julliard * memory/heap.c: Fixed __builtin_return_address arg. * */*: Patrik Stridvall Fixed ANSI compabillity. * */*: Bertho Stultiens Built-in dlls now have resources attached via the PE-header like normal dlls. This enables the use of the resource API. * misc/registry.c: Use $HOME instead of getpwuid for user's home directory. Fixed messed up indentation. * graphics/x11drv/xfont.c: Use $HOME instead of getpwuid for user's home directory. * */*.h: Patrik Stridvall #pragma pack(?) changed to #include "*pack*.h" * tools/build.c, include/commctrl.h, include/commdlg.h, include/docobj.h, include/heap.h, include/shellapi.h, include/winbase.h, include/windef.h, include/wine/obj_oleaut.h, include/wine/obj_storage.h, include/winerror.h, include/wingdi.h, include/winnetwk.h, include/winnls.h, include/winuser.h: Jim Aston Added some missing #defines I've run across. * files/dos_fs.c: Andreas Mohr Ignore trailing dots on file names. * include/debugger.h, debugger/dbg.y, debugger/debug.l, debugger/display.c, debugger/editline.c, debugger/expr.c, debugger/hash.c, debugger/msc.c, debugger/source.c, debugger/stabs.c, debugger/stack.c, debugger/types.c: Ove Kaaven Added a possibility to let the internal debugger use a separate heap. Not enabled by default, change #if in include/debugger.h to use this (the heap allocator is very slow). * loader/loadorder.c: Eric Pouech wine.conf should not overrule content of burned in data in loadorder.c. * graphics/mapping.c: Karl Lessard SetMapMode should not reset the window and viewport origins to 0. * tools/wineconf: Eric Pouech Allow to automatically copy part of wine.ini into generated file. Small perl enhancement (work in strict mode). Small updates in heuristics. * wine.ini: Eric Pouech Upgraded to have a decent multimedia DLLs configuration. * tools/wrc/wrc.h, tools/wrc/writeres.c, tools/wrc/CHANGES: Bertho Stultiens - Fixed a counting bug in the win32 count and sort routine. - Fixed sort order of resources (must be name before ordinal). - Shuffled a couple of global variables so that built-in dlls now can load resources through the proper PE interface. * include/windef.h, include/winreg.h: Adrian Thurston Added support for strict handles. Only works on machines where sizeof(UINT) == sizeof(void*). * scheduler/process.c: Ulrich Weigand Initialize process critical section in the correct process context. * scheduler/critsection.c: Ulrich Weigand Warn if wrong process tries to enter critical section. Better implementation of Reinitialize/UninitializeCriticalSection (still not quite correct). * loader/loadorder.c: Marcus Meissner debug.h must be last in list of includes. * loader/ne/module.c: Ulrich Weigand Return 32-bit module in GetModuleHandle16() if appropriate. * msdos/int2f.c: Eric Pouech Fixed crash when status was read with cd-rom tray open. * windows/driver.c: Eric Pouech Fixed a bug in msg conversion. * dlls/comctl32/trackbar.c: Eric Pouech Prevent crash when nMinRange > nMaxRange. * include/winuser.h: Eric Pouech Added some missing manifest constants for Queue Status functions (QS_????). * controls/button.c, controls/edit.c, windows/mdi.c: Eric Pouech Added missing WIN_ReleaseWndPtr. * graphics/x11drv/xfont.c: Chris Morgan James Abbatiello More appropriate default size for fonts with invalid sizes. * dlls/comctl32/listview.c: Chris Morgan James Abbatiello Implemented SetColumnWidth for ListView control. * documentation/config: Adam Sacarny Added new documentation for the configuration file. * misc/version.c: Andreas Mohr Improved VERSION_GetVersion. * windows/x11drv/keyboard.c: Peter Bortas Added Swedish keyboard layout. * include/gdi.h, include/metafiledrv.h, include/wingdi.h, objects/clipping.c, objects/dc.c, objects/dcvalues.c, objects/font.c, objects/gdiobj.c, objects/metafile.c, graphics/metafiledrv/Makefile.in, graphics/metafiledrv/dc.c, graphics/metafiledrv/graphics.c, graphics/metafiledrv/init.c, graphics/metafiledrv/objects.c, graphics/painting.c, graphics/psdrv/README, graphics/psdrv/init.c, graphics/win16drv/init.c, graphics/x11drv/init.c: Huw D M Davies General tidy up of the MetaFile driver - make sure that everything goes through the DCFuncs table. * misc/toolhelp.c, if1632/kernel.spec: Uwe Bonnes Add a stub for GlobalMasterHandle. * tools/bug_report.pl: Adam Sacarny Much nicer way to select wine's location. Option to disable creation of debugging output. Debugging output is now created in directory script was started in. * windows/x11drv/wnd.c: Noel Borthwick Fixed a problem with managed mode, where popup windows with a WS_DLGFRAME style were appearing with a title bar. According to the docs for WS_DLGFRAME a window with this style cannot have a title bar. * loader/loadorder.c: Marcus Meissner Use DllOverrides from wine.ini as defaults also in loadorder.c (merged in some MM dlls lines from Eric Poeuch). * windows/timer.c: Eric Pouech Fixed some bogus infinite expiration time. * windows/x11drv/event.c: David Luyer - consolidate both cases of !pending in WaitNetEvent - select() returns -1 not 0 on error in WaitNetEvent * memory/heap.c, include/heap.h: Ove Kaaven Made HeapValidate threadsafe, and added some macros to track callerEIP a little better. Added HEAP_xrealloc. Sat Apr 24 12:02:15 1999 Alexandre Julliard * loader/loadorder.c, configure, configure.in, include/acconfig.h, include/config.h.in, include/elfdll.h, loader/elf.c, loader/elfdll.c: Marcus Meissner autoconf fixes and cleanups (check for dlopen() in libc too). * ole/Makefile.in, ole/hglobalstream.c, ole/ole2stubs.c, ole/stg_stream.c: Francis Beaudet Implemented CreateStreamOnHGLOBAL. * ole/compobj.c: Andreas Mohr Let CoSetState() accept state == NULL. * dlls/shell32/pidl.c, dlls/shell32/pidl.h: Juergen Schmied Made internal format more compatible. * dlls/shell32/shlfolder.c: Juergen Schmied Small fixes. * windows/class.c, windows/dce.c, controls/combo.c: Guy Albertelli Fix locking with proper calls to WIN_ReleaseWndPtr. * multimedia/dsound.c: Ove Kaaven Don't malloc/free for every mixing operation, use the same buffer over instead... * dlls/comctl32/header.c: Chris Morgan James Abbatiello HEADER_InsertItemA and HEADER_InsertItemW now treat null pointers to text strings as null strings, as Windows does. Fixes wine crash on startup of CuteFTP. * misc/registry.c: Noomen Hamza Set (when registry loaded) data to "\0" and length to 2 in empty string value case, in place of setting data to NULL and length to 0, and this is without initializing output buffer parameter of RegQueryValue*. * include/wingdi.h: Huw D M Davies Added Panose defines and EXTLOGFONT[A|W]. Thu Apr 22 16:27:53 1999 Alexandre Julliard * */*: Patrik Stridvall Fixed ANSI compabillity. * multimedia/mciavi.c, multimedia/mcimidi.c, multimedia/mciwave.c, multimedia/midi.c, objects/text.c, windows/caret.c, windows/rect.c, dlls/version/info.c, if1632/thunk.c, include/wine/winuser16.h, memory/atom.c, memory/string.c, misc/lstr.c, multimedia/mcianim.c, controls/uitools.c, dlls/commdlg/finddlg.c, dlls/shell32/brsfolder.c: Michael Veksler Removed some includes of 16 bit API. * dlls/shell32/pidl.c, dlls/shell32/shell32_main.h, include/oleobj.h, include/shlobj.h, dlls/shell32/dataobject.c: Adrian Thurston ICOMization of remaining interfaces. * dlls/comctl32/tooltips.c: Noel Borthwick Fixed bug with tooltips stealing focus whenever a tooltip was created, shown, hidden or tracked. The SetWindowPos calls needed to have the SWP_NOACTIVATE flag set additionally. * objects/clipping.c: Karl Lessard Fixed coordinates conversion in OffsetClipRgn. * include/objbase.h: Adrian Thurston Clean up objbase.h. Makes the STDMETHOD set of macros available to the winelib user. * relay32/kernel32.spec, scheduler/handle.c: Marcus Meissner CreateSocketHandle,GetHandleContext,SetHandleContext stubs added. * dlls/shell32/brsfolder.c, dlls/shell32/iconcache.c, dlls/shell32/regstream.c, dlls/shell32/shell32_main.c, dlls/shell32/shellord.c, include/shell.h, include/shellapi.h, include/shlobj.h: Juergen Schmied Moved stuff to the right place. * windows/syscolor.c: Gerard Patel Fixed syscolors for win 3.1. * files/profile.c, if1632/kernel.spec: Ulrich Weigand Added missing profile KERNEL routines (call 32-bit versions). * if1632/builtin.c: Ulrich Weigand Bugfix: BUILTIN_GetEntryPoint16 didn't work correctly with the new entry table layout. * include/wingdi.h: Huw D M Davies Add Enhanced MetaFile record structures. * dlls/comctl32/commctrl.c, dlls/comctl32/propsheet.c, include/resource.h, resources/sysres_En.rc: Thuy Nguyen First patch implementing property sheets. * relay32/gdi32.spec: Ulrich Weigand Bugfix: GDI32.100-104 are ordinal-only routines. Added stubs for some Win98 GDI32 routine. Re-numbered all named exports (lexicographically). * graphics/driver.c: Ulrich Weigand Added prototypes (stubs) for GDI32.100-104. * dlls/shell32/folders.c, dlls/shell32/iconcache.c, dlls/shell32/pidl.c, dlls/shell32/pidl.h, dlls/shell32/shell32_main.h, dlls/shell32/shelllink.c: Juergen Schmied - more checks for valid pidl formats * relay32/shell32.spec, dlls/shell32/shellord.c, include/shlobj.h: Juergen Schmied - corrected parameter count for SHGetSettings - stub SHValidateUNC * loader/elf.c: Gerald Pfeifer #else branch compile fix. * include/elfdll.h, loader/elfdll.c, loader/loadorder.c: Bertho Stultiens Change wine's dlopen search-patch strategy not using the environment and added #if:s to seperate the code out if libdl isn't availble. * ole/compobj.c: Francis Beaudet Added a check for a NULL pointer in CoFreeUnusedLibraries. * relay32/builtin32.c: Marcus Meissner Include debug.h last (ERR() macro problem on Solaris). * controls/combo.c: Francis Beaudet Fixed a sizing bug in the combobox control. * tools/build.c: Ulrich Weigand Bugfix: Internal NE entry point tables were bad (one huge bundle). * misc/registry.c: Noomen Hamza Initialize the output buffer parameters to 0 in RegQueryValue* functions. This is important specially when there's no data to return. * loader/module.c: Bertho Stultiens Do not increment module refCount if self is loaded from within DllEntryPoint during the attach notification. Wed Apr 21 14:27:37 1999 Alexandre Julliard * controls/menu.c: Juergen Schmied - protect TRACE against NULL-ptr - rewrote GetMenuItemID/GetSubMenu to use MENU_FindItem (hmenu=0xffff fix). * dlls/comctl32/toolbar.c: Juergen Schmied Fixed typo. * loader/ne/module.c: Bertho Stultiens Reimplementation of GetModuleHandle16 according to how win95 handles it (thanks to Marcus Meissner ). * if1632/builtin.c: Bertho Stultiens Corrected wrong return values of built-in loader to work with the loadorder stuff. Mon Apr 19 16:45:24 1999 Alexandre Julliard * graphics/metafiledrv/bitblt.c, graphics/metafiledrv/init.c, include/bitmap.h, include/metafiledrv.h, objects/dib.c, objects/metafile.c: Huw D M Davies Implemented recording of StretchDIBits and SetDIBitsToDevice and playback of SetDIBitsToDevice. Cleaned up PlayMetaFileRecord a bit. * include/elfdll.h, loader/elf.c, loader/elfdll.c, loader/loadorder.c: Bertho Stultiens Removed non-portable hacks and replaced them with more general versions. * windows/dce.c: Paul Millar Code added to re-evaluate stale DC information in DCE cache. * loader/module.c: Bertho Stultiens Attach notifications must be send after all recursive dependencies are loaded and not before. * graphics/x11drv/palette.c: Patrik Stridvall Fixed typo. * multimedia/mcicda.c: Eric Pouech Fixed playing position when required by track number. * win32/device.c: Marcus Meissner Added MMDEVLDR DeviceIoctl(5) stub (msacm32 is a bit happier now). * wine.ini: Marcus Meissner Native toolhelp will not work (missing GLOBALMASTERHANDLE). * BUGS, README: Marcus Meissner Updated. * controls/edit.c: Gerard Patel Test for static was reversed. * */*: Patrik Stridvall New debug scheme with explicit debug channels declaration. Sun Apr 18 14:44:26 1999 Alexandre Julliard * loader/ne/module.c: Removed extra call to TASK_StartTask. * include/acconfig.h, include/config.h.in, configure, configure.in: Removed check for union semun; cleaned up a bit. * include/server.h, server/process.c, server/trace.c, tools/make_requests: Added env ptr to new_process request * relay32/user32.spec, windows/mdi.c, controls/menu.c, include/menu.h, include/winuser.h: Juergen Schmied - use fonts/fontsizes given by SystemParametersInfo - drawing/alignment fixes, win98 style for menubar - ownerdrawn menus are working now for the first time - complete constants magic items - use right owner for popupmenus - new: Get/SetMenuInfo - implemented: Get/SetMenuContextHelpId - more flags for Get/SetMenuItemInfo * files/dos_fs.c: robert w hall Make DOSFS_MatchLong match a search string ending in '*.' to a zero extension file name, allowing Mathcad to run. * loader/loadorder.c: Eric Pouech Fixed memory freeing. * programs/cmdlgtst/Attic/cmdlgr.h, programs/cmdlgtst/cmdlgr.rc, programs/cmdlgtst/cmdlgtst.c, programs/cmdlgtst/cmdlgtst.h: Renamed cmdlgr.h to cmdlgtst.h. * scheduler/critsection.c: Added timeout to critical section waiting. * include/thread.h, scheduler/sysdeps.c: Ulrich Weigand Merged Linux/FreeBSD reentrant errno handler, added Solaris. Preliminary support for Solaris low-level threads (LWPs) added. * configure, configure.in, include/acconfig.h, include/config.h.in: Ulrich Weigand Reentrant libc check for Solaris added. Fixed reentrant X11 check for FreeBSD and Solaris. Added check for Solaris low-level thread routines. * loader/ne/module.c: Fixed toolhelp routines usage in GetModuleFromPath (reported by Bertho Stultiens). * tools/wineinstall: Ove Kaaven Automatic install script, which automatically configures and compiles wine and regapi, runs tools/wineconf to generate a configuration file if one does not already exist, and uses regapi to install the default registry. * documentation/gui, windows/win.c, windows/winpos.c: Eric Pouech Properly handling cases like calling SetWindowPos while processing WM_NCCREATE. * graphics/x11drv/dib.c: Eric Pouech Fixed a few bugs (typos from cut & paste & invalid heap block freeing). * misc/wsprintf.c: Eric Pouech Bug fix in GetLen. * loader/ne/module.c, loader/pe_image.c, memory/global.c, misc/main.c, miscemu/main.c, relay32/builtin32.c, scheduler/process.c, scheduler/thread.c, if1632/builtin.c, include/builtin32.h, include/module.h, include/pe_image.h, include/winerror.h, loader/Makefile.in, loader/elf.c, loader/main.c, loader/module.c: Bertho Stultiens Reorganization of the loader to correctly load and free libraries and implementation of load order to load different types of libraries. * documentation/wine.man: Bertho Stultiens Updated commandline changes of -dll option and wine.conf entries. * wine.ini: Bertho Stultiens Updated the example with the new configuration entries. * dlls/shell32/shell32_main.c: Bertho Stultiens Bugfix: free loaded library not before exit. * include/elfdll.h, include/loadorder.h, loader/elfdll.c, loader/loadorder.c: Bertho Stultiens New files to support load order and partial stubs for elfdlls. * graphics/metafiledrv/objects.c, graphics/x11drv/dib.c, include/bitmap.h, objects/brush.c, objects/cursoricon.c, objects/dib.c: Huw D M Davies Fixes for upside-down DIBs. * graphics/ddraw.c: Lionel Ulmer Changed 'GetDisplayMode' to return the mode previously set by 'SetDisplayMode' (and not the current monitor mode). * include/tab.h, dlls/comctl32/tab.c: Luc Tourangeau -Implemented TCS_BUTTONS, TCS_FIXEDWIDTH, TCM_GETITEMRECT, TCM_SETITEMSIZE and TCM_DELETEITEM. * objects/cursoricon.c: Pavel Roskin LookupIconIdFromDirectoryEx16() fixed: if GetSystemPaletteEntries() returns 0, it is interpreted as if it were 256. * loader/module.c, scheduler/process.c: Kevin Holbrook Fix ambiguous else warning. * windows/syscolor.c: Juergen Schmied Loading color values from the registry fixed. * graphics/ddraw.c: Brian Gerst - Removed all floating point math. - Implemented stretching in X and Y directions for 8, 16, and 32 bit color. - Implemented source and dest color-keying for 8, 16, and 32 bit color. - Implemented some trivial raster operations. - Minimized inner loops for maximum speed. - Use memcpy whenever possible. * multimedia/audio.c: Eric Pouech Reduced fragment size. Reorganized wodOpen (with support for WAVE_QUERY_FORMAT). Fixed buffer underrun recovery. Fixed bug in wodReset()/wodClose(). * ole/storage32.c: Michael Veksler Simplify propertyNameCmp() and fix a warning in the way by removing CRTDLL__wcsupr() calls. * misc/ddeml.c: Keith Matthews DdeNameService: expansion of stub to trap unused instanceids at start of run. DdeGetLastError: catch 'not initialized' situation and return correct response. DdeFreeStringHandle: complete test for error set by previous call of something and ignore it, also release handle table mutex on normal exit. DdeQueryStringA, DdeQueryStringW, DdeCreateStringHandleW: Release handle table mutex on normal exit. * include/wnet.h, misc/network.c: Uwe Bonnes Don't announce the WNetDirectoryNotify capability WNetGetConnection. Change the return value for local files. * windows/mouse.c: Michael Veksler Add "win.h" to fix implicit function declaration warnings. * console/interface.c, include/console.h: Marcus Meissner Only declare console "driver" once, use external refs elsewhere. * controls/listbox.c: Luc Tourangeau When the vertical scrollbar is removed, the background was not properly repainted. * loader/signal.c: Marcus Meissner Disable AC bit on receiving alignment exceptions. * misc/main.c: Juergen Schmied SystemParametersInfo SPI_GETNONCLIENTMETRICS: implemented menu part. * windows/x11drv/event.c: Noel Borthwick While handling the WM_DELETEWINDOW client message check if a window has been disabled and if so prevent an SC_CLOSE message from being sent. * windows/dce.c: Noel Borthwick Make access to the DCE list thread safe by ensuring we have acquired the Windows lock before using it. Fri Apr 16 15:19:14 1999 Alexandre Julliard * resources/.cvsignore: Changed for renamed files * misc/winsock_async.c, msdos/dosconf.c, windows/user.c: Michael Veksler Fixed warnings. * ole/nls/wal.nls, ole/ole2nls.c, resources/Attic/sysres_Cz.rc, resources/Attic/sysres_Po.rc, resources/Attic/sysres_Sw.rc, resources/Makefile.in, resources/sysres.c, resources/sysres_Cs.rc, resources/sysres_Pt.rc, resources/sysres_Sv.rc, resources/sysres_Wa.rc, windows/x11drv/keyboard.c, documentation/wine.man, include/options.h, include/winnls.h, misc/main.c: Pablo Saratxaga Added walon language support (I also moved Cz -> Cs, Sw -> Sv, and Po -> Pt; to conform to standard names for those languages). * configure, configure.in, relay32/Makefile.in: Marcus Meissner Add -fno-builtin when compiling with gcc in relay32/ subdir. * include/module.h, loader/ne/module.c, loader/ne/segment.c, tools/build.c, if1632/builtin.c: Andreas Mohr - Implemented proper ("real", compressed) Win16 entry tables. - Fixed MyAlloc (AKA NE_AllocateSegment). - Implemented PatchCodeHandle16. * tools/Attic/make_os2.sh, tools/make_os2.cmd, graphics/path.c, graphics/psdrv/graphics.c, include/sig_context.h: Robert Pouliot A few patches to help Wine to compile on OS/2. Thu Apr 15 16:46:51 1999 Alexandre Julliard * graphics/metafiledrv/bitblt.c, graphics/metafiledrv/graphics.c, graphics/metafiledrv/init.c, graphics/metafiledrv/mapping.c, graphics/metafiledrv/objects.c, graphics/metafiledrv/text.c, include/metafile.h, include/metafiledrv.h, objects/clipping.c, objects/dc.c, objects/dcvalues.c, objects/metafile.c: Huw D M Davies Change (32 bit) HMETAFILEs to GDI objects (HMETAFILE16s remain as global memory handles). Fixed disk-based MetaFiles. Better separation between MetaFile playback and the metafiledrv. * misc/crtdll.c: Ove Kaaven _CIpow argument order was confirmed with Starcraft v1.05. * documentation/keyboard: Ove Kaaven Clarified a few points. * msdos/int21.c: Bertho Stultiens Added IOCTL function 0x440d/0x72. * relay32/kernel32.spec, scheduler/critsection.c: Bertho Stultiens UnitializeCriticalSection partial stub implementation. * include/winbase.h: Eric Pouech Added missing proto for GetExitCodeThread. * include/driver.h, include/wine/keyboard16.h: Michael Veksler Added missing windef.h includes. * windows/input.c, include/winuser.h: Zygo Blaxell ReleaseCapture() is supposed to return a BOOL value. * configure, configure.in, include/config.h.in, loader/signal.c: Marcus Meissner FreeBSD 3 multithreading final fix. Do not use libc_r, libc is just as reentrant concerning errno. Revert unneeded FreeBSD hack to loader/signal.c from last patch. * windows/x11drv/keyboard.c: Huw D M Davies index == 3 corresponds to Alt-Gr + Shift. * misc/ddeml.c: Keith Matthews More of DdeCreateStringHandleA, DdeFreeStringHAndle, DdeQueryStringA and DdeCreateStringHandleW and tidy up of RemoveHSZNodes, and DdeCreateStringHandleA. * windows/x11drv/main.c, graphics/x11drv/bitblt.c, graphics/x11drv/palette.c, include/x11drv.h: Pavel Roskin Fixed ugly disabled controls and black background in Write and Lotus Notes. * controls/button.c, include/button.h, include/winuser.h: Pascal Lessard Implement the button with bitmaps. * include/wine/obj_storage.h, ole/stg_stream.c, ole/storage32.c: Stephane Lussier Implementation of IStorage::CopyTo and IStream::CopyTo. * loader/task.c: Ulrich Weigand Bugfix: Always release the Win16Lock in TASK_Reschedule. * windows/x11drv/event.c: Francois Boisvert Solved a deadlock between global lock and wnd lock in event.c. * dlls/shell32/iconcache.c: Marcus Meissner Typo that broke Solaris compile fixed. * controls/desktop.c: Francois Boisvert Add a WIN_ReleaseDesktop in DESKTOP_IsSingleWindow. * windows/x11drv/keyboard.c: Guy Albertelli Fix scancodes for NumLock and Num-/. Fix MapVirtualKey() (maptype=2) to return proper ascii code. Reworked GetKeyNameText() again. * graphics/psdrv/font.c: Huw D M Davies Limit lastChar to 0xff in PSDRV_GetCharWidth. * windows/user.c: Marcus Meissner Missing WINAPI for RegisterSystemThread. Sun Apr 11 18:48:17 1999 Alexandre Julliard * msdos/int10.c: Andreas Mohr Fixed "Display Combination" call. * misc/comm.c: Andreas Mohr Fixed a crash due to invalid OpenComm return value for busy comm port. Cleaned up/fixed several things. * windows/win.c: Francois Boisvert Enabled thread safeness for wnd structure code. * debugger/dbg.y: Ulrich Weigand Use CLIENT_DebuggerRequest to freeze/unfreeze threads. * server/request.c, server/thread.c, server/trace.c, include/server.h, include/server/request.h, include/server/thread.h, scheduler/client.c: Ulrich Weigand Added new CLIENT_DebuggerRequest routine, implemented support for DEBUGGER_FREEZE_ALL/DEBUGGER_UNFREEZE_ALL requests. Run wine server in the main wine process. Bugfix: never free initial thread! * scheduler/process.c, include/process.h: Ulrich Weigand Non-functional PROCESS_Suspend/ResumeOtherThreads removed. * windows/timer.c: Ove Kaaven Teached TIMER_GetNextExpiration that a timer that has already expired (but not processed yet) HAS already expired... * winedefault.reg: Ove Kaaven Default values for registry. * graphics/x11drv/dib.c: Karl Lessard Optimized code for SetImageBits_X, making bitmap creation faster. * controls/menu.c: Juergen Schmied The MEASUREITEMSTRUCT and DRAWITEMSTRUCT were filled wrong. * configure.in, include/config.h.in, include/sig_context.h, loader/signal.c, scheduler/sysdeps.c, configure: Marcus Meissner - Started multithreading for FreeBSD (incomplete, but some applications now at least start up again). - Use _thread_sys_sigaction/_thread_sys_sigaltstack. - CR2 on pagefault gets passed in sc_err (some kind of kludge in FreeBSD owns fault handling we can use) * include/selectors.h, memory/global.c, memory/selector.c: Made SELECTOR_ReallocBlock preserve the current selector access rights (problem reported by Andreas Mohr). * misc/system.c: Ulrich Weigand Use services thread instead of timer signals. * server/thread.c, scheduler/synchro.c: Ulrich Weigand Allow user APCs with NULL 'func' (just wake up the thread). * include/services.h, loader/main.c, scheduler/Makefile.in, scheduler/services.c: Ulrich Weigand Implemented 'kernel services thread'. * include/winspool.h, misc/printdrv.c, relay32/winspool.spec: Klaas van Gend Added stub for PrinterProperties. * dlls/ntdll/rtlstr.c, include/ntddk.h, relay32/ntdll.spec, dlls/ntdll/nt.c: Juergen Schmied Implemented NtTerminateProcess and NtDisplayString. * loader/module.c: Bertho Stultiens FreeLibrary partial implementation. * misc/crtdll.c, relay32/crtdll.spec: Ove Kaaven Made _ftol take argument from FPU stack. Starcraft v1.04 (*not* Brood Wars) now works perfectly with Wine's crtdll. Wrote a test implementation of _CIpow too, which those who do have Brood Wars can report on, so it can be implemented correctly. * windows/x11drv/keyboard.c: Guy Albertelli Partial implementation for GetKeyNameText for new keyboard structure. * dlls/tapi32/phone.c: Kevin Holbrook Fixed warning. * include/wine/obj_storage.h: Marcus Meissner Added missing ReadClassStg prototype. * misc/wsprintf.c: Michael Veksler - Fix comments after the big renaming (xxxx32y --> xxxxy). - Declare the WPRINTF_DATA union, and use it instead of LPCVOID and WORD. Avoid ugly type casting, and fix compilation warnings of wsprintf.c * documentation/status/dde: Keith Matthews Status document for DDE/Ddeml. * multimedia/mmsystem.c: Eric Pouech Added event callback mechanism. Introduction of MCI yield procs. Updated (prepare|unprepare)header functions (wave, midi) to allow correct callback mechanisms. Made midiStreamXXX functions working. First try at mmThreadXXX functions. * multimedia/midi.c: Eric Pouech Updated (prepare|unprepare)header functions to allow correct callback mechanisms. * multimedia/mcimidi.c: Eric Pouech Small enhancement. * multimedia/mci.c: Eric Pouech New method for structure conversion (16 <-> 32). More MCI structures correctly mapped. Introduction of MCI yield proc and break facility. * multimedia/audio.c: Eric Pouech Updated (prepare|unprepare)header functions to allow correct callback mechanisms. Implemented waveOut playback as asynchronous. * include/multimedia.h: Eric Pouech Started implementation of mmThreadXXX functions. * include/mmsystem.h: Eric Pouech Added a few missing defines (MIDI, WAVE, callbacks). Structures for midiStreamXXX functions. * if1632/mmsystem.spec: Eric Pouech Updated (prepare|unprepare)header functions (wave, midi) to allow correct callback mechanisms. Added wine specific entry for mmThreadXXX functions thread starting point. * include/wine/obj_storage.h: Michael Veksler Introduce STATSTG16 - a 16 bit variant of STATSTG. * ole/storage.c: Michael Veksler Fix IStorage16_fnStat() to use STATSTG16 (it is a 16 bit interface). * controls/menu.c: Paul Millar Fixed menu type setting in SetMenuItemInfo32_common(). * include/process.h, loader/ne/module.c, loader/task.c, scheduler/process.c, scheduler/thread.c: Ulrich Weigand Send USIG_PROCESS_CREATE signal. Bugfix: GetProcessDword offset -8 should return parent process ID. * relay32/user32.spec, windows/user.c: Bertho Stultiens Added RegisterSystemThread stub. * include/wine/obj_misc.h, ole/compobj.c, relay32/ole32.spec, include/winerror.h: Francis Beaudet Implemented the CoCreateInstanceEx method. * misc/registry.c: David Gay Fixed crash due to a value of name length 0, value length 0 at the end of the registry. * windows/winpos.c: Francois Boisvert Check if pTempActiveWindow in WINPOS_SetWindowPos is valid after the QUEUE_Lock. * multimedia/dplay.c: Francois Gouget - updated because of the splitting of interface/implementation - updated to use ICOM_THIS * include/dplay.h, include/dplobby.h, ole/guid.c: Francois Gouget - use the latest ICOM macros - moved the IDirectPlayLobby interface to dplobby.h - removed all the implementation aspects since they need to be separate * include/dsound.h, multimedia/dsound.c: Francois Gouget ICOMisation of the DirectSound API. * dlls/shell32/folders.c, dlls/shell32/iconcache.c, dlls/shell32/shell32_main.c, dlls/shell32/shell32_main.h, include/shlobj.h: Juergen Schmied - reorganised icon extracing from files - made extracting from ne and ico files working - IPersistFile interface for IExtractIcon * misc/shell.c: Juergen Schmied Fixed buffer overrun. * include/cursoricon.h, objects/cursoricon.c: Juergen Schmied Changed ressource dir structures. Adapted FindBestIccon/FindBestCursor. * windows/syscolor.c: Juergen Schmied Loading the color schema for registry. Sat Apr 10 16:58:55 1999 Alexandre Julliard * include/winsock.h, misc/Attic/winsock_dns.c, misc/Makefile.in, misc/winsock.c, misc/winsock_async.c: Marcus Meissner Reimplemented winsock asynchronous DNS services. No longer use a fork()ed process, but either a service thread or inline blocking calls for non-threading architectures. (Makes Free Agent16 work again.) * programs/cmdlgtst/Attic/cmdlgr.h, programs/cmdlgtst/cmdlgr.rc, programs/cmdlgtst/cmdlgtst.c: - color and font dialogs now actually do something interesting, and force a redraw when successful. Background color is adjustable. Text color is also adjustable, but the user has to set the CF_EFFECTS flag first. - text is output left-right centered, baseline, at the middle of the window, and moves with the window. Text font is adjustable. - Success and failure MessageBox calls for Color, Font, Open, and Save have been removed or suppressed. They annoyed me after awhile, and I suspect they annoyed others, too. Use my tool! :-) - cmdlgtst now has the full pathname in the upper left corner; which may assist in debugging certain problems -- or it may not. :-) - usage dialog added * ole/ole2nls.c: Juergen Schmied Corrected debug output. * windows/driver.c, relay32/winmm.spec: Eric Pouech Better error handling ; a few bug fixes ; now OpenDriver16 can load 32 bit drivers. Added stub for GetDriverFlags. * windows/user.c, relay32/user32.spec: Sergey Turchanov Stubs for CloseDesktop and CloseWindowStation. * loader/ne/module.c: Bertho Stultiens GetModuleFromPath now checks for loaded modules via filenames which were specified without a path. * misc/registry.c, include/winreg.h: Sylvain St.Germain Implementation of HKU key saving and loading. Add new supported data type in debug_print_value. * dlls/shell32/shlview.c, include/docobj.h, ole/guid.c: Juergen Schmied New interfaces for IOleCommandTarget, IDropTarget, IViewObject. Small change how to get icons for listview. * include/shlobj.h, relay32/shell32.spec: Juergen Schmied ILLoadFromString and SHGetSettings implemented. * dlls/shell32/shellord.c: Juergen Schmied SHGetSettings implemented. ExitWindowsDialog() simulated by Messagebox. * dlls/shell32/pidl.c: Juergen Schmied ILLoadFromString implemented. * graphics/x11drv/init.c, graphics/ttydrv/init.c, graphics/ttydrv/palette.c: Richard Mortimer Added missing *IsDark entries into PALETTE_Driver instance initialisation. * windows/x11drv/mouse.c: Brian Gerst Fixed X11DRV_MOUSE_WarpPointer initial value. * objects/bitmap.c: Luc Tourangeau Ensure that the bitmap is properly initialized when created with the LR_CREATEDIBSECTION flag. * dlls/comctl32/treeview.c: Sylvain St.Germain Fixed the messaging problem of the edit box for node label edition. Substituted WM_PAINT for InvalidateRect. Some graphical fixes. * misc/main.c: James Juran Check for drivers==NULL before trying to delete them at exit. This could happen if the emulator initialization failed for some reason and the drivers hadn't been initialized yet. * if1632/thunk.c, include/callback.h, misc/callback.c, miscemu/main.c: Ulrich Weigand Call InitApp16 (using Callout) for initial process. * miscemu/instr.c: Ulrich Weigand Clear invalid selectors also in CallTo16 relay code. * programs/notepad/Es.rc: Jose Marcos López Caravaca Revised Spanish resources. * windows/mdi.c: Gerard Patel Fixed window locking bug in CalcChildScroll. * multimedia/time.c: Ove Kaaven Fixed fake multimedia timers. Grim Fandango is now able to start up when under favorable conditions. The preview movie on the Brood Wars disc now plays, too. * misc/printdrv.c: Klaas van Gend Bugfix EnumPrintersA: lpbPrinters=NULL or cbBuf=0 would crash Wine, instead of returning the right buffersize. Tue Apr 6 07:14:09 1999 Alexandre Julliard * files/directory.c: galberte Fixed SearchPathA return value. * graphics/d3d_private.h, graphics/d3dtexture.c, graphics/ddraw.c, graphics/ddraw_private.h: Lionel Ulmer - clean-up of texture 'loading' - added SetColorKey callback for already loaded textures * include/wine/obj_storage.h: Francois Gouget Fixed a problem pointed out by Kevin Holbrook. * include/commctrl.h: Francois Gouget commctrl.h must include prsht.h. * include/wine/obj_oleaut.h: Francois Gouget Warning fix. * include/wine/obj_base.h: Francois Gouget Added a new implementation of the ICOM macros that use Microsoft style virtual methods to implement the COM interfaces in C++. * misc/ddeml.c: Keith Matthews Correction of Mutex handling in DdeInitializeW for cases other than 1st call. Addition of instance handling to DdeCreateStringHandleA, DdeCreateStringHandleW, RemoveHSZNodes, FreeAndRemoveHSZNodes. 1st cut implementation of DdeUnitialize, move of internal structure defs in from ddeml.h. Removed non-ANSI comment. * include/ddeml.h: Keith Matthews Moved internal structures to ddeml.c, also removed non-ANSI comments, and added spec for DdeQueryConfInfo and DdeQueryConvInfo16. * multimedia/mmsystem.c: Chris Morgan James Abbatiello Fixed memory leaks in mixerOpen16/mixerClose, midiOutOpen16/midiOutClose16, waveInOpen16/waveInClose16, midiInOpen16/midiInClose16. * tools/bug_report.pl: Adam Sacarny Added sanity check for whitespace in file names, various other fixups. Sun Apr 4 12:48:21 1999 Alexandre Julliard * controls/listbox.c: Luc Tourangeau WM_MOUSEMOVE implementation bug fix. * windows/x11drv/keyboard.c: José Marcos López Added Spanish keyboard layout. * misc/comm.c: Lawson Whitney Fixed the modem control part of EscapeCommFunction16. * controls/combo.c: Gerard Patel Added missing goto. * ole/ole2nls.c, relay32/kernel32.spec, include/winnls.h: Marcus Meissner EnumCalendarInfoA stub. Sat Apr 3 16:27:54 1999 Alexandre Julliard * windows/mouse.c, windows/keyboard.c: Francois Boisvert Suspend the window locks before DefKeybEventProc and DefMouseEventProc. * include/wnaspi32.h, programs/view/globals.h, include/aspi.h, include/mmsystem.h, include/winaspi.h, include/winioctl.h, include/winnt.h: Joerg Mayer More #pragma fixes (idea Ove Kaaven, mistakes are mine). * windows/win.c: Eric Pouech No longer sending atoms in ((CREATESTRUCT*)lParam)->lpszName of WM_CREATE messages. * loader/module.c: Marcus Meissner Added some SetLastError()s in GetProcAddress() and LoadLibrary(). * misc/crtdll.c, relay32/crtdll.spec: Christian Schlaile Implemented makepath, rand() returns correct range, fixed fputc. * files/file.c, include/file.h, msdos/int21.c: Mask off unsupported attributes in _lcreat (bug reported by Andreas Mohr). Moved _lcreat16_uniq to int21.c * libtest/hello3.c, libtest/hello3res.rc, libtest/hello4.c, libtest/new.c, libtest/rolex.c, libtest/vartest.c, libtest/volinfo.c: Pavel Roskin Casts to (SEGPTR) removed. They did nothing anyway. Includes added or removed where necessary. Win16 functions replaced with their Win32 counterparts. Comments added where it was impossible. CALLBACK added where necessary. Some declarations fixed. Constructs like "#if WINDOWS" corrected. Using "#ifdef __unix__" instead. DlgProc in hello3 uses EndDialog() instead of DestroyWindow(). Listbox enabled in hello3. * windows/x11drv/keyboard.c: Eric Pouech Updated French keyboard. * libtest/hello.c: Alex Korobka Fancier version of hello.c courtesy of Huw Davies. * programs/control/control.c: Pavel Roskin Fixed compilation of the Control panel. * windows/x11drv/keyboard.c: Ove Kaaven 'Realigned' the layout table a bit. Applied the non-latin-1 stuff and the dead key mapping stuff to the actual mapping code too. Prettied up the fixme message. Added a check where if the keys of two layouts match exactly, the one with the best-matching keycode order is chosen, so that the QWERTY and Dvorak layouts can be distinguished. * win32/device.c, relay32/kernel32.spec: Eric Pouech Added (empty) stub for OpenVxDHandle. * multimedia/mmio.c: Eric Pouech mmioOpen() now handles correctly MMIO_PARSE flag. * controls/edit.c: Luc Tourangeau Background color fix when disabled or read only. * windows/win.c: Francois Boisvert Transfered the window struct memory release from WIN_DestroyWindow to WIN_ReleaseWndPtr. * include/winuser.h: Thuy Nguyen DLGITEMTEMPLATE structure had one too many member. * debugger/db_disasm.c: Eric Pouech Prevent crash in debugger. Fri Apr 2 10:37:42 1999 Alexandre Julliard * controls/combo.c, controls/listbox.c, include/combo.h: Francis Beaudet Implemented the Win95 look and feel. * windows/defwnd.c: Francis Beaudet Wrote a basic implementation of the WM_PRINT message. * windows/dce.c, windows/win.c, windows/winproc.c, misc/callback.c: Francois Boisvert Suspend all windows locks before the control is passed to the application. Also fixed some bugs in dce.c * Make.rules.in, Makefile.in: Joerg Mayer - Remove some old rc make stuff - "make clean" omitted some include subdirs * relay32/ddraw.spec, graphics/ddraw.c: Lionel Ulmer Added DllClassFactory to DirectDraw. Thu Apr 1 12:05:44 1999 Alexandre Julliard * windows/x11drv/keyboard.c: Marcus Meissner Split off keysym/deadchar -> char mapping, use it in DetectLayout. * tsx11/X11_calls, tsx11/ts_xlib.c, windows/clipboard.c, windows/message.c, windows/ttydrv/clipboard.c, windows/ttydrv/init.c, windows/win.c, windows/winpos.c, windows/x11drv/clipboard.c, windows/x11drv/event.c, windows/x11drv/init.c, windows/x11drv/wnd.c, controls/menu.c, graphics/x11drv/bitmap.c, include/clipboard.h, include/ts_xlib.h, include/ttydrv.h, include/win.h, include/winpos.h, include/x11drv.h: Alex Korobka Fixes for ignored WVR_[VH]REDRAW flags, made minimization in managed mode go through window manager, small bugfixes for menu and window code, extended clipboard driver model to handle formats other than text. * controls/edit.c: Pavel Roskin EC_USEFONTINFO means es->char_width/3, not es->char_width. This is true for multiline controls too, as my tests show. * dlls/comctl32/listview.c, include/listview.h: Luc Tourangeau Added support for icon and smallicon views. * loader/dos/dosvm.c: Ove Kaaven Made DOSVM_GetTimer survive EAGAIN errors... * include/comm.h, misc/comm.c: Ove Kaaven Implemented async comm buffers (but probably not bugfree), and along with them, the functionality of async event notifications, mong them EnableCommNotification. Removed a previous hack that was faking the buffers, since we now have real buffers... * include/wine/winuser16.h: Ove Kaaven Added CN_* flags used in WM_COMMNOTIFY. * graphics/ddraw.c: Lionel Ulmer Implement the EnumAttachedSurface method. * ole/ole2.c: Noel Borthwick Implementation for OleCreateMenuDescriptor, OleSetMenuDescriptor and OleDestroyMenuDescriptor along with a bunch of internally used methods and data structures. * ole/guid.c, include/initguid.h, include/shlguid.h, include/wine/obj_olefont.h, include/wtypes.h: Adrian Thurston initguid.h should only contain the macro that defines the guids. Added olectl.h to guid.c so some needed guids get defined. Made GUID_NULL an actual guid set to 0,0,0... * if1632/gdi.spec, objects/gdiobj.c: Ulrich Weigand Added GdiSignalProc() stub. * misc/callback.c, relay32/user32.spec, windows/user.c, if1632/thunk.c, if1632/user.spec, include/callback.h, include/task.h, include/user.h, loader/main.c: Ulrich Weigand Added USER32.UserSignalProc to Callout table. Implemented built-in UserSignalProc(). Don't announce Win3.1-style USER handler any more. * win32/ordinals.c, include/process.h, loader/ne/module.c, loader/ne/segment.c, loader/task.c, scheduler/process.c, scheduler/thread.c: Ulrich Weigand Implemented PROCESS_CallUserSignalProc(). Send USER signals at various appropriate places. Moved [GS]etProcessDword() to scheduler/process.c. * dlls/shell32/Makefile.in, dlls/shell32/brsfolder.c, dlls/shell32/pidl.c, dlls/shell32/shelllink.c, dlls/shell32/shlmenu.c, include/shlobj.h, relay32/shell32.spec: Juergen Schmied All 19 FileMenu_* functions, some as stubs, some implemented. * dlls/shell32/shellole.c, dlls/shell32/shellord.c: Juergen Schmied SHCLSIDFromString, StrToOleStr implemented. RLBuildListOfPaths stub. * dlls/shell32/shell32_main.c, dlls/shell32/shell32_main.h: Juergen Schmied DllGetVersion (not yet exported). Small change to SHAppBarMessage. * relay32/winmm.spec: Eric Pouech Added DrvClose, DrvDefDriverProc, DrvOpen, DrvOpenA, DrvSendMessage. * if1632/mmsystem.spec: Eric Pouech Added StackEnter() and StackLeave() stubs * multimedia/mci.c, multimedia/mmsystem.c: Eric Pouech Starting implementation of MCI creator tasks Fixed bug in MCI_OPEN handling (thanks to Adam for reporting this one) Better implementation of mmTaskCreate16 * include/multimedia.h: Eric Pouech Added creator task to MCI struct. * dlls/commdlg/filedlg.c: Pavel Roskin Replaced 0xC000 by symbolic constants. * dlls/comctl32/imagelist.c: Francis Beaudet Fixed small ==, != mixup. * windows/defdlg.c, windows/defwnd.c: Luc Tourangeau Implemented WM_NOTIFYFORMAT. * loader/elf.c: Marcus Meissner "foo" was not translated to "foo.so" in elf loader. * include/bitmap.h, objects/bitmap.c: Ulrich Weigand LoadBitmap16()/LoadImage16() calling sequence simplified. * loader/module.c, loader/ne/resource.c, misc/callback.c, if1632/wprocs.spec: Ulrich Weigand Allow NULL NE resource handler; call the default handler directly. Removed WPROCS / Callbacks support for WineLib resource handlers. * include/process.h, relay32/utthunk.c: Ulrich Weigand Made Universal Thunk list per-process, not system global. * include/commctrl.h: Paul Quinn Additional macro definitions. * dlls/comctl32/tab.c: Francis Beaudet Implemented TCM_ADJUSTRECT. * msdos/int09.c, msdos/ioports.c: Michael Veksler Removed "implicit declaration" warnings. * graphics/d3d_private.h: Lionel Ulmer Fixed OpenGL devices implementation. * windows/queue.c: Eric Pouech In UserYield16, when current thread is a 32 bit one which hold the Win16Lock, must take care of a LockCount > 1. * */*.c: Patrik Stridvall More code moved to the X11 driver (bitmap and palette and misc). ---------------------------------------------------------------- Sun Mar 28 15:20:00 1999 Alexandre Julliard * include/winbase.h, include/wingdi.h: Huw D M Davies Move DM* defines from winbase.h -> wingdi.h. * graphics/ddraw.c: Lionel Ulmer Fixed QueryInterface functions for IDirect3D 1 and 2. * ole/nls/Attic/dnk.nls: Apparently no longer needed. * controls/menu.c, controls/uitools.c, dlls/comctl32/comboex.c, graphics/x11drv/brush.c, graphics/x11drv/graphics.c, include/debug.h, include/debugdefs.h, memory/global.c, misc/ddeml.c, windows/x11drv/event.c: Dimitrie O. Paun Changed some debug messages from one channel to another, to clean up a bit the debug channel usage. * loader/module.c: Jess Haas Fixed CreateProcessA so it can handle commandlines with arguments and no .exe. * loader/ne/module.c: Jess Haas Fixed GetModuleHandle16. * windows/x11drv/keyboard.c: Pavel Roskin Added Russian keyboard support. * include/winuser.h, relay32/user32.spec, windows/user.c: Lionel Ulmer Added stub for SetSystemCursor. * win32/file.c: Steffen Moeller SetFileAttributesA: "implemented" setting of directory flag as test of compatibility. * windows/x11drv/keyboard.c: Pavel Roskin Changes in X11DRV_KEYBOARD_DetectLayout in order to implement Russian keyboard support. * include/wine/obj_storage.h, ole/Makefile.in, ole/ole2.c, ole/ole2stubs.c, ole/storage.c, ole/variant.c, relay32/ole32.spec, relay32/oleaut32.spec, relay32/user32.spec, windows/input.c, include/ole2.h, include/oleauto.h, include/olectl.h, include/winuser.h: Paul Quinn Aaron Barnes Adrian Thurston Bundle of new stubs. * misc/crtdll.c, misc/ddeml.c, ole/ole2disp.c: Andreas Mohr Added missing WINAPIs. * relay32/kernel32.spec, win32/newfns.c: Andreas Mohr Added CreateIoCompletionPort stub. * windows/queue.c, windows/message.c: Ulrich Weigand Call EVENT_Pending() to flush X11 output queue before blocking in MsgWaitForMultipleObjects(). Don't call EVENT_WaitNetEvent in MSG_PeekHardwareMsg. Protect system queue access in hardware_event(). * windows/user.c, windows/win.c, windows/winpos.c, windows/x11drv/event.c, windows/x11drv/wnd.c, controls/menu.c, windows/dce.c, windows/dialog.c, windows/focus.c, windows/mdi.c, windows/message.c, windows/nonclient.c: Francois Boisvert Fixed some bugs in thread safeness for wnd struct. * libtest/Makefile.in, libtest/hello3.c, libtest/hello3res.rc: Pavel Roskin Made libtest/hello3 work again, now with Windows-compatible resource loading. * include/imm.h, include/mmsystem.h, include/msacm.h, include/windef.h, include/wtypes.h: Jiuming Luo Moved macro DECLARE_HANDLE() (in msacm.h and wtypes.h) to windef.h, then deleted the duplicated typedefs (in imm.h and mmsystem.h). * misc/printdrv.c: Klaas van Gend Rewrote EnumPrintersA, added CriticalSection around Registry reads and implemented PRINTER_INFO_2 request. * windows/x11drv/keyboard.c: Jonathan Naylor Added Swiss German keyboard layout. * dlls/shell32/contmenu.c, dlls/shell32/dataobject.c, dlls/shell32/folders.c, dlls/shell32/iconcache.c, dlls/shell32/pidl.c, dlls/shell32/shell32_main.h, dlls/shell32/shlview.c: Juergen Schmied - adjusted printing of refcounts to be equal - cleaning up icon cache on PROCESS_DETACH - fixed ascii/unicode use in SH/ILCreateFromPath - fixed small memory leak in shellview * loader/dos/dosvm.c: Marcus Meissner Empty DOSVM_QueueEvent for !MZ_SUPPORTED. * programs/cmdlgtst/cmdlgtst.c: Pavel Roskin Fixed warnings. * include/commdlg.h: Pavel Roskin Changed CHOOSECOLOR[AW].Flags from UINT to DWORD. * windows/painting.c, windows/scroll.c, windows/ttydrv/init.c, windows/ttydrv/wnd.c, windows/win.c, windows/winpos.c, windows/x11drv/event.c, windows/x11drv/init.c, windows/x11drv/wnd.c, controls/menu.c, include/region.h, include/ts_xf86vmode.h, include/ts_xutil.h, include/ttydrv.h, include/win.h, include/x11drv.h, objects/region.c, tools/make_X11wrappers, tsx11/X11_calls, tsx11/ts_xf86vmode.c, tsx11/ts_xutil.c, windows/dce.c, windows/nonclient.c: Alex Korobka Moved hrgnUpdate from client to window coordinates, made nonclient painting depend on the update region, reworked SetWindowPos() and RedrawWindow() to speed up update region calculation, made -desktop work properly, added WM_CANCELMODE here and there, fixed several window activation bugs that crept in since the last time. * windows/message.c: Alex Korobka Fixed occasional loss of SendMessage() return value. * graphics/ddraw.c: Lionel Ulmer Added initialisation of the pixmap_depth field in Xlib_DirectDrawCreate. * msdos/ioports.c: Jess Haas Fixed a warning. * msdos/int2f.c: Jess Haas Added stub for int2f 4b. * multimedia/mmsystem.c: Chris Morgan James Abbatiello Fixed memory leak in waveOutOpen/waveOutClose. * graphics/psdrv/escape.c: Huw D M Davies More Escapes for the PostScript driver. Sat Mar 27 16:56:13 1999 Alexandre Julliard * graphics/d3dcommon.c, graphics/d3ddevices.c, graphics/d3dexecutebuffer.c, graphics/d3dlight.c, graphics/d3dmaterial.c, graphics/d3dtexture.c, graphics/d3dviewport.c, graphics/ddraw.c: Francois Gouget Adapted to the interface/implementation separation. Now uses ICOM_THIS to access the implementation structures. Replaced 'this' with 'This' for ICOM_THIS. Direct access to the virtual table has been eliminated too. * graphics/d3d_private.h, graphics/ddraw_private.h: Francois Gouget Updated to include all the implementation aspects that were previously in the public includes. * graphics/vga.c: Francois Gouget Removed direct access to the virtual table * include/d3d.h, include/ddraw.h: Francois Gouget Removed all implementation aspects. Modified to use the latest ICOM macros. Added the macros for use in C. Added the method parameter names (when I had them). * include/module.h, include/pe_image.h, include/thread.h, loader/module.c, loader/pe_image.c, scheduler/process.c, scheduler/thread.c: Ulrich Weigand Fixed sequence of DLL_PROCESS_DETACH notification calls. Moved PE_MODREF flags to WINE_MODREF level. Better handling of LoadLibraryEx flags. PE_InitTls() changed to work only on the current thread. * include/server.h, scheduler/process.c, server/trace.c: Added cmd line in new_process request. * scheduler/thread.c: Ulrich Weigand All threads created with CreateThread are 32-bit threads. * dlls/shell32/Makefile.in, dlls/shell32/regstream.c, dlls/shell32/shellord.c: Juergen Schmied Reading of binary streams implemented (SHOpenRegStream). * msdos/int25.c, msdos/int26.c: Andreas Mohr Fixed int25 & int26 error code. * loader/task.c, windows/queue.c: Ulrich Weigand Allow UserYield16 to be called from 32-bit thread. * include/oledlg.h, include/winbase.h: Albert Den Hann Additional macro definitions. * graphics/x11drv/bitmap.c, include/bitmap.h, objects/bitmap.c: Huw D M Davies Fixed {S|G}etBitmapBits in x11drv. Removed BITMAP_GetPadding. * objects/metafile.c: Huw D M Davies Fixed metafile recording of CreatePatternBrush. Thu Mar 25 16:42:28 1999 Alexandre Julliard * dlls/comctl32/imagelist.c, dlls/comctl32/toolbar.c, include/commctrl.h, include/toolbar.h, dlls/comctl32/commctrl.c: Pascal Lessard Change the AddBitmap function. Implement flat toolbar. Change CreateToolbarEx. Implement partially the hot buttons for toolbar. * msdos/int16.c: Andreas Mohr Implemented Get Shift Flags function. * dlls/comctl32/treeview.c: Marcus Meissner Missing WINAPI. * graphics/painting.c: David Luyer Changed stdlib.h to string.h. * dlls/ntdll/time.c: David Luyer Added string.h. * misc/ddeml.c, multimedia/msvideo.c, ole/safearray.c, programs/avitools/aviinfo.c, programs/avitools/aviplay.c, programs/avitools/icinfo.c, win32/console.c: David Luyer Changed "strings.h" to "string.h". * graphics/x11drv/bitblt.c, windows/nonclient.c: Randy Weems Fixed off-by-one error if bitblt width or height is negative. * dlls/comctl32/tab.c, include/tab.h: Francis Beaudet Implemented: - showing the selected tab as highlighted - support for drawing the focus rectangle - basic keyboard support - support for a tab with horizontal scrolling. * files/profile.c: Eric Pouech Thread-safe implementation of profile functions (Windows and Wine). * include/message.h, loader/main.c, windows/timer.c: Stephane Lussier Made the timer code thread safe. * windows/dialog.c: Francis Beaudet Fixed possible endless loop. * controls/listbox.c: Francis Beaudet Fixed LB_GETCURSEL message to return LB_ERR on empty list. * dlls/shell32/shell32_main.h, dlls/shell32/shellole.c, dlls/shell32/shlfolder.c, dlls/shell32/shlview.c, include/shlguid.h, include/shlobj.h, include/wine/obj_base.h, include/wine/obj_commdlgbrowser.h, include/wine/obj_contextmenu.h, include/wine/obj_dockingwindowframe.h, include/wine/obj_extracticon.h, include/wine/obj_shellbrowser.h, include/wine/obj_shellextinit.h, include/wine/obj_shellfolder.h, include/wine/obj_shellview.h, dlls/shell32/brsfolder.c, dlls/shell32/contmenu.c, dlls/shell32/folders.c, dlls/shell32/shell32_main.c: Juergen Schmied Use the new header for COM definitions. * dlls/shell32/shellord.c, relay32/shell32.spec: Juergen Schmied New stub shell_654. * include/treeview.h, dlls/comctl32/treeview.c: Sylvain St.Germain Implementation of TVM_SORTCHILDRENCB. Implementation of TVI_SORT insertion. Fix display problem when TVIF_IMAGE|TVIF_SELECTEDIMAGE were not set. Fix problems related to TVIS_EXPANDEDONCE. * dlls/comctl32/comctl32undoc.c: Sylvain St.Germain Fix problem in DPA_QuickSort where the sort order was inverted. * include/dosexe.h, include/winbase.h, loader/dos/dosvm.c, loader/dos/module.c: Ove Kaaven Added infrastructure and definitions for general-purpose event and IRQ handling for the Wine dos box. Removed the obsolete MZ_Tick. Added event message loop, message handling, CLI/STI handling, and minimal PIC support. * loader/dos/dosmod.c: Ove Kaaven Added handling of SIGUSR2 for the new event interruption handling, bumping up the protocol revision. Made some debug messages not be output when it's not necessary. * msdos/ioports.c: Ove Kaaven Added port 0x60 for int 0x09, and port 0x20 for PIC handling. * include/miscemu.h, msdos/Makefile.in, msdos/interrupts.c: Ove Kaaven Added int 0x09 and int 0x33. * msdos/int33.c: Ove Kaaven Implemented a int 0x33 handler, with a minimal implementation of the mouse routines, including callbacks. * msdos/int09.c: Ove Kaaven Implemented a int 0x09 handler, and a scancode queue that simulates IRQ 1 in the dos box. * include/docobj.h: Paul Quinn Creation of docobj.h. * objects/dib.c: Huw D M Davies Allow depth of DIB to differ from depth of bitmap in GetDIBits. Wed Mar 24 15:07:20 1999 Alexandre Julliard * debugger/editline.c: Abort on input error. * include/oledlg.h: Adrian Thurston Population of oledlg. * windows/x11drv/event.c, windows/painting.c: Ulrich Weigand Add IsWindow() checks after SendMessage() returns. * msdos/int10.c: Jess Haas Fixed a small bug in int10. * controls/combo.c: Pascal Lessard COMBO_Size: maintain the height of the RectCombo when the window is resized. * include/hook.h, include/winuser.h: Adrian Thurston Paul Quinn Added various definitions. Moved CWPSTRUCT from hook.h to winuser.h to conform to the SDK. * include/windef.h: Jim Aston Added a few empty macros. * include/cursoricon.h, objects/cursoricon.c: Marcus Meissner CURSORICON_Destroy: missing WINAPI added. * misc/winsock.c: Marcus Meissner Added translation for SO_RCVTIMEO (as seen by IE4). Tue Mar 23 17:04:10 1999 Alexandre Julliard * server/process.c: Create startup info for the initial process. * include/server.h, scheduler/client.c, scheduler/process.c, scheduler/sysdeps.c, scheduler/thread.c, server/request.c, server/trace.c: Added server pid and tid in init_thread request, and use them in CLIENT_InitThread. * include/compobj.h, include/objbase.h, include/ole2.h, include/wine/obj_base.h, include/wine/obj_inplace.h, include/wine/obj_moniker.h, include/winerror.h, include/wtypes.h, ole/Makefile.in, ole/antimoniker.c, ole/bindctx.c, ole/compobj.c, ole/compositemoniker.c, ole/filemoniker.c, ole/itemmoniker.c, ole/moniker.c, ole/storage32.c, relay32/ole32.spec: Noomen Hamza Implemented: - IMoniker interface for FileMoniker,ItemMoniker,AntiMoniker and GenericCompositeMoniker - IRunningObjectTable interface, and - IBindCtx interface. * graphics/psdrv/bitmap.c, graphics/psdrv/ps.c, include/psdrv.h: Huw D M Davies Added StretchDIBits for the PostScript driver. * include/miscemu.h: Ove Kaaven Added missing ending pragma pack. * misc/comm.c: Rein Klazes Corrected small bug in GetCommState16. Parity check can be disabled even when a parity bit is used. SetCommState16() can override baudrate setting in wine.conf. Mon Mar 22 17:47:36 1999 Alexandre Julliard * loader/module.c: Ulrich Weigand Bugfix: cope with quoted arguments for CreateProcess(). * loader/resource.c: Ulrich Weigand Fixed typo in SizeofResource(). * memory/string.c: Andreas Mohr lstrcpyA can't use strcpy. * relay32/builtin32.c, if1632/builtin.c, include/module.h, misc/main.c, miscemu/main.c: Marcus Meissner Added -dll option for winelib programs. (Note: will not print warnings on failure currently). * relay32/ntdll.spec: Andreas Mohr Added strlwr. * loader/pe_image.c, msdos/int21.c: Andreas Mohr Cosmetics. * if1632/mmsystem.spec, relay32/winmm.spec: Eric Pouech Added new stubs (mmTaskXXX, mmThreadXXX, mciExecute). * multimedia/mmsystem.c: Eric Pouech Started calling mixer as a 32 bit low level driver (no longer 16 bit) Added support for yield proc in mci struct Added mmTaskXXX16 and mmThreadXXX16 functions Refreshed implementation of 16 bit native & asynchronous MCI driver command (through mmtask.tsk). * multimedia/mixer.c: Eric Pouech Fixed a few bugs. Started implementing mixerMessage as a 32 bit function (no longer 16 bit). * multimedia/mcistring.c: Eric Pouech Implemented mciExecute. * include/multimedia.h, multimedia/mci.c: Eric Pouech Added yield proc members to mci struct. * include/mmsystem.h: Eric Pouech Added mixer specfic error codes, fixed type in function name. * windows/driver.c: Eric Pouech Fixed return codes for default driver proc. * controls/listbox.c: Lawson Whitney Made LB_GETCURSEL return focus_item if no item has been selected. * windows/x11drv/keyboard.c: Kalevi J Hautaniemi Added Finnish keyboard layout. * misc/main.c, windows/x11drv/clipboard.c, windows/x11drv/keyboard.c, graphics/wing.c, graphics/x11drv/xfont.c, include/wine/winuser16.h, include/winuser.h, include/x11drv.h: Veksler Michael Removed winuser16.h from x11drv.h. * include/winspool.h, misc/printdrv.c: Klaas van Gend Implementation of EnumPrintersA, info level 4 and 5. * tools/bug_report.pl: Adam Sacarny Check if the build is stripped, and die if it is. Check for Bash 2.0, and if so use different STDERR->STDOUT redirctor (thanks Ryan Cumming!). * windows/mdi.c: Veksler Michael Fixed "reached end of non void..." warnings. * documentation/debugging: Marcus Meissner MessageBox32A -> MessageBoxA * loader/module.c, relay32/kernel32.spec: Sergey Turchanov Implementation for FreeLibraryAndExitThread. Made GetBinaryType = GetBinaryTypeA. * include/task.h, loader/task.c, scheduler/process.c, scheduler/thread.c: Ulrich Weigand Run Win32 processes in their own threads. Process exit sequence adapted. Sun Mar 21 19:26:26 1999 Alexandre Julliard * scheduler/sysdeps.c, scheduler/thread.c, include/thread.h, loader/module.c, scheduler/client.c, scheduler/process.c: Changed process initialisation to use the new server requests. Started to move the process init to the right context, not finished yet. * include/server/object.h, include/server/process.h, include/server/request.h, include/server/thread.h, server/main.c, server/process.c, server/request.c, server/socket.c, server/thread.c, server/trace.c, include/server.h: Added new_process and init_process request. Split out process creation from thread creation. Changed server initialisation to ensure that we always have a current thread. * windows/x11drv/keyboard.c: Robert Pouliot One small error corrected and the 102th key... * misc/comm.c, include/comm.h: Ove Kaaven Made commerror and eventmask local to each port (for win16), made the win16 routines use port indices instead of UNIX fds (this should make some Visual Basic stuff and similar garbage start working), moved some stuff around (win16 routines at top of file, win32 routines at bottom), made a couple of win32 routines use win32 handles, and added a few hints as to how to implement asynchronous buffers, based on which EnableCommNotification can eventually be implemented. * include/winuser.h: Ove Kaaven Fixed prototypes of a couple of comm routines. * loader/ne/module.c: Andreas Mohr Fixed typo. * windows/win.c: Francis Beaudet Clear update region before WM_NCDESTROY. * include/heap.h, memory/heap.c, relay32/utthunk.c, windows/queue.c: Got rid of SYSTEM_LOCK macros. Sat Mar 20 07:18:26 1999 Alexandre Julliard * misc/main.c: No longer need to delete system heap critical section. Fri Mar 19 17:04:25 1999 Alexandre Julliard * dlls/shell32/shell32_main.c: Francis Beaudet Added a check for desktop in SHGetFileInfo. * multimedia/mci.c: Eric Pouech Fixed some bugs in MCI message mapping (32A => 16). * windows/win.c: Pavel Roskin Fixed WIN_SendDestroyMsg. * include/winsock.h: Pavel Roskin Removed definitions for FIONREAD and FIONBIO. * windows/driver.c: Eric Pouech Fixes some return values for DefDriverProc. * programs/regapi/regFixer.pl: Sylvain St.Germain Removed the chop command that was there to get rid of dos ^M. The script now process only unix file format. * windows/dialog.c: Andreas Mohr Hide dialog windows created by CreateDialog* in EndDialog just as Windows does. * ole/variant.c: Stephane Lussier Set type of destination variant in VariantChangeTypeEx function. * windows/x11drv/keyboard.c: Bertho Stultiens Fixed Danish keyboard layout. Thu Mar 18 17:39:58 1999 Alexandre Julliard * ole/itemmoniker.c, ole/ole2.c, ole/olefont.c, windows/dinput.c, windows/input.c, windows/keyboard.c, windows/message.c, windows/painting.c, windows/queue.c, windows/syscolor.c, windows/sysmetrics.c, windows/user.c, dlls/shell32/iconcache.c, files/dos_fs.c, graphics/ddraw.c, graphics/fontengine.c, include/win.h, loader/main.c, loader/resource.c, misc/lzexpand.c, misc/registry.c, msdos/int10.c, multimedia/init.c, objects/enhmetafile.c: Marcus Meissner Lots of warning fixed, one missing WINAPI in ddraw.c added. * dlls/comctl32/treeview.c: Sylvain St.Germain Implements +/-, PgUp/PgDown, Home/End, Left/Right, Up/Down. * relay32/msvfw32.spec: Marcus Meissner msvfw32.spec brought up to date (forgot it in last msvfw32 patch). * relay32/kernel32.spec, misc/toolhelp.c: Marcus Meissner Added Module32* stubs. Wed Mar 17 15:54:44 1999 Alexandre Julliard * windows/x11drv/keyboard.c: Bruno Afonso Added Portuguese keytable. * windows/x11drv/keyboard.c: Robert Pouliot Added Canadian French keyboard layout. * windows/x11drv/keyboard.c: Huw D M Davies Added UK keyboard layout. * msdos/int10.c, msdos/int16.c, msdos/int21.c, msdos/int2f.c: Fixed/implemented various interrupt functions. * controls/menu.c, dlls/shell32/dataobject.c, dlls/shell32/shlfolder.c, graphics/metafiledrv/text.c, include/winioctl.h, win32/kernel32.c: Marcus Meissner Fixed some warnings. removed some unneccessary includes, removed one direct WND* access in controls/menu.c. * windows/win.c: Francis Beaudet Implemented a more defensive version of WIN_SendDestroyMsg. * include/Makefile.in: Alexander V. Lukyanov Install headers from $(SRCDIR). * include/wine/obj_base.h: Francois Gouget Removed the obsolete ICOM macros. * include/vfw.h: Francois Gouget Moved the APIs closer to the corresponding COM interface, removed two duplicates and added 2-3 macros for A/W APIs. * msdos/int15.c: Added some stubs for int15 functions. * windows/message.c, windows/queue.c: Ulrich Weigand Inter-thread SendMessage() bugfixes: - Insert new message to be received at the *end* of the SM_PENDING_LIST. - Do *not* process received messages in ReplyMessage(). - Clear the QS_SMRESULT flag only immediatedly before waiting. * ole/storage32.c: Thuy Nguyen Return error if not a valid OLE compound file. * dlls/version/install.c: Douglas Ridgway Fix crash if lpuCurDirLen or lpuDestDirLen==0. * misc/cdrom.c: Marcus Meissner Make cdrom.c compile on FreeBSD (FreeBSD does not seem to have *SEEK, strange). Tue Mar 16 16:29:26 1999 Alexandre Julliard * include/dosexe.h, include/module.h, include/pe_image.h, loader/dos/module.c, loader/module.c, loader/ne/module.c, loader/pe_image.c: Ulrich Weigand Pass CreateProcess() SECURITY_ATTRIBUTES through to PROCESS_Create(). * include/process.h, include/thread.h, scheduler/process.c, scheduler/thread.c: Ulrich Weigand Pass new arguments (suspend/inherit) to the server. * include/server.h, include/server/thread.h, scheduler/client.c, server/request.c, server/thread.c, server/trace.c: Ulrich Weigand Handle suspend/resume_thread requests in phase STARTING correctly. Set initial suspend count for threads created with CREATE_SUSPENDED. Set 'inheritable' flag for process/thread handles. * dlls/comctl32/monthcal.c, dlls/comctl32/nativefont.c, dlls/comctl32/pager.c, dlls/comctl32/progress.c, dlls/comctl32/propsheet.c, dlls/comctl32/rebar.c, dlls/comctl32/status.c, dlls/comctl32/tab.c, dlls/comctl32/toolbar.c, dlls/comctl32/tooltips.c, dlls/comctl32/trackbar.c, dlls/comctl32/treeview.c, dlls/comctl32/updown.c, dlls/comctl32/animate.c, dlls/comctl32/comboex.c, dlls/comctl32/commctrl.c, dlls/comctl32/datetime.c, dlls/comctl32/flatsb.c, dlls/comctl32/header.c, dlls/comctl32/hotkey.c, dlls/comctl32/ipaddress.c, dlls/comctl32/listview.c: Marcus Meissner Removed no longer necessary win.h include, added now necessary other includes (win.h used only by UPDOWN now). * misc/comm.c: Marcus Meissner debug.h must be last, or we get ERR() macro problems again. * dlls/comctl32/tooltips.c: Francis Beaudet Fixed a slight bug that was included in the change from WND ptr to hwnd last week. * loader/main.c, misc/callback.c: Ulrich Weigand Fix compiler warnings. * dlls/comctl32/imagelist.c, dlls/comctl32/treeview.c, include/treeview.h: Sylvain St.Germain Fixed some graphical problems of the treeview and added support LMB click on +/- sign to open and close. Fixed a bug in imagelist where the last image could not be displayed. * windows/x11drv/event.c: Ulrich Weigand Avoid unnecessary error messages. * windows/hook.c: Ulrich Weigand Ignore HIWORD of boolean return values of 16-bit hook procedures, to match buggy Windows behaviour. * graphics/ddraw.c: Lionel Ulmer Corrected bug in enumeration function. * windows/win.c: Pavel Roskin Fixed bug introduced in WIN_FindWindow. * dlls/comctl32/tab.c: Thuy Nguyen 0 is a valid index for a tab item. CreateSolidBrush takes a COLORREF as a parameter. Tab controls were always displayed in the top left corner. Mon Mar 15 16:15:17 1999 Alexandre Julliard * include/wine/obj_dragdrop.h, include/wine/obj_inplace.h: Francois Gouget Updated the interfaces to use the latest ICOM macros. * documentation/status/multimedia: Eric Pouech Updated. * if1632/mmsystem.spec, include/mmsystem.h, include/multimedia.h, multimedia/Makefile.in, multimedia/mci.c, multimedia/mcistring.c, multimedia/mmsystem.c, relay32/winmm.spec: Eric Pouech Moved all MCI internal functions/variables/macros to mci.c. Changed some interface names. * include/digitalv.h, multimedia/mciavi.c: Eric Pouech Make use of digitalv.h file. * multimedia/init.c: Eric Pouech Changed how list of loadable MCI drivers is obtained. * documentation/keyboard: Ove Kaaven Describes in newbie terms how to add new keyboard layouts. * windows/x11drv/keyboard.c: Ove Kaaven Better comments, and added ANSI codepages in table. US keyboard contributed by Uwe Bonnes. French keyboard contributed by Eric Pouech. German keyboard contributed by Ulrich Weigand. Danish keyboard contributed by Bertho Stultiens. * dlls/commdlg/colordlg.c, dlls/commdlg/filedlg.c, dlls/commdlg/finddlg.c, dlls/commdlg/fontdlg.c, dlls/commdlg/generic.c, dlls/commdlg/printdlg.c, include/commdlg.h: Klaas van Gend - Reimplementation of the CommDlg ExtendedError mechanism using TLS. - Some header inclusion cleanup. * multimedia/mcimidi.c, multimedia/mciwave.c, multimedia/mmio.c: Eric Pouech Cosmetic fixes. * multimedia/mcicda.c: Eric Pouech Makes use of new CDAUDIO_Seek() function. * msdos/int2f.c: Eric Pouech Various fixes for MSCDEX traps. * misc/cdrom.c, include/cdrom.h: Eric Pouech Added new function CDAUDIO_Seek(). * include/driver.h, windows/driver.c: Eric Pouech Better 16/32 bit driver messages mapping and handling. Better protection against bad handles. * include/peexe.h, loader/resource.c: Marcus Meissner Use MESSAGE_RESOURCE_* defines from SDK headers, updated LoadMessage* code. * include/Makefile.in: Niels Kristian Bech Jensen Fixed make install. ---------------------------------------------------------------- Sun Mar 14 17:25:33 1999 Alexandre Julliard * include/win.h, ipc/dde_proc.c, misc/spy.c, windows/class.c, windows/dce.c, windows/defdlg.c, windows/defwnd.c, windows/dialog.c, windows/dinput.c, windows/focus.c, windows/input.c, windows/mdi.c, windows/nonclient.c, windows/painting.c, windows/property.c, windows/queue.c, windows/scroll.c, windows/win.c, windows/winpos.c, windows/winproc.c, windows/x11drv/clipboard.c, windows/x11drv/event.c, windows/x11drv/mouse.c, windows/x11drv/wnd.c, controls/button.c, controls/combo.c, controls/desktop.c, controls/edit.c, controls/icontitle.c, controls/listbox.c, controls/menu.c, controls/scroll.c, controls/static.c, dlls/comctl32/updown.c, graphics/ddraw.c, if1632/thunk.c: Francois Boisvert Made access to the wnd struct thread-safe. * */*: Jim Aston Renamed wintypes.h to windef.h. * memory/heap.c: Make the system heap critical section global. * Make.rules.in: Fixed Makefile up-to-date check to avoid relinking all the object files. * windows/dinput.c: Patrik Stridvall Reimplemented some code without using X11. * graphics/ddraw.c, relay32/ddraw.spec: Patrik Stridvall Added functions DirectDrawEnumerateW and DirectDrawEnumerateExW. * include/peexe.h, loader/pe_image.c: Theodore S. Hetke Added tracing for delayed imports and removed the fixme. * files/dos_fs.c: Peter Ganten Better implementation of GetShortPathNameA/W. * misc/registry.c, wine.ini: Nathan Zorich Allow the file names and paths for the registry files (user.reg and system.reg) to be specified in a [Registry] section of wine.ini or other config file. * memory/string.c: Gerard Patel Fix OemToAnsiBuff for real Win31 behavior. * windows/x11drv/keyboard.c: Ove Kaaven First attempt at supporting different keyboard layouts with their correct scancode mapping. * configure, configure.in, programs/Makefile.in, programs/regapi/.cvsignore, programs/regapi/Makefile.in, programs/regapi/README, programs/regapi/regFixer.pl, programs/regapi/regRestorer.pl, programs/regapi/regSet.sh, programs/regapi/regapi.c: Sylvain St.Germain Added command line tool to access the registry. * rc/winerc.c: Fixed compilation. * rc/.cvsignore: Patrik Stridvall Ignore generated files. * programs/notepad/lcc.h: Fixed make depend. * ole/ole2.c, ole/olefont.c, include/ole.h, include/ole2.h, include/oleauto.h, include/olectl.h, include/wine/obj_control.h, include/wine/obj_dataobject.h, include/wine/obj_dragdrop.h, include/wine/obj_inplace.h, include/wine/obj_moniker.h, include/wine/obj_oleaut.h, include/wine/obj_olefont.h, include/wine/obj_oleobj.h, include/wine/obj_oleundo.h, include/wine/obj_oleview.h, include/wine/obj_picture.h, include/wine/obj_shelllink.h, include/wine/obj_storage.h, include/winerror.h, include/wingdi.h, include/winsock.h, include/winuser.h, include/wtypes.h: Paul Quinn Many new defines, and structs to help compile MFC. As well as a few OLE corrections from earlier. * loader/ne/module.c: Uwe Bonnes Make GetModuleHandle16 only look for module names, not path names. * msdos/int10.c: Jess Haas Added some more vga video modes. * windows/x11drv/wnd.c: Pavel Roskin Prevent X11 errors when XCreateWindow is called with zero width or height. * objects/metafile.c: Caolan McNamara Added metafile support for ExtFloodFill. * controls/button.c: Dirk Thierbach Paint gray text on gray background in checkboxes/radiobuttons by stippling. Also changed the brush used in this case to give better readability with X fonts. * include/debugdefs.h, include/tapi.h, misc/Attic/tapi32.c, misc/Makefile.in, relay32/tapi32.spec, Makefile.in, configure, configure.in, dlls/Makefile.in, dlls/tapi32/.cvsignore, dlls/tapi32/Makefile.in, dlls/tapi32/assisted.c, dlls/tapi32/line.c, dlls/tapi32/phone.c, include/debug.h: Andreas Mohr Implemented (nearly) all TAPI functions as stubs. * include/wine/winuser16.h, misc/comm.c, files/dos_fs.c, include/winbase.h: Michael McCormack Basic support for WIN32 serial communications API. Modify DOSFS_OpenDevice to allow opening of COM ports. Change Win32 comm functions to accept file handle. Add declaration of COMSTAT32 structure. * graphics/vga.c: Ove Kaaven Fixed a silly VGA-emulation palette bug. * msdos/int10.c: Ove Kaaven Fixed a couple of ugly warnings (caused by ugly errors). * msdos/dosmem.c: Andreas Mohr Bug fix. * dlls/shell32/brsfolder.c, dlls/shell32/contmenu.c, dlls/shell32/dataobject.c, dlls/shell32/enumidlist.c, dlls/shell32/shell32_main.h, dlls/shell32/shellguid.c, dlls/shell32/shlfolder.c, include/shlguid.h, include/shlobj.h, include/wine/obj_enumidlist.h, include/wine/obj_shellfolder.h, ole/guid.c: Juergen Schmied - IShellFolder and IEnumIDList are using the new COM headers - fixed sort order for folders and drives * README: Ove Kaaven Corrected location of FAQ. * msdos/int21.c: Ove Kaaven Fully implemented Direct Console Input. Sat Mar 13 18:20:27 1999 Alexandre Julliard * windows/queue.c, dlls/shell32/shlfolder.c, if1632/thunk.c, scheduler/sysdeps.c: Marcus Meissner Fixed newly introduced and some leftover warnings. * include/wingdi.h: Francois Gouget It is now possible to use the standard macros for GetTextExtentPoint and GetTextExtentPoint32. * include/prsht.h: Francois Gouget Fixed some SendMessage32A that escaped the renaming. * include/ole2.h: Francois Gouget On windows ole2.h includes oleauto.h and some programs depend on this. * include/oleauto.h, ole/ole2disp.c: Francois Gouget Fixes in the SysAllocString functions prototypes. It's mostly 'const' problems that prevent regular code from compiling. * dlls/commdlg/filedlg.c, graphics/x11drv/oembitmap.c, include/bitmaps/Attic/obm_cdrom, include/bitmaps/Attic/obm_drive, include/bitmaps/Attic/obm_folder, include/bitmaps/Attic/obm_folder2, include/bitmaps/Attic/obm_harddisk, include/bitmaps/oic_cdrom, include/bitmaps/oic_floppy, include/bitmaps/oic_folder, include/bitmaps/oic_folder2, include/bitmaps/oic_hdisk, include/bitmaps/oic_network, include/winuser.h: Pavel Roskin File open dialog now uses icons instead of bitmaps. * include/vfw.h: Marcus Meissner Updated AVI* class interface to new ICOM_ methods. * multimedia/msvideo.c: Marcus Meissner Some fixes and additions. * dlls/avifil32/.cvsignore, dlls/avifil32/Makefile.in, dlls/avifil32/avifile.c, include/debug.h, include/debugdefs.h, relay32/avifil32.spec, Makefile.in, configure, configure.in, dlls/Makefile.in: Marcus Meissner Started on avifil32 implementation (only stubs currently). * graphics/painting.c: Patrik Stridvall Reimplemented DrawFocusRect without using X11. * include/miscemu.h, msdos/dosmem.c, msdos/int10.c: Andreas Mohr Implemented mode setting things as well as VESA additions and other things. Cleaned up DOSMEM_BiosData handling. * include/wine/obj_olefont.h, ole/olefont.c: Francis Beaudet Implemented the IPersistStream interface on the OLE font object. * miscemu/emulate.c: Uwe Bonnes Make function BX=6 round ST0 to integer. * include/commctrl.h, include/wingdi.h: Paul Quinn Adrian Thurston - Changed LVM_SETITEMPOSITION -> LVM_SETITEMPOSITION32 LVM_SETITEMPOSITION16 -> LVM_SETITEMPOSITION - Added some missing structures and definitions to wingdi.h - Added proper defines for GetCharWidthsXXX - Added c++ protection to wingdi.h * dlls/shell32/iconcache.c, dlls/shell32/pidl.c, dlls/shell32/shell32_main.c, dlls/shell32/shell32_main.h, dlls/shell32/shellord.c, dlls/shell32/shellpath.c, dlls/shell32/shlview.c, include/shell.h, relay32/shell32.spec: Juergen Schmied - mostly cleanup after the renaming - implemented SHILCreateFromPath - small changed to SHGetFileInfo * include/prsht.h, include/winuser.h: Bertho Stultiens Changed the DLGTEMPLATE and DLGITEMTEMPLATE types to adhere to the AW structure for compatibility. * dlls/commdlg/printdlg.c, include/cderr.h, include/commdlg.h, dlls/commdlg/colordlg.c, dlls/commdlg/filedlg.c, dlls/commdlg/fontdlg.c: Bertho Stultiens Moved error codes to cderr.h. * loader/module.c: Peter Ganten Fix CreateProcess to handle lpCommandline better. * win32/init.c: Peter Ganten Change GetStartupInfoA/W to return the real StartupInfo. * windows/mdi.c: Guy Albertelli <> Handle null wndPtr for mdi window. * include/winbase.h: Dave Pickles Fixed a couple of missing #defines for Win32 API functions with ASCII/Unicode versions. * win32/newfns.c, if1632/kernel.spec, if1632/thunk.c, if1632/wprocs.spec, include/callback.h, misc/callback.c, relay32/Makefile.in, relay32/utthunk.c: Ulrich Weigand Implemented UTRegister and UTUnRegister. * if1632/ddeml.spec, include/ddeml.h, include/winnt.h, misc/ddeml.c, relay32/user32.spec: Added coded stubs for DdeQueryConvInfo (16 & 32 bit), DdeAddData (32 bit), DdeAbandonTransaction (32 bit), DdeImpersonateClient (32) DdeSetQualityOfService, DdeSetUserHandle. Corrected heap handling in DdeInitializeW, refined CreateMutex error handling. General tidying. * if1632/olecli.spec, include/ole.h, ole/olecli.c: Pavel Roskin Added prototypes for OleQueryLinkFromClip, OleQueryCreateFromClip, OleCreateLinkFromClip, OleCreateFromClip, OleQueryType, OleRevertClientDoc, OleEnumObjects. * relay32/olecli32.spec: Pavel Roskin Definition for OleCreateLinkFromClip was incorrect. * loader/resource.c: Marcus Meissner Mask out the upper 12 bits from the resourceid, just like win95 does. * BUGS: Ove Kaaven Updated bug list by my knowledge of them. * ole/storage32.c: Thuy Nguyen StgCreateDocfile accepts NULL as a file name. * objects/metafile.c: Caolan McNamara Added support for alternate DIBBITBLT layout. * debugger/msc.c: Sergey Turchanov Buffer size bug in LocateDebugInfoFile. * graphics/ddraw.c: Andreas Mohr Improved "error" message readability. * server/process.c: Fixed process_signaled (thanks to Uwe Bonnes). * dlls/comctl32/listview.c: Fixed make depend Fri Mar 12 17:42:50 1999 Alexandre Julliard * dlls/comctl32/animate.c, dlls/comctl32/comboex.c, dlls/comctl32/datetime.c, dlls/comctl32/flatsb.c, dlls/comctl32/header.c, dlls/comctl32/hotkey.c, dlls/comctl32/ipaddress.c, dlls/comctl32/monthcal.c, dlls/comctl32/nativefont.c, dlls/comctl32/pager.c, dlls/comctl32/rebar.c, dlls/comctl32/status.c, dlls/comctl32/toolbar.c, dlls/comctl32/tooltips.c, dlls/comctl32/trackbar.c, include/ipaddress.h, include/updown.h: Eric Kohl Replaced direct access to the WND structure by corresponding calls to Win32 functions. * dlls/comctl32/commctrl.c, dlls/comctl32/progress.c, dlls/comctl32/updown.c, include/commctrl.h: Eric Kohl Fixed some bugs introduced by the automated renaming. * resources/.cvsignore: Added sysres_Ru.s * dlls/comctl32/header.c, dlls/comctl32/listview.c, include/commctrl.h, include/listview.h: Luc Tourangeau Changed the listview control to add the report view and fix some bugs for the list view. * misc/shell.c: Marcus Meissner Removed use of WND struct. * dlls/ntdll/rtlstr.c: Marcus Meissner Added #ifdef HAVE_WCTYPE_H. * dlls/comctl32/tab.c: Thuy Nguyen Removed direct access to the WND struct. * windows/winproc.c: Juergen Schmied Message translation for WM_WININICHANGE. * windows/nonclient.c: Pavel Roskin obm_closed_95 should not be drawn inverted. * dlls/comctl32/treeview.c: Sylvain St.Germain Removed direct access to the WND struct. * ole/stg_bigblockfile.c, ole/storage32.c, ole/storage32.h: Thuy Nguyen Improved performance. * windows/dce.c: Stephane Lussier Create a new DC in GetDCEx when none are available. * ole/ole2disp.c, ole/variant.c, relay32/oleaut32.spec: Stephane Lussier Implemented DosDateTimeToVariant() and SysAllocStringByteLen() functions. * controls/combo.c: Pavel Roskin Changed the button state to "up" as soon as it is known that the selection has been cancelled, so the button is redrawn in the "up" state. * miscemu/instr.c: Marcus Meissner Emulate (well, ignore) mov cr0,eax and mov eax,cr0. Wed Mar 10 18:03:54 1999 Alexandre Julliard * include/wine/obj_inplace.h, include/wine/obj_oleaut.h, include/wine/obj_oleobj.h, include/wine/obj_oleundo.h, include/wine/obj_oleview.h, include/wine/obj_picture.h, include/wine/obj_property.h, ole/compobj.c, ole/guid.c, ole/ole2disp.c, ole/olecli.c, ole/oledlg.c, ole/oleobj.c, dlls/shell32/dataobject.c, dlls/shell32/pidl.c, dlls/shell32/shlfolder.c, include/Attic/wintypes.h, include/commdlg.h, include/imm.h, include/oaidl.h, include/objbase.h, include/ocidl.h, include/ole.h, include/ole2ver.h, include/oleauto.h, include/olectl.h, include/oleidl.h, include/shlguid.h, include/shlobj.h, include/winbase.h, include/wine/obj_base.h, include/wine/obj_control.h, include/wine/obj_dataobject.h, include/wine/obj_dragdrop.h, include/winnt.h, include/wtypes.h: Paul Quinn Added a lot of new OLE interfaces. * documentation/languages, documentation/wine.man, include/options.h, misc/main.c, ole/ole2nls.c, resources/Makefile.in, resources/sysres.c, resources/sysres_Ru.rc: Alexander Kanavin Added support for Russian language. * if1632/thunk.c: Ulrich Weigand Temporary fix: Activate 16-bit system timer callback routines, but skip calling them if timer signal occured while current thread was holding the Win16Lock (to prevent 16-bit stack corruption). * include/syslevel.h, scheduler/syslevel.c: Ulrich Weigand Implemented _ConfirmWin16Lock (KERNEL32.96). * graphics/ddraw.c, include/ddraw.h: Lionel Ulmer - some clean up in handling of depth - more depth conversion routines for X11 (15, 16 and 32 -> 8) * include/queue.h, windows/message.c, windows/queue.c: Stephane Lussier Implemented SendMessageTimeout() functions. * programs/notepad/ChangeLog, programs/notepad/Makefile.in, programs/notepad/search.c: Marcel Baur Added Boyer-Moore text search. * if1632/thunk.c, if1632/user.spec, include/callback.h, misc/callback.c: Ulrich Weigand Added USER.DestroyIcon32 to Callout struct. * include/module.h, loader/ne/convert.c: Ulrich Weigand Deleted NE_FreePEResource(). * include/user.h, loader/main.c, loader/module.c, windows/user.c: Ulrich Weigand Adapted to cursor/icon handling changes. * loader/ne/resource.c, loader/resource.c: Ulrich Weigand Allow accessing both NE and PE resources with both 16- and 32-bit API. Hook cursor/icon destruction into FreeResource (like Win95). * include/cursoricon.h, objects/cursoricon.c: Ulrich Weigand Implemented Win95-style shared cursor/icon cache. Merged NE and PE resource handling. * graphics/x11drv/oembitmap.c, include/bitmaps/Attic/obm_folder, include/bitmaps/Attic/obm_folder2: Pavel Roskin Fixed folder bitmap colors for 8bpp. * graphics/x11drv/graphics.c: Caolan McNamara Windows doesnt allow dashed and dotted lines > 1. * ole/compobj.c: Francis Beaudet Fixed a reference-counting problem in the external lock mechanism. * dlls/shell32/dataobject.c: Francis Beaudet Fixed a simple bug in the implementation of the ShellView objects. * dlls/shell32/shell32_main.c, include/shell.h: Sergey Turchanov Added some extra CSIDLs. * loader/module.c: Ulrich Weigand Bugfix: Allow lpCommandLine == NULL in CreateProcess(). * windows/x11drv/keyboard.c: Ulrich Weigand Bugfix: ToAscii should not generate ASCII code when key-up flag is set. * graphics/x11drv/bitblt.c, graphics/x11drv/bitmap.c, windows/x11drv/event.c: Ulrich Weigand Avoid unnecessary GraphicsExpose events. * ole/safearray.c: Francis Beaudet Fixed index calculations of the upper and lower bounds of a safearray. Fixed a wrong initialization of the VT sizes array. * ole/ole2.c, relay32/ole32.spec: Francis Beaudet Implementation of the ReleaseStgMedium method. Tue Mar 9 17:47:51 1999 Alexandre Julliard * dlls/ntdll/Makefile.in, dlls/ntdll/file.c, dlls/ntdll/nt.c, dlls/ntdll/om.c, dlls/ntdll/reg.c, dlls/ntdll/rtl.c, dlls/ntdll/rtlstr.c, dlls/ntdll/sec.c, dlls/ntdll/sync.c, dlls/ntdll/time.c, relay32/advapi32.spec, relay32/ntdll.spec: Juergen Schmied - sorted API by groups - new stubs: NtQueryDirectoryFile, ZwQueryDirectoryFile - impl.: RtlAllocateHeap, RtlCreateHeap, RtlDestroyHeap, RtlFreeHeap, RtlGetDaclSecurityDescriptor, RtlGetSaclSecurityDescriptor - impl. by Rex Jolliff (rex@lvcablemodem.com): RtlTimeToTimeFields, RtlTimeFieldsToTime * include/ntddk.h, include/ntdef.h, include/winnt.h: Juergen Schmied Many new prototypes. * loader/resource.c, include/module.h: Juergen Schmied Fix use of wrong prototype from ntdll.h. * dlls/advapi32/security.c: Juergen Schmied Make more functions just calling down to ntdll. New: GetSecurityDescriptorSacl. * graphics/psdrv/afm.c: Huw D M Davies Accept "Normal" as a valid AFM weight. * ole/storage32.c, ole/storage32.h: Thuy Nguyen Smarter way of searching for a free block. * windows/message.c: Ulrich Weigand Bugfix: DirectedYield() only to 16-bit tasks in ReplyMessage(). * libtest/hello5.c: Marcus Meissner Corrected cast so hello5 compiles again. * dlls/commdlg/filedlg.c: Norman Stevens Don't copy lpstrFileTitle if given NULL pointer for this. Delphi 2.0 passes NULL for lpstrFileTitle to GetOpen/SaveFileName. * misc/winsock.c, include/winsock.h: Marcus Meissner Fix broken _convert_sockopt for IPPROTO_TCP cases, added TCP_NODELAY. * msdos/dpmi.c: Marcus Meissner __asm__ fix as suggested by Daniel Serpell, removed additional "eax" from clobber list, so egcs-current likes it. * memory/virtual.c: Marcus Meissner CreateFileMapping SetLastError(0)s on newly created mappings. Sun Feb 28 20:05:12 1999 Alexandre Julliard * dlls/commdlg/.cvsignore, dlls/commdlg/Makefile.in, dlls/commdlg/colordlg.c, dlls/commdlg/filedlg.c, dlls/commdlg/finddlg.c, dlls/commdlg/fontdlg.c, dlls/commdlg/generic.c, dlls/commdlg/printdlg.c, misc/Attic/commdlg.c, misc/Makefile.in, Makefile.in, configure, configure.in, dlls/Makefile.in: Klaas van Gend Create a new subdirectory for the common dialog box DLL and move all code from /misc/commdlg.c to this directory. Also made a start in documenting the API calls. * misc/winsock.c, debugger/break.c, debugger/dbg.y, debugger/dbgmain.c, debugger/editline.c, debugger/expr.c, debugger/hash.c, debugger/info.c, debugger/memory.c, debugger/msc.c, debugger/registers.c, debugger/source.c, debugger/stack.c, debugger/types.c, include/Attic/wintypes.h: Marcus Meissner More include optimizations. * windows/driver.c, windows/winproc.c, dlls/comctl32/toolbar.c, dlls/comctl32/treeview.c, loader/pe_image.c, msdos/dpmi.c, multimedia/audio.c, multimedia/mmsystem.c, objects/dc.c, ole/storage32.c, controls/menu.c, dlls/comctl32/hotkey.c: Marcus Meissner Fixed a lot of warnings using WINE_UNUSED, casts, commenting out and additional {}. Rewrote GetCreationModeFromSTGM so we don't get "possible use of uninitialized variable". * include/mmsystem.h, include/multimedia.h: Marcus Meissner MCI_OPEN_DRIVER_PARMS - Add win32 version of structure. * files/directory.c, msdos/int21.c: Marcus Meissner Changed CreateDirectory LastError returns to match Win32 (found out by experiment). Adapted int21 CreateDirectory call to still return the correct DOS error codes according to Ralph Brown. * graphics/ddraw.c, relay32/ddraw.spec: Lionel Ulmer - added function DirectDrawEnumerateEx - added (or corrected) check for the return value of the enumeration functions * configure, configure.in: Lionel Ulmer Better detection of old (i.e. non OpenGL 1.2 compliant) version of Mesa. * multimedia/mcicda.c: Marcus Meissner Added missing . * include/winuser.h: Klaas van Gend Added the button states as returned by IsDlgButtonChecked(). * loader/module.c: Andreas Mohr Added support for quoted file names in CreateProcess(). * files/file.c, scheduler/client.c, scheduler/event.c, scheduler/mutex.c, scheduler/semaphore.c, server/file.c, win32/console.c: CLIENT_WaitReply: don't clear last error on success; fixed callers accordingly (based on a patch by Juergen Schmied). * msdos/int10.c: Jess Haas Added some support and stubs for VESA to msdos/int10.c. * ole/bindctx.c, ole/filemoniker.c, ole/ifs.c, ole/itemmoniker.c, ole/moniker.c, ole/ole2.c, ole/ole2disp.c, ole/ole2nls.c, ole/olecli.c, ole/oledlg.c, ole/olefont.c, ole/oleobj.c, ole/olesvr.c, ole/safearray.c, ole/stg_bigblockfile.c, ole/stg_stream.c, ole/storage.c, ole/storage32.c, ole/typelib.c, ole/variant.c, tools/fnt2bdf.c, windows/display.c, dlls/shell32/dataobject.c, dlls/shell32/shlfolder.c, include/oleobj.h, include/shlobj.h, include/wine/obj_channel.h, include/wine/obj_clientserver.h, include/wine/obj_control.h, include/wine/obj_dataobject.h, include/wine/obj_dragdrop.h, include/wine/obj_inplace.h, include/wine/obj_marshal.h, include/wine/obj_misc.h, include/wine/obj_moniker.h, include/wine/obj_oleaut.h, include/wine/obj_olefont.h, include/wine/obj_propertystorage.h, include/wine/obj_storage.h, include/wine/winuser16.h, library/winestub.c, memory/string.c, misc/sound.c, multimedia/mmsystem.c, controls/menu.c: Marcus Meissner More include optimisations and fixes. * server/process.c: Juergen Schmied open_object should return ERROR_FILE_NOT_FOUND when the named object is not found. * files/directory.c: Andreas Mohr Better error message. * scheduler/Attic/k32obj.c, scheduler/Makefile.in, scheduler/client.c, scheduler/critsection.c, scheduler/event.c, scheduler/handle.c, scheduler/mutex.c, scheduler/pipe.c, scheduler/process.c, scheduler/semaphore.c, scheduler/synchro.c, scheduler/sysdeps.c, scheduler/thread.c, win32/console.c, win32/device.c, files/change.c, files/dos_fs.c, files/file.c, include/Attic/k32obj.h, include/file.h, include/process.h, include/thread.h, loader/task.c, memory/virtual.c, misc/toolhelp.c: Use server handles directly for Win32 handles. Removed use of K32OBJ. * windows/defwnd.c, windows/msgbox.c, windows/x11drv/monitor.c, objects/brush.c, objects/clipping.c, objects/pen.c, objects/region.c, objects/text.c, ole/olefont.c, ole/oleobj.c, scheduler/Attic/k32obj.c, scheduler/event.c, scheduler/mutex.c, scheduler/semaphore.c, server/file.c, server/request.c, debugger/dbg.y, debugger/registers.c, graphics/d3ddevices.c, graphics/d3dexecutebuffer.c, graphics/d3dtexture.c, graphics/escape.c, graphics/win16drv/font.c, loader/ne/convert.c, misc/network.c, misc/port.c, miscemu/main.c, multimedia/audio.c, multimedia/dplay.c, multimedia/init.c, multimedia/mciwave.c, multimedia/mixer.c, multimedia/mmaux.c, console/xterm.c, controls/listbox.c: David Luyer - fixed missing stdlib.h and string.h includes everywhere - removed a couple of unneeded stdlib.h and stdio.h includes * include/process.h, include/thread.h, loader/task.c, scheduler/process.c, scheduler/sysdeps.c, scheduler/thread.c, windows/queue.c, windows/win.c, windows/winproc.c: Process and thread id now use the server-side id instead of an obfuscated pointer. * libtest/guitest.c, libtest/guitest.rc, libtest/guitest.rh: Ove Kaaven The Windows GUI behaviour tester used on the Windows computer. It was used with Borland C++ 4.52, but should be easy to adapt to Winelib by whoever feels like it; I haven't, I just released this useful test app in case it would benefit other developers. * documentation/gui: Ove Kaaven This file details the results (message traces) the GUI behaviour tester app gave under real Windows for various events. It was useful for some of my debugging at least, perhaps it could be of some use to other Wine GUI debuggers as well. * configure, configure.in, include/config.h.in, include/sig_context.h, include/winnls.h, misc/winsock.c, misc/winsock_dns.c, multimedia/dsound.c: Marcus Meissner Some Solaris fixes. needs , sig_context.h needs to define HANDLER_CONTEXT, wctype.h does not like 'wsprintf' defined, msdos/dpmi.c needs "stackframe.h" too, and multimedia/dsound.c needs "winuser.h". * win32/kernel32.c: Ulrich Weigand GetBinaryType[AW] moved to loader/module.c, modified to recognize .COM and .PIF files. * loader/dos/module.c, miscemu/main.c, msdos/dpmi.c, include/dosexe.h, include/pe_image.h, loader/main.c, loader/pe_image.c: Ulrich Weigand Adapted to CreateProcess changes. * loader/ne/module.c: Ulrich Weigand NE modules adapted to CreateProcess changes. LoadModule16/LoadLibrary16 reorganization. * include/module.h, include/task.h, loader/module.c, loader/task.c, scheduler/process.c, scheduler/thread.c: Ulrich Weigand Process creation sequence reorganized: - Removed instance data segment for all but NE modules. - Check binary type in CreateProcess before loading module. - Unix process creation moved from WinExec to CreateProcess. - Bugfix: fill in thdb->teb.htask16 member correctly. * windows/input.c: Guy Albertelli - Code to return default language code as keyboard layout. - Implemented other stubs associated with keyboard layout: GetKeyboardLayoutNameA, ActivateKeyboardLayout, LoadKeyboardLayout[AW], GetKeyboardLayoutList. * include/commdlg.h, include/resource.h, misc/Attic/commdlg.c, resources/sysres_En.rc: Klaas van Gend Preliminary implementation of the PrintDlgA stub. * ole/nls/nld.nls: Klaas van Gend Now compliant to the Dutch standards. * windows/win.c: Juergen Schmied FIND_WndPtr should not set ERROR_INVALID_WINDOW_HANDLE when hWnd=0. * msdos/dosmem.c: Ove Kaaven Fixed a couple of dosmem block resize bugs. * graphics/ddraw.c: Lionel Ulmer - no more 3D capabilities if Direct3D support is not compiled in - some debug messages clean-up (replaced fprintfs by DUMPs) * misc/main.c: Marcus Meissner We got passed a NULL Dialect ptr and accessed it unprotected. * server/file.c, server/mapping.c, include/server/object.h, memory/virtual.c: Added support for mappings with no associated file. * include/server.h, include/server/process.h, scheduler/client.c, server/process.c, server/request.c, server/trace.c: Removed dst_handle in duplicate_handle request. Added inherit flag in create_mapping request. * include/oaidl.h, include/wine/obj_oleaut.h, ole/safearray.c, ole/variant.c: Francis Beaudet Implemented support for arrays and safe arrays in VARIANT data structures. Also moved the SAFEARRAY definition (yet again) to the obj_oleaut.h file. * wine.ini: Andreas Mohr Fixed Filesystem documentation. * include/bitmaps/Attic/obm_folder, include/bitmaps/Attic/obm_folder2: Pavel Roskin Made folder icons gray-yellow instead of blue. * windows/message.c: Francis Beaudet Order of send message processing was not respected and the message stacked last finished after the message stacked first. * windows/winpos.c: Francis Beaudet Added checks to guard against NULL active window. * windows/dialog.c: Norman Stevens Don't check children of disabled or invisible controls for dialog keyboard accelerators. Fixes problems with dialogs with tab boxes. * ole/compobj.c, relay32/ole32.spec: Francis Beaudet Implemented the CoTaskMemRealloc API. Also clean-up around that API call. * ole/storage32.c: Thuy Nguyen Added a missing Release. STGM_CREATE should translate to CREATE_ALWAYS. ---------------------------------------------------------------- Fri Feb 26 12:33:21 1999 Alexandre Julliard * DEVELOPERS-HINTS: Updated for new naming conventions. * */*: Large-scale renaming of all Win32 functions and types to use the standard Windows names. ---------------------------------------------------------------- Thu Feb 25 18:11:40 1999 Alexandre Julliard * misc/main.c: Albert den Haan For various reasons some of our libwine executables must have a "." in their file names. The "." causes trouble when the file name is used as the class name for an X resource as wine does for command line parsing under X. * windows/win.c: Make GetWindowLong(GWL_HWNDPARENT) return the same thing as GetParent32; suggested by Dave Pickles . * include/gdi.h, include/heap.h, include/wintypes.h: David Luyer Added __attribute__ ((unused)) on static inline functions declared in header files. * documentation/bugreports: Adam the Jazz Guy Added "The Easy Way" and "The Hard Way", largely favoring the easy way, which uses my bug_report.pl script. Added info on a command that can be run on all shells to print debug msgs to a file and not to xterm. * msdos/dpmi.c: Marcus Meissner Needs thread.h for non-Linux. * include/win.h, windows/win.c: Francois Boisvert Adding of new functions to make the wnd struct thread safe. Adding of irefCount in wnd struct. * configure, configure.in, console/ncurses.c, include/acconfig.h, include/config.h.in: Michael Veksler Added configure check for getbkgd and define HAVE_GETBKGD. * include/ocidl.h, include/ole2.h, include/oleidl.h, include/wine/obj_cache.h, include/wine/obj_connection.h, include/wine/obj_control.h, include/wine/obj_inplace.h, include/wintypes.h, ole/olefont.c: Paul Quinn Many interface declarations that originated from oleidl.h, oaidl.h and ocidl.h separated into somewhat relevant obj_* files. * files/drive.c, ole/compobj.c, resources/sysres.c: Michael Veksler Fixed warning and compilation errors. * include/windows.h: Michael Veksler Removed includes of wine/* headers. * loader/resource.c: Pavel Roskin Made message "Resource not found" WARN. * dlls/shell32/contmenu.c, include/shlobj.h: Adrian Thurston - Use the new COM definition macros in the header. - Put the implementation of the object in the contmenu.c. - Make appropriate name changes in contmenu.c. * misc/registry.c, include/winreg.h: Paul Quinn Zygo Blaxell Modifies parameter list of a couple of functions to comply with SDK. * windows/scroll.c: Pascal Lessard ScrollDC32 modified to return rect in logical coordinate. * include/wine/obj_oleaut.h: Adrian Thurston Adds C++ nameless union support to tagVARIANT. * include/mmsystem.h, include/oaidl.h, include/oleauto.h: Adrian Thurston Moved some definitions out of oleauto.h and into oaidl.h to conform to the SDK. Removed a redundant include. Added some c++ protection. Wed Feb 24 15:58:51 1999 Alexandre Julliard * dlls/shell32/enumidlist.c, dlls/shell32/pidl.c, dlls/shell32/pidl.h, dlls/shell32/shlfolder.c, include/shlobj.h: Juergen Schmied Changed pidl structure to match the pidl's used in lnk-files. * dlls/shell32/shelllink.c: Juergen Schmied Implemented reading of *.lnk-files. * include/wine/obj_shelllink.h: Juergen Schmied new file, including the IShellLink definition. * include/module.h, include/pe_image.h, loader/elf.c, loader/main.c, loader/module.c, loader/pe_image.c, loader/pe_resource.c, loader/resource.c, loader/task.c, scheduler/thread.c: Ulrich Weigand Modified process creation sequence: call PE_CreateModule in the context of the new process (in TASK_CallToStart). Changed all PE/Module routines so as to always operate on the current process; adapted all callers. * msdos/dosconf.c, msdos/dosmem.c, msdos/dpmi.c, msdos/int16.c, msdos/int21.c, msdos/int2a.c, msdos/interrupts.c, msdos/ioports.c, msdos/vxd.c, msdos/xms.c, ole/storage.c, ole/typelib.c, programs/avitools/icinfo.c, relay32/relay386.c, tools/build.c, windows/clipboard.c, windows/input.c, dlls/shell32/contmenu.c, dlls/shell32/enumidlist.c, dlls/shell32/folders.c, dlls/shell32/shelllink.c, dlls/shell32/shellole.c, dlls/shell32/shlview.c, graphics/d3ddevices.c, graphics/d3dexecutebuffer.c, graphics/d3dlight.c, graphics/d3dmaterial.c, graphics/d3dtexture.c, graphics/d3dviewport.c, graphics/ddraw.c, loader/main.c, memory/atom.c, misc/lstr.c: Marcus Meissner Optimized away more includes, readded some #includes for necessary prototypes. * msdos/int2f.c: Added low-level Netware installation check. * include/console.h, console/interface.c, console/ncurses.c: Joseph Pranevich Added GetBackgroundColor call to the console struct. Will be used later. * msdos/int10.c: Joseph Pranevich Bugfixes for INT 10/0B (SetBackgroundColor) to work properly. (Interrupt list did not have correct.) * windows/dinput.c: Lionel Ulmer Added stubs for two missing methods of DInput. * ole/stg_bigblockfile.c: Thuy Nguyen Fixed a bug. * ole/storage32.c, ole/storage32.h: Thuy Nguyen Added support for larger files. * objects/dib.c: Huw D M Davies Fixes buffer overrun problems with GetDIBits. * windows/message.c: Stephane Lussier Fixed some SendMessage bugs. * ole/compobj.c: Sylvain St.Germain Fix COM_ExternalLockFreeList to do not fail with an empty list. Mon Feb 22 10:21:56 1999 Alexandre Julliard * misc/Makefile.in, misc/string.c: Zygo Blaxell Implemented some CRTDLL string functions. * objects/enhmetafile.c, objects/linedda.c, objects/metafile.c, objects/text.c, windows/caret.c, windows/clipboard.c, windows/dialog.c, windows/driver.c, windows/hook.c, windows/input.c, windows/keyboard.c, windows/mdi.c, windows/mouse.c, windows/multimon.c, windows/rect.c, windows/scroll.c, windows/timer.c, windows/user.c, windows/winproc.c, include/menu.h, include/mmsystem.h, include/sysmetrics.h, include/vfw.h, multimedia/audio.c, multimedia/dplay.c, multimedia/dsound.c, multimedia/init.c, multimedia/joystick.c, multimedia/mcianim.c, multimedia/mcicda.c, multimedia/mcimidi.c, multimedia/mcistring.c, multimedia/mciwave.c, multimedia/midi.c, multimedia/mixer.c, multimedia/mmaux.c, multimedia/mmio.c, multimedia/mmsystem.c, multimedia/time.c, objects/cursoricon.c: Marcus Meissner Some more recursive include fixes/optimizations. * dlls/shell32/contmenu.c, dlls/shell32/enumidlist.c, dlls/shell32/iconcache.c, dlls/shell32/pidl.h, dlls/shell32/shell32_main.c, dlls/shell32/shlview.c: Juergen Schmied - eliminated one element of the pidl struct (dwSFGAO) - changed some superflous FIXME * dlls/shell32/shlfolder.c, include/wine/obj_dragdrop.h: Juergen Schmied - header uses the last macros now - rewrote IDropTarget according to the new COM headers (was local declared not using the already written prototypes) - corrected Drop method (wrong parameter count) * windows/dinput.c: Francois Gouget Updated to use the latest COM macros, ICOM_VTABLE and ICOM_THIS. Added the interface implementation structures. I remembered from an email that even when asked for a IDirectInputDeviceA what was returned was an IDirectInputDevice2A so I considered that we would only implement the latter. The IDirectInputDeviceA_xxx methods have been renamed to IDirectInputDevice2A_xxx, and we always return our IDirectInputDevice2A implementation as before. Renamed the implementation structures to XxxImpl. * include/dinput.h: Francois Gouget Use latest COM macros Defined the IDirectInputDeviceA interface independently from IDirectInputDevice2A. Removed the 32 suffix of the interfaces. Hopefully this will not cause any problem with the renaming. Moved the implementation specific stuff to dinput.c (well, the interfaces at least). Sun Feb 21 18:35:28 1999 Alexandre Julliard * scheduler/process.c, scheduler/sysdeps.c, include/process.h, include/thread.h: Changed initial process creation to avoid memory allocations. Removed a few unused fields in PDB and THDB. * scheduler/client.c, scheduler/thread.c: Removed thread queue functions. Changed initial thread creation to avoid memory allocations. Moved server startup to THREAD_CreateInitialThread. * scheduler/synchro.c: Removed use of per-thread wait_struct, cleaned up a bit. * scheduler/k32obj.c, memory/virtual.c: Removed MEM_MAPPED_FILE_Ops. * include/winnt.h: Added a few exception codes. * windows/win.c, include/mmsystem.h, include/path.h, include/progress.h, include/queue.h, include/resource.h, include/struct32.h, include/updown.h, include/windows.h, include/winpos.h, loader/main.c, misc/commdlg.c, misc/winsock_dns.c, multimedia/mmsystem.c, include/cursoricon.h, include/dde_atom.h, include/ddraw.h, include/dispdib.h, include/dosexe.h, include/dsound.h, controls/menu.c: Michael Veksler - Fix headers to include less or smaller header files. - Fix header and source files to include missing header files to avoid warnings and errors. * loader/signal.c, memory/ldt.c, misc/port.c: Marcus Meissner Change "g" (general regs) into "r" (hardregs) in clone / modify_ldt / wine_sigaction __PIC__ cases, since "g" will not work with -fomit-frame-pointer ("g" is referenced using %esp which was invalidated before). Bug found and (other) fix suggested by Daniel Serpell. * ole/olefont.c: Marcus Meissner Added missing WINAPIs. * windows/x11drv/event.c, windows/x11drv/init.c, loader/task.c, windows/event.c, windows/ttydrv/event.c, windows/ttydrv/init.c, include/message.h, include/ttydrv.h, include/x11drv.h: Stephane Lussier Fix problem where you need mouse activity to unlock some 16 bits thread with multi-threaded apps. Sat Feb 20 16:48:54 1999 Alexandre Julliard * relay32/oleaut32.spec, include/Attic/interfaces.h, include/oaidl.h, include/ocidl.h, include/ole.h, include/oleauto.h, include/olectl.h, include/wine/obj_oleaut.h, include/wine/obj_olefont.h, include/wtypes.h, ole/Makefile.in, ole/guid.c, ole/ole2disp.c, ole/olefont.c, ole/typelib.c: Francis Beaudet Implemented the OleCreateFontIndirect method and the associated COM object. That object supports the IFont and IDispatch interfaces. * configure, configure.in, include/config.h.in, misc/port.c, misc/winsock.c, misc/winsock_dns.c: Marcus Meissner Problems reported by Donald Page, PR 105-107. * console/ncurses.c: Joseph Pranevich More commenting, better debugging of color problems, and support for the new TerminalType option in wine.ini. This allows us to select which terminal type we are really using so that we can, for example, use its color capabilities. * console/interface.c, include/console.h: Joseph Pranevich Support for the new InitialRows andf InitialColumns options in wine.ini (Generic replacement for XtermResolution option...) * msdos/int10.c: Joseph Pranevich Fix *DUH* problem causing lots and lots of unnecessary AllocColor errors. * console/xterm.c: Joseph Pranevich Removal of obsolete XtermResolution option. * documentation/console, wine.ini: Joseph Pranevich Add information about the new wine.conf options. * debugger/stack.c: Eric Pouech Fixed backtrack issue on 16bit code. * debugger/msc.c: Eric Pouech Changed LocateDebugInfoFile to reduce stack consumption (from 13k to 2k !!) * debugger/info.c: Eric Pouech Fixed comment for Wine documentation. * include/server.h, include/server/request.h, server/request.c, server/trace.c: Added get/set_handle_info request. * graphics/x11drv/dib.c: Fixed end-of-line bug in X11DRV_DIB_SetImageBits_RLE4. * tools/wrc/CHANGES, tools/wrc/genres.c, tools/wrc/newstruc.c, tools/wrc/parser.y, tools/wrc/wrc.h, tools/wrc/wrctypes.h, tools/wrc/writeres.c: Bertho Stultiens Fix a couple of 64bit platform problems and speed up compilation. See tools/wrc/CHANGES for details. * multimedia/mmio.c: Marcus Meissner mmioDescend: debugoutput enhanced, FINDLIST/FINDRIFF should Check the correct ckid (LIST/RIFF) too. (verified against mciavi32.dll) * Makefile.in: Zygo Blaxell Added a check for the existence of wine.sym before installing it. * include/ole2.h, ole/ole2.c, relay32/ole32.spec: Francis Beaudet Added some new stubs for the OLE menu descriptor methods. Fri Feb 19 16:50:24 1999 Alexandre Julliard * windows/queue.c: Martin Walker Fixed message filtering check. * relay32/advapi32.spec, dlls/advapi32/security.c, dlls/ntdll/nt.c, dlls/ntdll/rtl.c, include/ntddk.h, include/ntdef.h, include/ntdll.h, include/queue.h, include/winbase.h, include/winnt.h, include/winreg.h, ole/oleobj.c: Juergen Schmied - made the security functions consistent. advapi calls down to ntdll now - new SetSecurityDescriptorGroup, SetSecurityDescriptorOwner, SetSecurityDescriptorSacl, GetSecurityDescriptorDacl - nt-header cleanup * dlls/ntdll/rtl.c, if1632/builtin.c, misc/cpu.c, win32/kernel32.c: Huw D M Davies Fixed a few broken includes. * windows/nonclient.c: Reverted broken close button change. * dlls/comctl32/header.c, dlls/comctl32/rebar.c, dlls/comctl32/tab.c, dlls/comctl32/toolbar.c, dlls/comctl32/tooltips.c, dlls/comctl32/updown.c, dlls/shell32/contmenu.c, dlls/shell32/dataobject.c, graphics/path.c, graphics/psdrv/init.c, tools/wrc/newstruc.c, controls/button.c, controls/edit.c, controls/widgets.c, dlls/advapi32/advapi.c, dlls/advapi32/security.c: Jeff Garzik Added missing string.h include. * loader/ne/module.c: Uwe Bonnes Only append .dll if no extension yet. * windows/message.c: Francis Beaudet Temporary fix suggested by Ulrich to allow the MsgWaitForMultipleObject method to be called from 16 bit threads. * windows/winproc.c: Ove Kaaven Initialized return value of 16->32 conversion of WM_MDIGETACTIVE in case it's sent to a window that doesn't handle it (i.e. not MDI client). * include/dce.h, windows/dce.c, windows/winpos.c: Ove Kaaven Added extra child arguments to DCE_GetVisRgn() to be able to handle PARENTDC class style combined with CLIPCHILDREN window style, to prevent mis-redraws in Free Agent 16-bit. * dlls/version/info.c: Lawson A. Whitney Don't hang on the last child if it's not wanted. * win32/kernel32.c, relay32/kernel32.spec: Ian Schmidt Partial stub implementation of undocumented KERNEL routine PK16FNF, needed by Win98 EXPLORER. Thanks to Ulrich Weigand for information. * misc/commdlg.c: Ove Kaaven Fix redraw problems for ChooseColor dialog. * */*.c: Marcus Meissner Removed a lot of occurences of windows.h (and added necessary other includes). * include/objidl.h, include/wine/obj_moniker.h, ole/compobj.c, dlls/shell32/dataobject.c, dlls/shell32/enumidlist.c: Francois Gouget Small fixes. * include/dsound.h, multimedia/dsound.c: Francois Gouget Changed the first parameter from LPGUID (Windows headers) to REFGUID. This makes it a 'const GUID*' which means DirectSoundCreate must not change it. * dlls/shell32/shell32_main.h: Francois Gouget Removed redundant definitions of IsEqualIID and IsEqualCLSID (see include/wine/obj_base.h) Thu Feb 18 17:34:10 1999 Alexandre Julliard * relay32/user32.spec, windows/message.c, windows/queue.c, windows/user.c, include/queue.h: Stephane Lussier - New implementation of SendMessage, ReceiveMessage, ReplyMessage functions to support thread-safeness, and nested SendMessage. - Addition of ReplyMessage32. * windows/x11drv/wnd.c: Ulrich Weigand Bugfix: Cope with NULL pDriverData in X11DRV_WND_GetXWindow. * misc/commdlg.c, resources/sysres_En.rc: Pascal Lessard Applied the changes of the resulting color of the choose color dialog. Initialize values in the choose color dialog. * include/wine/obj_base.h, include/wine/obj_marshal.h: Francois Gouget Removed references to ICOM_INHERITS. * ole/stg_bigblockfile.c, ole/storage32.c, ole/storage32.h: Thuy Nguyen Fixed bug with read-only files. * multimedia/mciavi.c, multimedia/mcimidi.c: Marcus Meissner Removed superflous WINAPI (mismatch with prototype) in *_DriverProc32. * include/dosexe.h: Marcus Meissner dosexe.h depends on winbase.h (for LPSTARTUPINFO32A) * dlls/shell32/shelllink.c, ole/bindctx.c, ole/filemoniker.c, ole/itemmoniker.c, ole/stg_stream.c, ole/storage32.c, ole/storage32.h: Francois Gouget Modified so that they do not use the VTABLE_FUNC macros that performed casts of all methods put in the jump table. I find it too risky to use such macros because nothing guarantees that you actually put the right method at the right place or that the prototype is right. * include/wine/obj_moniker.h, include/wine/obj_storage.h, ole/storage.c: Francois Gouget Updated to use the latest COM macros. Defined more interfaces and API functions. * controls/menu.c, graphics/x11drv/oembitmap.c, include/winuser.h, windows/nonclient.c: Francois Boisvert Implementation of the pushed close button. Wed Feb 17 17:45:54 1999 Alexandre Julliard * include/mapidefs.h, include/objbase.h, include/ole.h, include/oleauto.h, include/winbase.h, include/wine/obj_moniker.h, include/wine/obj_propertystorage.h, include/winnt.h, include/wintypes.h, include/wtypes.h, ole/compobj.c: Francois Gouget Moved some definitions to their proper include file. * include/wine/obj_clientserver.h, include/wine/obj_misc.h: Francois Gouget Fixed some ICOM_INHERIT stuff and added new related API functions. * include/wine/obj_base.h: Francois Gouget Added new API. Part of it was in 'include/objbase.h' before and part of it is new. Now it also contains 'WINE_StringFromCLSID'. It's not perfect but it's better than having it in 'include/objbase.h'. * dlls/advapi32/crypt.c, dlls/ntdll/nt.c, graphics/x11drv/graphics.c, scheduler/synchro.c, controls/scroll.c: Francois Gouget Fixed a number of warnings concerning the matching of the printf format string and the associated parameters (actually it's mostly TRACE and FIXMEs). * include/mmsystem.h, multimedia/mmio.c, multimedia/mmsystem.c, relay32/winmm.spec: Marcus Meissner mmioDescend: fixed FIND_xxxx, verified with mciavi32.dll. mciLoadCommandResource32: second arg is wide string mciGetDriverData: spec has just one long argument * ole/compobj.c, ole/ifs.c, ole/ifs.h, ole/storage.c, dlls/shell32/shellole.c, include/wine/obj_base.h, include/wine/obj_dataobject.h, multimedia/dsound.c, dlls/shell32/dataobject.c, dlls/shell32/shelllink.c: Francois Gouget Changed ICOM_THIS definition. * dlls/version/info.c, include/ver.h: Bertho Stultiens Renamed VS_VERSION_INFOxx structure to VS_VERSION_INFO_STRUCTxx. The VS_VERSION_INFO is a simple define and would cause confusion. Also corrected the VS_xx_INFO defines not to use MAKEINTRESOURCE16 for win32. * configure, configure.in: Steffen Moeller "Configure finished" message suggests to call make when make depend was successful. * */*: Marcus Meissner Optimized include/*.h: (recursively) include all headers needed by this .h file, but only those. Necessary fixes to a lot of .c files, started optimizing "windows.h" away from some of them. Moved GetCurrentTask prototype to wine/winbase16.h. * include/commctrl.h, include/listview.h, dlls/comctl32/listview.c: Luc Tourangeau Preliminary listview control implementation. * controls/menu.c: Francois Boisvert Give the context menu its proper behaviour and modify TrackPopupMenu to comply with windows API. * windows/painting.c: Dave Pickles GetUpdateRect should return client coordinates unless the window was created with the CS_OWNDC style and the mapping mode is not MM_TEXT, in which case the result should be in logical coordinates. * include/wine/obj_channel.h: Francois Gouget Added the actual definitions of the interfaces. * include/servprov.h: Francois Gouget Converted to the new COM declaration 'standard' for better compatibility with C code implementating that interface. * misc/wsprintf.c: Francis Beaudet Changed WPRINTF_ExtractVAPtr to take the address of the va_list to be able to modify it. * dlls/shell32/shlfolder.c: Sylvain St.Germain Defined IDropTarget for ShellFolder. Implemented the Constructor, Destructor, AddRef, Release and QueryInterface methods. * memory/selector.c, if1632/kernel.spec: Uwe Bonnes Change type of mode argument to GETVDMPOINTER32W from DWORD to Word Mon Feb 15 15:24:20 1999 Alexandre Julliard * include/msacm.h, include/winuser.h: Douglas Ridgway c2man doesn't like extra semicolons. * windows/winpos.c: Ove Kaaven Resetting X focus should not be done with SetFocus32. Called the windowing (X11) driver's SetFocus routine directly instead. This apparently fixes a big heap of user interface problems. ---------------------------------------------------------------- Sun Feb 14 14:09:42 1999 Alexandre Julliard * graphics/painting.c, include/winuser.h, objects/cursoricon.c, windows/dialog.c, windows/painting.c, windows/rect.c, windows/win.c, windows/winpos.c: Eric Pouech Changed some functions prototypes (were returning void). * misc/main.c, include/winuser.h: Paul Quinn Fixed some Winelib names. * include/clipboard.h, include/console.h, include/desktop.h, include/keyboard.h, include/ttydrv.h, include/x11drv.h: Juergen Schmied Corrected prototypes func() ->func(void). * multimedia/init.c, multimedia/midi.c, debugger/memory.c: Brian Joseph Czapiga Fixed a few #ifdefs. * windows/scroll.c, windows/x11drv/wnd.c: Jerome Vouillon Make a correct use of clipping rectangles. * include/bitmaps/ocr_cross: Uwe Bonnes Added white border. * debugger/db_disasm.c: Juergen Schmied Implemented better output for indirect calls. * relay32/winmm.spec: Eric Pouech Fixed typo in winmm.spec. * include/wintypes.h, include/wrc_rsc.h, misc/lstr.c, misc/wsprintf.c, relay32/builtin32.c, relay32/relay386.c, relay32/snoop.c: Gavriel State A few non-x86 Winelib fixes. * miscemu/main.c: Marcus Meissner Do not print 'wine: no executeable found' if we did execute something. * programs/notepad/*: Marcel Baur - Added new IDS_NOTSAVED ressource (needs translation in *.rc) - Improved printing support (not yet complete) - Improved file drag and drop (should now work) - General code cleanup * include/multimedia.h, multimedia/mcimidi.c, multimedia/mciwave.c, multimedia/mmsystem.c: Eric Pouech Fixed bugs on MCI notification (callback info are copied before asynchronous return) - make use of it in MCI wave and midi. Implemented mci(Set|Get)DeviceID(16|32) functions. * windows/x11drv/wnd.c: Ove Kaaven Since SetParent now hides/shows, explicitly invalidating DCs in the parent change operation should no longer be necessary. * windows/dialog.c: Gerard Patel Fix if EndDialog called in WM_INITDIALOG (DIALOG_DoDialogBox). * msdos/ioports.c: Andreas Mohr Moved VGA port access check at the beginning in order to improve performance a little bit. * server/file.c: Juergen Schmied Implemented flag FILE_FLAG_DELETE_ON_CLOSE. * msdos/int10.c: Joseph Pranevich Added comments. Think I've fixed INT 10/08 (Get Character and Attribute at Cursor). * console/xterm.c: Joseph Pranevich Added configuration options XtermProgram and XtermResolution. Fixed a warning. * documentation/console, wine.ini: Joseph Pranevich New examples/documentation for console configuration options. * misc/main.c, windows/x11drv/main.c, console/generic.c, console/interface.c, console/ncurses.c, console/tty.c, include/console.h, include/options.h, loader/main.c: Joseph Pranevich Moved initialization until later. Also moved around code a bit to be consistant. * include/debugger.h: Marcus Meissner Added possibility to load .stabs/.stabstr sections from PE dlls. Unfortunately my samples use currently typedefs which wine-dbg does not understand, so no actual parsing. * dlls/msacm/msacm_main.c, dlls/msacm32/format.c, dlls/msacm32/stream.c, include/mmreg.h, include/mmsystem.h, include/msacm.h, include/msacmdrv.h, include/winbase.h: Bertho Stultiens Change a couple of names that would conflict after all 32[AW] suffixes are removed. Structures defined in both mmreg.h and mmsystem.h are protected with #ifdef:s as in MS' headers. * misc/imm.c: Patrik Stridvall Fixed wrong typecasts. * programs/progman/grpfile.c: Stefan Leichter Compilation fix. * configure.in, configure: Ove Kaaven Fix for X11 includes detection. * debugger/hash.c, debugger/msc.c, debugger/stabs.c: Marcus Meissner Added possibility to load .stabs/.stabstr sections from PE dlls. Unfortunately my samples use currently typedefs which wine-dbg does not understand, so no actual parsing. * multimedia/dplay.c, documentation/status/directdraw, graphics/d3dviewport.c, graphics/ddraw.c, include/d3d.h: Marcus Meissner Some ddraw/d3d bugfixes, updated Diablo/WC4 ddraw status. * ole/ole2nls.c, relay32/kernel32.spec, include/winnls.h: Juergen Schmied Implementation of ConvertDefaultLocale32. * windows/mdi.c: Huw D M Davies WIN31 Look still needs a close button on the left of the menu bar. * windows/winpos.c: Francois Boisvert Changed SetWindowPos32 to force the update of the non-client area. Sat Feb 13 17:56:28 1999 Alexandre Julliard * dlls/shell32/shell32_main.h, include/mmsystem.h, include/ole.h, include/wingdi.h, include/winsock.h: Bertho Stultiens Fixed a couple of faulty names used in wine and typos so that it will compile again after conversion from 32[AW] naming to [AW] naming. * if1632/Attic/signal.c, if1632/Makefile.in, include/debugger.h, include/dosexe.h, include/miscemu.h, include/sig_context.h, loader/dos/dosvm.c, loader/signal.c, miscemu/instr.c, miscemu/main.c, graphics/ddraw.c: Marcus Meissner Moved the if1632/signal.c stuff into loader/signal.c, adapted function pointers for wine_debug and INSTR_EmulateInstruction. * ole/compobj.c: Francois Gouget All guid 'REFxxx' types already have a 'const' inside them. * dlls/comctl32/draglist.c, dlls/comctl32/tooltips.c, misc/version.c, windows/winpos.c: Marcus Meissner Some warnings fixed, one useless VERSION warning removed (winelib). * misc/registry.c: Andreas Mohr RegFlushKey: wrong error code. * win32/file.c: Andreas Mohr Adds a warning message if permissions not sufficient. * multimedia/mixer.c, multimedia/mmsystem.c, relay32/winmm.spec, include/debug.h, include/debugdefs.h, include/multimedia.h, multimedia/Makefile.in, multimedia/mcianim.c, multimedia/mciavi.c, multimedia/mcimidi.c, multimedia/mciwave.c, multimedia/midi.c: Eric Pouech Added support for MCI AVI driver Added some fixes mixer functions Fixed MCI string comparison (thanks to Lionel ULMER) No longer using 16 bit USER functions (use their 32 bit counter part) Reindenting. Added function sndPlaySound32W * include/objbase.h, include/objidl.h, include/wine/obj_marshal.h: Francois Gouget Added the actual interface definitions to the obj_marshal.h skeleton file. Also defined the associated C API. * windows/queue.c: Stephane Lussier Use global synchronization objects, to be able to use it in different processes (not only the process which create the synchro object). * windows/mdi.c: Norman Stevens Set hwndActiveChild when maximizing a mdi child window because it is not set when maximizing a window other than the active child. * controls/menu.c: Pascal Lessard Change the GetMenuItemRect to comply with windows API. * Makefile.in, configure, configure.in, include/.cvsignore, include/Makefile.in: James Juran Created include/Makefile.in to separate header file installation from the top-level Makefile. * ole/stg_bigblockfile.c, ole/stg_stream.c, ole/storage32.c, ole/storage32.h: Thuy Nguyen - Fixed a small block depot bug. - Implemented converting from small blocks to big blocks. - Validated file attributes and flags. - Fixed a bug for larger files. * resources/.cvsignore: added sysres_Nl * graphics/x11drv/oembitmap.c, include/ole2.h, include/oleidl.h, include/shlguid.h, include/shlobj.h, include/windef.h, include/wine/obj_dragdrop.h, include/winerror.h, include/wintypes.h, ole/ole2.c, relay32/ole32.spec: Francis Beaudet Implemented the OLE Drag and Drop target registration mechanism and the DoDragDrop loop to perform the DnD operation. * windows/mdi.c, controls/menu.c, include/menu.h: Francois Boisvert Implemented the WIN31 Look mdi buttons and also some defines for the magic menu items. * dlls/advapi32/Makefile.in, dlls/advapi32/crypt.c, include/wincrypt.h, relay32/advapi32.spec: Ian Schmidt Added entries for most Crypt* calls. Added stub for CryptAcquireContextA. This allows Win98 EXPLORER.EXE to get farther. * controls/edit.c: Andreas Mohr An app left junk in the undo buffer of an edit control upon creation. * windows/win.c: Ove Kaaven Changed SetParent32 to adhere to Windows behaviour (mostly), which should also keep it from leaving garbage around. * ole/compobj.c: Sylvain St.Germain Implementation of a simple linked list (static) that stores and counts references to COM objects. * include/objbase.h, include/wtypes.h: Francois Gouget Make the REFxxx types const even in C. Also add FMTID. * windows/winpos.c: Ove Kaaven Don't call EVENT_DummyMotionNotify for hidden windows. * windows/message.c: Stephane Lussier Fix some thread-safeness problem when accessing the system message queue. * windows/input.c, include/winuser.h, relay32/user32.spec: Marcus Meissner Implemented MapVirtualKeyEx (ticket 21). Ignore keyboard layout for now. * include/objidl.h, include/wine/obj_clientserver.h: Francois Gouget Added the actual interface definitions to the obj_clientserver.h skeleton file. * dlls/ntdll/Makefile.in, dlls/ntdll/nt.c, dlls/ntdll/reg.c, dlls/ntdll/rtl.c, relay32/ntdll.spec: Juergen Schmied - documented most of the undocumented functions in nt.c - implemented RtlGetDaclSecurityDescriptor - stubs for NtEnumerateKey, NtOpenSymbolicLinkObject, NtQueryKey - stubs for NtRaiseException, RtlRaiseException (this both will crash) Fri Feb 12 17:47:07 1999 Alexandre Julliard * dlls/advapi32/security.c, dlls/advapi32/service.c, files/drive.c, misc/registry.c, win32/newfns.c, windows/user.c: Juergen Schmied Small fixes to compile with the headers (mostly nt-security). * include/ntddk.h, include/ntdef.h, include/ntdll.h, include/winbase.h, include/windef.h, include/winnt.h, include/winreg.h: Juergen Schmied Made nt-related types compatible, throw out wine-specific types. * windows/mouse.c: Ulrich Weigand Use MONITOR_... instead of DESKTOP_... routines to get screen dimensions; these work also with native USER. * windows/defwnd.c: Ove Kaaven WM_ACTIVATE default processing should set window focus. Should fix focus problems in non-managed mode. Thu Feb 11 16:32:17 1999 Alexandre Julliard * ole/nls/nld.nls, resources/Makefile.in, resources/TODO, resources/sysres.c, resources/sysres_Nl.rc, AUTHORS, documentation/languages, include/authors.h, include/options.h, misc/main.c, ole/ole2nls.c: Klaas van Gend Added support for the Dutch language. * dlls/comctl32/propsheet.c, include/commctrl.h, include/prsht.h, include/shlobj.h: Adrian Thurston Zygo Blaxell Move property sheets from commctrl.h into into prsht.h. * graphics/d3ddevices.c, graphics/d3dexecutebuffer.c, graphics/d3dlight.c, graphics/d3dmaterial.c, graphics/d3dtexture.c, graphics/d3dviewport.c: Lionel Ulmer Added 'objbase.h' to prevent compiler warnings. * graphics/ddraw.c: Lionel Ulmer Better detection of XShm errors (should now run on remote displays). * multimedia/mmsystem.c: Andreas Mohr Fixes mixerGetID16/32 problems/errors. * ole/oleobj.c, multimedia/dplay.c: Francois Gouget IsEqualGUID is defined in 'include/wine/obj_base.h'. All other declarations must surrender or prepare to be met with deadly force :-) * relay32/ole32.spec: Francois Gouget Added new functions (from Win98) Added comments with the parameter types for future use with dllglue * files/drive.c: Uwe Bonnes Set the flags for GetVolumeInformation32A. * windows/win.c: Juergen Schmied FindWindow failed for 32 bit windows with style != WS_CHILD. Wed Feb 10 06:52:58 1999 Alexandre Julliard * include/Attic/print.h, include/winspool.h, misc/printdrv.c, graphics/psdrv/driver.c, graphics/psdrv/escape.c, graphics/psdrv/font.c, graphics/psdrv/graphics.c, graphics/psdrv/init.c, graphics/psdrv/ppd.c, graphics/psdrv/ps.c, graphics/psdrv/text.c: Paul Quinn Albert Den Haan Moves files from print.h to winspool.h for better SDK header compliance for Winelib programs. * include/hook.h, include/objidl.h, include/ole2.h, include/tchar.h, include/winbase.h, include/wine/obj_clientserver.h, include/wine/obj_dataobject.h, include/wine/obj_storage.h, include/winerror.h, include/winuser.h, include/wtypes.h: Albert Den Haan Adrian Thurston Paul Quinn Zygo Blaxell Miscellaneous patches to header files. All of these are supposedly there to help build Winelib applications. * include/wintypes.h: Albert Den Haan Adrian Thurston Paul Quinn Zygo Blaxell More types we need for compiling Winelib/MFC applications. * include/commctrl.h: Paul Quinn Adrian Thurston More types for common controls. Needed for Winelib. * dlls/shell32/shelllink.c, dlls/shell32/shellole.c, include/wine/obj_base.h, multimedia/dsound.c, ole/compobj.c, ole/ifs.c: Francois Gouget Better set of macros for defining the COM interfaces. * dlls/advapi32/security.c, relay32/advapi32.spec: Andreas Mohr Two ADVAPI32 stubs: ImpersonateSelf32 and AccessCheck32. Spelling fixes. * graphics/ddraw.c: Lionel Ulmer Fixed debug output to follow '-debugmsg' flags. Tue Feb 9 15:49:39 1999 Alexandre Julliard * msdos/int20.c, ole/safearray.c, relay32/builtin32.c, server/device.c, server/file.c, server/pipe.c, server/thread.c, windows/winhelp.c: Michael Veksler Added missing includes to avoid warnings/errors. * include/dinput.h, include/lzexpand.h, include/ntdll.h, include/ole2.h, include/shellapi.h, include/vga.h, include/winbase.h, include/wincon.h, include/windef.h, include/windows.h, include/wine/keyboard16.h, include/wine/obj_storage.h, include/wine/shell16.h, include/wine/w32skrnl.h, include/wine/winbase16.h, include/wine/winesound.h, include/wine/winestring.h, include/wine/winuser16.h, include/winnetwk.h, include/winnls.h, include/winnt.h, include/winreg.h, include/wintypes.h, include/winuser.h, include/winver.h: Michael Veksler Moved everything out of windows.h. * graphics/wing.c, if1632/gdi.spec, include/bitmap.h, include/palette.h, include/wingdi.h, objects/palette.c, relay32/gdi32.spec: Brad Pepers WinG fixes. * controls/menu.c, include/message.h, include/queue.h, windows/dialog.c, windows/message.c, windows/nonclient.c, windows/queue.c, windows/timer.c: Stephane Lussier -Fixed MESSAGE functions that were thunking down to 16 bits implementation. So PeekMessage32, GetMessage32, PostMessage32, PostThreadMessage are fixed with this patch. Unicode version of those functions is currently only calling the ASCII version. -Fixed queue signaling using a new EVENT object in the queue for 32 bits thread. MsgWaitForMultipleObject has been fixed and is now blocking on the right EVENT. * objects/metafile.c: Huw D M Davies GetMetaFileBitsEx should work in bytes not words. * include/shlobj.h: Francois Gouget DllGetClassObject should take a REFCLSID not an LPCLSID. * objects/dib.c, include/global.h, memory/virtual.c: Ulrich Weigand Change fault handler 'addr' argument to LPCVOID. * files/file.c: Ulrich Weigand Call VIRTUAL_HandleFault if read/write returns EFAULT. * dlls/comctl32/treeview.c: Bertho Stultiens Fix typo to map GetTextExtentPoint to the correct 32A version. * documentation/debugging, include/peexe.h, include/wincon.h, programs/regtest/regtest.c, relay32/advapi32.spec, windows/x11drv/main.c, dlls/advapi32/security.c: Marcus Meissner Some small bugfixes, added more PE relocation types (for WinCE mostly), some console prototypes, -dll is useful for winelib too, regtest compile fixed. * include/wine/winuser16.h, include/winuser.h, objects/cursoricon.c: Paul Quinn GetCursorPos is actually a BOOL. * include/mmsystem.h: Paul Quinn Adrian Thurston More types, C++ protection, and a typo correction for mmsystem.h. * include/commctrl.h: Zygo Blaxell Move the #define of DUMMYUNIONNAME* to before they are used. Add a definition for DUMMYUNIONNAME (as opposed to DUN1, DUN2...). Use the correct WINELIB_NAME_AW macro for TVITEM and related names. Define "TV_ITEM" to agree with you-know-who's documentation. * dlls/version/info.c: Ulrich Weigand NULL is a valid argument as handle for GetFileVersionInfoSize32A. * include/dinput.h, windows/dinput.c: Lionel Ulmer Added buffered device access for DInput's mouse driver. * files/file.c: Juergen Schmied Wrong access on server handle was demanded (GENERIC_READ instead of GENERIC_WRITE). * dlls/shell32/shellord.c: Juergen Schmied Better implementation (takes strings or res-id's now). * dlls/version/resource.c: Ulrich Weigand Bugfix: NULL pointer check for output parameters. * dlls/shell32/brsfolder.c: Zygo Blaxell Fixed two pointer/integer mismatch warnings. * documentation/console: Zygo Blaxell Spelling fixes. * console/xterm.c, win32/console.c: Zygo Blaxell wine_openpty is not properly declared (either missing or mismatched declarations) in both places where it is used. * include/wingdi.h, objects/dib.c: Zygo Blaxell Fix types of GetDIBits functions (LPSTR should be LPVOID). * graphics/x11drv/dib.c: Huw D M Davies Fixes several problems with SetDIBitsToDevice if xSrc != 0. Thanks to Ian Schmidt for the logs. * windows/mdi.c: Francois Boisvert The systems buttons (minimize/restore/close) now appear on the menu bar of mdi application. * controls/menu.c: Francois Boisvert Implemented the magic menu items id's used by windows when inserting the minimize/maximize/close buttons in the menu bar of an application. * objects/enhmetafile.c: Jason McMullan Adds support for EMR_STRETCHDIBITS in EMFs. * programs/avitools/aviplay.c: Marcus Meissner Fixed image size and line size, added 8bit color/palette handling. * tools/bug_report.pl: Adam the Jazz Guy Fixed formatting of code Now changes to directory of program to be run before starting wine * windows/queue.c, windows/user.c, include/user.h, scheduler/thread.c: Stephane Lussier - Cleaned up the message queue when a thread exit (but not the process). - Modified QUEUE_DeleteMsgQueue to exit gracefully (without crashing Wine) if queue link list is corrupted. * multimedia/dsound.c: Ove Kaaven Sounds were cut off due to integer overflow. Fixed. * include/windowsx.h: Paul Quinn Added windowsx.h for Winelib. Fri Feb 5 17:40:47 1999 Alexandre Julliard * configure, configure.in, programs/Makefile.in, programs/cmdlgtst/.cvsignore, programs/cmdlgtst/Makefile.in, programs/cmdlgtst/cmdlgr.h, programs/cmdlgtst/cmdlgr.rc, programs/cmdlgtst/cmdlgtst.c: Added common dialogs test program. * include/message.h, include/queue.h, include/win.h, include/winpos.h, scheduler/thread.c, windows/focus.c, windows/input.c, windows/message.c, windows/queue.c, windows/win.c, windows/winpos.c: Noel Borthwick Added management and allocation of the PERQUEUEDATA structure. * graphics/ddraw.c, graphics/vga.c, include/ddraw.h: Lionel Ulmer - added a dump of the palette creation flags - changed palette creation code in vga.c to prevent useless error message * documentation/wine.man, files/drive.c, wine.ini: Andreas Mohr Use vfat/win95 as default. * include/vfw.h, multimedia/msvideo.c, programs/avitools/.cvsignore, programs/avitools/Makefile.in, programs/avitools/aviinfo.c, programs/avitools/aviplay.c, relay32/builtin32.c, relay32/msvfw32.spec: Marcus Meissner Updated msvideo / vfw.h, use builtin msvfw32.dll by default, added aviinfo and aviplay programs. * win32/console.c: Marcus Meissner Continued hack to win32/console.c, so that the IDA Pro Disassembler works again. Needs much more work however. * ole/storage32.c: Marcus Meissner Include objbase.h for CoTaskMem* prototypes (or we get WINAPI problems). * ole/storage32.h: Marcus Meissner Added missing ULONG to static const OFFSET_xx. Thu Feb 4 16:45:40 1999 Alexandre Julliard * documentation/wine.man: James Juran Various manpage updates, including the incorrect statement about glibc and clone(). * documentation/debugging: James Juran Fix pointer to the Windows Disassembler 32. Thanks to Herbert Rosmanith for suggesting this. * dlls/msacm32/driver.c: Andreas Mohr Another usage of non-portable functions... * msdos/dosmem.c: Andreas Mohr Some values of pBiosData added/fixed. * objects/palette.c, windows/clipboard.c, windows/dce.c, windows/display.c, windows/event.c, windows/keyboard.c, windows/mouse.c, windows/sysmetrics.c, windows/user.c, windows/win.c, windows/winpos.c, controls/desktop.c, controls/widgets.c, debugger/dbg.y, graphics/ddraw.c, graphics/painting.c, graphics/wing.c, include/bitmap.h, include/color.h, include/ddraw.h, include/debug.h, include/debugdefs.h, include/desktop.h, include/display.h, include/main.h, include/options.h, include/ttydrv.h, include/win.h, include/x11drv.h, misc/main.c, objects/bitmap.c, objects/color.c, objects/dc.c, objects/dib.c, objects/gdiobj.c: Patrik Stridvall Moved some more code to the X11 driver. * windows/ttydrv/Makefile.in, windows/ttydrv/clipboard.c, windows/ttydrv/desktop.c, windows/ttydrv/event.c, windows/ttydrv/init.c, windows/ttydrv/keyboard.c, windows/ttydrv/main.c, windows/ttydrv/monitor.c, windows/ttydrv/mouse.c, windows/ttydrv/wnd.c: Patrik Stridvall TTY driver changes. * windows/x11drv/Makefile.in, windows/x11drv/clipboard.c, windows/x11drv/desktop.c, windows/x11drv/event.c, windows/x11drv/init.c, windows/x11drv/keyboard.c, windows/x11drv/main.c, windows/x11drv/monitor.c, windows/x11drv/mouse.c, windows/x11drv/wnd.c, graphics/x11drv/bitblt.c, graphics/x11drv/bitmap.c, graphics/x11drv/brush.c, graphics/x11drv/clipping.c, graphics/x11drv/dib.c, graphics/x11drv/graphics.c, graphics/x11drv/init.c, graphics/x11drv/objects.c, graphics/x11drv/oembitmap.c, graphics/x11drv/pen.c, graphics/x11drv/text.c, graphics/x11drv/xfont.c: Patrik Stridvall X11 driver changes. * tsx11/ts_xf86dga.c, tsx11/ts_xf86vmode.c, tsx11/ts_xlib.c, tsx11/ts_xpm.c, tsx11/ts_xresource.c, tsx11/ts_xshm.c, tsx11/ts_xutil.c, include/ts_xf86dga.h, include/ts_xf86vmode.h, include/ts_xlib.h, include/ts_xpm.h, include/ts_xresource.h, include/ts_xshm.h, include/ts_xutil.h, tools/make_X11wrappers: Patrik Stridvall Non-X11 compile fix for generated code. * include/monitor.h, windows/multimon.c: Patrik Stridvall Implementation of the new monitor abstraction. * graphics/ttydrv/.cvsignore, graphics/ttydrv/Makefile.in, graphics/ttydrv/init.c, Makefile.in: Patrik Stridvall New TTY driver for GDI. * configure, configure.in, include/acconfig.h, include/config.h.in: Patrik Stridvall - Added the graphics/ttydrv directory. - Don't search for reentrant X when X doesn't exist. - Added config options HAVE_LIBXXPM - Added checks if the header files also exist for some libraries Tue Feb 2 16:14:23 1999 Alexandre Julliard * dlls/shell32/brsfolder.c, graphics/d3dcommon.c, graphics/d3ddevices.c, graphics/d3dexecutebuffer.c, graphics/d3dlight.c, graphics/d3dmaterial.c, graphics/d3dtexture.c, graphics/d3dviewport.c, include/interfaces.h, ole/safearray.c, ole/stg_bigblockfile.c, ole/stg_stream.c, ole/storage32.c: Francois Gouget Replaced references to interfaces.h by wine/obj_xxx.h headers instead since these headers already provide the necessary definitions. * include/msdos.h, msdos/Attic/cdrom.c, msdos/Makefile.in, msdos/int2f.c: Eric Pouech Removed references to obsolete msdos/cdrom.c file. Make use of new Wine internal CD ROM interface. * multimedia/mcicda.c: Eric Pouech Fixed tracks indexing in mcicda.c Make use of new Wine internal CD ROM interface. * include/cdrom.h, misc/Makefile.in, misc/cdrom.c: Eric Pouech New Wine internal interface for handling CD Rom (especially audio CD ROM). * include/commctrl.h, include/treeview.h, dlls/comctl32/treeview.c: Zygo Blaxell Change a few types to match you-know-who's declarations. HTREEITEM is a struct _TREEITEM FAR* GetDIBits passes a LPVOID for the bitmap data, not LPSTR. Adjustment of Wine C code to match the new types included. * misc/lzexpand.c: Uwe Bonnes Fixed GET_LZ_STATE macro. * graphics/d3d_private.h, graphics/d3dtexture.c, graphics/ddraw.c, include/d3d.h, include/ddraw.h: Lionel Ulmer Added stubs for new DirectDraw4 and DirectDrawSurface4 methods. * tools/wrc/wrc.h, tools/wrc/wrctypes.h, tools/wrc/CHANGES: Albert den Haan Fixed wrong order of res_ico and res_bmp which must be in RT_xxx order. * dlls/version/resource.c: Marcus Meissner reslen could be used uninitialised in GetFileResource32 (fixes some strange VerQueryValue crashes). * ole/nls/sve.nls: Jan D. Added definition for LOCALE_SGROUPING, LOCALE_SMONGROUPING and LOCALE_IINTLCURRDIGITS. * memory/selector.c, relay32/kernel32.spec: Ulrich Weigand Bugfix: Preserve EAX in UnMapSLFixArray(). * dlls/comctl32/comctl32undoc.c: Eric Kohl Fixes little pointer bug in DPA_DeletePtr(). * if1632/kernel.spec, memory/string.c: Ulrich Weigand Implemented KERNEL.434 (UnicodeToAnsi). * files/drive.c: Eric Pouech GetDiskFreeSpaceEx32A can get null pointers and still not crash. * graphics/psdrv/driver.c: Huw D M Davies Clear up args to PSDRV_AdvancedSetupDialog. * graphics/x11drv/xfont.c: Huw D M Davies Reduce MAX_FONT_SIZE to 1000. Sun Jan 31 19:04:31 1999 Alexandre Julliard * win32/console.c, include/server.h, include/server/object.h, include/server/request.h, loader/ne/module.c, relay32/kernel32.spec, server/console.c, server/request.c, server/trace.c: Added input queue to server-side console object, read/write_console_input requests, and use them for Read/WriteConsoleInput. * scheduler/client.c: Geoff Clare Fix to allow for recvmsg() returning less data than is needed. * include/toolhelp.h, include/windows.h: Attempt at fixing the MAX_PATH multiple definition problem. ---------------------------------------------------------------- Sun Jan 31 10:13:44 1999 Alexandre Julliard * include/module.h, loader/ne/resource.c: Ulrich Weigand Modify NE_FindTypeSection and NE_FindResourceFromType so as to be usable by the VERSION code. * include/pe_image.h, loader/pe_resource.c: Ulrich Weigand Added GetResDirEntryA for use by the VERSION code. * misc/Attic/ver.c, misc/Makefile.in: Ulrich Weigand Removed old VER.DLL code. * dlls/version/.cvsignore, dlls/version/Makefile.in, dlls/version/info.c, dlls/version/install.c, dlls/version/resource.c: Ulrich Weigand Implementation of VERSION.DLL. Based on old misc/ver.c. - Accessing PE version info resources should work correctly now. - Fixed memory leaks. - Clean separation of 16- and 32-bit parts. - Minor bugfixes. * Makefile.in, configure, configure.in, dlls/Makefile.in: Ulrich Weigand Add new subdirectories dlls/ver and dlls/version. * if1632/ver.spec, dlls/ver/.cvsignore, dlls/ver/Makefile.in, dlls/ver/ver16.c, include/ver.h: Ulrich Weigand Implementation of VER.DLL. Thunks up to VERSION.DLL. * misc/lstr.c: Pascal Cuoq IsCharAlpha32A: use look-up table from ole2nls.c. * ole/ole2nls.c: Pascal Cuoq LCMapString32A: Implemented flags NORM_IGNORENONSPACE and NORM_IGNORESYMBOLS in string mapping mode. * windows/x11drv/wnd.c: NF Stevens Create X window for child windows reparented to be top level windows. * dlls/shell32/shellpath.c, include/shell.h, relay32/shell32.spec: Juergen Schmied Stub for PathQualify32[A|W]. * graphics/d3dmaterial.c, graphics/ddraw.c: Lionel Ulmer Babrian Viktor - added support for ColorKeying during blits - miscellaneous fixes * dlls/ntdll/rtl.c, include/ntdll.h, relay32/ntdll.spec: Alex Korobka Added an implementation of MRSW locks. * msdos/int21.c: Ove Kaaven Added missing includes (the PSP handling was incorrect, as the MZ_SUPPORTED definition was missing). Added a simple handler for direct console input, which needs to be improved. * console/tty.c: Ove Kaaven Small fix. * scheduler/synchro.c: Juergen Schmied List handles WaitForMultipleObjects is waiting for when running with -debugmsg +win32. * dlls/advapi32/security.c, relay32/advapi32.spec: Juergen Schmied Stub for GetSecurityDescriptorControl. * relay32/user32.spec, windows/user.c: Juergen Schmied Stub for GetUserObjectSecurity. * misc/registry.c: Juergen Schmied Implemented handling of REG_MULTI_SZ and fixed small bug in RegSetValue. * windows/winproc.c: Juergen Schmied Every EM_GETLINE send between a 32W to a 32A window returned incomplete values before (the first 2 chars where cut away). * windows/winpos.c: Huw D M Davies Fix typo in SetWindowPos32. Sat Jan 30 15:55:28 1999 Alexandre Julliard * include/builtin32.h, misc/main.c, relay32/builtin32.c: Marcus Meissner Enable/disable relay32 debugging on the fly. Start app with -debugmsg +relay or warn+relay. Suggested by Juergen Schmied. * configure, configure.in, graphics/d3d_private.h, include/acconfig.h, include/config.h.in, include/d3d.h, include/wine_gl.h: Lionel Ulmer Added check for the presence of Mesa's header files. * multimedia/audio.c, multimedia/dsound.c: Andreas Mohr Fixed error messages. * misc/commdlg.c: Bernd Herd Use proper 16->32 message conversion in FILEDLG_CallWindowProc. * windows/x11drv/wnd.c: Bernd Herd SetParent should link the window at the start of the list. * windows/winpos.c: NF Stevens In Window SetWindowPos with SWP_HIDEWINDOW does not remove the focus from the focus window; ShowWindow with SW_HIDE does. So move the code that does this from SetWindowPos to ShowWindow. * memory/string.c: Marcus Meissner Check for NULL in lstrcpy* (Windows uses real exception handlers). * Makefile.in: James Juran Don't install include files when --disable-lib is used. * relay32/winmm.spec: Andreas Mohr Added WINMM joy* .spec entries. * msdos/xms.c: Andreas Mohr XMS fix. * msdos/dosmem.c: Andreas Mohr Spelling fix. * README: Andreas Mohr Doc update. * include/miscemu.h, msdos/int10.c, msdos/int21.c, msdos/interrupts.c: Andreas Mohr Some interrupt enhancements. * msdos/ioports.c: Andreas Mohr implemented timer latching trace message fix temporary "fix" for Linux's coarse timer resolution * if1632/compobj.spec, include/objbase.h, include/winerror.h, ole/compobj.c, ole/ole2.c, relay32/ole32.spec: Francis Beaudet Implemented the startup-shutdown mechanism for the COM subsystem. Implemented the Class object registration mechanism. * programs/clock/.cvsignore, programs/notepad/.cvsignore: Added Fi.s * include/wine/obj_storage.h, ole/Makefile.in, ole/stg_bigblockfile.c, ole/stg_stream.c, ole/storage.c, ole/storage32.c, ole/storage32.h, relay32/ole32.spec: Francis Beaudet Added an implementation of the OLE structured storage. The main features of this implementation are: - Can open storages created in Windows. - Can create new storages that the windows libraries can read. - Provides all the functionality to create/open/remove and rename streams and storages inside the main storage object. * include/miscemu.h, miscemu/main.c, graphics/ddraw.c: Ove Kaaven Defined RESTORE_SIGNALS by default and call SIGNAL_EmulatorInit through a function pointer instead. Added a few traces. Fixed the "Memory corruption !" message in DGA mode. Commented out an unnecessary TSXF86VidModeSetViewPort that caused my X server to act up, relying on TSXF86DGASetViewPort instead. * graphics/psdrv/text.c, msdos/int2f.c, programs/winhelp/hlp2sgml.c, dlls/comctl32/comctl32undoc.c, files/file.c: Marcus Meissner Some more warnings and bugs fixed. * dlls/comctl32/tab.c, include/tab.h: Alex Priem Small update. * include/commctrl.h, include/treeview.h, dlls/comctl32/treeview.c, dlls/shell32/brsfolder.c: Alex Priem - The usual bugfixes. - Better unicode support (only defines, currently) - Drag & drop implemented. - LPSTR_TEXTCALLBACK should work now. - First start at custom draw code. * windows/x11drv/event.c: Francis Beaudet Make sure that the keystate received by the WM_XBUTTONUP and WM_XBUTTONDOWN matches the message. In X, the keystate is changed after the message is processed. In Windows, it is changed before. * dlls/advapi32/security.c, dlls/advapi32/service.c: Matthew Becker Doc updates. * win32/file.c: Berend Reitsma SetFileAttributes32A changed to make file writeable when FILE_ATTRIBUTE_READONLY is not set. * console/interface.c, console/ncurses.c, include/console.h, msdos/int10.c: Joseph Pranevich Preliminary color console support. * documentation/languages, programs/clock/ChangeLog, programs/clock/Fi.rc, programs/clock/Makefile.in, programs/clock/main.c, programs/notepad/ChangeLog, programs/notepad/Fi.rc, programs/notepad/Makefile.in, programs/notepad/main.c, resources/sysres_Fi.rc: Jukka-Pekka Iivonen Updated Finnish language support. Fri Jan 29 15:12:11 1999 Alexandre Julliard * include/vfw.h, include/winerror.h, include/wintypes.h, multimedia/msvideo.c, ole/guid.c, programs/Makefile.in, programs/avitools/.cvsignore, programs/avitools/Makefile.in, programs/avitools/icinfo.c, relay32/msvfw32.spec, configure, configure.in, include/debug.h, include/debugdefs.h, include/oleauto.h: Marcus Meissner Updated msvideo. New program 'icinfo [-about] [-configure]' to query installed (win32) compressors. Started on AVIFILE support. Thu Jan 28 17:56:14 1999 Alexandre Julliard * include/wine/obj_misc.h, include/wine/obj_moniker.h, include/wine/obj_storage.h, ole/Makefile.in, ole/bindctx.c, ole/filemoniker.c, ole/itemmoniker.c, ole/moniker.c, ole/ole2.c: Noomen Hamza Added a stub implementation for FileMoniker, ItemMoniker and BindCtx classes. * debugger/dbg.y, debugger/debug.l: NF Stevens Implemented the symbolfile command (as mentioned by the help command). This reads a symbol file in the format generated by nm. * multimedia/dplay.c: Peter Hunnisett - Small bug fix. - Added direct play ascii interfaces. - Fixed up the QueryInterface for dplay and dplaylobby to handle all cases. * memory/virtual.c: Marcus Meissner Fixed FILE_VIEW struct initialisation. * include/dosexe.h: Andreas Mohr Fixed non-i386 compile. * graphics/vga.c, msdos/dpmi.c, multimedia/dplay.c, multimedia/mmio.c, dlls/comctl32/animate.c, dlls/comctl32/comboex.c, dlls/comctl32/comctl32undoc.c, dlls/comctl32/hotkey.c, dlls/comctl32/ipaddress.c, dlls/comctl32/listview.c, dlls/comctl32/pager.c, dlls/comctl32/propsheet.c, dlls/comctl32/rebar.c, dlls/comctl32/tab.c, dlls/comctl32/toolbar.c, dlls/comctl32/treeview.c: James Juran Commented out unused variables to prevent needless compiler warnings. * include/ddeml.h, misc/ddeml.c: Keith Matthews 1st cut implementation of DdeInitialize32W and supporting code. * dlls/advapi32/advapi.c, dlls/advapi32/eventlog.c, dlls/advapi32/security.c, dlls/advapi32/service.c: Matthew Becker Documentation standardizations. * include/queue.h, windows/hook.c, windows/message.c, windows/queue.c, windows/win.c, windows/winpos.c: Stephane Lussier - Made the message queue access to be thread safe. (Using two new functions to access the message queue, QUEUE_Lock(), QUEUE_Unlock() instead of GlobalLock16()). - Fixed QUEUE_DumpQueue (used by "info queue " with the wine-debugger). * multimedia/dsound.c, multimedia/mmsystem.c, objects/text.c, windows/dialog.c, windows/dinput.c, windows/mdi.c, windows/msgbox.c, windows/win.c, windows/winproc.c, dlls/shell32/shell32_main.c, dlls/shell32/shell32_main.h, graphics/d3dmaterial.c, graphics/metafiledrv/init.c, if1632/relay.c, include/wincon.h, loader/resource.c, misc/imm.c, misc/lzexpand.c, msdos/int21.c, dlls/comctl32/propsheet.c, dlls/ntdll/rtl.c: Marcus Meissner Fixed a lot of warnings for possible problems. * misc/comm.c: Herbert Rosmanith Fixed typo. * tools/bug_report.pl: Adam the Jazz Guy Fixed various bugs. Made newbie mode easier. * objects/cursoricon.c, dlls/comctl32/imagelist.c, if1632/user.spec, include/wine/winuser16.h, include/winuser.h: Marcus Meissner Fixed GetIconInfo16 (.spec,ICONINFO struct is different for Win16/Win32). * console/ncurses.c: Marcus Meissner Switch ncurses.h/curses.h include (works better for FreeBSD). * windows/driver.c: Marcus Meissner Fixed loading of win32 drivers. Tue Jan 26 17:29:49 1999 Alexandre Julliard * files/profile.c: Don't abort PROFILE_GetSection on empty keys. * dlls/msacm32/internal.c: Eric Pouech Temporary #if 0'ed part for builtin modules in MSACM to make it compile with the patch for loadable drivers. * include/driver.h, relay32/winmm.spec, windows/driver.c: Eric Pouech Added support for loading drivers in Wine. * tools/bug_report.pl: Adam the Jazz Guy A perl script to produce a bug report with little hassle. * graphics/dispdib.c: Ove Kaaven Added (dummy) Death/Resurrection calls to DisplayDib. * misc/lzexpand.c: Marcus Meissner Allocate a DOS handle if we open a normal file with LZOpenFile16. * graphics/ddraw.c, include/ddraw.h: Lionel Ulmer - added depth conversion routines (only 8bpp -> 16 bpp for now) - added support of DEPTH_FILL for Blits - added some flags in GetCaps to get some games working * if1632/user.spec, include/wine/winuser16.h, include/winuser.h, objects/cursoricon.c, relay32/user32.spec, dlls/comctl32/imagelist.c: Andreas Mohr Implemented GetIconInfo16 -> call to GetIconInfo32. * scheduler/client.c: Commented out EXEC_SERVER * dlls/comctl32/draglist.c: Marcus Meissner 3 missing WINAPI added. * dlls/shell32/enumidlist.c, dlls/shell32/iconcache.c, dlls/shell32/shell32_main.c, dlls/shell32/shell32_main.h, dlls/shell32/shellord.c, dlls/shell32/shlfolder.c, dlls/shell32/shres.rc: Juergen Schmied Small fixes. * dlls/comctl32/treeview.c, include/commctrl.h: Juergen Schmied Changed some treeview related definitions. * dlls/shell32/Makefile.in, dlls/shell32/brsfolder.c: Juergen Schmied Implemented SHBrowseForFolder() dialog. * debugger/msc.c: Eric Pouech Fixed typo in type (removed quite a few warnings). * dlls/advapi32/security.c, relay32/advapi32.spec: Marcus Meissner Added GetSecurityDescriptorOwner/Group, RevertToSelf stubs. Return NULL from OpenThreadToken. * win32/console.c: Marcus Meissner Do not endlessly loop in CONSOLE_get_input after EOF. Create xterm even if stdin is not a terminalhandle. SetConsoleCursorPosition: Only make complex console on row change, ignore interline positioning (so the cygwin cmdline tools do not create xterms unnecessary) * misc/printdrv.c: Huw D M Davies Make sure DrvGetPrinterData returns the correct data if cbData <= 1 * include/queue.h, windows/message.c, windows/queue.c, windows/win.c: Stephane Lussier - Changing MESSAGEQUEUE structure according to Ulrich proposition. - One message queue for every thread needing it. - Messages in the message queue are now stored in a linked list - Messages are allocated in the system heap. - Messages in the message queue are 32 bits (MSG32). - All read/write operations regarding messages in the message queue are thread safe. Sun Jan 24 19:14:58 1999 Alexandre Julliard * dlls/comctl32/commctrl.c, dlls/comctl32/flatsb.c, dlls/comctl32/imagelist.c, dlls/comctl32/listview.c, dlls/comctl32/propsheet.c, dlls/comctl32/status.c, include/flatsb.h: Eric Kohl Fixed several bugs and typos. * documentation/common_controls: Eric Kohl Updates and fixes. * dlls/comctl32/Makefile.in, dlls/comctl32/draglist.c, include/commctrl.h, relay32/comctl32.spec: Eric Kohl New drag list control. * dlls/comctl32/comctl32undoc.c: Eric Kohl Fixed pointer bugs in DPA_InsertPtr() and DPA_DeletePtr(). * dlls/comctl32/progress.c, include/progress.h: Eric Kohl Added WM_[G/S]ETFONT handling. * dlls/comctl32/pager.c: Eric Kohl Added WM_COMMAND and WM_NOTIFY handling. * dlls/comctl32/tooltips.c: Eric Kohl Fixed redraw bug for tracking tooltips. * dlls/comctl32/rebar.c: Eric Kohl Added some messages to the rebar control. * multimedia/mcicda.c: Geoff Clare Several internal functions won't compile when the conditional #if defined(linux) || defined(__FreeBSD__) || defined(__NetBSD__) comes out false. I moved the conditionals around so that the file would at least compile. Not sure if it does the right thing on non-linux/FreeBSD/NetBSD systems. * misc/toolhelp.c: Geoff Clare Moved process.h higher up the include list, to avoid a problem with "ERR" being redefined in sys/regset.h. * misc/comm.c: Geoff Clare The B57600 and B115200 symbols are not defined in Unixware. * controls/listbox.c: NF Stevens Change SW_??? options on list box scrolling so that they match what Windows does. * loader/dos/dosvm.c: Ove Kaaven Moved DOS handle allocation slightly, to fix potential memory leaks and lost handles. Also removed some useless init code. * graphics/psdrv/afm.c, graphics/psdrv/text.c, if1632/dummy.c, if1632/gdi.spec, misc/printdrv.c: Nick Holloway Internal PostScript printer driver improvements. * controls/edit.c: Gerard Patel Changed EDIT_EM_CharFromPos to return line number. * windows/x11drv/wnd.c: Marcus Meissner Free the private data pointer, THEN set it to NULL. * windows/message.c: Marcus Meissner Missing WINAPI. * include/oleauto.h, include/winerror.h, ole/Makefile.in, ole/safearray.c, relay32/oleaut32.spec: Sylvain St.Germain Implementation of the SafeArray family functions. * include/windows.h, relay32/kernel32.spec, scheduler/thread.c: Guy Albertelli Added stub for SetThreadLocale. * objects/text.c: Guy Albertelli Finished GetTextCharsetInfo routine. * ole/nls/enu.nls, ole/ole2nls.c: Guy Albertelli Fixed FIXME in EnumTimeFormats32W Added support for FONTSIGNATURE in GetLocaleInfo32A and updated GetLocaleInfo32W. * documentation/internal-dll, documentation/shell32, documentation/wine.man: Pascal Cuoq Fixed typos. * debugger/msc.c: Sergey Turchanov Fixed source line matching for functions in DEBUG_ProcessCoffDebug; searching for DBG and PDB files. * debugger/hash.c: Sergey Turchanov Fix for files which do not contain exports (fg, EXE) to get processed for debug information. * if1632/kernel.spec, if1632/relay.c, if1632/thunk.c, tools/build.c: Ulrich Weigand Implemented KERNEL.621 (CBClientThunkSLEx). * debugger/dbg.y, debugger/debug.l, debugger/info.c, include/main.h, misc/main.c: Marcus Meissner Allow switching off/on of debugmsgs in the debugger. * loader/main.c, miscemu/instr.c, msdos/dosmem.c, msdos/int15.c, include/miscemu.h: Andreas Mohr Implemented Int 0x15/0xc0: BIOS - GET CONFIG and some other BIOS data. Sat Jan 23 14:15:17 1999 Alexandre Julliard * graphics/painting.c, if1632/user.spec, include/wine/winuser16.h, loader/pe_image.c, misc/lstr.c, windows/hook.c, windows/message.c: Andreas Mohr Implemented WIN16_CallMsgFilter32, WIN16_DispatchMessage32, DrawAnimatedRects16 (stub), FormatMessage16, WIN16_GetMessage32, WIN16_PeekMessage32 and WIN16_TranslateMessage32. * dlls/shell32/Makefile.in, dlls/shell32/classes.c, dlls/shell32/contmenu.c, dlls/shell32/dataobject.c, dlls/shell32/enumidlist.c, dlls/shell32/folders.c, dlls/shell32/iconcache.c, dlls/shell32/shell32_main.c, dlls/shell32/shell32_main.h, dlls/shell32/shellguid.c, dlls/shell32/shelllink.c, dlls/shell32/shellole.c, dlls/shell32/shellord.c, dlls/shell32/shellpath.c, dlls/shell32/shlfolder.c, dlls/shell32/shlview.c, include/interfaces.h, include/shlguid.h, include/shlobj.h, include/windows.h, misc/shell.c: Juergen Schmied - some fixes, cleaned up includes, fixed leaks - clean DllReferenceCount, better DllMain() - dynamically linking LookupIconIdFromDirectoryEx32 and CreateIconFromResourceEx32 to USER32 - moved guid's instances to new file shellguid.c - implemented ShellExecuteEx32W * ole/Makefile.in, ole/compobj.c, ole/guid.c: Juergen Schmied Moved the instance creation of GUID's to a new file. Size of compobj.o goes down to 1/3; should prevent more sig11's. * include/initguid.h: Juergen Schmied New file to instantiate GUID's ms-like. * windows/x11drv/wnd.c: Marcus Meissner Set private data struct to NULL to expose problems in other code better. Fixes the XUnmapWindow problems reported by replacing them with NULL ptr dereferences. * documentation/debug-msgs, documentation/debugging, documentation/internal-dll, documentation/ioport-trace-hints, documentation/wine_os2: Zygo Blaxell Fixed typos. * files/file.c, include/file.h, loader/dos/dosvm.c: Marcus Meissner DOS programs use handles 0-4 without opening/closing any of those handles first. Split up Init from AllocDosHandle and call it from the DOSVM. * Makefile.in: Marcus Meissner Remove configure.in->configure rule (we might not have autoconf). * configure, configure.in: Ove Kaaven Added "user-friendly" warning for missing X. * include/ole.h: Fixed GetObject macro problem. * documentation/status/direct3D: Lionel Ulmer - updated documentation to be in sync with current code * graphics/d3dmaterial.c, graphics/d3dviewport.c: Lionel Ulmer - various warning and bug fixes * graphics/d3ddevices.c, graphics/d3dtexture.c: Lionel Ulmer - added more texture formats using OpenGL's packed pixel formats * graphics/d3dexecutebuffer.c, include/d3d.h: Lionel Ulmer - better support for ExecuteBuffers * graphics/ddraw.c: Lionel Ulmer - corrected bug in Z Buffer allocation - put VIDEOMEMORY flag for all primary surfaces - put something in a surface after a ReleaseDC * misc/printdrv.c: Morten Welinder Missing WINAPI. * controls/static.c: Niclas Karlsson Removed DT_SINGLELINE and DT_NOCLIP styles for SS_LEFTNOWORDWRAP. * objects/enhmetafile.c: Marcus Meissner Check opened enhmetafile for magic values. * include/dsound.h, multimedia/dsound.c: Rob Riggs Fixed duplicate sound buffer handling. Updated status. * misc/registry.c: Juergen Schmied New functions lmemcpynAtoW and lmemcpynWtoA for converting REG_MULTI_SZ (including \0x00) Better debug output for REG_BINARY and REG_MULTI_SZ Rewritten RegQueryValueEx32[A|W] * objects/palette.c: Juergen Schmied Implemented CreateHalftonePalette. Fixed 3 crashes (1 real, 2 potential). * dlls/shell32/iconcache.c, if1632/shell.spec, include/shell.h, misc/shell.c: Marcus Meissner Implemented ExtractIconEx16, added some consts to ExtractIconEx*. * ole/ole2.c, ole/olecli.c, relay32/ole32.spec, include/winerror.h: Sylvain St.Germain DoDragDrop and OleIsCurrentClipboard stub implementation. * ole/typelib.c: Francis Beaudet Make LoadTypeLib stub return failure instead of success. Fri Jan 22 17:09:46 1999 Alexandre Julliard * documentation/accelerators, include/winuser.h, loader/resource.c, windows/input.c: Marcus Meissner Fixed accelerator handling. ACCEL16 used internal, ACCEL32 for Win32 API, PE_ACCEL for PE Accelerators. See documentation/accelerators. Thu Jan 21 14:05:11 1999 Alexandre Julliard * include/ddeml.h, misc/ddeml.c, relay32/user32.spec: Francis Beaudet There were two copies of the DdeCmpStringHandles (A and W) and that API does not have 2 versions. Removed the extra version. Wed Jan 20 14:54:01 1999 Alexandre Julliard * graphics/x11drv/xfont.c: Pablo Saratxaga Small patch. * win32/console.c: Marcus Meissner Win32 console needs SYNCHRONIZE access. * configure, configure.in, console/ncurses.c, debugger/stabs.c, include/config.h.in, include/console.h, misc/port.c: Marcus Meissner autoconf: added checks for libio.h, elf.h, curses.h,ncurses.h and fixed includers. * ole/ole2nls.c: Marcus Meissner LCMapStringA: if dstlen is insufficient, return ERROR_INSUFFICIENT_BUFFER (verified). * objects/enhmetafile.c, relay32/gdi32.spec: Marcus Meissner Some small fixes to enhmetafiles. * controls/listbox.c: Marcus Meissner Do not call ownerdraw for invalid items (empty focusrects). Fixes Eudora 16bit empty Inbox problem. * windows/nonclient.c: Noomen Hamza Fixed the NC_DrawMaxButton95 and NC_DrawMinButton95 functions. Rewrote these functions with the same logic as the NC_DrawCloseButton function. * windows/win.c: Noel Borthwick Reparenting a window with SetParent in Windows should cause the child window being re-parented to be moved up to the topmost in the z-order, and WM_WINDOWPOSCHANGING and WM_WINDOWPOSCHANGED messages to be sent. * relay32/builtin32.c: Robert Riggs Use external DirectPlay DLLs by default. * loader/task.c: Ulrich Weigand Allow passing task handles to GetThreadQueue() and SetFastQueue(). * windows/user.c: Ulrich Weigand Handle (console) applications that never created a queue correctly in USER_AppExit(); call InitThreadInput() in InitApp(). * windows/hook.c: Ulrich Weigand - Fixed creation of message queue in hook API routines. - Some preparations for thread-local message queues. * loader/ne/module.c: Ulrich Weigand Check module name length in ModuleNext(). * windows/x11drv/event.c: Ulrich Weigand Use Callout to call RedrawWindow32. * msdos/int21.c: Ove Kaaven Clear DOS extended error only for funcs >=0x2f (thanks to Dave Pickles). * graphics/ddraw.c: Marcus Meissner Unified palette create, do allocate colorcells on init for DGA. Tue Jan 19 17:48:25 1999 Alexandre Julliard * scheduler/synchro.c, scheduler/thread.c, server/console.c, server/file.c, server/process.c, server/request.c, server/thread.c, server/trace.c, win32/console.c, win32/device.c, win32/process.c, include/file.h, include/process.h, include/server.h, include/server/object.h, include/server/request.h, include/server/thread.h, include/thread.h, include/winbase.h, include/windows.h, include/wintypes.h, memory/virtual.c, msdos/int21.c, msdos/vxd.c, relay32/kernel32.spec, scheduler/client.c, scheduler/handle.c, scheduler/k32obj.c, scheduler/process.c, files/change.c, files/dos_fs.c, files/file.c, include/device.h: Hacked server-side device support Added user APCs support. Many changes to the xterm console to make use of the server (not finished yet). Moved some other small stuff to the server. * tools/make_requests: Added long type format. * server/Makefile.in, server/device.c: Added server-side device support (only a hack for now). Sun Jan 17 17:48:48 1999 Alexandre Julliard * ChangeLog: Recovered log entries from CVS mailing list. * relay32/ntdll.spec, dlls/ntdll/rtl.c: Marcus Meissner Implemented _alloca_probe and _chkstk (mostly done by Ulrich Weigand). * files/file.c Marcus Meissner Handle ERROR_WRITE_PROTECT too in readonly fallback open. * dlls/advapi32/security.c, relay32/advapi32.spec: Marcus Meissner Added GetSecurityDescriptorLength stub for regedt32.exe. * debugger/Makefile.in, files/Makefile.in: Marcus Meissner Add "" around -D defines for paths with spaces in them. * graphics/d3dtexture.c, graphics/ddraw.c, include/ddraw.h: Lionel Ulmer Cleaned up ColorKey handling. * objects/metafile.c: Paul Quinn METARECORD member rdParam should be rdParm (in win32 sdk) lots of changes in this source file to reflect this change. * graphics/escape.c, graphics/painting.c, graphics/metafiledrv/init.c, include/commctrl.h, include/commdlg.h, include/gdi.h, include/tchar.h, include/windows.h, include/wingdi.h, include/wintypes.h, include/winuser.h, misc/spooler.c, objects/gdiobj.c, relay32/gdi32.spec: Paul Quinn Fixed bad defines, added a few types 'n defines. * windows/dinput.c: Marcus Meissner Disable broken callbacks which lead to crashes. * multimedia/mcistring.c: Eric Pouech Fixed ID usage (and rely less heavily on multimedia/mmsystem.c internal structures). * misc/toolhelp.c: Marcus Meissner debug.h needs to be included last since it #undefs ERR for Solaris. * debugger/debug.l, debugger/memory.c: Marcus Meissner Added /u format to debugger display for UNICODE strings. * loader/pe_image.c: Marcus Meissner Remove irritating FIXME line no longer needed. * msdos/int2f.c: Eric Pouech Added missing '\n' in FIXME message. * graphics/ddraw.c: Robert Riggs objbase.h needed for WINE_StringFromCLSID(), fix C function declarations, install a colormap if we are not managed, release backbuffers in DGA mode, fix video mode switching logic to avoid possible NULL pointer dereference. * msdos/dpmi.c: Andreas Mohr Small fix. * files/file.c, include/file.h, include/process.h, loader/resource.c, loader/dos/module.c, loader/ne/segment.c, misc/lzexpand.c, msdos/int21.c vxd.c, multimedia/mmio.c, win32/kernel32.c: Better DOS file handle management. * documentation/common_controls: Francis Beaudet This should help prevent duplicate work. * if1632/gdi.spec, include/wingdi.h, objects/dc.c: Andreas Mohr Implemented Death() and Resurrection(), two functions needed by some TPWin (?) command line tool. * windows/winproc.c: Juergen Schmied Added 32->16 translation for WM_ACTIVATEAPP. * dlls/shell32/pidl.c, dlls/shell32/shellord.c, dlls/shell32/shellpath.c, dlls/shell32/shlfolder.c, relay32/shell32.spec: Juergen Schmied New stubs: ShellMessageBoxW, RunDLL_CallEntry16. Implementation for SHGetSpecialFolderPath32[A|W]. Many bugfixes. * console/xterm.c, misc/port.c, win32/console.c: Joseph Pranevich Change all Wine openpty() implementations to match the "standard" and then make them both call the same code leaving the option to change that code to call the "standard" openpty() at a later date. * relay32/kernel32.spec, scheduler/process.c: Marcus Meissner Added SetProcessAffinityMask stub. * graphics/ddraw.c, include/ddraw.h: Marcus Meissner Fixed the other union misuse too (one less mem corruption) Re-added XInstallColormap (or non managed does not change palette) * if1632/kernel.spec, scheduler/synchro.c: Ulrich Weigand Added an implementation for KERNEL.495. * documentation/status, documentation/direct3D, graphics/d3d_private.h, graphics/d3dcommon.c, graphics/d3ddevices.c, graphics/d3dexecutebuffer.c, graphics/d3dtexture.c, graphics/d3dviewport.c, graphics/ddraw.c, include/d3d.h, include/ddraw.h: Lionel Ulmer - added bitmask to store which ColorKey structures are valid - handle many new rendering states, some optimizations in state changes - 8bit palettized textures now support ColorKeying - some miscellaneous bug fixes and code rewrite * controls/menu.c: Noomen Hamza Fixed the look of the menu so it would be compliant with Win95: modified the mouse tracking code so it would change the selection every time the mouse moved over a menu item. * documentation/how-to-port: Mike Castle Small fix. * dlls/comctl32/updown.c: Noel Borthwick Fixed bugs: - When an edit control buddy was used single digit values were not being displayed. - Comma values were not displayed correctly when thousands separation was requested. * win32/newfns.c: Tom Bech While the debug event messages are not implemented, WaitForDebugEvent should return FALSE. * if1632/user.spec, objects/bitmap.c: Andreas Mohr Implemented CopyImage16. * documentation/bugreports Andreas Mohr Small fix. * console/generic.c, msdos/int21.c: Marcus Meissner Changed 0x01 to use generic console, fixed 0x0b. Fixed CONSOLE_GetCharacter (two args swapped). * include/module.h, loader/main.c, loader/module.c, loader/dos/module.c: Ulrich Weigand Allow specifying module name for NE dummy module. * loader/pe_image.c Ulrich Weigand Set module name of dummy module equal to module name of PE module. * controls/scroll.c, controls/uitools.c: Marcus Meissner Missing include wine/winuser16.h added. * graphics/vga.c: Marcus Meissner Create an actual primary surface for screenbuffer. ---------------------------------------------------------------- Sun Jan 10 14:40:34 1999 Alexandre Julliard * include/miscemu.h, include/msdos.h, loader/main.c, msdos/Makefile.in, msdos/dosconf.c, msdos/int21.c: Andreas Mohr Added config.sys parser. * controls/listbox.c: Pascal Cuoq Small change in LB_SETCURSEL32 handling (the caret should be moved as well). * configure, configure.in, files/async.c, include/config.h.in, misc/winsock_dns.c, msdos/int21.c, ole/compobj.c: Marcus Meissner Use autoconf check for presence of sys/file.h. * dlls/ntdll/rtl.c, relay32/ntdll.spec: Marcus Meissner Implemented DbgPrint, added ultoa. * win32/console.c: Peter Hunnisett PeekConsoleInput & ReadConsoleInput need to return 0 records read in the case of an invalid handle. * console/ncurses.c, loader/main.c: Joseph Pranevich More verbose debugging output. Remove compilation warning. * msdos/int10.c: Joseph Pranevich Fix up some interrupt calls to return at the data that they are supposed to. Also increase comment verbosity to help debug things later. * include/options.h, misc/main.c, misc/version.c: Andreas Mohr Added switch -dosver. Cleanup for OaBuildVersion(). * libtest/.cvsignore: Added vartest and volinfo * dlls/shell32/contmenu.c, dlls/shell32/pidl.c, dlls/shell32/pidl.h, dlls/shell32/shelllink.c, dlls/shell32/shellord.c, dlls/shell32/shlfolder.c, dlls/shell32/shlview.c, include/shell.h: Juergen Schmied Many bugfixes, code cleanup. Removed a few glitches from the COM patch. * windows/dialog.c: Lawson Whitney Only destroy window once. * graphics/ddraw.c, include/ddraw.h: Marcus Meissner - moved drawable to common since it is used by both DGA and Xlib. (fixes one bad memory corruption bug in DGA (StarCraft and Diablo) - added BltFast sanity checks. * windows/queue.c, loader/task.c: Ulrich Weigand InitApp() call removed from 32-bit application startup; create task message queue in InitThreadInput() instead. * loader/ne/convert.c: Ulrich Weigand Added accelerator table PE->NE resource conversion. * debugger/editline.c: Ulrich Weigand Restart read() in case of EINTR in TTYget(). * dlls/shell32/shellole.c: Marcus Meissner Ptr ref wrong. * tools/wrc/CHANGES, tools/wrc/dumpres.c, tools/wrc/genres.c, tools/wrc/newstruc.c, tools/wrc/newstruc.h, tools/wrc/parser.l, tools/wrc/parser.y, tools/wrc/readres.c, tools/wrc/utils.c, tools/wrc/utils.h, tools/wrc/wrc.h, tools/wrc/wrctypes.h, tools/wrc/writeres.c: Bertho Stultiens Wrc version 1.0.8. Toolbar resources are now supported. A couple of other fixes are also included. See file tools/wrc/CHANGES for details. * ole/compobj.c: Marcus Meissner Missing WINAPI. * include/x11drv.h, loader/dos/module.c, objects/dc.c, relay32/builtin32.c, relay32/relay386.c, scheduler/k32obj.c, files/async.c, if1632/relay.c, include/main.h, include/multimedia.h, include/windows.h: James Juran Add missing #includes and prototypes to eliminate some implicit function declaration warnings and 'extern's in .c files. * configure, configure.in, console/ncurses.c, include/acconfig.h, include/config.h.in: Ove Kaaven Check for resizeterm in ncurses. * libtest/Makefile.in, libtest/vartest-Win32.log, libtest/vartest.c, libtest/vartest.readme: Francis Beaudet New test program for VARIANT functions. * debugger/msc.c: Eric Pouech Some debug information (PDB) was not mapped when loading a module, which caused a core in the debugger when it tried to access it. * Makefile.in: Ove Kaaven Links libwine.so.1.0 to libwine.so in Wine's main directory. Makes Wine compile with --enable-dll again. Sat Jan 9 09:12:40 1999 Alexandre Julliard * relay32/ole32.spec, windows/dinput.c, include/storage.h, include/unknwn.h, include/windows.h, include/wine/obj_base.h, include/wine/obj_channel.h, include/wine/obj_clientserver.h, include/wine/obj_dataobject.h, include/wine/obj_marshal.h, include/wine/obj_misc.h, include/wine/obj_moniker.h, include/wine/obj_propertystorage.h, include/wine/obj_storage.h, include/winerror.h, include/wtypes.h, misc/shell.c, multimedia/dplay.c, multimedia/dsound.c, objects/font.c, ole/compobj.c, ole/ifs.c, ole/moniker.c, ole/ole2.c, ole/ole2disp.c, ole/oledlg.c, ole/oleobj.c, ole/storage.c, ole/typelib.c, dlls/shell32/dataobject.c, dlls/shell32/enumidlist.c, dlls/shell32/folders.c, dlls/shell32/pidl.c, dlls/shell32/shell32_main.c, dlls/shell32/shelllink.c, dlls/shell32/shellole.c, dlls/shell32/shellord.c, dlls/shell32/shlfolder.c, dlls/shell32/shlview.c, graphics/ddraw.c, graphics/vga.c, if1632/compobj.spec, include/compobj.h, include/ddraw.h, include/dinput.h, include/dplay.h, include/dsound.h, include/interfaces.h, include/objbase.h, include/objidl.h, include/ole.h, include/ole2.h, include/oleobj.h, include/servprov.h, include/shell.h, include/shlguid.h, include/shlobj.h, dlls/comctl32/imagelist.c, dlls/shell32/contmenu.c: Francois Gouget Added a lot of COM interfaces definitions. Restructured COM header files for better compatibility and clarity. Fri Jan 8 16:37:03 1999 Alexandre Julliard * files/file.c: Set GENERIC_READ|GENERIC_WRITE access for OF_CREATE. Make GetFileType work for all handle types. * win32/device.c: Avoid crash on NULL dev->info. * include/flatsb.h, relay32/comctl32.spec, dlls/comctl32/Makefile.in, dlls/comctl32/commctrl.c, dlls/comctl32/flatsb.c, include/commctrl.h: Alex Priem Added stubs and defines for the flat scrollbar common control. * include/commctrl.h, dlls/comctl32/datetime.c: Alex Priem Added some defines needed for custom draw'ing and datetime common controls. * dlls/shell32/iconcache.c: Eddie Carpenter Fixed a small bug in function ExtractIconEx32A. * windows/winproc.c: Juergen Schmied HTASK16 -> threadID mapping of WM_ACTIVATEAPP. * files/file.c: Bertho Stultiens Make DeleteFile fail for empty path. * msdos/ioports.c: Gerald Pfeifer Fix dummy_ctr stuff to work even without DIRECT_IO_ACCESS. * loader/ne/segment.c: Marcus Meissner Fixed wrong buffer which caused fixups to fail. * graphics/d3dcommon.c, graphics/d3ddevices.c, graphics/d3dtexture.c, include/d3d.h: Lionel Ulmer - added all the Direct3D error codes - added 8bit palettized texture support * msdos/cdrom.c: Marcus Meissner ifdefs for defines not in linux 2.0. * relay32/winspool.spec, misc/printdrv.c: Uwe Bonnes Added two stubs for AddPrinterDriver. * include/dosexe.h, loader/dos/dosmod.c, loader/dos/dosmod.h, loader/dos/dosvm.c: Ove Kaaven Queue SIGALRM to reduce the "signal 14 lost" complaints. Added support for reprogramming the DOS timer, and reading back the current value. * misc/registry.c: Marcus Meissner Wine hangs when registry (corrupted) has lone \ at end of file. * dlls/shell32/shell32_main.h, dlls/shell32/shell32_main.c: Kostya Ivanov Small patch that enables Clarion for Windows not to trap while loading. * ole/variant.c: Marcus Meissner Replace troublesome assignments by memset for whole struct. * graphics/ddraw.c: Lionel Ulmer Added handling of the 'palent' field of the CreatePalette procedure. * documentation/wine.man: Uwe Bonnes Added description about including/excluding functions from relay trace. * win32/console.c: Marcus Meissner Read at least 1 input record in ReadConsoleInputA. * memory/virtual.c: Fixed CreateMapping when a mapping with the same name already exists. Wed Jan 6 10:37:29 1999 Alexandre Julliard * server/file.c: Fixed file destruction when file has no name. Tue Jan 5 18:38:59 1999 Alexandre Julliard * misc/main.c: Eric Pouech Warns user if multiple -dll switches are used on command line. * dlls/comctl32/trackbar.c: Alex Priem Fixed a leftover HeapFree in the trackbar common control. * include/commctrl.h, include/debug.h, include/debugdefs.h, include/tab.h, dlls/comctl32/tab.c: Alex Priem Fixed some problems with the tab common control (with thanks to Anders Carlsson ). * dlls/comctl32/commctrl.c, dlls/comctl32/propsheet.c, include/commctrl.h, include/propsheet.h, relay32/comctl32.spec: Alex Priem Added a missing PropertySheet32AW and CreatePropertySheetPage stub, and some missing defines. * misc/main.c, scheduler/syslevel.c, graphics/vga.c: Ulrich Weigand Use MakeCriticalSectionGlobal on all critical sections used across process boundaries. * include/winbase.h, include/windows.h: Ulrich Weigand Added prototypes for MakeCriticalSectionGlobal, ConvertToGlobalHandle. * documentation/wine.man: Uwe Bonnes Added environment variables in the man page. * loader/dos/module.c: Gerald Pfeifer Fixed args of MZ_CreateProcess. * programs/clock/language.c, programs/notepad/language.c, programs/progman/main.c: Andreas Mohr Fixed string bug in programs/. * msdos/ioports.c: Andreas Mohr Added stupid "action" emulation for hardware timers in ioports.c. * dlls/winaspi/winaspi16.c: Andreas Mohr Again a small DOSASPI patch. * documentation/bugreports, documentation/fonts, windows/sysmetrics.c, windows/win.c, windows/winpos.c: Andreas Mohr Documentation updates. * graphics/ddraw.c: Lionel Ulmer - check if palette is not null when setting a palette - check if window handle is valid before getting its 'drawable' * graphics/x11drv/xfont.c: Eric Pouech Prevent core dump with some TTF (when X11 runs with a true type server). * server/console.c: Marcus Meissner Use stdout for default console output. ---------------------------------------------------------------- Sun Jan 3 17:00:20 1999 Alexandre Julliard * graphics/d3dexecutebuffer.c, graphics/d3dlight.c, graphics/d3dmaterial.c, graphics/d3dtexture.c, graphics/d3dviewport.c, graphics/ddraw.c, include/acconfig.h, include/config.h.in, include/d3d.h, include/wine_gl.h, multimedia/dsound.c, configure, configure.in, documentation/status/direct3D, documentation/status/directdraw, graphics/Makefile.in, graphics/d3d_private.h, graphics/d3dcommon.c, graphics/d3ddevices.c: Lionel Ulmer - beginning of implementation of Direct3D2 (DX 5.0) and associated classes - some basic code for Direct3D and Direct3DExecuteBuffer (DX 3.0) - added stretching to Blt function * misc/version.c: Marcus Meissner Try to autodetect NT4. * win32/console.c: Marcus Meissner 0 means success, all else failure for WaitForSingleObject. * msdos/int10.c: Joseph Pranevich Do not advance the cursor in certain routines. This cleaned up the implementation quite a bit. * loader/main.c: Joseph Pranevich Set console video mode when loading DOS app. (Eventually, I want to mimic Windows 9x's behavior by setting the video mode only when non INT 21 calls are used to allow for arbitrary-sized consoles). * console/interface.c, console/xterm.c: Joseph Pranevich Xterm driver can now resize the terminal when a mode change is detected. * console/generic.c: Joseph Pranevich Long standing scroll bug fixed! * console/ncurses.c, include/acconfig.h, include/config.h.in, include/console.h, configure, configure.in: Joseph Pranevich Rewrite of configuration system to support "regular" curses as well as eliminating the --with-ncurses option. Now, ncurses support will be built in if a compatible library is detected. * include/wintypes.h, windows/defdlg.c: NF Stevens Fix the return type of DLGPROC type and mask out the unset highword of the return when a 16 bit dialog proc is called. * include/interfaces.h: Rein Klazes Add interface ID's for upcoming ITypeLib implementation. * files/dos_fs.c: Juergen Schmied Bugfix for trailing slashes, repetition of '/' or '\' and SetLastError() in GetFullPathname. * Makefile.in, configure, configure.in, dlls/Makefile.in, dlls/advapi32/.cvsignore, dlls/advapi32/Makefile.in, dlls/advapi32/advapi.c, dlls/advapi32/eventlog.c, dlls/advapi32/security.c, dlls/advapi32/service.c, relay32/advapi32.spec, win32/Attic/advapi.c, win32/Attic/security.c, win32/Makefile.in, win32/init.c: Juergen Schmied Moved ADVAPI32 files to dlls/advapi32. Added stubs for eventlog functions. * relay32/shell32.spec, dlls/shell32/shelllink.c, dlls/shell32/shellole.c, dlls/shell32/shellord.c, dlls/shell32/shellpath.c, dlls/shell32/shlview.c, include/shlobj.h: Juergen Schmied New stubs NTSHChangeNotifyRegister, NTSHChangeNotifyDeregister. Cleanup, some more functions UNICODE ready. * dlls/shell32/pidl.c: Juergen Schmied SHCloneSpecialIDList implemented. SHGetDataFromIDListA corrected. * dlls/shell32/iconcache.c: Juergen Schmied Shell_GetCachedImageIndex32[A|W] implemented. * msdos/int21.c, msdos/int25.c, msdos/int26.c, files/drive.c, include/drive.h: Andreas Mohr Implemented raw device access calls for ioctlGenericBlkDevReq() and therefore moved the core functionality of int2[56].c into files/drive.c. * msdos/ioports.c: Andreas Mohr Added automatic CMOS RAM checksum calculation. * dlls/winaspi/winaspi16.c, dlls/wnaspi32/winaspi32.c, documentation/aspi, relay32/wnaspi32.spec: Andreas Mohr SendASPI32Command32 has to be __cdecl. Updated documentation/aspi and reverted an ERR back to WARN. * documentation/bugreports: James Juran Of course we want the last 100 lines, not the first 100 lines. Use 'tail' instead of 'head'. Also fix text alignment from previous patch. * multimedia/joystick.c: Ove Kaaven Reading joystick 5 when we only support 4 should fail instead of hang. * multimedia/mcicda.c: Ove Kaaven Playing a non-existent CD should fail instead of crash. * Make.rules.in, Makefile.in: Marcus Meissner Check for necessary configure reruns for Makefile and Make.rules generation. * miscemu/instr.c: Ove Kaaven Emulates ins/outs correctly for DOS programs. * ole/storage.c, scheduler/process.c, server/change.c, server/console.c, server/event.c, server/file.c, server/mapping.c, server/mutex.c, server/object.c, server/pipe.c, server/process.c, server/request.c, server/semaphore.c, server/thread.c, server/trace.c, win32/device.c, win32/file.c, files/dos_fs.c, files/file.c, include/device.h, include/file.h, include/server.h, include/server/object.h, include/server/request.h, loader/ne/module.c, loader/pe_image.c, misc/crtdll.c, msdos/int21.c, msdos/vxd.c: Implemented file sharing checks in the server. Added set file time server request. Overall clean up of the file handling (DOS device handling is now broken, should be redone). Sat Jan 2 08:22:34 1999 Alexandre Julliard * memory/virtual.c: Fixed bug in CreateFileMapping when name is not NULL. * server/request.c: Fixed CHECK_STRING display. Fri Jan 1 19:51:25 1999 Alexandre Julliard * if1632/kernel.spec, memory/local.c: Richard A Lough Put return value of LocalAlloc in CX too. * include/psdrv.h: Dimitrie O. Paun Protect against multiple includes. * dlls/shell32/iconcache.c: Use proper system directory. * scheduler/process.c: Got rid of CLIENT_GetProcessInfo. * windows/class.c, windows/dce.c, windows/defdlg.c, windows/defwnd.c, windows/driver.c, windows/msgbox.c, windows/painting.c, windows/user.c, windows/winhelp.c, include/wine/winuser16.h, include/winreg.h, include/winuser.h, loader/module.c, misc/comm.c, misc/shell.c, misc/spooler.c, misc/spy.c, misc/winsock.c, multimedia/audio.c, multimedia/mcianim.c, multimedia/mcicda.c, multimedia/mcimidi.c, multimedia/mciwave.c, multimedia/midi.c, multimedia/mmsystem.c, objects/clipping.c, ole/oleobj.c, controls/button.c, controls/desktop.c, controls/icontitle.c, controls/static.c, debugger/dbg.y, dlls/shell32/iconcache.c, dlls/shell32/shell32_main.c, graphics/psdrv/escape.c, if1632/thunk.c, include/callback.h, include/display.h, include/imagelist.h, include/ole.h, include/queue.h, include/shell.h, include/storage.h, include/struct32.h, include/winbase.h, include/windows.h: Michael Veksler Moves more stuff from windows.h. - include/winuser.h - interface relevant to user32.spec - include/wine/winuser16.h - the old 16 bit interface (internal use) - include/winbase.h - some minor updates to keep things coherent. - Lot of other files made to include wine/winuser16.h, which is no longer included from windows.h * scheduler/handle.c: Fixed CloseHandle() on global handles. * README, documentation/bugreports, documentation/win95look, documentation/wine.man: James Juran Add some information to the man page and README file. Make documentation/win95look say [Tweak.Layout] instead of [Tweaks.Layout]. Fix incorrect command given in documentation/bugreports. Standard error was not being redirected, so most of the output was lost. * objects/bitmap.c: NF Stevens Delphi 2.0 needs to allocate a bitmap bigger than 4096 bits wide. * misc/printdrv.c: NF Stevens Initialize lpdwNeeded. * if1632/snoop.c: Marcus Meissner Include stuff even if not on __i386__ for debug defines. * ole/variant.c: Marcus Meissner Another // comment fixed. * server/file.c: Marcus Meissner Need for errno decl. on Solaris. * include/wingdi.h, include/x11font.h, objects/font.c: Douglas Ridgway Implement TranslateCharsetInfo, change charset type to BYTE. * controls/combo.c, controls/listbox.c, include/combo.h: Alex Korobka Better CB_SETCURSEL message handling. * include/queue.h, include/thread.h, scheduler/synchro.c, scheduler/thread.c, windows/message.c, windows/queue.c: Moved MsgWaitForMultipleObject implementation to USER routines, using a normal Win32 event. * tools/make_requests: Send debugging output to stderr. * files/change.c, files/dos_fs.c, files/file.c, include/file.h, scheduler/client.c, scheduler/event.c, scheduler/k32obj.c, scheduler/mutex.c, scheduler/pipe.c, scheduler/semaphore.c, win32/console.c: Cleaned up and removed some no longer used code. * memory/virtual.c: Use server file mapping objects. * include/server/object.h, include/server/request.h, include/server/thread.h, server/Makefile.in, server/console.c, server/file.c, server/main.c, server/mapping.c, server/object.c, server/pipe.c, server/request.c, server/thread.c, server/trace.c, include/server.h: Added server-side file mapping object support. * misc/crtdll.c: Hacked stdio functions to use Win32 file handles. Still needs a proper stdio emulation. * loader/ne/module.c, loader/ne/resource.c, loader/ne/segment.c: Use Win32 file handles instead of Unix ones. * include/module.h, include/pe_image.h, include/process.h, loader/dos/module.c, loader/module.c, loader/pe_image.c, scheduler/process.c, include/dosexe.h: Take into account handle inheritance flag. Thu Dec 31 15:55:19 1998 Alexandre Julliard * debugger/db_disasm.c: Changed db_task_printsym to always print a full address, no matter what the operand size is. * scheduler/critsection.c: Re-implemented using a real semaphore. * windows/queue.c, files/change.c, files/file.c, include/k32obj.h, include/process.h, include/thread.h, loader/signal.c, memory/virtual.c, misc/toolhelp.c, scheduler/client.c, scheduler/event.c, scheduler/handle.c, scheduler/k32obj.c, scheduler/mutex.c, scheduler/pipe.c, scheduler/process.c, scheduler/semaphore.c, scheduler/synchro.c, scheduler/thread.c, win32/console.c, win32/device.c: Removed client-side wait functions; all waiting is now done through the server. * server/Makefile.in, server/change.c, server/process.c, server/request.c, server/trace.c, include/server.h, include/server/object.h, include/server/request.h: Added change notifications. Added global handle support. Wed Dec 30 12:11:52 1998 Alexandre Julliard * include/thread.h, scheduler/synchro.c: Changed server wait logic a bit. * win32/console.c: Hacks to support server-side console. Should be redone properly some day. * files/dos_fs.c, files/file.c, include/file.h, win32/file.c, win32/newfns.c: Reimplemented Read/WriteFile to use server file descriptors. Removed file position hack as it is wrong for Win32 (should be redone for Win16 only). * scheduler/Makefile.in, scheduler/k32obj.c, scheduler/pipe.c: Added anonymous pipe support * include/server.h, include/server/object.h, include/server/request.h, server/Makefile.in, server/console.c, server/event.c, server/file.c, server/mutex.c, server/object.c, server/pipe.c, server/process.c, server/request.c, server/semaphore.c, server/thread.c, server/trace.c: Added several file server requests Added server-side pipes and consoles Sun Dec 27 15:28:55 1998 Alexandre Julliard * misc/crtdll.c, msdos/int21.c, scheduler/client.c, scheduler/k32obj.c, server/Makefile.in, server/event.c, server/file.c, server/mutex.c, server/process.c, server/request.c, server/semaphore.c, server/trace.c, tools/make_requests, files/dos_fs.c, files/file.c, include/debug.h, include/debugdefs.h, include/file.h, include/server.h, include/server/object.h, include/server/request.h, loader/main.c, memory/virtual.c: Added beginnings of server-side file handling. Added -debugmsg +server support. Better server request dumping for varargs requests. * windows/x11drv/wnd.c: Fixed SetFocus that was broken when moved to x11drv. * include/server/object.h, include/server/thread.h, scheduler/client.c, server/Makefile.in, server/event.c, server/main.c, server/mutex.c, server/process.c, server/select.c, server/semaphore.c, server/socket.c, server/thread.c: Added add_queue/remove_queue to server object operations. Moved select() loop functions to select.c. Sat Dec 26 19:47:00 1998 Alexandre Julliard * programs/regtest/regtest.c: Renamed ERR macro to avoid confusing the make_debug script. * ole/storage.c, ole/typelib.c, include/d3d.h, include/mmsystem.h, include/oleauto.h, include/storage.h, include/winversion.h, ole/compobj.c, ole/ole2.c, ole/ole2nls.c: Juergen Schmied Fixed tons of incomplete prototypes, assignment's of pointer with different signedness, superflous ',' and ';' in structures, wrong return-types, lose of digits and some small glitches. * graphics/x11drv/xfont.c, include/x11font.h: Alex Korobka Cleaned up font encoding handling. Added 'Ignore#' option to the [fonts] section. Also, file with cached metrics now has the value of $DISPLAY appended to the filename. * programs/clock/language.c, programs/clock/main.c, programs/notepad/dialog.c, programs/notepad/language.c, programs/notepad/main.c, rc/systest.c, windows/multimon.c, windows/nonclient.c, dlls/shell32/shlview.c, files/profile.c, graphics/path.c, include/commctrl.h, include/d3d.h, include/dplay.h, include/dsound.h, include/ole.h, include/oleobj.h, include/shlobj.h, include/vfw.h, include/winerror.h, include/winioctl.h, misc/main.c, multimedia/audio.c, multimedia/dsound.c, ole/ole2.c, debugger/stabs.c, dlls/comctl32/animate.c, dlls/comctl32/header.c, dlls/comctl32/hotkey.c, dlls/comctl32/listview.c, dlls/comctl32/pager.c, dlls/comctl32/rebar.c, dlls/comctl32/toolbar.c, dlls/comctl32/tooltips.c, dlls/comctl32/trackbar.c, dlls/comctl32/treeview.c, dlls/shell32/contmenu.c, dlls/shell32/enumidlist.c, dlls/shell32/pidl.c, dlls/shell32/shellord.c: Marcus Meissner Changed // comments to /* */ so WINE compiles with non-gcc compilers again. * windows/ttydrv/clipboard.c, windows/ttydrv/event.c, windows/ttydrv/init.c, windows/x11drv/clipboard.c, windows/x11drv/event.c, windows/x11drv/init.c, windows/x11drv/mouse.c, windows/x11drv/wnd.c, debugger/dbg.y, graphics/ddraw.c, graphics/x11drv/bitblt.c, graphics/x11drv/brush.c, graphics/x11drv/clipping.c, graphics/x11drv/init.c, include/clipboard.h, include/ddraw.h, include/display.h, include/ttydrv.h, include/win.h, include/x11drv.h, objects/palette.c, windows/dce.c, windows/dinput.c, windows/display.c, windows/input.c, windows/message.c, windows/scroll.c, windows/win.c, windows/winpos.c: Patrik Stridvall Moved more things to the X11 driver. * include/wingdi.h, objects/brush.c: Francois Gouget Fixed the prototype of CreateDIBPatternBrushPt * include/windows.h: Francois Gouget Removed the CN_xxx macros since they are not used, do not correspond to any Windows define and conflict with MFC defines. windows.h must provide all the definitions contained in winbase.h Some Xxx32 functions did not have the associated Xxx macro. * include/wintypes.h: Francois Gouget Added a typedef for __int64 which is a builtin Visual C++ type Added a typedef for PUINT * include/objbase.h: Francois Gouget REFIID was not defined. * configure.in, include/acconfig.h, include/config.h.in, include/winsock.h, misc/winsock.c, configure: Pavel Roskin configure first checks whether it is possible to compile IPX code with Glibc headers. If it fails, next check determines whether direct inclusion of works. * include/tchar.h: Francois Gouget Provides the mappings. MBCS and Unicode functions are not implemented. Standard (SBCS) functions may exist or not, with the same or a different semantics. * dlls/comctl32/ipaddress.c, include/commctrl.h, include/ipaddress.h: Alex Priem IPaddress common control implementation. First try; needs more work to remove boring bugs. Fri Dec 25 08:55:15 1998 Alexandre Julliard * dlls/shell32/contmenu.c, dlls/shell32/shlview.c, include/oleobj.h, include/shlobj.h: Juergen Schmied Fixed the TEXT redefined warnings. * msdos/int10.c: Joseph Pranevich Hook into the (stubbed) resize code in msdos int10. * console/interface.c, include/console.h, include/options.h, loader/main.c, misc/main.c: Joseph Pranevich Add support for selection of console mode drivers to use using the -console option. Currently "tty", "ncurses", and "xterm" are supported. Add stubs for resizing the screen on mode changes. * include/ddeml.h, misc/ddeml.c, relay32/user32.spec: Jean-Claude Cote Partial implementation for the following DDE APIs: DdeCmpStringHandles, DdeCreateStringHandle, DdeFreeStringHandle, DdeQueryString, DdeUninitialize. Thu Dec 24 16:59:17 1998 Alexandre Julliard * ole/Makefile.in, ole/parsedt.c, ole/parsedt.h, ole/variant.c: Jean-Claude Cote Added VarDateFromStr API. * dlls/comctl32/trackbar.c, include/trackbar.h: Alex Priem - Tooltip support - Vertical trackbars supported now - TBS_BOTH support (goes along with partial cleanup of drawing code) - Use COMCTL32 heap instead of system heap * graphics/ddraw.c, include/ddraw.h: Peter Hunnisett Added all clipper&3d stubs. Starting ColorKey support. Fixed trace statement in DirectDrawCreate as formatting wasn't correct. Changed "return 0;" to "return DD_OK" or "return S_OK" as appropriate. Added SurfaceEnum dwFlags. * include/dplay.h, multimedia/dplay.c: Peter Hunnisett Added macros to header file for easier function calling. Changed implementation a little bit. Added stubs for dplay3. Still need to break into A and W versions. * win32/file.c: Peter Hunnisett CreateFile32A was only allowing console opens on CONIN$/OUT$. This has been changed to have a case insensitive compare. * controls/listbox.c: Gerard Patel Don't send ODA_ENTIRE for empty listboxes (LISTBOX_Paint). * include/winbase.h, relay32/kernel32.spec, win32/kernel32.c: Jean-Claude Cote Implemented the GetBinaryType API function. * loader/dos/dosmod.c, loader/dos/dosmod.h, loader/dos/dosvm.c, loader/dos/module.c: Ove Kaaven Added some new dosmod communication possibilities, including activating a dosmod-specific setitimer(), and the capture of some common signals, which is returned to Wine (previously a SIGILL would just cause a "dosmod sync lost" without explanation, now it invokes the Wine debugger). Invokes int 08 upon receipt of dosmod SIGALRM, thus simulating the DOS timer. Made DOS interrupt calls be reported by -debugmsg +relay instead of -debugmsg +int. And fixed non-i386 compilation of dosmod. (Anything else?!) * loader/main.c, windows/win.c: Ulrich Weigand Desktop window queue handling adapted. * windows/clipboard.c, windows/hook.c, windows/timer.c, windows/winpos.c: Ulrich Weigand Queue handling adapted to new queue routines. * windows/message.c, windows/queue.c, if1632/user.spec, include/queue.h, include/task.h: Ulrich Weigand Implemented stub for InitThreadInput. Use GetThreadQueue/GetFastQueue instead of GetTaskQueue. * loader/task.c, miscemu/main.c: Ulrich Weigand Use Callout table instead of direct GetProcAddress. UserYield moved to USER. * include/callback.h, misc/callback.c, if1632/thunk.c: Ulrich Weigand Callout table (for KERNEL->USER calls) added. Callbacks->CallPostAppMessageProc removed. * misc/callback.c, windows/x11drv/event.c, include/callback.h, include/queue.h, include/task.h, loader/task.c, if1632/thunk.c: Ulrich Weigand Handle non-hardware X events correctly with native USER (removed reference to MESSAGEQUEUE from KERNEL code). Handle Expose events with native USER. * misc/crtdll.c: Andreas Mohr Better _ultoa(). * win32/time.c: Rein Klazes Fix small problem in GetTimeZoneInformation(). * windows/x11drv/keyboard.c: Rein Klazes Lowest scan code seems to be 1, not zero. * graphics/ddraw.c: Marcus Meissner Stubs for IDirect3D(2)::CreateLight and CreateDevice to avoid crashes. * dlls/ntdll/rtl.c, relay32/ntdll.spec, dlls/ntdll/nt.c: Juergen Schmied New stubs. * dlls/shell32/iconcache.c: Juergen Schmied Fixes crash when running without external shell32.dll. * windows/winproc.c: Juergen Schmied More messages [LB_*,EM_*] translated 32A from/to 32W. * relay32/user32.spec: Juergen Schmied Dest buffer was printed out as str. * misc/ver.c: Juergen Schmied Getting strings with VerQueryValue32W was broken. Complete reconstruction of the function. * misc/toolhelp.c: Huw D M Davies Fix number and type of args in debugging statements. * ole/storage.c: Marcus Meissner IStorage32 vtable was missing 3 stub entries. Fri Dec 18 17:38:39 1998 Alexandre Julliard * include/wingdi.h, objects/font.c, relay32/gdi32.spec: Douglas Ridgway Documentation for TranslateCharsetInfo. * dlls/wnaspi32/winaspi32.c, if1632/wprocs.spec, dlls/winaspi/winaspi16.c: Andreas Mohr Make the DOSASPI part use the excellent DPMI RMCB implementation done by Ove Kaaven, which makes the code _much_ cleaner. * Make.rules.in, Makefile.in, configure, configure.in: Todd Vierling Use -lwine for linking. * windows/message.c, windows/queue.c: Ulrich Weigand Bugfix: always clear QS_... from *both* changeBits and waitBits. Bugfix: queue->hSendingTask is *queue* handle, not task handle. * if1632/storage.spec, include/interfaces.h, include/objbase.h, include/storage.h, ole/ifs.c, ole/storage.c: François Gouget First step to make it possible to call COM interfaces from C++ code in Winelib. * dlls/comctl32/treeview.c, include/treeview.h: Alex Priem Preliminary tooltip support. WM_SETFONT/GETFONT added. Some bug fixes. Use COMCTL32 heap instead of system heap. * graphics/painting.c: Huw D M Davies Implemented PolylineTo. * relay32/ntdll.spec: Adrian Harvey The Zw... Functions in ntdll.dll are just alternate entry points for the same functions as the Nt... function of the same names. Changed ntdll.spec to match this. * include/module.h, include/pe_image.h, loader/module.c, loader/pe_image.c, relay32/builtin32.c: Ulrich Weigand Reorganized PE module loading to prepare for elf-dll loader. WINE_MODREF creation moved to one central location. Bugfix: correctly select native/built-in version if .DLL extension is missing in LoadLibrary call. * multimedia/mmsystem.c: Eric Pouech Changed error values MCI_INTERNAL to their correct values. * multimedia/mciwave.c: Eric Pouech Removed warning. * multimedia/mcistring.c: Eric Pouech No longer sending directly messages to DriverProc but rather go through MCI layer (required for open/close). * multimedia/mcicda.c: Eric Pouech Removed incorrect patch for MCI_OPEN anc MCI_CLOSE parameters (thanks to Robert Riggs for pointing out the bug, see the fix in mcistring.c) Fixed MCI seeking on CD audio. * include/winerror.h: Juergen Schmied Stubs for WaitNamedPipe[A|W]. * dlls/shell32/classes.c, dlls/shell32/dataobject.c, dlls/shell32/iconcache.c, dlls/shell32/shell32_main.h, dlls/shell32/shlfolder.c, include/shell.h, relay32/shell32.spec: Juergen Schmied Small fixes. * dlls/shell32/shellord.c: Juergen Schmied Stub Control_FillCache_RunDLL. * dlls/shell32/shell32_main.c: Juergen Schmied SHGetFileInfo32A: get SHGFI_SYSICONINDEX implemented. * dlls/shell32/pidl.c: Juergen Schmied ILAppend seems to work now. * relay32/kernel32.spec, win32/kernel32.c: Juergen Schmied Stubs for WaitNamedPipe[A|W]. Tue Dec 15 18:04:58 1998 Alexandre Julliard * files/directory.c: Huw D M Davies Fix GetTempPath32 if count=0. * configure, configure.in, include/config.h.in, include/multimedia.h, multimedia/audio.c, multimedia/dsound.c, multimedia/init.c, multimedia/mcicda.c, multimedia/mcimidi.c, multimedia/midi.c, multimedia/mixer.c, multimedia/mmaux.c: Todd Vierling - add -lossaudio if needed, and a check for , to configure.in (run autoconf after this). Note that the check has been altered to break out of the AC_CHECK_HEADERS after the first match - this is so , if found on NetBSD (a `real' OSS), will not conflict with the emulated ossaudio. - check for along with the other two in a mutually-exclusive manner in the various *.c files that need it; change include of "mmsystem.h" to "multimedia.h" so this logic is all in one place - change mcicda.c to allow for CD audio manipulation on NetBSD. This includes: * changing ioctl() calls to be NON-SPLIT with exactly 3 args; on NetBSD ossaudio, ioctl() is #defined to be _oss_ioctl by , and neither splitting with #-directives nor a two-arg ioctl work; * changing the #if logic to allow both FreeBSD and NetBSD to share the appropriate code blocks - block out MIDI code for NetBSD (init.c) and/or missing SNDCTL_MIDI_INFO (midi.c, mcimidi.c). NetBSD's OSS emulation does not (yet) support MIDI. Thanks go to mycroft@netbsd.org for the 99% bulk of this work. * tsx11/X11_calls, tsx11/ts_xutil.c, windows/x11drv/wnd.c, include/ts_xutil.h: Dirk Thierbach Set the class hints for managed windows. * files/dos_fs.c: Juergen Schmied Bugfix: GetFullPathName sets lpFilePart only when the last element does not end with '\'. * windows/message.c, windows/win.c, include/commctrl.h, include/commdlg.h, include/ddeml.h, include/mouse.h, include/shlobj.h, include/winbase.h, include/windows.h, include/winerror.h, include/wingdi.h, include/wintypes.h, misc/ddeml.c, objects/bitmap.c, objects/brush.c, objects/dc.c, objects/font.c, objects/gdiobj.c, relay32/gdi32.spec, relay32/user32.spec, controls/menu.c, dlls/comctl32/commctrl.c, graphics/bitblt.c, graphics/escape.c, graphics/metafiledrv/init.c, graphics/painting.c, graphics/path.c, if1632/user.spec: Paul Quinn Lots of new defines and stubs. * Make.rules.in, Makefile.in, configure, configure.in: Todd Vierling These patches add support for --enable-dll on NetBSD, and may even do so for FreeBSD a.out. Now, NetBSD can use libwine as a shared object. Thanks to mycroft@netbsd.org for doing this work! * tools/wrc/writeres.c: Todd Vierling Global constructors using `.section .ctors' are bogus for NetBSD's assembler. Use the appropriate `.stabs' when on NetBSD. * ole/variant.c: Todd Vierling Undefined CHAR_MAX and CHAR_MIN (#defined by NetBSD's system headers). Fixed some constants that are too big for a plain `int'. * ole/variant.c: Marcus Meissner Check for MAXFLOAT if FLT_MAX isn't there. * graphics/psdrv/Makefile.in: Todd Vierling graphics/psdrv forgets to pull in @DLLFLAGS@, and so is compiled non-PIC if using --enable-dll. * include/wingdi.h, include/wintypes.h, include/winuser.h, include/windows.h: Veksler Michael Move declarations from windows.h to wingdi.h and winuser.h. Mon Dec 14 18:15:11 1998 Alexandre Julliard * win32/console.c, files/Makefile.in, files/async.c, files/file.c, include/async.h, include/file.h, loader/signal.c, misc/winsock_dns.c: Marcus Meissner Made async IO (SIGIO) stuff from WINSOCK generic useable. Added async IO support to FILE and CONSOLE objects. * misc/winsock.c: Stephen Langasek Prevent segfault in setsockopt when optname is SO_LINGER and optval is null. * dlls/shell32/shell32_main.h, dlls/shell32/shellord.c, dlls/shell32/shlfolder.c, dlls/shell32/shlview.c, relay32/shell32.spec: Juergen Schmied Some cleanup. * dlls/shell32/iconcache.c: Juergen Schmied SHMapPIDLToSystemImageListIndex try's to determine and load the exact icon for files (by type) now. * dlls/shell32/classes.c: Juergen Schmied New HCR_GetDefaultIcon (internal). * include/dosexe.h, loader/dos/dosvm.c, loader/dos/module.c, msdos/dosmem.c, msdos/dpmi.c: Ove Kaaven Moved DPMI wrapper allocation code to dosmem.c to REALLY make the RMcall shortcuts independent of dosmod. SS had been left out of the REALMODECALL copy routines for some reason, fixed now. Also cleaned up a few compiler warnings. * graphics/x11drv/xfont.c: Ian Pilcher Added ability to specify X fonts used for Helv and Tms Rmn typefaces with DefaultSerif and DefaultSansSerif INI keys. * tools/wrc/parser.y, tools/wrc/wrc.h, tools/wrc/writeres.c, tools/wrc/CHANGES: Bertho Stultiens - Added a global label for elf-dll linking and a long with the resource size and a long with the directory size. - Killed an annoying warning since version 1.0.0 in parser.y about a var being used before init. * include/shlobj.h, dlls/shell32/shelllink.c, dlls/shell32/shellole.c: Juergen Schmied Adds the IPersistFile Interface to IShellLink[W] and gave both own IClassFactorys. * win32/console.c: Marcus Meissner (ReadConsole32A): small and stupid bug fixed (WriteConsoleOutput): bug fixed (attributes may change within lines) and enhanced speedwise by using buffering. (CONSOLE_string_2_IR): enhanced, now gets scancodes and virtualkeycodes * misc/crtdll.c, relay32/crtdll.spec: Marcus Meissner _ultoa implemented. * controls/static.c: Marcus Meissner Small hack to get rid of annoying err:resource: message for MessageBoxes. * relay32/dsound.spec: Ian Schmidt Fix off-by-1 error in DirectSound ordinals. Thanks to Robert Riggs for the pointer. * graphics/ddraw.c: Stephen Crowley Save the original video mode before going fullscreen and restore it when the last DirectDraw_Release is called. Also fix a problem where the viewport wasn't set to 0,0. * console/xterm.c: Joseph Pranevich Made more cross-platform by changing ->_fileno to fileno(). * windows/win.c: NF Stevens Fix the Z-order of maximized/minimized child windows. * graphics/x11drv/xfont.c: Huw D M Davies XLFDs should be well-formed (14 hyphens) to match scalable fonts. Stop slant field becoming wildcarded too early. * windows/focus.c: Marcus Meissner (FOCUS_SwitchFocus) check for pFocusTo == NULL instead of hFocusTo==0. * ole/ole2nls.c: Huw D M Davies Hack OLE_GetFormat* to return something if datelen = 0. Remove unnecessary WINAPI's. ---------------------------------------------------------------- Fri Dec 11 15:04:11 1998 Alexandre Julliard * include/process.h, include/tlhelp32.h, include/toolhelp.h, misc/toolhelp.c, scheduler/k32obj.c, scheduler/process.c: Patrick Spinler Implemented CreateToolhelp32Snapshot, including two of the routines using snapshots, Process32First and Process32Next. * relay32/oleaut32.spec, include/mapidefs.h, include/oleauto.h, include/win16drv.h, include/wintypes.h, ole/compobj.c, ole/variant.c: Justin Bradford Most of the currency variant conversion functions implemented. Minor bugfixes and header tidying. * Makefile.in, configure, configure.in, dlls/rasapi32/Makefile.in, dlls/rasapi32/rasapi.c, include/debug.h, include/debugdefs.h, include/ras.h, include/wintypes.h, relay32/rasapi32.spec: Marcus Meissner Added RasEnumConnections stub. * dlls/shell32/shell32_main.h, dlls/shell32/shellpath.c, dlls/shell32/shlview.c: Juergen Schmied Bugfix in PathCombine32[A|W]. View menu in explorer and on right mouse button is working now. * dlls/shell32/pidl.c: Juergen Schmied Implemented ILGetDisplayName. * dlls/shell32/classes.c, dlls/shell32/shellord.c: Juergen Schmied Started implementation of ShellExecuteEx32A. Small changes. * dlls/shell32/.cvsignore, dlls/shell32/Makefile.in, dlls/shell32/shres.rc: Juergen Schmied Moved menu resources to rc-file. * include/pe_image.h, ole/ole2nls.c, win32/file.c: Marcus Meissner Two debug messages clarified, one useless prototype removed. * include/oleauto.h, ole/variant.c: Marcus Meissner 294 missing WINAPI added. * tools/testrun: Marcus Meissner Kill swapped out (wine) processes too and truncate diff after some xxx lines. * ole/ole2nls.c: Juergen Schmied Fixed SetLastError with wrong value. * misc/printdrv.c, objects/enhmetafile.c, graphics/painting.c, include/windows.h: Huw D M Davies Implement AbortDoc16, move AbortDoc32 and StartDoc32W to misc/printdrv.c and fix a few compile warnings. * win32/ordinals.c, windows/driver.c, windows/msgbox.c, windows/multimon.c, windows/user.c, dlls/comctl32/animate.c, dlls/comctl32/comboex.c, dlls/ntdll/nt.c, if1632/typelib.spec, include/file.h, loader/dos/module.c, msdos/int21.c, ole/ole2nls.c, ole/typelib.c: Andreas Mohr Fixed a bunch of compiler warnings. * files/file.c: Marcus Meissner Added Win32 synchro to FILEs (useful only for terminal handles). Thu Dec 10 16:04:51 1998 Alexandre Julliard * objects/bitmap.c, objects/dc.c, objects/enhmetafile.c, objects/font.c, objects/metafile.c, relay32/comctl32.spec, relay32/gdi32.spec, relay32/kernel32.spec, relay32/mpr.spec, relay32/shell32.spec, relay32/tapi32.spec, relay32/user32.spec, relay32/winspool.spec, win32/console.c, win32/kernel32.c, win32/time.c, windows/input.c, windows/message.c, graphics/metafiledrv/init.c, if1632/ddeml.spec, include/commctrl.h, include/ddeml.h, include/shlobj.h, include/windows.h, include/wintypes.h, memory/string.c, misc/ddeml.c, misc/network.c, misc/printdrv.c, misc/tapi32.c, controls/edit.c, dlls/comctl32/Makefile.in, dlls/comctl32/comctl32undoc.c, dlls/comctl32/propsheet.c, dlls/shell32/shell32_main.c, files/file.c, graphics/painting.c: Francis Beaudet Sylvain St-Germain Thuy Nguyen Lots of new stubs. * msdos/vxd.c: Ulrich Weigand Let the System_Time_Selector clock tick. * loader/dos/module.c, miscemu/instr.c, msdos/dosmem.c, graphics/dispdib.c, graphics/vga.c, include/miscemu.h, include/vga.h: Ulrich Weigand Adapted to CreateSystemTimer interface change. * if1632/system.spec, if1632/thunk.c, include/callback.h, include/windows.h, misc/callback.c, misc/system.c: Ulrich Weigand Cleaned up CreateSystemTimer interface for use with 32-bit callbacks. (NOTE: 16-bit callbacks still don't work!) * windows/mdi.c: NF Stevens - Handle WM_MDIRESTORE by calling WM_SYSCOMMAND for the child window so that the system menu is set correctly. - In MDICascade and MDITile use WM_MDIRESTORE message to restore maximized window so that system menu is handled correctly. * include/oleauto.h, include/winerror.h, ole/Makefile.in, ole/typelib.c, ole/variant.c, relay32/oleaut32.spec: Jean-Claude Cote Added implementation of the VARIANT APIs. * files/drive.c: Uwe Bonnes Fixed DRIVE_GetFreeSpace to handle space > 4 GByte. * dlls/comctl32/treeview.c: Alex Priem handle TVIF_TEXT by TREEVIEW_SetItem according to MS documentation. better handling of LPSTR_TEXTCALLBACK32A TREEVIEW_GetNext|PrevListItem didn't descend into visible child items. * loader/pe_image.c: Marcus Meissner Warn if two .exes conflict with each other and the second does not have relocation records. * misc/commdlg.c: Uwe Bonnes Fixed GetFileTitle32A not filling up lpTitle if lpFile didn't contain '/','\\' or ':'. * graphics/ddraw.c: Stephen Crowley Fixed a potential crash if a usable video mode is not detected. * tools/make_authors: Script to generate authors files * include/dinput.h, windows/dinput.c: Robert Riggs Stubs for IDirectInputEffect and IDirectInputDevice2A methods, as well as AddRef(), GetCapabilites(), EnumObjects(), GetProperty(), GetObjectInfo(), GetDeviceInfo(), Initialize(), and RunControlPanel() for IDirectInputDevice. * graphics/ddraw.c: Robert Riggs Set window focus in _common_IDirectDraw_SetDisplayMode(). * multimedia/mcicda.c: Robert Riggs Accept MCI_OPEN and MCI_CLOSE messages in MCICDAUDIO_DriverProc32(). * include/win.h, windows/win.c, windows/x11drv/event.c, windows/x11drv/wnd.c: Ulrich Weigand Removed deferred Expose events handling. * windows/dce.c: Ulrich Weigand Don't clip VisRgn against X desktop. * loader/module.c: Ulrich Weigand LoadModule32/WinExec32 should return 16-bit hInstance/hTask. * graphics/x11drv/xfont.c: Huw D M Davies Sanity check on font size. * dlls/comctl32/treeview.c: Marcus Meissner Missing parentheses added. Wed Dec 9 16:37:05 1998 Alexandre Julliard * loader/task.c, relay32/kernel32.spec, win32/console.c, include/wincon.h: Marcus Meissner Enhanced Win32 Console (XTERM) - inputhandling enhanced (keys and mouseclicks) - win32 synchronization (partial) - lots of enhancements to drawing functions - simple/complex console (simple-stdin/stdout -> complex-xterm). * console/Makefile.in, console/generic.c, console/interface.c, console/ncurses.c, console/tty.c, console/xterm.c, include/console.h: Joseph Pranevich Add a driver to open up a new xterm window whenever console output is needed. Derived from console/win32.c but we are not yet ready to merge the code completely. * graphics/x11drv/xfont.c, include/windows.h, tools/fnt2bdf.c: Pablo Saratxaga Improved the handling of font encodings. * msdos/dpmi.c, include/miscemu.h: Ove Kaaven Implemented DPMI RMCBs using the DOS subsystem, and a few other improvements. Also, some special-cased shortcut paths will allow some common real-mode call/RMCB combinations to work even without calling the DOS subsystem, thus letting APIs like DOSASPI work without any dirty hacks even on platforms that cannot use dosmod. * multimedia/time.c, ole/compobj.c, files/change.c, loader/module.c, misc/lzexpand.c, misc/main.c, controls/menu.c, controls/scroll.c: Marcus Meissner Some unnecessary #include and messages removed. * ole/ole2nls.c: Uwe Bonnes Some small corrections to EnumSystemLocales32AW Tue Dec 8 15:06:39 1998 Alexandre Julliard * tools/make_X11wrappers, tsx11/ts_xf86vmode.c, graphics/ddraw.c: Tried another kludge for the Xmd.h problem. * tsx11/Makefile.in, tsx11/X11_calls, tsx11/ts_xf86vmode.c, configure, configure.in, graphics/ddraw.c, include/acconfig.h, include/config.h.in, include/ts_xf86vmode.h, tools/make_X11wrappers: Stephen Crowley Added fullscreen DGA support. * misc/main.c: Pablo Saratxaga Fixed dummy entries in MAIN_ParseLanguageOption(). * include/mmsystem.h, multimedia/mcicda.c: Brian Gerst Properly implement MCI_CDA_STATUS_TYPE_TRACK. Fix an off-by-one bug with MCI_STATUS_LENGTH. * windows/x11drv/event.c: Marcus Meissner Superflous WINAPI removed. * loader/pe_image.c: Marcus Meissner Warn about invalid entrypoints (created by viruses) which result in Wine crashes. * graphics/ddraw.c: Marcus Meissner Create X11 palette on DirectDrawSurface::SetPalette, not before (we might not have an X11 window yet). * loader/main.c: Marcus Meissner Move TWEAK_Init from USER to GDIInit. * graphics/painting.c, if1632/gdi.spec, include/windows.h, misc/printdrv.c, misc/spooler.c, relay32/gdi32.spec: Huw D M Davies Fix for SetAbortProc16, stub for SetAbortProc32 and tidy up some other printing functions. * windows/focus.c: Huw D M Davies Fix includes. * graphics/x11drv/text.c: Huw D M Davies Fix X11DRV_ExtTextOut for rotated text if either of lpDx, breakExtra or charExtra are non-zero. * include/Attic/graphics.h, misc/shell.c, windows/Attic/graphics.c, windows/Makefile.in, windows/nonclient.c, windows/scroll.c, controls/button.c, controls/combo.c, controls/desktop.c, controls/icontitle.c, controls/menu.c, controls/scroll.c, dlls/comctl32/updown.c, dlls/shell32/shell32_main.c, dlls/shell32/shellord.c, graphics/metafiledrv/graphics.c, graphics/x11drv/graphics.c: Huw D M Davies Replace GRAPH_ functions with Win SDK equivalents. Mon Dec 7 16:23:42 1998 Alexandre Julliard * files/dos_fs.c: Alexander Larsson Reverted previous patch. * include/dosexe.h: Ove Kaaven Don't define MZ_SUPPORTED on non-i386 platforms. * loader/dos/module.c, msdos/dpmi.c: Ove Kaaven Fixed DPMI_CallRMProc (I think). * misc/network.c, relay32/mpr.spec: Marcus Meissner Stub for NPSGetProviderHandleA. * windows/x11drv/keyboard.c: Brian Gerst The scancode Windows send for extended keys is the scancode of the unextended equivalent of the key, plus the extended flag. * dlls/winaspi/winaspi16.c: Andreas Mohr Fixed a real mode problem. * loader/ne/module.c: Andreas Mohr NE_MODULE.stack_size was set to a ridiculously small value of 5. Windows sets 0x1400 in such cases for programs. * controls/static.c: Huw D M Davies We don't yet want the static control to call DestroyIcon. * windows/class.c: NF Stevens Added case for GCW_ATOM int GetClassLong32A. * misc/network.c, relay32/mpr.spec: Gael de Chalendar Stub for WNetOpenEnum32W. * multimedia/dsound.c, relay32/dsound.spec: Robert Riggs More general code cleanup for readability. A few more parameter validation checks. Return DS_OK rather than 0 in a number of functions. Fixed primary buffer ref count bug in CreateSoundBuffer(). Handle 1-3 byte sound fragments that would cause buffer overruns. Clear primary buffer with a neutral value instead of always 0 (because 128 is neutral for 8-bit sound). Fix bug with mixing 8-bit sound into the primary buffer. Broke out the main block in DSOUND_thread() to another function for readability. Handle "no audio" and "audio busy" cases properly when initializing dsound. Rename DllCanUnloadNow() to DSOUND_DllCanUnloadNow(). * debugger/hash.c: Ove Kaaven Made variables optimized into registers accessible. * relay32/user32.spec: Uwe Bonnes The spec definition for MonitorFromWindow was wrong. * msdos/int21.c: Stefan Leichter File handle bug fix. * documentation/common_controls: Eric Kohl Added paragraph about different dll versions and structure sizes. * include/commctrl.h: Eric Kohl Added missing TOOLINFO structure. * multimedia/mmsystem.c: Andreas Mohr Fixed a heap bug. * loader/task.c, memory/local.c, memory/selector.c, misc/callback.c, msdos/dpmi.c, msdos/int41.c, msdos/vxd.c, if1632/kernel.spec, if1632/thunk.c, include/callback.h, include/ldt.h, include/windows.h: Andreas Mohr - Several kernel.spec return type mismatch fixes - [GS]etSelectorBase Win32s offset support by Ulrich Weigand (thanks v.m. !!) - Move AppToWine/WineToApp macros as W32S_APP2WINE etc. to ldt.h - LocalNotify() basic support - Fixes for local heap handling with heap handles created by Virtual*() * graphics/x11drv/xfont.c: Ulrich Weigand Bugfix: -microsoft-symbol encoding was not recognized. * windows/win.c: Ulrich Weigand Bugfix: WIN_ResetQueueWindows would skip some windows. * tools/build.c: Ulrich Weigand Allow recursively reentering CALL32_LargeStack. * include/ttydrv.h, windows/ttydrv/.cvsignore, windows/ttydrv/Makefile.in, windows/ttydrv/clipboard.c, windows/ttydrv/event.c, windows/ttydrv/init.c, windows/ttydrv/keyboard.c, windows/ttydrv/mouse.c, windows/ttydrv/wnd.c, Makefile.in, configure, configure.in: Patrik Stridvall Added the new TTY driver. * include/clipboard.h, include/keyboard.h, include/message.h, include/win.h, include/x11drv.h, windows/clipboard.c, windows/defwnd.c, windows/dinput.c, windows/display.c, windows/event.c, windows/focus.c, windows/keyboard.c, windows/message.c, windows/nonclient.c, windows/win.c, windows/winpos.c, windows/x11drv/Makefile.in, windows/x11drv/clipboard.c, windows/x11drv/event.c, windows/x11drv/init.c, windows/x11drv/keyboard.c, windows/x11drv/mouse.c, windows/x11drv/wnd.c: Patrik Stridvall Moved more code to the X11 driver. Thu Dec 3 16:29:56 1998 Alexandre Julliard * msdos/int10.c, msdos/int16.c, msdos/int21.c, msdos/int29.c: Joseph Pranevich Call the new console driver for some routines. This is not completely done yet and more for testing purposes. Wed Dec 2 19:58:09 1998 Alexandre Julliard * configure.in, console/.cvsignore, console/Makefile.in, console/generic.c, console/interface.c, console/ncurses.c, console/tty.c, include/acconfig.h, include/config.h.in, include/console.h, include/winnt.h, loader/main.c, misc/main.c, Makefile.in, configure: Joseph Pranevich Added console support. * graphics/x11drv/oembitmap.c, include/bitmap.h, include/gdi.h, include/x11drv.h, loader/main.c, objects/Attic/oembitmap.c, objects/Makefile.in, objects/bitmap.c, objects/cursoricon.c, graphics/metafiledrv/init.c, graphics/psdrv/init.c, graphics/win16drv/init.c, graphics/win16drv/pen.c, graphics/x11drv/Makefile.in, graphics/x11drv/init.c: Huw D M Davies Move OEM resources to the x11drv. * files/dos_fs.c: Alexander Larsson Opening a file in a directory which doesn't exist returns ERROR_FILE_NOT_FOUND instead of ERROR_PATH_NOT_FOUND. * memory/atom.c: Marcus Meissner Handle atoms "# non number" (oracle client). Tue Dec 1 16:23:19 1998 Alexandre Julliard * if1632/kernel.spec, misc/error.c: Ulrich Weigand Renamed KERNEL.327 to HandleParamError (as in 'Undoc. Windows'). Fixed wrong ordinals/prototype for MapProcessHandle/GetModuleFileName32. Added names for some undocumented exports. * memory/global.c, if1632/thunk.c: Ulrich Weigand Implemented GlobalChangeLockCount (KERNEL.365). * if1632/toolhelp.spec, include/toolhelp.h, memory/heap.c: Ulrich Weigand Implemented Local32Info, stubs for Local32First/Next (KERNEL.444-446). * if1632/gdi.spec, objects/gdiobj.c: Ulrich Weigand Implemented GdiFreeResources (GDI.609). * include/dsound.h, multimedia/dsound.c: Robert Riggs Fixed 8-bit WAV format handling (it is unsigned data). Fixed off-by-one checks for buffer wrap. Increment ref count for primary buffer in CreateSoundBuffer(). Added DSBPN_OFFSETSTOP support to position notification code. Lots of minor parameter validation checks. Stubs for: IDirectSound_initialize(), IDirectSound_Compact(), and IDirectSound_GetSpeakerConfig(). Fixed freq shifting with 16-bit data problem, fixed 8bit<->16bit conversion. Lots of thread locking for DirectSound buffers. Dealloc primary buffer when dsound is deallocated. * include/wintypes.h: Uwe Bonnes Added the TEXT() and MAKELRESULT() definitions. * windows/queue.c: Juergen Schmied Small change. * Makefile.in: James Juran Revert misguided change to install_lib that broke -disable-lib configure option. * misc/main.c, include/windows.h: Juergen Schmied New parameter SPI_GETDRAGFULLWINDOW. One missing break in SPI_GETDRAGFULLWINDOW. * dlls/shell32/pidl.c, relay32/shell32.spec: Juergen Schmied New functions ILGlobalClone/ILGlobalFree. * documentation/printing: Huw D M Davies Add a note about WinPrinters. * relay32/ntdll.spec, relay32/ole32.spec, relay32/user32.spec: Marcus Meissner Added some stubs, some ptr->str conversions. * graphics/ddraw.c, include/ddraw.h, relay32/ddraw.spec: Lionel Ulmer - added definition of DirectDrawCreateClipper. - more versatile support of surfaces / better surface description support. * dlls/shell32/shell32_main.c, dlls/shell32/shell32_main.h, dlls/shell32/shellord.c, dlls/shell32/shellpath.c, dlls/shell32/shlview.c, include/shell.h, relay32/shell32.spec: Juergen Schmied Fixed wrong parameter count for SHChangeNotifyDeregister, SHFreeUnusedLibraries. New functions ParseField, Get/SetInstanceExplorer(), PathIsUNC, PathIsRelative. Stubs SHWaitForFileToOpen, PathFindOnPath. * relay32/user32.spec: Juergen Schmied Small changes to print the strings in the relay-trace. * windows/class.c: NF Stevens The class name needs to be converted to a getptr. * multimedia/mcimidi.c: Eric Pouech Fixed memory/status recovery when error occured in MIDI_mciOpen. Fixed support for RMID files in MIDI_mciOpen. Fixed bug for playing MIDI files with tempo changes. Sound output is now correct, but length of tracks (and therefore of whole file) is not correct. Changed error values (INTERNAL => INVALID_FILE) when file cannot be read. * multimedia/mciwave.c: Eric Pouech Fixed memory/status recovery when error occured in WAVE_mciOpen. Changed error values (INTERNAL => INVALID_FILE) when file cannot be read. * multimedia/msvideo.c, relay32/msvfw32.spec: Juergen Schmied Stubs for MCIWndCreate[A|W]. * misc/ver.c: Juergen Schmied VerQueryValue, bugfix: we cant convert binary data with HEAP_strdupWtoA (\VarFileInfo\Translation). Mon Nov 30 17:41:17 1998 Alexandre Julliard * relay32/advapi32.spec, win32/advapi.c: Juergen Schmied Stubs for EnumServiceStatus32, small changes. * objects/cursoricon.c: Juergen Schmied Load now the first icon from the *.ani file instead of crashing. * miscemu/main.c: Marcus Meissner Fix warnings in miscemu/main.c. * include/windows.h: Uwe Bonnes - added some defines around the CommPort (PURGE_XXX and MS_XXX_ON) - added the DLGTEMPLATE and DLGITEMTEMPLATE structures - added the function definition for StartPage,EndPage,GetCommMask, GetCommModemStatus and PurgComm,WaitCommEvent. * windows/defwnd.c: Paul Quinn Fixed activation/Focus message order problem when creating a new HWND. * windows/winpos.c, if1632/user.spec, include/windows.h, relay32/user32.spec: Paul Quinn Implementation of ChildWindowFromPointEx functions. * misc/registry.c: Gavriel State Fixed registry query error value: now returns ERROR_FILE_NOT_FOUND. * objects/bitmap.c, objects/cursoricon.c, objects/dib.c, objects/palette.c: Huw D M Davies GetSystemPaletteEntries returns palette size if entries==NULL. Use this instead of COLOR_GetSystemPaletteSize. * relay32/dsound.spec, multimedia/dsound.c: Marcus Meissner Implemented class factory for dsound. * relay32/kernel32.spec, misc/comm.c: Uwe Bonnes - fixed a minimal error in GetCommMask definition. - adds stubs for GetCommModemStatus and WaitCommEvent. * include/xmalloc.h, library/winestub.c: Uwe Bonnes Fixes for C++ Winelib compilation. * ole/compobj.c: Marcus Meissner Bugfix: second RegOpenKey should use CLSIDkey instead of HKEY_CLASSES_ROOT. Fri Nov 27 16:06:08 1998 Alexandre Julliard * BUGS, documentation/bugreports, documentation/debugging, documentation/no-windows, documentation/wine.man: James Juran Documentation updates. * Makefile.in: James Juran Fixed 'make install' to really check for libwine.a before installing it. * graphics/ddraw.c, include/options.h, misc/main.c: Stephen Crowley Added a new cmdline switch to disable XF86 DGA Extensions, -nodga. * files/drive.c: Andreas Mohr Improved GetDiskFreeSpace32A(). Thu Nov 26 16:32:00 1998 Alexandre Julliard * windows/win.c: Huw D M Davies Remove included color.h. * loader/pe_image.c: Marcus Meissner Remove unnecessary check for entrypoint address (test binary was infected by a virus which uses invalid PE loading stuff). * graphics/painting.c, relay32/gdi32.spec: Uwe Bonnes Added stubs for Startpage and EndPage. * if1632/thunk.c, objects/dc.c: Ulrich Weigand Removed some unnecessary FIXME outputs. * if1632/kernel.spec, loader/task.c: Ulrich Weigand Implemented KERNEL.602 and stub for KERNEL.490. * ole/ole2nls.c: Ulrich Weigand Bugfix: Do *not* zero out output buffer in GetNumberFormat32[AW]. Wed Nov 25 18:15:53 1998 Alexandre Julliard * ole/nls/grc.nls, ole/nls/sky.nls, ole/nls/tha.nls, ole/nls/trk.nls, ole/ole2nls.c: Pablo Saratxaga Small fixes. * loader/ne/resource.c, include/module.h, loader/resource.c: Ulrich Weigand Moved ...Resource16 routines to loader/resource.c. Implemented accessing PE-file resources with 16-bit resource routines. * if1632/kernel.spec, loader/ne/Makefile.in, loader/ne/convert.c: Ulrich Weigand Implementation of PE->NE resource conversion routines (KERNEL.615-618). * include/oleauto.h, ole/ole2disp.c, relay32/oleaut32.spec: Francis Beaudet Implemented 3 methods: SysAllocStringLen(), SysReAllocStringLen() and SysStringLen(). Ensure that the BSTR objects were allocated according to the Windows documentation. * dlls/shell32/Makefile.in, dlls/shell32/pidl.c, dlls/shell32/shell32_main.c, dlls/shell32/shellord.c, dlls/shell32/shellpath.c, dlls/shell32/shlview.c, include/shell.h, relay32/shell32.spec: Juergen Schmied Moved existing path - functions to shellpatch.c. New: PathRemoveBlanks32A|W, PathMatchSpec32A|W, PathSetDlgItemPath32A|W. * dlls/shell32/folders.c, dlls/shell32/shelllink.c, dlls/shell32/shellole.c, include/shlobj.h: Juergen Schmied Moved existing IShellLink class. New stubs for IShellLinkW. * include/bitmap.h, include/color.h, include/gdi.h, include/x11drv.h, include/x11font.h, misc/main.c, objects/bitmap.c, objects/color.c, objects/dc.c, objects/gdiobj.c, windows/Attic/graphics.c, windows/dce.c, windows/display.c, windows/event.c, windows/input.c, windows/mouse.c, windows/scroll.c, windows/sysmetrics.c, windows/user.c, graphics/ddraw.c, graphics/painting.c, graphics/wing.c, graphics/x11drv/bitblt.c, graphics/x11drv/bitmap.c, graphics/x11drv/brush.c, graphics/x11drv/clipping.c, graphics/x11drv/dib.c, graphics/x11drv/graphics.c, graphics/x11drv/init.c, graphics/x11drv/pen.c, graphics/x11drv/text.c, graphics/x11drv/xfont.c: Huw D M Davies Remove X_DC_INFO from DC and make it behave like any other PDEVICE. * include/miscemu.h, msdos/dpmi.c, msdos/int21.c, msdos/int25.c, msdos/int26.c, msdos/int2f.c, msdos/xms.c: Ulrich Weigand Changed CTX_SEG_OFF_TO_LIN to allow linear addresses in 32-bit registers (used by DeviceIoControl). Adapted all users. * include/winioctl.h, win32/device.c: Ulrich Weigand Implemented (most) VWin32.VxD DeviceIoControl routines. Tue Nov 24 20:47:17 1998 Alexandre Julliard * include/thread.h, scheduler/thread.c: Ulrich Weigand Bugfix: Set the TEBF_WIN32 flag in teb.flags for 32-bit threads. * loader/task.c: Ulrich Weigand Bugfix: Call InitThreadInput in GetFastQueue with correct parameter for 32-bit queues. * win32/kernel32.c: Ulrich Weigand Bugfix: [QF]T_Thunk should clear HIWORD(EAX) on return. Bugfix: hack for stupid USER32 CallbackGlueLS routine in Common32ThkLS. * if1632/thunk.c: Ulrich Weigand Bugfix: Bad jump generated in THUNK_AllocLSThunklet. Bugfix: Forgot to convert segptr in AllocLSThunkletCallbackEx. * graphics/x11drv/xfont.c: Eric Warnke Don't match against Symbol or Nil fonts. * memory/global.c: Stephen Crowley Return the "buffers" and "cached" memory as free since it is deallocated when a program needs it anyway. * windows/dialog.c, include/windows.h: Juergen Schmied Bugfix: SetDlgItemText32 returns BOOL not void. * relay32/user32.spec, windows/user.c: Juergen Schmied New stubs GetUserObjectInformationA|W. * relay32/relay386.c: Marcus Meissner Removed left over 'show' and useless deadbeef checking which doesn't work. * loader/pe_image.c: Marcus Meissner Adjust broken entrypoint addresses. (win98 notepad.exe) * documentation/status/multimedia: Eric Pouech Updated according to development. * if1632/mmsystem.spec, relay32/winmm.spec: Eric Pouech Some new stubs (midiStreamXXX functions, some mci functions, and some mmio functions). * multimedia/midi.c: Eric Pouech Moved MCI part to mcimidi.c ; added DriverProc. * multimedia/audio.c: Eric Pouech Moved MCI part to mciwave.c ; added some error checking ; added DriverProc * include/debug.h, include/debugdefs.h, multimedia/Makefile.in: Eric Pouech Added mcimidi and mciwave. * multimedia/mcimidi.c: Eric Pouech Fixed bug in MCI_INFO command ; fixed pause/resume commands ; fixed seek command. * multimedia/mciwave.c: Eric Pouech Starting writing MCI part ; fixed bug in MCI_INFO command. * multimedia/mmio.c: Eric Pouech Added some missing stubs in 32 bit part. * multimedia/mcistring.c: Eric Pouech Made use of new 16/32 MCI message handling in mmsystem.c. * include/mmsystem.h, include/multimedia.h: Eric Pouech Added some new functions/structures definitions.(I couldn't get all the manifest constants values that MS was referring to in its specs... if someone has them...) * multimedia/mcianim.c: Eric Pouech Added some error checking ; made use of new 16/32 MCI message handling in mmsystem.c ; fixed bug in MCI_INFO command. * multimedia/mcicda.c: Eric Pouech Added some error checking ; made use of new 16/32 MCI message handling in mmsystem.c. Added Win95 command to handle cd-rom with both data and audio ; fixed bug in MCI_INFO command ; shadowing MCI status for devices that can't get current status ; fixed status not being updated on cd change. * multimedia/mmsystem.c: Eric Pouech Factorized 16/32 bit MCI function by using message mapping from 16 to 32 bits ; added some new prototypes mciSendCommand, mciSendString, mci(Set/Get)YieldProc ; started writing midiStreamXXX functions - not yet working. Fixed some issues regarding asynchronous MCI commands ; fixed MCI_SYSINFO command. * resources/sysres_Fr.rc: Eric Pouech Fixed some quirks. Sun Nov 22 18:29:50 1998 Alexandre Julliard * dlls/shell32/contmenu.c, dlls/shell32/dataobject.c, dlls/shell32/folders.c, dlls/shell32/iconcache.c, dlls/shell32/pidl.h, dlls/shell32/shell32_main.h, dlls/shell32/shlview.c: Juergen Schmied Many fixes. * dlls/shell32/pidl.c: Juergen Schmied New function: _ILGetExtension. * dlls/shell32/Makefile.in, dlls/shell32/classes.c: Juergen Schmied New file. HKEY_CLASSES_ROOT handling. * documentation/common_controls: Eric Kohl Updated. * dlls/comctl32/header.c, dlls/comctl32/status.c, dlls/comctl32/toolbar.c, include/commctrl.h, include/header.h, include/listview.h, include/ole2.h, include/rebar.h, include/status.h, include/toolbar.h, include/tooltips.h: Eric Kohl Added Unicode support (at least partially). * ole/Makefile.in, ole/compobj.c, ole/oleobj.c, include/oleobj.h, include/shlobj.h: Eric Kohl Added IOleAdviseHoler interface (still a dummy) and fixed CreateOleAdviseHolder(). * dlls/comctl32/commctrl.c, dlls/comctl32/tooltips.c: Eric Kohl Added global subclassing atom, used by tooltips and updown (not yet). * dlls/comctl32/rebar.c: Eric Kohl Improved layout code. * dlls/comctl32/imagelist.c, relay32/comctl32.spec: Eric Kohl Fixed ImageList_LoadImage(). * dlls/comctl32/comboex.c: Eric Kohl Added CMEM_SETITEM32A and message forwarding to combobox. * ole/moniker.c, relay32/ole32.spec: Eric Kohl Added stub for CreateItemMoniker(). * dlls/comctl32/comctl32undoc.c: Eric Kohl Fixed some undocumented function names and implemented DPA_Merge partially. * controls/button.c: Eric Kohl Enabled double click for buttons. * include/windows.h: Eric Kohl Added command and return constants used by WM_NOTIFYFORMAT. * objects/brush.c, objects/dc.c, objects/gdiobj.c, objects/pen.c, windows/Attic/graphics.c, graphics/painting.c, graphics/x11drv/bitblt.c, graphics/x11drv/dib.c, graphics/x11drv/graphics.c, graphics/x11drv/text.c, include/dc.h, include/x11drv.h: Huw D M Davies Moved DC_SetupGC functions to graphics/x11drv/graphics.c. * include/options.h, misc/main.c, ole/ole2nls.c: Juergen Schmied Small fixes to get the default language to a sensible value. Thanks to Pablo. * ANNOUNCE, DEVELOPERS-HINTS, README, documentation/README.documentation, documentation/how-to-port, documentation/wine.man, documentation/wine.texinfo: Douglas Ridgway Miscellaneous small fixes. * graphics/win16drv/prtdrv.c, if1632/gdi.spec, include/windows.h, objects/metafile.c, objects/region.c, relay32/gdi32.spec: Andreas Mohr Added Win16 implementation for GetRegionData(). * ole/typelib.c: Andreas Mohr Enhanced OABuildVersion() to return different version values for different winvers. * msdos/int21.c: Andreas Mohr Added INT21_ParseFileNameIntoFCB() and some other things to get COMMAND.COM working. * relay32/kernel32.spec: Juergen Schmied Added missing entry for GetNumberFormatW. * objects/palette.c: Juergen Schmied Checking for NULL-pointer. * ole/nls/fra.nls, ole/nls/frb.nls, ole/nls/frc.nls, ole/nls/frl.nls: Robert Pouliot Better OLE support in French languages. * loader/module.c: Juergen Schmied Implementation of CreateProcess32W. * windows/event.c: David Luyer Queuing of deferred Expose events. * controls/listbox.c: Marcus Meissner LB_GETTEXT: Handle passed NULL buffer. * controls/combo.c: Marcus Meissner CB_GETTEXT: Use lpBuffer instead of lpText for LB_GETTEXT32, handle 0 byte NULL buffer. * ole/nls/frs.nls, ole/nls/sky.nls, ole/ole2nls.c: Marcus Meissner Turn mega double switch into static table (reduces compile time). * AUTHORS, include/authors.h: Added Robert Riggs. * include/d3d.h: Robert Riggs include ddraw.h, questionable fix for questionable struct/union construct in MS's D3DVECTOR definition. * include/dsound.h: Robert Riggs More flags (DirectX 5.2), DirectSound3DListener and DirectSound3DBuffer structures, include some required files (windows.h, compobj.h, and d3d.h). * multimedia/dsound.c: Robert Riggs DirectSound3DListener and DirectSound3DBuffer stubs, new mixer code, primary buffer is implemented closer to what the SDK docs specify, other SDK documented behaviour enforced. Completed the devcaps list. * misc/crtdll.c, relay32/crtdll.spec: Juergen Schmied New stubs strdate, strtime. * memory/selector.c: Ulrich Weigand Bugfix: typo in SUnMapLS_IP_EBP_8 lead to stack corruption. * misc/comm.c: Cliff Wright Fixed a mask set, and other parity setting bugs for serial ports. * include/sig_context.h: Vasudev Mulchandani Added BSDI sigcontext definitions. * windows/class.c: Rein Klazes Fixed typo. * relay32/relay386.c: Marcus Meissner Remove now useless RELAY_ShowDebugmsgsRelay check. * loader/pe_image.c: Marcus Meissner Do not relocate the pointers in the IMAGE_THREAD_LOCAL_STORAGE directory, for they seem to be relocated by the standard relocating mechanism. (Explicitly checked one program using it) * dlls/shell32/shellord.c, include/shell.h: Marcus Meissner PathAddBackshlash, PathRemoveBackslash: argument is not constant. * windows/win.c: Marcus Meissner Check wndPtr for NULL. * graphics/ddraw.c: Marcus Meissner BltFast: Honor lPitch, Lock/Unlock surfaces (xlib needs unlock to draw). * misc/spooler.c, misc/Makefile.in, miscemu/main.c, Makefile.in, graphics/win16drv/init.c, loader/main.c: Huw D M Davies Takes print spooler functions out of win16drv. Allows the PostScript driver to go into libwine. * if1632/gdi.spec, objects/brush.c, objects/palette.c: Ian Schmidt Added stubs for two undocumented GDI routines, SetMagicColors and SetSolidBrush. This allows Win98 native USER to start up. * graphics/ddraw.c: Stephen Crowley Fixed the DGA detection code in ddraw. You don't need root access, having r+w access to /dev/mem is enough. * documentation/status/directdraw, graphics/ddraw.c, graphics/wing.c, include/ddraw.h: Marcus Meissner DirectDraw status updated. Use cooperative window for drawing in xlib implementation if possible. Slightly restructured IDirectDrawSurface::Blt so it doesn't crash. * windows/keyboard.c: David Faure Micro patch for AltGr key on german keyboards. * files/dos_fs.c: Juergen Schmied Fixes error handling (SetLastError() and return value). * objects/text.c, include/windows.h: Gael de Chalendar Partially complete GetTextCharsetInfo and corrects return values for this family of functions. Sun Nov 15 18:12:12 1998 Alexandre Julliard * ole/compobj.c: Juergen Schmied Bug fix. * objects/dib.c: Eric Kohl Fixed retrieval of invalid palette data in GetDIBits(). * windows/winpos.c: John Richardson Allow SWP_HIDEWINDOW to be called on windows that are already hidden without unmapping them again. * windows/scroll.c: Pim Bollen Fixed scroll bug in ScrollWindowEx32 which caused garbage on screen outside desktop window with gtwin.exe (Dutch banking program). * loader/main.c, memory/atom.c, misc/ddeml.c, windows/class.c, windows/message.c, include/Attic/atom.h, include/global.h: Small atom fixes. * objects/dib.c: Dirk Thierbach Fixed bug in StretchDIBits32 (wrong origin). * windows/winproc.c: Juergen Schmied Small fixes. * include/ddraw.h, include/ts_xshm.h, tools/make_X11wrappers, tsx11/X11_calls, tsx11/ts_xshm.c, graphics/ddraw.c: Lionel Ulmer Some corrections to the handling of off-screen buffers. Correction to the EnumDisplayModes function. Added XShm support to Xlib driver. Open a DirectX window even when using the DGA driver. * include/shell.h, include/shlobj.h, misc/shell.c, relay32/shell32.spec, dlls/shell32/Makefile.in, dlls/shell32/contmenu.c, dlls/shell32/dataobject.c, dlls/shell32/folders.c, dlls/shell32/shell32_main.c, dlls/shell32/shell32_main.h, dlls/shell32/shellole.c, dlls/shell32/shellord.c, dlls/shell32/shlfolder.c: Juergen Schmied Cleanup, small fixes, a few new stubs. * dlls/shell32/shlview.c: Juergen Schmied Handling for listviewstyles, view mode buttons in filedialogs enabled and handled. New listview columns Size, Type, Modified for reportview created and handled. * dlls/shell32/if_macros.h: Juergen Schmied New file, wrapper for IShellBrowser class. * dlls/shell32/iconcache.c: Juergen Schmied New file, some helper functions for icon cache. Implemented ExtractIconEx; moved SHMapPIDLToSystemImageListIndex, Shell_GetImageList in this file. * dlls/shell32/pidl.c, dlls/shell32/pidl.h: Juergen Schmied Implemented: ILIsEqal, ILFindChild, _ILGetFileDate, _ILGetFileSize. * loader/module.c: Juergen Schmied LoadLibraryEx: show a warning when called with unimplemented parm. * miscemu/instr.c: Cleaned up a bit. * memory/selector.c, miscemu/instr.c, tools/build.c: Marcus Meissner Clean invalid selectors on the pop %xs from the STACKFRAME itself instead of using linked list hack. * Makefile.in: Removed gets message. * ole/nls/tha.nls: David Luyer Added Thai nls-resources. * ole/nls/README, ole/nls/cze.nls, ole/nls/ese.nls, ole/nls/esg.nls, ole/nls/est.nls, ole/nls/euq.nls, ole/nls/fos.nls, ole/nls/hrv.nls, ole/nls/hun.nls, ole/nls/isl.nls, ole/nls/nor.nls, ole/nls/plk.nls, ole/nls/ptg.nls, ole/nls/rom.nls, ole/nls/slv.nls, ole/nls/sve.nls, ole/ole2nls.c, include/winnls.h: Pablo Saratxaga Display the language id for "XXX not supported for your language" messages. Added all languages and sublanguages for languages supported in resources/sysres_Xx. * ole/ole2.c, relay32/ole32.spec: Gavriel State Add stubs for GetRunningObjectTable32 and OleRegGetUserType. * ole/moniker.c: Gavriel State Ensure that CreateFileMoniker functions don't return a bogus moniker object on failure. * include/class.h, windows/class.c: Gavriel State Added code to manage Ascii and WideChar class names, and to return the names in the GetClassInfo functions. * include/winsock.h: Constantine Sapuntzakis Fix to Linux IPX so compiles on non-linux platforms. * misc/main.c: Marcus Meissner Own X11 errorhandler to locate X11 errors. Useful only with -sync. Sat Nov 14 18:59:30 1998 Alexandre Julliard * include/color.h, include/imagehlp.h, include/palette.h, memory/global.c, misc/registry.c, windows/defwnd.c: Juergen Schmied Fixed warnings, some only visible with -Wstrict-prototypes or -pedantic. * include/cursoricon.h, include/display.h, include/message.h, objects/cursoricon.c, windows/display.c, windows/mouse.c, windows/x11drv/init.c, if1632/display.spec: Ulrich Weigand Moved X11 mouse cursor handling to the DISPLAY driver. * if1632/thunk.c, include/callback.h, loader/main.c, loader/task.c, misc/callback.c, miscemu/main.c: Ulrich Weigand Some fixes to Wine startup/termination sequence with native USER. Do not call built-in USER signal handler when using native USER. * debugger/break.c, include/debugger.h, include/task.h: Ulrich Weigand Bugfix: -debug didn't work anymore after the last startup sequence patch. * ole/compobj.c: Eric Kohl Fixed list insertion bug in CoLoadLibrary(). * if1632/wprocs.spec, msdos/Makefile.in, msdos/int2f.c, msdos/int41.c, msdos/vxd.c: Ulrich Weigand Added stubs for several VxDs / interrupts. * if1632/thunk.c, include/callback.h, misc/callback.c, graphics/win16drv/init.c: Huw D M Davies Should get win16drv AbortProc working. Hopefully. * windows/input.c, windows/keyboard.c: Ulrich Weigand Moved GetKeyboardLayoutName16 to windows/input.c. * include/imagehlp.h, include/winnt.h, include/wintypes.h: Patrik Stridvall Moved some declarations from imagehlp.h to common include files. * relay32/kernel32.spec, win32/thread.c: Rein Klazes Added implementations for InterlockedExchangeAdd() and InterlockedCompareExchange(). * win32/console.c, objects/dib.c, objects/enhmetafile.c: Huw D M Davies Fixes a few of the many compiler warnings. * miscemu/instr.c: Marcus Meissner Emulate "mov cr4,eax" (tombraider 3 demo). * graphics/ddraw.c: Marcus Meissner Do not enumerate D3D devices we can't handle anyway. Return bitmasks for hi/truecolor depths in EnumDisplayModes. * if1632/snoop.c, include/snoop.h, relay32/builtin32.c, relay32/snoop.c: Marcus Meissner Speed up relay32, snoop16 and snoop32 include/excludes by doing them just once at creation time. * relay32/ole32.spec, ole/compobj.c, ole/ole2.c: Pavel Roskin Added stubs for CoRevokeClassObject and OleSetClipboard. * windows/win.c: Per Ångström EnumTaskWindows16: Basing the selection on a window's task is not only more straightforward than comparing message queues, it also works better for Win32 applications. * memory/local.c: Huw D M Davies Changed some of the message classes. * windows/keyboard.c: David Faure Special case handling of : Shift + arrow, shift + home, ... X returns a char for it, but Windows doesn't. Ignore X char. Also added some documentation. * include/winsock.h, misc/winsock.c: Stephen Langasek Bugfixes for IPX code and preliminary groundwork for other address family support. * ole/compobj.c: Marcus Meissner (CoGetClassObject) one missing CALLBACK, extremely simplified clsid lookup (Registry is case insensitive). * relay32/ntdll.spec, win32/advapi.c, dlls/ntdll/rtl.c, relay32/advapi32.spec: Juergen Schmied Stubs: SetServiceStatus, RegisterServiceCtrlHandlerA/W, StartServiceCtrlDispatcher32A/W, RtlSystemTimeToLocalTime, RtlTimeToTimeFields. * include/windows.h, ole/ole2nls.c: Juergen Schmied Stub for GetNumberFormat32W. * misc/crtdll.c: David A. Cuthbert gets() fixes. * ole/nls/rus.nls: Alexander V. Lukyanov Fix SCOUNTRY, SNATIVECTRYNAME, SABBREVDAYNAME3; change some SMONTHNAME* to be in nominative case. * windows/queue.c: Per Ångström Fixed SetMessageQueue32 to return FALSE, not TRUE, when called with an invalid size parameter. * multimedia/dsound.c: Lionel Ulmer Added correct implementation of GetCaps, changed Play and Stop handling of positions indexes, suppressed warnings. * memory/local.c: Lionel Ulmer Corrected bug in TRACE function. * AUTHORS, graphics/ddraw.c, include/authors.h, include/ddraw.h: Lionel Ulmer Corrected bug in DirectDrawSurface creation and handling for driver based upon Xlilb. * windows/dinput.c: Lionel Ulmer Wine keyboard and mouse have now their own UIDs. * objects/brush.c: Huw D M Davies Fix allocation size in CreateDIBPatternBrush*. ---------------------------------------------------------------- Sun Nov 8 16:44:41 1998 Alexandre Julliard * windows/dialog.c: NF Stevens Fixed keystroke accelerators in dialogs which have controls containing other controls as child windows. * include/winproc.h, misc/commdlg.c, windows/hook.c, windows/winproc.c: Juergen Schmied Fixes: LB_/CB_/EM_ messages for getting/setting text and a bug in 16->32 bit conversion. * objects/dib.c: Eric Pouech Prevent CreateDIBSection from seg faulting when one dimension of section is 0. * configure, configure.in, include/config.h.in, include/winsock.h, misc/winsock.c: Stephen Langasek Support for IPX networking via winsock under Linux. * relay32/gdi32.spec, graphics/painting.c: Uwe Bonnes Added a stub for StartDocA and EndDoc. * relay32/kernel32.spec, scheduler/process.c, win32/console.c: James Sutherland More complete implementation of the SetCtrlHandler() function (and the related console functions). * objects/brush.c, relay32/gdi32.spec: Jeff Johann Added CreateDIBPatternBrushPt (GDI32.35) with minor documentation updates. * graphics/vga.c, include/vga.h, msdos/ioports.c: Ove Kaaven Simulate the VGA vertical refresh. * graphics/ddraw.c: Lionel Ulmer Added support of source and destination rectangles in Blit function. * include/dinput.h, windows/dinput.c: Lionel Ulmer Added device type constants and used them in device enumeration function. * misc/registry.c: Uwe Bonnes API documentation says that RegEnumKeyEx, RegEnumValue and RegQueryInfoKey takes the size of the buffers as characters. * ole/compobj.c: Added missing #include "config.h" * AUTHORS, configure, configure.in, include/authors.h, include/config.h.in, ole/compobj.c: Justin Bradford Replaces CoCreateGuid stub with an implementation of DCE's UUID specification. Also removes some unnecessary code from StringFromCLSID. * include/commctrl.h, include/winbase.h, include/wintypes.h: Uwe Bonnes Added an extern "C" safeguard. * include/commdlg.h, include/windows.h, windows/input.c: Uwe Bonnes - adds GetExitCodeProcess - corrects the return-type of GetKeyState - corrects the winelib definition of IsDialogMessage - adds winelib definitions for PrintDlg * objects/clipping.c: Rein Klazes ExtSelectClipRgn fix: RGN_DIFF did not work. * objects/cursoricon.c, windows/event.c, windows/message.c: Ulrich Weigand Adapted to new input event handling. * if1632/thunk.c, if1632/user.spec, include/input.h, include/windows.h, relay32/user32.spec, windows/Makefile.in, windows/input.c: Ulrich Weigand USER-side part of input event handling: contains implementation of keybd_event and mouse_event, and USER-related code removed from windows/event.c and windows/keyboard.c. * windows/display.c: Ulrich Weigand Stubs for DISPLAY.DRV removed from keyboard.c. * if1632/mouse.spec, include/mouse.h, windows/mouse.c: Ulrich Weigand Implementation of MOUSE.DRV (contains some code taken from windows/event.c). * if1632/keyboard.spec, include/keyboard.h, windows/keyboard.c: Ulrich Weigand Implementation of KEYBOARD.DRV (code mostly taken from previous windows/keyboard.c). * loader/main.c, loader/task.c, miscemu/main.c: Ulrich Weigand Bugfix: really *do* switch to the initial task's stack. CallLargeStack mechanism re-enabled. * include/debug.h, include/debugdefs.h: Eric Kohl New Files. Added 'date and time picker' and 'month calendar' control dummies. They are used by Outlook Express. * ole/ole2.c, relay32/ole32.spec: Eric Kohl Added stub for CreateBindCtx() and added missing CoGetClassObject() to *.spec file. Makes Internet Explorer 4.01 happy ;-) * dlls/comctl32/pager.c: Eric Kohl Little improvement. * dlls/comctl32/listview.c: Eric Kohl Added preliminary hit testing. Makes regedit.exe happy ;-) * documentation/common_controls, dlls/comctl32/imagelist.c: Eric Kohl Improved documentation and fixed typos. * dlls/comctl32/commctrl.c, relay32/comctl32.spec: Eric Kohl Added DrawStatusText32AW() and CreateStatusWindow32AW(). * dlls/comctl32/rebar.c: Eric Kohl Improved display and layout code. * dlls/comctl32/Makefile.in, dlls/comctl32/datetime.c, dlls/comctl32/monthcal.c, include/commctrl.h, include/datetime.h, include/monthcal.h: Eric Kohl New Files. Added 'date and time picker' and 'month calendar' control dummies. They are used by Outlook Express. Sat Nov 7 12:56:32 1998 Alexandre Julliard * objects/enhmetafile.c, relay32/gdi32.spec, include/windows.h: Charles Suprin Added stubs for SetWinMetaFileBits and GetEnhMetaFilePaletteEntries. * graphics/x11drv/graphics.c: Huw D M Davies Stop X11DRV_RoundRect calling XDrawArc with -ve width/height params which it did if either ellipse dimension was zero. * graphics/painting.c: Huw D M Davies Optimize RoundRect32 to call Rectangle32 if either ellipse dimension is zero. * relay32/mpr.spec, misc/network.c: Andreas Mohr Added stub WNetEnumCachedPasswords. * msdos/int21.c, msdos/int25.c: Andreas Mohr Made this file DOSMOD friendly. * loader/ne/segment.c, loader/pe_image.c: Andreas Mohr Unified "No implementation for..." warnings. * win32/device.c: Marcus Meissner monodebg.vxd used by some Origin programs implemented. * objects/bitmap.c: Uwe Bonnes Fail if less then one entire line requested in GetBitmapBits32. * windows/winproc.c: Rein Klazes Added WM_GETDLGCODE handling in (Un)MapMsg32Ato16. * if1632/compobj.spec, include/ole.h, ole/compobj.c, relay32/ole32.spec: John Richardson Implementation of CoLoadLibrary, CoFreeAllLibraries, CoFreeUnusedLibraries, CoFreeLibrary. Fixed misspelling of CoUninitialize. * programs/clock/ChangeLog, programs/clock/main.c: Robert Pouliot Fixes for other languages. Fri Nov 6 17:36:13 1998 Alexandre Julliard * misc/registry.c: John Richardson Fix wide character functions to return character count in character quantities not byte quantities. Make RegQueryInfoKey and RegQueryInfoKey behave correctly in win95 mode. * include/dinput.h, windows/dinput.c: Lionel Ulmer Changed mouse button mapping and check size of return buffer. * objects/clipping.c: Rein Klazes ExtSelectClipRgn() with RGN_COPY copies the wrong region. * files/file.c: Uwe Bonnes Fixed an error in the implementation of FILE_ShareDeny. * scheduler/handle.c, if1632/thunk.c, include/debugtools.h, include/sig_context.h, multimedia/mmsystem.c: Marcus Meissner Solaris redefines ERR and CS, fixed occurances. Solaris has TRAPNO in its sigcontext, added to sig_context.h * include/mmsystem.h, multimedia/mmio.c, relay32/winmm.spec, if1632/mmsystem.spec: Eric Pouech Made mmioSetBuffer callable from 16 and 32 bit code. * controls/menu.c: Juergen Schmied Fixed wrong arg type. * objects/dib.c, objects/gdiobj.c, graphics/x11drv/Makefile.in, graphics/x11drv/dib.c, graphics/x11drv/init.c, include/x11drv.h: Huw D M Davies Moved X11 DIB stuff to x11drv. * win32/code_page.c: Uwe Bonnes The API for WideCharToMultiByte says that the src-string has only to be treated as NULL-terminated if srclen is -1. * include/win.h, windows/event.c, windows/win.c: Ove Kaaven Made sure ConfigureNotify is processed before Expose, deferring the Expose event if necessary, thus working around a WM flaw with virtual desktop scrolling in -managed mode. * resources/sysres_Fr.rc: Eric Pouech Translated in French (not so good anyhow) message for the mark on system menu. * misc/main.c: Juergen Schmied Changed the default from 0 to 0x409 (eng-us). * windows/mdi.c: Marcus Meissner Two missing WINAPIs. * include/interfaces.h: Juergen Schmied Fixed one wrong parameter. * configure, configure.in: Ove Kaaven Fixed --disable-lib. Thu Nov 5 10:33:18 1998 Alexandre Julliard * include/commctrl.h: Juergen Schmied Constants for controls in common dialogs. Wed Nov 4 18:08:33 1998 Alexandre Julliard * misc/crtdll.c: Juergen Schmied Fixed some compiler warnings. Sun Nov 1 19:27:24 1998 Alexandre Julliard * windows/message.c, windows/nonclient.c, windows/painting.c, windows/winhelp.c, windows/winpos.c, misc/commdlg.c, misc/shell.c, misc/winsock.c, miscemu/instr.c, multimedia/audio.c, multimedia/joystick.c, objects/bitmap.c, objects/clipping.c, objects/color.c, objects/cursoricon.c, objects/dib.c, tools/wrc/dumpres.c, tools/wrc/parser.l, windows/clipboard.c, windows/mdi.c, files/file.c, graphics/x11drv/xfont.c, memory/heap.c: Jesper Skov egcs 'ambiguous else' warnings fixes. * include/toolhelp.h, include/windows.h, scheduler/process.c: Huw D M Davies Get rid of the redefinition of MAX_PATH and move PROCESSENTRY32 definition to toolhelp.h. * windows/win.c, include/pe_image.h, library/winestub.c, loader/elf.c, loader/module.c, loader/resource.c, misc/callback.c: Ulrich Weigand Run Winelib applications as 32-bit processes in the initial task. Simplified/removed several special 'if (__winelib)' cases in Wine main code obsoleted by that change. * windows/event.c: Ulrich Weigand Call mouse driver callback also if windows are not registered with X (if using native USER.EXE). * memory/atom.c, include/atom.h: Ulrich Weigand Adapted to separation between KERNEL and USER. * if1632/builtin.c, include/main.h, loader/main.c, loader/task.c, miscemu/main.c, relay32/gdi32.spec, relay32/kernel32.spec, relay32/user32.spec, scheduler/process.c: Ulrich Weigand Implemented new Wine startup sequence, separating startup into KERNEL/USER/GDI related parts, allowing native replacement. Implemented initial 'kernel' task. * include/ole.h, include/winerror.h, ole/compobj.c: John Richardson Implementation of InprocServer32 CoGetClassObject. * include/bitmap.h, objects/bitmap.c, objects/cursoricon.c, objects/oembitmap.c, graphics/x11drv/bitmap.c: Huw D M Davies More bitmap fixes. * windows/winproc.c: Fixed crashes with WM_GETDLGCODE translation. * programs/winhelp/Makefile.in, programs/winver/Makefile.in, windows/win.c, windows/x11drv/.cvsignore, windows/x11drv/Makefile.in, windows/x11drv/init.c, include/config.h.in, include/win.h, libtest/Makefile.in, programs/clock/Makefile.in, programs/control/Makefile.in, programs/notepad/Makefile.in, programs/progman/Makefile.in, programs/regtest/Makefile.in, programs/view/Makefile.in, Make.rules.in, Makefile.in, configure, configure.in, include/acconfig.h: Patrik Stridvall Started moving some X11 window management code to windows/x11drv. * if1632/user.spec, windows/dialog.c, windows/winproc.c: Ove Kaaven Fixed IsDialogMessage16. * Makefile.in: Douglas Ridgway Tell people to ignore the 'gets' warning. Some will listen. * graphics/x11drv/bitmap.c, windows/graphics.c: Huw D M Davies A couple of small fixes to my bitmap patch. * resources/TODO, resources/sysres_De.rc, resources/sysres_En.rc, windows/nonclient.c: Uwe Bonnes Allow the user to put a mark in the debug log by adding a item in the SYSMENU. The messages needs implementation in all other languages than English and German. * files/file.c: Uwe Bonnes Give tempfile a different name even if they are created in the same second. Removed some fixmes from the ShareDeny stuff. * include/mdi.h, include/windows.h, relay32/user32.spec, windows/mdi.c, windows/win.c: Rein Klazes CreateWindowEx32[AW] now creates an MDI chils when the WM_EX_MDICHILD extended style is specified. Also implemented CreateMDIWindow32A() call - single thread only -. * dlls/comctl32/treeview.c: Marcus Meissner Erred in the bit macros in treeview.c. Shiftcounts were wrong. * loader/pe_image.c: Marcus Meissner Detection of the end of imports with Characteristics 0 fail for Borland programs (which seem to have always characteristics 0). Changed to algorithm to something a bit more intelligent. * ole/compobj.c, relay32/ole32.spec: Ove Kaaven Added CoFreeLibrary stub. * README: Updated FAQ location. * graphics/escape.c: Huw D M Davies Implement SEGPTR conversion for STARTDOC in Escape32(). * objects/dc.c: Ulrich Weigand Bugfix: SetDCState did not reset clipping region to empty. * win32/init.c: Marcus Meissner Fixed small off by one error in GetComputerName32W, always killed the last character of a hostname. * objects/dib.c: Marcus Meissner Don't HeapFree() colormap if we didn't allocate one. * win32/advapi.c, windows/message.c, windows/user.c, dlls/shell32/shellord.c, include/wintypes.h, misc/crtdll.c, misc/printdrv.c, relay32/advapi32.spec, relay32/crtdll.spec, relay32/mpr.spec, relay32/shell32.spec, relay32/user32.spec, relay32/winspool.spec: Marcus Meissner Added stubs for user32,advapi32 functions. * Makefile.in, configure, configure.in, dlls/Makefile.in, dlls/ntdll/*, include/ntdll.h, misc/Attic/ntdll.c, misc/Makefile.in, relay32/ntdll.spec: Marcus Meissner More Nt* and Rtl* function stubs, moved ntdll.c to dlls/ntdll/. * memory/local.c, memory/heap.c: Andreas Mohr Changed many WARN()s related to internal Wine memory failures to ERR()s. * if1632/kernel.spec, scheduler/process.c: Andreas Mohr Added .spec entry for KERNEL.RegisterServiceProcess. * if1632/display.spec, windows/keyboard.c: Andreas Mohr Added stub for CheckCursor(). * include/dialog.h, windows/defdlg.c: Tim Newsome Fix for non-modal dialog closing. * windows/dinput.c: David Faure Rewrote the two routines using the vkey->scancode array to use keyc2vkey for each keycode, instead. Not tested. Removed unused IDirectInputDeviceA_GetDeviceState. Fixed warning in TRACE() call. * windows/keyboard.c: David Faure Deleted the vkey->sancode array, because QWERTY specific. Back to using the X keycode instead as the scancode. Tested. * graphics/psdrv/init.c: Huw D M Davies Print a message if the PostScript driver can't find a PPD file. * msdos/int10.c: Ove Kaaven Added VGA 256-color mode 0x13 using the DisplayDib VGA emulation. (DOS apps/games using this mode comes up now, although you can't really do anything with them (yet?).) * msdos/dpmi.c: Ove Kaaven Use macro V86_FLAG. * msdos/dosmem.c: Ove Kaaven Set default video mode to 3 (80x25 color). * loader/dos/dosmod.c: Ove Kaaven Ignores a couple of signals. * graphics/Makefile.in, graphics/dispdib.c, graphics/vga.c, include/vga.h, msdos/ioports.c: Ove Kaaven Moved VGA-emulating DirectX code from dispdib.c to a separate file. Made it use a system timer and trap I/O accesses to the VGA DAC registers to accommodate DisplayDib-using programs that try to access the VGA hardware directly. * miscemu/instr.c, if1632/signal.c, include/dosexe.h, loader/dos/dosvm.c, loader/dos/module.c, misc/system.c: Ove Kaaven Indirection for INSTR_EmulateInstruction for use by DOS code. Added support for a 55Hz system timer, letting DOS apps calibrate their delay loops and such. Calls INSTR_EmulateInstruction for instruction emulation (principally I/O port access). Added macro V86_FLAG. Sat Oct 31 12:20:56 1998 Alexandre Julliard * windows/dinput.c, multimedia/dsound.c: Marcus Meissner Small fixes. * memory/virtual.c: Marcus Meissner Removed the FIXME() and moved SetLastError(0) to the end (so that GetTempFileName et.al. can't overwrite it). * misc/Attic/ntdll.c, relay32/ntdll.spec, relay32/relay386.c, relay32/user32.spec, windows/user.c: Marcus Meissner Lots of stubs to get winlogon.exe from nt3.51 and other NT3.51 applets a bit further. * windows/mdi.c: Rein Klazes MDIchild created when the MDI client has the MDIS_ALLCHILDSTYLES style, should not be shown at creation nor activated unless the WS_VISIBLE flag is set. * loader/pe_image.c: Stephen Langasek Bugfix for fixup_imports: Enable checking for terminating import struct with Characteristics bitfield set to 0. * windows/win.c: Rein Klazes Delay linking newly created window in linked list until after the WM_NCCREATE message. * files/file.c: Rein Klazes Small bug in FILE_InUse does not do a release on every acquired file pointer. * controls/static.c: Marcus Meissner lpszName of NULL is handled (removes some warnings). * tools/testrun: Marcus Meissner Now allows specification of a start directory on the cmdline. * dlls/comctl32/treeview.c: Marcus Meissner Gets rid of the arch-dependent bit operations (tested on Linux and Solaris/x86). Wed Oct 28 14:58:02 1998 Alexandre Julliard * windows/win.c: Juergen Schmied A dest buffer was printed out as string. * include/shlobj.h: Juergen Schmied Corrected 2 wrong definitions. * include/windows.h, relay32/kernel32.spec, scheduler/process.c: Patrick Spinler Added stubs for Process32First/Process32Next. * include/x11drv.h, objects/clipping.c, objects/dc.c, objects/dcvalues.c, objects/palette.c, objects/region.c, graphics/escape.c, graphics/metafiledrv/graphics.c, graphics/painting.c, graphics/path.c, graphics/psdrv/graphics.c, graphics/win16drv/graphics.c, graphics/x11drv/graphics.c, include/debugger.h, include/gdi.h, include/metafiledrv.h, include/psdrv.h, include/win16drv.h, include/windows.h, include/wintypes.h, debugger/dbg.y, debugger/msc.c, debugger/stabs.c, debugger/types.c: François Gouget Fixed some LPPOINT/LPSIZE mismatches and some missing "const" in the headers prototypes. * graphics/psdrv/init.c, graphics/win16drv/init.c, graphics/x11drv/bitmap.c, graphics/x11drv/brush.c, graphics/x11drv/init.c, graphics/x11drv/objects.c, include/bitmap.h, include/gdi.h, include/x11drv.h, objects/bitmap.c, objects/brush.c, objects/dib.c, objects/oembitmap.c, windows/graphics.c, graphics/metafiledrv/init.c: Huw D M Davies Added pBitmapBits and pCreateBitmap to the GDI function table and moved the X11 dependent stuff out of objects/bitmap.c into x11drv. * relay32/shell32.spec, dlls/shell32/shellole.c, dlls/shell32/shellord.c, include/shell.h, dlls/shell32/pidl.c: Juergen Schmied New SHGetSimpleIDListFromPath32AW. Unicode-safe: PathFindFilename32AW. * include/shlobj.h: Justin Bradford IExtractIcon had an extra c in a struct definition. * relay32/dplay.spec: John Richardson Added entry for DirectPlayEnumerate. * ole/nls/sky.nls, ole/ole2nls.c: Juergen Schmied Added Slovak nls-resources. * objects/region.c: Huw D M Davies Fixed differences between SetRectRgn16 and SetRectRgn32. Also a bug fix for CreateRoundRectRgn. Tue Oct 27 15:41:54 1998 Alexandre Julliard * windows/user.c: Marcus Meissner EnumDisplayModes* returns a static list of modes with all depths (helps hexen2demo), ChangeDisplaySettings returns true all the time. * include/wintypes.h, multimedia/mmsystem.c, relay32/winmm.spec: Marcus Meissner Stub for midiOpenStream (helps hexen2demo). * ole/nls/enc.nls, ole/nls/frc.nls, resources/sysres_Fr.rc: Robert Pouliot Small patch for better French support. * loader/elf.c: Ulrich Weigand Bugfix: memory overwrite bug. Mon Oct 26 11:04:13 1998 Alexandre Julliard * controls/edit.c, windows/clipboard.c: Pascal Cuoq 32-bit clipboard support. * windows/queue.c: Ulrich Weigand Bugfix for QUEUE_Signal: Always use PostEvent if no thread is waiting on the queue. * windows/mdi.c: NF Stevens Fixed a minor problem with the menus for mdi child windows. * graphics/ddraw.c: Marcus Meissner Removed no longer necessary commented out code, destroy old window when SetDisplayMode is called again, EnumDisplayModes now returns all possible modes (using a static list). * memory/virtual.c: Marcus Meissner Anon shared mapping fixed for file sharing. ---------------------------------------------------------------- Sun Oct 25 10:32:23 1998 Alexandre Julliard * ole/ole2nls.c, include/winnls.h: Andreas Mohr <100.30936@germany.net> Fixes for LANG_NEUTRAL. * include/task.h: Added some padding to the PDB for ill-behaving apps (problem reported by Andreas Mohr). * documentation/ioport-trace-hints, include/debug.h, include/debugdefs.h, miscemu/instr.c: Jonathan Buzzard Added a new debugging channel io to allow read/writes on a port to be logged to a file. * windows/keyboard.c: David Faure Replaced 0x00 with 0x01 in the vkey->sancode array, so that no key is ignored. 0x00 is used for generated key events only. * windows/message.c, windows/queue.c: Douglas Ridgway API Documentation for SendMessage, GetTickCount, PostQuitMessage, GetMessagePos, GetMessageTime. * memory/virtual.c: Marcus Meissner Delete the filename for the mapping instantly. * dlls/shell32/shellord.c, relay32/shell32.spec: Michael Poole Stub for SHSimpleIDListFromPath. * loader/task.c: Fixed bug in SwitchStackTo. Sat Oct 24 13:06:16 1998 Alexandre Julliard * controls/scroll.c: Patrik Stridvall Check if scrollbar and parent are visible before redraw. * if1632/shell.spec, include/shell.h, misc/shell.c, programs/notepad/main.c, relay32/shell32.spec: Kai Morich Added Drag*32 functions. * windows/event.c: Kai Morich Added Drag&Drop from KDE app to 16/32 bit Windoze app. * windows/message.c: Kai Morich Added FIXME message in PostMessage32x if parameters are truncated when calling PostMessage16. * include/process.h, scheduler/event.c, scheduler/handle.c, scheduler/process.c, scheduler/thread.c: Ulrich Weigand Added support for global handles, implemented ConvertToGlobalHandle. Allocate startup data and 16-bit stack for initial process. * documentation/wine.texinfo: Leigh Wedding Small fix. * programs/progman/.cvsignore, programs/progman/Es.rc, programs/progman/Makefile.in, programs/winhelp/.cvsignore, programs/winhelp/Es.rc, programs/winhelp/Makefile.in, programs/clock/.cvsignore, programs/clock/Es.rc, programs/clock/Makefile.in, programs/notepad/.cvsignore, programs/notepad/Es.rc, programs/notepad/Makefile.in: Pablo Saratxaga Added Spanish resources. * ole/nls/euq.nls, resources/sysres_Es.rc: Pablo Saratxaga Small corrections. * relay32/kernel32.spec, scheduler/process.c: Marcus Meissner LoadLibraryExW spec added (function was there). SetProcessPriorityBoost stub added. * msdos/dpmi.c: Patrik Stridvall Compile fix for Solaris. * if1632/.cvsignore, if1632/Makefile.in, if1632/builtin.c, if1632/dispdib.spec, include/dispdib.h, graphics/Makefile.in, graphics/dispdib.c: Ove Kaaven Implemented DisplayDib. * controls/static.c: Marcus Meissner Hack to support integer ids in all static controls. * include/dinput.h, windows/dinput.c: Lionel Ulmer Beginning of mouse support in DirectInput (only "standard" mouse configuration supported for now). * include/*.h, dlls/comctl32/*.c: Eric Kohl Added xxx_Unregister() functions to all common controls. * dlls/comctl32/comctl32undoc.c, dlls/comctl32/pager.c, dlls/comctl32/toolbar.c, documentation/common_controls, relay32/comctl32.spec: Eric Kohl Some minor improvements and fixes. * dlls/comctl32/rebar.c, include/rebar.h: Eric Kohl Improved the rebar control. * dlls/comctl32/tooltips.c: Eric Kohl Added support for transparent and tracking tooltips. * controls/menu.c: Eric Kohl Fixed a popup menu selection bug. * windows/nonclient.c: Eric Kohl Fixed DrawCaption16() and DrawCaptionTemp16(). * windows/keyboard.c: David Faure Fixed warning. * graphics/psdrv/Makefile.in, graphics/psdrv/bitmap.c, graphics/psdrv/brush.c, graphics/psdrv/font.c, graphics/psdrv/graphics.c, graphics/psdrv/init.c, graphics/psdrv/ps.c, include/gdi.h, include/psdrv.h, objects/dib.c: Huw D M Davies Adds Arc, Chord, GetCharWidth, Pie, PolyPolygon, PolyPolyline, RoundRect, SetPixel, hatched brushes and a stub for StretchDIBits to the PostScript driver. * include/debug.h, include/debugdefs.h, include/miscemu.h, msdos/Makefile.in, msdos/interrupts.c: Joseph Pranevich Added support for int17 and int19. * msdos/int19.c: Carl van Schaik Stubs for dos mode reboot interrupt. * msdos/int17.c: Carl van Schaik Some printer stubs for DOS added. * msdos/int13.c: Joseph Pranevich More stubs added. These changes are only partially mine, I just made them compile. * msdos/int10.c: Joseph Pranevich Added some traces and cleaned up a couple of things. * dlls/shell32/shell32_main.h, dlls/shell32/shellord.c, dlls/shell32/shlfolder.c, dlls/shell32/shlview.c, include/shell.h, include/shlobj.h, memory/string.c, ole/ole2nls.c, relay32/shell32.spec, dlls/shell32/dataobject.c, dlls/shell32/enumidlist.c, dlls/shell32/pidl.c, dlls/shell32/shell32_main.c: Juergen Schmied Changed some string-shell32 functions to 32AW, parameter are os depending 32A or 32W (-winver nt351 or nt40), some new functions. Some fixes in ole2nls. New OLE2NLS_CheckLocale() to handle Locale_User_Default and Locale_System_Default. Shell32 now dynamicly links to DPA_*(), comdlg32 works again (comctl32 heap alloc patch broke it). * include/winversion.h, misc/version.c: Juergen Schmied Added VERSION_IsOsUnicode(). * scheduler/handle.c: Uwe Bonnes More off-by-one errors fixed. * include/file.h, misc/crtdll.c, msdos/vxd.c, win32/file.c, files/file.c: Uwe Bonnes File sharing fixes. Fri Oct 23 17:26:44 1998 Alexandre Julliard * misc/commdlg.c: Nick Holloway Bug fix. * loader/dos/module.c: Ove Kaaven Fixed DOS environment passing. * misc/main.c: Juergen Schmied Sysmetrics32W for SPI_GETICONTITLELOGFONT returns correct fontname. * include/font.h, objects/font.c, objects/gdiobj.c: Juergen Schmied New FONT_GetObject32W(), GetObject32W(). * relay32/user32.spec, win32/ordinals.c, windows/user.c: Juergen Schmied New stub RegisterTaskList. New function EnumDisplaySettings32W(). * misc/ntdll.c: Juergen Schmied More parameter checking in RltCopySid. * windows/winproc.c: Juergen Schmied More message mapping 32A<-->32W for EM_, CB_, LB_ for Unicode. * relay32/.cvsignore, relay32/Makefile.in, relay32/avifil32.spec, relay32/builtin32.c: Ove Kaaven Added new dll avifil32.dll. * loader/dos/dosvm.c, loader/dos/module.c, msdos/dpmi.c, include/dosexe.h: Ove Kaaven First shot at DPMI realmode calls. * loader/module.c: Ulrich Weigand Fixed several bugs with DLL initialization. Thu Oct 22 17:02:25 1998 Alexandre Julliard * scheduler/syslevel.c: Marcus Meissner Added ordinal for two syslevel functions. * multimedia/midi.c: Marcus Meissner Another missing WINAPI. * include/mmsystem.h: Marcus Meissner Small corrections in mmio declarations. * loader/pe_image.c: Marcus Meissner Take virtual sizes in account for the total vma size. * ole/nls/rom.nls: Dimitrie O. Paun Add some more NLS definitions for the Romanian language. * multimedia/dsound.c: Marcus Meissner Some programs (quake2 et al) do check for DSCAPS_EMULDRIVER and stop to work. 'Adjust' caps flags accordingly. * ole/compobj.c, relay32/ole32.spec: Pete Ratzlaff Stub for CoCreateGuid(). * dlls/comctl32/treeview.c, multimedia/mcicda.c: Brian Litzinger Fixes for FreeBSD. * libtest/.cvsignore, libtest/Makefile.in: Petter Reinholdtsen Make sure hello3res.h is generated even if 'make depend' never has been run. * windows/nonclient.c: NF Stevens Fixed moving and sizing of child windows. * include/ts_xlib.h, tools/make_X11wrappers, tsx11/X11_calls, tsx11/ts_xlib.c, windows/keyboard.c: Marcus Meissner XQueryKeymap -> TSXQueryKeymap (fixes the XIO errors reported). Wed Oct 21 17:20:48 1998 Alexandre Julliard * include/dosexe.h, loader/dos/dosvm.c, miscemu/main.c: Ove Kaaven Added indirection for ctx_debug to the DOS loader, so Winelib works again. * memory/virtual.c: Marcus Meissner Support anon shared mappings using temporary files (wont be deleted yet). * misc/main.c: Marcus Meissner Was freeing the incorrect pointers -> crash in mallocs/frees. * files/dos_fs.c, relay32/kernel32.spec: Marcus Meissner DefineDosDevice stub added. * miscemu/main.c, wine.ini: Chad Powell (pxpx@usa.net) Added a default program option in wine.conf in section [programs] key Default. * include/wintypes.h: David Cuthbert Better fix for this_is_a_syntax_error. * ole/nls/*.nls: Pablo Saratxaga Added the entries for LOCALE_SISO639LANGNAME and LOCALE_SISO3166CTRYNAME. * documentation/wine.man: James Juran Updated manpage. * relay32/msacm32.spec: Patrik Stridvall Fixed wrong ordinals. * objects/region.c: NF Stevens Fixed a bug in RectInRegion. Tue Oct 20 15:26:26 1998 Alexandre Julliard * msdos/interrupts.c: NF Stevens Removed an incorrect error message. * files/drive.c: Petter Reinholdtsen Make sure the access functions are always used to get label and serial number. Mon Oct 19 08:48:24 1998 Alexandre Julliard * ole/ole2nls.c: Eric Pouech Fixed bug on platforms were buffers returned by getenv() shall not be free()'ed. Added French (default) in locale handling. * include/wintypes.h: Dave Cuthbert Changed "this is a syntax error" to "this_is_a_syntax_error" to make a compile-time error message make more sense. * scheduler/handle.c: Uwe Bonnes Fixed off by one error in HANDLE_GetObjPtr. ---------------------------------------------------------------- Sun Oct 18 14:48:31 1998 Alexandre Julliard * files/file.c: Uwe Bonnes Try to implement the OF_SHARE_XXX options. Move the mode translations to functions. * include/main.h, ole/compobj.c, ole/ifs.c, ole/ole2disp.c, ole/ole2nls.c, ole/olesvr.c, ole/storage.c: Matthew Becker Documentation updates. * ole/compobj.c, relay32/ole32.spec: Uwe Bonnes Added stub for CoSetState32. * miscemu/main.c: Chad Powell Added ability to read a startup program from wine.ini file. Put it in section [programs] key Startup. * include/trackbar.h, include/treeview.h, dlls/comctl32/trackbar.c, dlls/comctl32/treeview.c: Alex Priem Further improvements. * include/cursoricon.h, objects/cursoricon.c: Turchanov Sergey Implemented LoadCursorFromFile, fixed DrawIconEx to support offscreen drawing, fixed CURSORICON_CreateFromResource to support LR_ semantics. * include/bitmap.h, objects/bitmap.c: Turchanov Sergey Fixed LoadImage to support almost all LR_ flags. * objects/dib.c: Turchanov Sergey Fixed bug in DIB_SetImageBits_RLE8 (because 'color' var was WORD, all COLOREFs had red part zeroed) that made plenty of cyan colors, minor bug fixes, changes to support LR_ flags. * include/global.h, memory/virtual.c: Turchanov Sergey Added VIRTUAL_MapFileW to map file to memory in one function call. * include/ddraw.h, include/windows.h, include/wintypes.h, windows/multimon.c: Turchanov Sergey Moved Multimonitor API declarations to windows.h. * if1632/user.spec, include/driver.h, multimedia/audio.c, multimedia/mcianim.c, multimedia/mcicda.c, multimedia/midi.c, multimedia/mmsystem.c, relay32/winmm.spec, windows/driver.c: Turchanov Sergey Implemented DefDriverProc32 from winmm.dll. * controls/scroll.c, include/scroll.h, windows/mdi.c, windows/nonclient.c: Alex Korobka Got rid of flickering scrollbar arrows. MDI scrolling speeded up a bit. * include/winnls.h, ole/nls/deu.nls, ole/ole2nls.c: Juergen Schmied GetLocaleInfo32A can handle len=0 now, sets LastError and touches buffer only when necessary. Updated deu.nls and some LCTYPES in winnls.h. * if1632/relay.c: Rein Klazes CallProc[Ex]32W called with lpProcAddress==NULL should return zero and not crash. Sat Oct 17 13:07:48 1998 Alexandre Julliard * dlls/comctl32/commctrl.c: Ove Kaaven Reduced huge (1GB) heap creation that caused Starcraft to fail. * include/dosexe.h, include/module.h, loader/dos/dosvm.c, multimedia/dplay.c, windows/dialog.c: Patrik Stridvall Compile fix for Solaris. * multimedia/midi.c: Patrik Stridvall Compile fix for non OSS systems. * graphics/ddraw.c: Patrik Stridvall Compile fix for non XF86-DGA systems. * libtest/Makefile.in, libtest/volinfo.c: Petter Reinholdtsen New file to test DRIVE_GetLabel. * multimedia/mcicda.c: Peter Hunnisett Small, suboptimal, fix for 32 bit cdaudio open routines. Needs proper 32bit cdaudio bit support before it can be removed... * graphics/ddraw.c: Peter Hunnisett Added a bunch of stubs for ddraw suface routines. All stubs for surface present now. Commented out message pump calls. I don't see a reason for them being there. Everything works fine with -desktop and -managed still has problems. Disagreements? * ole/ole2nls.c: Juergen Schmied Fixed GetLocaleInfo32A for other languages than en_uk. Made it recognise LOCALE_SYSTEM_DEFAULT, LOCALE_SYSTEM_DEFAULT and last but not least the first argument lcid where is all about... * include/syslevel.h, misc/registry.c, multimedia/dplay.c, multimedia/dsound.c, multimedia/mmsystem.c, multimedia/time.c, windows/caret.c, dlls/msacm32/builtin.c: Marcus Meissner Fixed some more missing WINAPIs (hopefully correct). * ole/ole2nls.c: Marcus Meissner Fixed the = -> == bug. * msdos/int2f.c: Joseph Pranevich Shell parameters (config.sys) and ANSI support stubs. * msdos/Makefile.in: Joseph Pranevich Added int16.c and int29.c. * include/miscemu.h, msdos/interrupts.c: Joseph Pranevich More interrupts that can be done from DOS mode. * msdos/int29.c: Joseph Pranevich Added int29 (Fast Write to Screen) support. * msdos/int16.c, include/debug.h, include/debugdefs.h: Joseph Pranevich Added int16 (Keyboard) support, mostly stubs. Fri Oct 16 15:40:21 1998 Alexandre Julliard * relay32/shell32.spec, dlls/shell32/pidl.c, dlls/shell32/shell32_main.c, dlls/shell32/shellord.c, dlls/shell32/shlfolder.c, dlls/shell32/shlview.c, include/shlobj.h: Juergen Schmied Many bugfixes, new stubs SHGetRealIDL, SHRegQueryValue32W, SHRegQueryValueEx32W, StrRetToStrN, StrChrW, SHAllocShared, SHLockShared, SHUnlockShared, SHFreeShared, SetAppStartingCursor32, SHLoadOLE32, Shell_MergeMenus32, PathGetDriveNumber32, DriveType32, SHAbortInvokeCommand, SHOutOfMemoryMessageBox, SHFlushClipboard. * misc/ntdll.c, relay32/ntdll.spec: Dietmar Kling Added undocumented function RtlOpenCurrentUser. * objects/cursoricon.c, misc/shell.c, misc/ver.c, misc/version.c, loader/elf.c, loader/module.c, loader/pe_image.c, loader/pe_resource.c, include/neexe.h, include/pe_image.h, include/peexe.h, debugger/dbgmain.c, debugger/msc.c: Uwe Bonnes Renamed all LPIMAGE_* types to PIMAGE_*. Thu Oct 15 13:03:10 1998 Alexandre Julliard * windows/winpos.c: Rein Klazes Fixed an error when an owned window activates its owner during creation. * windows/defdlg.c: Rein Klazes Closing a dialog using the menu bar ("x" or "-" button or windows menu) must generate a WM_COMMAND+IDCANCEL message, unlike closing normal windows when DestroyWindow() is called. * dlls/shell32/pidl.c: Marcus Meissner Added missing WINAPIs. * windows/winpos.c, win32/ordinals.c, relay32/user32.spec: Juergen Schmied New stubs PrivateExtractIconEx[AW], PrivateExtractIconsW, RegisterShellHookWindow, DeregisterShellHookWindow, GetProgmanWindow, GetTaskmanWindow, SetProgmanWindow, SetShellWindowEx, SetTaskmanWindow. * relay32/ntdll.spec, misc/ntdll.c: Juergen Schmied New stubs NtQueryInformationThread, NtQueryInformationToken, RtlAllocateAndInitializeSid, RtlEqualSid, RtlFreeSid. * multimedia/mmsystem.c: Turchanov Sergey Fixed PlaySound to start its thread the right way. Wed Oct 14 18:40:35 1998 Alexandre Julliard * controls/combo.c, controls/listbox.c: Alex Korobka CB_SETCURSEL and some other fixes. * windows/queue.c: Alex Korobka Better QUEUE_FlushMessages(). * relay32/gdi32.spec, objects/font.c, include/windows.h, if1632/gdi.spec: Moshe Vainer Partial implementation of GetOutlineTextMetrics32A. Added structures for OUTLINETEXTMETRICS. * objects/dc.c, include/gdi.h, graphics/x11drv/bitblt.c, graphics/x11drv/bitmap.c, graphics/x11drv/init.c: Ulrich Weigand Do not clip source rectangle even by visible region for bitblts. Added field 'totalExtent' to WIN_DC_INFO. * msdos/vxd.c: Ulrich Weigand Added stub for VMM PM API AH=026[de] (never say 'safe mode'). * memory/heap.c: Ulrich Weigand Bugfix: Local32Free caused free handles list corruption. * include/debugtools.h: Marcus Meissner Fixed --disable-debug config option. Tue Oct 13 12:50:04 1998 Alexandre Julliard * relay32/shell32.spec, dlls/shell32/shellord.c: Petter Reinholdtsen Added stubs SHRegCloseKey(), SHRegOpenKey[AW](), SHRegQueryValueExA() and FileIconInit() needed by Win95 explorer. Mon Oct 12 07:25:54 1998 Alexandre Julliard * windows/dialog.c, controls/button.c, controls/menu.c: Norman Stevens Improving keyboard handling, including accelerator keys in dialog boxes. Also fixes enter key in Agent32 edit box. Sun Oct 11 19:37:23 1998 Alexandre Julliard * misc/commdlg.c: Eric Pouech Added support in file dialog boxes handling for filters like "*.txt;*.bat". * win32/kernel32.c, scheduler/thread.c, loader/module.c, loader/pe_image.c, loader/task.c, include/module.h, include/pe_image.h: Ulrich Weigand Implemented new PE DLL initalization code, trying to call the DllEntryPoint routines always in correct order :-) Bypass snooping when getting data buffer addresses (thunk buffers, __GP handlers) and for 32-bit routines directly called from 16-bit (due to stack address size problems). * win32/ordinals.c, relay32/kernel32.spec, loader/ne/module.c: Ulrich Weigand Implemented CommonUnimpStub, MapHInst(LS|SL)_PN, W32S_BackTo32. Stub for HouseCleanLogicallyDeadHandles, fixed k32wvsprintfA. * tools/build.c, if1632/kernel.spec, if1632/relay.c, if1632/thunk.c: Ulrich Weigand Implemented (partially) the KERNEL Thunklet API and Callback Client API (KERNEL.560-568,604-612,619-622). Added stubs for K228, K237, KERNEL.365, KERNEL.447. * objects/bitmap.c, if1632/gdi.spec: Ulrich Weigand Stubs for CreateUser(Discardable)Bitmap16. * memory/heap.c, include/winnt.h: Ulrich Weigand Implemented HEAP_WINE_CODE16SEG SEGPTR heaps with 16-bit code segments. * memory/global.c, include/windows.h: Ulrich Weigand GlobalFix16 is supposed to return selector to the memory area. * msdos/vxd.c, if1632/Makefile.in, if1632/builtin.c, if1632/comm.spec, if1632/wprocs.spec: Ulrich Weigand Stubs for COMM.DRV, REBOOT.VXD, VDD.VXD. * scheduler/process.c, scheduler/syslevel.c, include/sig_context.h, include/syslevel.h: Ulrich Weigand Use emergency TEB selector to avoid debugger crashes when stepping through relay stubs (or when FS is invalid otherwise). * windows/event.c, windows/keyboard.c: Ulrich Weigand MOUSE.DRV routines moved to event.c. Call mouse event procedure. * windows/dce.c, windows/painting.c, windows/scroll.c, objects/clipping.c, objects/dc.c, objects/dcvalues.c, include/dc.h, include/windows.h, if1632/gdi.spec, graphics/x11drv/bitblt.c, graphics/x11drv/clipping.c, graphics/x11drv/graphics.c, graphics/x11drv/text.c, graphics/path.c: Ulrich Weigand Changed DC members w.hVisRgn, w.hClipRgn, amd w.hGCClipRgn to coordinates relative to the device, not the DC origin. This is necessary to correctly implement GetClipRgn16 and InquireVisRgn. SelectVisRgn also expects region in device-relative coordinates. Adapted the rest of Wine to this coordinate change. Implemented ExtSelectClipRgn. * tools/winapi-check, scheduler/syslevel.c, files/dos_fs.c: Andreas Mohr <100.30936@germany.net> Small fix. * loader/ne/segment.c, include/module.h, include/neexe.h, if1632/kernel.spec: Andreas Mohr <100.30936@germany.net> Yet another small self-loader fix. * files/drive.c: Andreas Mohr <100.30936@germany.net> Fixed severe bug: SetCurrentDirectory32A didn't set pTask->curdir correctly due to current drive being set too late. * Make.rules.in: Patrik Stridvall Use $(AS) instead of $(CC) to compile .s files. * relay32/.cvsignore, relay32/Makefile.in, relay32/builtin32.c, include/debug.h, include/debugdefs.h, include/mmreg.h, if1632/.cvsignore, if1632/Makefile.in, if1632/builtin.c, dlls/Makefile.in, Makefile.in, configure, configure.in: Patrik Stridvall Started the implementation of MSACM.DLL, MSACM32.DLL and IMAGEHLP.DLL. * include/imagehlp.h, relay32/imagehlp.spec, dlls/imagehlp/.cvsignore, dlls/imagehlp/Makefile.in, dlls/imagehlp/access.c, dlls/imagehlp/debug.c, dlls/imagehlp/imagehlp_main.c, dlls/imagehlp/integrity.c, dlls/imagehlp/internal.c, dlls/imagehlp/modify.c, dlls/imagehlp/symbol.c: Patrik Stridvall Started the implementation of IMAGEHLP.DLL. * include/msacm.h, include/msacmdrv.h, relay32/msacm32.spec, if1632/msacm.spec, dlls/msacm32/.cvsignore, dlls/msacm32/Makefile.in, dlls/msacm32/builtin.c, dlls/msacm32/driver.c, dlls/msacm32/filter.c, dlls/msacm32/format.c, dlls/msacm32/internal.c, dlls/msacm32/msacm32_main.c, dlls/msacm32/stream.c, dlls/msacm/.cvsignore, dlls/msacm/Makefile.in, dlls/msacm/msacm_main.c: Patrik Stridvall Started the implementation of MSACM.DLL and MSACM32.DLL. * win32/device.c: Patrik Stridvall Removed things that were earlier added by mistake. * relay32/winmm.spec: Patrik Stridvall The implementation of mmioWrite is now called instead of the stub. * include/shell.h, dlls/shell32/shellole.c, dlls/shell32/shellord.c, dlls/shell32/shlfolder.c, dlls/shell32/shlview.c: Juergen Schmied Bugfixes, shellview uses DPA's now, IShellView_GetItemObject implemented. * relay32/shell32.spec, dlls/shell32/shell32_main.c: Juergen Schmied New stubs: SHGetFileInfo32W, ReadCabinetState, WriteCabinetState, IsUserAdmin. Implemented: SHGetPathFromIDList32W. Changed PathCombine. * include/shlobj.h: Juergen Schmied New structures DVASPECT, TYMED, IDLList. Shell specific clipboard formats. * relay32/winspool.spec, misc/printdrv.c: Juergen Schmied Stub EnumPrintersW. * dlls/shell32/dataobject.c: Juergen Schmied Implemented first functions. * dlls/shell32/pidl.c, dlls/shell32/pidl.h: Juergen Schmied New class IDLList "Item ID List List" (internal). * misc/ver.c: Juergen Schmied Small changes (uses HIWORD/LOWORD). * windows/dialog.c, relay32/user32.spec: Sat Oct 10 12:00:00 1998 Juergen Schmied Stub CreateDialogIndirectParamAorW. * Makefile.in, configure, configure.in: Uwe Bonnes Don't install object files when --disable-lib is selected. * debugger/hash.c, debugger/msc.c: Uwe Bonnes Don't print name for 32 bit lib multiple times. Clean up printing in DEBUG_ProcessDeferredDebug. * memory/heap.c, dlls/comctl32/tab.c, controls/combo.c: David Luyer Small fixes. * files/drive.c: Petter Reinholdtsen Bugfix: Changed GetDriveType32A(NULL) to use cwd's root. * ole/typelib.c, ole/compobj.c, ole/ifs.c, ole/moniker.c, ole/ole2.c, ole/ole2disp.c, ole/ole2nls.c, ole/olecli.c, ole/olesvr.c, ole/storage.c, misc/ntdll.c, misc/registry.c: Matthew Becker Documentation corrections/standardizations. * multimedia/audio.c, multimedia/init.c, multimedia/mcianim.c, multimedia/mcicda.c, multimedia/mcistring.c, multimedia/midi.c, multimedia/mmsystem.c, include/mmsystem.h, include/multimedia.h: Eric Pouech Started coding 32 bit MCI handling. Added Open/Close to low-level MCI drivers (audio, midi, anim, cda). Wrote MCI MIDI support. * graphics/x11drv/graphics.c: Rein Klazes Yet another improvement to the bezier code. * windows/message.c: Rein Klazes GetTickCounts() has a granularity in windows of 25 msec's. Girotel's serial communication appears to depend on it, so I guess it's a feature... * misc/comm.c: Rein Klazes Update the modemn status bit that indicates whether the RLSD line is active in every call to GetCommError(). This is not the proper place, but since wine doesn't do any event-stuff... Fixed some TRACE call's faced with non zero terminated strings. Restore the terminal state at CloseCommt to the state it was at OpenComm(), so the modem will go off-hook. * loader/module.c: Alexander Larsson GetModuleFileName32A() returns long filename if app sets osversion >= 4.0. Also moved the long filename hackery to GetLongPathName32A() so it can be used by win32 programs. * files/dos_fs.c: Alexander Larsson GetLongPathName32A() returns dos format long filename instead of unix format. * dlls/comctl32/listview.c: Eric Kohl Small fixes. * relay32/shell32.spec, dlls/shell32/shellord.c: Eric Kohl Added SHFlushClipboard. * relay32/comctl32.spec, include/commctrl.h, dlls/comctl32/comctl32undoc.c: Eric Kohl Fixed some undocumented functions. Changed algorithm in DPA_QuickSort(). Fixed heap creation/destruction and control [un]registration in ComCtl32LibMain(). * dlls/comctl32/header.c: Eric Kohl Fixed a bug. * include/tooltips.h, dlls/comctl32/tooltips.c: Eric Kohl Added tracking support and fixed loading of resource strings. Added unregister code. * include/debug.h, include/debugdefs.h, include/ipaddress.h, include/nativefont.h, dlls/comctl32/Makefile.in, dlls/comctl32/commctrl.c, dlls/comctl32/ipaddress.c, dlls/comctl32/nativefont.c: Eric Kohl Added IPAddress and NativeFont controls. * include/imagelist.h, dlls/comctl32/imagelist.c: Eric Kohl Some minor improvements. * include/toolbar.h, dlls/comctl32/toolbar.c: Eric Kohl Improved drawing and placement code. Explorer style common dialogs are looking good now. * objects/cursoricon.c: Eric Kohl Fixed bug in DrawIconEx32(). * misc/main.c: Eric Kohl Improved GetSystemInformation32[A/W]. * windows/nonclient.c, relay32/user32.spec, include/windows.h, if1632/user.spec: Eric Kohl Added DrawCaption[16/32] and DrawCaptionTemp[16/32A/32W]. Fixed handling of WS_EX_TOOLWINDOW. * documentation/common_controls: Eric Kohl Updated. * windows/event.c, windows/keyboard.c, include/keyboard.h: David Faure Added KEYBOARD_UpdateState, to read the modifiers when the wine app is activated. Uses the new KEYBOARD_UpdateOneState. Fixed a problem with menu accelerators (Alt-letter generates a down arrow event which beeps if not filtered). Speeded up ToAscii16/32() a little bit. * debugger/break.c, debugger/db_disasm.c, debugger/dbg.y, debugger/expr.c, debugger/source.c, debugger/types.c: Ove Kaaven Made Wine's debugger work satisfactorily with DOS apps. Perhaps dereferencing work better for Win16 apps too now, but it appears the debugger core wasn't designed for segmentation. * msdos/dpmi.c: Ove Kaaven Simulates DPMI memory map by converting lower-MB segment base addresses as necessary. Implemented allocating/freeing DOS memory blocks. Added XMS hook. (DPMI remains disabled by default until someone implements the raw mode switch entry points pkunzip needs.) * msdos/int21.c: Ove Kaaven I think it's time to rethink the HFILE16_TO_HFILE32 strategy, can't keep working around flaws in it like this (now stdio was getting closed when programs close handles >=5) * msdos/xms.c, msdos/Makefile.in, msdos/int2f.c: Ove Kaaven Implemented basic XMS functions. wcb.exe (Win16 disassembler) now seems to work fine under Wine. * loader/dos/dosvm.c, loader/dos/module.c, include/dosexe.h, include/miscemu.h: Ove Kaaven Moved some system dependencies to loader/dos/dosvm.c. Implemented environmental argv[0] passing to DOS apps. Added XMS hooks. * debugger/stabs.c: Ove Kaaven Added a memset() to prevent a debugger segfault caused by uninitialized pointers in the stabs lookup tables. * graphics/ddraw.c: Marcus Meissner A few fixes. * relay32/ntdll.spec: Marcus Meissner Added RtlAllocateAndInitializeSid entry. * loader/Makefile.in, loader/elf.c, loader/module.c, loader/pe_image.c, include/config.h.in, include/module.h, include/pe_image.h, include/peexe.h, configure, configure.in: Marcus Meissner Generic dynamic dll loader using dl*() API. Includes: stdcall->cdecl mapping ability, snooping. (Tested only with glide2x.dll -> libglide2x.so) * multimedia/init.c, multimedia/time.c, include/mmsystem.h, include/multimedia.h: Marcus Meissner Added win32 enhanced functionality to timer callbacks. * win32/console.c: Marcus Meissner Added bad hacks so WriteConsoleOutput works on vt100 and PeekMessage does at least a bit of keyboard input. * relay32/snoop.c: Marcus Meissner Should display again. Sat Oct 10 15:52:46 1998 Alexandre Julliard * windows/dialog.c: Dave Pickles Implemented DS_CENTER dialog style. * misc/main.c: Pablo Saratxaga Added function to build the Windows numeric language ID from language, code, charset and dialect strings, like used by Unix LANG variable. * ole/ole2nls.c, ole/nls/README, include/winnls.h, ole/nls/*.nls: Pablo Saratxaga More NLS data. * graphics/ddraw.c: Peter Schlaile Fixed a lot of bugs in ddraw.c to make xlib support work. Runs successfully TR2Demo and Jazz Jackrabbit II Demo! * objects/gdiobj.c: Cliff Wright Added DC object type to the list of valid objects that can be deleted by DeleteObject32. Sun Oct 4 18:20:29 1998 Alexandre Julliard * ChangeLog: Starting new format changelog (older changes moved to documentation/ChangeLog.OLD). wine-20000526/DEVELOPERS-HINTS0100644000175000001440000004717007022345370014733 0ustar julliardusersThis document should help new developers get started. Like all of Wine, it is a work in progress. SOURCE TREE STRUCTURE ===================== The Wine source tree is loosely based on the original Windows modules. Most of the source is concerned with implementing the Wine API, although there are also various tools, documentation, sample Winelib code, and code specific to the binary loader. Wine API directories: --------------------- KERNEL: files/ - file I/O loader/ - Win16-, Win32-binary loader memory/ - memory management msdos/ - DOS features and BIOS calls (interrupts) scheduler/ - process and thread management GDI: graphics/ - graphics drivers x11drv/ - X11 display driver win16drv/ -> see below ttydrv/ - tty display driver psdrv/ - PostScript graphics driver metafiledrv/ - metafile driver enhmetafiledrv/ - enhanced metafile driver objects/ - logical objects USER: controls/ - built-in widgets resources/ - built-in menu and message box resources windows/ - window management Other DLLs: dlls/ - Other system DLLs implemented by Wine advapi32/ - crypto, systeminfo, security, eventlogging avifil32/ - COM object to play AVI files comctl32/ - common controls commdlg/ - common dialog boxes (both 16 & 32 bit) dplayx/ - DirectX dplayx dsound/ - DirectX dsound imagehlp/ - PE (Portable Executable) Image Helper lib imm32/ lzexpand/ - Liv-Zempel compression/decompression mpr/ - Multi-Protocol Router (interface to various network transport protocols) msacm/ - audio compression manager (multimedia) (16 bit) msacm32/ - audio compression manager (multimedia) (32 bit) msnet/ msvideo/ - 16 bit video manager ole32/ - 32 bit OLE 2.0 librairies oleaut32/ - 32 bit OLE 2.0 automation olecli/ - 16 bit OLE client oledlg/ - OLE 2.0 user interface support olesvr/ - 16 bit OLE server ntdll/ - NT implementation of kernel calls psapi/ - process status API rasapi32/ - remote access server API shell32/ - COM object implementing shell views sound/ - Sound on loudspeaker (not sound card) tapi32/ - telephone API ver/ - File Installation Library (16 bit) version/ - File Installation Library (32 bit) win32s win87em - 80387 math-emulation winaspi/ - 16 bit Advanced SCSI Peripheral Interface windebug/ - Windows debugger wing/ - WinG (for games) internface winmm/ - multimedia (16 & 32 bit) mciXXX/ - various MCI drivers wineoss/- MM driver for OSS systems wavemap/- audio mapper midimap/- midi mapper winspool/ - Printing & Print Spooler wnaspi32/ - 32 bit ASPI Miscellaneous: misc/ - shell, registry, winsock, etc. ipc/ - SysV IPC based interprocess communication win32/ - misc Win32 functions ole/ - OLE code nls/ - National Language Support configuration files Tools: ------ rc/ - old resource compiler tools/ - relay code builder, new rc, bugreport generator, wineconfigurator, etc. documentation/ - some documentation Binary loader specific directories: ----------------------------------- debugger/ - built-in debugger if1632/ - relay code miscemu/ - hardware instruction emulation graphics/win16drv/ - Win16 printer driver server/ - the main, controlling thread of wine tsx11/ - thread-safe X11 wrappers (auto generated) Winelib specific directories: ----------------------------- library/ - Required code for programs using Winelib libtest/ - Small samples and tests programs/ - Extended samples / system utilities IMPLEMENTING NEW API CALLS ========================== This is the simple version, and covers only Win32. Win16 is slightly uglier, because of the Pascal heritage and the segmented memory model. All of the Win32 APIs known to Wine are listed in [relay32/*.spec]. An unimplemented call will look like (from gdi32.spec) 269 stub PolyBezierTo To implement this call, you need to do the following four things. 1. Find the appropriate parameters for the call, and add a prototype to the correct header file. In this case, that means [include/wingdi.h], and it might look like BOOL WINAPI PolyBezierTo(HDC, LPCVOID, DWORD); If the function has both an ASCII and a Unicode version, you need to define both and add a #define WINELIB_NAME_AW declaration. See below for discussion of function naming conventions. 2. Modify the .spec file to tell Wine that the function has an implementation, what the parameters look like and what Wine function to use for the implementation. In Win32, things are simple--everything is 32-bits. However, the relay code handles pointers and pointers to strings slightly differently, so you should use 'str' and 'wstr' for strings, 'ptr' for other pointer types, and 'long' for everything else. 269 stdcall PolyBezierTo(long ptr long) PolyBezierTo The 'PolyBezierTo' at the end of the line is which Wine function to use for the implementation. 3. Implement the function as a stub. Once you add the function to the .spec file, you must add the function to the Wine source before it will link. Add a function called 'PolyBezierTo' somewhere. Good things to put into a stub: o a correct prototype, including the WINAPI o header comments, including full documentation for the function and arguments (see documentation/README.documentation) o A FIXME message and an appropriate return value are good things to put in a stub. /************************************************************ * PolyBezierTo (GDI32.269) * * Draw many Bezier curves * * RETURNS * nonzero on success or zero on faillure * * BUGS * Unimplemented */ BOOL WINAPI PolyBezierTo(HDC hdc, /* handle to device context */ LPCVOID p, /* ptr to array of Point structs */ DWORD count /* nr of points in array */ ) { /* tell the user they've got a substandard implementation */ FIXME(gdi, ":(%x,%p,%d): stub\n", hdc, p, count); /* some programs may be able to compensate, * if they know what happened */ SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; /* error value */ } 4. Implement and test the rest of the function. IMPLEMENTING A NEW DLL ====================== Generic directions ------------------ Apart from writing the set of needed .c files, you also need to do the following: 1. Create a directory where to store the implementation of the DLL. If the DLL exists under Windows as both 16 and 32 bit DLL, you can either create one directory for each, or have a single directory with both implementations. This (those) directory(ies) have to be put under the dlls/ directory in Wine tree structure. 2. Create the Makefile.in in the ./dlls// directory. You can copy an existing Makefile.in from another ./dlls/ subdirectory. You need at least to change the MODULE, SPEC_SRCS, and C_SRCS macros. 3. Add the directory (and the generated .o file for the module) in: + ./configure.in (in AC_OUTPUT macro at the end of the file to trigger the Makefile generation), + ./Makefile.in (in LIBSUBDIRS and LIBOBJS macros) + ./dlls/Makefile.in (in SUBDIRS macro) 4. You can now regenerate ./configure file (with 'make configure') and the various Makefiles (with 'configure; make depend') (run from the top of Wine's tree). You shall now have a Makefile file in ./dlls// 5. You now need to declare the DLL in the module lists. This is done by adding the corresponding descriptor in ./if1632/builtin.c if your DLL is 16 bit (resp. ./relay32/builtin.c for a 32 bit DLL) (or both if your directory contains the dual 16/32 implementations). Note: the name of the descriptor is based on the module name, not on the file name (they are the same in most of the case, but for some DLLs it's not the case). 6. You also need to define the loadorder for the created DLL (./wine.ini and ./loader/loadorder.c). Usually, "native,builtin" is ok. If you have written a paired 16/32 bit implementation, don't forget to define it also in those files. 7. Create the .spec file for the DLL export points in your directory. Refer to 'Implementation of new API calls' earlier in this document for more information on this part. 8. Don't forget the .cvsignore file. The .cvsignore contain (on a per directory basis) all the files generated by the compilation process, why cvs shall ignore when processing the dir. *.o is in there by default, but in Wine case you will find: - Makefile (generated from Makefile.in) - *.spec.c: those c files are generated by tools/build from the .spec file - when thunking down to 16 bit DLLs, you'll get some others (.glue.c) - result of .y => .c translation (by yacc or bison) - result of .rc compilation - ... For a simple DLL, listing in .cvsignore Makefile and .spec.c will do. 9. You can now start adding .c files. 10. For the .h files, if they are standard Windows one, put them in include/. If they are linked to *your* implementation of the DLL, put them in your newly created directory. Debug channels -------------- If you need to create a new debug channel, just add the DECLARE_DEBUG_CHANNEL to your .c file(s) and rerun tools/make_debug. When sending out your patch, you don't need to provide nor ./configure nor the ./include/debugdefs.h diffs. Just indicate that those files need to be regenerated. Resources --------- If you also need to add resources to your DLL, the create the .rc file. Since, the .rc file will be translated into a .s file, and then compiled as a .o file, its basename must be different from the basename of any .c file. Add to your ./dlls//Makefile.in, in the RC_SRCS macro, the list of .rc files to add to the DLL. You may also have to add the following directives 1/ to tell gnumake to translate .rc into .s files, $(RC_SRCS:.rc=.s): $(WRC) 2/ to give some parameters to wrc for helping the translation. WRCEXTRA = -s -p$(MODULE) See dlls/comctl32/ for an example of this. Thunking -------- If you're building a 16 & 32 bit DLLs pair, then from the 32 bit code you might need to call 16 bit routine. The way to do it to add in the code, fragments like: /* ### Start build ### */ extern WORD CALLBACK _CallTo16_word_wwlll(FARPROC16,WORD,WORD,LONG,LONG,LONG); /* ### stop build ### */ Where _ is an internal prefix for your module. The first parameter is always of type FARPROC16. Then, you can get the regular list of parameters. The _word_wwlll indicates the type of return (long or word) and the size of the parameters (here l=>long, w=>word; which maps to WORD,WORD,LONG,LONG,LONG. You can put several functions between the Start/Stop build pair. You can also read tools/build.txt for more details on this. Then, add to ./dlls//Makefile.in to the macro GLUE the list of .c files containing the /* ### Start build ### */ directives. See dlls/winmm/ for an example of this. MEMORY AND SEGMENTS =================== NE (Win16) executables consist of multiple segments. The Wine loader loads each segment into a unique location in the Wine processes memory and assigns a selector to that segment. Because of this, it's not possible to exchange addresses freely between 16-bit and 32-bit code. Addresses used by 16-bit code are segmented addresses (16:16), formed by a 16-bit selector and a 16-bit offset. Those used by the Wine code are regular 32-bit linear addresses. There are four ways to obtain a segmented pointer: - Use the SEGPTR_* macros in include/heap.h (recommended). - Allocate a block of memory from the global heap and use WIN16_GlobalLock to get its segmented address. - Allocate a block of memory from a local heap, and build the segmented address from the local heap selector (see the USER_HEAP_* macros for an example of this). - Declare the argument as 'segptr' instead of 'ptr' in the spec file for a given API function. Once you have a segmented pointer, it must be converted to a linear pointer before you can use it from 32-bit code. This can be done with the PTR_SEG_TO_LIN() and PTR_SEG_OFF_TO_LIN() macros. The linear pointer can then be used freely with standard Unix functions like memcpy() etc. without worrying about 64k boundaries. Note: there's no easy way to convert back from a linear to a segmented address. In most cases, you don't need to worry about segmented address, as the conversion is made automatically by the callback code and the API functions only see linear addresses. However, in some cases it is necessary to manipulate segmented addresses; the most frequent cases are: - API functions that return a pointer - lParam of Windows messages that point to a structure - Pointers contained inside structures accessed by 16-bit code. It is usually a good practice to used the type 'SEGPTR' for segmented pointers, instead of something like 'LPSTR' or 'char *'. As SEGPTR is defined as a DWORD, you'll get a compilation warning if you mistakenly use it as a regular 32-bit pointer. STRUCTURE PACKING ================= Under Windows, data structures are tightly packed, i.e. there is no padding between structure members. On the other hand, by default gcc aligns structure members (e.g. WORDs are on a WORD boundary, etc.). This means that a structure like struct { BYTE x; WORD y; }; will take 3 bytes under Windows, but 4 with gcc, because gcc will add a dummy byte between x and y. To have the correct layout for structures used by Windows code, you need to embed the struct within two special #include's which will take care of the packing for you: #include "pshpack1.h" struct { BYTE x; WORD y; }; #include "poppack1.h" For alignment on a 2-byte boundary, there is a "pshpack2.h", etc. The use of the WINE_PACKED attribute is obsolete. Please remove these in favour of the above solution. Using WINE_PACKED, you would declare the above structure like this: struct { BYTE x; WORD y WINE_PACKED; }; You had to do this every time a structure member is not aligned correctly under Windows (i.e. a WORD not on an even address, or a DWORD on a address that was not a multiple of 4). NAMING CONVENTIONS FOR API FUNCTIONS AND TYPES ============================================== In order to support both Win16 and Win32 APIs within the same source code, the following convention must be used in naming all API functions and types. If the Windows API uses the name 'xxx', the Wine code must use: - 'xxx16' for the Win16 version, - 'xxx' for the Win32 version when no ASCII/Unicode strings are involved, - 'xxxA' for the Win32 version with ASCII strings, - 'xxxW' for the Win32 version with Unicode strings. If the function has both ASCII and Unicode version, you should then use the macros WINELIB_NAME_AW(xxx) or DECL_WINELIB_TYPE_AW(xxx) (defined in include/windef.h) to define the correct 'xxx' function or type for Winelib. When compiling Wine itself, 'xxx' is _not_ defined, meaning that code inside of Wine must always specify explicitly the ASCII or Unicode version. If 'xxx' is the same in Win16 and Win32, you can simply use the same name as Windows, i.e. just 'xxx'. If 'xxx' is Win16 only, you could use the name as is, but it's preferable to use 'xxx16' to make it clear it is a Win16 function. Examples: typedef struct { /* Win32 ASCII data structure */ } WNDCLASSA; typedef struct { /* Win32 Unicode data structure */ } WNDCLASSW; typedef struct { /* Win16 data structure */ } WNDCLASS16; DECL_WINELIB_TYPE_AW(WNDCLASS); ATOM RegisterClass16( WNDCLASS16 * ); ATOM RegisterClassA( WNDCLASSA * ); ATOM RegisterClassW( WNDCLASSW * ); #define RegisterClass WINELIB_NAME_AW(RegisterClass) The Winelib user can then say: WNDCLASS wc = { ... }; RegisterClass( &wc ); and this will use the correct declaration depending on the definition of the UNICODE symbol. NAMING CONVENTIONS FOR NON-API FUNCTIONS AND TYPES ================================================== Functions and data which are internal to your code (or at least shouldn't be visible to any WineLib or Windows program) should be preceded by an identifier to the module: Examples: ENUMPRINTERS_GetDWORDFromRegistryA() (in dlls/winspool/info.c) IAVIFile_fnRelease() (in dlls/avifil32/avifile.c) X11DRV_CreateDC() (in graphics/x11drv/init.c) TIMER_Init() (implemented in windows/timer.c, used in loader/main.c ) if you need prototypes for these, there are a few possibilities: - within same source file only: put the prototypes at the top of your file and mark them as prototypes. - within the same module: create a header file within the subdirectory where that module resides, e.g. graphics/ddraw_private.h - from a totally different module, or for use in winelib: put your header file entry in /include/wine/ but be careful not to clutter this directory! under no circumstances, you should add non-api calls to the standard windoze include files. Unfortunately, this is often the case, e.g. the above example of TIMER_Init is defined in include/message.h API ENTRY POINTS ================ Because Win16 programs use a 16-bit stack and because they can only call 16:16 addressed functions, all API entry points must be at low address offsets and must have the arguments translated and moved to Wines 32-bit stack. This task is handled by the code in the "if1632" directory. To define a new API entry point handler you must place a new entry in the appropriate API specification file. These files are named *.spec. For example, the API specification file for the USER DLL is contained in the file user.spec. These entries are processed by the "build" program to create an assembly file containing the entry point code for each API call. The format of the *.spec files is documented in the file "tools/build-spec.txt". DEBUG MESSAGES ============== To display a message only during debugging, you normally write something like this: TRACE(win,"abc..."); or FIXME(win,"abc..."); or WARN(win,"abc..."); or ERR(win,"abc..."); depending on the seriousness of the problem. (documentation/degug-msgs explains when it is appropriate to use each of them) These macros are defined in include/debug.h. The macro-definitions are generated by the shell-script tools/make_debug. It scans the source code for symbols of this forms and puts the necessary macro definitions in include/debug.h and include/debugdefs.h. These macros test whether the debugging "channel" associated with the first argument of these macros (win in the above example) is enabled and thus decide whether to actually display the text. In addition you can change the types of displayed messages by supplying the "-debugmsg" option to Wine. If your debugging code is more complex than just printf, you can use the symbols TRACE_ON(xxx), WARN_ON(xxx), ERR_ON(xxx) and FIXME_ON(xxx) as well. These are true when channel xxx is enabled, either permanent or in the command line. Thus, you can write: if(TRACE_ON(win))DumpSomeStructure(&str); Don't worry about the inefficiency of the test. If it is permanently disabled (that is TRACE_ON(win) is 0 at compile time), the compiler will eliminate the dead code. You have to start tools/make_debug only if you introduced a new macro, e.g. TRACE(win32). For more info about debugging messages, read: documentation/debug-msgs MORE INFO ========= 1. There is a FREE online version of the MSDN library (including documentation for the Win32 API) on http://www.microsoft.com/msdn/ 2. http://www.sonic.net/~undoc/bookstore.html 3. In 1993 Dr. Dobbs Journal published a column called "Undocumented Corner". 4. You might want to check out BYTE from December 1983 as well :-) wine-20000526/LICENSE0100644000175000001440000000237407101106342013447 0ustar julliardusers@c This file is processed by GNU's TeXinfo @c If you modify it or move it to another location, make sure that @c TeXinfo works (type `make' in directory documentation). Copyright (c) 1993-2000 the Wine project authors (see the file AUTHORS for a complete list) Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the following conditions: The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software. THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. wine-20000526/Make.rules.in0100644000175000001440000001475007113331015015001 0ustar julliardusers# Global rules shared by all makefiles -*-Makefile-*- # # Each individual makefile must define the following variables: # TOPSRCDIR : top-level source directory # TOPOBJDIR : top-level object directory # SRCDIR : source directory for this module # MODULE : name of the module being built # # Each individual makefile may define the following additional variables: # C_SRCS : C sources for the module # ASM_SRCS : assembly sources # GEN_C_SRCS : generated C files # GEN_ASM_SRCS : generated assembly sources # RC_SRCS : resource source files # SPEC_SRCS : interface definition files # GLUE : C sources for which glue code needs to be generated # EXTRA_SRCS : extra source files for make depend # EXTRA_OBJS : extra object files # WRCEXTRA : extra wrc flags (e.g. '-p _SysRes') # SUBDIRS : subdirectories that contain a Makefile # EXTRASUBDIRS : subdirectories that do not contain a Makefile # First some useful definitions SHELL = /bin/sh CC = @CC@ CPP = @CPP@ CFLAGS = @CFLAGS@ OPTIONS = @OPTIONS@ -D_REENTRANT X_CFLAGS = @X_CFLAGS@ X_LIBS = @X_LIBS@ XLIB = @X_PRE_LIBS@ @XLIB@ @X_EXTRA_LIBS@ DLL_LINK = @DLL_LINK@ LIBS = @LIBS@ YACC = @YACC@ LEX = @LEX@ LEXLIB = @LEXLIB@ RANLIB = @RANLIB@ LN_S = @LN_S@ DIVINCL = -I$(SRCDIR) -I. -I$(TOPSRCDIR)/include -I$(TOPOBJDIR)/include ALLCFLAGS = $(DIVINCL) $(CFLAGS) $(DEFS) $(OPTIONS) $(X_CFLAGS) LDCOMBINE = ld -r AR = ar rc RM = rm -f MV = mv MKDIR = mkdir -p C2MAN = @C2MAN@ MANSPECS = -w $(TOPSRCDIR)/relay32/gdi32.spec \ -w $(TOPSRCDIR)/relay32/user32.spec \ -w $(TOPSRCDIR)/relay32/comctl32.spec \ -w $(TOPSRCDIR)/relay32/comdlg32.spec \ -w $(TOPSRCDIR)/relay32/kernel32.spec LINT = @LINT@ LINTFLAGS = @LINTFLAGS@ ALLLINTFLAGS = $(LINTFLAGS) $(DEFS) $(OPTIONS) $(DIVINCL) WINAPI_CHECK = $(TOPSRCDIR)/tools/winapi_check/winapi_check BUILD = $(TOPOBJDIR)/tools/build@PROGEXT@ MAKEDEP = $(TOPOBJDIR)/tools/makedep@PROGEXT@ WRC = $(TOPOBJDIR)/tools/wrc/wrc@PROGEXT@ WRCFLAGS = -c DLLDIR = $(TOPOBJDIR)/dlls @SET_MAKE@ # Installation infos INSTALL = @INSTALL@ INSTALL_PROGRAM = @INSTALL_PROGRAM@ INSTALL_DATA = @INSTALL_DATA@ prefix = @prefix@ exec_prefix = @exec_prefix@ bindir = @bindir@ libdir = @libdir@ infodir = @infodir@ mandir = @mandir@ prog_manext = 1 conf_manext = 5 includedir = @includedir@/wine CLEAN_FILES = *.o *.a *.so *.ln \\\#*\\\# *~ *% .\\\#* *.bak *.orig *.rej \ *.flc *.spec.c *.glue.c y.tab.c y.tab.h lex.yy.c core OBJS = $(SPEC_SRCS:.spec=.spec.o) $(C_SRCS:.c=.o) $(GEN_C_SRCS:.c=.o) $(GEN_ASM_SRCS:.s=.o) \ $(ASM_SRCS:.S=.o) $(RC_SRCS:.rc=.o) $(GLUE:.c=.glue.o) $(EXTRA_OBJS) LINTS = $(C_SRCS:.c=.ln) # DLL list X_DLLS = \ ddraw \ @OPENGL32_DLL@ \ x11drv DLLS = \ @X_DLLS@ \ avifil32 \ comctl32 \ comdlg32 \ dciman32 \ dinput \ dplayx \ dsound \ gdi32 \ icmp \ imagehlp \ imm32 \ joystick.drv \ lz32 \ mcianim.drv \ mciavi.drv \ mcicda.drv \ mciseq.drv \ mciwave.drv \ midimap.drv \ mpr \ msacm \ msacm.drv \ msacm32 \ msnet32 \ msvfw32 \ odbc32 \ ole32 \ oleaut32 \ olecli32 \ oledlg \ olepro32 \ olesvr32 \ psapi \ rasapi32 \ riched32 \ setupx \ shell32 \ sound \ stress \ tapi32 \ ttydrv \ urlmon \ user32 \ version \ w32skrnl \ win87em \ windebug \ wineoss.drv \ wing \ wininet \ winmm \ winspool.drv \ wnaspi32 \ wsock32 # Implicit rules .SUFFIXES: .rc .res .spec .spec.c .spec.o .glue.c .c.o: $(CC) -c $(ALLCFLAGS) -o $*.o $< .spec.c.spec.o: $(CC) -c $(ALLCFLAGS) @GCC_NO_BUILTIN@ -o $*.spec.o $< .s.o: $(AS) -o $*.o $< .S.o: $(CC) -c -o $*.o $< .rc.s: $(WRC) $(WRCFLAGS) $(WRCEXTRA) $(DIVINCL) $< .rc.h: $(WRC) $(WRCFLAGS) $(WRCEXTRA) $(DIVINCL) -nh $< .rc.res: $(WRC) $(WRCFLAGS) $(WRCEXTRA) $(DIVINCL) -r $< .res.s: $(WRC) $(WRCFLAGS) $(WRCEXTRA) -b $< .res.h: $(WRC) $(WRCFLAGS) $(WRCEXTRA) -bnh $< .spec.spec.c: $(BUILD) @BUILDFLAGS@ -o $@ -spec $< .c.glue.c: $(BUILD) @BUILDFLAGS@ -o $@ -glue $< .c.ln: $(LINT) -c $(ALLLINTFLAGS) $< || ( $(RM) $@ && exit 1 ) .PHONY: all install uninstall clean distclean depend dummy # 'all' target first in case the enclosing Makefile didn't define any target all: Makefile # Rule to rebuild the resource compiler $(WRC) check_wrc: cd $(TOPOBJDIR)/tools/wrc && $(MAKE) wrc@PROGEXT@ # Rule to rebuild the 'makedep' program $(MAKEDEP) check_makedep: cd $(TOPOBJDIR)/tools && $(MAKE) makedep@PROGEXT@ # Rule to rebuild the 'build' program $(BUILD) checkbuild: cd $(TOPOBJDIR)/tools && $(MAKE) build@PROGEXT@ # Rule for main module $(MODULE).o: $(OBJS) Makefile.in $(TOPSRCDIR)/Make.rules.in $(LDCOMBINE) $(OBJS) -o $(MODULE).o # Rules for makefile Makefile: Makefile.in $(TOPSRCDIR)/configure @echo Makefile is older than $?, please rerun $(TOPSRCDIR)/configure @exit 1 # Rules for auto documentation man: $(C_SRCS) for i in $(C_SRCS); do $(C2MAN) -L -o $(TOPOBJDIR)/documentation/man3w -S3w $(DIVINCL) -D__WINE__ $(MANSPECS) $$i; done html: $(C_SRCS) for i in $(C_SRCS); do $(C2MAN) -L -o $(TOPOBJDIR)/documentation/html -Th -iwindows.h $(DIVINCL) -D__WINE__ $(MANSPECS) $$i; done # Rule for linting $(MODULE).ln : $(LINTS) if test "$(LINTS)" ; \ then \ $(LINT) $(ALLLINTFLAGS) -o$(MODULE) $(LINTS) ; \ $(MV) llib-l$(MODULE).ln $(MODULE).ln ; \ else \ $(LINT) $(ALLLINTFLAGS) -C$(MODULE) /dev/null ; \ fi lint:: $(MODULE).ln # Rules for Windows API checking winapi_check:: $(WINAPI_CHECK) $(WINAPI_CHECK_FLAGS) $(WINAPI_CHECK_EXTRA_FLAGS) . # Rules for dependencies $(SUBDIRS:%=%/__depend__): $(MAKEDEP) dummy cd `dirname $@` && $(MAKE) depend depend: $(MAKEDEP) $(C_SRCS) $(RC_SRCS) $(EXTRA_SRCS) $(GEN_C_SRCS) $(SUBDIRS:%=%/__depend__) $(MAKEDEP) $(DIVINCL) -C$(SRCDIR) $(C_SRCS) $(RC_SRCS) $(EXTRA_SRCS) -C. $(GEN_C_SRCS) # Rules for cleaning $(SUBDIRS:%=%/__clean__): dummy cd `dirname $@` && $(MAKE) clean $(EXTRASUBDIRS:%=%/__clean__): dummy -cd `dirname $@` && $(RM) $(CLEAN_FILES) clean:: $(SUBDIRS:%=%/__clean__) $(EXTRASUBDIRS:%=%/__clean__) $(RM) $(CLEAN_FILES) $(GEN_C_SRCS) $(GEN_ASM_SRCS) $(RC_SRCS:.rc=.s) $(RC_SRCS:.rc=.h) $(PROGRAMS) # Misc. rules $(SPEC_SRCS:.spec=.spec.c): $(BUILD) $(TOPSRCDIR)/include/builtin16.h $(TOPSRCDIR)/include/builtin32.h $(GLUE:.c=.glue.c): $(BUILD) $(TOPSRCDIR)/include/builtin16.h $(TOPSRCDIR)/include/builtin32.h $(RC_SRCS:.rc=.s): $(WRC) $(SUBDIRS): dummy @cd $@ && $(MAKE) dummy: # End of global rules wine-20000526/Makefile.in0100644000175000001440000001305307101100675014506 0ustar julliardusers# This Makefile understands the following targets: # # all (default): build wine # clean: remove all intermediate files # distclean: also remove all files created by configure # install: install everything # uninstall: uninstall everything # depend: create the dependencies # etags: create a TAGS file for Emacs. # manpages: compile manpages for Wine API # # Directories TOPSRCDIR = @top_srcdir@ TOPOBJDIR = . SRCDIR = @srcdir@ VPATH = @srcdir@ LIBEXT = @LIBEXT@ LDSHARED = @LDSHARED@ LDCONFIG = @LDCONFIG@ MODULE = wine SOVERSION = 1.0 SONAME = libwine.so TOOLSUBDIRS = tools LIBSUBDIRS = \ controls \ console \ dlls/advapi32 \ dlls/crtdll \ dlls/display \ dlls/mouse \ dlls/ntdll \ files \ graphics \ graphics/enhmetafiledrv \ graphics/metafiledrv \ graphics/psdrv \ graphics/win16drv \ if1632 \ library \ loader \ loader/ne \ loader/dos \ memory \ misc \ msdos \ objects \ ole \ relay32 \ resources \ scheduler \ win32 \ windows EMUSUBDIRS = \ miscemu \ server PROGSUBDIRS = \ debugger \ libtest \ programs DOCSUBDIRS = documentation INCSUBDIRS = include # Stand-alone programs PROGRAMS = \ loader/dos/dosmod \ server/wineserver # Programs that link with libwine LIBPROGRAMS = \ debugger/winedbg # Sub-directories to run make into SUBDIRS = \ $(TOOLSUBDIRS) \ $(LIBSUBDIRS) \ $(DLLDIR) \ $(EMUSUBDIRS) \ $(PROGSUBDIRS) \ $(DOCSUBDIRS) \ include # Sub-directories to run make install into INSTALLSUBDIRS = $(DLLDIR) $(DOCSUBDIRS) $(INCSUBDIRS) # Sub-directories to run make lint into LINTSUBDIRS = $(LIBSUBDIRS) $(DLLDIR) $(EMUSUBDIRS) $(DOCSUBDIRS) LIBOBJS = \ controls/controls.o \ console/console.o \ dlls/advapi32/advapi32.o \ dlls/crtdll/crtdll.o \ dlls/display/display.o \ dlls/mouse/mouse.o \ dlls/ntdll/ntdll.o \ files/files.o \ graphics/graphics.o \ graphics/enhmetafiledrv/enhmetafiledrv.o \ graphics/metafiledrv/metafiledrv.o \ graphics/psdrv/psdrv.o \ graphics/win16drv/win16drv.o \ if1632/if1632.o \ loader/loader.o \ loader/ne/ne.o \ loader/dos/dos.o \ memory/memory.o \ misc/misc.o \ msdos/msdos.o \ objects/objects.o \ ole/ole.o \ relay32/relay32.o \ resources/resources.o \ scheduler/scheduler.o \ win32/win32.o \ windows/windows.o EMUOBJS = \ miscemu/miscemu.o DLLOBJS = $(DLLS:%=dlls/lib%.@LIBEXT@) EXTRA_OBJS = $(LIBOBJS) EMU_TARGET = @EMU_TARGET@ all: Make.rules $(PROGRAMS) $(LIBPROGRAMS) lib$(MODULE).$(LIBEXT) $(DLLDIR) $(EMU_TARGET) @echo "Wine build complete." LIBLINTS = $(LIBOBJS:.o=.ln) EMULINTS = $(EMUOBJS:.o=.ln) lint:: llib-lwine.ln $(EMULINTS) $(LINT) $(ALLLINTFLAGS) -L. -lwine $(EMULINTS) WINAPI_CHECK_EXTRA_FLAGS = --global @MAKE_RULES@ Make.rules: Make.rules.in configure @echo $? is newer than 'Make.rules', please rerun ./configure! @exit 1 wine: lib$(MODULE).$(LIBEXT) $(DLLDIR) $(EMUOBJS) $(CC) -o wine $(EMUOBJS) $(DLL_LINK) $(LIBS) llib-lwine.ln : $(LIBLINTS) $(LINT) $(ALLLINTFLAGS) -owine $(LIBLINTS) install_so: lib$(MODULE).so.$(SOVERSION) [ -d $(libdir) ] || $(MKDIR) $(libdir) $(INSTALL_PROGRAM) lib$(MODULE).so.$(SOVERSION) $(libdir)/lib$(MODULE).so.$(SOVERSION) cd $(libdir) && $(RM) lib$(MODULE).so && $(LN_S) lib$(MODULE).so.$(SOVERSION) lib$(MODULE).so install_a: lib$(MODULE).a [ -d $(libdir) ] || $(MKDIR) $(libdir) $(INSTALL_DATA) lib$(MODULE).a $(libdir)/lib$(MODULE).a install_wine: wine [ -d $(bindir) ] || $(MKDIR) $(bindir) $(INSTALL_PROGRAM) wine $(bindir)/wine install:: $(PROGRAMS) $(LIBPROGRAMS) $(EMU_TARGET:%=install_%) $(LIBEXT:%=install_%) [ -d $(bindir) ] || $(MKDIR) $(bindir) $(INSTALL_PROGRAM) server/wineserver $(bindir)/wineserver $(INSTALL_PROGRAM) loader/dos/dosmod $(bindir)/dosmod $(INSTALL_PROGRAM) debugger/winedbg $(bindir)/winedbg uninstall:: cd $(libdir) && $(RM) libwine.a libwine.so libwine.so.$(SOVERSION) cd $(bindir) && $(RM) wine wineserver dosmod winedbg lib$(MODULE).so.$(SOVERSION): $(OBJS) Makefile.in Make.rules.in $(LDSHARED) $(OBJS) -o $@ lib$(MODULE).so: lib$(MODULE).so.$(SOVERSION) $(RM) $@ && $(LN_S) lib$(MODULE).so.$(SOVERSION) $@ lib$(MODULE).a: $(OBJS) Makefile.in Make.rules.in $(RM) $@ $(AR) $@ $(OBJS) $(RANLIB) $@ checklink:: $(CC) -o checklink $(TOPSRCDIR)/library/checklink.c -L. -lwine $(LIBS) && $(RM) checklink $(EMUOBJS) $(LIBOBJS) $(DLLOBJS) $(PROGRAMS) $(LIBPROGRAMS): $(TOOLSUBDIRS) dummy @cd `dirname $@` && $(MAKE) `basename $@` $(DLLDIR): $(TOOLSUBDIRS) dummy $(LIBPROGRAMS): lib$(MODULE).$(LIBEXT) $(DLLDIR) $(LIBLINTS) $(EMULINTS): dummy @cd `dirname $@` && $(MAKE) lint install_programs: dummy @cd programs && $(MAKE) install uninstall_programs: dummy @cd programs && $(MAKE) uninstall install:: for i in $(INSTALLSUBDIRS); do (cd $$i && $(MAKE) install) || exit 1; done -$(LDCONFIG) uninstall:: for i in $(INSTALLSUBDIRS); do (cd $$i && $(MAKE) uninstall) || exit 1; done checklink:: @cd dlls && $(MAKE) checklink TAGS etags: etags `find $(TOPSRCDIR) -name '*.[chS]' -print | grep -v dbgmain` manpages: -$(MKDIR) $(TOPOBJDIR)/documentation/man3w for i in $(LIBSUBDIRS); do (cd $$i && $(MAKE) man); done htmlpages: -$(MKDIR) $(TOPOBJDIR)/documentation/html for i in $(LIBSUBDIRS); do (cd $$i && $(MAKE) html); done clean:: $(RM) wine libwine.so.1.0 TAGS distclean: clean $(RM) config.* Make.rules dlls/Makedll.rules include/config.h documentation/wine.man documentation/wine.conf.man $(RM) `find . \( -name Makefile -o -size 0 \) -print` # We depend on configure above for checks, so we better don't use this rule. #configure: configure.in # autoconf include/config.h.in: configure.in include/acconfig.h autoheader -l include ### Dependencies: wine-20000526/README0100644000175000001440000001437507044653732013346 0ustar julliardusers1. INTRODUCTION Wine is a program which allows running Microsoft Windows programs (including DOS, Windows 3.x and Win32 executables) on Unix. It consists of a program loader which loads and executes a Microsoft Windows binary, and a library that implements Windows API calls using their Unix or X11 equivalents. The library may also be used for porting Win32 code into native Unix executables. Wine is free software, and its license (contained in the file LICENSE) is BSD style. Basically, you can do anything with it except claim that you wrote it. 2. QUICK START For the impatient, use the Wine Installer to build and install wine. From the top-level Wine directory (which contains this file), run: ./tools/wineinstall Run programs as "wine [options] program". For more information and problem resolution, read the rest of this file, the Wine manpage, and the files in the documentation directory in the Wine source. 3. REQUIREMENTS To compile and run Wine, you must have one of the following: Linux version 2.0.36 or above FreeBSD-current or FreeBSD 3.0 or later Solaris x86 2.5 or later Although Linux version 2.0.x will mostly work, certain features (specifically LDT sharing) required for properly supporting Win32 threads were not implemented until kernel version 2.2. If you get consistent thread-related crashes, you may want to upgrade to 2.2. Similarly if you are on FreeBSD you may want to apply an LDT sharing patch too (unless you are tracking -current where it finally has been committed just recently), and there also is a small sigtrap fix thats needed for wine's debugger. (Actually now that its using ptrace() by default it may no longer make a difference but it still doesn't hurt...) And if you're running a system from the -stable branch older than Nov 15 1999, like a 3.3-RELEASE, then you also need to apply a signal handling change that was MFC'd at that date. More information including patches for the -stable branch is in the ports tree: ftp://ftp.freebsd.org/pub/FreeBSD/FreeBSD-current/ports/emulators/wine/files/ You also need to have libXpm installed on your system. The sources for it are available at ftp.x.org and all its mirror sites in the directory /contrib/libraries. If you are using RedHat, libXpm is distributed as the xpm and xpm-devel packages. Debian distributes libXpm as xpm4.7, xpm4g, and xpm4g-dev 3.4j. SuSE calls these packages xpm and xpm-devel. On x86 Systems gcc >= 2.7.2 is required. You also need flex version 2.5 or later and yacc. Bison will work as a replacement for yacc. If you are using RedHat, install the flex and bison packages. 4. COMPILATION To build Wine, run the following commands: ./configure make depend make This will build the library "libwine.a" and the program "wine". The program "wine" will load and run Windows executables. The library "libwine.a" can be used to compile and link Windows source code under Unix. If you do not intend to compile Windows source code, use "./configure --disable-lib" to skip building the library and reduce disk space requirements. If you have an ELF compiler (which you probably do), you can use "./configure --enable-dll" to build a shared library instead. To see other configuration options, do ./configure --help. To upgrade to a new release by using a patch file, first cd to the top-level directory of the release (the one containing this README file). Then do a "make clean", and patch the release with: gunzip -c patch-file | patch -p1 where "patch-file" is the name of the patch file (something like Wine-yymmdd.diff.gz). You can then re-run "./configure", and then run "make depend && make". 5. SETUP Once Wine has been built correctly, you can do "make install"; this will install the wine executable, the Wine man page, and a few other needed files. Wine requires a configuration file named wine.conf. Its default location is /usr/local/etc, but you can supply a different name when configuring wine by using the --prefix or --sysconfdir options to ./configure. You can also override the global configuration file with a .winerc file in your home directory. The format of this file is explained in the man page. The file wine.ini contains an example configuration file which has to be adapted and copied to one of the two locations mentioned above. See http://www.winehq.com/config.html for further configuration hints. 6. RUNNING PROGRAMS When invoking Wine, you may specify the entire path to the executable, or a filename only. For example: to run Solitaire: wine sol (using the searchpath to locate the file) wine sol.exe wine c:\\windows\\sol.exe (using a DOS filename) wine /usr/windows/sol.exe (using a Unix filename) Note: the path of the file will also be added to the path when a full name is supplied on the commandline. Wine is not yet complete, so some programs may crash. You will be dropped into a debugger so that you can investigate and fix the problem. For more information on how to do this, please read the file documentation/debugging. If you post a bug report, please read the file documentation/bugreports to see what information is required. 7. GETTING MORE INFORMATION DOCU: grep -i "SearchString" `find documentation/`|more FAQ: The Wine FAQ is located at http://www.winehq.com/faq.html. WWW: A great deal of information about Wine is available from WineHQ at http://www.winehq.com/. Untested patches against the current release are available on the wine-patches mailing list; see http://www.winehq.com/dev.html#ml for more information. HOWTO: The Wine HOWTO is available at http://www.westfalen.de/witch/wine-HOWTO.txt . Usenet: Please browse old messages on http://www.dejanews.com/ to check whether your problem is already fixed before posting a bug report to the newsgroup. The best place to get help or to report bugs is the Usenet newsgroup comp.emulators.ms-windows.wine. Please read the file documentation/bugreports to see what information should be included in a bug report. IRC: Online help is available at channel #WineHQ on IRCnet. CVS: The current Wine development tree is available through CVS. Go to http://www.winehq.com/dev.html for more information. If you add something, or fix a bug, please send a patch ('diff -u' format preferred) to julliard@lrc.epfl.ch for inclusion in the next release. -- Alexandre Julliard julliard@lrc.epfl.ch wine-20000526/WARRANTY0100644000175000001440000000132507101106342013627 0ustar julliardusers@c This file is processed by GNU's TeXinfo @c If you modify it or move it to another location, make sure that @c TeXinfo works (type `make' in directory documentation). @c This warranty is part of the license agreement. @c See the file LICENSE for the copying conditions. THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. wine-20000526/configure0100755000175000001440000056005607112613011014355 0ustar julliardusers#! /bin/sh # From configure.in configure.in 1.00 # Guess values for system-dependent variables and create Makefiles. # Generated automatically using autoconf version 2.13 # Copyright (C) 1992, 93, 94, 95, 96 Free Software Foundation, Inc. # # This configure script is free software; the Free Software Foundation # gives unlimited permission to copy, distribute and modify it. # Defaults: ac_help= ac_default_prefix=/usr/local # Any additions from configure.in: ac_help="$ac_help --disable-emulator build only the Wine library, not the emulator" ac_help="$ac_help --disable-dll build static libraries instead of DLLs" ac_help="$ac_help --disable-debug compile out all debugging messages" ac_help="$ac_help --enable-opengl force usage of OpenGL even if the latter is thread-safe" ac_help="$ac_help --disable-trace compile out TRACE messages" ac_help="$ac_help --without-curses do not use curses" ac_help="$ac_help --without-reentrant-x compile for use with non-reentrant X libraries" ac_help="$ac_help --with-x use the X Window System" # Initialize some variables set by options. # The variables have the same names as the options, with # dashes changed to underlines. build=NONE cache_file=./config.cache exec_prefix=NONE host=NONE no_create= nonopt=NONE no_recursion= prefix=NONE program_prefix=NONE program_suffix=NONE program_transform_name=s,x,x, silent= site= srcdir= target=NONE verbose= x_includes=NONE x_libraries=NONE bindir='${exec_prefix}/bin' sbindir='${exec_prefix}/sbin' libexecdir='${exec_prefix}/libexec' datadir='${prefix}/share' sysconfdir='${prefix}/etc' sharedstatedir='${prefix}/com' localstatedir='${prefix}/var' libdir='${exec_prefix}/lib' includedir='${prefix}/include' oldincludedir='/usr/include' infodir='${prefix}/info' mandir='${prefix}/man' # Initialize some other variables. subdirs= MFLAGS= MAKEFLAGS= SHELL=${CONFIG_SHELL-/bin/sh} # Maximum number of lines to put in a shell here document. ac_max_here_lines=12 ac_prev= for ac_option do # If the previous option needs an argument, assign it. if test -n "$ac_prev"; then eval "$ac_prev=\$ac_option" ac_prev= continue fi case "$ac_option" in -*=*) ac_optarg=`echo "$ac_option" | sed 's/[-_a-zA-Z0-9]*=//'` ;; *) ac_optarg= ;; esac # Accept the important Cygnus configure options, so we can diagnose typos. case "$ac_option" in -bindir | --bindir | --bindi | --bind | --bin | --bi) ac_prev=bindir ;; -bindir=* | --bindir=* | --bindi=* | --bind=* | --bin=* | --bi=*) bindir="$ac_optarg" ;; -build | --build | --buil | --bui | --bu) ac_prev=build ;; -build=* | --build=* | --buil=* | --bui=* | --bu=*) build="$ac_optarg" ;; -cache-file | --cache-file | --cache-fil | --cache-fi \ | --cache-f | --cache- | --cache | --cach | --cac | --ca | --c) ac_prev=cache_file ;; -cache-file=* | --cache-file=* | --cache-fil=* | --cache-fi=* \ | --cache-f=* | --cache-=* | --cache=* | --cach=* | --cac=* | --ca=* | --c=*) cache_file="$ac_optarg" ;; -datadir | --datadir | --datadi | --datad | --data | --dat | --da) ac_prev=datadir ;; -datadir=* | --datadir=* | --datadi=* | --datad=* | --data=* | --dat=* \ | --da=*) datadir="$ac_optarg" ;; -disable-* | --disable-*) ac_feature=`echo $ac_option|sed -e 's/-*disable-//'` # Reject names that are not valid shell variable names. if test -n "`echo $ac_feature| sed 's/[-a-zA-Z0-9_]//g'`"; then { echo "configure: error: $ac_feature: invalid feature name" 1>&2; exit 1; } fi ac_feature=`echo $ac_feature| sed 's/-/_/g'` eval "enable_${ac_feature}=no" ;; -enable-* | --enable-*) ac_feature=`echo $ac_option|sed -e 's/-*enable-//' -e 's/=.*//'` # Reject names that are not valid shell variable names. if test -n "`echo $ac_feature| sed 's/[-_a-zA-Z0-9]//g'`"; then { echo "configure: error: $ac_feature: invalid feature name" 1>&2; exit 1; } fi ac_feature=`echo $ac_feature| sed 's/-/_/g'` case "$ac_option" in *=*) ;; *) ac_optarg=yes ;; esac eval "enable_${ac_feature}='$ac_optarg'" ;; -exec-prefix | --exec_prefix | --exec-prefix | --exec-prefi \ | --exec-pref | --exec-pre | --exec-pr | --exec-p | --exec- \ | --exec | --exe | --ex) ac_prev=exec_prefix ;; -exec-prefix=* | --exec_prefix=* | --exec-prefix=* | --exec-prefi=* \ | --exec-pref=* | --exec-pre=* | --exec-pr=* | --exec-p=* | --exec-=* \ | --exec=* | --exe=* | --ex=*) exec_prefix="$ac_optarg" ;; -gas | --gas | --ga | --g) # Obsolete; use --with-gas. with_gas=yes ;; -help | --help | --hel | --he) # Omit some internal or obsolete options to make the list less imposing. # This message is too long to be a string in the A/UX 3.1 sh. cat << EOF Usage: configure [options] [host] Options: [defaults in brackets after descriptions] Configuration: --cache-file=FILE cache test results in FILE --help print this message --no-create do not create output files --quiet, --silent do not print \`checking...' messages --version print the version of autoconf that created configure Directory and file names: --prefix=PREFIX install architecture-independent files in PREFIX [$ac_default_prefix] --exec-prefix=EPREFIX install architecture-dependent files in EPREFIX [same as prefix] --bindir=DIR user executables in DIR [EPREFIX/bin] --sbindir=DIR system admin executables in DIR [EPREFIX/sbin] --libexecdir=DIR program executables in DIR [EPREFIX/libexec] --datadir=DIR read-only architecture-independent data in DIR [PREFIX/share] --sysconfdir=DIR read-only single-machine data in DIR [PREFIX/etc] --sharedstatedir=DIR modifiable architecture-independent data in DIR [PREFIX/com] --localstatedir=DIR modifiable single-machine data in DIR [PREFIX/var] --libdir=DIR object code libraries in DIR [EPREFIX/lib] --includedir=DIR C header files in DIR [PREFIX/include] --oldincludedir=DIR C header files for non-gcc in DIR [/usr/include] --infodir=DIR info documentation in DIR [PREFIX/info] --mandir=DIR man documentation in DIR [PREFIX/man] --srcdir=DIR find the sources in DIR [configure dir or ..] --program-prefix=PREFIX prepend PREFIX to installed program names --program-suffix=SUFFIX append SUFFIX to installed program names --program-transform-name=PROGRAM run sed PROGRAM on installed program names EOF cat << EOF Host type: --build=BUILD configure for building on BUILD [BUILD=HOST] --host=HOST configure for HOST [guessed] --target=TARGET configure for TARGET [TARGET=HOST] Features and packages: --disable-FEATURE do not include FEATURE (same as --enable-FEATURE=no) --enable-FEATURE[=ARG] include FEATURE [ARG=yes] --with-PACKAGE[=ARG] use PACKAGE [ARG=yes] --without-PACKAGE do not use PACKAGE (same as --with-PACKAGE=no) --x-includes=DIR X include files are in DIR --x-libraries=DIR X library files are in DIR EOF if test -n "$ac_help"; then echo "--enable and --with options recognized:$ac_help" fi exit 0 ;; -host | --host | --hos | --ho) ac_prev=host ;; -host=* | --host=* | --hos=* | --ho=*) host="$ac_optarg" ;; -includedir | --includedir | --includedi | --included | --include \ | --includ | --inclu | --incl | --inc) ac_prev=includedir ;; -includedir=* | --includedir=* | --includedi=* | --included=* | --include=* \ | --includ=* | --inclu=* | --incl=* | --inc=*) includedir="$ac_optarg" ;; -infodir | --infodir | --infodi | --infod | --info | --inf) ac_prev=infodir ;; -infodir=* | --infodir=* | --infodi=* | --infod=* | --info=* | --inf=*) infodir="$ac_optarg" ;; -libdir | --libdir | --libdi | --libd) ac_prev=libdir ;; -libdir=* | --libdir=* | --libdi=* | --libd=*) libdir="$ac_optarg" ;; -libexecdir | --libexecdir | --libexecdi | --libexecd | --libexec \ | --libexe | --libex | --libe) ac_prev=libexecdir ;; -libexecdir=* | --libexecdir=* | --libexecdi=* | --libexecd=* | --libexec=* \ | --libexe=* | --libex=* | --libe=*) libexecdir="$ac_optarg" ;; -localstatedir | --localstatedir | --localstatedi | --localstated \ | --localstate | --localstat | --localsta | --localst \ | --locals | --local | --loca | --loc | --lo) ac_prev=localstatedir ;; -localstatedir=* | --localstatedir=* | --localstatedi=* | --localstated=* \ | --localstate=* | --localstat=* | --localsta=* | --localst=* \ | --locals=* | --local=* | --loca=* | --loc=* | --lo=*) localstatedir="$ac_optarg" ;; -mandir | --mandir | --mandi | --mand | --man | --ma | --m) ac_prev=mandir ;; -mandir=* | --mandir=* | --mandi=* | --mand=* | --man=* | --ma=* | --m=*) mandir="$ac_optarg" ;; -nfp | --nfp | --nf) # Obsolete; use --without-fp. with_fp=no ;; -no-create | --no-create | --no-creat | --no-crea | --no-cre \ | --no-cr | --no-c) no_create=yes ;; -no-recursion | --no-recursion | --no-recursio | --no-recursi \ | --no-recurs | --no-recur | --no-recu | --no-rec | --no-re | --no-r) no_recursion=yes ;; -oldincludedir | --oldincludedir | --oldincludedi | --oldincluded \ | --oldinclude | --oldinclud | --oldinclu | --oldincl | --oldinc \ | --oldin | --oldi | --old | --ol | --o) ac_prev=oldincludedir ;; -oldincludedir=* | --oldincludedir=* | --oldincludedi=* | --oldincluded=* \ | --oldinclude=* | --oldinclud=* | --oldinclu=* | --oldincl=* | --oldinc=* \ | --oldin=* | --oldi=* | --old=* | --ol=* | --o=*) oldincludedir="$ac_optarg" ;; -prefix | --prefix | --prefi | --pref | --pre | --pr | --p) ac_prev=prefix ;; -prefix=* | --prefix=* | --prefi=* | --pref=* | --pre=* | --pr=* | --p=*) prefix="$ac_optarg" ;; -program-prefix | --program-prefix | --program-prefi | --program-pref \ | --program-pre | --program-pr | --program-p) ac_prev=program_prefix ;; -program-prefix=* | --program-prefix=* | --program-prefi=* \ | --program-pref=* | --program-pre=* | --program-pr=* | --program-p=*) program_prefix="$ac_optarg" ;; -program-suffix | --program-suffix | --program-suffi | --program-suff \ | --program-suf | --program-su | --program-s) ac_prev=program_suffix ;; -program-suffix=* | --program-suffix=* | --program-suffi=* \ | --program-suff=* | --program-suf=* | --program-su=* | --program-s=*) program_suffix="$ac_optarg" ;; -program-transform-name | --program-transform-name \ | --program-transform-nam | --program-transform-na \ | --program-transform-n | --program-transform- \ | --program-transform | --program-transfor \ | --program-transfo | --program-transf \ | --program-trans | --program-tran \ | --progr-tra | --program-tr | --program-t) ac_prev=program_transform_name ;; -program-transform-name=* | --program-transform-name=* \ | --program-transform-nam=* | --program-transform-na=* \ | --program-transform-n=* | --program-transform-=* \ | --program-transform=* | --program-transfor=* \ | --program-transfo=* | --program-transf=* \ | --program-trans=* | --program-tran=* \ | --progr-tra=* | --program-tr=* | --program-t=*) program_transform_name="$ac_optarg" ;; -q | -quiet | --quiet | --quie | --qui | --qu | --q \ | -silent | --silent | --silen | --sile | --sil) silent=yes ;; -sbindir | --sbindir | --sbindi | --sbind | --sbin | --sbi | --sb) ac_prev=sbindir ;; -sbindir=* | --sbindir=* | --sbindi=* | --sbind=* | --sbin=* \ | --sbi=* | --sb=*) sbindir="$ac_optarg" ;; -sharedstatedir | --sharedstatedir | --sharedstatedi \ | --sharedstated | --sharedstate | --sharedstat | --sharedsta \ | --sharedst | --shareds | --shared | --share | --shar \ | --sha | --sh) ac_prev=sharedstatedir ;; -sharedstatedir=* | --sharedstatedir=* | --sharedstatedi=* \ | --sharedstated=* | --sharedstate=* | --sharedstat=* | --sharedsta=* \ | --sharedst=* | --shareds=* | --shared=* | --share=* | --shar=* \ | --sha=* | --sh=*) sharedstatedir="$ac_optarg" ;; -site | --site | --sit) ac_prev=site ;; -site=* | --site=* | --sit=*) site="$ac_optarg" ;; -srcdir | --srcdir | --srcdi | --srcd | --src | --sr) ac_prev=srcdir ;; -srcdir=* | --srcdir=* | --srcdi=* | --srcd=* | --src=* | --sr=*) srcdir="$ac_optarg" ;; -sysconfdir | --sysconfdir | --sysconfdi | --sysconfd | --sysconf \ | --syscon | --sysco | --sysc | --sys | --sy) ac_prev=sysconfdir ;; -sysconfdir=* | --sysconfdir=* | --sysconfdi=* | --sysconfd=* | --sysconf=* \ | --syscon=* | --sysco=* | --sysc=* | --sys=* | --sy=*) sysconfdir="$ac_optarg" ;; -target | --target | --targe | --targ | --tar | --ta | --t) ac_prev=target ;; -target=* | --target=* | --targe=* | --targ=* | --tar=* | --ta=* | --t=*) target="$ac_optarg" ;; -v | -verbose | --verbose | --verbos | --verbo | --verb) verbose=yes ;; -version | --version | --versio | --versi | --vers) echo "configure generated by autoconf version 2.13" exit 0 ;; -with-* | --with-*) ac_package=`echo $ac_option|sed -e 's/-*with-//' -e 's/=.*//'` # Reject names that are not valid shell variable names. if test -n "`echo $ac_package| sed 's/[-_a-zA-Z0-9]//g'`"; then { echo "configure: error: $ac_package: invalid package name" 1>&2; exit 1; } fi ac_package=`echo $ac_package| sed 's/-/_/g'` case "$ac_option" in *=*) ;; *) ac_optarg=yes ;; esac eval "with_${ac_package}='$ac_optarg'" ;; -without-* | --without-*) ac_package=`echo $ac_option|sed -e 's/-*without-//'` # Reject names that are not valid shell variable names. if test -n "`echo $ac_package| sed 's/[-a-zA-Z0-9_]//g'`"; then { echo "configure: error: $ac_package: invalid package name" 1>&2; exit 1; } fi ac_package=`echo $ac_package| sed 's/-/_/g'` eval "with_${ac_package}=no" ;; --x) # Obsolete; use --with-x. with_x=yes ;; -x-includes | --x-includes | --x-include | --x-includ | --x-inclu \ | --x-incl | --x-inc | --x-in | --x-i) ac_prev=x_includes ;; -x-includes=* | --x-includes=* | --x-include=* | --x-includ=* | --x-inclu=* \ | --x-incl=* | --x-inc=* | --x-in=* | --x-i=*) x_includes="$ac_optarg" ;; -x-libraries | --x-libraries | --x-librarie | --x-librari \ | --x-librar | --x-libra | --x-libr | --x-lib | --x-li | --x-l) ac_prev=x_libraries ;; -x-libraries=* | --x-libraries=* | --x-librarie=* | --x-librari=* \ | --x-librar=* | --x-libra=* | --x-libr=* | --x-lib=* | --x-li=* | --x-l=*) x_libraries="$ac_optarg" ;; -*) { echo "configure: error: $ac_option: invalid option; use --help to show usage" 1>&2; exit 1; } ;; *) if test -n "`echo $ac_option| sed 's/[-a-z0-9.]//g'`"; then echo "configure: warning: $ac_option: invalid host type" 1>&2 fi if test "x$nonopt" != xNONE; then { echo "configure: error: can only configure for one host and one target at a time" 1>&2; exit 1; } fi nonopt="$ac_option" ;; esac done if test -n "$ac_prev"; then { echo "configure: error: missing argument to --`echo $ac_prev | sed 's/_/-/g'`" 1>&2; exit 1; } fi trap 'rm -fr conftest* confdefs* core core.* *.core $ac_clean_files; exit 1' 1 2 15 # File descriptor usage: # 0 standard input # 1 file creation # 2 errors and warnings # 3 some systems may open it to /dev/tty # 4 used on the Kubota Titan # 6 checking for... messages and results # 5 compiler messages saved in config.log if test "$silent" = yes; then exec 6>/dev/null else exec 6>&1 fi exec 5>./config.log echo "\ This file contains any messages produced by compilers while running configure, to aid debugging if configure makes a mistake. " 1>&5 # Strip out --no-create and --no-recursion so they do not pile up. # Also quote any args containing shell metacharacters. ac_configure_args= for ac_arg do case "$ac_arg" in -no-create | --no-create | --no-creat | --no-crea | --no-cre \ | --no-cr | --no-c) ;; -no-recursion | --no-recursion | --no-recursio | --no-recursi \ | --no-recurs | --no-recur | --no-recu | --no-rec | --no-re | --no-r) ;; *" "*|*" "*|*[\[\]\~\#\$\^\&\*\(\)\{\}\\\|\;\<\>\?]*) ac_configure_args="$ac_configure_args '$ac_arg'" ;; *) ac_configure_args="$ac_configure_args $ac_arg" ;; esac done # NLS nuisances. # Only set these to C if already set. These must not be set unconditionally # because not all systems understand e.g. LANG=C (notably SCO). # Fixing LC_MESSAGES prevents Solaris sh from translating var values in `set'! # Non-C LC_CTYPE values break the ctype check. if test "${LANG+set}" = set; then LANG=C; export LANG; fi if test "${LC_ALL+set}" = set; then LC_ALL=C; export LC_ALL; fi if test "${LC_MESSAGES+set}" = set; then LC_MESSAGES=C; export LC_MESSAGES; fi if test "${LC_CTYPE+set}" = set; then LC_CTYPE=C; export LC_CTYPE; fi # confdefs.h avoids OS command line length limits that DEFS can exceed. rm -rf conftest* confdefs.h # AIX cpp loses on an empty file, so make sure it contains at least a newline. echo > confdefs.h # A filename unique to this package, relative to the directory that # configure is in, which we can look for to find out if srcdir is correct. ac_unique_file=controls/edit.c # Find the source files, if location was not specified. if test -z "$srcdir"; then ac_srcdir_defaulted=yes # Try the directory containing this script, then its parent. ac_prog=$0 ac_confdir=`echo $ac_prog|sed 's%/[^/][^/]*$%%'` test "x$ac_confdir" = "x$ac_prog" && ac_confdir=. srcdir=$ac_confdir if test ! -r $srcdir/$ac_unique_file; then srcdir=.. fi else ac_srcdir_defaulted=no fi if test ! -r $srcdir/$ac_unique_file; then if test "$ac_srcdir_defaulted" = yes; then { echo "configure: error: can not find sources in $ac_confdir or .." 1>&2; exit 1; } else { echo "configure: error: can not find sources in $srcdir" 1>&2; exit 1; } fi fi srcdir=`echo "${srcdir}" | sed 's%\([^/]\)/*$%\1%'` # Prefer explicitly selected file to automatically selected ones. if test -z "$CONFIG_SITE"; then if test "x$prefix" != xNONE; then CONFIG_SITE="$prefix/share/config.site $prefix/etc/config.site" else CONFIG_SITE="$ac_default_prefix/share/config.site $ac_default_prefix/etc/config.site" fi fi for ac_site_file in $CONFIG_SITE; do if test -r "$ac_site_file"; then echo "loading site script $ac_site_file" . "$ac_site_file" fi done if test -r "$cache_file"; then echo "loading cache $cache_file" . $cache_file else echo "creating cache $cache_file" > $cache_file fi ac_ext=c # CFLAGS is not in ac_cpp because -g, -O, etc. are not valid cpp options. ac_cpp='$CPP $CPPFLAGS' ac_compile='${CC-cc} -c $CFLAGS $CPPFLAGS conftest.$ac_ext 1>&5' ac_link='${CC-cc} -o conftest${ac_exeext} $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS 1>&5' cross_compiling=$ac_cv_prog_cc_cross ac_exeext= ac_objext=o if (echo "testing\c"; echo 1,2,3) | grep c >/dev/null; then # Stardent Vistra SVR4 grep lacks -e, says ghazi@caip.rutgers.edu. if (echo -n testing; echo 1,2,3) | sed s/-n/xn/ | grep xn >/dev/null; then ac_n= ac_c=' ' ac_t=' ' else ac_n=-n ac_c= ac_t= fi else ac_n= ac_c='\c' ac_t= fi ac_aux_dir= for ac_dir in tools $srcdir/tools; do if test -f $ac_dir/install-sh; then ac_aux_dir=$ac_dir ac_install_sh="$ac_aux_dir/install-sh -c" break elif test -f $ac_dir/install.sh; then ac_aux_dir=$ac_dir ac_install_sh="$ac_aux_dir/install.sh -c" break fi done if test -z "$ac_aux_dir"; then { echo "configure: error: can not find install-sh or install.sh in tools $srcdir/tools" 1>&2; exit 1; } fi ac_config_guess=$ac_aux_dir/config.guess ac_config_sub=$ac_aux_dir/config.sub ac_configure=$ac_aux_dir/configure # This should be Cygnus configure. # We want these before the checks, so the checks can modify their values. test -z "$PROGEXT" && PROGEXT="" EMU_TARGET=wine LIBEXT=so # library type .so or .a TRACE_MSGS=yes # the TRACE() macro DEBUG_MSGS=yes # the TRACE(), WARN(), and FIXME() macros. CURSES=yes OPENGL=normal # Check whether --enable-emulator or --disable-emulator was given. if test "${enable_emulator+set}" = set; then enableval="$enable_emulator" if test "$enableval" = "no"; then EMU_TARGET=""; fi fi # Check whether --enable-dll or --disable-dll was given. if test "${enable_dll+set}" = set; then enableval="$enable_dll" if test "$enableval" = "no"; then LIBEXT="a"; fi fi # Check whether --enable-debug or --disable-debug was given. if test "${enable_debug+set}" = set; then enableval="$enable_debug" if test "$enableval" = "no"; then DEBUG_MSGS="no"; fi fi # Check whether --enable-opengl or --disable-opengl was given. if test "${enable_opengl+set}" = set; then enableval="$enable_opengl" if test "$enableval" = "no"; then OPENGL="no"; elif test "$enableval" = "yes"; then OPENGL="yes"; fi fi # Check whether --enable-trace or --disable-trace was given. if test "${enable_trace+set}" = set; then enableval="$enable_trace" if test "$enableval" = "no"; then TRACE_MSGS="no"; fi fi # Check whether --with-curses or --without-curses was given. if test "${with_curses+set}" = set; then withval="$with_curses" if test "$withval" = "no"; then CURSES="no"; fi fi # Check whether --with-reentrant-x or --without-reentrant-x was given. if test "${with_reentrant_x+set}" = set; then withval="$with_reentrant_x" : fi if test "$DEBUG_MSGS" = "no" then cat >> confdefs.h <<\EOF #define NO_DEBUG_MSGS 1 EOF cat >> confdefs.h <<\EOF #define NO_TRACE_MSGS 1 EOF else if test "$TRACE_MSGS" = "no" then cat >> confdefs.h <<\EOF #define NO_TRACE_MSGS 1 EOF fi fi echo $ac_n "checking whether ${MAKE-make} sets \${MAKE}""... $ac_c" 1>&6 echo "configure:649: checking whether ${MAKE-make} sets \${MAKE}" >&5 set dummy ${MAKE-make}; ac_make=`echo "$2" | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_prog_make_${ac_make}_set'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftestmake <<\EOF all: @echo 'ac_maketemp="${MAKE}"' EOF # GNU make sometimes prints "make[1]: Entering...", which would confuse us. eval `${MAKE-make} -f conftestmake 2>/dev/null | grep temp=` if test -n "$ac_maketemp"; then eval ac_cv_prog_make_${ac_make}_set=yes else eval ac_cv_prog_make_${ac_make}_set=no fi rm -f conftestmake fi if eval "test \"`echo '$ac_cv_prog_make_'${ac_make}_set`\" = yes"; then echo "$ac_t""yes" 1>&6 SET_MAKE= else echo "$ac_t""no" 1>&6 SET_MAKE="MAKE=${MAKE-make}" fi # Extract the first word of "gcc", so it can be a program name with args. set dummy gcc; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 echo "configure:678: checking for $ac_word" >&5 if eval "test \"`echo '$''{'ac_cv_prog_CC'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test -n "$CC"; then ac_cv_prog_CC="$CC" # Let the user override the test. else IFS="${IFS= }"; ac_save_ifs="$IFS"; IFS=":" ac_dummy="$PATH" for ac_dir in $ac_dummy; do test -z "$ac_dir" && ac_dir=. if test -f $ac_dir/$ac_word; then ac_cv_prog_CC="gcc" break fi done IFS="$ac_save_ifs" fi fi CC="$ac_cv_prog_CC" if test -n "$CC"; then echo "$ac_t""$CC" 1>&6 else echo "$ac_t""no" 1>&6 fi if test -z "$CC"; then # Extract the first word of "cc", so it can be a program name with args. set dummy cc; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 echo "configure:708: checking for $ac_word" >&5 if eval "test \"`echo '$''{'ac_cv_prog_CC'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test -n "$CC"; then ac_cv_prog_CC="$CC" # Let the user override the test. else IFS="${IFS= }"; ac_save_ifs="$IFS"; IFS=":" ac_prog_rejected=no ac_dummy="$PATH" for ac_dir in $ac_dummy; do test -z "$ac_dir" && ac_dir=. if test -f $ac_dir/$ac_word; then if test "$ac_dir/$ac_word" = "/usr/ucb/cc"; then ac_prog_rejected=yes continue fi ac_cv_prog_CC="cc" break fi done IFS="$ac_save_ifs" if test $ac_prog_rejected = yes; then # We found a bogon in the path, so make sure we never use it. set dummy $ac_cv_prog_CC shift if test $# -gt 0; then # We chose a different compiler from the bogus one. # However, it has the same basename, so the bogon will be chosen # first if we set CC to just the basename; use the full file name. shift set dummy "$ac_dir/$ac_word" "$@" shift ac_cv_prog_CC="$@" fi fi fi fi CC="$ac_cv_prog_CC" if test -n "$CC"; then echo "$ac_t""$CC" 1>&6 else echo "$ac_t""no" 1>&6 fi if test -z "$CC"; then case "`uname -s`" in *win32* | *WIN32*) # Extract the first word of "cl", so it can be a program name with args. set dummy cl; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 echo "configure:759: checking for $ac_word" >&5 if eval "test \"`echo '$''{'ac_cv_prog_CC'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test -n "$CC"; then ac_cv_prog_CC="$CC" # Let the user override the test. else IFS="${IFS= }"; ac_save_ifs="$IFS"; IFS=":" ac_dummy="$PATH" for ac_dir in $ac_dummy; do test -z "$ac_dir" && ac_dir=. if test -f $ac_dir/$ac_word; then ac_cv_prog_CC="cl" break fi done IFS="$ac_save_ifs" fi fi CC="$ac_cv_prog_CC" if test -n "$CC"; then echo "$ac_t""$CC" 1>&6 else echo "$ac_t""no" 1>&6 fi ;; esac fi test -z "$CC" && { echo "configure: error: no acceptable cc found in \$PATH" 1>&2; exit 1; } fi echo $ac_n "checking whether the C compiler ($CC $CFLAGS $LDFLAGS) works""... $ac_c" 1>&6 echo "configure:791: checking whether the C compiler ($CC $CFLAGS $LDFLAGS) works" >&5 ac_ext=c # CFLAGS is not in ac_cpp because -g, -O, etc. are not valid cpp options. ac_cpp='$CPP $CPPFLAGS' ac_compile='${CC-cc} -c $CFLAGS $CPPFLAGS conftest.$ac_ext 1>&5' ac_link='${CC-cc} -o conftest${ac_exeext} $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS 1>&5' cross_compiling=$ac_cv_prog_cc_cross cat > conftest.$ac_ext << EOF #line 802 "configure" #include "confdefs.h" main(){return(0);} EOF if { (eval echo configure:807: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then ac_cv_prog_cc_works=yes # If we can't run a trivial program, we are probably using a cross compiler. if (./conftest; exit) 2>/dev/null; then ac_cv_prog_cc_cross=no else ac_cv_prog_cc_cross=yes fi else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 ac_cv_prog_cc_works=no fi rm -fr conftest* ac_ext=c # CFLAGS is not in ac_cpp because -g, -O, etc. are not valid cpp options. ac_cpp='$CPP $CPPFLAGS' ac_compile='${CC-cc} -c $CFLAGS $CPPFLAGS conftest.$ac_ext 1>&5' ac_link='${CC-cc} -o conftest${ac_exeext} $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS 1>&5' cross_compiling=$ac_cv_prog_cc_cross echo "$ac_t""$ac_cv_prog_cc_works" 1>&6 if test $ac_cv_prog_cc_works = no; then { echo "configure: error: installation or configuration problem: C compiler cannot create executables." 1>&2; exit 1; } fi echo $ac_n "checking whether the C compiler ($CC $CFLAGS $LDFLAGS) is a cross-compiler""... $ac_c" 1>&6 echo "configure:833: checking whether the C compiler ($CC $CFLAGS $LDFLAGS) is a cross-compiler" >&5 echo "$ac_t""$ac_cv_prog_cc_cross" 1>&6 cross_compiling=$ac_cv_prog_cc_cross echo $ac_n "checking whether we are using GNU C""... $ac_c" 1>&6 echo "configure:838: checking whether we are using GNU C" >&5 if eval "test \"`echo '$''{'ac_cv_prog_gcc'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.c <&5; (eval $ac_try) 2>&5; }; } | egrep yes >/dev/null 2>&1; then ac_cv_prog_gcc=yes else ac_cv_prog_gcc=no fi fi echo "$ac_t""$ac_cv_prog_gcc" 1>&6 if test $ac_cv_prog_gcc = yes; then GCC=yes else GCC= fi ac_test_CFLAGS="${CFLAGS+set}" ac_save_CFLAGS="$CFLAGS" CFLAGS= echo $ac_n "checking whether ${CC-cc} accepts -g""... $ac_c" 1>&6 echo "configure:866: checking whether ${CC-cc} accepts -g" >&5 if eval "test \"`echo '$''{'ac_cv_prog_cc_g'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else echo 'void f(){}' > conftest.c if test -z "`${CC-cc} -g -c conftest.c 2>&1`"; then ac_cv_prog_cc_g=yes else ac_cv_prog_cc_g=no fi rm -f conftest* fi echo "$ac_t""$ac_cv_prog_cc_g" 1>&6 if test "$ac_test_CFLAGS" = set; then CFLAGS="$ac_save_CFLAGS" elif test $ac_cv_prog_cc_g = yes; then if test "$GCC" = yes; then CFLAGS="-g -O2" else CFLAGS="-g" fi else if test "$GCC" = yes; then CFLAGS="-O2" else CFLAGS= fi fi echo $ac_n "checking how to run the C preprocessor""... $ac_c" 1>&6 echo "configure:898: checking how to run the C preprocessor" >&5 # On Suns, sometimes $CPP names a directory. if test -n "$CPP" && test -d "$CPP"; then CPP= fi if test -z "$CPP"; then if eval "test \"`echo '$''{'ac_cv_prog_CPP'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else # This must be in double quotes, not single quotes, because CPP may get # substituted into the Makefile and "${CC-cc}" will confuse make. CPP="${CC-cc} -E" # On the NeXT, cc -E runs the code through the compiler's parser, # not just through cpp. cat > conftest.$ac_ext < Syntax Error EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" { (eval echo configure:919: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then : else echo "$ac_err" >&5 echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* CPP="${CC-cc} -E -traditional-cpp" cat > conftest.$ac_ext < Syntax Error EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" { (eval echo configure:936: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then : else echo "$ac_err" >&5 echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* CPP="${CC-cc} -nologo -E" cat > conftest.$ac_ext < Syntax Error EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" { (eval echo configure:953: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then : else echo "$ac_err" >&5 echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* CPP=/lib/cpp fi rm -f conftest* fi rm -f conftest* fi rm -f conftest* ac_cv_prog_CPP="$CPP" fi CPP="$ac_cv_prog_CPP" else ac_cv_prog_CPP="$CPP" fi echo "$ac_t""$CPP" 1>&6 # If we find X, set shell vars x_includes and x_libraries to the # paths, otherwise set no_x=yes. # Uses ac_ vars as temps to allow command line to override cache and checks. # --without-x overrides everything else, but does not touch the cache. echo $ac_n "checking for X""... $ac_c" 1>&6 echo "configure:982: checking for X" >&5 # Check whether --with-x or --without-x was given. if test "${with_x+set}" = set; then withval="$with_x" : fi # $have_x is `yes', `no', `disabled', or empty when we do not yet know. if test "x$with_x" = xno; then # The user explicitly disabled X. have_x=disabled else if test "x$x_includes" != xNONE && test "x$x_libraries" != xNONE; then # Both variables are already set. have_x=yes else if eval "test \"`echo '$''{'ac_cv_have_x'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else # One or both of the vars are not set, and there is no cached value. ac_x_includes=NO ac_x_libraries=NO rm -fr conftestdir if mkdir conftestdir; then cd conftestdir # Make sure to not put "make" in the Imakefile rules, since we grep it out. cat > Imakefile <<'EOF' acfindx: @echo 'ac_im_incroot="${INCROOT}"; ac_im_usrlibdir="${USRLIBDIR}"; ac_im_libdir="${LIBDIR}"' EOF if (xmkmf) >/dev/null 2>/dev/null && test -f Makefile; then # GNU make sometimes prints "make[1]: Entering...", which would confuse us. eval `${MAKE-make} acfindx 2>/dev/null | grep -v make` # Open Windows xmkmf reportedly sets LIBDIR instead of USRLIBDIR. for ac_extension in a so sl; do if test ! -f $ac_im_usrlibdir/libX11.$ac_extension && test -f $ac_im_libdir/libX11.$ac_extension; then ac_im_usrlibdir=$ac_im_libdir; break fi done # Screen out bogus values from the imake configuration. They are # bogus both because they are the default anyway, and because # using them would break gcc on systems where it needs fixed includes. case "$ac_im_incroot" in /usr/include) ;; *) test -f "$ac_im_incroot/X11/Xos.h" && ac_x_includes="$ac_im_incroot" ;; esac case "$ac_im_usrlibdir" in /usr/lib | /lib) ;; *) test -d "$ac_im_usrlibdir" && ac_x_libraries="$ac_im_usrlibdir" ;; esac fi cd .. rm -fr conftestdir fi if test "$ac_x_includes" = NO; then # Guess where to find include files, by looking for this one X11 .h file. test -z "$x_direct_test_include" && x_direct_test_include=X11/Intrinsic.h # First, try using that file with no special directory specified. cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" { (eval echo configure:1049: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then rm -rf conftest* # We can compile using X headers with no special include directory. ac_x_includes= else echo "$ac_err" >&5 echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* # Look for the header file in a standard set of common directories. # Check X11 before X11Rn because it is often a symlink to the current release. for ac_dir in \ /usr/X11/include \ /usr/X11R6/include \ /usr/X11R5/include \ /usr/X11R4/include \ \ /usr/include/X11 \ /usr/include/X11R6 \ /usr/include/X11R5 \ /usr/include/X11R4 \ \ /usr/local/X11/include \ /usr/local/X11R6/include \ /usr/local/X11R5/include \ /usr/local/X11R4/include \ \ /usr/local/include/X11 \ /usr/local/include/X11R6 \ /usr/local/include/X11R5 \ /usr/local/include/X11R4 \ \ /usr/X386/include \ /usr/x386/include \ /usr/XFree86/include/X11 \ \ /usr/include \ /usr/local/include \ /usr/unsupported/include \ /usr/athena/include \ /usr/local/x11r5/include \ /usr/lpp/Xamples/include \ \ /usr/openwin/include \ /usr/openwin/share/include \ ; \ do if test -r "$ac_dir/$x_direct_test_include"; then ac_x_includes=$ac_dir break fi done fi rm -f conftest* fi # $ac_x_includes = NO if test "$ac_x_libraries" = NO; then # Check for the libraries. test -z "$x_direct_test_library" && x_direct_test_library=Xt test -z "$x_direct_test_function" && x_direct_test_function=XtMalloc # See if we find them without any special options. # Don't add to $LIBS permanently. ac_save_LIBS="$LIBS" LIBS="-l$x_direct_test_library $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* LIBS="$ac_save_LIBS" # We can link X programs with no special library path. ac_x_libraries= else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* LIBS="$ac_save_LIBS" # First see if replacing the include by lib works. # Check X11 before X11Rn because it is often a symlink to the current release. for ac_dir in `echo "$ac_x_includes" | sed s/include/lib/` \ /usr/X11/lib \ /usr/X11R6/lib \ /usr/X11R5/lib \ /usr/X11R4/lib \ \ /usr/lib/X11 \ /usr/lib/X11R6 \ /usr/lib/X11R5 \ /usr/lib/X11R4 \ \ /usr/local/X11/lib \ /usr/local/X11R6/lib \ /usr/local/X11R5/lib \ /usr/local/X11R4/lib \ \ /usr/local/lib/X11 \ /usr/local/lib/X11R6 \ /usr/local/lib/X11R5 \ /usr/local/lib/X11R4 \ \ /usr/X386/lib \ /usr/x386/lib \ /usr/XFree86/lib/X11 \ \ /usr/lib \ /usr/local/lib \ /usr/unsupported/lib \ /usr/athena/lib \ /usr/local/x11r5/lib \ /usr/lpp/Xamples/lib \ /lib/usr/lib/X11 \ \ /usr/openwin/lib \ /usr/openwin/share/lib \ ; \ do for ac_extension in a so sl; do if test -r $ac_dir/lib${x_direct_test_library}.$ac_extension; then ac_x_libraries=$ac_dir break 2 fi done done fi rm -f conftest* fi # $ac_x_libraries = NO if test "$ac_x_includes" = NO || test "$ac_x_libraries" = NO; then # Didn't find X anywhere. Cache the known absence of X. ac_cv_have_x="have_x=no" else # Record where we found X for the cache. ac_cv_have_x="have_x=yes \ ac_x_includes=$ac_x_includes ac_x_libraries=$ac_x_libraries" fi fi fi eval "$ac_cv_have_x" fi # $with_x != no if test "$have_x" != yes; then echo "$ac_t""$have_x" 1>&6 no_x=yes else # If each of the values was on the command line, it overrides each guess. test "x$x_includes" = xNONE && x_includes=$ac_x_includes test "x$x_libraries" = xNONE && x_libraries=$ac_x_libraries # Update the cache value to reflect the command line values. ac_cv_have_x="have_x=yes \ ac_x_includes=$x_includes ac_x_libraries=$x_libraries" echo "$ac_t""libraries $x_libraries, headers $x_includes" 1>&6 fi if test "$no_x" = yes; then # Not all programs may use this symbol, but it does not hurt to define it. cat >> confdefs.h <<\EOF #define X_DISPLAY_MISSING 1 EOF X_CFLAGS= X_PRE_LIBS= X_LIBS= X_EXTRA_LIBS= else if test -n "$x_includes"; then X_CFLAGS="$X_CFLAGS -I$x_includes" fi # It would also be nice to do this for all -L options, not just this one. if test -n "$x_libraries"; then X_LIBS="$X_LIBS -L$x_libraries" # For Solaris; some versions of Sun CC require a space after -R and # others require no space. Words are not sufficient . . . . case "`(uname -sr) 2>/dev/null`" in "SunOS 5"*) echo $ac_n "checking whether -R must be followed by a space""... $ac_c" 1>&6 echo "configure:1231: checking whether -R must be followed by a space" >&5 ac_xsave_LIBS="$LIBS"; LIBS="$LIBS -R$x_libraries" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* ac_R_nospace=yes else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_R_nospace=no fi rm -f conftest* if test $ac_R_nospace = yes; then echo "$ac_t""no" 1>&6 X_LIBS="$X_LIBS -R$x_libraries" else LIBS="$ac_xsave_LIBS -R $x_libraries" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* ac_R_space=yes else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_R_space=no fi rm -f conftest* if test $ac_R_space = yes; then echo "$ac_t""yes" 1>&6 X_LIBS="$X_LIBS -R $x_libraries" else echo "$ac_t""neither works" 1>&6 fi fi LIBS="$ac_xsave_LIBS" esac fi # Check for system-dependent libraries X programs must link with. # Do this before checking for the system-independent R6 libraries # (-lICE), since we may need -lsocket or whatever for X linking. if test "$ISC" = yes; then X_EXTRA_LIBS="$X_EXTRA_LIBS -lnsl_s -linet" else # Martyn.Johnson@cl.cam.ac.uk says this is needed for Ultrix, if the X # libraries were built with DECnet support. And karl@cs.umb.edu says # the Alpha needs dnet_stub (dnet does not exist). echo $ac_n "checking for dnet_ntoa in -ldnet""... $ac_c" 1>&6 echo "configure:1296: checking for dnet_ntoa in -ldnet" >&5 ac_lib_var=`echo dnet'_'dnet_ntoa | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-ldnet $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 X_EXTRA_LIBS="$X_EXTRA_LIBS -ldnet" else echo "$ac_t""no" 1>&6 fi if test $ac_cv_lib_dnet_dnet_ntoa = no; then echo $ac_n "checking for dnet_ntoa in -ldnet_stub""... $ac_c" 1>&6 echo "configure:1337: checking for dnet_ntoa in -ldnet_stub" >&5 ac_lib_var=`echo dnet_stub'_'dnet_ntoa | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-ldnet_stub $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 X_EXTRA_LIBS="$X_EXTRA_LIBS -ldnet_stub" else echo "$ac_t""no" 1>&6 fi fi # msh@cis.ufl.edu says -lnsl (and -lsocket) are needed for his 386/AT, # to get the SysV transport functions. # chad@anasazi.com says the Pyramis MIS-ES running DC/OSx (SVR4) # needs -lnsl. # The nsl library prevents programs from opening the X display # on Irix 5.2, according to dickey@clark.net. echo $ac_n "checking for gethostbyname""... $ac_c" 1>&6 echo "configure:1385: checking for gethostbyname" >&5 if eval "test \"`echo '$''{'ac_cv_func_gethostbyname'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < /* Override any gcc2 internal prototype to avoid an error. */ /* We use char because int might match the return type of a gcc2 builtin and then its argument prototype would still apply. */ char gethostbyname(); int main() { /* The GNU C library defines this for functions which it implements to always fail with ENOSYS. Some functions are actually named something starting with __ and the normal name is an alias. */ #if defined (__stub_gethostbyname) || defined (__stub___gethostbyname) choke me #else gethostbyname(); #endif ; return 0; } EOF if { (eval echo configure:1413: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_func_gethostbyname=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_func_gethostbyname=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_func_'gethostbyname`\" = yes"; then echo "$ac_t""yes" 1>&6 : else echo "$ac_t""no" 1>&6 fi if test $ac_cv_func_gethostbyname = no; then echo $ac_n "checking for gethostbyname in -lnsl""... $ac_c" 1>&6 echo "configure:1434: checking for gethostbyname in -lnsl" >&5 ac_lib_var=`echo nsl'_'gethostbyname | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lnsl $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 X_EXTRA_LIBS="$X_EXTRA_LIBS -lnsl" else echo "$ac_t""no" 1>&6 fi fi # lieder@skyler.mavd.honeywell.com says without -lsocket, # socket/setsockopt and other routines are undefined under SCO ODT # 2.0. But -lsocket is broken on IRIX 5.2 (and is not necessary # on later versions), says simon@lia.di.epfl.ch: it contains # gethostby* variants that don't use the nameserver (or something). # -lsocket must be given before -lnsl if both are needed. # We assume that if connect needs -lnsl, so does gethostbyname. echo $ac_n "checking for connect""... $ac_c" 1>&6 echo "configure:1483: checking for connect" >&5 if eval "test \"`echo '$''{'ac_cv_func_connect'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < /* Override any gcc2 internal prototype to avoid an error. */ /* We use char because int might match the return type of a gcc2 builtin and then its argument prototype would still apply. */ char connect(); int main() { /* The GNU C library defines this for functions which it implements to always fail with ENOSYS. Some functions are actually named something starting with __ and the normal name is an alias. */ #if defined (__stub_connect) || defined (__stub___connect) choke me #else connect(); #endif ; return 0; } EOF if { (eval echo configure:1511: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_func_connect=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_func_connect=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_func_'connect`\" = yes"; then echo "$ac_t""yes" 1>&6 : else echo "$ac_t""no" 1>&6 fi if test $ac_cv_func_connect = no; then echo $ac_n "checking for connect in -lsocket""... $ac_c" 1>&6 echo "configure:1532: checking for connect in -lsocket" >&5 ac_lib_var=`echo socket'_'connect | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lsocket $X_EXTRA_LIBS $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 X_EXTRA_LIBS="-lsocket $X_EXTRA_LIBS" else echo "$ac_t""no" 1>&6 fi fi # gomez@mi.uni-erlangen.de says -lposix is necessary on A/UX. echo $ac_n "checking for remove""... $ac_c" 1>&6 echo "configure:1575: checking for remove" >&5 if eval "test \"`echo '$''{'ac_cv_func_remove'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < /* Override any gcc2 internal prototype to avoid an error. */ /* We use char because int might match the return type of a gcc2 builtin and then its argument prototype would still apply. */ char remove(); int main() { /* The GNU C library defines this for functions which it implements to always fail with ENOSYS. Some functions are actually named something starting with __ and the normal name is an alias. */ #if defined (__stub_remove) || defined (__stub___remove) choke me #else remove(); #endif ; return 0; } EOF if { (eval echo configure:1603: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_func_remove=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_func_remove=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_func_'remove`\" = yes"; then echo "$ac_t""yes" 1>&6 : else echo "$ac_t""no" 1>&6 fi if test $ac_cv_func_remove = no; then echo $ac_n "checking for remove in -lposix""... $ac_c" 1>&6 echo "configure:1624: checking for remove in -lposix" >&5 ac_lib_var=`echo posix'_'remove | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lposix $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 X_EXTRA_LIBS="$X_EXTRA_LIBS -lposix" else echo "$ac_t""no" 1>&6 fi fi # BSDI BSD/OS 2.1 needs -lipc for XOpenDisplay. echo $ac_n "checking for shmat""... $ac_c" 1>&6 echo "configure:1667: checking for shmat" >&5 if eval "test \"`echo '$''{'ac_cv_func_shmat'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < /* Override any gcc2 internal prototype to avoid an error. */ /* We use char because int might match the return type of a gcc2 builtin and then its argument prototype would still apply. */ char shmat(); int main() { /* The GNU C library defines this for functions which it implements to always fail with ENOSYS. Some functions are actually named something starting with __ and the normal name is an alias. */ #if defined (__stub_shmat) || defined (__stub___shmat) choke me #else shmat(); #endif ; return 0; } EOF if { (eval echo configure:1695: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_func_shmat=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_func_shmat=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_func_'shmat`\" = yes"; then echo "$ac_t""yes" 1>&6 : else echo "$ac_t""no" 1>&6 fi if test $ac_cv_func_shmat = no; then echo $ac_n "checking for shmat in -lipc""... $ac_c" 1>&6 echo "configure:1716: checking for shmat in -lipc" >&5 ac_lib_var=`echo ipc'_'shmat | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lipc $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 X_EXTRA_LIBS="$X_EXTRA_LIBS -lipc" else echo "$ac_t""no" 1>&6 fi fi fi # Check for libraries that X11R6 Xt/Xaw programs need. ac_save_LDFLAGS="$LDFLAGS" test -n "$x_libraries" && LDFLAGS="$LDFLAGS -L$x_libraries" # SM needs ICE to (dynamically) link under SunOS 4.x (so we have to # check for ICE first), but we must link in the order -lSM -lICE or # we get undefined symbols. So assume we have SM if we have ICE. # These have to be linked with before -lX11, unlike the other # libraries we check for below, so use a different variable. # --interran@uluru.Stanford.EDU, kb@cs.umb.edu. echo $ac_n "checking for IceConnectionNumber in -lICE""... $ac_c" 1>&6 echo "configure:1768: checking for IceConnectionNumber in -lICE" >&5 ac_lib_var=`echo ICE'_'IceConnectionNumber | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lICE $X_EXTRA_LIBS $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 X_PRE_LIBS="$X_PRE_LIBS -lSM -lICE" else echo "$ac_t""no" 1>&6 fi LDFLAGS="$ac_save_LDFLAGS" fi for ac_prog in 'bison -y' byacc do # Extract the first word of "$ac_prog", so it can be a program name with args. set dummy $ac_prog; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 echo "configure:1816: checking for $ac_word" >&5 if eval "test \"`echo '$''{'ac_cv_prog_YACC'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test -n "$YACC"; then ac_cv_prog_YACC="$YACC" # Let the user override the test. else IFS="${IFS= }"; ac_save_ifs="$IFS"; IFS=":" ac_dummy="$PATH" for ac_dir in $ac_dummy; do test -z "$ac_dir" && ac_dir=. if test -f $ac_dir/$ac_word; then ac_cv_prog_YACC="$ac_prog" break fi done IFS="$ac_save_ifs" fi fi YACC="$ac_cv_prog_YACC" if test -n "$YACC"; then echo "$ac_t""$YACC" 1>&6 else echo "$ac_t""no" 1>&6 fi test -n "$YACC" && break done test -n "$YACC" || YACC="yacc" # Extract the first word of "flex", so it can be a program name with args. set dummy flex; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 echo "configure:1849: checking for $ac_word" >&5 if eval "test \"`echo '$''{'ac_cv_prog_LEX'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test -n "$LEX"; then ac_cv_prog_LEX="$LEX" # Let the user override the test. else IFS="${IFS= }"; ac_save_ifs="$IFS"; IFS=":" ac_dummy="$PATH" for ac_dir in $ac_dummy; do test -z "$ac_dir" && ac_dir=. if test -f $ac_dir/$ac_word; then ac_cv_prog_LEX="flex" break fi done IFS="$ac_save_ifs" test -z "$ac_cv_prog_LEX" && ac_cv_prog_LEX="lex" fi fi LEX="$ac_cv_prog_LEX" if test -n "$LEX"; then echo "$ac_t""$LEX" 1>&6 else echo "$ac_t""no" 1>&6 fi if test -z "$LEXLIB" then case "$LEX" in flex*) ac_lib=fl ;; *) ac_lib=l ;; esac echo $ac_n "checking for yywrap in -l$ac_lib""... $ac_c" 1>&6 echo "configure:1883: checking for yywrap in -l$ac_lib" >&5 ac_lib_var=`echo $ac_lib'_'yywrap | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-l$ac_lib $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 LEXLIB="-l$ac_lib" else echo "$ac_t""no" 1>&6 fi fi # Extract the first word of "ranlib", so it can be a program name with args. set dummy ranlib; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 echo "configure:1927: checking for $ac_word" >&5 if eval "test \"`echo '$''{'ac_cv_prog_RANLIB'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test -n "$RANLIB"; then ac_cv_prog_RANLIB="$RANLIB" # Let the user override the test. else IFS="${IFS= }"; ac_save_ifs="$IFS"; IFS=":" ac_dummy="$PATH" for ac_dir in $ac_dummy; do test -z "$ac_dir" && ac_dir=. if test -f $ac_dir/$ac_word; then ac_cv_prog_RANLIB="ranlib" break fi done IFS="$ac_save_ifs" test -z "$ac_cv_prog_RANLIB" && ac_cv_prog_RANLIB=":" fi fi RANLIB="$ac_cv_prog_RANLIB" if test -n "$RANLIB"; then echo "$ac_t""$RANLIB" 1>&6 else echo "$ac_t""no" 1>&6 fi # Find a good install program. We prefer a C program (faster), # so one script is as good as another. But avoid the broken or # incompatible versions: # SysV /etc/install, /usr/sbin/install # SunOS /usr/etc/install # IRIX /sbin/install # AIX /bin/install # AIX 4 /usr/bin/installbsd, which doesn't work without a -g flag # AFS /usr/afsws/bin/install, which mishandles nonexistent args # SVR4 /usr/ucb/install, which tries to use the nonexistent group "staff" # ./install, which can be erroneously created by make from ./install.sh. echo $ac_n "checking for a BSD compatible install""... $ac_c" 1>&6 echo "configure:1966: checking for a BSD compatible install" >&5 if test -z "$INSTALL"; then if eval "test \"`echo '$''{'ac_cv_path_install'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else IFS="${IFS= }"; ac_save_IFS="$IFS"; IFS=":" for ac_dir in $PATH; do # Account for people who put trailing slashes in PATH elements. case "$ac_dir/" in /|./|.//|/etc/*|/usr/sbin/*|/usr/etc/*|/sbin/*|/usr/afsws/bin/*|/usr/ucb/*) ;; *) # OSF1 and SCO ODT 3.0 have their own names for install. # Don't use installbsd from OSF since it installs stuff as root # by default. for ac_prog in ginstall scoinst install; do if test -f $ac_dir/$ac_prog; then if test $ac_prog = install && grep dspmsg $ac_dir/$ac_prog >/dev/null 2>&1; then # AIX install. It has an incompatible calling convention. : else ac_cv_path_install="$ac_dir/$ac_prog -c" break 2 fi fi done ;; esac done IFS="$ac_save_IFS" fi if test "${ac_cv_path_install+set}" = set; then INSTALL="$ac_cv_path_install" else # As a last resort, use the slow shell script. We don't cache a # path for INSTALL within a source directory, because that will # break other packages using the cache if that directory is # removed, or if the path is relative. INSTALL="$ac_install_sh" fi fi echo "$ac_t""$INSTALL" 1>&6 # Use test -z because SunOS4 sh mishandles braces in ${var-val}. # It thinks the first close brace ends the variable substitution. test -z "$INSTALL_PROGRAM" && INSTALL_PROGRAM='${INSTALL}' test -z "$INSTALL_SCRIPT" && INSTALL_SCRIPT='${INSTALL_PROGRAM}' test -z "$INSTALL_DATA" && INSTALL_DATA='${INSTALL} -m 644' echo $ac_n "checking whether ln -s works""... $ac_c" 1>&6 echo "configure:2019: checking whether ln -s works" >&5 if eval "test \"`echo '$''{'ac_cv_prog_LN_S'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else rm -f conftestdata if ln -s X conftestdata 2>/dev/null then rm -f conftestdata ac_cv_prog_LN_S="ln -s" else ac_cv_prog_LN_S=ln fi fi LN_S="$ac_cv_prog_LN_S" if test "$ac_cv_prog_LN_S" = "ln -s"; then echo "$ac_t""yes" 1>&6 else echo "$ac_t""no" 1>&6 fi # Extract the first word of "c2man", so it can be a program name with args. set dummy c2man; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 echo "configure:2042: checking for $ac_word" >&5 if eval "test \"`echo '$''{'ac_cv_prog_C2MAN'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test -n "$C2MAN"; then ac_cv_prog_C2MAN="$C2MAN" # Let the user override the test. else IFS="${IFS= }"; ac_save_ifs="$IFS"; IFS=":" ac_dummy="$PATH" for ac_dir in $ac_dummy; do test -z "$ac_dir" && ac_dir=. if test -f $ac_dir/$ac_word; then ac_cv_prog_C2MAN="c2man" break fi done IFS="$ac_save_ifs" test -z "$ac_cv_prog_C2MAN" && ac_cv_prog_C2MAN="true" fi fi C2MAN="$ac_cv_prog_C2MAN" if test -n "$C2MAN"; then echo "$ac_t""$C2MAN" 1>&6 else echo "$ac_t""no" 1>&6 fi # Extract the first word of "ldconfig", so it can be a program name with args. set dummy ldconfig; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 echo "configure:2072: checking for $ac_word" >&5 if eval "test \"`echo '$''{'ac_cv_path_LDCONFIG'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else case "$LDCONFIG" in /*) ac_cv_path_LDCONFIG="$LDCONFIG" # Let the user override the test with a path. ;; ?:/*) ac_cv_path_LDCONFIG="$LDCONFIG" # Let the user override the test with a dos path. ;; *) IFS="${IFS= }"; ac_save_ifs="$IFS"; IFS=":" ac_dummy="/sbin:/usr/sbin:$PATH" for ac_dir in $ac_dummy; do test -z "$ac_dir" && ac_dir=. if test -f $ac_dir/$ac_word; then ac_cv_path_LDCONFIG="$ac_dir/$ac_word" break fi done IFS="$ac_save_ifs" test -z "$ac_cv_path_LDCONFIG" && ac_cv_path_LDCONFIG="true" ;; esac fi LDCONFIG="$ac_cv_path_LDCONFIG" if test -n "$LDCONFIG"; then echo "$ac_t""$LDCONFIG" 1>&6 else echo "$ac_t""no" 1>&6 fi for ac_prog in lclint lint do # Extract the first word of "$ac_prog", so it can be a program name with args. set dummy $ac_prog; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 echo "configure:2111: checking for $ac_word" >&5 if eval "test \"`echo '$''{'ac_cv_prog_LINT'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test -n "$LINT"; then ac_cv_prog_LINT="$LINT" # Let the user override the test. else IFS="${IFS= }"; ac_save_ifs="$IFS"; IFS=":" ac_dummy="$PATH" for ac_dir in $ac_dummy; do test -z "$ac_dir" && ac_dir=. if test -f $ac_dir/$ac_word; then ac_cv_prog_LINT="$ac_prog" break fi done IFS="$ac_save_ifs" fi fi LINT="$ac_cv_prog_LINT" if test -n "$LINT"; then echo "$ac_t""$LINT" 1>&6 else echo "$ac_t""no" 1>&6 fi test -n "$LINT" && break done if test "$LINT" = "lint" then LINTFLAGS="$LINTFLAGS -errchk=%all,no%longptr64 -errhdr=%user -Ncheck=macro -Nlevel=4" fi echo $ac_n "checking for sqrt in -lm""... $ac_c" 1>&6 echo "configure:2149: checking for sqrt in -lm" >&5 ac_lib_var=`echo m'_'sqrt | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lm $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_lib=HAVE_LIB`echo m | sed -e 's/[^a-zA-Z0-9_]/_/g' \ -e 'y/abcdefghijklmnopqrstuvwxyz/ABCDEFGHIJKLMNOPQRSTUVWXYZ/'` cat >> confdefs.h <&6 fi echo $ac_n "checking for i386_set_ldt in -li386""... $ac_c" 1>&6 echo "configure:2196: checking for i386_set_ldt in -li386" >&5 ac_lib_var=`echo i386'_'i386_set_ldt | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-li386 $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_lib=HAVE_LIB`echo i386 | sed -e 's/[^a-zA-Z0-9_]/_/g' \ -e 'y/abcdefghijklmnopqrstuvwxyz/ABCDEFGHIJKLMNOPQRSTUVWXYZ/'` cat >> confdefs.h <&6 fi echo $ac_n "checking for _oss_ioctl in -lossaudio""... $ac_c" 1>&6 echo "configure:2243: checking for _oss_ioctl in -lossaudio" >&5 ac_lib_var=`echo ossaudio'_'_oss_ioctl | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lossaudio $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_lib=HAVE_LIB`echo ossaudio | sed -e 's/[^a-zA-Z0-9_]/_/g' \ -e 'y/abcdefghijklmnopqrstuvwxyz/ABCDEFGHIJKLMNOPQRSTUVWXYZ/'` cat >> confdefs.h <&6 fi echo $ac_n "checking for iswalnum in -lw""... $ac_c" 1>&6 echo "configure:2290: checking for iswalnum in -lw" >&5 ac_lib_var=`echo w'_'iswalnum | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lw $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_lib=HAVE_LIB`echo w | sed -e 's/[^a-zA-Z0-9_]/_/g' \ -e 'y/abcdefghijklmnopqrstuvwxyz/ABCDEFGHIJKLMNOPQRSTUVWXYZ/'` cat >> confdefs.h <&6 fi for ac_func in gethostbyname do echo $ac_n "checking for $ac_func""... $ac_c" 1>&6 echo "configure:2339: checking for $ac_func" >&5 if eval "test \"`echo '$''{'ac_cv_func_$ac_func'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < /* Override any gcc2 internal prototype to avoid an error. */ /* We use char because int might match the return type of a gcc2 builtin and then its argument prototype would still apply. */ char $ac_func(); int main() { /* The GNU C library defines this for functions which it implements to always fail with ENOSYS. Some functions are actually named something starting with __ and the normal name is an alias. */ #if defined (__stub_$ac_func) || defined (__stub___$ac_func) choke me #else $ac_func(); #endif ; return 0; } EOF if { (eval echo configure:2367: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_func_$ac_func=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_func_$ac_func=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_func_'$ac_func`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_func=HAVE_`echo $ac_func | tr 'abcdefghijklmnopqrstuvwxyz' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'` cat >> confdefs.h <&6 echo $ac_n "checking for gethostbyname in -lnsl""... $ac_c" 1>&6 echo "configure:2389: checking for gethostbyname in -lnsl" >&5 ac_lib_var=`echo nsl'_'gethostbyname | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lnsl -lsocket $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 X_EXTRA_LIBS="$X_EXTRA_LIBS -lnsl" else echo "$ac_t""no" 1>&6 echo $ac_n "checking for gethostbyname in -lsocket""... $ac_c" 1>&6 echo "configure:2427: checking for gethostbyname in -lsocket" >&5 ac_lib_var=`echo socket'_'gethostbyname | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lsocket -lnsl $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 X_EXTRA_LIBS="$X_EXTRA_LIBS -lnsl" else echo "$ac_t""no" 1>&6 fi fi fi done for ac_func in connect do echo $ac_n "checking for $ac_func""... $ac_c" 1>&6 echo "configure:2474: checking for $ac_func" >&5 if eval "test \"`echo '$''{'ac_cv_func_$ac_func'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < /* Override any gcc2 internal prototype to avoid an error. */ /* We use char because int might match the return type of a gcc2 builtin and then its argument prototype would still apply. */ char $ac_func(); int main() { /* The GNU C library defines this for functions which it implements to always fail with ENOSYS. Some functions are actually named something starting with __ and the normal name is an alias. */ #if defined (__stub_$ac_func) || defined (__stub___$ac_func) choke me #else $ac_func(); #endif ; return 0; } EOF if { (eval echo configure:2502: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_func_$ac_func=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_func_$ac_func=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_func_'$ac_func`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_func=HAVE_`echo $ac_func | tr 'abcdefghijklmnopqrstuvwxyz' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'` cat >> confdefs.h <&6 echo $ac_n "checking for connect in -lsocket""... $ac_c" 1>&6 echo "configure:2524: checking for connect in -lsocket" >&5 ac_lib_var=`echo socket'_'connect | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lsocket $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_lib=HAVE_LIB`echo socket | sed -e 's/^a-zA-Z0-9_/_/g' \ -e 'y/abcdefghijklmnopqrstuvwxyz/ABCDEFGHIJKLMNOPQRSTUVWXYZ/'` cat >> confdefs.h <&6 fi fi done echo $ac_n "checking for setrunelocale in -lxpg4""... $ac_c" 1>&6 echo "configure:2574: checking for setrunelocale in -lxpg4" >&5 ac_lib_var=`echo xpg4'_'setrunelocale | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lxpg4 $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_lib=HAVE_LIB`echo xpg4 | sed -e 's/[^a-zA-Z0-9_]/_/g' \ -e 'y/abcdefghijklmnopqrstuvwxyz/ABCDEFGHIJKLMNOPQRSTUVWXYZ/'` cat >> confdefs.h <&6 fi echo $ac_n "checking for mmap in -lmmap""... $ac_c" 1>&6 echo "configure:2621: checking for mmap in -lmmap" >&5 ac_lib_var=`echo mmap'_'mmap | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lmmap $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_lib=HAVE_LIB`echo mmap | sed -e 's/[^a-zA-Z0-9_]/_/g' \ -e 'y/abcdefghijklmnopqrstuvwxyz/ABCDEFGHIJKLMNOPQRSTUVWXYZ/'` cat >> confdefs.h <&6 fi for ac_func in openpty do echo $ac_n "checking for $ac_func""... $ac_c" 1>&6 echo "configure:2670: checking for $ac_func" >&5 if eval "test \"`echo '$''{'ac_cv_func_$ac_func'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < /* Override any gcc2 internal prototype to avoid an error. */ /* We use char because int might match the return type of a gcc2 builtin and then its argument prototype would still apply. */ char $ac_func(); int main() { /* The GNU C library defines this for functions which it implements to always fail with ENOSYS. Some functions are actually named something starting with __ and the normal name is an alias. */ #if defined (__stub_$ac_func) || defined (__stub___$ac_func) choke me #else $ac_func(); #endif ; return 0; } EOF if { (eval echo configure:2698: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_func_$ac_func=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_func_$ac_func=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_func_'$ac_func`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_func=HAVE_`echo $ac_func | tr 'abcdefghijklmnopqrstuvwxyz' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'` cat >> confdefs.h <&6 echo $ac_n "checking for openpty in -lutil""... $ac_c" 1>&6 echo "configure:2720: checking for openpty in -lutil" >&5 ac_lib_var=`echo util'_'openpty | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lutil $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 cat >> confdefs.h <<\EOF #define HAVE_OPENPTY 1 EOF LIBS="$LIBS -lutil" else echo "$ac_t""no" 1>&6 fi fi done for ac_hdr in dlfcn.h do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 echo "configure:2772: checking for $ac_hdr" >&5 if eval "test \"`echo '$''{'ac_cv_header_$ac_safe'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" { (eval echo configure:2782: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then rm -rf conftest* eval "ac_cv_header_$ac_safe=yes" else echo "$ac_err" >&5 echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_header_$ac_safe=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_header_'$ac_safe`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_hdr=HAVE_`echo $ac_hdr | sed 'y%abcdefghijklmnopqrstuvwxyz./-%ABCDEFGHIJKLMNOPQRSTUVWXYZ___%'` cat >> confdefs.h <&6 echo "configure:2805: checking for $ac_func" >&5 if eval "test \"`echo '$''{'ac_cv_func_$ac_func'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < /* Override any gcc2 internal prototype to avoid an error. */ /* We use char because int might match the return type of a gcc2 builtin and then its argument prototype would still apply. */ char $ac_func(); int main() { /* The GNU C library defines this for functions which it implements to always fail with ENOSYS. Some functions are actually named something starting with __ and the normal name is an alias. */ #if defined (__stub_$ac_func) || defined (__stub___$ac_func) choke me #else $ac_func(); #endif ; return 0; } EOF if { (eval echo configure:2833: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_func_$ac_func=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_func_$ac_func=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_func_'$ac_func`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_func=HAVE_`echo $ac_func | tr 'abcdefghijklmnopqrstuvwxyz' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'` cat >> confdefs.h <> confdefs.h <<\EOF #define HAVE_DL_API 1 EOF else echo "$ac_t""no" 1>&6 echo $ac_n "checking for dlopen in -ldl""... $ac_c" 1>&6 echo "configure:2858: checking for dlopen in -ldl" >&5 ac_lib_var=`echo dl'_'dlopen | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-ldl $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 cat >> confdefs.h <<\EOF #define HAVE_DL_API 1 EOF LIBS="$LIBS -ldl" else echo "$ac_t""no" 1>&6 LIBEXT="a" fi fi done else echo "$ac_t""no" 1>&6 LIBEXT="a" fi done X_DLLS="" XFILES="" OPENGLFILES="" OPENGL32_DLL="" DGA_SRCS="" DGA2_SRCS="" MESA_SRCS="" if test "$have_x" = "yes" then XLIB="-lXext -lX11" ac_save_CPPFLAGS="$CPPFLAGS" CPPFLAGS="$CPPFLAGS $X_CFLAGS" for ac_hdr in X11/xpm.h do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 echo "configure:2939: checking for $ac_hdr" >&5 if eval "test \"`echo '$''{'ac_cv_header_$ac_safe'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" { (eval echo configure:2949: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then rm -rf conftest* eval "ac_cv_header_$ac_safe=yes" else echo "$ac_err" >&5 echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_header_$ac_safe=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_header_'$ac_safe`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_hdr=HAVE_`echo $ac_hdr | sed 'y%abcdefghijklmnopqrstuvwxyz./-%ABCDEFGHIJKLMNOPQRSTUVWXYZ___%'` cat >> confdefs.h <&6 echo "configure:2970: checking for XpmCreatePixmapFromData in -lXpm" >&5 ac_lib_var=`echo Xpm'_'XpmCreatePixmapFromData | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lXpm $X_LIBS -lXext -lX11 $X_EXTRA_LIBS $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 cat >> confdefs.h <<\EOF #define HAVE_LIBXXPM 1 EOF X_PRE_LIBS="$X_PRE_LIBS -lXpm" else echo "$ac_t""no" 1>&6 fi else echo "$ac_t""no" 1>&6 echo "Redhat : xpm xpm-devel" echo "Caldera OpenLinux : xpm xpm-devel xpm-devel-static" echo "SuSE : xpm" echo "Debian/Corel Linux: xpm4g xpm4g-dev" echo echo "Or get the sources from ftp.x.org and all its mirror sites from " echo "the directory /contrib/libraries." echo exit 1 fi done for ac_hdr in X11/Xlib.h do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 echo "configure:3035: checking for $ac_hdr" >&5 if eval "test \"`echo '$''{'ac_cv_header_$ac_safe'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" { (eval echo configure:3045: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then rm -rf conftest* eval "ac_cv_header_$ac_safe=yes" else echo "$ac_err" >&5 echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_header_$ac_safe=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_header_'$ac_safe`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_hdr=HAVE_`echo $ac_hdr | sed 'y%abcdefghijklmnopqrstuvwxyz./-%ABCDEFGHIJKLMNOPQRSTUVWXYZ___%'` cat >> confdefs.h <&6 echo "configure:3070: checking for $ac_hdr" >&5 if eval "test \"`echo '$''{'ac_cv_header_$ac_safe'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" { (eval echo configure:3080: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then rm -rf conftest* eval "ac_cv_header_$ac_safe=yes" else echo "$ac_err" >&5 echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_header_$ac_safe=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_header_'$ac_safe`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_hdr=HAVE_`echo $ac_hdr | sed 'y%abcdefghijklmnopqrstuvwxyz./-%ABCDEFGHIJKLMNOPQRSTUVWXYZ___%'` cat >> confdefs.h <&6 echo "configure:3101: checking for XShmQueryExtension in -lXext" >&5 ac_lib_var=`echo Xext'_'XShmQueryExtension | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lXext $X_LIBS -lXext -lX11 $X_EXTRA_LIBS $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 cat >> confdefs.h <<\EOF #define HAVE_LIBXXSHM 1 EOF else echo "$ac_t""no" 1>&6 fi else echo "$ac_t""no" 1>&6 echo "configure: warning: Xshm extension not found!!" 1>&2 fi done for ac_hdr in X11/extensions/xf86dga.h do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 echo "configure:3156: checking for $ac_hdr" >&5 if eval "test \"`echo '$''{'ac_cv_header_$ac_safe'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" { (eval echo configure:3166: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then rm -rf conftest* eval "ac_cv_header_$ac_safe=yes" else echo "$ac_err" >&5 echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_header_$ac_safe=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_header_'$ac_safe`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_hdr=HAVE_`echo $ac_hdr | sed 'y%abcdefghijklmnopqrstuvwxyz./-%ABCDEFGHIJKLMNOPQRSTUVWXYZ___%'` cat >> confdefs.h <&6 echo "configure:3187: checking for XDGAQueryExtension in -lXxf86dga" >&5 ac_lib_var=`echo Xxf86dga'_'XDGAQueryExtension | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lXxf86dga $X_LIBS -lXext -lX11 $X_EXTRA_LIBS $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 cat >> confdefs.h <<\EOF #define HAVE_LIBXXF86DGA2 1 EOF cat >> confdefs.h <<\EOF #define HAVE_LIBXXF86DGA 1 EOF X_PRE_LIBS="$X_PRE_LIBS -lXxf86dga" DGA_SRCS='$(DGA_SRCS)' DGA2_SRCS='$(DGA2_SRCS)' else echo "$ac_t""no" 1>&6 echo $ac_n "checking for XF86DGAQueryExtension in -lXxf86dga""... $ac_c" 1>&6 echo "configure:3237: checking for XF86DGAQueryExtension in -lXxf86dga" >&5 ac_lib_var=`echo Xxf86dga'_'XF86DGAQueryExtension | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lXxf86dga $X_LIBS -lXext -lX11 $X_EXTRA_LIBS $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 cat >> confdefs.h <<\EOF #define HAVE_LIBXXF86DGA 1 EOF X_PRE_LIBS="$X_PRE_LIBS -lXxf86dga" DGA_SRCS='$(DGA_SRCS)' else echo "$ac_t""no" 1>&6 fi fi else echo "$ac_t""no" 1>&6 echo "configure: warning: DGA extension not found!!" 1>&2 fi done for ac_hdr in X11/extensions/xf86vmode.h do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 echo "configure:3299: checking for $ac_hdr" >&5 if eval "test \"`echo '$''{'ac_cv_header_$ac_safe'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" { (eval echo configure:3309: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then rm -rf conftest* eval "ac_cv_header_$ac_safe=yes" else echo "$ac_err" >&5 echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_header_$ac_safe=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_header_'$ac_safe`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_hdr=HAVE_`echo $ac_hdr | sed 'y%abcdefghijklmnopqrstuvwxyz./-%ABCDEFGHIJKLMNOPQRSTUVWXYZ___%'` cat >> confdefs.h <&6 echo "configure:3330: checking for XF86VidModeQueryExtension in -lXxf86vm" >&5 ac_lib_var=`echo Xxf86vm'_'XF86VidModeQueryExtension | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lXxf86vm $X_LIBS -lXext -lX11 $X_EXTRA_LIBS $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 cat >> confdefs.h <<\EOF #define HAVE_LIBXXF86VM 1 EOF X_PRE_LIBS="$X_PRE_LIBS -lXxf86vm" else echo "$ac_t""no" 1>&6 fi else echo "$ac_t""no" 1>&6 echo "configure: warning: XFree86 VMODE extension not found!!" 1>&2 fi done else echo "$ac_t""no" 1>&6 fi done if test $OPENGL = "yes" -o $OPENGL = "normal" then for ac_hdr in GL/gl.h GL/glx.h GL/glext.h do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 echo "configure:3396: checking for $ac_hdr" >&5 if eval "test \"`echo '$''{'ac_cv_header_$ac_safe'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" { (eval echo configure:3406: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then rm -rf conftest* eval "ac_cv_header_$ac_safe=yes" else echo "$ac_err" >&5 echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_header_$ac_safe=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_header_'$ac_safe`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_hdr=HAVE_`echo $ac_hdr | sed 'y%abcdefghijklmnopqrstuvwxyz./-%ABCDEFGHIJKLMNOPQRSTUVWXYZ___%'` cat >> confdefs.h <&6 fi done if test "$ac_cv_header_GL_gl_h" = "yes" -a "$ac_cv_header_GL_glx_h" = "yes" -a "$ac_cv_header_GL_glext_h" = "yes" then echo $ac_n "checking "for up-to-date OpenGL version"""... $ac_c" 1>&6 echo "configure:3435: checking "for up-to-date OpenGL version"" >&5 if eval "test \"`echo '$''{'wine_cv_opengl_version_OK'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < int main() { GLenum test = GL_UNSIGNED_SHORT_5_6_5; ; return 0; } EOF if { (eval echo configure:3447: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* wine_cv_opengl_version_OK="yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* wine_cv_opengl_version_OK="no" fi rm -f conftest* fi echo "$ac_t""$wine_cv_opengl_version_OK" 1>&6 echo $ac_n "checking "for thread-safe OpenGL version"""... $ac_c" 1>&6 echo "configure:3464: checking "for thread-safe OpenGL version"" >&5 if eval "test \"`echo '$''{'wine_cv_opengl_version_threadsafe'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else saved_libs=$LIBS LIBS="$X_LIBS -lGL" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* wine_cv_opengl_version_threadsafe="yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* wine_cv_opengl_version_threadsafe="no" fi rm -f conftest* LIBS=$saved_libs fi echo "$ac_t""$wine_cv_opengl_version_threadsafe" 1>&6 if test "$wine_cv_opengl_version_OK" = "yes" -a \( "$wine_cv_opengl_version_threadsafe" = "no" -o $OPENGL = "yes" \) then echo $ac_n "checking for glXCreateContext in -lGL""... $ac_c" 1>&6 echo "configure:3497: checking for glXCreateContext in -lGL" >&5 ac_lib_var=`echo GL'_'glXCreateContext | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lGL $X_LIBS -lXext -lX11 -lm $X_EXTRA_LIBS $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 X_PRE_LIBS="$X_PRE_LIBS -lGL" MESA_SRCS='$(MESA_SRCS)' else echo "$ac_t""no" 1>&6 fi if test $ac_cv_lib_GL_glXCreateContext = "yes" then echo $ac_n "checking "for the OpenGL Color Index extension"""... $ac_c" 1>&6 echo "configure:3542: checking "for the OpenGL Color Index extension"" >&5 if eval "test \"`echo '$''{'dummy'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < int main() { GLenum test = GL_COLOR_INDEX8_EXT; ; return 0; } EOF if { (eval echo configure:3554: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* cat >> confdefs.h <<\EOF #define HAVE_GL_COLOR_TABLE 1 EOF else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 fi rm -f conftest* fi echo "$ac_t""$dummy" 1>&6 echo $ac_n "checking for glColorTableEXT in -lGL""... $ac_c" 1>&6 echo "configure:3570: checking for glColorTableEXT in -lGL" >&5 ac_lib_var=`echo GL'_'glColorTableEXT | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lGL $X_LIBS -lXext -lX11 -lm $X_EXTRA_LIBS $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 cat >> confdefs.h <<\EOF #define HAVE_GL_PALETTED_TEXTURE 1 EOF else echo "$ac_t""no" 1>&6 fi echo $ac_n "checking for glXGetProcAddressARB in -lGL""... $ac_c" 1>&6 echo "configure:3613: checking for glXGetProcAddressARB in -lGL" >&5 ac_lib_var=`echo GL'_'glXGetProcAddressARB | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lGL $X_LIBS -lXext -lX11 -lm $X_EXTRA_LIBS $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 cat >> confdefs.h <<\EOF #define HAVE_GLX_GETPROCADDRESS 1 EOF else echo "$ac_t""no" 1>&6 fi if test $ac_cv_lib_GL_glXGetProcAddressARB = "yes" then cat >> confdefs.h <<\EOF #define HAVE_OPENGL 1 EOF OPENGL32_DLL=opengl32 OPENGLFILES='$(OPENGLFILES)' fi fi fi fi fi CPPFLAGS="$ac_save_CPPFLAGS" X_DLLS='$(X_DLLS)' XFILES='$(XFILES)' else XLIB="" X_CFLAGS="" X_LIBS="" fi if test "$CURSES" = "yes" then for ac_hdr in ncurses.h do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 echo "configure:3685: checking for $ac_hdr" >&5 if eval "test \"`echo '$''{'ac_cv_header_$ac_safe'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" { (eval echo configure:3695: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then rm -rf conftest* eval "ac_cv_header_$ac_safe=yes" else echo "$ac_err" >&5 echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_header_$ac_safe=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_header_'$ac_safe`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_hdr=HAVE_`echo $ac_hdr | sed 'y%abcdefghijklmnopqrstuvwxyz./-%ABCDEFGHIJKLMNOPQRSTUVWXYZ___%'` cat >> confdefs.h <&6 fi done if test "$ac_cv_header_ncurses_h" = "yes" then echo $ac_n "checking for waddch in -lncurses""... $ac_c" 1>&6 echo "configure:3724: checking for waddch in -lncurses" >&5 ac_lib_var=`echo ncurses'_'waddch | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lncurses $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_lib=HAVE_LIB`echo ncurses | sed -e 's/[^a-zA-Z0-9_]/_/g' \ -e 'y/abcdefghijklmnopqrstuvwxyz/ABCDEFGHIJKLMNOPQRSTUVWXYZ/'` cat >> confdefs.h <&6 fi fi if test "$ac_cv_lib_ncurses_waddch" = "yes" then echo $ac_n "checking for resizeterm in -lncurses""... $ac_c" 1>&6 echo "configure:3774: checking for resizeterm in -lncurses" >&5 ac_lib_var=`echo ncurses'_'resizeterm | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lncurses $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 cat >> confdefs.h <<\EOF #define HAVE_RESIZETERM 1 EOF else echo "$ac_t""no" 1>&6 fi echo $ac_n "checking for getbkgd in -lncurses""... $ac_c" 1>&6 echo "configure:3817: checking for getbkgd in -lncurses" >&5 ac_lib_var=`echo ncurses'_'getbkgd | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lncurses $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 cat >> confdefs.h <<\EOF #define HAVE_GETBKGD 1 EOF else echo "$ac_t""no" 1>&6 fi else for ac_hdr in curses.h do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 echo "configure:3864: checking for $ac_hdr" >&5 if eval "test \"`echo '$''{'ac_cv_header_$ac_safe'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" { (eval echo configure:3874: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then rm -rf conftest* eval "ac_cv_header_$ac_safe=yes" else echo "$ac_err" >&5 echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_header_$ac_safe=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_header_'$ac_safe`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_hdr=HAVE_`echo $ac_hdr | sed 'y%abcdefghijklmnopqrstuvwxyz./-%ABCDEFGHIJKLMNOPQRSTUVWXYZ___%'` cat >> confdefs.h <&6 fi done if test "$ac_cv_header_curses_h" = "yes" then echo $ac_n "checking for waddch in -lcurses""... $ac_c" 1>&6 echo "configure:3903: checking for waddch in -lcurses" >&5 ac_lib_var=`echo curses'_'waddch | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lcurses $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_lib=HAVE_LIB`echo curses | sed -e 's/[^a-zA-Z0-9_]/_/g' \ -e 'y/abcdefghijklmnopqrstuvwxyz/ABCDEFGHIJKLMNOPQRSTUVWXYZ/'` cat >> confdefs.h <&6 fi if test "$ac_cv_lib_curses_waddch" = "yes" then echo $ac_n "checking for resizeterm in -lcurses""... $ac_c" 1>&6 echo "configure:3952: checking for resizeterm in -lcurses" >&5 ac_lib_var=`echo curses'_'resizeterm | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lcurses $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 cat >> confdefs.h <<\EOF #define HAVE_RESIZETERM 1 EOF else echo "$ac_t""no" 1>&6 fi echo $ac_n "checking for getbkgd in -lcurses""... $ac_c" 1>&6 echo "configure:3995: checking for getbkgd in -lcurses" >&5 ac_lib_var=`echo curses'_'getbkgd | sed 'y%./+-%__p_%'` if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_save_LIBS="$LIBS" LIBS="-lcurses $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=no" fi rm -f conftest* LIBS="$ac_save_LIBS" fi if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then echo "$ac_t""yes" 1>&6 cat >> confdefs.h <<\EOF #define HAVE_GETBKGD 1 EOF else echo "$ac_t""no" 1>&6 fi fi fi fi fi echo $ac_n "checking "for GNU style IPX support"""... $ac_c" 1>&6 echo "configure:4043: checking "for GNU style IPX support"" >&5 if eval "test \"`echo '$''{'ac_cv_c_ipx_gnu'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < #include int main() { ((struct sockaddr_ipx *)0)->sipx_family == AF_IPX ; return 0; } EOF if { (eval echo configure:4056: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_c_ipx_gnu="yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_c_ipx_gnu="no" fi rm -f conftest* fi echo "$ac_t""$ac_cv_c_ipx_gnu" 1>&6 if test "$ac_cv_c_ipx_gnu" = "yes" then cat >> confdefs.h <<\EOF #define HAVE_IPX_GNU 1 EOF fi if test "$ac_cv_c_ipx_gnu" = "no" then echo $ac_n "checking "for linux style IPX support"""... $ac_c" 1>&6 echo "configure:4081: checking "for linux style IPX support"" >&5 if eval "test \"`echo '$''{'ac_cv_c_ipx_linux'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < #include #include int main() { ((struct sockaddr_ipx *)0)->sipx_family == AF_IPX ; return 0; } EOF if { (eval echo configure:4095: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_c_ipx_linux="yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_c_ipx_linux="no" fi rm -f conftest* fi echo "$ac_t""$ac_cv_c_ipx_linux" 1>&6 if test "$ac_cv_c_ipx_linux" = "yes" then cat >> confdefs.h <<\EOF #define HAVE_IPX_LINUX 1 EOF fi fi for ac_hdr in sys/soundcard.h machine/soundcard.h soundcard.h do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 echo "configure:4122: checking for $ac_hdr" >&5 if eval "test \"`echo '$''{'ac_cv_header_$ac_safe'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" { (eval echo configure:4132: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then rm -rf conftest* eval "ac_cv_header_$ac_safe=yes" else echo "$ac_err" >&5 echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_header_$ac_safe=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_header_'$ac_safe`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_hdr=HAVE_`echo $ac_hdr | sed 'y%abcdefghijklmnopqrstuvwxyz./-%ABCDEFGHIJKLMNOPQRSTUVWXYZ___%'` cat >> confdefs.h <&6 fi done echo $ac_n "checking "for Open Sound System"""... $ac_c" 1>&6 echo "configure:4160: checking "for Open Sound System"" >&5 if eval "test \"`echo '$''{'ac_cv_c_opensoundsystem'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < #elif defined(HAVE_MACHINE_SOUNDCARD_H) #include #elif defined(HAVE_SOUNDCARD_H) #include #endif int main() { /* check for one of the Open Sound System specific SNDCTL_ defines */ #if !defined(SNDCTL_DSP_STEREO) #error No open sound system #endif ; return 0; } EOF if { (eval echo configure:4186: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_c_opensoundsystem="yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_c_opensoundsystem="no" fi rm -f conftest* fi echo "$ac_t""$ac_cv_c_opensoundsystem" 1>&6 if test "$ac_cv_c_opensoundsystem" = "yes" then cat >> confdefs.h <<\EOF #define HAVE_OSS 1 EOF fi echo $ac_n "checking "for Open Sound System/MIDI interface"""... $ac_c" 1>&6 echo "configure:4209: checking "for Open Sound System/MIDI interface"" >&5 if eval "test \"`echo '$''{'ac_cv_c_opensoundsystem_midi'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < #elif defined(HAVE_MACHINE_SOUNDCARD_H) #include #elif defined(HAVE_SOUNDCARD_H) #include #endif int main() { /* check for one of the Open Sound System specific SNDCTL_SEQ defines */ #if !defined(SNDCTL_SEQ_SYNC) #error No open sound system MIDI interface #endif ; return 0; } EOF if { (eval echo configure:4235: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_c_opensoundsystem_midi="yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_c_opensoundsystem_midi="no" fi rm -f conftest* fi echo "$ac_t""$ac_cv_c_opensoundsystem_midi" 1>&6 if test "$ac_cv_c_opensoundsystem_midi" = "yes" then cat >> confdefs.h <<\EOF #define HAVE_OSS_MIDI 1 EOF fi if test "$ac_cv_prog_LN_S" = "ln -s"; then : ; else LN_S=cp ; fi if test "x${GCC}" = "xyes" then CFLAGS="$CFLAGS -Wall" echo $ac_n "checking "for gcc strength-reduce bug"""... $ac_c" 1>&6 echo "configure:4264: checking "for gcc strength-reduce bug"" >&5 if eval "test \"`echo '$''{'ac_cv_c_gcc_strength_bug'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test "$cross_compiling" = yes; then ac_cv_c_gcc_strength_bug="yes" else cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext} && (./conftest; exit) 2>/dev/null then ac_cv_c_gcc_strength_bug="no" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -fr conftest* ac_cv_c_gcc_strength_bug="yes" fi rm -fr conftest* fi fi echo "$ac_t""$ac_cv_c_gcc_strength_bug" 1>&6 if test "$ac_cv_c_gcc_strength_bug" = "yes" then CFLAGS="$CFLAGS -fno-strength-reduce" fi fi echo $ac_n "checking "whether external symbols need an underscore prefix"""... $ac_c" 1>&6 echo "configure:4306: checking "whether external symbols need an underscore prefix"" >&5 if eval "test \"`echo '$''{'ac_cv_c_extern_prefix'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else saved_libs=$LIBS LIBS="conftest_asm.s $LIBS" cat > conftest_asm.s < conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* ac_cv_c_extern_prefix="yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_c_extern_prefix="no" fi rm -f conftest* LIBS=$saved_libs fi echo "$ac_t""$ac_cv_c_extern_prefix" 1>&6 if test "$ac_cv_c_extern_prefix" = "yes" then cat >> confdefs.h <<\EOF #define NEED_UNDERSCORE_PREFIX 1 EOF fi echo $ac_n "checking "whether assembler accepts .string"""... $ac_c" 1>&6 echo "configure:4349: checking "whether assembler accepts .string"" >&5 if eval "test \"`echo '$''{'ac_cv_c_asm_string'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else saved_libs=$LIBS LIBS="conftest_asm.s $LIBS" cat > conftest_asm.s < conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* ac_cv_c_asm_string="yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_c_asm_string="no" fi rm -f conftest* LIBS=$saved_libs fi echo "$ac_t""$ac_cv_c_asm_string" 1>&6 if test "$ac_cv_c_asm_string" = "yes" then cat >> confdefs.h <<\EOF #define HAVE_ASM_STRING 1 EOF fi LDSHARED="" if test "$LIBEXT" = "so" then echo $ac_n "checking "whether we can build a Linux dll"""... $ac_c" 1>&6 echo "configure:4393: checking "whether we can build a Linux dll"" >&5 if eval "test \"`echo '$''{'ac_cv_c_dll_linux'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else saved_cflags=$CFLAGS CFLAGS="$CFLAGS -fPIC -shared -Wl,-soname,conftest.so.1.0" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* ac_cv_c_dll_linux="yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_c_dll_linux="no" fi rm -f conftest* CFLAGS=$saved_cflags fi echo "$ac_t""$ac_cv_c_dll_linux" 1>&6 if test "$ac_cv_c_dll_linux" = "yes" then LDSHARED="\$(CC) -shared -Wl,-soname,\$(SONAME),-rpath,\$(libdir)" else echo $ac_n "checking whether we can build a UnixWare (Solaris) dll""... $ac_c" 1>&6 echo "configure:4427: checking whether we can build a UnixWare (Solaris) dll" >&5 if eval "test \"`echo '$''{'ac_cv_c_dll_unixware'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else saved_cflags=$CFLAGS CFLAGS="$CFLAGS -fPIC -Wl,-G,-h,conftest.so.1.0" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* ac_cv_c_dll_unixware="yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_c_dll_unixware="no" fi rm -f conftest* CFLAGS=$saved_cflags fi echo "$ac_t""$ac_cv_c_dll_unixware" 1>&6 if test "$ac_cv_c_dll_unixware" = "yes" then LDSHARED="\$(CC) -Wl,-G,-h,\$(libdir)/\$(SONAME)" else echo $ac_n "checking "whether we can build a NetBSD dll"""... $ac_c" 1>&6 echo "configure:4461: checking "whether we can build a NetBSD dll"" >&5 if eval "test \"`echo '$''{'ac_cv_c_dll_netbsd'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else saved_cflags=$CFLAGS CFLAGS="$CFLAGS -fPIC -Bshareable -Bforcearchive" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* ac_cv_c_dll_netbsd="yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_c_dll_netbsd="no" fi rm -f conftest* CFLAGS=$saved_cflags fi echo "$ac_t""$ac_cv_c_dll_netbsd" 1>&6 if test "$ac_cv_c_dll_netbsd" = "yes" then LDSHARED="ld -Bshareable -Bforcearchive" fi fi fi if test "$ac_cv_c_dll_linux" = "no" -a "$ac_cv_c_dll_unixware" = "no" -a "$ac_cv_c_dll_netbsd" = "no" then LIBEXT="a" fi fi DLLFLAGS="" BUILDFLAGS="" if test "$LIBEXT" = "so"; then BUILDFLAGS="-pic" DLLFLAGS="-fPIC" DLL_LINK="-L\$(DLLDIR) \$(IMPORTS:%=-l%) -L\$(TOPOBJDIR) -lwine" else DLL_LINK="-L\$(DLLDIR) \$(DLLS:%=-l%) -L\$(TOPOBJDIR) -lwine \$(X_LIBS) \$(XLIB)" echo $ac_n "checking whether the linker supports --[no]-whole-archive (Linux)""... $ac_c" 1>&6 echo "configure:4512: checking whether the linker supports --[no]-whole-archive (Linux)" >&5 if eval "test \"`echo '$''{'ac_cv_c_whole_archive'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else saved_cflags=$CFLAGS CFLAGS="$CFLAGS -Wl,--whole-archive -Wl,--no-whole-archive" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* ac_cv_c_whole_archive="yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_c_whole_archive="no" fi rm -f conftest* CFLAGS=$saved_cflags fi echo "$ac_t""$ac_cv_c_whole_archive" 1>&6 if test "$ac_cv_c_whole_archive" = "yes" then DLL_LINK="-Wl,--whole-archive $DLL_LINK -Wl,--no-whole-archive" else echo $ac_n "checking whether the linker supports -z {all,default}extract (Linux)""... $ac_c" 1>&6 echo "configure:4546: checking whether the linker supports -z {all,default}extract (Linux)" >&5 if eval "test \"`echo '$''{'ac_cv_c_allextract'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else saved_cflags=$CFLAGS CFLAGS="$CFLAGS -Wl,-z,allextract -Wl,-z,defaultextract" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* ac_cv_c_allextract="yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_c_allextract="no" fi rm -f conftest* CFLAGS=$saved_cflags fi echo "$ac_t""$ac_cv_c_allextract" 1>&6 if test "$ac_cv_c_allextract" = "yes" then DLL_LINK="-Wl,-z,allextract $DLL_LINK -Wl,-z,defaultextract" fi fi fi wine_cv_libc_reentrant=no echo $ac_n "checking "for reentrant libc: __errno_location"""... $ac_c" 1>&6 echo "configure:4591: checking "for reentrant libc: __errno_location"" >&5 if eval "test \"`echo '$''{'wine_cv_libc_r__errno_location'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test "$cross_compiling" = yes; then wine_cv_libc_r__errno_location=yes else cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext} && (./conftest; exit) 2>/dev/null then wine_cv_libc_r__errno_location=yes else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -fr conftest* wine_cv_libc_r__errno_location=no fi rm -fr conftest* fi fi echo "$ac_t""$wine_cv_libc_r__errno_location" 1>&6 if test "$wine_cv_libc_r__errno_location" = "yes" then cat >> confdefs.h <<\EOF #define HAVE__ERRNO_LOCATION 1 EOF wine_cv_libc_reentrant=__errno_location fi echo $ac_n "checking "for reentrant libc: __error"""... $ac_c" 1>&6 echo "configure:4631: checking "for reentrant libc: __error"" >&5 if eval "test \"`echo '$''{'wine_cv_libc_r__error'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test "$cross_compiling" = yes; then wine_cv_libc_r__error=yes else cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext} && (./conftest; exit) 2>/dev/null then wine_cv_libc_r__error=yes else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -fr conftest* wine_cv_libc_r__error=no fi rm -fr conftest* fi fi echo "$ac_t""$wine_cv_libc_r__error" 1>&6 if test "$wine_cv_libc_r__error" = "yes" then cat >> confdefs.h <<\EOF #define HAVE__ERROR 1 EOF wine_cv_libc_reentrant=__error fi echo $ac_n "checking "for reentrant libc: ___errno"""... $ac_c" 1>&6 echo "configure:4671: checking "for reentrant libc: ___errno"" >&5 if eval "test \"`echo '$''{'wine_cv_libc_r___errno'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test "$cross_compiling" = yes; then wine_cv_libc_r___errno=yes else cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext} && (./conftest; exit) 2>/dev/null then wine_cv_libc_r___errno=yes else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -fr conftest* wine_cv_libc_r___errno=no fi rm -fr conftest* fi fi echo "$ac_t""$wine_cv_libc_r___errno" 1>&6 if test "$wine_cv_libc_r___errno" = "yes" then cat >> confdefs.h <<\EOF #define HAVE___ERRNO 1 EOF wine_cv_libc_reentrant=___errno fi echo $ac_n "checking "for reentrant libc: __thr_errno"""... $ac_c" 1>&6 echo "configure:4711: checking "for reentrant libc: __thr_errno"" >&5 if eval "test \"`echo '$''{'wine_cv_libc_r__thr_errno'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test "$cross_compiling" = yes; then wine_cv_libc_r__thr_errno=yes else cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext} && (./conftest; exit) 2>/dev/null then wine_cv_libc_r__thr_errno=yes else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -fr conftest* wine_cv_libc_r__thr_errno=no fi rm -fr conftest* fi fi echo "$ac_t""$wine_cv_libc_r__thr_errno" 1>&6 if test "$wine_cv_libc_r__thr_errno" = "yes" then cat >> confdefs.h <<\EOF #define HAVE__THR_ERRNO 1 EOF wine_cv_libc_reentrant=__thr_errno fi if test "$wine_cv_libc_reentrant" = "no" then cat >> confdefs.h <<\EOF #define NO_REENTRANT_LIBC 1 EOF fi if test "$have_x" = "yes" -a "$wine_cv_libc_reentrant" != "no" then echo $ac_n "checking "for reentrant X libraries"""... $ac_c" 1>&6 echo "configure:4762: checking "for reentrant X libraries"" >&5 if eval "test \"`echo '$''{'wine_cv_x_reentrant'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test "x$with_reentrant_x" = "xno" then wine_cv_x_reentrant=no else libX11_check=none for dir in "$x_libraries" /usr/lib /usr/local/lib /lib; do if test -r $dir/libX11.so; then libX11_check="-D $dir/libX11.so" break 1 fi if test -r $dir/libX11.a; then libX11_check="$dir/libX11.a" break 1 fi done if test "$libX11_check" != "none"; then if nm $libX11_check | grep $wine_cv_libc_reentrant >/dev/null 2>&1 then wine_cv_x_reentrant=yes else wine_cv_x_reentrant=no fi else wine_cv_x_reentrant=unknown fi fi fi echo "$ac_t""$wine_cv_x_reentrant" 1>&6 else wine_cv_x_reentrant=no fi if test "$wine_cv_x_reentrant" = "no" then cat >> confdefs.h <<\EOF #define NO_REENTRANT_X11 1 EOF fi echo $ac_n "checking whether byte ordering is bigendian""... $ac_c" 1>&6 echo "configure:4808: checking whether byte ordering is bigendian" >&5 if eval "test \"`echo '$''{'ac_cv_c_bigendian'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_cv_c_bigendian=unknown # See if sys/param.h defines the BYTE_ORDER macro. cat > conftest.$ac_ext < #include int main() { #if !BYTE_ORDER || !BIG_ENDIAN || !LITTLE_ENDIAN bogus endian macros #endif ; return 0; } EOF if { (eval echo configure:4826: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* # It does; now see whether it defined to BIG_ENDIAN or not. cat > conftest.$ac_ext < #include int main() { #if BYTE_ORDER != BIG_ENDIAN not big endian #endif ; return 0; } EOF if { (eval echo configure:4841: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_c_bigendian=yes else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_c_bigendian=no fi rm -f conftest* else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 fi rm -f conftest* if test $ac_cv_c_bigendian = unknown; then if test "$cross_compiling" = yes; then { echo "configure: error: can not run test program while cross compiling" 1>&2; exit 1; } else cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext} && (./conftest; exit) 2>/dev/null then ac_cv_c_bigendian=no else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -fr conftest* ac_cv_c_bigendian=yes fi rm -fr conftest* fi fi fi echo "$ac_t""$ac_cv_c_bigendian" 1>&6 if test $ac_cv_c_bigendian = yes; then cat >> confdefs.h <<\EOF #define WORDS_BIGENDIAN 1 EOF fi # The Ultrix 4.2 mips builtin alloca declared by alloca.h only works # for constant arguments. Useless! echo $ac_n "checking for working alloca.h""... $ac_c" 1>&6 echo "configure:4902: checking for working alloca.h" >&5 if eval "test \"`echo '$''{'ac_cv_header_alloca_h'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < int main() { void *p = alloca(2 * sizeof(int)); ; return 0; } EOF if { (eval echo configure:4914: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* ac_cv_header_alloca_h=yes else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_header_alloca_h=no fi rm -f conftest* fi echo "$ac_t""$ac_cv_header_alloca_h" 1>&6 if test $ac_cv_header_alloca_h = yes; then cat >> confdefs.h <<\EOF #define HAVE_ALLOCA_H 1 EOF fi echo $ac_n "checking for alloca""... $ac_c" 1>&6 echo "configure:4935: checking for alloca" >&5 if eval "test \"`echo '$''{'ac_cv_func_alloca_works'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < # define alloca _alloca # else # if HAVE_ALLOCA_H # include # else # ifdef _AIX #pragma alloca # else # ifndef alloca /* predefined by HP cc +Olibcalls */ char *alloca (); # endif # endif # endif # endif #endif int main() { char *p = (char *) alloca(1); ; return 0; } EOF if { (eval echo configure:4968: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* ac_cv_func_alloca_works=yes else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_func_alloca_works=no fi rm -f conftest* fi echo "$ac_t""$ac_cv_func_alloca_works" 1>&6 if test $ac_cv_func_alloca_works = yes; then cat >> confdefs.h <<\EOF #define HAVE_ALLOCA 1 EOF fi if test $ac_cv_func_alloca_works = no; then # The SVR3 libPW and SVR4 libucb both contain incompatible functions # that cause trouble. Some versions do not even contain alloca or # contain a buggy version. If you still want to use their alloca, # use ar to extract alloca.o from them instead of compiling alloca.c. ALLOCA=alloca.${ac_objext} cat >> confdefs.h <<\EOF #define C_ALLOCA 1 EOF echo $ac_n "checking whether alloca needs Cray hooks""... $ac_c" 1>&6 echo "configure:5000: checking whether alloca needs Cray hooks" >&5 if eval "test \"`echo '$''{'ac_cv_os_cray'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext <&5 | egrep "webecray" >/dev/null 2>&1; then rm -rf conftest* ac_cv_os_cray=yes else rm -rf conftest* ac_cv_os_cray=no fi rm -f conftest* fi echo "$ac_t""$ac_cv_os_cray" 1>&6 if test $ac_cv_os_cray = yes; then for ac_func in _getb67 GETB67 getb67; do echo $ac_n "checking for $ac_func""... $ac_c" 1>&6 echo "configure:5030: checking for $ac_func" >&5 if eval "test \"`echo '$''{'ac_cv_func_$ac_func'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < /* Override any gcc2 internal prototype to avoid an error. */ /* We use char because int might match the return type of a gcc2 builtin and then its argument prototype would still apply. */ char $ac_func(); int main() { /* The GNU C library defines this for functions which it implements to always fail with ENOSYS. Some functions are actually named something starting with __ and the normal name is an alias. */ #if defined (__stub_$ac_func) || defined (__stub___$ac_func) choke me #else $ac_func(); #endif ; return 0; } EOF if { (eval echo configure:5058: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_func_$ac_func=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_func_$ac_func=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_func_'$ac_func`\" = yes"; then echo "$ac_t""yes" 1>&6 cat >> confdefs.h <&6 fi done fi echo $ac_n "checking stack direction for C alloca""... $ac_c" 1>&6 echo "configure:5085: checking stack direction for C alloca" >&5 if eval "test \"`echo '$''{'ac_cv_c_stack_direction'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test "$cross_compiling" = yes; then ac_cv_c_stack_direction=0 else cat > conftest.$ac_ext < addr) ? 1 : -1; } main () { exit (find_stack_direction() < 0); } EOF if { (eval echo configure:5112: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext} && (./conftest; exit) 2>/dev/null then ac_cv_c_stack_direction=1 else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -fr conftest* ac_cv_c_stack_direction=-1 fi rm -fr conftest* fi fi echo "$ac_t""$ac_cv_c_stack_direction" 1>&6 cat >> confdefs.h <&6 echo "configure:5164: checking for $ac_func" >&5 if eval "test \"`echo '$''{'ac_cv_func_$ac_func'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < /* Override any gcc2 internal prototype to avoid an error. */ /* We use char because int might match the return type of a gcc2 builtin and then its argument prototype would still apply. */ char $ac_func(); int main() { /* The GNU C library defines this for functions which it implements to always fail with ENOSYS. Some functions are actually named something starting with __ and the normal name is an alias. */ #if defined (__stub_$ac_func) || defined (__stub___$ac_func) choke me #else $ac_func(); #endif ; return 0; } EOF if { (eval echo configure:5192: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then rm -rf conftest* eval "ac_cv_func_$ac_func=yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_func_$ac_func=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_func_'$ac_func`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_func=HAVE_`echo $ac_func | tr 'abcdefghijklmnopqrstuvwxyz' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'` cat >> confdefs.h <&6 fi done for ac_hdr in \ a.out.h \ a_out.h \ arpa/inet.h \ arpa/nameser.h \ elf.h \ float.h \ libio.h \ link.h \ linux/cdrom.h \ linux/joystick.h \ linux/ucdrom.h \ net/if.h \ netinet/in.h \ netinet/tcp.h \ pty.h \ resolv.h \ sched.h \ socket.h \ strings.h \ sys/cdio.h \ sys/errno.h \ sys/file.h \ sys/filio.h \ sys/ipc.h \ sys/lwp.h \ sys/mman.h \ sys/modem.h \ sys/mount.h \ sys/msg.h \ sys/param.h \ sys/reg.h \ sys/signal.h \ sys/shm.h \ sys/socket.h \ sys/sockio.h \ sys/statfs.h \ sys/strtio.h \ sys/syscall.h \ sys/wait.h \ sys/v86.h \ sys/v86intr.h \ sys/vfs.h \ sys/vm86.h \ syscall.h \ ucontext.h \ wctype.h \ do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 echo "configure:5269: checking for $ac_hdr" >&5 if eval "test \"`echo '$''{'ac_cv_header_$ac_safe'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" { (eval echo configure:5279: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then rm -rf conftest* eval "ac_cv_header_$ac_safe=yes" else echo "$ac_err" >&5 echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* eval "ac_cv_header_$ac_safe=no" fi rm -f conftest* fi if eval "test \"`echo '$ac_cv_header_'$ac_safe`\" = yes"; then echo "$ac_t""yes" 1>&6 ac_tr_hdr=HAVE_`echo $ac_hdr | sed 'y%abcdefghijklmnopqrstuvwxyz./-%ABCDEFGHIJKLMNOPQRSTUVWXYZ___%'` cat >> confdefs.h <&6 fi done echo $ac_n "checking whether stat file-mode macros are broken""... $ac_c" 1>&6 echo "configure:5306: checking whether stat file-mode macros are broken" >&5 if eval "test \"`echo '$''{'ac_cv_header_stat_broken'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < #include #if defined(S_ISBLK) && defined(S_IFDIR) # if S_ISBLK (S_IFDIR) You lose. # endif #endif #if defined(S_ISBLK) && defined(S_IFCHR) # if S_ISBLK (S_IFCHR) You lose. # endif #endif #if defined(S_ISLNK) && defined(S_IFREG) # if S_ISLNK (S_IFREG) You lose. # endif #endif #if defined(S_ISSOCK) && defined(S_IFREG) # if S_ISSOCK (S_IFREG) You lose. # endif #endif EOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | egrep "You lose" >/dev/null 2>&1; then rm -rf conftest* ac_cv_header_stat_broken=yes else rm -rf conftest* ac_cv_header_stat_broken=no fi rm -f conftest* fi echo "$ac_t""$ac_cv_header_stat_broken" 1>&6 if test $ac_cv_header_stat_broken = yes; then cat >> confdefs.h <<\EOF #define STAT_MACROS_BROKEN 1 EOF fi echo $ac_n "checking for working const""... $ac_c" 1>&6 echo "configure:5364: checking for working const" >&5 if eval "test \"`echo '$''{'ac_cv_c_const'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext <j = 5; } { /* ULTRIX-32 V3.1 (Rev 9) vcc rejects this */ const int foo = 10; } ; return 0; } EOF if { (eval echo configure:5418: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_c_const=yes else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_c_const=no fi rm -f conftest* fi echo "$ac_t""$ac_cv_c_const" 1>&6 if test $ac_cv_c_const = no; then cat >> confdefs.h <<\EOF #define const EOF fi echo $ac_n "checking for inline""... $ac_c" 1>&6 echo "configure:5439: checking for inline" >&5 if eval "test \"`echo '$''{'ac_cv_c_inline'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else ac_cv_c_inline=no for ac_kw in inline __inline__ __inline; do cat > conftest.$ac_ext <&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_c_inline=$ac_kw; break else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 fi rm -f conftest* done fi echo "$ac_t""$ac_cv_c_inline" 1>&6 case "$ac_cv_c_inline" in inline | yes) ;; no) cat >> confdefs.h <<\EOF #define inline EOF ;; *) cat >> confdefs.h <&6 echo "configure:5479: checking for ANSI C header files" >&5 if eval "test \"`echo '$''{'ac_cv_header_stdc'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < #include #include #include EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" { (eval echo configure:5492: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` if test -z "$ac_err"; then rm -rf conftest* ac_cv_header_stdc=yes else echo "$ac_err" >&5 echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_header_stdc=no fi rm -f conftest* if test $ac_cv_header_stdc = yes; then # SunOS 4.x string.h does not declare mem*, contrary to ANSI. cat > conftest.$ac_ext < EOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | egrep "memchr" >/dev/null 2>&1; then : else rm -rf conftest* ac_cv_header_stdc=no fi rm -f conftest* fi if test $ac_cv_header_stdc = yes; then # ISC 2.0.2 stdlib.h does not declare free, contrary to ANSI. cat > conftest.$ac_ext < EOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | egrep "free" >/dev/null 2>&1; then : else rm -rf conftest* ac_cv_header_stdc=no fi rm -f conftest* fi if test $ac_cv_header_stdc = yes; then # /bin/cc in Irix-4.0.5 gets non-ANSI ctype macros unless using -ansi. if test "$cross_compiling" = yes; then : else cat > conftest.$ac_ext < #define ISLOWER(c) ('a' <= (c) && (c) <= 'z') #define TOUPPER(c) (ISLOWER(c) ? 'A' + ((c) - 'a') : (c)) #define XOR(e, f) (((e) && !(f)) || (!(e) && (f))) int main () { int i; for (i = 0; i < 256; i++) if (XOR (islower (i), ISLOWER (i)) || toupper (i) != TOUPPER (i)) exit(2); exit (0); } EOF if { (eval echo configure:5559: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext} && (./conftest; exit) 2>/dev/null then : else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -fr conftest* ac_cv_header_stdc=no fi rm -fr conftest* fi fi fi echo "$ac_t""$ac_cv_header_stdc" 1>&6 if test $ac_cv_header_stdc = yes; then cat >> confdefs.h <<\EOF #define STDC_HEADERS 1 EOF fi echo $ac_n "checking for size_t""... $ac_c" 1>&6 echo "configure:5583: checking for size_t" >&5 if eval "test \"`echo '$''{'ac_cv_type_size_t'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < #if STDC_HEADERS #include #include #endif EOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | egrep "(^|[^a-zA-Z_0-9])size_t[^a-zA-Z_0-9]" >/dev/null 2>&1; then rm -rf conftest* ac_cv_type_size_t=yes else rm -rf conftest* ac_cv_type_size_t=no fi rm -f conftest* fi echo "$ac_t""$ac_cv_type_size_t" 1>&6 if test $ac_cv_type_size_t = no; then cat >> confdefs.h <<\EOF #define size_t unsigned EOF fi echo $ac_n "checking size of long long""... $ac_c" 1>&6 echo "configure:5616: checking size of long long" >&5 if eval "test \"`echo '$''{'ac_cv_sizeof_long_long'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test "$cross_compiling" = yes; then ac_cv_sizeof_long_long=0 else cat > conftest.$ac_ext < main() { FILE *f=fopen("conftestval", "w"); if (!f) exit(1); fprintf(f, "%d\n", sizeof(long long)); exit(0); } EOF if { (eval echo configure:5635: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext} && (./conftest; exit) 2>/dev/null then ac_cv_sizeof_long_long=`cat conftestval` else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -fr conftest* ac_cv_sizeof_long_long=0 fi rm -fr conftest* fi fi echo "$ac_t""$ac_cv_sizeof_long_long" 1>&6 cat >> confdefs.h <&6 echo "configure:5658: checking "whether linux/joystick.h uses the Linux 2.2+ API"" >&5 if eval "test \"`echo '$''{'wine_cv_linux_joystick_22_api'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < #include struct js_event blub; #if !defined(JS_EVENT_AXIS) || !defined(JS_EVENT_BUTTON) #error "no 2.2 header" #endif int main() { /*empty*/ ; return 0; } EOF if { (eval echo configure:5678: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* wine_cv_linux_joystick_22_api=yes else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* wine_cv_linux_joystick_22_api=no fi rm -f conftest* fi echo "$ac_t""$wine_cv_linux_joystick_22_api" 1>&6 if test "$wine_cv_linux_joystick_22_api" = "yes" then cat >> confdefs.h <<\EOF #define HAVE_LINUX_22_JOYSTICK_API 1 EOF fi fi if test "$ac_cv_header_sys_vfs_h" = "yes" then echo $ac_n "checking "whether sys/vfs.h defines statfs"""... $ac_c" 1>&6 echo "configure:5705: checking "whether sys/vfs.h defines statfs"" >&5 if eval "test \"`echo '$''{'wine_cv_sys_vfs_has_statfs'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < #ifdef HAVE_SYS_PARAM_H # include #endif #include int main() { struct statfs stfs; memset(&stfs,0,sizeof(stfs)); ; return 0; } EOF if { (eval echo configure:5727: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* wine_cv_sys_vfs_has_statfs=yes else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* wine_cv_sys_vfs_has_statfs=no fi rm -f conftest* fi echo "$ac_t""$wine_cv_sys_vfs_has_statfs" 1>&6 if test "$wine_cv_sys_vfs_has_statfs" = "yes" then cat >> confdefs.h <<\EOF #define STATFS_DEFINED_BY_SYS_VFS 1 EOF fi fi if test "$ac_cv_header_sys_statfs_h" = "yes" then echo $ac_n "checking "whether sys/statfs.h defines statfs"""... $ac_c" 1>&6 echo "configure:5754: checking "whether sys/statfs.h defines statfs"" >&5 if eval "test \"`echo '$''{'wine_cv_sys_statfs_has_statfs'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < #ifdef HAVE_SYS_PARAM_H # include #endif #include int main() { struct statfs stfs; ; return 0; } EOF if { (eval echo configure:5774: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* wine_cv_sys_statfs_has_statfs=yes else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* wine_cv_sys_statfs_has_statfs=no fi rm -f conftest* fi echo "$ac_t""$wine_cv_sys_statfs_has_statfs" 1>&6 if test "$wine_cv_sys_statfs_has_statfs" = "yes" then cat >> confdefs.h <<\EOF #define STATFS_DEFINED_BY_SYS_STATFS 1 EOF fi fi if test "$ac_cv_header_sys_mount_h" = "yes" then echo $ac_n "checking "whether sys/mount.h defines statfs"""... $ac_c" 1>&6 echo "configure:5801: checking "whether sys/mount.h defines statfs"" >&5 if eval "test \"`echo '$''{'wine_cv_sys_mount_has_statfs'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < #ifdef HAVE_SYS_PARAM_H # include #endif #include int main() { struct statfs stfs; ; return 0; } EOF if { (eval echo configure:5821: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* wine_cv_sys_mount_has_statfs=yes else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* wine_cv_sys_mount_has_statfs=no fi rm -f conftest* fi echo "$ac_t""$wine_cv_sys_mount_has_statfs" 1>&6 if test "$wine_cv_sys_mount_has_statfs" = "yes" then cat >> confdefs.h <<\EOF #define STATFS_DEFINED_BY_SYS_MOUNT 1 EOF fi fi echo $ac_n "checking "for statfs.f_bfree"""... $ac_c" 1>&6 echo "configure:5847: checking "for statfs.f_bfree"" >&5 if eval "test \"`echo '$''{'wine_cv_statfs_bfree'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test "x$statfs_bfree" = "xno" then wine_cv_statfs_bfree=no else cat > conftest.$ac_ext < #ifdef HAVE_SYS_PARAM_H # include #endif #ifdef STATFS_DEFINED_BY_SYS_MOUNT # include #else # ifdef STATFS_DEFINED_BY_SYS_VFS # include # else # ifdef STATFS_DEFINED_BY_SYS_STATFS # include # endif # endif #endif int main() { struct statfs stfs; stfs.f_bfree++; ; return 0; } EOF if { (eval echo configure:5883: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* wine_cv_statfs_bfree=yes else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* wine_cv_statfs_bfree=no fi rm -f conftest* fi fi echo "$ac_t""$wine_cv_statfs_bfree" 1>&6 if test "$wine_cv_statfs_bfree" = "yes" then cat >> confdefs.h <<\EOF #define STATFS_HAS_BFREE 1 EOF fi echo $ac_n "checking "for statfs.f_bavail"""... $ac_c" 1>&6 echo "configure:5907: checking "for statfs.f_bavail"" >&5 if eval "test \"`echo '$''{'wine_cv_statfs_bavail'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else if test "x$statfs_bavail" = "xno" then wine_cv_statfs_bavail=no else cat > conftest.$ac_ext < #ifdef HAVE_SYS_PARAM_H # include #endif #ifdef STATFS_DEFINED_BY_SYS_MOUNT # include #else # ifdef STATFS_DEFINED_BY_SYS_VFS # include # else # ifdef STATFS_DEFINED_BY_SYS_STATFS # include # endif # endif #endif int main() { struct statfs stfs; stfs.f_bavail++; ; return 0; } EOF if { (eval echo configure:5943: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* wine_cv_statfs_bavail=yes else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* wine_cv_statfs_bavail=no fi rm -f conftest* fi fi echo "$ac_t""$wine_cv_statfs_bavail" 1>&6 if test "$wine_cv_statfs_bavail" = "yes" then cat >> confdefs.h <<\EOF #define STATFS_HAS_BAVAIL 1 EOF fi echo $ac_n "checking "for msg_accrights in struct msghdr"""... $ac_c" 1>&6 echo "configure:5968: checking "for msg_accrights in struct msghdr"" >&5 if eval "test \"`echo '$''{'ac_cv_c_msg_accrights'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < #include int main() { struct msghdr hdr; hdr.msg_accrights=0 ; return 0; } EOF if { (eval echo configure:5981: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_c_msg_accrights="yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_c_msg_accrights="no" fi rm -f conftest* fi echo "$ac_t""$ac_cv_c_msg_accrights" 1>&6 if test "$ac_cv_c_msg_accrights" = "yes" then cat >> confdefs.h <<\EOF #define HAVE_MSGHDR_ACCRIGHTS 1 EOF fi echo $ac_n "checking "for sun_len in struct sockaddr_un"""... $ac_c" 1>&6 echo "configure:6004: checking "for sun_len in struct sockaddr_un"" >&5 if eval "test \"`echo '$''{'ac_cv_c_sun_len'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext < #include #include int main() { static struct sockaddr_un addr; addr.sun_len = 1 ; return 0; } EOF if { (eval echo configure:6018: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_c_sun_len="yes" else echo "configure: failed program was:" >&5 cat conftest.$ac_ext >&5 rm -rf conftest* ac_cv_c_sun_len="no" fi rm -f conftest* fi echo "$ac_t""$ac_cv_c_sun_len" 1>&6 if test "$ac_cv_c_sun_len" = "yes" then cat >> confdefs.h <<\EOF #define HAVE_SOCKADDR_SUN_LEN 1 EOF fi echo $ac_n "checking "whether we need to define __i386__"""... $ac_c" 1>&6 echo "configure:6041: checking "whether we need to define __i386__"" >&5 if eval "test \"`echo '$''{'ac_cv_cpp_def_i386'+set}'`\" = set"; then echo $ac_n "(cached) $ac_c" 1>&6 else cat > conftest.$ac_ext <&5 | egrep "yes" >/dev/null 2>&1; then rm -rf conftest* ac_cv_cpp_def_i386="yes" else rm -rf conftest* ac_cv_cpp_def_i386="no" fi rm -f conftest* fi echo "$ac_t""$ac_cv_cpp_def_i386" 1>&6 if test "$ac_cv_cpp_def_i386" = "yes" then CFLAGS="$CFLAGS -D__i386__" LINTFLAGS="$LINTFLAGS -D__i386__" fi GCC_NO_BUILTIN="" if test "$GCC" = "yes" then GCC_NO_BUILTIN="-fno-builtin" fi MAKE_RULES=Make.rules MAKE_DLL_RULES=dlls/Makedll.rules trap '' 1 2 15 cat > confcache <<\EOF # This file is a shell script that caches the results of configure # tests run on this system so they can be shared between configure # scripts and configure runs. It is not useful on other systems. # If it contains results you don't want to keep, you may remove or edit it. # # By default, configure uses ./config.cache as the cache file, # creating it if it does not exist already. You can give configure # the --cache-file=FILE option to use a different cache file; that is # what configure does when it calls configure scripts in # subdirectories, so they share the cache. # Giving --cache-file=/dev/null disables caching, for debugging configure. # config.status only pays attention to the cache file if you give it the # --recheck option to rerun configure. # EOF # The following way of writing the cache mishandles newlines in values, # but we know of no workaround that is simple, portable, and efficient. # So, don't put newlines in cache variables' values. # Ultrix sh set writes to stderr and can't be redirected directly, # and sets the high bit in the cache file unless we assign to the vars. (set) 2>&1 | case `(ac_space=' '; set | grep ac_space) 2>&1` in *ac_space=\ *) # `set' does not quote correctly, so add quotes (double-quote substitution # turns \\\\ into \\, and sed turns \\ into \). sed -n \ -e "s/'/'\\\\''/g" \ -e "s/^\\([a-zA-Z0-9_]*_cv_[a-zA-Z0-9_]*\\)=\\(.*\\)/\\1=\${\\1='\\2'}/p" ;; *) # `set' quotes correctly as required by POSIX, so do not add quotes. sed -n -e 's/^\([a-zA-Z0-9_]*_cv_[a-zA-Z0-9_]*\)=\(.*\)/\1=${\1=\2}/p' ;; esac >> confcache if cmp -s $cache_file confcache; then : else if test -w $cache_file; then echo "updating cache $cache_file" cat confcache > $cache_file else echo "not updating unwritable cache $cache_file" fi fi rm -f confcache trap 'rm -fr conftest* confdefs* core core.* *.core $ac_clean_files; exit 1' 1 2 15 test "x$prefix" = xNONE && prefix=$ac_default_prefix # Let make expand exec_prefix. test "x$exec_prefix" = xNONE && exec_prefix='${prefix}' # Any assignment to VPATH causes Sun make to only execute # the first set of double-colon rules, so remove it if not needed. # If there is a colon in the path, we need to keep it. if test "x$srcdir" = x.; then ac_vpsub='/^[ ]*VPATH[ ]*=[^:]*$/d' fi trap 'rm -f $CONFIG_STATUS conftest*; exit 1' 1 2 15 DEFS=-DHAVE_CONFIG_H # Without the "./", some shells look in PATH for config.status. : ${CONFIG_STATUS=./config.status} echo creating $CONFIG_STATUS rm -f $CONFIG_STATUS cat > $CONFIG_STATUS </dev/null | sed 1q`: # # $0 $ac_configure_args # # Compiler output produced by configure, useful for debugging # configure, is in ./config.log if it exists. ac_cs_usage="Usage: $CONFIG_STATUS [--recheck] [--version] [--help]" for ac_option do case "\$ac_option" in -recheck | --recheck | --rechec | --reche | --rech | --rec | --re | --r) echo "running \${CONFIG_SHELL-/bin/sh} $0 $ac_configure_args --no-create --no-recursion" exec \${CONFIG_SHELL-/bin/sh} $0 $ac_configure_args --no-create --no-recursion ;; -version | --version | --versio | --versi | --vers | --ver | --ve | --v) echo "$CONFIG_STATUS generated by autoconf version 2.13" exit 0 ;; -help | --help | --hel | --he | --h) echo "\$ac_cs_usage"; exit 0 ;; *) echo "\$ac_cs_usage"; exit 1 ;; esac done ac_given_srcdir=$srcdir ac_given_INSTALL="$INSTALL" trap 'rm -fr `echo " Make.rules Makefile console/Makefile controls/Makefile debugger/Makefile dlls/Makedll.rules dlls/Makefile dlls/advapi32/Makefile dlls/avifil32/Makefile dlls/comctl32/Makefile dlls/commdlg/Makefile dlls/crtdll/Makefile dlls/dciman32/Makefile dlls/ddraw/Makefile dlls/dinput/Makefile dlls/display/Makefile dlls/dplayx/Makefile dlls/dsound/Makefile dlls/gdi/Makefile dlls/icmp/Makefile dlls/imagehlp/Makefile dlls/imm32/Makefile dlls/lzexpand/Makefile dlls/mouse/Makefile dlls/mpr/Makefile dlls/msacm/Makefile dlls/msacm32/Makefile dlls/msnet32/Makefile dlls/msvideo/Makefile dlls/ntdll/Makefile dlls/odbc32/Makefile dlls/ole32/Makefile dlls/oleaut32/Makefile dlls/olecli/Makefile dlls/oledlg/Makefile dlls/olepro32/Makefile dlls/olesvr/Makefile dlls/opengl32/Makefile dlls/psapi/Makefile dlls/rasapi32/Makefile dlls/richedit/Makefile dlls/setupx/Makefile dlls/shell32/Makefile dlls/sound/Makefile dlls/stress/Makefile dlls/tapi32/Makefile dlls/ttydrv/Makefile dlls/urlmon/Makefile dlls/user/Makefile dlls/version/Makefile dlls/win32s/Makefile dlls/win87em/Makefile dlls/winaspi/Makefile dlls/windebug/Makefile dlls/wing/Makefile dlls/wininet/Makefile dlls/winmm/Makefile dlls/winmm/joystick/Makefile dlls/winmm/mcianim/Makefile dlls/winmm/mciavi/Makefile dlls/winmm/mcicda/Makefile dlls/winmm/mciseq/Makefile dlls/winmm/mciwave/Makefile dlls/winmm/midimap/Makefile dlls/winmm/wavemap/Makefile dlls/winmm/wineoss/Makefile dlls/winsock/Makefile dlls/winspool/Makefile dlls/ttydrv/Makefile dlls/x11drv/Makefile documentation/Makefile documentation/wine.conf.man documentation/wine.man files/Makefile graphics/Makefile graphics/enhmetafiledrv/Makefile graphics/metafiledrv/Makefile graphics/psdrv/Makefile graphics/ttydrv/Makefile graphics/win16drv/Makefile graphics/x11drv/Makefile if1632/Makefile include/Makefile library/Makefile libtest/Makefile loader/Makefile loader/ne/Makefile loader/dos/Makefile memory/Makefile misc/Makefile miscemu/Makefile msdos/Makefile objects/Makefile ole/Makefile programs/Makefile programs/clock/Makefile programs/cmdlgtst/Makefile programs/control/Makefile programs/avitools/Makefile programs/osversioncheck/Makefile programs/notepad/Makefile programs/progman/Makefile programs/regtest/Makefile programs/regapi/Makefile programs/view/Makefile programs/wcmd/Makefile programs/winemine/Makefile programs/winhelp/Makefile programs/winver/Makefile relay32/Makefile resources/Makefile scheduler/Makefile server/Makefile tools/Makefile tools/cvdump/Makefile tools/wrc/Makefile tsx11/Makefile win32/Makefile windows/Makefile windows/ttydrv/Makefile windows/x11drv/Makefile include/config.h" | sed "s/:[^ ]*//g"` conftest*; exit 1' 1 2 15 EOF cat >> $CONFIG_STATUS < conftest.subs <<\\CEOF $ac_vpsub $extrasub s%@SHELL@%$SHELL%g s%@CFLAGS@%$CFLAGS%g s%@CPPFLAGS@%$CPPFLAGS%g s%@CXXFLAGS@%$CXXFLAGS%g s%@FFLAGS@%$FFLAGS%g s%@DEFS@%$DEFS%g s%@LDFLAGS@%$LDFLAGS%g s%@LIBS@%$LIBS%g s%@exec_prefix@%$exec_prefix%g s%@prefix@%$prefix%g s%@program_transform_name@%$program_transform_name%g s%@bindir@%$bindir%g s%@sbindir@%$sbindir%g s%@libexecdir@%$libexecdir%g s%@datadir@%$datadir%g s%@sysconfdir@%$sysconfdir%g s%@sharedstatedir@%$sharedstatedir%g s%@localstatedir@%$localstatedir%g s%@libdir@%$libdir%g s%@includedir@%$includedir%g s%@oldincludedir@%$oldincludedir%g s%@infodir@%$infodir%g s%@mandir@%$mandir%g s%@PROGEXT@%$PROGEXT%g s%@EMU_TARGET@%$EMU_TARGET%g s%@OPTIONS@%$OPTIONS%g s%@SET_MAKE@%$SET_MAKE%g s%@CC@%$CC%g s%@CPP@%$CPP%g s%@X_CFLAGS@%$X_CFLAGS%g s%@X_PRE_LIBS@%$X_PRE_LIBS%g s%@X_LIBS@%$X_LIBS%g s%@X_EXTRA_LIBS@%$X_EXTRA_LIBS%g s%@YACC@%$YACC%g s%@LEX@%$LEX%g s%@LEXLIB@%$LEXLIB%g s%@RANLIB@%$RANLIB%g s%@INSTALL_PROGRAM@%$INSTALL_PROGRAM%g s%@INSTALL_SCRIPT@%$INSTALL_SCRIPT%g s%@INSTALL_DATA@%$INSTALL_DATA%g s%@LN_S@%$LN_S%g s%@C2MAN@%$C2MAN%g s%@LDCONFIG@%$LDCONFIG%g s%@LINT@%$LINT%g s%@LINTFLAGS@%$LINTFLAGS%g s%@XLIB@%$XLIB%g s%@X_DLLS@%$X_DLLS%g s%@XFILES@%$XFILES%g s%@OPENGLFILES@%$OPENGLFILES%g s%@OPENGL32_DLL@%$OPENGL32_DLL%g s%@DGA_SRCS@%$DGA_SRCS%g s%@DGA2_SRCS@%$DGA2_SRCS%g s%@MESA_SRCS@%$MESA_SRCS%g s%@DLL_LINK@%$DLL_LINK%g s%@BUILDFLAGS@%$BUILDFLAGS%g s%@DLLFLAGS@%$DLLFLAGS%g s%@LDSHARED@%$LDSHARED%g s%@LIBEXT@%$LIBEXT%g s%@ALLOCA@%$ALLOCA%g s%@GCC_NO_BUILTIN@%$GCC_NO_BUILTIN%g /@MAKE_RULES@/r $MAKE_RULES s%@MAKE_RULES@%%g /@MAKE_DLL_RULES@/r $MAKE_DLL_RULES s%@MAKE_DLL_RULES@%%g CEOF EOF cat >> $CONFIG_STATUS <<\EOF # Split the substitutions into bite-sized pieces for seds with # small command number limits, like on Digital OSF/1 and HP-UX. ac_max_sed_cmds=90 # Maximum number of lines to put in a sed script. ac_file=1 # Number of current file. ac_beg=1 # First line for current file. ac_end=$ac_max_sed_cmds # Line after last line for current file. ac_more_lines=: ac_sed_cmds="" while $ac_more_lines; do if test $ac_beg -gt 1; then sed "1,${ac_beg}d; ${ac_end}q" conftest.subs > conftest.s$ac_file else sed "${ac_end}q" conftest.subs > conftest.s$ac_file fi if test ! -s conftest.s$ac_file; then ac_more_lines=false rm -f conftest.s$ac_file else if test -z "$ac_sed_cmds"; then ac_sed_cmds="sed -f conftest.s$ac_file" else ac_sed_cmds="$ac_sed_cmds | sed -f conftest.s$ac_file" fi ac_file=`expr $ac_file + 1` ac_beg=$ac_end ac_end=`expr $ac_end + $ac_max_sed_cmds` fi done if test -z "$ac_sed_cmds"; then ac_sed_cmds=cat fi EOF cat >> $CONFIG_STATUS <> $CONFIG_STATUS <<\EOF for ac_file in .. $CONFIG_FILES; do if test "x$ac_file" != x..; then # Support "outfile[:infile[:infile...]]", defaulting infile="outfile.in". case "$ac_file" in *:*) ac_file_in=`echo "$ac_file"|sed 's%[^:]*:%%'` ac_file=`echo "$ac_file"|sed 's%:.*%%'` ;; *) ac_file_in="${ac_file}.in" ;; esac # Adjust a relative srcdir, top_srcdir, and INSTALL for subdirectories. # Remove last slash and all that follows it. Not all systems have dirname. ac_dir=`echo $ac_file|sed 's%/[^/][^/]*$%%'` if test "$ac_dir" != "$ac_file" && test "$ac_dir" != .; then # The file is in a subdirectory. test ! -d "$ac_dir" && mkdir "$ac_dir" ac_dir_suffix="/`echo $ac_dir|sed 's%^\./%%'`" # A "../" for each directory in $ac_dir_suffix. ac_dots=`echo $ac_dir_suffix|sed 's%/[^/]*%../%g'` else ac_dir_suffix= ac_dots= fi case "$ac_given_srcdir" in .) srcdir=. if test -z "$ac_dots"; then top_srcdir=. else top_srcdir=`echo $ac_dots|sed 's%/$%%'`; fi ;; /*) srcdir="$ac_given_srcdir$ac_dir_suffix"; top_srcdir="$ac_given_srcdir" ;; *) # Relative path. srcdir="$ac_dots$ac_given_srcdir$ac_dir_suffix" top_srcdir="$ac_dots$ac_given_srcdir" ;; esac case "$ac_given_INSTALL" in [/$]*) INSTALL="$ac_given_INSTALL" ;; *) INSTALL="$ac_dots$ac_given_INSTALL" ;; esac echo creating "$ac_file" rm -f "$ac_file" configure_input="Generated automatically from `echo $ac_file_in|sed 's%.*/%%'` by configure." case "$ac_file" in *Makefile*) ac_comsub="1i\\ # $configure_input" ;; *) ac_comsub= ;; esac ac_file_inputs=`echo $ac_file_in|sed -e "s%^%$ac_given_srcdir/%" -e "s%:% $ac_given_srcdir/%g"` sed -e "$ac_comsub s%@configure_input@%$configure_input%g s%@srcdir@%$srcdir%g s%@top_srcdir@%$top_srcdir%g s%@INSTALL@%$INSTALL%g " $ac_file_inputs | (eval "$ac_sed_cmds") > $ac_file fi; done rm -f conftest.s* # These sed commands are passed to sed as "A NAME B NAME C VALUE D", where # NAME is the cpp macro being defined and VALUE is the value it is being given. # # ac_d sets the value in "#define NAME VALUE" lines. ac_dA='s%^\([ ]*\)#\([ ]*define[ ][ ]*\)' ac_dB='\([ ][ ]*\)[^ ]*%\1#\2' ac_dC='\3' ac_dD='%g' # ac_u turns "#undef NAME" with trailing blanks into "#define NAME VALUE". ac_uA='s%^\([ ]*\)#\([ ]*\)undef\([ ][ ]*\)' ac_uB='\([ ]\)%\1#\2define\3' ac_uC=' ' ac_uD='\4%g' # ac_e turns "#undef NAME" without trailing blanks into "#define NAME VALUE". ac_eA='s%^\([ ]*\)#\([ ]*\)undef\([ ][ ]*\)' ac_eB='$%\1#\2define\3' ac_eC=' ' ac_eD='%g' if test "${CONFIG_HEADERS+set}" != set; then EOF cat >> $CONFIG_STATUS <> $CONFIG_STATUS <<\EOF fi for ac_file in .. $CONFIG_HEADERS; do if test "x$ac_file" != x..; then # Support "outfile[:infile[:infile...]]", defaulting infile="outfile.in". case "$ac_file" in *:*) ac_file_in=`echo "$ac_file"|sed 's%[^:]*:%%'` ac_file=`echo "$ac_file"|sed 's%:.*%%'` ;; *) ac_file_in="${ac_file}.in" ;; esac echo creating $ac_file rm -f conftest.frag conftest.in conftest.out ac_file_inputs=`echo $ac_file_in|sed -e "s%^%$ac_given_srcdir/%" -e "s%:% $ac_given_srcdir/%g"` cat $ac_file_inputs > conftest.in EOF # Transform confdefs.h into a sed script conftest.vals that substitutes # the proper values into config.h.in to produce config.h. And first: # Protect against being on the right side of a sed subst in config.status. # Protect against being in an unquoted here document in config.status. rm -f conftest.vals cat > conftest.hdr <<\EOF s/[\\&%]/\\&/g s%[\\$`]%\\&%g s%#define \([A-Za-z_][A-Za-z0-9_]*\) *\(.*\)%${ac_dA}\1${ac_dB}\1${ac_dC}\2${ac_dD}%gp s%ac_d%ac_u%gp s%ac_u%ac_e%gp EOF sed -n -f conftest.hdr confdefs.h > conftest.vals rm -f conftest.hdr # This sed command replaces #undef with comments. This is necessary, for # example, in the case of _POSIX_SOURCE, which is predefined and required # on some systems where configure will not decide to define it. cat >> conftest.vals <<\EOF s%^[ ]*#[ ]*undef[ ][ ]*[a-zA-Z_][a-zA-Z_0-9]*%/* & */% EOF # Break up conftest.vals because some shells have a limit on # the size of here documents, and old seds have small limits too. rm -f conftest.tail while : do ac_lines=`grep -c . conftest.vals` # grep -c gives empty output for an empty file on some AIX systems. if test -z "$ac_lines" || test "$ac_lines" -eq 0; then break; fi # Write a limited-size here document to conftest.frag. echo ' cat > conftest.frag <> $CONFIG_STATUS sed ${ac_max_here_lines}q conftest.vals >> $CONFIG_STATUS echo 'CEOF sed -f conftest.frag conftest.in > conftest.out rm -f conftest.in mv conftest.out conftest.in ' >> $CONFIG_STATUS sed 1,${ac_max_here_lines}d conftest.vals > conftest.tail rm -f conftest.vals mv conftest.tail conftest.vals done rm -f conftest.vals cat >> $CONFIG_STATUS <<\EOF rm -f conftest.frag conftest.h echo "/* $ac_file. Generated automatically by configure. */" > conftest.h cat conftest.in >> conftest.h rm -f conftest.in if cmp -s $ac_file conftest.h 2>/dev/null; then echo "$ac_file is unchanged" rm -f conftest.h else # Remove last slash and all that follows it. Not all systems have dirname. ac_dir=`echo $ac_file|sed 's%/[^/][^/]*$%%'` if test "$ac_dir" != "$ac_file" && test "$ac_dir" != .; then # The file is in a subdirectory. test ! -d "$ac_dir" && mkdir "$ac_dir" fi rm -f $ac_file mv conftest.h $ac_file fi fi; done EOF cat >> $CONFIG_STATUS <> $CONFIG_STATUS <<\EOF extra_subdirs="\ dlls/ddraw/d3ddevice \ dlls/ddraw/dclipper \ dlls/ddraw/ddraw \ dlls/ddraw/direct3d \ dlls/ddraw/dpalette \ dlls/ddraw/dsurface \ " for i in $extra_subdirs; do [ -d $i ] || (echo "creating $i" && mkdir $i); done exit 0 EOF chmod +x $CONFIG_STATUS rm -fr confdefs* $ac_clean_files test "$no_create" = yes || ${CONFIG_SHELL-/bin/sh} $CONFIG_STATUS || exit 1 if test "$have_x" = "no" then echo echo "*** Warning: X development files not found. Wine will be built without" echo "*** X support, which currently does not work, and would probably not be" echo "*** what you want anyway. You will need to install devel packages of" echo "*** Xlib/Xfree86 and Xpm at the very least." elif test "$ac_cv_lib_Xpm_XpmCreatePixmapFromData" = "no" then echo echo "*** Warning: Xpm development files not found. Wine will be built without" echo "*** Xpm support, which currently does not work. You will need to install" echo "*** devel packages of Xpm." fi if test "$ac_cv_lib_ncurses_resizeterm" = "no" -a "$ac_cv_lib_ncurses_waddch" = "yes" then echo echo "*** Warning: resizeterm not found in ncurses. Wine will be built without" echo "*** terminal resize support. Consider upgrading ncurses." fi if test "$wine_cv_libc_reentrant" = "no" then echo echo "*** Warning: non-reentrant libc detected. Wine will be build without" echo "*** thread support. Consider upgrading libc to a more recent" echo "*** reentrant version of libc." fi if test "$wine_cv_opengl_version_OK" = "no" then echo echo "*** Warning: old Mesa headers detected. Wine will be built without Direct3D" echo "*** support. Consider upgrading your Mesa libraries (http://www.mesa3d.org/)." fi if test "$wine_cv_opengl_version_threadsafe" = "yes" -a $OPENGL = "normal" then echo echo "*** Warning: the OpenGL version you have installed relies on libpthread for" echo "*** thread-safety. To prevent crashes, OpenGL support has been removed." echo "*** A fix for glibc 2.1.3 that seem to work is included in this version of Wine," echo "*** start configure with '--enable-opengl' to force OpenGL support." fi if test "$wine_cv_opengl_version_threadsafe" = "yes" -a $OPENGL = "yes" then echo echo "*** Warning: you explicitely linked in a thread-safe OpenGL version. If you" echo "*** experience unusual crashes on DirectDraw games, try first to disable OpenGL" echo "*** support before reporting bugs." fi echo echo "Configure finished. Do 'make depend && make' to compile Wine." echo wine-20000526/configure.in0100644000175000001440000007461707112613011014762 0ustar julliardusersdnl Process this file with autoconf to produce a configure script. dnl Author: Michael Patra dnl AC_REVISION([configure.in 1.00]) AC_INIT(controls/edit.c) AC_CONFIG_HEADER(include/config.h) AC_CONFIG_AUX_DIR(tools) # We want these before the checks, so the checks can modify their values. test -z "$PROGEXT" && PROGEXT="" AC_SUBST(PROGEXT) dnl **** Command-line arguments **** dnl Default values EMU_TARGET=wine LIBEXT=so # library type .so or .a TRACE_MSGS=yes # the TRACE() macro DEBUG_MSGS=yes # the TRACE(), WARN(), and FIXME() macros. CURSES=yes OPENGL=normal AC_ARG_ENABLE(emulator, [ --disable-emulator build only the Wine library, not the emulator], [if test "$enableval" = "no"; then EMU_TARGET=""; fi]) AC_ARG_ENABLE(dll, [ --disable-dll build static libraries instead of DLLs], [if test "$enableval" = "no"; then LIBEXT="a"; fi]) AC_ARG_ENABLE(debug, [ --disable-debug compile out all debugging messages], [if test "$enableval" = "no"; then DEBUG_MSGS="no"; fi]) AC_ARG_ENABLE(opengl, [ --enable-opengl force usage of OpenGL even if the latter is thread-safe], [if test "$enableval" = "no"; then OPENGL="no"; elif test "$enableval" = "yes"; then OPENGL="yes"; fi]) AC_ARG_ENABLE(trace, [ --disable-trace compile out TRACE messages], [if test "$enableval" = "no"; then TRACE_MSGS="no"; fi]) AC_ARG_WITH(curses, [ --without-curses do not use curses], [if test "$withval" = "no"; then CURSES="no"; fi]) AC_ARG_WITH(reentrant-x, [ --without-reentrant-x compile for use with non-reentrant X libraries]) AC_SUBST(EMU_TARGET) AC_SUBST(OPTIONS) if test "$DEBUG_MSGS" = "no" then AC_DEFINE(NO_DEBUG_MSGS) AC_DEFINE(NO_TRACE_MSGS) else if test "$TRACE_MSGS" = "no" then AC_DEFINE(NO_TRACE_MSGS) fi fi dnl **** Check for some programs **** AC_PROG_MAKE_SET AC_PROG_CC AC_PROG_CPP AC_PATH_XTRA AC_PROG_YACC AC_PROG_LEX AC_PROG_RANLIB AC_PROG_INSTALL AC_PROG_LN_S AC_CHECK_PROG(C2MAN,c2man,c2man,true) AC_PATH_PROG(LDCONFIG, ldconfig, true, /sbin:/usr/sbin:$PATH) dnl Check for lint AC_CHECK_PROGS(LINT, lclint lint) if test "$LINT" = "lint" then LINTFLAGS="$LINTFLAGS -errchk=%all,no%longptr64 -errhdr=%user -Ncheck=macro -Nlevel=4" dnl LINTFLAGS='-D_SIZE_T "-Dsize_t=unsigned long" -errchk=longptr64' fi AC_SUBST(LINT) AC_SUBST(LINTFLAGS) dnl **** Check for some libraries **** dnl Check for -lm for BeOS AC_CHECK_LIB(m,sqrt) dnl Check for -li386 for NetBSD and OpenBSD AC_CHECK_LIB(i386,i386_set_ldt) dnl Check for -lossaudio for NetBSD AC_CHECK_LIB(ossaudio,_oss_ioctl) dnl Check for -lw for Solaris AC_CHECK_LIB(w,iswalnum) dnl Check for -lnsl for Solaris AC_CHECK_FUNCS(gethostbyname,, AC_CHECK_LIB(nsl, gethostbyname, X_EXTRA_LIBS="$X_EXTRA_LIBS -lnsl", AC_CHECK_LIB(socket, gethostbyname, X_EXTRA_LIBS="$X_EXTRA_LIBS -lnsl", , -lnsl), -lsocket)) dnl Check for -lsocket for Solaris AC_CHECK_FUNCS(connect,,AC_CHECK_LIB(socket,connect)) dnl Check for -lxpg4 for FreeBSD AC_CHECK_LIB(xpg4,setrunelocale) dnl Check for -lmmap for OS/2 AC_CHECK_LIB(mmap,mmap) dnl Check for openpty AC_CHECK_FUNCS(openpty,, AC_CHECK_LIB(util,openpty, AC_DEFINE(HAVE_OPENPTY) LIBS="$LIBS -lutil" )) AC_CHECK_HEADERS(dlfcn.h, AC_CHECK_FUNCS(dlopen, AC_DEFINE(HAVE_DL_API), AC_CHECK_LIB(dl,dlopen, AC_DEFINE(HAVE_DL_API) LIBS="$LIBS -ldl", LIBEXT="a" ) ), LIBEXT="a" ) AC_SUBST(XLIB) AC_SUBST(X_DLLS) X_DLLS="" AC_SUBST(XFILES) XFILES="" AC_SUBST(OPENGLFILES) OPENGLFILES="" AC_SUBST(OPENGL32_DLL) OPENGL32_DLL="" AC_SUBST(DGA_SRCS) DGA_SRCS="" AC_SUBST(DGA2_SRCS) DGA2_SRCS="" AC_SUBST(MESA_SRCS) MESA_SRCS="" if test "$have_x" = "yes" then XLIB="-lXext -lX11" ac_save_CPPFLAGS="$CPPFLAGS" CPPFLAGS="$CPPFLAGS $X_CFLAGS" dnl *** Check for -lXpm AC_CHECK_HEADERS(X11/xpm.h, [ dnl *** If X11/xpm.h exists... AC_CHECK_LIB(Xpm, XpmCreatePixmapFromData, [ AC_DEFINE(HAVE_LIBXXPM) X_PRE_LIBS="$X_PRE_LIBS -lXpm"],, $X_LIBS -lXext -lX11 $X_EXTRA_LIBS ) ], [ dnl *** If X11/xpm.h does not exist... dnl NOTE: autoconf does not allow commas inside the third dnl parameter to AC_CHECK_HEADERS, due to some quoting dnl magic it does. echo "Redhat : xpm xpm-devel" echo "Caldera OpenLinux : xpm xpm-devel xpm-devel-static" echo "SuSE : xpm" echo "Debian/Corel Linux: xpm4g xpm4g-dev" echo echo "Or get the sources from ftp.x.org and all its mirror sites from " echo "the directory /contrib/libraries." echo exit 1 ] ) dnl *** All three of the following tests require X11/Xlib.h AC_CHECK_HEADERS(X11/Xlib.h, [ dnl *** Check for X Shm extension AC_CHECK_HEADERS(X11/extensions/XShm.h, [ dnl *** If X11/extensions/XShm.h exists... AC_CHECK_LIB(Xext, XShmQueryExtension, AC_DEFINE(HAVE_LIBXXSHM),, $X_LIBS -lXext -lX11 $X_EXTRA_LIBS) ], AC_MSG_WARN([Xshm extension not found!!]) ) dnl *** Check for XFree86 DGA / DGA 2.0 extension AC_CHECK_HEADERS(X11/extensions/xf86dga.h, [ dnl *** If X11/extensions/xf86dga.h exists, check dnl *** for XDGAQueryExtension()... AC_CHECK_LIB(Xxf86dga, XDGAQueryExtension, [ dnl *** If found... AC_DEFINE(HAVE_LIBXXF86DGA2) AC_DEFINE(HAVE_LIBXXF86DGA) X_PRE_LIBS="$X_PRE_LIBS -lXxf86dga" DGA_SRCS='$(DGA_SRCS)' DGA2_SRCS='$(DGA2_SRCS)' ], [ dnl *** If not found, look for XF86DGAQueryExtension() dnl *** instead (DGA 2.0 not found)... AC_CHECK_LIB(Xxf86dga, XF86DGAQueryExtension, [ AC_DEFINE(HAVE_LIBXXF86DGA) X_PRE_LIBS="$X_PRE_LIBS -lXxf86dga" DGA_SRCS='$(DGA_SRCS)' ],, $X_LIBS -lXext -lX11 $X_EXTRA_LIBS ) ], $X_LIBS -lXext -lX11 $X_EXTRA_LIBS ) ], AC_MSG_WARN([DGA extension not found!!]) ) dnl *** Check for XFree86 VMODE extension AC_CHECK_HEADERS(X11/extensions/xf86vmode.h, [ dnl *** If X11/extensions/xf86vmode.h exists... AC_CHECK_LIB(Xxf86vm, XF86VidModeQueryExtension, [ AC_DEFINE(HAVE_LIBXXF86VM) X_PRE_LIBS="$X_PRE_LIBS -lXxf86vm" ],, $X_LIBS -lXext -lX11 $X_EXTRA_LIBS ) ], AC_MSG_WARN([XFree86 VMODE extension not found!!]) ) ] ) dnl *** End of X11/Xlib.h check dnl Check for the presence of OpenGL if test $OPENGL = "yes" -o $OPENGL = "normal" then AC_CHECK_HEADERS(GL/gl.h GL/glx.h GL/glext.h) if test "$ac_cv_header_GL_gl_h" = "yes" -a "$ac_cv_header_GL_glx_h" = "yes" -a "$ac_cv_header_GL_glext_h" = "yes" then dnl Check for some problems due to old Mesa versions AC_CACHE_CHECK("for up-to-date OpenGL version", wine_cv_opengl_version_OK, AC_TRY_COMPILE( [#include ], [GLenum test = GL_UNSIGNED_SHORT_5_6_5;], [wine_cv_opengl_version_OK="yes"], [wine_cv_opengl_version_OK="no"] ) ) dnl Check for the thread-safety of the OpenGL library AC_CACHE_CHECK("for thread-safe OpenGL version", wine_cv_opengl_version_threadsafe, [saved_libs=$LIBS LIBS="$X_LIBS -lGL" AC_TRY_LINK([],[pthread_getspecific();], [wine_cv_opengl_version_threadsafe="yes"], [wine_cv_opengl_version_threadsafe="no"]) LIBS=$saved_libs] ) if test "$wine_cv_opengl_version_OK" = "yes" -a \( "$wine_cv_opengl_version_threadsafe" = "no" -o $OPENGL = "yes" \) then dnl Check for the presense of the library AC_CHECK_LIB(GL,glXCreateContext, X_PRE_LIBS="$X_PRE_LIBS -lGL" MESA_SRCS='$(MESA_SRCS)' ,, $X_LIBS -lXext -lX11 -lm $X_EXTRA_LIBS) if test $ac_cv_lib_GL_glXCreateContext = "yes" then dnl Check for the Color Table and Paletted Texture extensions AC_CACHE_CHECK("for the OpenGL Color Index extension",dummy, AC_TRY_COMPILE([#include ], [GLenum test = GL_COLOR_INDEX8_EXT;], [AC_DEFINE(HAVE_GL_COLOR_TABLE)],)) AC_CHECK_LIB(GL,glColorTableEXT,AC_DEFINE(HAVE_GL_PALETTED_TEXTURE),,$X_LIBS -lXext -lX11 -lm $X_EXTRA_LIBS) AC_CHECK_LIB(GL,glXGetProcAddressARB,AC_DEFINE(HAVE_GLX_GETPROCADDRESS),,$X_LIBS -lXext -lX11 -lm $X_EXTRA_LIBS) if test $ac_cv_lib_GL_glXGetProcAddressARB = "yes" then AC_DEFINE(HAVE_OPENGL) OPENGL32_DLL=opengl32 OPENGLFILES='$(OPENGLFILES)' fi fi fi fi fi CPPFLAGS="$ac_save_CPPFLAGS" X_DLLS='$(X_DLLS)' XFILES='$(XFILES)' else XLIB="" X_CFLAGS="" X_LIBS="" fi dnl **** Check which curses lib to use *** if test "$CURSES" = "yes" then AC_CHECK_HEADERS(ncurses.h) if test "$ac_cv_header_ncurses_h" = "yes" then AC_CHECK_LIB(ncurses,waddch) fi if test "$ac_cv_lib_ncurses_waddch" = "yes" then AC_CHECK_LIB(ncurses,resizeterm,AC_DEFINE(HAVE_RESIZETERM)) AC_CHECK_LIB(ncurses,getbkgd,AC_DEFINE(HAVE_GETBKGD)) else AC_CHECK_HEADERS(curses.h) if test "$ac_cv_header_curses_h" = "yes" then AC_CHECK_LIB(curses,waddch) if test "$ac_cv_lib_curses_waddch" = "yes" then AC_CHECK_LIB(curses,resizeterm,AC_DEFINE(HAVE_RESIZETERM)) AC_CHECK_LIB(curses,getbkgd,AC_DEFINE(HAVE_GETBKGD)) fi fi fi fi dnl **** Check for IPX (currently Linux only) **** AC_CACHE_CHECK("for GNU style IPX support", ac_cv_c_ipx_gnu, AC_TRY_COMPILE( [#include #include ], [((struct sockaddr_ipx *)0)->sipx_family == AF_IPX], [ac_cv_c_ipx_gnu="yes"], [ac_cv_c_ipx_gnu="no"]) ) if test "$ac_cv_c_ipx_gnu" = "yes" then AC_DEFINE(HAVE_IPX_GNU) fi if test "$ac_cv_c_ipx_gnu" = "no" then AC_CACHE_CHECK("for linux style IPX support", ac_cv_c_ipx_linux, AC_TRY_COMPILE( [#include #include #include ], [((struct sockaddr_ipx *)0)->sipx_family == AF_IPX], [ac_cv_c_ipx_linux="yes"], [ac_cv_c_ipx_linux="no"]) ) if test "$ac_cv_c_ipx_linux" = "yes" then AC_DEFINE(HAVE_IPX_LINUX) fi fi dnl **** Check for Open Sound System **** AC_CHECK_HEADERS(sys/soundcard.h machine/soundcard.h soundcard.h, break) AC_CACHE_CHECK("for Open Sound System", ac_cv_c_opensoundsystem, AC_TRY_COMPILE([ #if defined(HAVE_SYS_SOUNDCARD_H) #include #elif defined(HAVE_MACHINE_SOUNDCARD_H) #include #elif defined(HAVE_SOUNDCARD_H) #include #endif ],[ /* check for one of the Open Sound System specific SNDCTL_ defines */ #if !defined(SNDCTL_DSP_STEREO) #error No open sound system #endif ],ac_cv_c_opensoundsystem="yes",ac_cv_c_opensoundsystem="no")) if test "$ac_cv_c_opensoundsystem" = "yes" then AC_DEFINE(HAVE_OSS) fi AC_CACHE_CHECK("for Open Sound System/MIDI interface", ac_cv_c_opensoundsystem_midi, AC_TRY_COMPILE([ #if defined(HAVE_SYS_SOUNDCARD_H) #include #elif defined(HAVE_MACHINE_SOUNDCARD_H) #include #elif defined(HAVE_SOUNDCARD_H) #include #endif ],[ /* check for one of the Open Sound System specific SNDCTL_SEQ defines */ #if !defined(SNDCTL_SEQ_SYNC) #error No open sound system MIDI interface #endif ],ac_cv_c_opensoundsystem_midi="yes",ac_cv_c_opensoundsystem_midi="no")) if test "$ac_cv_c_opensoundsystem_midi" = "yes" then AC_DEFINE(HAVE_OSS_MIDI) fi dnl **** If ln -s doesn't work, use cp instead **** if test "$ac_cv_prog_LN_S" = "ln -s"; then : ; else LN_S=cp ; fi dnl **** Check for gcc strength-reduce bug **** if test "x${GCC}" = "xyes" then CFLAGS="$CFLAGS -Wall" AC_CACHE_CHECK( "for gcc strength-reduce bug", ac_cv_c_gcc_strength_bug, AC_TRY_RUN([ int main(void) { static int Array[[3]]; unsigned int B = 3; int i; for(i=0; i conftest_asm.s < conftest_asm.s </dev/null 2>&1 then wine_cv_x_reentrant=yes else wine_cv_x_reentrant=no fi else wine_cv_x_reentrant=unknown fi fi ] ) else wine_cv_x_reentrant=no fi if test "$wine_cv_x_reentrant" = "no" then AC_DEFINE(NO_REENTRANT_X11) fi dnl **** Check for endianness **** AC_C_BIGENDIAN dnl **** Check for functions **** AC_FUNC_ALLOCA() AC_CHECK_FUNCS(\ __libc_fork \ _lwp_create \ clone \ getnetbyaddr \ getnetbyname \ getpagesize \ getprotobyname \ getprotobynumber \ getservbyport \ getsockopt \ inet_network \ memmove \ rfork \ select \ sendmsg \ settimeofday \ sigaltstack \ statfs \ strcasecmp \ strerror \ strncasecmp \ tcgetattr \ timegm \ usleep \ vfscanf \ wait4 \ waitpid \ ) dnl **** Check for header files **** AC_CHECK_HEADERS(\ a.out.h \ a_out.h \ arpa/inet.h \ arpa/nameser.h \ elf.h \ float.h \ libio.h \ link.h \ linux/cdrom.h \ linux/joystick.h \ linux/ucdrom.h \ net/if.h \ netinet/in.h \ netinet/tcp.h \ pty.h \ resolv.h \ sched.h \ socket.h \ strings.h \ sys/cdio.h \ sys/errno.h \ sys/file.h \ sys/filio.h \ sys/ipc.h \ sys/lwp.h \ sys/mman.h \ sys/modem.h \ sys/mount.h \ sys/msg.h \ sys/param.h \ sys/reg.h \ sys/signal.h \ sys/shm.h \ sys/socket.h \ sys/sockio.h \ sys/statfs.h \ sys/strtio.h \ sys/syscall.h \ sys/wait.h \ sys/v86.h \ sys/v86intr.h \ sys/vfs.h \ sys/vm86.h \ syscall.h \ ucontext.h \ wctype.h \ ) AC_HEADER_STAT() dnl **** Check for types **** AC_C_CONST() AC_C_INLINE() AC_TYPE_SIZE_T() AC_CHECK_SIZEOF(long long,0) if test "$ac_cv_header_linux_joystick_h" = "yes" then AC_CACHE_CHECK("whether linux/joystick.h uses the Linux 2.2+ API", wine_cv_linux_joystick_22_api, AC_TRY_COMPILE([ #include #include struct js_event blub; #if !defined(JS_EVENT_AXIS) || !defined(JS_EVENT_BUTTON) #error "no 2.2 header" #endif ],/*empty*/, wine_cv_linux_joystick_22_api=yes, wine_cv_linux_joystick_22_api=no, wine_cv_linux_joystick_22_api=no ) ) if test "$wine_cv_linux_joystick_22_api" = "yes" then AC_DEFINE(HAVE_LINUX_22_JOYSTICK_API) fi fi dnl **** statfs checks **** if test "$ac_cv_header_sys_vfs_h" = "yes" then AC_CACHE_CHECK( "whether sys/vfs.h defines statfs", wine_cv_sys_vfs_has_statfs, AC_TRY_COMPILE([ #include #ifdef HAVE_SYS_PARAM_H # include #endif #include ],[ struct statfs stfs; memset(&stfs,0,sizeof(stfs)); ],wine_cv_sys_vfs_has_statfs=yes,wine_cv_sys_vfs_has_statfs=no ) ) if test "$wine_cv_sys_vfs_has_statfs" = "yes" then AC_DEFINE(STATFS_DEFINED_BY_SYS_VFS) fi fi if test "$ac_cv_header_sys_statfs_h" = "yes" then AC_CACHE_CHECK( "whether sys/statfs.h defines statfs", wine_cv_sys_statfs_has_statfs, AC_TRY_COMPILE([ #include #ifdef HAVE_SYS_PARAM_H # include #endif #include ],[ struct statfs stfs; ],wine_cv_sys_statfs_has_statfs=yes,wine_cv_sys_statfs_has_statfs=no ) ) if test "$wine_cv_sys_statfs_has_statfs" = "yes" then AC_DEFINE(STATFS_DEFINED_BY_SYS_STATFS) fi fi if test "$ac_cv_header_sys_mount_h" = "yes" then AC_CACHE_CHECK( "whether sys/mount.h defines statfs", wine_cv_sys_mount_has_statfs, AC_TRY_COMPILE([ #include #ifdef HAVE_SYS_PARAM_H # include #endif #include ],[ struct statfs stfs; ],wine_cv_sys_mount_has_statfs=yes,wine_cv_sys_mount_has_statfs=no ) ) if test "$wine_cv_sys_mount_has_statfs" = "yes" then AC_DEFINE(STATFS_DEFINED_BY_SYS_MOUNT) fi fi dnl **** FIXME: what about mixed cases, where we need two of them? *** AC_CACHE_CHECK( "for statfs.f_bfree", wine_cv_statfs_bfree, [ if test "x$statfs_bfree" = "xno" then wine_cv_statfs_bfree=no else AC_TRY_COMPILE([ #include #ifdef HAVE_SYS_PARAM_H # include #endif #ifdef STATFS_DEFINED_BY_SYS_MOUNT # include #else # ifdef STATFS_DEFINED_BY_SYS_VFS # include # else # ifdef STATFS_DEFINED_BY_SYS_STATFS # include # endif # endif #endif ],[ struct statfs stfs; stfs.f_bfree++; ],wine_cv_statfs_bfree=yes,wine_cv_statfs_bfree=no ) fi ] ) if test "$wine_cv_statfs_bfree" = "yes" then AC_DEFINE(STATFS_HAS_BFREE) fi AC_CACHE_CHECK( "for statfs.f_bavail", wine_cv_statfs_bavail, [ if test "x$statfs_bavail" = "xno" then wine_cv_statfs_bavail=no else AC_TRY_COMPILE([ #include #ifdef HAVE_SYS_PARAM_H # include #endif #ifdef STATFS_DEFINED_BY_SYS_MOUNT # include #else # ifdef STATFS_DEFINED_BY_SYS_VFS # include # else # ifdef STATFS_DEFINED_BY_SYS_STATFS # include # endif # endif #endif ],[ struct statfs stfs; stfs.f_bavail++; ],wine_cv_statfs_bavail=yes,wine_cv_statfs_bavail=no ) fi ] ) if test "$wine_cv_statfs_bavail" = "yes" then AC_DEFINE(STATFS_HAS_BAVAIL) fi dnl *** check for file descriptor passing with msg_accrights AC_CACHE_CHECK("for msg_accrights in struct msghdr", ac_cv_c_msg_accrights, AC_TRY_COMPILE([#include #include ],[struct msghdr hdr; hdr.msg_accrights=0], ac_cv_c_msg_accrights="yes", ac_cv_c_msg_accrights="no")) if test "$ac_cv_c_msg_accrights" = "yes" then AC_DEFINE(HAVE_MSGHDR_ACCRIGHTS) fi dnl *** Check for the sun_len member in struct sockaddr_un AC_CACHE_CHECK("for sun_len in struct sockaddr_un", ac_cv_c_sun_len, AC_TRY_COMPILE([#include #include #include ], [static struct sockaddr_un addr; addr.sun_len = 1], ac_cv_c_sun_len="yes", ac_cv_c_sun_len="no")) if test "$ac_cv_c_sun_len" = "yes" then AC_DEFINE(HAVE_SOCKADDR_SUN_LEN) fi dnl *** check for the need to define __i386__ AC_CACHE_CHECK("whether we need to define __i386__",ac_cv_cpp_def_i386, AC_EGREP_CPP(yes,[#if (defined(i386) || defined(__i386)) && !defined(__i386__) yes #endif], ac_cv_cpp_def_i386="yes", ac_cv_cpp_def_i386="no")) if test "$ac_cv_cpp_def_i386" = "yes" then CFLAGS="$CFLAGS -D__i386__" LINTFLAGS="$LINTFLAGS -D__i386__" fi dnl $GCC is set by autoconf GCC_NO_BUILTIN="" if test "$GCC" = "yes" then GCC_NO_BUILTIN="-fno-builtin" fi AC_SUBST(GCC_NO_BUILTIN) dnl **** Generate output files **** AC_OUTPUT_COMMANDS([ extra_subdirs="\ dlls/ddraw/d3ddevice \ dlls/ddraw/dclipper \ dlls/ddraw/ddraw \ dlls/ddraw/direct3d \ dlls/ddraw/dpalette \ dlls/ddraw/dsurface \ " for i in $extra_subdirs; do [ -d $i ] || (echo "creating $i" && mkdir $i); done ]) MAKE_RULES=Make.rules AC_SUBST_FILE(MAKE_RULES) MAKE_DLL_RULES=dlls/Makedll.rules AC_SUBST_FILE(MAKE_DLL_RULES) AC_OUTPUT([ Make.rules Makefile console/Makefile controls/Makefile debugger/Makefile dlls/Makedll.rules dlls/Makefile dlls/advapi32/Makefile dlls/avifil32/Makefile dlls/comctl32/Makefile dlls/commdlg/Makefile dlls/crtdll/Makefile dlls/dciman32/Makefile dlls/ddraw/Makefile dlls/dinput/Makefile dlls/display/Makefile dlls/dplayx/Makefile dlls/dsound/Makefile dlls/gdi/Makefile dlls/icmp/Makefile dlls/imagehlp/Makefile dlls/imm32/Makefile dlls/lzexpand/Makefile dlls/mouse/Makefile dlls/mpr/Makefile dlls/msacm/Makefile dlls/msacm32/Makefile dlls/msnet32/Makefile dlls/msvideo/Makefile dlls/ntdll/Makefile dlls/odbc32/Makefile dlls/ole32/Makefile dlls/oleaut32/Makefile dlls/olecli/Makefile dlls/oledlg/Makefile dlls/olepro32/Makefile dlls/olesvr/Makefile dlls/opengl32/Makefile dlls/psapi/Makefile dlls/rasapi32/Makefile dlls/richedit/Makefile dlls/setupx/Makefile dlls/shell32/Makefile dlls/sound/Makefile dlls/stress/Makefile dlls/tapi32/Makefile dlls/ttydrv/Makefile dlls/urlmon/Makefile dlls/user/Makefile dlls/version/Makefile dlls/win32s/Makefile dlls/win87em/Makefile dlls/winaspi/Makefile dlls/windebug/Makefile dlls/wing/Makefile dlls/wininet/Makefile dlls/winmm/Makefile dlls/winmm/joystick/Makefile dlls/winmm/mcianim/Makefile dlls/winmm/mciavi/Makefile dlls/winmm/mcicda/Makefile dlls/winmm/mciseq/Makefile dlls/winmm/mciwave/Makefile dlls/winmm/midimap/Makefile dlls/winmm/wavemap/Makefile dlls/winmm/wineoss/Makefile dlls/winsock/Makefile dlls/winspool/Makefile dlls/ttydrv/Makefile dlls/x11drv/Makefile documentation/Makefile documentation/wine.conf.man documentation/wine.man files/Makefile graphics/Makefile graphics/enhmetafiledrv/Makefile graphics/metafiledrv/Makefile graphics/psdrv/Makefile graphics/ttydrv/Makefile graphics/win16drv/Makefile graphics/x11drv/Makefile if1632/Makefile include/Makefile library/Makefile libtest/Makefile loader/Makefile loader/ne/Makefile loader/dos/Makefile memory/Makefile misc/Makefile miscemu/Makefile msdos/Makefile objects/Makefile ole/Makefile programs/Makefile programs/clock/Makefile programs/cmdlgtst/Makefile programs/control/Makefile programs/avitools/Makefile programs/osversioncheck/Makefile programs/notepad/Makefile programs/progman/Makefile programs/regtest/Makefile programs/regapi/Makefile programs/view/Makefile programs/wcmd/Makefile programs/winemine/Makefile programs/winhelp/Makefile programs/winver/Makefile relay32/Makefile resources/Makefile scheduler/Makefile server/Makefile tools/Makefile tools/cvdump/Makefile tools/wrc/Makefile tsx11/Makefile win32/Makefile windows/Makefile windows/ttydrv/Makefile windows/x11drv/Makefile ]) if test "$have_x" = "no" then echo echo "*** Warning: X development files not found. Wine will be built without" echo "*** X support, which currently does not work, and would probably not be" echo "*** what you want anyway. You will need to install devel packages of" echo "*** Xlib/Xfree86 and Xpm at the very least." elif test "$ac_cv_lib_Xpm_XpmCreatePixmapFromData" = "no" then echo echo "*** Warning: Xpm development files not found. Wine will be built without" echo "*** Xpm support, which currently does not work. You will need to install" echo "*** devel packages of Xpm." fi if test "$ac_cv_lib_ncurses_resizeterm" = "no" -a "$ac_cv_lib_ncurses_waddch" = "yes" then echo echo "*** Warning: resizeterm not found in ncurses. Wine will be built without" echo "*** terminal resize support. Consider upgrading ncurses." fi if test "$wine_cv_libc_reentrant" = "no" then echo echo "*** Warning: non-reentrant libc detected. Wine will be build without" echo "*** thread support. Consider upgrading libc to a more recent" echo "*** reentrant version of libc." fi if test "$wine_cv_opengl_version_OK" = "no" then echo echo "*** Warning: old Mesa headers detected. Wine will be built without Direct3D" echo "*** support. Consider upgrading your Mesa libraries (http://www.mesa3d.org/)." fi if test "$wine_cv_opengl_version_threadsafe" = "yes" -a $OPENGL = "normal" then echo echo "*** Warning: the OpenGL version you have installed relies on libpthread for" echo "*** thread-safety. To prevent crashes, OpenGL support has been removed." echo "*** A fix for glibc 2.1.3 that seem to work is included in this version of Wine," echo "*** start configure with '--enable-opengl' to force OpenGL support." fi if test "$wine_cv_opengl_version_threadsafe" = "yes" -a $OPENGL = "yes" then echo echo "*** Warning: you explicitely linked in a thread-safe OpenGL version. If you" echo "*** experience unusual crashes on DirectDraw games, try first to disable OpenGL" echo "*** support before reporting bugs." fi echo echo "Configure finished. Do 'make depend && make' to compile Wine." echo dnl Local Variables: dnl comment-start: "dnl " dnl comment-end: "" dnl comment-start-skip: "\\bdnl\\b\\s *" dnl compile-command: "autoconf" dnl End: wine-20000526/wine.ini0100644000175000001440000001032107112356310014100 0ustar julliardusers;; ;; MS-DOS drives configuration ;; ;; Each section has the following format: ;; [Drive X] ;; Path=xxx (Unix path for drive root) ;; Type=xxx (supported types are 'floppy', 'hd', 'cdrom' and 'network') ;; Label=xxx (drive label, at most 11 characters) ;; Serial=xxx (serial number, 8 characters hexadecimal number) ;; Filesystem=xxx (supported types are 'msdos'/'dos'/'fat', 'win95'/'vfat', 'unix') ;; This is the FS Wine is supposed to emulate on a certain ;; directory structure. ;; Recommended: ;; - "win95" for ext2fs, VFAT and FAT32 ;; - "msdos" for FAT16 (ugly, upgrading to VFAT driver strongly recommended) ;; DON'T use "unix" unless you intend to port programs using Winelib ! ;; Device=/dev/xx (only if you want to allow raw device access) ;; [Drive A] Path=/mnt/fd0 Type=floppy Label=Floppy Serial=87654321 Device=/dev/fd0 [Drive C] Path=/c Type=hd Label=MS-DOS Filesystem=win95 [Drive D] Path=/cdrom Type=cdrom Label=CD-Rom Filesystem=win95 ; make sure that device is correct and has proper permissions ! Device=/dev/cdrom [Drive E] Path=/tmp Type=hd Label=Tmp Drive Filesystem=win95 [Drive F] Path=${HOME} Type=network Label=Home Filesystem=win95 [wine] Windows=c:\windows System=c:\windows\system Temp=e:\ Path=c:\windows;c:\windows\system;e:\;e:\test;f:\ Profile=c:\windows\Profiles\Administrator GraphicsDriver=x11drv # [DllDefaults] EXTRA_LD_LIBRARY_PATH=${HOME}/wine/cvs/lib DefaultLoadOrder = native, builtin, elfdll, so [DllOverrides] kernel32, gdi32, user32 = builtin krnl386, gdi, user = builtin toolhelp = builtin comdlg32, commdlg = elfdll, builtin, native version, ver = elfdll, builtin, native shell32, shell = builtin, native lz32, lzexpand = builtin, native commctrl, comctl32 = builtin, native wsock32, winsock = builtin advapi32, crtdll, ntdll = builtin, native mpr, winspool.drv = builtin, native ddraw, dinput, dsound = builtin, native winmm, mmsystem = builtin msvideo, msvfw32 = builtin, native mcicda.drv, mciseq.drv = builtin, native mciwave.drv = builtin, native mciavi.drv, mcianim.drv = native, builtin msacm.drv, midimap.drv = builtin, native w32skrnl = builtin wnaspi32, wow32 = builtin system, display, wprocs = builtin wineps = builtin icmp = builtin [x11drv] ; Number of colors to allocate from the system palette AllocSystemColors = 100 ; Use a private color map PrivateColorMap = N ; Favor correctness over speed in some graphics operations PerfectGraphics = N ; Color depth to use on multi-depth screens ;;ScreenDepth = 16 ; Name of X11 display to use ;;Display = :0.0 ; Allow the window manager to manage created windows Managed = N ; Use XFree86 DGA extension if present UseDGA = Y ; Use XShm extension if present UseXShm = Y ; Enable DirectX mouse grab DXGrab = N ; Create the desktop window with a double-buffered visual ; (useful to play OpenGL games) DesktopDoubleBuffered = N [fonts] ;Read documentation/fonts before adding aliases Resolution = 96 Default = -adobe-times- [serialports] Com1=/dev/ttyS0 Com2=/dev/ttyS1 Com3=/dev/modem,38400 Com4=/dev/modem [parallelports] Lpt1=/dev/lp0 [spooler] LPT1:=|lpr LPT2:=|gs -sDEVICE=bj200 -sOutputFile=/tmp/fred -q - LPT3:=/dev/lp3 [ports] ;read=0x779,0x379,0x280-0x2a0 ;write=0x779,0x379,0x280-0x2a0 [spy] Exclude=WM_SIZE;WM_TIMER; [registry] ; Paths must be given in /dir/dir/file.reg format. ; Wine will not understand dos file names here... ;These are all booleans. Y/y/T/t/1 are true, N/n/F/f/0 are false. ;Defaults are read all, write to Home ; Global registries (stored in /etc) LoadGlobalRegistryFiles=Y ; Home registries (stored in ~user/.wine/) LoadHomeRegistryFiles=Y ; Load Windows registries from the Windows directory LoadWindowsRegistryFiles=Y ; TRY to write all changes to home registries WritetoHomeRegistryFiles=Y ; Use new file format UseNewFormat=Y ; Registry periodic save timeout in seconds ; PeriodicSave=600 ; Save only modified keys SaveOnlyUpdatedKeys=Y [Tweak.Layout] ;; WineLook=xxx (supported styles are 'Win31'(default), 'Win95', 'Win98') WineLook=Win95 [programs] Default= Startup= [Console] ;Drivers=tty ;XtermProg=nxterm ;InitialRows=25 ;InitialColumns=80 ;TerminalType=nxterm [Clipboard] ClearAllSelections=0 PersistentSelection=1 # wine-20000526/winedefault.reg0100644000175000001440000001011507100653123015443 0ustar julliardusers# These entries must apparently exist in any win95-compatible registry. # (feed this to `regapi setValue' to install) # Shell Folders. The purpose of these are pretty self-evident. # Primarily used by installation programs and the Explorer. [HKEY_USERS\.Default\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders] "Favorites"="C:\WINDOWS\Favorites" "StartUp"="C:\WINDOWS\Start Menu\Programs\Startup" "Desktop"="C:\WINDOWS\Desktop" "Programs"="C:\WINDOWS\Start Menu\Programs" "Fonts"="C:\WINDOWS\Fonts" "SendTo"="C:\WINDOWS\SendTo" "Start Menu"="C:\WINDOWS\Start Menu" "Templates"="C:\WINDOWS\ShellNew" "Recent"="C:\WINDOWS\Recent" "NetHood"="C:\WINDOWS\NetHood" "Personal"="C:\My Documents" [HKEY_USERS\.Default\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders] "Personal"="C:\My Documents" "Favorites"="C:\WINDOWS\Favorites" # Same as above, but for HKEY_CURRENT_USER, not HKEY_USERS\.Default [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders] "Favorites"="C:\WINDOWS\Favorites" "StartUp"="C:\WINDOWS\Start Menu\Programs\Startup" "Desktop"="C:\WINDOWS\Desktop" "Programs"="C:\WINDOWS\Start Menu\Programs" "Fonts"="C:\WINDOWS\Fonts" "SendTo"="C:\WINDOWS\SendTo" "Start Menu"="C:\WINDOWS\Start Menu" "Templates"="C:\WINDOWS\ShellNew" "Recent"="C:\WINDOWS\Recent" "NetHood"="C:\WINDOWS\NetHood" "Personal"="C:\My Documents" [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders] "Personal"="C:\My Documents" "Favorites"="C:\WINDOWS\Favorites" # # General OLE/DCOM config # [HKEY_LOCAL_MACHINE\Software\Microsoft\OLE] # allow cross-machine calls (RPC) (default Y) "EnableDCOM"="Y" # allow incoming connections ? (def. N) "EnableRemoteConnect"="N" # # General installation config # [HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion] "ProgramFilesDir"="C:\Program Files" # # Configuration for unhandled exceptions # [HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\CurrentVersion\AeDebug] # command line to start a debugger when an exception occurs "Debugger"="debugger/winedbg %ld %ld" # to 1 if no message box has to be presented before running the debugger "Auto"=dword:00000000 # # This identifies the files for available code pages # [HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\Nls\Codepage] "ACP"="1252" "OEMCP"="437" # # SHELL32 entries base classes of the desktop/ shelllinks # Used by common dialogs, programs creating and many others # [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{00021400-0000-0000-C000-000000000046}] @="Shortcut" [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{00021400-0000-0000-C000-000000000046}\InProcServer32] @="shell32.dll" "ThreadingModel"="Apartment" [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{00021401-0000-0000-C000-000000000046}] @="Shortcut" [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{00021401-0000-0000-C000-000000000046}\InProcServer32] @="shell32.dll" "ThreadingModel"="Apartment" [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{00021401-0000-0000-C000-000000000046}\shellex\MayChangeDefaultMenu] @="" # # Entries for DirectX. Used by high-performance multimedia applications, like games. # [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{D7B70EE0-4340-11CF-B063-0020AFC2CD35}] @="DirectDraw Object" [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{D7B70EE0-4340-11CF-B063-0020AFC2CD35}\InprocServer32] @="ddraw.dll" "ThreadingModel"="Both" [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{593817A0-7DB3-11CF-A2DE-00AA00B93356}] @="DirectDraw Clipper Object" [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{593817A0-7DB3-11CF-A2DE-00AA00B93356}\InprocServer32] @="ddraw.dll" "ThreadingModel"="Both" [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{D1EB6D20-8923-11D0-9D97-00A0C90A43CB}] @="DirectPlay Object" [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{D1EB6D20-8923-11D0-9D97-00A0C90A43CB}\InprocServer32] @="C:\WINDOWS\SYSTEM\dplayx.dll" "ThreadingModel"="Both" [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{47D4D946-62E8-11cf-93BC-444553540000}] @="DirectSound Object" [HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{47D4D946-62E8-11cf-93BC-444553540000}\InprocServer32] @="dsound.dll" "ThreadingModel"="Both" wine-20000526/controls/0040755000175000001440000000000007113604151014306 5ustar julliarduserswine-20000526/controls/.cvsignore0100644000175000001440000000001106605734071016305 0ustar julliardusersMakefile wine-20000526/controls/EDIT.TODO0100644000175000001440000002162306602337747015543 0ustar julliardusers/* * Outdated !!! * * The edit control is under reconstruction * New documentation will be provided when I'm done * * Please contact me before you send in bug fixes, as the code * might have changed already. However, keep reporting those * bugs ... I might not know about them, yet. * * Frans van Dorsselaer * dorssel@MolPhys.LeidenUniv.nl */ This file gives some information about the code in edit.c. If you want to change, add, or fix code, please read this text. If you're not interested in doing actual work on edit.c only C & D will be of interest to you. A) basic policy B) special functions C) not implemented / implementation ideas / implementation problems D) known bugs / features A) Basic Policy All messages are handled by EditWndProc(), which is the only external function call. All other functions are static (local to edit.c). All Windows Messages (WM_XXX) are 32-bit, since the edit control is now a 32-bit registered class. The message are dealt with through the helper functions EDIT_WM_XXX(). The edit control messages can be either 16 or 32 bit, depending on the type of application that sends the message. Wherever possible EditWndProc() converts the 16-bit message parameters to parameters corresponding to their 32-bit counterparts. The message is then handled by the appropriate EDIT_EM_XXX() helper function. Sometimes it is not possible to handle the 16-bit and 32-bit versions in the same way, in which case both helper functions EDIT_EM_XXX16() and EDIT_EM_XXX() are defined. All other functions are called EDIT_XXX(). Note: Sometimes a function is internally used a bit different than the specs of a similar function. For instance EDIT_SetSel() is used internally and should not be mixed up with EDIT_EM_SetSel(), a message handler that _does_ conform to the specs of EM_SETSEL. The code has been made in such a way, that functions try to call other (documented) functions if that is sufficient. This might sometimes not be the most efficient way, but it keeps the code clear. This way I tried to keep the number of functions that rely on the internal EDITSTATE structure as low as possible. For instance EDIT_WM_Cut() simply calls EDIT_WM_Copy() and EDIT_WM_Clear(). The latter two are well documented message handlers, so as long as they are right EDIT_WM_Cut() will never have to change again. Example: The best thing to do, when you want to know the offset of line 3, is calling EDIT_EM_LineIndex(). Again this is a well documented message handler. Don't look at es->LineDefs[2].offset. It would just be another reference to the internal structure, and that would make it more difficult to change things. Refer to EDIT_WM_???? and EDIT_EM_????? functions as much as possible. The WND * pointer is used internally whenever possible. Although it is not the real HWND, it improves performance enough to use it. All displaying is done by invalidating regions / rects. Only EDIT_EM_LineScroll() uses direct painting. This way things become much faster. Although sometimes the response time might appear to be slow, it would be much slower even, when everything would be painted instantly. This is especially true for scrollbar tracking and selection changes.. The text buffer is a kind of tricky. Initially the edit control allocates a HLOCAL32 buffer (32 bit linear memory handler). However, 16 bit application might send a EM_GETHANDLE message and expect a HLOCAL16 (16 bit SEG:OFF handler). From that moment on we have to keep using this 16 bit memory handler, because it is supposed to be valid at all times after EM_GETHANDLE. What we do is create a HLOCAL16 buffer, copy the text, and do pointer conversion. B) Special functions Several helper functions try to make your life easier when dealing with the allocated buffer. In principle Windows can move memory blocks around unless they are locked. Currently, WINE doesn't do this, but it might in the future. For this reason there is a nice EDIT_GetPointer() function, which locks the heap buffer *only once*, no matter how often it is called. It then returns a nice 32-bit pointer to linear memory. Calling EDIT_GetPointer() is very fast if the buffer is already locked, so you can call it whenever you feel it *might* be useful. At the end of EditWndProc(), EDIT_ReleasePointer() is automatically called which cleans up the initialized pointer. So you don't have to worry about unlocking the memory block. This way, the buffer gets locked / unlock only once every message, although EDIT_GetPointer() may actually have been called a hundred times. Only when the actual HLOCAL is needed (for example to ReAlloc), an extra call (besides the cleanup at the end of EditWndProc()) to EDIT_ReleasePointer() is needed. Look for instance in EDIT_MakeFit(). This brings us to EDIT_MakeFit(). It automatically re-allocates the buffer if the size parameter > buffersize. If everything is successful TRUE is returned, otherwise FALSE. Only when the buffer contents may grow you need to call EDIT_MakeFit(). Currently this is only in EDIT_ReplaceSel() and EDIT_WM_SetText(). EDIT_GetPointer(), EDIT_ReleasePointer and EDIT_MakeFit() are aware of the HLOCAL32 / HLOCAL16 business. EDIT_BuildLineDefs() is the most important function in edit.c. It builds the internal EDITSTATE structure. As soon as text *might* have changed, or when the appearance of the text on the screen *might* have changed, call this function ! This includes changes of screen size, change of the font, clipboard actions, etc. etc. Most other functions that rely on EDITSTATE, rely on the stuff this function builds. C) Not Implemented / Implementation Ideas / Implementation Problems Styles: - ES_CENTER - ES_RIGHT - ES_NUMBER (new since win95) - ES_OEMCONVERT - ES_WANTRETURN None of these should be difficult to include. I just didn't have the time yet. Feel free ... - ES_AUTOVSCROLL (every multi line control *is* auto vscroll) - ES_AUTOHSCROLL (every single line control *is* auto hscroll) (for multi line controls it works : wordwrap) Much, much more difficult. It comes down to this: When there is no autoscrolling, the edit control should first check whether the new text (after a typed key for instance) would fit. If not, an EN_MAXTEXT should be sent. However, currently this would require the actual change to be made, then call EDIT_BuildLineDefs() and then find out that the new text doesn't fit. After all this, things should be put back in the state before the changes. Given the fact that even normal UNDO doesn't work ... Messages: - EM_SETRECT - EM_SETRECTNP - EM_SETMARGINS (new since win95) - EM_FMTLINES These shouldn't be really difficult either. They just confine the visual output to something different than the client rectangle. Currently the client area is used everywhere in the code. At some points this should really be so (GetClientRect32()), whereas at other points it should be the format rectangle (EDIT_EM_GetRect()). Both functions are now used, but inconsistently and mixed up ! If you implement the formatting rectangle / margins, be sure to check all references to RECT's, and how they are / should be obtained. - EM_FMTLINES This means: insert or remove the soft linebreak character (\r\r\n). Probably invented by MS to suit their implementation of the edit control. However, with WINE's implementation I've never come up with occasions where it is actually useful (we never insert \r\r\n, and applications always request removal). If you are a purist ... implementation shouldn't be difficult. Take care to check if the text still fits the buffer after insertion. If not, notify with EN_ERRSPACE. - WM_UNDO (=EM_UNDO) I'm working on it. It is, however, not trivial. Luckily the only function where actual text changes is EM_REPLACESEL, so this is the only spot where we have to worry about UNDO capabilities. Before you try: contact me. I already have ideas and might start implementing it myself really soon. - EM_SETWORDBREAKPROC Not really difficult. It used to work, but since we moved to 32 bits there are now two kinds of callback functions. And I don't know the 32-bit specs for the WordBreakProc() ... Look it up and uncomment the code that is still there for 16 bit callback. - EM_SCROLL Supposed to be the same as WM_VSCROLL, but not quite. In other words: poorly documented. Somebody that knows ? D) Known bugs / Features - The control still calls GetTabbedTextExtent() and TabbedTextOut() in their 16 bit version (since the 32 bit versions don't yet exist). Therefore the tab list is 16 bits (should be 32). - Scrollbar tracking is broken. - Lots of API calls are to 16 bit functions, because their 32 bit versions haven't been implemented yet (e.g. clipboard). - Turning on WordWrap with 16-bit Notepad leaves part of the horizontal scrollbar visible (problem with WM_ERASEBKGND ???). - FIXME's (grep for them). I am working on Undo capabilities. If you want to do things, other than bug fixes, please mail me so we can synchronize. Frans van Dorsselaer dorssel@rulhm1.LeidenUniv.nl wine-20000526/controls/Makefile.in0100644000175000001440000000051406602337747016370 0ustar julliardusersDEFS = @DLLFLAGS@ -D__WINE__ TOPSRCDIR = @top_srcdir@ TOPOBJDIR = .. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = controls C_SRCS = \ button.c \ combo.c \ desktop.c \ edit.c \ icontitle.c \ listbox.c \ menu.c \ scroll.c \ static.c \ uitools.c \ widgets.c all: $(MODULE).o @MAKE_RULES@ ### Dependencies: wine-20000526/controls/button.c0100644000175000001440000007034207107076315016000 0ustar julliardusers/* File: button.c -- Button type widgets * * Copyright (C) 1993 Johannes Ruscheinski * Copyright (C) 1993 David Metcalfe * Copyright (C) 1994 Alexandre Julliard */ #include #include "win.h" #include "button.h" #include "winbase.h" #include "windef.h" #include "wingdi.h" #include "wine/winuser16.h" #include "tweak.h" static void PaintGrayOnGray( HDC hDC,HFONT hFont,RECT *rc, char *text, UINT format ); static void PB_Paint( WND *wndPtr, HDC hDC, WORD action ); static void CB_Paint( WND *wndPtr, HDC hDC, WORD action ); static void GB_Paint( WND *wndPtr, HDC hDC, WORD action ); static void UB_Paint( WND *wndPtr, HDC hDC, WORD action ); static void OB_Paint( WND *wndPtr, HDC hDC, WORD action ); static void BUTTON_CheckAutoRadioButton( WND *wndPtr ); static void BUTTON_DrawPushButton( WND *wndPtr, HDC hDC, WORD action, BOOL pushedState); #define MAX_BTN_TYPE 12 static const WORD maxCheckState[MAX_BTN_TYPE] = { BUTTON_UNCHECKED, /* BS_PUSHBUTTON */ BUTTON_UNCHECKED, /* BS_DEFPUSHBUTTON */ BUTTON_CHECKED, /* BS_CHECKBOX */ BUTTON_CHECKED, /* BS_AUTOCHECKBOX */ BUTTON_CHECKED, /* BS_RADIOBUTTON */ BUTTON_3STATE, /* BS_3STATE */ BUTTON_3STATE, /* BS_AUTO3STATE */ BUTTON_UNCHECKED, /* BS_GROUPBOX */ BUTTON_UNCHECKED, /* BS_USERBUTTON */ BUTTON_CHECKED, /* BS_AUTORADIOBUTTON */ BUTTON_UNCHECKED, /* Not defined */ BUTTON_UNCHECKED /* BS_OWNERDRAW */ }; typedef void (*pfPaint)( WND *wndPtr, HDC hdc, WORD action ); static const pfPaint btnPaintFunc[MAX_BTN_TYPE] = { PB_Paint, /* BS_PUSHBUTTON */ PB_Paint, /* BS_DEFPUSHBUTTON */ CB_Paint, /* BS_CHECKBOX */ CB_Paint, /* BS_AUTOCHECKBOX */ CB_Paint, /* BS_RADIOBUTTON */ CB_Paint, /* BS_3STATE */ CB_Paint, /* BS_AUTO3STATE */ GB_Paint, /* BS_GROUPBOX */ UB_Paint, /* BS_USERBUTTON */ CB_Paint, /* BS_AUTORADIOBUTTON */ NULL, /* Not defined */ OB_Paint /* BS_OWNERDRAW */ }; #define PAINT_BUTTON(wndPtr,style,action) \ if (btnPaintFunc[style]) { \ HDC hdc = GetDC( (wndPtr)->hwndSelf ); \ (btnPaintFunc[style])(wndPtr,hdc,action); \ ReleaseDC( (wndPtr)->hwndSelf, hdc ); } #define BUTTON_SEND_CTLCOLOR(wndPtr,hdc) \ SendMessageA( GetParent((wndPtr)->hwndSelf), WM_CTLCOLORBTN, \ (hdc), (wndPtr)->hwndSelf ) static HBITMAP hbitmapCheckBoxes = 0; static WORD checkBoxWidth = 0, checkBoxHeight = 0; /*********************************************************************** * ButtonWndProc_locked * * Called with window lock held. */ static inline LRESULT WINAPI ButtonWndProc_locked(WND* wndPtr, UINT uMsg, WPARAM wParam, LPARAM lParam ) { RECT rect; HWND hWnd = wndPtr->hwndSelf; POINT pt; BUTTONINFO *infoPtr = (BUTTONINFO *)wndPtr->wExtra; LONG style = wndPtr->dwStyle & 0x0f; HANDLE oldHbitmap; pt.x = LOWORD(lParam); pt.y = HIWORD(lParam); switch (uMsg) { case WM_GETDLGCODE: switch(style) { case BS_PUSHBUTTON: return DLGC_BUTTON | DLGC_UNDEFPUSHBUTTON; case BS_DEFPUSHBUTTON: return DLGC_BUTTON | DLGC_DEFPUSHBUTTON; case BS_RADIOBUTTON: case BS_AUTORADIOBUTTON: return DLGC_BUTTON | DLGC_RADIOBUTTON; default: return DLGC_BUTTON; } case WM_ENABLE: PAINT_BUTTON( wndPtr, style, ODA_DRAWENTIRE ); break; case WM_CREATE: if (!hbitmapCheckBoxes) { BITMAP bmp; hbitmapCheckBoxes = LoadBitmapA(0, MAKEINTRESOURCEA(OBM_CHECKBOXES)); GetObjectA( hbitmapCheckBoxes, sizeof(bmp), &bmp ); checkBoxWidth = bmp.bmWidth / 4; checkBoxHeight = bmp.bmHeight / 3; } if (style < 0L || style >= MAX_BTN_TYPE) return -1; /* abort */ infoPtr->state = BUTTON_UNCHECKED; infoPtr->hFont = 0; infoPtr->hImage = 0; return 0; case WM_ERASEBKGND: return 1; case WM_PAINT: if (btnPaintFunc[style]) { PAINTSTRUCT ps; HDC hdc = wParam ? (HDC)wParam : BeginPaint( hWnd, &ps ); SetBkMode( hdc, OPAQUE ); (btnPaintFunc[style])( wndPtr, hdc, ODA_DRAWENTIRE ); if( !wParam ) EndPaint( hWnd, &ps ); } break; case WM_KEYDOWN: if (wParam == VK_SPACE) { SendMessageA( hWnd, BM_SETSTATE, TRUE, 0 ); infoPtr->state |= BUTTON_BTNPRESSED; } break; case WM_LBUTTONDBLCLK: if(wndPtr->dwStyle & BS_NOTIFY || style==BS_RADIOBUTTON || style==BS_USERBUTTON || style==BS_OWNERDRAW) { SendMessageA( GetParent(hWnd), WM_COMMAND, MAKEWPARAM( wndPtr->wIDmenu, BN_DOUBLECLICKED ), hWnd); break; } /* fall through */ case WM_LBUTTONDOWN: SetCapture( hWnd ); SetFocus( hWnd ); SendMessageA( hWnd, BM_SETSTATE, TRUE, 0 ); infoPtr->state |= BUTTON_BTNPRESSED; break; case WM_KEYUP: if (wParam != VK_SPACE) break; /* fall through */ case WM_LBUTTONUP: if (!(infoPtr->state & BUTTON_BTNPRESSED)) break; infoPtr->state &= BUTTON_NSTATES; if (!(infoPtr->state & BUTTON_HIGHLIGHTED)) { ReleaseCapture(); break; } SendMessageA( hWnd, BM_SETSTATE, FALSE, 0 ); ReleaseCapture(); GetClientRect( hWnd, &rect ); if (uMsg == WM_KEYUP || PtInRect( &rect, pt )) { switch(style) { case BS_AUTOCHECKBOX: SendMessageA( hWnd, BM_SETCHECK, !(infoPtr->state & BUTTON_CHECKED), 0 ); break; case BS_AUTORADIOBUTTON: SendMessageA( hWnd, BM_SETCHECK, TRUE, 0 ); break; case BS_AUTO3STATE: SendMessageA( hWnd, BM_SETCHECK, (infoPtr->state & BUTTON_3STATE) ? 0 : ((infoPtr->state & 3) + 1), 0 ); break; } SendMessageA( GetParent(hWnd), WM_COMMAND, MAKEWPARAM( wndPtr->wIDmenu, BN_CLICKED ), hWnd); } break; case WM_CAPTURECHANGED: if (infoPtr->state & BUTTON_BTNPRESSED) { infoPtr->state &= BUTTON_NSTATES; if (infoPtr->state & BUTTON_HIGHLIGHTED) SendMessageA( hWnd, BM_SETSTATE, FALSE, 0 ); } break; case WM_MOUSEMOVE: if (GetCapture() == hWnd) { GetClientRect( hWnd, &rect ); SendMessageA( hWnd, BM_SETSTATE, PtInRect(&rect, pt), 0 ); } break; case WM_NCHITTEST: if(style == BS_GROUPBOX) return HTTRANSPARENT; return DefWindowProcA( hWnd, uMsg, wParam, lParam ); case WM_SETTEXT: DEFWND_SetText( wndPtr, (LPCSTR)lParam ); if( wndPtr->dwStyle & WS_VISIBLE ) PAINT_BUTTON( wndPtr, style, ODA_DRAWENTIRE ); return 0; case WM_SETFONT: infoPtr->hFont = (HFONT16)wParam; if (lParam && (wndPtr->dwStyle & WS_VISIBLE)) PAINT_BUTTON( wndPtr, style, ODA_DRAWENTIRE ); break; case WM_GETFONT: return infoPtr->hFont; case WM_SETFOCUS: if ((style == BS_RADIOBUTTON || style == BS_AUTORADIOBUTTON) && (GetCapture() != hWnd) && !(SendMessageA(hWnd, BM_GETCHECK, 0, 0) & BST_CHECKED)) { /* The notification is sent when the button (BS_AUTORADIOBUTTON) is unckecked and the focus was not given by a mouse click. */ if (style == BS_AUTORADIOBUTTON) SendMessageA( hWnd, BM_SETCHECK, BUTTON_CHECKED, 0 ); SendMessageA( GetParent(hWnd), WM_COMMAND, MAKEWPARAM( wndPtr->wIDmenu, BN_CLICKED ), hWnd); } infoPtr->state |= BUTTON_HASFOCUS; PAINT_BUTTON( wndPtr, style, ODA_FOCUS ); break; case WM_KILLFOCUS: infoPtr->state &= ~BUTTON_HASFOCUS; PAINT_BUTTON( wndPtr, style, ODA_FOCUS ); InvalidateRect( hWnd, NULL, TRUE ); break; case WM_SYSCOLORCHANGE: InvalidateRect( hWnd, NULL, FALSE ); break; case BM_SETSTYLE16: case BM_SETSTYLE: if ((wParam & 0x0f) >= MAX_BTN_TYPE) break; wndPtr->dwStyle = (wndPtr->dwStyle & 0xfffffff0) | (wParam & 0x0000000f); style = wndPtr->dwStyle & 0x0000000f; PAINT_BUTTON( wndPtr, style, ODA_DRAWENTIRE ); break; case BM_CLICK: SendMessageA( hWnd, WM_LBUTTONDOWN, 0, 0 ); SendMessageA( hWnd, WM_LBUTTONUP, 0, 0 ); break; case BM_SETIMAGE: oldHbitmap = infoPtr->hImage; if ((wndPtr->dwStyle & BS_BITMAP) || (wndPtr->dwStyle & BS_ICON)) { infoPtr->hImage = (HANDLE) lParam; InvalidateRect( hWnd, NULL, FALSE ); } return oldHbitmap; case BM_GETIMAGE: if (wParam == IMAGE_BITMAP) return (HBITMAP)infoPtr->hImage; else if (wParam == IMAGE_ICON) return (HICON)infoPtr->hImage; else return (HICON)0; case BM_GETCHECK16: case BM_GETCHECK: return infoPtr->state & 3; case BM_SETCHECK16: case BM_SETCHECK: if (wParam > maxCheckState[style]) wParam = maxCheckState[style]; if ((infoPtr->state & 3) != wParam) { if ((style == BS_RADIOBUTTON) || (style == BS_AUTORADIOBUTTON)) { if (wParam) wndPtr->dwStyle |= WS_TABSTOP; else wndPtr->dwStyle &= ~WS_TABSTOP; } infoPtr->state = (infoPtr->state & ~3) | wParam; PAINT_BUTTON( wndPtr, style, ODA_SELECT ); } if ((style == BS_AUTORADIOBUTTON) && (wParam == BUTTON_CHECKED)) BUTTON_CheckAutoRadioButton( wndPtr ); break; case BM_GETSTATE16: case BM_GETSTATE: return infoPtr->state; case BM_SETSTATE16: case BM_SETSTATE: if (wParam) { if (infoPtr->state & BUTTON_HIGHLIGHTED) break; infoPtr->state |= BUTTON_HIGHLIGHTED; } else { if (!(infoPtr->state & BUTTON_HIGHLIGHTED)) break; infoPtr->state &= ~BUTTON_HIGHLIGHTED; } PAINT_BUTTON( wndPtr, style, ODA_SELECT ); break; default: return DefWindowProcA(hWnd, uMsg, wParam, lParam); } return 0; } /*********************************************************************** * ButtonWndProc * The button window procedure. This is just a wrapper which locks * the passed HWND and calls the real window procedure (with a WND* * pointer pointing to the locked windowstructure). */ LRESULT WINAPI ButtonWndProc( HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam ) { LRESULT res; WND *wndPtr = WIN_FindWndPtr(hWnd); res = ButtonWndProc_locked(wndPtr,uMsg,wParam,lParam); WIN_ReleaseWndPtr(wndPtr); return res; } /********************************************************************** * Push Button Functions */ static void PB_Paint( WND *wndPtr, HDC hDC, WORD action ) { BUTTONINFO *infoPtr = (BUTTONINFO *)wndPtr->wExtra; BOOL bHighLighted = (infoPtr->state & BUTTON_HIGHLIGHTED); /* * Delegate this to the more generic pushbutton painting * method. */ BUTTON_DrawPushButton(wndPtr, hDC, action, bHighLighted); } /********************************************************************** * This method will actually do the drawing of the pushbutton * depending on it's state and the pushedState parameter. */ static void BUTTON_DrawPushButton( WND* wndPtr, HDC hDC, WORD action, BOOL pushedState ) { RECT rc, focus_rect; HPEN hOldPen; HBRUSH hOldBrush; BUTTONINFO *infoPtr = (BUTTONINFO *)wndPtr->wExtra; int xBorderOffset, yBorderOffset; xBorderOffset = yBorderOffset = 0; GetClientRect( wndPtr->hwndSelf, &rc ); /* Send WM_CTLCOLOR to allow changing the font (the colors are fixed) */ if (infoPtr->hFont) SelectObject( hDC, infoPtr->hFont ); BUTTON_SEND_CTLCOLOR( wndPtr, hDC ); hOldPen = (HPEN)SelectObject(hDC, GetSysColorPen(COLOR_WINDOWFRAME)); hOldBrush =(HBRUSH)SelectObject(hDC,GetSysColorBrush(COLOR_BTNFACE)); SetBkMode(hDC, TRANSPARENT); if ( TWEAK_WineLook == WIN31_LOOK) { Rectangle(hDC, rc.left, rc.top, rc.right, rc.bottom); SetPixel( hDC, rc.left, rc.top, GetSysColor(COLOR_WINDOW) ); SetPixel( hDC, rc.left, rc.bottom-1, GetSysColor(COLOR_WINDOW) ); SetPixel( hDC, rc.right-1, rc.top, GetSysColor(COLOR_WINDOW) ); SetPixel( hDC, rc.right-1, rc.bottom-1, GetSysColor(COLOR_WINDOW)); InflateRect( &rc, -1, -1 ); } if ((wndPtr->dwStyle & 0x000f) == BS_DEFPUSHBUTTON) { Rectangle(hDC, rc.left, rc.top, rc.right, rc.bottom); InflateRect( &rc, -1, -1 ); } if (TWEAK_WineLook == WIN31_LOOK) { if (pushedState) { /* draw button shadow: */ SelectObject(hDC, GetSysColorBrush(COLOR_BTNSHADOW)); PatBlt(hDC, rc.left, rc.top, 1, rc.bottom-rc.top, PATCOPY ); PatBlt(hDC, rc.left, rc.top, rc.right-rc.left, 1, PATCOPY ); rc.left += 2; /* To position the text down and right */ rc.top += 2; } else { rc.right++, rc.bottom++; DrawEdge( hDC, &rc, EDGE_RAISED, BF_RECT ); /* To place de bitmap correctly */ xBorderOffset += GetSystemMetrics(SM_CXEDGE); yBorderOffset += GetSystemMetrics(SM_CYEDGE); rc.right--, rc.bottom--; } } else { UINT uState = DFCS_BUTTONPUSH; if (pushedState) { if ( (wndPtr->dwStyle & 0x000f) == BS_DEFPUSHBUTTON ) uState |= DFCS_FLAT; else uState |= DFCS_PUSHED; } DrawFrameControl( hDC, &rc, DFC_BUTTON, uState ); InflateRect( &rc, -2, -2 ); focus_rect = rc; if (pushedState) { rc.left += 2; /* To position the text down and right */ rc.top += 2; } } /* draw button label, if any: * * In win9x we don't show text if there is a bitmap or icon. * I don't know about win31 so I leave it as it was for win31. * Dennis Björklund 12 Jul, 99 */ if ( wndPtr->text && wndPtr->text[0] && (TWEAK_WineLook == WIN31_LOOK || !(wndPtr->dwStyle & (BS_ICON|BS_BITMAP))) ) { LOGBRUSH lb; GetObjectA( GetSysColorBrush(COLOR_BTNFACE), sizeof(lb), &lb ); if (wndPtr->dwStyle & WS_DISABLED && GetSysColor(COLOR_GRAYTEXT)==lb.lbColor) /* don't write gray text on gray background */ PaintGrayOnGray( hDC,infoPtr->hFont,&rc,wndPtr->text, DT_CENTER | DT_VCENTER ); else { SetTextColor( hDC, (wndPtr->dwStyle & WS_DISABLED) ? GetSysColor(COLOR_GRAYTEXT) : GetSysColor(COLOR_BTNTEXT) ); DrawTextA( hDC, wndPtr->text, -1, &rc, DT_SINGLELINE | DT_CENTER | DT_VCENTER ); /* do we have the focus? * Win9x draws focus last with a size prop. to the button */ if (TWEAK_WineLook == WIN31_LOOK && infoPtr->state & BUTTON_HASFOCUS) { RECT r = { 0, 0, 0, 0 }; INT xdelta, ydelta; DrawTextA( hDC, wndPtr->text, -1, &r, DT_SINGLELINE | DT_CALCRECT ); xdelta = ((rc.right - rc.left) - (r.right - r.left) - 1) / 2; ydelta = ((rc.bottom - rc.top) - (r.bottom - r.top) - 1) / 2; if (xdelta < 0) xdelta = 0; if (ydelta < 0) ydelta = 0; InflateRect( &rc, -xdelta, -ydelta ); DrawFocusRect( hDC, &rc ); } } } if ( ((wndPtr->dwStyle & BS_ICON) || (wndPtr->dwStyle & BS_BITMAP) ) && (infoPtr->hImage != 0) ) { int yOffset, xOffset; int imageWidth, imageHeight; /* * We extract the size of the image from the handle. */ if (wndPtr->dwStyle & BS_ICON) { ICONINFO iconInfo; BITMAP bm; GetIconInfo((HICON)infoPtr->hImage, &iconInfo); GetObjectA (iconInfo.hbmColor, sizeof(BITMAP), &bm); imageWidth = bm.bmWidth; imageHeight = bm.bmHeight; DeleteObject(iconInfo.hbmColor); DeleteObject(iconInfo.hbmMask); } else { BITMAP bm; GetObjectA (infoPtr->hImage, sizeof(BITMAP), &bm); imageWidth = bm.bmWidth; imageHeight = bm.bmHeight; } /* Center the bitmap */ xOffset = (((rc.right - rc.left) - 2*xBorderOffset) - imageWidth ) / 2; yOffset = (((rc.bottom - rc.top) - 2*yBorderOffset) - imageHeight) / 2; /* If the image is too big for the button then create a region*/ if(xOffset < 0 || yOffset < 0) { HRGN hBitmapRgn = 0; hBitmapRgn = CreateRectRgn( rc.left + xBorderOffset, rc.top +yBorderOffset, rc.right - xBorderOffset, rc.bottom - yBorderOffset); SelectClipRgn(hDC, hBitmapRgn); DeleteObject(hBitmapRgn); } /* Let minimum 1 space from border */ xOffset++, yOffset++; /* * Draw the image now. */ if (wndPtr->dwStyle & BS_ICON) { DrawIcon(hDC, rc.left + xOffset, rc.top + yOffset, (HICON)infoPtr->hImage); } else { HDC hdcMem; hdcMem = CreateCompatibleDC (hDC); SelectObject (hdcMem, (HBITMAP)infoPtr->hImage); BitBlt(hDC, rc.left + xOffset, rc.top + yOffset, imageWidth, imageHeight, hdcMem, 0, 0, SRCCOPY); DeleteDC (hdcMem); } if(xOffset < 0 || yOffset < 0) { SelectClipRgn(hDC, 0); } } if (TWEAK_WineLook != WIN31_LOOK && infoPtr->state & BUTTON_HASFOCUS) { InflateRect( &focus_rect, -1, -1 ); DrawFocusRect( hDC, &focus_rect ); } SelectObject( hDC, hOldPen ); SelectObject( hDC, hOldBrush ); } /********************************************************************** * PB_Paint & CB_Paint sub function [internal] * Paint text using a raster brush to avoid gray text on gray * background. 'format' can be a combination of DT_CENTER and * DT_VCENTER to use this function in both PB_PAINT and * CB_PAINT. - Dirk Thierbach * * FIXME: This and TEXT_GrayString should be eventually combined, * so calling one common function from PB_Paint, CB_Paint and * TEXT_GrayString will be enough. Also note that this * function ignores the CACHE_GetPattern funcs. */ void PaintGrayOnGray(HDC hDC,HFONT hFont,RECT *rc,char *text, UINT format) { /* This is the standard gray on gray pattern: static const WORD Pattern[] = {0xAA,0x55,0xAA,0x55,0xAA,0x55,0xAA,0x55}; */ /* This pattern gives better readability with X Fonts. FIXME: Maybe the user should be allowed to decide which he wants. */ static const WORD Pattern[] = {0x55,0xFF,0xAA,0xFF,0x55,0xFF,0xAA,0xFF}; HBITMAP hbm = CreateBitmap( 8, 8, 1, 1, Pattern ); HDC hdcMem = CreateCompatibleDC(hDC); HBITMAP hbmMem; HBRUSH hBr; RECT rect,rc2; rect=*rc; DrawTextA( hDC, text, -1, &rect, DT_SINGLELINE | DT_CALCRECT); /* now text width and height are in rect.right and rect.bottom */ rc2=rect; rect.left = rect.top = 0; /* drawing pos in hdcMem */ if (format & DT_CENTER) rect.left=(rc->right-rect.right)/2; if (format & DT_VCENTER) rect.top=(rc->bottom-rect.bottom)/2; hbmMem = CreateCompatibleBitmap( hDC,rect.right,rect.bottom ); SelectObject( hdcMem, hbmMem); PatBlt( hdcMem,0,0,rect.right,rect.bottom,WHITENESS); /* will be overwritten by DrawText, but just in case */ if (hFont) SelectObject( hdcMem, hFont); DrawTextA( hdcMem, text, -1, &rc2, DT_SINGLELINE); /* After draw: foreground = 0 bits, background = 1 bits */ hBr = SelectObject( hdcMem, CreatePatternBrush(hbm) ); DeleteObject( hbm ); PatBlt( hdcMem,0,0,rect.right,rect.bottom,0xAF0229); /* only keep the foreground bits where pattern is 1 */ DeleteObject( SelectObject( hdcMem,hBr) ); BitBlt(hDC,rect.left,rect.top,rect.right,rect.bottom,hdcMem,0,0,SRCAND); /* keep the background of the dest */ DeleteDC( hdcMem); DeleteObject( hbmMem ); } /********************************************************************** * Check Box & Radio Button Functions */ static void CB_Paint( WND *wndPtr, HDC hDC, WORD action ) { RECT rbox, rtext, client; HBRUSH hBrush; int textlen, delta; BUTTONINFO *infoPtr = (BUTTONINFO *)wndPtr->wExtra; /* * if the button has a bitmap/icon, draw a normal pushbutton * instead of a radion button. */ if (infoPtr->hImage != 0) { BOOL bHighLighted = ((infoPtr->state & BUTTON_HIGHLIGHTED) || (infoPtr->state & BUTTON_CHECKED)); BUTTON_DrawPushButton(wndPtr, hDC, action, bHighLighted); return; } textlen = 0; GetClientRect(wndPtr->hwndSelf, &client); rbox = rtext = client; if (infoPtr->hFont) SelectObject( hDC, infoPtr->hFont ); /* Something is still not right, checkboxes (and edit controls) * in wsping32 have white backgrounds instead of dark grey. * BUTTON_SEND_CTLCOLOR() is even worse since it returns 0 in this * particular case and the background is not painted at all. */ hBrush = GetControlBrush16( wndPtr->hwndSelf, hDC, CTLCOLOR_BTN ); if (wndPtr->dwStyle & BS_LEFTTEXT) { /* magic +4 is what CTL3D expects */ rtext.right -= checkBoxWidth + 4; rbox.left = rbox.right - checkBoxWidth; } else { rtext.left += checkBoxWidth + 4; rbox.right = checkBoxWidth; } /* Draw the check-box bitmap */ if (wndPtr->text) textlen = strlen( wndPtr->text ); if (action == ODA_DRAWENTIRE || action == ODA_SELECT) { if( TWEAK_WineLook == WIN31_LOOK ) { HDC hMemDC = CreateCompatibleDC( hDC ); int x = 0, y = 0; delta = (rbox.bottom - rbox.top - checkBoxHeight) / 2; /* Check in case the client area is smaller than the checkbox bitmap */ if (delta < 0) delta = 0; if (action == ODA_SELECT) FillRect( hDC, &rbox, hBrush ); else FillRect( hDC, &client, hBrush ); if (infoPtr->state & BUTTON_HIGHLIGHTED) x += 2 * checkBoxWidth; if (infoPtr->state & (BUTTON_CHECKED | BUTTON_3STATE)) x += checkBoxWidth; if (((wndPtr->dwStyle & 0x0f) == BS_RADIOBUTTON) || ((wndPtr->dwStyle & 0x0f) == BS_AUTORADIOBUTTON)) y += checkBoxHeight; else if (infoPtr->state & BUTTON_3STATE) y += 2 * checkBoxHeight; /* The bitmap for the radio button is not aligned with the * left of the window, it is 1 pixel off. */ if (((wndPtr->dwStyle & 0x0f) == BS_RADIOBUTTON) || ((wndPtr->dwStyle & 0x0f) == BS_AUTORADIOBUTTON)) rbox.left += 1; SelectObject( hMemDC, hbitmapCheckBoxes ); BitBlt( hDC, rbox.left, rbox.top + delta, checkBoxWidth, checkBoxHeight, hMemDC, x, y, SRCCOPY ); DeleteDC( hMemDC ); } else { UINT state; if (((wndPtr->dwStyle & 0x0f) == BS_RADIOBUTTON) || ((wndPtr->dwStyle & 0x0f) == BS_AUTORADIOBUTTON)) state = DFCS_BUTTONRADIO; else if (infoPtr->state & BUTTON_3STATE) state = DFCS_BUTTON3STATE; else state = DFCS_BUTTONCHECK; if (infoPtr->state & (BUTTON_CHECKED | BUTTON_3STATE)) state |= DFCS_CHECKED; if (infoPtr->state & BUTTON_HIGHLIGHTED) state |= DFCS_PUSHED; if (wndPtr->dwStyle & WS_DISABLED) state |= DFCS_INACTIVE; DrawFrameControl( hDC, &rbox, DFC_BUTTON, state ); } if( textlen && action != ODA_SELECT ) { if (wndPtr->dwStyle & WS_DISABLED && GetSysColor(COLOR_GRAYTEXT)==GetBkColor(hDC)) { /* don't write gray text on gray background */ PaintGrayOnGray( hDC, infoPtr->hFont, &rtext, wndPtr->text, DT_VCENTER); } else { if (wndPtr->dwStyle & WS_DISABLED) SetTextColor( hDC, GetSysColor(COLOR_GRAYTEXT) ); DrawTextA( hDC, wndPtr->text, textlen, &rtext, DT_SINGLELINE | DT_VCENTER ); } } } if ((action == ODA_FOCUS) || ((action == ODA_DRAWENTIRE) && (infoPtr->state & BUTTON_HASFOCUS))) { /* again, this is what CTL3D expects */ SetRectEmpty(&rbox); if( textlen ) DrawTextA( hDC, wndPtr->text, textlen, &rbox, DT_SINGLELINE | DT_CALCRECT ); textlen = rbox.bottom - rbox.top; delta = ((rtext.bottom - rtext.top) - textlen)/2; rbox.bottom = (rbox.top = rtext.top + delta - 1) + textlen + 2; textlen = rbox.right - rbox.left; rbox.right = (rbox.left += --rtext.left) + textlen + 2; IntersectRect(&rbox, &rbox, &rtext); DrawFocusRect( hDC, &rbox ); } } /********************************************************************** * BUTTON_CheckAutoRadioButton * * wndPtr is checked, uncheck every other auto radio button in group */ static void BUTTON_CheckAutoRadioButton( WND *wndPtr ) { HWND parent, sibling, start; if (!(wndPtr->dwStyle & WS_CHILD)) return; parent = wndPtr->parent->hwndSelf; /* assure that starting control is not disabled or invisible */ start = sibling = GetNextDlgGroupItem( parent, wndPtr->hwndSelf, TRUE ); do { WND *tmpWnd; if (!sibling) break; tmpWnd = WIN_FindWndPtr(sibling); if ((wndPtr->hwndSelf != sibling) && ((tmpWnd->dwStyle & 0x0f) == BS_AUTORADIOBUTTON)) SendMessageA( sibling, BM_SETCHECK, BUTTON_UNCHECKED, 0 ); sibling = GetNextDlgGroupItem( parent, sibling, FALSE ); WIN_ReleaseWndPtr(tmpWnd); } while (sibling != start); } /********************************************************************** * Group Box Functions */ static void GB_Paint( WND *wndPtr, HDC hDC, WORD action ) { RECT rc, rcFrame; BUTTONINFO *infoPtr = (BUTTONINFO *)wndPtr->wExtra; if (action != ODA_DRAWENTIRE) return; BUTTON_SEND_CTLCOLOR( wndPtr, hDC ); GetClientRect( wndPtr->hwndSelf, &rc); if (TWEAK_WineLook == WIN31_LOOK) { HPEN hPrevPen = SelectObject( hDC, GetSysColorPen(COLOR_WINDOWFRAME)); HBRUSH hPrevBrush = SelectObject( hDC, GetStockObject(NULL_BRUSH) ); Rectangle( hDC, rc.left, rc.top + 2, rc.right - 1, rc.bottom - 1 ); SelectObject( hDC, hPrevBrush ); SelectObject( hDC, hPrevPen ); } else { TEXTMETRICA tm; rcFrame = rc; if (infoPtr->hFont) SelectObject (hDC, infoPtr->hFont); GetTextMetricsA (hDC, &tm); rcFrame.top += (tm.tmHeight / 2) - 1; DrawEdge (hDC, &rcFrame, EDGE_ETCHED, BF_RECT); } if (wndPtr->text) { if (infoPtr->hFont) SelectObject( hDC, infoPtr->hFont ); if (wndPtr->dwStyle & WS_DISABLED) SetTextColor( hDC, GetSysColor(COLOR_GRAYTEXT) ); rc.left += 10; DrawTextA( hDC, wndPtr->text, -1, &rc, DT_SINGLELINE | DT_NOCLIP ); } } /********************************************************************** * User Button Functions */ static void UB_Paint( WND *wndPtr, HDC hDC, WORD action ) { RECT rc; HBRUSH hBrush; BUTTONINFO *infoPtr = (BUTTONINFO *)wndPtr->wExtra; if (action == ODA_SELECT) return; GetClientRect( wndPtr->hwndSelf, &rc); if (infoPtr->hFont) SelectObject( hDC, infoPtr->hFont ); hBrush = GetControlBrush16( wndPtr->hwndSelf, hDC, CTLCOLOR_BTN ); FillRect( hDC, &rc, hBrush ); if ((action == ODA_FOCUS) || ((action == ODA_DRAWENTIRE) && (infoPtr->state & BUTTON_HASFOCUS))) DrawFocusRect( hDC, &rc ); } /********************************************************************** * Ownerdrawn Button Functions */ static void OB_Paint( WND *wndPtr, HDC hDC, WORD action ) { BUTTONINFO *infoPtr = (BUTTONINFO *)wndPtr->wExtra; DRAWITEMSTRUCT dis; dis.CtlType = ODT_BUTTON; dis.CtlID = wndPtr->wIDmenu; dis.itemID = 0; dis.itemAction = action; dis.itemState = ((infoPtr->state & BUTTON_HASFOCUS) ? ODS_FOCUS : 0) | ((infoPtr->state & BUTTON_HIGHLIGHTED) ? ODS_SELECTED : 0) | ((wndPtr->dwStyle & WS_DISABLED) ? ODS_DISABLED : 0); dis.hwndItem = wndPtr->hwndSelf; dis.hDC = hDC; dis.itemData = 0; GetClientRect( wndPtr->hwndSelf, &dis.rcItem ); SetBkColor( hDC, GetSysColor( COLOR_BTNFACE ) ); SendMessageA( GetParent(wndPtr->hwndSelf), WM_DRAWITEM, wndPtr->wIDmenu, (LPARAM)&dis ); } wine-20000526/controls/combo.c0100644000175000001440000016202407077046561015571 0ustar julliardusers/* * Combo controls * * Copyright 1997 Alex Korobka * * FIXME: roll up in Netscape 3.01. */ #include #include "winbase.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "wine/winuser16.h" #include "win.h" #include "spy.h" #include "user.h" #include "heap.h" #include "combo.h" #include "drive.h" #include "debugtools.h" #include "tweak.h" DEFAULT_DEBUG_CHANNEL(combo) /* bits in the dwKeyData */ #define KEYDATA_ALT 0x2000 #define KEYDATA_PREVSTATE 0x4000 /* * Additional combo box definitions */ #define CB_GETPTR( wnd ) (*(LPHEADCOMBO*)((wnd)->wExtra)) #define CB_NOTIFY( lphc, code ) \ (SendMessageA( (lphc)->owner, WM_COMMAND, \ MAKEWPARAM((lphc)->self->wIDmenu, (code)), (lphc)->self->hwndSelf)) #define CB_GETEDITTEXTLENGTH( lphc ) \ (SendMessageA( (lphc)->hWndEdit, WM_GETTEXTLENGTH, 0, 0 )) #define ISWIN31 (LOWORD(GetVersion()) == 0x0a03) /* * Drawing globals */ static HBITMAP hComboBmp = 0; static UINT CBitHeight, CBitWidth; /* * Look and feel dependant "constants" */ #define COMBO_YBORDERGAP 5 #define COMBO_XBORDERSIZE() ( (TWEAK_WineLook == WIN31_LOOK) ? 0 : 2 ) #define COMBO_YBORDERSIZE() ( (TWEAK_WineLook == WIN31_LOOK) ? 0 : 2 ) #define COMBO_EDITBUTTONSPACE() ( (TWEAK_WineLook == WIN31_LOOK) ? 8 : 0 ) #define EDIT_CONTROL_PADDING() ( (TWEAK_WineLook == WIN31_LOOK) ? 0 : 1 ) /*********************************************************************** * COMBO_Init * * Load combo button bitmap. */ static BOOL COMBO_Init() { HDC hDC; if( hComboBmp ) return TRUE; if( (hDC = CreateCompatibleDC(0)) ) { BOOL bRet = FALSE; if( (hComboBmp = LoadBitmapA(0, MAKEINTRESOURCEA(OBM_COMBO))) ) { BITMAP bm; HBITMAP hPrevB; RECT r; GetObjectA( hComboBmp, sizeof(bm), &bm ); CBitHeight = bm.bmHeight; CBitWidth = bm.bmWidth; TRACE("combo bitmap [%i,%i]\n", CBitWidth, CBitHeight ); hPrevB = SelectObject16( hDC, hComboBmp); SetRect( &r, 0, 0, CBitWidth, CBitHeight ); InvertRect( hDC, &r ); SelectObject( hDC, hPrevB ); bRet = TRUE; } DeleteDC( hDC ); return bRet; } return FALSE; } /*********************************************************************** * COMBO_NCCreate */ static LRESULT COMBO_NCCreate(WND* wnd, LPARAM lParam) { LPHEADCOMBO lphc; if ( wnd && COMBO_Init() && (lphc = HeapAlloc(GetProcessHeap(), 0, sizeof(HEADCOMBO))) ) { LPCREATESTRUCTA lpcs = (CREATESTRUCTA*)lParam; memset( lphc, 0, sizeof(HEADCOMBO) ); *(LPHEADCOMBO*)wnd->wExtra = lphc; /* some braindead apps do try to use scrollbar/border flags */ lphc->dwStyle = (lpcs->style & ~(WS_BORDER | WS_HSCROLL | WS_VSCROLL)); wnd->dwStyle &= ~(WS_BORDER | WS_HSCROLL | WS_VSCROLL); /* * We also have to remove the client edge style to make sure * we don't end-up with a non client area. */ wnd->dwExStyle &= ~(WS_EX_CLIENTEDGE); if( !(lpcs->style & (CBS_OWNERDRAWFIXED | CBS_OWNERDRAWVARIABLE)) ) lphc->dwStyle |= CBS_HASSTRINGS; if( !(wnd->dwExStyle & WS_EX_NOPARENTNOTIFY) ) lphc->wState |= CBF_NOTIFY; TRACE("[0x%08x], style = %08x\n", (UINT)lphc, lphc->dwStyle ); return (LRESULT)(UINT)wnd->hwndSelf; } return (LRESULT)FALSE; } /*********************************************************************** * COMBO_NCDestroy */ static LRESULT COMBO_NCDestroy( LPHEADCOMBO lphc ) { if( lphc ) { WND* wnd = lphc->self; TRACE("[%04x]: freeing storage\n", CB_HWND(lphc)); if( (CB_GETTYPE(lphc) != CBS_SIMPLE) && lphc->hWndLBox ) DestroyWindow( lphc->hWndLBox ); HeapFree( GetProcessHeap(), 0, lphc ); wnd->wExtra[0] = 0; } return 0; } /*********************************************************************** * CBGetTextAreaHeight * * This method will calculate the height of the text area of the * combobox. * The height of the text area is set in two ways. * It can be set explicitely through a combobox message of through a * WM_MEASUREITEM callback. * If this is not the case, the height is set to 13 dialog units. * This height was determined through experimentation. */ static INT CBGetTextAreaHeight( HWND hwnd, LPHEADCOMBO lphc) { INT iTextItemHeight; if( lphc->editHeight ) /* explicitly set height */ { iTextItemHeight = lphc->editHeight; } else { TEXTMETRICA tm; HDC hDC = GetDC(hwnd); HFONT hPrevFont = 0; INT baseUnitY; if (lphc->hFont) hPrevFont = SelectObject( hDC, lphc->hFont ); GetTextMetricsA(hDC, &tm); baseUnitY = tm.tmHeight; if( hPrevFont ) SelectObject( hDC, hPrevFont ); ReleaseDC(hwnd, hDC); iTextItemHeight = ((13 * baseUnitY) / 8); /* * This "formula" calculates the height of the complete control. * To calculate the height of the text area, we have to remove the * borders. */ iTextItemHeight -= 2*COMBO_YBORDERSIZE(); } /* * Check the ownerdraw case if we haven't asked the parent the size * of the item yet. */ if ( CB_OWNERDRAWN(lphc) && (lphc->wState & CBF_MEASUREITEM) ) { MEASUREITEMSTRUCT measureItem; RECT clientRect; INT originalItemHeight = iTextItemHeight; /* * We use the client rect for the width of the item. */ GetClientRect(hwnd, &clientRect); lphc->wState &= ~CBF_MEASUREITEM; /* * Send a first one to measure the size of the text area */ measureItem.CtlType = ODT_COMBOBOX; measureItem.CtlID = lphc->self->wIDmenu; measureItem.itemID = -1; measureItem.itemWidth = clientRect.right; measureItem.itemHeight = iTextItemHeight - 6; /* ownerdrawn cb is taller */ measureItem.itemData = 0; SendMessageA(lphc->owner, WM_MEASUREITEM, (WPARAM)measureItem.CtlID, (LPARAM)&measureItem); iTextItemHeight = 6 + measureItem.itemHeight; /* * Send a second one in the case of a fixed ownerdraw list to calculate the * size of the list items. (we basically do this on behalf of the listbox) */ if (lphc->dwStyle & CBS_OWNERDRAWFIXED) { measureItem.CtlType = ODT_COMBOBOX; measureItem.CtlID = lphc->self->wIDmenu; measureItem.itemID = 0; measureItem.itemWidth = clientRect.right; measureItem.itemHeight = originalItemHeight; measureItem.itemData = 0; SendMessageA(lphc->owner, WM_MEASUREITEM, (WPARAM)measureItem.CtlID, (LPARAM)&measureItem); lphc->fixedOwnerDrawHeight = measureItem.itemHeight; } /* * Keep the size for the next time */ lphc->editHeight = iTextItemHeight; } return iTextItemHeight; } /*********************************************************************** * CBForceDummyResize * * The dummy resize is used for listboxes that have a popup to trigger * a re-arranging of the contents of the combobox and the recalculation * of the size of the "real" control window. */ static void CBForceDummyResize( LPHEADCOMBO lphc) { RECT windowRect; int newComboHeight; newComboHeight = CBGetTextAreaHeight(CB_HWND(lphc),lphc) + 2*COMBO_YBORDERSIZE(); GetWindowRect(CB_HWND(lphc), &windowRect); /* * We have to be careful, resizing a combobox also has the meaning that the * dropped rect will be resized. In this case, we want to trigger a resize * to recalculate layout but we don't want to change the dropped rectangle * So, we pass the height of text area of control as the height. * this will cancel-out in the processing of the WM_WINDOWPOSCHANGING * message. */ SetWindowPos( CB_HWND(lphc), (HWND)NULL, 0, 0, windowRect.right - windowRect.left, newComboHeight, SWP_NOMOVE | SWP_NOZORDER | SWP_NOACTIVATE ); } /*********************************************************************** * CBCalcPlacement * * Set up component coordinates given valid lphc->RectCombo. */ static void CBCalcPlacement( HWND hwnd, LPHEADCOMBO lphc, LPRECT lprEdit, LPRECT lprButton, LPRECT lprLB) { /* * Again, start with the client rectangle. */ GetClientRect(hwnd, lprEdit); /* * Remove the borders */ InflateRect(lprEdit, -COMBO_XBORDERSIZE(), -COMBO_YBORDERSIZE()); /* * Chop off the bottom part to fit with the height of the text area. */ lprEdit->bottom = lprEdit->top + CBGetTextAreaHeight(hwnd, lphc); /* * The button starts the same vertical position as the text area. */ CopyRect(lprButton, lprEdit); /* * If the combobox is "simple" there is no button. */ if( CB_GETTYPE(lphc) == CBS_SIMPLE ) lprButton->left = lprButton->right = lprButton->bottom = 0; else { /* * Let's assume the combobox button is the same width as the * scrollbar button. * size the button horizontally and cut-off the text area. */ lprButton->left = lprButton->right - GetSystemMetrics(SM_CXVSCROLL); lprEdit->right = lprButton->left; } /* * In the case of a dropdown, there is an additional spacing between the * text area and the button. */ if( CB_GETTYPE(lphc) == CBS_DROPDOWN ) { lprEdit->right -= COMBO_EDITBUTTONSPACE(); } /* * If we have an edit control, we space it away from the borders slightly. */ if (CB_GETTYPE(lphc) != CBS_DROPDOWNLIST) { InflateRect(lprEdit, -EDIT_CONTROL_PADDING(), -EDIT_CONTROL_PADDING()); } /* * Adjust the size of the listbox popup. */ if( CB_GETTYPE(lphc) == CBS_SIMPLE ) { /* * Use the client rectangle to initialize the listbox rectangle */ GetClientRect(hwnd, lprLB); /* * Then, chop-off the top part. */ lprLB->top = lprEdit->bottom + COMBO_YBORDERSIZE(); } else { /* * Make sure the dropped width is as large as the combobox itself. */ if (lphc->droppedWidth < (lprButton->right + COMBO_XBORDERSIZE())) { lprLB->right = lprLB->left + (lprButton->right + COMBO_XBORDERSIZE()); /* * In the case of a dropdown, the popup listbox is offset to the right. * so, we want to make sure it's flush with the right side of the * combobox */ if( CB_GETTYPE(lphc) == CBS_DROPDOWN ) lprLB->right -= COMBO_EDITBUTTONSPACE(); } else lprLB->right = lprLB->left + lphc->droppedWidth; } TRACE("\ttext\t= (%i,%i-%i,%i)\n", lprEdit->left, lprEdit->top, lprEdit->right, lprEdit->bottom); TRACE("\tbutton\t= (%i,%i-%i,%i)\n", lprButton->left, lprButton->top, lprButton->right, lprButton->bottom); TRACE("\tlbox\t= (%i,%i-%i,%i)\n", lprLB->left, lprLB->top, lprLB->right, lprLB->bottom ); } /*********************************************************************** * CBGetDroppedControlRect */ static void CBGetDroppedControlRect( LPHEADCOMBO lphc, LPRECT lpRect) { /* In windows, CB_GETDROPPEDCONTROLRECT returns the upper left corner of the combo box and the lower right corner of the listbox */ GetWindowRect(lphc->self->hwndSelf, lpRect); lpRect->right = lpRect->left + lphc->droppedRect.right - lphc->droppedRect.left; lpRect->bottom = lpRect->top + lphc->droppedRect.bottom - lphc->droppedRect.top; } /*********************************************************************** * COMBO_WindowPosChanging */ static LRESULT COMBO_WindowPosChanging( HWND hwnd, LPHEADCOMBO lphc, WINDOWPOS* posChanging) { /* * We need to override the WM_WINDOWPOSCHANGING method to handle all * the non-simple comboboxes. The problem is that those controls are * always the same height. We have to make sure they are not resized * to another value. */ if ( ( CB_GETTYPE(lphc) != CBS_SIMPLE ) && ((posChanging->flags & SWP_NOSIZE) == 0) ) { int newComboHeight; newComboHeight = CBGetTextAreaHeight(hwnd,lphc) + 2*COMBO_YBORDERSIZE(); /* * Resizing a combobox has another side effect, it resizes the dropped * rectangle as well. However, it does it only if the new height for the * combobox is different than the height it should have. In other words, * if the application resizing the combobox only had the intention to resize * the actual control, for example, to do the layout of a dialog that is * resized, the height of the dropdown is not changed. */ if (posChanging->cy != newComboHeight) { lphc->droppedRect.bottom = lphc->droppedRect.top + posChanging->cy - newComboHeight; posChanging->cy = newComboHeight; } } return 0; } /*********************************************************************** * COMBO_Create */ static LRESULT COMBO_Create( LPHEADCOMBO lphc, WND* wnd, LPARAM lParam) { static char clbName[] = "ComboLBox"; static char editName[] = "Edit"; LPCREATESTRUCTA lpcs = (CREATESTRUCTA*)lParam; if( !CB_GETTYPE(lphc) ) lphc->dwStyle |= CBS_SIMPLE; else if( CB_GETTYPE(lphc) != CBS_DROPDOWNLIST ) lphc->wState |= CBF_EDIT; lphc->self = wnd; lphc->owner = lpcs->hwndParent; /* * The item height and dropped width are not set when the control * is created. */ lphc->droppedWidth = lphc->editHeight = 0; /* * The first time we go through, we want to measure the ownerdraw item */ lphc->wState |= CBF_MEASUREITEM; /* M$ IE 3.01 actually creates (and rapidly destroys) an ownerless combobox */ if( lphc->owner || !(lpcs->style & WS_VISIBLE) ) { UINT lbeStyle = 0; UINT lbeExStyle = 0; /* * Initialize the dropped rect to the size of the client area of the * control and then, force all the areas of the combobox to be * recalculated. */ GetClientRect( wnd->hwndSelf, &lphc->droppedRect ); CBCalcPlacement(wnd->hwndSelf, lphc, &lphc->textRect, &lphc->buttonRect, &lphc->droppedRect ); /* * Adjust the position of the popup listbox if it's necessary */ if ( CB_GETTYPE(lphc) != CBS_SIMPLE ) { lphc->droppedRect.top = lphc->textRect.bottom + COMBO_YBORDERSIZE(); /* * If it's a dropdown, the listbox is offset */ if( CB_GETTYPE(lphc) == CBS_DROPDOWN ) lphc->droppedRect.left += COMBO_EDITBUTTONSPACE(); ClientToScreen(wnd->hwndSelf, (LPPOINT)&lphc->droppedRect); ClientToScreen(wnd->hwndSelf, (LPPOINT)&lphc->droppedRect.right); } /* create listbox popup */ lbeStyle = (LBS_NOTIFY | WS_BORDER | WS_CLIPSIBLINGS) | (lpcs->style & (WS_VSCROLL | CBS_OWNERDRAWFIXED | CBS_OWNERDRAWVARIABLE)); if( lphc->dwStyle & CBS_SORT ) lbeStyle |= LBS_SORT; if( lphc->dwStyle & CBS_HASSTRINGS ) lbeStyle |= LBS_HASSTRINGS; if( lphc->dwStyle & CBS_NOINTEGRALHEIGHT ) lbeStyle |= LBS_NOINTEGRALHEIGHT; if( lphc->dwStyle & CBS_DISABLENOSCROLL ) lbeStyle |= LBS_DISABLENOSCROLL; if( CB_GETTYPE(lphc) == CBS_SIMPLE ) /* child listbox */ { lbeStyle |= WS_CHILD | WS_VISIBLE; /* * In win 95 look n feel, the listbox in the simple combobox has * the WS_EXCLIENTEDGE style instead of the WS_BORDER style. */ if (TWEAK_WineLook > WIN31_LOOK) { lbeStyle &= ~WS_BORDER; lbeExStyle |= WS_EX_CLIENTEDGE; } } else /* popup listbox */ lbeStyle |= WS_POPUP; /* Dropdown ComboLBox is not a child window and we cannot pass * ID_CB_LISTBOX directly because it will be treated as a menu handle. */ lphc->hWndLBox = CreateWindowExA(lbeExStyle, clbName, NULL, lbeStyle, lphc->droppedRect.left, lphc->droppedRect.top, lphc->droppedRect.right - lphc->droppedRect.left, lphc->droppedRect.bottom - lphc->droppedRect.top, lphc->self->hwndSelf, (lphc->dwStyle & CBS_DROPDOWN)? (HMENU)0 : (HMENU)ID_CB_LISTBOX, lphc->self->hInstance, (LPVOID)lphc ); /* * The ComboLBox is a strange little beast (when it's not a CBS_SIMPLE)... * It's a popup window but, when you get the window style, you get WS_CHILD. * When created, it's parent is the combobox but, when you ask for it's parent * after that, you're supposed to get the desktop. (see MFC code function * AfxCancelModes) * To achieve this in Wine, we have to create it as a popup and change * it's style to child after the creation. */ if ( (lphc->hWndLBox!= 0) && (CB_GETTYPE(lphc) != CBS_SIMPLE) ) { SetWindowLongA(lphc->hWndLBox, GWL_STYLE, (GetWindowLongA(lphc->hWndLBox, GWL_STYLE) | WS_CHILD) & ~WS_POPUP); } if( lphc->hWndLBox ) { BOOL bEdit = TRUE; lbeStyle = WS_CHILD | WS_VISIBLE | ES_NOHIDESEL | ES_LEFT; /* * In Win95 look, the border fo the edit control is * provided by the combobox */ if (TWEAK_WineLook == WIN31_LOOK) lbeStyle |= WS_BORDER; if( lphc->wState & CBF_EDIT ) { if( lphc->dwStyle & CBS_OEMCONVERT ) lbeStyle |= ES_OEMCONVERT; if( lphc->dwStyle & CBS_AUTOHSCROLL ) lbeStyle |= ES_AUTOHSCROLL; if( lphc->dwStyle & CBS_LOWERCASE ) lbeStyle |= ES_LOWERCASE; else if( lphc->dwStyle & CBS_UPPERCASE ) lbeStyle |= ES_UPPERCASE; lphc->hWndEdit = CreateWindowExA(0, editName, NULL, lbeStyle, lphc->textRect.left, lphc->textRect.top, lphc->textRect.right - lphc->textRect.left, lphc->textRect.bottom - lphc->textRect.top, lphc->self->hwndSelf, (HMENU)ID_CB_EDIT, lphc->self->hInstance, NULL ); if( !lphc->hWndEdit ) bEdit = FALSE; } if( bEdit ) { /* * If the combo is a dropdown, we must resize the control to fit only * the text area and button. To do this, we send a dummy resize and the * WM_WINDOWPOSCHANGING message will take care of setting the height for * us. */ if( CB_GETTYPE(lphc) != CBS_SIMPLE ) { CBForceDummyResize(lphc); } TRACE("init done\n"); return wnd->hwndSelf; } ERR("edit control failure.\n"); } else ERR("listbox failure.\n"); } else ERR("no owner for visible combo.\n"); /* CreateWindow() will send WM_NCDESTROY to cleanup */ return -1; } /*********************************************************************** * CBPaintButton * * Paint combo button (normal, pressed, and disabled states). */ static void CBPaintButton( LPHEADCOMBO lphc, HDC hdc, RECT rectButton) { if( lphc->wState & CBF_NOREDRAW ) return; if (TWEAK_WineLook == WIN31_LOOK) { UINT x, y; BOOL bBool; HDC hMemDC; HBRUSH hPrevBrush; COLORREF oldTextColor, oldBkColor; hPrevBrush = SelectObject(hdc, GetSysColorBrush(COLOR_BTNFACE)); /* * Draw the button background */ PatBlt( hdc, rectButton.left, rectButton.top, rectButton.right-rectButton.left, rectButton.bottom-rectButton.top, PATCOPY ); if( (bBool = lphc->wState & CBF_BUTTONDOWN) ) { DrawEdge( hdc, &rectButton, EDGE_SUNKEN, BF_RECT ); } else { DrawEdge( hdc, &rectButton, EDGE_RAISED, BF_RECT ); } /* * Remove the edge of the button from the rectangle * and calculate the position of the bitmap. */ InflateRect( &rectButton, -2, -2); x = (rectButton.left + rectButton.right - CBitWidth) >> 1; y = (rectButton.top + rectButton.bottom - CBitHeight) >> 1; hMemDC = CreateCompatibleDC( hdc ); SelectObject( hMemDC, hComboBmp ); oldTextColor = SetTextColor( hdc, GetSysColor(COLOR_BTNFACE) ); oldBkColor = SetBkColor( hdc, CB_DISABLED(lphc) ? RGB(128,128,128) : RGB(0,0,0) ); BitBlt( hdc, x, y, CBitWidth, CBitHeight, hMemDC, 0, 0, SRCCOPY ); SetBkColor( hdc, oldBkColor ); SetTextColor( hdc, oldTextColor ); DeleteDC( hMemDC ); SelectObject( hdc, hPrevBrush ); } else { UINT buttonState = DFCS_SCROLLCOMBOBOX; if (lphc->wState & CBF_BUTTONDOWN) { buttonState |= DFCS_PUSHED; } if (CB_DISABLED(lphc)) { buttonState |= DFCS_INACTIVE; } DrawFrameControl(hdc, &rectButton, DFC_SCROLL, buttonState); } } /*********************************************************************** * CBPaintText * * Paint CBS_DROPDOWNLIST text field / update edit control contents. */ static void CBPaintText( LPHEADCOMBO lphc, HDC hdc, RECT rectEdit) { INT id, size = 0; LPSTR pText = NULL; if( lphc->wState & CBF_NOREDRAW ) return; /* follow Windows combobox that sends a bunch of text * inquiries to its listbox while processing WM_PAINT. */ if( (id = SendMessageA(lphc->hWndLBox, LB_GETCURSEL, 0, 0) ) != LB_ERR ) { size = SendMessageA( lphc->hWndLBox, LB_GETTEXTLEN, id, 0); if( (pText = HeapAlloc( GetProcessHeap(), 0, size + 1)) ) { SendMessageA( lphc->hWndLBox, LB_GETTEXT, (WPARAM)id, (LPARAM)pText ); pText[size] = '\0'; /* just in case */ } else return; } if( lphc->wState & CBF_EDIT ) { if( CB_HASSTRINGS(lphc) ) SetWindowTextA( lphc->hWndEdit, pText ? pText : "" ); if( lphc->wState & CBF_FOCUSED ) SendMessageA( lphc->hWndEdit, EM_SETSEL, 0, (LPARAM)(-1)); } else /* paint text field ourselves */ { UINT itemState; HFONT hPrevFont = (lphc->hFont) ? SelectObject(hdc, lphc->hFont) : 0; /* * Give ourselves some space. */ InflateRect( &rectEdit, -1, -1 ); if ( (lphc->wState & CBF_FOCUSED) && !(lphc->wState & CBF_DROPPED) ) { /* highlight */ FillRect( hdc, &rectEdit, GetSysColorBrush(COLOR_HIGHLIGHT) ); SetBkColor( hdc, GetSysColor( COLOR_HIGHLIGHT ) ); SetTextColor( hdc, GetSysColor( COLOR_HIGHLIGHTTEXT ) ); itemState = ODS_SELECTED | ODS_FOCUS; } else itemState = 0; if( CB_OWNERDRAWN(lphc) ) { DRAWITEMSTRUCT dis; HRGN clipRegion; /* * Save the current clip region. * To retrieve the clip region, we need to create one "dummy" * clip region. */ clipRegion = CreateRectRgnIndirect(&rectEdit); if (GetClipRgn(hdc, clipRegion)!=1) { DeleteObject(clipRegion); clipRegion=(HRGN)NULL; } if ( lphc->self->dwStyle & WS_DISABLED ) itemState |= ODS_DISABLED; dis.CtlType = ODT_COMBOBOX; dis.CtlID = lphc->self->wIDmenu; dis.hwndItem = lphc->self->hwndSelf; dis.itemAction = ODA_DRAWENTIRE; dis.itemID = id; dis.itemState = itemState; dis.hDC = hdc; dis.rcItem = rectEdit; dis.itemData = SendMessageA( lphc->hWndLBox, LB_GETITEMDATA, (WPARAM)id, 0 ); /* * Clip the DC and have the parent draw the item. */ IntersectClipRect(hdc, rectEdit.left, rectEdit.top, rectEdit.right, rectEdit.bottom); SendMessageA(lphc->owner, WM_DRAWITEM, lphc->self->wIDmenu, (LPARAM)&dis ); /* * Reset the clipping region. */ SelectClipRgn(hdc, clipRegion); } else { ExtTextOutA( hdc, rectEdit.left + 1, rectEdit.top + 1, ETO_OPAQUE | ETO_CLIPPED, &rectEdit, pText ? pText : "" , size, NULL ); if(lphc->wState & CBF_FOCUSED && !(lphc->wState & CBF_DROPPED)) DrawFocusRect( hdc, &rectEdit ); } if( hPrevFont ) SelectObject(hdc, hPrevFont ); } if (pText) HeapFree( GetProcessHeap(), 0, pText ); } /*********************************************************************** * CBPaintBorder */ static void CBPaintBorder( HWND hwnd, LPHEADCOMBO lphc, HDC hdc) { RECT clientRect; if (CB_GETTYPE(lphc) != CBS_SIMPLE) { GetClientRect(hwnd, &clientRect); } else { CopyRect(&clientRect, &lphc->textRect); InflateRect(&clientRect, EDIT_CONTROL_PADDING(), EDIT_CONTROL_PADDING()); InflateRect(&clientRect, COMBO_XBORDERSIZE(), COMBO_YBORDERSIZE()); } DrawEdge(hdc, &clientRect, EDGE_SUNKEN, BF_RECT); } /*********************************************************************** * COMBO_PrepareColors * * This method will sent the appropriate WM_CTLCOLOR message to * prepare and setup the colors for the combo's DC. * * It also returns the brush to use for the background. */ static HBRUSH COMBO_PrepareColors( HWND hwnd, LPHEADCOMBO lphc, HDC hDC) { HBRUSH hBkgBrush; /* * Get the background brush for this control. */ if (CB_DISABLED(lphc)) { hBkgBrush = SendMessageA( lphc->owner, WM_CTLCOLORSTATIC, hDC, lphc->self->hwndSelf ); /* * We have to change the text color since WM_CTLCOLORSTATIC will * set it to the "enabled" color. This is the same behavior as the * edit control */ SetTextColor(hDC, GetSysColor(COLOR_GRAYTEXT)); } else { if (lphc->wState & CBF_EDIT) { hBkgBrush = SendMessageA( lphc->owner, WM_CTLCOLOREDIT, hDC, lphc->self->hwndSelf ); } else { hBkgBrush = SendMessageA( lphc->owner, WM_CTLCOLORLISTBOX, hDC, lphc->self->hwndSelf ); } } /* * Catch errors. */ if( !hBkgBrush ) hBkgBrush = GetSysColorBrush(COLOR_WINDOW); return hBkgBrush; } /*********************************************************************** * COMBO_EraseBackground */ static LRESULT COMBO_EraseBackground( HWND hwnd, LPHEADCOMBO lphc, HDC hParamDC) { HBRUSH hBkgBrush; RECT clientRect; HDC hDC; hDC = (hParamDC) ? hParamDC : GetDC(hwnd); /* * Calculate the area that we want to erase. */ if (CB_GETTYPE(lphc) != CBS_SIMPLE) { GetClientRect(hwnd, &clientRect); } else { CopyRect(&clientRect, &lphc->textRect); InflateRect(&clientRect, COMBO_XBORDERSIZE(), COMBO_YBORDERSIZE()); } /* * Retrieve the background brush */ hBkgBrush = COMBO_PrepareColors(hwnd, lphc, hDC); FillRect(hDC, &clientRect, hBkgBrush); if (!hParamDC) ReleaseDC(hwnd, hDC); return TRUE; } /*********************************************************************** * COMBO_Paint */ static LRESULT COMBO_Paint(LPHEADCOMBO lphc, HDC hParamDC) { PAINTSTRUCT ps; HDC hDC; hDC = (hParamDC) ? hParamDC : BeginPaint( lphc->self->hwndSelf, &ps); if( hDC && !(lphc->wState & CBF_NOREDRAW) ) { HBRUSH hPrevBrush, hBkgBrush; /* * Retrieve the background brush and select it in the * DC. */ hBkgBrush = COMBO_PrepareColors(lphc->self->hwndSelf, lphc, hDC); hPrevBrush = SelectObject( hDC, hBkgBrush ); /* * In non 3.1 look, there is a sunken border on the combobox */ if (TWEAK_WineLook != WIN31_LOOK) { CBPaintBorder(CB_HWND(lphc), lphc, hDC); } if( !IsRectEmpty(&lphc->buttonRect) ) { CBPaintButton(lphc, hDC, lphc->buttonRect); } if( !(lphc->wState & CBF_EDIT) ) { /* * The text area has a border only in Win 3.1 look. */ if (TWEAK_WineLook == WIN31_LOOK) { HPEN hPrevPen = SelectObject( hDC, GetSysColorPen(COLOR_WINDOWFRAME) ); Rectangle( hDC, lphc->textRect.left, lphc->textRect.top, lphc->textRect.right - 1, lphc->textRect.bottom - 1); SelectObject( hDC, hPrevPen ); } CBPaintText( lphc, hDC, lphc->textRect); } if( hPrevBrush ) SelectObject( hDC, hPrevBrush ); } if( !hParamDC ) EndPaint(lphc->self->hwndSelf, &ps); return 0; } /*********************************************************************** * CBUpdateLBox * * Select listbox entry according to the contents of the edit control. */ static INT CBUpdateLBox( LPHEADCOMBO lphc ) { INT length, idx; LPSTR pText = NULL; idx = LB_ERR; length = CB_GETEDITTEXTLENGTH( lphc ); if( length > 0 ) pText = (LPSTR) HeapAlloc( GetProcessHeap(), 0, length + 1); TRACE("\t edit text length %i\n", length ); if( pText ) { if( length ) GetWindowTextA( lphc->hWndEdit, pText, length + 1); else pText[0] = '\0'; idx = SendMessageA( lphc->hWndLBox, LB_FINDSTRING, (WPARAM)(-1), (LPARAM)pText ); HeapFree( GetProcessHeap(), 0, pText ); } if( idx >= 0 ) { SendMessageA( lphc->hWndLBox, LB_SETTOPINDEX, (WPARAM)idx, 0 ); /* probably superfluous but Windows sends this too */ SendMessageA( lphc->hWndLBox, LB_SETCARETINDEX, (WPARAM)idx, 0 ); } return idx; } /*********************************************************************** * CBUpdateEdit * * Copy a listbox entry to the edit control. */ static void CBUpdateEdit( LPHEADCOMBO lphc , INT index ) { INT length; LPSTR pText = NULL; TRACE("\t %i\n", index ); if( index >= 0 ) /* got an entry */ { length = SendMessageA( lphc->hWndLBox, LB_GETTEXTLEN, (WPARAM)index, 0); if( length ) { if( (pText = (LPSTR) HeapAlloc( GetProcessHeap(), 0, length + 1)) ) { SendMessageA( lphc->hWndLBox, LB_GETTEXT, (WPARAM)index, (LPARAM)pText ); } } } lphc->wState |= CBF_NOEDITNOTIFY; SendMessageA( lphc->hWndEdit, WM_SETTEXT, 0, pText ? (LPARAM)pText : (LPARAM)"" ); lphc->wState &= ~CBF_NOEDITNOTIFY; if( pText ) HeapFree( GetProcessHeap(), 0, pText ); } /*********************************************************************** * CBDropDown * * Show listbox popup. */ static void CBDropDown( LPHEADCOMBO lphc ) { RECT rect; int nItems = 0; int i; int nHeight; int nDroppedHeight, nTempDroppedHeight; TRACE("[%04x]: drop down\n", CB_HWND(lphc)); CB_NOTIFY( lphc, CBN_DROPDOWN ); /* set selection */ lphc->wState |= CBF_DROPPED; if( CB_GETTYPE(lphc) == CBS_DROPDOWN ) { lphc->droppedIndex = CBUpdateLBox( lphc ); if( !(lphc->wState & CBF_CAPTURE) ) CBUpdateEdit( lphc, lphc->droppedIndex ); } else { lphc->droppedIndex = SendMessageA( lphc->hWndLBox, LB_GETCURSEL, 0, 0 ); if( lphc->droppedIndex == LB_ERR ) lphc->droppedIndex = 0; SendMessageA( lphc->hWndLBox, LB_SETTOPINDEX, (WPARAM)lphc->droppedIndex, 0 ); SendMessageA( lphc->hWndLBox, LB_CARETON, 0, 0 ); } /* now set popup position */ GetWindowRect( lphc->self->hwndSelf, &rect ); /* * If it's a dropdown, the listbox is offset */ if( CB_GETTYPE(lphc) == CBS_DROPDOWN ) rect.left += COMBO_EDITBUTTONSPACE(); /* if the dropped height is greater than the total height of the dropped items list, then force the drop down list height to be the total height of the items in the dropped list */ /* And Remove any extra space (Best Fit) */ nDroppedHeight = lphc->droppedRect.bottom - lphc->droppedRect.top; nItems = (int)SendMessageA (lphc->hWndLBox, LB_GETCOUNT, 0, 0); nHeight = COMBO_YBORDERSIZE(); nTempDroppedHeight = 0; for (i = 0; i < nItems; i++) { nHeight += (int)SendMessageA (lphc->hWndLBox, LB_GETITEMHEIGHT, i, 0); /* Did we pass the limit of what can be displayed */ if (nHeight > nDroppedHeight) { break; } nTempDroppedHeight = nHeight; } nDroppedHeight = nTempDroppedHeight; SetWindowPos( lphc->hWndLBox, HWND_TOP, rect.left, rect.bottom, lphc->droppedRect.right - lphc->droppedRect.left, nDroppedHeight, SWP_NOACTIVATE | SWP_NOREDRAW); if( !(lphc->wState & CBF_NOREDRAW) ) RedrawWindow( lphc->self->hwndSelf, NULL, 0, RDW_INVALIDATE | RDW_ERASE | RDW_UPDATENOW | RDW_NOCHILDREN ); ShowWindow( lphc->hWndLBox, SW_SHOWNA ); } /*********************************************************************** * CBRollUp * * Hide listbox popup. */ static void CBRollUp( LPHEADCOMBO lphc, BOOL ok, BOOL bButton ) { HWND hWnd = lphc->self->hwndSelf; CB_NOTIFY( lphc, (ok) ? CBN_SELENDOK : CBN_SELENDCANCEL ); if( IsWindow( hWnd ) && CB_GETTYPE(lphc) != CBS_SIMPLE ) { TRACE("[%04x]: roll up [%i]\n", CB_HWND(lphc), (INT)ok ); if( lphc->wState & CBF_DROPPED ) { RECT rect; lphc->wState &= ~CBF_DROPPED; ShowWindow( lphc->hWndLBox, SW_HIDE ); if(GetCapture() == lphc->hWndLBox) { ReleaseCapture(); } if( CB_GETTYPE(lphc) == CBS_DROPDOWN ) { INT index = SendMessageA( lphc->hWndLBox, LB_GETCURSEL, 0, 0 ); CBUpdateEdit( lphc, index ); rect = lphc->buttonRect; } else { if( bButton ) { UnionRect( &rect, &lphc->buttonRect, &lphc->textRect); } else rect = lphc->textRect; bButton = TRUE; } if( bButton && !(lphc->wState & CBF_NOREDRAW) ) RedrawWindow( hWnd, &rect, 0, RDW_INVALIDATE | RDW_ERASE | RDW_UPDATENOW | RDW_NOCHILDREN ); CB_NOTIFY( lphc, CBN_CLOSEUP ); } } } /*********************************************************************** * COMBO_FlipListbox * * Used by the ComboLBox to show/hide itself in response to VK_F4, etc... */ BOOL COMBO_FlipListbox( LPHEADCOMBO lphc, BOOL bRedrawButton ) { if( lphc->wState & CBF_DROPPED ) { CBRollUp( lphc, TRUE, bRedrawButton ); return FALSE; } CBDropDown( lphc ); return TRUE; } /*********************************************************************** * COMBO_GetLBWindow * * Edit control helper. */ HWND COMBO_GetLBWindow( WND* pWnd ) { LPHEADCOMBO lphc = CB_GETPTR(pWnd); if( lphc ) return lphc->hWndLBox; return 0; } /*********************************************************************** * CBRepaintButton */ static void CBRepaintButton( LPHEADCOMBO lphc ) { InvalidateRect(CB_HWND(lphc), &lphc->buttonRect, TRUE); UpdateWindow(CB_HWND(lphc)); } /*********************************************************************** * COMBO_SetFocus */ static void COMBO_SetFocus( LPHEADCOMBO lphc ) { if( !(lphc->wState & CBF_FOCUSED) ) { if( CB_GETTYPE(lphc) == CBS_DROPDOWNLIST ) SendMessageA( lphc->hWndLBox, LB_CARETON, 0, 0 ); lphc->wState |= CBF_FOCUSED; if( !(lphc->wState & CBF_EDIT) ) InvalidateRect(CB_HWND(lphc), &lphc->textRect, TRUE); CB_NOTIFY( lphc, CBN_SETFOCUS ); } } /*********************************************************************** * COMBO_KillFocus */ static void COMBO_KillFocus( LPHEADCOMBO lphc ) { HWND hWnd = lphc->self->hwndSelf; if( lphc->wState & CBF_FOCUSED ) { CBRollUp( lphc, FALSE, TRUE ); if( IsWindow( hWnd ) ) { if( CB_GETTYPE(lphc) == CBS_DROPDOWNLIST ) SendMessageA( lphc->hWndLBox, LB_CARETOFF, 0, 0 ); lphc->wState &= ~CBF_FOCUSED; /* redraw text */ if( !(lphc->wState & CBF_EDIT) ) InvalidateRect(CB_HWND(lphc), &lphc->textRect, TRUE); CB_NOTIFY( lphc, CBN_KILLFOCUS ); } } } /*********************************************************************** * COMBO_Command */ static LRESULT COMBO_Command( LPHEADCOMBO lphc, WPARAM wParam, HWND hWnd ) { if ( lphc->wState & CBF_EDIT && lphc->hWndEdit == hWnd ) { /* ">> 8" makes gcc generate jump-table instead of cmp ladder */ switch( HIWORD(wParam) >> 8 ) { case (EN_SETFOCUS >> 8): TRACE("[%04x]: edit [%04x] got focus\n", CB_HWND(lphc), lphc->hWndEdit ); COMBO_SetFocus( lphc ); break; case (EN_KILLFOCUS >> 8): TRACE("[%04x]: edit [%04x] lost focus\n", CB_HWND(lphc), lphc->hWndEdit ); /* NOTE: it seems that Windows' edit control sends an * undocumented message WM_USER + 0x1B instead of this * notification (only when it happens to be a part of * the combo). ?? - AK. */ COMBO_KillFocus( lphc ); break; case (EN_CHANGE >> 8): /* * In some circumstances (when the selection of the combobox * is changed for example) we don't wans the EN_CHANGE notification * to be forwarded to the parent of the combobox. This code * checks a flag that is set in these occasions and ignores the * notification. */ if (!(lphc->wState & CBF_NOEDITNOTIFY)) CB_NOTIFY( lphc, CBN_EDITCHANGE ); CBUpdateLBox( lphc ); break; case (EN_UPDATE >> 8): if (!(lphc->wState & CBF_NOEDITNOTIFY)) CB_NOTIFY( lphc, CBN_EDITUPDATE ); break; case (EN_ERRSPACE >> 8): CB_NOTIFY( lphc, CBN_ERRSPACE ); } } else if( lphc->hWndLBox == hWnd ) { switch( HIWORD(wParam) ) { case LBN_ERRSPACE: CB_NOTIFY( lphc, CBN_ERRSPACE ); break; case LBN_DBLCLK: CB_NOTIFY( lphc, CBN_DBLCLK ); break; case LBN_SELCHANGE: case LBN_SELCANCEL: TRACE("[%04x]: lbox selection change [%04x]\n", CB_HWND(lphc), lphc->wState ); /* do not roll up if selection is being tracked * by arrowkeys in the dropdown listbox */ if( (lphc->wState & CBF_DROPPED) && !(lphc->wState & CBF_NOROLLUP) ) CBRollUp( lphc, (HIWORD(wParam) == LBN_SELCHANGE), TRUE ); else lphc->wState &= ~CBF_NOROLLUP; if( lphc->wState & CBF_EDIT ) { INT index = SendMessageA(lphc->hWndLBox, LB_GETCURSEL, 0, 0); CBUpdateEdit( lphc, index ); /* select text in edit, as Windows does */ SendMessageA( lphc->hWndEdit, EM_SETSEL, 0, (LPARAM)(-1) ); } else InvalidateRect(CB_HWND(lphc), &lphc->textRect, TRUE); CB_NOTIFY( lphc, CBN_SELCHANGE ); /* fall through */ case LBN_SETFOCUS: case LBN_KILLFOCUS: /* nothing to do here since ComboLBox always resets the focus to its * combo/edit counterpart */ break; } } return 0; } /*********************************************************************** * COMBO_ItemOp * * Fixup an ownerdrawn item operation and pass it up to the combobox owner. */ static LRESULT COMBO_ItemOp( LPHEADCOMBO lphc, UINT msg, WPARAM wParam, LPARAM lParam ) { HWND hWnd = lphc->self->hwndSelf; TRACE("[%04x]: ownerdraw op %04x\n", CB_HWND(lphc), msg ); #define lpIS ((LPDELETEITEMSTRUCT)lParam) /* two first items are the same in all 4 structs */ lpIS->CtlType = ODT_COMBOBOX; lpIS->CtlID = lphc->self->wIDmenu; switch( msg ) /* patch window handle */ { case WM_DELETEITEM: lpIS->hwndItem = hWnd; #undef lpIS break; case WM_DRAWITEM: #define lpIS ((LPDRAWITEMSTRUCT)lParam) lpIS->hwndItem = hWnd; #undef lpIS break; case WM_COMPAREITEM: #define lpIS ((LPCOMPAREITEMSTRUCT)lParam) lpIS->hwndItem = hWnd; #undef lpIS break; } return SendMessageA( lphc->owner, msg, lphc->self->wIDmenu, lParam ); } /*********************************************************************** * COMBO_GetText */ static LRESULT COMBO_GetText( LPHEADCOMBO lphc, UINT N, LPSTR lpText) { if( lphc->wState & CBF_EDIT ) return SendMessageA( lphc->hWndEdit, WM_GETTEXT, (WPARAM)N, (LPARAM)lpText ); /* get it from the listbox */ if( lphc->hWndLBox ) { INT idx = SendMessageA( lphc->hWndLBox, LB_GETCURSEL, 0, 0 ); if( idx != LB_ERR ) { LPSTR lpBuffer; INT length = SendMessageA( lphc->hWndLBox, LB_GETTEXTLEN, (WPARAM)idx, 0 ); /* 'length' is without the terminating character */ if( length >= N ) lpBuffer = (LPSTR) HeapAlloc( GetProcessHeap(), 0, length + 1 ); else lpBuffer = lpText; if( lpBuffer ) { INT n = SendMessageA( lphc->hWndLBox, LB_GETTEXT, (WPARAM)idx, (LPARAM)lpBuffer ); /* truncate if buffer is too short */ if( length >= N ) { if (N && lpText) { if( n != LB_ERR ) memcpy( lpText, lpBuffer, (N>n) ? n+1 : N-1 ); lpText[N - 1] = '\0'; } HeapFree( GetProcessHeap(), 0, lpBuffer ); } return (LRESULT)n; } } } return 0; } /*********************************************************************** * CBResetPos * * This function sets window positions according to the updated * component placement struct. */ static void CBResetPos( LPHEADCOMBO lphc, LPRECT rectEdit, LPRECT rectLB, BOOL bRedraw) { BOOL bDrop = (CB_GETTYPE(lphc) != CBS_SIMPLE); /* NOTE: logs sometimes have WM_LBUTTONUP before a cascade of * sizing messages */ if( lphc->wState & CBF_EDIT ) SetWindowPos( lphc->hWndEdit, 0, rectEdit->left, rectEdit->top, rectEdit->right - rectEdit->left, rectEdit->bottom - rectEdit->top, SWP_NOZORDER | SWP_NOACTIVATE | ((bDrop) ? SWP_NOREDRAW : 0) ); SetWindowPos( lphc->hWndLBox, 0, rectLB->left, rectLB->top, rectLB->right - rectLB->left, rectLB->bottom - rectLB->top, SWP_NOACTIVATE | SWP_NOZORDER | ((bDrop) ? SWP_NOREDRAW : 0) ); if( bDrop ) { if( lphc->wState & CBF_DROPPED ) { lphc->wState &= ~CBF_DROPPED; ShowWindow( lphc->hWndLBox, SW_HIDE ); } if( bRedraw && !(lphc->wState & CBF_NOREDRAW) ) RedrawWindow( lphc->self->hwndSelf, NULL, 0, RDW_INVALIDATE | RDW_ERASE | RDW_UPDATENOW ); } } /*********************************************************************** * COMBO_Size */ static void COMBO_Size( LPHEADCOMBO lphc ) { CBCalcPlacement(lphc->self->hwndSelf, lphc, &lphc->textRect, &lphc->buttonRect, &lphc->droppedRect); CBResetPos( lphc, &lphc->textRect, &lphc->droppedRect, TRUE ); } /*********************************************************************** * COMBO_Font */ static void COMBO_Font( LPHEADCOMBO lphc, HFONT hFont, BOOL bRedraw ) { /* * Set the font */ lphc->hFont = hFont; /* * Propagate to owned windows. */ if( lphc->wState & CBF_EDIT ) SendMessageA( lphc->hWndEdit, WM_SETFONT, (WPARAM)hFont, bRedraw ); SendMessageA( lphc->hWndLBox, WM_SETFONT, (WPARAM)hFont, bRedraw ); /* * Redo the layout of the control. */ if ( CB_GETTYPE(lphc) == CBS_SIMPLE) { CBCalcPlacement(lphc->self->hwndSelf, lphc, &lphc->textRect, &lphc->buttonRect, &lphc->droppedRect); CBResetPos( lphc, &lphc->textRect, &lphc->droppedRect, TRUE ); } else { CBForceDummyResize(lphc); } } /*********************************************************************** * COMBO_SetItemHeight */ static LRESULT COMBO_SetItemHeight( LPHEADCOMBO lphc, INT index, INT height ) { LRESULT lRet = CB_ERR; if( index == -1 ) /* set text field height */ { if( height < 32768 ) { lphc->editHeight = height; /* * Redo the layout of the control. */ if ( CB_GETTYPE(lphc) == CBS_SIMPLE) { CBCalcPlacement(lphc->self->hwndSelf, lphc, &lphc->textRect, &lphc->buttonRect, &lphc->droppedRect); CBResetPos( lphc, &lphc->textRect, &lphc->droppedRect, TRUE ); } else { CBForceDummyResize(lphc); } lRet = height; } } else if ( CB_OWNERDRAWN(lphc) ) /* set listbox item height */ lRet = SendMessageA( lphc->hWndLBox, LB_SETITEMHEIGHT, (WPARAM)index, (LPARAM)height ); return lRet; } /*********************************************************************** * COMBO_SelectString */ static LRESULT COMBO_SelectString( LPHEADCOMBO lphc, INT start, LPCSTR pText ) { INT index = SendMessageA( lphc->hWndLBox, LB_SELECTSTRING, (WPARAM)start, (LPARAM)pText ); if( index >= 0 ) { if( lphc->wState & CBF_EDIT ) CBUpdateEdit( lphc, index ); else { InvalidateRect(CB_HWND(lphc), &lphc->textRect, TRUE); } } return (LRESULT)index; } /*********************************************************************** * COMBO_LButtonDown */ static void COMBO_LButtonDown( LPHEADCOMBO lphc, LPARAM lParam ) { POINT pt; BOOL bButton; HWND hWnd = lphc->self->hwndSelf; pt.x = LOWORD(lParam); pt.y = HIWORD(lParam); bButton = PtInRect(&lphc->buttonRect, pt); if( (CB_GETTYPE(lphc) == CBS_DROPDOWNLIST) || (bButton && (CB_GETTYPE(lphc) == CBS_DROPDOWN)) ) { lphc->wState |= CBF_BUTTONDOWN; if( lphc->wState & CBF_DROPPED ) { /* got a click to cancel selection */ lphc->wState &= ~CBF_BUTTONDOWN; CBRollUp( lphc, TRUE, FALSE ); if( !IsWindow( hWnd ) ) return; if( lphc->wState & CBF_CAPTURE ) { lphc->wState &= ~CBF_CAPTURE; ReleaseCapture(); } } else { /* drop down the listbox and start tracking */ lphc->wState |= CBF_CAPTURE; CBDropDown( lphc ); SetCapture( hWnd ); } if( bButton ) CBRepaintButton( lphc ); } } /*********************************************************************** * COMBO_LButtonUp * * Release capture and stop tracking if needed. */ static void COMBO_LButtonUp( LPHEADCOMBO lphc, LPARAM lParam ) { if( lphc->wState & CBF_CAPTURE ) { lphc->wState &= ~CBF_CAPTURE; if( CB_GETTYPE(lphc) == CBS_DROPDOWN ) { INT index = CBUpdateLBox( lphc ); CBUpdateEdit( lphc, index ); } ReleaseCapture(); SetCapture(lphc->hWndLBox); } if( lphc->wState & CBF_BUTTONDOWN ) { lphc->wState &= ~CBF_BUTTONDOWN; CBRepaintButton( lphc ); } } /*********************************************************************** * COMBO_MouseMove * * Two things to do - track combo button and release capture when * pointer goes into the listbox. */ static void COMBO_MouseMove( LPHEADCOMBO lphc, WPARAM wParam, LPARAM lParam ) { POINT pt; RECT lbRect; pt.x = LOWORD(lParam); pt.y = HIWORD(lParam); if( lphc->wState & CBF_BUTTONDOWN ) { BOOL bButton; bButton = PtInRect(&lphc->buttonRect, pt); if( !bButton ) { lphc->wState &= ~CBF_BUTTONDOWN; CBRepaintButton( lphc ); } } GetClientRect( lphc->hWndLBox, &lbRect ); MapWindowPoints( lphc->self->hwndSelf, lphc->hWndLBox, &pt, 1 ); if( PtInRect(&lbRect, pt) ) { lphc->wState &= ~CBF_CAPTURE; ReleaseCapture(); if( CB_GETTYPE(lphc) == CBS_DROPDOWN ) CBUpdateLBox( lphc ); /* hand over pointer tracking */ SendMessageA( lphc->hWndLBox, WM_LBUTTONDOWN, wParam, lParam ); } } /*********************************************************************** * ComboWndProc_locked * * http://www.microsoft.com/msdn/sdk/platforms/doc/sdk/win32/ctrl/src/combobox_15.htm */ static inline LRESULT WINAPI ComboWndProc_locked( WND* pWnd, UINT message, WPARAM wParam, LPARAM lParam ) { if( pWnd ) { LPHEADCOMBO lphc = CB_GETPTR(pWnd); HWND hwnd = pWnd->hwndSelf; TRACE("[%04x]: msg %s wp %08x lp %08lx\n", pWnd->hwndSelf, SPY_GetMsgName(message), wParam, lParam ); if( lphc || message == WM_NCCREATE ) switch(message) { /* System messages */ case WM_NCCREATE: return COMBO_NCCreate(pWnd, lParam); case WM_NCDESTROY: COMBO_NCDestroy(lphc); break;/* -> DefWindowProc */ case WM_CREATE: return COMBO_Create(lphc, pWnd, lParam); case WM_PRINTCLIENT: if (lParam & PRF_ERASEBKGND) COMBO_EraseBackground(hwnd, lphc, wParam); /* Fallthrough */ case WM_PAINT: /* wParam may contain a valid HDC! */ return COMBO_Paint(lphc, wParam); case WM_ERASEBKGND: return COMBO_EraseBackground(hwnd, lphc, wParam); case WM_GETDLGCODE: return (LRESULT)(DLGC_WANTARROWS | DLGC_WANTCHARS); case WM_WINDOWPOSCHANGING: return COMBO_WindowPosChanging(hwnd, lphc, (LPWINDOWPOS)lParam); case WM_SIZE: if( lphc->hWndLBox && !(lphc->wState & CBF_NORESIZE) ) COMBO_Size( lphc ); return TRUE; case WM_SETFONT: COMBO_Font( lphc, (HFONT16)wParam, (BOOL)lParam ); return TRUE; case WM_GETFONT: return (LRESULT)lphc->hFont; case WM_SETFOCUS: if( lphc->wState & CBF_EDIT ) SetFocus( lphc->hWndEdit ); else COMBO_SetFocus( lphc ); return TRUE; case WM_KILLFOCUS: #define hwndFocus ((HWND16)wParam) if( !hwndFocus || (hwndFocus != lphc->hWndEdit && hwndFocus != lphc->hWndLBox )) COMBO_KillFocus( lphc ); #undef hwndFocus return TRUE; case WM_COMMAND: return COMBO_Command( lphc, wParam, (HWND)lParam ); case WM_GETTEXT: return COMBO_GetText( lphc, (UINT)wParam, (LPSTR)lParam ); case WM_SETTEXT: case WM_GETTEXTLENGTH: case WM_CLEAR: case WM_CUT: case WM_PASTE: case WM_COPY: if ((message == WM_GETTEXTLENGTH) && !ISWIN31 && !(lphc->wState & CBF_EDIT)) { int j = SendMessageA( lphc->hWndLBox, LB_GETCURSEL, 0, 0 ); if (j == -1) return 0; return SendMessageA( lphc->hWndLBox, LB_GETTEXTLEN, j, 0); } else if( lphc->wState & CBF_EDIT ) { LRESULT ret; lphc->wState |= CBF_NOEDITNOTIFY; ret = SendMessageA( lphc->hWndEdit, message, wParam, lParam ); lphc->wState &= ~CBF_NOEDITNOTIFY; return ret; } else return CB_ERR; case WM_DRAWITEM: case WM_DELETEITEM: case WM_COMPAREITEM: case WM_MEASUREITEM: return COMBO_ItemOp( lphc, message, wParam, lParam ); case WM_ENABLE: if( lphc->wState & CBF_EDIT ) EnableWindow( lphc->hWndEdit, (BOOL)wParam ); EnableWindow( lphc->hWndLBox, (BOOL)wParam ); /* Force the control to repaint when the enabled state changes. */ InvalidateRect(CB_HWND(lphc), NULL, TRUE); return TRUE; case WM_SETREDRAW: if( wParam ) lphc->wState &= ~CBF_NOREDRAW; else lphc->wState |= CBF_NOREDRAW; if( lphc->wState & CBF_EDIT ) SendMessageA( lphc->hWndEdit, message, wParam, lParam ); SendMessageA( lphc->hWndLBox, message, wParam, lParam ); return 0; case WM_SYSKEYDOWN: if( KEYDATA_ALT & HIWORD(lParam) ) if( wParam == VK_UP || wParam == VK_DOWN ) COMBO_FlipListbox( lphc, TRUE ); break;/* -> DefWindowProc */ case WM_CHAR: case WM_KEYDOWN: if( lphc->wState & CBF_EDIT ) return SendMessageA( lphc->hWndEdit, message, wParam, lParam ); else return SendMessageA( lphc->hWndLBox, message, wParam, lParam ); case WM_LBUTTONDOWN: if( !(lphc->wState & CBF_FOCUSED) ) SetFocus( lphc->self->hwndSelf ); if( lphc->wState & CBF_FOCUSED ) COMBO_LButtonDown( lphc, lParam ); return TRUE; case WM_LBUTTONUP: COMBO_LButtonUp( lphc, lParam ); return TRUE; case WM_MOUSEMOVE: if( lphc->wState & CBF_CAPTURE ) COMBO_MouseMove( lphc, wParam, lParam ); return TRUE; case WM_MOUSEWHEEL: if (wParam & (MK_SHIFT | MK_CONTROL)) return DefWindowProcA( hwnd, message, wParam, lParam ); if ((short) HIWORD(wParam) > 0) return SendMessageA(hwnd,WM_KEYDOWN,VK_UP,0); if ((short) HIWORD(wParam) < 0) return SendMessageA(hwnd,WM_KEYDOWN,VK_DOWN,0); return TRUE; /* Combo messages */ case CB_ADDSTRING16: if( CB_HASSTRINGS(lphc) ) lParam = (LPARAM)PTR_SEG_TO_LIN(lParam); case CB_ADDSTRING: return SendMessageA( lphc->hWndLBox, LB_ADDSTRING, 0, lParam); case CB_INSERTSTRING16: wParam = (INT)(INT16)wParam; if( CB_HASSTRINGS(lphc) ) lParam = (LPARAM)PTR_SEG_TO_LIN(lParam); case CB_INSERTSTRING: return SendMessageA( lphc->hWndLBox, LB_INSERTSTRING, wParam, lParam); case CB_DELETESTRING16: case CB_DELETESTRING: return SendMessageA( lphc->hWndLBox, LB_DELETESTRING, wParam, 0); case CB_SELECTSTRING16: wParam = (INT)(INT16)wParam; if( CB_HASSTRINGS(lphc) ) lParam = (LPARAM)PTR_SEG_TO_LIN(lParam); case CB_SELECTSTRING: return COMBO_SelectString( lphc, (INT)wParam, (LPSTR)lParam ); case CB_FINDSTRING16: wParam = (INT)(INT16)wParam; if( CB_HASSTRINGS(lphc) ) lParam = (LPARAM)PTR_SEG_TO_LIN(lParam); case CB_FINDSTRING: return SendMessageA( lphc->hWndLBox, LB_FINDSTRING, wParam, lParam); case CB_FINDSTRINGEXACT16: wParam = (INT)(INT16)wParam; if( CB_HASSTRINGS(lphc) ) lParam = (LPARAM)PTR_SEG_TO_LIN(lParam); case CB_FINDSTRINGEXACT: return SendMessageA( lphc->hWndLBox, LB_FINDSTRINGEXACT, wParam, lParam ); case CB_SETITEMHEIGHT16: wParam = (INT)(INT16)wParam; /* signed integer */ case CB_SETITEMHEIGHT: return COMBO_SetItemHeight( lphc, (INT)wParam, (INT)lParam); case CB_GETITEMHEIGHT16: wParam = (INT)(INT16)wParam; case CB_GETITEMHEIGHT: if( (INT)wParam >= 0 ) /* listbox item */ return SendMessageA( lphc->hWndLBox, LB_GETITEMHEIGHT, wParam, 0); return CBGetTextAreaHeight(hwnd, lphc); case CB_RESETCONTENT16: case CB_RESETCONTENT: SendMessageA( lphc->hWndLBox, LB_RESETCONTENT, 0, 0 ); InvalidateRect(CB_HWND(lphc), NULL, TRUE); return TRUE; case CB_INITSTORAGE: return SendMessageA( lphc->hWndLBox, LB_INITSTORAGE, wParam, lParam); case CB_GETHORIZONTALEXTENT: return SendMessageA( lphc->hWndLBox, LB_GETHORIZONTALEXTENT, 0, 0); case CB_SETHORIZONTALEXTENT: return SendMessageA( lphc->hWndLBox, LB_SETHORIZONTALEXTENT, wParam, 0); case CB_GETTOPINDEX: return SendMessageA( lphc->hWndLBox, LB_GETTOPINDEX, 0, 0); case CB_GETLOCALE: return SendMessageA( lphc->hWndLBox, LB_GETLOCALE, 0, 0); case CB_SETLOCALE: return SendMessageA( lphc->hWndLBox, LB_SETLOCALE, wParam, 0); case CB_GETDROPPEDWIDTH: if( lphc->droppedWidth ) return lphc->droppedWidth; return lphc->droppedRect.right - lphc->droppedRect.left; case CB_SETDROPPEDWIDTH: if( (CB_GETTYPE(lphc) != CBS_SIMPLE) && (INT)wParam < 32768 ) lphc->droppedWidth = (INT)wParam; return CB_ERR; case CB_GETDROPPEDCONTROLRECT16: lParam = (LPARAM)PTR_SEG_TO_LIN(lParam); if( lParam ) { RECT r; CBGetDroppedControlRect( lphc, &r ); CONV_RECT32TO16( &r, (LPRECT16)lParam ); } return CB_OKAY; case CB_GETDROPPEDCONTROLRECT: if( lParam ) CBGetDroppedControlRect(lphc, (LPRECT)lParam ); return CB_OKAY; case CB_GETDROPPEDSTATE16: case CB_GETDROPPEDSTATE: return (lphc->wState & CBF_DROPPED) ? TRUE : FALSE; case CB_DIR16: lParam = (LPARAM)PTR_SEG_TO_LIN(lParam); /* fall through */ case CB_DIR: return COMBO_Directory( lphc, (UINT)wParam, (LPSTR)lParam, (message == CB_DIR)); case CB_SHOWDROPDOWN16: case CB_SHOWDROPDOWN: if( CB_GETTYPE(lphc) != CBS_SIMPLE ) { if( wParam ) { if( !(lphc->wState & CBF_DROPPED) ) CBDropDown( lphc ); } else if( lphc->wState & CBF_DROPPED ) CBRollUp( lphc, FALSE, TRUE ); } return TRUE; case CB_GETCOUNT16: case CB_GETCOUNT: return SendMessageA( lphc->hWndLBox, LB_GETCOUNT, 0, 0); case CB_GETCURSEL16: case CB_GETCURSEL: return SendMessageA( lphc->hWndLBox, LB_GETCURSEL, 0, 0); case CB_SETCURSEL16: wParam = (INT)(INT16)wParam; case CB_SETCURSEL: lParam = SendMessageA( lphc->hWndLBox, LB_SETCURSEL, wParam, 0); if( lphc->wState & CBF_SELCHANGE ) { /* no LBN_SELCHANGE in this case, update manually */ if( lphc->wState & CBF_EDIT ) CBUpdateEdit( lphc, (INT)wParam ); else InvalidateRect(CB_HWND(lphc), &lphc->textRect, TRUE); lphc->wState &= ~CBF_SELCHANGE; } return lParam; case CB_GETLBTEXT16: wParam = (INT)(INT16)wParam; lParam = (LPARAM)PTR_SEG_TO_LIN(lParam); case CB_GETLBTEXT: return SendMessageA( lphc->hWndLBox, LB_GETTEXT, wParam, lParam); case CB_GETLBTEXTLEN16: wParam = (INT)(INT16)wParam; case CB_GETLBTEXTLEN: return SendMessageA( lphc->hWndLBox, LB_GETTEXTLEN, wParam, 0); case CB_GETITEMDATA16: wParam = (INT)(INT16)wParam; case CB_GETITEMDATA: return SendMessageA( lphc->hWndLBox, LB_GETITEMDATA, wParam, 0); case CB_SETITEMDATA16: wParam = (INT)(INT16)wParam; case CB_SETITEMDATA: return SendMessageA( lphc->hWndLBox, LB_SETITEMDATA, wParam, lParam); case CB_GETEDITSEL16: wParam = lParam = 0; /* just in case */ case CB_GETEDITSEL: if( lphc->wState & CBF_EDIT ) { INT a, b; return SendMessageA( lphc->hWndEdit, EM_GETSEL, (wParam) ? wParam : (WPARAM)&a, (lParam) ? lParam : (LPARAM)&b ); } return CB_ERR; case CB_SETEDITSEL16: case CB_SETEDITSEL: if( lphc->wState & CBF_EDIT ) return SendMessageA( lphc->hWndEdit, EM_SETSEL, (INT)(INT16)LOWORD(lParam), (INT)(INT16)HIWORD(lParam) ); return CB_ERR; case CB_SETEXTENDEDUI16: case CB_SETEXTENDEDUI: if( CB_GETTYPE(lphc) == CBS_SIMPLE ) return CB_ERR; if( wParam ) lphc->wState |= CBF_EUI; else lphc->wState &= ~CBF_EUI; return CB_OKAY; case CB_GETEXTENDEDUI16: case CB_GETEXTENDEDUI: return (lphc->wState & CBF_EUI) ? TRUE : FALSE; default: if (message >= WM_USER) WARN("unknown msg WM_USER+%04x wp=%04x lp=%08lx\n", message - WM_USER, wParam, lParam ); break; } return DefWindowProcA(hwnd, message, wParam, lParam); } return CB_ERR; } /*********************************************************************** * ComboWndProc * * This is just a wrapper for the real ComboWndProc which locks/unlocks * window structs. */ LRESULT WINAPI ComboWndProc( HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam ) { WND* pWnd = WIN_FindWndPtr(hwnd); LRESULT retvalue = ComboWndProc_locked(pWnd,message,wParam,lParam); WIN_ReleaseWndPtr(pWnd); return retvalue; } wine-20000526/controls/desktop.c0100644000175000001440000002024207070212243016117 0ustar julliardusers/* * Desktop window class. * * Copyright 1994 Alexandre Julliard */ #include #include #include #include "desktop.h" #include "windef.h" #include "wingdi.h" #include "heap.h" #include "user.h" #include "win.h" #include "wine/winuser16.h" /*********************************************************************** * DESKTOP_LoadBitmap * * Load a bitmap from a file. Used by SetDeskWallPaper(). */ static HBITMAP DESKTOP_LoadBitmap( HDC hdc, const char *filename ) { BITMAPFILEHEADER *fileHeader; BITMAPINFO *bitmapInfo; HBITMAP hbitmap; HFILE file; LPSTR buffer; LONG size; /* Read all the file into memory */ if ((file = _lopen( filename, OF_READ )) == HFILE_ERROR) { UINT len = GetWindowsDirectoryA( NULL, 0 ); if (!(buffer = HeapAlloc( GetProcessHeap(), 0, len + strlen(filename) + 2 ))) return 0; GetWindowsDirectoryA( buffer, len + 1 ); strcat( buffer, "\\" ); strcat( buffer, filename ); file = _lopen( buffer, OF_READ ); HeapFree( GetProcessHeap(), 0, buffer ); } if (file == HFILE_ERROR) return 0; size = _llseek( file, 0, 2 ); if (!(buffer = HeapAlloc( GetProcessHeap(), 0, size ))) { _lclose( file ); return 0; } _llseek( file, 0, 0 ); size = _lread( file, buffer, size ); _lclose( file ); fileHeader = (BITMAPFILEHEADER *)buffer; bitmapInfo = (BITMAPINFO *)(buffer + sizeof(BITMAPFILEHEADER)); /* Check header content */ if ((fileHeader->bfType != 0x4d42) || (size < fileHeader->bfSize)) { HeapFree( GetProcessHeap(), 0, buffer ); return 0; } hbitmap = CreateDIBitmap( hdc, &bitmapInfo->bmiHeader, CBM_INIT, buffer + fileHeader->bfOffBits, bitmapInfo, DIB_RGB_COLORS ); HeapFree( GetProcessHeap(), 0, buffer ); return hbitmap; } /*********************************************************************** * DESKTOP_DoEraseBkgnd * * Handle the WM_ERASEBKGND message. */ static LRESULT DESKTOP_DoEraseBkgnd( HWND hwnd, HDC hdc, DESKTOP *desktopPtr ) { RECT rect; WND* Wnd = WIN_FindWndPtr( hwnd ); if (Wnd->hrgnUpdate > 1) DeleteObject( Wnd->hrgnUpdate ); Wnd->hrgnUpdate = 0; WIN_ReleaseWndPtr(Wnd); GetClientRect( hwnd, &rect ); /* Paint desktop pattern (only if wall paper does not cover everything) */ if (!desktopPtr->hbitmapWallPaper || (!desktopPtr->fTileWallPaper && ((desktopPtr->bitmapSize.cx < rect.right) || (desktopPtr->bitmapSize.cy < rect.bottom)))) { /* Set colors in case pattern is a monochrome bitmap */ SetBkColor( hdc, RGB(0,0,0) ); SetTextColor( hdc, GetSysColor(COLOR_BACKGROUND) ); FillRect( hdc, &rect, desktopPtr->hbrushPattern ); } /* Paint wall paper */ if (desktopPtr->hbitmapWallPaper) { INT x, y; HDC hMemDC = CreateCompatibleDC( hdc ); SelectObject( hMemDC, desktopPtr->hbitmapWallPaper ); if (desktopPtr->fTileWallPaper) { for (y = 0; y < rect.bottom; y += desktopPtr->bitmapSize.cy) for (x = 0; x < rect.right; x += desktopPtr->bitmapSize.cx) BitBlt( hdc, x, y, desktopPtr->bitmapSize.cx, desktopPtr->bitmapSize.cy, hMemDC, 0, 0, SRCCOPY ); } else { x = (rect.left + rect.right - desktopPtr->bitmapSize.cx) / 2; y = (rect.top + rect.bottom - desktopPtr->bitmapSize.cy) / 2; if (x < 0) x = 0; if (y < 0) y = 0; BitBlt( hdc, x, y, desktopPtr->bitmapSize.cx, desktopPtr->bitmapSize.cy, hMemDC, 0, 0, SRCCOPY ); } DeleteDC( hMemDC ); } return 1; } /*********************************************************************** * DesktopWndProc_locked * * Window procedure for the desktop window. */ static inline LRESULT WINAPI DesktopWndProc_locked( WND *wndPtr, UINT message, WPARAM wParam, LPARAM lParam ) { DESKTOP *desktopPtr = (DESKTOP *)wndPtr->wExtra; HWND hwnd = wndPtr->hwndSelf; /* Most messages are ignored (we DON'T call DefWindowProc) */ switch(message) { /* Warning: this message is sent directly by */ /* WIN_CreateDesktopWindow() and does not contain a valid lParam */ case WM_NCCREATE: desktopPtr->hbrushPattern = 0; desktopPtr->hbitmapWallPaper = 0; SetDeskPattern(); SetDeskWallPaper( (LPSTR)-1 ); return 1; case WM_ERASEBKGND: if(!USER_Driver->pIsSingleWindow()) return 1; return DESKTOP_DoEraseBkgnd( hwnd, (HDC)wParam, desktopPtr ); case WM_SYSCOMMAND: if ((wParam & 0xfff0) != SC_CLOSE) return 0; ExitWindows16( 0, 0 ); case WM_SETCURSOR: return (LRESULT)SetCursor16( LoadCursor16( 0, IDC_ARROW16 ) ); } return 0; } /*********************************************************************** * DesktopWndProc * * This is just a wrapper for the DesktopWndProc which does windows * locking and unlocking. */ LRESULT WINAPI DesktopWndProc( HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam ) { WND *wndPtr = WIN_FindWndPtr( hwnd ); LRESULT retvalue = DesktopWndProc_locked(wndPtr,message,wParam,lParam); WIN_ReleaseWndPtr(wndPtr); return retvalue; } /*********************************************************************** * PaintDesktop (USER32.415) * */ BOOL WINAPI PaintDesktop(HDC hdc) { BOOL retvalue; HWND hwnd = GetDesktopWindow(); WND *wndPtr = WIN_FindWndPtr( hwnd ); DESKTOP *desktopPtr = (DESKTOP *)wndPtr->wExtra; retvalue = DESKTOP_DoEraseBkgnd( hwnd, hdc, desktopPtr ); WIN_ReleaseWndPtr(wndPtr); return retvalue; } /*********************************************************************** * SetDeskPattern (USER.279) */ BOOL16 WINAPI SetDeskPattern(void) { char buffer[100]; GetProfileStringA( "desktop", "Pattern", "(None)", buffer, 100 ); return DESKTOP_SetPattern( buffer ); } /*********************************************************************** * SetDeskWallPaper16 (USER.285) */ BOOL16 WINAPI SetDeskWallPaper16( LPCSTR filename ) { return SetDeskWallPaper( filename ); } /*********************************************************************** * SetDeskWallPaper (USER32.475) * * FIXME: is there a unicode version? */ BOOL WINAPI SetDeskWallPaper( LPCSTR filename ) { HBITMAP hbitmap; HDC hdc; char buffer[256]; WND *wndPtr = WIN_GetDesktop(); DESKTOP *desktopPtr = (DESKTOP *)wndPtr->wExtra; if (filename == (LPSTR)-1) { GetProfileStringA( "desktop", "WallPaper", "(None)", buffer, 256 ); filename = buffer; } hdc = GetDC( 0 ); hbitmap = DESKTOP_LoadBitmap( hdc, filename ); ReleaseDC( 0, hdc ); if (desktopPtr->hbitmapWallPaper) DeleteObject( desktopPtr->hbitmapWallPaper ); desktopPtr->hbitmapWallPaper = hbitmap; desktopPtr->fTileWallPaper = GetProfileIntA( "desktop", "TileWallPaper", 0 ); if (hbitmap) { BITMAP bmp; GetObjectA( hbitmap, sizeof(bmp), &bmp ); desktopPtr->bitmapSize.cx = (bmp.bmWidth != 0) ? bmp.bmWidth : 1; desktopPtr->bitmapSize.cy = (bmp.bmHeight != 0) ? bmp.bmHeight : 1; } WIN_ReleaseDesktop(); return TRUE; } /*********************************************************************** * DESKTOP_SetPattern * * Set the desktop pattern. */ BOOL DESKTOP_SetPattern( LPCSTR pattern ) { WND *wndPtr = WIN_GetDesktop(); DESKTOP *desktopPtr = (DESKTOP *)wndPtr->wExtra; int pat[8]; if (desktopPtr->hbrushPattern) DeleteObject( desktopPtr->hbrushPattern ); memset( pat, 0, sizeof(pat) ); if (pattern && sscanf( pattern, " %d %d %d %d %d %d %d %d", &pat[0], &pat[1], &pat[2], &pat[3], &pat[4], &pat[5], &pat[6], &pat[7] )) { WORD pattern[8]; HBITMAP hbitmap; int i; for (i = 0; i < 8; i++) pattern[i] = pat[i] & 0xffff; hbitmap = CreateBitmap( 8, 8, 1, 1, (LPSTR)pattern ); desktopPtr->hbrushPattern = CreatePatternBrush( hbitmap ); DeleteObject( hbitmap ); } else desktopPtr->hbrushPattern = CreateSolidBrush( GetSysColor(COLOR_BACKGROUND) ); WIN_ReleaseDesktop(); return TRUE; } wine-20000526/controls/edit.c0100644000175000001440000034006707113351150015404 0ustar julliardusers/* * Edit control * * Copyright David W. Metcalfe, 1994 * Copyright William Magro, 1995, 1996 * Copyright Frans van Dorsselaer, 1996, 1997 * */ /* * please read EDIT.TODO (and update it when you change things) */ #include "config.h" #include #include "winbase.h" #include "winnt.h" #include "win.h" #include "wine/winbase16.h" #include "combo.h" #include "local.h" #include "selectors.h" #include "debugtools.h" #include "callback.h" #include "tweak.h" #include "winversion.h" DEFAULT_DEBUG_CHANNEL(edit) DECLARE_DEBUG_CHANNEL(combo) DECLARE_DEBUG_CHANNEL(relay) #define BUFLIMIT_MULTI 65534 /* maximum buffer size (not including '\0') FIXME: BTW, new specs say 65535 (do you dare ???) */ #define BUFLIMIT_SINGLE 32766 /* maximum buffer size (not including '\0') */ #define BUFSTART_MULTI 1024 /* starting size */ #define BUFSTART_SINGLE 256 /* starting size */ #define GROWLENGTH 64 /* buffers grow by this much */ #define HSCROLL_FRACTION 3 /* scroll window by 1/3 width */ /* * extra flags for EDITSTATE.flags field */ #define EF_MODIFIED 0x0001 /* text has been modified */ #define EF_FOCUSED 0x0002 /* we have input focus */ #define EF_UPDATE 0x0004 /* notify parent of changed state on next WM_PAINT */ #define EF_VSCROLL_TRACK 0x0008 /* don't SetScrollPos() since we are tracking the thumb */ #define EF_HSCROLL_TRACK 0x0010 /* don't SetScrollPos() since we are tracking the thumb */ #define EF_VSCROLL_HACK 0x0020 /* we already have informed the user of the hacked handler */ #define EF_HSCROLL_HACK 0x0040 /* we already have informed the user of the hacked handler */ #define EF_AFTER_WRAP 0x0080 /* the caret is displayed after the last character of a wrapped line, instead of in front of the next character */ #define EF_USE_SOFTBRK 0x0100 /* Enable soft breaks in text. */ typedef enum { END_0 = 0, /* line ends with terminating '\0' character */ END_WRAP, /* line is wrapped */ END_HARD, /* line ends with a hard return '\r\n' */ END_SOFT /* line ends with a soft return '\r\r\n' */ } LINE_END; typedef struct tagLINEDEF { INT length; /* bruto length of a line in bytes */ INT net_length; /* netto length of a line in visible characters */ LINE_END ending; INT width; /* width of the line in pixels */ struct tagLINEDEF *next; } LINEDEF; typedef struct { HANDLE heap; /* our own heap */ LPSTR text; /* the actual contents of the control */ INT buffer_size; /* the size of the buffer */ INT buffer_limit; /* the maximum size to which the buffer may grow */ HFONT font; /* NULL means standard system font */ INT x_offset; /* scroll offset for multi lines this is in pixels for single lines it's in characters */ INT line_height; /* height of a screen line in pixels */ INT char_width; /* average character width in pixels */ DWORD style; /* sane version of wnd->dwStyle */ WORD flags; /* flags that are not in es->style or wnd->flags (EF_XXX) */ INT undo_insert_count; /* number of characters inserted in sequence */ INT undo_position; /* character index of the insertion and deletion */ LPSTR undo_text; /* deleted text */ INT undo_buffer_size; /* size of the deleted text buffer */ INT selection_start; /* == selection_end if no selection */ INT selection_end; /* == current caret position */ CHAR password_char; /* == 0 if no password char, and for multi line controls */ INT left_margin; /* in pixels */ INT right_margin; /* in pixels */ RECT format_rect; INT region_posx; /* Position of cursor relative to region: */ INT region_posy; /* -1: to left, 0: within, 1: to right */ EDITWORDBREAKPROC16 word_break_proc16; EDITWORDBREAKPROCA word_break_proc32A; INT line_count; /* number of lines */ INT y_offset; /* scroll offset in number of lines */ BOOL bCaptureState; /* flag indicating whether mouse was captured */ BOOL bEnableState; /* flag keeping the enable state */ /* * only for multi line controls */ INT lock_count; /* amount of re-entries in the EditWndProc */ INT tabs_count; LPINT tabs; INT text_width; /* width of the widest line in pixels */ LINEDEF *first_line_def; /* linked list of (soft) linebreaks */ HLOCAL16 hloc16; /* for controls receiving EM_GETHANDLE16 */ HLOCAL hloc32; /* for controls receiving EM_GETHANDLE */ } EDITSTATE; #define SWAP_INT32(x,y) do { INT temp = (INT)(x); (x) = (INT)(y); (y) = temp; } while(0) #define ORDER_INT(x,y) do { if ((INT)(y) < (INT)(x)) SWAP_INT32((x),(y)); } while(0) #define SWAP_UINT32(x,y) do { UINT temp = (UINT)(x); (x) = (UINT)(y); (y) = temp; } while(0) #define ORDER_UINT(x,y) do { if ((UINT)(y) < (UINT)(x)) SWAP_UINT32((x),(y)); } while(0) #define DPRINTF_EDIT_NOTIFY(hwnd, str) \ do {TRACE("notification " str " sent to hwnd=%08x\n", \ (UINT)(hwnd));} while(0) /* used for disabled or read-only edit control */ #define EDIT_SEND_CTLCOLORSTATIC(wnd,hdc) \ (SendMessageA((wnd)->parent->hwndSelf, WM_CTLCOLORSTATIC, \ (WPARAM)(hdc), (LPARAM)(wnd)->hwndSelf)) #define EDIT_SEND_CTLCOLOR(wnd,hdc) \ (SendMessageA((wnd)->parent->hwndSelf, WM_CTLCOLOREDIT, \ (WPARAM)(hdc), (LPARAM)(wnd)->hwndSelf)) #define EDIT_NOTIFY_PARENT(wnd, wNotifyCode, str) \ do {DPRINTF_EDIT_NOTIFY((wnd)->parent->hwndSelf, str); \ SendMessageA((wnd)->parent->hwndSelf, WM_COMMAND, \ MAKEWPARAM((wnd)->wIDmenu, wNotifyCode), \ (LPARAM)(wnd)->hwndSelf);} while(0) #define DPRINTF_EDIT_MSG16(str) \ TRACE(\ "16 bit : " str ": hwnd=%08x, wParam=%08x, lParam=%08x\n", \ (UINT)hwnd, (UINT)wParam, (UINT)lParam) #define DPRINTF_EDIT_MSG32(str) \ TRACE(\ "32 bit : " str ": hwnd=%08x, wParam=%08x, lParam=%08x\n", \ (UINT)hwnd, (UINT)wParam, (UINT)lParam) /********************************************************************* * * Declarations * */ /* * These functions have trivial implementations * We still like to call them internally * "static inline" makes them more like macro's */ static inline BOOL EDIT_EM_CanUndo(WND *wnd, EDITSTATE *es); static inline void EDIT_EM_EmptyUndoBuffer(WND *wnd, EDITSTATE *es); static inline void EDIT_WM_Clear(WND *wnd, EDITSTATE *es); static inline void EDIT_WM_Cut(WND *wnd, EDITSTATE *es); /* * Helper functions only valid for one type of control */ static void EDIT_BuildLineDefs_ML(WND *wnd, EDITSTATE *es); static LPSTR EDIT_GetPasswordPointer_SL(WND *wnd, EDITSTATE *es); static void EDIT_MoveDown_ML(WND *wnd, EDITSTATE *es, BOOL extend); static void EDIT_MovePageDown_ML(WND *wnd, EDITSTATE *es, BOOL extend); static void EDIT_MovePageUp_ML(WND *wnd, EDITSTATE *es, BOOL extend); static void EDIT_MoveUp_ML(WND *wnd, EDITSTATE *es, BOOL extend); /* * Helper functions valid for both single line _and_ multi line controls */ static INT EDIT_CallWordBreakProc(WND *wnd, EDITSTATE *es, INT start, INT index, INT count, INT action); static INT EDIT_CharFromPos(WND *wnd, EDITSTATE *es, INT x, INT y, LPBOOL after_wrap); static void EDIT_ConfinePoint(WND *wnd, EDITSTATE *es, LPINT x, LPINT y); static void EDIT_GetLineRect(WND *wnd, EDITSTATE *es, INT line, INT scol, INT ecol, LPRECT rc); static void EDIT_InvalidateText(WND *wnd, EDITSTATE *es, INT start, INT end); static void EDIT_LockBuffer(WND *wnd, EDITSTATE *es); static BOOL EDIT_MakeFit(WND *wnd, EDITSTATE *es, INT size); static BOOL EDIT_MakeUndoFit(WND *wnd, EDITSTATE *es, INT size); static void EDIT_MoveBackward(WND *wnd, EDITSTATE *es, BOOL extend); static void EDIT_MoveEnd(WND *wnd, EDITSTATE *es, BOOL extend); static void EDIT_MoveForward(WND *wnd, EDITSTATE *es, BOOL extend); static void EDIT_MoveHome(WND *wnd, EDITSTATE *es, BOOL extend); static void EDIT_MoveWordBackward(WND *wnd, EDITSTATE *es, BOOL extend); static void EDIT_MoveWordForward(WND *wnd, EDITSTATE *es, BOOL extend); static void EDIT_PaintLine(WND *wnd, EDITSTATE *es, HDC hdc, INT line, BOOL rev); static INT EDIT_PaintText(WND *wnd, EDITSTATE *es, HDC hdc, INT x, INT y, INT line, INT col, INT count, BOOL rev); static void EDIT_SetCaretPos(WND *wnd, EDITSTATE *es, INT pos, BOOL after_wrap); static void EDIT_SetRectNP(WND *wnd, EDITSTATE *es, LPRECT lprc); static void EDIT_UnlockBuffer(WND *wnd, EDITSTATE *es, BOOL force); static INT EDIT_WordBreakProc(LPSTR s, INT index, INT count, INT action); /* * EM_XXX message handlers */ static LRESULT EDIT_EM_CharFromPos(WND *wnd, EDITSTATE *es, INT x, INT y); static BOOL EDIT_EM_FmtLines(WND *wnd, EDITSTATE *es, BOOL add_eol); static HLOCAL EDIT_EM_GetHandle(WND *wnd, EDITSTATE *es); static HLOCAL16 EDIT_EM_GetHandle16(WND *wnd, EDITSTATE *es); static INT EDIT_EM_GetLine(WND *wnd, EDITSTATE *es, INT line, LPSTR lpch); static LRESULT EDIT_EM_GetSel(WND *wnd, EDITSTATE *es, LPUINT start, LPUINT end); static LRESULT EDIT_EM_GetThumb(WND *wnd, EDITSTATE *es); static INT EDIT_EM_LineFromChar(WND *wnd, EDITSTATE *es, INT index); static INT EDIT_EM_LineIndex(WND *wnd, EDITSTATE *es, INT line); static INT EDIT_EM_LineLength(WND *wnd, EDITSTATE *es, INT index); static BOOL EDIT_EM_LineScroll(WND *wnd, EDITSTATE *es, INT dx, INT dy); static LRESULT EDIT_EM_PosFromChar(WND *wnd, EDITSTATE *es, INT index, BOOL after_wrap); static void EDIT_EM_ReplaceSel(WND *wnd, EDITSTATE *es, BOOL can_undo, LPCSTR lpsz_replace); static LRESULT EDIT_EM_Scroll(WND *wnd, EDITSTATE *es, INT action); static void EDIT_EM_ScrollCaret(WND *wnd, EDITSTATE *es); static void EDIT_EM_SetHandle(WND *wnd, EDITSTATE *es, HLOCAL hloc); static void EDIT_EM_SetHandle16(WND *wnd, EDITSTATE *es, HLOCAL16 hloc); static void EDIT_EM_SetLimitText(WND *wnd, EDITSTATE *es, INT limit); static void EDIT_EM_SetMargins(WND *wnd, EDITSTATE *es, INT action, INT left, INT right); static void EDIT_EM_SetPasswordChar(WND *wnd, EDITSTATE *es, CHAR c); static void EDIT_EM_SetSel(WND *wnd, EDITSTATE *es, UINT start, UINT end, BOOL after_wrap); static BOOL EDIT_EM_SetTabStops(WND *wnd, EDITSTATE *es, INT count, LPINT tabs); static BOOL EDIT_EM_SetTabStops16(WND *wnd, EDITSTATE *es, INT count, LPINT16 tabs); static void EDIT_EM_SetWordBreakProc(WND *wnd, EDITSTATE *es, EDITWORDBREAKPROCA wbp); static void EDIT_EM_SetWordBreakProc16(WND *wnd, EDITSTATE *es, EDITWORDBREAKPROC16 wbp); static BOOL EDIT_EM_Undo(WND *wnd, EDITSTATE *es); /* * WM_XXX message handlers */ static void EDIT_WM_Char(WND *wnd, EDITSTATE *es, CHAR c, DWORD key_data); static void EDIT_WM_Command(WND *wnd, EDITSTATE *es, INT code, INT id, HWND conrtol); static void EDIT_WM_ContextMenu(WND *wnd, EDITSTATE *es, HWND hwnd, INT x, INT y); static void EDIT_WM_Copy(WND *wnd, EDITSTATE *es); static LRESULT EDIT_WM_Create(WND *wnd, EDITSTATE *es, LPCREATESTRUCTA cs); static void EDIT_WM_Destroy(WND *wnd, EDITSTATE *es); static LRESULT EDIT_WM_EraseBkGnd(WND *wnd, EDITSTATE *es, HDC dc); static INT EDIT_WM_GetText(WND *wnd, EDITSTATE *es, INT count, LPSTR text); static LRESULT EDIT_WM_HScroll(WND *wnd, EDITSTATE *es, INT action, INT pos, HWND scroll_bar); static LRESULT EDIT_WM_KeyDown(WND *wnd, EDITSTATE *es, INT key, DWORD key_data); static LRESULT EDIT_WM_KillFocus(WND *wnd, EDITSTATE *es, HWND window_getting_focus); static LRESULT EDIT_WM_LButtonDblClk(WND *wnd, EDITSTATE *es, DWORD keys, INT x, INT y); static LRESULT EDIT_WM_LButtonDown(WND *wnd, EDITSTATE *es, DWORD keys, INT x, INT y); static LRESULT EDIT_WM_LButtonUp(WND *wnd, EDITSTATE *es, DWORD keys, INT x, INT y); static LRESULT EDIT_WM_MButtonDown(WND *wnd); static LRESULT EDIT_WM_MouseMove(WND *wnd, EDITSTATE *es, DWORD keys, INT x, INT y); static LRESULT EDIT_WM_NCCreate(WND *wnd, LPCREATESTRUCTA cs); static void EDIT_WM_Paint(WND *wnd, EDITSTATE *es, WPARAM wParam); static void EDIT_WM_Paste(WND *wnd, EDITSTATE *es); static void EDIT_WM_SetFocus(WND *wnd, EDITSTATE *es, HWND window_losing_focus); static void EDIT_WM_SetFont(WND *wnd, EDITSTATE *es, HFONT font, BOOL redraw); static void EDIT_WM_SetText(WND *wnd, EDITSTATE *es, LPCSTR text); static void EDIT_WM_Size(WND *wnd, EDITSTATE *es, UINT action, INT width, INT height); static LRESULT EDIT_WM_SysKeyDown(WND *wnd, EDITSTATE *es, INT key, DWORD key_data); static void EDIT_WM_Timer(WND *wnd, EDITSTATE *es, INT id, TIMERPROC timer_proc); static LRESULT EDIT_WM_VScroll(WND *wnd, EDITSTATE *es, INT action, INT pos, HWND scroll_bar); static void EDIT_UpdateText(WND *wnd, LPRECT rc, BOOL bErase); /********************************************************************* * * EM_CANUNDO * */ static inline BOOL EDIT_EM_CanUndo(WND *wnd, EDITSTATE *es) { return (es->undo_insert_count || lstrlenA(es->undo_text)); } /********************************************************************* * * EM_EMPTYUNDOBUFFER * */ static inline void EDIT_EM_EmptyUndoBuffer(WND *wnd, EDITSTATE *es) { es->undo_insert_count = 0; *es->undo_text = '\0'; } /********************************************************************* * * WM_CLEAR * */ static inline void EDIT_WM_Clear(WND *wnd, EDITSTATE *es) { EDIT_EM_ReplaceSel(wnd, es, TRUE, ""); if (es->flags & EF_UPDATE) { es->flags &= ~EF_UPDATE; EDIT_NOTIFY_PARENT(wnd, EN_CHANGE, "EN_CHANGE"); } } /********************************************************************* * * WM_CUT * */ static inline void EDIT_WM_Cut(WND *wnd, EDITSTATE *es) { EDIT_WM_Copy(wnd, es); EDIT_WM_Clear(wnd, es); } /********************************************************************* * * EditWndProc() * * The messages are in the order of the actual integer values * (which can be found in include/windows.h) * Whereever possible the 16 bit versions are converted to * the 32 bit ones, so that we can 'fall through' to the * helper functions. These are mostly 32 bit (with a few * exceptions, clearly indicated by a '16' extension to their * names). * */ LRESULT WINAPI EditWndProc( HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam ) { WND *wnd = WIN_FindWndPtr(hwnd); EDITSTATE *es = *(EDITSTATE **)((wnd)->wExtra); LRESULT result = 0; switch (msg) { case WM_DESTROY: DPRINTF_EDIT_MSG32("WM_DESTROY"); EDIT_WM_Destroy(wnd, es); result = 0; goto END; case WM_NCCREATE: DPRINTF_EDIT_MSG32("WM_NCCREATE"); result = EDIT_WM_NCCreate(wnd, (LPCREATESTRUCTA)lParam); goto END; } if (!es) { result = DefWindowProcA(hwnd, msg, wParam, lParam); goto END; } EDIT_LockBuffer(wnd, es); switch (msg) { case EM_GETSEL16: DPRINTF_EDIT_MSG16("EM_GETSEL"); wParam = 0; lParam = 0; /* fall through */ case EM_GETSEL: DPRINTF_EDIT_MSG32("EM_GETSEL"); result = EDIT_EM_GetSel(wnd, es, (LPUINT)wParam, (LPUINT)lParam); break; case EM_SETSEL16: DPRINTF_EDIT_MSG16("EM_SETSEL"); if (SLOWORD(lParam) == -1) EDIT_EM_SetSel(wnd, es, -1, 0, FALSE); else EDIT_EM_SetSel(wnd, es, LOWORD(lParam), HIWORD(lParam), FALSE); if (!wParam) EDIT_EM_ScrollCaret(wnd, es); result = 1; break; case EM_SETSEL: DPRINTF_EDIT_MSG32("EM_SETSEL"); EDIT_EM_SetSel(wnd, es, wParam, lParam, FALSE); EDIT_EM_ScrollCaret(wnd, es); result = 1; break; case EM_GETRECT16: DPRINTF_EDIT_MSG16("EM_GETRECT"); if (lParam) CONV_RECT32TO16(&es->format_rect, (LPRECT16)PTR_SEG_TO_LIN(lParam)); break; case EM_GETRECT: DPRINTF_EDIT_MSG32("EM_GETRECT"); if (lParam) CopyRect((LPRECT)lParam, &es->format_rect); break; case EM_SETRECT16: DPRINTF_EDIT_MSG16("EM_SETRECT"); if ((es->style & ES_MULTILINE) && lParam) { RECT rc; CONV_RECT16TO32((LPRECT16)PTR_SEG_TO_LIN(lParam), &rc); EDIT_SetRectNP(wnd, es, &rc); EDIT_UpdateText(wnd, NULL, TRUE); } break; case EM_SETRECT: DPRINTF_EDIT_MSG32("EM_SETRECT"); if ((es->style & ES_MULTILINE) && lParam) { EDIT_SetRectNP(wnd, es, (LPRECT)lParam); EDIT_UpdateText(wnd, NULL, TRUE); } break; case EM_SETRECTNP16: DPRINTF_EDIT_MSG16("EM_SETRECTNP"); if ((es->style & ES_MULTILINE) && lParam) { RECT rc; CONV_RECT16TO32((LPRECT16)PTR_SEG_TO_LIN(lParam), &rc); EDIT_SetRectNP(wnd, es, &rc); } break; case EM_SETRECTNP: DPRINTF_EDIT_MSG32("EM_SETRECTNP"); if ((es->style & ES_MULTILINE) && lParam) EDIT_SetRectNP(wnd, es, (LPRECT)lParam); break; case EM_SCROLL16: DPRINTF_EDIT_MSG16("EM_SCROLL"); /* fall through */ case EM_SCROLL: DPRINTF_EDIT_MSG32("EM_SCROLL"); result = EDIT_EM_Scroll(wnd, es, (INT)wParam); break; case EM_LINESCROLL16: DPRINTF_EDIT_MSG16("EM_LINESCROLL"); wParam = (WPARAM)(INT)SHIWORD(lParam); lParam = (LPARAM)(INT)SLOWORD(lParam); /* fall through */ case EM_LINESCROLL: DPRINTF_EDIT_MSG32("EM_LINESCROLL"); result = (LRESULT)EDIT_EM_LineScroll(wnd, es, (INT)wParam, (INT)lParam); break; case EM_SCROLLCARET16: DPRINTF_EDIT_MSG16("EM_SCROLLCARET"); /* fall through */ case EM_SCROLLCARET: DPRINTF_EDIT_MSG32("EM_SCROLLCARET"); EDIT_EM_ScrollCaret(wnd, es); result = 1; break; case EM_GETMODIFY16: DPRINTF_EDIT_MSG16("EM_GETMODIFY"); /* fall through */ case EM_GETMODIFY: DPRINTF_EDIT_MSG32("EM_GETMODIFY"); result = ((es->flags & EF_MODIFIED) != 0); break; case EM_SETMODIFY16: DPRINTF_EDIT_MSG16("EM_SETMODIFY"); /* fall through */ case EM_SETMODIFY: DPRINTF_EDIT_MSG32("EM_SETMODIFY"); if (wParam) es->flags |= EF_MODIFIED; else es->flags &= ~(EF_MODIFIED | EF_UPDATE); /* reset pending updates */ break; case EM_GETLINECOUNT16: DPRINTF_EDIT_MSG16("EM_GETLINECOUNT"); /* fall through */ case EM_GETLINECOUNT: DPRINTF_EDIT_MSG32("EM_GETLINECOUNT"); result = (es->style & ES_MULTILINE) ? es->line_count : 1; break; case EM_LINEINDEX16: DPRINTF_EDIT_MSG16("EM_LINEINDEX"); if ((INT16)wParam == -1) wParam = (WPARAM)-1; /* fall through */ case EM_LINEINDEX: DPRINTF_EDIT_MSG32("EM_LINEINDEX"); result = (LRESULT)EDIT_EM_LineIndex(wnd, es, (INT)wParam); break; case EM_SETHANDLE16: DPRINTF_EDIT_MSG16("EM_SETHANDLE"); EDIT_EM_SetHandle16(wnd, es, (HLOCAL16)wParam); break; case EM_SETHANDLE: DPRINTF_EDIT_MSG32("EM_SETHANDLE"); EDIT_EM_SetHandle(wnd, es, (HLOCAL)wParam); break; case EM_GETHANDLE16: DPRINTF_EDIT_MSG16("EM_GETHANDLE"); result = (LRESULT)EDIT_EM_GetHandle16(wnd, es); break; case EM_GETHANDLE: DPRINTF_EDIT_MSG32("EM_GETHANDLE"); result = (LRESULT)EDIT_EM_GetHandle(wnd, es); break; case EM_GETTHUMB16: DPRINTF_EDIT_MSG16("EM_GETTHUMB"); /* fall through */ case EM_GETTHUMB: DPRINTF_EDIT_MSG32("EM_GETTHUMB"); result = EDIT_EM_GetThumb(wnd, es); break; /* messages 0x00bf and 0x00c0 missing from specs */ case WM_USER+15: DPRINTF_EDIT_MSG16("undocumented WM_USER+15, please report"); /* fall through */ case 0x00bf: DPRINTF_EDIT_MSG32("undocumented 0x00bf, please report"); result = DefWindowProcA(hwnd, msg, wParam, lParam); break; case WM_USER+16: DPRINTF_EDIT_MSG16("undocumented WM_USER+16, please report"); /* fall through */ case 0x00c0: DPRINTF_EDIT_MSG32("undocumented 0x00c0, please report"); result = DefWindowProcA(hwnd, msg, wParam, lParam); break; case EM_LINELENGTH16: DPRINTF_EDIT_MSG16("EM_LINELENGTH"); /* fall through */ case EM_LINELENGTH: DPRINTF_EDIT_MSG32("EM_LINELENGTH"); result = (LRESULT)EDIT_EM_LineLength(wnd, es, (INT)wParam); break; case EM_REPLACESEL16: DPRINTF_EDIT_MSG16("EM_REPLACESEL"); lParam = (LPARAM)PTR_SEG_TO_LIN((SEGPTR)lParam); /* fall through */ case EM_REPLACESEL: DPRINTF_EDIT_MSG32("EM_REPLACESEL"); EDIT_EM_ReplaceSel(wnd, es, (BOOL)wParam, (LPCSTR)lParam); if (es->flags & EF_UPDATE) { es->flags &= ~EF_UPDATE; EDIT_NOTIFY_PARENT(wnd, EN_CHANGE, "EN_CHANGE"); } result = 1; break; /* message 0x00c3 missing from specs */ case WM_USER+19: DPRINTF_EDIT_MSG16("undocumented WM_USER+19, please report"); /* fall through */ case 0x00c3: DPRINTF_EDIT_MSG32("undocumented 0x00c3, please report"); result = DefWindowProcA(hwnd, msg, wParam, lParam); break; case EM_GETLINE16: DPRINTF_EDIT_MSG16("EM_GETLINE"); lParam = (LPARAM)PTR_SEG_TO_LIN((SEGPTR)lParam); /* fall through */ case EM_GETLINE: DPRINTF_EDIT_MSG32("EM_GETLINE"); result = (LRESULT)EDIT_EM_GetLine(wnd, es, (INT)wParam, (LPSTR)lParam); break; case EM_LIMITTEXT16: DPRINTF_EDIT_MSG16("EM_LIMITTEXT"); /* fall through */ case EM_SETLIMITTEXT: DPRINTF_EDIT_MSG32("EM_SETLIMITTEXT"); EDIT_EM_SetLimitText(wnd, es, (INT)wParam); break; case EM_CANUNDO16: DPRINTF_EDIT_MSG16("EM_CANUNDO"); /* fall through */ case EM_CANUNDO: DPRINTF_EDIT_MSG32("EM_CANUNDO"); result = (LRESULT)EDIT_EM_CanUndo(wnd, es); break; case EM_UNDO16: DPRINTF_EDIT_MSG16("EM_UNDO"); /* fall through */ case EM_UNDO: /* fall through */ case WM_UNDO: DPRINTF_EDIT_MSG32("EM_UNDO / WM_UNDO"); result = (LRESULT)EDIT_EM_Undo(wnd, es); break; case EM_FMTLINES16: DPRINTF_EDIT_MSG16("EM_FMTLINES"); /* fall through */ case EM_FMTLINES: DPRINTF_EDIT_MSG32("EM_FMTLINES"); result = (LRESULT)EDIT_EM_FmtLines(wnd, es, (BOOL)wParam); break; case EM_LINEFROMCHAR16: DPRINTF_EDIT_MSG16("EM_LINEFROMCHAR"); /* fall through */ case EM_LINEFROMCHAR: DPRINTF_EDIT_MSG32("EM_LINEFROMCHAR"); result = (LRESULT)EDIT_EM_LineFromChar(wnd, es, (INT)wParam); break; /* message 0x00ca missing from specs */ case WM_USER+26: DPRINTF_EDIT_MSG16("undocumented WM_USER+26, please report"); /* fall through */ case 0x00ca: DPRINTF_EDIT_MSG32("undocumented 0x00ca, please report"); result = DefWindowProcA(hwnd, msg, wParam, lParam); break; case EM_SETTABSTOPS16: DPRINTF_EDIT_MSG16("EM_SETTABSTOPS"); result = (LRESULT)EDIT_EM_SetTabStops16(wnd, es, (INT)wParam, (LPINT16)PTR_SEG_TO_LIN((SEGPTR)lParam)); break; case EM_SETTABSTOPS: DPRINTF_EDIT_MSG32("EM_SETTABSTOPS"); result = (LRESULT)EDIT_EM_SetTabStops(wnd, es, (INT)wParam, (LPINT)lParam); break; case EM_SETPASSWORDCHAR16: DPRINTF_EDIT_MSG16("EM_SETPASSWORDCHAR"); /* fall through */ case EM_SETPASSWORDCHAR: DPRINTF_EDIT_MSG32("EM_SETPASSWORDCHAR"); EDIT_EM_SetPasswordChar(wnd, es, (CHAR)wParam); break; case EM_EMPTYUNDOBUFFER16: DPRINTF_EDIT_MSG16("EM_EMPTYUNDOBUFFER"); /* fall through */ case EM_EMPTYUNDOBUFFER: DPRINTF_EDIT_MSG32("EM_EMPTYUNDOBUFFER"); EDIT_EM_EmptyUndoBuffer(wnd, es); break; case EM_GETFIRSTVISIBLELINE16: DPRINTF_EDIT_MSG16("EM_GETFIRSTVISIBLELINE"); result = es->y_offset; break; case EM_GETFIRSTVISIBLELINE: DPRINTF_EDIT_MSG32("EM_GETFIRSTVISIBLELINE"); result = (es->style & ES_MULTILINE) ? es->y_offset : es->x_offset; break; case EM_SETREADONLY16: DPRINTF_EDIT_MSG16("EM_SETREADONLY"); /* fall through */ case EM_SETREADONLY: DPRINTF_EDIT_MSG32("EM_SETREADONLY"); if (wParam) { wnd->dwStyle |= ES_READONLY; es->style |= ES_READONLY; } else { wnd->dwStyle &= ~ES_READONLY; es->style &= ~ES_READONLY; } result = 1; break; case EM_SETWORDBREAKPROC16: DPRINTF_EDIT_MSG16("EM_SETWORDBREAKPROC"); EDIT_EM_SetWordBreakProc16(wnd, es, (EDITWORDBREAKPROC16)lParam); break; case EM_SETWORDBREAKPROC: DPRINTF_EDIT_MSG32("EM_SETWORDBREAKPROC"); EDIT_EM_SetWordBreakProc(wnd, es, (EDITWORDBREAKPROCA)lParam); break; case EM_GETWORDBREAKPROC16: DPRINTF_EDIT_MSG16("EM_GETWORDBREAKPROC"); result = (LRESULT)es->word_break_proc16; break; case EM_GETWORDBREAKPROC: DPRINTF_EDIT_MSG32("EM_GETWORDBREAKPROC"); result = (LRESULT)es->word_break_proc32A; break; case EM_GETPASSWORDCHAR16: DPRINTF_EDIT_MSG16("EM_GETPASSWORDCHAR"); /* fall through */ case EM_GETPASSWORDCHAR: DPRINTF_EDIT_MSG32("EM_GETPASSWORDCHAR"); result = es->password_char; break; /* The following EM_xxx are new to win95 and don't exist for 16 bit */ case EM_SETMARGINS: DPRINTF_EDIT_MSG32("EM_SETMARGINS"); EDIT_EM_SetMargins(wnd, es, (INT)wParam, SLOWORD(lParam), SHIWORD(lParam)); break; case EM_GETMARGINS: DPRINTF_EDIT_MSG32("EM_GETMARGINS"); result = MAKELONG(es->left_margin, es->right_margin); break; case EM_GETLIMITTEXT: DPRINTF_EDIT_MSG32("EM_GETLIMITTEXT"); result = es->buffer_limit; break; case EM_POSFROMCHAR: DPRINTF_EDIT_MSG32("EM_POSFROMCHAR"); result = EDIT_EM_PosFromChar(wnd, es, (INT)wParam, FALSE); break; case EM_CHARFROMPOS: DPRINTF_EDIT_MSG32("EM_CHARFROMPOS"); result = EDIT_EM_CharFromPos(wnd, es, SLOWORD(lParam), SHIWORD(lParam)); break; case WM_GETDLGCODE: DPRINTF_EDIT_MSG32("WM_GETDLGCODE"); result = (es->style & ES_MULTILINE) ? DLGC_WANTALLKEYS | DLGC_HASSETSEL | DLGC_WANTCHARS | DLGC_WANTARROWS : DLGC_HASSETSEL | DLGC_WANTCHARS | DLGC_WANTARROWS; break; case WM_CHAR: DPRINTF_EDIT_MSG32("WM_CHAR"); EDIT_WM_Char(wnd, es, (CHAR)wParam, (DWORD)lParam); break; case WM_CLEAR: DPRINTF_EDIT_MSG32("WM_CLEAR"); EDIT_WM_Clear(wnd, es); break; case WM_COMMAND: DPRINTF_EDIT_MSG32("WM_COMMAND"); EDIT_WM_Command(wnd, es, HIWORD(wParam), LOWORD(wParam), (HWND)lParam); break; case WM_CONTEXTMENU: DPRINTF_EDIT_MSG32("WM_CONTEXTMENU"); EDIT_WM_ContextMenu(wnd, es, (HWND)wParam, SLOWORD(lParam), SHIWORD(lParam)); break; case WM_COPY: DPRINTF_EDIT_MSG32("WM_COPY"); EDIT_WM_Copy(wnd, es); break; case WM_CREATE: DPRINTF_EDIT_MSG32("WM_CREATE"); result = EDIT_WM_Create(wnd, es, (LPCREATESTRUCTA)lParam); break; case WM_CUT: DPRINTF_EDIT_MSG32("WM_CUT"); EDIT_WM_Cut(wnd, es); break; case WM_ENABLE: DPRINTF_EDIT_MSG32("WM_ENABLE"); es->bEnableState = (BOOL) wParam; EDIT_UpdateText(wnd, NULL, TRUE); break; case WM_ERASEBKGND: DPRINTF_EDIT_MSG32("WM_ERASEBKGND"); result = EDIT_WM_EraseBkGnd(wnd, es, (HDC)wParam); break; case WM_GETFONT: DPRINTF_EDIT_MSG32("WM_GETFONT"); result = (LRESULT)es->font; break; case WM_GETTEXT: DPRINTF_EDIT_MSG32("WM_GETTEXT"); result = (LRESULT)EDIT_WM_GetText(wnd, es, (INT)wParam, (LPSTR)lParam); break; case WM_GETTEXTLENGTH: DPRINTF_EDIT_MSG32("WM_GETTEXTLENGTH"); result = lstrlenA(es->text); break; case WM_HSCROLL: DPRINTF_EDIT_MSG32("WM_HSCROLL"); result = EDIT_WM_HScroll(wnd, es, LOWORD(wParam), SHIWORD(wParam), (HWND)lParam); break; case WM_KEYDOWN: DPRINTF_EDIT_MSG32("WM_KEYDOWN"); result = EDIT_WM_KeyDown(wnd, es, (INT)wParam, (DWORD)lParam); break; case WM_KILLFOCUS: DPRINTF_EDIT_MSG32("WM_KILLFOCUS"); result = EDIT_WM_KillFocus(wnd, es, (HWND)wParam); break; case WM_LBUTTONDBLCLK: DPRINTF_EDIT_MSG32("WM_LBUTTONDBLCLK"); result = EDIT_WM_LButtonDblClk(wnd, es, (DWORD)wParam, SLOWORD(lParam), SHIWORD(lParam)); break; case WM_LBUTTONDOWN: DPRINTF_EDIT_MSG32("WM_LBUTTONDOWN"); result = EDIT_WM_LButtonDown(wnd, es, (DWORD)wParam, SLOWORD(lParam), SHIWORD(lParam)); break; case WM_LBUTTONUP: DPRINTF_EDIT_MSG32("WM_LBUTTONUP"); result = EDIT_WM_LButtonUp(wnd, es, (DWORD)wParam, SLOWORD(lParam), SHIWORD(lParam)); break; case WM_MBUTTONDOWN: DPRINTF_EDIT_MSG32("WM_MBUTTONDOWN"); result = EDIT_WM_MButtonDown(wnd); break; case WM_MOUSEACTIVATE: /* * FIXME: maybe DefWindowProc() screws up, but it seems that * modeless dialog boxes need this. If we don't do this, the focus * will _not_ be set by DefWindowProc() for edit controls in a * modeless dialog box ??? */ DPRINTF_EDIT_MSG32("WM_MOUSEACTIVATE"); SetFocus(wnd->hwndSelf); result = MA_ACTIVATE; break; case WM_MOUSEMOVE: /* * DPRINTF_EDIT_MSG32("WM_MOUSEMOVE"); */ result = EDIT_WM_MouseMove(wnd, es, (DWORD)wParam, SLOWORD(lParam), SHIWORD(lParam)); break; case WM_PAINT: DPRINTF_EDIT_MSG32("WM_PAINT"); EDIT_WM_Paint(wnd, es, wParam); break; case WM_PASTE: DPRINTF_EDIT_MSG32("WM_PASTE"); EDIT_WM_Paste(wnd, es); break; case WM_SETFOCUS: DPRINTF_EDIT_MSG32("WM_SETFOCUS"); EDIT_WM_SetFocus(wnd, es, (HWND)wParam); break; case WM_SETFONT: DPRINTF_EDIT_MSG32("WM_SETFONT"); EDIT_WM_SetFont(wnd, es, (HFONT)wParam, LOWORD(lParam) != 0); break; case WM_SETTEXT: DPRINTF_EDIT_MSG32("WM_SETTEXT"); EDIT_WM_SetText(wnd, es, (LPCSTR)lParam); result = TRUE; break; case WM_SIZE: DPRINTF_EDIT_MSG32("WM_SIZE"); EDIT_WM_Size(wnd, es, (UINT)wParam, LOWORD(lParam), HIWORD(lParam)); break; case WM_SYSKEYDOWN: DPRINTF_EDIT_MSG32("WM_SYSKEYDOWN"); result = EDIT_WM_SysKeyDown(wnd, es, (INT)wParam, (DWORD)lParam); break; case WM_TIMER: DPRINTF_EDIT_MSG32("WM_TIMER"); EDIT_WM_Timer(wnd, es, (INT)wParam, (TIMERPROC)lParam); break; case WM_VSCROLL: DPRINTF_EDIT_MSG32("WM_VSCROLL"); result = EDIT_WM_VScroll(wnd, es, LOWORD(wParam), SHIWORD(wParam), (HWND)(lParam)); break; case WM_MOUSEWHEEL: { short gcWheelDelta = 0; UINT pulScrollLines = 3; SystemParametersInfoW(SPI_GETWHEELSCROLLLINES,0, &pulScrollLines, 0); if (wParam & (MK_SHIFT | MK_CONTROL)) { result = DefWindowProcA(hwnd, msg, wParam, lParam); break; } gcWheelDelta -= (short) HIWORD(wParam); if (abs(gcWheelDelta) >= WHEEL_DELTA && pulScrollLines) { int cLineScroll= (int) min((UINT) es->line_count, pulScrollLines); cLineScroll *= (gcWheelDelta / WHEEL_DELTA); result = EDIT_EM_LineScroll(wnd, es, 0, cLineScroll); } } break; default: result = DefWindowProcA(hwnd, msg, wParam, lParam); break; } EDIT_UnlockBuffer(wnd, es, FALSE); END: WIN_ReleaseWndPtr(wnd); return result; } /********************************************************************* * * EDIT_BuildLineDefs_ML * * Build linked list of text lines. * Lines can end with '\0' (last line), a character (if it is wrapped), * a soft return '\r\r\n' or a hard return '\r\n' * */ static void EDIT_BuildLineDefs_ML(WND *wnd, EDITSTATE *es) { HDC dc; HFONT old_font = 0; LPSTR start, cp; INT fw; LINEDEF *current_def; LINEDEF **previous_next; current_def = es->first_line_def; do { LINEDEF *next_def = current_def->next; HeapFree(es->heap, 0, current_def); current_def = next_def; } while (current_def); es->line_count = 0; es->text_width = 0; dc = GetDC(wnd->hwndSelf); if (es->font) old_font = SelectObject(dc, es->font); fw = es->format_rect.right - es->format_rect.left; start = es->text; previous_next = &es->first_line_def; do { current_def = HeapAlloc(es->heap, 0, sizeof(LINEDEF)); current_def->next = NULL; cp = start; while (*cp) { if ((*cp == '\r') && (*(cp + 1) == '\n')) break; cp++; } if (!(*cp)) { current_def->ending = END_0; current_def->net_length = lstrlenA(start); } else if ((cp > start) && (*(cp - 1) == '\r')) { current_def->ending = END_SOFT; current_def->net_length = cp - start - 1; } else { current_def->ending = END_HARD; current_def->net_length = cp - start; } current_def->width = (INT)LOWORD(GetTabbedTextExtentA(dc, start, current_def->net_length, es->tabs_count, es->tabs)); /* FIXME: check here for lines that are too wide even in AUTOHSCROLL (> 32767 ???) */ if ((!(es->style & ES_AUTOHSCROLL)) && (current_def->width > fw)) { INT next = 0; INT prev; do { prev = next; next = EDIT_CallWordBreakProc(wnd, es, start - es->text, prev + 1, current_def->net_length, WB_RIGHT); current_def->width = (INT)LOWORD(GetTabbedTextExtentA(dc, start, next, es->tabs_count, es->tabs)); } while (current_def->width <= fw); if (!prev) { next = 0; do { prev = next; next++; current_def->width = (INT)LOWORD(GetTabbedTextExtentA(dc, start, next, es->tabs_count, es->tabs)); } while (current_def->width <= fw); if (!prev) prev = 1; } current_def->net_length = prev; current_def->ending = END_WRAP; current_def->width = (INT)LOWORD(GetTabbedTextExtentA(dc, start, current_def->net_length, es->tabs_count, es->tabs)); } switch (current_def->ending) { case END_SOFT: current_def->length = current_def->net_length + 3; break; case END_HARD: current_def->length = current_def->net_length + 2; break; case END_WRAP: case END_0: current_def->length = current_def->net_length; break; } es->text_width = max(es->text_width, current_def->width); start += current_def->length; *previous_next = current_def; previous_next = ¤t_def->next; es->line_count++; } while (current_def->ending != END_0); if (es->font) SelectObject(dc, old_font); ReleaseDC(wnd->hwndSelf, dc); } /********************************************************************* * * EDIT_CallWordBreakProc * * Call appropriate WordBreakProc (internal or external). * * Note: The "start" argument should always be an index refering * to es->text. The actual wordbreak proc might be * 16 bit, so we can't always pass any 32 bit LPSTR. * Hence we assume that es->text is the buffer that holds * the string under examination (we can decide this for ourselves). * */ static INT EDIT_CallWordBreakProc(WND *wnd, EDITSTATE *es, INT start, INT index, INT count, INT action) { if (es->word_break_proc16) { HLOCAL16 hloc16 = EDIT_EM_GetHandle16(wnd, es); SEGPTR segptr = LocalLock16(hloc16); INT ret = (INT)Callbacks->CallWordBreakProc(es->word_break_proc16, segptr + start, index, count, action); LocalUnlock16(hloc16); return ret; } else if (es->word_break_proc32A) { TRACE_(relay)("(wordbrk=%p,str='%s',idx=%d,cnt=%d,act=%d)\n", es->word_break_proc32A, es->text + start, index, count, action ); return (INT)es->word_break_proc32A( es->text + start, index, count, action ); } else return EDIT_WordBreakProc(es->text + start, index, count, action); } /********************************************************************* * * EDIT_CharFromPos * * Beware: This is not the function called on EM_CHARFROMPOS * The position _can_ be outside the formatting / client * rectangle * The return value is only the character index * */ static INT EDIT_CharFromPos(WND *wnd, EDITSTATE *es, INT x, INT y, LPBOOL after_wrap) { INT index; HDC dc; HFONT old_font = 0; if (es->style & ES_MULTILINE) { INT line = (y - es->format_rect.top) / es->line_height + es->y_offset; INT line_index = 0; LINEDEF *line_def = es->first_line_def; INT low, high; while ((line > 0) && line_def->next) { line_index += line_def->length; line_def = line_def->next; line--; } x += es->x_offset - es->format_rect.left; if (x >= line_def->width) { if (after_wrap) *after_wrap = (line_def->ending == END_WRAP); return line_index + line_def->net_length; } if (x <= 0) { if (after_wrap) *after_wrap = FALSE; return line_index; } dc = GetDC(wnd->hwndSelf); if (es->font) old_font = SelectObject(dc, es->font); low = line_index + 1; high = line_index + line_def->net_length + 1; while (low < high - 1) { INT mid = (low + high) / 2; if (LOWORD(GetTabbedTextExtentA(dc, es->text + line_index,mid - line_index, es->tabs_count, es->tabs)) > x) high = mid; else low = mid; } index = low; if (after_wrap) *after_wrap = ((index == line_index + line_def->net_length) && (line_def->ending == END_WRAP)); } else { LPSTR text; SIZE size; if (after_wrap) *after_wrap = FALSE; x -= es->format_rect.left; if (!x) return es->x_offset; text = EDIT_GetPasswordPointer_SL(wnd, es); dc = GetDC(wnd->hwndSelf); if (es->font) old_font = SelectObject(dc, es->font); if (x < 0) { INT low = 0; INT high = es->x_offset; while (low < high - 1) { INT mid = (low + high) / 2; GetTextExtentPoint32A( dc, text + mid, es->x_offset - mid, &size ); if (size.cx > -x) low = mid; else high = mid; } index = low; } else { INT low = es->x_offset; INT high = lstrlenA(es->text) + 1; while (low < high - 1) { INT mid = (low + high) / 2; GetTextExtentPoint32A( dc, text + es->x_offset, mid - es->x_offset, &size ); if (size.cx > x) high = mid; else low = mid; } index = low; } if (es->style & ES_PASSWORD) HeapFree(es->heap, 0 ,text); } if (es->font) SelectObject(dc, old_font); ReleaseDC(wnd->hwndSelf, dc); return index; } /********************************************************************* * * EDIT_ConfinePoint * * adjusts the point to be within the formatting rectangle * (so CharFromPos returns the nearest _visible_ character) * */ static void EDIT_ConfinePoint(WND *wnd, EDITSTATE *es, LPINT x, LPINT y) { *x = min(max(*x, es->format_rect.left), es->format_rect.right - 1); *y = min(max(*y, es->format_rect.top), es->format_rect.bottom - 1); } /********************************************************************* * * EDIT_GetLineRect * * Calculates the bounding rectangle for a line from a starting * column to an ending column. * */ static void EDIT_GetLineRect(WND *wnd, EDITSTATE *es, INT line, INT scol, INT ecol, LPRECT rc) { INT line_index = EDIT_EM_LineIndex(wnd, es, line); if (es->style & ES_MULTILINE) rc->top = es->format_rect.top + (line - es->y_offset) * es->line_height; else rc->top = es->format_rect.top; rc->bottom = rc->top + es->line_height; rc->left = (scol == 0) ? es->format_rect.left : SLOWORD(EDIT_EM_PosFromChar(wnd, es, line_index + scol, TRUE)); rc->right = (ecol == -1) ? es->format_rect.right : SLOWORD(EDIT_EM_PosFromChar(wnd, es, line_index + ecol, TRUE)); } /********************************************************************* * * EDIT_GetPasswordPointer_SL * * note: caller should free the (optionally) allocated buffer * */ static LPSTR EDIT_GetPasswordPointer_SL(WND *wnd, EDITSTATE *es) { if (es->style & ES_PASSWORD) { INT len = lstrlenA(es->text); LPSTR text = HeapAlloc(es->heap, 0, len + 1); RtlFillMemory(text, len, es->password_char); text[len] = '\0'; return text; } else return es->text; } /********************************************************************* * * EDIT_LockBuffer * * This acts as a LOCAL_Lock(), but it locks only once. This way * you can call it whenever you like, without unlocking. * */ static void EDIT_LockBuffer(WND *wnd, EDITSTATE *es) { if (!es) { ERR("no EDITSTATE ... please report\n"); return; } if (!(es->style & ES_MULTILINE)) return; if (!es->text) { if (es->hloc32) es->text = LocalLock(es->hloc32); else if (es->hloc16) es->text = LOCAL_Lock(wnd->hInstance, es->hloc16); else { ERR("no buffer ... please report\n"); return; } } es->lock_count++; } /********************************************************************* * * EDIT_SL_InvalidateText * * Called from EDIT_InvalidateText(). * Does the job for single-line controls only. * */ static void EDIT_SL_InvalidateText(WND *wnd, EDITSTATE *es, INT start, INT end) { RECT line_rect; RECT rc; EDIT_GetLineRect(wnd, es, 0, start, end, &line_rect); if (IntersectRect(&rc, &line_rect, &es->format_rect)) EDIT_UpdateText(wnd, &rc, FALSE); } /********************************************************************* * * EDIT_ML_InvalidateText * * Called from EDIT_InvalidateText(). * Does the job for multi-line controls only. * */ static void EDIT_ML_InvalidateText(WND *wnd, EDITSTATE *es, INT start, INT end) { INT vlc = (es->format_rect.bottom - es->format_rect.top) / es->line_height; INT sl = EDIT_EM_LineFromChar(wnd, es, start); INT el = EDIT_EM_LineFromChar(wnd, es, end); INT sc; INT ec; RECT rc1; RECT rcWnd; RECT rcLine; RECT rcUpdate; INT l; if ((el < es->y_offset) || (sl > es->y_offset + vlc)) return; sc = start - EDIT_EM_LineIndex(wnd, es, sl); ec = end - EDIT_EM_LineIndex(wnd, es, el); if (sl < es->y_offset) { sl = es->y_offset; sc = 0; } if (el > es->y_offset + vlc) { el = es->y_offset + vlc; ec = EDIT_EM_LineLength(wnd, es, EDIT_EM_LineIndex(wnd, es, el)); } GetClientRect(wnd->hwndSelf, &rc1); IntersectRect(&rcWnd, &rc1, &es->format_rect); if (sl == el) { EDIT_GetLineRect(wnd, es, sl, sc, ec, &rcLine); if (IntersectRect(&rcUpdate, &rcWnd, &rcLine)) EDIT_UpdateText(wnd, &rcUpdate, FALSE); } else { EDIT_GetLineRect(wnd, es, sl, sc, EDIT_EM_LineLength(wnd, es, EDIT_EM_LineIndex(wnd, es, sl)), &rcLine); if (IntersectRect(&rcUpdate, &rcWnd, &rcLine)) EDIT_UpdateText(wnd, &rcUpdate, FALSE); for (l = sl + 1 ; l < el ; l++) { EDIT_GetLineRect(wnd, es, l, 0, EDIT_EM_LineLength(wnd, es, EDIT_EM_LineIndex(wnd, es, l)), &rcLine); if (IntersectRect(&rcUpdate, &rcWnd, &rcLine)) EDIT_UpdateText(wnd, &rcUpdate, FALSE); } EDIT_GetLineRect(wnd, es, el, 0, ec, &rcLine); if (IntersectRect(&rcUpdate, &rcWnd, &rcLine)) EDIT_UpdateText(wnd, &rcUpdate, FALSE); } } /********************************************************************* * * EDIT_InvalidateText * * Invalidate the text from offset start upto, but not including, * offset end. Useful for (re)painting the selection. * Regions outside the linewidth are not invalidated. * end == -1 means end == TextLength. * start and end need not be ordered. * */ static void EDIT_InvalidateText(WND *wnd, EDITSTATE *es, INT start, INT end) { if (end == start) return; if (end == -1) end = lstrlenA(es->text); ORDER_INT(start, end); if (es->style & ES_MULTILINE) EDIT_ML_InvalidateText(wnd, es, start, end); else EDIT_SL_InvalidateText(wnd, es, start, end); } /********************************************************************* * * EDIT_MakeFit * * Try to fit size + 1 bytes in the buffer. Constrain to limits. * */ static BOOL EDIT_MakeFit(WND *wnd, EDITSTATE *es, INT size) { HLOCAL hNew32; HLOCAL16 hNew16; if (size <= es->buffer_size) return TRUE; if (size > es->buffer_limit) { EDIT_NOTIFY_PARENT(wnd, EN_MAXTEXT, "EN_MAXTEXT"); return FALSE; } size = ((size / GROWLENGTH) + 1) * GROWLENGTH; if (size > es->buffer_limit) size = es->buffer_limit; TRACE("trying to ReAlloc to %d+1\n", size); EDIT_UnlockBuffer(wnd, es, TRUE); if (es->text) { if ((es->text = HeapReAlloc(es->heap, 0, es->text, size + 1))) es->buffer_size = min(HeapSize(es->heap, 0, es->text) - 1, es->buffer_limit); else es->buffer_size = 0; } else if (es->hloc32) { if ((hNew32 = LocalReAlloc(es->hloc32, size + 1, 0))) { TRACE("Old 32 bit handle %08x, new handle %08x\n", es->hloc32, hNew32); es->hloc32 = hNew32; es->buffer_size = min(LocalSize(es->hloc32) - 1, es->buffer_limit); } } else if (es->hloc16) { if ((hNew16 = LOCAL_ReAlloc(wnd->hInstance, es->hloc16, size + 1, LMEM_MOVEABLE))) { TRACE("Old 16 bit handle %08x, new handle %08x\n", es->hloc16, hNew16); es->hloc16 = hNew16; es->buffer_size = min(LOCAL_Size(wnd->hInstance, es->hloc16) - 1, es->buffer_limit); } } if (es->buffer_size < size) { EDIT_LockBuffer(wnd, es); WARN("FAILED ! We now have %d+1\n", es->buffer_size); EDIT_NOTIFY_PARENT(wnd, EN_ERRSPACE, "EN_ERRSPACE"); return FALSE; } else { EDIT_LockBuffer(wnd, es); TRACE("We now have %d+1\n", es->buffer_size); return TRUE; } } /********************************************************************* * * EDIT_MakeUndoFit * * Try to fit size + 1 bytes in the undo buffer. * */ static BOOL EDIT_MakeUndoFit(WND *wnd, EDITSTATE *es, INT size) { if (size <= es->undo_buffer_size) return TRUE; size = ((size / GROWLENGTH) + 1) * GROWLENGTH; TRACE("trying to ReAlloc to %d+1\n", size); if ((es->undo_text = HeapReAlloc(es->heap, 0, es->undo_text, size + 1))) { es->undo_buffer_size = HeapSize(es->heap, 0, es->undo_text) - 1; if (es->undo_buffer_size < size) { WARN("FAILED ! We now have %d+1\n", es->undo_buffer_size); return FALSE; } return TRUE; } return FALSE; } /********************************************************************* * * EDIT_MoveBackward * */ static void EDIT_MoveBackward(WND *wnd, EDITSTATE *es, BOOL extend) { INT e = es->selection_end; if (e) { e--; if ((es->style & ES_MULTILINE) && e && (es->text[e - 1] == '\r') && (es->text[e] == '\n')) { e--; if (e && (es->text[e - 1] == '\r')) e--; } } EDIT_EM_SetSel(wnd, es, extend ? es->selection_start : e, e, FALSE); EDIT_EM_ScrollCaret(wnd, es); } /********************************************************************* * * EDIT_MoveDown_ML * * Only for multi line controls * Move the caret one line down, on a column with the nearest * x coordinate on the screen (might be a different column). * */ static void EDIT_MoveDown_ML(WND *wnd, EDITSTATE *es, BOOL extend) { INT s = es->selection_start; INT e = es->selection_end; BOOL after_wrap = (es->flags & EF_AFTER_WRAP); LRESULT pos = EDIT_EM_PosFromChar(wnd, es, e, after_wrap); INT x = SLOWORD(pos); INT y = SHIWORD(pos); e = EDIT_CharFromPos(wnd, es, x, y + es->line_height, &after_wrap); if (!extend) s = e; EDIT_EM_SetSel(wnd, es, s, e, after_wrap); EDIT_EM_ScrollCaret(wnd, es); } /********************************************************************* * * EDIT_MoveEnd * */ static void EDIT_MoveEnd(WND *wnd, EDITSTATE *es, BOOL extend) { BOOL after_wrap = FALSE; INT e; /* Pass a high value in x to make sure of receiving the en of the line */ if (es->style & ES_MULTILINE) e = EDIT_CharFromPos(wnd, es, 0x3fffffff, HIWORD(EDIT_EM_PosFromChar(wnd, es, es->selection_end, es->flags & EF_AFTER_WRAP)), &after_wrap); else e = lstrlenA(es->text); EDIT_EM_SetSel(wnd, es, extend ? es->selection_start : e, e, after_wrap); EDIT_EM_ScrollCaret(wnd, es); } /********************************************************************* * * EDIT_MoveForward * */ static void EDIT_MoveForward(WND *wnd, EDITSTATE *es, BOOL extend) { INT e = es->selection_end; if (es->text[e]) { e++; if ((es->style & ES_MULTILINE) && (es->text[e - 1] == '\r')) { if (es->text[e] == '\n') e++; else if ((es->text[e] == '\r') && (es->text[e + 1] == '\n')) e += 2; } } EDIT_EM_SetSel(wnd, es, extend ? es->selection_start : e, e, FALSE); EDIT_EM_ScrollCaret(wnd, es); } /********************************************************************* * * EDIT_MoveHome * * Home key: move to beginning of line. * */ static void EDIT_MoveHome(WND *wnd, EDITSTATE *es, BOOL extend) { INT e; /* Pass the x_offset in x to make sure of receiving the first position of the line */ if (es->style & ES_MULTILINE) e = EDIT_CharFromPos(wnd, es, -es->x_offset, HIWORD(EDIT_EM_PosFromChar(wnd, es, es->selection_end, es->flags & EF_AFTER_WRAP)), NULL); else e = 0; EDIT_EM_SetSel(wnd, es, extend ? es->selection_start : e, e, FALSE); EDIT_EM_ScrollCaret(wnd, es); } /********************************************************************* * * EDIT_MovePageDown_ML * * Only for multi line controls * Move the caret one page down, on a column with the nearest * x coordinate on the screen (might be a different column). * */ static void EDIT_MovePageDown_ML(WND *wnd, EDITSTATE *es, BOOL extend) { INT s = es->selection_start; INT e = es->selection_end; BOOL after_wrap = (es->flags & EF_AFTER_WRAP); LRESULT pos = EDIT_EM_PosFromChar(wnd, es, e, after_wrap); INT x = SLOWORD(pos); INT y = SHIWORD(pos); e = EDIT_CharFromPos(wnd, es, x, y + (es->format_rect.bottom - es->format_rect.top), &after_wrap); if (!extend) s = e; EDIT_EM_SetSel(wnd, es, s, e, after_wrap); EDIT_EM_ScrollCaret(wnd, es); } /********************************************************************* * * EDIT_MovePageUp_ML * * Only for multi line controls * Move the caret one page up, on a column with the nearest * x coordinate on the screen (might be a different column). * */ static void EDIT_MovePageUp_ML(WND *wnd, EDITSTATE *es, BOOL extend) { INT s = es->selection_start; INT e = es->selection_end; BOOL after_wrap = (es->flags & EF_AFTER_WRAP); LRESULT pos = EDIT_EM_PosFromChar(wnd, es, e, after_wrap); INT x = SLOWORD(pos); INT y = SHIWORD(pos); e = EDIT_CharFromPos(wnd, es, x, y - (es->format_rect.bottom - es->format_rect.top), &after_wrap); if (!extend) s = e; EDIT_EM_SetSel(wnd, es, s, e, after_wrap); EDIT_EM_ScrollCaret(wnd, es); } /********************************************************************* * * EDIT_MoveUp_ML * * Only for multi line controls * Move the caret one line up, on a column with the nearest * x coordinate on the screen (might be a different column). * */ static void EDIT_MoveUp_ML(WND *wnd, EDITSTATE *es, BOOL extend) { INT s = es->selection_start; INT e = es->selection_end; BOOL after_wrap = (es->flags & EF_AFTER_WRAP); LRESULT pos = EDIT_EM_PosFromChar(wnd, es, e, after_wrap); INT x = SLOWORD(pos); INT y = SHIWORD(pos); e = EDIT_CharFromPos(wnd, es, x, y - es->line_height, &after_wrap); if (!extend) s = e; EDIT_EM_SetSel(wnd, es, s, e, after_wrap); EDIT_EM_ScrollCaret(wnd, es); } /********************************************************************* * * EDIT_MoveWordBackward * */ static void EDIT_MoveWordBackward(WND *wnd, EDITSTATE *es, BOOL extend) { INT s = es->selection_start; INT e = es->selection_end; INT l; INT ll; INT li; l = EDIT_EM_LineFromChar(wnd, es, e); ll = EDIT_EM_LineLength(wnd, es, e); li = EDIT_EM_LineIndex(wnd, es, l); if (e - li == 0) { if (l) { li = EDIT_EM_LineIndex(wnd, es, l - 1); e = li + EDIT_EM_LineLength(wnd, es, li); } } else { e = li + (INT)EDIT_CallWordBreakProc(wnd, es, li, e - li, ll, WB_LEFT); } if (!extend) s = e; EDIT_EM_SetSel(wnd, es, s, e, FALSE); EDIT_EM_ScrollCaret(wnd, es); } /********************************************************************* * * EDIT_MoveWordForward * */ static void EDIT_MoveWordForward(WND *wnd, EDITSTATE *es, BOOL extend) { INT s = es->selection_start; INT e = es->selection_end; INT l; INT ll; INT li; l = EDIT_EM_LineFromChar(wnd, es, e); ll = EDIT_EM_LineLength(wnd, es, e); li = EDIT_EM_LineIndex(wnd, es, l); if (e - li == ll) { if ((es->style & ES_MULTILINE) && (l != es->line_count - 1)) e = EDIT_EM_LineIndex(wnd, es, l + 1); } else { e = li + EDIT_CallWordBreakProc(wnd, es, li, e - li + 1, ll, WB_RIGHT); } if (!extend) s = e; EDIT_EM_SetSel(wnd, es, s, e, FALSE); EDIT_EM_ScrollCaret(wnd, es); } /********************************************************************* * * EDIT_PaintLine * */ static void EDIT_PaintLine(WND *wnd, EDITSTATE *es, HDC dc, INT line, BOOL rev) { INT s = es->selection_start; INT e = es->selection_end; INT li; INT ll; INT x; INT y; LRESULT pos; if (es->style & ES_MULTILINE) { INT vlc = (es->format_rect.bottom - es->format_rect.top) / es->line_height; if ((line < es->y_offset) || (line > es->y_offset + vlc) || (line >= es->line_count)) return; } else if (line) return; TRACE("line=%d\n", line); pos = EDIT_EM_PosFromChar(wnd, es, EDIT_EM_LineIndex(wnd, es, line), FALSE); x = SLOWORD(pos); y = SHIWORD(pos); li = EDIT_EM_LineIndex(wnd, es, line); ll = EDIT_EM_LineLength(wnd, es, li); s = es->selection_start; e = es->selection_end; ORDER_INT(s, e); s = min(li + ll, max(li, s)); e = min(li + ll, max(li, e)); if (rev && (s != e) && ((es->flags & EF_FOCUSED) || (es->style & ES_NOHIDESEL))) { x += EDIT_PaintText(wnd, es, dc, x, y, line, 0, s - li, FALSE); x += EDIT_PaintText(wnd, es, dc, x, y, line, s - li, e - s, TRUE); x += EDIT_PaintText(wnd, es, dc, x, y, line, e - li, li + ll - e, FALSE); } else x += EDIT_PaintText(wnd, es, dc, x, y, line, 0, ll, FALSE); } /********************************************************************* * * EDIT_PaintText * */ static INT EDIT_PaintText(WND *wnd, EDITSTATE *es, HDC dc, INT x, INT y, INT line, INT col, INT count, BOOL rev) { COLORREF BkColor; COLORREF TextColor; INT ret; INT li; SIZE size; if (!count) return 0; BkColor = GetBkColor(dc); TextColor = GetTextColor(dc); if (rev) { SetBkColor(dc, GetSysColor(COLOR_HIGHLIGHT)); SetTextColor(dc, GetSysColor(COLOR_HIGHLIGHTTEXT)); } li = EDIT_EM_LineIndex(wnd, es, line); if (es->style & ES_MULTILINE) { ret = (INT)LOWORD(TabbedTextOutA(dc, x, y, es->text + li + col, count, es->tabs_count, es->tabs, es->format_rect.left - es->x_offset)); } else { LPSTR text = EDIT_GetPasswordPointer_SL(wnd, es); TextOutA(dc, x, y, text + li + col, count); GetTextExtentPoint32A(dc, text + li + col, count, &size); ret = size.cx; if (es->style & ES_PASSWORD) HeapFree(es->heap, 0, text); } if (rev) { SetBkColor(dc, BkColor); SetTextColor(dc, TextColor); } return ret; } /********************************************************************* * * EDIT_SetCaretPos * */ static void EDIT_SetCaretPos(WND *wnd, EDITSTATE *es, INT pos, BOOL after_wrap) { LRESULT res = EDIT_EM_PosFromChar(wnd, es, pos, after_wrap); INT x = SLOWORD(res); INT y = SHIWORD(res); if(x < es->format_rect.left) x = es->format_rect.left; if(x > es->format_rect.right - 2) x = es->format_rect.right - 2; if(y > es->format_rect.bottom) y = es->format_rect.bottom; if(y < es->format_rect.top) y = es->format_rect.top; SetCaretPos(x, y); return; } /********************************************************************* * * EDIT_SetRectNP * * note: this is not (exactly) the handler called on EM_SETRECTNP * it is also used to set the rect of a single line control * */ static void EDIT_SetRectNP(WND *wnd, EDITSTATE *es, LPRECT rc) { CopyRect(&es->format_rect, rc); if (es->style & WS_BORDER) { INT bw = GetSystemMetrics(SM_CXBORDER) + 1; if(TWEAK_WineLook == WIN31_LOOK) bw += 2; es->format_rect.left += bw; es->format_rect.top += bw; es->format_rect.right -= bw; es->format_rect.bottom -= bw; } es->format_rect.left += es->left_margin; es->format_rect.right -= es->right_margin; es->format_rect.right = max(es->format_rect.right, es->format_rect.left + es->char_width); if (es->style & ES_MULTILINE) es->format_rect.bottom = es->format_rect.top + max(1, (es->format_rect.bottom - es->format_rect.top) / es->line_height) * es->line_height; else es->format_rect.bottom = es->format_rect.top + es->line_height; if ((es->style & ES_MULTILINE) && !(es->style & ES_AUTOHSCROLL)) EDIT_BuildLineDefs_ML(wnd, es); } /********************************************************************* * * EDIT_UnlockBuffer * */ static void EDIT_UnlockBuffer(WND *wnd, EDITSTATE *es, BOOL force) { if (!es) { ERR("no EDITSTATE ... please report\n"); return; } if (!(es->style & ES_MULTILINE)) return; if (!es->lock_count) { ERR("lock_count == 0 ... please report\n"); return; } if (!es->text) { ERR("es->text == 0 ... please report\n"); return; } if (force || (es->lock_count == 1)) { if (es->hloc32) { LocalUnlock(es->hloc32); es->text = NULL; } else if (es->hloc16) { LOCAL_Unlock(wnd->hInstance, es->hloc16); es->text = NULL; } } es->lock_count--; } /********************************************************************* * * EDIT_WordBreakProc * * Find the beginning of words. * Note: unlike the specs for a WordBreakProc, this function only * allows to be called without linebreaks between s[0] upto * s[count - 1]. Remember it is only called * internally, so we can decide this for ourselves. * */ static INT EDIT_WordBreakProc(LPSTR s, INT index, INT count, INT action) { INT ret = 0; TRACE("s=%p, index=%u, count=%u, action=%d\n", s, index, count, action); switch (action) { case WB_LEFT: if (!count) break; if (index) index--; if (s[index] == ' ') { while (index && (s[index] == ' ')) index--; if (index) { while (index && (s[index] != ' ')) index--; if (s[index] == ' ') index++; } } else { while (index && (s[index] != ' ')) index--; if (s[index] == ' ') index++; } ret = index; break; case WB_RIGHT: if (!count) break; if (index) index--; if (s[index] == ' ') while ((index < count) && (s[index] == ' ')) index++; else { while (s[index] && (s[index] != ' ') && (index < count)) index++; while ((s[index] == ' ') && (index < count)) index++; } ret = index; break; case WB_ISDELIMITER: ret = (s[index] == ' '); break; default: ERR("unknown action code, please report !\n"); break; } return ret; } /********************************************************************* * * EM_CHARFROMPOS * * returns line number (not index) in high-order word of result. * NB : Q137805 is unclear about this. POINT * pointer in lParam apply * to Richedit, not to the edit control. Original documentation is valid. * FIXME: do the specs mean to return -1 if outside client area or * if outside formatting rectangle ??? * */ static LRESULT EDIT_EM_CharFromPos(WND *wnd, EDITSTATE *es, INT x, INT y) { POINT pt; RECT rc; INT index; pt.x = x; pt.y = y; GetClientRect(wnd->hwndSelf, &rc); if (!PtInRect(&rc, pt)) return -1; index = EDIT_CharFromPos(wnd, es, x, y, NULL); return MAKELONG(index, EDIT_EM_LineFromChar(wnd, es, index)); } /********************************************************************* * * EM_FMTLINES * * Enable or disable soft breaks. */ static BOOL EDIT_EM_FmtLines(WND *wnd, EDITSTATE *es, BOOL add_eol) { es->flags &= ~EF_USE_SOFTBRK; if (add_eol) { es->flags |= EF_USE_SOFTBRK; FIXME("soft break enabled, not implemented\n"); } return add_eol; } /********************************************************************* * * EM_GETHANDLE * * Hopefully this won't fire back at us. * We always start with a fixed buffer in our own heap. * However, with this message a 32 bit application requests * a handle to 32 bit moveable local heap memory, where it expects * to find the text. * It's a pity that from this moment on we have to use this * local heap, because applications may rely on the handle * in the future. * * In this function we'll try to switch to local heap. * */ static HLOCAL EDIT_EM_GetHandle(WND *wnd, EDITSTATE *es) { HLOCAL newBuf; LPSTR newText; INT newSize; if (!(es->style & ES_MULTILINE)) return 0; if (es->hloc32) return es->hloc32; else if (es->hloc16) return (HLOCAL)es->hloc16; if (!(newBuf = LocalAlloc(LMEM_MOVEABLE, lstrlenA(es->text) + 1))) { ERR("could not allocate new 32 bit buffer\n"); return 0; } newSize = min(LocalSize(newBuf) - 1, es->buffer_limit); if (!(newText = LocalLock(newBuf))) { ERR("could not lock new 32 bit buffer\n"); LocalFree(newBuf); return 0; } lstrcpyA(newText, es->text); EDIT_UnlockBuffer(wnd, es, TRUE); if (es->text) HeapFree(es->heap, 0, es->text); es->hloc32 = newBuf; es->hloc16 = (HLOCAL16)NULL; es->buffer_size = newSize; es->text = newText; EDIT_LockBuffer(wnd, es); TRACE("switched to 32 bit local heap\n"); return es->hloc32; } /********************************************************************* * * EM_GETHANDLE16 * * Hopefully this won't fire back at us. * We always start with a buffer in 32 bit linear memory. * However, with this message a 16 bit application requests * a handle of 16 bit local heap memory, where it expects to find * the text. * It's a pitty that from this moment on we have to use this * local heap, because applications may rely on the handle * in the future. * * In this function we'll try to switch to local heap. */ static HLOCAL16 EDIT_EM_GetHandle16(WND *wnd, EDITSTATE *es) { HLOCAL16 newBuf; LPSTR newText; INT newSize; if (!(es->style & ES_MULTILINE)) return 0; if (es->hloc16) return es->hloc16; if (!LOCAL_HeapSize(wnd->hInstance)) { if (!LocalInit16(wnd->hInstance, 0, GlobalSize16(wnd->hInstance))) { ERR("could not initialize local heap\n"); return 0; } TRACE("local heap initialized\n"); } if (!(newBuf = LOCAL_Alloc(wnd->hInstance, LMEM_MOVEABLE, lstrlenA(es->text) + 1))) { ERR("could not allocate new 16 bit buffer\n"); return 0; } newSize = min(LOCAL_Size(wnd->hInstance, newBuf) - 1, es->buffer_limit); if (!(newText = LOCAL_Lock(wnd->hInstance, newBuf))) { ERR("could not lock new 16 bit buffer\n"); LOCAL_Free(wnd->hInstance, newBuf); return 0; } lstrcpyA(newText, es->text); EDIT_UnlockBuffer(wnd, es, TRUE); if (es->text) HeapFree(es->heap, 0, es->text); else if (es->hloc32) { while (LocalFree(es->hloc32)) ; LocalFree(es->hloc32); } es->hloc32 = (HLOCAL)NULL; es->hloc16 = newBuf; es->buffer_size = newSize; es->text = newText; EDIT_LockBuffer(wnd, es); TRACE("switched to 16 bit buffer\n"); return es->hloc16; } /********************************************************************* * * EM_GETLINE * */ static INT EDIT_EM_GetLine(WND *wnd, EDITSTATE *es, INT line, LPSTR lpch) { LPSTR src; INT len; INT i; if (es->style & ES_MULTILINE) { if (line >= es->line_count) return 0; } else line = 0; i = EDIT_EM_LineIndex(wnd, es, line); src = es->text + i; len = min(*(WORD *)lpch, EDIT_EM_LineLength(wnd, es, i)); for (i = 0 ; i < len ; i++) { *lpch = *src; src++; lpch++; } return (LRESULT)len; } /********************************************************************* * * EM_GETSEL * */ static LRESULT EDIT_EM_GetSel(WND *wnd, EDITSTATE *es, LPUINT start, LPUINT end) { UINT s = es->selection_start; UINT e = es->selection_end; ORDER_UINT(s, e); if (start) *start = s; if (end) *end = e; return MAKELONG(s, e); } /********************************************************************* * * EM_GETTHUMB * * FIXME: is this right ? (or should it be only VSCROLL) * (and maybe only for edit controls that really have their * own scrollbars) (and maybe only for multiline controls ?) * All in all: very poorly documented * * FIXME: now it's also broken, because of the new WM_HSCROLL / * WM_VSCROLL handlers * */ static LRESULT EDIT_EM_GetThumb(WND *wnd, EDITSTATE *es) { return MAKELONG(EDIT_WM_VScroll(wnd, es, EM_GETTHUMB16, 0, 0), EDIT_WM_HScroll(wnd, es, EM_GETTHUMB16, 0, 0)); } /********************************************************************* * * EM_LINEFROMCHAR * */ static INT EDIT_EM_LineFromChar(WND *wnd, EDITSTATE *es, INT index) { INT line; LINEDEF *line_def; if (!(es->style & ES_MULTILINE)) return 0; if (index > lstrlenA(es->text)) return es->line_count - 1; if (index == -1) index = min(es->selection_start, es->selection_end); line = 0; line_def = es->first_line_def; index -= line_def->length; while ((index >= 0) && line_def->next) { line++; line_def = line_def->next; index -= line_def->length; } return line; } /********************************************************************* * * EM_LINEINDEX * */ static INT EDIT_EM_LineIndex(WND *wnd, EDITSTATE *es, INT line) { INT line_index; LINEDEF *line_def; if (!(es->style & ES_MULTILINE)) return 0; if (line >= es->line_count) return -1; line_index = 0; line_def = es->first_line_def; if (line == -1) { INT index = es->selection_end - line_def->length; while ((index >= 0) && line_def->next) { line_index += line_def->length; line_def = line_def->next; index -= line_def->length; } } else { while (line > 0) { line_index += line_def->length; line_def = line_def->next; line--; } } return line_index; } /********************************************************************* * * EM_LINELENGTH * */ static INT EDIT_EM_LineLength(WND *wnd, EDITSTATE *es, INT index) { LINEDEF *line_def; if (!(es->style & ES_MULTILINE)) return lstrlenA(es->text); if (index == -1) { /* get the number of remaining non-selected chars of selected lines */ INT32 li; INT32 count; li = EDIT_EM_LineFromChar(wnd, es, es->selection_start); /* # chars before start of selection area */ count = es->selection_start - EDIT_EM_LineIndex(wnd, es, li); li = EDIT_EM_LineFromChar(wnd, es, es->selection_end); /* # chars after end of selection */ count += EDIT_EM_LineIndex(wnd, es, li) + EDIT_EM_LineLength(wnd, es, li) - es->selection_end; return count; } line_def = es->first_line_def; index -= line_def->length; while ((index >= 0) && line_def->next) { line_def = line_def->next; index -= line_def->length; } return line_def->net_length; } /********************************************************************* * * EM_LINESCROLL * * FIXME: dx is in average character widths * However, we assume it is in pixels when we use this * function internally * */ static BOOL EDIT_EM_LineScroll(WND *wnd, EDITSTATE *es, INT dx, INT dy) { INT nyoff; if (!(es->style & ES_MULTILINE)) return FALSE; if (-dx > es->x_offset) dx = -es->x_offset; if (dx > es->text_width - es->x_offset) dx = es->text_width - es->x_offset; nyoff = max(0, es->y_offset + dy); if (nyoff >= es->line_count) nyoff = es->line_count - 1; dy = (es->y_offset - nyoff) * es->line_height; if (dx || dy) { RECT rc1; RECT rc; GetClientRect(wnd->hwndSelf, &rc1); IntersectRect(&rc, &rc1, &es->format_rect); ScrollWindowEx(wnd->hwndSelf, -dx, dy, NULL, &rc, (HRGN)NULL, NULL, SW_INVALIDATE); es->y_offset = nyoff; es->x_offset += dx; } if (dx && !(es->flags & EF_HSCROLL_TRACK)) EDIT_NOTIFY_PARENT(wnd, EN_HSCROLL, "EN_HSCROLL"); if (dy && !(es->flags & EF_VSCROLL_TRACK)) EDIT_NOTIFY_PARENT(wnd, EN_VSCROLL, "EN_VSCROLL"); return TRUE; } /********************************************************************* * * EM_POSFROMCHAR * */ static LRESULT EDIT_EM_PosFromChar(WND *wnd, EDITSTATE *es, INT index, BOOL after_wrap) { INT len = lstrlenA(es->text); INT l; INT li; INT x; INT y = 0; HDC dc; HFONT old_font = 0; SIZE size; index = min(index, len); dc = GetDC(wnd->hwndSelf); if (es->font) old_font = SelectObject(dc, es->font); if (es->style & ES_MULTILINE) { l = EDIT_EM_LineFromChar(wnd, es, index); y = (l - es->y_offset) * es->line_height; li = EDIT_EM_LineIndex(wnd, es, l); if (after_wrap && (li == index) && l) { INT l2 = l - 1; LINEDEF *line_def = es->first_line_def; while (l2) { line_def = line_def->next; l2--; } if (line_def->ending == END_WRAP) { l--; y -= es->line_height; li = EDIT_EM_LineIndex(wnd, es, l); } } x = LOWORD(GetTabbedTextExtentA(dc, es->text + li, index - li, es->tabs_count, es->tabs)) - es->x_offset; } else { LPSTR text = EDIT_GetPasswordPointer_SL(wnd, es); if (index < es->x_offset) { GetTextExtentPoint32A(dc, text + index, es->x_offset - index, &size); x = -size.cx; } else { GetTextExtentPoint32A(dc, text + es->x_offset, index - es->x_offset, &size); x = size.cx; } y = 0; if (es->style & ES_PASSWORD) HeapFree(es->heap, 0 ,text); } x += es->format_rect.left; y += es->format_rect.top; if (es->font) SelectObject(dc, old_font); ReleaseDC(wnd->hwndSelf, dc); return MAKELONG((INT16)x, (INT16)y); } /********************************************************************* * * EM_REPLACESEL * * FIXME: handle ES_NUMBER and ES_OEMCONVERT here * */ static void EDIT_EM_ReplaceSel(WND *wnd, EDITSTATE *es, BOOL can_undo, LPCSTR lpsz_replace) { INT strl = lstrlenA(lpsz_replace); INT tl = lstrlenA(es->text); INT utl; UINT s; UINT e; INT i; LPSTR p; s = es->selection_start; e = es->selection_end; if ((s == e) && !strl) return; ORDER_UINT(s, e); if (!EDIT_MakeFit(wnd, es, tl - (e - s) + strl)) return; if (e != s) { /* there is something to be deleted */ if (can_undo) { utl = lstrlenA(es->undo_text); if (!es->undo_insert_count && (*es->undo_text && (s == es->undo_position))) { /* undo-buffer is extended to the right */ EDIT_MakeUndoFit(wnd, es, utl + e - s); lstrcpynA(es->undo_text + utl, es->text + s, e - s + 1); } else if (!es->undo_insert_count && (*es->undo_text && (e == es->undo_position))) { /* undo-buffer is extended to the left */ EDIT_MakeUndoFit(wnd, es, utl + e - s); for (p = es->undo_text + utl ; p >= es->undo_text ; p--) p[e - s] = p[0]; for (i = 0 , p = es->undo_text ; i < e - s ; i++) p[i] = (es->text + s)[i]; es->undo_position = s; } else { /* new undo-buffer */ EDIT_MakeUndoFit(wnd, es, e - s); lstrcpynA(es->undo_text, es->text + s, e - s + 1); es->undo_position = s; } /* any deletion makes the old insertion-undo invalid */ es->undo_insert_count = 0; } else EDIT_EM_EmptyUndoBuffer(wnd, es); /* now delete */ lstrcpyA(es->text + s, es->text + e); } if (strl) { /* there is an insertion */ if (can_undo) { if ((s == es->undo_position) || ((es->undo_insert_count) && (s == es->undo_position + es->undo_insert_count))) /* * insertion is new and at delete position or * an extension to either left or right */ es->undo_insert_count += strl; else { /* new insertion undo */ es->undo_position = s; es->undo_insert_count = strl; /* new insertion makes old delete-buffer invalid */ *es->undo_text = '\0'; } } else EDIT_EM_EmptyUndoBuffer(wnd, es); /* now insert */ tl = lstrlenA(es->text); for (p = es->text + tl ; p >= es->text + s ; p--) p[strl] = p[0]; for (i = 0 , p = es->text + s ; i < strl ; i++) p[i] = lpsz_replace[i]; if(es->style & ES_UPPERCASE) CharUpperBuffA(p, strl); else if(es->style & ES_LOWERCASE) CharLowerBuffA(p, strl); s += strl; } /* FIXME: really inefficient */ if (es->style & ES_MULTILINE) EDIT_BuildLineDefs_ML(wnd, es); EDIT_EM_SetSel(wnd, es, s, s, FALSE); es->flags |= EF_MODIFIED; es->flags |= EF_UPDATE; EDIT_EM_ScrollCaret(wnd, es); /* FIXME: really inefficient */ EDIT_UpdateText(wnd, NULL, TRUE); } /********************************************************************* * * EM_SCROLL * */ static LRESULT EDIT_EM_Scroll(WND *wnd, EDITSTATE *es, INT action) { INT dy; if (!(es->style & ES_MULTILINE)) return (LRESULT)FALSE; dy = 0; switch (action) { case SB_LINEUP: if (es->y_offset) dy = -1; break; case SB_LINEDOWN: if (es->y_offset < es->line_count - 1) dy = 1; break; case SB_PAGEUP: if (es->y_offset) dy = -(es->format_rect.bottom - es->format_rect.top) / es->line_height; break; case SB_PAGEDOWN: if (es->y_offset < es->line_count - 1) dy = (es->format_rect.bottom - es->format_rect.top) / es->line_height; break; default: return (LRESULT)FALSE; } if (dy) { EDIT_EM_LineScroll(wnd, es, 0, dy); EDIT_NOTIFY_PARENT(wnd, EN_VSCROLL, "EN_VSCROLL"); } return MAKELONG((INT16)dy, (BOOL16)TRUE); } /********************************************************************* * * EM_SCROLLCARET * */ static void EDIT_EM_ScrollCaret(WND *wnd, EDITSTATE *es) { if (es->style & ES_MULTILINE) { INT l; INT li; INT vlc; INT ww; INT cw = es->char_width; INT x; INT dy = 0; INT dx = 0; l = EDIT_EM_LineFromChar(wnd, es, es->selection_end); li = EDIT_EM_LineIndex(wnd, es, l); x = SLOWORD(EDIT_EM_PosFromChar(wnd, es, es->selection_end, es->flags & EF_AFTER_WRAP)); vlc = (es->format_rect.bottom - es->format_rect.top) / es->line_height; if (l >= es->y_offset + vlc) dy = l - vlc + 1 - es->y_offset; if (l < es->y_offset) dy = l - es->y_offset; ww = es->format_rect.right - es->format_rect.left; if (x < es->format_rect.left) dx = x - es->format_rect.left - ww / HSCROLL_FRACTION / cw * cw; if (x > es->format_rect.right) dx = x - es->format_rect.left - (HSCROLL_FRACTION - 1) * ww / HSCROLL_FRACTION / cw * cw; if (dy || dx) EDIT_EM_LineScroll(wnd, es, dx, dy); } else { INT x; INT goal; INT format_width; if (!(es->style & ES_AUTOHSCROLL)) return; x = SLOWORD(EDIT_EM_PosFromChar(wnd, es, es->selection_end, FALSE)); format_width = es->format_rect.right - es->format_rect.left; if (x < es->format_rect.left) { goal = es->format_rect.left + format_width / HSCROLL_FRACTION; do { es->x_offset--; x = SLOWORD(EDIT_EM_PosFromChar(wnd, es, es->selection_end, FALSE)); } while ((x < goal) && es->x_offset); /* FIXME: use ScrollWindow() somehow to improve performance */ EDIT_UpdateText(wnd, NULL, TRUE); } else if (x > es->format_rect.right) { INT x_last; INT len = lstrlenA(es->text); goal = es->format_rect.right - format_width / HSCROLL_FRACTION; do { es->x_offset++; x = SLOWORD(EDIT_EM_PosFromChar(wnd, es, es->selection_end, FALSE)); x_last = SLOWORD(EDIT_EM_PosFromChar(wnd, es, len, FALSE)); } while ((x > goal) && (x_last > es->format_rect.right)); /* FIXME: use ScrollWindow() somehow to improve performance */ EDIT_UpdateText(wnd, NULL, TRUE); } } } /********************************************************************* * * EM_SETHANDLE * * FIXME: ES_LOWERCASE, ES_UPPERCASE, ES_OEMCONVERT, ES_NUMBER ??? * */ static void EDIT_EM_SetHandle(WND *wnd, EDITSTATE *es, HLOCAL hloc) { if (!(es->style & ES_MULTILINE)) return; if (!hloc) { WARN("called with NULL handle\n"); return; } EDIT_UnlockBuffer(wnd, es, TRUE); /* * old buffer is freed by caller, unless * it is still in our own heap. (in that case * we free it, correcting the buggy caller.) */ if (es->text) HeapFree(es->heap, 0, es->text); es->hloc16 = (HLOCAL16)NULL; es->hloc32 = hloc; es->text = NULL; es->buffer_size = LocalSize(es->hloc32) - 1; EDIT_LockBuffer(wnd, es); es->x_offset = es->y_offset = 0; es->selection_start = es->selection_end = 0; EDIT_EM_EmptyUndoBuffer(wnd, es); es->flags &= ~EF_MODIFIED; es->flags &= ~EF_UPDATE; EDIT_BuildLineDefs_ML(wnd, es); EDIT_UpdateText(wnd, NULL, TRUE); EDIT_EM_ScrollCaret(wnd, es); } /********************************************************************* * * EM_SETHANDLE16 * * FIXME: ES_LOWERCASE, ES_UPPERCASE, ES_OEMCONVERT, ES_NUMBER ??? * */ static void EDIT_EM_SetHandle16(WND *wnd, EDITSTATE *es, HLOCAL16 hloc) { if (!(es->style & ES_MULTILINE)) return; if (!hloc) { WARN("called with NULL handle\n"); return; } EDIT_UnlockBuffer(wnd, es, TRUE); /* * old buffer is freed by caller, unless * it is still in our own heap. (in that case * we free it, correcting the buggy caller.) */ if (es->text) HeapFree(es->heap, 0, es->text); es->hloc16 = hloc; es->hloc32 = (HLOCAL)NULL; es->text = NULL; es->buffer_size = LOCAL_Size(wnd->hInstance, es->hloc16) - 1; EDIT_LockBuffer(wnd, es); es->x_offset = es->y_offset = 0; es->selection_start = es->selection_end = 0; EDIT_EM_EmptyUndoBuffer(wnd, es); es->flags &= ~EF_MODIFIED; es->flags &= ~EF_UPDATE; EDIT_BuildLineDefs_ML(wnd, es); EDIT_UpdateText(wnd, NULL, TRUE); EDIT_EM_ScrollCaret(wnd, es); } /********************************************************************* * * EM_SETLIMITTEXT * * FIXME: in WinNT maxsize is 0x7FFFFFFF / 0xFFFFFFFF * However, the windows version is not complied to yet in all of edit.c * */ static void EDIT_EM_SetLimitText(WND *wnd, EDITSTATE *es, INT limit) { if (es->style & ES_MULTILINE) { if (limit) es->buffer_limit = min(limit, BUFLIMIT_MULTI); else es->buffer_limit = BUFLIMIT_MULTI; } else { if (limit) es->buffer_limit = min(limit, BUFLIMIT_SINGLE); else es->buffer_limit = BUFLIMIT_SINGLE; } } /********************************************************************* * * EM_SETMARGINS * * EC_USEFONTINFO is used as a left or right value i.e. lParam and not as an * action wParam despite what the docs say. EC_USEFONTINFO means one third * of the char's width, according to the new docs. * */ static void EDIT_EM_SetMargins(WND *wnd, EDITSTATE *es, INT action, INT left, INT right) { if (action & EC_LEFTMARGIN) { if (left != EC_USEFONTINFO) es->left_margin = left; else es->left_margin = es->char_width / 3; } if (action & EC_RIGHTMARGIN) { if (right != EC_USEFONTINFO) es->right_margin = right; else es->right_margin = es->char_width / 3; } TRACE("left=%d, right=%d\n", es->left_margin, es->right_margin); } /********************************************************************* * * EM_SETPASSWORDCHAR * */ static void EDIT_EM_SetPasswordChar(WND *wnd, EDITSTATE *es, CHAR c) { if (es->style & ES_MULTILINE) return; if (es->password_char == c) return; es->password_char = c; if (c) { wnd->dwStyle |= ES_PASSWORD; es->style |= ES_PASSWORD; } else { wnd->dwStyle &= ~ES_PASSWORD; es->style &= ~ES_PASSWORD; } EDIT_UpdateText(wnd, NULL, TRUE); } /********************************************************************* * * EDIT_EM_SetSel * * note: unlike the specs say: the order of start and end * _is_ preserved in Windows. (i.e. start can be > end) * In other words: this handler is OK * */ static void EDIT_EM_SetSel(WND *wnd, EDITSTATE *es, UINT start, UINT end, BOOL after_wrap) { UINT old_start = es->selection_start; UINT old_end = es->selection_end; UINT len = lstrlenA(es->text); if (start == -1) { start = es->selection_end; end = es->selection_end; } else { start = min(start, len); end = min(end, len); } es->selection_start = start; es->selection_end = end; if (after_wrap) es->flags |= EF_AFTER_WRAP; else es->flags &= ~EF_AFTER_WRAP; if (es->flags & EF_FOCUSED) EDIT_SetCaretPos(wnd, es, end, after_wrap); /* This is a little bit more efficient than before, not sure if it can be improved. FIXME? */ ORDER_UINT(start, end); ORDER_UINT(end, old_end); ORDER_UINT(start, old_start); ORDER_UINT(old_start, old_end); if (end != old_start) { /* * One can also do * ORDER_UINT32(end, old_start); * EDIT_InvalidateText(wnd, es, start, end); * EDIT_InvalidateText(wnd, es, old_start, old_end); * in place of the following if statement. */ if (old_start > end ) { EDIT_InvalidateText(wnd, es, start, end); EDIT_InvalidateText(wnd, es, old_start, old_end); } else { EDIT_InvalidateText(wnd, es, start, old_start); EDIT_InvalidateText(wnd, es, end, old_end); } } else EDIT_InvalidateText(wnd, es, start, old_end); } /********************************************************************* * * EM_SETTABSTOPS * */ static BOOL EDIT_EM_SetTabStops(WND *wnd, EDITSTATE *es, INT count, LPINT tabs) { if (!(es->style & ES_MULTILINE)) return FALSE; if (es->tabs) HeapFree(es->heap, 0, es->tabs); es->tabs_count = count; if (!count) es->tabs = NULL; else { es->tabs = HeapAlloc(es->heap, 0, count * sizeof(INT)); memcpy(es->tabs, tabs, count * sizeof(INT)); } return TRUE; } /********************************************************************* * * EM_SETTABSTOPS16 * */ static BOOL EDIT_EM_SetTabStops16(WND *wnd, EDITSTATE *es, INT count, LPINT16 tabs) { if (!(es->style & ES_MULTILINE)) return FALSE; if (es->tabs) HeapFree(es->heap, 0, es->tabs); es->tabs_count = count; if (!count) es->tabs = NULL; else { INT i; es->tabs = HeapAlloc(es->heap, 0, count * sizeof(INT)); for (i = 0 ; i < count ; i++) es->tabs[i] = *tabs++; } return TRUE; } /********************************************************************* * * EM_SETWORDBREAKPROC * */ static void EDIT_EM_SetWordBreakProc(WND *wnd, EDITSTATE *es, EDITWORDBREAKPROCA wbp) { if (es->word_break_proc32A == wbp) return; es->word_break_proc32A = wbp; es->word_break_proc16 = NULL; if ((es->style & ES_MULTILINE) && !(es->style & ES_AUTOHSCROLL)) { EDIT_BuildLineDefs_ML(wnd, es); EDIT_UpdateText(wnd, NULL, TRUE); } } /********************************************************************* * * EM_SETWORDBREAKPROC16 * */ static void EDIT_EM_SetWordBreakProc16(WND *wnd, EDITSTATE *es, EDITWORDBREAKPROC16 wbp) { if (es->word_break_proc16 == wbp) return; es->word_break_proc32A = NULL; es->word_break_proc16 = wbp; if ((es->style & ES_MULTILINE) && !(es->style & ES_AUTOHSCROLL)) { EDIT_BuildLineDefs_ML(wnd, es); EDIT_UpdateText(wnd, NULL, TRUE); } } /********************************************************************* * * EM_UNDO / WM_UNDO * */ static BOOL EDIT_EM_Undo(WND *wnd, EDITSTATE *es) { INT ulength = lstrlenA(es->undo_text); LPSTR utext = HeapAlloc(es->heap, 0, ulength + 1); lstrcpyA(utext, es->undo_text); TRACE("before UNDO:insertion length = %d, deletion buffer = %s\n", es->undo_insert_count, utext); EDIT_EM_SetSel(wnd, es, es->undo_position, es->undo_position + es->undo_insert_count, FALSE); EDIT_EM_EmptyUndoBuffer(wnd, es); EDIT_EM_ReplaceSel(wnd, es, TRUE, utext); EDIT_EM_SetSel(wnd, es, es->undo_position, es->undo_position + es->undo_insert_count, FALSE); HeapFree(es->heap, 0, utext); TRACE("after UNDO:insertion length = %d, deletion buffer = %s\n", es->undo_insert_count, es->undo_text); if (es->flags & EF_UPDATE) { es->flags &= ~EF_UPDATE; EDIT_NOTIFY_PARENT(wnd, EN_CHANGE, "EN_CHANGE"); } return TRUE; } /********************************************************************* * * WM_CHAR * */ static void EDIT_WM_Char(WND *wnd, EDITSTATE *es, CHAR c, DWORD key_data) { BOOL control = GetKeyState(VK_CONTROL) & 0x8000; switch (c) { case '\r': /* If the edit doesn't want the return and it's not a multiline edit, do nothing */ if(!(es->style & ES_MULTILINE) && !(es->style & ES_WANTRETURN)) break; case '\n': if (es->style & ES_MULTILINE) { if (es->style & ES_READONLY) { EDIT_MoveHome(wnd, es, FALSE); EDIT_MoveDown_ML(wnd, es, FALSE); } else { EDIT_EM_ReplaceSel(wnd, es, TRUE, "\r\n"); if (es->flags & EF_UPDATE) { es->flags &= ~EF_UPDATE; EDIT_NOTIFY_PARENT(wnd, EN_CHANGE, "EN_CHANGE"); } } } break; case '\t': if ((es->style & ES_MULTILINE) && !(es->style & ES_READONLY)) { EDIT_EM_ReplaceSel(wnd, es, TRUE, "\t"); if (es->flags & EF_UPDATE) { es->flags &= ~EF_UPDATE; EDIT_NOTIFY_PARENT(wnd, EN_CHANGE, "EN_CHANGE"); } } break; case VK_BACK: if (!(es->style & ES_READONLY) && !control) { if (es->selection_start != es->selection_end) EDIT_WM_Clear(wnd, es); else { /* delete character left of caret */ EDIT_EM_SetSel(wnd, es, -1, 0, FALSE); EDIT_MoveBackward(wnd, es, TRUE); EDIT_WM_Clear(wnd, es); } } break; case 0x03: /* ^C */ SendMessageA(wnd->hwndSelf, WM_COPY, 0, 0); break; case 0x16: /* ^V */ SendMessageA(wnd->hwndSelf, WM_PASTE, 0, 0); break; case 0x18: /* ^X */ SendMessageA(wnd->hwndSelf, WM_CUT, 0, 0); break; default: if (!(es->style & ES_READONLY) && ((BYTE)c >= ' ') && (c != 127)) { char str[2]; str[0] = c; str[1] = '\0'; EDIT_EM_ReplaceSel(wnd, es, TRUE, str); if (es->flags & EF_UPDATE) { es->flags &= ~EF_UPDATE; EDIT_NOTIFY_PARENT(wnd, EN_CHANGE, "EN_CHANGE"); } } break; } } /********************************************************************* * * WM_COMMAND * */ static void EDIT_WM_Command(WND *wnd, EDITSTATE *es, INT code, INT id, HWND control) { if (code || control) return; switch (id) { case EM_UNDO: EDIT_EM_Undo(wnd, es); break; case WM_CUT: EDIT_WM_Cut(wnd, es); break; case WM_COPY: EDIT_WM_Copy(wnd, es); break; case WM_PASTE: EDIT_WM_Paste(wnd, es); break; case WM_CLEAR: EDIT_WM_Clear(wnd, es); break; case EM_SETSEL: EDIT_EM_SetSel(wnd, es, 0, -1, FALSE); EDIT_EM_ScrollCaret(wnd, es); break; default: ERR("unknown menu item, please report\n"); break; } } /********************************************************************* * * WM_CONTEXTMENU * * Note: the resource files resource/sysres_??.rc cannot define a * single popup menu. Hence we use a (dummy) menubar * containing the single popup menu as its first item. * * FIXME: the message identifiers have been chosen arbitrarily, * hence we use MF_BYPOSITION. * We might as well use the "real" values (anybody knows ?) * The menu definition is in resources/sysres_??.rc. * Once these are OK, we better use MF_BYCOMMAND here * (as we do in EDIT_WM_Command()). * */ static void EDIT_WM_ContextMenu(WND *wnd, EDITSTATE *es, HWND hwnd, INT x, INT y) { HMENU menu = LoadMenuA(GetModuleHandleA("USER32"), "EDITMENU"); HMENU popup = GetSubMenu(menu, 0); UINT start = es->selection_start; UINT end = es->selection_end; ORDER_UINT(start, end); /* undo */ EnableMenuItem(popup, 0, MF_BYPOSITION | (EDIT_EM_CanUndo(wnd, es) ? MF_ENABLED : MF_GRAYED)); /* cut */ EnableMenuItem(popup, 2, MF_BYPOSITION | ((end - start) && !(es->style & ES_PASSWORD) ? MF_ENABLED : MF_GRAYED)); /* copy */ EnableMenuItem(popup, 3, MF_BYPOSITION | ((end - start) && !(es->style & ES_PASSWORD) ? MF_ENABLED : MF_GRAYED)); /* paste */ EnableMenuItem(popup, 4, MF_BYPOSITION | (IsClipboardFormatAvailable(CF_TEXT) ? MF_ENABLED : MF_GRAYED)); /* delete */ EnableMenuItem(popup, 5, MF_BYPOSITION | ((end - start) ? MF_ENABLED : MF_GRAYED)); /* select all */ EnableMenuItem(popup, 7, MF_BYPOSITION | (start || (end != lstrlenA(es->text)) ? MF_ENABLED : MF_GRAYED)); TrackPopupMenu(popup, TPM_LEFTALIGN | TPM_RIGHTBUTTON, x, y, 0, wnd->hwndSelf, NULL); DestroyMenu(menu); } /********************************************************************* * * WM_COPY * */ static void EDIT_WM_Copy(WND *wnd, EDITSTATE *es) { INT s = es->selection_start; INT e = es->selection_end; HGLOBAL hdst; LPSTR dst; if (e == s) return; ORDER_INT(s, e); hdst = GlobalAlloc(GMEM_MOVEABLE, (DWORD)(e - s + 1)); dst = GlobalLock(hdst); lstrcpynA(dst, es->text + s, e - s + 1); GlobalUnlock(hdst); OpenClipboard(wnd->hwndSelf); EmptyClipboard(); SetClipboardData(CF_TEXT, hdst); CloseClipboard(); } /********************************************************************* * * WM_CREATE * */ static LRESULT EDIT_WM_Create(WND *wnd, EDITSTATE *es, LPCREATESTRUCTA cs) { /* * To initialize some final structure members, we call some helper * functions. However, since the EDITSTATE is not consistent (i.e. * not fully initialized), we should be very careful which * functions can be called, and in what order. */ EDIT_WM_SetFont(wnd, es, 0, FALSE); EDIT_EM_EmptyUndoBuffer(wnd, es); if (cs->lpszName && *(cs->lpszName) != '\0') { EDIT_EM_ReplaceSel(wnd, es, FALSE, cs->lpszName); /* if we insert text to the editline, the text scrolls out * of the window, as the caret is placed after the insert * pos normally; thus we reset es->selection... to 0 and * update caret */ es->selection_start = es->selection_end = 0; EDIT_EM_ScrollCaret(wnd, es); if (es->flags & EF_UPDATE) { es->flags &= ~EF_UPDATE; EDIT_NOTIFY_PARENT(wnd, EN_CHANGE, "EN_CHANGE"); } } return 0; } /********************************************************************* * * WM_DESTROY * */ static void EDIT_WM_Destroy(WND *wnd, EDITSTATE *es) { if (es->hloc32) { while (LocalUnlock(es->hloc32)) ; LocalFree(es->hloc32); } if (es->hloc16) { while (LOCAL_Unlock(wnd->hInstance, es->hloc16)) ; LOCAL_Free(wnd->hInstance, es->hloc16); } HeapDestroy(es->heap); HeapFree(GetProcessHeap(), 0, es); *(EDITSTATE **)wnd->wExtra = NULL; } /********************************************************************* * * WM_ERASEBKGND * */ static LRESULT EDIT_WM_EraseBkGnd(WND *wnd, EDITSTATE *es, HDC dc) { HBRUSH brush; RECT rc; if ( VERSION_AppWinVer() >= 0x40000 &&( !es->bEnableState || (es->style & ES_READONLY))) brush = (HBRUSH)EDIT_SEND_CTLCOLORSTATIC(wnd, dc); else brush = (HBRUSH)EDIT_SEND_CTLCOLOR(wnd, dc); if (!brush) brush = (HBRUSH)GetStockObject(WHITE_BRUSH); GetClientRect(wnd->hwndSelf, &rc); IntersectClipRect(dc, rc.left, rc.top, rc.right, rc.bottom); GetClipBox(dc, &rc); /* * FIXME: specs say that we should UnrealizeObject() the brush, * but the specs of UnrealizeObject() say that we shouldn't * unrealize a stock object. The default brush that * DefWndProc() returns is ... a stock object. */ FillRect(dc, &rc, brush); return -1; } /********************************************************************* * * WM_GETTEXT * */ static INT EDIT_WM_GetText(WND *wnd, EDITSTATE *es, INT count, LPSTR text) { lstrcpynA(text, es->text, count); return strlen(text); } /********************************************************************* * * EDIT_HScroll_Hack * * 16 bit notepad needs this. Actually it is not _our_ hack, * it is notepad's. Notepad is sending us scrollbar messages with * undocumented parameters without us even having a scrollbar ... !?!? * */ static LRESULT EDIT_HScroll_Hack(WND *wnd, EDITSTATE *es, INT action, INT pos, HWND scroll_bar) { INT dx = 0; INT fw = es->format_rect.right - es->format_rect.left; LRESULT ret = 0; if (!(es->flags & EF_HSCROLL_HACK)) { ERR("hacked WM_HSCROLL handler invoked\n"); ERR(" if you are _not_ running 16 bit notepad, please report\n"); ERR(" (this message is only displayed once per edit control)\n"); es->flags |= EF_HSCROLL_HACK; } switch (action) { case SB_LINELEFT: if (es->x_offset) dx = -es->char_width; break; case SB_LINERIGHT: if (es->x_offset < es->text_width) dx = es->char_width; break; case SB_PAGELEFT: if (es->x_offset) dx = -fw / HSCROLL_FRACTION / es->char_width * es->char_width; break; case SB_PAGERIGHT: if (es->x_offset < es->text_width) dx = fw / HSCROLL_FRACTION / es->char_width * es->char_width; break; case SB_LEFT: if (es->x_offset) dx = -es->x_offset; break; case SB_RIGHT: if (es->x_offset < es->text_width) dx = es->text_width - es->x_offset; break; case SB_THUMBTRACK: es->flags |= EF_HSCROLL_TRACK; dx = pos * es->text_width / 100 - es->x_offset; break; case SB_THUMBPOSITION: es->flags &= ~EF_HSCROLL_TRACK; if (!(dx = pos * es->text_width / 100 - es->x_offset)) EDIT_NOTIFY_PARENT(wnd, EN_HSCROLL, "EN_HSCROLL"); break; case SB_ENDSCROLL: break; /* * FIXME : the next two are undocumented ! * Are we doing the right thing ? * At least Win 3.1 Notepad makes use of EM_GETTHUMB this way, * although it's also a regular control message. */ case EM_GETTHUMB16: ret = es->text_width ? es->x_offset * 100 / es->text_width : 0; break; case EM_LINESCROLL16: dx = pos; break; default: ERR("undocumented (hacked) WM_HSCROLL parameter, please report\n"); return 0; } if (dx) EDIT_EM_LineScroll(wnd, es, dx, 0); return ret; } /********************************************************************* * * WM_HSCROLL * */ static LRESULT EDIT_WM_HScroll(WND *wnd, EDITSTATE *es, INT action, INT pos, HWND scroll_bar) { INT dx; INT fw; if (!(es->style & ES_MULTILINE)) return 0; if (!(es->style & ES_AUTOHSCROLL)) return 0; if (!(es->style & WS_HSCROLL)) return EDIT_HScroll_Hack(wnd, es, action, pos, scroll_bar); dx = 0; fw = es->format_rect.right - es->format_rect.left; switch (action) { case SB_LINELEFT: if (es->x_offset) dx = -es->char_width; break; case SB_LINERIGHT: if (es->x_offset < es->text_width) dx = es->char_width; break; case SB_PAGELEFT: if (es->x_offset) dx = -fw / HSCROLL_FRACTION / es->char_width * es->char_width; break; case SB_PAGERIGHT: if (es->x_offset < es->text_width) dx = fw / HSCROLL_FRACTION / es->char_width * es->char_width; break; case SB_LEFT: if (es->x_offset) dx = -es->x_offset; break; case SB_RIGHT: if (es->x_offset < es->text_width) dx = es->text_width - es->x_offset; break; case SB_THUMBTRACK: es->flags |= EF_HSCROLL_TRACK; dx = pos - es->x_offset; break; case SB_THUMBPOSITION: es->flags &= ~EF_HSCROLL_TRACK; if (!(dx = pos - es->x_offset)) { SetScrollPos(wnd->hwndSelf, SB_HORZ, pos, TRUE); EDIT_NOTIFY_PARENT(wnd, EN_HSCROLL, "EN_HSCROLL"); } break; case SB_ENDSCROLL: break; default: ERR("undocumented WM_HSCROLL parameter, please report\n"); return 0; } if (dx) EDIT_EM_LineScroll(wnd, es, dx, 0); return 0; } /********************************************************************* * * EDIT_CheckCombo * */ static BOOL EDIT_CheckCombo(WND *wnd, UINT msg, INT key, DWORD key_data) { HWND hLBox; /******************************************************************** * This if statement used to check to see if the parent of the * edit control was a 'combobox' by comparing the ATOM of the parent * to a table of internal window control ATOMs. However, this check * would fail if the parent was a superclassed combobox (Although * having the same basic functionality of a combobox, it has a * different name and ATOM, thus defeating this check.) * * The safe way to determine if the parent is a combobox is to send it * a message only a combo box would understand. I send it a message * CB_GETCOUNT, if I get 0 then the parent is not a combobox - * return FALSE. If I get > 0, then the parent IS a combobox * (or sub/super classed derrivative thereof) ********************************************************************/ if ( ((SendMessageA(wnd->parent->hwndSelf, CB_GETCOUNT, 0, 0)) > 0) && (hLBox = COMBO_GetLBWindow(wnd->parent)) ) { HWND hCombo = wnd->parent->hwndSelf; BOOL bUIFlip = TRUE; TRACE_(combo)("[%04x]: handling msg %04x (%04x)\n", wnd->hwndSelf, (UINT16)msg, (UINT16)key); switch (msg) { case WM_KEYDOWN: /* Handle F4 and arrow keys */ if (key != VK_F4) { bUIFlip = (BOOL)SendMessageA(hCombo, CB_GETEXTENDEDUI, 0, 0); if (SendMessageA(hCombo, CB_GETDROPPEDSTATE, 0, 0)) bUIFlip = FALSE; } if (!bUIFlip) SendMessageA(hLBox, WM_KEYDOWN, (WPARAM)key, 0); else { /* make sure ComboLBox pops up */ SendMessageA(hCombo, CB_SETEXTENDEDUI, 0, 0); SendMessageA(hLBox, WM_KEYDOWN, VK_F4, 0); SendMessageA(hCombo, CB_SETEXTENDEDUI, 1, 0); } break; case WM_SYSKEYDOWN: /* Handle Alt+up/down arrows */ bUIFlip = (BOOL)SendMessageA(hCombo, CB_GETEXTENDEDUI, 0, 0); if (bUIFlip) { bUIFlip = (BOOL)SendMessageA(hCombo, CB_GETDROPPEDSTATE, 0, 0); SendMessageA(hCombo, CB_SHOWDROPDOWN, (bUIFlip) ? FALSE : TRUE, 0); } else SendMessageA(hLBox, WM_KEYDOWN, VK_F4, 0); break; } return TRUE; } return FALSE; } /********************************************************************* * * WM_KEYDOWN * * Handling of special keys that don't produce a WM_CHAR * (i.e. non-printable keys) & Backspace & Delete * */ static LRESULT EDIT_WM_KeyDown(WND *wnd, EDITSTATE *es, INT key, DWORD key_data) { BOOL shift; BOOL control; if (GetKeyState(VK_MENU) & 0x8000) return 0; shift = GetKeyState(VK_SHIFT) & 0x8000; control = GetKeyState(VK_CONTROL) & 0x8000; switch (key) { case VK_F4: case VK_UP: if (EDIT_CheckCombo(wnd, WM_KEYDOWN, key, key_data)) break; if (key == VK_F4) break; /* fall through */ case VK_LEFT: if ((es->style & ES_MULTILINE) && (key == VK_UP)) EDIT_MoveUp_ML(wnd, es, shift); else if (control) EDIT_MoveWordBackward(wnd, es, shift); else EDIT_MoveBackward(wnd, es, shift); break; case VK_DOWN: if (EDIT_CheckCombo(wnd, WM_KEYDOWN, key, key_data)) break; /* fall through */ case VK_RIGHT: if ((es->style & ES_MULTILINE) && (key == VK_DOWN)) EDIT_MoveDown_ML(wnd, es, shift); else if (control) EDIT_MoveWordForward(wnd, es, shift); else EDIT_MoveForward(wnd, es, shift); break; case VK_HOME: EDIT_MoveHome(wnd, es, shift); break; case VK_END: EDIT_MoveEnd(wnd, es, shift); break; case VK_PRIOR: if (es->style & ES_MULTILINE) EDIT_MovePageUp_ML(wnd, es, shift); break; case VK_NEXT: if (es->style & ES_MULTILINE) EDIT_MovePageDown_ML(wnd, es, shift); break; case VK_DELETE: if (!(es->style & ES_READONLY) && !(shift && control)) { if (es->selection_start != es->selection_end) { if (shift) EDIT_WM_Cut(wnd, es); else EDIT_WM_Clear(wnd, es); } else { if (shift) { /* delete character left of caret */ EDIT_EM_SetSel(wnd, es, -1, 0, FALSE); EDIT_MoveBackward(wnd, es, TRUE); EDIT_WM_Clear(wnd, es); } else if (control) { /* delete to end of line */ EDIT_EM_SetSel(wnd, es, -1, 0, FALSE); EDIT_MoveEnd(wnd, es, TRUE); EDIT_WM_Clear(wnd, es); } else { /* delete character right of caret */ EDIT_EM_SetSel(wnd, es, -1, 0, FALSE); EDIT_MoveForward(wnd, es, TRUE); EDIT_WM_Clear(wnd, es); } } } break; case VK_INSERT: if (shift) { if (!(es->style & ES_READONLY)) EDIT_WM_Paste(wnd, es); } else if (control) EDIT_WM_Copy(wnd, es); break; case VK_RETURN: /* If the edit doesn't want the return send a message to the default object */ if(!(es->style & ES_WANTRETURN)) { HWND hwndParent = GetParent(wnd->hwndSelf); DWORD dw = SendMessage16( hwndParent, DM_GETDEFID, 0, 0 ); if (HIWORD(dw) == DC_HASDEFID) { SendMessageA( hwndParent, WM_COMMAND, MAKEWPARAM( LOWORD(dw), BN_CLICKED ), (LPARAM)GetDlgItem( hwndParent, LOWORD(dw) ) ); } } break; } return 0; } /********************************************************************* * * WM_KILLFOCUS * */ static LRESULT EDIT_WM_KillFocus(WND *wnd, EDITSTATE *es, HWND window_getting_focus) { es->flags &= ~EF_FOCUSED; DestroyCaret(); if(!(es->style & ES_NOHIDESEL)) EDIT_InvalidateText(wnd, es, es->selection_start, es->selection_end); EDIT_NOTIFY_PARENT(wnd, EN_KILLFOCUS, "EN_KILLFOCUS"); return 0; } /********************************************************************* * * WM_LBUTTONDBLCLK * * The caret position has been set on the WM_LBUTTONDOWN message * */ static LRESULT EDIT_WM_LButtonDblClk(WND *wnd, EDITSTATE *es, DWORD keys, INT x, INT y) { INT s; INT e = es->selection_end; INT l; INT li; INT ll; if (!(es->flags & EF_FOCUSED)) return 0; l = EDIT_EM_LineFromChar(wnd, es, e); li = EDIT_EM_LineIndex(wnd, es, l); ll = EDIT_EM_LineLength(wnd, es, e); s = li + EDIT_CallWordBreakProc (wnd, es, li, e - li, ll, WB_LEFT); e = li + EDIT_CallWordBreakProc(wnd, es, li, e - li, ll, WB_RIGHT); EDIT_EM_SetSel(wnd, es, s, e, FALSE); EDIT_EM_ScrollCaret(wnd, es); return 0; } /********************************************************************* * * WM_LBUTTONDOWN * */ static LRESULT EDIT_WM_LButtonDown(WND *wnd, EDITSTATE *es, DWORD keys, INT x, INT y) { INT e; BOOL after_wrap; if (!(es->flags & EF_FOCUSED)) return 0; es->bCaptureState = TRUE; SetCapture(wnd->hwndSelf); EDIT_ConfinePoint(wnd, es, &x, &y); e = EDIT_CharFromPos(wnd, es, x, y, &after_wrap); EDIT_EM_SetSel(wnd, es, (keys & MK_SHIFT) ? es->selection_start : e, e, after_wrap); EDIT_EM_ScrollCaret(wnd, es); es->region_posx = es->region_posy = 0; SetTimer(wnd->hwndSelf, 0, 100, NULL); return 0; } /********************************************************************* * * WM_LBUTTONUP * */ static LRESULT EDIT_WM_LButtonUp(WND *wnd, EDITSTATE *es, DWORD keys, INT x, INT y) { if (es->bCaptureState && GetCapture() == wnd->hwndSelf) { KillTimer(wnd->hwndSelf, 0); ReleaseCapture(); } es->bCaptureState = FALSE; return 0; } /********************************************************************* * * WM_MBUTTONDOWN * */ static LRESULT EDIT_WM_MButtonDown(WND *wnd) { SendMessageA(wnd->hwndSelf,WM_PASTE,0,0); return 0; } /********************************************************************* * * WM_MOUSEMOVE * */ static LRESULT EDIT_WM_MouseMove(WND *wnd, EDITSTATE *es, DWORD keys, INT x, INT y) { INT e; BOOL after_wrap; INT prex, prey; if (GetCapture() != wnd->hwndSelf) return 0; /* * FIXME: gotta do some scrolling if outside client * area. Maybe reset the timer ? */ prex = x; prey = y; EDIT_ConfinePoint(wnd, es, &x, &y); es->region_posx = (prex < x) ? -1 : ((prex > x) ? 1 : 0); es->region_posy = (prey < y) ? -1 : ((prey > y) ? 1 : 0); e = EDIT_CharFromPos(wnd, es, x, y, &after_wrap); EDIT_EM_SetSel(wnd, es, es->selection_start, e, after_wrap); return 0; } /********************************************************************* * * WM_NCCREATE * */ static LRESULT EDIT_WM_NCCreate(WND *wnd, LPCREATESTRUCTA cs) { EDITSTATE *es; if (!(es = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*es)))) return FALSE; *(EDITSTATE **)wnd->wExtra = es; /* * Note: since the EDITSTATE has not been fully initialized yet, * we can't use any API calls that may send * WM_XXX messages before WM_NCCREATE is completed. */ if (!(es->heap = HeapCreate(0, 0x10000, 0))) return FALSE; es->style = cs->style; es->bEnableState = !(cs->style & WS_DISABLED); /* * In Win95 look and feel, the WS_BORDER style is replaced by the * WS_EX_CLIENTEDGE style for the edit control. This gives the edit * control a non client area. */ if (TWEAK_WineLook != WIN31_LOOK) { if (es->style & WS_BORDER) { es->style &= ~WS_BORDER; wnd->dwStyle &= ~WS_BORDER; wnd->dwExStyle |= WS_EX_CLIENTEDGE; } } else { if ((es->style & WS_BORDER) && !(es->style & WS_DLGFRAME)) wnd->dwStyle &= ~WS_BORDER; } if (es->style & ES_MULTILINE) { es->buffer_size = BUFSTART_MULTI; es->buffer_limit = BUFLIMIT_MULTI; if (es->style & WS_VSCROLL) es->style |= ES_AUTOVSCROLL; if (es->style & WS_HSCROLL) es->style |= ES_AUTOHSCROLL; es->style &= ~ES_PASSWORD; if ((es->style & ES_CENTER) || (es->style & ES_RIGHT)) { if (es->style & ES_RIGHT) es->style &= ~ES_CENTER; es->style &= ~WS_HSCROLL; es->style &= ~ES_AUTOHSCROLL; } /* FIXME: for now, all multi line controls are AUTOVSCROLL */ es->style |= ES_AUTOVSCROLL; } else { es->buffer_size = BUFSTART_SINGLE; es->buffer_limit = BUFLIMIT_SINGLE; es->style &= ~ES_CENTER; es->style &= ~ES_RIGHT; es->style &= ~WS_HSCROLL; es->style &= ~WS_VSCROLL; es->style &= ~ES_AUTOVSCROLL; es->style &= ~ES_WANTRETURN; if (es->style & ES_UPPERCASE) { es->style &= ~ES_LOWERCASE; es->style &= ~ES_NUMBER; } else if (es->style & ES_LOWERCASE) es->style &= ~ES_NUMBER; if (es->style & ES_PASSWORD) es->password_char = '*'; /* FIXME: for now, all single line controls are AUTOHSCROLL */ es->style |= ES_AUTOHSCROLL; } if (!(es->text = HeapAlloc(es->heap, 0, es->buffer_size + 1))) return FALSE; es->buffer_size = HeapSize(es->heap, 0, es->text) - 1; if (!(es->undo_text = HeapAlloc(es->heap, 0, es->buffer_size + 1))) return FALSE; es->undo_buffer_size = HeapSize(es->heap, 0, es->undo_text) - 1; *es->text = '\0'; if (es->style & ES_MULTILINE) if (!(es->first_line_def = HeapAlloc(es->heap, HEAP_ZERO_MEMORY, sizeof(LINEDEF)))) return FALSE; es->line_count = 1; return TRUE; } /********************************************************************* * * WM_PAINT * */ static void EDIT_WM_Paint(WND *wnd, EDITSTATE *es, WPARAM wParam) { PAINTSTRUCT ps; INT i; HDC dc; HFONT old_font = 0; RECT rc; RECT rcLine; RECT rcRgn; BOOL rev = es->bEnableState && ((es->flags & EF_FOCUSED) || (es->style & ES_NOHIDESEL)); if (!wParam) dc = BeginPaint(wnd->hwndSelf, &ps); else dc = (HDC) wParam; if(es->style & WS_BORDER) { GetClientRect(wnd->hwndSelf, &rc); if(es->style & ES_MULTILINE) { if(es->style & WS_HSCROLL) rc.bottom++; if(es->style & WS_VSCROLL) rc.right++; } Rectangle(dc, rc.left, rc.top, rc.right, rc.bottom); } IntersectClipRect(dc, es->format_rect.left, es->format_rect.top, es->format_rect.right, es->format_rect.bottom); if (es->style & ES_MULTILINE) { GetClientRect(wnd->hwndSelf, &rc); IntersectClipRect(dc, rc.left, rc.top, rc.right, rc.bottom); } if (es->font) old_font = SelectObject(dc, es->font); if ( VERSION_AppWinVer() >= 0x40000 &&( !es->bEnableState || (es->style & ES_READONLY))) EDIT_SEND_CTLCOLORSTATIC(wnd, dc); else EDIT_SEND_CTLCOLOR(wnd, dc); if (!es->bEnableState) SetTextColor(dc, GetSysColor(COLOR_GRAYTEXT)); GetClipBox(dc, &rcRgn); if (es->style & ES_MULTILINE) { INT vlc = (es->format_rect.bottom - es->format_rect.top) / es->line_height; for (i = es->y_offset ; i <= min(es->y_offset + vlc, es->y_offset + es->line_count - 1) ; i++) { EDIT_GetLineRect(wnd, es, i, 0, -1, &rcLine); if (IntersectRect(&rc, &rcRgn, &rcLine)) EDIT_PaintLine(wnd, es, dc, i, rev); } } else { EDIT_GetLineRect(wnd, es, 0, 0, -1, &rcLine); if (IntersectRect(&rc, &rcRgn, &rcLine)) EDIT_PaintLine(wnd, es, dc, 0, rev); } if (es->font) SelectObject(dc, old_font); if (es->flags & EF_FOCUSED) EDIT_SetCaretPos(wnd, es, es->selection_end, es->flags & EF_AFTER_WRAP); if (!wParam) EndPaint(wnd->hwndSelf, &ps); if ((es->style & WS_VSCROLL) && !(es->flags & EF_VSCROLL_TRACK)) { INT vlc = (es->format_rect.bottom - es->format_rect.top) / es->line_height; SCROLLINFO si; si.cbSize = sizeof(SCROLLINFO); si.fMask = SIF_PAGE | SIF_POS | SIF_RANGE | SIF_DISABLENOSCROLL; si.nMin = 0; si.nMax = es->line_count + vlc - 2; si.nPage = vlc; si.nPos = es->y_offset; SetScrollInfo(wnd->hwndSelf, SB_VERT, &si, TRUE); } if ((es->style & WS_HSCROLL) && !(es->flags & EF_HSCROLL_TRACK)) { SCROLLINFO si; INT fw = es->format_rect.right - es->format_rect.left; si.cbSize = sizeof(SCROLLINFO); si.fMask = SIF_PAGE | SIF_POS | SIF_RANGE | SIF_DISABLENOSCROLL; si.nMin = 0; si.nMax = es->text_width + fw - 1; si.nPage = fw; si.nPos = es->x_offset; SetScrollInfo(wnd->hwndSelf, SB_HORZ, &si, TRUE); } } /********************************************************************* * * WM_PASTE * */ static void EDIT_WM_Paste(WND *wnd, EDITSTATE *es) { HGLOBAL hsrc; LPSTR src; OpenClipboard(wnd->hwndSelf); if ((hsrc = GetClipboardData(CF_TEXT))) { src = (LPSTR)GlobalLock(hsrc); EDIT_EM_ReplaceSel(wnd, es, TRUE, src); GlobalUnlock(hsrc); if (es->flags & EF_UPDATE) { es->flags &= ~EF_UPDATE; EDIT_NOTIFY_PARENT(wnd, EN_CHANGE, "EN_CHANGE"); } } CloseClipboard(); } /********************************************************************* * * WM_SETFOCUS * */ static void EDIT_WM_SetFocus(WND *wnd, EDITSTATE *es, HWND window_losing_focus) { es->flags |= EF_FOCUSED; CreateCaret(wnd->hwndSelf, 0, 2, es->line_height); EDIT_SetCaretPos(wnd, es, es->selection_end, es->flags & EF_AFTER_WRAP); if(!(es->style & ES_NOHIDESEL)) EDIT_InvalidateText(wnd, es, es->selection_start, es->selection_end); ShowCaret(wnd->hwndSelf); EDIT_NOTIFY_PARENT(wnd, EN_SETFOCUS, "EN_SETFOCUS"); } /********************************************************************* * * WM_SETFONT * * With Win95 look the margins are set to default font value unless * the system font (font == 0) is being set, in which case they are left * unchanged. * */ static void EDIT_WM_SetFont(WND *wnd, EDITSTATE *es, HFONT font, BOOL redraw) { TEXTMETRICA tm; HDC dc; HFONT old_font = 0; RECT r; es->font = font; dc = GetDC(wnd->hwndSelf); if (font) old_font = SelectObject(dc, font); GetTextMetricsA(dc, &tm); es->line_height = tm.tmHeight; es->char_width = tm.tmAveCharWidth; if (font) SelectObject(dc, old_font); ReleaseDC(wnd->hwndSelf, dc); if (font && (TWEAK_WineLook > WIN31_LOOK)) EDIT_EM_SetMargins(wnd, es, EC_LEFTMARGIN | EC_RIGHTMARGIN, EC_USEFONTINFO, EC_USEFONTINFO); /* Force the recalculation of the format rect for each font change */ GetClientRect(wnd->hwndSelf, &r); EDIT_SetRectNP(wnd, es, &r); if (es->style & ES_MULTILINE) EDIT_BuildLineDefs_ML(wnd, es); if (redraw) EDIT_UpdateText(wnd, NULL, TRUE); if (es->flags & EF_FOCUSED) { DestroyCaret(); CreateCaret(wnd->hwndSelf, 0, 2, es->line_height); EDIT_SetCaretPos(wnd, es, es->selection_end, es->flags & EF_AFTER_WRAP); ShowCaret(wnd->hwndSelf); } } /********************************************************************* * * WM_SETTEXT * * NOTES * For multiline controls (ES_MULTILINE), reception of WM_SETTEXT triggers: * The modified flag is reset. No notifications are sent. * * For single-line controls, reception of WM_SETTEXT triggers: * The modified flag is reset. EN_UPDATE and EN_CHANGE notifications are sent. * */ static void EDIT_WM_SetText(WND *wnd, EDITSTATE *es, LPCSTR text) { EDIT_EM_SetSel(wnd, es, 0, -1, FALSE); if (text) { TRACE("\t'%s'\n", text); EDIT_EM_ReplaceSel(wnd, es, FALSE, text); } else { TRACE("\t\n"); EDIT_EM_ReplaceSel(wnd, es, FALSE, ""); } es->x_offset = 0; if (es->style & ES_MULTILINE) { es->flags &= ~EF_UPDATE; } else { es->flags |= EF_UPDATE; } es->flags &= ~EF_MODIFIED; EDIT_EM_SetSel(wnd, es, 0, 0, FALSE); EDIT_EM_ScrollCaret(wnd, es); if (es->flags & EF_UPDATE) { es->flags &= ~EF_UPDATE; EDIT_NOTIFY_PARENT(wnd, EN_CHANGE, "EN_CHANGE"); } } /********************************************************************* * * WM_SIZE * */ static void EDIT_WM_Size(WND *wnd, EDITSTATE *es, UINT action, INT width, INT height) { if ((action == SIZE_MAXIMIZED) || (action == SIZE_RESTORED)) { RECT rc; SetRect(&rc, 0, 0, width, height); EDIT_SetRectNP(wnd, es, &rc); EDIT_UpdateText(wnd, NULL, TRUE); } } /********************************************************************* * * WM_SYSKEYDOWN * */ static LRESULT EDIT_WM_SysKeyDown(WND *wnd, EDITSTATE *es, INT key, DWORD key_data) { if ((key == VK_BACK) && (key_data & 0x2000)) { if (EDIT_EM_CanUndo(wnd, es)) EDIT_EM_Undo(wnd, es); return 0; } else if (key == VK_UP || key == VK_DOWN) if (EDIT_CheckCombo(wnd, WM_SYSKEYDOWN, key, key_data)) return 0; return DefWindowProcA(wnd->hwndSelf, WM_SYSKEYDOWN, (WPARAM)key, (LPARAM)key_data); } /********************************************************************* * * WM_TIMER * */ static void EDIT_WM_Timer(WND *wnd, EDITSTATE *es, INT id, TIMERPROC timer_proc) { if (es->region_posx < 0) { EDIT_MoveBackward(wnd, es, TRUE); } else if (es->region_posx > 0) { EDIT_MoveForward(wnd, es, TRUE); } /* * FIXME: gotta do some vertical scrolling here, like * EDIT_EM_LineScroll(wnd, 0, 1); */ } /********************************************************************* * * EDIT_VScroll_Hack * * 16 bit notepad needs this. Actually it is not _our_ hack, * it is notepad's. Notepad is sending us scrollbar messages with * undocumented parameters without us even having a scrollbar ... !?!? * */ static LRESULT EDIT_VScroll_Hack(WND *wnd, EDITSTATE *es, INT action, INT pos, HWND scroll_bar) { INT dy = 0; LRESULT ret = 0; if (!(es->flags & EF_VSCROLL_HACK)) { ERR("hacked WM_VSCROLL handler invoked\n"); ERR(" if you are _not_ running 16 bit notepad, please report\n"); ERR(" (this message is only displayed once per edit control)\n"); es->flags |= EF_VSCROLL_HACK; } switch (action) { case SB_LINEUP: case SB_LINEDOWN: case SB_PAGEUP: case SB_PAGEDOWN: EDIT_EM_Scroll(wnd, es, action); return 0; case SB_TOP: dy = -es->y_offset; break; case SB_BOTTOM: dy = es->line_count - 1 - es->y_offset; break; case SB_THUMBTRACK: es->flags |= EF_VSCROLL_TRACK; dy = (pos * (es->line_count - 1) + 50) / 100 - es->y_offset; break; case SB_THUMBPOSITION: es->flags &= ~EF_VSCROLL_TRACK; if (!(dy = (pos * (es->line_count - 1) + 50) / 100 - es->y_offset)) EDIT_NOTIFY_PARENT(wnd, EN_VSCROLL, "EN_VSCROLL"); break; case SB_ENDSCROLL: break; /* * FIXME : the next two are undocumented ! * Are we doing the right thing ? * At least Win 3.1 Notepad makes use of EM_GETTHUMB this way, * although it's also a regular control message. */ case EM_GETTHUMB16: ret = (es->line_count > 1) ? es->y_offset * 100 / (es->line_count - 1) : 0; break; case EM_LINESCROLL16: dy = pos; break; default: ERR("undocumented (hacked) WM_VSCROLL parameter, please report\n"); return 0; } if (dy) EDIT_EM_LineScroll(wnd, es, 0, dy); return ret; } /********************************************************************* * * WM_VSCROLL * */ static LRESULT EDIT_WM_VScroll(WND *wnd, EDITSTATE *es, INT action, INT pos, HWND scroll_bar) { INT dy; if (!(es->style & ES_MULTILINE)) return 0; if (!(es->style & ES_AUTOVSCROLL)) return 0; if (!(es->style & WS_VSCROLL)) return EDIT_VScroll_Hack(wnd, es, action, pos, scroll_bar); dy = 0; switch (action) { case SB_LINEUP: case SB_LINEDOWN: case SB_PAGEUP: case SB_PAGEDOWN: EDIT_EM_Scroll(wnd, es, action); return 0; case SB_TOP: dy = -es->y_offset; break; case SB_BOTTOM: dy = es->line_count - 1 - es->y_offset; break; case SB_THUMBTRACK: es->flags |= EF_VSCROLL_TRACK; dy = pos - es->y_offset; break; case SB_THUMBPOSITION: es->flags &= ~EF_VSCROLL_TRACK; if (!(dy = pos - es->y_offset)) { SetScrollPos(wnd->hwndSelf, SB_VERT, pos, TRUE); EDIT_NOTIFY_PARENT(wnd, EN_VSCROLL, "EN_VSCROLL"); } break; case SB_ENDSCROLL: break; default: ERR("undocumented WM_VSCROLL action %d, please report\n", action); return 0; } if (dy) EDIT_EM_LineScroll(wnd, es, 0, dy); return 0; } /********************************************************************* * * EDIT_UpdateText * */ static void EDIT_UpdateText(WND *wnd, LPRECT rc, BOOL bErase) { EDITSTATE *es = *(EDITSTATE **)((wnd)->wExtra); /* EF_UPDATE will be turned off in paint */ if (es->flags & EF_UPDATE) EDIT_NOTIFY_PARENT(wnd, EN_UPDATE, "EN_UPDATE"); InvalidateRect(wnd->hwndSelf, rc, bErase); } wine-20000526/controls/icontitle.c0100644000175000001440000001502207050605546016452 0ustar julliardusers/* * Icontitle window class. * * Copyright 1997 Alex Korobka */ #include #include #include #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "wine/winuser16.h" #include "win.h" #include "desktop.h" #include "heap.h" static LPCSTR emptyTitleText = "<...>"; BOOL bMultiLineTitle; HFONT hIconTitleFont; /*********************************************************************** * ICONTITLE_Init */ BOOL ICONTITLE_Init(void) { LOGFONTA logFont; SystemParametersInfoA( SPI_GETICONTITLELOGFONT, 0, &logFont, 0 ); SystemParametersInfoA( SPI_GETICONTITLEWRAP, 0, &bMultiLineTitle, 0 ); hIconTitleFont = CreateFontIndirectA( &logFont ); return (hIconTitleFont) ? TRUE : FALSE; } /*********************************************************************** * ICONTITLE_Create */ HWND ICONTITLE_Create( WND* wnd ) { WND* wndPtr; HWND hWnd; if( wnd->dwStyle & WS_CHILD ) hWnd = CreateWindowExA( 0, ICONTITLE_CLASS_ATOM, NULL, WS_CHILD | WS_CLIPSIBLINGS, 0, 0, 1, 1, wnd->parent->hwndSelf, 0, wnd->hInstance, NULL ); else hWnd = CreateWindowExA( 0, ICONTITLE_CLASS_ATOM, NULL, WS_CLIPSIBLINGS, 0, 0, 1, 1, wnd->hwndSelf, 0, wnd->hInstance, NULL ); wndPtr = WIN_FindWndPtr( hWnd ); if( wndPtr ) { wndPtr->owner = wnd; /* MDI depends on this */ wndPtr->dwStyle &= ~(WS_CAPTION | WS_BORDER); if( wnd->dwStyle & WS_DISABLED ) wndPtr->dwStyle |= WS_DISABLED; WIN_ReleaseWndPtr(wndPtr); return hWnd; } return 0; } /*********************************************************************** * ICONTITLE_GetTitlePos */ static BOOL ICONTITLE_GetTitlePos( WND* wnd, LPRECT lpRect ) { LPSTR str; int length = lstrlenA( wnd->owner->text ); if( length ) { str = HeapAlloc( GetProcessHeap(), 0, length + 1 ); lstrcpyA( str, wnd->owner->text ); while( str[length - 1] == ' ' ) /* remove trailing spaces */ { str[--length] = '\0'; if( !length ) { HeapFree( GetProcessHeap(), 0, str ); break; } } } if( !length ) { str = (LPSTR)emptyTitleText; length = lstrlenA( str ); } if( str ) { HDC hDC = GetDC( wnd->hwndSelf ); if( hDC ) { HFONT hPrevFont = SelectObject( hDC, hIconTitleFont ); SetRect( lpRect, 0, 0, GetSystemMetrics(SM_CXICONSPACING) - GetSystemMetrics(SM_CXBORDER) * 2, GetSystemMetrics(SM_CYBORDER) * 2 ); DrawTextA( hDC, str, length, lpRect, DT_CALCRECT | DT_CENTER | DT_NOPREFIX | DT_WORDBREAK | (( bMultiLineTitle ) ? 0 : DT_SINGLELINE) ); SelectObject( hDC, hPrevFont ); ReleaseDC( wnd->hwndSelf, hDC ); lpRect->right += 4 * GetSystemMetrics(SM_CXBORDER) - lpRect->left; lpRect->left = wnd->owner->rectWindow.left + GetSystemMetrics(SM_CXICON) / 2 - (lpRect->right - lpRect->left) / 2; lpRect->bottom -= lpRect->top; lpRect->top = wnd->owner->rectWindow.top + GetSystemMetrics(SM_CYICON); } if( str != emptyTitleText ) HeapFree( GetProcessHeap(), 0, str ); return ( hDC ) ? TRUE : FALSE; } return FALSE; } /*********************************************************************** * ICONTITLE_Paint */ static BOOL ICONTITLE_Paint( WND* wnd, HDC hDC, BOOL bActive ) { HFONT hPrevFont; HBRUSH hBrush = 0; COLORREF textColor = 0; if( bActive ) { hBrush = GetSysColorBrush(COLOR_ACTIVECAPTION); textColor = GetSysColor(COLOR_CAPTIONTEXT); } else { if( wnd->dwStyle & WS_CHILD ) { hBrush = (HBRUSH) GetClassLongA(wnd->hwndSelf, GCL_HBRBACKGROUND); if( hBrush ) { INT level; LOGBRUSH logBrush; GetObjectA( hBrush, sizeof(logBrush), &logBrush ); level = GetRValue(logBrush.lbColor) + GetGValue(logBrush.lbColor) + GetBValue(logBrush.lbColor); if( level < (0x7F * 3) ) textColor = RGB( 0xFF, 0xFF, 0xFF ); } else hBrush = GetStockObject( WHITE_BRUSH ); } else { hBrush = GetStockObject( BLACK_BRUSH ); textColor = RGB( 0xFF, 0xFF, 0xFF ); } } FillWindow16( wnd->parent->hwndSelf, wnd->hwndSelf, hDC, hBrush ); hPrevFont = SelectObject( hDC, hIconTitleFont ); if( hPrevFont ) { RECT rect; INT length; char buffer[80]; rect.left = rect.top = 0; rect.right = wnd->rectWindow.right - wnd->rectWindow.left; rect.bottom = wnd->rectWindow.bottom - wnd->rectWindow.top; length = GetWindowTextA( wnd->owner->hwndSelf, buffer, 80 ); SetTextColor( hDC, textColor ); SetBkMode( hDC, TRANSPARENT ); DrawTextA( hDC, buffer, length, &rect, DT_CENTER | DT_NOPREFIX | DT_WORDBREAK | ((bMultiLineTitle) ? 0 : DT_SINGLELINE) ); SelectObject( hDC, hPrevFont ); } return ( hPrevFont ) ? TRUE : FALSE; } /*********************************************************************** * IconTitleWndProc */ LRESULT WINAPI IconTitleWndProc( HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam ) { LRESULT retvalue; WND *wnd = WIN_FindWndPtr( hWnd ); switch( msg ) { case WM_NCHITTEST: retvalue = HTCAPTION; goto END; case WM_NCMOUSEMOVE: case WM_NCLBUTTONDBLCLK: retvalue = SendMessageA( wnd->owner->hwndSelf, msg, wParam, lParam ); goto END; case WM_ACTIVATE: if( wParam ) SetActiveWindow( wnd->owner->hwndSelf ); /* fall through */ case WM_CLOSE: retvalue = 0; goto END; case WM_SHOWWINDOW: if( wnd && wParam ) { RECT titleRect; ICONTITLE_GetTitlePos( wnd, &titleRect ); if( wnd->owner->next != wnd ) /* keep icon title behind the owner */ SetWindowPos( hWnd, wnd->owner->hwndSelf, titleRect.left, titleRect.top, titleRect.right, titleRect.bottom, SWP_NOACTIVATE ); else SetWindowPos( hWnd, 0, titleRect.left, titleRect.top, titleRect.right, titleRect.bottom, SWP_NOACTIVATE | SWP_NOZORDER ); } retvalue = 0; goto END; case WM_ERASEBKGND: if( wnd ) { WND* iconWnd = WIN_LockWndPtr(wnd->owner); if( iconWnd->dwStyle & WS_CHILD ) lParam = SendMessageA( iconWnd->hwndSelf, WM_ISACTIVEICON, 0, 0 ); else lParam = (iconWnd->hwndSelf == GetActiveWindow16()); WIN_ReleaseWndPtr(iconWnd); if( ICONTITLE_Paint( wnd, (HDC)wParam, (BOOL)lParam ) ) ValidateRect( hWnd, NULL ); retvalue = 1; goto END; } } retvalue = DefWindowProcA( hWnd, msg, wParam, lParam ); END: WIN_ReleaseWndPtr(wnd); return retvalue; } wine-20000526/controls/listbox.c0100644000175000001440000027235307113575222016155 0ustar julliardusers/* * Listbox controls * * Copyright 1996 Alexandre Julliard */ #include #include #include #include "windef.h" #include "wingdi.h" #include "wine/winuser16.h" #include "wine/winbase16.h" #include "winuser.h" #include "winerror.h" #include "drive.h" #include "heap.h" #include "spy.h" #include "selectors.h" #include "win.h" #include "combo.h" #include "debugtools.h" #include "tweak.h" DEFAULT_DEBUG_CHANNEL(listbox); DECLARE_DEBUG_CHANNEL(combo); /* Unimplemented yet: * - LBS_NOSEL * - LBS_USETABSTOPS * - Unicode * - Locale handling */ /* Items array granularity */ #define LB_ARRAY_GRANULARITY 16 /* Scrolling timeout in ms */ #define LB_SCROLL_TIMEOUT 50 /* Listbox system timer id */ #define LB_TIMER_ID 2 /* Item structure */ typedef struct { LPSTR str; /* Item text */ BOOL selected; /* Is item selected? */ UINT height; /* Item height (only for OWNERDRAWVARIABLE) */ DWORD data; /* User data */ } LB_ITEMDATA; /* Listbox structure */ typedef struct { HANDLE heap; /* Heap for this listbox */ HWND owner; /* Owner window to send notifications to */ UINT style; /* Window style */ INT width; /* Window width */ INT height; /* Window height */ LB_ITEMDATA *items; /* Array of items */ INT nb_items; /* Number of items */ INT top_item; /* Top visible item */ INT selected_item; /* Selected item */ INT focus_item; /* Item that has the focus */ INT anchor_item; /* Anchor item for extended selection */ INT item_height; /* Default item height */ INT page_size; /* Items per listbox page */ INT column_width; /* Column width for multi-column listboxes */ INT horz_extent; /* Horizontal extent (0 if no hscroll) */ INT horz_pos; /* Horizontal position */ INT nb_tabs; /* Number of tabs in array */ INT *tabs; /* Array of tabs */ BOOL caret_on; /* Is caret on? */ BOOL captured; /* Is mouse captured? */ BOOL in_focus; HFONT font; /* Current font */ LCID locale; /* Current locale for string comparisons */ LPHEADCOMBO lphc; /* ComboLBox */ } LB_DESCR; #define IS_OWNERDRAW(descr) \ ((descr)->style & (LBS_OWNERDRAWFIXED | LBS_OWNERDRAWVARIABLE)) #define HAS_STRINGS(descr) \ (!IS_OWNERDRAW(descr) || ((descr)->style & LBS_HASSTRINGS)) #define IS_MULTISELECT(descr) \ ((descr)->style & LBS_MULTIPLESEL || ((descr)->style & LBS_EXTENDEDSEL)) #define SEND_NOTIFICATION(wnd,descr,code) \ (SendMessageA( (descr)->owner, WM_COMMAND, \ MAKEWPARAM((((descr)->lphc)?ID_CB_LISTBOX:(wnd)->wIDmenu), (code) ), (wnd)->hwndSelf )) #define ISWIN31 (LOWORD(GetVersion()) == 0x0a03) /* Current timer status */ typedef enum { LB_TIMER_NONE, LB_TIMER_UP, LB_TIMER_LEFT, LB_TIMER_DOWN, LB_TIMER_RIGHT } TIMER_DIRECTION; static TIMER_DIRECTION LISTBOX_Timer = LB_TIMER_NONE; /*********************************************************************** * LISTBOX_Dump */ void LISTBOX_Dump( WND *wnd ) { INT i; LB_ITEMDATA *item; LB_DESCR *descr = *(LB_DESCR **)wnd->wExtra; TRACE( "Listbox:\n" ); TRACE( "hwnd=%04x descr=%08x heap=%08x items=%d top=%d\n", wnd->hwndSelf, (UINT)descr, descr->heap, descr->nb_items, descr->top_item ); for (i = 0, item = descr->items; i < descr->nb_items; i++, item++) { TRACE( "%4d: %-40s %d %08lx %3d\n", i, item->str, item->selected, item->data, item->height ); } } /*********************************************************************** * LISTBOX_GetCurrentPageSize * * Return the current page size */ static INT LISTBOX_GetCurrentPageSize( WND *wnd, LB_DESCR *descr ) { INT i, height; if (!(descr->style & LBS_OWNERDRAWVARIABLE)) return descr->page_size; for (i = descr->top_item, height = 0; i < descr->nb_items; i++) { if ((height += descr->items[i].height) > descr->height) break; } if (i == descr->top_item) return 1; else return i - descr->top_item; } /*********************************************************************** * LISTBOX_GetMaxTopIndex * * Return the maximum possible index for the top of the listbox. */ static INT LISTBOX_GetMaxTopIndex( WND *wnd, LB_DESCR *descr ) { INT max, page; if (descr->style & LBS_OWNERDRAWVARIABLE) { page = descr->height; for (max = descr->nb_items - 1; max >= 0; max--) if ((page -= descr->items[max].height) < 0) break; if (max < descr->nb_items - 1) max++; } else if (descr->style & LBS_MULTICOLUMN) { if ((page = descr->width / descr->column_width) < 1) page = 1; max = (descr->nb_items + descr->page_size - 1) / descr->page_size; max = (max - page) * descr->page_size; } else { max = descr->nb_items - descr->page_size; } if (max < 0) max = 0; return max; } /*********************************************************************** * LISTBOX_UpdateScroll * * Update the scrollbars. Should be called whenever the content * of the listbox changes. */ static void LISTBOX_UpdateScroll( WND *wnd, LB_DESCR *descr ) { SCROLLINFO info; /* Check the listbox scroll bar flags individually before we call SetScrollInfo otherwise when the listbox style is WS_HSCROLL and no WS_VSCROLL, we end up with an uninitialized, visible horizontal scroll bar when we do not need one. if (!(descr->style & WS_VSCROLL)) return; */ /* It is important that we check descr->style, and not wnd->dwStyle, for WS_VSCROLL, as the former is exactly the one passed in argument to CreateWindow. In Windows (and from now on in Wine :) a listbox created with such a style (no WS_SCROLL) does not update the scrollbar with listbox-related data, thus letting the programmer use it for his/her own purposes. */ if (descr->style & LBS_NOREDRAW) return; info.cbSize = sizeof(info); if (descr->style & LBS_MULTICOLUMN) { info.nMin = 0; info.nMax = (descr->nb_items - 1) / descr->page_size; info.nPos = descr->top_item / descr->page_size; info.nPage = descr->width / descr->column_width; if (info.nPage < 1) info.nPage = 1; info.fMask = SIF_RANGE | SIF_POS | SIF_PAGE; if (descr->style & LBS_DISABLENOSCROLL) info.fMask |= SIF_DISABLENOSCROLL; if (descr->style & WS_HSCROLL) SetScrollInfo( wnd->hwndSelf, SB_HORZ, &info, TRUE ); info.nMax = 0; info.fMask = SIF_RANGE; if (descr->style & WS_VSCROLL) SetScrollInfo( wnd->hwndSelf, SB_VERT, &info, TRUE ); } else { info.nMin = 0; info.nMax = descr->nb_items - 1; info.nPos = descr->top_item; info.nPage = LISTBOX_GetCurrentPageSize( wnd, descr ); info.fMask = SIF_RANGE | SIF_POS | SIF_PAGE; if (descr->style & LBS_DISABLENOSCROLL) info.fMask |= SIF_DISABLENOSCROLL; if (descr->style & WS_VSCROLL) SetScrollInfo( wnd->hwndSelf, SB_VERT, &info, TRUE ); if (descr->horz_extent) { info.nMin = 0; info.nMax = descr->horz_extent - 1; info.nPos = descr->horz_pos; info.nPage = descr->width; info.fMask = SIF_RANGE | SIF_POS | SIF_PAGE; if (descr->style & LBS_DISABLENOSCROLL) info.fMask |= SIF_DISABLENOSCROLL; if (descr->style & WS_HSCROLL) SetScrollInfo( wnd->hwndSelf, SB_HORZ, &info, TRUE ); } } } /*********************************************************************** * LISTBOX_SetTopItem * * Set the top item of the listbox, scrolling up or down if necessary. */ static LRESULT LISTBOX_SetTopItem( WND *wnd, LB_DESCR *descr, INT index, BOOL scroll ) { INT max = LISTBOX_GetMaxTopIndex( wnd, descr ); if (index > max) index = max; if (index < 0) index = 0; if (descr->style & LBS_MULTICOLUMN) index -= index % descr->page_size; if (descr->top_item == index) return LB_OKAY; if (descr->style & LBS_MULTICOLUMN) { INT diff = (descr->top_item - index) / descr->page_size * descr->column_width; if (scroll && (abs(diff) < descr->width)) ScrollWindowEx( wnd->hwndSelf, diff, 0, NULL, NULL, 0, NULL, SW_INVALIDATE | SW_ERASE | SW_SCROLLCHILDREN ); else scroll = FALSE; } else if (scroll) { INT diff; if (descr->style & LBS_OWNERDRAWVARIABLE) { INT i; diff = 0; if (index > descr->top_item) { for (i = index - 1; i >= descr->top_item; i--) diff -= descr->items[i].height; } else { for (i = index; i < descr->top_item; i++) diff += descr->items[i].height; } } else diff = (descr->top_item - index) * descr->item_height; if (abs(diff) < descr->height) ScrollWindowEx( wnd->hwndSelf, 0, diff, NULL, NULL, 0, NULL, SW_INVALIDATE | SW_ERASE | SW_SCROLLCHILDREN ); else scroll = FALSE; } if (!scroll) InvalidateRect( wnd->hwndSelf, NULL, TRUE ); descr->top_item = index; LISTBOX_UpdateScroll( wnd, descr ); return LB_OKAY; } /*********************************************************************** * LISTBOX_UpdatePage * * Update the page size. Should be called when the size of * the client area or the item height changes. */ static void LISTBOX_UpdatePage( WND *wnd, LB_DESCR *descr ) { INT page_size; if ((descr->item_height == 0) || (page_size = descr->height / descr->item_height) < 1) page_size = 1; if (page_size == descr->page_size) return; descr->page_size = page_size; if (descr->style & LBS_MULTICOLUMN) InvalidateRect( wnd->hwndSelf, NULL, TRUE ); LISTBOX_SetTopItem( wnd, descr, descr->top_item, FALSE ); } /*********************************************************************** * LISTBOX_UpdateSize * * Update the size of the listbox. Should be called when the size of * the client area changes. */ static void LISTBOX_UpdateSize( WND *wnd, LB_DESCR *descr ) { RECT rect; GetClientRect( wnd->hwndSelf, &rect ); descr->width = rect.right - rect.left; descr->height = rect.bottom - rect.top; if (!(descr->style & LBS_NOINTEGRALHEIGHT) && !IS_OWNERDRAW(descr)) { if ((descr->height > descr->item_height) && (descr->height % descr->item_height)) { TRACE("[%04x]: changing height %d -> %d\n", wnd->hwndSelf, descr->height, descr->height - descr->height%descr->item_height ); SetWindowPos( wnd->hwndSelf, 0, 0, 0, wnd->rectWindow.right - wnd->rectWindow.left, wnd->rectWindow.bottom - wnd->rectWindow.top - (descr->height % descr->item_height), SWP_NOZORDER | SWP_NOACTIVATE | SWP_NOMOVE ); return; } } TRACE("[%04x]: new size = %d,%d\n", wnd->hwndSelf, descr->width, descr->height ); LISTBOX_UpdatePage( wnd, descr ); LISTBOX_UpdateScroll( wnd, descr ); } /*********************************************************************** * LISTBOX_GetItemRect * * Get the rectangle enclosing an item, in listbox client coordinates. * Return 1 if the rectangle is (partially) visible, 0 if hidden, -1 on error. */ static LRESULT LISTBOX_GetItemRect( WND *wnd, LB_DESCR *descr, INT index, RECT *rect ) { /* Index <= 0 is legal even on empty listboxes */ if (index && (index >= descr->nb_items)) return -1; SetRect( rect, 0, 0, descr->width, descr->height ); if (descr->style & LBS_MULTICOLUMN) { INT col = (index / descr->page_size) - (descr->top_item / descr->page_size); rect->left += col * descr->column_width; rect->right = rect->left + descr->column_width; rect->top += (index % descr->page_size) * descr->item_height; rect->bottom = rect->top + descr->item_height; } else if (descr->style & LBS_OWNERDRAWVARIABLE) { INT i; rect->right += descr->horz_pos; if ((index >= 0) && (index < descr->nb_items)) { if (index < descr->top_item) { for (i = descr->top_item-1; i >= index; i--) rect->top -= descr->items[i].height; } else { for (i = descr->top_item; i < index; i++) rect->top += descr->items[i].height; } rect->bottom = rect->top + descr->items[index].height; } } else { rect->top += (index - descr->top_item) * descr->item_height; rect->bottom = rect->top + descr->item_height; rect->right += descr->horz_pos; } return ((rect->left < descr->width) && (rect->right > 0) && (rect->top < descr->height) && (rect->bottom > 0)); } /*********************************************************************** * LISTBOX_GetItemFromPoint * * Return the item nearest from point (x,y) (in client coordinates). */ static INT LISTBOX_GetItemFromPoint( WND *wnd, LB_DESCR *descr, INT x, INT y ) { INT index = descr->top_item; if (!descr->nb_items) return -1; /* No items */ if (descr->style & LBS_OWNERDRAWVARIABLE) { INT pos = 0; if (y >= 0) { while (index < descr->nb_items) { if ((pos += descr->items[index].height) > y) break; index++; } } else { while (index > 0) { index--; if ((pos -= descr->items[index].height) <= y) break; } } } else if (descr->style & LBS_MULTICOLUMN) { if (y >= descr->item_height * descr->page_size) return -1; if (y >= 0) index += y / descr->item_height; if (x >= 0) index += (x / descr->column_width) * descr->page_size; else index -= (((x + 1) / descr->column_width) - 1) * descr->page_size; } else { index += (y / descr->item_height); } if (index < 0) return 0; if (index >= descr->nb_items) return -1; return index; } /*********************************************************************** * LISTBOX_PaintItem * * Paint an item. */ static void LISTBOX_PaintItem( WND *wnd, LB_DESCR *descr, HDC hdc, const RECT *rect, INT index, UINT action ) { LB_ITEMDATA *item = NULL; if (index < descr->nb_items) item = &descr->items[index]; if (IS_OWNERDRAW(descr)) { DRAWITEMSTRUCT dis; UINT id = (descr->lphc) ? ID_CB_LISTBOX : wnd->wIDmenu; if (!item) { if (action == ODA_FOCUS) DrawFocusRect( hdc, rect ); else FIXME("called with an out of bounds index %d(%d) in owner draw, Not good.\n",index,descr->nb_items); return; } dis.CtlType = ODT_LISTBOX; dis.CtlID = id; dis.hwndItem = wnd->hwndSelf; dis.itemAction = action; dis.hDC = hdc; dis.itemID = index; dis.itemState = 0; if (item && item->selected) dis.itemState |= ODS_SELECTED; if ((descr->focus_item == index) && (descr->caret_on) && (descr->in_focus)) dis.itemState |= ODS_FOCUS; if (wnd->dwStyle & WS_DISABLED) dis.itemState |= ODS_DISABLED; dis.itemData = item ? item->data : 0; dis.rcItem = *rect; TRACE("[%04x]: drawitem %d (%s) action=%02x " "state=%02x rect=%d,%d-%d,%d\n", wnd->hwndSelf, index, item ? item->str : "", action, dis.itemState, rect->left, rect->top, rect->right, rect->bottom ); SendMessageA(descr->owner, WM_DRAWITEM, id, (LPARAM)&dis); } else { COLORREF oldText = 0, oldBk = 0; if (action == ODA_FOCUS) { DrawFocusRect( hdc, rect ); return; } if (item && item->selected) { oldBk = SetBkColor( hdc, GetSysColor( COLOR_HIGHLIGHT ) ); oldText = SetTextColor( hdc, GetSysColor(COLOR_HIGHLIGHTTEXT)); } TRACE("[%04x]: painting %d (%s) action=%02x " "rect=%d,%d-%d,%d\n", wnd->hwndSelf, index, item ? item->str : "", action, rect->left, rect->top, rect->right, rect->bottom ); if (!item) ExtTextOutA( hdc, rect->left + 1, rect->top, ETO_OPAQUE | ETO_CLIPPED, rect, NULL, 0, NULL ); else if (!(descr->style & LBS_USETABSTOPS)) ExtTextOutA( hdc, rect->left + 1, rect->top, ETO_OPAQUE | ETO_CLIPPED, rect, item->str, strlen(item->str), NULL ); else { /* Output empty string to paint background in the full width. */ ExtTextOutA( hdc, rect->left + 1, rect->top, ETO_OPAQUE | ETO_CLIPPED, rect, NULL, 0, NULL ); TabbedTextOutA( hdc, rect->left + 1 , rect->top, item->str, strlen(item->str), descr->nb_tabs, descr->tabs, 0); } if (item && item->selected) { SetBkColor( hdc, oldBk ); SetTextColor( hdc, oldText ); } if ((descr->focus_item == index) && (descr->caret_on) && (descr->in_focus)) DrawFocusRect( hdc, rect ); } } /*********************************************************************** * LISTBOX_SetRedraw * * Change the redraw flag. */ static void LISTBOX_SetRedraw( WND *wnd, LB_DESCR *descr, BOOL on ) { if (on) { if (!(descr->style & LBS_NOREDRAW)) return; descr->style &= ~LBS_NOREDRAW; LISTBOX_UpdateScroll( wnd, descr ); } else descr->style |= LBS_NOREDRAW; } /*********************************************************************** * LISTBOX_RepaintItem * * Repaint a single item synchronously. */ static void LISTBOX_RepaintItem( WND *wnd, LB_DESCR *descr, INT index, UINT action ) { HDC hdc; RECT rect; HFONT oldFont = 0; HBRUSH hbrush, oldBrush = 0; /* Do not repaint the item if the item is not visible */ if ((descr->style & LBS_NOREDRAW) || !IsWindowVisible(wnd->hwndSelf)) return; if (LISTBOX_GetItemRect( wnd, descr, index, &rect ) != 1) return; if (!(hdc = GetDCEx( wnd->hwndSelf, 0, DCX_CACHE ))) return; if (descr->font) oldFont = SelectObject( hdc, descr->font ); hbrush = SendMessageA( descr->owner, WM_CTLCOLORLISTBOX, hdc, (LPARAM)wnd->hwndSelf ); if (hbrush) oldBrush = SelectObject( hdc, hbrush ); if (wnd->dwStyle & WS_DISABLED) SetTextColor( hdc, GetSysColor( COLOR_GRAYTEXT ) ); SetWindowOrgEx( hdc, descr->horz_pos, 0, NULL ); LISTBOX_PaintItem( wnd, descr, hdc, &rect, index, action ); if (oldFont) SelectObject( hdc, oldFont ); if (oldBrush) SelectObject( hdc, oldBrush ); ReleaseDC( wnd->hwndSelf, hdc ); } /*********************************************************************** * LISTBOX_InitStorage */ static LRESULT LISTBOX_InitStorage( WND *wnd, LB_DESCR *descr, INT nb_items, DWORD bytes ) { LB_ITEMDATA *item; nb_items += LB_ARRAY_GRANULARITY - 1; nb_items -= (nb_items % LB_ARRAY_GRANULARITY); if (descr->items) nb_items += HeapSize( descr->heap, 0, descr->items ) / sizeof(*item); if (!(item = HeapReAlloc( descr->heap, 0, descr->items, nb_items * sizeof(LB_ITEMDATA) ))) { SEND_NOTIFICATION( wnd, descr, LBN_ERRSPACE ); return LB_ERRSPACE; } descr->items = item; return LB_OKAY; } /*********************************************************************** * LISTBOX_SetTabStops */ static BOOL LISTBOX_SetTabStops( WND *wnd, LB_DESCR *descr, INT count, LPINT tabs, BOOL short_ints ) { if (!(descr->style & LBS_USETABSTOPS)) return TRUE; if (descr->tabs) HeapFree( descr->heap, 0, descr->tabs ); if (!(descr->nb_tabs = count)) { descr->tabs = NULL; return TRUE; } /* FIXME: count = 1 */ if (!(descr->tabs = (INT *)HeapAlloc( descr->heap, 0, descr->nb_tabs * sizeof(INT) ))) return FALSE; if (short_ints) { INT i; LPINT16 p = (LPINT16)tabs; TRACE("[%04x]: settabstops ", wnd->hwndSelf ); for (i = 0; i < descr->nb_tabs; i++) { descr->tabs[i] = *p++<<1; /* FIXME */ if (TRACE_ON(listbox)) DPRINTF("%hd ", descr->tabs[i]); } if (TRACE_ON(listbox)) DPRINTF("\n"); } else memcpy( descr->tabs, tabs, descr->nb_tabs * sizeof(INT) ); /* FIXME: repaint the window? */ return TRUE; } /*********************************************************************** * LISTBOX_GetText */ static LRESULT LISTBOX_GetText( WND *wnd, LB_DESCR *descr, INT index, LPSTR buffer ) { if ((index < 0) || (index >= descr->nb_items)) return LB_ERR; if (HAS_STRINGS(descr)) { if (!buffer) return strlen(descr->items[index].str); lstrcpyA( buffer, descr->items[index].str ); return strlen(buffer); } else { if (buffer) *((LPDWORD)buffer)=*(LPDWORD)(&descr->items[index].data); return sizeof(DWORD); } } /*********************************************************************** * LISTBOX_FindStringPos * * Find the nearest string located before a given string in sort order. * If 'exact' is TRUE, return an error if we don't get an exact match. */ static INT LISTBOX_FindStringPos( WND *wnd, LB_DESCR *descr, LPCSTR str, BOOL exact ) { INT index, min, max, res = -1; if (!(descr->style & LBS_SORT)) return -1; /* Add it at the end */ min = 0; max = descr->nb_items; while (min != max) { index = (min + max) / 2; if (HAS_STRINGS(descr)) res = lstrcmpiA( descr->items[index].str, str ); else { COMPAREITEMSTRUCT cis; UINT id = (descr->lphc) ? ID_CB_LISTBOX : wnd->wIDmenu; cis.CtlType = ODT_LISTBOX; cis.CtlID = id; cis.hwndItem = wnd->hwndSelf; cis.itemID1 = index; cis.itemData1 = descr->items[index].data; cis.itemID2 = -1; cis.itemData2 = (DWORD)str; cis.dwLocaleId = descr->locale; res = SendMessageA( descr->owner, WM_COMPAREITEM, id, (LPARAM)&cis ); } if (!res) return index; if (res > 0) max = index; else min = index + 1; } return exact ? -1 : max; } /*********************************************************************** * LISTBOX_FindFileStrPos * * Find the nearest string located before a given string in directory * sort order (i.e. first files, then directories, then drives). */ static INT LISTBOX_FindFileStrPos( WND *wnd, LB_DESCR *descr, LPCSTR str ) { INT min, max, res = -1; if (!HAS_STRINGS(descr)) return LISTBOX_FindStringPos( wnd, descr, str, FALSE ); min = 0; max = descr->nb_items; while (min != max) { INT index = (min + max) / 2; const char *p = descr->items[index].str; if (*p == '[') /* drive or directory */ { if (*str != '[') res = -1; else if (p[1] == '-') /* drive */ { if (str[1] == '-') res = str[2] - p[2]; else res = -1; } else /* directory */ { if (str[1] == '-') res = 1; else res = lstrcmpiA( str, p ); } } else /* filename */ { if (*str == '[') res = 1; else res = lstrcmpiA( str, p ); } if (!res) return index; if (res < 0) max = index; else min = index + 1; } return max; } /*********************************************************************** * LISTBOX_FindString * * Find the item beginning with a given string. */ static INT LISTBOX_FindString( WND *wnd, LB_DESCR *descr, INT start, LPCSTR str, BOOL exact ) { INT i; LB_ITEMDATA *item; if (start >= descr->nb_items) start = -1; item = descr->items + start + 1; if (HAS_STRINGS(descr)) { if (!str || ! str[0] ) return LB_ERR; if (exact) { for (i = start + 1; i < descr->nb_items; i++, item++) if (!lstrcmpiA( str, item->str )) return i; for (i = 0, item = descr->items; i <= start; i++, item++) if (!lstrcmpiA( str, item->str )) return i; } else { /* Special case for drives and directories: ignore prefix */ #define CHECK_DRIVE(item) \ if ((item)->str[0] == '[') \ { \ if (!lstrncmpiA( str, (item)->str+1, len )) return i; \ if (((item)->str[1] == '-') && !lstrncmpiA(str,(item)->str+2,len)) \ return i; \ } INT len = strlen(str); for (i = start + 1; i < descr->nb_items; i++, item++) { if (!lstrncmpiA( str, item->str, len )) return i; CHECK_DRIVE(item); } for (i = 0, item = descr->items; i <= start; i++, item++) { if (!lstrncmpiA( str, item->str, len )) return i; CHECK_DRIVE(item); } #undef CHECK_DRIVE } } else { if (exact && (descr->style & LBS_SORT)) /* If sorted, use a WM_COMPAREITEM binary search */ return LISTBOX_FindStringPos( wnd, descr, str, TRUE ); /* Otherwise use a linear search */ for (i = start + 1; i < descr->nb_items; i++, item++) if (item->data == (DWORD)str) return i; for (i = 0, item = descr->items; i <= start; i++, item++) if (item->data == (DWORD)str) return i; } return LB_ERR; } /*********************************************************************** * LISTBOX_GetSelCount */ static LRESULT LISTBOX_GetSelCount( WND *wnd, LB_DESCR *descr ) { INT i, count; LB_ITEMDATA *item = descr->items; if (!(descr->style & LBS_MULTIPLESEL)) return LB_ERR; for (i = count = 0; i < descr->nb_items; i++, item++) if (item->selected) count++; return count; } /*********************************************************************** * LISTBOX_GetSelItems16 */ static LRESULT LISTBOX_GetSelItems16( WND *wnd, LB_DESCR *descr, INT16 max, LPINT16 array ) { INT i, count; LB_ITEMDATA *item = descr->items; if (!(descr->style & LBS_MULTIPLESEL)) return LB_ERR; for (i = count = 0; (i < descr->nb_items) && (count < max); i++, item++) if (item->selected) array[count++] = (INT16)i; return count; } /*********************************************************************** * LISTBOX_GetSelItems32 */ static LRESULT LISTBOX_GetSelItems( WND *wnd, LB_DESCR *descr, INT max, LPINT array ) { INT i, count; LB_ITEMDATA *item = descr->items; if (!(descr->style & LBS_MULTIPLESEL)) return LB_ERR; for (i = count = 0; (i < descr->nb_items) && (count < max); i++, item++) if (item->selected) array[count++] = i; return count; } /*********************************************************************** * LISTBOX_Paint */ static LRESULT LISTBOX_Paint( WND *wnd, LB_DESCR *descr, HDC hdc ) { INT i, col_pos = descr->page_size - 1; RECT rect; HFONT oldFont = 0; HBRUSH hbrush, oldBrush = 0; SetRect( &rect, 0, 0, descr->width, descr->height ); if (descr->style & LBS_NOREDRAW) return 0; if (descr->style & LBS_MULTICOLUMN) rect.right = rect.left + descr->column_width; else if (descr->horz_pos) { SetWindowOrgEx( hdc, descr->horz_pos, 0, NULL ); rect.right += descr->horz_pos; } if (descr->font) oldFont = SelectObject( hdc, descr->font ); hbrush = SendMessageA( descr->owner, WM_CTLCOLORLISTBOX, hdc, (LPARAM)wnd->hwndSelf ); if (hbrush) oldBrush = SelectObject( hdc, hbrush ); if (wnd->dwStyle & WS_DISABLED) SetTextColor( hdc, GetSysColor( COLOR_GRAYTEXT ) ); if (!descr->nb_items && (descr->focus_item != -1) && descr->caret_on && (descr->in_focus)) { /* Special case for empty listbox: paint focus rect */ rect.bottom = rect.top + descr->item_height; LISTBOX_PaintItem( wnd, descr, hdc, &rect, descr->focus_item, ODA_FOCUS ); rect.top = rect.bottom; } for (i = descr->top_item; i < descr->nb_items; i++) { if (!(descr->style & LBS_OWNERDRAWVARIABLE)) rect.bottom = rect.top + descr->item_height; else rect.bottom = rect.top + descr->items[i].height; LISTBOX_PaintItem( wnd, descr, hdc, &rect, i, ODA_DRAWENTIRE ); rect.top = rect.bottom; if ((descr->style & LBS_MULTICOLUMN) && !col_pos) { if (!IS_OWNERDRAW(descr)) { /* Clear the bottom of the column */ SetBkColor( hdc, GetSysColor( COLOR_WINDOW ) ); if (rect.top < descr->height) { rect.bottom = descr->height; ExtTextOutA( hdc, 0, 0, ETO_OPAQUE | ETO_CLIPPED, &rect, NULL, 0, NULL ); } } /* Go to the next column */ rect.left += descr->column_width; rect.right += descr->column_width; rect.top = 0; col_pos = descr->page_size - 1; } else { col_pos--; if (rect.top >= descr->height) break; } } if (!IS_OWNERDRAW(descr)) { /* Clear the remainder of the client area */ SetBkColor( hdc, GetSysColor( COLOR_WINDOW ) ); if (rect.top < descr->height) { rect.bottom = descr->height; ExtTextOutA( hdc, 0, 0, ETO_OPAQUE | ETO_CLIPPED, &rect, NULL, 0, NULL ); } if (rect.right < descr->width) { rect.left = rect.right; rect.right = descr->width; rect.top = 0; rect.bottom = descr->height; ExtTextOutA( hdc, 0, 0, ETO_OPAQUE | ETO_CLIPPED, &rect, NULL, 0, NULL ); } } if (oldFont) SelectObject( hdc, oldFont ); if (oldBrush) SelectObject( hdc, oldBrush ); return 0; } /*********************************************************************** * LISTBOX_InvalidateItems * * Invalidate all items from a given item. If the specified item is not * visible, nothing happens. */ static void LISTBOX_InvalidateItems( WND *wnd, LB_DESCR *descr, INT index ) { RECT rect; if (LISTBOX_GetItemRect( wnd, descr, index, &rect ) == 1) { rect.bottom = descr->height; InvalidateRect( wnd->hwndSelf, &rect, TRUE ); if (descr->style & LBS_MULTICOLUMN) { /* Repaint the other columns */ rect.left = rect.right; rect.right = descr->width; rect.top = 0; InvalidateRect( wnd->hwndSelf, &rect, TRUE ); } } } /*********************************************************************** * LISTBOX_GetItemHeight */ static LRESULT LISTBOX_GetItemHeight( WND *wnd, LB_DESCR *descr, INT index ) { if (descr->style & LBS_OWNERDRAWVARIABLE) { if ((index < 0) || (index >= descr->nb_items)) return LB_ERR; return descr->items[index].height; } else return descr->item_height; } /*********************************************************************** * LISTBOX_SetItemHeight */ static LRESULT LISTBOX_SetItemHeight( WND *wnd, LB_DESCR *descr, INT index, UINT height ) { if (!height) height = 1; if (descr->style & LBS_OWNERDRAWVARIABLE) { if ((index < 0) || (index >= descr->nb_items)) return LB_ERR; TRACE("[%04x]: item %d height = %d\n", wnd->hwndSelf, index, height ); descr->items[index].height = height; LISTBOX_UpdateScroll( wnd, descr ); LISTBOX_InvalidateItems( wnd, descr, index ); } else if (height != descr->item_height) { TRACE("[%04x]: new height = %d\n", wnd->hwndSelf, height ); descr->item_height = height; LISTBOX_UpdatePage( wnd, descr ); LISTBOX_UpdateScroll( wnd, descr ); InvalidateRect( wnd->hwndSelf, 0, TRUE ); } return LB_OKAY; } /*********************************************************************** * LISTBOX_SetHorizontalPos */ static void LISTBOX_SetHorizontalPos( WND *wnd, LB_DESCR *descr, INT pos ) { INT diff; if (pos > descr->horz_extent - descr->width) pos = descr->horz_extent - descr->width; if (pos < 0) pos = 0; if (!(diff = descr->horz_pos - pos)) return; TRACE("[%04x]: new horz pos = %d\n", wnd->hwndSelf, pos ); descr->horz_pos = pos; LISTBOX_UpdateScroll( wnd, descr ); if (abs(diff) < descr->width) ScrollWindowEx( wnd->hwndSelf, diff, 0, NULL, NULL, 0, NULL, SW_INVALIDATE | SW_ERASE | SW_SCROLLCHILDREN ); else InvalidateRect( wnd->hwndSelf, NULL, TRUE ); } /*********************************************************************** * LISTBOX_SetHorizontalExtent */ static LRESULT LISTBOX_SetHorizontalExtent( WND *wnd, LB_DESCR *descr, UINT extent ) { if (!descr->horz_extent || (descr->style & LBS_MULTICOLUMN)) return LB_OKAY; if (extent <= 0) extent = 1; if (extent == descr->horz_extent) return LB_OKAY; TRACE("[%04x]: new horz extent = %d\n", wnd->hwndSelf, extent ); descr->horz_extent = extent; if (descr->horz_pos > extent - descr->width) LISTBOX_SetHorizontalPos( wnd, descr, extent - descr->width ); else LISTBOX_UpdateScroll( wnd, descr ); return LB_OKAY; } /*********************************************************************** * LISTBOX_SetColumnWidth */ static LRESULT LISTBOX_SetColumnWidth( WND *wnd, LB_DESCR *descr, UINT width) { if (width == descr->column_width) return LB_OKAY; TRACE("[%04x]: new column width = %d\n", wnd->hwndSelf, width ); descr->column_width = width; LISTBOX_UpdatePage( wnd, descr ); return LB_OKAY; } /*********************************************************************** * LISTBOX_SetFont * * Returns the item height. */ static INT LISTBOX_SetFont( WND *wnd, LB_DESCR *descr, HFONT font ) { HDC hdc; HFONT oldFont = 0; TEXTMETRICA tm; descr->font = font; if (!(hdc = GetDCEx( wnd->hwndSelf, 0, DCX_CACHE ))) { ERR("unable to get DC.\n" ); return 16; } if (font) oldFont = SelectObject( hdc, font ); GetTextMetricsA( hdc, &tm ); if (oldFont) SelectObject( hdc, oldFont ); ReleaseDC( wnd->hwndSelf, hdc ); if (!IS_OWNERDRAW(descr)) LISTBOX_SetItemHeight( wnd, descr, 0, tm.tmHeight ); return tm.tmHeight ; } /*********************************************************************** * LISTBOX_MakeItemVisible * * Make sure that a given item is partially or fully visible. */ static void LISTBOX_MakeItemVisible( WND *wnd, LB_DESCR *descr, INT index, BOOL fully ) { INT top; if (index <= descr->top_item) top = index; else if (descr->style & LBS_MULTICOLUMN) { INT cols = descr->width; if (!fully) cols += descr->column_width - 1; if (cols >= descr->column_width) cols /= descr->column_width; else cols = 1; if (index < descr->top_item + (descr->page_size * cols)) return; top = index - descr->page_size * (cols - 1); } else if (descr->style & LBS_OWNERDRAWVARIABLE) { INT height = fully ? descr->items[index].height : 1; for (top = index; top > descr->top_item; top--) if ((height += descr->items[top-1].height) > descr->height) break; } else { if (index < descr->top_item + descr->page_size) return; if (!fully && (index == descr->top_item + descr->page_size) && (descr->height > (descr->page_size * descr->item_height))) return; top = index - descr->page_size + 1; } LISTBOX_SetTopItem( wnd, descr, top, TRUE ); } /*********************************************************************** * LISTBOX_SelectItemRange * * Select a range of items. Should only be used on a MULTIPLESEL listbox. */ static LRESULT LISTBOX_SelectItemRange( WND *wnd, LB_DESCR *descr, INT first, INT last, BOOL on ) { INT i; /* A few sanity checks */ if ((last == -1) && (descr->nb_items == 0)) return LB_OKAY; if (!(descr->style & LBS_MULTIPLESEL)) return LB_ERR; if (last == -1) last = descr->nb_items - 1; if ((first < 0) || (first >= descr->nb_items)) return LB_ERR; if ((last < 0) || (last >= descr->nb_items)) return LB_ERR; /* selected_item reflects last selected/unselected item on multiple sel */ descr->selected_item = last; if (on) /* Turn selection on */ { for (i = first; i <= last; i++) { if (descr->items[i].selected) continue; descr->items[i].selected = TRUE; LISTBOX_RepaintItem( wnd, descr, i, ODA_SELECT ); } } else /* Turn selection off */ { for (i = first; i <= last; i++) { if (!descr->items[i].selected) continue; descr->items[i].selected = FALSE; LISTBOX_RepaintItem( wnd, descr, i, ODA_SELECT ); } } return LB_OKAY; } /*********************************************************************** * LISTBOX_SetCaretIndex * * NOTES * index must be between 0 and descr->nb_items-1, or LB_ERR is returned. * */ static LRESULT LISTBOX_SetCaretIndex( WND *wnd, LB_DESCR *descr, INT index, BOOL fully_visible ) { INT oldfocus = descr->focus_item; if ((index < 0) || (index >= descr->nb_items)) return LB_ERR; if (index == oldfocus) return LB_OKAY; descr->focus_item = index; if ((oldfocus != -1) && descr->caret_on && (descr->in_focus)) LISTBOX_RepaintItem( wnd, descr, oldfocus, ODA_FOCUS ); LISTBOX_MakeItemVisible( wnd, descr, index, fully_visible ); if (descr->caret_on && (descr->in_focus)) LISTBOX_RepaintItem( wnd, descr, index, ODA_FOCUS ); return LB_OKAY; } /*********************************************************************** * LISTBOX_SetSelection */ static LRESULT LISTBOX_SetSelection( WND *wnd, LB_DESCR *descr, INT index, BOOL on, BOOL send_notify ) { TRACE( "index=%d notify=%s\n", index, send_notify ? "YES" : "NO" ); if ((index < -1) || (index >= descr->nb_items)) return LB_ERR; if (descr->style & LBS_MULTIPLESEL) { if (index == -1) /* Select all items */ return LISTBOX_SelectItemRange( wnd, descr, 0, -1, on ); else /* Only one item */ return LISTBOX_SelectItemRange( wnd, descr, index, index, on ); } else { INT oldsel = descr->selected_item; if (index == oldsel) return LB_OKAY; if (oldsel != -1) descr->items[oldsel].selected = FALSE; if (index != -1) descr->items[index].selected = TRUE; descr->selected_item = index; if (oldsel != -1) LISTBOX_RepaintItem( wnd, descr, oldsel, ODA_SELECT ); if (index != -1) LISTBOX_RepaintItem( wnd, descr, index, ODA_SELECT ); if (send_notify && descr->nb_items) SEND_NOTIFICATION( wnd, descr, (index != -1) ? LBN_SELCHANGE : LBN_SELCANCEL ); else if( descr->lphc ) /* set selection change flag for parent combo */ descr->lphc->wState |= CBF_SELCHANGE; } return LB_OKAY; } /*********************************************************************** * LISTBOX_MoveCaret * * Change the caret position and extend the selection to the new caret. */ static void LISTBOX_MoveCaret( WND *wnd, LB_DESCR *descr, INT index, BOOL fully_visible ) { LISTBOX_SetCaretIndex( wnd, descr, index, fully_visible ); if (descr->style & LBS_EXTENDEDSEL) { if (descr->anchor_item != -1) { INT first = min( descr->focus_item, descr->anchor_item ); INT last = max( descr->focus_item, descr->anchor_item ); if (first > 0) LISTBOX_SelectItemRange( wnd, descr, 0, first - 1, FALSE ); LISTBOX_SelectItemRange( wnd, descr, last + 1, -1, FALSE ); LISTBOX_SelectItemRange( wnd, descr, first, last, TRUE ); } } else if (!(descr->style & LBS_MULTIPLESEL)) { /* Set selection to new caret item */ LISTBOX_SetSelection( wnd, descr, index, TRUE, FALSE ); } } /*********************************************************************** * LISTBOX_InsertItem */ static LRESULT LISTBOX_InsertItem( WND *wnd, LB_DESCR *descr, INT index, LPSTR str, DWORD data ) { LB_ITEMDATA *item; INT max_items; INT oldfocus = descr->focus_item; if (index == -1) index = descr->nb_items; else if ((index < 0) || (index > descr->nb_items)) return LB_ERR; if (!descr->items) max_items = 0; else max_items = HeapSize( descr->heap, 0, descr->items ) / sizeof(*item); if (descr->nb_items == max_items) { /* We need to grow the array */ max_items += LB_ARRAY_GRANULARITY; if (!(item = HeapReAlloc( descr->heap, 0, descr->items, max_items * sizeof(LB_ITEMDATA) ))) { SEND_NOTIFICATION( wnd, descr, LBN_ERRSPACE ); return LB_ERRSPACE; } descr->items = item; } /* Insert the item structure */ item = &descr->items[index]; if (index < descr->nb_items) RtlMoveMemory( item + 1, item, (descr->nb_items - index) * sizeof(LB_ITEMDATA) ); item->str = str; item->data = data; item->height = 0; item->selected = FALSE; descr->nb_items++; /* Get item height */ if (descr->style & LBS_OWNERDRAWVARIABLE) { MEASUREITEMSTRUCT mis; UINT id = (descr->lphc) ? ID_CB_LISTBOX : wnd->wIDmenu; mis.CtlType = ODT_LISTBOX; mis.CtlID = id; mis.itemID = index; mis.itemData = descr->items[index].data; mis.itemHeight = descr->item_height; SendMessageA( descr->owner, WM_MEASUREITEM, id, (LPARAM)&mis ); item->height = mis.itemHeight ? mis.itemHeight : 1; TRACE("[%04x]: measure item %d (%s) = %d\n", wnd->hwndSelf, index, str ? str : "", item->height ); } /* Repaint the items */ LISTBOX_UpdateScroll( wnd, descr ); LISTBOX_InvalidateItems( wnd, descr, index ); /* Move selection and focused item */ /* If listbox was empty, set focus to the first item */ if (descr->nb_items == 1) LISTBOX_SetCaretIndex( wnd, descr, 0, FALSE ); /* single select don't change selection index in win31 */ else if ((ISWIN31) && !(IS_MULTISELECT(descr))) { descr->selected_item++; LISTBOX_SetSelection( wnd, descr, descr->selected_item-1, TRUE, FALSE ); } else { if (index <= descr->selected_item) { descr->selected_item++; descr->focus_item = oldfocus; /* focus not changed */ } } return LB_OKAY; } /*********************************************************************** * LISTBOX_InsertString */ static LRESULT LISTBOX_InsertString( WND *wnd, LB_DESCR *descr, INT index, LPCSTR str ) { LPSTR new_str = NULL; DWORD data = 0; LRESULT ret; if (HAS_STRINGS(descr)) { if (!str) str=""; if (!(new_str = HEAP_strdupA( descr->heap, 0, str ))) { SEND_NOTIFICATION( wnd, descr, LBN_ERRSPACE ); return LB_ERRSPACE; } } else data = (DWORD)str; if (index == -1) index = descr->nb_items; if ((ret = LISTBOX_InsertItem( wnd, descr, index, new_str, data )) != 0) { if (new_str) HeapFree( descr->heap, 0, new_str ); return ret; } TRACE("[%04x]: added item %d '%s'\n", wnd->hwndSelf, index, HAS_STRINGS(descr) ? new_str : "" ); return index; } /*********************************************************************** * LISTBOX_DeleteItem * * Delete the content of an item. 'index' must be a valid index. */ static void LISTBOX_DeleteItem( WND *wnd, LB_DESCR *descr, INT index ) { /* Note: Win 3.1 only sends DELETEITEM on owner-draw items, * while Win95 sends it for all items with user data. * It's probably better to send it too often than not * often enough, so this is what we do here. */ if (IS_OWNERDRAW(descr) || descr->items[index].data) { DELETEITEMSTRUCT dis; UINT id = (descr->lphc) ? ID_CB_LISTBOX : wnd->wIDmenu; dis.CtlType = ODT_LISTBOX; dis.CtlID = id; dis.itemID = index; dis.hwndItem = wnd->hwndSelf; dis.itemData = descr->items[index].data; SendMessageA( descr->owner, WM_DELETEITEM, id, (LPARAM)&dis ); } if (HAS_STRINGS(descr) && descr->items[index].str) HeapFree( descr->heap, 0, descr->items[index].str ); } /*********************************************************************** * LISTBOX_RemoveItem * * Remove an item from the listbox and delete its content. */ static LRESULT LISTBOX_RemoveItem( WND *wnd, LB_DESCR *descr, INT index ) { LB_ITEMDATA *item; INT max_items; if (index == -1) index = descr->nb_items - 1; else if ((index < 0) || (index >= descr->nb_items)) return LB_ERR; /* We need to invalidate the original rect instead of the updated one. */ LISTBOX_InvalidateItems( wnd, descr, index ); LISTBOX_DeleteItem( wnd, descr, index ); /* Remove the item */ item = &descr->items[index]; if (index < descr->nb_items-1) RtlMoveMemory( item, item + 1, (descr->nb_items - index - 1) * sizeof(LB_ITEMDATA) ); descr->nb_items--; if (descr->anchor_item == descr->nb_items) descr->anchor_item--; /* Shrink the item array if possible */ max_items = HeapSize( descr->heap, 0, descr->items ) / sizeof(LB_ITEMDATA); if (descr->nb_items < max_items - 2*LB_ARRAY_GRANULARITY) { max_items -= LB_ARRAY_GRANULARITY; item = HeapReAlloc( descr->heap, 0, descr->items, max_items * sizeof(LB_ITEMDATA) ); if (item) descr->items = item; } /* Repaint the items */ LISTBOX_UpdateScroll( wnd, descr ); /* if we removed the scrollbar, reset the top of the list (correct for owner-drawn ???) */ if (descr->nb_items == descr->page_size) LISTBOX_SetTopItem( wnd, descr, 0, TRUE ); /* Move selection and focused item */ if (!IS_MULTISELECT(descr)) { if (index == descr->selected_item) descr->selected_item = -1; else if (index < descr->selected_item) { descr->selected_item--; if (ISWIN31) /* win 31 do not change the selected item number */ LISTBOX_SetSelection( wnd, descr, descr->selected_item + 1, TRUE, FALSE); } } if (descr->focus_item >= descr->nb_items) { descr->focus_item = descr->nb_items - 1; if (descr->focus_item < 0) descr->focus_item = 0; } return LB_OKAY; } /*********************************************************************** * LISTBOX_ResetContent */ static void LISTBOX_ResetContent( WND *wnd, LB_DESCR *descr ) { INT i; for (i = 0; i < descr->nb_items; i++) LISTBOX_DeleteItem( wnd, descr, i ); if (descr->items) HeapFree( descr->heap, 0, descr->items ); descr->nb_items = 0; descr->top_item = 0; descr->selected_item = -1; descr->focus_item = 0; descr->anchor_item = -1; descr->items = NULL; LISTBOX_UpdateScroll( wnd, descr ); InvalidateRect( wnd->hwndSelf, NULL, TRUE ); } /*********************************************************************** * LISTBOX_SetCount */ static LRESULT LISTBOX_SetCount( WND *wnd, LB_DESCR *descr, INT count ) { LRESULT ret; if (HAS_STRINGS(descr)) return LB_ERR; /* FIXME: this is far from optimal... */ if (count > descr->nb_items) { while (count > descr->nb_items) if ((ret = LISTBOX_InsertString( wnd, descr, -1, 0 )) < 0) return ret; } else if (count < descr->nb_items) { while (count < descr->nb_items) if ((ret = LISTBOX_RemoveItem( wnd, descr, -1 )) < 0) return ret; } return LB_OKAY; } /*********************************************************************** * LISTBOX_Directory */ static LRESULT LISTBOX_Directory( WND *wnd, LB_DESCR *descr, UINT attrib, LPCSTR filespec, BOOL long_names ) { HANDLE handle; LRESULT ret = LB_OKAY; WIN32_FIND_DATAA entry; int pos; if ((handle = FindFirstFileA(filespec,&entry)) == INVALID_HANDLE_VALUE) { if (GetLastError() != ERROR_NO_MORE_FILES) return LB_ERR; } else { do { char buffer[270]; if (entry.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) { if (!(attrib & DDL_DIRECTORY) || !strcmp( entry.cAlternateFileName, "." )) continue; if (long_names) sprintf( buffer, "[%s]", entry.cFileName ); else sprintf( buffer, "[%s]", entry.cAlternateFileName ); } else /* not a directory */ { #define ATTRIBS (FILE_ATTRIBUTE_READONLY | FILE_ATTRIBUTE_HIDDEN | \ FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_ARCHIVE) if ((attrib & DDL_EXCLUSIVE) && ((attrib & ATTRIBS) != (entry.dwFileAttributes & ATTRIBS))) continue; #undef ATTRIBS if (long_names) strcpy( buffer, entry.cFileName ); else strcpy( buffer, entry.cAlternateFileName ); } if (!long_names) CharLowerA( buffer ); pos = LISTBOX_FindFileStrPos( wnd, descr, buffer ); if ((ret = LISTBOX_InsertString( wnd, descr, pos, buffer )) < 0) break; } while (FindNextFileA( handle, &entry )); FindClose( handle ); } if ((ret >= 0) && (attrib & DDL_DRIVES)) { char buffer[] = "[-a-]"; int drive; for (drive = 0; drive < MAX_DOS_DRIVES; drive++, buffer[2]++) { if (!DRIVE_IsValid(drive)) continue; if ((ret = LISTBOX_InsertString( wnd, descr, -1, buffer )) < 0) break; } } return ret; } /*********************************************************************** * LISTBOX_HandleVScroll */ static LRESULT LISTBOX_HandleVScroll( WND *wnd, LB_DESCR *descr, WPARAM wParam, LPARAM lParam ) { SCROLLINFO info; if (descr->style & LBS_MULTICOLUMN) return 0; switch(LOWORD(wParam)) { case SB_LINEUP: LISTBOX_SetTopItem( wnd, descr, descr->top_item - 1, TRUE ); break; case SB_LINEDOWN: LISTBOX_SetTopItem( wnd, descr, descr->top_item + 1, TRUE ); break; case SB_PAGEUP: LISTBOX_SetTopItem( wnd, descr, descr->top_item - LISTBOX_GetCurrentPageSize( wnd, descr ), TRUE ); break; case SB_PAGEDOWN: LISTBOX_SetTopItem( wnd, descr, descr->top_item + LISTBOX_GetCurrentPageSize( wnd, descr ), TRUE ); break; case SB_THUMBPOSITION: LISTBOX_SetTopItem( wnd, descr, HIWORD(wParam), TRUE ); break; case SB_THUMBTRACK: info.cbSize = sizeof(info); info.fMask = SIF_TRACKPOS; GetScrollInfo( wnd->hwndSelf, SB_VERT, &info ); LISTBOX_SetTopItem( wnd, descr, info.nTrackPos, TRUE ); break; case SB_TOP: LISTBOX_SetTopItem( wnd, descr, 0, TRUE ); break; case SB_BOTTOM: LISTBOX_SetTopItem( wnd, descr, descr->nb_items, TRUE ); break; } return 0; } /*********************************************************************** * LISTBOX_HandleHScroll */ static LRESULT LISTBOX_HandleHScroll( WND *wnd, LB_DESCR *descr, WPARAM wParam, LPARAM lParam ) { SCROLLINFO info; INT page; if (descr->style & LBS_MULTICOLUMN) { switch(LOWORD(wParam)) { case SB_LINELEFT: LISTBOX_SetTopItem( wnd, descr, descr->top_item-descr->page_size, TRUE ); break; case SB_LINERIGHT: LISTBOX_SetTopItem( wnd, descr, descr->top_item+descr->page_size, TRUE ); break; case SB_PAGELEFT: page = descr->width / descr->column_width; if (page < 1) page = 1; LISTBOX_SetTopItem( wnd, descr, descr->top_item - page * descr->page_size, TRUE ); break; case SB_PAGERIGHT: page = descr->width / descr->column_width; if (page < 1) page = 1; LISTBOX_SetTopItem( wnd, descr, descr->top_item + page * descr->page_size, TRUE ); break; case SB_THUMBPOSITION: LISTBOX_SetTopItem( wnd, descr, HIWORD(wParam)*descr->page_size, TRUE ); break; case SB_THUMBTRACK: info.cbSize = sizeof(info); info.fMask = SIF_TRACKPOS; GetScrollInfo( wnd->hwndSelf, SB_VERT, &info ); LISTBOX_SetTopItem( wnd, descr, info.nTrackPos*descr->page_size, TRUE ); break; case SB_LEFT: LISTBOX_SetTopItem( wnd, descr, 0, TRUE ); break; case SB_RIGHT: LISTBOX_SetTopItem( wnd, descr, descr->nb_items, TRUE ); break; } } else if (descr->horz_extent) { switch(LOWORD(wParam)) { case SB_LINELEFT: LISTBOX_SetHorizontalPos( wnd, descr, descr->horz_pos - 1 ); break; case SB_LINERIGHT: LISTBOX_SetHorizontalPos( wnd, descr, descr->horz_pos + 1 ); break; case SB_PAGELEFT: LISTBOX_SetHorizontalPos( wnd, descr, descr->horz_pos - descr->width ); break; case SB_PAGERIGHT: LISTBOX_SetHorizontalPos( wnd, descr, descr->horz_pos + descr->width ); break; case SB_THUMBPOSITION: LISTBOX_SetHorizontalPos( wnd, descr, HIWORD(wParam) ); break; case SB_THUMBTRACK: info.cbSize = sizeof(info); info.fMask = SIF_TRACKPOS; GetScrollInfo( wnd->hwndSelf, SB_HORZ, &info ); LISTBOX_SetHorizontalPos( wnd, descr, info.nTrackPos ); break; case SB_LEFT: LISTBOX_SetHorizontalPos( wnd, descr, 0 ); break; case SB_RIGHT: LISTBOX_SetHorizontalPos( wnd, descr, descr->horz_extent - descr->width ); break; } } return 0; } static LRESULT LISTBOX_HandleMouseWheel(WND *wnd, LB_DESCR *descr,WPARAM wParam, LPARAM lParam ) { short gcWheelDelta = 0; UINT pulScrollLines = 3; SystemParametersInfoW(SPI_GETWHEELSCROLLLINES,0, &pulScrollLines, 0); gcWheelDelta -= (short) HIWORD(wParam); if (abs(gcWheelDelta) >= WHEEL_DELTA && pulScrollLines) { int cLineScroll = (int) min((UINT) descr->page_size, pulScrollLines); cLineScroll *= (gcWheelDelta / WHEEL_DELTA); LISTBOX_SetTopItem( wnd, descr, descr->top_item + cLineScroll, TRUE ); } return 0; } /*********************************************************************** * LISTBOX_HandleLButtonDown */ static LRESULT LISTBOX_HandleLButtonDown( WND *wnd, LB_DESCR *descr, WPARAM wParam, INT x, INT y ) { INT index = LISTBOX_GetItemFromPoint( wnd, descr, x, y ); TRACE("[%04x]: lbuttondown %d,%d item %d\n", wnd->hwndSelf, x, y, index ); if (!descr->caret_on && (descr->in_focus)) return 0; if (index != -1) { if (descr->style & LBS_EXTENDEDSEL) { if (!(wParam & MK_SHIFT)) descr->anchor_item = index; if (wParam & MK_CONTROL) { LISTBOX_SetCaretIndex( wnd, descr, index, FALSE ); LISTBOX_SetSelection( wnd, descr, index, !descr->items[index].selected, (descr->style & LBS_NOTIFY) != 0); } else LISTBOX_MoveCaret( wnd, descr, index, FALSE ); } else { LISTBOX_MoveCaret( wnd, descr, index, FALSE ); LISTBOX_SetSelection( wnd, descr, index, (!(descr->style & LBS_MULTIPLESEL) || !descr->items[index].selected), (descr->style & LBS_NOTIFY) != 0 ); } } if(!descr->in_focus) { if( !descr->lphc ) SetFocus( wnd->hwndSelf ); else SetFocus( (descr->lphc->hWndEdit) ? descr->lphc->hWndEdit : descr->lphc->self->hwndSelf ); } descr->captured = TRUE; SetCapture( wnd->hwndSelf ); if (index != -1 && !descr->lphc) { if (descr->style & LBS_NOTIFY ) SendMessageA( descr->owner, WM_LBTRACKPOINT, index, MAKELPARAM( x, y ) ); if (wnd->dwExStyle & WS_EX_DRAGDETECT) { POINT pt; pt.x = x; pt.y = y; if (DragDetect( wnd->hwndSelf, pt )) SendMessageA( descr->owner, WM_BEGINDRAG, 0, 0 ); } } return 0; } /************************************************************************* * LISTBOX_HandleLButtonDownCombo [Internal] * * Process LButtonDown message for the ComboListBox * * PARAMS * pWnd [I] The windows internal structure * pDescr [I] The ListBox internal structure * wParam [I] Key Flag (WM_LBUTTONDOWN doc for more info) * x [I] X Mouse Coordinate * y [I] Y Mouse Coordinate * * RETURNS * 0 since we are processing the WM_LBUTTONDOWN Message * * NOTES * This function is only to be used when a ListBox is a ComboListBox */ static LRESULT LISTBOX_HandleLButtonDownCombo( WND *pWnd, LB_DESCR *pDescr, UINT msg, WPARAM wParam, INT x, INT y) { RECT clientRect, screenRect; POINT mousePos; mousePos.x = x; mousePos.y = y; GetClientRect(pWnd->hwndSelf, &clientRect); if(PtInRect(&clientRect, mousePos)) { /* MousePos is in client, resume normal processing */ if (msg == WM_LBUTTONDOWN) return LISTBOX_HandleLButtonDown( pWnd, pDescr, wParam, x, y); else if (pDescr->style & LBS_NOTIFY) SEND_NOTIFICATION( pWnd, pDescr, LBN_DBLCLK ); return 0; } else { POINT screenMousePos; HWND hWndOldCapture; /* Check the Non-Client Area */ screenMousePos = mousePos; hWndOldCapture = GetCapture(); ReleaseCapture(); GetWindowRect(pWnd->hwndSelf, &screenRect); ClientToScreen(pWnd->hwndSelf, &screenMousePos); if(!PtInRect(&screenRect, screenMousePos)) { /* Close The Drop Down */ SEND_NOTIFICATION( pWnd, pDescr, LBN_SELCANCEL ); return 0; } else { /* Check to see the NC is a scrollbar */ INT nHitTestType=0; /* Check Vertical scroll bar */ if (pWnd->dwStyle & WS_VSCROLL) { clientRect.right += GetSystemMetrics(SM_CXVSCROLL); if (PtInRect( &clientRect, mousePos )) { nHitTestType = HTVSCROLL; } } /* Check horizontal scroll bar */ if (pWnd->dwStyle & WS_HSCROLL) { clientRect.bottom += GetSystemMetrics(SM_CYHSCROLL); if (PtInRect( &clientRect, mousePos )) { nHitTestType = HTHSCROLL; } } /* Windows sends this message when a scrollbar is clicked */ if(nHitTestType != 0) { SendMessageA(pWnd->hwndSelf, WM_NCLBUTTONDOWN, nHitTestType, MAKELONG(screenMousePos.x, screenMousePos.y)); } /* Resume the Capture after scrolling is complete */ if(hWndOldCapture != 0) { SetCapture(hWndOldCapture); } } } return 0; } /*********************************************************************** * LISTBOX_HandleLButtonUp */ static LRESULT LISTBOX_HandleLButtonUp( WND *wnd, LB_DESCR *descr ) { if (LISTBOX_Timer != LB_TIMER_NONE) KillSystemTimer( wnd->hwndSelf, LB_TIMER_ID ); LISTBOX_Timer = LB_TIMER_NONE; if (descr->captured) { descr->captured = FALSE; if (GetCapture() == wnd->hwndSelf) ReleaseCapture(); if ((descr->style & LBS_NOTIFY) && descr->nb_items) SEND_NOTIFICATION( wnd, descr, LBN_SELCHANGE ); } return 0; } /*********************************************************************** * LISTBOX_HandleTimer * * Handle scrolling upon a timer event. * Return TRUE if scrolling should continue. */ static LRESULT LISTBOX_HandleTimer( WND *wnd, LB_DESCR *descr, INT index, TIMER_DIRECTION dir ) { switch(dir) { case LB_TIMER_UP: if (descr->top_item) index = descr->top_item - 1; else index = 0; break; case LB_TIMER_LEFT: if (descr->top_item) index -= descr->page_size; break; case LB_TIMER_DOWN: index = descr->top_item + LISTBOX_GetCurrentPageSize( wnd, descr ); if (index == descr->focus_item) index++; if (index >= descr->nb_items) index = descr->nb_items - 1; break; case LB_TIMER_RIGHT: if (index + descr->page_size < descr->nb_items) index += descr->page_size; break; case LB_TIMER_NONE: break; } if (index == descr->focus_item) return FALSE; LISTBOX_MoveCaret( wnd, descr, index, FALSE ); return TRUE; } /*********************************************************************** * LISTBOX_HandleSystemTimer * * WM_SYSTIMER handler. */ static LRESULT LISTBOX_HandleSystemTimer( WND *wnd, LB_DESCR *descr ) { if (!LISTBOX_HandleTimer( wnd, descr, descr->focus_item, LISTBOX_Timer )) { KillSystemTimer( wnd->hwndSelf, LB_TIMER_ID ); LISTBOX_Timer = LB_TIMER_NONE; } return 0; } /*********************************************************************** * LISTBOX_HandleMouseMove * * WM_MOUSEMOVE handler. */ static void LISTBOX_HandleMouseMove( WND *wnd, LB_DESCR *descr, INT x, INT y ) { INT index; TIMER_DIRECTION dir; if (!descr->captured) return; if (descr->style & LBS_MULTICOLUMN) { if (y < 0) y = 0; else if (y >= descr->item_height * descr->page_size) y = descr->item_height * descr->page_size - 1; if (x < 0) { dir = LB_TIMER_LEFT; x = 0; } else if (x >= descr->width) { dir = LB_TIMER_RIGHT; x = descr->width - 1; } else dir = LB_TIMER_NONE; /* inside */ } else { if (y < 0) dir = LB_TIMER_UP; /* above */ else if (y >= descr->height) dir = LB_TIMER_DOWN; /* below */ else dir = LB_TIMER_NONE; /* inside */ } index = LISTBOX_GetItemFromPoint( wnd, descr, x, y ); if (index == -1) index = descr->focus_item; if (!LISTBOX_HandleTimer( wnd, descr, index, dir )) dir = LB_TIMER_NONE; /* Start/stop the system timer */ if (dir != LB_TIMER_NONE) SetSystemTimer( wnd->hwndSelf, LB_TIMER_ID, LB_SCROLL_TIMEOUT, NULL); else if (LISTBOX_Timer != LB_TIMER_NONE) KillSystemTimer( wnd->hwndSelf, LB_TIMER_ID ); LISTBOX_Timer = dir; } /*********************************************************************** * LISTBOX_HandleKeyDown */ static LRESULT LISTBOX_HandleKeyDown( WND *wnd, LB_DESCR *descr, WPARAM wParam ) { INT caret = -1; BOOL bForceSelection = TRUE; /* select item pointed to by focus_item */ if ((IS_MULTISELECT(descr)) || (descr->selected_item == descr->focus_item)) bForceSelection = FALSE; /* only for single select list */ if (descr->style & LBS_WANTKEYBOARDINPUT) { caret = SendMessageA( descr->owner, WM_VKEYTOITEM, MAKEWPARAM(LOWORD(wParam), descr->focus_item), wnd->hwndSelf ); if (caret == -2) return 0; } if (caret == -1) switch(wParam) { case VK_LEFT: if (descr->style & LBS_MULTICOLUMN) { bForceSelection = FALSE; if (descr->focus_item >= descr->page_size) caret = descr->focus_item - descr->page_size; break; } /* fall through */ case VK_UP: caret = descr->focus_item - 1; if (caret < 0) caret = 0; break; case VK_RIGHT: if (descr->style & LBS_MULTICOLUMN) { bForceSelection = FALSE; if (descr->focus_item + descr->page_size < descr->nb_items) caret = descr->focus_item + descr->page_size; break; } /* fall through */ case VK_DOWN: caret = descr->focus_item + 1; if (caret >= descr->nb_items) caret = descr->nb_items - 1; break; case VK_PRIOR: if (descr->style & LBS_MULTICOLUMN) { INT page = descr->width / descr->column_width; if (page < 1) page = 1; caret = descr->focus_item - (page * descr->page_size) + 1; } else caret = descr->focus_item-LISTBOX_GetCurrentPageSize(wnd,descr)+1; if (caret < 0) caret = 0; break; case VK_NEXT: if (descr->style & LBS_MULTICOLUMN) { INT page = descr->width / descr->column_width; if (page < 1) page = 1; caret = descr->focus_item + (page * descr->page_size) - 1; } else caret = descr->focus_item+LISTBOX_GetCurrentPageSize(wnd,descr)-1; if (caret >= descr->nb_items) caret = descr->nb_items - 1; break; case VK_HOME: caret = 0; break; case VK_END: caret = descr->nb_items - 1; break; case VK_SPACE: if (descr->style & LBS_EXTENDEDSEL) caret = descr->focus_item; else if (descr->style & LBS_MULTIPLESEL) { LISTBOX_SetSelection( wnd, descr, descr->focus_item, !descr->items[descr->focus_item].selected, (descr->style & LBS_NOTIFY) != 0 ); } break; default: bForceSelection = FALSE; } if (bForceSelection) /* focused item is used instead of key */ caret = descr->focus_item; if (caret >= 0) { if ((descr->style & LBS_EXTENDEDSEL) && !(GetKeyState( VK_SHIFT ) & 0x8000)) descr->anchor_item = caret; LISTBOX_MoveCaret( wnd, descr, caret, TRUE ); LISTBOX_SetSelection( wnd, descr, caret, TRUE, FALSE); if (descr->style & LBS_NOTIFY) { if( descr->lphc && CB_GETTYPE(descr->lphc) != CBS_SIMPLE ) { /* make sure that combo parent doesn't hide us */ descr->lphc->wState |= CBF_NOROLLUP; } if (descr->nb_items) SEND_NOTIFICATION( wnd, descr, LBN_SELCHANGE ); } } return 0; } /*********************************************************************** * LISTBOX_HandleChar */ static LRESULT LISTBOX_HandleChar( WND *wnd, LB_DESCR *descr, WPARAM wParam ) { INT caret = -1; char str[2]; str[0] = wParam & 0xff; str[1] = '\0'; if (descr->style & LBS_WANTKEYBOARDINPUT) { caret = SendMessageA( descr->owner, WM_CHARTOITEM, MAKEWPARAM(LOWORD(wParam), descr->focus_item), wnd->hwndSelf ); if (caret == -2) return 0; } if (caret == -1) caret = LISTBOX_FindString( wnd, descr, descr->focus_item, str, FALSE); if (caret != -1) { if ((!IS_MULTISELECT(descr)) && descr->selected_item == -1) LISTBOX_SetSelection( wnd, descr, caret, TRUE, FALSE); LISTBOX_MoveCaret( wnd, descr, caret, TRUE ); if ((descr->style & LBS_NOTIFY) && descr->nb_items) SEND_NOTIFICATION( wnd, descr, LBN_SELCHANGE ); } return 0; } /*********************************************************************** * LISTBOX_Create */ static BOOL LISTBOX_Create( WND *wnd, LPHEADCOMBO lphc ) { LB_DESCR *descr; MEASUREITEMSTRUCT mis; RECT rect; if (!(descr = HeapAlloc( GetProcessHeap(), 0, sizeof(*descr) ))) return FALSE; if (!(descr->heap = HeapCreate( 0, 0x10000, 0 ))) { HeapFree( GetProcessHeap(), 0, descr ); return FALSE; } GetClientRect( wnd->hwndSelf, &rect ); descr->owner = GetParent( wnd->hwndSelf ); descr->style = wnd->dwStyle; descr->width = rect.right - rect.left; descr->height = rect.bottom - rect.top; descr->items = NULL; descr->nb_items = 0; descr->top_item = 0; descr->selected_item = -1; descr->focus_item = 0; descr->anchor_item = -1; descr->item_height = 1; descr->page_size = 1; descr->column_width = 150; descr->horz_extent = (wnd->dwStyle & WS_HSCROLL) ? 1 : 0; descr->horz_pos = 0; descr->nb_tabs = 0; descr->tabs = NULL; descr->caret_on = TRUE; descr->in_focus = FALSE; descr->captured = FALSE; descr->font = 0; descr->locale = 0; /* FIXME */ descr->lphc = lphc; if( ( GetExpWinVer16( wnd->hInstance ) & 0xFF00 ) == 0x0300 && ( descr->style & ( WS_VSCROLL | WS_HSCROLL ) ) ) { /* Win95 document "List Box Differences" from MSDN: If a list box in a version 3.x application has either the WS_HSCROLL or WS_VSCROLL style, the list box receives both horizontal and vertical scroll bars. */ descr->style |= WS_VSCROLL | WS_HSCROLL; } if( lphc ) { TRACE_(combo)("[%04x]: resetting owner %04x -> %04x\n", wnd->hwndSelf, descr->owner, lphc->self->hwndSelf ); descr->owner = lphc->self->hwndSelf; } *(LB_DESCR **)wnd->wExtra = descr; /* if (wnd->dwExStyle & WS_EX_NOPARENTNOTIFY) descr->style &= ~LBS_NOTIFY; */ if (descr->style & LBS_EXTENDEDSEL) descr->style |= LBS_MULTIPLESEL; if (descr->style & LBS_MULTICOLUMN) descr->style &= ~LBS_OWNERDRAWVARIABLE; if (descr->style & LBS_OWNERDRAWVARIABLE) descr->style |= LBS_NOINTEGRALHEIGHT; descr->item_height = LISTBOX_SetFont( wnd, descr, 0 ); if (descr->style & LBS_OWNERDRAWFIXED) { if( descr->lphc && (descr->lphc->dwStyle & CBS_DROPDOWN)) { /* WinWord gets VERY unhappy if we send WM_MEASUREITEM from here */ descr->item_height = lphc->fixedOwnerDrawHeight; } else { UINT id = (descr->lphc ) ? ID_CB_LISTBOX : wnd->wIDmenu; mis.CtlType = ODT_LISTBOX; mis.CtlID = id; mis.itemID = -1; mis.itemWidth = 0; mis.itemData = 0; mis.itemHeight = descr->item_height; SendMessageA( descr->owner, WM_MEASUREITEM, id, (LPARAM)&mis ); descr->item_height = mis.itemHeight ? mis.itemHeight : 1; } } return TRUE; } /*********************************************************************** * LISTBOX_Destroy */ static BOOL LISTBOX_Destroy( WND *wnd, LB_DESCR *descr ) { LISTBOX_ResetContent( wnd, descr ); HeapDestroy( descr->heap ); HeapFree( GetProcessHeap(), 0, descr ); wnd->wExtra[0] = 0; return TRUE; } /*********************************************************************** * ListBoxWndProc */ static inline LRESULT WINAPI ListBoxWndProc_locked( WND* wnd, UINT msg, WPARAM wParam, LPARAM lParam ) { LRESULT ret; LB_DESCR *descr; HWND hwnd = wnd->hwndSelf; if (!wnd) return 0; if (!(descr = *(LB_DESCR **)wnd->wExtra)) { switch (msg) { case WM_CREATE: { if (!LISTBOX_Create( wnd, NULL )) return -1; TRACE("creating wnd=%04x descr=%p\n", hwnd, *(LB_DESCR **)wnd->wExtra ); return 0; } case WM_NCCREATE: { /* * When a listbox is not in a combobox and the look * is win95, the WS_BORDER style is replaced with * the WS_EX_CLIENTEDGE style. */ if ( (TWEAK_WineLook > WIN31_LOOK) && (wnd->dwStyle & WS_BORDER) ) { wnd->dwExStyle |= WS_EX_CLIENTEDGE; wnd->dwStyle &= ~ WS_BORDER; } } } /* Ignore all other messages before we get a WM_CREATE */ return DefWindowProcA( hwnd, msg, wParam, lParam ); } TRACE("[%04x]: msg %s wp %08x lp %08lx\n", wnd->hwndSelf, SPY_GetMsgName(msg), wParam, lParam ); switch(msg) { case LB_RESETCONTENT16: case LB_RESETCONTENT: LISTBOX_ResetContent( wnd, descr ); return 0; case LB_ADDSTRING16: if (HAS_STRINGS(descr)) lParam = (LPARAM)PTR_SEG_TO_LIN(lParam); /* fall through */ case LB_ADDSTRING: wParam = LISTBOX_FindStringPos( wnd, descr, (LPCSTR)lParam, FALSE ); return LISTBOX_InsertString( wnd, descr, wParam, (LPCSTR)lParam ); case LB_INSERTSTRING16: if (HAS_STRINGS(descr)) lParam = (LPARAM)PTR_SEG_TO_LIN(lParam); wParam = (INT)(INT16)wParam; /* fall through */ case LB_INSERTSTRING: return LISTBOX_InsertString( wnd, descr, wParam, (LPCSTR)lParam ); case LB_ADDFILE16: if (HAS_STRINGS(descr)) lParam = (LPARAM)PTR_SEG_TO_LIN(lParam); /* fall through */ case LB_ADDFILE: wParam = LISTBOX_FindFileStrPos( wnd, descr, (LPCSTR)lParam ); return LISTBOX_InsertString( wnd, descr, wParam, (LPCSTR)lParam ); case LB_DELETESTRING16: case LB_DELETESTRING: if (LISTBOX_RemoveItem( wnd, descr, wParam) != LB_ERR) return descr->nb_items; else return LB_ERR; case LB_GETITEMDATA16: case LB_GETITEMDATA: if (((INT)wParam < 0) || ((INT)wParam >= descr->nb_items)) return LB_ERR; return descr->items[wParam].data; case LB_SETITEMDATA16: case LB_SETITEMDATA: if (((INT)wParam < 0) || ((INT)wParam >= descr->nb_items)) return LB_ERR; descr->items[wParam].data = (DWORD)lParam; return LB_OKAY; case LB_GETCOUNT16: case LB_GETCOUNT: return descr->nb_items; case LB_GETTEXT16: lParam = (LPARAM)PTR_SEG_TO_LIN(lParam); /* fall through */ case LB_GETTEXT: return LISTBOX_GetText( wnd, descr, wParam, (LPSTR)lParam ); case LB_GETTEXTLEN16: /* fall through */ case LB_GETTEXTLEN: if (wParam >= descr->nb_items) return LB_ERR; return (HAS_STRINGS(descr) ? strlen(descr->items[wParam].str) : sizeof(DWORD)); case LB_GETCURSEL16: case LB_GETCURSEL: if (descr->nb_items==0) return LB_ERR; if (!IS_MULTISELECT(descr)) return descr->selected_item; /* else */ if (descr->selected_item!=-1) return descr->selected_item; /* else */ return descr->focus_item; /* otherwise, if the user tries to move the selection with the */ /* arrow keys, we will give the application something to choke on */ case LB_GETTOPINDEX16: case LB_GETTOPINDEX: return descr->top_item; case LB_GETITEMHEIGHT16: case LB_GETITEMHEIGHT: return LISTBOX_GetItemHeight( wnd, descr, wParam ); case LB_SETITEMHEIGHT16: lParam = LOWORD(lParam); /* fall through */ case LB_SETITEMHEIGHT: return LISTBOX_SetItemHeight( wnd, descr, wParam, lParam ); case LB_ITEMFROMPOINT: { POINT pt; RECT rect; pt.x = LOWORD(lParam); pt.y = HIWORD(lParam); rect.left = 0; rect.top = 0; rect.right = descr->width; rect.bottom = descr->height; return MAKELONG( LISTBOX_GetItemFromPoint(wnd, descr, pt.x, pt.y), !PtInRect( &rect, pt ) ); } case LB_SETCARETINDEX16: case LB_SETCARETINDEX: if ((!IS_MULTISELECT(descr)) && (descr->selected_item != -1)) return LB_ERR; if (LISTBOX_SetCaretIndex( wnd, descr, wParam, !lParam ) == LB_ERR) return LB_ERR; else if (ISWIN31) return wParam; else return LB_OKAY; case LB_GETCARETINDEX16: case LB_GETCARETINDEX: return descr->focus_item; case LB_SETTOPINDEX16: case LB_SETTOPINDEX: return LISTBOX_SetTopItem( wnd, descr, wParam, TRUE ); case LB_SETCOLUMNWIDTH16: case LB_SETCOLUMNWIDTH: return LISTBOX_SetColumnWidth( wnd, descr, wParam ); case LB_GETITEMRECT16: { RECT rect; ret = LISTBOX_GetItemRect( wnd, descr, (INT16)wParam, &rect ); CONV_RECT32TO16( &rect, (RECT16 *)PTR_SEG_TO_LIN(lParam) ); } return ret; case LB_GETITEMRECT: return LISTBOX_GetItemRect( wnd, descr, wParam, (RECT *)lParam ); case LB_FINDSTRING16: wParam = (INT)(INT16)wParam; if (HAS_STRINGS(descr)) lParam = (LPARAM)PTR_SEG_TO_LIN(lParam); /* fall through */ case LB_FINDSTRING: return LISTBOX_FindString( wnd, descr, wParam, (LPCSTR)lParam, FALSE ); case LB_FINDSTRINGEXACT16: wParam = (INT)(INT16)wParam; if (HAS_STRINGS(descr)) lParam = (LPARAM)PTR_SEG_TO_LIN(lParam); /* fall through */ case LB_FINDSTRINGEXACT: return LISTBOX_FindString( wnd, descr, wParam, (LPCSTR)lParam, TRUE ); case LB_SELECTSTRING16: wParam = (INT)(INT16)wParam; if (HAS_STRINGS(descr)) lParam = (LPARAM)PTR_SEG_TO_LIN(lParam); /* fall through */ case LB_SELECTSTRING: { INT index = LISTBOX_FindString( wnd, descr, wParam, (LPCSTR)lParam, FALSE ); if (index == LB_ERR) return LB_ERR; LISTBOX_SetSelection( wnd, descr, index, TRUE, FALSE ); return index; } case LB_GETSEL16: wParam = (INT)(INT16)wParam; /* fall through */ case LB_GETSEL: if (((INT)wParam < 0) || ((INT)wParam >= descr->nb_items)) return LB_ERR; return descr->items[wParam].selected; case LB_SETSEL16: lParam = (INT)(INT16)lParam; /* fall through */ case LB_SETSEL: return LISTBOX_SetSelection( wnd, descr, lParam, wParam, FALSE ); case LB_SETCURSEL16: wParam = (INT)(INT16)wParam; /* fall through */ case LB_SETCURSEL: if (IS_MULTISELECT(descr)) return LB_ERR; LISTBOX_SetCaretIndex( wnd, descr, wParam, TRUE ); return LISTBOX_SetSelection( wnd, descr, wParam, TRUE, FALSE ); case LB_GETSELCOUNT16: case LB_GETSELCOUNT: return LISTBOX_GetSelCount( wnd, descr ); case LB_GETSELITEMS16: return LISTBOX_GetSelItems16( wnd, descr, wParam, (LPINT16)PTR_SEG_TO_LIN(lParam) ); case LB_GETSELITEMS: return LISTBOX_GetSelItems( wnd, descr, wParam, (LPINT)lParam ); case LB_SELITEMRANGE16: case LB_SELITEMRANGE: if (LOWORD(lParam) <= HIWORD(lParam)) return LISTBOX_SelectItemRange( wnd, descr, LOWORD(lParam), HIWORD(lParam), wParam ); else return LISTBOX_SelectItemRange( wnd, descr, HIWORD(lParam), LOWORD(lParam), wParam ); case LB_SELITEMRANGEEX16: case LB_SELITEMRANGEEX: if ((INT)lParam >= (INT)wParam) return LISTBOX_SelectItemRange( wnd, descr, wParam, lParam, TRUE ); else return LISTBOX_SelectItemRange( wnd, descr, lParam, wParam, FALSE); case LB_GETHORIZONTALEXTENT16: case LB_GETHORIZONTALEXTENT: return descr->horz_extent; case LB_SETHORIZONTALEXTENT16: case LB_SETHORIZONTALEXTENT: return LISTBOX_SetHorizontalExtent( wnd, descr, wParam ); case LB_GETANCHORINDEX16: case LB_GETANCHORINDEX: return descr->anchor_item; case LB_SETANCHORINDEX16: wParam = (INT)(INT16)wParam; /* fall through */ case LB_SETANCHORINDEX: if (((INT)wParam < -1) || ((INT)wParam >= descr->nb_items)) return LB_ERR; descr->anchor_item = (INT)wParam; return LB_OKAY; case LB_DIR16: return LISTBOX_Directory( wnd, descr, wParam, (LPCSTR)PTR_SEG_TO_LIN(lParam), FALSE ); case LB_DIR: return LISTBOX_Directory( wnd, descr, wParam, (LPCSTR)lParam, TRUE ); case LB_GETLOCALE: return descr->locale; case LB_SETLOCALE: descr->locale = (LCID)wParam; /* FIXME: should check for valid lcid */ return LB_OKAY; case LB_INITSTORAGE: return LISTBOX_InitStorage( wnd, descr, wParam, (DWORD)lParam ); case LB_SETCOUNT: return LISTBOX_SetCount( wnd, descr, (INT)wParam ); case LB_SETTABSTOPS16: return LISTBOX_SetTabStops( wnd, descr, (INT)(INT16)wParam, (LPINT)PTR_SEG_TO_LIN(lParam), TRUE ); case LB_SETTABSTOPS: return LISTBOX_SetTabStops( wnd, descr, wParam, (LPINT)lParam, FALSE ); case LB_CARETON16: case LB_CARETON: if (descr->caret_on) return LB_OKAY; descr->caret_on = TRUE; if ((descr->focus_item != -1) && (descr->in_focus)) LISTBOX_RepaintItem( wnd, descr, descr->focus_item, ODA_FOCUS ); return LB_OKAY; case LB_CARETOFF16: case LB_CARETOFF: if (!descr->caret_on) return LB_OKAY; descr->caret_on = FALSE; if ((descr->focus_item != -1) && (descr->in_focus)) LISTBOX_RepaintItem( wnd, descr, descr->focus_item, ODA_FOCUS ); return LB_OKAY; case WM_DESTROY: return LISTBOX_Destroy( wnd, descr ); case WM_ENABLE: InvalidateRect( hwnd, NULL, TRUE ); return 0; case WM_SETREDRAW: LISTBOX_SetRedraw( wnd, descr, wParam != 0 ); return 0; case WM_GETDLGCODE: return DLGC_WANTARROWS | DLGC_WANTCHARS; case WM_PAINT: { PAINTSTRUCT ps; HDC hdc = ( wParam ) ? ((HDC)wParam) : BeginPaint( hwnd, &ps ); ret = LISTBOX_Paint( wnd, descr, hdc ); if( !wParam ) EndPaint( hwnd, &ps ); } return ret; case WM_SIZE: LISTBOX_UpdateSize( wnd, descr ); return 0; case WM_GETFONT: return descr->font; case WM_SETFONT: LISTBOX_SetFont( wnd, descr, (HFONT)wParam ); if (lParam) InvalidateRect( wnd->hwndSelf, 0, TRUE ); return 0; case WM_SETFOCUS: descr->in_focus = TRUE; descr->caret_on = TRUE; if (descr->focus_item != -1) LISTBOX_RepaintItem( wnd, descr, descr->focus_item, ODA_FOCUS ); SEND_NOTIFICATION( wnd, descr, LBN_SETFOCUS ); return 0; case WM_KILLFOCUS: descr->in_focus = FALSE; if ((descr->focus_item != -1) && descr->caret_on) LISTBOX_RepaintItem( wnd, descr, descr->focus_item, ODA_FOCUS ); SEND_NOTIFICATION( wnd, descr, LBN_KILLFOCUS ); return 0; case WM_HSCROLL: return LISTBOX_HandleHScroll( wnd, descr, wParam, lParam ); case WM_VSCROLL: return LISTBOX_HandleVScroll( wnd, descr, wParam, lParam ); case WM_MOUSEACTIVATE: return MA_NOACTIVATE; case WM_MOUSEWHEEL: if (wParam & (MK_SHIFT | MK_CONTROL)) return DefWindowProcA( hwnd, msg, wParam, lParam ); return LISTBOX_HandleMouseWheel( wnd, descr, wParam, lParam ); case WM_LBUTTONDOWN: return LISTBOX_HandleLButtonDown( wnd, descr, wParam, (INT16)LOWORD(lParam), (INT16)HIWORD(lParam) ); case WM_LBUTTONDBLCLK: if (descr->style & LBS_NOTIFY) SEND_NOTIFICATION( wnd, descr, LBN_DBLCLK ); return 0; case WM_MOUSEMOVE: if (GetCapture() == hwnd) LISTBOX_HandleMouseMove( wnd, descr, (INT16)LOWORD(lParam), (INT16)HIWORD(lParam) ); return 0; case WM_LBUTTONUP: return LISTBOX_HandleLButtonUp( wnd, descr ); case WM_KEYDOWN: return LISTBOX_HandleKeyDown( wnd, descr, wParam ); case WM_CHAR: return LISTBOX_HandleChar( wnd, descr, wParam ); case WM_SYSTIMER: return LISTBOX_HandleSystemTimer( wnd, descr ); case WM_ERASEBKGND: if (IS_OWNERDRAW(descr)) { RECT rect; HBRUSH hbrush = SendMessageA( descr->owner, WM_CTLCOLORLISTBOX, wParam, (LPARAM)wnd->hwndSelf ); GetClientRect(hwnd, &rect); if (hbrush) FillRect( (HDC)wParam, &rect, hbrush ); } return 1; case WM_DROPFILES: if( !descr->lphc ) return SendMessageA( descr->owner, msg, wParam, lParam ); break; case WM_DROPOBJECT: case WM_QUERYDROPOBJECT: case WM_DRAGSELECT: case WM_DRAGMOVE: if( !descr->lphc ) { LPDRAGINFO dragInfo = (LPDRAGINFO)PTR_SEG_TO_LIN( (SEGPTR)lParam ); dragInfo->l = LISTBOX_GetItemFromPoint( wnd, descr, dragInfo->pt.x, dragInfo->pt.y ); return SendMessageA( descr->owner, msg, wParam, lParam ); } break; default: if ((msg >= WM_USER) && (msg < 0xc000)) WARN("[%04x]: unknown msg %04x wp %08x lp %08lx\n", hwnd, msg, wParam, lParam ); return DefWindowProcA( hwnd, msg, wParam, lParam ); } return 0; } /*********************************************************************** * ListBoxWndProc * * This is just a wrapper for the real wndproc, it only does window locking * and unlocking. */ LRESULT WINAPI ListBoxWndProc( HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam ) { WND* wndPtr = WIN_FindWndPtr( hwnd ); LRESULT res = ListBoxWndProc_locked(wndPtr,msg,wParam,lParam); WIN_ReleaseWndPtr(wndPtr); return res; } /*********************************************************************** * COMBO_Directory */ LRESULT COMBO_Directory( LPHEADCOMBO lphc, UINT attrib, LPSTR dir, BOOL bLong) { WND *wnd = WIN_FindWndPtr( lphc->hWndLBox ); if( wnd ) { LB_DESCR *descr = *(LB_DESCR **)wnd->wExtra; if( descr ) { LRESULT lRet = LISTBOX_Directory( wnd, descr, attrib, dir, bLong ); RedrawWindow( lphc->self->hwndSelf, NULL, 0, RDW_INVALIDATE | RDW_ERASE | RDW_UPDATENOW ); WIN_ReleaseWndPtr(wnd); return lRet; } WIN_ReleaseWndPtr(wnd); } return CB_ERR; } /*********************************************************************** * ComboLBWndProc_locked * * The real combo listbox wndproc, but called with locked WND struct. */ static inline LRESULT WINAPI ComboLBWndProc_locked( WND* wnd, UINT msg, WPARAM wParam, LPARAM lParam ) { LRESULT lRet = 0; HWND hwnd = wnd->hwndSelf; if (wnd) { LB_DESCR *descr = *(LB_DESCR **)wnd->wExtra; TRACE_(combo)("[%04x]: msg %s wp %08x lp %08lx\n", wnd->hwndSelf, SPY_GetMsgName(msg), wParam, lParam ); if( descr || msg == WM_CREATE ) { LPHEADCOMBO lphc = (descr) ? descr->lphc : NULL; switch( msg ) { case WM_CREATE: #define lpcs ((LPCREATESTRUCTA)lParam) TRACE_(combo)("\tpassed parent handle = 0x%08x\n", (UINT)lpcs->lpCreateParams); lphc = (LPHEADCOMBO)(lpcs->lpCreateParams); #undef lpcs return LISTBOX_Create( wnd, lphc ); case WM_MOUSEMOVE: if ( (TWEAK_WineLook > WIN31_LOOK) && (CB_GETTYPE(lphc) != CBS_SIMPLE) ) { POINT mousePos; BOOL captured; RECT clientRect; mousePos.x = (INT16)LOWORD(lParam); mousePos.y = (INT16)HIWORD(lParam); /* * If we are in a dropdown combobox, we simulate that * the mouse is captured to show the tracking of the item. */ GetClientRect(hwnd, &clientRect); if (PtInRect( &clientRect, mousePos )) { captured = descr->captured; descr->captured = TRUE; LISTBOX_HandleMouseMove( wnd, descr, mousePos.x, mousePos.y); descr->captured = captured; } else { LISTBOX_HandleMouseMove( wnd, descr, mousePos.x, mousePos.y); } return 0; } else { /* * If we are in Win3.1 look, go with the default behavior. */ return ListBoxWndProc( hwnd, msg, wParam, lParam ); } case WM_LBUTTONUP: if (TWEAK_WineLook > WIN31_LOOK) { POINT mousePos; RECT clientRect; /* * If the mouse button "up" is not in the listbox, * we make sure there is no selection by re-selecting the * item that was selected when the listbox was made visible. */ mousePos.x = (INT16)LOWORD(lParam); mousePos.y = (INT16)HIWORD(lParam); GetClientRect(hwnd, &clientRect); /* * When the user clicks outside the combobox and the focus * is lost, the owning combobox will send a fake buttonup with * 0xFFFFFFF as the mouse location, we must also revert the * selection to the original selection. */ if ( (lParam == 0xFFFFFFFF) || (!PtInRect( &clientRect, mousePos )) ) { LISTBOX_MoveCaret( wnd, descr, lphc->droppedIndex, FALSE ); } } return LISTBOX_HandleLButtonUp( wnd, descr ); case WM_LBUTTONDBLCLK: case WM_LBUTTONDOWN: return LISTBOX_HandleLButtonDownCombo(wnd, descr, msg, wParam, (INT16)LOWORD(lParam), (INT16)HIWORD(lParam) ); case WM_MOUSEACTIVATE: return MA_NOACTIVATE; case WM_NCACTIVATE: return FALSE; case WM_KEYDOWN: if( CB_GETTYPE(lphc) != CBS_SIMPLE ) { /* for some reason(?) Windows makes it possible to * show/hide ComboLBox by sending it WM_KEYDOWNs */ if( (!(lphc->wState & CBF_EUI) && wParam == VK_F4) || ( (lphc->wState & CBF_EUI) && !(lphc->wState & CBF_DROPPED) && (wParam == VK_DOWN || wParam == VK_UP)) ) { COMBO_FlipListbox( lphc, FALSE ); return 0; } } return LISTBOX_HandleKeyDown( wnd, descr, wParam ); case LB_SETCURSEL16: case LB_SETCURSEL: lRet = ListBoxWndProc( hwnd, msg, wParam, lParam ); lRet =(lRet == LB_ERR) ? lRet : descr->selected_item; return lRet; case WM_NCDESTROY: if( CB_GETTYPE(lphc) != CBS_SIMPLE ) lphc->hWndLBox = 0; /* fall through */ default: return ListBoxWndProc( hwnd, msg, wParam, lParam ); } } lRet = DefWindowProcA( hwnd, msg, wParam, lParam ); TRACE_(combo)("\t default on msg [%04x]\n", (UINT16)msg ); } return lRet; } /*********************************************************************** * ComboLBWndProc * * NOTE: in Windows, winproc address of the ComboLBox is the same * as that of the Listbox. * * This is just a wrapper for the real wndproc, it only does window locking * and unlocking. */ LRESULT WINAPI ComboLBWndProc( HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam ) { WND *wnd = WIN_FindWndPtr( hwnd ); LRESULT res = ComboLBWndProc_locked(wnd,msg,wParam,lParam); WIN_ReleaseWndPtr(wnd); return res; } wine-20000526/controls/menu.c0100644000175000001440000041715407112612571015433 0ustar julliardusers/* * Menu functions * * Copyright 1993 Martin Ayotte * Copyright 1994 Alexandre Julliard * Copyright 1997 Morten Welinder */ /* * Note: the style MF_MOUSESELECT is used to mark popup items that * have been selected, i.e. their popup menu is currently displayed. * This is probably not the meaning this style has in MS-Windows. */ #include #include #include #include #include "windef.h" #include "wingdi.h" #include "wine/winbase16.h" #include "wine/winuser16.h" #include "win.h" #include "task.h" #include "heap.h" #include "menu.h" #include "nonclient.h" #include "user.h" #include "message.h" #include "queue.h" #include "tweak.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(menu) /* internal popup menu window messages */ #define MM_SETMENUHANDLE (WM_USER + 0) #define MM_GETMENUHANDLE (WM_USER + 1) /* Menu item structure */ typedef struct { /* ----------- MENUITEMINFO Stuff ----------- */ UINT fType; /* Item type. */ UINT fState; /* Item state. */ UINT wID; /* Item id. */ HMENU hSubMenu; /* Pop-up menu. */ HBITMAP hCheckBit; /* Bitmap when checked. */ HBITMAP hUnCheckBit; /* Bitmap when unchecked. */ LPSTR text; /* Item text or bitmap handle. */ DWORD dwItemData; /* Application defined. */ DWORD dwTypeData; /* depends on fMask */ HBITMAP hbmpItem; /* bitmap in win98 style menus */ /* ----------- Wine stuff ----------- */ RECT rect; /* Item area (relative to menu window) */ UINT xTab; /* X position of text after Tab */ } MENUITEM; /* Popup menu structure */ typedef struct { WORD wFlags; /* Menu flags (MF_POPUP, MF_SYSMENU) */ WORD wMagic; /* Magic number */ HQUEUE16 hTaskQ; /* Task queue for this menu */ WORD Width; /* Width of the whole menu */ WORD Height; /* Height of the whole menu */ WORD nItems; /* Number of items in the menu */ HWND hWnd; /* Window containing the menu */ MENUITEM *items; /* Array of menu items */ UINT FocusedItem; /* Currently focused item */ HWND hwndOwner; /* window receiving the messages for ownerdraw */ BOOL bTimeToHide; /* Request hiding when receiving a second click in the top-level menu item */ /* ------------ MENUINFO members ------ */ DWORD dwStyle; /* Extended mennu style */ UINT cyMax; /* max hight of the whole menu, 0 is screen hight */ HBRUSH hbrBack; /* brush for menu background */ DWORD dwContextHelpID; DWORD dwMenuData; /* application defined value */ HMENU hSysMenuOwner; /* Handle to the dummy sys menu holder */ } POPUPMENU, *LPPOPUPMENU; /* internal flags for menu tracking */ #define TF_ENDMENU 0x0001 #define TF_SUSPENDPOPUP 0x0002 #define TF_SKIPREMOVE 0x0004 typedef struct { UINT trackFlags; HMENU hCurrentMenu; /* current submenu (can be equal to hTopMenu)*/ HMENU hTopMenu; /* initial menu */ HWND hOwnerWnd; /* where notifications are sent */ POINT pt; } MTRACKER; #define MENU_MAGIC 0x554d /* 'MU' */ #define IS_A_MENU(pmenu) ((pmenu) && (pmenu)->wMagic == MENU_MAGIC) #define ITEM_PREV -1 #define ITEM_NEXT 1 /* Internal MENU_TrackMenu() flags */ #define TPM_INTERNAL 0xF0000000 #define TPM_ENTERIDLEEX 0x80000000 /* set owner window for WM_ENTERIDLE */ #define TPM_BUTTONDOWN 0x40000000 /* menu was clicked before tracking */ #define TPM_POPUPMENU 0x20000000 /* menu is a popup menu */ /* popup menu shade thickness */ #define POPUP_XSHADE 4 #define POPUP_YSHADE 4 /* Space between 2 menu bar items */ #define MENU_BAR_ITEMS_SPACE 12 /* Minimum width of a tab character */ #define MENU_TAB_SPACE 8 /* Height of a separator item */ #define SEPARATOR_HEIGHT 5 /* (other menu->FocusedItem values give the position of the focused item) */ #define NO_SELECTED_ITEM 0xffff #define MENU_ITEM_TYPE(flags) \ ((flags) & (MF_STRING | MF_BITMAP | MF_OWNERDRAW | MF_SEPARATOR)) #define IS_STRING_ITEM(flags) (MENU_ITEM_TYPE ((flags)) == MF_STRING) #define IS_BITMAP_ITEM(flags) (MENU_ITEM_TYPE ((flags)) == MF_BITMAP) #define IS_SYSTEM_MENU(menu) \ (!((menu)->wFlags & MF_POPUP) && (menu)->wFlags & MF_SYSMENU) #define IS_SYSTEM_POPUP(menu) \ ((menu)->wFlags & MF_POPUP && (menu)->wFlags & MF_SYSMENU) #define TYPE_MASK (MFT_STRING | MFT_BITMAP | MFT_OWNERDRAW | MFT_SEPARATOR | \ MFT_MENUBARBREAK | MFT_MENUBREAK | MFT_RADIOCHECK | \ MFT_RIGHTORDER | MFT_RIGHTJUSTIFY | \ MF_POPUP | MF_SYSMENU | MF_HELP) #define STATE_MASK (~TYPE_MASK) /* Dimension of the menu bitmaps */ static WORD check_bitmap_width = 0, check_bitmap_height = 0; static WORD arrow_bitmap_width = 0, arrow_bitmap_height = 0; static HBITMAP hStdRadioCheck = 0; static HBITMAP hStdCheck = 0; static HBITMAP hStdMnArrow = 0; /* Minimze/restore/close buttons to be inserted in menubar */ static HBITMAP hBmpMinimize = 0; static HBITMAP hBmpMinimizeD = 0; static HBITMAP hBmpMaximize = 0; static HBITMAP hBmpMaximizeD = 0; static HBITMAP hBmpClose = 0; static HBITMAP hBmpCloseD = 0; static HBRUSH hShadeBrush = 0; static HFONT hMenuFont = 0; static HFONT hMenuFontBold = 0; static HMENU MENU_DefSysPopup = 0; /* Default system menu popup */ /* Use global popup window because there's no way 2 menus can * be tracked at the same time. */ static WND* pTopPopupWnd = 0; static UINT uSubPWndLevel = 0; /* Flag set by EndMenu() to force an exit from menu tracking */ static BOOL fEndMenu = FALSE; /*********************************************************************** * debug_print_menuitem * * Print a menuitem in readable form. */ #define debug_print_menuitem(pre, mp, post) \ if(!TRACE_ON(menu)) ; else do_debug_print_menuitem(pre, mp, post) #define MENUOUT(text) \ DPRINTF("%s%s", (count++ ? "," : ""), (text)) #define MENUFLAG(bit,text) \ do { \ if (flags & (bit)) { flags &= ~(bit); MENUOUT ((text)); } \ } while (0) static void do_debug_print_menuitem(const char *prefix, MENUITEM * mp, const char *postfix) { TRACE("%s ", prefix); if (mp) { UINT flags = mp->fType; int typ = MENU_ITEM_TYPE(flags); DPRINTF( "{ ID=0x%x", mp->wID); if (flags & MF_POPUP) DPRINTF( ", Sub=0x%x", mp->hSubMenu); if (flags) { int count = 0; DPRINTF( ", Typ="); if (typ == MFT_STRING) /* Nothing */ ; else if (typ == MFT_SEPARATOR) MENUOUT("sep"); else if (typ == MFT_OWNERDRAW) MENUOUT("own"); else if (typ == MFT_BITMAP) MENUOUT("bit"); else MENUOUT("???"); flags -= typ; MENUFLAG(MF_POPUP, "pop"); MENUFLAG(MFT_MENUBARBREAK, "barbrk"); MENUFLAG(MFT_MENUBREAK, "brk"); MENUFLAG(MFT_RADIOCHECK, "radio"); MENUFLAG(MFT_RIGHTORDER, "rorder"); MENUFLAG(MF_SYSMENU, "sys"); MENUFLAG(MFT_RIGHTJUSTIFY, "right"); /* same as MF_HELP */ if (flags) DPRINTF( "+0x%x", flags); } flags = mp->fState; if (flags) { int count = 0; DPRINTF( ", State="); MENUFLAG(MFS_GRAYED, "grey"); MENUFLAG(MFS_DEFAULT, "default"); MENUFLAG(MFS_DISABLED, "dis"); MENUFLAG(MFS_CHECKED, "check"); MENUFLAG(MFS_HILITE, "hi"); MENUFLAG(MF_USECHECKBITMAPS, "usebit"); MENUFLAG(MF_MOUSESELECT, "mouse"); if (flags) DPRINTF( "+0x%x", flags); } if (mp->hCheckBit) DPRINTF( ", Chk=0x%x", mp->hCheckBit); if (mp->hUnCheckBit) DPRINTF( ", Unc=0x%x", mp->hUnCheckBit); if (typ == MFT_STRING) { if (mp->text) DPRINTF( ", Text=\"%s\"", mp->text); else DPRINTF( ", Text=Null"); } else if (mp->text == NULL) /* Nothing */ ; else DPRINTF( ", Text=%p", mp->text); if (mp->dwItemData) DPRINTF( ", ItemData=0x%08lx", mp->dwItemData); DPRINTF( " }"); } else { DPRINTF( "NULL"); } DPRINTF(" %s\n", postfix); } #undef MENUOUT #undef MENUFLAG /*********************************************************************** * MENU_GetMenu * * Validate the given menu handle and returns the menu structure pointer. */ POPUPMENU *MENU_GetMenu(HMENU hMenu) { POPUPMENU *menu; menu = (POPUPMENU *) USER_HEAP_LIN_ADDR(hMenu); if (!IS_A_MENU(menu)) { WARN("invalid menu handle=%x, ptr=%p, magic=%x\n", hMenu, menu, menu? menu->wMagic:0); menu = NULL; } return menu; } /*********************************************************************** * MENU_CopySysPopup * * Return the default system menu. */ static HMENU MENU_CopySysPopup(void) { HMENU hMenu = LoadMenuA(GetModuleHandleA("USER32"), "SYSMENU"); if( hMenu ) { POPUPMENU* menu = (POPUPMENU *) USER_HEAP_LIN_ADDR(hMenu); menu->wFlags |= MF_SYSMENU | MF_POPUP; SetMenuDefaultItem(hMenu, SC_CLOSE, FALSE); } else { hMenu = 0; ERR("Unable to load default system menu\n" ); } TRACE("returning %x.\n", hMenu ); return hMenu; } /*********************************************************************** * MENU_GetTopPopupWnd() * * Return the locked pointer pTopPopupWnd. */ static WND *MENU_GetTopPopupWnd() { return WIN_LockWndPtr(pTopPopupWnd); } /*********************************************************************** * MENU_ReleaseTopPopupWnd() * * Realease the locked pointer pTopPopupWnd. */ static void MENU_ReleaseTopPopupWnd() { WIN_ReleaseWndPtr(pTopPopupWnd); } /*********************************************************************** * MENU_DestroyTopPopupWnd() * * Destroy the locked pointer pTopPopupWnd. */ static void MENU_DestroyTopPopupWnd() { WND *tmpWnd = pTopPopupWnd; pTopPopupWnd = NULL; WIN_ReleaseWndPtr(tmpWnd); } /********************************************************************** * MENU_GetSysMenu * * Create a copy of the system menu. System menu in Windows is * a special menu-bar with the single entry - system menu popup. * This popup is presented to the outside world as a "system menu". * However, the real system menu handle is sometimes seen in the * WM_MENUSELECT paramemters (and Word 6 likes it this way). */ HMENU MENU_GetSysMenu( HWND hWnd, HMENU hPopupMenu ) { HMENU hMenu; if ((hMenu = CreateMenu())) { POPUPMENU *menu = (POPUPMENU*) USER_HEAP_LIN_ADDR(hMenu); menu->wFlags = MF_SYSMENU; menu->hWnd = hWnd; if (hPopupMenu == (HMENU)(-1)) hPopupMenu = MENU_CopySysPopup(); else if( !hPopupMenu ) hPopupMenu = MENU_DefSysPopup; if (hPopupMenu) { InsertMenuA( hMenu, -1, MF_SYSMENU | MF_POPUP | MF_BYPOSITION, hPopupMenu, NULL ); menu->items[0].fType = MF_SYSMENU | MF_POPUP; menu->items[0].fState = 0; menu = (POPUPMENU*) USER_HEAP_LIN_ADDR(hPopupMenu); menu->wFlags |= MF_SYSMENU; TRACE("GetSysMenu hMenu=%04x (%04x)\n", hMenu, hPopupMenu ); return hMenu; } DestroyMenu( hMenu ); } ERR("failed to load system menu!\n"); return 0; } /*********************************************************************** * MENU_Init * * Menus initialisation. */ BOOL MENU_Init() { HBITMAP hBitmap; NONCLIENTMETRICSA ncm; static unsigned char shade_bits[16] = { 0x55, 0, 0xAA, 0, 0x55, 0, 0xAA, 0, 0x55, 0, 0xAA, 0, 0x55, 0, 0xAA, 0 }; /* Load menu bitmaps */ hStdCheck = LoadBitmapA(0, MAKEINTRESOURCEA(OBM_CHECK)); hStdRadioCheck = LoadBitmapA(0, MAKEINTRESOURCEA(OBM_RADIOCHECK)); hStdMnArrow = LoadBitmapA(0, MAKEINTRESOURCEA(OBM_MNARROW)); /* Load system buttons bitmaps */ hBmpMinimize = LoadBitmapA(0,MAKEINTRESOURCEA(OBM_REDUCE)); hBmpMinimizeD = LoadBitmapA(0,MAKEINTRESOURCEA(OBM_REDUCED)); hBmpMaximize = LoadBitmapA(0,MAKEINTRESOURCEA(OBM_RESTORE)); hBmpMaximizeD = LoadBitmapA(0,MAKEINTRESOURCEA(OBM_RESTORED)); hBmpClose = LoadBitmapA(0,MAKEINTRESOURCEA(OBM_CLOSE)); hBmpCloseD = LoadBitmapA(0,MAKEINTRESOURCEA(OBM_CLOSED)); if (hStdCheck) { BITMAP bm; GetObjectA( hStdCheck, sizeof(bm), &bm ); check_bitmap_width = bm.bmWidth; check_bitmap_height = bm.bmHeight; } else return FALSE; /* Assume that radio checks have the same size as regular check. */ if (!hStdRadioCheck) return FALSE; if (hStdMnArrow) { BITMAP bm; GetObjectA( hStdMnArrow, sizeof(bm), &bm ); arrow_bitmap_width = bm.bmWidth; arrow_bitmap_height = bm.bmHeight; } else return FALSE; if (! (hBitmap = CreateBitmap( 8, 8, 1, 1, shade_bits))) return FALSE; if(!(hShadeBrush = CreatePatternBrush( hBitmap ))) return FALSE; DeleteObject( hBitmap ); if (!(MENU_DefSysPopup = MENU_CopySysPopup())) return FALSE; ncm.cbSize = sizeof (NONCLIENTMETRICSA); if (!(SystemParametersInfoA(SPI_GETNONCLIENTMETRICS, sizeof(NONCLIENTMETRICSA), &ncm, 0))) return FALSE; if (!(hMenuFont = CreateFontIndirectA( &ncm.lfMenuFont ))) return FALSE; ncm.lfMenuFont.lfWeight += 300; if ( ncm.lfMenuFont.lfWeight > 1000) ncm.lfMenuFont.lfWeight = 1000; if (!(hMenuFontBold = CreateFontIndirectA( &ncm.lfMenuFont ))) return FALSE; return TRUE; } /*********************************************************************** * MENU_InitSysMenuPopup * * Grey the appropriate items in System menu. */ static void MENU_InitSysMenuPopup( HMENU hmenu, DWORD style, DWORD clsStyle ) { BOOL gray; gray = !(style & WS_THICKFRAME) || (style & (WS_MAXIMIZE | WS_MINIMIZE)); EnableMenuItem( hmenu, SC_SIZE, (gray ? MF_GRAYED : MF_ENABLED) ); gray = ((style & WS_MAXIMIZE) != 0); EnableMenuItem( hmenu, SC_MOVE, (gray ? MF_GRAYED : MF_ENABLED) ); gray = !(style & WS_MINIMIZEBOX) || (style & WS_MINIMIZE); EnableMenuItem( hmenu, SC_MINIMIZE, (gray ? MF_GRAYED : MF_ENABLED) ); gray = !(style & WS_MAXIMIZEBOX) || (style & WS_MAXIMIZE); EnableMenuItem( hmenu, SC_MAXIMIZE, (gray ? MF_GRAYED : MF_ENABLED) ); gray = !(style & (WS_MAXIMIZE | WS_MINIMIZE)); EnableMenuItem( hmenu, SC_RESTORE, (gray ? MF_GRAYED : MF_ENABLED) ); gray = (clsStyle & CS_NOCLOSE) != 0; /* The menu item must keep its state if it's disabled */ if(gray) EnableMenuItem( hmenu, SC_CLOSE, MF_GRAYED); } /****************************************************************************** * * UINT MENU_GetStartOfNextColumn( * HMENU hMenu ) * *****************************************************************************/ static UINT MENU_GetStartOfNextColumn( HMENU hMenu ) { POPUPMENU *menu = (POPUPMENU *)USER_HEAP_LIN_ADDR(hMenu); UINT i = menu->FocusedItem + 1; if(!menu) return NO_SELECTED_ITEM; if( i == NO_SELECTED_ITEM ) return i; for( ; i < menu->nItems; ++i ) { if (menu->items[i].fType & MF_MENUBARBREAK) return i; } return NO_SELECTED_ITEM; } /****************************************************************************** * * UINT MENU_GetStartOfPrevColumn( * HMENU hMenu ) * *****************************************************************************/ static UINT MENU_GetStartOfPrevColumn( HMENU hMenu ) { POPUPMENU const *menu = (POPUPMENU *)USER_HEAP_LIN_ADDR(hMenu); UINT i; if( !menu ) return NO_SELECTED_ITEM; if( menu->FocusedItem == 0 || menu->FocusedItem == NO_SELECTED_ITEM ) return NO_SELECTED_ITEM; /* Find the start of the column */ for(i = menu->FocusedItem; i != 0 && !(menu->items[i].fType & MF_MENUBARBREAK); --i); /* empty */ if(i == 0) return NO_SELECTED_ITEM; for(--i; i != 0; --i) { if (menu->items[i].fType & MF_MENUBARBREAK) break; } TRACE("ret %d.\n", i ); return i; } /*********************************************************************** * MENU_FindItem * * Find a menu item. Return a pointer on the item, and modifies *hmenu * in case the item was in a sub-menu. */ static MENUITEM *MENU_FindItem( HMENU *hmenu, UINT *nPos, UINT wFlags ) { POPUPMENU *menu; UINT i; if (((*hmenu)==0xffff) || (!(menu = MENU_GetMenu(*hmenu)))) return NULL; if (wFlags & MF_BYPOSITION) { if (*nPos >= menu->nItems) return NULL; return &menu->items[*nPos]; } else { MENUITEM *item = menu->items; for (i = 0; i < menu->nItems; i++, item++) { if (item->wID == *nPos) { *nPos = i; return item; } else if (item->fType & MF_POPUP) { HMENU hsubmenu = item->hSubMenu; MENUITEM *subitem = MENU_FindItem( &hsubmenu, nPos, wFlags ); if (subitem) { *hmenu = hsubmenu; return subitem; } } } } return NULL; } /*********************************************************************** * MENU_FindSubMenu * * Find a Sub menu. Return the position of the submenu, and modifies * *hmenu in case it is found in another sub-menu. * If the submenu cannot be found, NO_SELECTED_ITEM is returned. */ UINT MENU_FindSubMenu( HMENU *hmenu, HMENU hSubTarget ) { POPUPMENU *menu; UINT i; MENUITEM *item; if (((*hmenu)==0xffff) || (!(menu = MENU_GetMenu(*hmenu)))) return NO_SELECTED_ITEM; item = menu->items; for (i = 0; i < menu->nItems; i++, item++) { if(!(item->fType & MF_POPUP)) continue; if (item->hSubMenu == hSubTarget) { return i; } else { HMENU hsubmenu = item->hSubMenu; UINT pos = MENU_FindSubMenu( &hsubmenu, hSubTarget ); if (pos != NO_SELECTED_ITEM) { *hmenu = hsubmenu; return pos; } } } return NO_SELECTED_ITEM; } /*********************************************************************** * MENU_FreeItemData */ static void MENU_FreeItemData( MENUITEM* item ) { /* delete text */ if (IS_STRING_ITEM(item->fType) && item->text) HeapFree( SystemHeap, 0, item->text ); } /*********************************************************************** * MENU_FindItemByCoords * * Find the item at the specified coordinates (screen coords). Does * not work for child windows and therefore should not be called for * an arbitrary system menu. */ static MENUITEM *MENU_FindItemByCoords( POPUPMENU *menu, POINT pt, UINT *pos ) { MENUITEM *item; UINT i; RECT wrect; if (!GetWindowRect(menu->hWnd,&wrect)) return NULL; pt.x -= wrect.left;pt.y -= wrect.top; item = menu->items; for (i = 0; i < menu->nItems; i++, item++) { if ((pt.x >= item->rect.left) && (pt.x < item->rect.right) && (pt.y >= item->rect.top) && (pt.y < item->rect.bottom)) { if (pos) *pos = i; return item; } } return NULL; } /*********************************************************************** * MENU_FindItemByKey * * Find the menu item selected by a key press. * Return item id, -1 if none, -2 if we should close the menu. */ static UINT MENU_FindItemByKey( HWND hwndOwner, HMENU hmenu, UINT key, BOOL forceMenuChar ) { TRACE("\tlooking for '%c' in [%04x]\n", (char)key, (UINT16)hmenu ); if (!IsMenu( hmenu )) { WND* w = WIN_FindWndPtr(hwndOwner); hmenu = GetSubMenu(w->hSysMenu, 0); WIN_ReleaseWndPtr(w); } if (hmenu) { POPUPMENU *menu = MENU_GetMenu( hmenu ); MENUITEM *item = menu->items; LONG menuchar; if( !forceMenuChar ) { UINT i; key = toupper(key); for (i = 0; i < menu->nItems; i++, item++) { if (item->text && (IS_STRING_ITEM(item->fType))) { char *p = item->text - 2; do { p = strchr (p + 2, '&'); } while (p != NULL && p [1] == '&'); if (p && (toupper(p[1]) == key)) return i; } } } menuchar = SendMessageA( hwndOwner, WM_MENUCHAR, MAKEWPARAM( key, menu->wFlags ), hmenu ); if (HIWORD(menuchar) == 2) return LOWORD(menuchar); if (HIWORD(menuchar) == 1) return (UINT)(-2); } return (UINT)(-1); } /*********************************************************************** * MENU_LoadMagicItem * * Load the bitmap associated with the magic menu item and its style */ static HBITMAP MENU_LoadMagicItem(UINT id, BOOL hilite, DWORD dwItemData) { /* * Magic menu item id's section * These magic id's are used by windows to insert "standard" mdi * buttons (minimize,restore,close) on menu. Under windows, * these magic id's make sure the right things appear when those * bitmap buttons are pressed/selected/released. */ switch(id & 0xffff) { case HBMMENU_SYSTEM: return (dwItemData) ? (HBITMAP)dwItemData : (hilite ? hBmpMinimizeD : hBmpMinimize); case HBMMENU_MBAR_RESTORE: return (hilite ? hBmpMaximizeD: hBmpMaximize); case HBMMENU_MBAR_MINIMIZE: return (hilite ? hBmpMinimizeD : hBmpMinimize); case HBMMENU_MBAR_CLOSE: return (hilite ? hBmpCloseD : hBmpClose); case HBMMENU_CALLBACK: case HBMMENU_MBAR_CLOSE_D: case HBMMENU_MBAR_MINIMIZE_D: case HBMMENU_POPUP_CLOSE: case HBMMENU_POPUP_RESTORE: case HBMMENU_POPUP_MAXIMIZE: case HBMMENU_POPUP_MINIMIZE: default: FIXME("Magic 0x%08x not implemented\n", id); return 0; } } /*********************************************************************** * MENU_CalcItemSize * * Calculate the size of the menu item and store it in lpitem->rect. */ static void MENU_CalcItemSize( HDC hdc, MENUITEM *lpitem, HWND hwndOwner, INT orgX, INT orgY, BOOL menuBar ) { char *p; TRACE("dc=0x%04x owner=0x%04x (%d,%d)\n", hdc, hwndOwner, orgX, orgY); debug_print_menuitem("MENU_CalcItemSize: menuitem:", lpitem, (menuBar ? " (MenuBar)" : "")); SetRect( &lpitem->rect, orgX, orgY, orgX, orgY ); if (lpitem->fType & MF_OWNERDRAW) { /* ** Experimentation under Windows reveals that an owner-drawn ** menu is expected to return the size of the content part of ** the menu item, not including the checkmark nor the submenu ** arrow. Windows adds those values itself and returns the ** enlarged rectangle on subsequent WM_DRAWITEM messages. */ MEASUREITEMSTRUCT mis; mis.CtlType = ODT_MENU; mis.CtlID = 0; mis.itemID = lpitem->wID; mis.itemData = (DWORD)lpitem->dwItemData; mis.itemHeight = 0; mis.itemWidth = 0; SendMessageA( hwndOwner, WM_MEASUREITEM, 0, (LPARAM)&mis ); lpitem->rect.right += mis.itemWidth; if (menuBar) { lpitem->rect.right += MENU_BAR_ITEMS_SPACE; /* under at least win95 you seem to be given a standard height for the menu and the height value is ignored */ if (TWEAK_WineLook == WIN31_LOOK) lpitem->rect.bottom += GetSystemMetrics(SM_CYMENU); else lpitem->rect.bottom += GetSystemMetrics(SM_CYMENU)-1; } else lpitem->rect.bottom += mis.itemHeight; TRACE("id=%04x size=%dx%d\n", lpitem->wID, mis.itemWidth, mis.itemHeight); /* Fall through to get check/arrow width calculation. */ } if (lpitem->fType & MF_SEPARATOR) { lpitem->rect.bottom += SEPARATOR_HEIGHT; return; } if (!menuBar) { lpitem->rect.right += 2 * check_bitmap_width; if (lpitem->fType & MF_POPUP) lpitem->rect.right += arrow_bitmap_width; } if (lpitem->fType & MF_OWNERDRAW) return; if (IS_BITMAP_ITEM(lpitem->fType)) { BITMAP bm; HBITMAP resBmp = 0; /* Check if there is a magic menu item associated with this item */ if((LOWORD((int)lpitem->text))<12) { resBmp = MENU_LoadMagicItem((int)lpitem->text, (lpitem->fType & MF_HILITE), lpitem->dwItemData); } else resBmp = (HBITMAP)lpitem->text; if (GetObjectA(resBmp, sizeof(bm), &bm )) { lpitem->rect.right += bm.bmWidth; lpitem->rect.bottom += bm.bmHeight; } } /* If we get here, then it must be a text item */ if (IS_STRING_ITEM( lpitem->fType )) { SIZE size; GetTextExtentPoint32A(hdc, lpitem->text, strlen(lpitem->text), &size); lpitem->rect.right += size.cx; if (TWEAK_WineLook == WIN31_LOOK) lpitem->rect.bottom += max( size.cy, GetSystemMetrics(SM_CYMENU) ); else lpitem->rect.bottom += max(size.cy, GetSystemMetrics(SM_CYMENU)-1); lpitem->xTab = 0; if (menuBar) { lpitem->rect.right += MENU_BAR_ITEMS_SPACE; } else if ((p = strchr( lpitem->text, '\t' )) != NULL) { /* Item contains a tab (only meaningful in popup menus) */ GetTextExtentPoint32A(hdc, lpitem->text, (int)(p - lpitem->text) , &size); lpitem->xTab = check_bitmap_width + MENU_TAB_SPACE + size.cx; lpitem->rect.right += MENU_TAB_SPACE; } else { if (strchr( lpitem->text, '\b' )) lpitem->rect.right += MENU_TAB_SPACE; lpitem->xTab = lpitem->rect.right - check_bitmap_width - arrow_bitmap_width; } } TRACE("(%d,%d)-(%d,%d)\n", lpitem->rect.left, lpitem->rect.top, lpitem->rect.right, lpitem->rect.bottom); } /*********************************************************************** * MENU_PopupMenuCalcSize * * Calculate the size of a popup menu. */ static void MENU_PopupMenuCalcSize( LPPOPUPMENU lppop, HWND hwndOwner ) { MENUITEM *lpitem; HDC hdc; int start, i; int orgX, orgY, maxX, maxTab, maxTabWidth; lppop->Width = lppop->Height = 0; if (lppop->nItems == 0) return; hdc = GetDC( 0 ); SelectObject( hdc, hMenuFont); start = 0; maxX = (TWEAK_WineLook == WIN31_LOOK) ? GetSystemMetrics(SM_CXBORDER) : 2 ; while (start < lppop->nItems) { lpitem = &lppop->items[start]; orgX = maxX; orgY = (TWEAK_WineLook == WIN31_LOOK) ? GetSystemMetrics(SM_CYBORDER) : 2; maxTab = maxTabWidth = 0; /* Parse items until column break or end of menu */ for (i = start; i < lppop->nItems; i++, lpitem++) { if ((i != start) && (lpitem->fType & (MF_MENUBREAK | MF_MENUBARBREAK))) break; MENU_CalcItemSize( hdc, lpitem, hwndOwner, orgX, orgY, FALSE ); if (lpitem->fType & MF_MENUBARBREAK) orgX++; maxX = max( maxX, lpitem->rect.right ); orgY = lpitem->rect.bottom; if (IS_STRING_ITEM(lpitem->fType) && lpitem->xTab) { maxTab = max( maxTab, lpitem->xTab ); maxTabWidth = max(maxTabWidth,lpitem->rect.right-lpitem->xTab); } } /* Finish the column (set all items to the largest width found) */ maxX = max( maxX, maxTab + maxTabWidth ); for (lpitem = &lppop->items[start]; start < i; start++, lpitem++) { lpitem->rect.right = maxX; if (IS_STRING_ITEM(lpitem->fType) && lpitem->xTab) lpitem->xTab = maxTab; } lppop->Height = max( lppop->Height, orgY ); } lppop->Width = maxX; /* space for 3d border */ if(TWEAK_WineLook > WIN31_LOOK) { lppop->Height += 2; lppop->Width += 2; } ReleaseDC( 0, hdc ); } /*********************************************************************** * MENU_MenuBarCalcSize * * FIXME: Word 6 implements its own MDI and its own 'close window' bitmap * height is off by 1 pixel which causes lengthy window relocations when * active document window is maximized/restored. * * Calculate the size of the menu bar. */ static void MENU_MenuBarCalcSize( HDC hdc, LPRECT lprect, LPPOPUPMENU lppop, HWND hwndOwner ) { MENUITEM *lpitem; int start, i, orgX, orgY, maxY, helpPos; if ((lprect == NULL) || (lppop == NULL)) return; if (lppop->nItems == 0) return; TRACE("left=%d top=%d right=%d bottom=%d\n", lprect->left, lprect->top, lprect->right, lprect->bottom); lppop->Width = lprect->right - lprect->left; lppop->Height = 0; maxY = lprect->top; start = 0; helpPos = -1; while (start < lppop->nItems) { lpitem = &lppop->items[start]; orgX = lprect->left; orgY = maxY; /* Parse items until line break or end of menu */ for (i = start; i < lppop->nItems; i++, lpitem++) { if ((helpPos == -1) && (lpitem->fType & MF_HELP)) helpPos = i; if ((i != start) && (lpitem->fType & (MF_MENUBREAK | MF_MENUBARBREAK))) break; TRACE("calling MENU_CalcItemSize org=(%d, %d)\n", orgX, orgY ); debug_print_menuitem (" item: ", lpitem, ""); MENU_CalcItemSize( hdc, lpitem, hwndOwner, orgX, orgY, TRUE ); if (lpitem->rect.right > lprect->right) { if (i != start) break; else lpitem->rect.right = lprect->right; } maxY = max( maxY, lpitem->rect.bottom ); orgX = lpitem->rect.right; } /* Finish the line (set all items to the largest height found) */ while (start < i) lppop->items[start++].rect.bottom = maxY; } lprect->bottom = maxY; lppop->Height = lprect->bottom - lprect->top; /* Flush right all magic items and items between the MF_HELP and */ /* the last item (if several lines, only move the last line) */ lpitem = &lppop->items[lppop->nItems-1]; orgY = lpitem->rect.top; orgX = lprect->right; for (i = lppop->nItems - 1; i >= helpPos; i--, lpitem--) { if ( !IS_BITMAP_ITEM(lpitem->fType) && ((helpPos ==-1) ? TRUE : (helpPos>i) )) break; /* done */ if (lpitem->rect.top != orgY) break; /* Other line */ if (lpitem->rect.right >= orgX) break; /* Too far right already */ lpitem->rect.left += orgX - lpitem->rect.right; lpitem->rect.right = orgX; orgX = lpitem->rect.left; } } /*********************************************************************** * MENU_DrawMenuItem * * Draw a single menu item. */ static void MENU_DrawMenuItem( HWND hwnd, HMENU hmenu, HWND hwndOwner, HDC hdc, MENUITEM *lpitem, UINT height, BOOL menuBar, UINT odaction ) { RECT rect; debug_print_menuitem("MENU_DrawMenuItem: ", lpitem, ""); if (lpitem->fType & MF_SYSMENU) { if( !IsIconic(hwnd) ) { if (TWEAK_WineLook > WIN31_LOOK) NC_DrawSysButton95( hwnd, hdc, lpitem->fState & (MF_HILITE | MF_MOUSESELECT) ); else NC_DrawSysButton( hwnd, hdc, lpitem->fState & (MF_HILITE | MF_MOUSESELECT) ); } return; } if (lpitem->fType & MF_OWNERDRAW) { /* ** Experimentation under Windows reveals that an owner-drawn ** menu is given the rectangle which includes the space it requested ** in its response to WM_MEASUREITEM _plus_ width for a checkmark ** and a popup-menu arrow. This is the value of lpitem->rect. ** Windows will leave all drawing to the application except for ** the popup-menu arrow. Windows always draws that itself, after ** the menu owner has finished drawing. */ DRAWITEMSTRUCT dis; dis.CtlType = ODT_MENU; dis.CtlID = 0; dis.itemID = lpitem->wID; dis.itemData = (DWORD)lpitem->dwItemData; dis.itemState = 0; if (lpitem->fState & MF_CHECKED) dis.itemState |= ODS_CHECKED; if (lpitem->fState & MF_GRAYED) dis.itemState |= ODS_GRAYED; if (lpitem->fState & MF_HILITE) dis.itemState |= ODS_SELECTED; dis.itemAction = odaction; /* ODA_DRAWENTIRE | ODA_SELECT | ODA_FOCUS; */ dis.hwndItem = hmenu; dis.hDC = hdc; dis.rcItem = lpitem->rect; TRACE("Ownerdraw: owner=%04x itemID=%d, itemState=%d, itemAction=%d, " "hwndItem=%04x, hdc=%04x, rcItem={%d,%d,%d,%d}\n", hwndOwner, dis.itemID, dis.itemState, dis.itemAction, dis.hwndItem, dis.hDC, dis.rcItem.left, dis.rcItem.top, dis.rcItem.right, dis.rcItem.bottom); SendMessageA( hwndOwner, WM_DRAWITEM, 0, (LPARAM)&dis ); /* Fall through to draw popup-menu arrow */ } TRACE("rect={%d,%d,%d,%d}\n", lpitem->rect.left, lpitem->rect.top, lpitem->rect.right,lpitem->rect.bottom); if (menuBar && (lpitem->fType & MF_SEPARATOR)) return; rect = lpitem->rect; if (!(lpitem->fType & MF_OWNERDRAW)) { if ((lpitem->fState & MF_HILITE) && !(IS_BITMAP_ITEM(lpitem->fType))) if ((menuBar) && (TWEAK_WineLook==WIN98_LOOK)) DrawEdge(hdc, &rect, BDR_SUNKENOUTER, BF_RECT); else FillRect( hdc, &rect, GetSysColorBrush(COLOR_HIGHLIGHT) ); else FillRect( hdc, &rect, GetSysColorBrush(COLOR_MENU) ); } SetBkMode( hdc, TRANSPARENT ); if (!(lpitem->fType & MF_OWNERDRAW)) { /* vertical separator */ if (!menuBar && (lpitem->fType & MF_MENUBARBREAK)) { if (TWEAK_WineLook > WIN31_LOOK) { RECT rc = rect; rc.top = 3; rc.bottom = height - 3; DrawEdge (hdc, &rc, EDGE_ETCHED, BF_LEFT); } else { SelectObject( hdc, GetSysColorPen(COLOR_WINDOWFRAME) ); MoveTo16( hdc, rect.left, 0 ); LineTo( hdc, rect.left, height ); } } /* horizontal separator */ if (lpitem->fType & MF_SEPARATOR) { if (TWEAK_WineLook > WIN31_LOOK) { RECT rc = rect; rc.left++; rc.right--; rc.top += SEPARATOR_HEIGHT / 2; DrawEdge (hdc, &rc, EDGE_ETCHED, BF_TOP); } else { SelectObject( hdc, GetSysColorPen(COLOR_WINDOWFRAME) ); MoveTo16( hdc, rect.left, rect.top + SEPARATOR_HEIGHT/2 ); LineTo( hdc, rect.right, rect.top + SEPARATOR_HEIGHT/2 ); } return; } } /* Setup colors */ if ((lpitem->fState & MF_HILITE) && !(IS_BITMAP_ITEM(lpitem->fType)) ) { if (lpitem->fState & MF_GRAYED) SetTextColor( hdc, GetSysColor( COLOR_GRAYTEXT ) ); else SetTextColor( hdc, GetSysColor( COLOR_HIGHLIGHTTEXT ) ); SetBkColor( hdc, GetSysColor( COLOR_HIGHLIGHT ) ); } else { if (lpitem->fState & MF_GRAYED) SetTextColor( hdc, GetSysColor( COLOR_GRAYTEXT ) ); else SetTextColor( hdc, GetSysColor( COLOR_MENUTEXT ) ); SetBkColor( hdc, GetSysColor( COLOR_MENU ) ); } /* helper lines for debugging */ /* FrameRect(hdc, &rect, GetStockObject(BLACK_BRUSH)); SelectObject( hdc, GetSysColorPen(COLOR_WINDOWFRAME) ); MoveTo16( hdc, rect.left, (rect.top + rect.bottom)/2 ); LineTo( hdc, rect.right, (rect.top + rect.bottom)/2 ); */ if (!menuBar) { INT y = rect.top + rect.bottom; if (!(lpitem->fType & MF_OWNERDRAW)) { /* Draw the check mark * * FIXME: * Custom checkmark bitmaps are monochrome but not always 1bpp. */ if (lpitem->fState & MF_CHECKED) { HBITMAP bm = lpitem->hCheckBit ? lpitem->hCheckBit : ((lpitem->fType & MFT_RADIOCHECK) ? hStdRadioCheck : hStdCheck); HDC hdcMem = CreateCompatibleDC( hdc ); SelectObject( hdcMem, bm ); BitBlt( hdc, rect.left, (y - check_bitmap_height) / 2, check_bitmap_width, check_bitmap_height, hdcMem, 0, 0, SRCCOPY ); DeleteDC( hdcMem ); } else if (lpitem->hUnCheckBit) { HDC hdcMem = CreateCompatibleDC( hdc ); SelectObject( hdcMem, lpitem->hUnCheckBit ); BitBlt( hdc, rect.left, (y - check_bitmap_height) / 2, check_bitmap_width, check_bitmap_height, hdcMem, 0, 0, SRCCOPY ); DeleteDC( hdcMem ); } } /* Draw the popup-menu arrow */ if (lpitem->fType & MF_POPUP) { HDC hdcMem = CreateCompatibleDC( hdc ); HBITMAP hOrigBitmap; hOrigBitmap = SelectObject( hdcMem, hStdMnArrow ); BitBlt( hdc, rect.right - arrow_bitmap_width - 1, (y - arrow_bitmap_height) / 2, arrow_bitmap_width, arrow_bitmap_height, hdcMem, 0, 0, SRCCOPY ); SelectObject( hdcMem, hOrigBitmap ); DeleteDC( hdcMem ); } rect.left += check_bitmap_width; rect.right -= arrow_bitmap_width; } /* Done for owner-drawn */ if (lpitem->fType & MF_OWNERDRAW) return; /* Draw the item text or bitmap */ if (IS_BITMAP_ITEM(lpitem->fType)) { int top; HBITMAP resBmp = 0; HDC hdcMem = CreateCompatibleDC( hdc ); /* * Check if there is a magic menu item associated with this item * and load the appropriate bitmap */ if((LOWORD((int)lpitem->text)) < 12) { resBmp = MENU_LoadMagicItem((int)lpitem->text, (lpitem->fState & MF_HILITE), lpitem->dwItemData); } else resBmp = (HBITMAP)lpitem->text; if (resBmp) { BITMAP bm; GetObjectA( resBmp, sizeof(bm), &bm ); SelectObject(hdcMem,resBmp ); /* handle fontsize > bitmap_height */ top = ((rect.bottom-rect.top)>bm.bmHeight) ? rect.top+(rect.bottom-rect.top-bm.bmHeight)/2 : rect.top; BitBlt( hdc, rect.left, top, rect.right - rect.left, rect.bottom - rect.top, hdcMem, 0, 0, SRCCOPY ); } DeleteDC( hdcMem ); return; } /* No bitmap - process text if present */ else if (IS_STRING_ITEM(lpitem->fType)) { register int i; HFONT hfontOld = 0; UINT uFormat = (menuBar) ? DT_CENTER | DT_VCENTER | DT_SINGLELINE : DT_LEFT | DT_VCENTER | DT_SINGLELINE; if ( lpitem->fState & MFS_DEFAULT ) { hfontOld = SelectObject( hdc, hMenuFontBold); } if (menuBar) { rect.left += MENU_BAR_ITEMS_SPACE / 2; rect.right -= MENU_BAR_ITEMS_SPACE / 2; i = strlen( lpitem->text ); } else { for (i = 0; lpitem->text[i]; i++) if ((lpitem->text[i] == '\t') || (lpitem->text[i] == '\b')) break; } if( !(TWEAK_WineLook == WIN31_LOOK) && (lpitem->fState & MF_GRAYED)) { if (!(lpitem->fState & MF_HILITE) ) { ++rect.left; ++rect.top; ++rect.right; ++rect.bottom; SetTextColor(hdc, RGB(0xff, 0xff, 0xff)); DrawTextA( hdc, lpitem->text, i, &rect, uFormat ); --rect.left; --rect.top; --rect.right; --rect.bottom; } SetTextColor(hdc, RGB(0x80, 0x80, 0x80)); } DrawTextA( hdc, lpitem->text, i, &rect, uFormat); /* paint the shortcut text */ if (lpitem->text[i]) /* There's a tab or flush-right char */ { if (lpitem->text[i] == '\t') { rect.left = lpitem->xTab; uFormat = DT_LEFT | DT_VCENTER | DT_SINGLELINE; } else { uFormat = DT_RIGHT | DT_VCENTER | DT_SINGLELINE; } if( !(TWEAK_WineLook == WIN31_LOOK) && (lpitem->fState & MF_GRAYED)) { if (!(lpitem->fState & MF_HILITE) ) { ++rect.left; ++rect.top; ++rect.right; ++rect.bottom; SetTextColor(hdc, RGB(0xff, 0xff, 0xff)); DrawTextA( hdc, lpitem->text + i + 1, -1, &rect, uFormat ); --rect.left; --rect.top; --rect.right; --rect.bottom; } SetTextColor(hdc, RGB(0x80, 0x80, 0x80)); } DrawTextA( hdc, lpitem->text + i + 1, -1, &rect, uFormat ); } if (hfontOld) SelectObject (hdc, hfontOld); } } /*********************************************************************** * MENU_DrawPopupMenu * * Paint a popup menu. */ static void MENU_DrawPopupMenu( HWND hwnd, HDC hdc, HMENU hmenu ) { HBRUSH hPrevBrush = 0; RECT rect; TRACE("wnd=0x%04x dc=0x%04x menu=0x%04x\n", hwnd, hdc, hmenu); GetClientRect( hwnd, &rect ); if(TWEAK_WineLook == WIN31_LOOK) { rect.bottom -= POPUP_YSHADE * GetSystemMetrics(SM_CYBORDER); rect.right -= POPUP_XSHADE * GetSystemMetrics(SM_CXBORDER); } if((hPrevBrush = SelectObject( hdc, GetSysColorBrush(COLOR_MENU) )) && (SelectObject( hdc, hMenuFont))) { HPEN hPrevPen; Rectangle( hdc, rect.left, rect.top, rect.right, rect.bottom ); hPrevPen = SelectObject( hdc, GetStockObject( NULL_PEN ) ); if( hPrevPen ) { INT ropPrev, i; POPUPMENU *menu; /* draw 3-d shade */ if(TWEAK_WineLook == WIN31_LOOK) { SelectObject( hdc, hShadeBrush ); SetBkMode( hdc, TRANSPARENT ); ropPrev = SetROP2( hdc, R2_MASKPEN ); i = rect.right; /* why SetBrushOrg() doesn't? */ PatBlt( hdc, i & 0xfffffffe, rect.top + POPUP_YSHADE*GetSystemMetrics(SM_CYBORDER), i%2 + POPUP_XSHADE*GetSystemMetrics(SM_CXBORDER), rect.bottom - rect.top, 0x00a000c9 ); i = rect.bottom; PatBlt( hdc, rect.left + POPUP_XSHADE*GetSystemMetrics(SM_CXBORDER), i & 0xfffffffe,rect.right - rect.left, i%2 + POPUP_YSHADE*GetSystemMetrics(SM_CYBORDER), 0x00a000c9 ); SelectObject( hdc, hPrevPen ); SelectObject( hdc, hPrevBrush ); SetROP2( hdc, ropPrev ); } else DrawEdge (hdc, &rect, EDGE_RAISED, BF_RECT); /* draw menu items */ menu = MENU_GetMenu( hmenu ); if (menu && menu->nItems) { MENUITEM *item; UINT u; for (u = menu->nItems, item = menu->items; u > 0; u--, item++) MENU_DrawMenuItem( hwnd, hmenu, menu->hwndOwner, hdc, item, menu->Height, FALSE, ODA_DRAWENTIRE ); } } else { SelectObject( hdc, hPrevBrush ); } } } /*********************************************************************** * MENU_DrawMenuBar * * Paint a menu bar. Returns the height of the menu bar. * called from [windows/nonclient.c] */ UINT MENU_DrawMenuBar( HDC hDC, LPRECT lprect, HWND hwnd, BOOL suppress_draw) { LPPOPUPMENU lppop; UINT i,retvalue; HFONT hfontOld = 0; WND *wndPtr = WIN_FindWndPtr( hwnd ); lppop = MENU_GetMenu ((HMENU)wndPtr->wIDmenu ); if (lppop == NULL || lprect == NULL) { retvalue = GetSystemMetrics(SM_CYMENU); goto END; } TRACE("(%04x, %p, %p)\n", hDC, lprect, lppop); hfontOld = SelectObject( hDC, hMenuFont); if (lppop->Height == 0) MENU_MenuBarCalcSize(hDC, lprect, lppop, hwnd); lprect->bottom = lprect->top + lppop->Height; if (suppress_draw) { retvalue = lppop->Height; goto END; } FillRect(hDC, lprect, GetSysColorBrush(COLOR_MENU) ); if (TWEAK_WineLook == WIN31_LOOK) { SelectObject( hDC, GetSysColorPen(COLOR_WINDOWFRAME) ); MoveTo16( hDC, lprect->left, lprect->bottom ); LineTo( hDC, lprect->right, lprect->bottom ); } else { SelectObject( hDC, GetSysColorPen(COLOR_3DFACE)); MoveTo16( hDC, lprect->left, lprect->bottom ); LineTo( hDC, lprect->right, lprect->bottom ); } if (lppop->nItems == 0) { retvalue = GetSystemMetrics(SM_CYMENU); goto END; } for (i = 0; i < lppop->nItems; i++) { MENU_DrawMenuItem( hwnd, (HMENU)wndPtr->wIDmenu, hwnd, hDC, &lppop->items[i], lppop->Height, TRUE, ODA_DRAWENTIRE ); } retvalue = lppop->Height; END: if (hfontOld) SelectObject (hDC, hfontOld); WIN_ReleaseWndPtr(wndPtr); return retvalue; } /*********************************************************************** * MENU_PatchResidentPopup */ BOOL MENU_PatchResidentPopup( HQUEUE16 checkQueue, WND* checkWnd ) { WND *pTPWnd = MENU_GetTopPopupWnd(); if( pTPWnd ) { HTASK16 hTask = 0; TRACE("patching resident popup: %04x %04x [%04x %04x]\n", checkQueue, checkWnd ? checkWnd->hwndSelf : 0, pTPWnd->hmemTaskQ, pTPWnd->owner ? pTPWnd->owner->hwndSelf : 0); switch( checkQueue ) { case 0: /* checkWnd is the new popup owner */ if( checkWnd ) { pTPWnd->owner = checkWnd; if( pTPWnd->hmemTaskQ != checkWnd->hmemTaskQ ) hTask = QUEUE_GetQueueTask( checkWnd->hmemTaskQ ); } break; case 0xFFFF: /* checkWnd is destroyed */ if( pTPWnd->owner == checkWnd ) pTPWnd->owner = NULL; MENU_ReleaseTopPopupWnd(); return TRUE; default: /* checkQueue is exiting */ if( pTPWnd->hmemTaskQ == checkQueue ) { hTask = QUEUE_GetQueueTask( pTPWnd->hmemTaskQ ); hTask = TASK_GetNextTask( hTask ); } break; } if( hTask ) { TDB* task = (TDB*)GlobalLock16( hTask ); if( task ) { pTPWnd->hInstance = task->hInstance; pTPWnd->hmemTaskQ = task->hQueue; MENU_ReleaseTopPopupWnd(); return TRUE; } else WARN("failed to patch resident popup.\n"); } } MENU_ReleaseTopPopupWnd(); return FALSE; } /*********************************************************************** * MENU_ShowPopup * * Display a popup menu. */ static BOOL MENU_ShowPopup( HWND hwndOwner, HMENU hmenu, UINT id, INT x, INT y, INT xanchor, INT yanchor ) { POPUPMENU *menu; WND *wndOwner = NULL; TRACE("owner=0x%04x hmenu=0x%04x id=0x%04x x=0x%04x y=0x%04x xa=0x%04x ya=0x%04x\n", hwndOwner, hmenu, id, x, y, xanchor, yanchor); if (!(menu = MENU_GetMenu( hmenu ))) return FALSE; if (menu->FocusedItem != NO_SELECTED_ITEM) { menu->items[menu->FocusedItem].fState &= ~(MF_HILITE|MF_MOUSESELECT); menu->FocusedItem = NO_SELECTED_ITEM; } /* store the owner for DrawItem*/ menu->hwndOwner = hwndOwner; if( (wndOwner = WIN_FindWndPtr( hwndOwner )) ) { UINT width, height; MENU_PopupMenuCalcSize( menu, hwndOwner ); /* adjust popup menu pos so that it fits within the desktop */ width = menu->Width + GetSystemMetrics(SM_CXBORDER); height = menu->Height + GetSystemMetrics(SM_CYBORDER); if( x + width > GetSystemMetrics(SM_CXSCREEN )) { if( xanchor ) x -= width - xanchor; if( x + width > GetSystemMetrics(SM_CXSCREEN)) x = GetSystemMetrics(SM_CXSCREEN) - width; } if( x < 0 ) x = 0; if( y + height > GetSystemMetrics(SM_CYSCREEN )) { if( yanchor ) y -= height + yanchor; if( y + height > GetSystemMetrics(SM_CYSCREEN )) y = GetSystemMetrics(SM_CYSCREEN) - height; } if( y < 0 ) y = 0; if( TWEAK_WineLook == WIN31_LOOK ) { width += POPUP_XSHADE * GetSystemMetrics(SM_CXBORDER); /* add space for shading */ height += POPUP_YSHADE * GetSystemMetrics(SM_CYBORDER); } /* NOTE: In Windows, top menu popup is not owned. */ if (!pTopPopupWnd) /* create top level popup menu window */ { assert( uSubPWndLevel == 0 ); pTopPopupWnd = WIN_FindWndPtr(CreateWindowA( POPUPMENU_CLASS_ATOM, NULL, WS_POPUP, x, y, width, height, hwndOwner, 0, wndOwner->hInstance, (LPVOID)hmenu )); if (!pTopPopupWnd) { WIN_ReleaseWndPtr(wndOwner); return FALSE; } menu->hWnd = pTopPopupWnd->hwndSelf; MENU_ReleaseTopPopupWnd(); } else if( uSubPWndLevel ) { /* create a new window for the submenu */ menu->hWnd = CreateWindowA( POPUPMENU_CLASS_ATOM, NULL, WS_POPUP, x, y, width, height, hwndOwner, 0, wndOwner->hInstance, (LPVOID)hmenu ); if( !menu->hWnd ) { WIN_ReleaseWndPtr(wndOwner); return FALSE; } } else /* top level popup menu window already exists */ { WND *pTPWnd = MENU_GetTopPopupWnd(); menu->hWnd = pTPWnd->hwndSelf; MENU_PatchResidentPopup( 0, wndOwner ); SendMessageA( pTPWnd->hwndSelf, MM_SETMENUHANDLE, (WPARAM16)hmenu, 0L); /* adjust its size */ SetWindowPos( menu->hWnd, 0, x, y, width, height, SWP_NOACTIVATE | SWP_NOZORDER | SWP_NOREDRAW); MENU_ReleaseTopPopupWnd(); } uSubPWndLevel++; /* menu level counter */ /* Display the window */ SetWindowPos( menu->hWnd, HWND_TOP, 0, 0, 0, 0, SWP_SHOWWINDOW | SWP_NOSIZE | SWP_NOMOVE | SWP_NOACTIVATE ); UpdateWindow( menu->hWnd ); WIN_ReleaseWndPtr(wndOwner); return TRUE; } return FALSE; } /*********************************************************************** * MENU_SelectItem */ static void MENU_SelectItem( HWND hwndOwner, HMENU hmenu, UINT wIndex, BOOL sendMenuSelect, HMENU topmenu ) { LPPOPUPMENU lppop; HDC hdc; TRACE("owner=0x%04x menu=0x%04x index=0x%04x select=0x%04x\n", hwndOwner, hmenu, wIndex, sendMenuSelect); lppop = MENU_GetMenu( hmenu ); if ((!lppop) || (!lppop->nItems)) return; if (lppop->FocusedItem == wIndex) return; if (lppop->wFlags & MF_POPUP) hdc = GetDC( lppop->hWnd ); else hdc = GetDCEx( lppop->hWnd, 0, DCX_CACHE | DCX_WINDOW); SelectObject( hdc, hMenuFont); /* Clear previous highlighted item */ if (lppop->FocusedItem != NO_SELECTED_ITEM) { lppop->items[lppop->FocusedItem].fState &= ~(MF_HILITE|MF_MOUSESELECT); MENU_DrawMenuItem(lppop->hWnd, hmenu, hwndOwner, hdc,&lppop->items[lppop->FocusedItem], lppop->Height, !(lppop->wFlags & MF_POPUP), ODA_SELECT ); } /* Highlight new item (if any) */ lppop->FocusedItem = wIndex; if (lppop->FocusedItem != NO_SELECTED_ITEM) { if(!(lppop->items[wIndex].fType & MF_SEPARATOR)) { lppop->items[wIndex].fState |= MF_HILITE; MENU_DrawMenuItem( lppop->hWnd, hmenu, hwndOwner, hdc, &lppop->items[wIndex], lppop->Height, !(lppop->wFlags & MF_POPUP), ODA_SELECT ); } if (sendMenuSelect) { MENUITEM *ip = &lppop->items[lppop->FocusedItem]; SendMessageA( hwndOwner, WM_MENUSELECT, MAKELONG(ip->fType & MF_POPUP ? wIndex: ip->wID, ip->fType | ip->fState | MF_MOUSESELECT | (lppop->wFlags & MF_SYSMENU)), hmenu); } } else if (sendMenuSelect) { if(topmenu){ int pos; if((pos=MENU_FindSubMenu(&topmenu, hmenu))!=NO_SELECTED_ITEM){ POPUPMENU *ptm = (POPUPMENU *) USER_HEAP_LIN_ADDR( topmenu ); MENUITEM *ip = &ptm->items[pos]; SendMessageA( hwndOwner, WM_MENUSELECT, MAKELONG(pos, ip->fType | ip->fState | MF_MOUSESELECT | (ptm->wFlags & MF_SYSMENU)), topmenu); } } } ReleaseDC( lppop->hWnd, hdc ); } /*********************************************************************** * MENU_MoveSelection * * Moves currently selected item according to the offset parameter. * If there is no selection then it should select the last item if * offset is ITEM_PREV or the first item if offset is ITEM_NEXT. */ static void MENU_MoveSelection( HWND hwndOwner, HMENU hmenu, INT offset ) { INT i; POPUPMENU *menu; TRACE("hwnd=0x%04x hmenu=0x%04x off=0x%04x\n", hwndOwner, hmenu, offset); menu = MENU_GetMenu( hmenu ); if ((!menu) || (!menu->items)) return; if ( menu->FocusedItem != NO_SELECTED_ITEM ) { if( menu->nItems == 1 ) return; else for (i = menu->FocusedItem + offset ; i >= 0 && i < menu->nItems ; i += offset) if (!(menu->items[i].fType & MF_SEPARATOR)) { MENU_SelectItem( hwndOwner, hmenu, i, TRUE, 0 ); return; } } for ( i = (offset > 0) ? 0 : menu->nItems - 1; i >= 0 && i < menu->nItems ; i += offset) if (!(menu->items[i].fType & MF_SEPARATOR)) { MENU_SelectItem( hwndOwner, hmenu, i, TRUE, 0 ); return; } } /********************************************************************** * MENU_SetItemData * * Set an item flags, id and text ptr. Called by InsertMenu() and * ModifyMenu(). */ static BOOL MENU_SetItemData( MENUITEM *item, UINT flags, UINT id, LPCSTR str ) { LPSTR prevText = IS_STRING_ITEM(item->fType) ? item->text : NULL; debug_print_menuitem("MENU_SetItemData from: ", item, ""); if (IS_STRING_ITEM(flags)) { if (!str || !*str) { flags |= MF_SEPARATOR; item->text = NULL; } else { LPSTR text; /* Item beginning with a backspace is a help item */ if (*str == '\b') { flags |= MF_HELP; str++; } if (!(text = HEAP_strdupA( SystemHeap, 0, str ))) return FALSE; item->text = text; } } else if (IS_BITMAP_ITEM(flags)) item->text = (LPSTR)(HBITMAP)LOWORD(str); else item->text = NULL; if (flags & MF_OWNERDRAW) item->dwItemData = (DWORD)str; else item->dwItemData = 0; if ((item->fType & MF_POPUP) && (flags & MF_POPUP) && (item->hSubMenu != id) ) DestroyMenu( item->hSubMenu ); /* ModifyMenu() spec */ if (flags & MF_POPUP) { POPUPMENU *menu = MENU_GetMenu((UINT16)id); if (menu) menu->wFlags |= MF_POPUP; else { item->wID = 0; item->hSubMenu = 0; item->fType = 0; item->fState = 0; return FALSE; } } item->wID = id; if (flags & MF_POPUP) item->hSubMenu = id; if ((item->fType & MF_POPUP) && !(flags & MF_POPUP) ) flags |= MF_POPUP; /* keep popup */ item->fType = flags & TYPE_MASK; item->fState = (flags & STATE_MASK) & ~(MF_HILITE | MF_MOUSESELECT | MF_BYPOSITION); /* Don't call SetRectEmpty here! */ if (prevText) HeapFree( SystemHeap, 0, prevText ); debug_print_menuitem("MENU_SetItemData to : ", item, ""); return TRUE; } /********************************************************************** * MENU_InsertItem * * Insert a new item into a menu. */ static MENUITEM *MENU_InsertItem( HMENU hMenu, UINT pos, UINT flags ) { MENUITEM *newItems; POPUPMENU *menu; if (!(menu = MENU_GetMenu(hMenu))) return NULL; /* Find where to insert new item */ if (flags & MF_BYPOSITION) { if (pos > menu->nItems) pos = menu->nItems; } else { if (!MENU_FindItem( &hMenu, &pos, flags )) pos = menu->nItems; else { if (!(menu = MENU_GetMenu( hMenu ))) return NULL; } } /* Create new items array */ newItems = HeapAlloc( SystemHeap, 0, sizeof(MENUITEM) * (menu->nItems+1) ); if (!newItems) { WARN("allocation failed\n" ); return NULL; } if (menu->nItems > 0) { /* Copy the old array into the new */ if (pos > 0) memcpy( newItems, menu->items, pos * sizeof(MENUITEM) ); if (pos < menu->nItems) memcpy( &newItems[pos+1], &menu->items[pos], (menu->nItems-pos)*sizeof(MENUITEM) ); HeapFree( SystemHeap, 0, menu->items ); } menu->items = newItems; menu->nItems++; memset( &newItems[pos], 0, sizeof(*newItems) ); menu->Height = 0; /* force size recalculate */ return &newItems[pos]; } /********************************************************************** * MENU_ParseResource * * Parse a standard menu resource and add items to the menu. * Return a pointer to the end of the resource. */ static LPCSTR MENU_ParseResource( LPCSTR res, HMENU hMenu, BOOL unicode ) { WORD flags, id = 0; LPCSTR str; do { flags = GET_WORD(res); res += sizeof(WORD); if (!(flags & MF_POPUP)) { id = GET_WORD(res); res += sizeof(WORD); } if (!IS_STRING_ITEM(flags)) ERR("not a string item %04x\n", flags ); str = res; if (!unicode) res += strlen(str) + 1; else res += (lstrlenW((LPCWSTR)str) + 1) * sizeof(WCHAR); if (flags & MF_POPUP) { HMENU hSubMenu = CreatePopupMenu(); if (!hSubMenu) return NULL; if (!(res = MENU_ParseResource( res, hSubMenu, unicode ))) return NULL; if (!unicode) AppendMenuA( hMenu, flags, (UINT)hSubMenu, str ); else AppendMenuW( hMenu, flags, (UINT)hSubMenu, (LPCWSTR)str ); } else /* Not a popup */ { if (!unicode) AppendMenuA( hMenu, flags, id, *str ? str : NULL ); else AppendMenuW( hMenu, flags, id, *(LPCWSTR)str ? (LPCWSTR)str : NULL ); } } while (!(flags & MF_END)); return res; } /********************************************************************** * MENUEX_ParseResource * * Parse an extended menu resource and add items to the menu. * Return a pointer to the end of the resource. */ static LPCSTR MENUEX_ParseResource( LPCSTR res, HMENU hMenu) { WORD resinfo; do { MENUITEMINFOW mii; mii.cbSize = sizeof(mii); mii.fMask = MIIM_STATE | MIIM_ID | MIIM_TYPE; mii.fType = GET_DWORD(res); res += sizeof(DWORD); mii.fState = GET_DWORD(res); res += sizeof(DWORD); mii.wID = GET_DWORD(res); res += sizeof(DWORD); resinfo = GET_WORD(res); /* FIXME: for 16-bit apps this is a byte. */ res += sizeof(WORD); /* Align the text on a word boundary. */ res += (~((int)res - 1)) & 1; mii.dwTypeData = (LPWSTR) res; res += (1 + lstrlenW(mii.dwTypeData)) * sizeof(WCHAR); /* Align the following fields on a dword boundary. */ res += (~((int)res - 1)) & 3; /* FIXME: This is inefficient and cannot be optimised away by gcc. */ { LPSTR newstr = HEAP_strdupWtoA(GetProcessHeap(), 0, mii.dwTypeData); TRACE("Menu item: [%08x,%08x,%04x,%04x,%s]\n", mii.fType, mii.fState, mii.wID, resinfo, newstr); HeapFree( GetProcessHeap(), 0, newstr ); } if (resinfo & 1) { /* Pop-up? */ /* DWORD helpid = GET_DWORD(res); FIXME: use this. */ res += sizeof(DWORD); mii.hSubMenu = CreatePopupMenu(); if (!mii.hSubMenu) return NULL; if (!(res = MENUEX_ParseResource(res, mii.hSubMenu))) { DestroyMenu(mii.hSubMenu); return NULL; } mii.fMask |= MIIM_SUBMENU; mii.fType |= MF_POPUP; } InsertMenuItemW(hMenu, -1, MF_BYPOSITION, &mii); } while (!(resinfo & MF_END)); return res; } /*********************************************************************** * MENU_GetSubPopup * * Return the handle of the selected sub-popup menu (if any). */ static HMENU MENU_GetSubPopup( HMENU hmenu ) { POPUPMENU *menu; MENUITEM *item; menu = MENU_GetMenu( hmenu ); if ((!menu) || (menu->FocusedItem == NO_SELECTED_ITEM)) return 0; item = &menu->items[menu->FocusedItem]; if ((item->fType & MF_POPUP) && (item->fState & MF_MOUSESELECT)) return item->hSubMenu; return 0; } /*********************************************************************** * MENU_HideSubPopups * * Hide the sub-popup menus of this menu. */ static void MENU_HideSubPopups( HWND hwndOwner, HMENU hmenu, BOOL sendMenuSelect ) { POPUPMENU *menu = MENU_GetMenu( hmenu ); TRACE("owner=0x%04x hmenu=0x%04x 0x%04x\n", hwndOwner, hmenu, sendMenuSelect); if (menu && uSubPWndLevel) { HMENU hsubmenu; POPUPMENU *submenu; MENUITEM *item; if (menu->FocusedItem != NO_SELECTED_ITEM) { item = &menu->items[menu->FocusedItem]; if (!(item->fType & MF_POPUP) || !(item->fState & MF_MOUSESELECT)) return; item->fState &= ~MF_MOUSESELECT; hsubmenu = item->hSubMenu; } else return; submenu = MENU_GetMenu( hsubmenu ); MENU_HideSubPopups( hwndOwner, hsubmenu, FALSE ); MENU_SelectItem( hwndOwner, hsubmenu, NO_SELECTED_ITEM, sendMenuSelect, 0 ); if (submenu->hWnd == MENU_GetTopPopupWnd()->hwndSelf ) { ShowWindow( submenu->hWnd, SW_HIDE ); uSubPWndLevel = 0; } else { DestroyWindow( submenu->hWnd ); submenu->hWnd = 0; } MENU_ReleaseTopPopupWnd(); } } /*********************************************************************** * MENU_ShowSubPopup * * Display the sub-menu of the selected item of this menu. * Return the handle of the submenu, or hmenu if no submenu to display. */ static HMENU MENU_ShowSubPopup( HWND hwndOwner, HMENU hmenu, BOOL selectFirst, UINT wFlags ) { RECT rect; POPUPMENU *menu; MENUITEM *item; WND *wndPtr; HDC hdc; TRACE("owner=0x%04x hmenu=0x%04x 0x%04x\n", hwndOwner, hmenu, selectFirst); if (!(menu = MENU_GetMenu( hmenu ))) return hmenu; if (!(wndPtr = WIN_FindWndPtr( menu->hWnd )) || (menu->FocusedItem == NO_SELECTED_ITEM)) { WIN_ReleaseWndPtr(wndPtr); return hmenu; } item = &menu->items[menu->FocusedItem]; if (!(item->fType & MF_POPUP) || (item->fState & (MF_GRAYED | MF_DISABLED))) { WIN_ReleaseWndPtr(wndPtr); return hmenu; } /* message must be send before using item, because nearly everything may by changed by the application ! */ /* Send WM_INITMENUPOPUP message only if TPM_NONOTIFY flag is not specified */ if (!(wFlags & TPM_NONOTIFY)) SendMessageA( hwndOwner, WM_INITMENUPOPUP, item->hSubMenu, MAKELONG( menu->FocusedItem, IS_SYSTEM_MENU(menu) )); item = &menu->items[menu->FocusedItem]; rect = item->rect; /* correct item if modified as a reaction to WM_INITMENUPOPUP-message */ if (!(item->fState & MF_HILITE)) { if (menu->wFlags & MF_POPUP) hdc = GetDC( menu->hWnd ); else hdc = GetDCEx( menu->hWnd, 0, DCX_CACHE | DCX_WINDOW); SelectObject( hdc, hMenuFont); item->fState |= MF_HILITE; MENU_DrawMenuItem( menu->hWnd, hmenu, hwndOwner, hdc, item, menu->Height, !(menu->wFlags & MF_POPUP), ODA_DRAWENTIRE ); ReleaseDC( menu->hWnd, hdc ); } if (!item->rect.top && !item->rect.left && !item->rect.bottom && !item->rect.right) item->rect = rect; item->fState |= MF_MOUSESELECT; if (IS_SYSTEM_MENU(menu)) { MENU_InitSysMenuPopup(item->hSubMenu, wndPtr->dwStyle, GetClassLongA(wndPtr->hwndSelf, GCL_STYLE)); NC_GetSysPopupPos( wndPtr, &rect ); rect.top = rect.bottom; rect.right = GetSystemMetrics(SM_CXSIZE); rect.bottom = GetSystemMetrics(SM_CYSIZE); } else { if (menu->wFlags & MF_POPUP) { rect.left = wndPtr->rectWindow.left + item->rect.right - GetSystemMetrics(SM_CXBORDER); rect.top = wndPtr->rectWindow.top + item->rect.top; rect.right = item->rect.left - item->rect.right + GetSystemMetrics(SM_CXBORDER); rect.bottom = item->rect.top - item->rect.bottom; } else { rect.left = wndPtr->rectWindow.left + item->rect.left; rect.top = wndPtr->rectWindow.top + item->rect.bottom; rect.right = item->rect.right - item->rect.left; rect.bottom = item->rect.bottom - item->rect.top; } } MENU_ShowPopup( hwndOwner, item->hSubMenu, menu->FocusedItem, rect.left, rect.top, rect.right, rect.bottom ); if (selectFirst) MENU_MoveSelection( hwndOwner, item->hSubMenu, ITEM_NEXT ); WIN_ReleaseWndPtr(wndPtr); return item->hSubMenu; } /********************************************************************** * MENU_IsMenuActive */ BOOL MENU_IsMenuActive(void) { return pTopPopupWnd && (pTopPopupWnd->dwStyle & WS_VISIBLE); } /*********************************************************************** * MENU_PtMenu * * Walks menu chain trying to find a menu pt maps to. */ static HMENU MENU_PtMenu( HMENU hMenu, POINT16 pt ) { POPUPMENU *menu = MENU_GetMenu( hMenu ); register UINT ht = menu->FocusedItem; /* try subpopup first (if any) */ ht = (ht != NO_SELECTED_ITEM && (menu->items[ht].fType & MF_POPUP) && (menu->items[ht].fState & MF_MOUSESELECT)) ? (UINT) MENU_PtMenu(menu->items[ht].hSubMenu, pt) : 0; if( !ht ) /* check the current window (avoiding WM_HITTEST) */ { ht = (UINT)NC_HandleNCHitTest( menu->hWnd, pt ); if( menu->wFlags & MF_POPUP ) ht = (ht != (UINT)HTNOWHERE && ht != (UINT)HTERROR) ? (UINT)hMenu : 0; else { WND* wndPtr = WIN_FindWndPtr(menu->hWnd); ht = ( ht == HTSYSMENU ) ? (UINT)(wndPtr->hSysMenu) : ( ht == HTMENU ) ? (UINT)(wndPtr->wIDmenu) : 0; WIN_ReleaseWndPtr(wndPtr); } } return (HMENU)ht; } /*********************************************************************** * MENU_ExecFocusedItem * * Execute a menu item (for instance when user pressed Enter). * Return the wID of the executed item. Otherwise, -1 indicating * that no menu item wase executed; * Have to receive the flags for the TrackPopupMenu options to avoid * sending unwanted message. * */ static INT MENU_ExecFocusedItem( MTRACKER* pmt, HMENU hMenu, UINT wFlags ) { MENUITEM *item; POPUPMENU *menu = MENU_GetMenu( hMenu ); TRACE("%p hmenu=0x%04x\n", pmt, hMenu); if (!menu || !menu->nItems || (menu->FocusedItem == NO_SELECTED_ITEM)) return -1; item = &menu->items[menu->FocusedItem]; TRACE("%08x %08x %08x\n", hMenu, item->wID, item->hSubMenu); if (!(item->fType & MF_POPUP)) { if (!(item->fState & (MF_GRAYED | MF_DISABLED))) { /* If TPM_RETURNCMD is set you return the id, but do not send a message to the owner */ if(!(wFlags & TPM_RETURNCMD)) { if( menu->wFlags & MF_SYSMENU ) PostMessageA( pmt->hOwnerWnd, WM_SYSCOMMAND, item->wID, MAKELPARAM((INT16)pmt->pt.x, (INT16)pmt->pt.y) ); else PostMessageA( pmt->hOwnerWnd, WM_COMMAND, item->wID, 0 ); } return item->wID; } } else pmt->hCurrentMenu = MENU_ShowSubPopup(pmt->hOwnerWnd, hMenu, TRUE, wFlags); return -1; } /*********************************************************************** * MENU_SwitchTracking * * Helper function for menu navigation routines. */ static void MENU_SwitchTracking( MTRACKER* pmt, HMENU hPtMenu, UINT id ) { POPUPMENU *ptmenu = MENU_GetMenu( hPtMenu ); POPUPMENU *topmenu = MENU_GetMenu( pmt->hTopMenu ); TRACE("%p hmenu=0x%04x 0x%04x\n", pmt, hPtMenu, id); if( pmt->hTopMenu != hPtMenu && !((ptmenu->wFlags | topmenu->wFlags) & MF_POPUP) ) { /* both are top level menus (system and menu-bar) */ MENU_HideSubPopups( pmt->hOwnerWnd, pmt->hTopMenu, FALSE ); MENU_SelectItem( pmt->hOwnerWnd, pmt->hTopMenu, NO_SELECTED_ITEM, FALSE, 0 ); pmt->hTopMenu = hPtMenu; } else MENU_HideSubPopups( pmt->hOwnerWnd, hPtMenu, FALSE ); MENU_SelectItem( pmt->hOwnerWnd, hPtMenu, id, TRUE, 0 ); } /*********************************************************************** * MENU_ButtonDown * * Return TRUE if we can go on with menu tracking. */ static BOOL MENU_ButtonDown( MTRACKER* pmt, HMENU hPtMenu, UINT wFlags ) { TRACE("%p hmenu=0x%04x\n", pmt, hPtMenu); if (hPtMenu) { UINT id = 0; POPUPMENU *ptmenu = MENU_GetMenu( hPtMenu ); MENUITEM *item; if( IS_SYSTEM_MENU(ptmenu) ) item = ptmenu->items; else item = MENU_FindItemByCoords( ptmenu, pmt->pt, &id ); if( item ) { if( ptmenu->FocusedItem != id ) MENU_SwitchTracking( pmt, hPtMenu, id ); /* If the popup menu is not already "popped" */ if(!(item->fState & MF_MOUSESELECT )) { pmt->hCurrentMenu = MENU_ShowSubPopup( pmt->hOwnerWnd, hPtMenu, FALSE, wFlags ); /* In win31, a newly popped menu always remain opened for the next buttonup */ if(TWEAK_WineLook == WIN31_LOOK) ptmenu->bTimeToHide = FALSE; } return TRUE; } /* Else the click was on the menu bar, finish the tracking */ } return FALSE; } /*********************************************************************** * MENU_ButtonUp * * Return the value of MENU_ExecFocusedItem if * the selected item was not a popup. Else open the popup. * A -1 return value indicates that we go on with menu tracking. * */ static INT MENU_ButtonUp( MTRACKER* pmt, HMENU hPtMenu, UINT wFlags) { TRACE("%p hmenu=0x%04x\n", pmt, hPtMenu); if (hPtMenu) { UINT id = 0; POPUPMENU *ptmenu = MENU_GetMenu( hPtMenu ); MENUITEM *item; if( IS_SYSTEM_MENU(ptmenu) ) item = ptmenu->items; else item = MENU_FindItemByCoords( ptmenu, pmt->pt, &id ); if( item && (ptmenu->FocusedItem == id )) { if( !(item->fType & MF_POPUP) ) return MENU_ExecFocusedItem( pmt, hPtMenu, wFlags); /* If we are dealing with the top-level menu and that this */ /* is a click on an already "poppped" item */ /* Stop the menu tracking and close the opened submenus */ if((pmt->hTopMenu == hPtMenu) && (ptmenu->bTimeToHide == TRUE)) return 0; } ptmenu->bTimeToHide = TRUE; } return -1; } /*********************************************************************** * MENU_MouseMove * * Return TRUE if we can go on with menu tracking. */ static BOOL MENU_MouseMove( MTRACKER* pmt, HMENU hPtMenu, UINT wFlags ) { UINT id = NO_SELECTED_ITEM; POPUPMENU *ptmenu = NULL; if( hPtMenu ) { ptmenu = MENU_GetMenu( hPtMenu ); if( IS_SYSTEM_MENU(ptmenu) ) id = 0; else MENU_FindItemByCoords( ptmenu, pmt->pt, &id ); } if( id == NO_SELECTED_ITEM ) { MENU_SelectItem( pmt->hOwnerWnd, pmt->hCurrentMenu, NO_SELECTED_ITEM, TRUE, pmt->hTopMenu); } else if( ptmenu->FocusedItem != id ) { MENU_SwitchTracking( pmt, hPtMenu, id ); pmt->hCurrentMenu = MENU_ShowSubPopup(pmt->hOwnerWnd, hPtMenu, FALSE, wFlags); } return TRUE; } /*********************************************************************** * MENU_DoNextMenu * * NOTE: WM_NEXTMENU documented in Win32 is a bit different. */ static LRESULT MENU_DoNextMenu( MTRACKER* pmt, UINT vk ) { POPUPMENU *menu = MENU_GetMenu( pmt->hTopMenu ); if( (vk == VK_LEFT && menu->FocusedItem == 0 ) || (vk == VK_RIGHT && menu->FocusedItem == menu->nItems - 1)) { WND* wndPtr; HMENU hNewMenu; HWND hNewWnd; UINT id = 0; LRESULT l = SendMessageA( pmt->hOwnerWnd, WM_NEXTMENU, vk, (IS_SYSTEM_MENU(menu)) ? GetSubMenu16(pmt->hTopMenu,0) : pmt->hTopMenu ); TRACE("%04x [%04x] -> %04x [%04x]\n", (UINT16)pmt->hCurrentMenu, (UINT16)pmt->hOwnerWnd, LOWORD(l), HIWORD(l) ); if( l == 0 ) { wndPtr = WIN_FindWndPtr(pmt->hOwnerWnd); hNewWnd = pmt->hOwnerWnd; if( IS_SYSTEM_MENU(menu) ) { /* switch to the menu bar */ if( wndPtr->dwStyle & WS_CHILD || !wndPtr->wIDmenu ) { WIN_ReleaseWndPtr(wndPtr); return FALSE; } hNewMenu = wndPtr->wIDmenu; if( vk == VK_LEFT ) { menu = MENU_GetMenu( hNewMenu ); id = menu->nItems - 1; } } else if( wndPtr->dwStyle & WS_SYSMENU ) { /* switch to the system menu */ hNewMenu = wndPtr->hSysMenu; } else { WIN_ReleaseWndPtr(wndPtr); return FALSE; } WIN_ReleaseWndPtr(wndPtr); } else /* application returned a new menu to switch to */ { hNewMenu = LOWORD(l); hNewWnd = HIWORD(l); if( IsMenu(hNewMenu) && IsWindow(hNewWnd) ) { wndPtr = WIN_FindWndPtr(hNewWnd); if( wndPtr->dwStyle & WS_SYSMENU && GetSubMenu16(wndPtr->hSysMenu, 0) == hNewMenu ) { /* get the real system menu */ hNewMenu = wndPtr->hSysMenu; } else if( wndPtr->dwStyle & WS_CHILD || wndPtr->wIDmenu != hNewMenu ) { /* FIXME: Not sure what to do here, perhaps, * try to track hNewMenu as a popup? */ TRACE(" -- got confused.\n"); WIN_ReleaseWndPtr(wndPtr); return FALSE; } WIN_ReleaseWndPtr(wndPtr); } else return FALSE; } if( hNewMenu != pmt->hTopMenu ) { MENU_SelectItem( pmt->hOwnerWnd, pmt->hTopMenu, NO_SELECTED_ITEM, FALSE, 0 ); if( pmt->hCurrentMenu != pmt->hTopMenu ) MENU_HideSubPopups( pmt->hOwnerWnd, pmt->hTopMenu, FALSE ); } if( hNewWnd != pmt->hOwnerWnd ) { ReleaseCapture(); pmt->hOwnerWnd = hNewWnd; EVENT_Capture( pmt->hOwnerWnd, HTMENU ); } pmt->hTopMenu = pmt->hCurrentMenu = hNewMenu; /* all subpopups are hidden */ MENU_SelectItem( pmt->hOwnerWnd, pmt->hTopMenu, id, TRUE, 0 ); return TRUE; } return FALSE; } /*********************************************************************** * MENU_SuspendPopup * * The idea is not to show the popup if the next input message is * going to hide it anyway. */ static BOOL MENU_SuspendPopup( MTRACKER* pmt, UINT16 uMsg ) { MSG msg; msg.hwnd = pmt->hOwnerWnd; PeekMessageA( &msg, 0, 0, 0, PM_NOYIELD | PM_REMOVE); pmt->trackFlags |= TF_SKIPREMOVE; switch( uMsg ) { case WM_KEYDOWN: PeekMessageA( &msg, 0, 0, 0, PM_NOYIELD | PM_NOREMOVE); if( msg.message == WM_KEYUP || msg.message == WM_PAINT ) { PeekMessageA( &msg, 0, 0, 0, PM_NOYIELD | PM_REMOVE); PeekMessageA( &msg, 0, 0, 0, PM_NOYIELD | PM_NOREMOVE); if( msg.message == WM_KEYDOWN && (msg.wParam == VK_LEFT || msg.wParam == VK_RIGHT)) { pmt->trackFlags |= TF_SUSPENDPOPUP; return TRUE; } } break; } /* failures go through this */ pmt->trackFlags &= ~TF_SUSPENDPOPUP; return FALSE; } /*********************************************************************** * MENU_KeyLeft * * Handle a VK_LEFT key event in a menu. */ static void MENU_KeyLeft( MTRACKER* pmt, UINT wFlags ) { POPUPMENU *menu; HMENU hmenutmp, hmenuprev; UINT prevcol; hmenuprev = hmenutmp = pmt->hTopMenu; menu = MENU_GetMenu( hmenutmp ); /* Try to move 1 column left (if possible) */ if( (prevcol = MENU_GetStartOfPrevColumn( pmt->hCurrentMenu )) != NO_SELECTED_ITEM ) { MENU_SelectItem( pmt->hOwnerWnd, pmt->hCurrentMenu, prevcol, TRUE, 0 ); return; } /* close topmost popup */ while (hmenutmp != pmt->hCurrentMenu) { hmenuprev = hmenutmp; hmenutmp = MENU_GetSubPopup( hmenuprev ); } MENU_HideSubPopups( pmt->hOwnerWnd, hmenuprev, TRUE ); pmt->hCurrentMenu = hmenuprev; if ( (hmenuprev == pmt->hTopMenu) && !(menu->wFlags & MF_POPUP) ) { /* move menu bar selection if no more popups are left */ if( !MENU_DoNextMenu( pmt, VK_LEFT) ) MENU_MoveSelection( pmt->hOwnerWnd, pmt->hTopMenu, ITEM_PREV ); if ( hmenuprev != hmenutmp || pmt->trackFlags & TF_SUSPENDPOPUP ) { /* A sublevel menu was displayed - display the next one * unless there is another displacement coming up */ if( !MENU_SuspendPopup( pmt, WM_KEYDOWN ) ) pmt->hCurrentMenu = MENU_ShowSubPopup(pmt->hOwnerWnd, pmt->hTopMenu, TRUE, wFlags); } } } /*********************************************************************** * MENU_KeyRight * * Handle a VK_RIGHT key event in a menu. */ static void MENU_KeyRight( MTRACKER* pmt, UINT wFlags ) { HMENU hmenutmp; POPUPMENU *menu = MENU_GetMenu( pmt->hTopMenu ); UINT nextcol; TRACE("MENU_KeyRight called, cur %x (%s), top %x (%s).\n", pmt->hCurrentMenu, (MENU_GetMenu(pmt->hCurrentMenu))-> items[0].text, pmt->hTopMenu, menu->items[0].text ); if ( (menu->wFlags & MF_POPUP) || (pmt->hCurrentMenu != pmt->hTopMenu)) { /* If already displaying a popup, try to display sub-popup */ hmenutmp = pmt->hCurrentMenu; pmt->hCurrentMenu = MENU_ShowSubPopup(pmt->hOwnerWnd, hmenutmp, TRUE, wFlags); /* if subpopup was displayed then we are done */ if (hmenutmp != pmt->hCurrentMenu) return; } /* Check to see if there's another column */ if( (nextcol = MENU_GetStartOfNextColumn( pmt->hCurrentMenu )) != NO_SELECTED_ITEM ) { TRACE("Going to %d.\n", nextcol ); MENU_SelectItem( pmt->hOwnerWnd, pmt->hCurrentMenu, nextcol, TRUE, 0 ); return; } if (!(menu->wFlags & MF_POPUP)) /* menu bar tracking */ { if( pmt->hCurrentMenu != pmt->hTopMenu ) { MENU_HideSubPopups( pmt->hOwnerWnd, pmt->hTopMenu, FALSE ); hmenutmp = pmt->hCurrentMenu = pmt->hTopMenu; } else hmenutmp = 0; /* try to move to the next item */ if( !MENU_DoNextMenu( pmt, VK_RIGHT) ) MENU_MoveSelection( pmt->hOwnerWnd, pmt->hTopMenu, ITEM_NEXT ); if( hmenutmp || pmt->trackFlags & TF_SUSPENDPOPUP ) if( !MENU_SuspendPopup(pmt, WM_KEYDOWN) ) pmt->hCurrentMenu = MENU_ShowSubPopup(pmt->hOwnerWnd, pmt->hTopMenu, TRUE, wFlags); } } /*********************************************************************** * MENU_TrackMenu * * Menu tracking code. */ static INT MENU_TrackMenu( HMENU hmenu, UINT wFlags, INT x, INT y, HWND hwnd, const RECT *lprect ) { MSG msg; POPUPMENU *menu; BOOL fRemove; INT executedMenuId = -1; MTRACKER mt; BOOL enterIdleSent = FALSE; mt.trackFlags = 0; mt.hCurrentMenu = hmenu; mt.hTopMenu = hmenu; mt.hOwnerWnd = hwnd; mt.pt.x = x; mt.pt.y = y; TRACE("hmenu=0x%04x flags=0x%08x (%d,%d) hwnd=0x%04x (%d,%d)-(%d,%d)\n", hmenu, wFlags, x, y, hwnd, (lprect) ? lprect->left : 0, (lprect) ? lprect->top : 0, (lprect) ? lprect->right : 0, (lprect) ? lprect->bottom : 0); fEndMenu = FALSE; if (!(menu = MENU_GetMenu( hmenu ))) return FALSE; if (wFlags & TPM_BUTTONDOWN) { /* Get the result in order to start the tracking or not */ fRemove = MENU_ButtonDown( &mt, hmenu, wFlags ); fEndMenu = !fRemove; } EVENT_Capture( mt.hOwnerWnd, HTMENU ); while (!fEndMenu) { menu = MENU_GetMenu( mt.hCurrentMenu ); msg.hwnd = (wFlags & TPM_ENTERIDLEEX && menu->wFlags & MF_POPUP) ? menu->hWnd : 0; /* we have to keep the message in the queue until it's * clear that menu loop is not over yet. */ if (!MSG_InternalGetMessage( QMSG_WIN32A, &msg, msg.hwnd, mt.hOwnerWnd, MSGF_MENU, PM_NOREMOVE, !enterIdleSent, &enterIdleSent )) break; /* check if EndMenu() tried to cancel us, by posting this message */ if(msg.message == WM_CANCELMODE) { /* we are now out of the loop */ fEndMenu = TRUE; /* remove the message from the queue */ PeekMessageA( &msg, 0, msg.message, msg.message, PM_REMOVE ); /* break out of internal loop, ala ESCAPE */ break; } TranslateMessage( &msg ); mt.pt = msg.pt; if ( (msg.hwnd==menu->hWnd) || (msg.message!=WM_TIMER) ) enterIdleSent=FALSE; fRemove = FALSE; if ((msg.message >= WM_MOUSEFIRST) && (msg.message <= WM_MOUSELAST)) { /* Find a menu for this mouse event */ POINT16 pt16; CONV_POINT32TO16( &msg.pt, &pt16 ); hmenu = MENU_PtMenu( mt.hTopMenu, pt16 ); switch(msg.message) { /* no WM_NC... messages in captured state */ case WM_RBUTTONDBLCLK: case WM_RBUTTONDOWN: if (!(wFlags & TPM_RIGHTBUTTON)) break; /* fall through */ case WM_LBUTTONDBLCLK: case WM_LBUTTONDOWN: /* If the message belongs to the menu, removes it from the queue */ /* Else, end menu tracking */ fRemove = MENU_ButtonDown( &mt, hmenu, wFlags ); fEndMenu = !fRemove; break; case WM_RBUTTONUP: if (!(wFlags & TPM_RIGHTBUTTON)) break; /* fall through */ case WM_LBUTTONUP: /* Check if a menu was selected by the mouse */ if (hmenu) { executedMenuId = MENU_ButtonUp( &mt, hmenu, wFlags); /* End the loop if executedMenuId is an item ID */ /* or if the job was done (executedMenuId = 0). */ fEndMenu = fRemove = (executedMenuId != -1); } /* No menu was selected by the mouse */ /* if the function was called by TrackPopupMenu, continue with the menu tracking. If not, stop it */ else fEndMenu = ((wFlags & TPM_POPUPMENU) ? FALSE : TRUE); break; case WM_MOUSEMOVE: /* In win95 winelook, the selected menu item must be changed every time the mouse moves. In Win31 winelook, the mouse button has to be held down */ if ( (TWEAK_WineLook > WIN31_LOOK) || ( (msg.wParam & MK_LBUTTON) || ((wFlags & TPM_RIGHTBUTTON) && (msg.wParam & MK_RBUTTON))) ) fEndMenu |= !MENU_MouseMove( &mt, hmenu, wFlags ); } /* switch(msg.message) - mouse */ } else if ((msg.message >= WM_KEYFIRST) && (msg.message <= WM_KEYLAST)) { fRemove = TRUE; /* Keyboard messages are always removed */ switch(msg.message) { case WM_KEYDOWN: switch(msg.wParam) { case VK_HOME: case VK_END: MENU_SelectItem( mt.hOwnerWnd, mt.hCurrentMenu, NO_SELECTED_ITEM, FALSE, 0 ); /* fall through */ case VK_UP: MENU_MoveSelection( mt.hOwnerWnd, mt.hCurrentMenu, (msg.wParam == VK_HOME)? ITEM_NEXT : ITEM_PREV ); break; case VK_DOWN: /* If on menu bar, pull-down the menu */ menu = MENU_GetMenu( mt.hCurrentMenu ); if (!(menu->wFlags & MF_POPUP)) mt.hCurrentMenu = MENU_ShowSubPopup(mt.hOwnerWnd, mt.hTopMenu, TRUE, wFlags); else /* otherwise try to move selection */ MENU_MoveSelection( mt.hOwnerWnd, mt.hCurrentMenu, ITEM_NEXT ); break; case VK_LEFT: MENU_KeyLeft( &mt, wFlags ); break; case VK_RIGHT: MENU_KeyRight( &mt, wFlags ); break; case VK_ESCAPE: fEndMenu = TRUE; break; case VK_F1: { HELPINFO hi; hi.cbSize = sizeof(HELPINFO); hi.iContextType = HELPINFO_MENUITEM; if (menu->FocusedItem == NO_SELECTED_ITEM) hi.iCtrlId = 0; else hi.iCtrlId = menu->items[menu->FocusedItem].wID; hi.hItemHandle = hmenu; hi.dwContextId = menu->dwContextHelpID; hi.MousePos = msg.pt; SendMessageA(hwnd, WM_HELP, 0, (LPARAM)&hi); break; } default: break; } break; /* WM_KEYDOWN */ case WM_SYSKEYDOWN: switch(msg.wParam) { case VK_MENU: fEndMenu = TRUE; break; } break; /* WM_SYSKEYDOWN */ case WM_CHAR: { UINT pos; if (msg.wParam == '\r' || msg.wParam == ' ') { executedMenuId = MENU_ExecFocusedItem(&mt,mt.hCurrentMenu, wFlags); fEndMenu = (executedMenuId != -1); break; } /* Hack to avoid control chars. */ /* We will find a better way real soon... */ if ((msg.wParam <= 32) || (msg.wParam >= 127)) break; pos = MENU_FindItemByKey( mt.hOwnerWnd, mt.hCurrentMenu, LOWORD(msg.wParam), FALSE ); if (pos == (UINT)-2) fEndMenu = TRUE; else if (pos == (UINT)-1) MessageBeep(0); else { MENU_SelectItem( mt.hOwnerWnd, mt.hCurrentMenu, pos, TRUE, 0 ); executedMenuId = MENU_ExecFocusedItem(&mt,mt.hCurrentMenu, wFlags); fEndMenu = (executedMenuId != -1); } } break; } /* switch(msg.message) - kbd */ } else { DispatchMessageA( &msg ); } if (!fEndMenu) fRemove = TRUE; /* finally remove message from the queue */ if (fRemove && !(mt.trackFlags & TF_SKIPREMOVE) ) PeekMessageA( &msg, 0, msg.message, msg.message, PM_REMOVE ); else mt.trackFlags &= ~TF_SKIPREMOVE; } ReleaseCapture(); /* If dropdown is still painted and the close box is clicked on then the menu will be destroyed as part of the DispatchMessage above. This will then invalidate the menu handle in mt.hTopMenu. We should check for this first. */ if( IsMenu( mt.hTopMenu ) ) { menu = MENU_GetMenu( mt.hTopMenu ); if( IsWindow( mt.hOwnerWnd ) ) { MENU_HideSubPopups( mt.hOwnerWnd, mt.hTopMenu, FALSE ); if (menu && menu->wFlags & MF_POPUP) { ShowWindow( menu->hWnd, SW_HIDE ); uSubPWndLevel = 0; } MENU_SelectItem( mt.hOwnerWnd, mt.hTopMenu, NO_SELECTED_ITEM, FALSE, 0 ); SendMessageA( mt.hOwnerWnd, WM_MENUSELECT, MAKELONG(0,0xffff), 0 ); } /* Reset the variable for hiding menu */ if( menu ) menu->bTimeToHide = FALSE; } /* The return value is only used by TrackPopupMenu */ return ((executedMenuId != -1) ? executedMenuId : 0); } /*********************************************************************** * MENU_InitTracking */ static BOOL MENU_InitTracking(HWND hWnd, HMENU hMenu, BOOL bPopup, UINT wFlags) { TRACE("hwnd=0x%04x hmenu=0x%04x\n", hWnd, hMenu); HideCaret(0); /* Send WM_ENTERMENULOOP and WM_INITMENU message only if TPM_NONOTIFY flag is not specified */ if (!(wFlags & TPM_NONOTIFY)) SendMessageA( hWnd, WM_ENTERMENULOOP, bPopup, 0 ); SendMessageA( hWnd, WM_SETCURSOR, hWnd, HTCAPTION ); if (!(wFlags & TPM_NONOTIFY)) SendMessageA( hWnd, WM_INITMENU, hMenu, 0 ); return TRUE; } /*********************************************************************** * MENU_ExitTracking */ static BOOL MENU_ExitTracking(HWND hWnd) { TRACE("hwnd=0x%04x\n", hWnd); SendMessageA( hWnd, WM_EXITMENULOOP, 0, 0 ); ShowCaret(0); return TRUE; } /*********************************************************************** * MENU_TrackMouseMenuBar * * Menu-bar tracking upon a mouse event. Called from NC_HandleSysCommand(). */ void MENU_TrackMouseMenuBar( WND* wndPtr, INT ht, POINT pt ) { HWND hWnd = wndPtr->hwndSelf; HMENU hMenu = (ht == HTSYSMENU) ? wndPtr->hSysMenu : wndPtr->wIDmenu; UINT wFlags = TPM_ENTERIDLEEX | TPM_BUTTONDOWN | TPM_LEFTALIGN | TPM_LEFTBUTTON; TRACE("pwnd=%p ht=0x%04x (%ld,%ld)\n", wndPtr, ht, pt.x, pt.y); if (IsMenu(hMenu)) { MENU_InitTracking( hWnd, hMenu, FALSE, wFlags ); MENU_TrackMenu( hMenu, wFlags, pt.x, pt.y, hWnd, NULL ); MENU_ExitTracking(hWnd); } } /*********************************************************************** * MENU_TrackKbdMenuBar * * Menu-bar tracking upon a keyboard event. Called from NC_HandleSysCommand(). */ void MENU_TrackKbdMenuBar( WND* wndPtr, UINT wParam, INT vkey) { UINT uItem = NO_SELECTED_ITEM; HMENU hTrackMenu; UINT wFlags = TPM_ENTERIDLEEX | TPM_LEFTALIGN | TPM_LEFTBUTTON; /* find window that has a menu */ while( wndPtr->dwStyle & WS_CHILD) if( !(wndPtr = wndPtr->parent) ) return; /* check if we have to track a system menu */ if( (wndPtr->dwStyle & (WS_CHILD | WS_MINIMIZE)) || !wndPtr->wIDmenu || vkey == VK_SPACE ) { if( !(wndPtr->dwStyle & WS_SYSMENU) ) return; hTrackMenu = wndPtr->hSysMenu; uItem = 0; wParam |= HTSYSMENU; /* prevent item lookup */ } else hTrackMenu = wndPtr->wIDmenu; if (IsMenu( hTrackMenu )) { MENU_InitTracking( wndPtr->hwndSelf, hTrackMenu, FALSE, wFlags ); if( vkey && vkey != VK_SPACE ) { uItem = MENU_FindItemByKey( wndPtr->hwndSelf, hTrackMenu, vkey, (wParam & HTSYSMENU) ); if( uItem >= (UINT)(-2) ) { if( uItem == (UINT)(-1) ) MessageBeep(0); hTrackMenu = 0; } } if( hTrackMenu ) { MENU_SelectItem( wndPtr->hwndSelf, hTrackMenu, uItem, TRUE, 0 ); if( uItem == NO_SELECTED_ITEM ) MENU_MoveSelection( wndPtr->hwndSelf, hTrackMenu, ITEM_NEXT ); else if( vkey ) PostMessageA( wndPtr->hwndSelf, WM_KEYDOWN, VK_DOWN, 0L ); MENU_TrackMenu( hTrackMenu, wFlags, 0, 0, wndPtr->hwndSelf, NULL ); } MENU_ExitTracking (wndPtr->hwndSelf); } } /********************************************************************** * TrackPopupMenu16 (USER.416) */ BOOL16 WINAPI TrackPopupMenu16( HMENU16 hMenu, UINT16 wFlags, INT16 x, INT16 y, INT16 nReserved, HWND16 hWnd, const RECT16 *lpRect ) { RECT r; if (lpRect) CONV_RECT16TO32( lpRect, &r ); return TrackPopupMenu( hMenu, wFlags, x, y, nReserved, hWnd, lpRect ? &r : NULL ); } /********************************************************************** * TrackPopupMenu (USER32.549) * * Like the win32 API, the function return the command ID only if the * flag TPM_RETURNCMD is on. * */ BOOL WINAPI TrackPopupMenu( HMENU hMenu, UINT wFlags, INT x, INT y, INT nReserved, HWND hWnd, const RECT *lpRect ) { BOOL ret = FALSE; MENU_InitTracking(hWnd, hMenu, TRUE, wFlags); /* Send WM_INITMENUPOPUP message only if TPM_NONOTIFY flag is not specified */ if (!(wFlags & TPM_NONOTIFY)) SendMessageA( hWnd, WM_INITMENUPOPUP, hMenu, 0); if (MENU_ShowPopup( hWnd, hMenu, 0, x, y, 0, 0 )) ret = MENU_TrackMenu( hMenu, wFlags | TPM_POPUPMENU, 0, 0, hWnd, lpRect ); MENU_ExitTracking(hWnd); if( (!(wFlags & TPM_RETURNCMD)) && (ret != FALSE) ) ret = 1; return ret; } /********************************************************************** * TrackPopupMenuEx (USER32.550) */ BOOL WINAPI TrackPopupMenuEx( HMENU hMenu, UINT wFlags, INT x, INT y, HWND hWnd, LPTPMPARAMS lpTpm ) { FIXME("not fully implemented\n" ); return TrackPopupMenu( hMenu, wFlags, x, y, 0, hWnd, lpTpm ? &lpTpm->rcExclude : NULL ); } /*********************************************************************** * PopupMenuWndProc * * NOTE: Windows has totally different (and undocumented) popup wndproc. */ LRESULT WINAPI PopupMenuWndProc( HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam ) { WND* wndPtr = WIN_FindWndPtr(hwnd); LRESULT retvalue; TRACE("hwnd=0x%04x msg=0x%04x wp=0x%04x lp=0x%08lx\n", hwnd, message, wParam, lParam); switch(message) { case WM_CREATE: { CREATESTRUCTA *cs = (CREATESTRUCTA*)lParam; SetWindowLongA( hwnd, 0, (LONG)cs->lpCreateParams ); retvalue = 0; goto END; } case WM_MOUSEACTIVATE: /* We don't want to be activated */ retvalue = MA_NOACTIVATE; goto END; case WM_PAINT: { PAINTSTRUCT ps; BeginPaint( hwnd, &ps ); MENU_DrawPopupMenu( hwnd, ps.hdc, (HMENU)GetWindowLongA( hwnd, 0 ) ); EndPaint( hwnd, &ps ); retvalue = 0; goto END; } case WM_ERASEBKGND: retvalue = 1; goto END; case WM_DESTROY: /* zero out global pointer in case resident popup window * was somehow destroyed. */ if(MENU_GetTopPopupWnd() ) { if( hwnd == pTopPopupWnd->hwndSelf ) { ERR("resident popup destroyed!\n"); MENU_DestroyTopPopupWnd(); uSubPWndLevel = 0; } else uSubPWndLevel--; MENU_ReleaseTopPopupWnd(); } break; case WM_SHOWWINDOW: if( wParam ) { if( !(*(HMENU*)wndPtr->wExtra) ) ERR("no menu to display\n"); } else *(HMENU*)wndPtr->wExtra = 0; break; case MM_SETMENUHANDLE: *(HMENU*)wndPtr->wExtra = (HMENU)wParam; break; case MM_GETMENUHANDLE: retvalue = *(HMENU*)wndPtr->wExtra; goto END; default: retvalue = DefWindowProcA( hwnd, message, wParam, lParam ); goto END; } retvalue = 0; END: WIN_ReleaseWndPtr(wndPtr); return retvalue; } /*********************************************************************** * MENU_GetMenuBarHeight * * Compute the size of the menu bar height. Used by NC_HandleNCCalcSize(). */ UINT MENU_GetMenuBarHeight( HWND hwnd, UINT menubarWidth, INT orgX, INT orgY ) { HDC hdc; RECT rectBar; WND *wndPtr; LPPOPUPMENU lppop; UINT retvalue; TRACE("HWND 0x%x, width %d, at (%d, %d).\n", hwnd, menubarWidth, orgX, orgY ); if (!(wndPtr = WIN_FindWndPtr( hwnd ))) return 0; if (!(lppop = MENU_GetMenu((HMENU16)wndPtr->wIDmenu))) { WIN_ReleaseWndPtr(wndPtr); return 0; } hdc = GetDCEx( hwnd, 0, DCX_CACHE | DCX_WINDOW ); SelectObject( hdc, hMenuFont); SetRect(&rectBar, orgX, orgY, orgX+menubarWidth, orgY+GetSystemMetrics(SM_CYMENU)); MENU_MenuBarCalcSize( hdc, &rectBar, lppop, hwnd ); ReleaseDC( hwnd, hdc ); retvalue = lppop->Height; WIN_ReleaseWndPtr(wndPtr); return retvalue; } /******************************************************************* * ChangeMenu16 (USER.153) */ BOOL16 WINAPI ChangeMenu16( HMENU16 hMenu, UINT16 pos, SEGPTR data, UINT16 id, UINT16 flags ) { TRACE("menu=%04x pos=%d data=%08lx id=%04x flags=%04x\n", hMenu, pos, (DWORD)data, id, flags ); if (flags & MF_APPEND) return AppendMenu16( hMenu, flags & ~MF_APPEND, id, data ); /* FIXME: Word passes the item id in 'pos' and 0 or 0xffff as id */ /* for MF_DELETE. We should check the parameters for all others */ /* MF_* actions also (anybody got a doc on ChangeMenu?). */ if (flags & MF_DELETE) return DeleteMenu16(hMenu, pos, flags & ~MF_DELETE); if (flags & MF_CHANGE) return ModifyMenu16(hMenu, pos, flags & ~MF_CHANGE, id, data ); if (flags & MF_REMOVE) return RemoveMenu16(hMenu, flags & MF_BYPOSITION ? pos : id, flags & ~MF_REMOVE ); /* Default: MF_INSERT */ return InsertMenu16( hMenu, pos, flags, id, data ); } /******************************************************************* * ChangeMenuA (USER32.23) */ BOOL WINAPI ChangeMenuA( HMENU hMenu, UINT pos, LPCSTR data, UINT id, UINT flags ) { TRACE("menu=%08x pos=%d data=%08lx id=%08x flags=%08x\n", hMenu, pos, (DWORD)data, id, flags ); if (flags & MF_APPEND) return AppendMenuA( hMenu, flags & ~MF_APPEND, id, data ); if (flags & MF_DELETE) return DeleteMenu(hMenu, pos, flags & ~MF_DELETE); if (flags & MF_CHANGE) return ModifyMenuA(hMenu, pos, flags & ~MF_CHANGE, id, data ); if (flags & MF_REMOVE) return RemoveMenu( hMenu, flags & MF_BYPOSITION ? pos : id, flags & ~MF_REMOVE ); /* Default: MF_INSERT */ return InsertMenuA( hMenu, pos, flags, id, data ); } /******************************************************************* * ChangeMenuW (USER32.24) */ BOOL WINAPI ChangeMenuW( HMENU hMenu, UINT pos, LPCWSTR data, UINT id, UINT flags ) { TRACE("menu=%08x pos=%d data=%08lx id=%08x flags=%08x\n", hMenu, pos, (DWORD)data, id, flags ); if (flags & MF_APPEND) return AppendMenuW( hMenu, flags & ~MF_APPEND, id, data ); if (flags & MF_DELETE) return DeleteMenu(hMenu, pos, flags & ~MF_DELETE); if (flags & MF_CHANGE) return ModifyMenuW(hMenu, pos, flags & ~MF_CHANGE, id, data ); if (flags & MF_REMOVE) return RemoveMenu( hMenu, flags & MF_BYPOSITION ? pos : id, flags & ~MF_REMOVE ); /* Default: MF_INSERT */ return InsertMenuW( hMenu, pos, flags, id, data ); } /******************************************************************* * CheckMenuItem16 (USER.154) */ BOOL16 WINAPI CheckMenuItem16( HMENU16 hMenu, UINT16 id, UINT16 flags ) { return (BOOL16)CheckMenuItem( hMenu, id, flags ); } /******************************************************************* * CheckMenuItem (USER32.46) */ DWORD WINAPI CheckMenuItem( HMENU hMenu, UINT id, UINT flags ) { MENUITEM *item; DWORD ret; TRACE("menu=%04x id=%04x flags=%04x\n", hMenu, id, flags ); if (!(item = MENU_FindItem( &hMenu, &id, flags ))) return -1; ret = item->fState & MF_CHECKED; if (flags & MF_CHECKED) item->fState |= MF_CHECKED; else item->fState &= ~MF_CHECKED; return ret; } /********************************************************************** * EnableMenuItem16 (USER.155) */ UINT16 WINAPI EnableMenuItem16( HMENU16 hMenu, UINT16 wItemID, UINT16 wFlags ) { return EnableMenuItem( hMenu, wItemID, wFlags ); } /********************************************************************** * EnableMenuItem (USER32.170) */ UINT WINAPI EnableMenuItem( HMENU hMenu, UINT wItemID, UINT wFlags ) { UINT oldflags; MENUITEM *item; POPUPMENU *menu; TRACE("(%04x, %04X, %04X) !\n", hMenu, wItemID, wFlags); /* Get the Popupmenu to access the owner menu */ if (!(menu = MENU_GetMenu(hMenu))) return (UINT)-1; if (!(item = MENU_FindItem( &hMenu, &wItemID, wFlags ))) return (UINT)-1; oldflags = item->fState & (MF_GRAYED | MF_DISABLED); item->fState ^= (oldflags ^ wFlags) & (MF_GRAYED | MF_DISABLED); /* In win95 if the close item in the system menu change update the close button */ if (TWEAK_WineLook == WIN95_LOOK) if((item->wID == SC_CLOSE) && (oldflags != wFlags)) { if (menu->hSysMenuOwner != 0) { POPUPMENU* parentMenu; /* Get the parent menu to access*/ if (!(parentMenu = MENU_GetMenu(menu->hSysMenuOwner))) return (UINT)-1; /* Refresh the frame to reflect the change*/ SetWindowPos(parentMenu->hWnd, 0, 0, 0, 0, 0, SWP_NOACTIVATE | SWP_NOMOVE | SWP_NOSIZE | SWP_NOZORDER); } } return oldflags; } /******************************************************************* * GetMenuString16 (USER.161) */ INT16 WINAPI GetMenuString16( HMENU16 hMenu, UINT16 wItemID, LPSTR str, INT16 nMaxSiz, UINT16 wFlags ) { return GetMenuStringA( hMenu, wItemID, str, nMaxSiz, wFlags ); } /******************************************************************* * GetMenuStringA (USER32.268) */ INT WINAPI GetMenuStringA( HMENU hMenu, /* [in] menuhandle */ UINT wItemID, /* [in] menu item (dep. on wFlags) */ LPSTR str, /* [out] outbuffer. If NULL, func returns entry length*/ INT nMaxSiz, /* [in] length of buffer. if 0, func returns entry len*/ UINT wFlags /* [in] MF_ flags */ ) { MENUITEM *item; TRACE("menu=%04x item=%04x ptr=%p len=%d flags=%04x\n", hMenu, wItemID, str, nMaxSiz, wFlags ); if (!(item = MENU_FindItem( &hMenu, &wItemID, wFlags ))) return 0; if (!IS_STRING_ITEM(item->fType)) return 0; if (!str || !nMaxSiz) return strlen(item->text); str[0] = '\0'; lstrcpynA( str, item->text, nMaxSiz ); TRACE("returning '%s'\n", str ); return strlen(str); } /******************************************************************* * GetMenuStringW (USER32.269) */ INT WINAPI GetMenuStringW( HMENU hMenu, UINT wItemID, LPWSTR str, INT nMaxSiz, UINT wFlags ) { MENUITEM *item; TRACE("menu=%04x item=%04x ptr=%p len=%d flags=%04x\n", hMenu, wItemID, str, nMaxSiz, wFlags ); if (!(item = MENU_FindItem( &hMenu, &wItemID, wFlags ))) return 0; if (!IS_STRING_ITEM(item->fType)) return 0; if (!str || !nMaxSiz) return strlen(item->text); str[0] = '\0'; lstrcpynAtoW( str, item->text, nMaxSiz ); return lstrlenW(str); } /********************************************************************** * HiliteMenuItem16 (USER.162) */ BOOL16 WINAPI HiliteMenuItem16( HWND16 hWnd, HMENU16 hMenu, UINT16 wItemID, UINT16 wHilite ) { return HiliteMenuItem( hWnd, hMenu, wItemID, wHilite ); } /********************************************************************** * HiliteMenuItem (USER32.318) */ BOOL WINAPI HiliteMenuItem( HWND hWnd, HMENU hMenu, UINT wItemID, UINT wHilite ) { LPPOPUPMENU menu; TRACE("(%04x, %04x, %04x, %04x);\n", hWnd, hMenu, wItemID, wHilite); if (!MENU_FindItem( &hMenu, &wItemID, wHilite )) return FALSE; if (!(menu = MENU_GetMenu(hMenu))) return FALSE; if (menu->FocusedItem == wItemID) return TRUE; MENU_HideSubPopups( hWnd, hMenu, FALSE ); MENU_SelectItem( hWnd, hMenu, wItemID, TRUE, 0 ); return TRUE; } /********************************************************************** * GetMenuState16 (USER.250) */ UINT16 WINAPI GetMenuState16( HMENU16 hMenu, UINT16 wItemID, UINT16 wFlags ) { return GetMenuState( hMenu, wItemID, wFlags ); } /********************************************************************** * GetMenuState (USER32.267) */ UINT WINAPI GetMenuState( HMENU hMenu, UINT wItemID, UINT wFlags ) { MENUITEM *item; TRACE("(menu=%04x, id=%04x, flags=%04x);\n", hMenu, wItemID, wFlags); if (!(item = MENU_FindItem( &hMenu, &wItemID, wFlags ))) return -1; debug_print_menuitem (" item: ", item, ""); if (item->fType & MF_POPUP) { POPUPMENU *menu = MENU_GetMenu( item->hSubMenu ); if (!menu) return -1; else return (menu->nItems << 8) | ((item->fState|item->fType) & 0xff); } else { /* We used to (from way back then) mask the result to 0xff. */ /* I don't know why and it seems wrong as the documented */ /* return flag MF_SEPARATOR is outside that mask. */ return (item->fType | item->fState); } } /********************************************************************** * GetMenuItemCount16 (USER.263) */ INT16 WINAPI GetMenuItemCount16( HMENU16 hMenu ) { LPPOPUPMENU menu = MENU_GetMenu(hMenu); if (!menu) return -1; TRACE("(%04x) returning %d\n", hMenu, menu->nItems ); return menu->nItems; } /********************************************************************** * GetMenuItemCount (USER32.262) */ INT WINAPI GetMenuItemCount( HMENU hMenu ) { LPPOPUPMENU menu = MENU_GetMenu(hMenu); if (!menu) return -1; TRACE("(%04x) returning %d\n", hMenu, menu->nItems ); return menu->nItems; } /********************************************************************** * GetMenuItemID16 (USER.264) */ UINT16 WINAPI GetMenuItemID16( HMENU16 hMenu, INT16 nPos ) { return (UINT16) GetMenuItemID (hMenu, nPos); } /********************************************************************** * GetMenuItemID (USER32.263) */ UINT WINAPI GetMenuItemID( HMENU hMenu, INT nPos ) { MENUITEM * lpmi; if (!(lpmi = MENU_FindItem(&hMenu,&nPos,MF_BYPOSITION))) return 0; if (lpmi->fType & MF_POPUP) return -1; return lpmi->wID; } /******************************************************************* * InsertMenu16 (USER.410) */ BOOL16 WINAPI InsertMenu16( HMENU16 hMenu, UINT16 pos, UINT16 flags, UINT16 id, SEGPTR data ) { UINT pos32 = (UINT)pos; if ((pos == (UINT16)-1) && (flags & MF_BYPOSITION)) pos32 = (UINT)-1; if (IS_STRING_ITEM(flags) && data) return InsertMenuA( hMenu, pos32, flags, id, (LPSTR)PTR_SEG_TO_LIN(data) ); return InsertMenuA( hMenu, pos32, flags, id, (LPSTR)data ); } /******************************************************************* * InsertMenuA (USER32.322) */ BOOL WINAPI InsertMenuA( HMENU hMenu, UINT pos, UINT flags, UINT id, LPCSTR str ) { MENUITEM *item; if (IS_STRING_ITEM(flags) && str) TRACE("hMenu %04x, pos %d, flags %08x, " "id %04x, str '%s'\n", hMenu, pos, flags, id, str ); else TRACE("hMenu %04x, pos %d, flags %08x, " "id %04x, str %08lx (not a string)\n", hMenu, pos, flags, id, (DWORD)str ); if (!(item = MENU_InsertItem( hMenu, pos, flags ))) return FALSE; if (!(MENU_SetItemData( item, flags, id, str ))) { RemoveMenu( hMenu, pos, flags ); return FALSE; } if (flags & MF_POPUP) /* Set the MF_POPUP flag on the popup-menu */ (MENU_GetMenu((HMENU16)id))->wFlags |= MF_POPUP; item->hCheckBit = item->hUnCheckBit = 0; return TRUE; } /******************************************************************* * InsertMenuW (USER32.325) */ BOOL WINAPI InsertMenuW( HMENU hMenu, UINT pos, UINT flags, UINT id, LPCWSTR str ) { BOOL ret; if (IS_STRING_ITEM(flags) && str) { LPSTR newstr = HEAP_strdupWtoA( GetProcessHeap(), 0, str ); ret = InsertMenuA( hMenu, pos, flags, id, newstr ); HeapFree( GetProcessHeap(), 0, newstr ); return ret; } else return InsertMenuA( hMenu, pos, flags, id, (LPCSTR)str ); } /******************************************************************* * AppendMenu16 (USER.411) */ BOOL16 WINAPI AppendMenu16(HMENU16 hMenu, UINT16 flags, UINT16 id, SEGPTR data) { return InsertMenu16( hMenu, -1, flags | MF_BYPOSITION, id, data ); } /******************************************************************* * AppendMenuA (USER32.5) */ BOOL WINAPI AppendMenuA( HMENU hMenu, UINT flags, UINT id, LPCSTR data ) { return InsertMenuA( hMenu, -1, flags | MF_BYPOSITION, id, data ); } /******************************************************************* * AppendMenuW (USER32.6) */ BOOL WINAPI AppendMenuW( HMENU hMenu, UINT flags, UINT id, LPCWSTR data ) { return InsertMenuW( hMenu, -1, flags | MF_BYPOSITION, id, data ); } /********************************************************************** * RemoveMenu16 (USER.412) */ BOOL16 WINAPI RemoveMenu16( HMENU16 hMenu, UINT16 nPos, UINT16 wFlags ) { return RemoveMenu( hMenu, nPos, wFlags ); } /********************************************************************** * RemoveMenu (USER32.441) */ BOOL WINAPI RemoveMenu( HMENU hMenu, UINT nPos, UINT wFlags ) { LPPOPUPMENU menu; MENUITEM *item; TRACE("(menu=%04x pos=%04x flags=%04x)\n",hMenu, nPos, wFlags); if (!(item = MENU_FindItem( &hMenu, &nPos, wFlags ))) return FALSE; if (!(menu = MENU_GetMenu(hMenu))) return FALSE; /* Remove item */ MENU_FreeItemData( item ); if (--menu->nItems == 0) { HeapFree( SystemHeap, 0, menu->items ); menu->items = NULL; } else { while(nPos < menu->nItems) { *item = *(item+1); item++; nPos++; } menu->items = HeapReAlloc( SystemHeap, 0, menu->items, menu->nItems * sizeof(MENUITEM) ); } return TRUE; } /********************************************************************** * DeleteMenu16 (USER.413) */ BOOL16 WINAPI DeleteMenu16( HMENU16 hMenu, UINT16 nPos, UINT16 wFlags ) { return DeleteMenu( hMenu, nPos, wFlags ); } /********************************************************************** * DeleteMenu (USER32.129) */ BOOL WINAPI DeleteMenu( HMENU hMenu, UINT nPos, UINT wFlags ) { MENUITEM *item = MENU_FindItem( &hMenu, &nPos, wFlags ); if (!item) return FALSE; if (item->fType & MF_POPUP) DestroyMenu( item->hSubMenu ); /* nPos is now the position of the item */ RemoveMenu( hMenu, nPos, wFlags | MF_BYPOSITION ); return TRUE; } /******************************************************************* * ModifyMenu16 (USER.414) */ BOOL16 WINAPI ModifyMenu16( HMENU16 hMenu, UINT16 pos, UINT16 flags, UINT16 id, SEGPTR data ) { if (IS_STRING_ITEM(flags)) return ModifyMenuA( hMenu, pos, flags, id, (LPSTR)PTR_SEG_TO_LIN(data) ); return ModifyMenuA( hMenu, pos, flags, id, (LPSTR)data ); } /******************************************************************* * ModifyMenuA (USER32.397) */ BOOL WINAPI ModifyMenuA( HMENU hMenu, UINT pos, UINT flags, UINT id, LPCSTR str ) { MENUITEM *item; if (IS_STRING_ITEM(flags)) { TRACE("%04x %d %04x %04x '%s'\n", hMenu, pos, flags, id, str ? str : "#NULL#" ); if (!str) return FALSE; } else { TRACE("%04x %d %04x %04x %08lx\n", hMenu, pos, flags, id, (DWORD)str ); } if (!(item = MENU_FindItem( &hMenu, &pos, flags ))) return FALSE; return MENU_SetItemData( item, flags, id, str ); } /******************************************************************* * ModifyMenuW (USER32.398) */ BOOL WINAPI ModifyMenuW( HMENU hMenu, UINT pos, UINT flags, UINT id, LPCWSTR str ) { BOOL ret; if (IS_STRING_ITEM(flags) && str) { LPSTR newstr = HEAP_strdupWtoA( GetProcessHeap(), 0, str ); ret = ModifyMenuA( hMenu, pos, flags, id, newstr ); HeapFree( GetProcessHeap(), 0, newstr ); return ret; } else return ModifyMenuA( hMenu, pos, flags, id, (LPCSTR)str ); } /********************************************************************** * CreatePopupMenu16 (USER.415) */ HMENU16 WINAPI CreatePopupMenu16(void) { return CreatePopupMenu(); } /********************************************************************** * CreatePopupMenu (USER32.82) */ HMENU WINAPI CreatePopupMenu(void) { HMENU hmenu; POPUPMENU *menu; if (!(hmenu = CreateMenu())) return 0; menu = (POPUPMENU *) USER_HEAP_LIN_ADDR( hmenu ); menu->wFlags |= MF_POPUP; menu->bTimeToHide = FALSE; return hmenu; } /********************************************************************** * GetMenuCheckMarkDimensions (USER.417) (USER32.258) */ DWORD WINAPI GetMenuCheckMarkDimensions(void) { return MAKELONG( check_bitmap_width, check_bitmap_height ); } /********************************************************************** * SetMenuItemBitmaps16 (USER.418) */ BOOL16 WINAPI SetMenuItemBitmaps16( HMENU16 hMenu, UINT16 nPos, UINT16 wFlags, HBITMAP16 hNewUnCheck, HBITMAP16 hNewCheck) { return SetMenuItemBitmaps( hMenu, nPos, wFlags, hNewUnCheck, hNewCheck ); } /********************************************************************** * SetMenuItemBitmaps (USER32.490) */ BOOL WINAPI SetMenuItemBitmaps( HMENU hMenu, UINT nPos, UINT wFlags, HBITMAP hNewUnCheck, HBITMAP hNewCheck) { MENUITEM *item; TRACE("(%04x, %04x, %04x, %04x, %04x)\n", hMenu, nPos, wFlags, hNewCheck, hNewUnCheck); if (!(item = MENU_FindItem( &hMenu, &nPos, wFlags ))) return FALSE; if (!hNewCheck && !hNewUnCheck) { item->fState &= ~MF_USECHECKBITMAPS; } else /* Install new bitmaps */ { item->hCheckBit = hNewCheck; item->hUnCheckBit = hNewUnCheck; item->fState |= MF_USECHECKBITMAPS; } return TRUE; } /********************************************************************** * CreateMenu16 (USER.151) */ HMENU16 WINAPI CreateMenu16(void) { return CreateMenu(); } /********************************************************************** * CreateMenu (USER32.81) */ HMENU WINAPI CreateMenu(void) { HMENU hMenu; LPPOPUPMENU menu; if (!(hMenu = USER_HEAP_ALLOC( sizeof(POPUPMENU) ))) return 0; menu = (LPPOPUPMENU) USER_HEAP_LIN_ADDR(hMenu); ZeroMemory(menu, sizeof(POPUPMENU)); menu->wMagic = MENU_MAGIC; menu->FocusedItem = NO_SELECTED_ITEM; menu->bTimeToHide = FALSE; TRACE("return %04x\n", hMenu ); return hMenu; } /********************************************************************** * DestroyMenu16 (USER.152) */ BOOL16 WINAPI DestroyMenu16( HMENU16 hMenu ) { return DestroyMenu( hMenu ); } /********************************************************************** * DestroyMenu (USER32.134) */ BOOL WINAPI DestroyMenu( HMENU hMenu ) { TRACE("(%04x)\n", hMenu); /* Silently ignore attempts to destroy default system popup */ if (hMenu && hMenu != MENU_DefSysPopup) { LPPOPUPMENU lppop = (LPPOPUPMENU) USER_HEAP_LIN_ADDR(hMenu); WND *pTPWnd = MENU_GetTopPopupWnd(); if( pTPWnd && (hMenu == *(HMENU*)pTPWnd->wExtra) ) *(UINT*)pTPWnd->wExtra = 0; if (!IS_A_MENU(lppop)) lppop = NULL; if ( lppop ) { lppop->wMagic = 0; /* Mark it as destroyed */ if ((lppop->wFlags & MF_POPUP) && lppop->hWnd && (!pTPWnd || (lppop->hWnd != pTPWnd->hwndSelf))) DestroyWindow( lppop->hWnd ); if (lppop->items) /* recursively destroy submenus */ { int i; MENUITEM *item = lppop->items; for (i = lppop->nItems; i > 0; i--, item++) { if (item->fType & MF_POPUP) DestroyMenu(item->hSubMenu); MENU_FreeItemData( item ); } HeapFree( SystemHeap, 0, lppop->items ); } USER_HEAP_FREE( hMenu ); MENU_ReleaseTopPopupWnd(); } else { MENU_ReleaseTopPopupWnd(); return FALSE; } } return (hMenu != MENU_DefSysPopup); } /********************************************************************** * GetSystemMenu16 (USER.156) */ HMENU16 WINAPI GetSystemMenu16( HWND16 hWnd, BOOL16 bRevert ) { return GetSystemMenu( hWnd, bRevert ); } /********************************************************************** * GetSystemMenu (USER32.291) */ HMENU WINAPI GetSystemMenu( HWND hWnd, BOOL bRevert ) { WND *wndPtr = WIN_FindWndPtr( hWnd ); HMENU retvalue = 0; if (wndPtr) { if( wndPtr->hSysMenu ) { if( bRevert ) { DestroyMenu(wndPtr->hSysMenu); wndPtr->hSysMenu = 0; } else { POPUPMENU *menu = MENU_GetMenu( wndPtr->hSysMenu ); if( menu ) { if( menu->nItems > 0 && menu->items[0].hSubMenu == MENU_DefSysPopup ) menu->items[0].hSubMenu = MENU_CopySysPopup(); } else { WARN("Current sys-menu (%04x) of wnd %04x is broken\n", wndPtr->hSysMenu, hWnd); wndPtr->hSysMenu = 0; } } } if(!wndPtr->hSysMenu && (wndPtr->dwStyle & WS_SYSMENU) ) wndPtr->hSysMenu = MENU_GetSysMenu( hWnd, (HMENU)(-1) ); if( wndPtr->hSysMenu ) { POPUPMENU *menu; retvalue = GetSubMenu16(wndPtr->hSysMenu, 0); /* Store the dummy sysmenu handle to facilitate the refresh */ /* of the close button if the SC_CLOSE item change */ menu = MENU_GetMenu(retvalue); if ( menu ) menu->hSysMenuOwner = wndPtr->hSysMenu; } WIN_ReleaseWndPtr(wndPtr); } return retvalue; } /******************************************************************* * SetSystemMenu16 (USER.280) */ BOOL16 WINAPI SetSystemMenu16( HWND16 hwnd, HMENU16 hMenu ) { return SetSystemMenu( hwnd, hMenu ); } /******************************************************************* * SetSystemMenu (USER32.508) */ BOOL WINAPI SetSystemMenu( HWND hwnd, HMENU hMenu ) { WND *wndPtr = WIN_FindWndPtr(hwnd); if (wndPtr) { if (wndPtr->hSysMenu) DestroyMenu( wndPtr->hSysMenu ); wndPtr->hSysMenu = MENU_GetSysMenu( hwnd, hMenu ); WIN_ReleaseWndPtr(wndPtr); return TRUE; } return FALSE; } /********************************************************************** * GetMenu16 (USER.157) */ HMENU16 WINAPI GetMenu16( HWND16 hWnd ) { return (HMENU16)GetMenu(hWnd); } /********************************************************************** * GetMenu (USER32.257) */ HMENU WINAPI GetMenu( HWND hWnd ) { HMENU retvalue; WND * wndPtr = WIN_FindWndPtr(hWnd); if (wndPtr && !(wndPtr->dwStyle & WS_CHILD)) { retvalue = (HMENU)wndPtr->wIDmenu; goto END; } retvalue = 0; END: WIN_ReleaseWndPtr(wndPtr); return retvalue; } /********************************************************************** * SetMenu16 (USER.158) */ BOOL16 WINAPI SetMenu16( HWND16 hWnd, HMENU16 hMenu ) { return SetMenu( hWnd, hMenu ); } /********************************************************************** * SetMenu (USER32.487) */ BOOL WINAPI SetMenu( HWND hWnd, HMENU hMenu ) { WND * wndPtr = WIN_FindWndPtr(hWnd); TRACE("(%04x, %04x);\n", hWnd, hMenu); if (hMenu && !IsMenu(hMenu)) { WARN("hMenu is not a menu handle\n"); return FALSE; } if (wndPtr && !(wndPtr->dwStyle & WS_CHILD)) { if (GetCapture() == hWnd) ReleaseCapture(); wndPtr->wIDmenu = (UINT)hMenu; if (hMenu != 0) { LPPOPUPMENU lpmenu; if (!(lpmenu = MENU_GetMenu(hMenu))) { WIN_ReleaseWndPtr(wndPtr); return FALSE; } lpmenu->hWnd = hWnd; lpmenu->wFlags &= ~MF_POPUP; /* Can't be a popup */ lpmenu->Height = 0; /* Make sure we recalculate the size */ } if (IsWindowVisible(hWnd)) SetWindowPos( hWnd, 0, 0, 0, 0, 0, SWP_NOSIZE | SWP_NOMOVE | SWP_NOACTIVATE | SWP_NOZORDER | SWP_FRAMECHANGED ); WIN_ReleaseWndPtr(wndPtr); return TRUE; } WIN_ReleaseWndPtr(wndPtr); return FALSE; } /********************************************************************** * GetSubMenu16 (USER.159) */ HMENU16 WINAPI GetSubMenu16( HMENU16 hMenu, INT16 nPos ) { return GetSubMenu( hMenu, nPos ); } /********************************************************************** * GetSubMenu (USER32.288) */ HMENU WINAPI GetSubMenu( HMENU hMenu, INT nPos ) { MENUITEM * lpmi; if (!(lpmi = MENU_FindItem(&hMenu,&nPos,MF_BYPOSITION))) return 0; if (!(lpmi->fType & MF_POPUP)) return 0; return lpmi->hSubMenu; } /********************************************************************** * DrawMenuBar16 (USER.160) */ void WINAPI DrawMenuBar16( HWND16 hWnd ) { DrawMenuBar( hWnd ); } /********************************************************************** * DrawMenuBar (USER32.161) */ BOOL WINAPI DrawMenuBar( HWND hWnd ) { LPPOPUPMENU lppop; WND *wndPtr = WIN_FindWndPtr(hWnd); if (wndPtr && !(wndPtr->dwStyle & WS_CHILD) && wndPtr->wIDmenu) { lppop = MENU_GetMenu((HMENU16)wndPtr->wIDmenu); if (lppop == NULL) { WIN_ReleaseWndPtr(wndPtr); return FALSE; } lppop->Height = 0; /* Make sure we call MENU_MenuBarCalcSize */ lppop->hwndOwner = hWnd; SetWindowPos( hWnd, 0, 0, 0, 0, 0, SWP_NOSIZE | SWP_NOMOVE | SWP_NOACTIVATE | SWP_NOZORDER | SWP_FRAMECHANGED ); WIN_ReleaseWndPtr(wndPtr); return TRUE; } WIN_ReleaseWndPtr(wndPtr); return FALSE; } /*********************************************************************** * EndMenu (USER.187) (USER32.175) */ void WINAPI EndMenu(void) { /* if we are in the menu code, and it is active */ if (fEndMenu == FALSE && MENU_IsMenuActive()) { /* terminate the menu handling code */ fEndMenu = TRUE; /* needs to be posted to wakeup the internal menu handler */ /* which will now terminate the menu, in the event that */ /* the main window was minimized, or lost focus, so we */ /* don't end up with an orphaned menu */ PostMessageA( pTopPopupWnd->hwndSelf, WM_CANCELMODE, 0, 0); } } /*********************************************************************** * LookupMenuHandle (USER.217) */ HMENU16 WINAPI LookupMenuHandle16( HMENU16 hmenu, INT16 id ) { HMENU hmenu32 = hmenu; UINT id32 = id; if (!MENU_FindItem( &hmenu32, &id32, MF_BYCOMMAND )) return 0; else return hmenu32; } /********************************************************************** * LoadMenu16 (USER.150) */ HMENU16 WINAPI LoadMenu16( HINSTANCE16 instance, SEGPTR name ) { HRSRC16 hRsrc; HGLOBAL16 handle; HMENU16 hMenu; if (HIWORD(name)) { char *str = (char *)PTR_SEG_TO_LIN( name ); TRACE("(%04x,'%s')\n", instance, str ); if (str[0] == '#') name = (SEGPTR)atoi( str + 1 ); } else TRACE("(%04x,%04x)\n",instance,LOWORD(name)); if (!name) return 0; /* check for Win32 module */ if (HIWORD(instance)) return LoadMenuA(instance,PTR_SEG_TO_LIN(name)); instance = GetExePtr( instance ); if (!(hRsrc = FindResource16( instance, name, RT_MENU16 ))) return 0; if (!(handle = LoadResource16( instance, hRsrc ))) return 0; hMenu = LoadMenuIndirect16(LockResource16(handle)); FreeResource16( handle ); return hMenu; } /***************************************************************** * LoadMenuA (USER32.370) */ HMENU WINAPI LoadMenuA( HINSTANCE instance, LPCSTR name ) { HRSRC hrsrc = FindResourceA( instance, name, RT_MENUA ); if (!hrsrc) return 0; return LoadMenuIndirectA( (LPCVOID)LoadResource( instance, hrsrc )); } /***************************************************************** * LoadMenuW (USER32.373) */ HMENU WINAPI LoadMenuW( HINSTANCE instance, LPCWSTR name ) { HRSRC hrsrc = FindResourceW( instance, name, RT_MENUW ); if (!hrsrc) return 0; return LoadMenuIndirectW( (LPCVOID)LoadResource( instance, hrsrc )); } /********************************************************************** * LoadMenuIndirect16 (USER.220) */ HMENU16 WINAPI LoadMenuIndirect16( LPCVOID template ) { HMENU16 hMenu; WORD version, offset; LPCSTR p = (LPCSTR)template; TRACE("(%p)\n", template ); version = GET_WORD(p); p += sizeof(WORD); if (version) { WARN("version must be 0 for Win16\n" ); return 0; } offset = GET_WORD(p); p += sizeof(WORD) + offset; if (!(hMenu = CreateMenu())) return 0; if (!MENU_ParseResource( p, hMenu, FALSE )) { DestroyMenu( hMenu ); return 0; } return hMenu; } /********************************************************************** * LoadMenuIndirectA (USER32.371) */ HMENU WINAPI LoadMenuIndirectA( LPCVOID template ) { HMENU16 hMenu; WORD version, offset; LPCSTR p = (LPCSTR)template; TRACE("%p\n", template ); version = GET_WORD(p); p += sizeof(WORD); switch (version) { case 0: offset = GET_WORD(p); p += sizeof(WORD) + offset; if (!(hMenu = CreateMenu())) return 0; if (!MENU_ParseResource( p, hMenu, TRUE )) { DestroyMenu( hMenu ); return 0; } return hMenu; case 1: offset = GET_WORD(p); p += sizeof(WORD) + offset; if (!(hMenu = CreateMenu())) return 0; if (!MENUEX_ParseResource( p, hMenu)) { DestroyMenu( hMenu ); return 0; } return hMenu; default: ERR("version %d not supported.\n", version); return 0; } } /********************************************************************** * LoadMenuIndirectW (USER32.372) */ HMENU WINAPI LoadMenuIndirectW( LPCVOID template ) { /* FIXME: is there anything different between A and W? */ return LoadMenuIndirectA( template ); } /********************************************************************** * IsMenu16 (USER.358) */ BOOL16 WINAPI IsMenu16( HMENU16 hmenu ) { LPPOPUPMENU menu = (LPPOPUPMENU) USER_HEAP_LIN_ADDR(hmenu); return IS_A_MENU(menu); } /********************************************************************** * IsMenu (USER32.346) */ BOOL WINAPI IsMenu(HMENU hmenu) { LPPOPUPMENU menu = (LPPOPUPMENU) USER_HEAP_LIN_ADDR(hmenu); return IS_A_MENU(menu); } /********************************************************************** * GetMenuItemInfo_common */ static BOOL GetMenuItemInfo_common ( HMENU hmenu, UINT item, BOOL bypos, LPMENUITEMINFOA lpmii, BOOL unicode) { MENUITEM *menu = MENU_FindItem (&hmenu, &item, bypos? MF_BYPOSITION : 0); debug_print_menuitem("GetMenuItemInfo_common: ", menu, ""); if (!menu) return FALSE; if (lpmii->fMask & MIIM_TYPE) { lpmii->fType = menu->fType; switch (MENU_ITEM_TYPE(menu->fType)) { case MF_STRING: if (menu->text) { int len = lstrlenA(menu->text); if(lpmii->dwTypeData && lpmii->cch) { if (unicode) lstrcpynAtoW((LPWSTR) lpmii->dwTypeData, menu->text, lpmii->cch); else lstrcpynA(lpmii->dwTypeData, menu->text, lpmii->cch); /* if we've copied a substring we return its length */ if(lpmii->cch <= len) lpmii->cch--; } else /* return length of string */ lpmii->cch = len; } break; case MF_OWNERDRAW: case MF_BITMAP: lpmii->dwTypeData = menu->text; /* fall through */ default: lpmii->cch = 0; } } if (lpmii->fMask & MIIM_STRING) { if(lpmii->dwTypeData && lpmii->cch) { if (unicode) lstrcpynAtoW((LPWSTR) lpmii->dwTypeData, menu->text, lpmii->cch); else lstrcpynA(lpmii->dwTypeData, menu->text, lpmii->cch); } lpmii->cch = lstrlenA(menu->text); } if (lpmii->fMask & MIIM_FTYPE) lpmii->fType = menu->fType; if (lpmii->fMask & MIIM_BITMAP) lpmii->hbmpItem = menu->hbmpItem; if (lpmii->fMask & MIIM_STATE) lpmii->fState = menu->fState; if (lpmii->fMask & MIIM_ID) lpmii->wID = menu->wID; if (lpmii->fMask & MIIM_SUBMENU) lpmii->hSubMenu = menu->hSubMenu; if (lpmii->fMask & MIIM_CHECKMARKS) { lpmii->hbmpChecked = menu->hCheckBit; lpmii->hbmpUnchecked = menu->hUnCheckBit; } if (lpmii->fMask & MIIM_DATA) lpmii->dwItemData = menu->dwItemData; return TRUE; } /********************************************************************** * GetMenuItemInfoA (USER32.264) */ BOOL WINAPI GetMenuItemInfoA( HMENU hmenu, UINT item, BOOL bypos, LPMENUITEMINFOA lpmii) { return GetMenuItemInfo_common (hmenu, item, bypos, lpmii, FALSE); } /********************************************************************** * GetMenuItemInfoW (USER32.265) */ BOOL WINAPI GetMenuItemInfoW( HMENU hmenu, UINT item, BOOL bypos, LPMENUITEMINFOW lpmii) { return GetMenuItemInfo_common (hmenu, item, bypos, (LPMENUITEMINFOA)lpmii, TRUE); } /********************************************************************** * SetMenuItemInfo_common */ static BOOL SetMenuItemInfo_common(MENUITEM * menu, const MENUITEMINFOA *lpmii, BOOL unicode) { if (!menu) return FALSE; if (lpmii->fMask & MIIM_TYPE ) { /* Get rid of old string. */ if ( IS_STRING_ITEM(menu->fType) && menu->text) { HeapFree(SystemHeap, 0, menu->text); menu->text = NULL; } /* make only MENU_ITEM_TYPE bits in menu->fType equal lpmii->fType */ menu->fType &= ~MENU_ITEM_TYPE(menu->fType); menu->fType |= MENU_ITEM_TYPE(lpmii->fType); menu->text = lpmii->dwTypeData; if (IS_STRING_ITEM(menu->fType) && menu->text) { if (unicode) menu->text = HEAP_strdupWtoA(SystemHeap, 0, (LPWSTR) lpmii->dwTypeData); else menu->text = HEAP_strdupA(SystemHeap, 0, lpmii->dwTypeData); } } if (lpmii->fMask & MIIM_FTYPE ) { /* free the string when the type is changing */ if ( (!IS_STRING_ITEM(lpmii->fType)) && IS_STRING_ITEM(menu->fType) && menu->text) { HeapFree(SystemHeap, 0, menu->text); menu->text = NULL; } menu->fType &= ~MENU_ITEM_TYPE(menu->fType); menu->fType |= MENU_ITEM_TYPE(lpmii->fType); } if (lpmii->fMask & MIIM_STRING ) { /* free the string when used */ if ( IS_STRING_ITEM(menu->fType) && menu->text) { HeapFree(SystemHeap, 0, menu->text); if (unicode) menu->text = HEAP_strdupWtoA(SystemHeap, 0, (LPWSTR) lpmii->dwTypeData); else menu->text = HEAP_strdupA(SystemHeap, 0, lpmii->dwTypeData); } } if (lpmii->fMask & MIIM_STATE) { /* fixme: MFS_DEFAULT do we have to reset the other menu items? */ menu->fState = lpmii->fState; } if (lpmii->fMask & MIIM_ID) menu->wID = lpmii->wID; if (lpmii->fMask & MIIM_SUBMENU) { menu->hSubMenu = lpmii->hSubMenu; if (menu->hSubMenu) { POPUPMENU *subMenu = MENU_GetMenu((UINT16)menu->hSubMenu); if (subMenu) { subMenu->wFlags |= MF_POPUP; menu->fType |= MF_POPUP; } else /* FIXME: Return an error ? */ menu->fType &= ~MF_POPUP; } else menu->fType &= ~MF_POPUP; } if (lpmii->fMask & MIIM_CHECKMARKS) { if (lpmii->fType & MFT_RADIOCHECK) menu->fType |= MFT_RADIOCHECK; menu->hCheckBit = lpmii->hbmpChecked; menu->hUnCheckBit = lpmii->hbmpUnchecked; } if (lpmii->fMask & MIIM_DATA) menu->dwItemData = lpmii->dwItemData; debug_print_menuitem("SetMenuItemInfo_common: ", menu, ""); return TRUE; } /********************************************************************** * SetMenuItemInfoA (USER32.491) */ BOOL WINAPI SetMenuItemInfoA(HMENU hmenu, UINT item, BOOL bypos, const MENUITEMINFOA *lpmii) { return SetMenuItemInfo_common(MENU_FindItem(&hmenu, &item, bypos? MF_BYPOSITION : 0), lpmii, FALSE); } /********************************************************************** * SetMenuItemInfoW (USER32.492) */ BOOL WINAPI SetMenuItemInfoW(HMENU hmenu, UINT item, BOOL bypos, const MENUITEMINFOW *lpmii) { return SetMenuItemInfo_common(MENU_FindItem(&hmenu, &item, bypos? MF_BYPOSITION : 0), (const MENUITEMINFOA*)lpmii, TRUE); } /********************************************************************** * SetMenuDefaultItem (USER32.489) * */ BOOL WINAPI SetMenuDefaultItem(HMENU hmenu, UINT uItem, UINT bypos) { UINT i; POPUPMENU *menu; MENUITEM *item; TRACE("(0x%x,%d,%d)\n", hmenu, uItem, bypos); if (!(menu = MENU_GetMenu(hmenu))) return FALSE; /* reset all default-item flags */ item = menu->items; for (i = 0; i < menu->nItems; i++, item++) { item->fState &= ~MFS_DEFAULT; } /* no default item */ if ( -1 == uItem) { return TRUE; } item = menu->items; if ( bypos ) { if ( uItem >= menu->nItems ) return FALSE; item[uItem].fState |= MFS_DEFAULT; return TRUE; } else { for (i = 0; i < menu->nItems; i++, item++) { if (item->wID == uItem) { item->fState |= MFS_DEFAULT; return TRUE; } } } return FALSE; } /********************************************************************** * GetMenuDefaultItem (USER32.260) */ UINT WINAPI GetMenuDefaultItem(HMENU hmenu, UINT bypos, UINT flags) { POPUPMENU *menu; MENUITEM * item; UINT i = 0; TRACE("(0x%x,%d,%d)\n", hmenu, bypos, flags); if (!(menu = MENU_GetMenu(hmenu))) return -1; /* find default item */ item = menu->items; /* empty menu */ if (! item) return -1; while ( !( item->fState & MFS_DEFAULT ) ) { i++; item++; if (i >= menu->nItems ) return -1; } /* default: don't return disabled items */ if ( (!(GMDI_USEDISABLED & flags)) && (item->fState & MFS_DISABLED )) return -1; /* search rekursiv when needed */ if ( (item->fType & MF_POPUP) && (flags & GMDI_GOINTOPOPUPS) ) { UINT ret; ret = GetMenuDefaultItem( item->hSubMenu, bypos, flags ); if ( -1 != ret ) return ret; /* when item not found in submenu, return the popup item */ } return ( bypos ) ? i : item->wID; } /******************************************************************* * InsertMenuItem16 (USER.441) * * FIXME: untested */ BOOL16 WINAPI InsertMenuItem16( HMENU16 hmenu, UINT16 pos, BOOL16 byposition, const MENUITEMINFO16 *mii ) { MENUITEMINFOA miia; miia.cbSize = sizeof(miia); miia.fMask = mii->fMask; miia.dwTypeData = mii->dwTypeData; miia.fType = mii->fType; miia.fState = mii->fState; miia.wID = mii->wID; miia.hSubMenu = mii->hSubMenu; miia.hbmpChecked = mii->hbmpChecked; miia.hbmpUnchecked = mii->hbmpUnchecked; miia.dwItemData = mii->dwItemData; miia.cch = mii->cch; if (IS_STRING_ITEM(miia.fType)) miia.dwTypeData = PTR_SEG_TO_LIN(miia.dwTypeData); return InsertMenuItemA( hmenu, pos, byposition, &miia ); } /********************************************************************** * InsertMenuItemA (USER32.323) */ BOOL WINAPI InsertMenuItemA(HMENU hMenu, UINT uItem, BOOL bypos, const MENUITEMINFOA *lpmii) { MENUITEM *item = MENU_InsertItem(hMenu, uItem, bypos ? MF_BYPOSITION : 0 ); return SetMenuItemInfo_common(item, lpmii, FALSE); } /********************************************************************** * InsertMenuItemW (USER32.324) */ BOOL WINAPI InsertMenuItemW(HMENU hMenu, UINT uItem, BOOL bypos, const MENUITEMINFOW *lpmii) { MENUITEM *item = MENU_InsertItem(hMenu, uItem, bypos ? MF_BYPOSITION : 0 ); return SetMenuItemInfo_common(item, (const MENUITEMINFOA*)lpmii, TRUE); } /********************************************************************** * CheckMenuRadioItem (USER32.47) */ BOOL WINAPI CheckMenuRadioItem(HMENU hMenu, UINT first, UINT last, UINT check, UINT bypos) { MENUITEM *mifirst, *milast, *micheck; HMENU mfirst = hMenu, mlast = hMenu, mcheck = hMenu; TRACE("ox%x: %d-%d, check %d, bypos=%d\n", hMenu, first, last, check, bypos); mifirst = MENU_FindItem (&mfirst, &first, bypos); milast = MENU_FindItem (&mlast, &last, bypos); micheck = MENU_FindItem (&mcheck, &check, bypos); if (mifirst == NULL || milast == NULL || micheck == NULL || mifirst > milast || mfirst != mlast || mfirst != mcheck || micheck > milast || micheck < mifirst) return FALSE; while (mifirst <= milast) { if (mifirst == micheck) { mifirst->fType |= MFT_RADIOCHECK; mifirst->fState |= MFS_CHECKED; } else { mifirst->fType &= ~MFT_RADIOCHECK; mifirst->fState &= ~MFS_CHECKED; } mifirst++; } return TRUE; } /********************************************************************** * CheckMenuRadioItem16 (not a Windows API) */ BOOL16 WINAPI CheckMenuRadioItem16(HMENU16 hMenu, UINT16 first, UINT16 last, UINT16 check, BOOL16 bypos) { return CheckMenuRadioItem (hMenu, first, last, check, bypos); } /********************************************************************** * GetMenuItemRect (USER32.266) * * ATTENTION: Here, the returned values in rect are the screen * coordinates of the item just like if the menu was * always on the upper left side of the application. * */ BOOL WINAPI GetMenuItemRect (HWND hwnd, HMENU hMenu, UINT uItem, LPRECT rect) { POPUPMENU *itemMenu; MENUITEM *item; HWND referenceHwnd; TRACE("(0x%x,0x%x,%d,%p)\n", hwnd, hMenu, uItem, rect); item = MENU_FindItem (&hMenu, &uItem, MF_BYPOSITION); referenceHwnd = hwnd; if(!hwnd) { itemMenu = MENU_GetMenu(hMenu); if (itemMenu == NULL) return FALSE; if(itemMenu->hWnd == 0) return FALSE; referenceHwnd = itemMenu->hWnd; } if ((rect == NULL) || (item == NULL)) return FALSE; *rect = item->rect; MapWindowPoints(referenceHwnd, 0, (LPPOINT)rect, 2); return TRUE; } /********************************************************************** * GetMenuItemRect16 (USER.665) */ BOOL16 WINAPI GetMenuItemRect16 (HWND16 hwnd, HMENU16 hMenu, UINT16 uItem, LPRECT16 rect) { RECT r32; BOOL res; if (!rect) return FALSE; res = GetMenuItemRect (hwnd, hMenu, uItem, &r32); CONV_RECT32TO16 (&r32, rect); return res; } /********************************************************************** * SetMenuInfo * * FIXME * MIM_APPLYTOSUBMENUS * actually use the items to draw the menu */ BOOL WINAPI SetMenuInfo (HMENU hMenu, LPCMENUINFO lpmi) { POPUPMENU *menu; TRACE("(0x%04x %p)\n", hMenu, lpmi); if (lpmi && (lpmi->cbSize==sizeof(MENUINFO)) && (menu = MENU_GetMenu(hMenu))) { if (lpmi->fMask & MIM_BACKGROUND) menu->hbrBack = lpmi->hbrBack; if (lpmi->fMask & MIM_HELPID) menu->dwContextHelpID = lpmi->dwContextHelpID; if (lpmi->fMask & MIM_MAXHEIGHT) menu->cyMax = lpmi->cyMax; if (lpmi->fMask & MIM_MENUDATA) menu->dwMenuData = lpmi->dwMenuData; if (lpmi->fMask & MIM_STYLE) menu->dwStyle = lpmi->dwStyle; return TRUE; } return FALSE; } /********************************************************************** * GetMenuInfo * * NOTES * win98/NT5.0 * */ BOOL WINAPI GetMenuInfo (HMENU hMenu, LPMENUINFO lpmi) { POPUPMENU *menu; TRACE("(0x%04x %p)\n", hMenu, lpmi); if (lpmi && (menu = MENU_GetMenu(hMenu))) { if (lpmi->fMask & MIM_BACKGROUND) lpmi->hbrBack = menu->hbrBack; if (lpmi->fMask & MIM_HELPID) lpmi->dwContextHelpID = menu->dwContextHelpID; if (lpmi->fMask & MIM_MAXHEIGHT) lpmi->cyMax = menu->cyMax; if (lpmi->fMask & MIM_MENUDATA) lpmi->dwMenuData = menu->dwMenuData; if (lpmi->fMask & MIM_STYLE) lpmi->dwStyle = menu->dwStyle; return TRUE; } return FALSE; } /********************************************************************** * SetMenuContextHelpId16 (USER.384) */ BOOL16 WINAPI SetMenuContextHelpId16( HMENU16 hMenu, DWORD dwContextHelpID) { return SetMenuContextHelpId( hMenu, dwContextHelpID ); } /********************************************************************** * SetMenuContextHelpId (USER32.488) */ BOOL WINAPI SetMenuContextHelpId( HMENU hMenu, DWORD dwContextHelpID) { LPPOPUPMENU menu; TRACE("(0x%04x 0x%08lx)\n", hMenu, dwContextHelpID); if ((menu = MENU_GetMenu(hMenu))) { menu->dwContextHelpID = dwContextHelpID; return TRUE; } return FALSE; } /********************************************************************** * GetMenuContextHelpId16 (USER.385) */ DWORD WINAPI GetMenuContextHelpId16( HMENU16 hMenu ) { return GetMenuContextHelpId( hMenu ); } /********************************************************************** * GetMenuContextHelpId (USER32.488) */ DWORD WINAPI GetMenuContextHelpId( HMENU hMenu ) { LPPOPUPMENU menu; TRACE("(0x%04x)\n", hMenu); if ((menu = MENU_GetMenu(hMenu))) { return menu->dwContextHelpID; } return 0; } /********************************************************************** * MenuItemFromPoint (USER32.387) */ UINT WINAPI MenuItemFromPoint(HWND hWnd, HMENU hMenu, POINT ptScreen) { FIXME("(0x%04x,0x%04x,(%ld,%ld)):stub\n", hWnd, hMenu, ptScreen.x, ptScreen.y); return 0; } wine-20000526/controls/scroll.c0100644000175000001440000015727507070212243015765 0ustar julliardusers/* * Scrollbar control * * Copyright 1993 Martin Ayotte * Copyright 1994, 1996 Alexandre Julliard */ #include "windef.h" #include "wingdi.h" #include "wine/winuser16.h" #include "scroll.h" #include "heap.h" #include "win.h" #include "debugtools.h" #include "cache.h" #include "tweak.h" DEFAULT_DEBUG_CHANNEL(scroll) static HBITMAP hUpArrow = 0; static HBITMAP hDnArrow = 0; static HBITMAP hLfArrow = 0; static HBITMAP hRgArrow = 0; static HBITMAP hUpArrowD = 0; static HBITMAP hDnArrowD = 0; static HBITMAP hLfArrowD = 0; static HBITMAP hRgArrowD = 0; static HBITMAP hUpArrowI = 0; static HBITMAP hDnArrowI = 0; static HBITMAP hLfArrowI = 0; static HBITMAP hRgArrowI = 0; #define TOP_ARROW(flags,pressed) \ (((flags)&ESB_DISABLE_UP) ? hUpArrowI : ((pressed) ? hUpArrowD:hUpArrow)) #define BOTTOM_ARROW(flags,pressed) \ (((flags)&ESB_DISABLE_DOWN) ? hDnArrowI : ((pressed) ? hDnArrowD:hDnArrow)) #define LEFT_ARROW(flags,pressed) \ (((flags)&ESB_DISABLE_LEFT) ? hLfArrowI : ((pressed) ? hLfArrowD:hLfArrow)) #define RIGHT_ARROW(flags,pressed) \ (((flags)&ESB_DISABLE_RIGHT) ? hRgArrowI : ((pressed) ? hRgArrowD:hRgArrow)) /* Minimum size of the rectangle between the arrows */ #define SCROLL_MIN_RECT 4 /* Minimum size of the thumb in pixels */ #define SCROLL_MIN_THUMB 6 /* Overlap between arrows and thumb */ #define SCROLL_ARROW_THUMB_OVERLAP ((TWEAK_WineLook == WIN31_LOOK) ? 1 : 0) /* Delay (in ms) before first repetition when holding the button down */ #define SCROLL_FIRST_DELAY 200 /* Delay (in ms) between scroll repetitions */ #define SCROLL_REPEAT_DELAY 50 /* Scroll timer id */ #define SCROLL_TIMER 0 /* Scroll-bar hit testing */ enum SCROLL_HITTEST { SCROLL_NOWHERE, /* Outside the scroll bar */ SCROLL_TOP_ARROW, /* Top or left arrow */ SCROLL_TOP_RECT, /* Rectangle between the top arrow and the thumb */ SCROLL_THUMB, /* Thumb rectangle */ SCROLL_BOTTOM_RECT, /* Rectangle between the thumb and the bottom arrow */ SCROLL_BOTTOM_ARROW /* Bottom or right arrow */ }; /* What to do after SCROLL_SetScrollInfo() */ #define SA_SSI_HIDE 0x0001 #define SA_SSI_SHOW 0x0002 #define SA_SSI_REFRESH 0x0004 #define SA_SSI_REPAINT_ARROWS 0x0008 /* Thumb-tracking info */ static HWND SCROLL_TrackingWin = 0; static INT SCROLL_TrackingBar = 0; static INT SCROLL_TrackingPos = 0; static INT SCROLL_TrackingVal = 0; /* Hit test code of the last button-down event */ static enum SCROLL_HITTEST SCROLL_trackHitTest; static BOOL SCROLL_trackVertical; /* Is the moving thumb being displayed? */ static BOOL SCROLL_MovingThumb = FALSE; /* Local functions */ static BOOL SCROLL_ShowScrollBar( HWND hwnd, INT nBar, BOOL fShowH, BOOL fShowV ); static INT SCROLL_SetScrollInfo( HWND hwnd, INT nBar, const SCROLLINFO *info, INT *action ); static void SCROLL_DrawInterior_9x( HWND hwnd, HDC hdc, INT nBar, RECT *rect, INT arrowSize, INT thumbSize, INT thumbPos, UINT flags, BOOL vertical, BOOL top_selected, BOOL bottom_selected ); /*********************************************************************** * SCROLL_LoadBitmaps */ static void SCROLL_LoadBitmaps(void) { hUpArrow = LoadBitmapA( 0, MAKEINTRESOURCEA(OBM_UPARROW) ); hDnArrow = LoadBitmapA( 0, MAKEINTRESOURCEA(OBM_DNARROW) ); hLfArrow = LoadBitmapA( 0, MAKEINTRESOURCEA(OBM_LFARROW) ); hRgArrow = LoadBitmapA( 0, MAKEINTRESOURCEA(OBM_RGARROW) ); hUpArrowD = LoadBitmapA( 0, MAKEINTRESOURCEA(OBM_UPARROWD) ); hDnArrowD = LoadBitmapA( 0, MAKEINTRESOURCEA(OBM_DNARROWD) ); hLfArrowD = LoadBitmapA( 0, MAKEINTRESOURCEA(OBM_LFARROWD) ); hRgArrowD = LoadBitmapA( 0, MAKEINTRESOURCEA(OBM_RGARROWD) ); hUpArrowI = LoadBitmapA( 0, MAKEINTRESOURCEA(OBM_UPARROWI) ); hDnArrowI = LoadBitmapA( 0, MAKEINTRESOURCEA(OBM_DNARROWI) ); hLfArrowI = LoadBitmapA( 0, MAKEINTRESOURCEA(OBM_LFARROWI) ); hRgArrowI = LoadBitmapA( 0, MAKEINTRESOURCEA(OBM_RGARROWI) ); } /*********************************************************************** * SCROLL_GetPtrScrollInfo */ static SCROLLBAR_INFO *SCROLL_GetPtrScrollInfo( WND* wndPtr, INT nBar ) { SCROLLBAR_INFO *infoPtr; if (!wndPtr) return NULL; switch(nBar) { case SB_HORZ: infoPtr = (SCROLLBAR_INFO *)wndPtr->pHScroll; break; case SB_VERT: infoPtr = (SCROLLBAR_INFO *)wndPtr->pVScroll; break; case SB_CTL: infoPtr = (SCROLLBAR_INFO *)wndPtr->wExtra; break; default: return NULL; } if (!infoPtr) /* Create the info structure if needed */ { if ((infoPtr = HeapAlloc( SystemHeap, 0, sizeof(SCROLLBAR_INFO) ))) { infoPtr->MinVal = infoPtr->CurVal = infoPtr->Page = 0; infoPtr->MaxVal = 100; infoPtr->flags = ESB_ENABLE_BOTH; if (nBar == SB_HORZ) wndPtr->pHScroll = infoPtr; else wndPtr->pVScroll = infoPtr; } if (!hUpArrow) SCROLL_LoadBitmaps(); } return infoPtr; } /*********************************************************************** * SCROLL_GetScrollInfo */ static SCROLLBAR_INFO *SCROLL_GetScrollInfo( HWND hwnd, INT nBar ) { SCROLLBAR_INFO *retvalue; WND *wndPtr = WIN_FindWndPtr( hwnd ); retvalue = SCROLL_GetPtrScrollInfo( wndPtr, nBar ); WIN_ReleaseWndPtr(wndPtr); return retvalue; } /*********************************************************************** * SCROLL_GetScrollBarRect * * Compute the scroll bar rectangle, in drawing coordinates (i.e. client * coords for SB_CTL, window coords for SB_VERT and SB_HORZ). * 'arrowSize' returns the width or height of an arrow (depending on * the orientation of the scrollbar), 'thumbSize' returns the size of * the thumb, and 'thumbPos' returns the position of the thumb * relative to the left or to the top. * Return TRUE if the scrollbar is vertical, FALSE if horizontal. */ static BOOL SCROLL_GetScrollBarRect( HWND hwnd, INT nBar, RECT *lprect, INT *arrowSize, INT *thumbSize, INT *thumbPos ) { INT pixels; BOOL vertical; WND *wndPtr = WIN_FindWndPtr( hwnd ); switch(nBar) { case SB_HORZ: lprect->left = wndPtr->rectClient.left - wndPtr->rectWindow.left; lprect->top = wndPtr->rectClient.bottom - wndPtr->rectWindow.top; lprect->right = wndPtr->rectClient.right - wndPtr->rectWindow.left; lprect->bottom = lprect->top + GetSystemMetrics(SM_CYHSCROLL); if(wndPtr->dwStyle & WS_BORDER) { lprect->left--; lprect->right++; } else if(wndPtr->dwStyle & WS_VSCROLL) lprect->right++; vertical = FALSE; break; case SB_VERT: lprect->left = wndPtr->rectClient.right - wndPtr->rectWindow.left; lprect->top = wndPtr->rectClient.top - wndPtr->rectWindow.top; lprect->right = lprect->left + GetSystemMetrics(SM_CXVSCROLL); lprect->bottom = wndPtr->rectClient.bottom - wndPtr->rectWindow.top; if(wndPtr->dwStyle & WS_BORDER) { lprect->top--; lprect->bottom++; } else if(wndPtr->dwStyle & WS_HSCROLL) lprect->bottom++; vertical = TRUE; break; case SB_CTL: GetClientRect( hwnd, lprect ); vertical = ((wndPtr->dwStyle & SBS_VERT) != 0); break; default: WIN_ReleaseWndPtr(wndPtr); return FALSE; } if (vertical) pixels = lprect->bottom - lprect->top; else pixels = lprect->right - lprect->left; if (pixels <= 2*GetSystemMetrics(SM_CXVSCROLL) + SCROLL_MIN_RECT) { if (pixels > SCROLL_MIN_RECT) *arrowSize = (pixels - SCROLL_MIN_RECT) / 2; else *arrowSize = 0; *thumbPos = *thumbSize = 0; } else { SCROLLBAR_INFO *info = SCROLL_GetPtrScrollInfo( wndPtr, nBar ); *arrowSize = GetSystemMetrics(SM_CXVSCROLL); pixels -= (2 * (GetSystemMetrics(SM_CXVSCROLL) - SCROLL_ARROW_THUMB_OVERLAP)); if (info->Page) { *thumbSize = pixels * info->Page / (info->MaxVal-info->MinVal+1); if (*thumbSize < SCROLL_MIN_THUMB) *thumbSize = SCROLL_MIN_THUMB; } else *thumbSize = GetSystemMetrics(SM_CXVSCROLL); if (((pixels -= *thumbSize ) < 0) || ((info->flags & ESB_DISABLE_BOTH) == ESB_DISABLE_BOTH)) { /* Rectangle too small or scrollbar disabled -> no thumb */ *thumbPos = *thumbSize = 0; } else { INT max = info->MaxVal - max( info->Page-1, 0 ); if (info->MinVal >= max) *thumbPos = *arrowSize - SCROLL_ARROW_THUMB_OVERLAP; else *thumbPos = *arrowSize - SCROLL_ARROW_THUMB_OVERLAP + pixels * (info->CurVal-info->MinVal) / (max - info->MinVal); } } WIN_ReleaseWndPtr(wndPtr); return vertical; } /*********************************************************************** * SCROLL_GetThumbVal * * Compute the current scroll position based on the thumb position in pixels * from the top of the scroll-bar. */ static UINT SCROLL_GetThumbVal( SCROLLBAR_INFO *infoPtr, RECT *rect, BOOL vertical, INT pos ) { INT thumbSize; INT pixels = vertical ? rect->bottom-rect->top : rect->right-rect->left; if ((pixels -= 2*(GetSystemMetrics(SM_CXVSCROLL) - SCROLL_ARROW_THUMB_OVERLAP)) <= 0) return infoPtr->MinVal; if (infoPtr->Page) { thumbSize = pixels * infoPtr->Page/(infoPtr->MaxVal-infoPtr->MinVal+1); if (thumbSize < SCROLL_MIN_THUMB) thumbSize = SCROLL_MIN_THUMB; } else thumbSize = GetSystemMetrics(SM_CXVSCROLL); if ((pixels -= thumbSize) <= 0) return infoPtr->MinVal; pos = max( 0, pos - (GetSystemMetrics(SM_CXVSCROLL) - SCROLL_ARROW_THUMB_OVERLAP) ); if (pos > pixels) pos = pixels; if (!infoPtr->Page) pos *= infoPtr->MaxVal - infoPtr->MinVal; else pos *= infoPtr->MaxVal - infoPtr->MinVal - infoPtr->Page + 1; return infoPtr->MinVal + ((pos + pixels / 2) / pixels); } /*********************************************************************** * SCROLL_PtInRectEx */ static BOOL SCROLL_PtInRectEx( LPRECT lpRect, POINT pt, BOOL vertical ) { RECT rect = *lpRect; if (vertical) { rect.left -= lpRect->right - lpRect->left; rect.right += lpRect->right - lpRect->left; } else { rect.top -= lpRect->bottom - lpRect->top; rect.bottom += lpRect->bottom - lpRect->top; } return PtInRect( &rect, pt ); } /*********************************************************************** * SCROLL_ClipPos */ static POINT SCROLL_ClipPos( LPRECT lpRect, POINT pt ) { if( pt.x < lpRect->left ) pt.x = lpRect->left; else if( pt.x > lpRect->right ) pt.x = lpRect->right; if( pt.y < lpRect->top ) pt.y = lpRect->top; else if( pt.y > lpRect->bottom ) pt.y = lpRect->bottom; return pt; } /*********************************************************************** * SCROLL_HitTest * * Scroll-bar hit testing (don't confuse this with WM_NCHITTEST!). */ static enum SCROLL_HITTEST SCROLL_HitTest( HWND hwnd, INT nBar, POINT pt, BOOL bDragging ) { INT arrowSize, thumbSize, thumbPos; RECT rect; BOOL vertical = SCROLL_GetScrollBarRect( hwnd, nBar, &rect, &arrowSize, &thumbSize, &thumbPos ); if ( (bDragging && !SCROLL_PtInRectEx( &rect, pt, vertical )) || (!PtInRect( &rect, pt )) ) return SCROLL_NOWHERE; if (vertical) { if (pt.y < rect.top + arrowSize) return SCROLL_TOP_ARROW; if (pt.y >= rect.bottom - arrowSize) return SCROLL_BOTTOM_ARROW; if (!thumbPos) return SCROLL_TOP_RECT; pt.y -= rect.top; if (pt.y < thumbPos) return SCROLL_TOP_RECT; if (pt.y >= thumbPos + thumbSize) return SCROLL_BOTTOM_RECT; } else /* horizontal */ { if (pt.x < rect.left + arrowSize) return SCROLL_TOP_ARROW; if (pt.x >= rect.right - arrowSize) return SCROLL_BOTTOM_ARROW; if (!thumbPos) return SCROLL_TOP_RECT; pt.x -= rect.left; if (pt.x < thumbPos) return SCROLL_TOP_RECT; if (pt.x >= thumbPos + thumbSize) return SCROLL_BOTTOM_RECT; } return SCROLL_THUMB; } /*********************************************************************** * SCROLL_DrawArrows * * Draw the scroll bar arrows. */ static void SCROLL_DrawArrows_9x( HDC hdc, SCROLLBAR_INFO *infoPtr, RECT *rect, INT arrowSize, BOOL vertical, BOOL top_pressed, BOOL bottom_pressed ) { RECT r; r = *rect; if( vertical ) r.bottom = r.top + arrowSize; else r.right = r.left + arrowSize; DrawFrameControl( hdc, &r, DFC_SCROLL, (vertical ? DFCS_SCROLLUP : DFCS_SCROLLLEFT) | (top_pressed ? (DFCS_PUSHED | DFCS_FLAT) : 0 ) | (infoPtr->flags&ESB_DISABLE_LTUP ? DFCS_INACTIVE : 0 ) ); r = *rect; if( vertical ) r.top = r.bottom-arrowSize; else r.left = r.right-arrowSize; DrawFrameControl( hdc, &r, DFC_SCROLL, (vertical ? DFCS_SCROLLDOWN : DFCS_SCROLLRIGHT) | (bottom_pressed ? (DFCS_PUSHED | DFCS_FLAT) : 0 ) | (infoPtr->flags&ESB_DISABLE_RTDN ? DFCS_INACTIVE : 0) ); } static void SCROLL_DrawArrows_31( HDC hdc, SCROLLBAR_INFO *infoPtr, RECT *rect, INT arrowSize, BOOL vertical, BOOL top_pressed, BOOL bottom_pressed ) { HDC hdcMem = CreateCompatibleDC( hdc ); HBITMAP hbmpPrev = SelectObject( hdcMem, vertical ? TOP_ARROW(infoPtr->flags, top_pressed) : LEFT_ARROW(infoPtr->flags, top_pressed)); SetStretchBltMode( hdc, STRETCH_DELETESCANS ); StretchBlt( hdc, rect->left, rect->top, vertical ? rect->right-rect->left : arrowSize, vertical ? arrowSize : rect->bottom-rect->top, hdcMem, 0, 0, GetSystemMetrics(SM_CXVSCROLL),GetSystemMetrics(SM_CYHSCROLL), SRCCOPY ); SelectObject( hdcMem, vertical ? BOTTOM_ARROW( infoPtr->flags, bottom_pressed ) : RIGHT_ARROW( infoPtr->flags, bottom_pressed ) ); if (vertical) StretchBlt( hdc, rect->left, rect->bottom - arrowSize, rect->right - rect->left, arrowSize, hdcMem, 0, 0, GetSystemMetrics(SM_CXVSCROLL),GetSystemMetrics(SM_CYHSCROLL), SRCCOPY ); else StretchBlt( hdc, rect->right - arrowSize, rect->top, arrowSize, rect->bottom - rect->top, hdcMem, 0, 0, GetSystemMetrics(SM_CXVSCROLL), GetSystemMetrics(SM_CYHSCROLL), SRCCOPY ); SelectObject( hdcMem, hbmpPrev ); DeleteDC( hdcMem ); } static void SCROLL_DrawArrows( HDC hdc, SCROLLBAR_INFO *infoPtr, RECT *rect, INT arrowSize, BOOL vertical, BOOL top_pressed, BOOL bottom_pressed ) { if( TWEAK_WineLook == WIN31_LOOK ) SCROLL_DrawArrows_31( hdc, infoPtr, rect, arrowSize, vertical, top_pressed,bottom_pressed ); else SCROLL_DrawArrows_9x( hdc, infoPtr, rect, arrowSize, vertical, top_pressed,bottom_pressed ); } /*********************************************************************** * SCROLL_DrawMovingThumb * * Draw the moving thumb rectangle. */ static void SCROLL_DrawMovingThumb_31( HDC hdc, RECT *rect, BOOL vertical, INT arrowSize, INT thumbSize ) { RECT r = *rect; if (vertical) { r.top += SCROLL_TrackingPos; if (r.top < rect->top + arrowSize - SCROLL_ARROW_THUMB_OVERLAP) r.top = rect->top + arrowSize - SCROLL_ARROW_THUMB_OVERLAP; if (r.top + thumbSize > rect->bottom - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP)) r.top = rect->bottom - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP) - thumbSize; r.bottom = r.top + thumbSize; } else { r.left += SCROLL_TrackingPos; if (r.left < rect->left + arrowSize - SCROLL_ARROW_THUMB_OVERLAP) r.left = rect->left + arrowSize - SCROLL_ARROW_THUMB_OVERLAP; if (r.left + thumbSize > rect->right - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP)) r.left = rect->right - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP) - thumbSize; r.right = r.left + thumbSize; } DrawFocusRect( hdc, &r ); SCROLL_MovingThumb = !SCROLL_MovingThumb; } static void SCROLL_DrawMovingThumb_9x( HDC hdc, RECT *rect, BOOL vertical, INT arrowSize, INT thumbSize ) { INT pos = SCROLL_TrackingPos; INT max_size; if( vertical ) max_size = rect->bottom - rect->top; else max_size = rect->right - rect->left; max_size -= (arrowSize-SCROLL_ARROW_THUMB_OVERLAP) + thumbSize; if( pos < (arrowSize-SCROLL_ARROW_THUMB_OVERLAP) ) pos = (arrowSize-SCROLL_ARROW_THUMB_OVERLAP); else if( pos > max_size ) pos = max_size; SCROLL_DrawInterior_9x( SCROLL_TrackingWin, hdc, SCROLL_TrackingBar, rect, arrowSize, thumbSize, pos, 0, vertical, FALSE, FALSE ); SCROLL_MovingThumb = !SCROLL_MovingThumb; } static void SCROLL_DrawMovingThumb( HDC hdc, RECT *rect, BOOL vertical, INT arrowSize, INT thumbSize ) { if( TWEAK_WineLook == WIN31_LOOK ) SCROLL_DrawMovingThumb_31( hdc, rect, vertical, arrowSize, thumbSize ); else SCROLL_DrawMovingThumb_9x( hdc, rect, vertical, arrowSize, thumbSize ); } /*********************************************************************** * SCROLL_DrawInterior * * Draw the scroll bar interior (everything except the arrows). */ static void SCROLL_DrawInterior_9x( HWND hwnd, HDC hdc, INT nBar, RECT *rect, INT arrowSize, INT thumbSize, INT thumbPos, UINT flags, BOOL vertical, BOOL top_selected, BOOL bottom_selected ) { RECT r; HPEN hSavePen; HBRUSH hSaveBrush,hBrush; /* Only scrollbar controls send WM_CTLCOLORSCROLLBAR. * The window-owned scrollbars need to call DEFWND_ControlColor * to correctly setup default scrollbar colors */ if (nBar == SB_CTL) { hBrush = (HBRUSH)SendMessageA( GetParent(hwnd), WM_CTLCOLORSCROLLBAR, (WPARAM)hdc,(LPARAM)hwnd); } else { hBrush = DEFWND_ControlColor( hdc, CTLCOLOR_SCROLLBAR ); } hSavePen = SelectObject( hdc, GetSysColorPen(COLOR_WINDOWFRAME) ); hSaveBrush = SelectObject( hdc, hBrush ); /* Calculate the scroll rectangle */ r = *rect; if (vertical) { r.top += arrowSize - SCROLL_ARROW_THUMB_OVERLAP; r.bottom -= (arrowSize - SCROLL_ARROW_THUMB_OVERLAP); } else { r.left += arrowSize - SCROLL_ARROW_THUMB_OVERLAP; r.right -= (arrowSize - SCROLL_ARROW_THUMB_OVERLAP); } /* Draw the scroll rectangles and thumb */ if (!thumbPos) /* No thumb to draw */ { PatBlt( hdc, r.left, r.top, r.right - r.left, r.bottom - r.top, PATCOPY ); /* cleanup and return */ SelectObject( hdc, hSavePen ); SelectObject( hdc, hSaveBrush ); return; } if (vertical) { PatBlt( hdc, r.left, r.top, r.right - r.left, thumbPos - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP), top_selected ? 0x0f0000 : PATCOPY ); r.top += thumbPos - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP); PatBlt( hdc, r.left, r.top + thumbSize, r.right - r.left, r.bottom - r.top - thumbSize, bottom_selected ? 0x0f0000 : PATCOPY ); r.bottom = r.top + thumbSize; } else /* horizontal */ { PatBlt( hdc, r.left, r.top, thumbPos - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP), r.bottom - r.top, top_selected ? 0x0f0000 : PATCOPY ); r.left += thumbPos - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP); PatBlt( hdc, r.left + thumbSize, r.top, r.right - r.left - thumbSize, r.bottom - r.top, bottom_selected ? 0x0f0000 : PATCOPY ); r.right = r.left + thumbSize; } /* Draw the thumb */ DrawEdge( hdc, &r, EDGE_RAISED, BF_RECT | BF_MIDDLE ); /* cleanup */ SelectObject( hdc, hSavePen ); SelectObject( hdc, hSaveBrush ); } static void SCROLL_DrawInterior( HWND hwnd, HDC hdc, INT nBar, RECT *rect, INT arrowSize, INT thumbSize, INT thumbPos, UINT flags, BOOL vertical, BOOL top_selected, BOOL bottom_selected ) { RECT r; HPEN hSavePen; HBRUSH hSaveBrush,hBrush; BOOL Save_SCROLL_MovingThumb = SCROLL_MovingThumb; if (Save_SCROLL_MovingThumb && (SCROLL_TrackingWin == hwnd) && (SCROLL_TrackingBar == nBar)) SCROLL_DrawMovingThumb( hdc, rect, vertical, arrowSize, thumbSize ); /* Select the correct brush and pen */ if (TWEAK_WineLook == WIN31_LOOK && (flags & ESB_DISABLE_BOTH) == ESB_DISABLE_BOTH) { /* This ought to be the color of the parent window */ if (TWEAK_WineLook == WIN31_LOOK) { hBrush = GetSysColorBrush(COLOR_WINDOW); } else { /* Under Win9x look & feel, scrollbars don't have a solid border. * To make scrollbar's background different from the window * background, we need to apply a gray 0x55aa pattern brush. * Otherwise it won't look good. */ hBrush = CACHE_GetPattern55AABrush(); } } else { /* Only scrollbar controls send WM_CTLCOLORSCROLLBAR. * The window-owned scrollbars need to call DEFWND_ControlColor * to correctly setup default scrollbar colors */ if (nBar == SB_CTL) { hBrush = (HBRUSH)SendMessageA( GetParent(hwnd), WM_CTLCOLORSCROLLBAR, (WPARAM)hdc,(LPARAM)hwnd); } else { hBrush = DEFWND_ControlColor( hdc, CTLCOLOR_SCROLLBAR ); } } hSavePen = SelectObject( hdc, GetSysColorPen(COLOR_WINDOWFRAME) ); hSaveBrush = SelectObject( hdc, hBrush ); /* Calculate the scroll rectangle */ r = *rect; if (vertical) { r.top += arrowSize - SCROLL_ARROW_THUMB_OVERLAP; r.bottom -= (arrowSize - SCROLL_ARROW_THUMB_OVERLAP); } else { r.left += arrowSize - SCROLL_ARROW_THUMB_OVERLAP; r.right -= (arrowSize - SCROLL_ARROW_THUMB_OVERLAP); } /* Draw the scroll bar frame */ /* Only draw outline if Win 3.1. Mar 24, 1999 - Ronald B. Cemer */ if (TWEAK_WineLook == WIN31_LOOK) Rectangle( hdc, r.left, r.top, r.right, r.bottom ); /* Draw the scroll rectangles and thumb */ if (!thumbPos) /* No thumb to draw */ { INT offset = (TWEAK_WineLook > WIN31_LOOK) ? 0 : 1; PatBlt( hdc, r.left+offset, r.top+offset, r.right - r.left - 2*offset, r.bottom - r.top - 2*offset, PATCOPY ); /* cleanup and return */ SelectObject( hdc, hSavePen ); SelectObject( hdc, hSaveBrush ); return; } if (vertical) { INT offset = (TWEAK_WineLook == WIN31_LOOK) ? 1 : 0; PatBlt( hdc, r.left + offset, r.top + offset, r.right - r.left - offset*2, thumbPos - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP) - offset, top_selected ? 0x0f0000 : PATCOPY ); r.top += thumbPos - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP); PatBlt( hdc, r.left + offset, r.top + thumbSize, r.right - r.left - offset*2, r.bottom - r.top - thumbSize - offset, bottom_selected ? 0x0f0000 : PATCOPY ); r.bottom = r.top + thumbSize; } else /* horizontal */ { INT offset = (TWEAK_WineLook == WIN31_LOOK) ? 1 : 0; PatBlt( hdc, r.left + offset, r.top + offset, thumbPos - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP), r.bottom - r.top - offset*2, top_selected ? 0x0f0000 : PATCOPY ); r.left += thumbPos - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP); PatBlt( hdc, r.left + thumbSize, r.top + offset, r.right - r.left - thumbSize - offset, r.bottom - r.top - offset*2, bottom_selected ? 0x0f0000 : PATCOPY ); r.right = r.left + thumbSize; } /* Draw the thumb */ SelectObject( hdc, GetSysColorBrush(COLOR_BTNFACE) ); if (TWEAK_WineLook == WIN31_LOOK) { Rectangle( hdc, r.left, r.top, r.right, r.bottom ); r.top++, r.left++; } else { Rectangle( hdc, r.left+1, r.top+1, r.right-1, r.bottom-1 ); } DrawEdge( hdc, &r, EDGE_RAISED, BF_RECT ); if (Save_SCROLL_MovingThumb && (SCROLL_TrackingWin == hwnd) && (SCROLL_TrackingBar == nBar)) SCROLL_DrawMovingThumb( hdc, rect, vertical, arrowSize, thumbSize ); /* cleanup */ SelectObject( hdc, hSavePen ); SelectObject( hdc, hSaveBrush ); } /*********************************************************************** * SCROLL_DrawScrollBar * * Redraw the whole scrollbar. */ void SCROLL_DrawScrollBar( HWND hwnd, HDC hdc, INT nBar, BOOL arrows, BOOL interior ) { INT arrowSize, thumbSize, thumbPos; RECT rect; BOOL vertical; WND *wndPtr = WIN_FindWndPtr( hwnd ); SCROLLBAR_INFO *infoPtr = SCROLL_GetPtrScrollInfo( wndPtr, nBar ); BOOL Save_SCROLL_MovingThumb = SCROLL_MovingThumb; if (!wndPtr || !infoPtr || ((nBar == SB_VERT) && !(wndPtr->dwStyle & WS_VSCROLL)) || ((nBar == SB_HORZ) && !(wndPtr->dwStyle & WS_HSCROLL))) goto END; if (!WIN_IsWindowDrawable( wndPtr, FALSE )) goto END; vertical = SCROLL_GetScrollBarRect( hwnd, nBar, &rect, &arrowSize, &thumbSize, &thumbPos ); if (Save_SCROLL_MovingThumb && (SCROLL_TrackingWin == hwnd) && (SCROLL_TrackingBar == nBar)) SCROLL_DrawMovingThumb( hdc, &rect, vertical, arrowSize, thumbSize ); /* Draw the arrows */ if (arrows && arrowSize) { if( vertical == SCROLL_trackVertical && GetCapture() == hwnd ) SCROLL_DrawArrows( hdc, infoPtr, &rect, arrowSize, vertical, (SCROLL_trackHitTest == SCROLL_TOP_ARROW), (SCROLL_trackHitTest == SCROLL_BOTTOM_ARROW) ); else SCROLL_DrawArrows( hdc, infoPtr, &rect, arrowSize, vertical, FALSE, FALSE ); } if( interior ) SCROLL_DrawInterior( hwnd, hdc, nBar, &rect, arrowSize, thumbSize, thumbPos, infoPtr->flags, vertical, FALSE, FALSE ); if (Save_SCROLL_MovingThumb && (SCROLL_TrackingWin == hwnd) && (SCROLL_TrackingBar == nBar)) SCROLL_DrawMovingThumb( hdc, &rect, vertical, arrowSize, thumbSize ); END: WIN_ReleaseWndPtr(wndPtr); } /*********************************************************************** * SCROLL_RefreshScrollBar * * Repaint the scroll bar interior after a SetScrollRange() or * SetScrollPos() call. */ static void SCROLL_RefreshScrollBar( HWND hwnd, INT nBar, BOOL arrows, BOOL interior ) { HDC hdc = GetDCEx( hwnd, 0, DCX_CACHE | ((nBar == SB_CTL) ? 0 : DCX_WINDOW) ); if (!hdc) return; SCROLL_DrawScrollBar( hwnd, hdc, nBar, arrows, interior ); ReleaseDC( hwnd, hdc ); } /*********************************************************************** * SCROLL_HandleKbdEvent * * Handle a keyboard event (only for SB_CTL scrollbars). */ static void SCROLL_HandleKbdEvent( HWND hwnd, WPARAM wParam ) { WND *wndPtr = WIN_FindWndPtr( hwnd ); WPARAM msg; switch(wParam) { case VK_PRIOR: msg = SB_PAGEUP; break; case VK_NEXT: msg = SB_PAGEDOWN; break; case VK_HOME: msg = SB_TOP; break; case VK_END: msg = SB_BOTTOM; break; case VK_UP: msg = SB_LINEUP; break; case VK_DOWN: msg = SB_LINEDOWN; break; default: WIN_ReleaseWndPtr(wndPtr); return; } SendMessageA( GetParent(hwnd), (wndPtr->dwStyle & SBS_VERT) ? WM_VSCROLL : WM_HSCROLL, msg, hwnd ); WIN_ReleaseWndPtr(wndPtr); } /*********************************************************************** * SCROLL_HandleScrollEvent * * Handle a mouse or timer event for the scrollbar. * 'pt' is the location of the mouse event in client (for SB_CTL) or * windows coordinates. */ void SCROLL_HandleScrollEvent( HWND hwnd, INT nBar, UINT msg, POINT pt) { /* Previous mouse position for timer events */ static POINT prevPt; /* Thumb position when tracking started. */ static UINT trackThumbPos; /* Position in the scroll-bar of the last button-down event. */ static INT lastClickPos; /* Position in the scroll-bar of the last mouse event. */ static INT lastMousePos; enum SCROLL_HITTEST hittest; HWND hwndOwner, hwndCtl; BOOL vertical; INT arrowSize, thumbSize, thumbPos; RECT rect; HDC hdc; SCROLLBAR_INFO *infoPtr = SCROLL_GetScrollInfo( hwnd, nBar ); if (!infoPtr) return; if ((SCROLL_trackHitTest == SCROLL_NOWHERE) && (msg != WM_LBUTTONDOWN)) return; hdc = GetDCEx( hwnd, 0, DCX_CACHE | ((nBar == SB_CTL) ? 0 : DCX_WINDOW)); vertical = SCROLL_GetScrollBarRect( hwnd, nBar, &rect, &arrowSize, &thumbSize, &thumbPos ); hwndOwner = (nBar == SB_CTL) ? GetParent(hwnd) : hwnd; hwndCtl = (nBar == SB_CTL) ? hwnd : 0; switch(msg) { case WM_LBUTTONDOWN: /* Initialise mouse tracking */ SCROLL_trackVertical = vertical; SCROLL_trackHitTest = hittest = SCROLL_HitTest( hwnd, nBar, pt, FALSE ); lastClickPos = vertical ? (pt.y - rect.top) : (pt.x - rect.left); lastMousePos = lastClickPos; trackThumbPos = thumbPos; prevPt = pt; SetCapture( hwnd ); if (nBar == SB_CTL) SetFocus( hwnd ); break; case WM_MOUSEMOVE: hittest = SCROLL_HitTest( hwnd, nBar, pt, TRUE ); prevPt = pt; break; case WM_LBUTTONUP: hittest = SCROLL_NOWHERE; ReleaseCapture(); break; case WM_SYSTIMER: pt = prevPt; hittest = SCROLL_HitTest( hwnd, nBar, pt, FALSE ); break; default: return; /* Should never happen */ } TRACE("Event: hwnd=%04x bar=%d msg=%x pt=%ld,%ld hit=%d\n", hwnd, nBar, msg, pt.x, pt.y, hittest ); switch(SCROLL_trackHitTest) { case SCROLL_NOWHERE: /* No tracking in progress */ break; case SCROLL_TOP_ARROW: SCROLL_DrawArrows( hdc, infoPtr, &rect, arrowSize, vertical, (hittest == SCROLL_trackHitTest), FALSE ); if (hittest == SCROLL_trackHitTest) { if ((msg == WM_LBUTTONDOWN) || (msg == WM_SYSTIMER)) { SendMessageA( hwndOwner, vertical ? WM_VSCROLL : WM_HSCROLL, SB_LINEUP, hwndCtl ); } SetSystemTimer( hwnd, SCROLL_TIMER, (msg == WM_LBUTTONDOWN) ? SCROLL_FIRST_DELAY : SCROLL_REPEAT_DELAY, (TIMERPROC)0 ); } else KillSystemTimer( hwnd, SCROLL_TIMER ); break; case SCROLL_TOP_RECT: SCROLL_DrawInterior( hwnd, hdc, nBar, &rect, arrowSize, thumbSize, thumbPos, infoPtr->flags, vertical, (hittest == SCROLL_trackHitTest), FALSE ); if (hittest == SCROLL_trackHitTest) { if ((msg == WM_LBUTTONDOWN) || (msg == WM_SYSTIMER)) { SendMessageA( hwndOwner, vertical ? WM_VSCROLL : WM_HSCROLL, SB_PAGEUP, hwndCtl ); SetSystemTimer( hwnd, SCROLL_TIMER, (msg == WM_LBUTTONDOWN) ? SCROLL_FIRST_DELAY : SCROLL_REPEAT_DELAY, (TIMERPROC)0 ); } } else KillSystemTimer( hwnd, SCROLL_TIMER ); break; case SCROLL_THUMB: if (msg == WM_LBUTTONDOWN) { SCROLL_TrackingWin = hwnd; SCROLL_TrackingBar = nBar; SCROLL_TrackingPos = trackThumbPos + lastMousePos - lastClickPos; if (!SCROLL_MovingThumb) SCROLL_DrawMovingThumb(hdc, &rect, vertical, arrowSize, thumbSize); } else if (msg == WM_LBUTTONUP) { if (SCROLL_MovingThumb) SCROLL_DrawMovingThumb(hdc, &rect, vertical, arrowSize, thumbSize); SCROLL_TrackingWin = 0; SCROLL_DrawInterior( hwnd, hdc, nBar, &rect, arrowSize, thumbSize, thumbPos, infoPtr->flags, vertical, FALSE, FALSE ); } else /* WM_MOUSEMOVE */ { UINT pos; if (!SCROLL_PtInRectEx( &rect, pt, vertical )) pos = lastClickPos; else { pt = SCROLL_ClipPos( &rect, pt ); pos = vertical ? (pt.y - rect.top) : (pt.x - rect.left); } if ( (pos != lastMousePos) || (!SCROLL_MovingThumb) ) { if (SCROLL_MovingThumb) SCROLL_DrawMovingThumb( hdc, &rect, vertical, arrowSize, thumbSize ); lastMousePos = pos; SCROLL_TrackingPos = trackThumbPos + pos - lastClickPos; SCROLL_TrackingVal = SCROLL_GetThumbVal( infoPtr, &rect, vertical, SCROLL_TrackingPos ); SendMessageA( hwndOwner, vertical ? WM_VSCROLL : WM_HSCROLL, MAKEWPARAM( SB_THUMBTRACK, SCROLL_TrackingVal), hwndCtl ); if (!SCROLL_MovingThumb) SCROLL_DrawMovingThumb( hdc, &rect, vertical, arrowSize, thumbSize ); } } break; case SCROLL_BOTTOM_RECT: SCROLL_DrawInterior( hwnd, hdc, nBar, &rect, arrowSize, thumbSize, thumbPos, infoPtr->flags, vertical, FALSE, (hittest == SCROLL_trackHitTest) ); if (hittest == SCROLL_trackHitTest) { if ((msg == WM_LBUTTONDOWN) || (msg == WM_SYSTIMER)) { SendMessageA( hwndOwner, vertical ? WM_VSCROLL : WM_HSCROLL, SB_PAGEDOWN, hwndCtl ); SetSystemTimer( hwnd, SCROLL_TIMER, (msg == WM_LBUTTONDOWN) ? SCROLL_FIRST_DELAY : SCROLL_REPEAT_DELAY, (TIMERPROC)0 ); } } else KillSystemTimer( hwnd, SCROLL_TIMER ); break; case SCROLL_BOTTOM_ARROW: SCROLL_DrawArrows( hdc, infoPtr, &rect, arrowSize, vertical, FALSE, (hittest == SCROLL_trackHitTest) ); if (hittest == SCROLL_trackHitTest) { if ((msg == WM_LBUTTONDOWN) || (msg == WM_SYSTIMER)) { SendMessageA( hwndOwner, vertical ? WM_VSCROLL : WM_HSCROLL, SB_LINEDOWN, hwndCtl ); } SetSystemTimer( hwnd, SCROLL_TIMER, (msg == WM_LBUTTONDOWN) ? SCROLL_FIRST_DELAY : SCROLL_REPEAT_DELAY, (TIMERPROC)0 ); } else KillSystemTimer( hwnd, SCROLL_TIMER ); break; } if (msg == WM_LBUTTONUP) { hittest = SCROLL_trackHitTest; SCROLL_trackHitTest = SCROLL_NOWHERE; /* Terminate tracking */ if (hittest == SCROLL_THUMB) { UINT val = SCROLL_GetThumbVal( infoPtr, &rect, vertical, trackThumbPos + lastMousePos - lastClickPos ); SendMessageA( hwndOwner, vertical ? WM_VSCROLL : WM_HSCROLL, MAKEWPARAM( SB_THUMBPOSITION, val ), hwndCtl ); } else SendMessageA( hwndOwner, vertical ? WM_VSCROLL : WM_HSCROLL, SB_ENDSCROLL, hwndCtl ); } ReleaseDC( hwnd, hdc ); } /*********************************************************************** * ScrollBarWndProc */ LRESULT WINAPI ScrollBarWndProc( HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam ) { switch(message) { case WM_CREATE: { CREATESTRUCTA *lpCreat = (CREATESTRUCTA *)lParam; if (lpCreat->style & SBS_SIZEBOX) { FIXME("Unimplemented style SBS_SIZEBOX.\n" ); return 0; } if (lpCreat->style & SBS_VERT) { if (lpCreat->style & SBS_LEFTALIGN) MoveWindow( hwnd, lpCreat->x, lpCreat->y, GetSystemMetrics(SM_CXVSCROLL)+1, lpCreat->cy, FALSE ); else if (lpCreat->style & SBS_RIGHTALIGN) MoveWindow( hwnd, lpCreat->x+lpCreat->cx-GetSystemMetrics(SM_CXVSCROLL)-1, lpCreat->y, GetSystemMetrics(SM_CXVSCROLL)+1, lpCreat->cy, FALSE ); } else /* SBS_HORZ */ { if (lpCreat->style & SBS_TOPALIGN) MoveWindow( hwnd, lpCreat->x, lpCreat->y, lpCreat->cx, GetSystemMetrics(SM_CYHSCROLL)+1, FALSE ); else if (lpCreat->style & SBS_BOTTOMALIGN) MoveWindow( hwnd, lpCreat->x, lpCreat->y+lpCreat->cy-GetSystemMetrics(SM_CYHSCROLL)-1, lpCreat->cx, GetSystemMetrics(SM_CYHSCROLL)+1, FALSE ); } } if (!hUpArrow) SCROLL_LoadBitmaps(); TRACE("ScrollBar creation, hwnd=%04x\n", hwnd ); return 0; case WM_LBUTTONDOWN: case WM_LBUTTONUP: case WM_MOUSEMOVE: case WM_SYSTIMER: { POINT pt; CONV_POINT16TO32( (POINT16 *)&lParam, &pt ); SCROLL_HandleScrollEvent( hwnd, SB_CTL, message, pt ); } break; case WM_KEYDOWN: SCROLL_HandleKbdEvent( hwnd, wParam ); break; case WM_ERASEBKGND: return 1; case WM_GETDLGCODE: return DLGC_WANTARROWS; /* Windows returns this value */ case WM_PAINT: { PAINTSTRUCT ps; HDC hdc = BeginPaint( hwnd, &ps ); SCROLL_DrawScrollBar( hwnd, hdc, SB_CTL, TRUE, TRUE ); EndPaint( hwnd, &ps ); } break; case SBM_SETPOS16: case SBM_SETPOS: return SetScrollPos( hwnd, SB_CTL, wParam, (BOOL)lParam ); case SBM_GETPOS16: case SBM_GETPOS: return GetScrollPos( hwnd, SB_CTL ); case SBM_SETRANGE16: SetScrollRange( hwnd, SB_CTL, LOWORD(lParam), HIWORD(lParam), wParam /* FIXME: Is this correct? */ ); return 0; case SBM_SETRANGE: SetScrollRange( hwnd, SB_CTL, wParam, lParam, FALSE ); return 0; /* FIXME: return previous position */ case SBM_GETRANGE16: FIXME("don't know how to handle SBM_GETRANGE16 (wp=%04x,lp=%08lx)\n", wParam, lParam ); return 0; case SBM_GETRANGE: GetScrollRange( hwnd, SB_CTL, (LPINT)wParam, (LPINT)lParam ); return 0; case SBM_ENABLE_ARROWS16: case SBM_ENABLE_ARROWS: return EnableScrollBar( hwnd, SB_CTL, wParam ); case SBM_SETRANGEREDRAW: SetScrollRange( hwnd, SB_CTL, wParam, lParam, TRUE ); return 0; /* FIXME: return previous position */ case SBM_SETSCROLLINFO: return SetScrollInfo( hwnd, SB_CTL, (SCROLLINFO *)lParam, wParam ); case SBM_GETSCROLLINFO: return GetScrollInfo( hwnd, SB_CTL, (SCROLLINFO *)lParam ); case 0x00e5: case 0x00e7: case 0x00e8: case 0x00eb: case 0x00ec: case 0x00ed: case 0x00ee: case 0x00ef: ERR("unknown Win32 msg %04x wp=%08x lp=%08lx\n", message, wParam, lParam ); break; default: if (message >= WM_USER) WARN("unknown msg %04x wp=%04x lp=%08lx\n", message, wParam, lParam ); return DefWindowProcA( hwnd, message, wParam, lParam ); } return 0; } /************************************************************************* * SetScrollInfo16 (USER.475) */ INT16 WINAPI SetScrollInfo16( HWND16 hwnd, INT16 nBar, const SCROLLINFO *info, BOOL16 bRedraw ) { return (INT16)SetScrollInfo( hwnd, nBar, info, bRedraw ); } /************************************************************************* * SetScrollInfo (USER32.501) * SetScrollInfo can be used to set the position, upper bound, * lower bound, and page size of a scrollbar control. * * RETURNS * Scrollbar position * * NOTE * For 100 lines of text to be displayed in a window of 25 lines, * one would for instance use info->nMin=0, info->nMax=75 * (corresponding to the 76 different positions of the window on * the text), and info->nPage=25. */ INT WINAPI SetScrollInfo( HWND hwnd /* [I] Handle of window whose scrollbar will be affected */, INT nBar /* [I] One of SB_HORZ, SB_VERT, or SB_CTL */, const SCROLLINFO *info /* [I] Specifies what to change and new values */, BOOL bRedraw /* [I] Should scrollbar be redrawn afterwards ? */) { INT action; INT retVal = SCROLL_SetScrollInfo( hwnd, nBar, info, &action ); if( action & SA_SSI_HIDE ) SCROLL_ShowScrollBar( hwnd, nBar, FALSE, FALSE ); else { if( action & SA_SSI_SHOW ) if( SCROLL_ShowScrollBar( hwnd, nBar, TRUE, TRUE ) ) return retVal; /* SetWindowPos() already did the painting */ if( bRedraw && (action & SA_SSI_REFRESH)) SCROLL_RefreshScrollBar( hwnd, nBar, TRUE, TRUE ); else if( action & SA_SSI_REPAINT_ARROWS ) SCROLL_RefreshScrollBar( hwnd, nBar, TRUE, FALSE ); } return retVal; } INT SCROLL_SetScrollInfo( HWND hwnd, INT nBar, const SCROLLINFO *info, INT *action ) { /* Update the scrollbar state and set action flags according to * what has to be done graphics wise. */ SCROLLBAR_INFO *infoPtr; UINT new_flags; *action = 0; if (!(infoPtr = SCROLL_GetScrollInfo(hwnd, nBar))) return 0; if (info->fMask & ~(SIF_ALL | SIF_DISABLENOSCROLL)) return 0; if ((info->cbSize != sizeof(*info)) && (info->cbSize != sizeof(*info)-sizeof(info->nTrackPos))) return 0; if (TRACE_ON(scroll)) { DPRINTF( "hwnd=%04x bar=%d", hwnd, nBar); if (info->fMask & SIF_PAGE) DPRINTF( " page=%d", info->nPage ); if (info->fMask & SIF_POS) DPRINTF( " pos=%d", info->nPos ); if (info->fMask & SIF_RANGE) DPRINTF( " min=%d max=%d", info->nMin, info->nMax ); DPRINTF("\n"); } /* Set the page size */ if (info->fMask & SIF_PAGE) { if( infoPtr->Page != info->nPage ) { infoPtr->Page = info->nPage; *action |= SA_SSI_REFRESH; } } /* Set the scroll pos */ if (info->fMask & SIF_POS) { if( infoPtr->CurVal != info->nPos ) { infoPtr->CurVal = info->nPos; *action |= SA_SSI_REFRESH; } } /* Set the scroll range */ if (info->fMask & SIF_RANGE) { /* Invalid range -> range is set to (0,0) */ if ((info->nMin > info->nMax) || ((UINT)(info->nMax - info->nMin) >= 0x80000000)) { infoPtr->MinVal = 0; infoPtr->MaxVal = 0; } else { if( infoPtr->MinVal != info->nMin || infoPtr->MaxVal != info->nMax ) { *action |= SA_SSI_REFRESH; infoPtr->MinVal = info->nMin; infoPtr->MaxVal = info->nMax; } } } /* Make sure the page size is valid */ if (infoPtr->Page < 0) infoPtr->Page = 0; else if (infoPtr->Page > infoPtr->MaxVal - infoPtr->MinVal + 1 ) infoPtr->Page = infoPtr->MaxVal - infoPtr->MinVal + 1; /* Make sure the pos is inside the range */ if (infoPtr->CurVal < infoPtr->MinVal) infoPtr->CurVal = infoPtr->MinVal; else if (infoPtr->CurVal > infoPtr->MaxVal - max( infoPtr->Page-1, 0 )) infoPtr->CurVal = infoPtr->MaxVal - max( infoPtr->Page-1, 0 ); TRACE(" new values: page=%d pos=%d min=%d max=%d\n", infoPtr->Page, infoPtr->CurVal, infoPtr->MinVal, infoPtr->MaxVal ); /* don't change the scrollbar state if SetScrollInfo * is just called with SIF_DISABLENOSCROLL */ if(!(info->fMask & SIF_ALL)) goto done; /* Check if the scrollbar should be hidden or disabled */ if (info->fMask & (SIF_RANGE | SIF_PAGE | SIF_DISABLENOSCROLL)) { new_flags = infoPtr->flags; if (infoPtr->MinVal >= infoPtr->MaxVal - max( infoPtr->Page-1, 0 )) { /* Hide or disable scroll-bar */ if (info->fMask & SIF_DISABLENOSCROLL) { new_flags = ESB_DISABLE_BOTH; *action |= SA_SSI_REFRESH; } else if (nBar != SB_CTL) { *action = SA_SSI_HIDE; goto done; } } else /* Show and enable scroll-bar */ { new_flags = 0; if (nBar != SB_CTL) *action |= SA_SSI_SHOW; } if (infoPtr->flags != new_flags) /* check arrow flags */ { infoPtr->flags = new_flags; *action |= SA_SSI_REPAINT_ARROWS; } } done: /* Return current position */ return infoPtr->CurVal; } /************************************************************************* * GetScrollInfo16 (USER.476) */ BOOL16 WINAPI GetScrollInfo16( HWND16 hwnd, INT16 nBar, LPSCROLLINFO info ) { return GetScrollInfo( hwnd, nBar, info ); } /************************************************************************* * GetScrollInfo (USER32.284) * GetScrollInfo can be used to retrieve the position, upper bound, * lower bound, and page size of a scrollbar control. * * RETURNS STD */ BOOL WINAPI GetScrollInfo( HWND hwnd /* [I] Handle of window */ , INT nBar /* [I] One of SB_HORZ, SB_VERT, or SB_CTL */, LPSCROLLINFO info /* [IO] (info.fMask [I] specifies which values are to retrieve) */) { SCROLLBAR_INFO *infoPtr; if (!(infoPtr = SCROLL_GetScrollInfo( hwnd, nBar ))) return FALSE; if (info->fMask & ~(SIF_ALL | SIF_DISABLENOSCROLL)) return FALSE; if ((info->cbSize != sizeof(*info)) && (info->cbSize != sizeof(*info)-sizeof(info->nTrackPos))) return FALSE; if (info->fMask & SIF_PAGE) info->nPage = infoPtr->Page; if (info->fMask & SIF_POS) info->nPos = infoPtr->CurVal; if ((info->fMask & SIF_TRACKPOS) && (info->cbSize == sizeof(*info))) info->nTrackPos = (SCROLL_TrackingWin==hwnd) ? SCROLL_TrackingVal : infoPtr->CurVal; if (info->fMask & SIF_RANGE) { info->nMin = infoPtr->MinVal; info->nMax = infoPtr->MaxVal; } return (info->fMask & SIF_ALL) != 0; } /************************************************************************* * SetScrollPos16 (USER.62) */ INT16 WINAPI SetScrollPos16( HWND16 hwnd, INT16 nBar, INT16 nPos, BOOL16 bRedraw ) { return (INT16)SetScrollPos( hwnd, nBar, nPos, bRedraw ); } /************************************************************************* * SetScrollPos (USER32.502) * * RETURNS * Success: Scrollbar position * Failure: 0 * * REMARKS * Note the ambiguity when 0 is returned. Use GetLastError * to make sure there was an error (and to know which one). */ INT WINAPI SetScrollPos( HWND hwnd /* [I] Handle of window whose scrollbar will be affected */, INT nBar /* [I] One of SB_HORZ, SB_VERT, or SB_CTL */, INT nPos /* [I] New value */, BOOL bRedraw /* [I] Should scrollbar be redrawn afterwards ? */ ) { SCROLLINFO info; SCROLLBAR_INFO *infoPtr; INT oldPos; if (!(infoPtr = SCROLL_GetScrollInfo( hwnd, nBar ))) return 0; oldPos = infoPtr->CurVal; info.cbSize = sizeof(info); info.nPos = nPos; info.fMask = SIF_POS; SetScrollInfo( hwnd, nBar, &info, bRedraw ); return oldPos; } /************************************************************************* * GetScrollPos16 (USER.63) */ INT16 WINAPI GetScrollPos16( HWND16 hwnd, INT16 nBar ) { return (INT16)GetScrollPos( hwnd, nBar ); } /************************************************************************* * GetScrollPos (USER32.285) * * RETURNS * Success: Current position * Failure: 0 * * REMARKS * Note the ambiguity when 0 is returned. Use GetLastError * to make sure there was an error (and to know which one). */ INT WINAPI GetScrollPos( HWND hwnd, /* [I] Handle of window */ INT nBar /* [I] One of SB_HORZ, SB_VERT, or SB_CTL */) { SCROLLBAR_INFO *infoPtr; if (!(infoPtr = SCROLL_GetScrollInfo( hwnd, nBar ))) return 0; return infoPtr->CurVal; } /************************************************************************* * SetScrollRange16 (USER.64) */ void WINAPI SetScrollRange16( HWND16 hwnd, INT16 nBar, INT16 MinVal, INT16 MaxVal, BOOL16 bRedraw ) { /* Invalid range -> range is set to (0,0) */ if ((INT)MaxVal - (INT)MinVal > 0x7fff) MinVal = MaxVal = 0; SetScrollRange( hwnd, nBar, MinVal, MaxVal, bRedraw ); } /************************************************************************* * SetScrollRange (USER32.503) * * RETURNS STD */ BOOL WINAPI SetScrollRange( HWND hwnd, /* [I] Handle of window whose scrollbar will be affected */ INT nBar, /* [I] One of SB_HORZ, SB_VERT, or SB_CTL */ INT MinVal, /* [I] New minimum value */ INT MaxVal, /* [I] New maximum value */ BOOL bRedraw /* [I] Should scrollbar be redrawn afterwards ? */) { SCROLLINFO info; info.cbSize = sizeof(info); info.nMin = MinVal; info.nMax = MaxVal; info.fMask = SIF_RANGE; SetScrollInfo( hwnd, nBar, &info, bRedraw ); return TRUE; } /************************************************************************* * SCROLL_SetNCSbState * * Updates both scrollbars at the same time. Used by MDI CalcChildScroll(). */ INT SCROLL_SetNCSbState(WND* wndPtr, int vMin, int vMax, int vPos, int hMin, int hMax, int hPos) { INT vA, hA; SCROLLINFO vInfo, hInfo; vInfo.cbSize = hInfo.cbSize = sizeof(SCROLLINFO); vInfo.nMin = vMin; hInfo.nMin = hMin; vInfo.nMax = vMax; hInfo.nMax = hMax; vInfo.nPos = vPos; hInfo.nPos = hPos; vInfo.fMask = hInfo.fMask = SIF_RANGE | SIF_POS; SCROLL_SetScrollInfo( wndPtr->hwndSelf, SB_VERT, &vInfo, &vA ); SCROLL_SetScrollInfo( wndPtr->hwndSelf, SB_HORZ, &hInfo, &hA ); if( !SCROLL_ShowScrollBar( wndPtr->hwndSelf, SB_BOTH, (hA & SA_SSI_SHOW),(vA & SA_SSI_SHOW) ) ) { /* SetWindowPos() wasn't called, just redraw the scrollbars if needed */ if( vA & SA_SSI_REFRESH ) SCROLL_RefreshScrollBar( wndPtr->hwndSelf, SB_VERT, FALSE, TRUE ); if( hA & SA_SSI_REFRESH ) SCROLL_RefreshScrollBar( wndPtr->hwndSelf, SB_HORZ, FALSE, TRUE ); } return 0; } /************************************************************************* * GetScrollRange16 (USER.65) */ BOOL16 WINAPI GetScrollRange16( HWND16 hwnd, INT16 nBar, LPINT16 lpMin, LPINT16 lpMax) { INT min, max; BOOL16 ret = GetScrollRange( hwnd, nBar, &min, &max ); if (lpMin) *lpMin = min; if (lpMax) *lpMax = max; return ret; } /************************************************************************* * GetScrollRange (USER32.286) * * RETURNS STD */ BOOL WINAPI GetScrollRange( HWND hwnd, /* [I] Handle of window */ INT nBar, /* [I] One of SB_HORZ, SB_VERT, or SB_CTL */ LPINT lpMin, /* [O] Where to store minimum value */ LPINT lpMax /* [O] Where to store maximum value */) { SCROLLBAR_INFO *infoPtr; if (!(infoPtr = SCROLL_GetScrollInfo( hwnd, nBar ))) { if (lpMin) lpMin = 0; if (lpMax) lpMax = 0; return FALSE; } if (lpMin) *lpMin = infoPtr->MinVal; if (lpMax) *lpMax = infoPtr->MaxVal; return TRUE; } /************************************************************************* * SCROLL_ShowScrollBar() * * Back-end for ShowScrollBar(). Returns FALSE if no action was taken. * NOTE: fShowV/fShowH must be zero when nBar is SB_HORZ/SB_VERT. */ BOOL SCROLL_ShowScrollBar( HWND hwnd, INT nBar, BOOL fShowH, BOOL fShowV ) { WND *wndPtr = WIN_FindWndPtr( hwnd ); BOOL retvalue = FALSE; if (!wndPtr) return FALSE; TRACE("hwnd=%04x bar=%d horz=%d, vert=%d\n", hwnd, nBar, fShowH, fShowV ); switch(nBar) { case SB_CTL: ShowWindow( hwnd, fShowH ? SW_SHOW : SW_HIDE ); retvalue = TRUE; goto END; case SB_BOTH: case SB_HORZ: if (fShowH) { fShowH = !(wndPtr->dwStyle & WS_HSCROLL); wndPtr->dwStyle |= WS_HSCROLL; } else /* hide it */ { fShowH = (wndPtr->dwStyle & WS_HSCROLL); wndPtr->dwStyle &= ~WS_HSCROLL; } if( nBar == SB_HORZ ) { fShowV = FALSE; break; } /* fall through */ case SB_VERT: if (fShowV) { fShowV = !(wndPtr->dwStyle & WS_VSCROLL); wndPtr->dwStyle |= WS_VSCROLL; } else /* hide it */ { fShowV = (wndPtr->dwStyle & WS_VSCROLL); wndPtr->dwStyle &= ~WS_VSCROLL; } if ( nBar == SB_VERT ) fShowH = FALSE; break; default: retvalue = FALSE; /* Nothing to do! */ goto END; } if( fShowH || fShowV ) /* frame has been changed, let the window redraw itself */ { SetWindowPos( hwnd, 0, 0, 0, 0, 0, SWP_NOSIZE | SWP_NOMOVE | SWP_NOACTIVATE | SWP_NOZORDER | SWP_FRAMECHANGED ); retvalue = TRUE; goto END; } retvalue = FALSE; /* no frame changes */ END: WIN_ReleaseWndPtr(wndPtr); return retvalue; } /************************************************************************* * ShowScrollBar16 (USER.267) */ void WINAPI ShowScrollBar16( HWND16 hwnd, INT16 nBar, BOOL16 fShow ) { SCROLL_ShowScrollBar( hwnd, nBar, (nBar == SB_VERT) ? 0 : fShow, (nBar == SB_HORZ) ? 0 : fShow ); } /************************************************************************* * ShowScrollBar (USER32.532) * * RETURNS STD */ BOOL WINAPI ShowScrollBar( HWND hwnd, /* [I] Handle of window whose scrollbar(s) will be affected */ INT nBar, /* [I] One of SB_HORZ, SB_VERT, SB_BOTH or SB_CTL */ BOOL fShow /* [I] TRUE = show, FALSE = hide */) { SCROLL_ShowScrollBar( hwnd, nBar, (nBar == SB_VERT) ? 0 : fShow, (nBar == SB_HORZ) ? 0 : fShow ); return TRUE; } /************************************************************************* * EnableScrollBar16 (USER.482) */ BOOL16 WINAPI EnableScrollBar16( HWND16 hwnd, INT16 nBar, UINT16 flags ) { return EnableScrollBar( hwnd, nBar, flags ); } /************************************************************************* * EnableScrollBar (USER32.171) */ BOOL WINAPI EnableScrollBar( HWND hwnd, INT nBar, UINT flags ) { BOOL bFineWithMe; SCROLLBAR_INFO *infoPtr; TRACE("%04x %d %d\n", hwnd, nBar, flags ); flags &= ESB_DISABLE_BOTH; if (nBar == SB_BOTH) { if (!(infoPtr = SCROLL_GetScrollInfo( hwnd, SB_VERT ))) return FALSE; if (!(bFineWithMe = (infoPtr->flags == flags)) ) { infoPtr->flags = flags; SCROLL_RefreshScrollBar( hwnd, SB_VERT, TRUE, TRUE ); } nBar = SB_HORZ; } else bFineWithMe = TRUE; if (!(infoPtr = SCROLL_GetScrollInfo( hwnd, nBar ))) return FALSE; if (bFineWithMe && infoPtr->flags == flags) return FALSE; infoPtr->flags = flags; SCROLL_RefreshScrollBar( hwnd, nBar, TRUE, TRUE ); return TRUE; } wine-20000526/controls/static.c0100644000175000001440000003352307061515173015753 0ustar julliardusers/* * Static control * * Copyright David W. Metcalfe, 1993 * */ #include "windef.h" #include "wingdi.h" #include "wine/winuser16.h" #include "win.h" #include "cursoricon.h" #include "static.h" #include "heap.h" #include "debugtools.h" #include "tweak.h" DEFAULT_DEBUG_CHANNEL(static) static void STATIC_PaintOwnerDrawfn( WND *wndPtr, HDC hdc ); static void STATIC_PaintTextfn( WND *wndPtr, HDC hdc ); static void STATIC_PaintRectfn( WND *wndPtr, HDC hdc ); static void STATIC_PaintIconfn( WND *wndPtr, HDC hdc ); static void STATIC_PaintBitmapfn( WND *wndPtr, HDC hdc ); static void STATIC_PaintEtchedfn( WND *wndPtr, HDC hdc ); static COLORREF color_windowframe, color_background, color_window; typedef void (*pfPaint)( WND *, HDC ); static pfPaint staticPaintFunc[SS_TYPEMASK+1] = { STATIC_PaintTextfn, /* SS_LEFT */ STATIC_PaintTextfn, /* SS_CENTER */ STATIC_PaintTextfn, /* SS_RIGHT */ STATIC_PaintIconfn, /* SS_ICON */ STATIC_PaintRectfn, /* SS_BLACKRECT */ STATIC_PaintRectfn, /* SS_GRAYRECT */ STATIC_PaintRectfn, /* SS_WHITERECT */ STATIC_PaintRectfn, /* SS_BLACKFRAME */ STATIC_PaintRectfn, /* SS_GRAYFRAME */ STATIC_PaintRectfn, /* SS_WHITEFRAME */ NULL, /* Not defined */ STATIC_PaintTextfn, /* SS_SIMPLE */ STATIC_PaintTextfn, /* SS_LEFTNOWORDWRAP */ STATIC_PaintOwnerDrawfn, /* SS_OWNERDRAW */ STATIC_PaintBitmapfn, /* SS_BITMAP */ NULL, /* SS_ENHMETAFILE */ STATIC_PaintEtchedfn, /* SS_ETCHEDHORIZ */ STATIC_PaintEtchedfn, /* SS_ETCHEDVERT */ STATIC_PaintEtchedfn, /* SS_ETCHEDFRAME */ }; /*********************************************************************** * STATIC_SetIcon * * Set the icon for an SS_ICON control. */ static HICON16 STATIC_SetIcon( WND *wndPtr, HICON16 hicon ) { HICON16 prevIcon; STATICINFO *infoPtr = (STATICINFO *)wndPtr->wExtra; CURSORICONINFO *info = hicon?(CURSORICONINFO *) GlobalLock16( hicon ):NULL; if ((wndPtr->dwStyle & SS_TYPEMASK) != SS_ICON) return 0; if (hicon && !info) { ERR("huh? hicon!=0, but info=0???\n"); return 0; } prevIcon = infoPtr->hIcon; infoPtr->hIcon = hicon; if (hicon) { SetWindowPos( wndPtr->hwndSelf, 0, 0, 0, info->nWidth, info->nHeight, SWP_NOACTIVATE | SWP_NOMOVE | SWP_NOZORDER ); GlobalUnlock16( hicon ); } return prevIcon; } /*********************************************************************** * STATIC_SetBitmap * * Set the bitmap for an SS_BITMAP control. */ static HBITMAP16 STATIC_SetBitmap( WND *wndPtr, HBITMAP16 hBitmap ) { HBITMAP16 hOldBitmap; STATICINFO *infoPtr = (STATICINFO *)wndPtr->wExtra; if ((wndPtr->dwStyle & SS_TYPEMASK) != SS_BITMAP) return 0; if (hBitmap && GetObjectType(hBitmap) != OBJ_BITMAP) { ERR("huh? hBitmap!=0, but not bitmap\n"); return 0; } hOldBitmap = infoPtr->hIcon; infoPtr->hIcon = hBitmap; if (hBitmap) { BITMAP bm; GetObjectA(hBitmap, sizeof(bm), &bm); SetWindowPos( wndPtr->hwndSelf, 0, 0, 0, bm.bmWidth, bm.bmHeight, SWP_NOACTIVATE | SWP_NOMOVE | SWP_NOZORDER ); } return hOldBitmap; } /*********************************************************************** * STATIC_LoadIcon * * Load the icon for an SS_ICON control. */ static HICON16 STATIC_LoadIcon( WND *wndPtr, LPCSTR name ) { HICON16 hicon; if (wndPtr->flags & WIN_ISWIN32) { if (!HIWORD(wndPtr->hInstance)) { LPSTR segname = SEGPTR_STRDUP(name); hicon = LoadIcon16( wndPtr->hInstance, SEGPTR_GET(segname) ); SEGPTR_FREE(segname); } else hicon = LoadIconA( wndPtr->hInstance, name ); } else { LPSTR segname = SEGPTR_STRDUP(name); if (HIWORD(wndPtr->hInstance)) FIXME("win16 window class, but win32 hinstance??\n"); hicon = LoadIcon16( wndPtr->hInstance, SEGPTR_GET(segname) ); SEGPTR_FREE(segname); } if (!hicon) hicon = LoadIconA( 0, name ); return hicon; } /*********************************************************************** * STATIC_LoadBitmap * * Load the bitmap for an SS_BITMAP control. */ static HBITMAP16 STATIC_LoadBitmap( WND *wndPtr, LPCSTR name ) { HBITMAP16 hbitmap; if (wndPtr->flags & WIN_ISWIN32) { hbitmap = LoadBitmapA( wndPtr->hInstance, name ); if (!hbitmap) /* Try OEM icon (FIXME: is this right?) */ hbitmap = LoadBitmapA( 0, name ); } else { LPSTR segname = SEGPTR_STRDUP(name); hbitmap = LoadBitmap16( wndPtr->hInstance, SEGPTR_GET(segname) ); if (!hbitmap) /* Try OEM icon (FIXME: is this right?) */ hbitmap = LoadBitmapA( 0, segname ); SEGPTR_FREE(segname); } return hbitmap; } /*********************************************************************** * StaticWndProc */ LRESULT WINAPI StaticWndProc( HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam ) { LRESULT lResult = 0; WND *wndPtr = WIN_FindWndPtr(hWnd); LONG style = wndPtr->dwStyle & SS_TYPEMASK; STATICINFO *infoPtr = (STATICINFO *)wndPtr->wExtra; switch (uMsg) { case WM_NCCREATE: { CREATESTRUCTA *cs = (CREATESTRUCTA *)lParam; if ((TWEAK_WineLook > WIN31_LOOK) && (wndPtr->dwStyle & SS_SUNKEN)) wndPtr->dwExStyle |= WS_EX_STATICEDGE; if (style == SS_ICON) { if (cs->lpszName) { if (!HIWORD(cs->lpszName) || cs->lpszName[0]) STATIC_SetIcon( wndPtr, STATIC_LoadIcon( wndPtr, cs->lpszName )); } lResult = 1; goto END; } if (style == SS_BITMAP) { if (cs->lpszName) STATIC_SetBitmap( wndPtr, STATIC_LoadBitmap( wndPtr, cs->lpszName )); WARN("style SS_BITMAP, dwStyle is 0x%08lx\n", wndPtr->dwStyle); lResult = 1; goto END; } if (!HIWORD(cs->lpszName) && (cs->lpszName)) { FIXME("windowName is 0x%04x, not doing DefWindowProc\n", LOWORD(cs->lpszName)); lResult = 1; goto END; } lResult = DefWindowProcA( hWnd, uMsg, wParam, lParam ); goto END; } case WM_CREATE: if (style < 0L || style > SS_TYPEMASK) { ERR("Unknown style 0x%02lx\n", style ); lResult = -1L; break; } /* initialise colours */ color_windowframe = GetSysColor(COLOR_WINDOWFRAME); color_background = GetSysColor(COLOR_BACKGROUND); color_window = GetSysColor(COLOR_WINDOW); break; case WM_NCDESTROY: if (style == SS_ICON) { /* * FIXME * DestroyIcon32( STATIC_SetIcon( wndPtr, 0 ) ); * * We don't want to do this yet because DestroyIcon32 is broken. If the icon * had already been loaded by the application the last thing we want to do is * GlobalFree16 the handle. */ } else { lResult = DefWindowProcA( hWnd, uMsg, wParam, lParam ); } break; case WM_PAINT: { PAINTSTRUCT ps; BeginPaint( hWnd, &ps ); if (staticPaintFunc[style]) (staticPaintFunc[style])( wndPtr, ps.hdc ); EndPaint( hWnd, &ps ); } break; case WM_ENABLE: InvalidateRect( hWnd, NULL, FALSE ); break; case WM_SYSCOLORCHANGE: color_windowframe = GetSysColor(COLOR_WINDOWFRAME); color_background = GetSysColor(COLOR_BACKGROUND); color_window = GetSysColor(COLOR_WINDOW); InvalidateRect( hWnd, NULL, TRUE ); break; case WM_SETTEXT: if (style == SS_ICON) /* FIXME : should we also return the previous hIcon here ??? */ STATIC_SetIcon( wndPtr, STATIC_LoadIcon( wndPtr, (LPCSTR)lParam )); else if (style == SS_BITMAP) STATIC_SetBitmap(wndPtr,STATIC_LoadBitmap(wndPtr,(LPCSTR)lParam )); else DEFWND_SetText( wndPtr, (LPCSTR)lParam ); InvalidateRect( hWnd, NULL, FALSE ); break; case WM_SETFONT: if (style == SS_ICON) { lResult = 0; goto END; } if (style == SS_BITMAP) { lResult = 0; goto END; } infoPtr->hFont = (HFONT16)wParam; if (LOWORD(lParam)) { InvalidateRect( hWnd, NULL, FALSE ); UpdateWindow( hWnd ); } break; case WM_GETFONT: lResult = infoPtr->hFont; goto END; case WM_NCHITTEST: lResult = HTTRANSPARENT; goto END; case WM_GETDLGCODE: lResult = DLGC_STATIC; goto END; case STM_GETIMAGE: case STM_GETICON16: case STM_GETICON: lResult = infoPtr->hIcon; goto END; case STM_SETIMAGE: /* FIXME: handle wParam */ lResult = STATIC_SetBitmap( wndPtr, (HBITMAP)lParam ); InvalidateRect( hWnd, NULL, FALSE ); UpdateWindow( hWnd ); break; case STM_SETICON16: case STM_SETICON: lResult = STATIC_SetIcon( wndPtr, (HICON16)wParam ); InvalidateRect( hWnd, NULL, FALSE ); UpdateWindow( hWnd ); break; default: lResult = DefWindowProcA(hWnd, uMsg, wParam, lParam); break; } END: WIN_ReleaseWndPtr(wndPtr); return lResult; } static void STATIC_PaintOwnerDrawfn( WND *wndPtr, HDC hdc ) { DRAWITEMSTRUCT dis; dis.CtlType = ODT_STATIC; dis.CtlID = wndPtr->wIDmenu; dis.itemID = 0; dis.itemAction = ODA_DRAWENTIRE; dis.itemState = 0; dis.hwndItem = wndPtr->hwndSelf; dis.hDC = hdc; dis.itemData = 0; GetClientRect( wndPtr->hwndSelf, &dis.rcItem ); SendMessageA( GetParent(wndPtr->hwndSelf), WM_CTLCOLORSTATIC, hdc, wndPtr->hwndSelf ); SendMessageA( GetParent(wndPtr->hwndSelf), WM_DRAWITEM, wndPtr->wIDmenu, (LPARAM)&dis ); } static void STATIC_PaintTextfn( WND *wndPtr, HDC hdc ) { RECT rc; HBRUSH hBrush; WORD wFormat; LONG style = wndPtr->dwStyle; STATICINFO *infoPtr = (STATICINFO *)wndPtr->wExtra; GetClientRect( wndPtr->hwndSelf, &rc); switch (style & SS_TYPEMASK) { case SS_LEFT: wFormat = DT_LEFT | DT_EXPANDTABS | DT_WORDBREAK | DT_NOCLIP; break; case SS_CENTER: wFormat = DT_CENTER | DT_EXPANDTABS | DT_WORDBREAK | DT_NOCLIP; break; case SS_RIGHT: wFormat = DT_RIGHT | DT_EXPANDTABS | DT_WORDBREAK | DT_NOCLIP; break; case SS_SIMPLE: wFormat = DT_LEFT | DT_SINGLELINE | DT_VCENTER | DT_NOCLIP; break; case SS_LEFTNOWORDWRAP: wFormat = DT_LEFT | DT_EXPANDTABS | DT_VCENTER; break; default: return; } if (style & SS_NOPREFIX) wFormat |= DT_NOPREFIX; if (infoPtr->hFont) SelectObject( hdc, infoPtr->hFont ); hBrush = SendMessageA( GetParent(wndPtr->hwndSelf), WM_CTLCOLORSTATIC, hdc, wndPtr->hwndSelf ); if (!hBrush) hBrush = GetStockObject(WHITE_BRUSH); FillRect( hdc, &rc, hBrush ); if (!IsWindowEnabled(wndPtr->hwndSelf)) SetTextColor(hdc, GetSysColor(COLOR_GRAYTEXT)); if (wndPtr->text) DrawTextA( hdc, wndPtr->text, -1, &rc, wFormat ); } static void STATIC_PaintRectfn( WND *wndPtr, HDC hdc ) { RECT rc; HBRUSH hBrush; GetClientRect( wndPtr->hwndSelf, &rc); switch (wndPtr->dwStyle & SS_TYPEMASK) { case SS_BLACKRECT: hBrush = CreateSolidBrush(color_windowframe); FillRect( hdc, &rc, hBrush ); break; case SS_GRAYRECT: hBrush = CreateSolidBrush(color_background); FillRect( hdc, &rc, hBrush ); break; case SS_WHITERECT: hBrush = CreateSolidBrush(color_window); FillRect( hdc, &rc, hBrush ); break; case SS_BLACKFRAME: hBrush = CreateSolidBrush(color_windowframe); FrameRect( hdc, &rc, hBrush ); break; case SS_GRAYFRAME: hBrush = CreateSolidBrush(color_background); FrameRect( hdc, &rc, hBrush ); break; case SS_WHITEFRAME: hBrush = CreateSolidBrush(color_window); FrameRect( hdc, &rc, hBrush ); break; default: return; } DeleteObject( hBrush ); } static void STATIC_PaintIconfn( WND *wndPtr, HDC hdc ) { RECT rc; HBRUSH hbrush; STATICINFO *infoPtr = (STATICINFO *)wndPtr->wExtra; GetClientRect( wndPtr->hwndSelf, &rc ); hbrush = SendMessageA( GetParent(wndPtr->hwndSelf), WM_CTLCOLORSTATIC, hdc, wndPtr->hwndSelf ); FillRect( hdc, &rc, hbrush ); if (infoPtr->hIcon) DrawIcon( hdc, rc.left, rc.top, infoPtr->hIcon ); } static void STATIC_PaintBitmapfn(WND *wndPtr, HDC hdc ) { RECT rc; HBRUSH hbrush; STATICINFO *infoPtr = (STATICINFO *)wndPtr->wExtra; HDC hMemDC; HBITMAP oldbitmap; GetClientRect( wndPtr->hwndSelf, &rc ); hbrush = SendMessageA( GetParent(wndPtr->hwndSelf), WM_CTLCOLORSTATIC, hdc, wndPtr->hwndSelf ); FillRect( hdc, &rc, hbrush ); if (infoPtr->hIcon) { BITMAP bm; SIZE sz; if(GetObjectType(infoPtr->hIcon) != OBJ_BITMAP) return; if (!(hMemDC = CreateCompatibleDC( hdc ))) return; GetObjectA(infoPtr->hIcon, sizeof(bm), &bm); GetBitmapDimensionEx(infoPtr->hIcon, &sz); oldbitmap = SelectObject(hMemDC, infoPtr->hIcon); BitBlt(hdc, sz.cx, sz.cy, bm.bmWidth, bm.bmHeight, hMemDC, 0, 0, SRCCOPY); SelectObject(hMemDC, oldbitmap); DeleteDC(hMemDC); } } static void STATIC_PaintEtchedfn( WND *wndPtr, HDC hdc ) { RECT rc; if (TWEAK_WineLook == WIN31_LOOK) return; GetClientRect( wndPtr->hwndSelf, &rc ); switch (wndPtr->dwStyle & SS_TYPEMASK) { case SS_ETCHEDHORZ: DrawEdge(hdc,&rc,EDGE_ETCHED,BF_TOP|BF_BOTTOM); break; case SS_ETCHEDVERT: DrawEdge(hdc,&rc,EDGE_ETCHED,BF_LEFT|BF_RIGHT); break; case SS_ETCHEDFRAME: DrawEdge (hdc, &rc, EDGE_ETCHED, BF_RECT); break; } } wine-20000526/controls/uitools.c0100644000175000001440000013107007070212243016146 0ustar julliardusers/* * User Interface Functions * * Copyright 1997 Dimitrie O. Paun * Copyright 1997 Bertho A. Stultiens */ #include "windef.h" #include "wingdi.h" #include "wine/winuser16.h" #include "winuser.h" #include "debugtools.h" #include "tweak.h" DEFAULT_DEBUG_CHANNEL(graphics) static const WORD wPattern_AA55[8] = { 0xaaaa, 0x5555, 0xaaaa, 0x5555, 0xaaaa, 0x5555, 0xaaaa, 0x5555 }; /* These tables are used in: * UITOOLS_DrawDiagEdge() * UITOOLS_DrawRectEdge() */ static const char LTInnerNormal[] = { -1, -1, -1, -1, -1, COLOR_BTNHIGHLIGHT, COLOR_BTNHIGHLIGHT, -1, -1, COLOR_3DDKSHADOW, COLOR_3DDKSHADOW, -1, -1, -1, -1, -1 }; static const char LTOuterNormal[] = { -1, COLOR_3DLIGHT, COLOR_BTNSHADOW, -1, COLOR_BTNHIGHLIGHT, COLOR_3DLIGHT, COLOR_BTNSHADOW, -1, COLOR_3DDKSHADOW, COLOR_3DLIGHT, COLOR_BTNSHADOW, -1, -1, COLOR_3DLIGHT, COLOR_BTNSHADOW, -1 }; static const char RBInnerNormal[] = { -1, -1, -1, -1, -1, COLOR_BTNSHADOW, COLOR_BTNSHADOW, -1, -1, COLOR_3DLIGHT, COLOR_3DLIGHT, -1, -1, -1, -1, -1 }; static const char RBOuterNormal[] = { -1, COLOR_3DDKSHADOW, COLOR_BTNHIGHLIGHT, -1, COLOR_BTNSHADOW, COLOR_3DDKSHADOW, COLOR_BTNHIGHLIGHT, -1, COLOR_3DLIGHT, COLOR_3DDKSHADOW, COLOR_BTNHIGHLIGHT, -1, -1, COLOR_3DDKSHADOW, COLOR_BTNHIGHLIGHT, -1 }; static const char LTInnerSoft[] = { -1, -1, -1, -1, -1, COLOR_3DLIGHT, COLOR_3DLIGHT, -1, -1, COLOR_BTNSHADOW, COLOR_BTNSHADOW, -1, -1, -1, -1, -1 }; static const char LTOuterSoft[] = { -1, COLOR_BTNHIGHLIGHT, COLOR_3DDKSHADOW, -1, COLOR_3DLIGHT, COLOR_BTNHIGHLIGHT, COLOR_3DDKSHADOW, -1, COLOR_BTNSHADOW, COLOR_BTNHIGHLIGHT, COLOR_3DDKSHADOW, -1, -1, COLOR_BTNHIGHLIGHT, COLOR_3DDKSHADOW, -1 }; #define RBInnerSoft RBInnerNormal /* These are the same */ #define RBOuterSoft RBOuterNormal static const char LTRBOuterMono[] = { -1, COLOR_WINDOWFRAME, COLOR_WINDOWFRAME, COLOR_WINDOWFRAME, COLOR_WINDOW, COLOR_WINDOWFRAME, COLOR_WINDOWFRAME, COLOR_WINDOWFRAME, COLOR_WINDOW, COLOR_WINDOWFRAME, COLOR_WINDOWFRAME, COLOR_WINDOWFRAME, COLOR_WINDOW, COLOR_WINDOWFRAME, COLOR_WINDOWFRAME, COLOR_WINDOWFRAME, }; static const char LTRBInnerMono[] = { -1, -1, -1, -1, -1, COLOR_WINDOW, COLOR_WINDOW, COLOR_WINDOW, -1, COLOR_WINDOW, COLOR_WINDOW, COLOR_WINDOW, -1, COLOR_WINDOW, COLOR_WINDOW, COLOR_WINDOW, }; static const char LTRBOuterFlat[] = { -1, COLOR_BTNSHADOW, COLOR_BTNSHADOW, COLOR_BTNSHADOW, COLOR_WINDOWFRAME, COLOR_BTNSHADOW, COLOR_BTNSHADOW, COLOR_BTNSHADOW, COLOR_WINDOWFRAME, COLOR_BTNSHADOW, COLOR_BTNSHADOW, COLOR_BTNSHADOW, COLOR_WINDOWFRAME, COLOR_BTNSHADOW, COLOR_BTNSHADOW, COLOR_BTNSHADOW, }; static const char LTRBInnerFlat[] = { -1, -1, -1, -1, -1, COLOR_WINDOWFRAME, COLOR_WINDOWFRAME, COLOR_WINDOWFRAME, -1, COLOR_WINDOWFRAME, COLOR_WINDOWFRAME, COLOR_WINDOWFRAME, -1, COLOR_WINDOWFRAME, COLOR_WINDOWFRAME, COLOR_WINDOWFRAME, }; /*********************************************************************** * UITOOLS_DrawDiagEdge * * Same as DrawEdge invoked with BF_DIAGONAL * * 03-Dec-1997: Changed by Bertho Stultiens * * See also comments with UITOOLS_DrawRectEdge() */ static BOOL UITOOLS95_DrawDiagEdge(HDC hdc, LPRECT rc, UINT uType, UINT uFlags) { POINT Points[4]; char InnerI, OuterI; HPEN InnerPen, OuterPen; POINT SavePoint; HPEN SavePen; int spx, spy; int epx, epy; int Width = rc->right - rc->left; int Height= rc->bottom - rc->top; int SmallDiam = Width > Height ? Height : Width; BOOL retval = !( ((uType & BDR_INNER) == BDR_INNER || (uType & BDR_OUTER) == BDR_OUTER) && !(uFlags & (BF_FLAT|BF_MONO)) ); int add = (LTRBInnerMono[uType & (BDR_INNER|BDR_OUTER)] != -1 ? 1 : 0) + (LTRBOuterMono[uType & (BDR_INNER|BDR_OUTER)] != -1 ? 1 : 0); /* Init some vars */ OuterPen = InnerPen = (HPEN)GetStockObject(NULL_PEN); SavePen = (HPEN)SelectObject(hdc, InnerPen); spx = spy = epx = epy = 0; /* Satisfy the compiler... */ /* Determine the colors of the edges */ if(uFlags & BF_MONO) { InnerI = LTRBInnerMono[uType & (BDR_INNER|BDR_OUTER)]; OuterI = LTRBOuterMono[uType & (BDR_INNER|BDR_OUTER)]; } else if(uFlags & BF_FLAT) { InnerI = LTRBInnerFlat[uType & (BDR_INNER|BDR_OUTER)]; OuterI = LTRBOuterFlat[uType & (BDR_INNER|BDR_OUTER)]; } else if(uFlags & BF_SOFT) { if(uFlags & BF_BOTTOM) { InnerI = RBInnerSoft[uType & (BDR_INNER|BDR_OUTER)]; OuterI = RBOuterSoft[uType & (BDR_INNER|BDR_OUTER)]; } else { InnerI = LTInnerSoft[uType & (BDR_INNER|BDR_OUTER)]; OuterI = LTOuterSoft[uType & (BDR_INNER|BDR_OUTER)]; } } else { if(uFlags & BF_BOTTOM) { InnerI = RBInnerNormal[uType & (BDR_INNER|BDR_OUTER)]; OuterI = RBOuterNormal[uType & (BDR_INNER|BDR_OUTER)]; } else { InnerI = LTInnerNormal[uType & (BDR_INNER|BDR_OUTER)]; OuterI = LTOuterNormal[uType & (BDR_INNER|BDR_OUTER)]; } } if(InnerI != -1) InnerPen = GetSysColorPen(InnerI); if(OuterI != -1) OuterPen = GetSysColorPen(OuterI); MoveToEx(hdc, 0, 0, &SavePoint); /* Don't ask me why, but this is what is visible... */ /* This must be possible to do much simpler, but I fail to */ /* see the logic in the MS implementation (sigh...). */ /* So, this might look a bit brute force here (and it is), but */ /* it gets the job done;) */ switch(uFlags & BF_RECT) { case 0: case BF_LEFT: case BF_BOTTOM: case BF_BOTTOMLEFT: /* Left bottom endpoint */ epx = rc->left-1; spx = epx + SmallDiam; epy = rc->bottom; spy = epy - SmallDiam; break; case BF_TOPLEFT: case BF_BOTTOMRIGHT: /* Left top endpoint */ epx = rc->left-1; spx = epx + SmallDiam; epy = rc->top-1; spy = epy + SmallDiam; break; case BF_TOP: case BF_RIGHT: case BF_TOPRIGHT: case BF_RIGHT|BF_LEFT: case BF_RIGHT|BF_LEFT|BF_TOP: case BF_BOTTOM|BF_TOP: case BF_BOTTOM|BF_TOP|BF_LEFT: case BF_BOTTOMRIGHT|BF_LEFT: case BF_BOTTOMRIGHT|BF_TOP: case BF_RECT: /* Right top endpoint */ spx = rc->left; epx = spx + SmallDiam; spy = rc->bottom-1; epy = spy - SmallDiam; break; } MoveToEx(hdc, spx, spy, NULL); SelectObject(hdc, OuterPen); LineTo(hdc, epx, epy); SelectObject(hdc, InnerPen); switch(uFlags & (BF_RECT|BF_DIAGONAL)) { case BF_DIAGONAL_ENDBOTTOMLEFT: case (BF_DIAGONAL|BF_BOTTOM): case BF_DIAGONAL: case (BF_DIAGONAL|BF_LEFT): MoveToEx(hdc, spx-1, spy, NULL); LineTo(hdc, epx, epy-1); Points[0].x = spx-add; Points[0].y = spy; Points[1].x = rc->left; Points[1].y = rc->top; Points[2].x = epx+1; Points[2].y = epy-1-add; Points[3] = Points[2]; break; case BF_DIAGONAL_ENDBOTTOMRIGHT: MoveToEx(hdc, spx-1, spy, NULL); LineTo(hdc, epx, epy+1); Points[0].x = spx-add; Points[0].y = spy; Points[1].x = rc->left; Points[1].y = rc->bottom-1; Points[2].x = epx+1; Points[2].y = epy+1+add; Points[3] = Points[2]; break; case (BF_DIAGONAL|BF_BOTTOM|BF_RIGHT|BF_TOP): case (BF_DIAGONAL|BF_BOTTOM|BF_RIGHT|BF_TOP|BF_LEFT): case BF_DIAGONAL_ENDTOPRIGHT: case (BF_DIAGONAL|BF_RIGHT|BF_TOP|BF_LEFT): MoveToEx(hdc, spx+1, spy, NULL); LineTo(hdc, epx, epy+1); Points[0].x = epx-1; Points[0].y = epy+1+add; Points[1].x = rc->right-1; Points[1].y = rc->top+add; Points[2].x = rc->right-1; Points[2].y = rc->bottom-1; Points[3].x = spx+add; Points[3].y = spy; break; case BF_DIAGONAL_ENDTOPLEFT: MoveToEx(hdc, spx, spy-1, NULL); LineTo(hdc, epx+1, epy); Points[0].x = epx+1+add; Points[0].y = epy+1; Points[1].x = rc->right-1; Points[1].y = rc->top; Points[2].x = rc->right-1; Points[2].y = rc->bottom-1-add; Points[3].x = spx; Points[3].y = spy-add; break; case (BF_DIAGONAL|BF_TOP): case (BF_DIAGONAL|BF_BOTTOM|BF_TOP): case (BF_DIAGONAL|BF_BOTTOM|BF_TOP|BF_LEFT): MoveToEx(hdc, spx+1, spy-1, NULL); LineTo(hdc, epx, epy); Points[0].x = epx-1; Points[0].y = epy+1; Points[1].x = rc->right-1; Points[1].y = rc->top; Points[2].x = rc->right-1; Points[2].y = rc->bottom-1-add; Points[3].x = spx+add; Points[3].y = spy-add; break; case (BF_DIAGONAL|BF_RIGHT): case (BF_DIAGONAL|BF_RIGHT|BF_LEFT): case (BF_DIAGONAL|BF_RIGHT|BF_LEFT|BF_BOTTOM): MoveToEx(hdc, spx, spy, NULL); LineTo(hdc, epx-1, epy+1); Points[0].x = spx; Points[0].y = spy; Points[1].x = rc->left; Points[1].y = rc->top+add; Points[2].x = epx-1-add; Points[2].y = epy+1+add; Points[3] = Points[2]; break; } /* Fill the interior if asked */ if((uFlags & BF_MIDDLE) && retval) { HBRUSH hbsave; HBRUSH hb = GetSysColorBrush(uFlags & BF_MONO ? COLOR_WINDOW :COLOR_BTNFACE); HPEN hpsave; HPEN hp = GetSysColorPen(uFlags & BF_MONO ? COLOR_WINDOW : COLOR_BTNFACE); hbsave = (HBRUSH)SelectObject(hdc, hb); hpsave = (HPEN)SelectObject(hdc, hp); Polygon(hdc, Points, 4); SelectObject(hdc, hbsave); SelectObject(hdc, hpsave); } /* Adjust rectangle if asked */ if(uFlags & BF_ADJUST) { if(uFlags & BF_LEFT) rc->left += add; if(uFlags & BF_RIGHT) rc->right -= add; if(uFlags & BF_TOP) rc->top += add; if(uFlags & BF_BOTTOM) rc->bottom -= add; } /* Cleanup */ SelectObject(hdc, SavePen); MoveToEx(hdc, SavePoint.x, SavePoint.y, NULL); return retval; } /*********************************************************************** * UITOOLS_DrawRectEdge * * Same as DrawEdge invoked without BF_DIAGONAL * * 23-Nov-1997: Changed by Bertho Stultiens * * Well, I started testing this and found out that there are a few things * that weren't quite as win95. The following rewrite should reproduce * win95 results completely. * The colorselection is table-driven to avoid awfull if-statements. * The table below show the color settings. * * Pen selection table for uFlags = 0 * * uType | LTI | LTO | RBI | RBO * ------+-------+-------+-------+------- * 0000 | x | x | x | x * 0001 | x | 22 | x | 21 * 0010 | x | 16 | x | 20 * 0011 | x | x | x | x * ------+-------+-------+-------+------- * 0100 | x | 20 | x | 16 * 0101 | 20 | 22 | 16 | 21 * 0110 | 20 | 16 | 16 | 20 * 0111 | x | x | x | x * ------+-------+-------+-------+------- * 1000 | x | 21 | x | 22 * 1001 | 21 | 22 | 22 | 21 * 1010 | 21 | 16 | 22 | 20 * 1011 | x | x | x | x * ------+-------+-------+-------+------- * 1100 | x | x | x | x * 1101 | x | x (22)| x | x (21) * 1110 | x | x (16)| x | x (20) * 1111 | x | x | x | x * * Pen selection table for uFlags = BF_SOFT * * uType | LTI | LTO | RBI | RBO * ------+-------+-------+-------+------- * 0000 | x | x | x | x * 0001 | x | 20 | x | 21 * 0010 | x | 21 | x | 20 * 0011 | x | x | x | x * ------+-------+-------+-------+------- * 0100 | x | 22 | x | 16 * 0101 | 22 | 20 | 16 | 21 * 0110 | 22 | 21 | 16 | 20 * 0111 | x | x | x | x * ------+-------+-------+-------+------- * 1000 | x | 16 | x | 22 * 1001 | 16 | 20 | 22 | 21 * 1010 | 16 | 21 | 22 | 20 * 1011 | x | x | x | x * ------+-------+-------+-------+------- * 1100 | x | x | x | x * 1101 | x | x (20)| x | x (21) * 1110 | x | x (21)| x | x (20) * 1111 | x | x | x | x * * x = don't care; (n) = is what win95 actually uses * LTI = left Top Inner line * LTO = left Top Outer line * RBI = Right Bottom Inner line * RBO = Right Bottom Outer line * 15 = COLOR_BTNFACE * 16 = COLOR_BTNSHADOW * 20 = COLOR_BTNHIGHLIGHT * 21 = COLOR_3DDKSHADOW * 22 = COLOR_3DLIGHT */ static BOOL UITOOLS95_DrawRectEdge(HDC hdc, LPRECT rc, UINT uType, UINT uFlags) { char LTInnerI, LTOuterI; char RBInnerI, RBOuterI; HPEN LTInnerPen, LTOuterPen; HPEN RBInnerPen, RBOuterPen; RECT InnerRect = *rc; POINT SavePoint; HPEN SavePen; int LBpenplus = 0; int LTpenplus = 0; int RTpenplus = 0; int RBpenplus = 0; BOOL retval = !( ((uType & BDR_INNER) == BDR_INNER || (uType & BDR_OUTER) == BDR_OUTER) && !(uFlags & (BF_FLAT|BF_MONO)) ); /* Init some vars */ LTInnerPen = LTOuterPen = RBInnerPen = RBOuterPen = (HPEN)GetStockObject(NULL_PEN); SavePen = (HPEN)SelectObject(hdc, LTInnerPen); /* Determine the colors of the edges */ if(uFlags & BF_MONO) { LTInnerI = RBInnerI = LTRBInnerMono[uType & (BDR_INNER|BDR_OUTER)]; LTOuterI = RBOuterI = LTRBOuterMono[uType & (BDR_INNER|BDR_OUTER)]; } else if(uFlags & BF_FLAT) { LTInnerI = RBInnerI = LTRBInnerFlat[uType & (BDR_INNER|BDR_OUTER)]; LTOuterI = RBOuterI = LTRBOuterFlat[uType & (BDR_INNER|BDR_OUTER)]; /* Bertho Stultiens states above that this function exactly matches win95 * In win98 BF_FLAT rectangels have an inner border same color as the * middle (COLOR_BTNFACE). I believe it's the same for win95 but since * I don't know I go with Bertho and just sets it for win98 until proven * otherwise. * Dennis Björklund, 10 June, 99 */ if( TWEAK_WineLook == WIN98_LOOK && LTInnerI != -1 ) LTInnerI = RBInnerI = COLOR_BTNFACE; } else if(uFlags & BF_SOFT) { LTInnerI = LTInnerSoft[uType & (BDR_INNER|BDR_OUTER)]; LTOuterI = LTOuterSoft[uType & (BDR_INNER|BDR_OUTER)]; RBInnerI = RBInnerSoft[uType & (BDR_INNER|BDR_OUTER)]; RBOuterI = RBOuterSoft[uType & (BDR_INNER|BDR_OUTER)]; } else { LTInnerI = LTInnerNormal[uType & (BDR_INNER|BDR_OUTER)]; LTOuterI = LTOuterNormal[uType & (BDR_INNER|BDR_OUTER)]; RBInnerI = RBInnerNormal[uType & (BDR_INNER|BDR_OUTER)]; RBOuterI = RBOuterNormal[uType & (BDR_INNER|BDR_OUTER)]; } if((uFlags & BF_BOTTOMLEFT) == BF_BOTTOMLEFT) LBpenplus = 1; if((uFlags & BF_TOPRIGHT) == BF_TOPRIGHT) RTpenplus = 1; if((uFlags & BF_BOTTOMRIGHT) == BF_BOTTOMRIGHT) RBpenplus = 1; if((uFlags & BF_TOPLEFT) == BF_TOPLEFT) LTpenplus = 1; if(LTInnerI != -1) LTInnerPen = GetSysColorPen(LTInnerI); if(LTOuterI != -1) LTOuterPen = GetSysColorPen(LTOuterI); if(RBInnerI != -1) RBInnerPen = GetSysColorPen(RBInnerI); if(RBOuterI != -1) RBOuterPen = GetSysColorPen(RBOuterI); MoveToEx(hdc, 0, 0, &SavePoint); /* Draw the outer edge */ SelectObject(hdc, LTOuterPen); if(uFlags & BF_TOP) { MoveToEx(hdc, InnerRect.left, InnerRect.top, NULL); LineTo(hdc, InnerRect.right, InnerRect.top); } if(uFlags & BF_LEFT) { MoveToEx(hdc, InnerRect.left, InnerRect.top, NULL); LineTo(hdc, InnerRect.left, InnerRect.bottom); } SelectObject(hdc, RBOuterPen); if(uFlags & BF_BOTTOM) { MoveToEx(hdc, InnerRect.right-1, InnerRect.bottom-1, NULL); LineTo(hdc, InnerRect.left-1, InnerRect.bottom-1); } if(uFlags & BF_RIGHT) { MoveToEx(hdc, InnerRect.right-1, InnerRect.bottom-1, NULL); LineTo(hdc, InnerRect.right-1, InnerRect.top-1); } /* Draw the inner edge */ SelectObject(hdc, LTInnerPen); if(uFlags & BF_TOP) { MoveToEx(hdc, InnerRect.left+LTpenplus, InnerRect.top+1, NULL); LineTo(hdc, InnerRect.right-RTpenplus, InnerRect.top+1); } if(uFlags & BF_LEFT) { MoveToEx(hdc, InnerRect.left+1, InnerRect.top+LTpenplus, NULL); LineTo(hdc, InnerRect.left+1, InnerRect.bottom-LBpenplus); } SelectObject(hdc, RBInnerPen); if(uFlags & BF_BOTTOM) { MoveToEx(hdc, InnerRect.right-1-RBpenplus, InnerRect.bottom-2, NULL); LineTo(hdc, InnerRect.left-1+LBpenplus, InnerRect.bottom-2); } if(uFlags & BF_RIGHT) { MoveToEx(hdc, InnerRect.right-2, InnerRect.bottom-1-RBpenplus, NULL); LineTo(hdc, InnerRect.right-2, InnerRect.top-1+RTpenplus); } if( ((uFlags & BF_MIDDLE) && retval) || (uFlags & BF_ADJUST) ) { int add = (LTRBInnerMono[uType & (BDR_INNER|BDR_OUTER)] != -1 ? 1 : 0) + (LTRBOuterMono[uType & (BDR_INNER|BDR_OUTER)] != -1 ? 1 : 0); if(uFlags & BF_LEFT) InnerRect.left += add; if(uFlags & BF_RIGHT) InnerRect.right -= add; if(uFlags & BF_TOP) InnerRect.top += add; if(uFlags & BF_BOTTOM) InnerRect.bottom -= add; if((uFlags & BF_MIDDLE) && retval) { FillRect(hdc, &InnerRect, GetSysColorBrush(uFlags & BF_MONO ? COLOR_WINDOW : COLOR_BTNFACE)); } if(uFlags & BF_ADJUST) *rc = InnerRect; } /* Cleanup */ SelectObject(hdc, SavePen); MoveToEx(hdc, SavePoint.x, SavePoint.y, NULL); return retval; } /********************************************************************** * DrawEdge16 (USER.659) */ BOOL16 WINAPI DrawEdge16( HDC16 hdc, LPRECT16 rc, UINT16 edge, UINT16 flags ) { RECT rect32; BOOL ret; CONV_RECT16TO32( rc, &rect32 ); ret = DrawEdge( hdc, &rect32, edge, flags ); CONV_RECT32TO16( &rect32, rc ); return ret; } /********************************************************************** * DrawEdge (USER32.155) */ BOOL WINAPI DrawEdge( HDC hdc, LPRECT rc, UINT edge, UINT flags ) { TRACE("%04x %d,%d-%d,%d %04x %04x\n", hdc, rc->left, rc->top, rc->right, rc->bottom, edge, flags ); if(flags & BF_DIAGONAL) return UITOOLS95_DrawDiagEdge(hdc, rc, edge, flags); else return UITOOLS95_DrawRectEdge(hdc, rc, edge, flags); } /************************************************************************ * UITOOLS_MakeSquareRect * * Utility to create a square rectangle and returning the width */ static int UITOOLS_MakeSquareRect(LPRECT src, LPRECT dst) { int Width = src->right - src->left; int Height = src->bottom - src->top; int SmallDiam = Width > Height ? Height : Width; *dst = *src; /* Make it a square box */ if(Width < Height) /* SmallDiam == Width */ { dst->top += (Height-Width)/2; dst->bottom = dst->top + SmallDiam; } else if(Width > Height) /* SmallDiam == Height */ { dst->left += (Width-Height)/2; dst->right = dst->left + SmallDiam; } return SmallDiam; } static void UITOOLS_DrawCheckedRect( HDC dc, LPRECT rect ) { if(GetSysColor(COLOR_BTNHIGHLIGHT) == RGB(255, 255, 255)) { HBITMAP hbm = CreateBitmap(8, 8, 1, 1, wPattern_AA55); HBRUSH hbsave; HBRUSH hb = CreatePatternBrush(hbm); COLORREF bg; FillRect(dc, rect, GetSysColorBrush(COLOR_BTNFACE)); bg = SetBkColor(dc, RGB(255, 255, 255)); hbsave = (HBRUSH)SelectObject(dc, hb); PatBlt(dc, rect->left, rect->top, rect->right-rect->left, rect->bottom-rect->top, 0x00FA0089); SelectObject(dc, hbsave); SetBkColor(dc, bg); DeleteObject(hb); DeleteObject(hbm); } else { FillRect(dc, rect, GetSysColorBrush(COLOR_BTNHIGHLIGHT)); } } /************************************************************************ * UITOOLS_DFC_ButtonPush * * Draw a push button coming from DrawFrameControl() * * Does a pretty good job in emulating MS behavior. Some quirks are * however there because MS uses a TrueType font (Marlett) to draw * the buttons. */ static BOOL UITOOLS95_DFC_ButtonPush(HDC dc, LPRECT r, UINT uFlags) { UINT edge; RECT myr = *r; if(uFlags & (DFCS_PUSHED | DFCS_CHECKED | DFCS_FLAT)) edge = EDGE_SUNKEN; else edge = EDGE_RAISED; if(uFlags & DFCS_CHECKED) { if(uFlags & DFCS_MONO) UITOOLS95_DrawRectEdge(dc, &myr, edge, BF_MONO|BF_RECT|BF_ADJUST); else UITOOLS95_DrawRectEdge(dc, &myr, edge, (uFlags&DFCS_FLAT)|BF_RECT|BF_SOFT|BF_ADJUST); UITOOLS_DrawCheckedRect( dc, &myr ); } else { if(uFlags & DFCS_MONO) { UITOOLS95_DrawRectEdge(dc, &myr, edge, BF_MONO|BF_RECT|BF_ADJUST); FillRect(dc, &myr, GetSysColorBrush(COLOR_BTNFACE)); } else { UITOOLS95_DrawRectEdge(dc, r, edge, (uFlags&DFCS_FLAT) | BF_MIDDLE |BF_SOFT| BF_RECT); } } /* Adjust rectangle if asked */ if(uFlags & DFCS_ADJUSTRECT) { r->left += 2; r->right -= 2; r->top += 2; r->bottom -= 2; } return TRUE; } /************************************************************************ * UITOOLS_DFC_ButtonChcek * * Draw a check/3state button coming from DrawFrameControl() * * Does a pretty good job in emulating MS behavior. Some quirks are * however there because MS uses a TrueType font (Marlett) to draw * the buttons. */ #define DFC_CHECKPOINTSMAX 6 static BOOL UITOOLS95_DFC_ButtonCheck(HDC dc, LPRECT r, UINT uFlags) { RECT myr; int SmallDiam = UITOOLS_MakeSquareRect(r, &myr); UINT flags = BF_RECT | BF_ADJUST; if(uFlags & DFCS_FLAT) flags |= BF_FLAT; else if(uFlags & DFCS_MONO) flags |= BF_MONO; UITOOLS95_DrawRectEdge( dc, &myr, EDGE_SUNKEN, flags ); if(uFlags & (DFCS_INACTIVE|DFCS_PUSHED)) FillRect(dc, &myr, GetSysColorBrush(COLOR_BTNFACE)); else if( (uFlags & DFCS_BUTTON3STATE) && (uFlags & DFCS_CHECKED) ) UITOOLS_DrawCheckedRect( dc, &myr ); else { FillRect(dc, &myr, GetSysColorBrush(COLOR_WINDOW)); } if(uFlags & DFCS_CHECKED) { POINT CheckPoints[DFC_CHECKPOINTSMAX]; int i; HBRUSH hbsave; HPEN hpsave; /* FIXME: This comes very close to M$'s checkmark, but not */ /* exactly... When small or large there is a few pixels */ /* shift. Not bad, but could be better :) */ UITOOLS_MakeSquareRect(r, &myr); CheckPoints[0].x = myr.left + 253*SmallDiam/1000; CheckPoints[0].y = myr.top + 345*SmallDiam/1000; CheckPoints[1].x = myr.left + 409*SmallDiam/1000; CheckPoints[1].y = CheckPoints[0].y + (CheckPoints[1].x-CheckPoints[0].x); CheckPoints[2].x = myr.left + 690*SmallDiam/1000; CheckPoints[2].y = CheckPoints[1].y - (CheckPoints[2].x-CheckPoints[1].x); CheckPoints[3].x = CheckPoints[2].x; CheckPoints[3].y = CheckPoints[2].y + 3*SmallDiam/16; CheckPoints[4].x = CheckPoints[1].x; CheckPoints[4].y = CheckPoints[1].y + 3*SmallDiam/16; CheckPoints[5].x = CheckPoints[0].x; CheckPoints[5].y = CheckPoints[0].y + 3*SmallDiam/16; i = (uFlags & DFCS_INACTIVE) || (uFlags & 0xff) == DFCS_BUTTON3STATE ? COLOR_BTNSHADOW : COLOR_WINDOWTEXT; hbsave = (HBRUSH)SelectObject(dc, GetSysColorBrush(i)); hpsave = (HPEN)SelectObject(dc, GetSysColorPen(i)); Polygon(dc, CheckPoints, DFC_CHECKPOINTSMAX); SelectObject(dc, hpsave); SelectObject(dc, hbsave); } return TRUE; } /************************************************************************ * UITOOLS_DFC_ButtonRadio * * Draw a radio/radioimage/radiomask button coming from DrawFrameControl() * * Does a pretty good job in emulating MS behavior. Some quirks are * however there because MS uses a TrueType font (Marlett) to draw * the buttons. */ static BOOL UITOOLS95_DFC_ButtonRadio(HDC dc, LPRECT r, UINT uFlags) { RECT myr; int i; int SmallDiam = UITOOLS_MakeSquareRect(r, &myr); int BorderShrink = SmallDiam / 16; HPEN hpsave; HBRUSH hbsave; int xe, ye; int xc, yc; if(BorderShrink < 1) BorderShrink = 1; if((uFlags & 0xff) == DFCS_BUTTONRADIOIMAGE) { FillRect(dc, r, (HBRUSH)GetStockObject(BLACK_BRUSH)); } xe = myr.left; ye = myr.top + SmallDiam - SmallDiam/2; xc = myr.left + SmallDiam - SmallDiam/2; yc = myr.top + SmallDiam - SmallDiam/2; /* Define bounding box */ i = 14*SmallDiam/16; myr.left = xc - i+i/2; myr.right = xc + i/2; myr.top = yc - i+i/2; myr.bottom = yc + i/2; if((uFlags & 0xff) == DFCS_BUTTONRADIOMASK) { hbsave = (HBRUSH)SelectObject(dc, GetStockObject(BLACK_BRUSH)); Pie(dc, myr.left, myr.top, myr.right, myr.bottom, xe, ye, xe, ye); SelectObject(dc, hbsave); } else { if(uFlags & (DFCS_FLAT|DFCS_MONO)) { hpsave = (HPEN)SelectObject(dc, GetSysColorPen(COLOR_WINDOWFRAME)); hbsave = (HBRUSH)SelectObject(dc, GetSysColorBrush(COLOR_WINDOWFRAME)); Pie(dc, myr.left, myr.top, myr.right, myr.bottom, xe, ye, xe, ye); SelectObject(dc, hbsave); SelectObject(dc, hpsave); } else { hpsave = (HPEN)SelectObject(dc, GetSysColorPen(COLOR_BTNHIGHLIGHT)); hbsave = (HBRUSH)SelectObject(dc, GetSysColorBrush(COLOR_BTNHIGHLIGHT)); Pie(dc, myr.left, myr.top, myr.right, myr.bottom, myr.left-1, myr.bottom, myr.right-1, myr.top); SelectObject(dc, GetSysColorPen(COLOR_BTNSHADOW)); SelectObject(dc, GetSysColorBrush(COLOR_BTNSHADOW)); Pie(dc, myr.left, myr.top, myr.right, myr.bottom, myr.right+1, myr.top, myr.left+1, myr.bottom); myr.left += BorderShrink; myr.right -= BorderShrink; myr.top += BorderShrink; myr.bottom -= BorderShrink; SelectObject(dc, GetSysColorPen(COLOR_3DLIGHT)); SelectObject(dc, GetSysColorBrush(COLOR_3DLIGHT)); Pie(dc, myr.left, myr.top, myr.right, myr.bottom, myr.left-1, myr.bottom, myr.right-1, myr.top); SelectObject(dc, GetSysColorPen(COLOR_3DDKSHADOW)); SelectObject(dc, GetSysColorBrush(COLOR_3DDKSHADOW)); Pie(dc, myr.left, myr.top, myr.right, myr.bottom, myr.right+1, myr.top, myr.left+1, myr.bottom); SelectObject(dc, hbsave); SelectObject(dc, hpsave); } i = 10*SmallDiam/16; myr.left = xc - i+i/2; myr.right = xc + i/2; myr.top = yc - i+i/2; myr.bottom = yc + i/2; i= !(uFlags & (DFCS_INACTIVE|DFCS_PUSHED)) ? COLOR_WINDOW : COLOR_BTNFACE; hpsave = (HPEN)SelectObject(dc, GetSysColorPen(i)); hbsave = (HBRUSH)SelectObject(dc, GetSysColorBrush(i)); Pie(dc, myr.left, myr.top, myr.right, myr.bottom, xe, ye, xe, ye); SelectObject(dc, hbsave); SelectObject(dc, hpsave); } if(uFlags & DFCS_CHECKED) { i = 6*SmallDiam/16; i = i < 1 ? 1 : i; myr.left = xc - i+i/2; myr.right = xc + i/2; myr.top = yc - i+i/2; myr.bottom = yc + i/2; i = uFlags & DFCS_INACTIVE ? COLOR_BTNSHADOW : COLOR_WINDOWTEXT; hbsave = (HBRUSH)SelectObject(dc, GetSysColorBrush(i)); hpsave = (HPEN)SelectObject(dc, GetSysColorPen(i)); Pie(dc, myr.left, myr.top, myr.right, myr.bottom, xe, ye, xe, ye); SelectObject(dc, hpsave); SelectObject(dc, hbsave); } /* FIXME: M$ has a polygon in the center at relative points: */ /* 0.476, 0.476 (times SmallDiam, SmallDiam) */ /* 0.476, 0.525 */ /* 0.500, 0.500 */ /* 0.500, 0.499 */ /* when the button is unchecked. The reason for it is unknown. The */ /* color is COLOR_BTNHIGHLIGHT, although the polygon gets painted at */ /* least 3 times (it looks like a clip-region when you see it happen). */ /* I do not really see a reason why this should be implemented. If you */ /* have a good reason, let me know. Maybe this is a quirk in the Marlett */ /* font. */ return TRUE; } /*********************************************************************** * UITOOLS_DrawFrameButton */ static BOOL UITOOLS95_DrawFrameButton(HDC hdc, LPRECT rc, UINT uState) { switch(uState & 0xff) { case DFCS_BUTTONPUSH: return UITOOLS95_DFC_ButtonPush(hdc, rc, uState); case DFCS_BUTTONCHECK: case DFCS_BUTTON3STATE: return UITOOLS95_DFC_ButtonCheck(hdc, rc, uState); case DFCS_BUTTONRADIOIMAGE: case DFCS_BUTTONRADIOMASK: case DFCS_BUTTONRADIO: return UITOOLS95_DFC_ButtonRadio(hdc, rc, uState); default: WARN("Invalid button state=0x%04x\n", uState); } return FALSE; } /*********************************************************************** * UITOOLS_DrawFrameCaption * * Draw caption buttons (win95), coming from DrawFrameControl() */ static BOOL UITOOLS95_DrawFrameCaption(HDC dc, LPRECT r, UINT uFlags) { POINT Line1[10]; POINT Line2[10]; int Line1N; int Line2N; RECT myr; int SmallDiam = UITOOLS_MakeSquareRect(r, &myr)-2; int i; HBRUSH hbsave; HPEN hpsave; HFONT hfsave, hf; int xc = (myr.left+myr.right)/2; int yc = (myr.top+myr.bottom)/2; int edge, move; char str[2] = "?"; UINT alignsave; int bksave; COLORREF clrsave; SIZE size; UITOOLS95_DFC_ButtonPush(dc, r, uFlags & 0xff00); switch(uFlags & 0xff) { case DFCS_CAPTIONCLOSE: edge = 328*SmallDiam/1000; move = 95*SmallDiam/1000; Line1[0].x = Line2[0].x = Line1[1].x = Line2[1].x = xc - edge; Line1[2].y = Line2[5].y = Line1[1].y = Line2[4].y = yc - edge; Line1[3].x = Line2[3].x = Line1[4].x = Line2[4].x = xc + edge; Line1[5].y = Line2[2].y = Line1[4].y = Line2[1].y = yc + edge; Line1[2].x = Line2[2].x = Line1[1].x + move; Line1[0].y = Line2[3].y = Line1[1].y + move; Line1[5].x = Line2[5].x = Line1[4].x - move; Line1[3].y = Line2[0].y = Line1[4].y - move; Line1N = 6; Line2N = 6; break; case DFCS_CAPTIONHELP: /* This one breaks the flow */ /* FIXME: We need the Marlett font in order to get this right. */ hf = CreateFontA(-SmallDiam, 0, 0, 0, FW_NORMAL, FALSE, FALSE, FALSE, ANSI_CHARSET, OUT_DEFAULT_PRECIS, CLIP_DEFAULT_PRECIS, DEFAULT_QUALITY, FIXED_PITCH|FF_DONTCARE, "System"); alignsave = SetTextAlign(dc, TA_TOP|TA_LEFT); bksave = SetBkMode(dc, TRANSPARENT); clrsave = GetTextColor(dc); hfsave = (HFONT)SelectObject(dc, hf); GetTextExtentPoint32A(dc, str, 1, &size); if(uFlags & DFCS_INACTIVE) { SetTextColor(dc, GetSysColor(COLOR_BTNHIGHLIGHT)); TextOutA(dc, xc-size.cx/2+1, yc-size.cy/2+1, str, 1); } SetTextColor(dc, GetSysColor(uFlags & DFCS_INACTIVE ? COLOR_BTNSHADOW : COLOR_BTNTEXT)); TextOutA(dc, xc-size.cx/2, yc-size.cy/2, str, 1); SelectObject(dc, hfsave); SetTextColor(dc, clrsave); SetBkMode(dc, bksave); SetTextAlign(dc, alignsave); DeleteObject(hf); return TRUE; case DFCS_CAPTIONMIN: Line1[0].x = Line1[3].x = myr.left + 96*SmallDiam/750+2; Line1[1].x = Line1[2].x = Line1[0].x + 372*SmallDiam/750; Line1[0].y = Line1[1].y = myr.top + 563*SmallDiam/750+1; Line1[2].y = Line1[3].y = Line1[0].y + 92*SmallDiam/750; Line1N = 4; Line2N = 0; break; case DFCS_CAPTIONMAX: edge = 47*SmallDiam/750; Line1[0].x = Line1[5].x = myr.left + 57*SmallDiam/750+3; Line1[0].y = Line1[1].y = myr.top + 143*SmallDiam/750+1; Line1[1].x = Line1[2].x = Line1[0].x + 562*SmallDiam/750; Line1[5].y = Line1[4].y = Line1[0].y + 93*SmallDiam/750; Line1[2].y = Line1[3].y = Line1[0].y + 513*SmallDiam/750; Line1[3].x = Line1[4].x = Line1[1].x - edge; Line2[0].x = Line2[5].x = Line1[0].x; Line2[3].x = Line2[4].x = Line1[1].x; Line2[1].x = Line2[2].x = Line1[0].x + edge; Line2[0].y = Line2[1].y = Line1[0].y; Line2[4].y = Line2[5].y = Line1[2].y; Line2[2].y = Line2[3].y = Line1[2].y - edge; Line1N = 6; Line2N = 6; break; case DFCS_CAPTIONRESTORE: /* FIXME: this one looks bad at small sizes < 15x15 :( */ edge = 47*SmallDiam/750; move = 420*SmallDiam/750; Line1[0].x = Line1[9].x = myr.left + 198*SmallDiam/750+2; Line1[0].y = Line1[1].y = myr.top + 169*SmallDiam/750+1; Line1[6].y = Line1[7].y = Line1[0].y + 93*SmallDiam/750; Line1[7].x = Line1[8].x = Line1[0].x + edge; Line1[1].x = Line1[2].x = Line1[0].x + move; Line1[5].x = Line1[6].x = Line1[1].x - edge; Line1[9].y = Line1[8].y = Line1[0].y + 187*SmallDiam/750; Line1[2].y = Line1[3].y = Line1[0].y + 327*SmallDiam/750; Line1[4].y = Line1[5].y = Line1[2].y - edge; Line1[3].x = Line1[4].x = Line1[2].x - 140*SmallDiam/750; Line2[1].x = Line2[2].x = Line1[3].x; Line2[7].x = Line2[8].x = Line2[1].x - edge; Line2[0].x = Line2[9].x = Line2[3].x = Line2[4].x = Line2[1].x - move; Line2[5].x = Line2[6].x = Line2[0].x + edge; Line2[0].y = Line2[1].y = Line1[9].y; Line2[4].y = Line2[5].y = Line2[8].y = Line2[9].y = Line2[0].y + 93*SmallDiam/750; Line2[2].y = Line2[3].y = Line2[0].y + 327*SmallDiam/750; Line2[6].y = Line2[7].y = Line2[2].y - edge; Line1N = 10; Line2N = 10; break; default: WARN("Invalid caption; flags=0x%04x\n", uFlags); return FALSE; } /* Here the drawing takes place */ if(uFlags & DFCS_INACTIVE) { /* If we have an inactive button, then you see a shadow */ hbsave = (HBRUSH)SelectObject(dc, GetSysColorBrush(COLOR_BTNHIGHLIGHT)); hpsave = (HPEN)SelectObject(dc, GetSysColorPen(COLOR_BTNHIGHLIGHT)); Polygon(dc, Line1, Line1N); if(Line2N > 0) Polygon(dc, Line2, Line2N); SelectObject(dc, hpsave); SelectObject(dc, hbsave); } /* Correct for the shadow shift */ for(i = 0; i < Line1N; i++) { Line1[i].x--; Line1[i].y--; } for(i = 0; i < Line2N; i++) { Line2[i].x--; Line2[i].y--; } /* Make the final picture */ i = uFlags & DFCS_INACTIVE ? COLOR_BTNSHADOW : COLOR_BTNTEXT; hbsave = (HBRUSH)SelectObject(dc, GetSysColorBrush(i)); hpsave = (HPEN)SelectObject(dc, GetSysColorPen(i)); Polygon(dc, Line1, Line1N); if(Line2N > 0) Polygon(dc, Line2, Line2N); SelectObject(dc, hpsave); SelectObject(dc, hbsave); return TRUE; } /************************************************************************ * UITOOLS_DrawFrameScroll * * Draw a scroll-bar control coming from DrawFrameControl() */ static BOOL UITOOLS95_DrawFrameScroll(HDC dc, LPRECT r, UINT uFlags) { POINT Line[4]; RECT myr; int SmallDiam = UITOOLS_MakeSquareRect(r, &myr) - 2; int i; HBRUSH hbsave, hb, hb2; HPEN hpsave, hp, hp2; int tri = 290*SmallDiam/1000 - 1; int d46, d93; /* * This fixes a problem with really tiny "scroll" buttons. In particular * with the updown control. * Making sure that the arrow is as least 3 pixels wide (or high). */ if (tri == 0) tri = 1; switch(uFlags & 0xff) { case DFCS_SCROLLCOMBOBOX: case DFCS_SCROLLDOWN: Line[2].x = myr.left + 470*SmallDiam/1000 + 2; Line[2].y = myr.top + 687*SmallDiam/1000 + 1; Line[0].x = Line[2].x - tri; Line[1].x = Line[2].x + tri; Line[0].y = Line[1].y = Line[2].y - tri; break; case DFCS_SCROLLUP: Line[2].x = myr.left + 470*SmallDiam/1000 + 2; Line[2].y = myr.bottom - (687*SmallDiam/1000 + 1); Line[0].x = Line[2].x - tri; Line[1].x = Line[2].x + tri; Line[0].y = Line[1].y = Line[2].y + tri; break; case DFCS_SCROLLLEFT: Line[2].x = myr.right - (687*SmallDiam/1000 + 1); Line[2].y = myr.top + 470*SmallDiam/1000 + 2; Line[0].y = Line[2].y - tri; Line[1].y = Line[2].y + tri; Line[0].x = Line[1].x = Line[2].x + tri; break; case DFCS_SCROLLRIGHT: Line[2].x = myr.left + 687*SmallDiam/1000 + 1; Line[2].y = myr.top + 470*SmallDiam/1000 + 2; Line[0].y = Line[2].y - tri; Line[1].y = Line[2].y + tri; Line[0].x = Line[1].x = Line[2].x - tri; break; case DFCS_SCROLLSIZEGRIP: /* This one breaks the flow... */ UITOOLS95_DrawRectEdge(dc, r, EDGE_BUMP, BF_MIDDLE | ((uFlags&(DFCS_MONO|DFCS_FLAT)) ? BF_MONO : 0)); hpsave = (HPEN)SelectObject(dc, GetStockObject(NULL_PEN)); hbsave = (HBRUSH)SelectObject(dc, GetStockObject(NULL_BRUSH)); if(uFlags & (DFCS_MONO|DFCS_FLAT)) { hp = hp2 = GetSysColorPen(COLOR_WINDOWFRAME); hb = hb2 = GetSysColorBrush(COLOR_WINDOWFRAME); } else { hp = GetSysColorPen(COLOR_BTNHIGHLIGHT); hp2 = GetSysColorPen(COLOR_BTNSHADOW); hb = GetSysColorBrush(COLOR_BTNHIGHLIGHT); hb2 = GetSysColorBrush(COLOR_BTNSHADOW); } Line[0].x = Line[1].x = r->right-1; Line[2].y = Line[3].y = r->bottom-1; d46 = 46*SmallDiam/750; d93 = 93*SmallDiam/750; i = 586*SmallDiam/750; Line[0].y = r->bottom - i - 1; Line[3].x = r->right - i - 1; Line[1].y = Line[0].y + d46; Line[2].x = Line[3].x + d46; SelectObject(dc, hb); SelectObject(dc, hp); Polygon(dc, Line, 4); Line[1].y++; Line[2].x++; Line[0].y = Line[1].y + d93; Line[3].x = Line[2].x + d93; SelectObject(dc, hb2); SelectObject(dc, hp2); Polygon(dc, Line, 4); i = 398*SmallDiam/750; Line[0].y = r->bottom - i - 1; Line[3].x = r->right - i - 1; Line[1].y = Line[0].y + d46; Line[2].x = Line[3].x + d46; SelectObject(dc, hb); SelectObject(dc, hp); Polygon(dc, Line, 4); Line[1].y++; Line[2].x++; Line[0].y = Line[1].y + d93; Line[3].x = Line[2].x + d93; SelectObject(dc, hb2); SelectObject(dc, hp2); Polygon(dc, Line, 4); i = 210*SmallDiam/750; Line[0].y = r->bottom - i - 1; Line[3].x = r->right - i - 1; Line[1].y = Line[0].y + d46; Line[2].x = Line[3].x + d46; SelectObject(dc, hb); SelectObject(dc, hp); Polygon(dc, Line, 4); Line[1].y++; Line[2].x++; Line[0].y = Line[1].y + d93; Line[3].x = Line[2].x + d93; SelectObject(dc, hb2); SelectObject(dc, hp2); Polygon(dc, Line, 4); SelectObject(dc, hpsave); SelectObject(dc, hbsave); return TRUE; default: WARN("Invalid scroll; flags=0x%04x\n", uFlags); return FALSE; } /* Here do the real scroll-bar controls end up */ if( ! (uFlags & (0xff00 & ~DFCS_ADJUSTRECT)) ) /* UITOOLS95_DFC_ButtonPush always uses BF_SOFT which we don't */ /* want for the normal scroll-arrow button. */ UITOOLS95_DrawRectEdge( dc, r, EDGE_RAISED, (uFlags&DFCS_ADJUSTRECT) | BF_MIDDLE | BF_RECT); else UITOOLS95_DFC_ButtonPush(dc, r, (uFlags & 0xff00) ); if(uFlags & DFCS_INACTIVE) { hbsave = (HBRUSH)SelectObject(dc, GetSysColorBrush(COLOR_BTNHIGHLIGHT)); hpsave = (HPEN)SelectObject(dc, GetSysColorPen(COLOR_BTNHIGHLIGHT)); Polygon(dc, Line, 3); SelectObject(dc, hpsave); SelectObject(dc, hbsave); } if( (uFlags & DFCS_INACTIVE) || !(uFlags & DFCS_PUSHED) ) for(i = 0; i < 3; i++) { Line[i].x--; Line[i].y--; } i = uFlags & DFCS_INACTIVE ? COLOR_BTNSHADOW : COLOR_BTNTEXT; hbsave = (HBRUSH)SelectObject(dc, GetSysColorBrush(i)); hpsave = (HPEN)SelectObject(dc, GetSysColorPen(i)); Polygon(dc, Line, 3); SelectObject(dc, hpsave); SelectObject(dc, hbsave); return TRUE; } /************************************************************************ * UITOOLS_DrawFrameMenu * * Draw a menu control coming from DrawFrameControl() */ static BOOL UITOOLS95_DrawFrameMenu(HDC dc, LPRECT r, UINT uFlags) { POINT Points[6]; RECT myr; int SmallDiam = UITOOLS_MakeSquareRect(r, &myr); int i; HBRUSH hbsave; HPEN hpsave; int xe, ye; int xc, yc; BOOL retval = TRUE; /* Using black and white seems to be utterly wrong, but win95 doesn't */ /* use anything else. I think I tried all sys-colors to change things */ /* without luck. It seems as if this behavior is inherited from the */ /* win31 DFC() implementation... (you remember, B/W menus). */ FillRect(dc, r, (HBRUSH)GetStockObject(WHITE_BRUSH)); hbsave = (HBRUSH)SelectObject(dc, GetStockObject(BLACK_BRUSH)); hpsave = (HPEN)SelectObject(dc, GetStockObject(BLACK_PEN)); switch(uFlags & 0xff) { case DFCS_MENUARROW: i = 187*SmallDiam/750; Points[2].x = myr.left + 468*SmallDiam/750; Points[2].y = myr.top + 352*SmallDiam/750+1; Points[0].y = Points[2].y - i; Points[1].y = Points[2].y + i; Points[0].x = Points[1].x = Points[2].x - i; Polygon(dc, Points, 3); break; case DFCS_MENUBULLET: xe = myr.left; ye = myr.top + SmallDiam - SmallDiam/2; xc = myr.left + SmallDiam - SmallDiam/2; yc = myr.top + SmallDiam - SmallDiam/2; i = 234*SmallDiam/750; i = i < 1 ? 1 : i; myr.left = xc - i+i/2; myr.right = xc + i/2; myr.top = yc - i+i/2; myr.bottom = yc + i/2; Pie(dc, myr.left, myr.top, myr.right, myr.bottom, xe, ye, xe, ye); break; case DFCS_MENUCHECK: Points[0].x = myr.left + 253*SmallDiam/1000; Points[0].y = myr.top + 445*SmallDiam/1000; Points[1].x = myr.left + 409*SmallDiam/1000; Points[1].y = Points[0].y + (Points[1].x-Points[0].x); Points[2].x = myr.left + 690*SmallDiam/1000; Points[2].y = Points[1].y - (Points[2].x-Points[1].x); Points[3].x = Points[2].x; Points[3].y = Points[2].y + 3*SmallDiam/16; Points[4].x = Points[1].x; Points[4].y = Points[1].y + 3*SmallDiam/16; Points[5].x = Points[0].x; Points[5].y = Points[0].y + 3*SmallDiam/16; Polygon(dc, Points, 6); break; default: WARN("Invalid menu; flags=0x%04x\n", uFlags); retval = FALSE; break; } SelectObject(dc, hpsave); SelectObject(dc, hbsave); return retval; } /********************************************************************** * DrawFrameControl16 (USER.656) */ BOOL16 WINAPI DrawFrameControl16( HDC16 hdc, LPRECT16 rc, UINT16 uType, UINT16 uState ) { RECT rect32; BOOL ret; CONV_RECT16TO32( rc, &rect32 ); ret = DrawFrameControl( hdc, &rect32, uType, uState ); CONV_RECT32TO16( &rect32, rc ); return ret; } /********************************************************************** * DrawFrameControl (USER32.158) */ BOOL WINAPI DrawFrameControl( HDC hdc, LPRECT rc, UINT uType, UINT uState ) { /* Win95 doesn't support drawing in other mapping modes */ if(GetMapMode(hdc) != MM_TEXT) return FALSE; switch(uType) { case DFC_BUTTON: return UITOOLS95_DrawFrameButton(hdc, rc, uState); case DFC_CAPTION: return UITOOLS95_DrawFrameCaption(hdc, rc, uState); case DFC_MENU: return UITOOLS95_DrawFrameMenu(hdc, rc, uState); case DFC_SCROLL: return UITOOLS95_DrawFrameScroll(hdc, rc, uState); default: WARN("(%x,%p,%d,%x), bad type!\n", hdc,rc,uType,uState ); } return FALSE; } wine-20000526/controls/widgets.c0100644000175000001440000000654306771167435016147 0ustar julliardusers/* * Windows widgets (built-in window classes) * * Copyright 1993 Alexandre Julliard */ #include #include #include "win.h" #include "button.h" #include "combo.h" #include "desktop.h" #include "gdi.h" #include "heap.h" #include "mdi.h" #include "menu.h" #include "module.h" #include "scroll.h" #include "static.h" /* Built-in classes */ static WNDCLASSA WIDGETS_BuiltinClasses[BIC32_NB_CLASSES] = { /* BIC32_BUTTON */ { CS_GLOBALCLASS | CS_DBLCLKS | CS_VREDRAW | CS_HREDRAW | CS_PARENTDC, ButtonWndProc, 0, sizeof(BUTTONINFO), 0, 0, (HCURSOR)IDC_ARROWA, 0, 0, "Button" }, /* BIC32_EDIT */ { CS_GLOBALCLASS | CS_DBLCLKS /*| CS_PARENTDC*/, EditWndProc, 0, sizeof(void *), 0, 0, (HCURSOR)IDC_IBEAMA, 0, 0, "Edit" }, /* BIC32_LISTBOX */ { CS_GLOBALCLASS | CS_DBLCLKS /*| CS_PARENTDC*/, ListBoxWndProc, 0, sizeof(void *), 0, 0, (HCURSOR)IDC_ARROWA, 0, 0, "ListBox" }, /* BIC32_COMBO */ { CS_GLOBALCLASS | CS_PARENTDC | CS_DBLCLKS, ComboWndProc, 0, sizeof(void *), 0, 0, (HCURSOR)IDC_ARROWA, 0, 0, "ComboBox" }, /* BIC32_COMBOLB */ { CS_GLOBALCLASS | CS_DBLCLKS | CS_SAVEBITS, ComboLBWndProc, 0, sizeof(void *), 0, 0, (HCURSOR)IDC_ARROWA, 0, 0, "ComboLBox" }, /* BIC32_POPUPMENU */ { CS_GLOBALCLASS | CS_SAVEBITS, PopupMenuWndProc, 0, sizeof(HMENU), 0, 0, (HCURSOR)IDC_ARROWA, NULL_BRUSH, 0, POPUPMENU_CLASS_NAME }, /* BIC32_STATIC */ { CS_GLOBALCLASS | CS_PARENTDC, StaticWndProc, 0, sizeof(STATICINFO), 0, 0, (HCURSOR)IDC_ARROWA, 0, 0, "Static" }, /* BIC32_SCROLL */ { CS_GLOBALCLASS | CS_DBLCLKS | CS_VREDRAW | CS_HREDRAW | CS_PARENTDC, ScrollBarWndProc, 0, sizeof(SCROLLBAR_INFO), 0, 0, (HCURSOR)IDC_ARROWA, 0, 0, "ScrollBar"}, /* BIC32_MDICLIENT */ { CS_GLOBALCLASS, MDIClientWndProc, 0, sizeof(MDICLIENTINFO), 0, 0, (HCURSOR)IDC_ARROWA, STOCK_LTGRAY_BRUSH, 0, "MDIClient" }, /* BIC32_DESKTOP */ { CS_GLOBALCLASS, DesktopWndProc, 0, sizeof(DESKTOP), 0, 0, (HCURSOR)IDC_ARROWA, 0, 0, DESKTOP_CLASS_NAME }, /* BIC32_DIALOG */ { CS_GLOBALCLASS | CS_SAVEBITS, DefDlgProcA, 0, DLGWINDOWEXTRA, 0, 0, (HCURSOR)IDC_ARROWA, 0, 0, DIALOG_CLASS_NAME }, /* BIC32_ICONTITLE */ { CS_GLOBALCLASS, IconTitleWndProc, 0, 0, 0, 0, (HCURSOR)IDC_ARROWA, 0, 0, ICONTITLE_CLASS_NAME } }; static ATOM bicAtomTable[BIC32_NB_CLASSES]; /*********************************************************************** * WIDGETS_Init * * Initialize the built-in window classes. */ BOOL WIDGETS_Init(void) { int i; WNDCLASSA *cls = WIDGETS_BuiltinClasses; /* Create builtin classes */ for (i = 0; i < BIC32_NB_CLASSES; i++, cls++) { char name[20]; /* Just to make sure the string is > 0x10000 */ strcpy( name, (char *)cls->lpszClassName ); cls->lpszClassName = name; cls->hCursor = LoadCursorA( 0, (LPCSTR)cls->hCursor ); if (!(bicAtomTable[i] = RegisterClassA( cls ))) return FALSE; } return TRUE; } /*********************************************************************** * WIDGETS_IsControl32 * * Check whether pWnd is a built-in control or not. */ BOOL WIDGETS_IsControl( WND* pWnd, BUILTIN_CLASS32 cls ) { assert( cls < BIC32_NB_CLASSES ); return (GetClassWord(pWnd->hwndSelf, GCW_ATOM) == bicAtomTable[cls]); } wine-20000526/debugger/0040755000175000001440000000000007113604154014232 5ustar julliarduserswine-20000526/debugger/.cvsignore0100644000175000001440000000007107075420257016234 0ustar julliardusersMakefile lex.yy.c winedbg winedbg.spec.c y.tab.c y.tab.h wine-20000526/debugger/Makefile.in0100644000175000001440000000124607113350017016273 0ustar julliardusersDEFS = -DWINELIB TOPSRCDIR = @top_srcdir@ TOPOBJDIR = .. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = none PROGRAMS = winedbg WRCEXTRA = -A -p $* C_SRCS = \ break.c \ db_disasm.c \ display.c \ editline.c \ expr.c \ hash.c \ info.c \ memory.c \ module.c \ msc.c \ registers.c \ source.c \ stabs.c \ stack.c \ types.c \ winedbg.c SPEC_SRCS = winedbg.spec EXTRA_SRCS = dbg.y debug.l EXTRA_OBJS = y.tab.o lex.yy.o all: $(PROGRAMS) depend: y.tab.h @MAKE_RULES@ y.tab.c y.tab.h: dbg.y $(YACC) -d -t $(SRCDIR)/dbg.y lex.yy.c: debug.l $(LEX) -8 -I $(SRCDIR)/debug.l winedbg: $(OBJS) $(CC) -o $@ $(OBJS) $(DLL_LINK) $(LIBS) ### Dependencies: wine-20000526/debugger/README0100644000175000001440000003677206602337747015143 0ustar julliardusers This is the core of the Wine debugger. The reverse assember was stolen from Mach more or less intact. It turns out that there are two variables that are set differently if you are reverse assembling 16 bit code, and on the whole it seems to work. NEWS: The internal debugger has *tons* more capability than it did before. I have enclosed some examples that show usage at the end of this file. New features include: 1) Ability of debugger to read debug information from wine executable *and* from Win32 executables. Local variable and line number information is also read and processed. 2) The internal debugger is capable of 'stepping' to the next line number, just like gdb. Examples of the commands are: step stepi si step 3 si 5 next nexti cont 4 finish All of these should be exactly like how gdb does things. 3) The internal debugger now has a sense of what source file and line number a given PC is at. New commands to support this are just like gdb, and include: list dir show dir there are a variety of formats of arguments for the list command. All permutations supported by gdb should also be supported. 4) The internal debugger knows about datatypes of various objects, for both Win32 *and* the debugging information in the wine executable itself. I have enclosed an example of how this works at the end. 5) There are more ways the 'b' command can be used to set breakpoints. Examples are: b *0x8190000 b 1100 b Usage b I don't think this covers all of the permutations that gdb accepts (this should be cleaned up someday so that all possibilities are acceptable). 6) The 'print' and 'x' commands should behave more or less exactly as they do under gdb. The difference is that the way the data is presented will be slightly different, but the content should be fundamentally the same. 7) The internal debugger now supports conditional breakpoints, and automatic display expressions. An example is at the end of this file. The syntax and usage should be identical to that of gdb. 8) Type casts can be made from within the debugger, but they currently don't work with typedef'ed types. They only work with builtin types and named structures unions, etc. The problem is that internally we don't always record the typedefed names of structures, so we have no guarantee that we would know what each type is. This can be fixed, of course - it just takes more memory. Note that in some cases, typedefed structures could be cast using '(struct typedfname)' instead of '(typedfname)'. Technically this isn't quite correct, but if and when the rest of this stuff gets fixed, this would need to get corrected too. NOTES: If it weren't for the fact that gdb doesn't grok the Win32 debug information, you could just use gdb. The internal debugger should be able to read and use debugging information for both Win32 and also for the Wine executable, making it possible to debug the combination of the two together as if it were one large (very large) entity. LIMITATIONS AND DIFFERENCES FROM GDB: You cannot set a breakpoint by file and line number as you can with gdb. Adding support for this wouldn't be all that tough, I guess, but it would be a nuisance. You can set a breakpoint given a function and line number, however. An example would be 'b main:2993'. It turns out that the way the internal data structures are arranged it is a whole lot easier to do things in this way than it would be to try and get the source:line type of breakpoint working, but it would probably be worth it to try. Getting stack traces through Wine itself can be a bit tricky. This is because by default the thing is built with optimization enabled, and as a result sometimes functions don't get frames, and lots of variables are optimized into registers. You can turn off optimization for a few key source files if it will help you. Memory consumption is getting to be a real problem. I think 32Mb is no longer sufficient to debug wine - 48 or 64 is probably a whole lot better. Unfortunately I cannot shut down X to save memory :-). ************************************************************************* EXAMPLES: Here is an example of how I tracked down a bug in Wine. The program is something that just maps and dumps the contents of a Win32 executable. It was dying for some reason. Start the first time through. bash$ ls -l dumpexe.exe -rw-rw-r-- 1 eric devel 168448 Jan 4 13:51 dumpexe.exe bash$ ./wine -debug './dumpexe.exe -symbol ./dumpexe.exe' Warning: invalid dir 'e:\test' in path, deleting it. Win32 task 'W32SXXXX': Breakpoint 1 at 0x081a3450 Loading symbols from ELF file ./wine... Loading symbols from ELF file /usr/X11R6/lib/libXpm.so.4.6... Loading symbols from ELF file /usr/X11R6/lib/libSM.so.6.0... Loading symbols from ELF file /usr/X11R6/lib/libICE.so.6.0... Loading symbols from ELF file /usr/X11R6/lib/libXext.so.6.0... Loading symbols from ELF file /usr/X11R6/lib/libX11.so.6.0... Loading symbols from ELF file /lib/libm.so.5.0.5... Loading symbols from ELF file /lib/libc.so.5.2.18... Loading symbols from ELF file /lib/ld-linux.so.1... Loading symbols from Win32 file ./dumpexe.exe... Stopped on breakpoint 1 at 0x081a3450 (_mainCRTStartup) In 32 bit mode. *** Invalid address 0x414c5ff8 (KERNEL32_NULL_THUNK_DATA+0x3930ee6c) 0x081a3450 (_mainCRTStartup): movl %fs:0,%eax Wine-dbg>b DumpFile Breakpoint 2 at 0x081a0078 (DumpFile+0x9 [dumpexe.c:2723]) Wine-dbg>c Dump File: ./dumpexe.exe Stopped on breakpoint 2 at 0x081a0078 (DumpFile+0x9 [dumpexe.c:2723]) Enter path to file dumpexe.c: ../de 2723 HANDLE hFile = NULL; 0x081a0078 (DumpFile+0x9 [dumpexe.c:2723]): movl $0x0,0xfffffff4(%ebp) Wine-dbg>list 2723 HANDLE hFile = NULL; 2724 HANDLE hMap = NULL; 2725 PSTR lpMap = NULL; 2726 DWORD dwFileSize = 0; 2727 DWORD dwFileSizeHigh = 0; 2728 2729 PIMAGE_DOS_HEADER lpImageDOS = NULL; 2730 PIMAGE_FILE_HEADER lpImageFile = NULL; 2731 PIMAGE_NT_HEADERS lpImageNT = NULL; 2732 2733 /* Wine-dbg>n 10 2747 dwFileSize = GetFileSize(hFile, &dwFileSizeHigh); 0x081a00ea (DumpFile+0x7b [dumpexe.c:2747]): leal 0xfffffff0(%ebp),%eax Wine-dbg>n 2749 && (GetLastError() != NO_ERROR) ) 0x081a00fb (DumpFile+0x8c [dumpexe.c:2749]): cmpl $-1,0xffffffe8(%ebp) Wine-dbg>x/d dwFileSize x/d dwFileSize 168448 Wine-dbg>n 2758 PAGE_READONLY, 0, 0, (LPSTR) NULL); 0x081a0124 (DumpFile+0xb5 [dumpexe.c:2758]): pushl $0x0 Wine-dbg>list 2750 list 2750 2750 { 2751 Fatal("Cannot get size of file %s", lpFileName); 2752 } 2753 2754 /* 2755 * map the file 2756 */ 2757 hMap = CreateFileMapping(hFile, (LPSECURITY_ATTRIBUTES) NULL, 2758 PAGE_READONLY, 0, 0, (LPSTR) NULL); 2759 if( hMap == NULL ) 2760 { Wine-dbg>n 2759 if( hMap == NULL ) 0x081a013b (DumpFile+0xcc [dumpexe.c:2759]): cmpl $0,0xfffffffc(%ebp) Wine-dbg>x hMap 08e48c30 Wine-dbg>n 2767 lpMap = (LPSTR) MapViewOfFile(hMap, FILE_MAP_READ, 0, 0, 0); 0x081a0156 (DumpFile+0xe7 [dumpexe.c:2767]): pushl $0x0 Wine-dbg>n 2768 if( lpMap == NULL ) 0x081a016b (DumpFile+0xfc [dumpexe.c:2768]): cmpl $0,0xffffffe0(%ebp) Wine-dbg>print lpMap 0x414c5f40 Wine-dbg>x lpMap 40007000 Wine-dbg> x/10x 0x40007000 x/10x 0x40007000 0x40007000 (KERNEL32_NULL_THUNK_DATA+0x37e4fe74): *** Invalid address 0x40007000 (KERNEL32_NULL_THUNK_DATA+0x37e4fe74) Wine-dbg>quit $ ******************************************************************* The first time through, we find that MapViewOfFile isn't mapping the file correctly into the virtual address space. Try running again, and step into MapViewOfFile to figure out what went wrong. ******************************************************************* bash$ ./wine -debug './dumpexe.exe -symbol ./dumpexe.exe' Warning: invalid dir 'e:\test' in path, deleting it. Win32 task 'W32SXXXX': Breakpoint 1 at 0x081a3450 Loading symbols from ELF file ./wine... Loading symbols from ELF file /usr/X11R6/lib/libXpm.so.4.6... Loading symbols from ELF file /usr/X11R6/lib/libSM.so.6.0... Loading symbols from ELF file /usr/X11R6/lib/libICE.so.6.0... Loading symbols from ELF file /usr/X11R6/lib/libXext.so.6.0... Loading symbols from ELF file /usr/X11R6/lib/libX11.so.6.0... Loading symbols from ELF file /lib/libm.so.5.0.5... Loading symbols from ELF file /lib/libc.so.5.2.18... Loading symbols from ELF file /lib/ld-linux.so.1... Loading symbols from Win32 file ./dumpexe.exe... Stopped on breakpoint 1 at 0x081a3450 (_mainCRTStartup) In 32 bit mode. *** Invalid address 0x414c5ff8 (KERNEL32_NULL_THUNK_DATA+0x3930ee6c) 0x081a3450 (_mainCRTStartup): movl %fs:0,%eax Wine-dbg>b DumpFile:2767 Breakpoint 2 at 0x081a0156 (DumpFile+0xe7 [dumpexe.c:2767]) Wine-dbg>c Dump File: ./dumpexe.exe Stopped on breakpoint 2 at 0x081a0156 (DumpFile+0xe7 [dumpexe.c:2767]) Enter path to file dumpexe.c: ../de 2767 lpMap = (LPSTR) MapViewOfFile(hMap, FILE_MAP_READ, 0, 0, 0); 0x081a0156 (DumpFile+0xe7 [dumpexe.c:2767]): pushl $0x0 Wine-dbg>step 390 0385 stdcall MapViewOfFile(long long long long long) MapViewOfFile 0x080d793c (KERNEL32_385 [kernel32.spec:390]): pushl %ebp Wine-dbg>step 223 if (!debugging_relay) return; 0x080c83dc (RELAY_DebugCallFrom32+0xc [relay.c:223]): cmpw $0,0x644a Wine-dbg> 244 } 0x080c848e (RELAY_DebugCallFrom32+0xbe [relay.c:244]): leal 0xfffffff4(%ebp),%esp Wine-dbg> 103 return MapViewOfFileEx(handle,access,offhi,offlo,size,0); 0x080911a4 (MapViewOfFile+0x14 [file.c:103]): pushl $0x0 Wine-dbg> 113 FILEMAP_OBJECT *fmap = (FILEMAP_OBJECT*)handle; 0x080911cf (MapViewOfFileEx+0xf [file.c:113]): movl 0x8(%ebp),%esi Wine-dbg>n 115 if (!size) size = fmap->size; 0x080911d2 (MapViewOfFileEx+0x12 [file.c:115]): testl %ebx,%ebx Wine-dbg>list list 115 if (!size) size = fmap->size; 116 if (!size) size = 1; 117 return mmap ((caddr_t)st, size, fmap->prot, 118 MAP_ANON|MAP_PRIVATE, 119 FILE_GetUnixHandle(fmap->hfile), 120 offlo); 121 } 122 123 /*********************************************************************** 124 * UnmapViewOfFile (KERNEL32.385) 125 */ Wine-dbg>x size 00000000 Wine-dbg>n 116 if (!size) size = 1; 0x080911d9 (MapViewOfFileEx+0x19 [file.c:116]): testl %ebx,%ebx Wine-dbg>x size 00000000 Wine-dbg>n 117 return mmap ((caddr_t)st, size, fmap->prot, 0x080911e2 (MapViewOfFileEx+0x22 [file.c:117]): pushl %eax Wine-dbg>x size 00000000 Wine-dbg>info local MapViewOfFileEx:handle == 0x08e48c90 MapViewOfFileEx:access == 0x00000004 MapViewOfFileEx:offhi == 0x00000000 MapViewOfFileEx:offlo == 0x00000000 MapViewOfFileEx:size == 0x00000000 MapViewOfFileEx:st == 0x00000000 MapViewOfFileEx:offlo optimized into register $eax MapViewOfFileEx:size optimized into register $ebx MapViewOfFileEx:st optimized into register $edi MapViewOfFileEx:fmap optimized into register $esi Wine-dbg>print $ebx 0x0001 Wine-dbg>bt bt Backtrace: =>0 0x080911e2 (MapViewOfFileEx+0x22 [file.c:117]) 1 0x080911b0 (MapViewOfFile+0x20(handle=0x8e48c90, access=0x4, offhi=0x0, offlo=0x0, size=0x0) [file.c:104]) 2 0x08104ab5 (CallFrom32_stdcall_5+0x25 [callfrom32.s]) 3 0x081a0168 (DumpFile+0xf9(lpFileName=0x414c61ed) [dumpexe.c:2767]) 4 0x081a0c35 (main+0x410(argc=0x3, argv=0x414c61cc) [dumpexe.c:3078]) 5 0x081a3514 (_mainCRTStartup+0xc4) 6 0x0810549f (Code_Start+0x13 [callto32.s]) 7 0x0802fdac (TASK_CallToStart+0x8c [task.c:373]) Wine-dbg> ******************************************************************* Notice that you can step through the thunks into our own transfer routines. You will notice that the source line displays as something like: 390 0385 stdcall MapViewOfFile(long long long long long) MapViewOfFile This is just the source line from the spec file that caused the transfer routine to be generated. From this you can step again, and you step into the relay logging code - keep stepping and you eventually step into the actual function that does the dirty work. At this point an examination of the source to the Win32 program and an examination of the source to win32/file.s showed where the problem was. When you specify 0 for the size of the object in CreateFileMapping, it is supposed to use the entire size of the file as the size of the object. Instead we were just blindly copying the number over. ******************************************************************* Wine-dbg>b main Breakpoint 1 at 0x080108c0 (main [dbgmain.c:213]) Wine-dbg>print breakpoints[1] {addr={type=0x08043000, seg=0, off=134285504}, addrlen=' ', opcode='U', enabled=1, skipcount=0, in_use=1} Wine-dbg> print breakpoints[1].enabled 1 Wine-dbg>set breakpoints[0].enabled = 0 Wine-dbg>print breakpoints[0].enabled 0 Wine-dbg>print type_hash_table[1]->type STRUCT Wine-dbg>print type_hash_table[1] 0x08072020 Wine-dbg>print *type_hash_table[1] print *type_hash_table[1] {type=STRUCT, next=0x00000000, name="LOGPALETTE", un={basic={basic_type=8, output_format=" V M", basic_size=-128, b_signed=0}, bitfield={bitoff=8, nbits=0, basetype=0x081d56c0}, pointer={pointsto=0x00000008}, funct={rettype=0x00000008}, array={start=8, end=136140480, basictype=0x08043e80}, structure={size=8, members=0x081d56c0}, enumeration={members=0x00000008}}} Wine-dbg> ******************************************************************* This example shows how you can print out various data structures. Note that enumerated types are displayed in the symbolic form, and strings are displayed in the expected manner. You can use the set command to set more or less anything. Note however that you cannot use enumerated types on the RHS of the expression. ******************************************************************* Wine-dbg>list 2986 if( argc <= 1 ) 2987 { 2988 Usage(argv[0]); 2989 } 2990 2991 for( i = 1; i < argc; i++ ) 2992 { 2993 if( strncmp(argv[i], "-dos", sizeof("-dos") - 1) == 0 ) 2994 { 2995 DmpCtrl.bDumpDOSHeader = TRUE; 2996 } Wine-dbg>b 2993 Breakpoint 3 at 0x081a8861 (main+0x3c [dumpexe.c:2993]) Wine-dbg>condition 3 i == 2 Wine-dbg>c Stopped on breakpoint 3 at 0x081a8861 (main+0x3c [dumpexe.c:2993]) 2993 if( strncmp(argv[i], "-dos", sizeof("-dos") - 1) == 0 ) 0x081a8861 (main+0x3c [dumpexe.c:2993]): pushl $0x4 Wine-dbg>print i 2 Wine-dbg>print argv[i] "./dumpexe.exe" ******************************************************************* This example shows how to use conditional breakpoints. Here is another one that demonstrates another cool feature conditional breakpoints that involve a function call: condition 3 strcmp(argv[i], "./dumpexe.exe") == 0 ******************************************************************* Wine-dbg>list 2986 if( argc <= 1 ) 2987 { 2988 Usage(argv[0]); 2989 } 2990 2991 for( i = 1; i < argc; i++ ) 2992 { 2993 if( strncmp(argv[i], "-dos", sizeof("-dos") - 1) == 0 ) 2994 { 2995 DmpCtrl.bDumpDOSHeader = TRUE; 2996 } Wine-dbg>b 2993 Breakpoint 3 at 0x081a8861 (main+0x3c [dumpexe.c:2993]) Wine-dbg>condition 3 strcmp(argv[i], "./dumpexe.exe") == 0 Wine-dbg>info break Breakpoints: 1: y 0x081ab450 (_mainCRTStartup) 2: y 0x081a882e (main+0x9 [dumpexe.c:2986]) 3: y 0x081a8861 (main+0x3c [dumpexe.c:2993]) stop when ( strcmp(( argv[i] ), "./dumpexe.exe") == 0 ) Wine-dbg>c Stopped on breakpoint 3 at 0x081a8861 (main+0x3c [dumpexe.c:2993]) 2993 if( strncmp(argv[i], "-dos", sizeof("-dos") - 1) == 0 ) 0x081a8861 (main+0x3c [dumpexe.c:2993]): pushl $0x4 Wine-dbg>print i 2 Wine-dbg>print argv[i] "./dumpexe.exe" Wine-dbg> wine-20000526/debugger/TODO0100644000175000001440000000247706602337747014746 0ustar julliardusersThis is a list of things that theoretically should be possible in some way or another. No commitment to actually do these, but these sound possible to me right now. In no particular order. If someone else wants to dig in, feel free. 1) Some kind of watchpoint capability. Pretty easy, but we end up running the program really slowly one instruction at a time. Use hardware debug registers for this (much harder)??? 2) Some kind of .wdbinit file. 3) Add 'info line' command. Not all *that* useful, but it would tell you the range of PC for a given source line. 4) Add search directory list for PDB files. We have the path in the DOS notation (i.e. C:\foo\bar\xxx.c), which may be a useful hint. Maybe not. 5) Add support for emacs mode so that you can run under emacs and have the source pop up automatically. Only useful once the list command is implemented. 6 Add support for Borland. I have heard rumors that Borland is forthcoming with info about how their stuff works, so this might not be that bad. 7 Add support for Win16. Not sure if this is really worth the trouble. How much are people really going to use this in the long run??? 8) Some of the newer displays are still a little bit sparse on information. Make these more like gdb. 9) Make sure operator precedence works OK. **************** wine-20000526/debugger/break.c0100644000175000001440000006271507104607612015474 0ustar julliardusers/* * Debugger break-points handling * * Copyright 1994 Martin von Loewis * Copyright 1995 Alexandre Julliard * Copyright 1999,2000 Eric Pouech */ #include "config.h" #include "debugger.h" #ifdef __i386__ #define DR7_CONTROL_SHIFT 16 #define DR7_CONTROL_SIZE 4 #define DR7_RW_EXECUTE (0x0) #define DR7_RW_WRITE (0x1) #define DR7_RW_READ (0x3) #define DR7_LEN_1 (0x0) #define DR7_LEN_2 (0x4) #define DR7_LEN_4 (0xC) #define DR7_LOCAL_ENABLE_SHIFT 0 #define DR7_GLOBAL_ENABLE_SHIFT 1 #define DR7_ENABLE_SIZE 2 #define DR7_LOCAL_ENABLE_MASK (0x55) #define DR7_GLOBAL_ENABLE_MASK (0xAA) #define DR7_CONTROL_RESERVED (0xFC00) #define DR7_LOCAL_SLOWDOWN (0x100) #define DR7_GLOBAL_SLOWDOWN (0x200) #define DR7_ENABLE_MASK(dr) (1<<(DR7_LOCAL_ENABLE_SHIFT+DR7_ENABLE_SIZE*(dr))) #define IS_DR7_SET(ctrl,dr) ((ctrl)&DR7_ENABLE_MASK(dr)) #define INT3 0xcc /* int 3 opcode */ #endif #define MAX_BREAKPOINTS 100 static DBG_BREAKPOINT breakpoints[MAX_BREAKPOINTS]; static int next_bp = 1; /* breakpoint 0 is reserved for step-over */ /*********************************************************************** * DEBUG_IsStepOverInstr * * Determine if the instruction at CS:EIP is an instruction that * we need to step over (like a call or a repetitive string move). */ static BOOL DEBUG_IsStepOverInstr(void) { #ifdef __i386__ BYTE* instr; BYTE ch; DBG_ADDR addr; addr.seg = DEBUG_context.SegCs; addr.off = DEBUG_context.Eip; /* FIXME: old code was using V86BASE(DEBUG_context) * instead of passing thru DOSMEM_MemoryBase */ instr = (BYTE*)DEBUG_ToLinear(&addr); for (;;) { if (!DEBUG_READ_MEM(instr, &ch, sizeof(ch))) return FALSE; switch (ch) { /* Skip all prefixes */ case 0x2e: /* cs: */ case 0x36: /* ss: */ case 0x3e: /* ds: */ case 0x26: /* es: */ case 0x64: /* fs: */ case 0x65: /* gs: */ case 0x66: /* opcode size prefix */ case 0x67: /* addr size prefix */ case 0xf0: /* lock */ case 0xf2: /* repne */ case 0xf3: /* repe */ instr++; continue; /* Handle call instructions */ case 0xcd: /* int */ case 0xe8: /* call */ case 0x9a: /* lcall : */ return TRUE; case 0xff: /* call */ if (!DEBUG_READ_MEM(instr + 1, &ch, sizeof(ch))) return FALSE; return (((ch & 0x38) == 0x10) || ((ch & 0x38) == 0x18)); /* Handle string instructions */ case 0x6c: /* insb */ case 0x6d: /* insw */ case 0x6e: /* outsb */ case 0x6f: /* outsw */ case 0xa4: /* movsb */ case 0xa5: /* movsw */ case 0xa6: /* cmpsb */ case 0xa7: /* cmpsw */ case 0xaa: /* stosb */ case 0xab: /* stosw */ case 0xac: /* lodsb */ case 0xad: /* lodsw */ case 0xae: /* scasb */ case 0xaf: /* scasw */ return TRUE; default: return FALSE; } } #else return FALSE; #endif } /*********************************************************************** * DEBUG_IsFctReturn * * Determine if the instruction at CS:EIP is an instruction that * is a function return. */ BOOL DEBUG_IsFctReturn(void) { #ifdef __i386__ BYTE* instr; BYTE ch; DBG_ADDR addr; addr.seg = DEBUG_context.SegCs; addr.off = DEBUG_context.Eip; /* FIXME: old code was using V86BASE(DEBUG_context) * instead of passing thru DOSMEM_MemoryBase */ instr = (BYTE*)DEBUG_ToLinear(&addr); if (!DEBUG_READ_MEM(instr, &ch, sizeof(ch))) return FALSE; return (ch == 0xc2) || (ch == 0xc3); #else return FALSE; #endif } /*********************************************************************** * DEBUG_SetBreakpoints * * Set or remove all the breakpoints. */ void DEBUG_SetBreakpoints( BOOL set ) { int i; #ifdef __i386__ DEBUG_context.Dr7 &= ~DR7_LOCAL_ENABLE_MASK; #endif for (i = 0; i < next_bp; i++) { if (!(breakpoints[i].refcount && breakpoints[i].enabled)) continue; switch (breakpoints[i].type) { case DBG_BREAK: { #ifdef __i386__ char ch = set ? INT3 : breakpoints[i].u.b.opcode; #endif if (!DEBUG_WRITE_MEM( (void*)DEBUG_ToLinear(&breakpoints[i].addr), &ch, sizeof(ch) )) { DEBUG_Printf(DBG_CHN_MESG, "Invalid address for breakpoint %d, disabling it\n", i); breakpoints[i].enabled = FALSE; } } break; case DBG_WATCH: if (set) { #ifdef __i386__ DWORD bits; int reg = breakpoints[i].u.w.reg; LPDWORD lpdr = NULL; switch (reg) { case 0: lpdr = &DEBUG_context.Dr0; break; case 1: lpdr = &DEBUG_context.Dr1; break; case 2: lpdr = &DEBUG_context.Dr2; break; case 3: lpdr = &DEBUG_context.Dr3; break; default: RaiseException(DEBUG_STATUS_INTERNAL_ERROR, 0, 0, NULL); } *lpdr = DEBUG_ToLinear(&breakpoints[i].addr); bits = (breakpoints[i].u.w.rw) ? DR7_RW_WRITE : DR7_RW_READ; switch (breakpoints[i].u.w.len + 1) { case 4: bits |= DR7_LEN_4; break; case 2: bits |= DR7_LEN_2; break; case 1: bits |= DR7_LEN_1; break; default: RaiseException(DEBUG_STATUS_INTERNAL_ERROR, 0, 0, NULL); } DEBUG_context.Dr7 &= ~(0x0F << (DR7_CONTROL_SHIFT + DR7_CONTROL_SIZE * reg)); DEBUG_context.Dr7 |= bits << (DR7_CONTROL_SHIFT + DR7_CONTROL_SIZE * reg); DEBUG_context.Dr7 |= DR7_ENABLE_MASK(reg) | DR7_LOCAL_SLOWDOWN; #endif } break; } } } /*********************************************************************** * DEBUG_FindBreakpoint * * Find the breakpoint for a given address. Return the breakpoint * number or -1 if none. * If type is DBG_BREAKPOINT, addr is a complete addr * If type is DBG_WATCHPOINT, only addr.off is meaningful and contains * linear address */ static int DEBUG_FindBreakpoint( const DBG_ADDR *addr, int type ) { int i; for (i = 0; i < next_bp; i++) { if (breakpoints[i].refcount && breakpoints[i].enabled && breakpoints[i].type == type ) { if ((type == DBG_BREAK && breakpoints[i].addr.seg == addr->seg && breakpoints[i].addr.off == addr->off) || (type == DBG_WATCH && DEBUG_ToLinear(&breakpoints[i].addr) == addr->off)) return i; } } return -1; } /*********************************************************************** * DEBUG_InitXPoint * * Find an empty slot in BP table to add a new break/watch point */ static int DEBUG_InitXPoint(int type, DBG_ADDR* addr) { int num; for (num = (next_bp < MAX_BREAKPOINTS) ? next_bp++ : 1; num < MAX_BREAKPOINTS; num++) { if (breakpoints[num].refcount == 0) { breakpoints[num].refcount = 1; breakpoints[num].enabled = TRUE; breakpoints[num].type = type; breakpoints[num].skipcount = 0; breakpoints[num].addr = *addr; breakpoints[num].is32 = 1; #ifdef __i386__ if (addr->seg) { switch (DEBUG_GetSelectorType( addr->seg )) { case 32: break; case 16: breakpoints[num].is32 = 0; break; default: RaiseException(DEBUG_STATUS_INTERNAL_ERROR, 0, 0, NULL); } } #endif return num; } } DEBUG_Printf( DBG_CHN_MESG, "Too many breakpoints. Please delete some.\n" ); return -1; } /*********************************************************************** * DEBUG_GetWatchedValue * * Returns the value watched by watch point 'num'. */ static BOOL DEBUG_GetWatchedValue( int num, LPDWORD val ) { BYTE buf[4]; if (!DEBUG_READ_MEM((void*)DEBUG_ToLinear(&breakpoints[num].addr), buf, breakpoints[num].u.w.len + 1)) return FALSE; switch (breakpoints[num].u.w.len + 1) { case 4: *val = *(DWORD*)buf; break; case 2: *val = *(WORD*)buf; break; case 1: *val = *(BYTE*)buf; break; default: RaiseException(DEBUG_STATUS_INTERNAL_ERROR, 0, 0, NULL); } return TRUE; } /*********************************************************************** * DEBUG_AddBreakpoint * * Add a breakpoint. */ void DEBUG_AddBreakpoint( const DBG_VALUE *_value, BOOL (*func)(void) ) { DBG_VALUE value = *_value; int num; unsigned int seg2; BYTE ch; assert(_value->cookie == DV_TARGET || _value->cookie == DV_HOST); DEBUG_FixAddress( &value.addr, DEBUG_context.SegCs ); if( value.type != NULL && value.type == DEBUG_TypeIntConst ) { /* * We know that we have the actual offset stored somewhere * else in 32-bit space. Grab it, and we * should be all set. */ seg2 = value.addr.seg; value.addr.seg = 0; value.addr.off = DEBUG_GetExprValue(&value, NULL); value.addr.seg = seg2; } if ((num = DEBUG_FindBreakpoint(&value.addr, DBG_BREAK)) >= 1) { breakpoints[num].refcount++; return; } if (!DEBUG_READ_MEM_VERBOSE((void*)DEBUG_ToLinear( &value.addr ), &ch, sizeof(ch))) return; if ((num = DEBUG_InitXPoint(DBG_BREAK, &value.addr)) == -1) return; breakpoints[num].u.b.opcode = ch; breakpoints[num].u.b.func = func; DEBUG_Printf( DBG_CHN_MESG, "Breakpoint %d at ", num ); DEBUG_PrintAddress( &breakpoints[num].addr, breakpoints[num].is32 ? 32 : 16, TRUE ); DEBUG_Printf( DBG_CHN_MESG, "\n" ); } /*********************************************************************** * DEBUG_AddWatchpoint * * Add a watchpoint. */ void DEBUG_AddWatchpoint( const DBG_VALUE *_value, BOOL is_write ) { DBG_VALUE value = *_value; int num, reg; unsigned seg2; DWORD mask = 0; assert(_value->cookie == DV_TARGET || _value->cookie == DV_HOST); #ifdef __i386__ DEBUG_FixAddress( &value.addr, DEBUG_context.SegCs ); #endif if ( value.type != NULL && value.type == DEBUG_TypeIntConst ) { /* * We know that we have the actual offset stored somewhere * else in 32-bit space. Grab it, and we * should be all set. */ seg2 = value.addr.seg; value.addr.seg = 0; value.addr.off = DEBUG_GetExprValue(&value, NULL); value.addr.seg = seg2; } for (num = 1; num < next_bp; num++) { if (breakpoints[num].refcount && breakpoints[num].enabled && breakpoints[num].type == DBG_WATCH) { mask |= (1 << breakpoints[num].u.w.reg); } } #ifdef __i386__ for (reg = 0; reg < 4 && (mask & (1 << reg)); reg++); if (reg == 4) { DEBUG_Printf(DBG_CHN_MESG, "All i386 hardware watchpoints have been set. Delete some\n"); return; } #endif if ((num = DEBUG_InitXPoint(DBG_WATCH, &value.addr)) == -1) return; breakpoints[num].u.w.len = 4 - 1; if (_value->type && DEBUG_GetObjectSize(_value->type) < 4) breakpoints[num].u.w.len = 2 - 1; if (!DEBUG_GetWatchedValue( num, &breakpoints[num].u.w.oldval)) { DEBUG_Printf(DBG_CHN_MESG, "Bad address. Watchpoint not set\n"); breakpoints[num].refcount = 0; } breakpoints[num].u.w.rw = (is_write) ? TRUE : FALSE; breakpoints[reg].u.w.reg = reg; DEBUG_Printf( DBG_CHN_MESG, "Watchpoint %d at ", num ); DEBUG_PrintAddress( &breakpoints[num].addr, breakpoints[num].is32 ? 32:16, TRUE ); DEBUG_Printf( DBG_CHN_MESG, "\n" ); } /*********************************************************************** * DEBUG_DelBreakpoint * * Delete a breakpoint. */ void DEBUG_DelBreakpoint( int num ) { if ((num <= 0) || (num >= next_bp) || breakpoints[num].refcount == 0) { DEBUG_Printf( DBG_CHN_MESG, "Invalid breakpoint number %d\n", num ); return; } if (--breakpoints[num].refcount > 0) return; if( breakpoints[num].condition != NULL ) { DEBUG_FreeExpr(breakpoints[num].condition); breakpoints[num].condition = NULL; } breakpoints[num].enabled = FALSE; breakpoints[num].refcount = 0; breakpoints[num].skipcount = 0; } /*********************************************************************** * DEBUG_EnableBreakpoint * * Enable or disable a break point. */ void DEBUG_EnableBreakpoint( int num, BOOL enable ) { if ((num <= 0) || (num >= next_bp) || breakpoints[num].refcount == 0) { DEBUG_Printf( DBG_CHN_MESG, "Invalid breakpoint number %d\n", num ); return; } breakpoints[num].enabled = (enable) ? TRUE : FALSE; breakpoints[num].skipcount = 0; } /*********************************************************************** * DEBUG_FindTriggeredWatchpoint * * Lookup the watchpoints to see if one has been triggered * Return >= (watch point index) if one is found and *oldval is set to * the value watched before the TRAP * Return -1 if none found (*oldval is undetermined) * * Unfortunately, Linux does *NOT* (A REAL PITA) report with ptrace * the DR6 register value, so we have to look with our own need the * cause of the TRAP. * -EP */ static int DEBUG_FindTriggeredWatchpoint(LPDWORD oldval) { int i; int found = -1; DWORD val = 0; /* Method 1 => get triggered watchpoint from context (doesn't work on Linux * 2.2.x) */ for (i = 0; i < next_bp; i++) { #ifdef __i386__ if (breakpoints[i].refcount && breakpoints[i].enabled && breakpoints[i].type == DBG_WATCH && (DEBUG_context.Dr6 & (1 << breakpoints[i].u.w.reg))) { DEBUG_context.Dr6 &= ~(1 << breakpoints[i].u.w.reg); *oldval = breakpoints[i].u.w.oldval; if (DEBUG_GetWatchedValue(i, &val)) { breakpoints[i].u.w.oldval = val; return i; } } #endif } /* Method 1 failed, trying method2 */ /* Method 2 => check if value has changed among registered watchpoints * this really sucks, but this is how gdb 4.18 works on my linux box * -EP */ for (i = 0; i < next_bp; i++) { #ifdef __i386__ if (breakpoints[i].refcount && breakpoints[i].enabled && breakpoints[i].type == DBG_WATCH && DEBUG_GetWatchedValue(i, &val)) { *oldval = breakpoints[i].u.w.oldval; if (val != *oldval) { DEBUG_context.Dr6 &= ~(1 << breakpoints[i].u.w.reg); breakpoints[i].u.w.oldval = val; found = i; /* cannot break, because two watch points may have been triggered on * the same acces * only one will be reported to the user (FIXME ?) */ } } #endif } return found; } /*********************************************************************** * DEBUG_InfoBreakpoints * * Display break points information. */ void DEBUG_InfoBreakpoints(void) { int i; DEBUG_Printf( DBG_CHN_MESG, "Breakpoints:\n" ); for (i = 1; i < next_bp; i++) { if (breakpoints[i].refcount && breakpoints[i].type == DBG_BREAK) { DEBUG_Printf( DBG_CHN_MESG, "%d: %c ", i, breakpoints[i].enabled ? 'y' : 'n'); DEBUG_PrintAddress( &breakpoints[i].addr, breakpoints[i].is32 ? 32 : 16, TRUE); DEBUG_Printf( DBG_CHN_MESG, " (%u)\n", breakpoints[i].refcount ); if( breakpoints[i].condition != NULL ) { DEBUG_Printf(DBG_CHN_MESG, "\t\tstop when "); DEBUG_DisplayExpr(breakpoints[i].condition); DEBUG_Printf(DBG_CHN_MESG, "\n"); } } } DEBUG_Printf( DBG_CHN_MESG, "Watchpoints:\n" ); for (i = 1; i < next_bp; i++) { if (breakpoints[i].refcount && breakpoints[i].type == DBG_WATCH) { DEBUG_Printf( DBG_CHN_MESG, "%d: %c ", i, breakpoints[i].enabled ? 'y' : 'n'); DEBUG_PrintAddress( &breakpoints[i].addr, breakpoints[i].is32 ? 32 : 16, TRUE); DEBUG_Printf( DBG_CHN_MESG, " on %d byte%s (%c)\n", breakpoints[i].u.w.len + 1, breakpoints[i].u.w.len > 0 ? "s" : "", breakpoints[i].u.w.rw ? 'W' : 'R'); if( breakpoints[i].condition != NULL ) { DEBUG_Printf(DBG_CHN_MESG, "\t\tstop when "); DEBUG_DisplayExpr(breakpoints[i].condition); DEBUG_Printf(DBG_CHN_MESG, "\n"); } } } } /*********************************************************************** * DEBUG_ShallBreak * * Check whether or not the condition (bp / skipcount) of a break/watch * point are met. */ static BOOL DEBUG_ShallBreak( int bpnum ) { if ( breakpoints[bpnum].condition != NULL ) { DBG_VALUE value = DEBUG_EvalExpr(breakpoints[bpnum].condition); if ( value.type == NULL ) { /* * Something wrong - unable to evaluate this expression. */ DEBUG_Printf(DBG_CHN_MESG, "Unable to evaluate expression "); DEBUG_DisplayExpr(breakpoints[bpnum].condition); DEBUG_Printf(DBG_CHN_MESG, "\nTurning off condition\n"); DEBUG_AddBPCondition(bpnum, NULL); } else if( !DEBUG_GetExprValue( &value, NULL) ) { return FALSE; } } if ( breakpoints[bpnum].skipcount > 0 && --breakpoints[bpnum].skipcount > 0 ) return FALSE; return (breakpoints[bpnum].u.b.func) ? (breakpoints[bpnum].u.b.func)() : TRUE; } /*********************************************************************** * DEBUG_ShouldContinue * * Determine if we should continue execution after a SIGTRAP signal when * executing in the given mode. */ BOOL DEBUG_ShouldContinue( DWORD code, enum exec_mode mode, int * count ) { DBG_ADDR addr; int bpnum; DWORD oldval; int wpnum; struct symbol_info syminfo; #ifdef __i386__ /* If not single-stepping, back up over the int3 instruction */ if (code == EXCEPTION_BREAKPOINT) DEBUG_context.Eip--; #endif DEBUG_GetCurrentAddress( &addr ); bpnum = DEBUG_FindBreakpoint( &addr, DBG_BREAK ); breakpoints[0].enabled = FALSE; /* disable the step-over breakpoint */ if ((bpnum != 0) && (bpnum != -1)) { if (!DEBUG_ShallBreak(bpnum)) return TRUE; DEBUG_Printf( DBG_CHN_MESG, "Stopped on breakpoint %d at ", bpnum ); syminfo = DEBUG_PrintAddress( &breakpoints[bpnum].addr, breakpoints[bpnum].is32 ? 32 : 16, TRUE ); DEBUG_Printf( DBG_CHN_MESG, "\n" ); if( syminfo.list.sourcefile != NULL ) DEBUG_List(&syminfo.list, NULL, 0); return FALSE; } wpnum = DEBUG_FindTriggeredWatchpoint(&oldval); if ((wpnum != 0) && (wpnum != -1)) { /* If not single-stepping, do not back up over the int3 instruction */ if (code == EXCEPTION_BREAKPOINT) { #ifdef __i386__ DEBUG_context.Eip++; addr.off++; #endif } if (!DEBUG_ShallBreak(wpnum)) return TRUE; DEBUG_Printf(DBG_CHN_MESG, "Stopped on watchpoint %d at ", wpnum); syminfo = DEBUG_PrintAddress( &addr, !addr.seg ? 32 : DEBUG_GetSelectorType( addr.seg ), TRUE ); DEBUG_Printf(DBG_CHN_MESG, " values: old=%lu new=%lu\n", oldval, breakpoints[wpnum].u.w.oldval); if (syminfo.list.sourcefile != NULL) DEBUG_List(&syminfo.list, NULL, 0); return FALSE; } /* * If our mode indicates that we are stepping line numbers, * get the current function, and figure out if we are exactly * on a line number or not. */ if( mode == EXEC_STEP_OVER || mode == EXEC_STEP_INSTR ) { if( DEBUG_CheckLinenoStatus(&addr) == AT_LINENUMBER ) { (*count)--; } } else if( mode == EXEC_STEPI_OVER || mode == EXEC_STEPI_INSTR ) { (*count)--; } if( *count > 0 || mode == EXEC_FINISH ) { /* * We still need to execute more instructions. */ return TRUE; } /* * If we are about to stop, then print out the source line if we * have it. */ if (mode != EXEC_CONT && mode != EXEC_PASS && mode != EXEC_FINISH) { DEBUG_FindNearestSymbol( &addr, TRUE, NULL, 0, &syminfo.list); if( syminfo.list.sourcefile != NULL ) { DEBUG_List(&syminfo.list, NULL, 0); } } #ifdef __i386__ /* If there's no breakpoint and we are not single-stepping, then we */ /* must have encountered an int3 in the Windows program; let's skip it. */ if ((bpnum == -1) && code == EXCEPTION_BREAKPOINT) DEBUG_context.Eip++; #endif /* no breakpoint, continue if in continuous mode */ return (mode == EXEC_CONT || mode == EXEC_PASS || mode == EXEC_FINISH); } /*********************************************************************** * DEBUG_SuspendExecution * * Remove all breakpoints before entering the debug loop */ void DEBUG_SuspendExecution( void ) { DEBUG_SetBreakpoints( FALSE ); breakpoints[0] = DEBUG_CurrThread->stepOverBP; } /*********************************************************************** * DEBUG_RestartExecution * * Set the breakpoints to the correct state to restart execution * in the given mode. */ enum exec_mode DEBUG_RestartExecution( enum exec_mode mode, int count ) { DBG_ADDR addr; DBG_ADDR addr2; int bp; int delta; int status; enum exec_mode ret_mode; DWORD instr; unsigned char ch; DEBUG_GetCurrentAddress( &addr ); /* * This is the mode we will be running in after we finish. We would like * to be able to modify this in certain cases. */ ret_mode = mode; bp = DEBUG_FindBreakpoint( &addr, DBG_BREAK ); if ( bp != -1 && bp != 0) { /* * If we have set a new value, then save it in the BP number. */ if( count != 0 && mode == EXEC_CONT ) { breakpoints[bp].skipcount = count; } mode = EXEC_STEPI_INSTR; /* If there's a breakpoint, skip it */ } else { if( mode == EXEC_CONT && count > 1 ) { DEBUG_Printf(DBG_CHN_MESG, "Not stopped at any breakpoint; argument ignored.\n"); } } if( mode == EXEC_FINISH && DEBUG_IsFctReturn() ) { mode = ret_mode = EXEC_STEPI_INSTR; } instr = DEBUG_ToLinear( &addr ); DEBUG_READ_MEM((void*)instr, &ch, sizeof(ch)); /* * See if the function we are stepping into has debug info * and line numbers. If not, then we step over it instead. * FIXME - we need to check for things like thunks or trampolines, * as the actual function may in fact have debug info. */ if( ch == 0xe8 ) { DEBUG_READ_MEM((void*)(instr + 1), &delta, sizeof(delta)); addr2 = addr; DEBUG_Disasm(&addr2, FALSE); addr2.off += delta; status = DEBUG_CheckLinenoStatus(&addr2); /* * Anytime we have a trampoline, step over it. */ if( ((mode == EXEC_STEP_OVER) || (mode == EXEC_STEPI_OVER)) && status == FUNC_IS_TRAMPOLINE ) { #if 0 DEBUG_Printf(DBG_CHN_MESG, "Not stepping into trampoline at %x (no lines)\n", addr2.off); #endif mode = EXEC_STEP_OVER_TRAMPOLINE; } if( mode == EXEC_STEP_INSTR && status == FUNC_HAS_NO_LINES ) { #if 0 DEBUG_Printf(DBG_CHN_MESG, "Not stepping into function at %x (no lines)\n", addr2.off); #endif mode = EXEC_STEP_OVER; } } if( mode == EXEC_STEP_INSTR ) { if( DEBUG_CheckLinenoStatus(&addr) == FUNC_HAS_NO_LINES ) { DEBUG_Printf(DBG_CHN_MESG, "Single stepping until exit from function, \n"); DEBUG_Printf(DBG_CHN_MESG, "which has no line number information.\n"); ret_mode = mode = EXEC_FINISH; } } switch(mode) { case EXEC_CONT: /* Continuous execution */ case EXEC_PASS: /* Continue, passing exception */ #ifdef __i386__ DEBUG_context.EFlags &= ~STEP_FLAG; #endif DEBUG_SetBreakpoints( TRUE ); break; case EXEC_STEP_OVER_TRAMPOLINE: /* * This is the means by which we step over our conversion stubs * in callfrom*.s and callto*.s. We dig the appropriate address * off the stack, and we set the breakpoint there instead of the * address just after the call. */ #ifdef __i386__ DEBUG_READ_MEM((void*)(DEBUG_context.Esp + 2 * sizeof(unsigned int)), &addr.off, sizeof(addr.off)); DEBUG_context.EFlags &= ~STEP_FLAG; #endif breakpoints[0].addr = addr; breakpoints[0].enabled = TRUE; breakpoints[0].refcount = 1; breakpoints[0].skipcount = 0; DEBUG_READ_MEM((void*)DEBUG_ToLinear( &addr ), &breakpoints[0].u.b.opcode, sizeof(char)); DEBUG_SetBreakpoints( TRUE ); break; case EXEC_FINISH: case EXEC_STEPI_OVER: /* Stepping over a call */ case EXEC_STEP_OVER: /* Stepping over a call */ if (DEBUG_IsStepOverInstr()) { #ifdef __i386__ DEBUG_context.EFlags &= ~STEP_FLAG; #endif DEBUG_Disasm(&addr, FALSE); breakpoints[0].addr = addr; breakpoints[0].enabled = TRUE; breakpoints[0].refcount = 1; breakpoints[0].skipcount = 0; DEBUG_READ_MEM((void*)DEBUG_ToLinear( &addr ), &breakpoints[0].u.b.opcode, sizeof(char)); DEBUG_SetBreakpoints( TRUE ); break; } /* else fall through to single-stepping */ case EXEC_STEP_INSTR: /* Single-stepping an instruction */ case EXEC_STEPI_INSTR: /* Single-stepping an instruction */ #ifdef __i386__ DEBUG_context.EFlags |= STEP_FLAG; #endif break; case EXEC_KILL: break; default: RaiseException(DEBUG_STATUS_INTERNAL_ERROR, 0, 0, NULL); } DEBUG_CurrThread->stepOverBP = breakpoints[0]; return ret_mode; } int DEBUG_AddBPCondition(int num, struct expr * exp) { if ((num <= 0) || (num >= next_bp) || !breakpoints[num].refcount) { DEBUG_Printf( DBG_CHN_MESG, "Invalid breakpoint number %d\n", num ); return FALSE; } if( breakpoints[num].condition != NULL ) { DEBUG_FreeExpr(breakpoints[num].condition); breakpoints[num].condition = NULL; } if( exp != NULL ) { breakpoints[num].condition = DEBUG_CloneExpr(exp); } return TRUE; } wine-20000526/debugger/db_disasm.c0100644000175000001440000013266207103022473016327 0ustar julliardusers/* * Mach Operating System * Copyright (c) 1991,1990 Carnegie Mellon University * All Rights Reserved. * * Permission to use, copy, modify and distribute this software and its * documentation is hereby granted, provided that both the copyright * notice and this permission notice appear in all copies of the * software, derivative works or modified versions, and any portions * thereof, and that both notices appear in supporting documentation. * * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS" * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE. * * Carnegie Mellon requests users of this software to return to * * Software Distribution Coordinator or Software.Distribution@CS.CMU.EDU * School of Computer Science * Carnegie Mellon University * Pittsburgh PA 15213-3890 * * any improvements or extensions that they make and grant Carnegie Mellon * the rights to redistribute these changes. */ /* * HISTORY * * Revision 2.6 92/01/03 20:05:00 dbg * Add a switch to disassemble 16-bit code. * Fix spelling of 'lods' opcodes. * [91/10/30 dbg] * * Revision 2.5 91/10/09 16:05:58 af * Supported disassemble of non current task by passing task parameter. * [91/08/29 tak] * * Revision 2.4 91/05/14 16:05:04 mrt * Correcting copyright * * Revision 2.3 91/02/05 17:11:03 mrt * Changed to new Mach copyright * [91/02/01 17:31:03 mrt] * * Revision 2.2 90/08/27 21:55:56 dbg * Fix register operand for move to/from control/test/debug * register instructions. Add i486 instructions. * [90/08/27 dbg] * * Import db_sym.h. Print instruction displacements in * current radix (signed). Change calling sequence of * db_disasm. * [90/08/21 dbg] * Fix includes. * [90/08/08 dbg] * Created. * [90/07/25 dbg] * */ /* * Instruction disassembler. */ #include "debugger.h" #ifdef __i386__ /* * Switch to disassemble 16-bit code. */ static BOOL db_disasm_16 = FALSE; /* * Flag to indicate whether we need to display instruction, * or whether we just need to know the address of the next * instruction. */ static BOOL db_display = FALSE; /* * Size attributes */ #define BYTE 0 #define WORD 1 #define LONG 2 #define QUAD 3 #define SNGL 4 #define DBLR 5 #define EXTR 6 #define SDEP 7 #define NONE 8 /* * Addressing modes */ #define E 1 /* general effective address */ #define Eind 2 /* indirect address (jump, call) */ #define Ew 3 /* address, word size */ #define Eb 4 /* address, byte size */ #define R 5 /* register, in 'reg' field */ #define Rw 6 /* word register, in 'reg' field */ #define Ri 7 /* register in instruction */ #define S 8 /* segment reg, in 'reg' field */ #define Si 9 /* segment reg, in instruction */ #define A 10 /* accumulator */ #define BX 11 /* (bx) */ #define CL 12 /* cl, for shifts */ #define DX 13 /* dx, for IO */ #define SI 14 /* si */ #define DI 15 /* di */ #define CR 16 /* control register */ #define DR 17 /* debug register */ #define TR 18 /* test register */ #define I 19 /* immediate, unsigned */ #define Is 20 /* immediate, signed */ #define Ib 21 /* byte immediate, unsigned */ #define Ibs 22 /* byte immediate, signed */ #define Iw 23 /* word immediate, unsigned */ #define Il 24 /* long immediate */ #define O 25 /* direct address */ #define Db 26 /* byte displacement from EIP */ #define Dl 27 /* long displacement from EIP */ #define o1 28 /* constant 1 */ #define o3 29 /* constant 3 */ #define OS 30 /* immediate offset/segment */ #define ST 31 /* FP stack top */ #define STI 32 /* FP stack */ #define X 33 /* extended FP op */ #define XA 34 /* for 'fstcw %ax' */ struct inst { const char *i_name; /* name */ short i_has_modrm; /* has regmodrm byte */ short i_size; /* operand size */ int i_mode; /* addressing modes */ const char *i_extra; /* pointer to extra opcode table */ }; #define op1(x) (x) #define op2(x,y) ((x)|((y)<<8)) #define op3(x,y,z) ((x)|((y)<<8)|((z)<<16)) struct finst { const char *f_name; /* name for memory instruction */ int f_size; /* size for memory instruction */ int f_rrmode; /* mode for rr instruction */ const char *f_rrname; /* name for rr instruction (or pointer to table) */ }; static const char * const db_Grp6[] = { "sldt", "str", "lldt", "ltr", "verr", "verw", "", "" }; static const char * const db_Grp7[] = { "sgdt", "sidt", "lgdt", "lidt", "smsw", "", "lmsw", "invlpg" }; static const char * const db_Grp8[] = { "", "", "", "", "bt", "bts", "btr", "btc" }; static const struct inst db_inst_0f0x[] = { /*00*/ { "", TRUE, NONE, op1(Ew), (char *)db_Grp6 }, /*01*/ { "", TRUE, NONE, op1(Ew), (char *)db_Grp7 }, /*02*/ { "lar", TRUE, LONG, op2(E,R), 0 }, /*03*/ { "lsl", TRUE, LONG, op2(E,R), 0 }, /*04*/ { "", FALSE, NONE, 0, 0 }, /*05*/ { "", FALSE, NONE, 0, 0 }, /*06*/ { "clts", FALSE, NONE, 0, 0 }, /*07*/ { "", FALSE, NONE, 0, 0 }, /*08*/ { "invd", FALSE, NONE, 0, 0 }, /*09*/ { "wbinvd",FALSE, NONE, 0, 0 }, /*0a*/ { "", FALSE, NONE, 0, 0 }, /*0b*/ { "", FALSE, NONE, 0, 0 }, /*0c*/ { "", FALSE, NONE, 0, 0 }, /*0d*/ { "", FALSE, NONE, 0, 0 }, /*0e*/ { "", FALSE, NONE, 0, 0 }, /*0f*/ { "", FALSE, NONE, 0, 0 }, }; static const struct inst db_inst_0f2x[] = { /*20*/ { "mov", TRUE, LONG, op2(CR,E), 0 }, /* use E for reg */ /*21*/ { "mov", TRUE, LONG, op2(DR,E), 0 }, /* since mod == 11 */ /*22*/ { "mov", TRUE, LONG, op2(E,CR), 0 }, /*23*/ { "mov", TRUE, LONG, op2(E,DR), 0 }, /*24*/ { "mov", TRUE, LONG, op2(TR,E), 0 }, /*25*/ { "", FALSE, NONE, 0, 0 }, /*26*/ { "mov", TRUE, LONG, op2(E,TR), 0 }, /*27*/ { "", FALSE, NONE, 0, 0 }, /*28*/ { "", FALSE, NONE, 0, 0 }, /*29*/ { "", FALSE, NONE, 0, 0 }, /*2a*/ { "", FALSE, NONE, 0, 0 }, /*2b*/ { "", FALSE, NONE, 0, 0 }, /*2c*/ { "", FALSE, NONE, 0, 0 }, /*2d*/ { "", FALSE, NONE, 0, 0 }, /*2e*/ { "", FALSE, NONE, 0, 0 }, /*2f*/ { "", FALSE, NONE, 0, 0 }, }; static const struct inst db_inst_0f8x[] = { /*80*/ { "jo", FALSE, NONE, op1(Dl), 0 }, /*81*/ { "jno", FALSE, NONE, op1(Dl), 0 }, /*82*/ { "jb", FALSE, NONE, op1(Dl), 0 }, /*83*/ { "jnb", FALSE, NONE, op1(Dl), 0 }, /*84*/ { "jz", FALSE, NONE, op1(Dl), 0 }, /*85*/ { "jnz", FALSE, NONE, op1(Dl), 0 }, /*86*/ { "jbe", FALSE, NONE, op1(Dl), 0 }, /*87*/ { "jnbe", FALSE, NONE, op1(Dl), 0 }, /*88*/ { "js", FALSE, NONE, op1(Dl), 0 }, /*89*/ { "jns", FALSE, NONE, op1(Dl), 0 }, /*8a*/ { "jp", FALSE, NONE, op1(Dl), 0 }, /*8b*/ { "jnp", FALSE, NONE, op1(Dl), 0 }, /*8c*/ { "jl", FALSE, NONE, op1(Dl), 0 }, /*8d*/ { "jnl", FALSE, NONE, op1(Dl), 0 }, /*8e*/ { "jle", FALSE, NONE, op1(Dl), 0 }, /*8f*/ { "jnle", FALSE, NONE, op1(Dl), 0 }, }; static const struct inst db_inst_0f9x[] = { /*90*/ { "seto", TRUE, NONE, op1(Eb), 0 }, /*91*/ { "setno", TRUE, NONE, op1(Eb), 0 }, /*92*/ { "setb", TRUE, NONE, op1(Eb), 0 }, /*93*/ { "setnb", TRUE, NONE, op1(Eb), 0 }, /*94*/ { "setz", TRUE, NONE, op1(Eb), 0 }, /*95*/ { "setnz", TRUE, NONE, op1(Eb), 0 }, /*96*/ { "setbe", TRUE, NONE, op1(Eb), 0 }, /*97*/ { "setnbe",TRUE, NONE, op1(Eb), 0 }, /*98*/ { "sets", TRUE, NONE, op1(Eb), 0 }, /*99*/ { "setns", TRUE, NONE, op1(Eb), 0 }, /*9a*/ { "setp", TRUE, NONE, op1(Eb), 0 }, /*9b*/ { "setnp", TRUE, NONE, op1(Eb), 0 }, /*9c*/ { "setl", TRUE, NONE, op1(Eb), 0 }, /*9d*/ { "setnl", TRUE, NONE, op1(Eb), 0 }, /*9e*/ { "setle", TRUE, NONE, op1(Eb), 0 }, /*9f*/ { "setnle",TRUE, NONE, op1(Eb), 0 }, }; static const struct inst db_inst_0fax[] = { /*a0*/ { "push", FALSE, NONE, op1(Si), 0 }, /*a1*/ { "pop", FALSE, NONE, op1(Si), 0 }, /*a2*/ { "cpuid", FALSE, NONE, 0, 0 }, /*a3*/ { "bt", TRUE, LONG, op2(E,R), 0 }, /*a4*/ { "shld", TRUE, LONG, op3(Ib,E,R), 0 }, /*a5*/ { "shld", TRUE, LONG, op3(CL,E,R), 0 }, /*a6*/ { "", FALSE, NONE, 0, 0 }, /*a7*/ { "", FALSE, NONE, 0, 0 }, /*a8*/ { "push", FALSE, NONE, op1(Si), 0 }, /*a9*/ { "pop", FALSE, NONE, op1(Si), 0 }, /*aa*/ { "", FALSE, NONE, 0, 0 }, /*ab*/ { "bts", TRUE, LONG, op2(E,R), 0 }, /*ac*/ { "shrd", TRUE, LONG, op3(Ib,E,R), 0 }, /*ad*/ { "shrd", TRUE, LONG, op3(CL,E,R), 0 }, /*a6*/ { "", FALSE, NONE, 0, 0 }, /*a7*/ { "imul", TRUE, LONG, op2(E,R), 0 }, }; static const struct inst db_inst_0fbx[] = { /*b0*/ { "cmpxchg",TRUE, BYTE, op2(E, R), 0 }, /*b1*/ { "cmpxchg",TRUE, LONG, op2(E, R), 0 }, /*b2*/ { "lss", TRUE, LONG, op2(E, R), 0 }, /*b3*/ { "bts", TRUE, LONG, op2(R, E), 0 }, /*b4*/ { "lfs", TRUE, LONG, op2(E, R), 0 }, /*b5*/ { "lgs", TRUE, LONG, op2(E, R), 0 }, /*b6*/ { "movzb", TRUE, LONG, op2(E, R), 0 }, /*b7*/ { "movzw", TRUE, LONG, op2(E, R), 0 }, /*b8*/ { "", FALSE, NONE, 0, 0 }, /*b9*/ { "", FALSE, NONE, 0, 0 }, /*ba*/ { "", TRUE, LONG, op2(Ib, E), (char *)db_Grp8 }, /*bb*/ { "btc", TRUE, LONG, op2(R, E), 0 }, /*bc*/ { "bsf", TRUE, LONG, op2(E, R), 0 }, /*bd*/ { "bsr", TRUE, LONG, op2(E, R), 0 }, /*be*/ { "movsb", TRUE, LONG, op2(E, R), 0 }, /*bf*/ { "movsw", TRUE, LONG, op2(E, R), 0 }, }; static const struct inst db_inst_0fcx[] = { /*c0*/ { "xadd", TRUE, BYTE, op2(R, E), 0 }, /*c1*/ { "xadd", TRUE, LONG, op2(R, E), 0 }, /*c2*/ { "", FALSE, NONE, 0, 0 }, /*c3*/ { "", FALSE, NONE, 0, 0 }, /*c4*/ { "", FALSE, NONE, 0, 0 }, /*c5*/ { "", FALSE, NONE, 0, 0 }, /*c6*/ { "", FALSE, NONE, 0, 0 }, /*c7*/ { "", FALSE, NONE, 0, 0 }, /*c8*/ { "bswap", FALSE, LONG, op1(Ri), 0 }, /*c9*/ { "bswap", FALSE, LONG, op1(Ri), 0 }, /*ca*/ { "bswap", FALSE, LONG, op1(Ri), 0 }, /*cb*/ { "bswap", FALSE, LONG, op1(Ri), 0 }, /*cc*/ { "bswap", FALSE, LONG, op1(Ri), 0 }, /*cd*/ { "bswap", FALSE, LONG, op1(Ri), 0 }, /*ce*/ { "bswap", FALSE, LONG, op1(Ri), 0 }, /*cf*/ { "bswap", FALSE, LONG, op1(Ri), 0 }, }; static const struct inst db_inst_0fdx[] = { /*c0*/ { "cmpxchg",TRUE, BYTE, op2(R, E), 0 }, /*c1*/ { "cmpxchg",TRUE, LONG, op2(R, E), 0 }, /*c2*/ { "", FALSE, NONE, 0, 0 }, /*c3*/ { "", FALSE, NONE, 0, 0 }, /*c4*/ { "", FALSE, NONE, 0, 0 }, /*c5*/ { "", FALSE, NONE, 0, 0 }, /*c6*/ { "", FALSE, NONE, 0, 0 }, /*c7*/ { "", FALSE, NONE, 0, 0 }, /*c8*/ { "", FALSE, NONE, 0, 0 }, /*c9*/ { "", FALSE, NONE, 0, 0 }, /*ca*/ { "", FALSE, NONE, 0, 0 }, /*cb*/ { "", FALSE, NONE, 0, 0 }, /*cc*/ { "", FALSE, NONE, 0, 0 }, /*cd*/ { "", FALSE, NONE, 0, 0 }, /*ce*/ { "", FALSE, NONE, 0, 0 }, /*cf*/ { "", FALSE, NONE, 0, 0 }, }; static const struct inst * const db_inst_0f[] = { db_inst_0f0x, 0, db_inst_0f2x, 0, 0, 0, 0, 0, db_inst_0f8x, db_inst_0f9x, db_inst_0fax, db_inst_0fbx, db_inst_0fcx, db_inst_0fdx, 0, 0 }; static const char * const db_Esc92[] = { "fnop", "", "", "", "", "", "", "" }; static const char * const db_Esc93[] = { "", "", "", "", "", "", "", "" }; static const char * const db_Esc94[] = { "fchs", "fabs", "", "", "ftst", "fxam", "", "" }; static const char * const db_Esc95[] = { "fld1", "fldl2t","fldl2e","fldpi","fldlg2","fldln2","fldz","" }; static const char * const db_Esc96[] = { "f2xm1","fyl2x","fptan","fpatan","fxtract","fprem1","fdecstp", "fincstp" }; static const char * const db_Esc97[] = { "fprem","fyl2xp1","fsqrt","fsincos","frndint","fscale","fsin","fcos" }; static const char * const db_Esca4[] = { "", "fucompp","", "", "", "", "", "" }; static const char * const db_Escb4[] = { "", "", "fnclex","fninit","", "", "", "" }; static const char * const db_Esce3[] = { "", "fcompp","", "", "", "", "", "" }; static const char * const db_Escf4[] = { "fnstsw","", "", "", "", "", "", "" }; static const struct finst db_Esc8[] = { /*0*/ { "fadd", SNGL, op2(STI,ST), 0 }, /*1*/ { "fmul", SNGL, op2(STI,ST), 0 }, /*2*/ { "fcom", SNGL, op2(STI,ST), 0 }, /*3*/ { "fcomp", SNGL, op2(STI,ST), 0 }, /*4*/ { "fsub", SNGL, op2(STI,ST), 0 }, /*5*/ { "fsubr", SNGL, op2(STI,ST), 0 }, /*6*/ { "fdiv", SNGL, op2(STI,ST), 0 }, /*7*/ { "fdivr", SNGL, op2(STI,ST), 0 }, }; static const struct finst db_Esc9[] = { /*0*/ { "fld", SNGL, op1(STI), 0 }, /*1*/ { "", NONE, op1(STI), "fxch" }, /*2*/ { "fst", SNGL, op1(X), (char *)db_Esc92 }, /*3*/ { "fstp", SNGL, op1(X), (char *)db_Esc93 }, /*4*/ { "fldenv", NONE, op1(X), (char *)db_Esc94 }, /*5*/ { "fldcw", NONE, op1(X), (char *)db_Esc95 }, /*6*/ { "fnstenv",NONE, op1(X), (char *)db_Esc96 }, /*7*/ { "fnstcw", NONE, op1(X), (char *)db_Esc97 }, }; static const struct finst db_Esca[] = { /*0*/ { "fiadd", WORD, 0, 0 }, /*1*/ { "fimul", WORD, 0, 0 }, /*2*/ { "ficom", WORD, 0, 0 }, /*3*/ { "ficomp", WORD, 0, 0 }, /*4*/ { "fisub", WORD, op1(X), (char *)db_Esca4 }, /*5*/ { "fisubr", WORD, 0, 0 }, /*6*/ { "fidiv", WORD, 0, 0 }, /*7*/ { "fidivr", WORD, 0, 0 } }; static const struct finst db_Escb[] = { /*0*/ { "fild", WORD, 0, 0 }, /*1*/ { "", NONE, 0, 0 }, /*2*/ { "fist", WORD, 0, 0 }, /*3*/ { "fistp", WORD, 0, 0 }, /*4*/ { "", WORD, op1(X), (char *)db_Escb4 }, /*5*/ { "fld", EXTR, 0, 0 }, /*6*/ { "", WORD, 0, 0 }, /*7*/ { "fstp", EXTR, 0, 0 }, }; static const struct finst db_Escc[] = { /*0*/ { "fadd", DBLR, op2(ST,STI), 0 }, /*1*/ { "fmul", DBLR, op2(ST,STI), 0 }, /*2*/ { "fcom", DBLR, op2(ST,STI), 0 }, /*3*/ { "fcomp", DBLR, op2(ST,STI), 0 }, /*4*/ { "fsub", DBLR, op2(ST,STI), "fsubr" }, /*5*/ { "fsubr", DBLR, op2(ST,STI), "fsub" }, /*6*/ { "fdiv", DBLR, op2(ST,STI), "fdivr" }, /*7*/ { "fdivr", DBLR, op2(ST,STI), "fdiv" }, }; static const struct finst db_Escd[] = { /*0*/ { "fld", DBLR, op1(STI), "ffree" }, /*1*/ { "", NONE, 0, 0 }, /*2*/ { "fst", DBLR, op1(STI), 0 }, /*3*/ { "fstp", DBLR, op1(STI), 0 }, /*4*/ { "frstor", NONE, op1(STI), "fucom" }, /*5*/ { "", NONE, op1(STI), "fucomp" }, /*6*/ { "fnsave", NONE, 0, 0 }, /*7*/ { "fnstsw", NONE, 0, 0 }, }; static const struct finst db_Esce[] = { /*0*/ { "fiadd", LONG, op2(ST,STI), "faddp" }, /*1*/ { "fimul", LONG, op2(ST,STI), "fmulp" }, /*2*/ { "ficom", LONG, 0, 0 }, /*3*/ { "ficomp", LONG, op1(X), (char *)db_Esce3 }, /*4*/ { "fisub", LONG, op2(ST,STI), "fsubrp" }, /*5*/ { "fisubr", LONG, op2(ST,STI), "fsubp" }, /*6*/ { "fidiv", LONG, op2(ST,STI), "fdivrp" }, /*7*/ { "fidivr", LONG, op2(ST,STI), "fdivp" }, }; static const struct finst db_Escf[] = { /*0*/ { "fild", LONG, 0, 0 }, /*1*/ { "", LONG, 0, 0 }, /*2*/ { "fist", LONG, 0, 0 }, /*3*/ { "fistp", LONG, 0, 0 }, /*4*/ { "fbld", NONE, op1(XA), (char *)db_Escf4 }, /*5*/ { "fld", QUAD, 0, 0 }, /*6*/ { "fbstp", NONE, 0, 0 }, /*7*/ { "fstp", QUAD, 0, 0 }, }; static const struct finst * const db_Esc_inst[] = { db_Esc8, db_Esc9, db_Esca, db_Escb, db_Escc, db_Escd, db_Esce, db_Escf }; static const char * const db_Grp1[] = { "add", "or", "adc", "sbb", "and", "sub", "xor", "cmp" }; static const char * const db_Grp2[] = { "rol", "ror", "rcl", "rcr", "shl", "shr", "shl", "sar" }; static const struct inst db_Grp3[] = { { "test", TRUE, NONE, op2(I,E), 0 }, { "test", TRUE, NONE, op2(I,E), 0 }, { "not", TRUE, NONE, op1(E), 0 }, { "neg", TRUE, NONE, op1(E), 0 }, { "mul", TRUE, NONE, op2(E,A), 0 }, { "imul", TRUE, NONE, op2(E,A), 0 }, { "div", TRUE, NONE, op2(E,A), 0 }, { "idiv", TRUE, NONE, op2(E,A), 0 }, }; static const struct inst db_Grp4[] = { { "inc", TRUE, BYTE, op1(E), 0 }, { "dec", TRUE, BYTE, op1(E), 0 }, { "", TRUE, NONE, 0, 0 }, { "", TRUE, NONE, 0, 0 }, { "", TRUE, NONE, 0, 0 }, { "", TRUE, NONE, 0, 0 }, { "", TRUE, NONE, 0, 0 }, { "", TRUE, NONE, 0, 0 } }; static const struct inst db_Grp5[] = { { "inc", TRUE, LONG, op1(E), 0 }, { "dec", TRUE, LONG, op1(E), 0 }, { "call", TRUE, NONE, op1(Eind),0 }, { "lcall", TRUE, NONE, op1(Eind),0 }, { "jmp", TRUE, NONE, op1(Eind),0 }, { "ljmp", TRUE, NONE, op1(Eind),0 }, { "push", TRUE, LONG, op1(E), 0 }, { "", TRUE, NONE, 0, 0 } }; static const struct inst db_inst_table[256] = { /*00*/ { "add", TRUE, BYTE, op2(R, E), 0 }, /*01*/ { "add", TRUE, LONG, op2(R, E), 0 }, /*02*/ { "add", TRUE, BYTE, op2(E, R), 0 }, /*03*/ { "add", TRUE, LONG, op2(E, R), 0 }, /*04*/ { "add", FALSE, BYTE, op2(Is, A), 0 }, /*05*/ { "add", FALSE, LONG, op2(Is, A), 0 }, /*06*/ { "push", FALSE, NONE, op1(Si), 0 }, /*07*/ { "pop", FALSE, NONE, op1(Si), 0 }, /*08*/ { "or", TRUE, BYTE, op2(R, E), 0 }, /*09*/ { "or", TRUE, LONG, op2(R, E), 0 }, /*0a*/ { "or", TRUE, BYTE, op2(E, R), 0 }, /*0b*/ { "or", TRUE, LONG, op2(E, R), 0 }, /*0c*/ { "or", FALSE, BYTE, op2(I, A), 0 }, /*0d*/ { "or", FALSE, LONG, op2(I, A), 0 }, /*0e*/ { "push", FALSE, NONE, op1(Si), 0 }, /*0f*/ { "", FALSE, NONE, 0, 0 }, /*10*/ { "adc", TRUE, BYTE, op2(R, E), 0 }, /*11*/ { "adc", TRUE, LONG, op2(R, E), 0 }, /*12*/ { "adc", TRUE, BYTE, op2(E, R), 0 }, /*13*/ { "adc", TRUE, LONG, op2(E, R), 0 }, /*14*/ { "adc", FALSE, BYTE, op2(Is, A), 0 }, /*15*/ { "adc", FALSE, LONG, op2(Is, A), 0 }, /*16*/ { "push", FALSE, NONE, op1(Si), 0 }, /*17*/ { "pop", FALSE, NONE, op1(Si), 0 }, /*18*/ { "sbb", TRUE, BYTE, op2(R, E), 0 }, /*19*/ { "sbb", TRUE, LONG, op2(R, E), 0 }, /*1a*/ { "sbb", TRUE, BYTE, op2(E, R), 0 }, /*1b*/ { "sbb", TRUE, LONG, op2(E, R), 0 }, /*1c*/ { "sbb", FALSE, BYTE, op2(Is, A), 0 }, /*1d*/ { "sbb", FALSE, LONG, op2(Is, A), 0 }, /*1e*/ { "push", FALSE, NONE, op1(Si), 0 }, /*1f*/ { "pop", FALSE, NONE, op1(Si), 0 }, /*20*/ { "and", TRUE, BYTE, op2(R, E), 0 }, /*21*/ { "and", TRUE, LONG, op2(R, E), 0 }, /*22*/ { "and", TRUE, BYTE, op2(E, R), 0 }, /*23*/ { "and", TRUE, LONG, op2(E, R), 0 }, /*24*/ { "and", FALSE, BYTE, op2(I, A), 0 }, /*25*/ { "and", FALSE, LONG, op2(I, A), 0 }, /*26*/ { "", FALSE, NONE, 0, 0 }, /*27*/ { "aaa", FALSE, NONE, 0, 0 }, /*28*/ { "sub", TRUE, BYTE, op2(R, E), 0 }, /*29*/ { "sub", TRUE, LONG, op2(R, E), 0 }, /*2a*/ { "sub", TRUE, BYTE, op2(E, R), 0 }, /*2b*/ { "sub", TRUE, LONG, op2(E, R), 0 }, /*2c*/ { "sub", FALSE, BYTE, op2(Is, A), 0 }, /*2d*/ { "sub", FALSE, LONG, op2(Is, A), 0 }, /*2e*/ { "", FALSE, NONE, 0, 0 }, /*2f*/ { "das", FALSE, NONE, 0, 0 }, /*30*/ { "xor", TRUE, BYTE, op2(R, E), 0 }, /*31*/ { "xor", TRUE, LONG, op2(R, E), 0 }, /*32*/ { "xor", TRUE, BYTE, op2(E, R), 0 }, /*33*/ { "xor", TRUE, LONG, op2(E, R), 0 }, /*34*/ { "xor", FALSE, BYTE, op2(I, A), 0 }, /*35*/ { "xor", FALSE, LONG, op2(I, A), 0 }, /*36*/ { "", FALSE, NONE, 0, 0 }, /*37*/ { "daa", FALSE, NONE, 0, 0 }, /*38*/ { "cmp", TRUE, BYTE, op2(R, E), 0 }, /*39*/ { "cmp", TRUE, LONG, op2(R, E), 0 }, /*3a*/ { "cmp", TRUE, BYTE, op2(E, R), 0 }, /*3b*/ { "cmp", TRUE, LONG, op2(E, R), 0 }, /*3c*/ { "cmp", FALSE, BYTE, op2(Is, A), 0 }, /*3d*/ { "cmp", FALSE, LONG, op2(Is, A), 0 }, /*3e*/ { "", FALSE, NONE, 0, 0 }, /*3f*/ { "aas", FALSE, NONE, 0, 0 }, /*40*/ { "inc", FALSE, LONG, op1(Ri), 0 }, /*41*/ { "inc", FALSE, LONG, op1(Ri), 0 }, /*42*/ { "inc", FALSE, LONG, op1(Ri), 0 }, /*43*/ { "inc", FALSE, LONG, op1(Ri), 0 }, /*44*/ { "inc", FALSE, LONG, op1(Ri), 0 }, /*45*/ { "inc", FALSE, LONG, op1(Ri), 0 }, /*46*/ { "inc", FALSE, LONG, op1(Ri), 0 }, /*47*/ { "inc", FALSE, LONG, op1(Ri), 0 }, /*48*/ { "dec", FALSE, LONG, op1(Ri), 0 }, /*49*/ { "dec", FALSE, LONG, op1(Ri), 0 }, /*4a*/ { "dec", FALSE, LONG, op1(Ri), 0 }, /*4b*/ { "dec", FALSE, LONG, op1(Ri), 0 }, /*4c*/ { "dec", FALSE, LONG, op1(Ri), 0 }, /*4d*/ { "dec", FALSE, LONG, op1(Ri), 0 }, /*4e*/ { "dec", FALSE, LONG, op1(Ri), 0 }, /*4f*/ { "dec", FALSE, LONG, op1(Ri), 0 }, /*50*/ { "push", FALSE, LONG, op1(Ri), 0 }, /*51*/ { "push", FALSE, LONG, op1(Ri), 0 }, /*52*/ { "push", FALSE, LONG, op1(Ri), 0 }, /*53*/ { "push", FALSE, LONG, op1(Ri), 0 }, /*54*/ { "push", FALSE, LONG, op1(Ri), 0 }, /*55*/ { "push", FALSE, LONG, op1(Ri), 0 }, /*56*/ { "push", FALSE, LONG, op1(Ri), 0 }, /*57*/ { "push", FALSE, LONG, op1(Ri), 0 }, /*58*/ { "pop", FALSE, LONG, op1(Ri), 0 }, /*59*/ { "pop", FALSE, LONG, op1(Ri), 0 }, /*5a*/ { "pop", FALSE, LONG, op1(Ri), 0 }, /*5b*/ { "pop", FALSE, LONG, op1(Ri), 0 }, /*5c*/ { "pop", FALSE, LONG, op1(Ri), 0 }, /*5d*/ { "pop", FALSE, LONG, op1(Ri), 0 }, /*5e*/ { "pop", FALSE, LONG, op1(Ri), 0 }, /*5f*/ { "pop", FALSE, LONG, op1(Ri), 0 }, /*60*/ { "pusha", FALSE, LONG, 0, 0 }, /*61*/ { "popa", FALSE, LONG, 0, 0 }, /*62*/ { "bound", TRUE, LONG, op2(E, R), 0 }, /*63*/ { "arpl", TRUE, NONE, op2(Ew,Rw), 0 }, /*64*/ { "", FALSE, NONE, 0, 0 }, /*65*/ { "", FALSE, NONE, 0, 0 }, /*66*/ { "", FALSE, NONE, 0, 0 }, /*67*/ { "", FALSE, NONE, 0, 0 }, /*68*/ { "push", FALSE, LONG, op1(I), 0 }, /*69*/ { "imul", TRUE, LONG, op3(I,E,R), 0 }, /*6a*/ { "push", FALSE, LONG, op1(Ib), 0 }, /*6b*/ { "imul", TRUE, LONG, op3(Ibs,E,R),0 }, /*6c*/ { "ins", FALSE, BYTE, op2(DX, DI), 0 }, /*6d*/ { "ins", FALSE, LONG, op2(DX, DI), 0 }, /*6e*/ { "outs", FALSE, BYTE, op2(SI, DX), 0 }, /*6f*/ { "outs", FALSE, LONG, op2(SI, DX), 0 }, /*70*/ { "jo", FALSE, NONE, op1(Db), 0 }, /*71*/ { "jno", FALSE, NONE, op1(Db), 0 }, /*72*/ { "jb", FALSE, NONE, op1(Db), 0 }, /*73*/ { "jnb", FALSE, NONE, op1(Db), 0 }, /*74*/ { "jz", FALSE, NONE, op1(Db), 0 }, /*75*/ { "jnz", FALSE, NONE, op1(Db), 0 }, /*76*/ { "jbe", FALSE, NONE, op1(Db), 0 }, /*77*/ { "jnbe", FALSE, NONE, op1(Db), 0 }, /*78*/ { "js", FALSE, NONE, op1(Db), 0 }, /*79*/ { "jns", FALSE, NONE, op1(Db), 0 }, /*7a*/ { "jp", FALSE, NONE, op1(Db), 0 }, /*7b*/ { "jnp", FALSE, NONE, op1(Db), 0 }, /*7c*/ { "jl", FALSE, NONE, op1(Db), 0 }, /*7d*/ { "jnl", FALSE, NONE, op1(Db), 0 }, /*7e*/ { "jle", FALSE, NONE, op1(Db), 0 }, /*7f*/ { "jnle", FALSE, NONE, op1(Db), 0 }, /*80*/ { "", TRUE, BYTE, op2(I, E), (char *)db_Grp1 }, /*81*/ { "", TRUE, LONG, op2(I, E), (char *)db_Grp1 }, /*82*/ { "", TRUE, BYTE, op2(Is,E), (char *)db_Grp1 }, /*83*/ { "", TRUE, LONG, op2(Ibs,E), (char *)db_Grp1 }, /*84*/ { "test", TRUE, BYTE, op2(R, E), 0 }, /*85*/ { "test", TRUE, LONG, op2(R, E), 0 }, /*86*/ { "xchg", TRUE, BYTE, op2(R, E), 0 }, /*87*/ { "xchg", TRUE, LONG, op2(R, E), 0 }, /*88*/ { "mov", TRUE, BYTE, op2(R, E), 0 }, /*89*/ { "mov", TRUE, LONG, op2(R, E), 0 }, /*8a*/ { "mov", TRUE, BYTE, op2(E, R), 0 }, /*8b*/ { "mov", TRUE, LONG, op2(E, R), 0 }, /*8c*/ { "mov", TRUE, NONE, op2(S, Ew), 0 }, /*8d*/ { "lea", TRUE, LONG, op2(E, R), 0 }, /*8e*/ { "mov", TRUE, NONE, op2(Ew, S), 0 }, /*8f*/ { "pop", TRUE, LONG, op1(E), 0 }, /*90*/ { "nop", FALSE, NONE, 0, 0 }, /*91*/ { "xchg", FALSE, LONG, op2(A, Ri), 0 }, /*92*/ { "xchg", FALSE, LONG, op2(A, Ri), 0 }, /*93*/ { "xchg", FALSE, LONG, op2(A, Ri), 0 }, /*94*/ { "xchg", FALSE, LONG, op2(A, Ri), 0 }, /*95*/ { "xchg", FALSE, LONG, op2(A, Ri), 0 }, /*96*/ { "xchg", FALSE, LONG, op2(A, Ri), 0 }, /*97*/ { "xchg", FALSE, LONG, op2(A, Ri), 0 }, /*98*/ { "cbw", FALSE, SDEP, 0, "cwde" }, /* cbw/cwde */ /*99*/ { "cwd", FALSE, SDEP, 0, "cdq" }, /* cwd/cdq */ /*9a*/ { "lcall", FALSE, NONE, op1(OS), 0 }, /*9b*/ { "wait", FALSE, NONE, 0, 0 }, /*9c*/ { "pushf", FALSE, LONG, 0, 0 }, /*9d*/ { "popf", FALSE, LONG, 0, 0 }, /*9e*/ { "sahf", FALSE, NONE, 0, 0 }, /*9f*/ { "lahf", FALSE, NONE, 0, 0 }, /*a0*/ { "mov", FALSE, BYTE, op2(O, A), 0 }, /*a1*/ { "mov", FALSE, LONG, op2(O, A), 0 }, /*a2*/ { "mov", FALSE, BYTE, op2(A, O), 0 }, /*a3*/ { "mov", FALSE, LONG, op2(A, O), 0 }, /*a4*/ { "movs", FALSE, BYTE, op2(SI,DI), 0 }, /*a5*/ { "movs", FALSE, LONG, op2(SI,DI), 0 }, /*a6*/ { "cmps", FALSE, BYTE, op2(SI,DI), 0 }, /*a7*/ { "cmps", FALSE, LONG, op2(SI,DI), 0 }, /*a8*/ { "test", FALSE, BYTE, op2(I, A), 0 }, /*a9*/ { "test", FALSE, LONG, op2(I, A), 0 }, /*aa*/ { "stos", FALSE, BYTE, op1(DI), 0 }, /*ab*/ { "stos", FALSE, LONG, op1(DI), 0 }, /*ac*/ { "lods", FALSE, BYTE, op1(SI), 0 }, /*ad*/ { "lods", FALSE, LONG, op1(SI), 0 }, /*ae*/ { "scas", FALSE, BYTE, op1(DI), 0 }, /*af*/ { "scas", FALSE, LONG, op1(DI), 0 }, /*b0*/ { "mov", FALSE, BYTE, op2(I, Ri), 0 }, /*b1*/ { "mov", FALSE, BYTE, op2(I, Ri), 0 }, /*b2*/ { "mov", FALSE, BYTE, op2(I, Ri), 0 }, /*b3*/ { "mov", FALSE, BYTE, op2(I, Ri), 0 }, /*b4*/ { "mov", FALSE, BYTE, op2(I, Ri), 0 }, /*b5*/ { "mov", FALSE, BYTE, op2(I, Ri), 0 }, /*b6*/ { "mov", FALSE, BYTE, op2(I, Ri), 0 }, /*b7*/ { "mov", FALSE, BYTE, op2(I, Ri), 0 }, /*b8*/ { "mov", FALSE, LONG, op2(I, Ri), 0 }, /*b9*/ { "mov", FALSE, LONG, op2(I, Ri), 0 }, /*ba*/ { "mov", FALSE, LONG, op2(I, Ri), 0 }, /*bb*/ { "mov", FALSE, LONG, op2(I, Ri), 0 }, /*bc*/ { "mov", FALSE, LONG, op2(I, Ri), 0 }, /*bd*/ { "mov", FALSE, LONG, op2(I, Ri), 0 }, /*be*/ { "mov", FALSE, LONG, op2(I, Ri), 0 }, /*bf*/ { "mov", FALSE, LONG, op2(I, Ri), 0 }, /*c0*/ { "", TRUE, BYTE, op2(Ib, E), (char *)db_Grp2 }, /*c1*/ { "", TRUE, LONG, op2(Ib, E), (char *)db_Grp2 }, /*c2*/ { "ret", FALSE, NONE, op1(Iw), 0 }, /*c3*/ { "ret", FALSE, NONE, 0, 0 }, /*c4*/ { "les", TRUE, LONG, op2(E, R), 0 }, /*c5*/ { "lds", TRUE, LONG, op2(E, R), 0 }, /*c6*/ { "mov", TRUE, BYTE, op2(I, E), 0 }, /*c7*/ { "mov", TRUE, LONG, op2(I, E), 0 }, /*c8*/ { "enter", FALSE, NONE, op2(Iw, Ib), 0 }, /*c9*/ { "leave", FALSE, NONE, 0, 0 }, /*ca*/ { "lret", FALSE, NONE, op1(Iw), 0 }, /*cb*/ { "lret", FALSE, NONE, 0, 0 }, /*cc*/ { "int", FALSE, NONE, op1(o3), 0 }, /*cd*/ { "int", FALSE, NONE, op1(Ib), 0 }, /*ce*/ { "into", FALSE, NONE, 0, 0 }, /*cf*/ { "iret", FALSE, NONE, 0, 0 }, /*d0*/ { "", TRUE, BYTE, op2(o1, E), (char *)db_Grp2 }, /*d1*/ { "", TRUE, LONG, op2(o1, E), (char *)db_Grp2 }, /*d2*/ { "", TRUE, BYTE, op2(CL, E), (char *)db_Grp2 }, /*d3*/ { "", TRUE, LONG, op2(CL, E), (char *)db_Grp2 }, /*d4*/ { "aam", TRUE, NONE, 0, 0 }, /*d5*/ { "aad", TRUE, NONE, 0, 0 }, /*d6*/ { "", FALSE, NONE, 0, 0 }, /*d7*/ { "xlat", FALSE, BYTE, op1(BX), 0 }, /*d8*/ { "", TRUE, NONE, 0, (char *)db_Esc8 }, /*d9*/ { "", TRUE, NONE, 0, (char *)db_Esc9 }, /*da*/ { "", TRUE, NONE, 0, (char *)db_Esca }, /*db*/ { "", TRUE, NONE, 0, (char *)db_Escb }, /*dc*/ { "", TRUE, NONE, 0, (char *)db_Escc }, /*dd*/ { "", TRUE, NONE, 0, (char *)db_Escd }, /*de*/ { "", TRUE, NONE, 0, (char *)db_Esce }, /*df*/ { "", TRUE, NONE, 0, (char *)db_Escf }, /*e0*/ { "loopne",FALSE, NONE, op1(Db), 0 }, /*e1*/ { "loope", FALSE, NONE, op1(Db), 0 }, /*e2*/ { "loop", FALSE, NONE, op1(Db), 0 }, /*e3*/ { "jcxz", FALSE, SDEP, op1(Db), "jecxz" }, /*e4*/ { "in", FALSE, BYTE, op2(Ib, A), 0 }, /*e5*/ { "in", FALSE, LONG, op2(Ib, A) , 0 }, /*e6*/ { "out", FALSE, BYTE, op2(A, Ib), 0 }, /*e7*/ { "out", FALSE, LONG, op2(A, Ib) , 0 }, /*e8*/ { "call", FALSE, NONE, op1(Dl), 0 }, /*e9*/ { "jmp", FALSE, NONE, op1(Dl), 0 }, /*ea*/ { "ljmp", FALSE, NONE, op1(OS), 0 }, /*eb*/ { "jmp", FALSE, NONE, op1(Db), 0 }, /*ec*/ { "in", FALSE, BYTE, op2(DX, A), 0 }, /*ed*/ { "in", FALSE, LONG, op2(DX, A) , 0 }, /*ee*/ { "out", FALSE, BYTE, op2(A, DX), 0 }, /*ef*/ { "out", FALSE, LONG, op2(A, DX) , 0 }, /*f0*/ { "", FALSE, NONE, 0, 0 }, /*f1*/ { "", FALSE, NONE, 0, 0 }, /*f2*/ { "", FALSE, NONE, 0, 0 }, /*f3*/ { "", FALSE, NONE, 0, 0 }, /*f4*/ { "hlt", FALSE, NONE, 0, 0 }, /*f5*/ { "cmc", FALSE, NONE, 0, 0 }, /*f6*/ { "", TRUE, BYTE, 0, (char *)db_Grp3 }, /*f7*/ { "", TRUE, LONG, 0, (char *)db_Grp3 }, /*f8*/ { "clc", FALSE, NONE, 0, 0 }, /*f9*/ { "stc", FALSE, NONE, 0, 0 }, /*fa*/ { "cli", FALSE, NONE, 0, 0 }, /*fb*/ { "sti", FALSE, NONE, 0, 0 }, /*fc*/ { "cld", FALSE, NONE, 0, 0 }, /*fd*/ { "std", FALSE, NONE, 0, 0 }, /*fe*/ { "", TRUE, NONE, 0, (char *)db_Grp4 }, /*ff*/ { "", TRUE, NONE, 0, (char *)db_Grp5 }, }; static const struct inst db_bad_inst = { "???", FALSE, NONE, 0, 0 } ; #define f_mod(byte) ((byte)>>6) #define f_reg(byte) (((byte)>>3)&0x7) #define f_rm(byte) ((byte)&0x7) #define sib_ss(byte) ((byte)>>6) #define sib_index(byte) (((byte)>>3)&0x7) #define sib_base(byte) ((byte)&0x7) struct i_addr { int is_reg; /* if reg, reg number is in 'disp' */ int disp; const char * base; const char * index; int ss; }; static const char * const db_index_reg_16[8] = { "%bx,%si", "%bx,%di", "%bp,%si", "%bp,%di", "%si", "%di", "%bp", "%bx" }; static const char * const db_reg[3][8] = { { "%al", "%cl", "%dl", "%bl", "%ah", "%ch", "%dh", "%bh" }, { "%ax", "%cx", "%dx", "%bx", "%sp", "%bp", "%si", "%di" }, { "%eax", "%ecx", "%edx", "%ebx", "%esp", "%ebp", "%esi", "%edi" } }; static const char * const db_seg_reg[8] = { "%es", "%cs", "%ss", "%ds", "%fs", "%gs", "", "" }; /* * lengths for size attributes */ static const int db_lengths[] = { 1, /* BYTE */ 2, /* WORD */ 4, /* LONG */ 8, /* QUAD */ 4, /* SNGL */ 8, /* DBLR */ 10, /* EXTR */ }; static unsigned int db_get_task_value( const DBG_ADDR *addr, int size, int is_signed ) { unsigned int result = 0; char buffer[4]; if (size != 1 && size != 2 && size != 4) { DEBUG_Printf(DBG_CHN_MESG, "Illegal size specified\n"); } else { DEBUG_READ_MEM((void*)DEBUG_ToLinear( addr ), buffer, size); switch(size) { case 4: if (is_signed) result = (unsigned int) *(int *)buffer; else result = *(unsigned int *)buffer; break; case 2: if (is_signed) result = (unsigned int) *(short int *)buffer; else result = *(unsigned short int *)buffer; break; case 1: if (is_signed) result = (unsigned int) *(char *)buffer; else result = *(unsigned char *)buffer; break; } } return result; } #define get_value_inc(result, addr, size, is_signed) \ result = db_get_task_value((addr), (size), (is_signed)); \ if (!db_disasm_16) (addr)->off += (size); \ else (addr)->off = ((addr)->off + (size)) & 0xffff; /* * Read address at location and return updated location. */ void db_read_address( DBG_ADDR *addr, int short_addr, int regmodrm, struct i_addr *addrp ) { int mod, rm, sib, index, disp; mod = f_mod(regmodrm); rm = f_rm(regmodrm); if (mod == 3) { addrp->is_reg = TRUE; addrp->disp = rm; return; } addrp->is_reg = FALSE; addrp->index = 0; if (short_addr) { addrp->index = 0; addrp->ss = 0; switch (mod) { case 0: if (rm == 6) { get_value_inc(disp, addr, 2, TRUE); addrp->disp = disp; addrp->base = 0; } else { addrp->disp = 0; addrp->base = db_index_reg_16[rm]; } break; case 1: get_value_inc(disp, addr, 1, TRUE); addrp->disp = disp; addrp->base = db_index_reg_16[rm]; break; case 2: get_value_inc(disp, addr, 2, TRUE); addrp->disp = disp; addrp->base = db_index_reg_16[rm]; break; } } else { if (mod != 3 && rm == 4) { get_value_inc(sib, addr, 1, FALSE); rm = sib_base(sib); index = sib_index(sib); if (index != 4) addrp->index = db_reg[LONG][index]; addrp->ss = sib_ss(sib); } switch (mod) { case 0: if (rm == 5) { get_value_inc(addrp->disp, addr, 4, FALSE); addrp->base = 0; } else { addrp->disp = 0; addrp->base = db_reg[LONG][rm]; } break; case 1: get_value_inc(disp, addr, 1, TRUE); addrp->disp = disp; addrp->base = db_reg[LONG][rm]; break; case 2: get_value_inc(disp, addr, 4, FALSE); addrp->disp = disp; addrp->base = db_reg[LONG][rm]; break; } } } static void db_task_printsym(unsigned int addr, int size) { DBG_ADDR address; address.seg = 0; address.off = addr; DEBUG_PrintAddress( &address, db_disasm_16 ? 16 : 32, TRUE ); } void db_print_address(char *seg, int size, struct i_addr *addrp, int byref) { if (addrp->is_reg) { DEBUG_Printf(DBG_CHN_MESG,"%s", db_reg[size][addrp->disp]); return; } if (seg) { DEBUG_Printf(DBG_CHN_MESG,"%s:", seg); } if (addrp->base != 0 || addrp->index != 0) { DEBUG_Printf(DBG_CHN_MESG,"0x%x(", addrp->disp); if (addrp->base) DEBUG_Printf(DBG_CHN_MESG,"%s", addrp->base); if (addrp->index) DEBUG_Printf(DBG_CHN_MESG,",%s,%d", addrp->index, 1<ss); DEBUG_Printf(DBG_CHN_MESG,")"); } else { /* try to get destination of indirect call does not work for segmented adresses */ if (!seg && byref) { void* a1; void* a2; DEBUG_Printf(DBG_CHN_MESG,"0x%x -> ", addrp->disp); if (!DEBUG_READ_MEM((void*)addrp->disp, &a1, sizeof(a1))) { DEBUG_Printf(DBG_CHN_MESG, "(invalid source)"); } else if (!DEBUG_READ_MEM(a1, &a2, sizeof(a2))) { DEBUG_Printf(DBG_CHN_MESG, "(invalid destination)"); } else { db_task_printsym((unsigned long)a1, 0); } } else db_task_printsym(addrp->disp, size); } } /* * Disassemble floating-point ("escape") instruction * and return updated location. */ void db_disasm_esc( DBG_ADDR *addr, int inst, int short_addr, int size, char *seg ) { int regmodrm; const struct finst *fp; int mod; struct i_addr address; const char * name; get_value_inc(regmodrm, addr, 1, FALSE); if( !db_display ) { return; } fp = &db_Esc_inst[inst - 0xd8][f_reg(regmodrm)]; mod = f_mod(regmodrm); if (mod != 3) { /* * Normal address modes. */ db_read_address( addr, short_addr, regmodrm, &address); DEBUG_Printf(DBG_CHN_MESG,fp->f_name); switch(fp->f_size) { case SNGL: DEBUG_Printf(DBG_CHN_MESG,"s"); break; case DBLR: DEBUG_Printf(DBG_CHN_MESG,"l"); break; case EXTR: DEBUG_Printf(DBG_CHN_MESG,"t"); break; case WORD: DEBUG_Printf(DBG_CHN_MESG,"s"); break; case LONG: DEBUG_Printf(DBG_CHN_MESG,"l"); break; case QUAD: DEBUG_Printf(DBG_CHN_MESG,"q"); break; default: break; } DEBUG_Printf(DBG_CHN_MESG,"\t"); db_print_address(seg, BYTE, &address, 0); } else { /* * 'reg-reg' - special formats */ switch (fp->f_rrmode) { case op2(ST,STI): name = (fp->f_rrname) ? fp->f_rrname : fp->f_name; DEBUG_Printf(DBG_CHN_MESG,"%s\t%%st,%%st(%d)",name,f_rm(regmodrm)); break; case op2(STI,ST): name = (fp->f_rrname) ? fp->f_rrname : fp->f_name; DEBUG_Printf(DBG_CHN_MESG,"%s\t%%st(%d),%%st",name, f_rm(regmodrm)); break; case op1(STI): name = (fp->f_rrname) ? fp->f_rrname : fp->f_name; DEBUG_Printf(DBG_CHN_MESG,"%s\t%%st(%d)",name, f_rm(regmodrm)); break; case op1(X): DEBUG_Printf(DBG_CHN_MESG,"%s", ((char **)fp->f_rrname)[f_rm(regmodrm)]); break; case op1(XA): DEBUG_Printf(DBG_CHN_MESG,"%s\t%%ax", ((char **)fp->f_rrname)[f_rm(regmodrm)]); break; default: DEBUG_Printf(DBG_CHN_MESG,""); break; } } } /*********************************************************************** * DEBUG_Disasm * * Disassemble instruction at 'addr'. addr is changed to point to the * start of the next instruction. */ void DEBUG_Disasm( DBG_ADDR *addr, int display ) { int inst; int size; int short_addr; char * seg; const struct inst *ip; const char *i_name; int i_size; int i_mode; int regmodrm = 0; BOOL first; int displ; int prefix; int imm; int len; struct i_addr address; /* * Set this so we get can supress the printout if we need to. */ db_display = display; switch (DEBUG_GetSelectorType(addr->seg)) { case 16: db_disasm_16 = 1; break; case 32: db_disasm_16 = 0; break; default: DEBUG_Printf(DBG_CHN_MESG, "Bad selector %ld\n", addr->seg); return; } get_value_inc( inst, addr, 1, FALSE ); if (db_disasm_16) { short_addr = TRUE; size = WORD; } else { short_addr = FALSE; size = LONG; } seg = 0; /* * Get prefixes */ prefix = TRUE; do { switch (inst) { case 0x66: /* data16 */ if (size == LONG) size = WORD; else size = LONG; break; case 0x67: short_addr = !short_addr; break; case 0x26: seg = "%es"; break; case 0x36: seg = "%ss"; break; case 0x2e: seg = "%cs"; break; case 0x3e: seg = "%ds"; break; case 0x64: seg = "%fs"; break; case 0x65: seg = "%gs"; break; case 0xf0: if( db_display ) DEBUG_Printf(DBG_CHN_MESG,"lock "); break; case 0xf2: if( db_display ) DEBUG_Printf(DBG_CHN_MESG,"repne "); break; case 0xf3: if( db_display ) DEBUG_Printf(DBG_CHN_MESG,"repe "); /* XXX repe VS rep */ break; default: prefix = FALSE; break; } if (prefix) { get_value_inc(inst, addr, 1, FALSE); } } while (prefix); if (inst >= 0xd8 && inst <= 0xdf) { db_disasm_esc( addr, inst, short_addr, size, seg); return; } if (inst == 0x0f) { get_value_inc(inst, addr, 1, FALSE); ip = db_inst_0f[inst>>4]; if (ip == 0) { ip = &db_bad_inst; } else { ip = &ip[inst&0xf]; } } else ip = &db_inst_table[inst]; if (ip->i_has_modrm) { get_value_inc(regmodrm, addr, 1, FALSE); db_read_address( addr, short_addr, regmodrm, &address); } i_name = ip->i_name; i_size = ip->i_size; i_mode = ip->i_mode; if (ip->i_extra == (char *)db_Grp1 || ip->i_extra == (char *)db_Grp2 || ip->i_extra == (char *)db_Grp6 || ip->i_extra == (char *)db_Grp7 || ip->i_extra == (char *)db_Grp8) { i_name = ((char **)ip->i_extra)[f_reg(regmodrm)]; } else if (ip->i_extra == (char *)db_Grp3) { ip = (struct inst *)ip->i_extra; ip = &ip[f_reg(regmodrm)]; i_name = ip->i_name; i_mode = ip->i_mode; } else if (ip->i_extra == (char *)db_Grp4 || ip->i_extra == (char *)db_Grp5) { ip = (struct inst *)ip->i_extra; ip = &ip[f_reg(regmodrm)]; i_name = ip->i_name; i_mode = ip->i_mode; i_size = ip->i_size; } if (i_size == SDEP) { if( db_display ) { if (size == WORD) DEBUG_Printf(DBG_CHN_MESG,i_name); else DEBUG_Printf(DBG_CHN_MESG,ip->i_extra); } } else { if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,i_name); } if (i_size != NONE) { if (i_size == BYTE) { if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"b"); } size = BYTE; } else if (i_size == WORD) { if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"w"); } size = WORD; } else if (size == WORD) { if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"w"); } } else { if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"l"); } } } } if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"\t"); } for (first = TRUE; i_mode != 0; i_mode >>= 8, first = FALSE) { if (!first && db_display) DEBUG_Printf(DBG_CHN_MESG,","); switch (i_mode & 0xFF) { case E: if( db_display ) { db_print_address(seg, size, &address, 0); } break; case Eind: if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"*"); db_print_address(seg, size, &address, 1); } break; case Ew: if( db_display ) { db_print_address(seg, WORD, &address, 0); } break; case Eb: if( db_display ) { db_print_address(seg, BYTE, &address, 0); } break; case R: if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"%s", db_reg[size][f_reg(regmodrm)]); } break; case Rw: if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"%s", db_reg[WORD][f_reg(regmodrm)]); } break; case Ri: if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"%s", db_reg[size][f_rm(inst)]); } break; case S: if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"%s", db_seg_reg[f_reg(regmodrm)]); } break; case Si: if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"%s", db_seg_reg[f_reg(inst)]); } break; case A: if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"%s", db_reg[size][0]); /* acc */ } break; case BX: if( db_display ) { if (seg) DEBUG_Printf(DBG_CHN_MESG,"%s:", seg); DEBUG_Printf(DBG_CHN_MESG,"(%s)", short_addr ? "%bx" : "%ebx"); } break; case CL: if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"%%cl"); } break; case DX: if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"%%dx"); } break; case SI: if( db_display ) { if (seg) DEBUG_Printf(DBG_CHN_MESG,"%s:", seg); DEBUG_Printf(DBG_CHN_MESG,"(%s)", short_addr ? "%si" : "%esi"); } break; case DI: if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"%%es:(%s)", short_addr ? "%di" : "%edi"); } break; case CR: if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"%%cr%d", f_reg(regmodrm)); } break; case DR: if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"%%dr%d", f_reg(regmodrm)); } break; case TR: if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"%%tr%d", f_reg(regmodrm)); } break; case I: len = db_lengths[size]; get_value_inc(imm, addr, len, FALSE);/* unsigned */ if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"$0x%x", imm); } break; case Is: len = db_lengths[size]; get_value_inc(imm, addr, len, TRUE); /* signed */ if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"$%d", imm); } break; case Ib: get_value_inc(imm, addr, 1, FALSE); /* unsigned */ if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"$0x%x", imm); } break; case Ibs: get_value_inc(imm, addr, 1, TRUE); /* signed */ if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"$%d", imm); } break; case Iw: get_value_inc(imm, addr, 2, FALSE); /* unsigned */ if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"$0x%x", imm); } break; case Il: get_value_inc(imm, addr, 4, FALSE); if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"$0x%x", imm); } break; case O: if (short_addr) { get_value_inc(displ, addr, 2, TRUE); } else { get_value_inc(displ, addr, 4, TRUE); } if( !db_display ) { break; } if (seg) DEBUG_Printf(DBG_CHN_MESG,"%s:0x%x",seg, displ); else db_task_printsym(displ, short_addr ? WORD : LONG); break; case Db: get_value_inc(displ, addr, 1, TRUE); if( !db_display ) { break; } if (size == WORD) { /* offset only affects low 16 bits */ displ = (addr->off & 0xffff0000) | ((addr->off + displ) & 0xffff); } else displ += addr->off; db_task_printsym(displ, size); break; case Dl: if (size == WORD) { get_value_inc(displ, addr, 2, TRUE); /* offset only affects low 16 bits */ displ = (addr->off & 0xffff0000) | ((addr->off + displ) & 0xffff); } else { get_value_inc(displ, addr, 4, TRUE); displ += addr->off; } if( !db_display ) { break; } db_task_printsym( displ, size ); break; case o1: if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"$1"); } break; case o3: if( db_display ) { DEBUG_Printf(DBG_CHN_MESG,"$3"); } break; case OS: { DBG_ADDR address; get_value_inc( address.off, addr, /* offset */ short_addr ? 2 : 4, FALSE ); get_value_inc( address.seg, addr, /* segment */ 2, FALSE ); if( db_display ) { DEBUG_PrintAddress( &address, short_addr ? 16 : 32, TRUE ); } } break; } } } #else /* __i386__ */ void DEBUG_Disasm( DBG_ADDR *addr, int display ) { } #endif /* __i386__ */ wine-20000526/debugger/dbg.y0100644000175000001440000005106407106624617015173 0ustar julliardusers%{ /* * Parser for command lines in the Wine debugger * * Copyright 1993 Eric Youngdale * Copyright 1995 Morten Welinder * Copyright 2000 Eric Pouech */ #include "config.h" #include #include #include #include #include #include "wine/exception.h" #include "debugger.h" #include "expr.h" #include "task.h" extern FILE * yyin; int curr_frame = 0; static void issue_prompt(void); static void mode_command(int); int yylex(void); int yyerror(char *); %} %union { DBG_VALUE value; char * string; int integer; struct list_id listing; struct expr * expression; struct datatype * type; } %token tCONT tPASS tSTEP tLIST tNEXT tQUIT tHELP tBACKTRACE tINFO tWALK tUP tDOWN %token tENABLE tDISABLE tBREAK tWATCH tDELETE tSET tMODE tPRINT tEXAM tABORT %token tCLASS tMAPS tMODULE tSTACK tSEGMENTS tREGS tWND tQUEUE tLOCAL %token tPROCESS tTHREAD tMODREF %token tEOL tSTRING tDEBUGSTR %token tFRAME tSHARE tCOND tDISPLAY tUNDISPLAY tDISASSEMBLE %token tSTEPI tNEXTI tFINISH tSHOW tDIR tWHATIS %token tPATH %token tIDENTIFIER tSTRING tDEBUGSTR tINTVAR %token tNUM tFORMAT %token tSYMBOLFILE %token tCHAR tSHORT tINT tLONG tFLOAT tDOUBLE tUNSIGNED tSIGNED %token tSTRUCT tUNION tENUM /* %left ',' */ /* %left '=' OP_OR_EQUAL OP_XOR_EQUAL OP_AND_EQUAL OP_SHL_EQUAL \ OP_SHR_EQUAL OP_PLUS_EQUAL OP_MINUS_EQUAL \ OP_TIMES_EQUAL OP_DIVIDE_EQUAL OP_MODULO_EQUAL */ /* %left OP_COND */ /* ... ? ... : ... */ %left OP_LOR %left OP_LAND %left '|' %left '^' %left '&' %left OP_EQ OP_NE %left '<' '>' OP_LE OP_GE %left OP_SHL OP_SHR %left '+' '-' %left '*' '/' '%' %left OP_SIGN '!' '~' OP_DEREF /* OP_INC OP_DEC OP_ADDR */ %left '.' '[' OP_DRF %nonassoc ':' %type expr lval lvalue %type type_cast type_expr %type expr_addr lval_addr %type expr_value %type pathname %type list_arg %% input: line { issue_prompt(); } | input line { issue_prompt(); } line: command | tEOL | error tEOL { yyerrok; } command: tQUIT tEOL { DEBUG_CurrThread->dbg_exec_count = 1; DEBUG_CurrThread->dbg_exec_mode = EXEC_KILL; return 1; } | tHELP tEOL { DEBUG_Help(); } | tHELP tINFO tEOL { DEBUG_HelpInfo(); } | tCONT tEOL { DEBUG_CurrThread->dbg_exec_count = 1; DEBUG_CurrThread->dbg_exec_mode = EXEC_CONT; return 0; } | tPASS tEOL { DEBUG_CurrThread->dbg_exec_count = 1; DEBUG_CurrThread->dbg_exec_mode = EXEC_PASS; return 0; } | tCONT tNUM tEOL { DEBUG_CurrThread->dbg_exec_count = $2; DEBUG_CurrThread->dbg_exec_mode = EXEC_CONT; return 0; } | tSTEP tEOL { DEBUG_CurrThread->dbg_exec_count = 1; DEBUG_CurrThread->dbg_exec_mode = EXEC_STEP_INSTR; return 0; } | tNEXT tEOL { DEBUG_CurrThread->dbg_exec_count = 1; DEBUG_CurrThread->dbg_exec_mode = EXEC_STEP_OVER; return 0; } | tSTEP tNUM tEOL { DEBUG_CurrThread->dbg_exec_count = $2; DEBUG_CurrThread->dbg_exec_mode = EXEC_STEP_INSTR; return 0; } | tNEXT tNUM tEOL { DEBUG_CurrThread->dbg_exec_count = $2; DEBUG_CurrThread->dbg_exec_mode = EXEC_STEP_OVER; return 0; } | tSTEPI tEOL { DEBUG_CurrThread->dbg_exec_count = 1; DEBUG_CurrThread->dbg_exec_mode = EXEC_STEPI_INSTR; return 0; } | tNEXTI tEOL { DEBUG_CurrThread->dbg_exec_count = 1; DEBUG_CurrThread->dbg_exec_mode = EXEC_STEPI_OVER; return 0; } | tSTEPI tNUM tEOL { DEBUG_CurrThread->dbg_exec_count = $2; DEBUG_CurrThread->dbg_exec_mode = EXEC_STEPI_INSTR; return 0; } | tNEXTI tNUM tEOL { DEBUG_CurrThread->dbg_exec_count = $2; DEBUG_CurrThread->dbg_exec_mode = EXEC_STEPI_OVER; return 0; } | tABORT tEOL { kill(getpid(), SIGABRT); } | tMODE tNUM tEOL { mode_command($2); } | tENABLE tNUM tEOL { DEBUG_EnableBreakpoint( $2, TRUE ); } | tDISABLE tNUM tEOL { DEBUG_EnableBreakpoint( $2, FALSE ); } | tDELETE tBREAK tNUM tEOL { DEBUG_DelBreakpoint( $3 ); } | tBACKTRACE tEOL { DEBUG_BackTrace(TRUE); } | tUP tEOL { DEBUG_SetFrame( curr_frame + 1 ); } | tUP tNUM tEOL { DEBUG_SetFrame( curr_frame + $2 ); } | tDOWN tEOL { DEBUG_SetFrame( curr_frame - 1 ); } | tDOWN tNUM tEOL { DEBUG_SetFrame( curr_frame - $2 ); } | tFRAME tNUM tEOL { DEBUG_SetFrame( $2 ); } | tFINISH tEOL { DEBUG_CurrThread->dbg_exec_count = 0; DEBUG_CurrThread->dbg_exec_mode = EXEC_FINISH; return 0; } | tSHOW tDIR tEOL { DEBUG_ShowDir(); } | tDIR pathname tEOL { DEBUG_AddPath( $2 ); } | tDIR tEOL { DEBUG_NukePath(); } | tDISPLAY tEOL { DEBUG_InfoDisplay(); } | tDISPLAY expr tEOL { DEBUG_AddDisplay($2, 1, 0); } | tDISPLAY tFORMAT expr tEOL { DEBUG_AddDisplay($3, $2 >> 8, $2 & 0xff); } | tDELETE tDISPLAY tNUM tEOL { DEBUG_DelDisplay( $3 ); } | tDELETE tDISPLAY tEOL { DEBUG_DelDisplay( -1 ); } | tUNDISPLAY tNUM tEOL { DEBUG_DelDisplay( $2 ); } | tUNDISPLAY tEOL { DEBUG_DelDisplay( -1 ); } | tCOND tNUM tEOL { DEBUG_AddBPCondition($2, NULL); } | tCOND tNUM expr tEOL { DEBUG_AddBPCondition($2, $3); } | tSYMBOLFILE pathname tEOL{ DEBUG_ReadSymbolTable($2); } | tWHATIS expr_addr tEOL { DEBUG_PrintType(&$2); DEBUG_FreeExprMem(); } | list_command | disassemble_command | set_command | x_command | print_command | break_command | watch_command | info_command | walk_command set_command: tSET lval_addr '=' expr_value tEOL { DEBUG_WriteMemory( &$2, $4 ); DEBUG_FreeExprMem(); } pathname: tIDENTIFIER { $$ = $1; } | tPATH { $$ = $1; } disassemble_command: tDISASSEMBLE tEOL { DEBUG_Disassemble( NULL, NULL, 10 ); } | tDISASSEMBLE expr_addr tEOL { DEBUG_Disassemble( & $2, NULL, 10 ); } | tDISASSEMBLE expr_addr ',' expr_addr tEOL { DEBUG_Disassemble( & $2, & $4, 0 ); } list_command: tLIST tEOL { DEBUG_List( NULL, NULL, 10 ); } | tLIST '-' tEOL { DEBUG_List( NULL, NULL, -10 ); } | tLIST list_arg tEOL { DEBUG_List( & $2, NULL, 10 ); } | tLIST ',' list_arg tEOL { DEBUG_List( NULL, & $3, -10 ); } | tLIST list_arg ',' list_arg tEOL { DEBUG_List( & $2, & $4, 0 ); } list_arg: tNUM { $$.sourcefile = NULL; $$.line = $1; } | pathname ':' tNUM { $$.sourcefile = $1; $$.line = $3; } | tIDENTIFIER { DEBUG_GetFuncInfo( & $$, NULL, $1); } | pathname ':' tIDENTIFIER { DEBUG_GetFuncInfo( & $$, $1, $3); } | '*' expr_addr { DEBUG_FindNearestSymbol( & $2.addr, FALSE, NULL, 0, & $$ ); DEBUG_FreeExprMem(); } x_command: tEXAM expr_addr tEOL { DEBUG_ExamineMemory( &$2, 1, 'x'); DEBUG_FreeExprMem(); } | tEXAM tFORMAT expr_addr tEOL { DEBUG_ExamineMemory( &$3, $2>>8, $2&0xff ); DEBUG_FreeExprMem(); } print_command: tPRINT expr_addr tEOL { DEBUG_Print( &$2, 1, 0, 0 ); DEBUG_FreeExprMem(); } | tPRINT tFORMAT expr_addr tEOL { DEBUG_Print( &$3, $2 >> 8, $2 & 0xff, 0 ); DEBUG_FreeExprMem(); } break_command: tBREAK '*' expr_addr tEOL { DEBUG_AddBreakpoint( &$3, NULL ); DEBUG_FreeExprMem(); } | tBREAK tIDENTIFIER tEOL { DBG_VALUE value; if( DEBUG_GetSymbolValue($2, -1, &value, TRUE) ) { DEBUG_AddBreakpoint( &value, NULL ); } else { DEBUG_Printf(DBG_CHN_MESG,"Unable to add breakpoint\n"); } } | tBREAK tIDENTIFIER ':' tNUM tEOL { DBG_VALUE value; if( DEBUG_GetSymbolValue($2, $4, &value, TRUE) ) { DEBUG_AddBreakpoint( &value, NULL ); } else { DEBUG_Printf(DBG_CHN_MESG,"Unable to add breakpoint\n"); } } | tBREAK tNUM tEOL { struct name_hash *nh; DBG_VALUE value; DEBUG_GetCurrentAddress( &value.addr ); DEBUG_FindNearestSymbol(&value.addr, TRUE, &nh, 0, NULL); if( nh != NULL ) { DEBUG_GetLineNumberAddr(nh, $2, &value.addr, TRUE); value.type = NULL; value.cookie = DV_TARGET; DEBUG_AddBreakpoint( &value, NULL ); } else { DEBUG_Printf(DBG_CHN_MESG,"Unable to add breakpoint\n"); } } | tBREAK tEOL { DBG_VALUE value; DEBUG_GetCurrentAddress( &value.addr ); value.type = NULL; value.cookie = DV_TARGET; DEBUG_AddBreakpoint( &value, NULL ); } watch_command: tWATCH '*' expr_addr tEOL { DEBUG_AddWatchpoint( &$3, 1 ); DEBUG_FreeExprMem(); } | tWATCH tIDENTIFIER tEOL { DBG_VALUE value; if( DEBUG_GetSymbolValue($2, -1, &value, TRUE) ) DEBUG_AddWatchpoint( &value, 1 ); else DEBUG_Printf(DBG_CHN_MESG,"Unable to add breakpoint\n"); } info_command: tINFO tBREAK tEOL { DEBUG_InfoBreakpoints(); } | tINFO tCLASS tSTRING tEOL { DEBUG_InfoClass( $3 ); DEBUG_FreeExprMem(); } | tINFO tSHARE tEOL { DEBUG_InfoShare(); } | tINFO tMODULE expr_value tEOL { DEBUG_DumpModule( $3 ); DEBUG_FreeExprMem(); } | tINFO tQUEUE expr_value tEOL { DEBUG_DumpQueue( $3 ); DEBUG_FreeExprMem(); } | tINFO tREGS tEOL { DEBUG_InfoRegisters(); } | tINFO tSEGMENTS expr_value tEOL { DEBUG_InfoSegments( $3, 1 ); DEBUG_FreeExprMem(); } | tINFO tSEGMENTS tEOL { DEBUG_InfoSegments( 0, -1 ); } | tINFO tSTACK tEOL { DEBUG_InfoStack(); } | tINFO tMAPS tEOL { DEBUG_InfoVirtual(); } | tINFO tWND expr_value tEOL { DEBUG_InfoWindow( (HWND)$3 ); DEBUG_FreeExprMem(); } | tINFO tLOCAL tEOL { DEBUG_InfoLocals(); } | tINFO tDISPLAY tEOL { DEBUG_InfoDisplay(); } walk_command: tWALK tCLASS tEOL { DEBUG_WalkClasses(); } | tWALK tMODULE tEOL { DEBUG_WalkModules(); } | tWALK tQUEUE tEOL { DEBUG_WalkQueues(); } | tWALK tWND tEOL { DEBUG_WalkWindows( 0, 0 ); } | tWALK tWND tNUM tEOL { DEBUG_WalkWindows( $3, 0 ); } | tWALK tPROCESS tEOL { DEBUG_WalkProcess(); } | tWALK tTHREAD tEOL { DEBUG_WalkThreads(); } | tWALK tMODREF expr_value tEOL { DEBUG_WalkModref( $3 ); } type_cast: '(' type_expr ')' { $$ = $2; } type_expr: type_expr '*' { $$ = DEBUG_FindOrMakePointerType($1); } | tINT { $$ = DEBUG_TypeCast(DT_BASIC, "int"); } | tCHAR { $$ = DEBUG_TypeCast(DT_BASIC, "char"); } | tLONG tINT { $$ = DEBUG_TypeCast(DT_BASIC, "long int"); } | tUNSIGNED tINT { $$ = DEBUG_TypeCast(DT_BASIC, "unsigned int"); } | tLONG tUNSIGNED tINT { $$ = DEBUG_TypeCast(DT_BASIC, "long unsigned int"); } | tLONG tLONG tINT { $$ = DEBUG_TypeCast(DT_BASIC, "long long int"); } | tLONG tLONG tUNSIGNED tINT { $$ = DEBUG_TypeCast(DT_BASIC, "long long unsigned int"); } | tSHORT tINT { $$ = DEBUG_TypeCast(DT_BASIC, "short int"); } | tSHORT tUNSIGNED tINT { $$ = DEBUG_TypeCast(DT_BASIC, "short unsigned int"); } | tSIGNED tCHAR { $$ = DEBUG_TypeCast(DT_BASIC, "signed char"); } | tUNSIGNED tCHAR { $$ = DEBUG_TypeCast(DT_BASIC, "unsigned char"); } | tFLOAT { $$ = DEBUG_TypeCast(DT_BASIC, "float"); } | tDOUBLE { $$ = DEBUG_TypeCast(DT_BASIC, "double"); } | tLONG tDOUBLE { $$ = DEBUG_TypeCast(DT_BASIC, "long double"); } | tSTRUCT tIDENTIFIER { $$ = DEBUG_TypeCast(DT_STRUCT, $2); } | tUNION tIDENTIFIER { $$ = DEBUG_TypeCast(DT_STRUCT, $2); } | tENUM tIDENTIFIER { $$ = DEBUG_TypeCast(DT_ENUM, $2); } expr_addr: expr { $$ = DEBUG_EvalExpr($1); } expr_value: expr { DBG_VALUE value = DEBUG_EvalExpr($1); /* expr_value is typed as an integer */ $$ = DEBUG_ReadMemory(&value); } /* * The expr rule builds an expression tree. When we are done, we call * EvalExpr to evaluate the value of the expression. The advantage of * the two-step approach is that it is possible to save expressions for * use in 'display' commands, and in conditional watchpoints. */ expr: tNUM { $$ = DEBUG_ConstExpr($1); } | tSTRING { $$ = DEBUG_StringExpr($1); } | tINTVAR { $$ = DEBUG_IntVarExpr($1); } | tIDENTIFIER { $$ = DEBUG_SymbolExpr($1); } | expr OP_DRF tIDENTIFIER { $$ = DEBUG_StructPExpr($1, $3); } | expr '.' tIDENTIFIER { $$ = DEBUG_StructExpr($1, $3); } | tIDENTIFIER '(' ')' { $$ = DEBUG_CallExpr($1, 0); } | tIDENTIFIER '(' expr ')' { $$ = DEBUG_CallExpr($1, 1, $3); } | tIDENTIFIER '(' expr ',' expr ')' { $$ = DEBUG_CallExpr($1, 2, $3, $5); } | tIDENTIFIER '(' expr ',' expr ',' expr ')' { $$ = DEBUG_CallExpr($1, 3, $3, $5, $7); } | tIDENTIFIER '(' expr ',' expr ',' expr ',' expr ')' { $$ = DEBUG_CallExpr($1, 4, $3, $5, $7, $9); } | tIDENTIFIER '(' expr ',' expr ',' expr ',' expr ',' expr ')' { $$ = DEBUG_CallExpr($1, 5, $3, $5, $7, $9, $11); } | expr '[' expr ']' { $$ = DEBUG_BinopExpr(EXP_OP_ARR, $1, $3); } | expr ':' expr { $$ = DEBUG_BinopExpr(EXP_OP_SEG, $1, $3); } | expr OP_LOR expr { $$ = DEBUG_BinopExpr(EXP_OP_LOR, $1, $3); } | expr OP_LAND expr { $$ = DEBUG_BinopExpr(EXP_OP_LAND, $1, $3); } | expr '|' expr { $$ = DEBUG_BinopExpr(EXP_OP_OR, $1, $3); } | expr '&' expr { $$ = DEBUG_BinopExpr(EXP_OP_AND, $1, $3); } | expr '^' expr { $$ = DEBUG_BinopExpr(EXP_OP_XOR, $1, $3); } | expr OP_EQ expr { $$ = DEBUG_BinopExpr(EXP_OP_EQ, $1, $3); } | expr '>' expr { $$ = DEBUG_BinopExpr(EXP_OP_GT, $1, $3); } | expr '<' expr { $$ = DEBUG_BinopExpr(EXP_OP_LT, $1, $3); } | expr OP_GE expr { $$ = DEBUG_BinopExpr(EXP_OP_GE, $1, $3); } | expr OP_LE expr { $$ = DEBUG_BinopExpr(EXP_OP_LE, $1, $3); } | expr OP_NE expr { $$ = DEBUG_BinopExpr(EXP_OP_NE, $1, $3); } | expr OP_SHL expr { $$ = DEBUG_BinopExpr(EXP_OP_SHL, $1, $3); } | expr OP_SHR expr { $$ = DEBUG_BinopExpr(EXP_OP_SHR, $1, $3); } | expr '+' expr { $$ = DEBUG_BinopExpr(EXP_OP_ADD, $1, $3); } | expr '-' expr { $$ = DEBUG_BinopExpr(EXP_OP_SUB, $1, $3); } | expr '*' expr { $$ = DEBUG_BinopExpr(EXP_OP_MUL, $1, $3); } | expr '/' expr { $$ = DEBUG_BinopExpr(EXP_OP_DIV, $1, $3); } | expr '%' expr { $$ = DEBUG_BinopExpr(EXP_OP_REM, $1, $3); } | '-' expr %prec OP_SIGN { $$ = DEBUG_UnopExpr(EXP_OP_NEG, $2); } | '+' expr %prec OP_SIGN { $$ = $2; } | '!' expr { $$ = DEBUG_UnopExpr(EXP_OP_NOT, $2); } | '~' expr { $$ = DEBUG_UnopExpr(EXP_OP_LNOT, $2); } | '(' expr ')' { $$ = $2; } | '*' expr %prec OP_DEREF { $$ = DEBUG_UnopExpr(EXP_OP_DEREF, $2); } | '&' expr %prec OP_DEREF { $$ = DEBUG_UnopExpr(EXP_OP_ADDR, $2); } | type_cast expr %prec OP_DEREF { $$ = DEBUG_TypeCastExpr($1, $2); } /* * The lvalue rule builds an expression tree. This is a limited form * of expression that is suitable to be used as an lvalue. */ lval_addr: lval { $$ = DEBUG_EvalExpr($1); } lval: lvalue { $$ = $1; } | '*' expr { $$ = DEBUG_UnopExpr(EXP_OP_FORCE_DEREF, $2); } lvalue: tNUM { $$ = DEBUG_ConstExpr($1); } | tINTVAR { $$ = DEBUG_IntVarExpr($1); } | tIDENTIFIER { $$ = DEBUG_SymbolExpr($1); } | lvalue OP_DRF tIDENTIFIER { $$ = DEBUG_StructPExpr($1, $3); } | lvalue '.' tIDENTIFIER { $$ = DEBUG_StructExpr($1, $3); } | lvalue '[' expr ']' { $$ = DEBUG_BinopExpr(EXP_OP_ARR, $1, $3); } %% static void issue_prompt(void) { #ifdef DONT_USE_READLINE DEBUG_Printf(DBG_CHN_MESG, "Wine-dbg>"); #endif } static void mode_command(int newmode) { if ((newmode == 16) || (newmode == 32)) DEBUG_CurrThread->dbg_mode = newmode; else DEBUG_Printf(DBG_CHN_MESG,"Invalid mode (use 16 or 32)\n"); } void DEBUG_Exit(DWORD ec) { ExitProcess(ec); } static WINE_EXCEPTION_FILTER(wine_dbg_cmd) { DEBUG_Printf(DBG_CHN_MESG, "\nwine_dbg_cmd: "); switch (GetExceptionCode()) { case DEBUG_STATUS_INTERNAL_ERROR: DEBUG_Printf(DBG_CHN_MESG, "WineDbg internal error\n"); break; case DEBUG_STATUS_NO_SYMBOL: DEBUG_Printf(DBG_CHN_MESG, "Undefined symbol\n"); break; case DEBUG_STATUS_DIV_BY_ZERO: DEBUG_Printf(DBG_CHN_MESG, "Division by zero\n"); break; case DEBUG_STATUS_BAD_TYPE: DEBUG_Printf(DBG_CHN_MESG, "No type or type mismatch\n"); break; default: DEBUG_Printf(DBG_CHN_MESG, "Exception %lx\n", GetExceptionCode()); break; } return EXCEPTION_EXECUTE_HANDLER; } /*********************************************************************** * DEBUG_Main * * Debugger main loop. */ BOOL DEBUG_Main( BOOL is_debug, BOOL force, DWORD code ) { int newmode; BOOL ret_ok; char ch; #ifdef YYDEBUG yydebug = 0; #endif yyin = stdin; DEBUG_SuspendExecution(); if (!is_debug) { #ifdef __i386__ if (DEBUG_IsSelectorSystem(DEBUG_context.SegCs)) DEBUG_Printf( DBG_CHN_MESG, " in 32-bit code (0x%08lx).\n", DEBUG_context.Eip ); else DEBUG_Printf( DBG_CHN_MESG, " in 16-bit code (%04x:%04lx).\n", (WORD)DEBUG_context.SegCs, DEBUG_context.Eip ); #else DEBUG_Printf( DBG_CHN_MESG, " (0x%08lx).\n", GET_IP(&DEBUG_context) ); #endif } DEBUG_LoadEntryPoints("Loading new modules symbols:\n"); if (force || !(is_debug && DEBUG_ShouldContinue( code, DEBUG_CurrThread->dbg_exec_mode, &DEBUG_CurrThread->dbg_exec_count ))) { DBG_ADDR addr; DEBUG_GetCurrentAddress( &addr ); #ifdef __i386__ switch (newmode = DEBUG_GetSelectorType(addr.seg)) { case 16: case 32: break; default: DEBUG_Printf(DBG_CHN_MESG, "Bad CS (%ld)\n", addr.seg); newmode = 32; } #else newmode = 32; #endif if (newmode != DEBUG_CurrThread->dbg_mode) DEBUG_Printf(DBG_CHN_MESG,"In %d bit mode.\n", DEBUG_CurrThread->dbg_mode = newmode); DEBUG_DoDisplay(); if (is_debug || force) { /* * Do a quiet backtrace so that we have an idea of what the situation * is WRT the source files. */ DEBUG_BackTrace(FALSE); } else { /* This is a real crash, dump some info */ DEBUG_InfoRegisters(); DEBUG_InfoStack(); #ifdef __i386__ if (DEBUG_CurrThread->dbg_mode == 16) { DEBUG_InfoSegments( DEBUG_context.SegDs >> 3, 1 ); if (DEBUG_context.SegEs != DEBUG_context.SegDs) DEBUG_InfoSegments( DEBUG_context.SegEs >> 3, 1 ); } DEBUG_InfoSegments( DEBUG_context.SegFs >> 3, 1 ); #endif DEBUG_BackTrace(TRUE); } if (!is_debug || (DEBUG_CurrThread->dbg_exec_mode == EXEC_STEPI_OVER) || (DEBUG_CurrThread->dbg_exec_mode == EXEC_STEPI_INSTR)) { /* Show where we crashed */ curr_frame = 0; DEBUG_PrintAddress( &addr, DEBUG_CurrThread->dbg_mode, TRUE ); DEBUG_Printf(DBG_CHN_MESG,": "); DEBUG_Disasm( &addr, TRUE ); DEBUG_Printf( DBG_CHN_MESG, "\n" ); } ret_ok = 0; do { __TRY { issue_prompt(); if (yyparse()) { DEBUG_CurrThread->dbg_exec_mode = EXEC_KILL; ret_ok = TRUE; } else { flush_symbols(); DEBUG_GetCurrentAddress( &addr ); ret_ok = DEBUG_ValidateRegisters() && DEBUG_READ_MEM_VERBOSE((void*)DEBUG_ToLinear(&addr), &ch, 1); } } __EXCEPT(wine_dbg_cmd) { ret_ok = FALSE; } __ENDTRY; } while (!ret_ok); } DEBUG_CurrThread->dbg_exec_mode = DEBUG_RestartExecution( DEBUG_CurrThread->dbg_exec_mode, DEBUG_CurrThread->dbg_exec_count ); /* * This will have gotten absorbed into the breakpoint info * if it was used. Otherwise it would have been ignored. * In any case, we don't mess with it any more. */ if (DEBUG_CurrThread->dbg_exec_mode == EXEC_CONT || DEBUG_CurrThread->dbg_exec_mode == EXEC_PASS) DEBUG_CurrThread->dbg_exec_count = 0; return (DEBUG_CurrThread->dbg_exec_mode == EXEC_PASS) ? DBG_EXCEPTION_NOT_HANDLED : DBG_CONTINUE; } int yyerror(char* s) { DEBUG_Printf(DBG_CHN_MESG,"%s\n", s); return 0; } wine-20000526/debugger/dbgmain.c0100644000175000001440000000637607077046740016022 0ustar julliardusers/* * File dbgmain.c - main wrapper for internal debugger test bed. * * Copyright (C) 1997, Eric Youngdale. */ #include #include #include "config.h" #include "ldt.h" #include "windows.h" #include "toolhelp.h" #include "module.h" #include "debugger.h" #include "win.h" #include "pe_image.h" ldt_copy_entry ldt_copy[LDT_SIZE]; unsigned char ldt_flags_copy[LDT_SIZE]; Display * display; int XUngrabServer( Display * d ) { return(0); } int XFlush(Display * d ) { return(0); } HTASK16 GetCurrentTask(void) { exit(0); } HMODULE16 GetExePtr(HANDLE16 h) { exit(0); } int PROFILE_GetWineIniString( const char *section, const char *key_name, const char *def, char *buffer, int len ) { exit(0); } void CLASS_DumpClass( struct tagCLASS *class ) { exit(0); } void MODULE_DumpModule( HMODULE16 hmodule ) { exit(0); } void QUEUE_DumpQueue( HQUEUE16 hQueue ) { exit(0); } void WIN_DumpWindow( HWND hwnd ) { exit(0); } void CLASS_WalkClasses(void) { exit(0); } void MODULE_WalkModules(void) { exit(0); } void QUEUE_WalkQueues(void) { exit(0); } void WIN_WalkWindows( HWND hwnd, int indent ) { exit(0); } NE_MODULE *NE_GetPtr( HMODULE16 hModule ) { exit(0); } FARPROC16 NE_GetEntryPoint( HMODULE16 hModule, WORD ordinal ) { exit(0); } void LDT_Print( int start, int length ) { exit(0); } LPVOID GlobalLock16(HGLOBAL16 h) { exit(0); } BOOL16 ModuleFirst16(MODULEENTRY *lpModule) { return 0; } BOOL16 ModuleNext16(MODULEENTRY *lpModule) { return 0; } BOOL16 IsBadReadPtr16(SEGPTR s,UINT16 o) { exit(0); } BOOL IsBadReadPtr(LPCVOID s,UINT o) { exit(0); } struct qwert { unsigned flag1:1; unsigned flag3:3; signed remain:11; unsigned whatsup:17; } vvv; int xyzzy(const char * qwe, int ijk) { return strlen(qwe) + ijk; } unsigned int * xxx; unsigned int * yyy; int xxx3[10]; char vdv[100]; struct deferred_debug_info { struct deferred_debug_info * next; char * load_addr; char * module_name; char * dbg_info; int dbg_size; PIMAGE_DEBUG_DIRECTORY dbgdir; struct pe_data * pe; PIMAGE_SECTION_HEADER sectp; int nsect; short int dbg_index; char loaded; }; struct CodeViewDebug { char cv_nbtype[8]; unsigned int cv_timestamp; char cv_unknown[4]; char cv_name[1]; }; test_pdbstuff(void) { struct deferred_debug_info deefer; IMAGE_DEBUG_DIRECTORY dinfo; struct CodeViewDebug cdebug; IMAGE_SECTION_HEADER sects[10]; memset(&deefer, 0, sizeof(deefer)); memset(&dinfo, 0, sizeof(dinfo)); memset(&cdebug, 0, sizeof(cdebug)); memset(§s, 0, sizeof(sects)); deefer.dbg_info = (char *) &cdebug; dinfo.TimeStamp = 812932395; cdebug.cv_timestamp = 833392137 /* 841951397 */; deefer.dbgdir = &dinfo; deefer.sectp = sects; deefer.nsect = 10; DEBUG_InitTypes(); DEBUG_ProcessPDBFile(&deefer, "../dumpexe.pdb"); } int main(int argc, char * argv[]) { SIGCONTEXT reg; strcpy(vdv, "This is a test"); memset(&vvv, 0xff, sizeof(vvv)); vvv.whatsup = 0; vvv.flag3 = 0; vvv.remain = 0x401; argv0 = argv[0]; xxx = (unsigned int*) &vvv; yyy = xxx + 5; xxx3[5] = 7; test_pdbstuff(); memset(®, 0, sizeof(reg)); wine_debug(SIGSEGV, ®); return 0; } wine-20000526/debugger/debug.l0100644000175000001440000001723207103022473015474 0ustar julliardusers/* -*-C-*- * Lexical scanner for command line parsing * * Copyright 1993 Eric Youngdale */ %{ #include #include #include "debugger.h" #include "y.tab.h" #ifdef DBG_need_heap #define malloc(x) DBG_alloc(x) #define realloc(x,y) DBG_realloc(x,y) #define free(x) DBG_free(x) #endif #ifndef DONT_USE_READLINE #undef YY_INPUT #define YY_INPUT(buf,result,max_size) \ if ( (result = dbg_read((char *) buf, max_size )) < 0 ) \ YY_FATAL_ERROR( "read() in flex scanner failed" ); static int dbg_read(char * buf, int size); static char * make_symbol(char *); #endif /* DONT_USE_READLINE */ #define YY_NO_UNPUT static int syntax_error; %} DIGIT [0-9] HEXDIGIT [0-9a-fA-F] FORMAT [ubcdiswx] IDENTIFIER [_a-zA-Z\.~][_a-zA-Z0-9\.~@]* PATHNAME [/_a-zA-Z\.~][/_a-zA-Z0-9\.~@]* STRING \"[^\n"]+\" %s FORMAT_EXPECTED %s PATH_EXPECTED %s INFO_CMD %s HELP_CMD %s DEL_CMD %s WALK_CMD %s SHOW_CMD %s NOCMD %s DEBUGSTR %% \n { BEGIN(0); syntax_error = 0; return tEOL; } /*Indicates end of command. Reset state. */ "||" { return OP_LOR; } "&&" { return OP_LAND; } "==" { return OP_EQ; } "!=" { return OP_NE; } "<=" { return OP_LE; } ">=" { return OP_GE; } "<<" { return OP_SHL; } ">>" { return OP_SHR; } "->" { return OP_DRF; } [-+<=>|&^()*/%:!~,\.] { return *yytext; } "[" { return *yytext; } "]" { return *yytext; } "0x"{HEXDIGIT}+ { sscanf(yytext, "%x", &yylval.integer); return tNUM; } {DIGIT}+ { sscanf(yytext, "%d", &yylval.integer); return tNUM; } "/"{DIGIT}+{FORMAT} { char * last; yylval.integer = strtol( yytext+1, &last, NULL ); yylval.integer = (yylval.integer << 8) | *last; return tFORMAT; } "/"{FORMAT} { yylval.integer = (1 << 8) | yytext[1]; return tFORMAT; } {STRING} { yylval.string = make_symbol(yytext); return tSTRING; } [a-z+\-,]* { yylval.string = yytext; return tDEBUGSTR; } info|inf|in { BEGIN(INFO_CMD); return tINFO; } up { BEGIN(NOCMD); return tUP; } down|dow|do { BEGIN(NOCMD); return tDOWN; } frame|fram|fra|fr { BEGIN(NOCMD); return tFRAME; } list|lis|li|l { BEGIN(PATH_EXPECTED); return tLIST; } enable|enabl|enab|ena { BEGIN(NOCMD); return tENABLE;} disable|disabl|disab|disa|dis { BEGIN(NOCMD); return tDISABLE; } disassemble|disassembl|disassemb|disassem|disasse|disass|disas { BEGIN(NOCMD); return tDISASSEMBLE; } display|displa|displ|disp { BEGIN(FORMAT_EXPECTED); return tDISPLAY; } undisplay|undispla|undispl|undisp|undis|undi|und { BEGIN(NOCMD); return tUNDISPLAY; } delete|delet|dele|del { BEGIN(DEL_CMD); return tDELETE; } quit|qui|qu|q { BEGIN(NOCMD); return tQUIT; } set|se { BEGIN(NOCMD); return tSET; } walk|w { BEGIN(WALK_CMD); return tWALK; } x { BEGIN(FORMAT_EXPECTED); return tEXAM; } help|hel|he|"?" { BEGIN(HELP_CMD); return tHELP; } backtrace|backtrac|backtra|backt|back|bac|ba|bt { BEGIN(NOCMD); return tBACKTRACE; } where|wher|whe { BEGIN(NOCMD); return tBACKTRACE; } cont|con|co|c { BEGIN(NOCMD); return tCONT; } pass|pas|pa { BEGIN(NOCMD); return tPASS; } condition|conditio|conditi|condit|condi|cond { BEGIN(NOCMD); return tCOND; } step|ste|st|s { BEGIN(NOCMD); return tSTEP; } next|nex|ne|n { BEGIN(NOCMD); return tNEXT; } stepi|si { BEGIN(NOCMD); return tSTEPI; } nexti|ni { BEGIN(NOCMD); return tNEXTI; } finish|finis|fini|fin|fi { BEGIN(NOCMD); return tFINISH; } abort|abor|abo { BEGIN(NOCMD); return tABORT; } print|prin|pri|pr|p { BEGIN(FORMAT_EXPECTED); return tPRINT; } mode { BEGIN(NOCMD); return tMODE; } show|sho|sh { BEGIN(SHOW_CMD); return tSHOW; } symbolfile|symbols|symbol|sf { BEGIN(PATH_EXPECTED); return tSYMBOLFILE; } break|brea|bre|br|b { BEGIN(PATH_EXPECTED); return tBREAK; } watch|watc|wat { BEGIN(PATH_EXPECTED); return tWATCH; } whatis|whati|what { BEGIN(PATH_EXPECTED); return tWHATIS; } share|shar|sha { return tSHARE; } locals|local|loca|loc { return tLOCAL; } class|clas|cla { return tCLASS; } module|modul|modu|mod { return tMODULE; } queue|queu|que { return tQUEUE; } process|proces|proce|proc { return tPROCESS; } threads|thread|threa|thre|thr|th { return tTHREAD; } modref|modre|modr { return tMODREF; } registers|regs|reg|re { return tREGS; } segments|segment|segm|seg|se { return tSEGMENTS; } stack|stac|sta|st { return tSTACK; } maps|map { return tMAPS; } window|windo|wind|win|wnd { return tWND; } info|inf|in { return tINFO; } directories|directorie|directori|director|directo|direct|direc|direc|dir { BEGIN(PATH_EXPECTED); return tDIR; } char { return tCHAR; } short { return tSHORT; } int { return tINT; } long { return tLONG; } float { return tFLOAT; } double { return tDOUBLE; } unsigned { return tUNSIGNED; } signed { return tSIGNED; } struct { return tSTRUCT; } union { return tUNION; } enum { return tENUM; } {IDENTIFIER} { yylval.string = make_symbol(yytext); return tIDENTIFIER; } "$"{IDENTIFIER} { yylval.string = make_symbol(yytext+1); return tINTVAR; } {PATHNAME} { yylval.string = make_symbol(yytext); return tPATH; } [ \t]+ /* Eat up whitespace */ . { if (syntax_error == 0) { syntax_error ++; DEBUG_Printf(DBG_CHN_MESG, "Syntax Error\n"); } } %% #ifndef yywrap int yywrap(void) { return 1; } #endif #ifndef DONT_USE_READLINE #ifndef whitespace #define whitespace(c) (((c) == ' ') || ((c) == '\t')) #endif /* Strip whitespace from the start and end of STRING. */ static void stripwhite (char *string) { register int i = 0; while (whitespace (string[i])) i++; if (i) strcpy (string, string + i); i = strlen (string) - 1; while (i > 0 && whitespace (string[i])) i--; string[++i] = '\0'; } static int dbg_read(char * buf, int size) { static char last_line[256] = ""; char * line; int len; for (;;) { flush_symbols(); line = readline ("Wine-dbg>"); if (!line) { DEBUG_Printf( DBG_CHN_MESG, "\n" ); DEBUG_Exit(0); } /* Remove leading and trailing whitespace from the line */ stripwhite (line); /* If there is anything left, add it to the history list and execute it. Otherwise, re-execute last command. */ if (*line) { add_history( line ); strncpy( last_line, line, 255 ); last_line[255] = '\0'; } free( line ); line = last_line; if ((len = strlen(line)) > 0) { if (size < len + 1) { DEBUG_Printf(DBG_CHN_MESG,"Fatal readline goof.\n"); DEBUG_Exit(0); } strcpy(buf, line); buf[len] = '\n'; buf[len+1] = 0; return len + 1; } } } static char *local_symbols[30]; static int next_symbol; static char * make_symbol(char * symbol) { return local_symbols[next_symbol++] = DBG_strdup(symbol); } void flush_symbols(void) { while(--next_symbol>= 0) DBG_free(local_symbols[next_symbol]); next_symbol = 0; } #endif /* DONT_USE_READLINE */ wine-20000526/debugger/debugger.h0100644000175000001440000004124607106624617016203 0ustar julliardusers/* * Debugger definitions * * Copyright 1995 Alexandre Julliard */ #ifndef __WINE_DEBUGGER_H #define __WINE_DEBUGGER_H #include /* u_long ... */ #include #include "windef.h" #include "winbase.h" #include "wine/exception.h" #ifdef __i386__ #define STEP_FLAG 0x00000100 /* single step flag */ #define V86_FLAG 0x00020000 #endif #define SYM_FUNC 0x0 #define SYM_DATA 0x1 #define SYM_WIN32 0x2 #define SYM_WINE 0x4 #define SYM_INVALID 0x8 #define SYM_TRAMPOLINE 0x10 #define SYM_STEP_THROUGH 0x20 enum debug_type {DT_BASIC, DT_CONST, DT_POINTER, DT_ARRAY, DT_STRUCT, DT_ENUM, DT_TYPEDEF, DT_FUNC, DT_BITFIELD}; /* * Return values for DEBUG_CheckLinenoStatus. Used to determine * what to do when the 'step' command is given. */ #define FUNC_HAS_NO_LINES (0) #define NOT_ON_LINENUMBER (1) #define AT_LINENUMBER (2) #define FUNC_IS_TRAMPOLINE (3) /* * For constants generated by the parser, we use this datatype */ extern struct datatype * DEBUG_TypeShortUInt; extern struct datatype * DEBUG_TypeInt; extern struct datatype * DEBUG_TypeIntConst; extern struct datatype * DEBUG_TypeUSInt; extern struct datatype * DEBUG_TypeString; typedef struct { DWORD seg; /* 0xffffffff means current default segment (cs or ds) */ DWORD off; } DBG_ADDR; #define DV_TARGET 0xF00D #define DV_HOST 0x50DA typedef struct { struct datatype* type; int cookie; /* DV_??? */ DBG_ADDR addr; } DBG_VALUE; struct list_id { char * sourcefile; int line; }; struct wine_lines { unsigned long line_number; DBG_ADDR pc_offset; }; struct symbol_info { struct name_hash * sym; struct list_id list; }; typedef struct wine_lines WineLineNo; /* * This structure holds information about stack variables, function * parameters, and register variables, which are all local to this * function. */ struct wine_locals { unsigned int regno:8; /* For register symbols */ signed int offset:24; /* offset from esp/ebp to symbol */ unsigned int pc_start; /* For RBRAC/LBRAC */ unsigned int pc_end; /* For RBRAC/LBRAC */ char * name; /* Name of symbol */ struct datatype * type; /* Datatype of symbol */ }; typedef struct wine_locals WineLocals; enum exec_mode { EXEC_CONT, /* Continuous execution */ EXEC_PASS, /* Continue, passing exception to app */ EXEC_STEP_OVER, /* Stepping over a call to next source line */ EXEC_STEP_INSTR, /* Step to next source line, stepping in if needed */ EXEC_STEPI_OVER, /* Stepping over a call */ EXEC_STEPI_INSTR, /* Single-stepping an instruction */ EXEC_FINISH, /* Step until we exit current frame */ EXEC_STEP_OVER_TRAMPOLINE, /* Step over trampoline. Requires that * we dig the real return value off the stack * and set breakpoint there - not at the * instr just after the call. */ EXEC_KILL /* terminate debugging session */ }; #define DBG_BREAK 0 #define DBG_WATCH 1 typedef struct { DBG_ADDR addr; WORD enabled : 1, type : 1, is32 : 1, refcount : 13; WORD skipcount; union { struct { BYTE opcode; BOOL (*func)(void); } b; struct { BYTE rw : 1, len : 2; BYTE reg; DWORD oldval; } w; } u; struct expr * condition; } DBG_BREAKPOINT; typedef struct tagDBG_THREAD { struct tagDBG_PROCESS* process; HANDLE handle; DWORD tid; LPVOID start; LPVOID teb; int wait_for_first_exception; int dbg_mode; enum exec_mode dbg_exec_mode; int dbg_exec_count; DBG_BREAKPOINT stepOverBP; struct tagDBG_THREAD* next; struct tagDBG_THREAD* prev; } DBG_THREAD; typedef struct tagDBG_PROCESS { HANDLE handle; DWORD pid; DBG_THREAD* threads; int num_threads; unsigned continue_on_first_exception; struct tagDBG_MODULE* modules; unsigned long dbg_hdr_addr; /* * This is an index we use to keep track of the debug information * when we have multiple sources. We use the same database to also * allow us to do an 'info shared' type of deal, and we use the index * to eliminate duplicates. */ int next_index; struct tagDBG_PROCESS* next; struct tagDBG_PROCESS* prev; } DBG_PROCESS; extern DBG_PROCESS* DEBUG_CurrProcess; extern DBG_THREAD* DEBUG_CurrThread; extern DWORD DEBUG_CurrTid; extern DWORD DEBUG_CurrPid; extern CONTEXT DEBUG_context; #define DEBUG_READ_MEM(addr, buf, len) \ (ReadProcessMemory(DEBUG_CurrProcess->handle, (addr), (buf), (len), NULL)) #define DEBUG_WRITE_MEM(addr, buf, len) \ (WriteProcessMemory(DEBUG_CurrProcess->handle, (addr), (buf), (len), NULL)) #define DEBUG_READ_MEM_VERBOSE(addr, buf, len) \ (DEBUG_READ_MEM((addr), (buf), (len)) || (DEBUG_InvalLinAddr( addr ),0)) #define DEBUG_WRITE_MEM_VERBOSE(addr, buf, len) \ (DEBUG_WRITE_MEM((addr), (buf), (len)) || (DEBUG_InvalLinAddr( addr ),0)) typedef struct tagDBG_MODULE { struct tagDBG_MODULE* next; void* load_addr; char* module_name; char status; char type; short int dbg_index; HMODULE handle; void* extra_info; } DBG_MODULE; /* status field */ #define DM_STATUS_NEW 0 #define DM_STATUS_LOADED 1 #define DM_STATUS_ERROR 2 /* type field */ #define DM_TYPE_UNKNOWN 0 #define DM_TYPE_ELF 1 #define DM_TYPE_NE 2 #define DM_TYPE_PE 3 typedef struct { DWORD val; const char* name; LPDWORD pval; struct datatype* type; } DBG_INTVAR; #define OFFSET_OF(__c,__f) ((int)(((char*)&(((__c*)0)->__f))-((char*)0))) /* debugger/break.c */ extern void DEBUG_SetBreakpoints( BOOL set ); extern void DEBUG_AddBreakpoint( const DBG_VALUE *addr, BOOL (*func)(void) ); extern void DEBUG_AddWatchpoint( const DBG_VALUE *addr, int is_write ); extern void DEBUG_DelBreakpoint( int num ); extern void DEBUG_EnableBreakpoint( int num, BOOL enable ); extern void DEBUG_InfoBreakpoints(void); extern BOOL DEBUG_HandleTrap(void); extern BOOL DEBUG_ShouldContinue( DWORD code, enum exec_mode mode, int * count ); extern void DEBUG_SuspendExecution( void ); extern enum exec_mode DEBUG_RestartExecution( enum exec_mode mode, int count ); extern BOOL DEBUG_IsFctReturn(void); extern int DEBUG_AddBPCondition(int bpnum, struct expr * exp); /* debugger/db_disasm.c */ extern void DEBUG_Disasm( DBG_ADDR *addr, int display ); /* debugger/dbg.y */ extern BOOL DEBUG_Main( BOOL is_debug, BOOL force, DWORD code ); extern void DEBUG_Exit( DWORD ); /* debugger/debug.l */ extern void flush_symbols(void); /* debugger/display.c */ extern int DEBUG_DoDisplay(void); extern int DEBUG_AddDisplay(struct expr * exp, int count, char format); extern int DEBUG_DoDisplay(void); extern int DEBUG_DelDisplay(int displaynum); extern int DEBUG_InfoDisplay(void); /* debugger/editline.c */ extern char * readline(const char *); extern void add_history(char *); /* debugger/expr.c */ extern void DEBUG_FreeExprMem(void); struct expr * DEBUG_IntVarExpr(const char* name); struct expr * DEBUG_SymbolExpr(const char * name); struct expr * DEBUG_ConstExpr(int val); struct expr * DEBUG_StringExpr(const char * str); struct expr * DEBUG_SegAddr(struct expr *, struct expr *); struct expr * DEBUG_USConstExpr(unsigned int val); struct expr * DEBUG_BinopExpr(int oper, struct expr *, struct expr *); struct expr * DEBUG_UnopExpr(int oper, struct expr *); struct expr * DEBUG_StructPExpr(struct expr *, const char * element); struct expr * DEBUG_StructExpr(struct expr *, const char * element); struct expr * DEBUG_ArrayExpr(struct expr *, struct expr * index); struct expr * DEBUG_CallExpr(const char *, int nargs, ...); struct expr * DEBUG_TypeCastExpr(struct datatype *, struct expr *); extern DBG_VALUE DEBUG_EvalExpr(struct expr *); extern int DEBUG_DelDisplay(int displaynum); extern struct expr * DEBUG_CloneExpr(const struct expr * exp); extern int DEBUG_FreeExpr(struct expr * exp); extern int DEBUG_DisplayExpr(const struct expr * exp); /* debugger/external.c */ extern void DEBUG_ExternalDebugger(void); /* debugger/hash.c */ extern struct name_hash * DEBUG_AddSymbol( const char *name, const DBG_VALUE *addr, const char *sourcefile, int flags); extern BOOL DEBUG_GetSymbolValue( const char * name, const int lineno, DBG_VALUE *addr, int ); extern BOOL DEBUG_SetSymbolValue( const char * name, const DBG_VALUE *addr ); extern const char * DEBUG_FindNearestSymbol( const DBG_ADDR *addr, int flag, struct name_hash ** rtn, unsigned int ebp, struct list_id * source); extern void DEBUG_ReadSymbolTable( const char * filename ); extern void DEBUG_AddLineNumber( struct name_hash * func, int line_num, unsigned long offset ); extern struct wine_locals * DEBUG_AddLocal( struct name_hash * func, int regno, int offset, int pc_start, int pc_end, char * name); extern int DEBUG_CheckLinenoStatus(const DBG_ADDR *addr); extern void DEBUG_GetFuncInfo(struct list_id * ret, const char * file, const char * func); extern int DEBUG_SetSymbolSize(struct name_hash * sym, unsigned int len); extern int DEBUG_SetSymbolBPOff(struct name_hash * sym, unsigned int len); extern int DEBUG_GetSymbolAddr(struct name_hash * sym, DBG_ADDR * addr); extern int DEBUG_cmp_sym(const void * p1, const void * p2); extern BOOL DEBUG_GetLineNumberAddr( struct name_hash *, const int lineno, DBG_ADDR *addr, int bp_flag ); extern int DEBUG_SetLocalSymbolType(struct wine_locals * sym, struct datatype * type); extern BOOL DEBUG_Normalize(struct name_hash * nh ); /* debugger/info.c */ extern void DEBUG_PrintBasic( const DBG_VALUE* value, int count, char format ); extern struct symbol_info DEBUG_PrintAddress( const DBG_ADDR *addr, int addrlen, int flag ); extern void DEBUG_Help(void); extern void DEBUG_HelpInfo(void); extern struct symbol_info DEBUG_PrintAddressAndArgs( const DBG_ADDR *addr, int addrlen, unsigned int ebp, int flag ); extern void DEBUG_InfoClass(const char* clsName); extern void DEBUG_WalkClasses(void); extern void DEBUG_WalkModref(DWORD p); extern void DEBUG_DumpModule(DWORD mod); extern void DEBUG_WalkModules(void); extern void DEBUG_WalkProcess(void); extern void DEBUG_WalkThreads(void); extern void DEBUG_DumpQueue(DWORD q); extern void DEBUG_WalkQueues(void); extern void DEBUG_InfoSegments(DWORD s, int v); extern void DEBUG_InfoVirtual(void); extern void DEBUG_InfoWindow(HWND hWnd); extern void DEBUG_WalkWindows(HWND hWnd, int indent); /* debugger/memory.c */ extern int DEBUG_ReadMemory( const DBG_VALUE* value ); extern void DEBUG_WriteMemory( const DBG_VALUE* val, int value ); extern void DEBUG_ExamineMemory( const DBG_VALUE *addr, int count, char format); extern void DEBUG_InvalAddr( const DBG_ADDR* addr ); extern void DEBUG_InvalLinAddr( void* addr ); #ifdef __i386__ extern void DEBUG_GetCurrentAddress( DBG_ADDR * ); extern DWORD DEBUG_ToLinear( const DBG_ADDR *address ); extern void DEBUG_FixAddress( DBG_ADDR *address, DWORD def ); extern BOOL DEBUG_FixSegment( DBG_ADDR* addr ); extern int DEBUG_GetSelectorType( WORD sel ); extern int DEBUG_IsSelectorSystem( WORD sel ); #endif /* debugger/module.c */ extern int DEBUG_LoadEntryPoints( const char * prefix ); extern void DEBUG_LoadModule32( const char* name, HANDLE hFile, DWORD base ); extern DBG_MODULE* DEBUG_AddModule(const char* name, int type, void* mod_addr, HMODULE hmod); extern DBG_MODULE* DEBUG_FindModuleByName(const char* name, int type); extern DBG_MODULE* DEBUG_FindModuleByHandle(HANDLE handle, int type); extern DBG_MODULE* DEBUG_RegisterPEModule(HMODULE, u_long load_addr, const char* name); extern DBG_MODULE* DEBUG_RegisterELFModule(u_long load_addr, const char* name); extern void DEBUG_InfoShare(void); /* debugger/msc.c */ extern int DEBUG_RegisterMSCDebugInfo(DBG_MODULE* module, HANDLE hFile, void* nth, unsigned long nth_ofs); extern int DEBUG_RegisterStabsDebugInfo(DBG_MODULE* module, HANDLE hFile, void* nth, unsigned long nth_ofs); extern void DEBUG_InitCVDataTypes(void); /* debugger/registers.c */ extern void DEBUG_InfoRegisters(void); extern BOOL DEBUG_ValidateRegisters(void); /* debugger/stack.c */ extern void DEBUG_InfoStack(void); extern void DEBUG_BackTrace(BOOL noisy); extern int DEBUG_InfoLocals(void); extern int DEBUG_SetFrame(int newframe); extern int DEBUG_GetCurrentFrame(struct name_hash ** name, unsigned int * eip, unsigned int * ebp); /* debugger/stabs.c */ extern int DEBUG_ReadExecutableDbgInfo(const char* exe_name); extern int DEBUG_ProcessElfObject(const char* filename, unsigned int load_offset); extern int DEBUG_ParseStabs(char * addr, unsigned int load_offset, unsigned int staboff, int stablen, unsigned int strtaboff, int strtablen); /* debugger/types.c */ extern int DEBUG_nchar; extern void DEBUG_InitTypes(void); extern struct datatype * DEBUG_NewDataType(enum debug_type xtype, const char * typename); extern unsigned int DEBUG_TypeDerefPointer(const DBG_VALUE *value, struct datatype ** newtype); extern int DEBUG_AddStructElement(struct datatype * dt, char * name, struct datatype * type, int offset, int size); extern int DEBUG_SetStructSize(struct datatype * dt, int size); extern int DEBUG_SetPointerType(struct datatype * dt, struct datatype * dt2); extern int DEBUG_SetArrayParams(struct datatype * dt, int min, int max, struct datatype * dt2); extern void DEBUG_Print( const DBG_VALUE *addr, int count, char format, int level ); extern unsigned int DEBUG_FindStructElement(DBG_VALUE * addr, const char * ele_name, int * tmpbuf); extern struct datatype * DEBUG_GetPointerType(struct datatype * dt); extern int DEBUG_GetObjectSize(struct datatype * dt); extern unsigned int DEBUG_ArrayIndex(const DBG_VALUE * addr, DBG_VALUE * result, int index); extern struct datatype * DEBUG_FindOrMakePointerType(struct datatype * reftype); extern long long int DEBUG_GetExprValue(const DBG_VALUE * addr, char ** format); extern int DEBUG_SetBitfieldParams(struct datatype * dt, int offset, int nbits, struct datatype * dt2); extern int DEBUG_CopyFieldlist(struct datatype * dt, struct datatype * dt2); extern enum debug_type DEBUG_GetType(struct datatype * dt); extern struct datatype * DEBUG_TypeCast(enum debug_type, const char *); extern int DEBUG_PrintTypeCast(const struct datatype *); extern int DEBUG_PrintType( const DBG_VALUE* addr ); /* debugger/source.c */ extern void DEBUG_ShowDir(void); extern void DEBUG_AddPath(const char * path); extern void DEBUG_List(struct list_id * line1, struct list_id * line2, int delta); extern void DEBUG_NukePath(void); extern void DEBUG_Disassemble( const DBG_VALUE *, const DBG_VALUE*, int offset ); /* debugger/winedbg.c */ #define DBG_CHN_MESG 1 #define DBG_CHN_ERR 2 #define DBG_CHN_WARN 4 #define DBG_CHN_FIXME 8 #define DBG_CHN_TRACE 16 extern void DEBUG_Output(int chn, const char* buffer, int len); #ifdef __GNUC__ extern int DEBUG_Printf(int chn, const char* format, ...) __attribute__((format (printf,2,3))); #else extern int DEBUG_Printf(int chn, const char* format, ...); #endif extern DBG_INTVAR* DEBUG_GetIntVar(const char*); /* Choose your allocator! */ #if 1 /* this one is libc's fast one */ extern void* DEBUG_XMalloc(size_t size); extern void* DEBUG_XReAlloc(void *ptr, size_t size); extern char* DEBUG_XStrDup(const char *str); #define DBG_alloc(x) DEBUG_XMalloc(x) #define DBG_realloc(x,y) DEBUG_XReAlloc(x,y) #define DBG_free(x) free(x) #define DBG_strdup(x) DEBUG_XStrDup(x) #else /* this one is slow (takes 5 minutes to load the debugger on my machine), but is pretty crash-proof (can step through malloc() without problems, malloc() arena (and other heaps) can be totally wasted and it'll still work, etc... if someone could make optimized routines so it wouldn't take so long to load, it could be made default) */ #include "heap.h" #define DBG_alloc(x) HeapAlloc(dbg_heap,0,x) #define DBG_realloc(x,y) HeapRealloc(dbg_heap,0,x,y) #define DBG_free(x) HeapFree(dbg_heap,0,x) #define DBG_strdup(x) HEAP_strdupA(dbg_heap,0,x) #define DBG_need_heap extern HANDLE dbg_heap; #endif #define DEBUG_STATUS_OFFSET 0x80003000 #define DEBUG_STATUS_INTERNAL_ERROR (DEBUG_STATUS_OFFSET+0) #define DEBUG_STATUS_NO_SYMBOL (DEBUG_STATUS_OFFSET+1) #define DEBUG_STATUS_DIV_BY_ZERO (DEBUG_STATUS_OFFSET+2) #define DEBUG_STATUS_BAD_TYPE (DEBUG_STATUS_OFFSET+3) extern DBG_INTVAR DEBUG_IntVars[]; #define DBG_IVARNAME(_var) DEBUG_IV_##_var #define DBG_IVARSTRUCT(_var) DEBUG_IntVars[DBG_IVARNAME(_var)] #define DBG_IVAR(_var) (*(DBG_IVARSTRUCT(_var).pval)) #define INTERNAL_VAR(_var,_val,_ref,_typ) DBG_IVARNAME(_var), enum debug_int_var { #include "intvar.h" DBG_IV_LAST }; #undef INTERNAL_VAR #endif /* __WINE_DEBUGGER_H */ wine-20000526/debugger/display.c0100644000175000001440000000523207103022473016037 0ustar julliardusers/* * File display.c - display handling for Wine internal debugger. * * Copyright (C) 1997, Eric Youngdale. * */ #include #include #include #include #include "debugger.h" #include #define MAX_DISPLAY 25 struct display { struct expr * exp; int count; char format; }; static struct display displaypoints[MAX_DISPLAY]; int DEBUG_AddDisplay(struct expr * exp, int count, char format) { int i; /* * First find a slot where we can store this display. */ for(i=0; i < MAX_DISPLAY; i++ ) { if( displaypoints[i].exp == NULL ) { displaypoints[i].exp = DEBUG_CloneExpr(exp); displaypoints[i].count = count; displaypoints[i].format = format; break; } } return TRUE; } int DEBUG_InfoDisplay(void) { int i; /* * First find a slot where we can store this display. */ for(i=0; i < MAX_DISPLAY; i++ ) { if( displaypoints[i].exp != NULL ) { DEBUG_Printf(DBG_CHN_MESG, "%d : ", i+1); DEBUG_DisplayExpr(displaypoints[i].exp); DEBUG_Printf(DBG_CHN_MESG, "\n"); } } return TRUE; } int DEBUG_DoDisplay(void) { DBG_VALUE value; int i; /* * First find a slot where we can store this display. */ for(i=0; i < MAX_DISPLAY; i++ ) { if( displaypoints[i].exp != NULL ) { value = DEBUG_EvalExpr(displaypoints[i].exp); if( value.type == NULL ) { DEBUG_Printf(DBG_CHN_MESG, "Unable to evaluate expression "); DEBUG_DisplayExpr(displaypoints[i].exp); DEBUG_Printf(DBG_CHN_MESG, "\nDisabling...\n"); DEBUG_DelDisplay(i); } else { DEBUG_Printf(DBG_CHN_MESG, "%d : ", i + 1); DEBUG_DisplayExpr(displaypoints[i].exp); DEBUG_Printf(DBG_CHN_MESG, " = "); if( displaypoints[i].format == 'i' ) { DEBUG_ExamineMemory( &value, displaypoints[i].count, displaypoints[i].format); } else { DEBUG_Print( &value, displaypoints[i].count, displaypoints[i].format, 0); } } } } return TRUE; } int DEBUG_DelDisplay(int displaynum) { int i; if( displaynum >= MAX_DISPLAY || displaynum == 0 || displaynum < -1 ) { DEBUG_Printf(DBG_CHN_MESG, "Invalid display number\n"); return TRUE; } if( displaynum == -1 ) { for(i=0; i < MAX_DISPLAY; i++ ) { if( displaypoints[i].exp != NULL ) { DEBUG_FreeExpr(displaypoints[i].exp); displaypoints[i].exp = NULL; } } } else if( displaypoints[displaynum - 1].exp != NULL ) { DEBUG_FreeExpr(displaypoints[displaynum - 1].exp); displaypoints[displaynum - 1].exp = NULL; } return TRUE; } wine-20000526/debugger/editline.c0100644000175000001440000005210407104063145016171 0ustar julliardusers/* * Line-editing routines * * Copyright 1992 Simmule Turner and Rich Salz. All rights reserved. * * * This software is not subject to any license of the American Telephone * and Telegraph Company or of the Regents of the University of California. * * Permission is granted to anyone to use this software for any purpose on * any computer system, and to alter it and redistribute it freely, subject * to the following restrictions: * 1. The authors are not responsible for the consequences of use of this * software, no matter how awful, even if they arise from flaws in it. * 2. The origin of this software must not be misrepresented, either by * explicit claim or by omission. Since few users ever read sources, * credits must appear in the documentation. * 3. Altered versions must be plainly marked as such, and must not be * misrepresented as being the original software. Since few users * ever read sources, credits must appear in the documentation. * 4. This notice may not be removed or altered. * * The code was heavily simplified for inclusion in Wine. -- AJ */ #include "config.h" #include #include #include #include #include "windef.h" #include "wincon.h" #include "debugger.h" /* ** Manifest constants. */ #define SCREEN_WIDTH 80 #define SCREEN_ROWS 24 #define NO_ARG (-1) #define DEL 127 #define CTL(x) ((x) & 0x1F) #define ISCTL(x) ((x) && (x) < ' ') #define UNCTL(x) ((x) + 64) #define META(x) ((x) | 0x80) #define ISMETA(x) ((x) & 0x80) #define UNMETA(x) ((x) & 0x7F) #if !defined(HIST_SIZE) #define HIST_SIZE 20 #endif /* !defined(HIST_SIZE) */ #define CRLF "\r\n" #define MEM_INC 64 #define SCREEN_INC 256 #define DISPOSE(p) DBG_free((char *)(p)) #define NEW(T, c) \ ((T *)DBG_alloc((unsigned int)(sizeof (T) * (c)))) #define RENEW(p, T, c) \ (p = (T *)DBG_realloc((char *)(p), (unsigned int)(sizeof (T) * (c)))) #define COPYFROMTO(new, p, len) \ (void)memcpy((char *)(new), (char *)(p), (int)(len)) /* ** Command status codes. */ typedef enum _STATUS { CSdone, CSeof, CSmove, CSdispatch, CSstay } STATUS; /* ** The type of case-changing to perform. */ typedef enum _CASE { TOupper, TOlower } CASE; /* ** Key to command mapping. */ typedef struct _KEYMAP { CHAR Key; STATUS (*Function)(); } KEYMAP; /* ** Command history structure. */ typedef struct _HISTORY { int Size; int Pos; CHAR *Lines[HIST_SIZE]; } HISTORY; /* ** Globals. */ static int rl_eof; static int rl_erase; static int rl_intr; static int rl_kill; static CHAR NIL[] = ""; static const CHAR *Input = NIL; static CHAR *Line; static const char *Prompt; static CHAR *Yanked; static char *Screen; static char NEWLINE[]= CRLF; static HISTORY H; static int rl_quit; static int Repeat; static int End; static int Mark; static int OldPoint; static int Point; static int PushBack; static int Pushed; static KEYMAP Map[33]; static KEYMAP MetaMap[16]; static size_t Length; static size_t ScreenCount; static size_t ScreenSize; static char *backspace; static int TTYwidth; static int TTYrows; /* Display print 8-bit chars as `M-x' or as the actual 8-bit char? */ int rl_meta_chars = 1; /* ** Declarations. */ static CHAR *editinput(); /* ** TTY input/output functions. */ static void rl_ttyset(int Reset) { static DWORD old_mode; if (Reset == 0) { GetConsoleMode(GetStdHandle(STD_INPUT_HANDLE), &old_mode); SetConsoleMode(GetStdHandle(STD_INPUT_HANDLE), 0 /*ENABLE_PROCESSED_INPUT|ENABLE_WINDOW_INPUT|ENABLE_MOUSE_INPUT*/); } else { SetConsoleMode(GetStdHandle(STD_INPUT_HANDLE), old_mode); } } static void TTYflush(void) { if (ScreenCount) { DEBUG_Output(DBG_CHN_MESG, Screen, ScreenCount); ScreenCount = 0; } } static void TTYput(CHAR c) { Screen[ScreenCount] = c; if (++ScreenCount >= ScreenSize - 1) { ScreenSize += SCREEN_INC; RENEW(Screen, char, ScreenSize); } } static void TTYputs(CHAR *p) { while (*p) TTYput(*p++); } static void TTYshow(CHAR c) { if (c == DEL) { TTYput('^'); TTYput('?'); } else if (ISCTL(c)) { TTYput('^'); TTYput(UNCTL(c)); } else if (rl_meta_chars && ISMETA(c)) { TTYput('M'); TTYput('-'); TTYput(UNMETA(c)); } else TTYput(c); } static void TTYstring(CHAR *p) { while (*p) TTYshow(*p++); } static unsigned int TTYget(void) { CHAR c; DWORD retv; TTYflush(); if (Pushed) { Pushed = 0; return PushBack; } if (*Input) return *Input++; for (;;) { /* data available ? */ if (ReadConsole(GetStdHandle(STD_INPUT_HANDLE), &c, 1, &retv, NULL) && retv == 1) return c; switch (WaitForSingleObject(GetStdHandle(STD_INPUT_HANDLE), INFINITE)) { case WAIT_OBJECT_0: break; default: DEBUG_Printf(DBG_CHN_FIXME, "shouldn't happen\n"); /* fall thru */ case WAIT_ABANDONED: case WAIT_TIMEOUT: return EOF; } } } #define TTYback() (backspace ? TTYputs((CHAR *)backspace) : TTYput('\b')) static void TTYbackn(int n) { while (--n >= 0) TTYback(); } static void TTYinfo(void) { COORD c = GetLargestConsoleWindowSize(GetStdHandle(STD_INPUT_HANDLE)); TTYwidth = c.X; TTYrows = c.Y; } static void reposition(void) { int i; CHAR *p; TTYput('\r'); TTYputs((CHAR *)Prompt); for (i = Point, p = Line; --i >= 0; p++) TTYshow(*p); } static void left(STATUS Change) { TTYback(); if (Point) { if (ISCTL(Line[Point - 1])) TTYback(); else if (rl_meta_chars && ISMETA(Line[Point - 1])) { TTYback(); TTYback(); } } if (Change == CSmove) Point--; } static void right(STATUS Change) { TTYshow(Line[Point]); if (Change == CSmove) Point++; } static STATUS ring_bell(void) { TTYput('\07'); TTYflush(); return CSstay; } static STATUS do_macro(unsigned int c) { CHAR name[4]; name[0] = '_'; name[1] = c; name[2] = '_'; name[3] = '\0'; if ((Input = (CHAR *)getenv((char *)name)) == NULL) { Input = NIL; return ring_bell(); } return CSstay; } static STATUS do_forward(STATUS move) { int i; CHAR *p; i = 0; do { p = &Line[Point]; for ( ; Point < End && (*p == ' ' || !isalnum(*p)); Point++, p++) if (move == CSmove) right(CSstay); for (; Point < End && isalnum(*p); Point++, p++) if (move == CSmove) right(CSstay); if (Point == End) break; } while (++i < Repeat); return CSstay; } static STATUS do_case(CASE type) { int i; int end; int count; CHAR *p; (void)do_forward(CSstay); if (OldPoint != Point) { if ((count = Point - OldPoint) < 0) count = -count; Point = OldPoint; if ((end = Point + count) > End) end = End; for (i = Point, p = &Line[i]; i < end; i++, p++) { if (type == TOupper) { if (islower(*p)) *p = toupper(*p); } else if (isupper(*p)) *p = tolower(*p); right(CSmove); } } return CSstay; } static STATUS case_down_word(void) { return do_case(TOlower); } static STATUS case_up_word(void) { return do_case(TOupper); } static void ceol(void) { int extras; int i; CHAR *p; for (extras = 0, i = Point, p = &Line[i]; i <= End; i++, p++) { TTYput(' '); if (ISCTL(*p)) { TTYput(' '); extras++; } else if (rl_meta_chars && ISMETA(*p)) { TTYput(' '); TTYput(' '); extras += 2; } } for (i += extras; i > Point; i--) TTYback(); } static void clear_line(void) { Point = -strlen(Prompt); TTYput('\r'); ceol(); Point = 0; End = 0; Line[0] = '\0'; } static STATUS insert_string(CHAR *p) { size_t len; int i; CHAR *new; CHAR *q; len = strlen((char *)p); if (End + len >= Length) { if ((new = NEW(CHAR, Length + len + MEM_INC)) == NULL) return CSstay; if (Length) { COPYFROMTO(new, Line, Length); DISPOSE(Line); } Line = new; Length += len + MEM_INC; } for (q = &Line[Point], i = End - Point; --i >= 0; ) q[len + i] = q[i]; COPYFROMTO(&Line[Point], p, len); End += len; Line[End] = '\0'; TTYstring(&Line[Point]); Point += len; return Point == End ? CSstay : CSmove; } static CHAR * next_hist(void) { return H.Pos >= H.Size - 1 ? NULL : H.Lines[++H.Pos]; } static CHAR * prev_hist() { return H.Pos == 0 ? NULL : H.Lines[--H.Pos]; } static STATUS do_insert_hist(CHAR *p) { if (p == NULL) return ring_bell(); Point = 0; reposition(); ceol(); End = 0; return insert_string(p); } static STATUS do_hist(CHAR *(*move)(void)) { CHAR *p; int i; i = 0; do { if ((p = (*move)()) == NULL) return ring_bell(); } while (++i < Repeat); return do_insert_hist(p); } static STATUS h_next(void) { return do_hist(next_hist); } static STATUS h_prev(void) { return do_hist(prev_hist); } static STATUS h_first(void) { return do_insert_hist(H.Lines[H.Pos = 0]); } static STATUS h_last(void) { return do_insert_hist(H.Lines[H.Pos = H.Size - 1]); } /* ** Return zero if pat appears as a substring in text. */ static int substrcmp(char *text, char *pat, int len) { CHAR c; if ((c = *pat) == '\0') return *text == '\0'; for ( ; *text; text++) if ((CHAR)*text == c && strncmp(text, pat, len) == 0) return 0; return 1; } static CHAR * search_hist(CHAR *search, CHAR *(*move)(void)) { static CHAR *old_search; int len; int pos; int (*match)(); char *pat; /* Save or get remembered search pattern. */ if (search && *search) { if (old_search) DISPOSE(old_search); old_search = (CHAR *)DBG_strdup((char *)search); } else { if (old_search == NULL || *old_search == '\0') return NULL; search = old_search; } /* Set up pattern-finder. */ if (*search == '^') { match = strncmp; pat = (char *)(search + 1); } else { match = substrcmp; pat = (char *)search; } len = strlen(pat); for (pos = H.Pos; (*move)() != NULL; ) if ((*match)((char *)H.Lines[H.Pos], pat, len) == 0) return H.Lines[H.Pos]; H.Pos = pos; return NULL; } static STATUS h_search(void) { static int Searching; const char *old_prompt; CHAR *(*move)(); CHAR *p; if (Searching) return ring_bell(); Searching = 1; clear_line(); old_prompt = Prompt; Prompt = "Search: "; TTYputs((CHAR *)Prompt); move = Repeat == NO_ARG ? prev_hist : next_hist; p = search_hist(editinput(), move); clear_line(); Prompt = old_prompt; TTYputs((CHAR *)Prompt); Searching = 0; return do_insert_hist(p); } static STATUS fd_char(void) { int i; i = 0; do { if (Point >= End) break; right(CSmove); } while (++i < Repeat); return CSstay; } static void save_yank(int begin, int i) { if (Yanked) { DISPOSE(Yanked); Yanked = NULL; } if (i < 1) return; if ((Yanked = NEW(CHAR, (size_t)i + 1)) != NULL) { COPYFROMTO(Yanked, &Line[begin], i); Yanked[i] = '\0'; } } static STATUS delete_string(int count) { int i; CHAR *p; if (count <= 0 || End == Point) return ring_bell(); if (count == 1 && Point == End - 1) { /* Optimize common case of delete at end of line. */ End--; p = &Line[Point]; i = 1; TTYput(' '); if (ISCTL(*p)) { i = 2; TTYput(' '); } else if (rl_meta_chars && ISMETA(*p)) { i = 3; TTYput(' '); TTYput(' '); } TTYbackn(i); *p = '\0'; return CSmove; } if (Point + count > End && (count = End - Point) <= 0) return CSstay; if (count > 1) save_yank(Point, count); for (p = &Line[Point], i = End - (Point + count) + 1; --i >= 0; p++) p[0] = p[count]; ceol(); End -= count; TTYstring(&Line[Point]); return CSmove; } static STATUS bk_char(void) { int i; i = 0; do { if (Point == 0) break; left(CSmove); } while (++i < Repeat); return CSstay; } static STATUS bk_del_char(void) { int i; i = 0; do { if (Point == 0) break; left(CSmove); } while (++i < Repeat); return delete_string(i); } static STATUS redisplay(void) { TTYputs((CHAR *)NEWLINE); TTYputs((CHAR *)Prompt); TTYstring(Line); return CSmove; } static STATUS kill_line(void) { int i; if (Repeat != NO_ARG) { if (Repeat < Point) { i = Point; Point = Repeat; reposition(); (void)delete_string(i - Point); } else if (Repeat > Point) { right(CSmove); (void)delete_string(Repeat - Point - 1); } return CSmove; } save_yank(Point, End - Point); Line[Point] = '\0'; ceol(); End = Point; return CSstay; } static STATUS insert_char(int c) { STATUS s; CHAR buff[2]; CHAR *p; CHAR *q; int i; if (Repeat == NO_ARG || Repeat < 2) { buff[0] = c; buff[1] = '\0'; return insert_string(buff); } if ((p = NEW(CHAR, Repeat + 1)) == NULL) return CSstay; for (i = Repeat, q = p; --i >= 0; ) *q++ = c; *q = '\0'; Repeat = 0; s = insert_string(p); DISPOSE(p); return s; } static STATUS meta(void) { unsigned int c; KEYMAP *kp; if ((c = TTYget()) == EOF) return CSeof; /* Also include VT-100 arrows. */ if (c == '[' || c == 'O') switch (c = TTYget()) { default: return ring_bell(); case EOF: return CSeof; case 'A': return h_prev(); case 'B': return h_next(); case 'C': return fd_char(); case 'D': return bk_char(); } if (isdigit(c)) { for (Repeat = c - '0'; (c = TTYget()) != EOF && isdigit(c); ) Repeat = Repeat * 10 + c - '0'; Pushed = 1; PushBack = c; return CSstay; } if (isupper(c)) return do_macro(c); for (OldPoint = Point, kp = MetaMap; kp->Function; kp++) if (kp->Key == c) return (*kp->Function)(); return ring_bell(); } static STATUS emacs(unsigned int c) { STATUS s; KEYMAP *kp; if (ISMETA(c)) { Pushed = 1; PushBack = UNMETA(c); return meta(); } for (kp = Map; kp->Function; kp++) if (kp->Key == c) break; s = kp->Function ? (*kp->Function)() : insert_char((int)c); if (!Pushed) /* No pushback means no repeat count; hacky, but true. */ Repeat = NO_ARG; return s; } static STATUS TTYspecial(unsigned int c) { if (ISMETA(c)) return CSdispatch; if (c == rl_erase || c == DEL) return bk_del_char(); if (c == rl_kill) { if (Point != 0) { Point = 0; reposition(); } Repeat = NO_ARG; return kill_line(); } if (c == rl_intr || c == rl_quit) { Point = End = 0; Line[0] = '\0'; return redisplay(); } if (c == rl_eof && Point == 0 && End == 0) return CSeof; return CSdispatch; } static CHAR * editinput(void) { unsigned int c; Repeat = NO_ARG; OldPoint = Point = Mark = End = 0; Line[0] = '\0'; while ((c = TTYget()) != EOF) switch (TTYspecial(c)) { case CSdone: return Line; case CSeof: return NULL; case CSmove: reposition(); break; case CSdispatch: switch (emacs(c)) { case CSdone: return Line; case CSeof: return NULL; case CSmove: reposition(); break; case CSdispatch: case CSstay: break; } break; case CSstay: break; } return NULL; } static void hist_add(CHAR *p) { int i; if ((p = (CHAR *)DBG_strdup((char *)p)) == NULL) return; if (H.Size < HIST_SIZE) H.Lines[H.Size++] = p; else { DISPOSE(H.Lines[0]); for (i = 0; i < HIST_SIZE - 1; i++) H.Lines[i] = H.Lines[i + 1]; H.Lines[i] = p; } H.Pos = H.Size - 1; } char * readline(const char *prompt) { CHAR *line; if (Line == NULL) { Length = MEM_INC; if ((Line = NEW(CHAR, Length)) == NULL) return NULL; } TTYinfo(); rl_ttyset(0); hist_add(NIL); ScreenSize = SCREEN_INC; Screen = NEW(char, ScreenSize); Prompt = prompt ? prompt : (char *)NIL; TTYputs((CHAR *)Prompt); if ((line = editinput()) != NULL) { line = (CHAR *)DBG_strdup((char *)line); TTYputs((CHAR *)NEWLINE); TTYflush(); } rl_ttyset(1); DISPOSE(Screen); DISPOSE(H.Lines[--H.Size]); return (char *)line; } void add_history(char *p) { if (p == NULL || *p == '\0') return; #if defined(UNIQUE_HISTORY) if (H.Pos && strcmp(p, H.Lines[H.Pos - 1]) == 0) return; #endif /* defined(UNIQUE_HISTORY) */ hist_add((CHAR *)p); } static STATUS beg_line(void) { if (Point) { Point = 0; return CSmove; } return CSstay; } static STATUS del_char(void) { return delete_string(Repeat == NO_ARG ? 1 : Repeat); } static STATUS end_line(void) { if (Point != End) { Point = End; return CSmove; } return CSstay; } static STATUS accept_line(void) { Line[End] = '\0'; return CSdone; } static STATUS transpose(void) { CHAR c; if (Point) { if (Point == End) left(CSmove); c = Line[Point - 1]; left(CSstay); Line[Point - 1] = Line[Point]; TTYshow(Line[Point - 1]); Line[Point++] = c; TTYshow(c); } return CSstay; } static STATUS quote(void) { unsigned int c; return (c = TTYget()) == EOF ? CSeof : insert_char((int)c); } static STATUS wipe(void) { int i; if (Mark > End) return ring_bell(); if (Point > Mark) { i = Point; Point = Mark; Mark = i; reposition(); } return delete_string(Mark - Point); } static STATUS mk_set(void) { Mark = Point; return CSstay; } static STATUS exchange(void) { unsigned int c; if ((c = TTYget()) != CTL('X')) return c == EOF ? CSeof : ring_bell(); if ((c = Mark) <= End) { Mark = Point; Point = c; return CSmove; } return CSstay; } static STATUS yank(void) { if (Yanked && *Yanked) return insert_string(Yanked); return CSstay; } static STATUS copy_region(void) { if (Mark > End) return ring_bell(); if (Point > Mark) save_yank(Mark, Point - Mark); else save_yank(Point, Mark - Point); return CSstay; } static STATUS move_to_char(void) { unsigned int c; int i; CHAR *p; if ((c = TTYget()) == EOF) return CSeof; for (i = Point + 1, p = &Line[i]; i < End; i++, p++) if (*p == c) { Point = i; return CSmove; } return CSstay; } static STATUS fd_word(void) { return do_forward(CSmove); } static STATUS fd_kill_word(void) { int i; (void)do_forward(CSstay); if (OldPoint != Point) { i = Point - OldPoint; Point = OldPoint; return delete_string(i); } return CSstay; } static STATUS bk_word(void) { int i; CHAR *p; i = 0; do { for (p = &Line[Point]; p > Line && !isalnum(p[-1]); p--) left(CSmove); for (; p > Line && p[-1] != ' ' && isalnum(p[-1]); p--) left(CSmove); if (Point == 0) break; } while (++i < Repeat); return CSstay; } static STATUS bk_kill_word(void) { (void)bk_word(); if (OldPoint != Point) return delete_string(OldPoint - Point); return CSstay; } static int argify(CHAR *line, CHAR ***avp) { CHAR *c; CHAR **p; CHAR **new; int ac; int i; i = MEM_INC; if ((*avp = p = NEW(CHAR*, i))== NULL) return 0; for (c = line; isspace(*c); c++) continue; if (*c == '\n' || *c == '\0') return 0; for (ac = 0, p[ac++] = c; *c && *c != '\n'; ) { if (isspace(*c)) { *c++ = '\0'; if (*c && *c != '\n') { if (ac + 1 == i) { new = NEW(CHAR*, i + MEM_INC); if (new == NULL) { p[ac] = NULL; return ac; } COPYFROMTO(new, p, i * sizeof (char **)); i += MEM_INC; DISPOSE(p); *avp = p = new; } p[ac++] = c; } } else c++; } *c = '\0'; p[ac] = NULL; return ac; } static STATUS last_argument(void) { CHAR **av; CHAR *p; STATUS s; int ac; if (H.Size == 1 || (p = H.Lines[H.Size - 2]) == NULL) return ring_bell(); if ((p = (CHAR *)DBG_strdup((char *)p)) == NULL) return CSstay; ac = argify(p, &av); if (Repeat != NO_ARG) s = Repeat < ac ? insert_string(av[Repeat]) : ring_bell(); else s = ac ? insert_string(av[ac - 1]) : CSstay; if (ac) DISPOSE(av); DISPOSE(p); return s; } static KEYMAP Map[33] = { { CTL('@'), ring_bell }, { CTL('A'), beg_line }, { CTL('B'), bk_char }, { CTL('D'), del_char }, { CTL('E'), end_line }, { CTL('F'), fd_char }, { CTL('G'), ring_bell }, { CTL('H'), bk_del_char }, { CTL('I'), ring_bell }, { CTL('J'), accept_line }, { CTL('K'), kill_line }, { CTL('L'), redisplay }, { CTL('M'), accept_line }, { CTL('N'), h_next }, { CTL('O'), ring_bell }, { CTL('P'), h_prev }, { CTL('Q'), ring_bell }, { CTL('R'), h_search }, { CTL('S'), ring_bell }, { CTL('T'), transpose }, { CTL('U'), ring_bell }, { CTL('V'), quote }, { CTL('W'), wipe }, { CTL('X'), exchange }, { CTL('Y'), yank }, { CTL('Z'), ring_bell }, { CTL('['), meta }, { CTL(']'), move_to_char }, { CTL('^'), ring_bell }, { CTL('_'), ring_bell }, { 0, NULL } }; static KEYMAP MetaMap[16]= { { CTL('H'), bk_kill_word }, { DEL, bk_kill_word }, { ' ', mk_set }, { '.', last_argument }, { '<', h_first }, { '>', h_last }, { '?', ring_bell }, { 'b', bk_word }, { 'd', fd_kill_word }, { 'f', fd_word }, { 'l', case_down_word }, { 'u', case_up_word }, { 'y', yank }, { 'w', copy_region }, { 0, NULL } }; wine-20000526/debugger/expr.c0100644000175000001440000005076307103022473015361 0ustar julliardusers/* * File expr.c - expression handling for Wine internal debugger. * * Copyright (C) 1997, Eric Youngdale. * */ #include "config.h" #include #include #include "winbase.h" #include "wine/winbase16.h" #include "task.h" #include "debugger.h" #include "expr.h" #include struct expr { unsigned int perm; unsigned int type:31; union { struct { int value; } constant; struct { const char * str; } string; struct { unsigned int value; } u_const; struct { const char * name; } symbol; struct { const char * name; } intvar; struct { int unop_type; struct expr * exp1; int result; } unop; struct { int binop_type; int result; struct expr * exp1; struct expr * exp2; } binop; struct { struct datatype * cast; struct expr * expr; } cast; struct { struct expr * exp1; const char * element_name; int result; } structure; struct { struct expr * base; struct expr * index; } array; struct { const char * funcname; int nargs; int result; struct expr * arg[5]; } call; } un; }; #define EXPR_TYPE_CONST 0 #define EXPR_TYPE_US_CONST 1 #define EXPR_TYPE_SYMBOL 2 #define EXPR_TYPE_INTVAR 3 #define EXPR_TYPE_BINOP 4 #define EXPR_TYPE_UNOP 5 #define EXPR_TYPE_STRUCT 6 #define EXPR_TYPE_PSTRUCT 7 #define EXPR_TYPE_ARRAY 8 #define EXPR_TYPE_CALL 9 #define EXPR_TYPE_STRING 10 #define EXPR_TYPE_CAST 11 static char expr_list[4096]; static int next_expr_free = 0; /* * This is how we turn an expression address into the actual value. * This works well in the 32 bit domain - not sure at all about the * 16 bit world. */ #define VAL(_exp) DEBUG_GetExprValue(&_exp, NULL) static struct expr * DEBUG_GetFreeExpr(void) { struct expr * rtn; rtn = (struct expr *) &expr_list[next_expr_free]; next_expr_free += sizeof(struct expr); assert(next_expr_free < sizeof(expr_list)); return rtn; } void DEBUG_FreeExprMem(void) { next_expr_free = 0; } struct expr * DEBUG_TypeCastExpr(struct datatype * dt, struct expr * exp) { struct expr * ex; ex = DEBUG_GetFreeExpr(); ex->type = EXPR_TYPE_CAST; ex->un.cast.cast = dt; ex->un.cast.expr = exp; return ex; } struct expr * DEBUG_IntVarExpr(const char* name) { struct expr * ex; ex = DEBUG_GetFreeExpr(); ex->type = EXPR_TYPE_INTVAR; ex->un.intvar.name = name; return ex; } struct expr * DEBUG_SymbolExpr(const char * name) { struct expr * ex; ex = DEBUG_GetFreeExpr(); ex->type = EXPR_TYPE_SYMBOL; ex->un.symbol.name = name; return ex; } struct expr * DEBUG_ConstExpr(int value) { struct expr * ex; ex = DEBUG_GetFreeExpr(); ex->type = EXPR_TYPE_CONST; ex->un.constant.value = value; return ex; } struct expr * DEBUG_StringExpr(const char * str) { struct expr * ex; char * pnt; ex = DEBUG_GetFreeExpr(); ex->type = EXPR_TYPE_STRING; ex->un.string.str = str+1; pnt = strrchr(ex->un.string.str, '"'); if( pnt != NULL ) { *pnt = '\0'; } return ex; } struct expr * DEBUG_USConstExpr(unsigned int value) { struct expr * ex; ex = DEBUG_GetFreeExpr(); ex->type = EXPR_TYPE_CONST; ex->un.u_const.value = value; return ex; } struct expr * DEBUG_BinopExpr(int operator_type, struct expr * exp1, struct expr * exp2) { struct expr * ex; ex = DEBUG_GetFreeExpr(); ex->type = EXPR_TYPE_BINOP; ex->un.binop.binop_type = operator_type; ex->un.binop.exp1 = exp1; ex->un.binop.exp2 = exp2; return ex; } struct expr * DEBUG_UnopExpr(int operator_type, struct expr * exp1) { struct expr * ex; ex = DEBUG_GetFreeExpr(); ex->type = EXPR_TYPE_UNOP; ex->un.unop.unop_type = operator_type; ex->un.unop.exp1 = exp1; return ex; } struct expr * DEBUG_StructExpr(struct expr * exp, const char * element) { struct expr * ex; ex = DEBUG_GetFreeExpr(); ex->type = EXPR_TYPE_STRUCT; ex->un.structure.exp1 = exp; ex->un.structure.element_name = element; return ex; } struct expr * DEBUG_StructPExpr(struct expr * exp, const char * element) { struct expr * ex; ex = DEBUG_GetFreeExpr(); ex->type = EXPR_TYPE_PSTRUCT; ex->un.structure.exp1 = exp; ex->un.structure.element_name = element; return ex; } struct expr * DEBUG_CallExpr(const char * funcname, int nargs, ...) { struct expr * ex; va_list ap; int i; ex = DEBUG_GetFreeExpr(); ex->type = EXPR_TYPE_CALL; ex->un.call.funcname = funcname; ex->un.call.nargs = nargs; va_start(ap, nargs); for(i=0; i < nargs; i++) { ex->un.call.arg[i] = va_arg(ap, struct expr *); } va_end(ap); return ex; } DBG_VALUE DEBUG_EvalExpr(struct expr * exp) { DBG_VALUE rtn; int i; DBG_VALUE exp1; DBG_VALUE exp2; unsigned int cexp[5]; int scale1; int scale2; int scale3; struct datatype * type1; struct datatype * type2; rtn.type = NULL; rtn.addr.off = 0; rtn.addr.seg = 0; switch(exp->type) { case EXPR_TYPE_CAST: rtn = DEBUG_EvalExpr(exp->un.cast.expr); rtn.type = exp->un.cast.cast; if (DEBUG_GetType(rtn.type) == DT_POINTER) rtn.cookie = DV_TARGET; break; case EXPR_TYPE_STRING: rtn.type = DEBUG_TypeString; rtn.cookie = DV_HOST; rtn.addr.off = (unsigned int) &exp->un.string.str; rtn.addr.seg = 0; break; case EXPR_TYPE_CONST: rtn.type = DEBUG_TypeIntConst; rtn.cookie = DV_HOST; rtn.addr.off = (unsigned int) &exp->un.constant.value; rtn.addr.seg = 0; break; case EXPR_TYPE_US_CONST: rtn.type = DEBUG_TypeUSInt; rtn.cookie = DV_HOST; rtn.addr.off = (unsigned int) &exp->un.u_const.value; rtn.addr.seg = 0; break; case EXPR_TYPE_SYMBOL: if( !DEBUG_GetSymbolValue(exp->un.symbol.name, -1, &rtn, FALSE) ) { RaiseException(DEBUG_STATUS_NO_SYMBOL, 0, 0, NULL); } break; case EXPR_TYPE_PSTRUCT: exp1 = DEBUG_EvalExpr(exp->un.structure.exp1); if( exp1.type == NULL ) { RaiseException(DEBUG_STATUS_BAD_TYPE, 0, 0, NULL); } rtn.cookie = DV_TARGET; rtn.addr.off = DEBUG_TypeDerefPointer(&exp1, &type1); if( type1 == NULL ) { RaiseException(DEBUG_STATUS_BAD_TYPE, 0, 0, NULL); } rtn.type = type1; DEBUG_FindStructElement(&rtn, exp->un.structure.element_name, &exp->un.structure.result); break; case EXPR_TYPE_STRUCT: exp1 = DEBUG_EvalExpr(exp->un.structure.exp1); if( exp1.type == NULL ) { RaiseException(DEBUG_STATUS_BAD_TYPE, 0, 0, NULL); } rtn = exp1; DEBUG_FindStructElement(&rtn, exp->un.structure.element_name, &exp->un.structure.result); break; case EXPR_TYPE_CALL: /* * First, evaluate all of the arguments. If any of them are not * evaluable, then bail. */ for(i=0; i < exp->un.call.nargs; i++) { exp1 = DEBUG_EvalExpr(exp->un.call.arg[i]); if( exp1.type == NULL ) { return rtn; } cexp[i] = DEBUG_GetExprValue(&exp1, NULL); } /* * Now look up the address of the function itself. */ if( !DEBUG_GetSymbolValue(exp->un.call.funcname, -1, &rtn, FALSE ) ) { RaiseException(DEBUG_STATUS_NO_SYMBOL, 0, 0, NULL); } #if 0 /* FIXME: NEWDBG NIY */ /* Anyway, I wonder how this could work depending on the calling order of * the function (cdecl vs pascal for example) */ int (*fptr)(); fptr = (int (*)()) rtn.addr.off; switch(exp->un.call.nargs) { case 0: exp->un.call.result = (*fptr)(); break; case 1: exp->un.call.result = (*fptr)(cexp[0]); break; case 2: exp->un.call.result = (*fptr)(cexp[0], cexp[1]); break; case 3: exp->un.call.result = (*fptr)(cexp[0], cexp[1], cexp[2]); break; case 4: exp->un.call.result = (*fptr)(cexp[0], cexp[1], cexp[2], cexp[3]); break; case 5: exp->un.call.result = (*fptr)(cexp[0], cexp[1], cexp[2], cexp[3], cexp[4]); break; } #else DEBUG_Printf(DBG_CHN_MESG, "Function call no longer implemented\n"); /* would need to set up a call to this function, and then restore the current * context afterwards... */ exp->un.call.result = 0; #endif rtn.type = DEBUG_TypeInt; rtn.cookie = DV_HOST; rtn.addr.off = (unsigned int) &exp->un.call.result; break; case EXPR_TYPE_INTVAR: { DBG_INTVAR* div = DEBUG_GetIntVar(exp->un.intvar.name); if (!div) RaiseException(DEBUG_STATUS_NO_SYMBOL, 0, 0, NULL); rtn.cookie = DV_HOST; rtn.type = div->type; rtn.addr.off = (unsigned int)div->pval; /* EPP FIXME rtn.addr.seg = ?? */ } break; case EXPR_TYPE_BINOP: exp1 = DEBUG_EvalExpr(exp->un.binop.exp1); exp2 = DEBUG_EvalExpr(exp->un.binop.exp2); rtn.cookie = DV_HOST; if( exp1.type == NULL || exp2.type == NULL ) { RaiseException(DEBUG_STATUS_BAD_TYPE, 0, 0, NULL); } if( exp1.type == DEBUG_TypeIntConst && exp2.type == DEBUG_TypeIntConst ) { rtn.type = exp1.type; } else { rtn.type = DEBUG_TypeInt; } rtn.addr.seg = 0; rtn.addr.off = (unsigned int) &exp->un.binop.result; switch(exp->un.binop.binop_type) { case EXP_OP_ADD: type1 = DEBUG_GetPointerType(exp1.type); type2 = DEBUG_GetPointerType(exp2.type); scale1 = 1; scale2 = 1; if( type1 != NULL && type2 != NULL ) { RaiseException(DEBUG_STATUS_BAD_TYPE, 0, 0, NULL); } else if( type1 != NULL ) { scale2 = DEBUG_GetObjectSize(type1); rtn.type = exp1.type; } else if( type2 != NULL ) { scale1 = DEBUG_GetObjectSize(type2); rtn.type = exp2.type; } exp->un.binop.result = (VAL(exp1) * scale1 + scale2 * VAL(exp2)); break; case EXP_OP_SUB: type1 = DEBUG_GetPointerType(exp1.type); type2 = DEBUG_GetPointerType(exp2.type); scale1 = 1; scale2 = 1; scale3 = 1; if( type1 != NULL && type2 != NULL ) { if( type1 != type2 ) { RaiseException(DEBUG_STATUS_BAD_TYPE, 0, 0, NULL); } scale3 = DEBUG_GetObjectSize(type1); } else if( type1 != NULL ) { scale2 = DEBUG_GetObjectSize(type1); rtn.type = exp1.type; } else if( type2 != NULL ) { scale1 = DEBUG_GetObjectSize(type2); rtn.type = exp2.type; } exp->un.binop.result = (VAL(exp1) - VAL(exp2)) / scale3; break; case EXP_OP_SEG: rtn.cookie = DV_TARGET; rtn.addr.seg = VAL(exp1); exp->un.binop.result = VAL(exp2); #ifdef __i386__ DEBUG_FixSegment(&rtn.addr); #endif break; case EXP_OP_LOR: exp->un.binop.result = (VAL(exp1) || VAL(exp2)); break; case EXP_OP_LAND: exp->un.binop.result = (VAL(exp1) && VAL(exp2)); break; case EXP_OP_OR: exp->un.binop.result = (VAL(exp1) | VAL(exp2)); break; case EXP_OP_AND: exp->un.binop.result = (VAL(exp1) & VAL(exp2)); break; case EXP_OP_XOR: exp->un.binop.result = (VAL(exp1) ^ VAL(exp2)); break; case EXP_OP_EQ: exp->un.binop.result = (VAL(exp1) == VAL(exp2)); break; case EXP_OP_GT: exp->un.binop.result = (VAL(exp1) > VAL(exp2)); break; case EXP_OP_LT: exp->un.binop.result = (VAL(exp1) < VAL(exp2)); break; case EXP_OP_GE: exp->un.binop.result = (VAL(exp1) >= VAL(exp2)); break; case EXP_OP_LE: exp->un.binop.result = (VAL(exp1) <= VAL(exp2)); break; case EXP_OP_NE: exp->un.binop.result = (VAL(exp1) != VAL(exp2)); break; case EXP_OP_SHL: exp->un.binop.result = ((unsigned) VAL(exp1) << VAL(exp2)); break; case EXP_OP_SHR: exp->un.binop.result = ((unsigned) VAL(exp1) >> VAL(exp2)); break; case EXP_OP_MUL: exp->un.binop.result = (VAL(exp1) * VAL(exp2)); break; case EXP_OP_DIV: if( VAL(exp2) == 0 ) { RaiseException(DEBUG_STATUS_DIV_BY_ZERO, 0, 0, NULL); } exp->un.binop.result = (VAL(exp1) / VAL(exp2)); break; case EXP_OP_REM: if( VAL(exp2) == 0 ) { RaiseException(DEBUG_STATUS_DIV_BY_ZERO, 0, 0, NULL); } exp->un.binop.result = (VAL(exp1) % VAL(exp2)); break; case EXP_OP_ARR: DEBUG_ArrayIndex(&exp1, &rtn, VAL(exp2)); break; default: RaiseException(DEBUG_STATUS_INTERNAL_ERROR, 0, 0, NULL); break; } break; case EXPR_TYPE_UNOP: exp1 = DEBUG_EvalExpr(exp->un.unop.exp1); rtn.cookie = DV_HOST; if( exp1.type == NULL ) { RaiseException(DEBUG_STATUS_BAD_TYPE, 0, 0, NULL); } rtn.addr.seg = 0; rtn.addr.off = (unsigned int) &exp->un.unop.result; if( exp1.type == DEBUG_TypeIntConst ) { rtn.type = exp1.type; } else { rtn.type = DEBUG_TypeInt; } switch(exp->un.unop.unop_type) { case EXP_OP_NEG: exp->un.unop.result = -VAL(exp1); break; case EXP_OP_NOT: exp->un.unop.result = !VAL(exp1); break; case EXP_OP_LNOT: exp->un.unop.result = ~VAL(exp1); break; case EXP_OP_DEREF: rtn.cookie = exp1.cookie; rtn.addr.off = (unsigned int) DEBUG_TypeDerefPointer(&exp1, &rtn.type); if (!rtn.type) { RaiseException(DEBUG_STATUS_BAD_TYPE, 0, 0, NULL); } break; case EXP_OP_FORCE_DEREF: rtn.cookie = exp1.cookie; rtn.addr.seg = exp1.addr.seg; if (exp1.cookie == DV_TARGET) DEBUG_READ_MEM((void*)exp1.addr.off, &rtn.addr.off, sizeof(rtn.addr.off)); else memcpy(&rtn.addr.off, (void*)exp1.addr.off, sizeof(rtn.addr.off)); break; case EXP_OP_ADDR: /* FIXME: even for a 16 bit entity ? */ rtn.cookie = DV_TARGET; rtn.type = DEBUG_FindOrMakePointerType(exp1.type); exp->un.unop.result = exp1.addr.off; break; default: RaiseException(DEBUG_STATUS_INTERNAL_ERROR, 0, 0, NULL); } break; default: DEBUG_Printf(DBG_CHN_MESG,"Unexpected expression (%d).\n", exp->type); RaiseException(DEBUG_STATUS_INTERNAL_ERROR, 0, 0, NULL); break; } assert(rtn.cookie == DV_TARGET || rtn.cookie == DV_HOST); return rtn; } int DEBUG_DisplayExpr(const struct expr * exp) { int i; switch(exp->type) { case EXPR_TYPE_CAST: DEBUG_Printf(DBG_CHN_MESG, "(("); DEBUG_PrintTypeCast(exp->un.cast.cast); DEBUG_Printf(DBG_CHN_MESG, ")"); DEBUG_DisplayExpr(exp->un.cast.expr); DEBUG_Printf(DBG_CHN_MESG, ")"); break; case EXPR_TYPE_INTVAR: DEBUG_Printf(DBG_CHN_MESG, "$%s", exp->un.intvar.name); break; case EXPR_TYPE_US_CONST: DEBUG_Printf(DBG_CHN_MESG, "%ud", exp->un.u_const.value); break; case EXPR_TYPE_CONST: DEBUG_Printf(DBG_CHN_MESG, "%d", exp->un.u_const.value); break; case EXPR_TYPE_STRING: DEBUG_Printf(DBG_CHN_MESG, "\"%s\"", exp->un.string.str); break; case EXPR_TYPE_SYMBOL: DEBUG_Printf(DBG_CHN_MESG, "%s" , exp->un.symbol.name); break; case EXPR_TYPE_PSTRUCT: DEBUG_DisplayExpr(exp->un.structure.exp1); DEBUG_Printf(DBG_CHN_MESG, "->%s", exp->un.structure.element_name); break; case EXPR_TYPE_STRUCT: DEBUG_DisplayExpr(exp->un.structure.exp1); DEBUG_Printf(DBG_CHN_MESG, ".%s", exp->un.structure.element_name); break; case EXPR_TYPE_CALL: DEBUG_Printf(DBG_CHN_MESG, "%s(",exp->un.call.funcname); for(i=0; i < exp->un.call.nargs; i++) { DEBUG_DisplayExpr(exp->un.call.arg[i]); if( i != exp->un.call.nargs - 1 ) { DEBUG_Printf(DBG_CHN_MESG, ", "); } } DEBUG_Printf(DBG_CHN_MESG, ")"); break; case EXPR_TYPE_BINOP: DEBUG_Printf(DBG_CHN_MESG, "( "); DEBUG_DisplayExpr(exp->un.binop.exp1); switch(exp->un.binop.binop_type) { case EXP_OP_ADD: DEBUG_Printf(DBG_CHN_MESG, " + "); break; case EXP_OP_SUB: DEBUG_Printf(DBG_CHN_MESG, " - "); break; case EXP_OP_SEG: DEBUG_Printf(DBG_CHN_MESG, ":"); break; case EXP_OP_LOR: DEBUG_Printf(DBG_CHN_MESG, " || "); break; case EXP_OP_LAND: DEBUG_Printf(DBG_CHN_MESG, " && "); break; case EXP_OP_OR: DEBUG_Printf(DBG_CHN_MESG, " | "); break; case EXP_OP_AND: DEBUG_Printf(DBG_CHN_MESG, " & "); break; case EXP_OP_XOR: DEBUG_Printf(DBG_CHN_MESG, " ^ "); break; case EXP_OP_EQ: DEBUG_Printf(DBG_CHN_MESG, " == "); break; case EXP_OP_GT: DEBUG_Printf(DBG_CHN_MESG, " > "); break; case EXP_OP_LT: DEBUG_Printf(DBG_CHN_MESG, " < "); break; case EXP_OP_GE: DEBUG_Printf(DBG_CHN_MESG, " >= "); break; case EXP_OP_LE: DEBUG_Printf(DBG_CHN_MESG, " <= "); break; case EXP_OP_NE: DEBUG_Printf(DBG_CHN_MESG, " != "); break; case EXP_OP_SHL: DEBUG_Printf(DBG_CHN_MESG, " << "); break; case EXP_OP_SHR: DEBUG_Printf(DBG_CHN_MESG, " >> "); break; case EXP_OP_MUL: DEBUG_Printf(DBG_CHN_MESG, " * "); break; case EXP_OP_DIV: DEBUG_Printf(DBG_CHN_MESG, " / "); break; case EXP_OP_REM: DEBUG_Printf(DBG_CHN_MESG, " %% "); break; case EXP_OP_ARR: DEBUG_Printf(DBG_CHN_MESG, "["); break; default: break; } DEBUG_DisplayExpr(exp->un.binop.exp2); if( exp->un.binop.binop_type == EXP_OP_ARR ) { DEBUG_Printf(DBG_CHN_MESG, "]"); } DEBUG_Printf(DBG_CHN_MESG, " )"); break; case EXPR_TYPE_UNOP: switch(exp->un.unop.unop_type) { case EXP_OP_NEG: DEBUG_Printf(DBG_CHN_MESG, "-"); break; case EXP_OP_NOT: DEBUG_Printf(DBG_CHN_MESG, "!"); break; case EXP_OP_LNOT: DEBUG_Printf(DBG_CHN_MESG, "~"); break; case EXP_OP_DEREF: DEBUG_Printf(DBG_CHN_MESG, "*"); break; case EXP_OP_ADDR: DEBUG_Printf(DBG_CHN_MESG, "&"); break; } DEBUG_DisplayExpr(exp->un.unop.exp1); break; default: DEBUG_Printf(DBG_CHN_MESG,"Unexpected expression.\n"); RaiseException(DEBUG_STATUS_INTERNAL_ERROR, 0, 0, NULL); break; } return TRUE; } struct expr * DEBUG_CloneExpr(const struct expr * exp) { int i; struct expr * rtn; rtn = (struct expr *) DBG_alloc(sizeof(struct expr)); /* * First copy the contents of the expression itself. */ *rtn = *exp; switch(exp->type) { case EXPR_TYPE_CAST: rtn->un.cast.expr = DEBUG_CloneExpr(exp->un.cast.expr); break; case EXPR_TYPE_INTVAR: rtn->un.intvar.name = DBG_strdup(exp->un.intvar.name); break; case EXPR_TYPE_US_CONST: case EXPR_TYPE_CONST: break; case EXPR_TYPE_STRING: rtn->un.string.str = DBG_strdup(exp->un.string.str); break; case EXPR_TYPE_SYMBOL: rtn->un.symbol.name = DBG_strdup(exp->un.symbol.name); break; case EXPR_TYPE_PSTRUCT: case EXPR_TYPE_STRUCT: rtn->un.structure.exp1 = DEBUG_CloneExpr(exp->un.structure.exp1); rtn->un.structure.element_name = DBG_strdup(exp->un.structure.element_name); break; case EXPR_TYPE_CALL: for(i=0; i < exp->un.call.nargs; i++) { rtn->un.call.arg[i] = DEBUG_CloneExpr(exp->un.call.arg[i]); } rtn->un.call.funcname = DBG_strdup(exp->un.call.funcname); break; case EXPR_TYPE_BINOP: rtn->un.binop.exp1 = DEBUG_CloneExpr(exp->un.binop.exp1); rtn->un.binop.exp2 = DEBUG_CloneExpr(exp->un.binop.exp2); break; case EXPR_TYPE_UNOP: rtn->un.unop.exp1 = DEBUG_CloneExpr(exp->un.unop.exp1); break; default: DEBUG_Printf(DBG_CHN_MESG,"Unexpected expression.\n"); RaiseException(DEBUG_STATUS_INTERNAL_ERROR, 0, 0, NULL); break; } return rtn; } /* * Recursively go through an expression tree and free all memory associated * with it. */ int DEBUG_FreeExpr(struct expr * exp) { int i; switch(exp->type) { case EXPR_TYPE_CAST: DEBUG_FreeExpr(exp->un.cast.expr); break; case EXPR_TYPE_INTVAR: DBG_free((char *) exp->un.intvar.name); break; case EXPR_TYPE_US_CONST: case EXPR_TYPE_CONST: break; case EXPR_TYPE_STRING: DBG_free((char *) exp->un.string.str); break; case EXPR_TYPE_SYMBOL: DBG_free((char *) exp->un.symbol.name); break; case EXPR_TYPE_PSTRUCT: case EXPR_TYPE_STRUCT: DEBUG_FreeExpr(exp->un.structure.exp1); DBG_free((char *) exp->un.structure.element_name); break; case EXPR_TYPE_CALL: for(i=0; i < exp->un.call.nargs; i++) { DEBUG_FreeExpr(exp->un.call.arg[i]); } DBG_free((char *) exp->un.call.funcname); break; case EXPR_TYPE_BINOP: DEBUG_FreeExpr(exp->un.binop.exp1); DEBUG_FreeExpr(exp->un.binop.exp2); break; case EXPR_TYPE_UNOP: DEBUG_FreeExpr(exp->un.unop.exp1); break; default: DEBUG_Printf(DBG_CHN_MESG,"Unexpected expression.\n"); RaiseException(DEBUG_STATUS_INTERNAL_ERROR, 0, 0, NULL); break; } DBG_free(exp); return TRUE; } wine-20000526/debugger/expr.h0100644000175000001440000000121706602337747015374 0ustar julliardusers#define EXP_OP_LOR 0x01 #define EXP_OP_LAND 0x02 #define EXP_OP_OR 0x03 #define EXP_OP_AND 0x04 #define EXP_OP_XOR 0x05 #define EXP_OP_EQ 0x06 #define EXP_OP_GT 0x07 #define EXP_OP_LT 0x08 #define EXP_OP_GE 0x09 #define EXP_OP_LE 0x0a #define EXP_OP_NE 0x0b #define EXP_OP_SHL 0x0c #define EXP_OP_SHR 0x0d #define EXP_OP_ADD 0x0e #define EXP_OP_SUB 0x0f #define EXP_OP_MUL 0x10 #define EXP_OP_DIV 0x11 #define EXP_OP_REM 0x12 #define EXP_OP_NEG 0x13 #define EXP_OP_NOT 0x24 #define EXP_OP_LNOT 0x25 #define EXP_OP_DEREF 0x26 #define EXP_OP_ADDR 0x27 #define EXP_OP_ARR 0x28 #define EXP_OP_SEG 0x29 #define EXP_OP_FORCE_DEREF 0x2a wine-20000526/debugger/hash.c0100644000175000001440000007175707103022473015334 0ustar julliardusers/* * File hash.c - generate hash tables for Wine debugger symbols * * Copyright (C) 1993, Eric Youngdale. */ #include "config.h" #include #include #include #include #include #include "debugger.h" #define NR_NAME_HASH 16384 #ifndef PATH_MAX #define PATH_MAX _MAX_PATH #endif #ifdef __i386__ static char * reg_name[] = { "eax", "ecx", "edx", "ebx", "esp", "ebp", "esi", "edi" }; static unsigned reg_ofs[] = { FIELD_OFFSET(CONTEXT, Eax), FIELD_OFFSET(CONTEXT, Ecx), FIELD_OFFSET(CONTEXT, Edx), FIELD_OFFSET(CONTEXT, Ebx), FIELD_OFFSET(CONTEXT, Esp), FIELD_OFFSET(CONTEXT, Ebp), FIELD_OFFSET(CONTEXT, Esi), FIELD_OFFSET(CONTEXT, Edi) }; #else static char * reg_name[] = { NULL }; /* FIXME */ static unsigned reg_ofs[] = { 0 }; #endif struct name_hash { struct name_hash * next; /* Used to look up within name hash */ char * name; char * sourcefile; int n_locals; int locals_alloc; WineLocals * local_vars; int n_lines; int lines_alloc; WineLineNo * linetab; DBG_VALUE value; unsigned short flags; unsigned short breakpoint_offset; unsigned int symbol_size; }; static BOOL DEBUG_GetStackSymbolValue( const char * name, DBG_VALUE *value ); static int sortlist_valid = FALSE; static int sorttab_nsym; static struct name_hash ** addr_sorttab = NULL; static struct name_hash * name_hash_table[NR_NAME_HASH]; static unsigned int name_hash( const char * name ) { unsigned int hash = 0; unsigned int tmp; const char * p; p = name; while (*p) { hash = (hash << 4) + *p++; if( (tmp = (hash & 0xf0000000)) ) { hash ^= tmp >> 24; } hash &= ~tmp; } return hash % NR_NAME_HASH; } int DEBUG_cmp_sym(const void * p1, const void * p2) { struct name_hash ** name1 = (struct name_hash **) p1; struct name_hash ** name2 = (struct name_hash **) p2; if( ((*name1)->flags & SYM_INVALID) != 0 ) { return -1; } if( ((*name2)->flags & SYM_INVALID) != 0 ) { return 1; } if( (*name1)->value.addr.seg > (*name2)->value.addr.seg ) { return 1; } if( (*name1)->value.addr.seg < (*name2)->value.addr.seg ) { return -1; } if( (*name1)->value.addr.off > (*name2)->value.addr.off ) { return 1; } if( (*name1)->value.addr.off < (*name2)->value.addr.off ) { return -1; } return 0; } /*********************************************************************** * DEBUG_ResortSymbols * * Rebuild sorted list of symbols. */ static void DEBUG_ResortSymbols(void) { struct name_hash *nh; int nsym = 0; int i; for(i=0; inext) { if( (nh->flags & SYM_INVALID) == 0 ) nsym++; else DEBUG_Printf( DBG_CHN_MESG, "Symbol %s is invalid\n", nh->name ); } } sorttab_nsym = nsym; if( nsym == 0 ) { return; } addr_sorttab = (struct name_hash **) DBG_realloc(addr_sorttab, nsym * sizeof(struct name_hash *)); nsym = 0; for(i=0; inext) { if( (nh->flags & SYM_INVALID) == 0 ) addr_sorttab[nsym++] = nh; } } qsort(addr_sorttab, nsym, sizeof(struct name_hash *), DEBUG_cmp_sym); sortlist_valid = TRUE; } /*********************************************************************** * DEBUG_AddSymbol * * Add a symbol to the table. */ struct name_hash * DEBUG_AddSymbol( const char * name, const DBG_VALUE *value, const char * source, int flags) { struct name_hash * new; struct name_hash *nh; static char prev_source[PATH_MAX] = {'\0', }; static char * prev_duped_source = NULL; char * c; int hash; assert(value->cookie == DV_TARGET || value->cookie == DV_HOST); hash = name_hash(name); for (nh = name_hash_table[hash]; nh; nh = nh->next) { if( ((nh->flags & SYM_INVALID) != 0) && strcmp(name, nh->name) == 0 ) { #if 0 DEBUG_Printf(DBG_CHN_MESG, "Changing address for symbol %s (%08lx:%08lx => %08lx:%08lx)\n", name, nh->value.addr.seg, nh->value.addr.off, value->addr.seg, value->addr.off); #endif nh->value.addr = value->addr; if( nh->value.type == NULL && value->type != NULL ) { nh->value.type = value->type; nh->value.cookie = value->cookie; } /* it may happen that the same symbol is defined in several compilation * units, but the linker decides to merge it into a single instance. * in that case, we don't clear the invalid flag for all the compilation * units (N_GSYM), and wait to get the symbol from the symtab */ if ((flags & SYM_INVALID) == 0) nh->flags &= ~SYM_INVALID; return nh; } if (nh->value.addr.seg == value->addr.seg && nh->value.addr.off == value->addr.off && strcmp(name, nh->name) == 0 ) { return nh; } } #if 0 DEBUG_Printf(DBG_CHN_TRACE, "adding symbol (%s) from file '%s' at 0x%04lx:%08lx\n", name, source, value->addr.seg, value->addr.off); #endif /* * First see if we already have an entry for this symbol. If so * return it, so we don't end up with duplicates. */ new = (struct name_hash *) DBG_alloc(sizeof(struct name_hash)); new->value = *value; new->name = DBG_strdup(name); if( source != NULL ) { /* * This is an enhancement to reduce memory consumption. The idea * is that we duplicate a given string only once. This is a big * win if there are lots of symbols defined in a given source file. */ if( strcmp(source, prev_source) == 0 ) { new->sourcefile = prev_duped_source; } else { strcpy(prev_source, source); prev_duped_source = new->sourcefile = DBG_strdup(source); } } else { new->sourcefile = NULL; } new->n_lines = 0; new->lines_alloc = 0; new->linetab = NULL; new->n_locals = 0; new->locals_alloc = 0; new->local_vars = NULL; new->flags = flags; new->next = NULL; /* Now insert into the hash table */ new->next = name_hash_table[hash]; name_hash_table[hash] = new; /* * Check some heuristics based upon the file name to see whether * we want to step through this guy or not. These are machine generated * assembly files that are used to translate between the MS way of * calling things and the GCC way of calling things. In general we * always want to step through. */ if( source != NULL ) { c = strrchr(source, '.'); if( c != NULL && strcmp(c, ".s") == 0 ) { c = strrchr(source, '/'); if( c != NULL ) { c++; if( (strcmp(c, "callfrom16.s") == 0) || (strcmp(c, "callto16.s") == 0) || (strcmp(c, "call32.s") == 0) ) { new->flags |= SYM_TRAMPOLINE; } } } } sortlist_valid = FALSE; return new; } BOOL DEBUG_Normalize(struct name_hash * nh ) { /* * We aren't adding any more locals or linenumbers to this function. * Free any spare memory that we might have allocated. */ if( nh == NULL ) { return TRUE; } if( nh->n_locals != nh->locals_alloc ) { nh->locals_alloc = nh->n_locals; nh->local_vars = DBG_realloc(nh->local_vars, nh->locals_alloc * sizeof(WineLocals)); } if( nh->n_lines != nh->lines_alloc ) { nh->lines_alloc = nh->n_lines; nh->linetab = DBG_realloc(nh->linetab, nh->lines_alloc * sizeof(WineLineNo)); } return TRUE; } /*********************************************************************** * DEBUG_GetSymbolValue * * Get the address of a named symbol. */ BOOL DEBUG_GetSymbolValue( const char * name, const int lineno, DBG_VALUE *value, int bp_flag ) { char buffer[256]; struct name_hash *nh; for(nh = name_hash_table[name_hash(name)]; nh; nh = nh->next) { if( (nh->flags & SYM_INVALID) != 0 ) { continue; } if (!strcmp(nh->name, name)) break; } if (!nh && (name[0] != '_')) { buffer[0] = '_'; strcpy(buffer+1, name); for(nh = name_hash_table[name_hash(buffer)]; nh; nh = nh->next) { if( (nh->flags & SYM_INVALID) != 0 ) { continue; } if (!strcmp(nh->name, buffer)) break; } } /* * If we don't have anything here, then try and see if this * is a local symbol to the current stack frame. No matter * what, we have nothing more to do, so we let that function * decide what we ultimately return. */ if (!nh) { return DEBUG_GetStackSymbolValue(name, value); } value->type = nh->value.type; value->cookie = nh->value.cookie; return DEBUG_GetLineNumberAddr( nh, lineno, &value->addr, bp_flag ); } /*********************************************************************** * DEBUG_GetLineNumberAddr * * Get the address of a named symbol. */ BOOL DEBUG_GetLineNumberAddr( struct name_hash * nh, const int lineno, DBG_ADDR *addr, int bp_flag ) { int i; if( lineno == -1 ) { *addr = nh->value.addr; if( bp_flag ) { addr->off += nh->breakpoint_offset; } } else { /* * Search for the specific line number. If we don't find it, * then return FALSE. */ if( nh->linetab == NULL ) { return FALSE; } for(i=0; i < nh->n_lines; i++ ) { if( nh->linetab[i].line_number == lineno ) { *addr = nh->linetab[i].pc_offset; return TRUE; } } /* * This specific line number not found. */ return FALSE; } return TRUE; } /*********************************************************************** * DEBUG_SetSymbolValue * * Set the address of a named symbol. */ BOOL DEBUG_SetSymbolValue( const char * name, const DBG_VALUE *value ) { char buffer[256]; struct name_hash *nh; assert(value->cookie == DV_TARGET || value->cookie == DV_HOST); for(nh = name_hash_table[name_hash(name)]; nh; nh = nh->next) if (!strcmp(nh->name, name)) break; if (!nh && (name[0] != '_')) { buffer[0] = '_'; strcpy(buffer+1, name); for(nh = name_hash_table[name_hash(buffer)]; nh; nh = nh->next) if (!strcmp(nh->name, buffer)) break; } if (!nh) return FALSE; nh->value = *value; nh->flags &= ~SYM_INVALID; DEBUG_FixAddress( &nh->value.addr, DEBUG_context.SegDs ); return TRUE; } /*********************************************************************** * DEBUG_FindNearestSymbol * * Find the symbol nearest to a given address. * If ebp is specified as non-zero, it means we should dump the argument * list into the string we return as well. */ const char * DEBUG_FindNearestSymbol( const DBG_ADDR *addr, int flag, struct name_hash ** rtn, unsigned int ebp, struct list_id * source) { static char name_buffer[MAX_PATH + 256]; static char arglist[1024]; static char argtmp[256]; struct name_hash * nearest = NULL; int mid, high, low; unsigned int * ptr; int lineno; char * lineinfo, *sourcefile; int i; char linebuff[16]; unsigned val; if( rtn != NULL ) { *rtn = NULL; } if( source != NULL ) { source->sourcefile = NULL; source->line = -1; } if( sortlist_valid == FALSE ) { DEBUG_ResortSymbols(); } if( sortlist_valid == FALSE ) { return NULL; } /* * FIXME - use the binary search that we added to * the function DEBUG_CheckLinenoStatus. Better yet, we should * probably keep some notion of the current function so we don't * have to search every time. */ /* * Binary search to find closest symbol. */ low = 0; high = sorttab_nsym; if( addr_sorttab[0]->value.addr.seg > addr->seg || ( addr_sorttab[0]->value.addr.seg == addr->seg && addr_sorttab[0]->value.addr.off > addr->off) ) { nearest = NULL; } else if( addr_sorttab[high - 1]->value.addr.seg < addr->seg || ( addr_sorttab[high - 1]->value.addr.seg == addr->seg && addr_sorttab[high - 1]->value.addr.off < addr->off) ) { nearest = addr_sorttab[high - 1]; } else { while(1==1) { mid = (high + low)/2; if( mid == low ) { /* * See if there are any other entries that might also * have the same address, and would also have a line * number table. */ if( mid > 0 && addr_sorttab[mid]->linetab == NULL ) { if( (addr_sorttab[mid - 1]->value.addr.seg == addr_sorttab[mid]->value.addr.seg) && (addr_sorttab[mid - 1]->value.addr.off == addr_sorttab[mid]->value.addr.off) && (addr_sorttab[mid - 1]->linetab != NULL) ) { mid--; } } if( (mid < sorttab_nsym - 1) && (addr_sorttab[mid]->linetab == NULL) ) { if( (addr_sorttab[mid + 1]->value.addr.seg == addr_sorttab[mid]->value.addr.seg) && (addr_sorttab[mid + 1]->value.addr.off == addr_sorttab[mid]->value.addr.off) && (addr_sorttab[mid + 1]->linetab != NULL) ) { mid++; } } nearest = addr_sorttab[mid]; #if 0 DEBUG_Printf(DBG_CHN_MESG, "Found %x:%x when looking for %x:%x %x %s\n", addr_sorttab[mid ]->value.addr.seg, addr_sorttab[mid ]->value.addr.off, addr->seg, addr->off, addr_sorttab[mid ]->linetab, addr_sorttab[mid ]->name); #endif break; } if( (addr_sorttab[mid]->value.addr.seg < addr->seg) || ( addr_sorttab[mid]->value.addr.seg == addr->seg && addr_sorttab[mid]->value.addr.off <= addr->off) ) { low = mid; } else { high = mid; } } } if (!nearest) return NULL; if( rtn != NULL ) { *rtn = nearest; } /* * Fill in the relevant bits to the structure so that we can * locate the source and line for this bit of code. */ if( source != NULL ) { source->sourcefile = nearest->sourcefile; if( nearest->linetab == NULL ) { source->line = -1; } else { source->line = nearest->linetab[0].line_number; } } lineinfo = ""; lineno = -1; /* * Prepare to display the argument list. If ebp is specified, it is * the framepointer for the function in question. If not specified, * we don't want the arglist. */ memset(arglist, '\0', sizeof(arglist)); if( ebp != 0 ) { for(i=0; i < nearest->n_locals; i++ ) { /* * If this is a register (offset == 0) or a local * variable, we don't want to know about it. */ if( nearest->local_vars[i].offset <= 0 ) { continue; } ptr = (unsigned int *) (ebp + nearest->local_vars[i].offset); if( arglist[0] == '\0' ) { arglist[0] = '('; } else { strcat(arglist, ", "); } DEBUG_READ_MEM_VERBOSE(ptr, &val, sizeof(val)); sprintf(argtmp, "%s=0x%x", nearest->local_vars[i].name, val); strcat(arglist, argtmp); } if( arglist[0] == '(' ) { strcat(arglist, ")"); } } if( (nearest->sourcefile != NULL) && (flag == TRUE) && (addr->off - nearest->value.addr.off < 0x100000) ) { /* * Try and find the nearest line number to the current offset. */ if( nearest->linetab != NULL ) { low = 0; high = nearest->n_lines; while ((high - low) > 1) { mid = (high + low) / 2; if (addr->off < nearest->linetab[mid].pc_offset.off) high = mid; else low = mid; } lineno = nearest->linetab[low].line_number; } if( lineno != -1 ) { sprintf(linebuff, ":%d", lineno); lineinfo = linebuff; if( source != NULL ) { source->line = lineno; } } /* Remove the path from the file name */ sourcefile = strrchr( nearest->sourcefile, '/' ); if (!sourcefile) sourcefile = nearest->sourcefile; else sourcefile++; if (addr->off == nearest->value.addr.off) sprintf( name_buffer, "%s%s [%s%s]", nearest->name, arglist, sourcefile, lineinfo); else sprintf( name_buffer, "%s+0x%lx%s [%s%s]", nearest->name, addr->off - nearest->value.addr.off, arglist, sourcefile, lineinfo ); } else { if (addr->off == nearest->value.addr.off) sprintf( name_buffer, "%s%s", nearest->name, arglist); else { if (addr->seg && (nearest->value.addr.seg!=addr->seg)) return NULL; else sprintf( name_buffer, "%s+0x%lx%s", nearest->name, addr->off - nearest->value.addr.off, arglist); } } return name_buffer; } /*********************************************************************** * DEBUG_ReadSymbolTable * * Read a symbol file into the hash table. */ void DEBUG_ReadSymbolTable( const char * filename ) { FILE * symbolfile; DBG_VALUE value; char type; char * cpnt; char buffer[256]; char name[256]; if (!(symbolfile = fopen(filename, "r"))) { DEBUG_Printf( DBG_CHN_WARN, "Unable to open symbol table %s\n", filename ); return; } DEBUG_Printf( DBG_CHN_MESG, "Reading symbols from file %s\n", filename ); value.type = NULL; value.addr.seg = 0; value.addr.off = 0; value.cookie = DV_TARGET; while (1) { fgets( buffer, sizeof(buffer), symbolfile ); if (feof(symbolfile)) break; /* Strip any text after a # sign (i.e. comments) */ cpnt = buffer; while (*cpnt) if(*cpnt++ == '#') { *cpnt = 0; break; } /* Quietly ignore any lines that have just whitespace */ cpnt = buffer; while(*cpnt) { if(*cpnt != ' ' && *cpnt != '\t') break; cpnt++; } if (!(*cpnt) || *cpnt == '\n') continue; if (sscanf(buffer, "%lx %c %s", &value.addr.off, &type, name) == 3) DEBUG_AddSymbol( name, &value, NULL, SYM_WINE ); } fclose(symbolfile); } void DEBUG_AddLineNumber( struct name_hash * func, int line_num, unsigned long offset ) { if( func == NULL ) { return; } if( func->n_lines + 1 >= func->lines_alloc ) { func->lines_alloc += 64; func->linetab = DBG_realloc(func->linetab, func->lines_alloc * sizeof(WineLineNo)); } func->linetab[func->n_lines].line_number = line_num; func->linetab[func->n_lines].pc_offset.seg = func->value.addr.seg; func->linetab[func->n_lines].pc_offset.off = func->value.addr.off + offset; func->n_lines++; } struct wine_locals * DEBUG_AddLocal( struct name_hash * func, int regno, int offset, int pc_start, int pc_end, char * name) { if( func == NULL ) { return NULL; } if( func->n_locals + 1 >= func->locals_alloc ) { func->locals_alloc += 32; func->local_vars = DBG_realloc(func->local_vars, func->locals_alloc * sizeof(WineLocals)); } func->local_vars[func->n_locals].regno = regno; func->local_vars[func->n_locals].offset = offset; func->local_vars[func->n_locals].pc_start = pc_start; func->local_vars[func->n_locals].pc_end = pc_end; func->local_vars[func->n_locals].name = DBG_strdup(name); func->local_vars[func->n_locals].type = NULL; func->n_locals++; return &func->local_vars[func->n_locals - 1]; } void DEBUG_DumpHashInfo(void) { int i; int depth; struct name_hash *nh; /* * Utility function to dump stats about the hash table. */ for(i=0; inext) { depth++; } DEBUG_Printf(DBG_CHN_MESG, "Bucket %d: %d\n", i, depth); } } /*********************************************************************** * DEBUG_CheckLinenoStatus * * Find the symbol nearest to a given address. * If ebp is specified as non-zero, it means we should dump the argument * list into the string we return as well. */ int DEBUG_CheckLinenoStatus( const DBG_ADDR *addr) { struct name_hash * nearest = NULL; int mid, high, low; if( sortlist_valid == FALSE ) { DEBUG_ResortSymbols(); } /* * Binary search to find closest symbol. */ low = 0; high = sorttab_nsym; if( addr_sorttab[0]->value.addr.seg > addr->seg || ( addr_sorttab[0]->value.addr.seg == addr->seg && addr_sorttab[0]->value.addr.off > addr->off) ) { nearest = NULL; } else if( addr_sorttab[high - 1]->value.addr.seg < addr->seg || ( addr_sorttab[high - 1]->value.addr.seg == addr->seg && addr_sorttab[high - 1]->value.addr.off < addr->off) ) { nearest = addr_sorttab[high - 1]; } else { while(1==1) { mid = (high + low)/2; if( mid == low ) { /* * See if there are any other entries that might also * have the same address, and would also have a line * number table. */ if( mid > 0 && addr_sorttab[mid]->linetab == NULL ) { if( (addr_sorttab[mid - 1]->value.addr.seg == addr_sorttab[mid]->value.addr.seg) && (addr_sorttab[mid - 1]->value.addr.off == addr_sorttab[mid]->value.addr.off) && (addr_sorttab[mid - 1]->linetab != NULL) ) { mid--; } } if( (mid < sorttab_nsym - 1) && (addr_sorttab[mid]->linetab == NULL) ) { if( (addr_sorttab[mid + 1]->value.addr.seg == addr_sorttab[mid]->value.addr.seg) && (addr_sorttab[mid + 1]->value.addr.off == addr_sorttab[mid]->value.addr.off) && (addr_sorttab[mid + 1]->linetab != NULL) ) { mid++; } } nearest = addr_sorttab[mid]; #if 0 DEBUG_Printf(DBG_CHN_MESG, "Found %x:%x when looking for %x:%x %x %s\n", addr_sorttab[mid ]->value.addr.seg, addr_sorttab[mid ]->value.addr.off, addr->seg, addr->off, addr_sorttab[mid ]->linetab, addr_sorttab[mid ]->name); #endif break; } if( (addr_sorttab[mid]->value.addr.seg < addr->seg) || ( addr_sorttab[mid]->value.addr.seg == addr->seg && addr_sorttab[mid]->value.addr.off <= addr->off) ) { low = mid; } else { high = mid; } } } if (!nearest) return FUNC_HAS_NO_LINES; if( nearest->flags & SYM_STEP_THROUGH ) { /* * This will cause us to keep single stepping until * we get to the other side somewhere. */ return NOT_ON_LINENUMBER; } if( (nearest->flags & SYM_TRAMPOLINE) ) { /* * This will cause us to keep single stepping until * we get to the other side somewhere. */ return FUNC_IS_TRAMPOLINE; } if( nearest->linetab == NULL ) { return FUNC_HAS_NO_LINES; } /* * We never want to stop on the first instruction of a function * even if it has it's own linenumber. Let the thing keep running * until it gets past the function prologue. We only do this if there * is more than one line number for the function, of course. */ if( nearest->value.addr.off == addr->off && nearest->n_lines > 1 ) { return NOT_ON_LINENUMBER; } if( (nearest->sourcefile != NULL) && (addr->off - nearest->value.addr.off < 0x100000) ) { low = 0; high = nearest->n_lines; while ((high - low) > 1) { mid = (high + low) / 2; if (addr->off < nearest->linetab[mid].pc_offset.off) high = mid; else low = mid; } if (addr->off == nearest->linetab[low].pc_offset.off) return AT_LINENUMBER; else return NOT_ON_LINENUMBER; } return FUNC_HAS_NO_LINES; } /*********************************************************************** * DEBUG_GetFuncInfo * * Find the symbol nearest to a given address. * Returns sourcefile name and line number in a format that the listing * handler can deal with. */ void DEBUG_GetFuncInfo( struct list_id * ret, const char * filename, const char * name) { char buffer[256]; char * pnt; struct name_hash *nh; for(nh = name_hash_table[name_hash(name)]; nh; nh = nh->next) { if( filename != NULL ) { if( nh->sourcefile == NULL ) { continue; } pnt = strrchr(nh->sourcefile, '/'); if( strcmp(nh->sourcefile, filename) != 0 && (pnt == NULL || strcmp(pnt + 1, filename) != 0) ) { continue; } } if (!strcmp(nh->name, name)) break; } if (!nh && (name[0] != '_')) { buffer[0] = '_'; strcpy(buffer+1, name); for(nh = name_hash_table[name_hash(buffer)]; nh; nh = nh->next) { if( filename != NULL ) { if( nh->sourcefile == NULL ) { continue; } pnt = strrchr(nh->sourcefile, '/'); if( strcmp(nh->sourcefile, filename) != 0 && (pnt == NULL || strcmp(pnt + 1, filename) != 0) ) { continue; } } if (!strcmp(nh->name, buffer)) break; } } if( !nh ) { if( filename != NULL ) { DEBUG_Printf(DBG_CHN_MESG, "No such function %s in %s\n", name, filename); } else { DEBUG_Printf(DBG_CHN_MESG, "No such function %s\n", name); } ret->sourcefile = NULL; ret->line = -1; return; } ret->sourcefile = nh->sourcefile; /* * Search for the specific line number. If we don't find it, * then return FALSE. */ if( nh->linetab == NULL ) { ret->line = -1; } else { ret->line = nh->linetab[0].line_number; } } /*********************************************************************** * DEBUG_GetStackSymbolValue * * Get the address of a named symbol from the current stack frame. */ static BOOL DEBUG_GetStackSymbolValue( const char * name, DBG_VALUE *value ) { struct name_hash * curr_func; unsigned int ebp; unsigned int eip; int i; if( DEBUG_GetCurrentFrame(&curr_func, &eip, &ebp) == FALSE ) { return FALSE; } for(i=0; i < curr_func->n_locals; i++ ) { /* * Test the range of validity of the local variable. This * comes up with RBRAC/LBRAC stabs in particular. */ if( (curr_func->local_vars[i].pc_start != 0) && ((eip - curr_func->value.addr.off) < curr_func->local_vars[i].pc_start) ) { continue; } if( (curr_func->local_vars[i].pc_end != 0) && ((eip - curr_func->value.addr.off) > curr_func->local_vars[i].pc_end) ) { continue; } if( strcmp(name, curr_func->local_vars[i].name) == 0 ) { /* * OK, we found it. Now figure out what to do with this. */ if( curr_func->local_vars[i].regno != 0 ) { /* * Register variable. Point to DEBUG_context field. */ assert(curr_func->local_vars[i].regno - 1 < sizeof(reg_ofs)/sizeof(reg_ofs[0])); value->addr.off = ((DWORD)&DEBUG_context) + reg_ofs[curr_func->local_vars[i].regno - 1]; value->cookie = DV_HOST; } else { value->addr.off = ebp + curr_func->local_vars[i].offset; value->cookie = DV_TARGET; } value->addr.seg = 0; value->type = curr_func->local_vars[i].type; return TRUE; } } return FALSE; } int DEBUG_InfoLocals(void) { struct name_hash * curr_func; unsigned int ebp; unsigned int eip; int i; unsigned int * ptr; unsigned int val; if( DEBUG_GetCurrentFrame(&curr_func, &eip, &ebp) == FALSE ) { return FALSE; } for(i=0; i < curr_func->n_locals; i++ ) { /* * Test the range of validity of the local variable. This * comes up with RBRAC/LBRAC stabs in particular. */ if( (curr_func->local_vars[i].pc_start != 0) && ((eip - curr_func->value.addr.off) < curr_func->local_vars[i].pc_start) ) { continue; } if( (curr_func->local_vars[i].pc_end != 0) && ((eip - curr_func->value.addr.off) > curr_func->local_vars[i].pc_end) ) { continue; } if( curr_func->local_vars[i].regno != 0 ) { ptr = (unsigned int *)(((DWORD)&DEBUG_context) + reg_ofs[curr_func->local_vars[i].regno - 1]); DEBUG_Printf(DBG_CHN_MESG, "%s:%s (optimized into register $%s) == 0x%8.8x\n", curr_func->name, curr_func->local_vars[i].name, reg_name[curr_func->local_vars[i].regno - 1], *ptr); } else { DEBUG_READ_MEM_VERBOSE((void*)(ebp + curr_func->local_vars[i].offset), &val, sizeof(val)); DEBUG_Printf(DBG_CHN_MESG, "%s:%s == 0x%8.8x\n", curr_func->name, curr_func->local_vars[i].name, val); } } return TRUE; } int DEBUG_SetSymbolSize(struct name_hash * sym, unsigned int len) { sym->symbol_size = len; return TRUE; } int DEBUG_SetSymbolBPOff(struct name_hash * sym, unsigned int off) { sym->breakpoint_offset = off; return TRUE; } int DEBUG_GetSymbolAddr(struct name_hash * sym, DBG_ADDR * addr) { *addr = sym->value.addr; return TRUE; } int DEBUG_SetLocalSymbolType(struct wine_locals * sym, struct datatype * type) { sym->type = type; return TRUE; } wine-20000526/debugger/info.c0100644000175000001440000003721607106624617015347 0ustar julliardusers/* * Wine debugger utility routines * * Copyright 1993 Eric Youngdale * Copyright 1995 Alexandre Julliard */ #include "config.h" #include #include #include "winbase.h" #include "wingdi.h" #include "winuser.h" #include "toolhelp.h" #include "tlhelp32.h" #include "debugger.h" #include "expr.h" /*********************************************************************** * DEBUG_PrintBasic * * Implementation of the 'print' command. */ void DEBUG_PrintBasic( const DBG_VALUE* value, int count, char format ) { char * default_format; long long int res; assert(value->cookie == DV_TARGET || value->cookie == DV_HOST); if( value->type == NULL ) { DEBUG_Printf(DBG_CHN_MESG, "Unable to evaluate expression\n"); return; } default_format = NULL; res = DEBUG_GetExprValue(value, &default_format); switch(format) { case 'x': if (value->addr.seg) { DEBUG_nchar += DEBUG_Printf( DBG_CHN_MESG, "0x%04lx", (long unsigned int) res ); } else { DEBUG_nchar += DEBUG_Printf( DBG_CHN_MESG, "0x%08lx", (long unsigned int) res ); } break; case 'd': DEBUG_nchar += DEBUG_Printf( DBG_CHN_MESG, "%ld\n", (long int) res ); break; case 'c': DEBUG_nchar += DEBUG_Printf( DBG_CHN_MESG, "%d = '%c'", (char)(res & 0xff), (char)(res & 0xff) ); break; case 'i': case 's': case 'w': case 'b': DEBUG_Printf( DBG_CHN_MESG, "Format specifier '%c' is meaningless in 'print' command\n", format ); case 0: if( default_format != NULL ) { if (strstr(default_format, "%S") == NULL) { DEBUG_nchar += DEBUG_Printf( DBG_CHN_MESG, default_format, res ); } else { char* ptr; int state = 0; /* FIXME: simplistic implementation for default_format being * foo%Sbar => will print foo, then string then bar */ for (ptr = default_format; *ptr; ptr++) { DEBUG_Printf(DBG_CHN_MESG, "[%c]", *ptr); if (*ptr == '%') state++; else if (state == 1) { if (*ptr == 'S') { char ch; char* str = (char*)(long)res; for (; DEBUG_READ_MEM(str, &ch, 1) && ch; str++) { DEBUG_Output(DBG_CHN_MESG, &ch, 1); DEBUG_nchar++; } } else { /* shouldn't happen */ DEBUG_Printf(DBG_CHN_MESG, "%%%c", *ptr); DEBUG_nchar += 2; } state = 0; } else { DEBUG_Output(DBG_CHN_MESG, ptr, 1); DEBUG_nchar++; } } } } break; } } /*********************************************************************** * DEBUG_PrintAddress * * Print an 16- or 32-bit address, with the nearest symbol if any. */ struct symbol_info DEBUG_PrintAddress( const DBG_ADDR *addr, int addrlen, int flag ) { struct symbol_info rtn; const char *name = DEBUG_FindNearestSymbol( addr, flag, &rtn.sym, 0, &rtn.list ); if (addr->seg) DEBUG_Printf( DBG_CHN_MESG, "0x%04lx:", addr->seg&0xFFFF ); if (addrlen == 16) DEBUG_Printf( DBG_CHN_MESG, "0x%04lx", addr->off ); else DEBUG_Printf( DBG_CHN_MESG, "0x%08lx", addr->off ); if (name) DEBUG_Printf( DBG_CHN_MESG, " (%s)", name ); return rtn; } /*********************************************************************** * DEBUG_PrintAddressAndArgs * * Print an 16- or 32-bit address, with the nearest symbol if any. * Similar to DEBUG_PrintAddress, but we print the arguments to * each function (if known). This is useful in a backtrace. */ struct symbol_info DEBUG_PrintAddressAndArgs( const DBG_ADDR *addr, int addrlen, unsigned int ebp, int flag ) { struct symbol_info rtn; const char *name = DEBUG_FindNearestSymbol( addr, flag, &rtn.sym, ebp, &rtn.list ); if (addr->seg) DEBUG_Printf( DBG_CHN_MESG, "0x%04lx:", addr->seg ); if (addrlen == 16) DEBUG_Printf( DBG_CHN_MESG, "0x%04lx", addr->off ); else DEBUG_Printf( DBG_CHN_MESG, "0x%08lx", addr->off ); if (name) DEBUG_Printf( DBG_CHN_MESG, " (%s)", name ); return rtn; } /*********************************************************************** * DEBUG_Help * * Implementation of the 'help' command. */ void DEBUG_Help(void) { int i = 0; static const char * const helptext[] = { "The commands accepted by the Wine debugger are a reasonable", "subset of the commands that gdb accepts.", "The commands currently are:", " help quit", " break [*] delete break bpnum", " disable bpnum enable bpnum", " condition [] pass", " bt cont [N]", " step [N] next [N]", " stepi [N] nexti [N]", " x print ", " set = set * = ", " up down", " list disassemble [][,]", " frame finish", " show dir dir ", " display undisplay ", " delete display debugmsg [-+]\n", " mode [16,32] walk [wnd,class,queue,module,", " whatis process,modref ]", " info (see 'help info' for options)\n", "The 'x' command accepts repeat counts and formats (including 'i') in the", "same way that gdb does.\n", " The following are examples of legal expressions:", " $eax $eax+0x3 0x1000 ($eip + 256) *$eax *($esp + 3)", " Also, a nm format symbol table can be read from a file using the", " symbolfile command. Symbols can also be defined individually with", " the define command.", "", NULL }; while(helptext[i]) DEBUG_Printf(DBG_CHN_MESG,"%s\n", helptext[i++]); } /*********************************************************************** * DEBUG_HelpInfo * * Implementation of the 'help info' command. */ void DEBUG_HelpInfo(void) { int i = 0; static const char * const infotext[] = { "The info commands allow you to get assorted bits of interesting stuff", "to be displayed. The options are:", " info break Dumps information about breakpoints", " info display Shows auto-display expressions in use", " info locals Displays values of all local vars for current frame", " info maps Dumps all virtual memory mappings", " info module Displays internal module state", " info queue Displays internal queue state", " info reg Displays values in all registers at top of stack", " info segments Dumps information about all known segments", " info share Dumps information about shared libraries", " info stack Dumps information about top of stack", " info wnd Displays internal window state", "", NULL }; while(infotext[i]) DEBUG_Printf(DBG_CHN_MESG,"%s\n", infotext[i++]); } /* FIXME: merge InfoClass and InfoClass2 */ void DEBUG_InfoClass(const char* name) { WNDCLASSEXA wca; if (!GetClassInfoEx(0, name, &wca)) { DEBUG_Printf(DBG_CHN_MESG, "Cannot find class '%s'\n", name); return; } DEBUG_Printf(DBG_CHN_MESG, "Class '%s':\n", name); DEBUG_Printf(DBG_CHN_MESG, "style=%08x wndProc=%08lx\n" "inst=%04x icon=%04x cursor=%04x bkgnd=%04x\n" "clsExtra=%d winExtra=%d\n", wca.style, (DWORD)wca.lpfnWndProc, wca.hInstance, wca.hIcon, wca.hCursor, wca.hbrBackground, wca.cbClsExtra, wca.cbWndExtra); /* FIXME: * + print #windows (or even list of windows...) * + print extra bytes => this requires a window handle on this very class... */ } static void DEBUG_InfoClass2(HWND hWnd, const char* name) { WNDCLASSEXA wca; if (!GetClassInfoEx(GetWindowLong(hWnd, GWL_HINSTANCE), name, &wca)) { DEBUG_Printf(DBG_CHN_MESG, "Cannot find class '%s'\n", name); return; } DEBUG_Printf(DBG_CHN_MESG, "Class '%s':\n", name); DEBUG_Printf(DBG_CHN_MESG, "style=%08x wndProc=%08lx\n" "inst=%04x icon=%04x cursor=%04x bkgnd=%04x\n" "clsExtra=%d winExtra=%d\n", wca.style, (DWORD)wca.lpfnWndProc, wca.hInstance, wca.hIcon, wca.hCursor, wca.hbrBackground, wca.cbClsExtra, wca.cbWndExtra); if (wca.cbClsExtra) { int i; WORD w; DEBUG_Printf(DBG_CHN_MESG, "Extra bytes:" ); for (i = 0; i < wca.cbClsExtra / 2; i++) { w = GetClassWord(hWnd, i * 2); /* FIXME: depends on i386 endian-ity */ DEBUG_Printf(DBG_CHN_MESG, " %02x", HIBYTE(w)); DEBUG_Printf(DBG_CHN_MESG, " %02x", LOBYTE(w)); } DEBUG_Printf(DBG_CHN_MESG, "\n" ); } DEBUG_Printf(DBG_CHN_MESG, "\n" ); } struct class_walker { ATOM* table; int used; int alloc; }; static void DEBUG_WalkClassesHelper(HWND hWnd, struct class_walker* cw) { char clsName[128]; int i; ATOM atom; HWND child; if (!GetClassName(hWnd, clsName, sizeof(clsName))) return; if ((atom = FindAtom(clsName)) == 0) return; for (i = 0; i < cw->used; i++) { if (cw->table[i] == atom) break; } if (i == cw->used) { if (cw->used >= cw->alloc) { cw->alloc += 16; cw->table = DBG_realloc(cw->table, cw->alloc * sizeof(ATOM)); } cw->table[cw->used++] = atom; DEBUG_InfoClass2(hWnd, clsName); } do { if ((child = GetWindow(hWnd, GW_CHILD)) != 0) DEBUG_WalkClassesHelper(child, cw); } while ((hWnd = GetWindow(hWnd, GW_HWNDNEXT)) != 0); } void DEBUG_WalkClasses(void) { struct class_walker cw; cw.table = NULL; cw.used = cw.alloc = 0; DEBUG_WalkClassesHelper(GetDesktopWindow(), &cw); DBG_free(cw.table); } void DEBUG_DumpQueue(DWORD q) { DEBUG_Printf(DBG_CHN_MESG, "No longer doing info queue '0x%08lx'\n", q); } void DEBUG_WalkQueues(void) { DEBUG_Printf(DBG_CHN_MESG, "No longer walking queues list\n"); } void DEBUG_InfoWindow(HWND hWnd) { char clsName[128]; char wndName[128]; RECT clientRect; RECT windowRect; int i; WORD w; if (!GetClassName(hWnd, clsName, sizeof(clsName))) strcpy(clsName, "-- Unknown --"); if (!GetWindowText(hWnd, wndName, sizeof(wndName))) strcpy(wndName, "-- Empty --"); if (!GetClientRect(hWnd, &clientRect)) SetRectEmpty(&clientRect); if (!GetWindowRect(hWnd, &windowRect)) SetRectEmpty(&windowRect); /* FIXME missing fields: hmemTaskQ, hrgnUpdate, dce, flags, pProp, scroll */ DEBUG_Printf(DBG_CHN_MESG, "next=0x%04x child=0x%04x parent=0x%04x owner=0x%04x class='%s'\n" "inst=%08lx active=%04x idmenu=%08lx\n" "style=%08lx exstyle=%08lx wndproc=%08lx text='%s'\n" "client=%d,%d-%d,%d window=%d,%d-%d,%d sysmenu=%04x\n", GetWindow(hWnd, GW_HWNDNEXT), GetWindow(hWnd, GW_CHILD), GetParent(hWnd), GetWindow(hWnd, GW_OWNER), clsName, GetWindowLong(hWnd, GWL_HINSTANCE), GetLastActivePopup(hWnd), GetWindowLong(hWnd, GWL_ID), GetWindowLong(hWnd, GWL_STYLE), GetWindowLong(hWnd, GWL_EXSTYLE), GetWindowLong(hWnd, GWL_WNDPROC), wndName, clientRect.left, clientRect.top, clientRect.right, clientRect.bottom, windowRect.left, windowRect.top, windowRect.right, windowRect.bottom, GetSystemMenu(hWnd, FALSE)); if (GetClassLong(hWnd, GCL_CBWNDEXTRA)) { DEBUG_Printf(DBG_CHN_MESG, "Extra bytes:" ); for (i = 0; i < GetClassLong(hWnd, GCL_CBWNDEXTRA) / 2; i++) { w = GetWindowWord(hWnd, i * 2); /* FIXME: depends on i386 endian-ity */ DEBUG_Printf(DBG_CHN_MESG, " %02x", HIBYTE(w)); DEBUG_Printf(DBG_CHN_MESG, " %02x", LOBYTE(w)); } DEBUG_Printf(DBG_CHN_MESG, "\n"); } DEBUG_Printf(DBG_CHN_MESG, "\n"); } void DEBUG_WalkWindows(HWND hWnd, int indent) { char clsName[128]; char wndName[128]; HWND child; if (!IsWindow(hWnd)) hWnd = GetDesktopWindow(); if (!indent) /* first time around */ DEBUG_Printf(DBG_CHN_MESG, "%-16.16s %-17.17s %-8.8s %s\n", "hwnd", "Class Name", " Style", " WndProc Text"); do { if (!GetClassName(hWnd, clsName, sizeof(clsName))) strcpy(clsName, "-- Unknown --"); if (!GetWindowText(hWnd, wndName, sizeof(wndName))) strcpy(wndName, "-- Empty --"); /* FIXME: missing hmemTaskQ */ DEBUG_Printf(DBG_CHN_MESG, "%*s%04x%*s", indent, "", hWnd, 13-indent,""); DEBUG_Printf(DBG_CHN_MESG, "%-17.17s %08lx %08lx %.14s\n", clsName, GetWindowLong(hWnd, GWL_STYLE), GetWindowLong(hWnd, GWL_WNDPROC), wndName); if ((child = GetWindow(hWnd, GW_CHILD)) != 0) DEBUG_WalkWindows(child, indent + 1 ); } while ((hWnd = GetWindow(hWnd, GW_HWNDNEXT)) != 0); } void DEBUG_WalkProcess(void) { HANDLE snap = CreateToolhelp32Snapshot( TH32CS_SNAPPROCESS, 0 ); if (snap != INVALID_HANDLE_VALUE) { PROCESSENTRY32 entry; DWORD current = DEBUG_CurrProcess ? DEBUG_CurrProcess->pid : 0; BOOL ok; entry.dwSize = sizeof(entry); ok = Process32First( snap, &entry ); DEBUG_Printf(DBG_CHN_MESG, "%-8.8s %-8.8s %-8.8s %s\n", "pid", "threads", "parent", "exe" ); while (ok) { if (entry.th32ProcessID != GetCurrentProcessId()) DEBUG_Printf(DBG_CHN_MESG, "%08lx %8ld %08lx '%s'%s\n", entry.th32ProcessID, entry.cntThreads, entry.th32ParentProcessID, entry.szExeFile, (entry.th32ProcessID == current) ? " <==" : "" ); ok = Process32Next( snap, &entry ); } CloseHandle( snap ); } } void DEBUG_WalkThreads(void) { HANDLE snap = CreateToolhelp32Snapshot( TH32CS_SNAPTHREAD, 0 ); if (snap != INVALID_HANDLE_VALUE) { THREADENTRY32 entry; DWORD current = DEBUG_CurrThread ? DEBUG_CurrThread->tid : 0; BOOL ok; entry.dwSize = sizeof(entry); ok = Thread32First( snap, &entry ); DEBUG_Printf(DBG_CHN_MESG, "%-8.8s %-8.8s %s\n", "tid", "process", "prio" ); while (ok) { if (entry.th32OwnerProcessID != GetCurrentProcessId()) DEBUG_Printf(DBG_CHN_MESG, "%08lx %08lx %4ld%s\n", entry.th32ThreadID, entry.th32OwnerProcessID, entry.tbBasePri, (entry.th32ThreadID == current) ? " <==" : "" ); ok = Thread32Next( snap, &entry ); } CloseHandle( snap ); } } void DEBUG_WalkModref(DWORD p) { DEBUG_Printf(DBG_CHN_MESG, "No longer walking module references list\n"); } void DEBUG_InfoSegments(DWORD start, int length) { char flags[3]; DWORD i; LDT_ENTRY le; if (length == -1) length = (8192 - start); for (i = start; i < start + length; i++) { if (!GetThreadSelectorEntry(DEBUG_CurrThread->handle, (i << 3)|7, &le)) continue; if (le.HighWord.Bits.Type & 0x08) { flags[0] = (le.HighWord.Bits.Type & 0x2) ? 'r' : '-'; flags[1] = '-'; flags[2] = 'x'; } else { flags[0] = 'r'; flags[1] = (le.HighWord.Bits.Type & 0x2) ? 'w' : '-'; flags[2] = '-'; } DEBUG_Printf(DBG_CHN_MESG, "%04lx: sel=%04lx base=%08x limit=%08x %d-bit %c%c%c\n", i, (i<<3)|7, (le.HighWord.Bits.BaseHi << 24) + (le.HighWord.Bits.BaseMid << 16) + le.BaseLow, ((le.HighWord.Bits.LimitHi << 8) + le.LimitLow) << (le.HighWord.Bits.Granularity ? 12 : 0), le.HighWord.Bits.Default_Big ? 32 : 16, flags[0], flags[1], flags[2] ); } } void DEBUG_InfoVirtual(void) { DEBUG_Printf(DBG_CHN_MESG, "No longer providing virtual mapping information\n"); } wine-20000526/debugger/intvar.h0100644000175000001440000000534607106624617015723 0ustar julliardusers/* -*- tab-width: 8; c-basic-offset: 4 -*- */ /* Wine internal debugger * Definitionz for internal variables * Eric Pouech (c) 2000 */ /* break handling */ INTERNAL_VAR(BreakAllThreadsStartup, FALSE, NULL, DEBUG_TypeIntConst) INTERNAL_VAR(BreakOnCritSectTimeOut, FALSE, NULL, DEBUG_TypeIntConst) INTERNAL_VAR(BreakOnAttach, FALSE, NULL, DEBUG_TypeIntConst) /* output handling */ INTERNAL_VAR(ConChannelMask, DBG_CHN_MESG, NULL, DEBUG_TypeIntConst) INTERNAL_VAR(StdChannelMask, 0, NULL, DEBUG_TypeIntConst) INTERNAL_VAR(UseXTerm, TRUE, NULL, DEBUG_TypeIntConst) /* debugging debugger */ INTERNAL_VAR(ExtDbgOnInvalidAddress, FALSE, NULL, DEBUG_TypeIntConst) /* current process/thread */ INTERNAL_VAR(ThreadId, FALSE, &DEBUG_CurrTid, DEBUG_TypeIntConst) INTERNAL_VAR(ProcessId, FALSE, &DEBUG_CurrPid, DEBUG_TypeIntConst) /* context manipulation */ #ifdef __i386__ /* FIXME: 16 bit registers use imply that CPU is little endian, which is * the case when running natively i386 code */ INTERNAL_VAR(eip, 0, &DEBUG_context.Eip, DEBUG_TypeIntConst) INTERNAL_VAR(ip, 0, &DEBUG_context.Eip, DEBUG_TypeShortUInt) INTERNAL_VAR(pc, 0, &DEBUG_context.Eip, DEBUG_TypeIntConst) INTERNAL_VAR(flags, 0, &DEBUG_context.EFlags, DEBUG_TypeIntConst) INTERNAL_VAR(esp, 0, &DEBUG_context.Esp, DEBUG_TypeIntConst) INTERNAL_VAR(sp, 0, &DEBUG_context.Esp, DEBUG_TypeShortUInt) INTERNAL_VAR(eax, 0, &DEBUG_context.Eax, DEBUG_TypeIntConst) INTERNAL_VAR(ax, 0, &DEBUG_context.Eax, DEBUG_TypeShortUInt) INTERNAL_VAR(ebx, 0, &DEBUG_context.Ebx, DEBUG_TypeIntConst) INTERNAL_VAR(bx, 0, &DEBUG_context.Ebx, DEBUG_TypeShortUInt) INTERNAL_VAR(ecx, 0, &DEBUG_context.Ecx, DEBUG_TypeIntConst) INTERNAL_VAR(cx, 0, &DEBUG_context.Ecx, DEBUG_TypeShortUInt) INTERNAL_VAR(edx, 0, &DEBUG_context.Edx, DEBUG_TypeIntConst) INTERNAL_VAR(dx, 0, &DEBUG_context.Edx, DEBUG_TypeShortUInt) INTERNAL_VAR(esi, 0, &DEBUG_context.Esi, DEBUG_TypeIntConst) INTERNAL_VAR(si, 0, &DEBUG_context.Esi, DEBUG_TypeShortUInt) INTERNAL_VAR(edi, 0, &DEBUG_context.Edi, DEBUG_TypeIntConst) INTERNAL_VAR(di, 0, &DEBUG_context.Edi, DEBUG_TypeShortUInt) INTERNAL_VAR(ebp, 0, &DEBUG_context.Ebp, DEBUG_TypeIntConst) INTERNAL_VAR(bp, 0, &DEBUG_context.Ebp, DEBUG_TypeShortUInt) INTERNAL_VAR(es, 0, &DEBUG_context.SegEs, DEBUG_TypeIntConst) INTERNAL_VAR(ds, 0, &DEBUG_context.SegDs, DEBUG_TypeIntConst) INTERNAL_VAR(cs, 0, &DEBUG_context.SegCs, DEBUG_TypeIntConst) INTERNAL_VAR(ss, 0, &DEBUG_context.SegSs, DEBUG_TypeIntConst) INTERNAL_VAR(fs, 0, &DEBUG_context.SegFs, DEBUG_TypeIntConst) INTERNAL_VAR(gs, 0, &DEBUG_context.SegGs, DEBUG_TypeIntConst) #endif wine-20000526/debugger/memory.c0100644000175000001440000002015707106110741015704 0ustar julliardusers/* * Debugger memory handling * * Copyright 1993 Eric Youngdale * Copyright 1995 Alexandre Julliard * Copyright 2000 Eric Pouech */ #include "config.h" #include #include #include "debugger.h" #include "miscemu.h" #include "winbase.h" #ifdef __i386__ #include "wine/winbase16.h" #define DBG_V86_MODULE(seg) ((seg)>>16) #define IS_SELECTOR_V86(seg) DBG_V86_MODULE(seg) static void DEBUG_Die(const char* msg) { DEBUG_Printf(DBG_CHN_MESG, msg); exit(1); } void* DEBUG_XMalloc(size_t size) { void *res = malloc(size ? size : 1); if (res == NULL) DEBUG_Die("Memory exhausted.\n"); memset(res, 0, size); return res; } void* DEBUG_XReAlloc(void *ptr, size_t size) { void* res = realloc(ptr, size); if ((res == NULL) && size) DEBUG_Die("Memory exhausted.\n"); return res; } char* DEBUG_XStrDup(const char *str) { char *res = strdup(str); if (!res) DEBUG_Die("Memory exhausted.\n"); return res; } void DEBUG_FixAddress( DBG_ADDR *addr, DWORD def) { if (addr->seg == 0xffffffff) addr->seg = def; if (!IS_SELECTOR_V86(addr->seg) && DEBUG_IsSelectorSystem(addr->seg)) addr->seg = 0; } BOOL DEBUG_FixSegment( DBG_ADDR* addr ) { /* V86 mode ? */ if (DEBUG_context.EFlags & V86_FLAG) { addr->seg |= (DWORD)(GetExePtr(GetCurrentTask())) << 16; return TRUE; } return FALSE; } DWORD DEBUG_ToLinear( const DBG_ADDR *addr ) { LDT_ENTRY le; if (IS_SELECTOR_V86(addr->seg)) return (DWORD) DOSMEM_MemoryBase(DBG_V86_MODULE(addr->seg)) + (((addr->seg)&0xFFFF)<<4) + addr->off; if (DEBUG_IsSelectorSystem(addr->seg)) return addr->off; if (GetThreadSelectorEntry( DEBUG_CurrThread->handle, addr->seg, &le)) { return (le.HighWord.Bits.BaseHi << 24) + (le.HighWord.Bits.BaseMid << 16) + le.BaseLow + addr->off; } return 0; } int DEBUG_GetSelectorType( WORD sel ) { LDT_ENTRY le; if (sel == 0) return 32; if (IS_SELECTOR_V86(sel)) return 16; if (GetThreadSelectorEntry( DEBUG_CurrThread->handle, sel, &le)) return le.HighWord.Bits.Default_Big ? 32 : 16; /* selector doesn't exist */ return 0; } /* Determine if sel is a system selector (i.e. not managed by Wine) */ BOOL DEBUG_IsSelectorSystem(WORD sel) { return !(sel & 4) || (((sel & 0xFFFF) >> 3) < 17); } #endif /* __i386__ */ void DEBUG_GetCurrentAddress( DBG_ADDR *addr ) { #ifdef __i386__ addr->seg = DEBUG_context.SegCs; if (!DEBUG_FixSegment( addr ) && DEBUG_IsSelectorSystem(addr->seg)) addr->seg = 0; addr->off = DEBUG_context.Eip; #else addr->seg = 0; addr->off = 0; #endif } void DEBUG_InvalAddr( const DBG_ADDR* addr ) { DEBUG_Printf(DBG_CHN_MESG,"*** Invalid address "); DEBUG_PrintAddress(addr, DEBUG_CurrThread->dbg_mode, FALSE); DEBUG_Printf(DBG_CHN_MESG,"\n"); if (DBG_IVAR(ExtDbgOnInvalidAddress)) DEBUG_ExternalDebugger(); } void DEBUG_InvalLinAddr( void* addr ) { DBG_ADDR address; address.seg = 0; address.off = (unsigned long)addr; DEBUG_InvalAddr( &address ); } /*********************************************************************** * DEBUG_ReadMemory * * Read a memory value. */ /* FIXME: this function is now getting closer and closer to * DEBUG_ExprGetValue. They should be merged... */ int DEBUG_ReadMemory( const DBG_VALUE* val ) { int value = 0; /* to clear any unused byte */ int os = DEBUG_GetObjectSize(val->type); assert(sizeof(value) >= os); /* FIXME: only works on little endian systems */ if (val->cookie == DV_TARGET) { DBG_ADDR addr = val->addr; void* lin; DEBUG_FixAddress( &addr, DEBUG_context.SegDs ); lin = (void*)DEBUG_ToLinear( &addr ); DEBUG_READ_MEM_VERBOSE(lin, &value, os); } else { if (val->addr.off) memcpy(&value, (void*)val->addr.off, os); } return value; } /*********************************************************************** * DEBUG_WriteMemory * * Store a value in memory. */ void DEBUG_WriteMemory( const DBG_VALUE* val, int value ) { int os = DEBUG_GetObjectSize(val->type); assert(sizeof(value) >= os); /* FIXME: only works on little endian systems */ if (val->cookie == DV_TARGET) { DBG_ADDR addr = val->addr; void* lin; DEBUG_FixAddress( &addr, DEBUG_context.SegDs ); lin = (void*)DEBUG_ToLinear( &addr ); DEBUG_WRITE_MEM_VERBOSE(lin, &value, os); } else { memcpy((void*)val->addr.off, &value, os); } } /*********************************************************************** * DEBUG_ExamineMemory * * Implementation of the 'x' command. */ void DEBUG_ExamineMemory( const DBG_VALUE *_value, int count, char format ) { DBG_VALUE value = *_value; int i; unsigned char * pnt; struct datatype * testtype; assert(_value->cookie == DV_TARGET || _value->cookie == DV_HOST); DEBUG_FixAddress( &value.addr, (format == 'i') ? DEBUG_context.SegCs : DEBUG_context.SegDs ); /* * Dereference pointer to get actual memory address we need to be * reading. We will use the same segment as what we have already, * and hope that this is a sensible thing to do. */ if( value.type != NULL ) { if( value.type == DEBUG_TypeIntConst ) { /* * We know that we have the actual offset stored somewhere * else in 32-bit space. Grab it, and we * should be all set. */ unsigned int seg2 = value.addr.seg; value.addr.seg = 0; value.addr.off = DEBUG_GetExprValue(&value, NULL); value.addr.seg = seg2; } else { if (DEBUG_TypeDerefPointer(&value, &testtype) == 0) return; if( testtype != NULL || value.type == DEBUG_TypeIntConst ) { value.addr.off = DEBUG_GetExprValue(&value, NULL); } } } else if (!value.addr.seg && !value.addr.off) { DEBUG_Printf(DBG_CHN_MESG,"Invalid expression\n"); return; } if (format != 'i' && count > 1) { DEBUG_PrintAddress( &value.addr, DEBUG_CurrThread->dbg_mode, FALSE ); DEBUG_Printf(DBG_CHN_MESG,": "); } pnt = (void*)DEBUG_ToLinear( &value.addr ); switch(format) { case 'u': { WCHAR wch; if (count == 1) count = 256; while (count--) { if (!DEBUG_READ_MEM_VERBOSE(pnt, &wch, sizeof(wch)) || !wch) break; pnt += sizeof(wch); DEBUG_Printf(DBG_CHN_MESG, "%c", (char)wch); } DEBUG_Printf(DBG_CHN_MESG,"\n"); return; } case 's': { char ch; if (count == 1) count = 256; while (count--) { if (!DEBUG_READ_MEM_VERBOSE(pnt, &ch, sizeof(ch)) || !ch) break; pnt++; DEBUG_Output(DBG_CHN_MESG, &ch, 1); } DEBUG_Printf(DBG_CHN_MESG,"\n"); return; } case 'i': while (count--) { DEBUG_PrintAddress( &value.addr, DEBUG_CurrThread->dbg_mode, TRUE ); DEBUG_Printf(DBG_CHN_MESG,": "); DEBUG_Disasm( &value.addr, TRUE ); DEBUG_Printf(DBG_CHN_MESG,"\n"); } return; #define DO_DUMP2(_t,_l,_f,_vv) { \ _t _v; \ for(i=0; idbg_mode, FALSE );\ DEBUG_Printf(DBG_CHN_MESG,": ");\ } \ } \ DEBUG_Printf(DBG_CHN_MESG,"\n"); \ } \ return #define DO_DUMP(_t,_l,_f) DO_DUMP2(_t,_l,_f,_v) case 'x': DO_DUMP(int, 4, " %8.8x"); case 'd': DO_DUMP(unsigned int, 4, " %10d"); case 'w': DO_DUMP(unsigned short, 8, " %04x"); case 'c': DO_DUMP2(char, 32, " %c", (_v < 0x20) ? ' ' : _v); case 'b': DO_DUMP2(char, 16, " %02x", (_v) & 0xff); } } wine-20000526/debugger/module.c0100644000175000001440000003467507104607612015701 0ustar julliardusers/* -*- tab-width: 8; c-basic-offset: 4 -*- */ /* * File module.c - module handling for the wine debugger * * Copyright (C) 1993, Eric Youngdale. * 2000, Eric Pouech */ #include "config.h" #include #include #include #include "neexe.h" #include "module.h" #include "file.h" #include "debugger.h" #include "toolhelp.h" #include "wingdi.h" #include "winuser.h" /*********************************************************************** * Creates and links a new module to the current process * */ DBG_MODULE* DEBUG_AddModule(const char* name, int type, void* mod_addr, HMODULE hmodule) { DBG_MODULE* wmod; if (!(wmod = (DBG_MODULE*)DBG_alloc(sizeof(*wmod)))) return NULL; memset(wmod, 0, sizeof(*wmod)); wmod->next = DEBUG_CurrProcess->modules; wmod->status = DM_STATUS_NEW; wmod->type = type; wmod->load_addr = mod_addr; wmod->handle = hmodule; wmod->dbg_index = DEBUG_CurrProcess->next_index; wmod->module_name = DBG_strdup(name); DEBUG_CurrProcess->modules = wmod; return wmod; } /*********************************************************************** * DEBUG_FindModuleByName * */ DBG_MODULE* DEBUG_FindModuleByName(const char* name, int type) { DBG_MODULE* wmod; for (wmod = DEBUG_CurrProcess->modules; wmod; wmod = wmod->next) { if ((type == DM_TYPE_UNKNOWN || type == wmod->type) && !strcasecmp(name, wmod->module_name)) break; } return wmod; } /*********************************************************************** * DEBUG_FindModuleByAddr * * either the addr where module is loaded, or any address inside the * module */ DBG_MODULE* DEBUG_FindModuleByAddr(void* addr, int type) { DBG_MODULE* wmod; DBG_MODULE* res = NULL; for (wmod = DEBUG_CurrProcess->modules; wmod; wmod = wmod->next) { if ((type == DM_TYPE_UNKNOWN || type == wmod->type) && (u_long)addr >= (u_long)wmod->load_addr && (!res || res->load_addr < wmod->load_addr)) res = wmod; } return res; } /*********************************************************************** * DEBUG_FindModuleByHandle */ DBG_MODULE* DEBUG_FindModuleByHandle(HANDLE handle, int type) { DBG_MODULE* wmod; for (wmod = DEBUG_CurrProcess->modules; wmod; wmod = wmod->next) { if ((type == DM_TYPE_UNKNOWN || type == wmod->type) && handle == wmod->handle) break; } return wmod; } /*********************************************************************** * DEBUG_RegisterELFModule * * ELF modules are also entered into the list - this is so that we * can make 'info shared' types of displays possible. */ DBG_MODULE* DEBUG_RegisterELFModule(u_long load_addr, const char* name) { DBG_MODULE* wmod = DEBUG_AddModule(name, DM_TYPE_ELF, (void*)load_addr, 0); if (!wmod) return NULL; wmod->status = DM_STATUS_LOADED; DEBUG_CurrProcess->next_index++; return wmod; } /*********************************************************************** * DEBUG_RegisterPEModule * */ DBG_MODULE* DEBUG_RegisterPEModule(HMODULE hModule, u_long load_addr, const char *module_name) { DBG_MODULE* wmod = DEBUG_AddModule(module_name, DM_TYPE_PE, (void*)load_addr, hModule); if (!wmod) return NULL; DEBUG_CurrProcess->next_index++; return wmod; } /*********************************************************************** * DEBUG_RegisterNEModule * */ DBG_MODULE* DEBUG_RegisterNEModule(HMODULE hModule, void* load_addr, const char *module_name) { DBG_MODULE* wmod = DEBUG_AddModule(module_name, DM_TYPE_NE, load_addr, hModule); if (!wmod) return NULL; wmod->status = DM_STATUS_LOADED; DEBUG_CurrProcess->next_index++; return wmod; } /*********************************************************************** * DEBUG_GetEP16 * * Helper function fo DEBUG_LoadModuleEPs16: * finds the address of a given entry point from a given module */ static BOOL DEBUG_GetEP16(char* moduleAddr, const NE_MODULE* module, WORD ordinal, DBG_ADDR* addr) { void* idx; ET_ENTRY entry; ET_BUNDLE bundle; SEGTABLEENTRY ste; bundle.next = module->entry_table; do { if (!bundle.next) return FALSE; idx = moduleAddr + bundle.next; if (!DEBUG_READ_MEM_VERBOSE(idx, &bundle, sizeof(bundle))) return FALSE; } while ((ordinal < bundle.first + 1) || (ordinal > bundle.last)); if (!DEBUG_READ_MEM_VERBOSE((char*)idx + sizeof(ET_BUNDLE) + (ordinal - bundle.first - 1) * sizeof(ET_ENTRY), &entry, sizeof(ET_ENTRY))) return FALSE; addr->seg = entry.segnum; addr->off = entry.offs; if (addr->seg == 0xfe) addr->seg = 0xffff; /* constant entry */ else { if (!DEBUG_READ_MEM_VERBOSE(moduleAddr + module->seg_table + sizeof(ste) * (addr->seg - 1), &ste, sizeof(ste))) return FALSE; addr->seg = GlobalHandleToSel16(ste.hSeg); } return TRUE; } /*********************************************************************** * DEBUG_LoadModule16 * * Load the entry points of a Win16 module into the hash table. */ static void DEBUG_LoadModule16(HMODULE hModule, NE_MODULE* module, char* moduleAddr, const char* name) { DBG_VALUE value; BYTE buf[1 + 256 + 2]; char epname[512]; char* cpnt; DBG_MODULE* wmod; wmod = DEBUG_RegisterNEModule(hModule, moduleAddr, name); value.type = NULL; value.cookie = DV_TARGET; value.addr.seg = 0; value.addr.off = 0; cpnt = moduleAddr + module->name_table; /* First search the resident names */ /* skip module name */ if (!DEBUG_READ_MEM_VERBOSE(cpnt, buf, sizeof(buf)) || !buf[0]) return; cpnt += 1 + buf[0] + sizeof(WORD); while (DEBUG_READ_MEM_VERBOSE(cpnt, buf, sizeof(buf)) && buf[0]) { sprintf(epname, "%s.%.*s", name, buf[0], &buf[1]); if (DEBUG_GetEP16(moduleAddr, module, *(WORD*)&buf[1 + buf[0]], &value.addr)) { DEBUG_AddSymbol(epname, &value, NULL, SYM_WIN32 | SYM_FUNC); } cpnt += buf[0] + 1 + sizeof(WORD); } /* Now search the non-resident names table */ if (!module->nrname_handle) return; /* No non-resident table */ cpnt = (char *)GlobalLock16(module->nrname_handle); while (DEBUG_READ_MEM_VERBOSE(cpnt, buf, sizeof(buf)) && buf[0]) { sprintf(epname, "%s.%.*s", name, buf[0], &buf[1]); if (DEBUG_GetEP16(moduleAddr, module, *(WORD*)&buf[1 + buf[0]], &value.addr)) { DEBUG_AddSymbol(epname, &value, NULL, SYM_WIN32 | SYM_FUNC); } cpnt += buf[0] + 1 + sizeof(WORD); } GlobalUnlock16(module->nrname_handle); } /*********************************************************************** * DEBUG_LoadModule32 */ void DEBUG_LoadModule32(const char* name, HANDLE hFile, DWORD base) { DBG_VALUE value; char buffer[512]; char bufstr[256]; int i; IMAGE_NT_HEADERS pe_header; DWORD pe_header_ofs; IMAGE_SECTION_HEADER pe_seg; DWORD pe_seg_ofs; IMAGE_DATA_DIRECTORY dir; DWORD dir_ofs; DBG_MODULE* wmod; /* FIXME: we make the assumption that hModule == base */ wmod = DEBUG_RegisterPEModule((HMODULE)base, base, name); DEBUG_Printf(DBG_CHN_TRACE, "Registring 32bit DLL '%s' at %08lx\n", name, base); value.type = NULL; value.cookie = DV_TARGET; value.addr.seg = 0; value.addr.off = 0; /* grab PE Header */ if (!DEBUG_READ_MEM_VERBOSE((void*)(base + OFFSET_OF(IMAGE_DOS_HEADER, e_lfanew)), &pe_header_ofs, sizeof(pe_header_ofs)) || !DEBUG_READ_MEM_VERBOSE((void*)(base + pe_header_ofs), &pe_header, sizeof(pe_header))) return; if (wmod) { DEBUG_RegisterStabsDebugInfo(wmod, hFile, &pe_header, pe_header_ofs); DEBUG_RegisterMSCDebugInfo(wmod, hFile, &pe_header, pe_header_ofs); } /* Add start of DLL */ value.addr.off = base; DEBUG_AddSymbol(name, &value, NULL, SYM_WIN32 | SYM_FUNC); /* Add entry point */ wsnprintf(buffer, sizeof(buffer), "%s.EntryPoint", name); value.addr.off = base + pe_header.OptionalHeader.AddressOfEntryPoint; DEBUG_AddSymbol(buffer, &value, NULL, SYM_WIN32 | SYM_FUNC); /* Add start of sections */ pe_seg_ofs = pe_header_ofs + OFFSET_OF(IMAGE_NT_HEADERS, OptionalHeader) + pe_header.FileHeader.SizeOfOptionalHeader; for (i = 0; i < pe_header.FileHeader.NumberOfSections; i++, pe_seg_ofs += sizeof(pe_seg)) { if (!DEBUG_READ_MEM_VERBOSE((void*)(base + pe_seg_ofs), &pe_seg, sizeof(pe_seg))) continue; wsnprintf(buffer, sizeof(buffer), "%s.%s", name, pe_seg.Name); value.addr.off = base + pe_seg.VirtualAddress; DEBUG_AddSymbol(buffer, &value, NULL, SYM_WIN32 | SYM_FUNC); } /* Add exported functions */ dir_ofs = pe_header_ofs + OFFSET_OF(IMAGE_NT_HEADERS, OptionalHeader.DataDirectory[IMAGE_DIRECTORY_ENTRY_EXPORT]); if (DEBUG_READ_MEM_VERBOSE((void*)(base + dir_ofs), &dir, sizeof(dir)) && dir.Size) { IMAGE_EXPORT_DIRECTORY exports; WORD* ordinals = NULL; void** functions = NULL; DWORD* names = NULL; int j; if (DEBUG_READ_MEM_VERBOSE((void*)(base + dir.VirtualAddress), &exports, sizeof(exports)) && ((functions = DBG_alloc(sizeof(functions[0]) * exports.NumberOfFunctions))) && DEBUG_READ_MEM_VERBOSE((void*)(base + (DWORD)exports.AddressOfFunctions), functions, sizeof(functions[0]) * exports.NumberOfFunctions) && ((ordinals = DBG_alloc(sizeof(ordinals[0]) * exports.NumberOfNames))) && DEBUG_READ_MEM_VERBOSE((void*)(base + (DWORD)exports.AddressOfNameOrdinals), ordinals, sizeof(ordinals[0]) * exports.NumberOfNames) && ((names = DBG_alloc(sizeof(names[0]) * exports.NumberOfNames))) && DEBUG_READ_MEM_VERBOSE((void*)(base + (DWORD)exports.AddressOfNames), names, sizeof(names[0]) * exports.NumberOfNames)) { for (i = 0; i < exports.NumberOfNames; i++) { if (!names[i] || !DEBUG_READ_MEM_VERBOSE((void*)(base + names[i]), bufstr, sizeof(bufstr))) continue; bufstr[sizeof(bufstr) - 1] = 0; wsnprintf(buffer, sizeof(buffer), "%s.%s", name, bufstr); value.addr.off = base + (DWORD)functions[ordinals[i]]; DEBUG_AddSymbol(buffer, &value, NULL, SYM_WIN32 | SYM_FUNC); } for (i = 0; i < exports.NumberOfFunctions; i++) { if (!functions[i]) continue; /* Check if we already added it with a name */ for (j = 0; j < exports.NumberOfNames; j++) if ((ordinals[j] == i) && names[j]) break; if (j < exports.NumberOfNames) continue; wsnprintf(buffer, sizeof(buffer), "%s.%ld", name, i + exports.Base); value.addr.off = base + (DWORD)functions[i]; DEBUG_AddSymbol(buffer, &value, NULL, SYM_WIN32 | SYM_FUNC); } } DBG_free(functions); DBG_free(ordinals); DBG_free(names); } } /*********************************************************************** * DEBUG_LoadEntryPoints * * Load the entry points of all the modules into the hash table. */ int DEBUG_LoadEntryPoints(const char* pfx) { MODULEENTRY entry; NE_MODULE module; void* moduleAddr; int first = 0; int rowcount = 0; int len; /* FIXME: we assume that a module is never removed from memory */ /* FIXME: this is (currently plain wrong when debugger is started by * attaching to an existing program => the 16 bit modules will * not be shared... not much to do on debugger side... sigh */ if (ModuleFirst16(&entry)) do { if (DEBUG_FindModuleByName(entry.szModule, DM_TYPE_UNKNOWN) || !(moduleAddr = NE_GetPtr(entry.hModule)) || !DEBUG_READ_MEM_VERBOSE(moduleAddr, &module, sizeof(module)) || (module.flags & NE_FFLAGS_WIN32) /* NE module */) continue; if (!first) { if (pfx) DEBUG_Printf(DBG_CHN_MESG, pfx); DEBUG_Printf(DBG_CHN_MESG, " "); rowcount = 3 + (pfx ? strlen(pfx) : 0); first = 1; } len = strlen(entry.szModule); if ((rowcount + len) > 76) { DEBUG_Printf(DBG_CHN_MESG, "\n "); rowcount = 3; } DEBUG_Printf(DBG_CHN_MESG, " %s", entry.szModule); rowcount += len + 1; DEBUG_LoadModule16(entry.hModule, &module, moduleAddr, entry.szModule); } while (ModuleNext16(&entry)); if (first) DEBUG_Printf(DBG_CHN_MESG, "\n"); return first; } /*********************************************************************** * DEBUG_InfoShare * * Display shared libarary information. */ void DEBUG_InfoShare(void) { DBG_MODULE* wmod; const char* xtype; DEBUG_Printf(DBG_CHN_MESG, "Address\t\tModule\tName\n"); for (wmod = DEBUG_CurrProcess->modules; wmod; wmod = wmod->next) { switch (wmod->type) { case DM_TYPE_NE: xtype = "NE"; break; case DM_TYPE_PE: xtype = "PE"; break; case DM_TYPE_ELF: xtype = "ELF"; break; default: xtype = "???"; break; } DEBUG_Printf(DBG_CHN_MESG, "0x%8.8x\t(%s)\t%s\n", (unsigned int)wmod->load_addr, xtype, wmod->module_name); } } static const char* DEBUG_GetModuleType(int type) { switch (type) { case DM_TYPE_NE: return "NE"; case DM_TYPE_PE: return "PE"; case DM_TYPE_ELF: return "ELF"; default: return "???";; } } static const char* DEBUG_GetModuleStatus(int status) { switch (status) { case DM_STATUS_NEW: return "deferred"; case DM_STATUS_LOADED: return "ok"; case DM_STATUS_ERROR: return "error"; default: return "???"; } } /*********************************************************************** * DEBUG_ * Display information about a given module (DLL or EXE) */ void DEBUG_DumpModule(DWORD mod) { DBG_MODULE* wmod; if (!(wmod = DEBUG_FindModuleByHandle(mod, DM_TYPE_UNKNOWN)) && !(wmod = DEBUG_FindModuleByAddr((void*)mod, DM_TYPE_UNKNOWN))) { DEBUG_Printf(DBG_CHN_MESG, "'0x%08lx' is not a valid module handle or address\n", mod); return; } DEBUG_Printf(DBG_CHN_MESG, "Module '%s' (handle=0x%08x) at 0x%8.8x (%s/%s)\n", wmod->module_name, wmod->handle, (unsigned int)wmod->load_addr, DEBUG_GetModuleType(wmod->type), DEBUG_GetModuleStatus(wmod->status)); } /*********************************************************************** * DEBUG_WalkModules * * Display information about all modules (DLLs and EXEs) */ void DEBUG_WalkModules(void) { DBG_MODULE* wmod; const char* xtype; DEBUG_Printf(DBG_CHN_MESG, "Address\t\tModule\tName\n"); for (wmod = DEBUG_CurrProcess->modules; wmod; wmod = wmod->next) { switch (wmod->type) { case DM_TYPE_NE: xtype = "NE"; break; case DM_TYPE_PE: xtype = "PE"; break; case DM_TYPE_ELF: continue; default: xtype = "???"; break; } DEBUG_Printf(DBG_CHN_MESG, "0x%8.8x\t(%s)\t%s\n", (unsigned int)wmod->load_addr, DEBUG_GetModuleType(wmod->type), wmod->module_name); } } wine-20000526/debugger/msc.c0100644000175000001440000025234107101373715015167 0ustar julliardusers/* * File msc.c - read VC++ debug information from COFF and eventually * from PDB files. * * Copyright (C) 1996, Eric Youngdale. * Copyright (C) 1999, Ulrich Weigand. * * Note - this handles reading debug information for 32 bit applications * that run under Windows-NT for example. I doubt that this would work well * for 16 bit applications, but I don't think it really matters since the * file format is different, and we should never get in here in such cases. * * TODO: * Get 16 bit CV stuff working. * Add symbol size to internal symbol table. */ #include "config.h" #include #include #include #ifndef PATH_MAX #define PATH_MAX _MAX_PATH #endif #include "debugger.h" #include "neexe.h" #include "pe_image.h" #include "file.h" typedef struct { IMAGE_DEBUG_DIRECTORY dbgdir; u_long sect_ofs; int nsect; char* dbg_info; int dbg_size; } MSC_DBG_INFO; #define MSC_INFO(module) ((MSC_DBG_INFO*)((module)->extra_info)) static int DEBUG_ProcessMSCDebugInfo(DBG_MODULE* module); /* * dbg_filename must be at least MAX_PATHNAME_LEN bytes in size */ static void DEBUG_LocateDebugInfoFile(const char *filename, char *dbg_filename) { char *str1 = DBG_alloc(MAX_PATHNAME_LEN); char *str2 = DBG_alloc(MAX_PATHNAME_LEN*10); const char *file; char *name_part; file = strrchr(filename, '\\'); if( file == NULL ) file = filename; else file++; if ((GetEnvironmentVariable("_NT_SYMBOL_PATH", str1, MAX_PATHNAME_LEN) && (SearchPath(str1, file, NULL, MAX_PATHNAME_LEN*10, str2, &name_part))) || (GetEnvironmentVariable("_NT_ALT_SYMBOL_PATH", str1, MAX_PATHNAME_LEN) && (SearchPath(str1, file, NULL, MAX_PATHNAME_LEN*10, str2, &name_part))) || (SearchPath(NULL, file, NULL, MAX_PATHNAME_LEN*10, str2, &name_part))) lstrcpyn(dbg_filename, str2, MAX_PATHNAME_LEN); else lstrcpyn(dbg_filename, filename, MAX_PATHNAME_LEN); DBG_free(str1); DBG_free(str2); } /*********************************************************************** * DEBUG_MapDebugInfoFile */ static void* DEBUG_MapDebugInfoFile(const char* name, DWORD offset, DWORD size, HANDLE* hFile, HANDLE* hMap) { OFSTRUCT ofs; DWORD g_offset; /* offset aligned on map granuality */ DWORD g_size; /* size to map, with offset aligned */ char* ret; *hMap = 0; if (name != NULL) { char filename[MAX_PATHNAME_LEN]; DEBUG_LocateDebugInfoFile(name, filename); if ((*hFile = OpenFile(filename, &ofs, OF_READ)) == HFILE_ERROR) return NULL; } if (!size) { DWORD file_size = GetFileSize(*hFile, NULL); if (file_size == (DWORD)-1) return NULL; size = file_size - offset; } g_offset = offset & ~0xFFFF; /* FIXME: is granularity portable ? */ g_size = offset + size - g_offset; if ((*hMap = CreateFileMapping(*hFile, NULL, PAGE_READONLY, 0, 0, NULL)) == 0) return NULL; if ((ret = MapViewOfFile(*hMap, FILE_MAP_READ, 0, g_offset, g_size)) != NULL) ret += offset - g_offset; return ret; } /*********************************************************************** * DEBUG_UnmapDebugInfoFile */ static void DEBUG_UnmapDebugInfoFile(HANDLE hFile, HANDLE hMap, void* addr) { if (addr) UnmapViewOfFile(addr); if (hMap) CloseHandle(hMap); if (hFile) CloseHandle(hFile); } union any_size { char * c; short * s; int * i; unsigned int * ui; }; /* * This is a convenience structure used to map portions of the * line number table. */ struct startend { unsigned int start; unsigned int end; }; /* * This is how we reference the various record types. */ union codeview_symbol { struct { short int len; short int id; } generic; struct { short int len; short int id; unsigned int offset; unsigned short seg; unsigned short symtype; unsigned char namelen; unsigned char name[1]; } data; struct { short int len; short int id; unsigned int symtype; unsigned int offset; unsigned short seg; unsigned char namelen; unsigned char name[1]; } data32; struct { short int len; short int id; unsigned int pparent; unsigned int pend; unsigned int next; unsigned int offset; unsigned short segment; unsigned short thunk_len; unsigned char thtype; unsigned char namelen; unsigned char name[1]; } thunk; struct { short int len; short int id; unsigned int pparent; unsigned int pend; unsigned int next; unsigned int proc_len; unsigned int debug_start; unsigned int debug_end; unsigned int offset; unsigned short segment; unsigned short proctype; unsigned char flags; unsigned char namelen; unsigned char name[1]; } proc; struct { short int len; short int id; unsigned int pparent; unsigned int pend; unsigned int next; unsigned int proc_len; unsigned int debug_start; unsigned int debug_end; unsigned int proctype; unsigned int offset; unsigned short segment; unsigned char flags; unsigned char namelen; unsigned char name[1]; } proc32; struct { short int len; /* Total length of this entry */ short int id; /* Always S_BPREL32 */ unsigned int offset; /* Stack offset relative to BP */ unsigned short symtype; unsigned char namelen; unsigned char name[1]; } stack; struct { short int len; /* Total length of this entry */ short int id; /* Always S_BPREL32 */ unsigned int offset; /* Stack offset relative to BP */ unsigned int symtype; unsigned char namelen; unsigned char name[1]; } stack32; }; union codeview_type { struct { short int len; short int id; } generic; struct { short int len; short int id; short int attribute; short int datatype; unsigned char variant[1]; } pointer; struct { short int len; short int id; unsigned int datatype; unsigned int attribute; unsigned char variant[1]; } pointer32; struct { short int len; short int id; unsigned char nbits; unsigned char bitoff; unsigned short type; } bitfield; struct { short int len; short int id; unsigned int type; unsigned char nbits; unsigned char bitoff; } bitfield32; struct { short int len; short int id; short int elemtype; short int idxtype; unsigned short int arrlen; /* numeric leaf */ #if 0 unsigned char name[1]; #endif } array; struct { short int len; short int id; unsigned int elemtype; unsigned int idxtype; unsigned short int arrlen; /* numeric leaf */ #if 0 unsigned char name[1]; #endif } array32; struct { short int len; short int id; short int n_element; short int fieldlist; short int property; short int derived; short int vshape; unsigned short int structlen; /* numeric leaf */ #if 0 unsigned char name[1]; #endif } structure; struct { short int len; short int id; short int n_element; short int property; unsigned int fieldlist; unsigned int derived; unsigned int vshape; unsigned short int structlen; /* numeric leaf */ #if 0 unsigned char name[1]; #endif } structure32; struct { short int len; short int id; short int count; short int fieldlist; short int property; unsigned short int un_len; /* numeric leaf */ #if 0 unsigned char name[1]; #endif } t_union; struct { short int len; short int id; short int count; short int property; unsigned int fieldlist; unsigned short int un_len; /* numeric leaf */ #if 0 unsigned char name[1]; #endif } t_union32; struct { short int len; short int id; short int count; short int type; short int field; short int property; unsigned char name[1]; } enumeration; struct { short int len; short int id; short int count; short int property; unsigned int type; unsigned int field; unsigned char name[1]; } enumeration32; struct { short int len; short int id; unsigned char list[1]; } fieldlist; }; union codeview_fieldtype { struct { short int id; } generic; struct { short int id; short int type; short int attribute; unsigned short int offset; /* numeric leaf */ } bclass; struct { short int id; short int attribute; unsigned int type; unsigned short int offset; /* numeric leaf */ } bclass32; struct { short int id; short int btype; short int vbtype; short int attribute; unsigned short int vbpoff; /* numeric leaf */ #if 0 unsigned short int vboff; /* numeric leaf */ #endif } vbclass; struct { short int id; short int attribute; unsigned int btype; unsigned int vbtype; unsigned short int vbpoff; /* numeric leaf */ #if 0 unsigned short int vboff; /* numeric leaf */ #endif } vbclass32; struct { short int id; short int attribute; unsigned short int value; /* numeric leaf */ #if 0 unsigned char name[1]; #endif } enumerate; struct { short int id; short int type; unsigned char name[1]; } friendfcn; struct { short int id; short int _pad0; unsigned int type; unsigned char name[1]; } friendfcn32; struct { short int id; short int type; short int attribute; unsigned short int offset; /* numeric leaf */ #if 0 unsigned char name[1]; #endif } member; struct { short int id; short int attribute; unsigned int type; unsigned short int offset; /* numeric leaf */ #if 0 unsigned char name[1]; #endif } member32; struct { short int id; short int type; short int attribute; unsigned char name[1]; } stmember; struct { short int id; short int attribute; unsigned int type; unsigned char name[1]; } stmember32; struct { short int id; short int count; short int mlist; unsigned char name[1]; } method; struct { short int id; short int count; unsigned int mlist; unsigned char name[1]; } method32; struct { short int id; short int index; unsigned char name[1]; } nesttype; struct { short int id; short int _pad0; unsigned int index; unsigned char name[1]; } nesttype32; struct { short int id; short int type; } vfunctab; struct { short int id; short int _pad0; unsigned int type; } vfunctab32; struct { short int id; short int type; } friendcls; struct { short int id; short int _pad0; unsigned int type; } friendcls32; struct { short int id; short int attribute; short int type; unsigned char name[1]; } onemethod; struct { short int id; short int attribute; short int type; unsigned int vtab_offset; unsigned char name[1]; } onemethod_virt; struct { short int id; short int attribute; unsigned int type; unsigned char name[1]; } onemethod32; struct { short int id; short int attribute; unsigned int type; unsigned int vtab_offset; unsigned char name[1]; } onemethod32_virt; struct { short int id; short int type; unsigned int offset; } vfuncoff; struct { short int id; short int _pad0; unsigned int type; unsigned int offset; } vfuncoff32; struct { short int id; short int attribute; short int index; unsigned char name[1]; } nesttypeex; struct { short int id; short int attribute; unsigned int index; unsigned char name[1]; } nesttypeex32; struct { short int id; short int attribute; unsigned int type; unsigned char name[1]; } membermodify; }; #define S_COMPILE 0x0001 #define S_REGISTER 0x0002 #define S_CONSTANT 0x0003 #define S_UDT 0x0004 #define S_SSEARCH 0x0005 #define S_END 0x0006 #define S_SKIP 0x0007 #define S_CVRESERVE 0x0008 #define S_OBJNAME 0x0009 #define S_ENDARG 0x000a #define S_COBOLUDT 0x000b #define S_MANYREG 0x000c #define S_RETURN 0x000d #define S_ENTRYTHIS 0x000e #define S_BPREL 0x0200 #define S_LDATA 0x0201 #define S_GDATA 0x0202 #define S_PUB 0x0203 #define S_LPROC 0x0204 #define S_GPROC 0x0205 #define S_THUNK 0x0206 #define S_BLOCK 0x0207 #define S_WITH 0x0208 #define S_LABEL 0x0209 #define S_CEXMODEL 0x020a #define S_VFTPATH 0x020b #define S_REGREL 0x020c #define S_LTHREAD 0x020d #define S_GTHREAD 0x020e #define S_PROCREF 0x0400 #define S_DATAREF 0x0401 #define S_ALIGN 0x0402 #define S_LPROCREF 0x0403 #define S_REGISTER_32 0x1001 /* Variants with new 32-bit type indices */ #define S_CONSTANT_32 0x1002 #define S_UDT_32 0x1003 #define S_COBOLUDT_32 0x1004 #define S_MANYREG_32 0x1005 #define S_BPREL_32 0x1006 #define S_LDATA_32 0x1007 #define S_GDATA_32 0x1008 #define S_PUB_32 0x1009 #define S_LPROC_32 0x100a #define S_GPROC_32 0x100b #define S_VFTTABLE_32 0x100c #define S_REGREL_32 0x100d #define S_LTHREAD_32 0x100e #define S_GTHREAD_32 0x100f /* * This covers the basic datatypes that VC++ seems to be using these days. * 32 bit mode only. There are additional numbers for the pointers in 16 * bit mode. There are many other types listed in the documents, but these * are apparently not used by the compiler, or represent pointer types * that are not used. */ #define T_NOTYPE 0x0000 /* Notype */ #define T_ABS 0x0001 /* Abs */ #define T_VOID 0x0003 /* Void */ #define T_CHAR 0x0010 /* signed char */ #define T_SHORT 0x0011 /* short */ #define T_LONG 0x0012 /* long */ #define T_QUAD 0x0013 /* long long */ #define T_UCHAR 0x0020 /* unsigned char */ #define T_USHORT 0x0021 /* unsigned short */ #define T_ULONG 0x0022 /* unsigned long */ #define T_UQUAD 0x0023 /* unsigned long long */ #define T_REAL32 0x0040 /* float */ #define T_REAL64 0x0041 /* double */ #define T_RCHAR 0x0070 /* real char */ #define T_WCHAR 0x0071 /* wide char */ #define T_INT4 0x0074 /* int */ #define T_UINT4 0x0075 /* unsigned int */ #define T_32PVOID 0x0403 /* 32 bit near pointer to void */ #define T_32PCHAR 0x0410 /* 16:32 near pointer to signed char */ #define T_32PSHORT 0x0411 /* 16:32 near pointer to short */ #define T_32PLONG 0x0412 /* 16:32 near pointer to int */ #define T_32PQUAD 0x0413 /* 16:32 near pointer to long long */ #define T_32PUCHAR 0x0420 /* 16:32 near pointer to unsigned char */ #define T_32PUSHORT 0x0421 /* 16:32 near pointer to unsigned short */ #define T_32PULONG 0x0422 /* 16:32 near pointer to unsigned int */ #define T_32PUQUAD 0x0423 /* 16:32 near pointer to long long */ #define T_32PREAL32 0x0440 /* 16:32 near pointer to float */ #define T_32PREAL64 0x0441 /* 16:32 near pointer to float */ #define T_32PRCHAR 0x0470 /* 16:32 near pointer to real char */ #define T_32PWCHAR 0x0471 /* 16:32 near pointer to real char */ #define T_32PINT4 0x0474 /* 16:32 near pointer to int */ #define T_32PUINT4 0x0475 /* 16:32 near pointer to unsigned int */ #define LF_MODIFIER 0x0001 #define LF_POINTER 0x0002 #define LF_ARRAY 0x0003 #define LF_CLASS 0x0004 #define LF_STRUCTURE 0x0005 #define LF_UNION 0x0006 #define LF_ENUM 0x0007 #define LF_PROCEDURE 0x0008 #define LF_MFUNCTION 0x0009 #define LF_VTSHAPE 0x000a #define LF_COBOL0 0x000b #define LF_COBOL1 0x000c #define LF_BARRAY 0x000d #define LF_LABEL 0x000e #define LF_NULL 0x000f #define LF_NOTTRAN 0x0010 #define LF_DIMARRAY 0x0011 #define LF_VFTPATH 0x0012 #define LF_PRECOMP 0x0013 #define LF_ENDPRECOMP 0x0014 #define LF_OEM 0x0015 #define LF_TYPESERVER 0x0016 #define LF_MODIFIER_32 0x1001 /* variants with new 32-bit type indices */ #define LF_POINTER_32 0x1002 #define LF_ARRAY_32 0x1003 #define LF_CLASS_32 0x1004 #define LF_STRUCTURE_32 0x1005 #define LF_UNION_32 0x1006 #define LF_ENUM_32 0x1007 #define LF_PROCEDURE_32 0x1008 #define LF_MFUNCTION_32 0x1009 #define LF_COBOL0_32 0x100a #define LF_BARRAY_32 0x100b #define LF_DIMARRAY_32 0x100c #define LF_VFTPATH_32 0x100d #define LF_PRECOMP_32 0x100e #define LF_OEM_32 0x100f #define LF_SKIP 0x0200 #define LF_ARGLIST 0x0201 #define LF_DEFARG 0x0202 #define LF_LIST 0x0203 #define LF_FIELDLIST 0x0204 #define LF_DERIVED 0x0205 #define LF_BITFIELD 0x0206 #define LF_METHODLIST 0x0207 #define LF_DIMCONU 0x0208 #define LF_DIMCONLU 0x0209 #define LF_DIMVARU 0x020a #define LF_DIMVARLU 0x020b #define LF_REFSYM 0x020c #define LF_SKIP_32 0x1200 /* variants with new 32-bit type indices */ #define LF_ARGLIST_32 0x1201 #define LF_DEFARG_32 0x1202 #define LF_FIELDLIST_32 0x1203 #define LF_DERIVED_32 0x1204 #define LF_BITFIELD_32 0x1205 #define LF_METHODLIST_32 0x1206 #define LF_DIMCONU_32 0x1207 #define LF_DIMCONLU_32 0x1208 #define LF_DIMVARU_32 0x1209 #define LF_DIMVARLU_32 0x120a #define LF_BCLASS 0x0400 #define LF_VBCLASS 0x0401 #define LF_IVBCLASS 0x0402 #define LF_ENUMERATE 0x0403 #define LF_FRIENDFCN 0x0404 #define LF_INDEX 0x0405 #define LF_MEMBER 0x0406 #define LF_STMEMBER 0x0407 #define LF_METHOD 0x0408 #define LF_NESTTYPE 0x0409 #define LF_VFUNCTAB 0x040a #define LF_FRIENDCLS 0x040b #define LF_ONEMETHOD 0x040c #define LF_VFUNCOFF 0x040d #define LF_NESTTYPEEX 0x040e #define LF_MEMBERMODIFY 0x040f #define LF_BCLASS_32 0x1400 /* variants with new 32-bit type indices */ #define LF_VBCLASS_32 0x1401 #define LF_IVBCLASS_32 0x1402 #define LF_FRIENDFCN_32 0x1403 #define LF_INDEX_32 0x1404 #define LF_MEMBER_32 0x1405 #define LF_STMEMBER_32 0x1406 #define LF_METHOD_32 0x1407 #define LF_NESTTYPE_32 0x1408 #define LF_VFUNCTAB_32 0x1409 #define LF_FRIENDCLS_32 0x140a #define LF_ONEMETHOD_32 0x140b #define LF_VFUNCOFF_32 0x140c #define LF_NESTTYPEEX_32 0x140d #define LF_NUMERIC 0x8000 /* numeric leaf types */ #define LF_CHAR 0x8000 #define LF_SHORT 0x8001 #define LF_USHORT 0x8002 #define LF_LONG 0x8003 #define LF_ULONG 0x8004 #define LF_REAL32 0x8005 #define LF_REAL64 0x8006 #define LF_REAL80 0x8007 #define LF_REAL128 0x8008 #define LF_QUADWORD 0x8009 #define LF_UQUADWORD 0x800a #define LF_REAL48 0x800b #define LF_COMPLEX32 0x800c #define LF_COMPLEX64 0x800d #define LF_COMPLEX80 0x800e #define LF_COMPLEX128 0x800f #define LF_VARSTRING 0x8010 #define MAX_BUILTIN_TYPES 0x480 static struct datatype * cv_basic_types[MAX_BUILTIN_TYPES]; static int num_cv_defined_types = 0; static struct datatype **cv_defined_types = NULL; /* * For the type CODEVIEW debug directory entries, the debug directory * points to a structure like this. The cv_name field is the name * of an external .PDB file. */ struct CodeViewDebug { char cv_nbtype[8]; unsigned int cv_timestamp; char cv_unknown[4]; char cv_name[1]; }; struct MiscDebug { unsigned int DataType; unsigned int Length; char Unicode; char Reserved[3]; char Data[1]; }; /* * This is the header that the COFF variety of debug header points to. */ struct CoffDebug { unsigned int N_Sym; unsigned int SymbolOffset; unsigned int N_Linenum; unsigned int LinenumberOffset; unsigned int Unused[4]; }; struct CoffLinenum { unsigned int VirtualAddr; unsigned short int Linenum; }; struct CoffFiles { unsigned int startaddr; unsigned int endaddr; char * filename; int linetab_offset; int linecnt; struct name_hash **entries; int neps; int neps_alloc; }; struct CoffSymbol { union { char ShortName[8]; struct { unsigned int NotLong; unsigned int StrTaboff; } Name; } N; unsigned int Value; short SectionNumber; short Type; char StorageClass; unsigned char NumberOfAuxSymbols; }; struct CoffAuxSection{ unsigned int Length; unsigned short NumberOfRelocations; unsigned short NumberOfLinenumbers; unsigned int CheckSum; short Number; char Selection; } Section; /* * These two structures are used in the directory within a .DBG file * to locate the individual important bits that we might want to see. */ struct CV4_DirHead { short unsigned int dhsize; short unsigned int desize; unsigned int ndir; unsigned int next_offset; unsigned int flags; }; struct CV4_DirEnt { short unsigned int subsect_number; short unsigned int module_number; unsigned int offset; unsigned int size; }; /* * These are the values of interest that the subsect_number field takes. */ #define sstAlignSym 0x125 #define sstSrcModule 0x127 struct codeview_linetab_hdr { unsigned int nline; unsigned int segno; unsigned int start; unsigned int end; char * sourcefile; unsigned short * linetab; unsigned int * offtab; }; /* * CodeView type information parsing */ static int numeric_leaf( int *value, unsigned short int *leaf ) { unsigned short int type = *leaf++; int length = 2; if ( type < LF_NUMERIC ) { *value = type; } else { switch ( type ) { case LF_CHAR: length += 1; *value = *(char *)leaf; break; case LF_SHORT: length += 2; *value = *(short *)leaf; break; case LF_USHORT: length += 2; *value = *(unsigned short *)leaf; break; case LF_LONG: length += 4; *value = *(int *)leaf; break; case LF_ULONG: length += 4; *value = *(unsigned int *)leaf; break; case LF_QUADWORD: case LF_UQUADWORD: length += 8; *value = 0; /* FIXME */ break; case LF_REAL32: length += 4; *value = 0; /* FIXME */ break; case LF_REAL48: length += 6; *value = 0; /* FIXME */ break; case LF_REAL64: length += 8; *value = 0; /* FIXME */ break; case LF_REAL80: length += 10; *value = 0; /* FIXME */ break; case LF_REAL128: length += 16; *value = 0; /* FIXME */ break; case LF_COMPLEX32: length += 4; *value = 0; /* FIXME */ break; case LF_COMPLEX64: length += 8; *value = 0; /* FIXME */ break; case LF_COMPLEX80: length += 10; *value = 0; /* FIXME */ break; case LF_COMPLEX128: length += 16; *value = 0; /* FIXME */ break; case LF_VARSTRING: length += 2 + *leaf; *value = 0; /* FIXME */ break; default: DEBUG_Printf( DBG_CHN_MESG, "Unknown numeric leaf type %04x\n", type ); *value = 0; break; } } return length; } static char * terminate_string( unsigned char *name ) { static char symname[256]; int namelen = name[0]; assert( namelen >= 0 && namelen < 256 ); memcpy( symname, name+1, namelen ); symname[namelen] = '\0'; if ( !*symname || strcmp( symname, "__unnamed" ) == 0 ) return NULL; else return symname; } static struct datatype * DEBUG_GetCVType(unsigned int typeno) { struct datatype * dt = NULL; /* * Convert Codeview type numbers into something we can grok internally. * Numbers < 0x1000 are all fixed builtin types. Numbers from 0x1000 and * up are all user defined (structs, etc). */ if ( typeno < 0x1000 ) { if ( typeno < MAX_BUILTIN_TYPES ) dt = cv_basic_types[typeno]; } else { if ( typeno - 0x1000 < num_cv_defined_types ) dt = cv_defined_types[typeno - 0x1000]; } return dt; } static int DEBUG_AddCVType( unsigned int typeno, struct datatype *dt ) { while ( typeno - 0x1000 >= num_cv_defined_types ) { num_cv_defined_types += 0x100; cv_defined_types = (struct datatype **) DBG_realloc( cv_defined_types, num_cv_defined_types * sizeof(struct datatype *) ); memset( cv_defined_types + num_cv_defined_types - 0x100, 0, 0x100 * sizeof(struct datatype *) ); if ( cv_defined_types == NULL ) return FALSE; } cv_defined_types[ typeno - 0x1000 ] = dt; return TRUE; } static void DEBUG_ClearTypeTable( void ) { if ( cv_defined_types ) DBG_free( cv_defined_types ); cv_defined_types = NULL; num_cv_defined_types = 0; } static int DEBUG_AddCVType_Pointer( unsigned int typeno, unsigned int datatype ) { struct datatype *dt = DEBUG_FindOrMakePointerType( DEBUG_GetCVType( datatype ) ); return DEBUG_AddCVType( typeno, dt ); } static int DEBUG_AddCVType_Array( unsigned int typeno, char *name, unsigned int elemtype, unsigned int arr_len ) { struct datatype *dt = DEBUG_NewDataType( DT_ARRAY, name ); struct datatype *elem = DEBUG_GetCVType( elemtype ); unsigned int elem_size = elem? DEBUG_GetObjectSize( elem ) : 0; unsigned int arr_max = elem_size? arr_len / elem_size : 0; DEBUG_SetArrayParams( dt, 0, arr_max, elem ); return DEBUG_AddCVType( typeno, dt ); } static int DEBUG_AddCVType_Bitfield( unsigned int typeno, unsigned int bitoff, unsigned int nbits, unsigned int basetype ) { struct datatype *dt = DEBUG_NewDataType( DT_BITFIELD, NULL ); struct datatype *base = DEBUG_GetCVType( basetype ); DEBUG_SetBitfieldParams( dt, bitoff, nbits, base ); return DEBUG_AddCVType( typeno, dt ); } static int DEBUG_AddCVType_EnumFieldList( unsigned int typeno, unsigned char *list, int len ) { struct datatype *dt = DEBUG_NewDataType( DT_ENUM, NULL ); unsigned char *ptr = list; while ( ptr - list < len ) { union codeview_fieldtype *type = (union codeview_fieldtype *)ptr; if ( *ptr >= 0xf0 ) /* LF_PAD... */ { ptr += *ptr & 0x0f; continue; } switch ( type->generic.id ) { case LF_ENUMERATE: { int value, vlen = numeric_leaf( &value, &type->enumerate.value ); unsigned char *name = (unsigned char *)&type->enumerate.value + vlen; DEBUG_AddStructElement( dt, terminate_string( name ), NULL, value, 0 ); ptr += 2 + 2 + vlen + (1 + name[0]); break; } default: DEBUG_Printf( DBG_CHN_MESG, "Unhandled type %04x in ENUM field list\n", type->generic.id ); return FALSE; } } return DEBUG_AddCVType( typeno, dt ); } static int DEBUG_AddCVType_StructFieldList( unsigned int typeno, unsigned char *list, int len ) { struct datatype *dt = DEBUG_NewDataType( DT_STRUCT, NULL ); unsigned char *ptr = list; while ( ptr - list < len ) { union codeview_fieldtype *type = (union codeview_fieldtype *)ptr; if ( *ptr >= 0xf0 ) /* LF_PAD... */ { ptr += *ptr & 0x0f; continue; } switch ( type->generic.id ) { case LF_BCLASS: { int offset, olen = numeric_leaf( &offset, &type->bclass.offset ); /* FIXME: ignored for now */ ptr += 2 + 2 + 2 + olen; break; } case LF_BCLASS_32: { int offset, olen = numeric_leaf( &offset, &type->bclass32.offset ); /* FIXME: ignored for now */ ptr += 2 + 2 + 4 + olen; break; } case LF_VBCLASS: case LF_IVBCLASS: { int vbpoff, vbplen = numeric_leaf( &vbpoff, &type->vbclass.vbpoff ); unsigned short int *p_vboff = (unsigned short int *)((char *)&type->vbclass.vbpoff + vbpoff); int vpoff, vplen = numeric_leaf( &vpoff, p_vboff ); /* FIXME: ignored for now */ ptr += 2 + 2 + 2 + 2 + vbplen + vplen; break; } case LF_VBCLASS_32: case LF_IVBCLASS_32: { int vbpoff, vbplen = numeric_leaf( &vbpoff, &type->vbclass32.vbpoff ); unsigned short int *p_vboff = (unsigned short int *)((char *)&type->vbclass32.vbpoff + vbpoff); int vpoff, vplen = numeric_leaf( &vpoff, p_vboff ); /* FIXME: ignored for now */ ptr += 2 + 2 + 4 + 4 + vbplen + vplen; break; } case LF_MEMBER: { int offset, olen = numeric_leaf( &offset, &type->member.offset ); unsigned char *name = (unsigned char *)&type->member.offset + olen; struct datatype *subtype = DEBUG_GetCVType( type->member.type ); int elem_size = subtype? DEBUG_GetObjectSize( subtype ) : 0; DEBUG_AddStructElement( dt, terminate_string( name ), subtype, offset << 3, elem_size << 3 ); ptr += 2 + 2 + 2 + olen + (1 + name[0]); break; } case LF_MEMBER_32: { int offset, olen = numeric_leaf( &offset, &type->member32.offset ); unsigned char *name = (unsigned char *)&type->member32.offset + olen; struct datatype *subtype = DEBUG_GetCVType( type->member32.type ); int elem_size = subtype? DEBUG_GetObjectSize( subtype ) : 0; DEBUG_AddStructElement( dt, terminate_string( name ), subtype, offset << 3, elem_size << 3 ); ptr += 2 + 2 + 4 + olen + (1 + name[0]); break; } case LF_STMEMBER: /* FIXME: ignored for now */ ptr += 2 + 2 + 2 + (1 + type->stmember.name[0]); break; case LF_STMEMBER_32: /* FIXME: ignored for now */ ptr += 2 + 4 + 2 + (1 + type->stmember32.name[0]); break; case LF_METHOD: /* FIXME: ignored for now */ ptr += 2 + 2 + 2 + (1 + type->method.name[0]); break; case LF_METHOD_32: /* FIXME: ignored for now */ ptr += 2 + 2 + 4 + (1 + type->method32.name[0]); break; case LF_NESTTYPE: /* FIXME: ignored for now */ ptr += 2 + 2 + (1 + type->nesttype.name[0]); break; case LF_NESTTYPE_32: /* FIXME: ignored for now */ ptr += 2 + 2 + 4 + (1 + type->nesttype32.name[0]); break; case LF_VFUNCTAB: /* FIXME: ignored for now */ ptr += 2 + 2; break; case LF_VFUNCTAB_32: /* FIXME: ignored for now */ ptr += 2 + 2 + 4; break; case LF_ONEMETHOD: /* FIXME: ignored for now */ switch ( (type->onemethod.attribute >> 2) & 7 ) { case 4: case 6: /* (pure) introducing virtual method */ ptr += 2 + 2 + 2 + 4 + (1 + type->onemethod_virt.name[0]); break; default: ptr += 2 + 2 + 2 + (1 + type->onemethod.name[0]); break; } break; case LF_ONEMETHOD_32: /* FIXME: ignored for now */ switch ( (type->onemethod32.attribute >> 2) & 7 ) { case 4: case 6: /* (pure) introducing virtual method */ ptr += 2 + 2 + 4 + 4 + (1 + type->onemethod32_virt.name[0]); break; default: ptr += 2 + 2 + 4 + (1 + type->onemethod32.name[0]); break; } break; default: DEBUG_Printf( DBG_CHN_MESG, "Unhandled type %04x in STRUCT field list\n", type->generic.id ); return FALSE; } } return DEBUG_AddCVType( typeno, dt ); } static int DEBUG_AddCVType_Enum( unsigned int typeno, char *name, unsigned int fieldlist ) { struct datatype *dt = DEBUG_NewDataType( DT_ENUM, name ); struct datatype *list = DEBUG_GetCVType( fieldlist ); if ( list ) DEBUG_CopyFieldlist( dt, list ); return DEBUG_AddCVType( typeno, dt ); } static int DEBUG_AddCVType_Struct( unsigned int typeno, char *name, int structlen, unsigned int fieldlist ) { struct datatype *dt = DEBUG_NewDataType( DT_STRUCT, name ); struct datatype *list = DEBUG_GetCVType( fieldlist ); if ( list ) { DEBUG_SetStructSize( dt, structlen ); DEBUG_CopyFieldlist( dt, list ); } return DEBUG_AddCVType( typeno, dt ); } static int DEBUG_ParseTypeTable( char *table, int len ) { unsigned int curr_type = 0x1000; char *ptr = table; while ( ptr - table < len ) { union codeview_type *type = (union codeview_type *) ptr; int retv = TRUE; switch ( type->generic.id ) { case LF_POINTER: retv = DEBUG_AddCVType_Pointer( curr_type, type->pointer.datatype ); break; case LF_POINTER_32: retv = DEBUG_AddCVType_Pointer( curr_type, type->pointer32.datatype ); break; case LF_ARRAY: { int arrlen, alen = numeric_leaf( &arrlen, &type->array.arrlen ); unsigned char *name = (unsigned char *)&type->array.arrlen + alen; retv = DEBUG_AddCVType_Array( curr_type, terminate_string( name ), type->array.elemtype, arrlen ); break; } case LF_ARRAY_32: { int arrlen, alen = numeric_leaf( &arrlen, &type->array32.arrlen ); unsigned char *name = (unsigned char *)&type->array32.arrlen + alen; retv = DEBUG_AddCVType_Array( curr_type, terminate_string( name ), type->array32.elemtype, type->array32.arrlen ); break; } case LF_BITFIELD: retv = DEBUG_AddCVType_Bitfield( curr_type, type->bitfield.bitoff, type->bitfield.nbits, type->bitfield.type ); break; case LF_BITFIELD_32: retv = DEBUG_AddCVType_Bitfield( curr_type, type->bitfield32.bitoff, type->bitfield32.nbits, type->bitfield32.type ); break; case LF_FIELDLIST: case LF_FIELDLIST_32: { /* * A 'field list' is a CodeView-specific data type which doesn't * directly correspond to any high-level data type. It is used * to hold the collection of members of a struct, class, union * or enum type. The actual definition of that type will follow * later, and refer to the field list definition record. * * As we don't have a field list type ourselves, we look ahead * in the field list to try to find out whether this field list * will be used for an enum or struct type, and create a dummy * type of the corresponding sort. Later on, the definition of * the 'real' type will copy the member / enumeration data. */ char *list = type->fieldlist.list; int len = (ptr + type->generic.len + 2) - list; if ( ((union codeview_fieldtype *)list)->generic.id == LF_ENUMERATE ) retv = DEBUG_AddCVType_EnumFieldList( curr_type, list, len ); else retv = DEBUG_AddCVType_StructFieldList( curr_type, list, len ); break; } case LF_STRUCTURE: case LF_CLASS: { int structlen, slen = numeric_leaf( &structlen, &type->structure.structlen ); unsigned char *name = (unsigned char *)&type->structure.structlen + slen; retv = DEBUG_AddCVType_Struct( curr_type, terminate_string( name ), structlen, type->structure.fieldlist ); break; } case LF_STRUCTURE_32: case LF_CLASS_32: { int structlen, slen = numeric_leaf( &structlen, &type->structure32.structlen ); unsigned char *name = (unsigned char *)&type->structure32.structlen + slen; retv = DEBUG_AddCVType_Struct( curr_type, terminate_string( name ), structlen, type->structure32.fieldlist ); break; } case LF_UNION: { int un_len, ulen = numeric_leaf( &un_len, &type->t_union.un_len ); unsigned char *name = (unsigned char *)&type->t_union.un_len + ulen; retv = DEBUG_AddCVType_Struct( curr_type, terminate_string( name ), un_len, type->t_union.fieldlist ); break; } case LF_UNION_32: { int un_len, ulen = numeric_leaf( &un_len, &type->t_union32.un_len ); unsigned char *name = (unsigned char *)&type->t_union32.un_len + ulen; retv = DEBUG_AddCVType_Struct( curr_type, terminate_string( name ), un_len, type->t_union32.fieldlist ); break; } case LF_ENUM: retv = DEBUG_AddCVType_Enum( curr_type, terminate_string( type->enumeration.name ), type->enumeration.field ); break; case LF_ENUM_32: retv = DEBUG_AddCVType_Enum( curr_type, terminate_string( type->enumeration32.name ), type->enumeration32.field ); break; default: break; } if ( !retv ) return FALSE; curr_type++; ptr += type->generic.len + 2; } return TRUE; } void DEBUG_InitCVDataTypes(void) { /* * These are the common builtin types that are used by VC++. */ cv_basic_types[T_NOTYPE] = NULL; cv_basic_types[T_ABS] = NULL; cv_basic_types[T_VOID] = DEBUG_NewDataType(DT_BASIC, "void"); cv_basic_types[T_CHAR] = DEBUG_NewDataType(DT_BASIC, "char"); cv_basic_types[T_SHORT] = DEBUG_NewDataType(DT_BASIC, "short int"); cv_basic_types[T_LONG] = DEBUG_NewDataType(DT_BASIC, "long int"); cv_basic_types[T_QUAD] = DEBUG_NewDataType(DT_BASIC, "long long int"); cv_basic_types[T_UCHAR] = DEBUG_NewDataType(DT_BASIC, "unsigned char"); cv_basic_types[T_USHORT] = DEBUG_NewDataType(DT_BASIC, "short unsigned int"); cv_basic_types[T_ULONG] = DEBUG_NewDataType(DT_BASIC, "long unsigned int"); cv_basic_types[T_UQUAD] = DEBUG_NewDataType(DT_BASIC, "long long unsigned int"); cv_basic_types[T_REAL32] = DEBUG_NewDataType(DT_BASIC, "float"); cv_basic_types[T_REAL64] = DEBUG_NewDataType(DT_BASIC, "double"); cv_basic_types[T_RCHAR] = DEBUG_NewDataType(DT_BASIC, "char"); cv_basic_types[T_WCHAR] = DEBUG_NewDataType(DT_BASIC, "short"); cv_basic_types[T_INT4] = DEBUG_NewDataType(DT_BASIC, "int"); cv_basic_types[T_UINT4] = DEBUG_NewDataType(DT_BASIC, "unsigned int"); cv_basic_types[T_32PVOID] = DEBUG_FindOrMakePointerType(cv_basic_types[T_VOID]); cv_basic_types[T_32PCHAR] = DEBUG_FindOrMakePointerType(cv_basic_types[T_CHAR]); cv_basic_types[T_32PSHORT] = DEBUG_FindOrMakePointerType(cv_basic_types[T_SHORT]); cv_basic_types[T_32PLONG] = DEBUG_FindOrMakePointerType(cv_basic_types[T_LONG]); cv_basic_types[T_32PQUAD] = DEBUG_FindOrMakePointerType(cv_basic_types[T_QUAD]); cv_basic_types[T_32PUCHAR] = DEBUG_FindOrMakePointerType(cv_basic_types[T_UCHAR]); cv_basic_types[T_32PUSHORT] = DEBUG_FindOrMakePointerType(cv_basic_types[T_USHORT]); cv_basic_types[T_32PULONG] = DEBUG_FindOrMakePointerType(cv_basic_types[T_ULONG]); cv_basic_types[T_32PUQUAD] = DEBUG_FindOrMakePointerType(cv_basic_types[T_UQUAD]); cv_basic_types[T_32PREAL32] = DEBUG_FindOrMakePointerType(cv_basic_types[T_REAL32]); cv_basic_types[T_32PREAL64] = DEBUG_FindOrMakePointerType(cv_basic_types[T_REAL64]); cv_basic_types[T_32PRCHAR] = DEBUG_FindOrMakePointerType(cv_basic_types[T_RCHAR]); cv_basic_types[T_32PWCHAR] = DEBUG_FindOrMakePointerType(cv_basic_types[T_WCHAR]); cv_basic_types[T_32PINT4] = DEBUG_FindOrMakePointerType(cv_basic_types[T_INT4]); cv_basic_types[T_32PUINT4] = DEBUG_FindOrMakePointerType(cv_basic_types[T_UINT4]); } /* * In this function, we keep track of deferred debugging information * that we may need later if we were to need to use the internal debugger. * We don't fully process it here for performance reasons. */ int DEBUG_RegisterMSCDebugInfo(DBG_MODULE* module, HANDLE hFile, void* _nth, unsigned long nth_ofs) { int has_codeview = FALSE; int rtn = FALSE; IMAGE_DEBUG_DIRECTORY dbg; u_long v_addr, size, orig_size; PIMAGE_NT_HEADERS nth = (PIMAGE_NT_HEADERS)_nth; orig_size = nth->OptionalHeader.DataDirectory[IMAGE_DIRECTORY_ENTRY_DEBUG].Size; if (orig_size) { v_addr = nth->OptionalHeader.DataDirectory[IMAGE_DIRECTORY_ENTRY_DEBUG].VirtualAddress; for(size = orig_size; size >= sizeof(dbg); size -= sizeof(dbg)) { if (!DEBUG_READ_MEM_VERBOSE((void*)((char *) module->load_addr + v_addr), &dbg, sizeof(dbg))) continue; switch(dbg.Type) { case IMAGE_DEBUG_TYPE_CODEVIEW: case IMAGE_DEBUG_TYPE_MISC: has_codeview = TRUE; break; } v_addr += sizeof(dbg); } v_addr = nth->OptionalHeader.DataDirectory[IMAGE_DIRECTORY_ENTRY_DEBUG].VirtualAddress; for(size = orig_size; size >= sizeof(dbg); size -= sizeof(dbg)) { if (!DEBUG_READ_MEM_VERBOSE((void*)((char *)module->load_addr + v_addr), &dbg, sizeof(dbg))) continue; switch(dbg.Type) { case IMAGE_DEBUG_TYPE_COFF: /* * If we have both codeview and COFF debug info, ignore the * coff debug info as it would just confuse us, and it is * less complete. * * FIXME - this is broken - if we cannot find the PDB file, then * we end up with no debugging info at all. In this case, we * should use the COFF info as a backup. */ if( has_codeview ) { break; } case IMAGE_DEBUG_TYPE_CODEVIEW: case IMAGE_DEBUG_TYPE_MISC: /* * This is usually an indirection to a .DBG file. * This is similar to (but a slightly older format) from the * PDB file. * * First check to see if the image was 'stripped'. If so, it * means that this entry points to a .DBG file. Otherwise, * it just points to itself, and we can ignore this. */ if( (dbg.Type != IMAGE_DEBUG_TYPE_MISC) || (nth->FileHeader.Characteristics & IMAGE_FILE_DEBUG_STRIPPED) != 0 ) { /* * Read the important bits. What we do after this depends * upon the type, but this is always enough so we are able * to proceed if we know what we need to do next. */ /* basically, the PE loader maps all sections (data, resources...), but doesn't map * the DataDirectory array's content. One its entry contains the *beloved* * debug information. (Note the DataDirectory is mapped, not its content) */ HANDLE hMap; char* dbg_info; DEBUG_Printf(DBG_CHN_TRACE, "PE debugging info at %ld<%ld>\n", dbg.PointerToRawData, dbg.SizeOfData); dbg_info = DEBUG_MapDebugInfoFile(NULL, dbg.PointerToRawData, dbg.SizeOfData, &hFile, &hMap); if (dbg_info != NULL && (module->extra_info = DBG_alloc(sizeof(MSC_DBG_INFO))) != NULL) { MSC_INFO(module)->dbg_info = dbg_info; MSC_INFO(module)->dbg_size = dbg.SizeOfData; MSC_INFO(module)->dbgdir = dbg; MSC_INFO(module)->sect_ofs = nth_ofs + OFFSET_OF(IMAGE_NT_HEADERS, OptionalHeader) + nth->FileHeader.SizeOfOptionalHeader; MSC_INFO(module)->nsect = nth->FileHeader.NumberOfSections; DEBUG_ProcessMSCDebugInfo(module); DBG_free(MSC_INFO(module)); MSC_INFO(module) = NULL; } DEBUG_UnmapDebugInfoFile(0, hMap, dbg_info); } break; #if 0 default: #endif } v_addr += sizeof(dbg); } DEBUG_CurrProcess->next_index++; } return rtn; } /* look for stabs information in PE header (it's how mingw compiler provides its * debugging information), and also wine PE <-> ELF linking thru .wsolnk sections */ int DEBUG_RegisterStabsDebugInfo(DBG_MODULE* module, HANDLE hFile, void* _nth, unsigned long nth_ofs) { IMAGE_SECTION_HEADER pe_seg; unsigned long pe_seg_ofs; int i, stabsize = 0, stabstrsize = 0, xcnlnksize = 0; unsigned int stabs = 0, stabstr = 0, xcnlnk = 0; PIMAGE_NT_HEADERS nth = (PIMAGE_NT_HEADERS)_nth; pe_seg_ofs = nth_ofs + OFFSET_OF(IMAGE_NT_HEADERS, OptionalHeader) + nth->FileHeader.SizeOfOptionalHeader; for (i = 0; i < nth->FileHeader.NumberOfSections; i++, pe_seg_ofs += sizeof(pe_seg)) { if (!DEBUG_READ_MEM_VERBOSE((void*)((char *)module->load_addr + pe_seg_ofs), &pe_seg, sizeof(pe_seg))) continue; if (!strcasecmp(pe_seg.Name, ".stab")) { stabs = pe_seg.VirtualAddress; stabsize = pe_seg.SizeOfRawData; } else if (!strncasecmp(pe_seg.Name, ".stabstr", 8)) { stabstr = pe_seg.VirtualAddress; stabstrsize = pe_seg.SizeOfRawData; } else if (!strncasecmp(pe_seg.Name, ".xcnlnk", 7)) { xcnlnk = pe_seg.VirtualAddress; xcnlnksize = pe_seg.SizeOfRawData; } } if (stabstrsize && stabsize) { char* s1 = DBG_alloc(stabsize+stabstrsize); if (s1) { if (DEBUG_READ_MEM_VERBOSE((char*)module->load_addr + stabs, s1, stabsize) && DEBUG_READ_MEM_VERBOSE((char*)module->load_addr + stabstr, s1 + stabsize, stabstrsize)) { DEBUG_ParseStabs(s1, 0, 0, stabsize, stabsize, stabstrsize); } else { DEBUG_Printf(DBG_CHN_MESG, "couldn't read data block\n"); } DBG_free(s1); } else { DEBUG_Printf(DBG_CHN_MESG, "couldn't alloc %d bytes\n", stabsize + stabstrsize); } } if (xcnlnksize) { DWORD addr; char bufstr[256]; if (DEBUG_READ_MEM_VERBOSE((char*)module->load_addr + xcnlnk, &addr, sizeof(addr)) && DEBUG_READ_MEM_VERBOSE((char*)addr, bufstr, sizeof(bufstr))) { bufstr[sizeof(bufstr) - 1] = 0; DEBUG_Printf(DBG_CHN_TRACE, "Got xcnlnk: argv0 '%s'\n", bufstr); DEBUG_ReadExecutableDbgInfo(bufstr); } } return TRUE; } /* * Process COFF debugging information embedded in a Win32 application. * */ static int DEBUG_ProcessCoff(DBG_MODULE* module) { struct CoffAuxSection * aux; struct CoffDebug * coff; struct CoffFiles * coff_files = NULL; struct CoffLinenum * coff_linetab; char * coff_strtab; struct CoffSymbol * coff_sym; struct CoffSymbol * coff_symbol; struct CoffFiles * curr_file = NULL; int i; int j; int k; struct CoffLinenum * linepnt; int linetab_indx; char namebuff[9]; char * nampnt; int naux; DBG_VALUE new_value; int nfiles = 0; int nfiles_alloc = 0; struct CoffFiles orig_file; int rtn = FALSE; char * this_file = NULL; coff = (struct CoffDebug *) MSC_INFO(module)->dbg_info; coff_symbol = (struct CoffSymbol *) ((unsigned int) coff + coff->SymbolOffset); coff_linetab = (struct CoffLinenum *) ((unsigned int) coff + coff->LinenumberOffset); coff_strtab = (char *) ((unsigned int) coff_symbol + 18*coff->N_Sym); linetab_indx = 0; new_value.cookie = DV_TARGET; new_value.type = NULL; for(i=0; i < coff->N_Sym; i++ ) { /* * We do this because some compilers (i.e. gcc) incorrectly * pad the structure up to a 4 byte boundary. The structure * is really only 18 bytes long, so we have to manually make sure * we get it right. * * FIXME - there must be a way to have autoconf figure out the * correct compiler option for this. If it is always gcc, that * makes life simpler, but I don't want to force this. */ coff_sym = (struct CoffSymbol *) ((unsigned int) coff_symbol + 18*i); naux = coff_sym->NumberOfAuxSymbols; if( coff_sym->StorageClass == IMAGE_SYM_CLASS_FILE ) { if( nfiles + 1 >= nfiles_alloc ) { nfiles_alloc += 10; coff_files = (struct CoffFiles *) DBG_realloc(coff_files, nfiles_alloc * sizeof(struct CoffFiles)); } curr_file = coff_files + nfiles; nfiles++; curr_file->startaddr = 0xffffffff; curr_file->endaddr = 0; curr_file->filename = ((char *) coff_sym) + 18; curr_file->linetab_offset = -1; curr_file->linecnt = 0; curr_file->entries = NULL; curr_file->neps = curr_file->neps_alloc = 0; DEBUG_Printf(DBG_CHN_TRACE,"New file %s\n", curr_file->filename); i += naux; continue; } /* * This guy marks the size and location of the text section * for the current file. We need to keep track of this so * we can figure out what file the different global functions * go with. */ if( (coff_sym->StorageClass == IMAGE_SYM_CLASS_STATIC) && (naux != 0) && (coff_sym->Type == 0) && (coff_sym->SectionNumber == 1) ) { aux = (struct CoffAuxSection *) ((unsigned int) coff_sym + 18); if( curr_file->linetab_offset != -1 ) { #if 0 DEBUG_Printf(DBG_CHN_TRACE, "Duplicating sect from %s: %x %x %x %d %d\n", curr_file->filename, aux->Length, aux->NumberOfRelocations, aux->NumberOfLinenumbers, aux->Number, aux->Selection); DEBUG_Printf(DBG_CHN_TRACE, "More sect %d %x %d %d %d\n", coff_sym->SectionNumber, coff_sym->Value, coff_sym->Type, coff_sym->StorageClass, coff_sym->NumberOfAuxSymbols); #endif /* * Save this so we can copy bits from it. */ orig_file = *curr_file; /* * Duplicate the file entry. We have no way to describe * multiple text sections in our current way of handling things. */ if( nfiles + 1 >= nfiles_alloc ) { nfiles_alloc += 10; coff_files = (struct CoffFiles *) DBG_realloc(coff_files, nfiles_alloc * sizeof(struct CoffFiles)); } curr_file = coff_files + nfiles; nfiles++; curr_file->startaddr = 0xffffffff; curr_file->endaddr = 0; curr_file->filename = orig_file.filename; curr_file->linetab_offset = -1; curr_file->linecnt = 0; curr_file->entries = NULL; curr_file->neps = curr_file->neps_alloc = 0; } #if 0 else { DEBUG_Printf(DBG_CHN_TRACE, "New text sect from %s: %x %x %x %d %d\n", curr_file->filename, aux->Length, aux->NumberOfRelocations, aux->NumberOfLinenumbers, aux->Number, aux->Selection); } #endif if( curr_file->startaddr > coff_sym->Value ) { curr_file->startaddr = coff_sym->Value; } if( curr_file->startaddr > coff_sym->Value ) { curr_file->startaddr = coff_sym->Value; } if( curr_file->endaddr < coff_sym->Value + aux->Length ) { curr_file->endaddr = coff_sym->Value + aux->Length; } curr_file->linetab_offset = linetab_indx; curr_file->linecnt = aux->NumberOfLinenumbers; linetab_indx += aux->NumberOfLinenumbers; i += naux; continue; } if( (coff_sym->StorageClass == IMAGE_SYM_CLASS_STATIC) && (naux == 0) && (coff_sym->SectionNumber == 1) ) { /* * This is a normal static function when naux == 0. * Just register it. The current file is the correct * one in this instance. */ if( coff_sym->N.Name.NotLong ) { memcpy(namebuff, coff_sym->N.ShortName, 8); namebuff[8] = '\0'; nampnt = &namebuff[0]; } else { nampnt = coff_strtab + coff_sym->N.Name.StrTaboff; } if( nampnt[0] == '_' ) { nampnt++; } new_value.addr.seg = 0; new_value.addr.off = (int) ((char *)module->load_addr + coff_sym->Value); if( curr_file->neps + 1 >= curr_file->neps_alloc ) { curr_file->neps_alloc += 10; curr_file->entries = (struct name_hash **) DBG_realloc(curr_file->entries, curr_file->neps_alloc * sizeof(struct name_hash *)); } #if 0 DEBUG_Printf(DBG_CHN_TRACE,"\tAdding static symbol %s\n", nampnt); #endif curr_file->entries[curr_file->neps++] = DEBUG_AddSymbol( nampnt, &new_value, this_file, SYM_WIN32 ); i += naux; continue; } if( (coff_sym->StorageClass == IMAGE_SYM_CLASS_EXTERNAL) && ISFCN(coff_sym->Type) && (coff_sym->SectionNumber > 0) ) { if( coff_sym->N.Name.NotLong ) { memcpy(namebuff, coff_sym->N.ShortName, 8); namebuff[8] = '\0'; nampnt = &namebuff[0]; } else { nampnt = coff_strtab + coff_sym->N.Name.StrTaboff; } if( nampnt[0] == '_' ) { nampnt++; } new_value.addr.seg = 0; new_value.addr.off = (int) ((char *)module->load_addr + coff_sym->Value); #if 0 DEBUG_Printf(DBG_CHN_TRACE, "%d: %x %s\n", i, new_value.addr.off, nampnt); DEBUG_Printf(DBG_CHN_TRACE,"\tAdding global symbol %s\n", nampnt); #endif /* * Now we need to figure out which file this guy belongs to. */ this_file = NULL; for(j=0; j < nfiles; j++) { if( coff_files[j].startaddr <= coff_sym->Value && coff_files[j].endaddr > coff_sym->Value ) { this_file = coff_files[j].filename; break; } } if( coff_files[j].neps + 1 >= coff_files[j].neps_alloc ) { coff_files[j].neps_alloc += 10; coff_files[j].entries = (struct name_hash **) DBG_realloc(coff_files[j].entries, coff_files[j].neps_alloc * sizeof(struct name_hash *)); } coff_files[j].entries[coff_files[j].neps++] = DEBUG_AddSymbol( nampnt, &new_value, this_file, SYM_WIN32 ); i += naux; continue; } if( (coff_sym->StorageClass == IMAGE_SYM_CLASS_EXTERNAL) && (coff_sym->SectionNumber > 0) ) { /* * Similar to above, but for the case of data symbols. * These aren't treated as entrypoints. */ if( coff_sym->N.Name.NotLong ) { memcpy(namebuff, coff_sym->N.ShortName, 8); namebuff[8] = '\0'; nampnt = &namebuff[0]; } else { nampnt = coff_strtab + coff_sym->N.Name.StrTaboff; } if( nampnt[0] == '_' ) { nampnt++; } new_value.addr.seg = 0; new_value.addr.off = (int) ((char *)module->load_addr + coff_sym->Value); #if 0 DEBUG_Printf(DBG_CHN_TRACE, "%d: %x %s\n", i, new_value.addr.off, nampnt); DEBUG_Printf(DBG_CHN_TRACE,"\tAdding global data symbol %s\n", nampnt); #endif /* * Now we need to figure out which file this guy belongs to. */ DEBUG_AddSymbol( nampnt, &new_value, NULL, SYM_WIN32 ); i += naux; continue; } if( (coff_sym->StorageClass == IMAGE_SYM_CLASS_STATIC) && (naux == 0) ) { /* * Ignore these. They don't have anything to do with * reality. */ i += naux; continue; } #if 0 DEBUG_Printf(DBG_CHN_TRACE,"Skipping unknown entry %d %d %d\n", coff_sym->StorageClass, coff_sym->SectionNumber, naux); #endif /* * For now, skip past the aux entries. */ i += naux; } /* * OK, we now should have a list of files, and we should have a list * of entrypoints. We need to sort the entrypoints so that we are * able to tie the line numbers with the given functions within the * file. */ if( coff_files != NULL ) { for(j=0; j < nfiles; j++) { if( coff_files[j].entries != NULL ) { qsort(coff_files[j].entries, coff_files[j].neps, sizeof(struct name_hash *), DEBUG_cmp_sym); } } /* * Now pick apart the line number tables, and attach the entries * to the given functions. */ for(j=0; j < nfiles; j++) { i = 0; if( coff_files[j].neps != 0 ) for(k=0; k < coff_files[j].linecnt; k++) { /* * Another monstrosity caused by the fact that we are using * a 6 byte structure, and gcc wants to pad structures to 4 byte * boundaries. Otherwise we could just index into an array. */ linepnt = (struct CoffLinenum *) ((unsigned int) coff_linetab + 6*(coff_files[j].linetab_offset + k)); /* * If we have spilled onto the next entrypoint, then * bump the counter.. */ while(TRUE) { if (i+1 >= coff_files[j].neps) break; DEBUG_GetSymbolAddr(coff_files[j].entries[i+1], &new_value.addr); if( (((unsigned int)module->load_addr + linepnt->VirtualAddr) >= new_value.addr.off) ) { i++; } else break; } /* * Add the line number. This is always relative to the * start of the function, so we need to subtract that offset * first. */ DEBUG_GetSymbolAddr(coff_files[j].entries[i], &new_value.addr); DEBUG_AddLineNumber(coff_files[j].entries[i], linepnt->Linenum, (unsigned int) module->load_addr + linepnt->VirtualAddr - new_value.addr.off); } } } rtn = TRUE; if( coff_files != NULL ) { for(j=0; j < nfiles; j++) { if( coff_files[j].entries != NULL ) { DBG_free(coff_files[j].entries); } } DBG_free(coff_files); } return (rtn); } /* * Process a codeview line number table. Digestify the thing so that * we can easily reference the thing when we process the rest of * the information. */ static struct codeview_linetab_hdr * DEBUG_SnarfLinetab(char * linetab, int size) { int file_segcount; char filename[PATH_MAX]; unsigned int * filetab; char * fn; int i; int k; struct codeview_linetab_hdr * lt_hdr; unsigned int * lt_ptr; int nfile; int nseg; union any_size pnt; union any_size pnt2; struct startend * start; int this_seg; /* * Now get the important bits. */ pnt.c = linetab; nfile = *pnt.s++; nseg = *pnt.s++; filetab = (unsigned int *) pnt.c; /* * Now count up the number of segments in the file. */ nseg = 0; for(i=0; insect; sectp = DBG_alloc(sizeof(*sectp) * nsect); if (!sectp || !DEBUG_READ_MEM_VERBOSE((char *)module->load_addr + MSC_INFO(module)->sect_ofs, sectp, sizeof(*sectp) * nsect)) return FALSE; /* * Loop over the different types of records and whenever we * find something we are interested in, record it and move on. */ while( ptr.c - cv_data < size ) { sym = (union codeview_symbol *) ptr.c; if( sym->generic.len - sizeof(int) == (ptr.c - cv_data) ) { /* * This happens when we have indirect symbols that VC++ 4.2 * sometimes uses when there isn't a line number table. * We ignore it - we will process and enter all of the * symbols in the global symbol table anyways, so there * isn't much point in keeping track of all of this crap. */ break; } memset(symname, 0, sizeof(symname)); switch(sym->generic.id) { case S_GDATA: case S_LDATA: case S_PUB: /* * First, a couple of sanity checks. */ if( sym->data.namelen == 0 ) { break; } if( sym->data.seg == 0 || sym->data.seg > nsect ) { break; } /* * Global and local data symbols. We don't associate these * with any given source file. */ memcpy(symname, sym->data.name, sym->data.namelen); new_value.addr.seg = 0; new_value.type = DEBUG_GetCVType(sym->data.symtype); new_value.addr.off = (unsigned int) module->load_addr + sectp[sym->data.seg - 1].VirtualAddress + sym->data.offset; new_value.cookie = DV_TARGET; DEBUG_AddSymbol( symname, &new_value, NULL, SYM_WIN32 | SYM_DATA ); break; case S_GDATA_32: case S_LDATA_32: case S_PUB_32: /* * First, a couple of sanity checks. */ if( sym->data32.namelen == 0 ) { break; } if( sym->data32.seg == 0 || sym->data32.seg > nsect ) { break; } /* * Global and local data symbols. We don't associate these * with any given source file. */ memcpy(symname, sym->data32.name, sym->data32.namelen); new_value.addr.seg = 0; new_value.type = DEBUG_GetCVType(sym->data32.symtype); new_value.addr.off = (unsigned int) module->load_addr + sectp[sym->data32.seg - 1].VirtualAddress + sym->data32.offset; new_value.cookie = DV_TARGET; DEBUG_AddSymbol( symname, &new_value, NULL, SYM_WIN32 | SYM_DATA ); break; case S_THUNK: /* * Sort of like a global function, but it just points * to a thunk, which is a stupid name for what amounts to * a PLT slot in the normal jargon that everyone else uses. */ memcpy(symname, sym->thunk.name, sym->thunk.namelen); new_value.addr.seg = 0; new_value.type = NULL; new_value.addr.off = (unsigned int) module->load_addr + sectp[sym->thunk.segment - 1].VirtualAddress + sym->thunk.offset; new_value.cookie = DV_TARGET; thunk_sym = DEBUG_AddSymbol( symname, &new_value, NULL, SYM_WIN32 | SYM_FUNC); DEBUG_SetSymbolSize(thunk_sym, sym->thunk.thunk_len); break; case S_GPROC: case S_LPROC: /* * Global and static functions. */ memcpy(symname, sym->proc.name, sym->proc.namelen); new_value.addr.seg = 0; new_value.type = DEBUG_GetCVType(sym->proc.proctype); new_value.addr.off = (unsigned int) module->load_addr + sectp[sym->proc.segment - 1].VirtualAddress + sym->proc.offset; new_value.cookie = DV_TARGET; /* * See if we can find a segment that this goes with. If so, * it means that we also may have line number information * for this function. */ for(i=0; linetab && linetab[i].linetab != NULL; i++) { if( ((unsigned int) module->load_addr + sectp[linetab[i].segno - 1].VirtualAddress + linetab[i].start <= new_value.addr.off) && ((unsigned int) module->load_addr + sectp[linetab[i].segno - 1].VirtualAddress + linetab[i].end > new_value.addr.off) ) { break; } } DEBUG_Normalize(curr_func); if( !linetab || linetab[i].linetab == NULL ) { curr_func = DEBUG_AddSymbol( symname, &new_value, NULL, SYM_WIN32 | SYM_FUNC); } else { /* * First, create the entry. Then dig through the linetab * and add whatever line numbers are appropriate for this * function. */ curr_func = DEBUG_AddSymbol( symname, &new_value, linetab[i].sourcefile, SYM_WIN32 | SYM_FUNC); for(j=0; j < linetab[i].nline; j++) { if( linetab[i].offtab[j] >= sym->proc.offset && linetab[i].offtab[j] < sym->proc.offset + sym->proc.proc_len ) { DEBUG_AddLineNumber(curr_func, linetab[i].linetab[j], linetab[i].offtab[j] - sym->proc.offset); } } } /* * Add information about where we should set breakpoints * in this function. */ DEBUG_SetSymbolBPOff(curr_func, sym->proc.debug_start); DEBUG_SetSymbolSize(curr_func, sym->proc.proc_len); break; case S_GPROC_32: case S_LPROC_32: /* * Global and static functions. */ memcpy(symname, sym->proc32.name, sym->proc32.namelen); new_value.addr.seg = 0; new_value.type = DEBUG_GetCVType(sym->proc32.proctype); new_value.addr.off = (unsigned int) module->load_addr + sectp[sym->proc32.segment - 1].VirtualAddress + sym->proc32.offset; new_value.cookie = DV_TARGET; /* * See if we can find a segment that this goes with. If so, * it means that we also may have line number information * for this function. */ for(i=0; linetab && linetab[i].linetab != NULL; i++) { if( ((unsigned int) module->load_addr + sectp[linetab[i].segno - 1].VirtualAddress + linetab[i].start <= new_value.addr.off) && ((unsigned int) module->load_addr + sectp[linetab[i].segno - 1].VirtualAddress + linetab[i].end > new_value.addr.off) ) { break; } } DEBUG_Normalize(curr_func); if( !linetab || linetab[i].linetab == NULL ) { curr_func = DEBUG_AddSymbol( symname, &new_value, NULL, SYM_WIN32 | SYM_FUNC); } else { /* * First, create the entry. Then dig through the linetab * and add whatever line numbers are appropriate for this * function. */ curr_func = DEBUG_AddSymbol( symname, &new_value, linetab[i].sourcefile, SYM_WIN32 | SYM_FUNC); for(j=0; j < linetab[i].nline; j++) { if( linetab[i].offtab[j] >= sym->proc32.offset && linetab[i].offtab[j] < sym->proc32.offset + sym->proc32.proc_len ) { DEBUG_AddLineNumber(curr_func, linetab[i].linetab[j], linetab[i].offtab[j] - sym->proc32.offset); } } } /* * Add information about where we should set breakpoints * in this function. */ DEBUG_SetSymbolBPOff(curr_func, sym->proc32.debug_start); DEBUG_SetSymbolSize(curr_func, sym->proc32.proc_len); break; case S_BPREL: /* * Function parameters and stack variables. */ memcpy(symname, sym->stack.name, sym->stack.namelen); curr_sym = DEBUG_AddLocal(curr_func, 0, sym->stack.offset, 0, 0, symname); DEBUG_SetLocalSymbolType(curr_sym, DEBUG_GetCVType(sym->stack.symtype)); break; case S_BPREL_32: /* * Function parameters and stack variables. */ memcpy(symname, sym->stack32.name, sym->stack32.namelen); curr_sym = DEBUG_AddLocal(curr_func, 0, sym->stack32.offset, 0, 0, symname); DEBUG_SetLocalSymbolType(curr_sym, DEBUG_GetCVType(sym->stack32.symtype)); break; default: break; } /* * Adjust pointer to point to next entry, rounding up to a word * boundary. MS preserving alignment? Stranger things have * happened. */ if( sym->generic.id == S_PROCREF || sym->generic.id == S_DATAREF || sym->generic.id == S_LPROCREF ) { len = (sym->generic.len + 3) & ~3; len += ptr.c[16] + 1; ptr.c += (len + 3) & ~3; } else { ptr.c += (sym->generic.len + 3) & ~3; } } if( linetab != NULL ) { DBG_free(linetab); } DBG_free(sectp); return TRUE; } /* * Process PDB file which contains debug information. */ #pragma pack(1) typedef struct _PDB_FILE { DWORD size; DWORD unknown; } PDB_FILE, *PPDB_FILE; typedef struct _PDB_HEADER { CHAR ident[40]; DWORD signature; DWORD blocksize; WORD freelist; WORD total_alloc; PDB_FILE toc; WORD toc_block[ 1 ]; } PDB_HEADER, *PPDB_HEADER; typedef struct _PDB_TOC { DWORD nFiles; PDB_FILE file[ 1 ]; } PDB_TOC, *PPDB_TOC; typedef struct _PDB_ROOT { DWORD version; DWORD TimeDateStamp; DWORD unknown; DWORD cbNames; CHAR names[ 1 ]; } PDB_ROOT, *PPDB_ROOT; typedef struct _PDB_TYPES_OLD { DWORD version; WORD first_index; WORD last_index; DWORD type_size; WORD file; WORD pad; } PDB_TYPES_OLD, *PPDB_TYPES_OLD; typedef struct _PDB_TYPES { DWORD version; DWORD type_offset; DWORD first_index; DWORD last_index; DWORD type_size; WORD file; WORD pad; DWORD hash_size; DWORD hash_base; DWORD hash_offset; DWORD hash_len; DWORD search_offset; DWORD search_len; DWORD unknown_offset; DWORD unknown_len; } PDB_TYPES, *PPDB_TYPES; typedef struct _PDB_SYMBOL_RANGE { WORD segment; WORD pad1; DWORD offset; DWORD size; DWORD characteristics; WORD index; WORD pad2; } PDB_SYMBOL_RANGE, *PPDB_SYMBOL_RANGE; typedef struct _PDB_SYMBOL_RANGE_EX { WORD segment; WORD pad1; DWORD offset; DWORD size; DWORD characteristics; WORD index; WORD pad2; DWORD timestamp; DWORD unknown; } PDB_SYMBOL_RANGE_EX, *PPDB_SYMBOL_RANGE_EX; typedef struct _PDB_SYMBOL_FILE { DWORD unknown1; PDB_SYMBOL_RANGE range; WORD flag; WORD file; DWORD symbol_size; DWORD lineno_size; DWORD unknown2; DWORD nSrcFiles; DWORD attribute; CHAR filename[ 1 ]; } PDB_SYMBOL_FILE, *PPDB_SYMBOL_FILE; typedef struct _PDB_SYMBOL_FILE_EX { DWORD unknown1; PDB_SYMBOL_RANGE_EX range; WORD flag; WORD file; DWORD symbol_size; DWORD lineno_size; DWORD unknown2; DWORD nSrcFiles; DWORD attribute; DWORD reserved[ 2 ]; CHAR filename[ 1 ]; } PDB_SYMBOL_FILE_EX, *PPDB_SYMBOL_FILE_EX; typedef struct _PDB_SYMBOL_SOURCE { WORD nModules; WORD nSrcFiles; WORD table[ 1 ]; } PDB_SYMBOL_SOURCE, *PPDB_SYMBOL_SOURCE; typedef struct _PDB_SYMBOL_IMPORT { DWORD unknown1; DWORD unknown2; DWORD TimeDateStamp; DWORD nRequests; CHAR filename[ 1 ]; } PDB_SYMBOL_IMPORT, *PPDB_SYMBOL_IMPORT; typedef struct _PDB_SYMBOLS_OLD { WORD hash1_file; WORD hash2_file; WORD gsym_file; WORD pad; DWORD module_size; DWORD offset_size; DWORD hash_size; DWORD srcmodule_size; } PDB_SYMBOLS_OLD, *PPDB_SYMBOLS_OLD; typedef struct _PDB_SYMBOLS { DWORD signature; DWORD version; DWORD extended_format; DWORD hash1_file; DWORD hash2_file; DWORD gsym_file; DWORD module_size; DWORD offset_size; DWORD hash_size; DWORD srcmodule_size; DWORD pdbimport_size; DWORD resvd[ 5 ]; } PDB_SYMBOLS, *PPDB_SYMBOLS; #pragma pack() static void *pdb_read( LPBYTE image, WORD *block_list, int size ) { PPDB_HEADER pdb = (PPDB_HEADER)image; int i, nBlocks; LPBYTE buffer; if ( !size ) return NULL; nBlocks = (size + pdb->blocksize-1) / pdb->blocksize; buffer = DBG_alloc( nBlocks * pdb->blocksize ); for ( i = 0; i < nBlocks; i++ ) memcpy( buffer + i*pdb->blocksize, image + block_list[i]*pdb->blocksize, pdb->blocksize ); return buffer; } static void *pdb_read_file( LPBYTE image, PPDB_TOC toc, int fileNr ) { PPDB_HEADER pdb = (PPDB_HEADER)image; WORD *block_list; int i; if ( !toc || fileNr >= toc->nFiles ) return NULL; block_list = (WORD *) &toc->file[ toc->nFiles ]; for ( i = 0; i < fileNr; i++ ) block_list += (toc->file[i].size + pdb->blocksize-1) / pdb->blocksize; return pdb_read( image, block_list, toc->file[fileNr].size ); } static void pdb_free( void *buffer ) { DBG_free( buffer ); } static void pdb_convert_types_header( PDB_TYPES *types, char *image ) { memset( types, 0, sizeof(PDB_TYPES) ); if ( !image ) return; if ( *(DWORD *)image < 19960000 ) /* FIXME: correct version? */ { /* Old version of the types record header */ PDB_TYPES_OLD *old = (PDB_TYPES_OLD *)image; types->version = old->version; types->type_offset = sizeof(PDB_TYPES_OLD); types->type_size = old->type_size; types->first_index = old->first_index; types->last_index = old->last_index; types->file = old->file; } else { /* New version of the types record header */ *types = *(PDB_TYPES *)image; } } static void pdb_convert_symbols_header( PDB_SYMBOLS *symbols, int *header_size, char *image ) { memset( symbols, 0, sizeof(PDB_SYMBOLS) ); if ( !image ) return; if ( *(DWORD *)image != 0xffffffff ) { /* Old version of the symbols record header */ PDB_SYMBOLS_OLD *old = (PDB_SYMBOLS_OLD *)image; symbols->version = 0; symbols->extended_format = 0; symbols->module_size = old->module_size; symbols->offset_size = old->offset_size; symbols->hash_size = old->hash_size; symbols->srcmodule_size = old->srcmodule_size; symbols->pdbimport_size = 0; symbols->hash1_file = old->hash1_file; symbols->hash2_file = old->hash2_file; symbols->gsym_file = old->gsym_file; *header_size = sizeof(PDB_SYMBOLS_OLD); } else { /* New version of the symbols record header */ *symbols = *(PDB_SYMBOLS *)image; *header_size = sizeof(PDB_SYMBOLS); } } static int DEBUG_ProcessPDBFile( DBG_MODULE* module, const char *full_filename ) { HANDLE hFile, hMap; char *image = NULL; PDB_HEADER *pdb = NULL; PDB_TOC *toc = NULL; PDB_ROOT *root = NULL; char *types_image = NULL; char *symbols_image = NULL; PDB_TYPES types; PDB_SYMBOLS symbols; int header_size = 0; char *modimage, *file; /* * Open and map() .PDB file */ if ((image = DEBUG_MapDebugInfoFile(full_filename, 0, 0, &hFile, &hMap)) == NULL) { DEBUG_Printf( DBG_CHN_ERR, "-Unable to peruse .PDB file %s\n", full_filename ); goto leave; } /* * Read in TOC and well-known files */ pdb = (PPDB_HEADER)image; toc = pdb_read( image, pdb->toc_block, pdb->toc.size ); root = pdb_read_file( image, toc, 1 ); types_image = pdb_read_file( image, toc, 2 ); symbols_image = pdb_read_file( image, toc, 3 ); pdb_convert_types_header( &types, types_image ); pdb_convert_symbols_header( &symbols, &header_size, symbols_image ); /* * Check for unknown versions */ switch ( root->version ) { case 19950623: /* VC 4.0 */ case 19950814: case 19960307: /* VC 5.0 */ case 19970604: /* VC 6.0 */ break; default: DEBUG_Printf( DBG_CHN_ERR, "-Unknown root block version %ld\n", root->version ); } switch ( types.version ) { case 19950410: /* VC 4.0 */ case 19951122: case 19961031: /* VC 5.0 / 6.0 */ break; default: DEBUG_Printf( DBG_CHN_ERR, "-Unknown type info version %ld\n", types.version ); } switch ( symbols.version ) { case 0: /* VC 4.0 */ case 19960307: /* VC 5.0 */ case 19970606: /* VC 6.0 */ break; default: DEBUG_Printf( DBG_CHN_ERR, "-Unknown symbol info version %ld\n", symbols.version ); } /* * Check .PDB time stamp */ if ( root->TimeDateStamp != ((struct CodeViewDebug *)MSC_INFO(module)->dbg_info)->cv_timestamp ) { DEBUG_Printf(DBG_CHN_ERR, "-Wrong time stamp of .PDB file %s\n", full_filename); goto leave; } /* * Read type table */ DEBUG_ParseTypeTable( types_image + types.type_offset, types.type_size ); /* * Read type-server .PDB imports */ if ( symbols.pdbimport_size ) { /* FIXME */ DEBUG_Printf(DBG_CHN_ERR, "-Type server .PDB imports ignored!\n" ); } /* * Read global symbol table */ modimage = pdb_read_file( image, toc, symbols.gsym_file ); if ( modimage ) { DEBUG_SnarfCodeView( module, modimage, toc->file[symbols.gsym_file].size, NULL ); pdb_free( modimage ); } /* * Read per-module symbol / linenumber tables */ file = symbols_image + header_size; while ( file - symbols_image < header_size + symbols.module_size ) { int file_nr, file_index, symbol_size, lineno_size; char *file_name; if ( !symbols.extended_format ) { PDB_SYMBOL_FILE *sym_file = (PDB_SYMBOL_FILE *) file; file_nr = sym_file->file; file_name = sym_file->filename; file_index = sym_file->range.index; symbol_size = sym_file->symbol_size; lineno_size = sym_file->lineno_size; } else { PDB_SYMBOL_FILE_EX *sym_file = (PDB_SYMBOL_FILE_EX *) file; file_nr = sym_file->file; file_name = sym_file->filename; file_index = sym_file->range.index; symbol_size = sym_file->symbol_size; lineno_size = sym_file->lineno_size; } modimage = pdb_read_file( image, toc, file_nr ); if ( modimage ) { struct codeview_linetab_hdr *linetab = NULL; if ( lineno_size ) linetab = DEBUG_SnarfLinetab( modimage + symbol_size, lineno_size ); if ( symbol_size ) DEBUG_SnarfCodeView( module, modimage + sizeof(DWORD), symbol_size - sizeof(DWORD), linetab ); pdb_free( modimage ); } file_name += strlen(file_name) + 1; file = (char *)( (DWORD)(file_name + strlen(file_name) + 1 + 3) & ~3 ); } leave: /* * Cleanup */ DEBUG_ClearTypeTable(); if ( symbols_image ) pdb_free( symbols_image ); if ( types_image ) pdb_free( types_image ); if ( root ) pdb_free( root ); if ( toc ) pdb_free( toc ); DEBUG_UnmapDebugInfoFile(hFile, hMap, image); return TRUE; } /* * Process DBG file which contains debug information. */ static int DEBUG_ProcessDBGFile(DBG_MODULE* module, const char* filename) { HANDLE hFile, hMap; char * addr; char * codeview; struct CV4_DirHead * codeview_dir; struct CV4_DirEnt * codeview_dent; PIMAGE_DEBUG_DIRECTORY dbghdr; DBG_MODULE module2; int i; int j; struct codeview_linetab_hdr * linetab; int nsect; PIMAGE_SEPARATE_DEBUG_HEADER pdbg = NULL; IMAGE_SECTION_HEADER * sectp; if ((addr = DEBUG_MapDebugInfoFile(filename, 0, 0, &hFile, &hMap)) == NULL) { DEBUG_Printf(DBG_CHN_ERR, "-Unable to peruse .DBG file %s\n", filename); goto leave; } pdbg = (PIMAGE_SEPARATE_DEBUG_HEADER) addr; if( pdbg->TimeDateStamp != MSC_INFO(module)->dbgdir.TimeDateStamp ) { DEBUG_Printf(DBG_CHN_ERR, "Warning - %s has incorrect internal timestamp\n", filename); /* goto leave; */ /* Well, sometimes this happens to DBG files which ARE REALLY the right .DBG files but nonetheless this check fails. Anyway, WINDBG (debugger for Windows by Microsoft) loads debug symbols which have incorrect timestamps. */ } DEBUG_Printf(DBG_CHN_MESG, "Processing symbols from %s...\n", filename); dbghdr = (PIMAGE_DEBUG_DIRECTORY) ( addr + sizeof(*pdbg) + pdbg->NumberOfSections * sizeof(IMAGE_SECTION_HEADER) + pdbg->ExportedNamesSize); sectp = (PIMAGE_SECTION_HEADER) ((char *) pdbg + sizeof(*pdbg)); nsect = pdbg->NumberOfSections; for( i=0; i < pdbg->DebugDirectorySize / sizeof(*pdbg); i++, dbghdr++ ) { switch(dbghdr->Type) { case IMAGE_DEBUG_TYPE_COFF: /* * Dummy up a deferred debug header to handle the * COFF stuff embedded within the DBG file. */ memset((char *) &module2, 0, sizeof(module2)); MSC_INFO(&module2)->dbg_info = (addr + dbghdr->PointerToRawData); MSC_INFO(&module2)->dbg_size = dbghdr->SizeOfData; module2.load_addr = module->load_addr; DEBUG_ProcessCoff(&module2); break; case IMAGE_DEBUG_TYPE_CODEVIEW: /* * This is the older format by which codeview stuff is * stored, known as the 'NB09' format. Newer executables * and dlls created by VC++ use PDB files instead, which * have lots of internal similarities, but the overall * format and structure is quite different. */ codeview = (addr + dbghdr->PointerToRawData); /* * The first thing in the codeview section should be * an 'NB09' identifier. As a sanity check, make sure * it is there. */ if( *((unsigned int*) codeview) != 0x3930424e ) { break; } /* * Next we need to find the directory. This is easy too. */ codeview_dir = (struct CV4_DirHead *) (codeview + ((unsigned int*) codeview)[1]); /* * Some more sanity checks. Make sure that everything * is as we expect it. */ if( codeview_dir->next_offset != 0 || codeview_dir->dhsize != sizeof(*codeview_dir) || codeview_dir->desize != sizeof(*codeview_dent) ) { break; } codeview_dent = (struct CV4_DirEnt *) (codeview_dir + 1); for(j=0; j < codeview_dir->ndir; j++, codeview_dent++) { if( codeview_dent->subsect_number == sstAlignSym ) { /* * Check the previous entry. If it is a * sstSrcModule, it contains the line number * info for this file. */ linetab = NULL; if( codeview_dent[1].module_number == codeview_dent[0].module_number && codeview_dent[1].subsect_number == sstSrcModule ) { linetab = DEBUG_SnarfLinetab( codeview + codeview_dent[1].offset, codeview_dent[1].size); } if( codeview_dent[-1].module_number == codeview_dent[0].module_number && codeview_dent[-1].subsect_number == sstSrcModule ) { linetab = DEBUG_SnarfLinetab( codeview + codeview_dent[-1].offset, codeview_dent[-1].size); } /* * Now process the CV stuff. */ DEBUG_SnarfCodeView(module, codeview + codeview_dent->offset + sizeof(DWORD), codeview_dent->size - sizeof(DWORD), linetab); } } break; default: break; } } leave: DEBUG_UnmapDebugInfoFile(hFile, hMap, addr); return TRUE; } static int DEBUG_ProcessMSCDebugInfo(DBG_MODULE* module) { struct CodeViewDebug * cvd; struct MiscDebug * misc; char * filename; int sts; switch (MSC_INFO(module)->dbgdir.Type) { case IMAGE_DEBUG_TYPE_COFF: /* * Standard COFF debug information that VC++ adds when you * use /debugtype:both with the linker. */ DEBUG_Printf(DBG_CHN_TRACE, "Processing COFF symbols...\n"); sts = DEBUG_ProcessCoff(module); break; case IMAGE_DEBUG_TYPE_CODEVIEW: /* * This is a pointer to a PDB file of some sort. */ cvd = (struct CodeViewDebug *) MSC_INFO(module)->dbg_info; if( strcmp(cvd->cv_nbtype, "NB10") != 0 ) { /* * Whatever this is, we don't know how to deal with * it yet. */ sts = FALSE; break; } sts = DEBUG_ProcessPDBFile(module, cvd->cv_name); DEBUG_Printf(DBG_CHN_TRACE, "Processing PDB file %s\n", cvd->cv_name); break; case IMAGE_DEBUG_TYPE_MISC: /* * A pointer to a .DBG file of some sort. These files * can contain either CV4 or COFF information. Open * the file, and try to do the right thing with it. */ misc = (struct MiscDebug *) MSC_INFO(module)->dbg_info; filename = strrchr((char *) &misc->Data, '.'); /* * Ignore the file if it doesn't have a .DBG extension. */ if( (filename == NULL) || ( (strcmp(filename, ".dbg") != 0) && (strcmp(filename, ".DBG") != 0)) ) { sts = FALSE; break; } filename = (char *) &misc->Data; /* * Do the dirty deed... */ sts = DEBUG_ProcessDBGFile(module, filename); break; default: /* * We should never get here... */ sts = FALSE; break; } module->status = (sts) ? DM_STATUS_LOADED : DM_STATUS_ERROR; return sts; } wine-20000526/debugger/registers.c0100644000175000001440000001323307103022473016401 0ustar julliardusers/* * Debugger register handling * * Copyright 1995 Alexandre Julliard */ #include "config.h" #include #include "debugger.h" /*********************************************************************** * DEBUG_Flags * * Return Flag String. */ char *DEBUG_Flags( DWORD flag, char *buf ) { #ifdef __i386__ char *pt; strcpy( buf, " - 00 - - - " ); pt = buf + strlen( buf ); if ( buf >= pt-- ) return( buf ); if ( flag & 0x00000001 ) *pt = 'C'; /* Carry Falg */ if ( buf >= pt-- ) return( buf ); if ( flag & 0x00000002 ) *pt = '1'; if ( buf >= pt-- ) return( buf ); if ( flag & 0x00000004 ) *pt = 'P'; /* Parity Flag */ if ( buf >= pt-- ) return( buf ); if ( flag & 0x00000008 ) *pt = '-'; if ( buf >= pt-- ) return( buf ); if ( flag & 0x00000010 ) *pt = 'A'; /* Auxiliary Carry Flag */ if ( buf >= pt-- ) return( buf ); if ( flag & 0x00000020 ) *pt = '-'; if ( buf >= pt-- ) return( buf ); if ( flag & 0x00000040 ) *pt = 'Z'; /* Zero Flag */ if ( buf >= pt-- ) return( buf ); if ( flag & 0x00000080 ) *pt = 'S'; /* Sign Flag */ if ( buf >= pt-- ) return( buf ); if ( flag & 0x00000100 ) *pt = 'T'; /* Trap/Trace Flag */ if ( buf >= pt-- ) return( buf ); if ( flag & 0x00000200 ) *pt = 'I'; /* Interupt Enable Flag */ if ( buf >= pt-- ) return( buf ); if ( flag & 0x00000400 ) *pt = 'D'; /* Direction Indicator */ if ( buf >= pt-- ) return( buf ); if ( flag & 0x00000800 ) *pt = 'O'; /* Overflow Flag */ if ( buf >= pt-- ) return( buf ); if ( flag & 0x00001000 ) *pt = '1'; /* I/O Privilage Level */ if ( buf >= pt-- ) return( buf ); if ( flag & 0x00002000 ) *pt = '1'; /* I/O Privilage Level */ if ( buf >= pt-- ) return( buf ); if ( flag & 0x00004000 ) *pt = 'N'; /* Nested Task Flag */ if ( buf >= pt-- ) return( buf ); if ( flag & 0x00008000 ) *pt = '-'; if ( buf >= pt-- ) return( buf ); if ( flag & 0x00010000 ) *pt = 'R'; /* Resume Flag */ if ( buf >= pt-- ) return( buf ); if ( flag & 0x00020000 ) *pt = 'V'; /* Vritual Mode Flag */ if ( buf >= pt-- ) return( buf ); if ( flag & 0x00040000 ) *pt = 'a'; /* Alignment Check Flag */ if ( buf >= pt-- ) return( buf ); return( buf ); #else strcpy(buf, "unknown CPU"); return buf; #endif } /*********************************************************************** * DEBUG_InfoRegisters * * Display registers information. */ void DEBUG_InfoRegisters(void) { DEBUG_Printf(DBG_CHN_MESG,"Register dump:\n"); #ifdef __i386__ /* First get the segment registers out of the way */ DEBUG_Printf( DBG_CHN_MESG," CS:%04x SS:%04x DS:%04x ES:%04x FS:%04x GS:%04x", (WORD)DEBUG_context.SegCs, (WORD)DEBUG_context.SegSs, (WORD)DEBUG_context.SegDs, (WORD)DEBUG_context.SegEs, (WORD)DEBUG_context.SegFs, (WORD)DEBUG_context.SegGs ); if (DEBUG_CurrThread->dbg_mode == 16) { char flag[33]; DEBUG_Printf( DBG_CHN_MESG,"\n IP:%04x SP:%04x BP:%04x FLAGS:%04x(%s)\n", LOWORD(DEBUG_context.Eip), LOWORD(DEBUG_context.Esp), LOWORD(DEBUG_context.Ebp), LOWORD(DEBUG_context.EFlags), DEBUG_Flags(LOWORD(DEBUG_context.EFlags), flag)); DEBUG_Printf( DBG_CHN_MESG," AX:%04x BX:%04x CX:%04x DX:%04x SI:%04x DI:%04x\n", LOWORD(DEBUG_context.Eax), LOWORD(DEBUG_context.Ebx), LOWORD(DEBUG_context.Ecx), LOWORD(DEBUG_context.Edx), LOWORD(DEBUG_context.Esi), LOWORD(DEBUG_context.Edi) ); } else /* 32-bit mode */ { char flag[33]; DEBUG_Printf( DBG_CHN_MESG, "\n EIP:%08lx ESP:%08lx EBP:%08lx EFLAGS:%08lx(%s)\n", DEBUG_context.Eip, DEBUG_context.Esp, DEBUG_context.Ebp, DEBUG_context.EFlags, DEBUG_Flags(DEBUG_context.EFlags, flag)); DEBUG_Printf( DBG_CHN_MESG, " EAX:%08lx EBX:%08lx ECX:%08lx EDX:%08lx\n", DEBUG_context.Eax, DEBUG_context.Ebx, DEBUG_context.Ecx, DEBUG_context.Edx ); DEBUG_Printf( DBG_CHN_MESG, " ESI:%08lx EDI:%08lx\n", DEBUG_context.Esi, DEBUG_context.Edi ); } #endif } /*********************************************************************** * DEBUG_ValidateRegisters * * Make sure all registers have a correct value for returning from * the signal handler. */ BOOL DEBUG_ValidateRegisters(void) { #ifdef __i386__ if (DEBUG_context.EFlags & V86_FLAG) return TRUE; #if 0 /* Check that a selector is a valid ring-3 LDT selector, or a NULL selector */ #define CHECK_SEG(seg,name) \ if (((seg) & ~3) && ((((seg) & 7) != 7) || !DEBUG_IsSelector(seg))) { \ DEBUG_Printf( DBG_CHN_MESG, "*** Invalid value for %s register: %04x\n", \ (name), (WORD)(seg) ); \ return FALSE; \ } cs = __get_cs(); ds = __get_ds(); if (CS_reg(DEBUG_context) != cs) CHECK_SEG(CS_reg(DEBUG_context), "CS"); if (SS_reg(DEBUG_context) != ds) CHECK_SEG(SS_reg(DEBUG_context), "SS"); if (DS_reg(DEBUG_context) != ds) CHECK_SEG(DS_reg(DEBUG_context), "DS"); if (ES_reg(DEBUG_context) != ds) CHECK_SEG(ES_reg(DEBUG_context), "ES"); if (FS_reg(DEBUG_context) != ds) CHECK_SEG(FS_reg(DEBUG_context), "FS"); if (GS_reg(DEBUG_context) != ds) CHECK_SEG(GS_reg(DEBUG_context), "GS"); #endif /* Check that CS and SS are not NULL */ if (!(DEBUG_context.SegCs & ~3)) { DEBUG_Printf( DBG_CHN_MESG, "*** Invalid value for CS register: %04x\n", (WORD)DEBUG_context.SegCs ); return FALSE; } if (!(DEBUG_context.SegSs & ~3)) { DEBUG_Printf( DBG_CHN_MESG, "*** Invalid value for SS register: %04x\n", (WORD)DEBUG_context.SegSs ); return FALSE; } return TRUE; #undef CHECK_SEG #else return TRUE; #endif } wine-20000526/debugger/source.c0100644000175000001440000002470207103022473015675 0ustar julliardusers/* * File source.c - source file handling for internal debugger. * * Copyright (C) 1997, Eric Youngdale. * */ #include "config.h" #include #include #include #ifdef HAVE_SYS_MMAN_H #include #endif #include #include #include #include #include #ifndef PATH_MAX #define PATH_MAX _MAX_PATH #endif #include "debugger.h" struct searchlist { char * path; struct searchlist * next; }; struct open_filelist { char * path; char * real_path; struct open_filelist * next; unsigned int size; signed int nlines; unsigned int * linelist; }; static struct open_filelist * ofiles; static struct searchlist * listhead; static char DEBUG_current_sourcefile[PATH_MAX]; static int DEBUG_start_sourceline = -1; static int DEBUG_end_sourceline = -1; void DEBUG_ShowDir(void) { struct searchlist * sl; DEBUG_Printf(DBG_CHN_MESG,"Search list :\n"); for(sl = listhead; sl; sl = sl->next) { DEBUG_Printf(DBG_CHN_MESG, "\t%s\n", sl->path); } DEBUG_Printf(DBG_CHN_MESG, "\n"); } void DEBUG_AddPath(const char * path) { struct searchlist * sl; sl = (struct searchlist *) DBG_alloc(sizeof(struct searchlist)); if( sl == NULL ) { return; } sl->next = listhead; sl->path = DBG_strdup(path); listhead = sl; } void DEBUG_NukePath(void) { struct searchlist * sl; struct searchlist * nxt; for(sl = listhead; sl; sl = nxt) { nxt = sl->next; DBG_free(sl->path); DBG_free(sl); } listhead = NULL; } static int DEBUG_DisplaySource(char * sourcefile, int start, int end) { char * addr; char buffer[1024]; int fd; int i; struct open_filelist * ol; int nlines; char * basename; char * pnt; int rtn; struct searchlist * sl; struct stat statbuf; int status; char tmppath[PATH_MAX]; /* * First see whether we have the file open already. If so, then * use that, otherwise we have to try and open it. */ for(ol = ofiles; ol; ol = ol->next) { if( strcmp(ol->path, sourcefile) == 0 ) { break; } } if( ol == NULL ) { /* * Try again, stripping the path from the opened file. */ basename = strrchr(sourcefile, '\\' ); if ( !basename ) basename = strrchr(sourcefile, '/' ); if ( !basename ) basename = sourcefile; else basename++; for(ol = ofiles; ol; ol = ol->next) { if( strcmp(ol->path, basename) == 0 ) { break; } } } if( ol == NULL ) { /* * Crapola. We need to try and open the file. */ status = stat(sourcefile, &statbuf); if( status != -1 ) { strcpy(tmppath, sourcefile); } else if( (status = stat(basename, &statbuf)) != -1 ) { strcpy(tmppath, basename); } else { for(sl = listhead; sl; sl = sl->next) { strcpy(tmppath, sl->path); if( tmppath[strlen(tmppath)-1] != '/' ) { strcat(tmppath, "/"); } /* * Now append the base file name. */ strcat(tmppath, basename); status = stat(tmppath, &statbuf); if( status != -1 ) { break; } } if( sl == NULL ) { char zbuf[256]; /* * Still couldn't find it. Ask user for path to add. */ sprintf(zbuf, "Enter path to file %s: ", sourcefile); lstrcpynA(tmppath, readline(zbuf), sizeof(tmppath)); if( tmppath[strlen(tmppath)-1] == '\n' ) { tmppath[strlen(tmppath)-1] = '\0'; } if( tmppath[strlen(tmppath)-1] != '/' ) { strcat(tmppath, "/"); } /* * Now append the base file name. */ strcat(tmppath, basename); status = stat(tmppath, &statbuf); if( status == -1 ) { /* * OK, I guess the user doesn't really want to see it * after all. */ ol = (struct open_filelist *) DBG_alloc(sizeof(*ol)); ol->path = DBG_strdup(sourcefile); ol->real_path = NULL; ol->next = ofiles; ol->nlines = 0; ol->linelist = NULL; ofiles = ol; DEBUG_Printf(DBG_CHN_MESG,"Unable to open file %s\n", tmppath); return FALSE; } } } /* * Create header for file. */ ol = (struct open_filelist *) DBG_alloc(sizeof(*ol)); ol->path = DBG_strdup(sourcefile); ol->real_path = DBG_strdup(tmppath); ol->next = ofiles; ol->nlines = 0; ol->linelist = NULL; ol->size = statbuf.st_size; ofiles = ol; /* * Now open and map the file. */ fd = open(tmppath, O_RDONLY); if( fd == -1 ) { return FALSE; } addr = mmap(0, statbuf.st_size, PROT_READ, MAP_PRIVATE, fd, 0); if( addr == (char *) -1 ) { return FALSE; } /* * Now build up the line number mapping table. */ ol->nlines = 1; pnt = addr; while(pnt < addr + ol->size ) { if( *pnt++ == '\n' ) { ol->nlines++; } } ol->nlines++; ol->linelist = (unsigned int*) DBG_alloc( ol->nlines * sizeof(unsigned int) ); nlines = 0; pnt = addr; ol->linelist[nlines++] = 0; while(pnt < addr + ol->size ) { if( *pnt++ == '\n' ) { ol->linelist[nlines++] = pnt - addr; } } ol->linelist[nlines++] = pnt - addr; } else { /* * We know what the file is, we just need to reopen it and remap it. */ fd = open(ol->real_path, O_RDONLY); if( fd == -1 ) { return FALSE; } addr = mmap(0, ol->size, PROT_READ, MAP_PRIVATE, fd, 0); if( addr == (char *) -1 ) { return FALSE; } } /* * All we need to do is to display the source lines here. */ rtn = FALSE; for(i=start - 1; i <= end - 1; i++) { if( i < 0 || i >= ol->nlines - 1) { continue; } rtn = TRUE; memset(&buffer, 0, sizeof(buffer)); if( ol->linelist[i+1] != ol->linelist[i] ) { memcpy(&buffer, addr + ol->linelist[i], (ol->linelist[i+1] - ol->linelist[i]) - 1); } DEBUG_Printf(DBG_CHN_MESG,"%d\t%s\n", i + 1, buffer); } munmap(addr, ol->size); close(fd); return rtn; } void DEBUG_List(struct list_id * source1, struct list_id * source2, int delta) { int end; int rtn; int start; char * sourcefile; /* * We need to see what source file we need. Hopefully we only have * one specified, otherwise we might as well punt. */ if( source1 != NULL && source2 != NULL && source1->sourcefile != NULL && source2->sourcefile != NULL && strcmp(source1->sourcefile, source2->sourcefile) != 0 ) { DEBUG_Printf(DBG_CHN_MESG, "Ambiguous source file specification.\n"); return; } sourcefile = NULL; if( source1 != NULL && source1->sourcefile != NULL ) { sourcefile = source1->sourcefile; } if( sourcefile == NULL && source2 != NULL && source2->sourcefile != NULL ) { sourcefile = source2->sourcefile; } if( sourcefile == NULL ) { sourcefile = (char *) &DEBUG_current_sourcefile; } if( sourcefile == NULL ) { DEBUG_Printf(DBG_CHN_MESG, "No source file specified.\n"); return; } /* * Now figure out the line number range to be listed. */ start = -1; end = -1; if( source1 != NULL ) { start = source1->line; } if( source2 != NULL ) { end = source2->line; } if( start == -1 && end == -1 ) { if( delta < 0 ) { end = DEBUG_start_sourceline; start = end + delta; } else { start = DEBUG_end_sourceline; end = start + delta; } } else if( start == -1 ) { start = end + delta; } else if (end == -1) { end = start + delta; } /* * Now call this function to do the dirty work. */ rtn = DEBUG_DisplaySource(sourcefile, start, end); if( sourcefile != (char *) &DEBUG_current_sourcefile ) { strcpy(DEBUG_current_sourcefile, sourcefile); } DEBUG_start_sourceline = start; DEBUG_end_sourceline = end; } DBG_ADDR DEBUG_LastDisassemble={0,0}; static int _disassemble(DBG_ADDR *addr) { char ch; DEBUG_PrintAddress( addr, DEBUG_CurrThread->dbg_mode, TRUE ); DEBUG_Printf(DBG_CHN_MESG,": "); if (!DEBUG_READ_MEM_VERBOSE((void*)DEBUG_ToLinear(addr), &ch, sizeof(ch))) return 0; DEBUG_Disasm( addr, TRUE ); DEBUG_Printf(DBG_CHN_MESG,"\n"); return 1; } void _disassemble_fixaddr(DBG_VALUE *value) { DWORD seg2; struct datatype *testtype; assert(value->cookie == DV_TARGET || value->cookie == DV_HOST); DEBUG_FixAddress(&value->addr, DEBUG_context.SegCs); if( value->type != NULL ) { if( value->type == DEBUG_TypeIntConst ) { /* * We know that we have the actual offset stored somewhere * else in 32-bit space. Grab it, and we * should be all set. */ seg2 = value->addr.seg; value->addr.seg = 0; value->addr.off = DEBUG_GetExprValue(value, NULL); value->addr.seg = seg2; } else { DEBUG_TypeDerefPointer(value, &testtype); if( testtype != NULL || value->type == DEBUG_TypeIntConst ) value->addr.off = DEBUG_GetExprValue(value, NULL); } } else if (!value->addr.seg && !value->addr.off) { DEBUG_Printf(DBG_CHN_MESG,"Invalid expression\n"); return; } } void DEBUG_Disassemble(const DBG_VALUE *xstart,const DBG_VALUE *xend,int offset) { int i; DBG_ADDR last; DBG_VALUE end,start; if (xstart) { start = *xstart; _disassemble_fixaddr(&start); } if (xend) { end = *xend; _disassemble_fixaddr(&end); } if (!xstart && !xend) { last = DEBUG_LastDisassemble; if (!last.seg && !last.off) DEBUG_GetCurrentAddress( &last ); for (i=0;i #include #include #ifdef HAVE_SYS_MMAN_H #include #endif #include #include #include #include #ifndef PATH_MAX #define PATH_MAX _MAX_PATH #endif #include "debugger.h" #if defined(__svr4__) || defined(__sun) #define __ELF__ #endif #ifdef __ELF__ #ifdef HAVE_ELF_H # include #endif #ifdef HAVE_LINK_H # include #endif #elif defined(__EMX__) #ifdef HAVE_A_OUT_H # include #endif #else #ifdef HAVE_A_OUT_H # include #endif #endif #ifndef N_UNDF #define N_UNDF 0x00 #endif #ifndef STN_UNDEF # define STN_UNDEF 0 #endif #define N_GSYM 0x20 #define N_FUN 0x24 #define N_STSYM 0x26 #define N_LCSYM 0x28 #define N_MAIN 0x2a #define N_ROSYM 0x2c #define N_OPT 0x3c #define N_RSYM 0x40 #define N_SLINE 0x44 #define N_SO 0x64 #define N_LSYM 0x80 #define N_BINCL 0x82 #define N_SOL 0x84 #define N_PSYM 0xa0 #define N_EINCL 0xa2 #define N_LBRAC 0xc0 #define N_EXCL 0xc2 #define N_RBRAC 0xe0 struct stab_nlist { union { char *n_name; struct stab_nlist *n_next; long n_strx; } n_un; unsigned char n_type; char n_other; short n_desc; unsigned long n_value; }; /* * This is used to keep track of known datatypes so that we don't redefine * them over and over again. It sucks up lots of memory otherwise. */ struct known_typedef { struct known_typedef * next; char * name; int ndefs; struct datatype * types[1]; }; #define NR_STAB_HASH 521 struct known_typedef * ktd_head[NR_STAB_HASH] = {NULL,}; static unsigned int stab_hash( const char * name ) { unsigned int hash = 0; unsigned int tmp; const char * p; p = name; while (*p) { hash = (hash << 4) + *p++; if( (tmp = (hash & 0xf0000000)) ) { hash ^= tmp >> 24; } hash &= ~tmp; } return hash % NR_STAB_HASH; } static void stab_strcpy(char * dest, int sz, const char * source) { /* * A strcpy routine that stops when we hit the ':' character. * Faster than copying the whole thing, and then nuking the * ':'. */ while(*source != '\0' && *source != ':' && sz-- > 0) *dest++ = *source++; *dest = '\0'; assert(sz > 0); } typedef struct { char* name; unsigned long value; int idx; struct datatype** vector; int nrofentries; } include_def; #define MAX_INCLUDES 256 static include_def* include_defs = NULL; static int num_include_def = 0; static int num_alloc_include_def = 0; static int cu_include_stack[MAX_INCLUDES]; static int cu_include_stk_idx = 0; static struct datatype** cu_vector = NULL; static int cu_nrofentries = 0; static int DEBUG_CreateInclude(const char* file, unsigned long val) { if (num_include_def == num_alloc_include_def) { num_alloc_include_def += 256; include_defs = DBG_realloc(include_defs, sizeof(include_defs[0])*num_alloc_include_def); memset(include_defs+num_include_def, 0, sizeof(include_defs[0])*256); } include_defs[num_include_def].name = DBG_strdup(file); include_defs[num_include_def].value = val; include_defs[num_include_def].vector = NULL; include_defs[num_include_def].nrofentries = 0; return num_include_def++; } static int DEBUG_FindInclude(const char* file, unsigned long val) { int i; for (i = 0; i < num_include_def; i++) { if (val == include_defs[i].value && strcmp(file, include_defs[i].name) == 0) return i; } return -1; } static int DEBUG_AddInclude(int idx) { ++cu_include_stk_idx; /* is this happen, just bump MAX_INCLUDES */ /* we could also handle this as another dynarray */ assert(cu_include_stk_idx < MAX_INCLUDES); cu_include_stack[cu_include_stk_idx] = idx; return cu_include_stk_idx; } static void DEBUG_ResetIncludes(void) { /* * The datatypes that we would need to use are reset when * we start a new file. (at least the ones in filenr == 0 */ cu_include_stk_idx = 0;/* keep 0 as index for the .c file itself */ memset(cu_vector, 0, sizeof(cu_vector[0]) * cu_nrofentries); } static void DEBUG_FreeIncludes(void) { int i; DEBUG_ResetIncludes(); for (i = 0; i < num_include_def; i++) { DBG_free(include_defs[i].name); DBG_free(include_defs[i].vector); } DBG_free(include_defs); include_defs = NULL; num_include_def = 0; num_alloc_include_def = 0; DBG_free(cu_vector); cu_vector = NULL; cu_nrofentries = 0; } #define MAX_TD_NESTING 128 static struct datatype** DEBUG_FileSubNr2StabEnum(int filenr, int subnr) { struct datatype** ret; /* DEBUG_Printf(DBG_CHN_MESG, "creating type id for (%d,%d)\n", filenr, subnr); */ /* FIXME: I could perhaps create a dummy include_def for each compilation * unit which would allow not to handle those two cases separately */ if (filenr == 0) { if (cu_nrofentries <= subnr) { cu_vector = DBG_realloc(cu_vector, sizeof(cu_vector[0])*(subnr+1)); memset(cu_vector+cu_nrofentries, 0, sizeof(cu_vector[0])*(subnr+1-cu_nrofentries)); cu_nrofentries = subnr + 1; } ret = &cu_vector[subnr]; } else { include_def* idef; assert(filenr <= cu_include_stk_idx); idef = &include_defs[cu_include_stack[filenr]]; if (idef->nrofentries <= subnr) { idef->vector = DBG_realloc(idef->vector, sizeof(idef->vector[0])*(subnr+1)); memset(idef->vector + idef->nrofentries, 0, sizeof(idef->vector[0])*(subnr+1-idef->nrofentries)); idef->nrofentries = subnr + 1; } ret = &idef->vector[subnr]; } /* DEBUG_Printf(DBG_CHN_MESG,"(%d,%d) is %d\n",filenr,subnr,ret); */ return ret; } static struct datatype** DEBUG_ReadTypeEnumBackwards(char*x) { int filenr,subnr; if (*x==')') { while (*x!='(') x--; x++; /* '(' */ filenr=strtol(x,&x,10); /* */ x++; /* ',' */ subnr=strtol(x,&x,10); /* */ x++; /* ')' */ } else { while ((*x>='0') && (*x<='9')) x--; filenr = 0; subnr = atol(x+1); } return DEBUG_FileSubNr2StabEnum(filenr,subnr); } static struct datatype** DEBUG_ReadTypeEnum(char **x) { int filenr,subnr; if (**x=='(') { (*x)++; /* '(' */ filenr=strtol(*x,x,10); /* */ (*x)++; /* ',' */ subnr=strtol(*x,x,10); /* */ (*x)++; /* ')' */ } else { filenr = 0; subnr = strtol(*x,x,10); /* */ } return DEBUG_FileSubNr2StabEnum(filenr,subnr); } static int DEBUG_RegisterTypedef(const char * name, struct datatype ** types, int ndef) { int hash; struct known_typedef * ktd; if( ndef == 1 ) return TRUE; ktd = (struct known_typedef *) DBG_alloc(sizeof(struct known_typedef) + (ndef - 1) * sizeof(struct datatype *)); hash = stab_hash(name); ktd->name = DBG_strdup(name); ktd->ndefs = ndef; memcpy(&ktd->types[0], types, ndef * sizeof(struct datatype *)); ktd->next = ktd_head[hash]; ktd_head[hash] = ktd; return TRUE; } static int DEBUG_HandlePreviousTypedef(const char * name, const char * stab) { int count; enum debug_type expect; int hash; struct known_typedef * ktd; char * ptr; hash = stab_hash(name); for(ktd = ktd_head[hash]; ktd; ktd = ktd->next) if ((ktd->name[0] == name[0]) && (strcmp(name, ktd->name) == 0) ) break; /* * Didn't find it. This must be a new one. */ if( ktd == NULL ) return FALSE; /* * Examine the stab to make sure it has the same number of definitions. */ count = 0; for(ptr = strchr(stab, '='); ptr; ptr = strchr(ptr+1, '=')) { if( count >= ktd->ndefs ) return FALSE; /* * Make sure the types of all of the objects is consistent with * what we have already parsed. */ switch(ptr[1]) { case '*': expect = DT_POINTER; break; case 's': case 'u': expect = DT_STRUCT; break; case 'a': expect = DT_ARRAY; break; case '(': /* it's mainly a ref to another typedef, skip it */ expect = -1; break; case '1': case 'r': expect = DT_BASIC; break; case 'x': expect = DT_STRUCT; break; case 'e': expect = DT_ENUM; break; case 'f': expect = DT_FUNC; break; default: DEBUG_Printf(DBG_CHN_FIXME, "Unknown type (%c).\n",ptr[1]); return FALSE; } if( expect != -1 && expect != DEBUG_GetType(ktd->types[count]) ) return FALSE; count++; } if( ktd->ndefs != count ) return FALSE; /* * Go through, dig out all of the type numbers, and substitute the * appropriate things. */ count = 0; for(ptr = strchr(stab, '='); ptr; ptr = strchr(ptr+1, '=')) *DEBUG_ReadTypeEnumBackwards(ptr-1) = ktd->types[count++]; return TRUE; } static int DEBUG_FreeRegisteredTypedefs(void) { int count; int j; struct known_typedef * ktd; struct known_typedef * next; count = 0; for(j=0; j < NR_STAB_HASH; j++ ) { for(ktd = ktd_head[j]; ktd; ktd = next) { count++; next = ktd->next; DBG_free(ktd->name); DBG_free(ktd); } ktd_head[j] = NULL; } return TRUE; } static int DEBUG_ParseTypedefStab(char * ptr, const char * typename) { int arrmax; int arrmin; char * c; struct datatype * curr_type; struct datatype * datatype; struct datatype * curr_types[MAX_TD_NESTING]; char element_name[1024]; int ntypes = 0, ntp; int offset; const char * orig_typename; int size; char * tc; char * tc2; int failure; orig_typename = typename; if( DEBUG_HandlePreviousTypedef(typename, ptr) ) return TRUE; /* * Go from back to front. First we go through and figure out what * type numbers we need, and register those types. Then we go in * and fill the details. */ for( c = strchr(ptr, '='); c != NULL; c = strchr(c + 1, '=') ) { /* * Back up until we get to a non-numeric character, to get datatype */ struct datatype** dt = DEBUG_ReadTypeEnumBackwards(c-1); if( ntypes >= MAX_TD_NESTING ) { /* * If this ever happens, just bump the counter. */ DEBUG_Printf(DBG_CHN_MESG, "Typedef nesting overflow\n"); return FALSE; } switch(c[1]) { case '*': *dt = DEBUG_NewDataType(DT_POINTER, NULL); curr_types[ntypes++] = *dt; break; case 's': case 'u': *dt = DEBUG_NewDataType(DT_STRUCT, typename); curr_types[ntypes++] = *dt; break; case 'a': *dt = DEBUG_NewDataType(DT_ARRAY, NULL); curr_types[ntypes++] = *dt; break; case '(': /* will be handled in next loop, * just a ref to another type */ curr_types[ntypes++] = NULL; break; case '1': case 'r': *dt = DEBUG_NewDataType(DT_BASIC, typename); curr_types[ntypes++] = *dt; break; case 'x': stab_strcpy(element_name, sizeof(element_name), c + 3); *dt = DEBUG_NewDataType(DT_STRUCT, element_name); curr_types[ntypes++] = *dt; break; case 'e': *dt = DEBUG_NewDataType(DT_ENUM, NULL); curr_types[ntypes++] = *dt; break; case 'f': *dt = DEBUG_NewDataType(DT_FUNC, NULL); curr_types[ntypes++] = *dt; break; default: DEBUG_Printf(DBG_CHN_FIXME, "Unknown type (%c).\n",c[1]); return FALSE; } typename = NULL; } ntp = ntypes - 1; /* * OK, now take a second sweep through. Now we will be digging * out the definitions of the various components, and storing * them in the skeletons that we have already allocated. We take * a right-to left search as this is much easier to parse. */ for( c = strrchr(ptr, '='); c != NULL; c = strrchr(ptr, '=') ) { struct datatype** dt = DEBUG_ReadTypeEnumBackwards(c-1); struct datatype** dt2; curr_type = *dt; switch(c[1]) { case 'x': ntp--; tc = c + 3; while( *tc != ':' ) tc++; tc++; if( *tc == '\0' ) *c = '\0'; else strcpy(c, tc); break; case '*': case 'f': ntp--; tc = c + 2; datatype = *DEBUG_ReadTypeEnum(&tc); DEBUG_SetPointerType(curr_type, datatype); if( *tc == '\0' ) *c = '\0'; else strcpy(c, tc); break; case '(': tc = c + 1; dt2 = DEBUG_ReadTypeEnum(&tc); if (!*dt && *dt2) { *dt = *dt2; } else if (!*dt && !*dt2) { /* this should be a basic type, define it */ *dt2 = *dt = DEBUG_NewDataType(DT_BASIC, typename); } else { DEBUG_Printf(DBG_CHN_MESG, "Unknown condition %08lx %08lx (%s)\n", (unsigned long)*dt, (unsigned long)*dt2, ptr); } if( *tc == '\0' ) *c = '\0'; else strcpy(c, tc); curr_types[ntp--] = *dt; break; case '1': case 'r': ntp--; /* * We have already handled these above. */ *c = '\0'; break; case 'a': ntp--; /* ar;;;,,;; */ tc = c + 3; /* 'r' */ DEBUG_ReadTypeEnum(&tc); tc++; /* ';' */ arrmin = strtol(tc, &tc, 10); /* */ tc++; /* ';' */ arrmax = strtol(tc, &tc, 10); /* */ tc++; /* ';' */ datatype = *DEBUG_ReadTypeEnum(&tc); /* */ if( *tc == '\0' ) *c = '\0'; else strcpy(c, tc); DEBUG_SetArrayParams(curr_type, arrmin, arrmax, datatype); break; case 's': case 'u': ntp--; failure = 0; tc = c + 2; if( DEBUG_SetStructSize(curr_type, strtol(tc, &tc, 10)) == FALSE ) { /* * We have already filled out this structure. Nothing to do, * so just skip forward to the end of the definition. */ while( tc[0] != ';' && tc[1] != ';' ) tc++; tc += 2; if( *tc == '\0' ) *c = '\0'; else strcpy(c, tc + 1); continue; } /* * Now parse the individual elements of the structure/union. */ while(*tc != ';') { char *ti; tc2 = element_name; while(*tc != ':') *tc2++ = *tc++; tc++; *tc2++ = '\0'; ti=tc; datatype = *DEBUG_ReadTypeEnum(&tc); *tc='\0'; tc++; offset = strtol(tc, &tc, 10); tc++; size = strtol(tc, &tc, 10); tc++; if (datatype) DEBUG_AddStructElement(curr_type, element_name, datatype, offset, size); else { failure = 1; /* ... but proceed parsing to the end of the stab */ DEBUG_Printf(DBG_CHN_MESG, "failure on %s %s\n", ptr, ti); } } if (failure) { /* if we had a undeclared value this one is undeclared too. * remove it from the stab_types. * I just set it to NULL to detect bugs in my thoughtprocess. * FIXME: leaks the memory for the structure elements. * FIXME: such structures should have been optimized away * by ld. */ *dt = NULL; } if( *tc == '\0' ) *c = '\0'; else strcpy(c, tc + 1); break; case 'e': ntp--; tc = c + 2; /* * Now parse the individual elements of the structure/union. */ while(*tc != ';') { tc2 = element_name; while(*tc != ':') *tc2++ = *tc++; tc++; *tc2++ = '\0'; offset = strtol(tc, &tc, 10); tc++; DEBUG_AddStructElement(curr_type, element_name, NULL, offset, 0); } if( *tc == '\0' ) *c = '\0'; else strcpy(c, tc + 1); break; default: DEBUG_Printf(DBG_CHN_FIXME, "Unknown type (%c).\n",c[1]); return FALSE; } } /* * Now register the type so that if we encounter it again, we will know * what to do. */ DEBUG_RegisterTypedef(orig_typename, curr_types, ntypes); return TRUE; } static struct datatype * DEBUG_ParseStabType(const char * stab) { char * c; /* * Look through the stab definition, and figure out what datatype * this represents. If we have something we know about, assign the * type. */ c = strchr(stab, ':'); if( c == NULL ) return NULL; c++; /* * The next character says more about the type (i.e. data, function, etc) * of symbol. Skip it. */ if (*c != '(') c++; /* * The next is either an integer or a (integer,integer). * The DEBUG_ReadTypeEnum takes care that stab_types is large enough. */ return *DEBUG_ReadTypeEnum(&c); } int DEBUG_ParseStabs(char * addr, unsigned int load_offset, unsigned int staboff, int stablen, unsigned int strtaboff, int strtablen) { struct name_hash * curr_func = NULL; struct wine_locals * curr_loc = NULL; struct name_hash * curr_sym = NULL; char currpath[PATH_MAX]; int i; int in_external_file = FALSE; int last_nso = -1; int len; DBG_VALUE new_value; int nstab; char * ptr; char * stabbuff; int stabbufflen; struct stab_nlist * stab_ptr; char * strs; int strtabinc; char * subpath = NULL; char symname[4096]; nstab = stablen / sizeof(struct stab_nlist); stab_ptr = (struct stab_nlist *) (addr + staboff); strs = (char *) (addr + strtaboff); memset(currpath, 0, sizeof(currpath)); /* * Allocate a buffer into which we can build stab strings for cases * where the stab is continued over multiple lines. */ stabbufflen = 65536; stabbuff = (char *) DBG_alloc(stabbufflen); strtabinc = 0; stabbuff[0] = '\0'; for(i=0; i < nstab; i++, stab_ptr++ ) { ptr = strs + (unsigned int) stab_ptr->n_un.n_name; if( ptr[strlen(ptr) - 1] == '\\' ) { /* * Indicates continuation. Append this to the buffer, and go onto the * next record. Repeat the process until we find a stab without the * '/' character, as this indicates we have the whole thing. */ len = strlen(ptr); if( strlen(stabbuff) + len > stabbufflen ) { stabbufflen += 65536; stabbuff = (char *) DBG_realloc(stabbuff, stabbufflen); } strncat(stabbuff, ptr, len - 1); continue; } else if( stabbuff[0] != '\0' ) { strcat( stabbuff, ptr); ptr = stabbuff; } if( strchr(ptr, '=') != NULL ) { /* * The stabs aren't in writable memory, so copy it over so we are * sure we can scribble on it. */ if( ptr != stabbuff ) { strcpy(stabbuff, ptr); ptr = stabbuff; } stab_strcpy(symname, sizeof(symname), ptr); if (!DEBUG_ParseTypedefStab(ptr, symname)) { /* skip this definition */ stabbuff[0] = '\0'; continue; } } switch(stab_ptr->n_type) { case N_GSYM: /* * These are useless with ELF. They have no value, and you have to * read the normal symbol table to get the address. Thus we * ignore them, and when we process the normal symbol table * we should do the right thing. * * With a.out or mingw, they actually do make some amount of sense. */ new_value.addr.seg = 0; new_value.type = DEBUG_ParseStabType(ptr); new_value.addr.off = load_offset + stab_ptr->n_value; new_value.cookie = DV_TARGET; stab_strcpy(symname, sizeof(symname), ptr); #ifdef __ELF__ curr_sym = DEBUG_AddSymbol( symname, &new_value, currpath, SYM_WINE | SYM_DATA | SYM_INVALID ); #else curr_sym = DEBUG_AddSymbol( symname, &new_value, currpath, SYM_WINE | SYM_DATA ); #endif break; case N_RBRAC: case N_LBRAC: /* * We need to keep track of these so we get symbol scoping * right for local variables. For now, we just ignore them. * The hooks are already there for dealing with this however, * so all we need to do is to keep count of the nesting level, * and find the RBRAC for each matching LBRAC. */ break; case N_LCSYM: case N_STSYM: /* * These are static symbols and BSS symbols. */ new_value.addr.seg = 0; new_value.type = DEBUG_ParseStabType(ptr); new_value.addr.off = load_offset + stab_ptr->n_value; new_value.cookie = DV_TARGET; stab_strcpy(symname, sizeof(symname), ptr); curr_sym = DEBUG_AddSymbol( symname, &new_value, currpath, SYM_WINE | SYM_DATA ); break; case N_PSYM: /* * These are function parameters. */ if( curr_func != NULL && !in_external_file ) { stab_strcpy(symname, sizeof(symname), ptr); curr_loc = DEBUG_AddLocal( curr_func, 0, stab_ptr->n_value, 0, 0, symname ); DEBUG_SetLocalSymbolType( curr_loc, DEBUG_ParseStabType(ptr) ); } break; case N_RSYM: if( curr_func != NULL && !in_external_file ) { stab_strcpy(symname, sizeof(symname), ptr); curr_loc = DEBUG_AddLocal( curr_func, stab_ptr->n_value + 1, 0, 0, 0, symname ); DEBUG_SetLocalSymbolType( curr_loc, DEBUG_ParseStabType(ptr) ); } break; case N_LSYM: if( curr_func != NULL && !in_external_file ) { stab_strcpy(symname, sizeof(symname), ptr); curr_loc = DEBUG_AddLocal( curr_func, 0, stab_ptr->n_value, 0, 0, symname ); DEBUG_SetLocalSymbolType( curr_loc, DEBUG_ParseStabType(ptr) ); } break; case N_SLINE: /* * This is a line number. These are always relative to the start * of the function (N_FUN), and this makes the lookup easier. */ if( curr_func != NULL && !in_external_file ) { #ifdef __ELF__ DEBUG_AddLineNumber(curr_func, stab_ptr->n_desc, stab_ptr->n_value); #else #if 0 /* * This isn't right. The order of the stabs is different under * a.out, and as a result we would end up attaching the line * number to the wrong function. */ DEBUG_AddLineNumber(curr_func, stab_ptr->n_desc, stab_ptr->n_value - curr_func->addr.off); #endif #endif } break; case N_FUN: /* * First, clean up the previous function we were working on. */ DEBUG_Normalize(curr_func); /* * For now, just declare the various functions. Later * on, we will add the line number information and the * local symbols. */ if( !in_external_file) { stab_strcpy(symname, sizeof(symname), ptr); if (*symname) { new_value.addr.seg = 0; new_value.type = DEBUG_ParseStabType(ptr); new_value.addr.off = load_offset + stab_ptr->n_value; new_value.cookie = DV_TARGET; /* * Copy the string to a temp buffer so we * can kill everything after the ':'. We do * it this way because otherwise we end up dirtying * all of the pages related to the stabs, and that * sucks up swap space like crazy. */ curr_func = DEBUG_AddSymbol( symname, &new_value, currpath, SYM_WINE | SYM_FUNC); } else { /* some GCC seem to use a N_FUN "" to mark the end of a function */ curr_func = NULL; } } else { /* * Don't add line number information for this function * any more. */ curr_func = NULL; } break; case N_SO: /* * This indicates a new source file. Append the records * together, to build the correct path name. */ #ifndef __ELF__ /* * With a.out, there is no NULL string N_SO entry at the end of * the file. Thus when we find non-consecutive entries, * we consider that a new file is started. */ if( last_nso < i-1 ) { currpath[0] = '\0'; DEBUG_Normalize(curr_func); curr_func = NULL; } #endif if( *ptr == '\0' ) { /* * Nuke old path. */ currpath[0] = '\0'; DEBUG_Normalize(curr_func); curr_func = NULL; } else { if (*ptr != '/') strcat(currpath, ptr); else strcpy(currpath, ptr); subpath = ptr; DEBUG_ResetIncludes(); } last_nso = i; break; case N_SOL: /* * This indicates we are including stuff from an include file. * If this is the main source, enable the debug stuff, otherwise * ignore it. */ in_external_file = !(subpath == NULL || strcmp(ptr, subpath) == 0); break; case N_UNDF: strs += strtabinc; strtabinc = stab_ptr->n_value; DEBUG_Normalize(curr_func); curr_func = NULL; break; case N_OPT: /* * Ignore this. We don't care what it points to. */ break; case N_BINCL: DEBUG_AddInclude(DEBUG_CreateInclude(ptr, stab_ptr->n_value)); break; case N_EINCL: break; case N_EXCL: DEBUG_AddInclude(DEBUG_FindInclude(ptr, stab_ptr->n_value)); break; case N_MAIN: /* * Always ignore these. GCC doesn't even generate them. */ break; default: DEBUG_Printf(DBG_CHN_MESG, "Unkown stab type 0x%02x\n", stab_ptr->n_type); break; } stabbuff[0] = '\0'; #if 0 DEBUG_Printf(DBG_CHN_MESG, "%d %x %s\n", stab_ptr->n_type, (unsigned int) stab_ptr->n_value, strs + (unsigned int) stab_ptr->n_un.n_name); #endif } DEBUG_FreeRegisteredTypedefs(); DEBUG_FreeIncludes(); return TRUE; } #ifdef __ELF__ /* * Walk through the entire symbol table and add any symbols we find there. * This can be used in cases where we have stripped ELF shared libraries, * or it can be used in cases where we have data symbols for which the address * isn't encoded in the stabs. * * This is all really quite easy, since we don't have to worry about line * numbers or local data variables. */ static int DEBUG_ProcessElfSymtab(char * addr, unsigned int load_offset, Elf32_Shdr * symtab, Elf32_Shdr * strtab) { char * curfile = NULL; struct name_hash * curr_sym = NULL; int flags; int i; DBG_VALUE new_value; int nsym; char * strp; char * symname; Elf32_Sym * symp; symp = (Elf32_Sym *) (addr + symtab->sh_offset); nsym = symtab->sh_size / sizeof(*symp); strp = (char *) (addr + strtab->sh_offset); for(i=0; i < nsym; i++, symp++) { /* * Ignore certain types of entries which really aren't of that much * interest. */ if( ELF32_ST_TYPE(symp->st_info) == STT_SECTION || symp->st_shndx == STN_UNDEF ) { continue; } symname = strp + symp->st_name; /* * Save the name of the current file, so we have a way of tracking * static functions/data. */ if( ELF32_ST_TYPE(symp->st_info) == STT_FILE ) { curfile = symname; continue; } /* * See if we already have something for this symbol. * If so, ignore this entry, because it would have come from the * stabs or from a previous symbol. If the value is different, * we will have to keep the darned thing, because there can be * multiple local symbols by the same name. */ if( (DEBUG_GetSymbolValue(symname, -1, &new_value, FALSE ) == TRUE) && (new_value.addr.off == (load_offset + symp->st_value)) ) continue; new_value.addr.seg = 0; new_value.type = NULL; new_value.addr.off = load_offset + symp->st_value; new_value.cookie = DV_TARGET; flags = SYM_WINE | (ELF32_ST_BIND(symp->st_info) == STT_FUNC ? SYM_FUNC : SYM_DATA); if( ELF32_ST_BIND(symp->st_info) == STB_GLOBAL ) curr_sym = DEBUG_AddSymbol( symname, &new_value, NULL, flags ); else curr_sym = DEBUG_AddSymbol( symname, &new_value, curfile, flags ); /* * Record the size of the symbol. This can come in handy in * some cases. Not really used yet, however. */ if( symp->st_size != 0 ) DEBUG_SetSymbolSize(curr_sym, symp->st_size); } return TRUE; } int DEBUG_ProcessElfObject(const char * filename, unsigned int load_offset) { int rtn = FALSE; char * addr = (char*)0xffffffff; int fd = -1; struct stat statbuf; Elf32_Ehdr * ehptr; Elf32_Shdr * spnt; char * shstrtab; int nsect; int i; int stabsect; int stabstrsect; /* * Make sure we can stat and open this file. */ if( filename == NULL ) goto leave; if (stat(filename, &statbuf) == -1) { char *s,*t,*fn,*paths; if (strchr(filename,'/')) goto leave; paths = DBG_strdup(getenv("PATH")); s = paths; while (s && *s) { t = strchr(s,':'); if (t) *t='\0'; fn = (char*)DBG_alloc(strlen(filename)+1+strlen(s)+1); strcpy(fn,s); strcat(fn,"/"); strcat(fn,filename); if ((rtn = DEBUG_ProcessElfObject(fn,load_offset))) { DBG_free(fn); DBG_free(paths); goto leave; } DBG_free(fn); if (t) s = t+1; else break; } if (!s || !*s) DEBUG_Printf(DBG_CHN_MESG," not found"); DBG_free(paths); goto leave; } if (DEBUG_FindModuleByName(filename, DM_TYPE_ELF)) goto leave; DEBUG_Printf(DBG_CHN_MESG, "Loading stabs debug symbols from %s (0x%08x)\n", filename, load_offset); /* * Now open the file, so that we can mmap() it. */ if ((fd = open(filename, O_RDONLY)) == -1) goto leave; /* * Now mmap() the file. */ addr = mmap(0, statbuf.st_size, PROT_READ, MAP_PRIVATE, fd, 0); if (addr == (char*)0xffffffff) goto leave; /* * Next, we need to find a few of the internal ELF headers within * this thing. We need the main executable header, and the section * table. */ ehptr = (Elf32_Ehdr *) addr; if( load_offset == 0 ) DEBUG_RegisterELFModule(ehptr->e_entry, filename); else DEBUG_RegisterELFModule(load_offset, filename); spnt = (Elf32_Shdr *) (addr + ehptr->e_shoff); nsect = ehptr->e_shnum; shstrtab = (addr + spnt[ehptr->e_shstrndx].sh_offset); stabsect = stabstrsect = -1; for(i=0; i < nsect; i++) { if( strcmp(shstrtab + spnt[i].sh_name, ".stab") == 0 ) stabsect = i; if( strcmp(shstrtab + spnt[i].sh_name, ".stabstr") == 0 ) stabstrsect = i; } if( stabsect == -1 || stabstrsect == -1 ) { DEBUG_Printf(DBG_CHN_WARN, "no .stab section\n"); goto leave; } /* * OK, now just parse all of the stabs. */ if (!(rtn = DEBUG_ParseStabs(addr, load_offset, spnt[stabsect].sh_offset, spnt[stabsect].sh_size, spnt[stabstrsect].sh_offset, spnt[stabstrsect].sh_size))) { DEBUG_Printf(DBG_CHN_WARN, "bad stabs\n"); goto leave; } for(i=0; i < nsect; i++) { if( (strcmp(shstrtab + spnt[i].sh_name, ".symtab") == 0) && (spnt[i].sh_type == SHT_SYMTAB) ) DEBUG_ProcessElfSymtab(addr, load_offset, spnt + i, spnt + spnt[i].sh_link); if( (strcmp(shstrtab + spnt[i].sh_name, ".dynsym") == 0) && (spnt[i].sh_type == SHT_DYNSYM) ) DEBUG_ProcessElfSymtab(addr, load_offset, spnt + i, spnt + spnt[i].sh_link); } leave: if (addr != (char*)0xffffffff) munmap(addr, statbuf.st_size); if (fd != -1) close(fd); return rtn; } static BOOL DEBUG_WalkList(struct r_debug* dbg_hdr) { u_long lm_addr; struct link_map lm; Elf32_Ehdr ehdr; char bufstr[256]; /* * Now walk the linked list. In all known ELF implementations, * the dynamic loader maintains this linked list for us. In some * cases the first entry doesn't appear with a name, in other cases it * does. */ for (lm_addr = (u_long)dbg_hdr->r_map; lm_addr; lm_addr = (u_long)lm.l_next) { if (!DEBUG_READ_MEM_VERBOSE((void*)lm_addr, &lm, sizeof(lm))) return FALSE; if (lm.l_addr != 0 && DEBUG_READ_MEM_VERBOSE((void*)lm.l_addr, &ehdr, sizeof(ehdr)) && ehdr.e_type == ET_DYN && /* only look at dynamic modules */ lm.l_name != NULL && DEBUG_READ_MEM_VERBOSE(lm.l_name, bufstr, sizeof(bufstr))) { bufstr[sizeof(bufstr) - 1] = '\0'; DEBUG_ProcessElfObject(bufstr, lm.l_addr); } } return TRUE; } static BOOL DEBUG_RescanElf(void) { struct r_debug dbg_hdr; if (!DEBUG_CurrProcess || !DEBUG_READ_MEM_VERBOSE((void*)DEBUG_CurrProcess->dbg_hdr_addr, &dbg_hdr, sizeof(dbg_hdr))) return FALSE; switch (dbg_hdr.r_state) { case RT_CONSISTENT: DEBUG_WalkList(&dbg_hdr); break; case RT_ADD: break; case RT_DELETE: /*FIXME: this is not currently handled, would need some kind of mark&sweep algo */ break; } return FALSE; } int DEBUG_ReadExecutableDbgInfo(const char* exe_name) { Elf32_Dyn dyn; struct r_debug dbg_hdr; int rtn = FALSE; DBG_VALUE val; /* * Make sure we can stat and open this file. */ if (exe_name == NULL) goto leave; DEBUG_ProcessElfObject(exe_name, 0); /* previous step should have loaded symbol _DYNAMIC if it exists inside * the main executable */ if (!DEBUG_GetSymbolValue("_DYNAMIC", -1, &val, FALSE)) { DEBUG_Printf(DBG_CHN_WARN, "Can't find symbol _DYNAMIC\n"); goto leave; } do { if (!DEBUG_READ_MEM_VERBOSE((void*)val.addr.off, &dyn, sizeof(dyn))) goto leave; val.addr.off += sizeof(dyn); } while (dyn.d_tag != DT_DEBUG && dyn.d_tag != DT_NULL); if (dyn.d_tag == DT_NULL) goto leave; /* * OK, now dig into the actual tables themselves. */ if (!DEBUG_READ_MEM_VERBOSE((void*)dyn.d_un.d_ptr, &dbg_hdr, sizeof(dbg_hdr))) goto leave; assert(!DEBUG_CurrProcess->dbg_hdr_addr); DEBUG_CurrProcess->dbg_hdr_addr = (u_long)dyn.d_un.d_ptr; if (dbg_hdr.r_brk) { DBG_VALUE value; DEBUG_Printf(DBG_CHN_TRACE, "Setting up a breakpoint on r_brk(%lx)\n", (unsigned long)dbg_hdr.r_brk); DEBUG_SetBreakpoints(FALSE); value.type = NULL; value.cookie = DV_TARGET; value.addr.seg = 0; value.addr.off = dbg_hdr.r_brk; DEBUG_AddBreakpoint(&value, DEBUG_RescanElf); DEBUG_SetBreakpoints(TRUE); } rtn = DEBUG_WalkList(&dbg_hdr); leave: return rtn; } #else /* !__ELF__ */ int DEBUG_ProcessElfObject(const char * filename, unsigned int load_offset) { return FALSE; } int DEBUG_ReadExecutableDbgInfo(const char* exe_name) { return FALSE; } #endif /* __ELF__ */ wine-20000526/debugger/stack.c0100644000175000001440000003001207106624617015504 0ustar julliardusers/* * Debugger stack handling * * Copyright 1995 Alexandre Julliard * Copyright 1996 Eric Youngdale * Copyright 1999 Ove Kåven */ #include "config.h" #include #include "debugger.h" #include "stackframe.h" #include "winbase.h" #ifdef __i386__ /* * We keep this info for each frame, so that we can * find local variable information correctly. */ struct bt_info { unsigned int cs; unsigned int eip; unsigned int ss; unsigned int ebp; struct symbol_info frame; }; static int nframe; static struct bt_info * frames = NULL; int curr_frame; typedef struct { WORD bp; WORD ip; WORD cs; } FRAME16; typedef struct { DWORD bp; DWORD ip; WORD cs; } FRAME32; #endif /*********************************************************************** * DEBUG_InfoStack * * Dump the top of the stack */ void DEBUG_InfoStack(void) { #ifdef __i386__ DBG_VALUE value; value.type = NULL; value.cookie = DV_TARGET; value.addr.seg = DEBUG_context.SegSs; value.addr.off = DEBUG_context.Esp; DEBUG_Printf(DBG_CHN_MESG,"Stack dump:\n"); switch (DEBUG_GetSelectorType(value.addr.seg)) { case 32: /* 32-bit mode */ DEBUG_ExamineMemory( &value, 24, 'x' ); break; case 16: /* 16-bit mode */ value.addr.off &= 0xffff; DEBUG_ExamineMemory( &value, 24, 'w' ); break; default: DEBUG_Printf(DBG_CHN_MESG, "Bad segment (%ld)\n", value.addr.seg); } DEBUG_Printf(DBG_CHN_MESG,"\n"); #endif } #ifdef __i386__ static void DEBUG_ForceFrame(DBG_ADDR *stack, DBG_ADDR *code, int frameno, int bits, int noisy) { int theframe = nframe++; frames = (struct bt_info *)DBG_realloc(frames, nframe*sizeof(struct bt_info)); if (noisy) DEBUG_Printf(DBG_CHN_MESG,"%s%d ", (theframe == curr_frame ? "=>" : " "), frameno); frames[theframe].cs = code->seg; frames[theframe].eip = code->off; if (noisy) frames[theframe].frame = DEBUG_PrintAddressAndArgs( code, bits, stack->off, TRUE ); else DEBUG_FindNearestSymbol( code, TRUE, &frames[theframe].frame.sym, stack->off, &frames[theframe].frame.list); frames[theframe].ss = stack->seg; frames[theframe].ebp = stack->off; if (noisy) { DEBUG_Printf( DBG_CHN_MESG, (bits == 16) ? " (bp=%04lx)\n" : " (ebp=%08lx)\n", stack->off ); } } static BOOL DEBUG_Frame16(DBG_ADDR *addr, unsigned int *cs, int frameno, int noisy) { unsigned int ss = addr->seg, possible_cs = 0; FRAME16 frame; int theframe = nframe; void* p = (void*)DEBUG_ToLinear(addr); if (!p) return FALSE; if (!DEBUG_READ_MEM(p, &frame, sizeof(frame))) { if (noisy) DEBUG_InvalAddr(addr); return FALSE; } if (!frame.bp) return FALSE; nframe++; frames = (struct bt_info *)DBG_realloc(frames, nframe*sizeof(struct bt_info)); if (noisy) DEBUG_Printf(DBG_CHN_MESG,"%s%d ", (theframe == curr_frame ? "=>" : " "), frameno); if (frame.bp & 1) *cs = frame.cs; else { /* not explicitly marked as far call, * but check whether it could be anyway */ if (((frame.cs&7)==7) && (frame.cs != *cs)) { LDT_ENTRY le; if (GetThreadSelectorEntry( DEBUG_CurrThread->handle, frame.cs, &le) && (le.HighWord.Bits.Type & 0x08)) { /* code segment */ /* it is very uncommon to push a code segment cs as * a parameter, so this should work in most cases */ *cs = possible_cs = frame.cs; } } } frames[theframe].cs = addr->seg = *cs; frames[theframe].eip = addr->off = frame.ip; if (noisy) frames[theframe].frame = DEBUG_PrintAddressAndArgs( addr, 16, frame.bp, TRUE ); else DEBUG_FindNearestSymbol( addr, TRUE, &frames[theframe].frame.sym, frame.bp, &frames[theframe].frame.list); frames[theframe].ss = addr->seg = ss; frames[theframe].ebp = addr->off = frame.bp & ~1; if (noisy) { DEBUG_Printf( DBG_CHN_MESG, " (bp=%04lx", addr->off ); if (possible_cs) { DEBUG_Printf( DBG_CHN_MESG, ", far call assumed" ); } DEBUG_Printf( DBG_CHN_MESG, ")\n" ); } return TRUE; } static BOOL DEBUG_Frame32(DBG_ADDR *addr, unsigned int *cs, int frameno, int noisy) { unsigned int ss = addr->seg; FRAME32 frame; int theframe = nframe; void* p = (void*)DEBUG_ToLinear(addr); if (!p) return FALSE; if (!DEBUG_READ_MEM(p, &frame, sizeof(frame))) { if (noisy) DEBUG_InvalAddr(addr); return FALSE; } if (!frame.ip) return FALSE; nframe++; frames = (struct bt_info *)DBG_realloc(frames, nframe*sizeof(struct bt_info)); if (noisy) DEBUG_Printf(DBG_CHN_MESG,"%s%d ", (theframe == curr_frame ? "=>" : " "), frameno); frames[theframe].cs = addr->seg = *cs; frames[theframe].eip = addr->off = frame.ip; if (noisy) frames[theframe].frame = DEBUG_PrintAddressAndArgs( addr, 32, frame.bp, TRUE ); else DEBUG_FindNearestSymbol( addr, TRUE, &frames[theframe].frame.sym, frame.bp, &frames[theframe].frame.list); if (noisy) DEBUG_Printf( DBG_CHN_MESG, " (ebp=%08lx)\n", frame.bp ); frames[theframe].ss = addr->seg = ss; frames[theframe].ebp = frame.bp; if (addr->off == frame.bp) return FALSE; addr->off = frame.bp; return TRUE; } #endif /*********************************************************************** * DEBUG_BackTrace * * Display a stack back-trace. */ void DEBUG_BackTrace(BOOL noisy) { #ifdef __i386 DBG_ADDR addr, sw_addr, code, tmp; unsigned int ss = DEBUG_context.SegSs; unsigned int cs = DEBUG_context.SegCs; int frameno = 0, is16, ok; DWORD next_switch, cur_switch, p; STACK16FRAME frame16; STACK32FRAME frame32; char ch; if (noisy) DEBUG_Printf( DBG_CHN_MESG, "Backtrace:\n" ); nframe = 1; if (frames) DBG_free( frames ); frames = (struct bt_info *) DBG_alloc( sizeof(struct bt_info) ); if (noisy) DEBUG_Printf(DBG_CHN_MESG,"%s%d ",(curr_frame == 0 ? "=>" : " "), frameno); if (DEBUG_IsSelectorSystem(ss)) ss = 0; if (DEBUG_IsSelectorSystem(cs)) cs = 0; /* first stack frame from registers */ switch (DEBUG_GetSelectorType(ss)) { case 32: frames[0].cs = addr.seg = cs; frames[0].eip = addr.off = DEBUG_context.Eip; if (noisy) frames[0].frame = DEBUG_PrintAddress( &addr, 32, TRUE ); else DEBUG_FindNearestSymbol( &addr, TRUE, &frames[0].frame.sym, 0, &frames[0].frame.list); frames[0].ss = addr.seg = ss; frames[0].ebp = addr.off = DEBUG_context.Ebp; if (noisy) DEBUG_Printf( DBG_CHN_MESG, " (ebp=%08x)\n", frames[0].ebp ); is16 = FALSE; break; case 16: frames[0].cs = addr.seg = cs; frames[0].eip = addr.off = LOWORD(DEBUG_context.Eip); if (noisy) frames[0].frame = DEBUG_PrintAddress( &addr, 16, TRUE ); else DEBUG_FindNearestSymbol( &addr, TRUE, &frames[0].frame.sym, 0, &frames[0].frame.list); frames[0].ss = addr.seg = ss; frames[0].ebp = addr.off = LOWORD(DEBUG_context.Ebp); if (noisy) DEBUG_Printf( DBG_CHN_MESG, " (bp=%04x)\n", frames[0].ebp ); is16 = TRUE; break; default: if (noisy) DEBUG_Printf( DBG_CHN_MESG, "Bad segment '%u'\n", ss); return; } /* cur_switch holds address of curr_stack's field in TEB in debuggee * address space */ cur_switch = (DWORD)DEBUG_CurrThread->teb + OFFSET_OF(TEB, cur_stack); if (!DEBUG_READ_MEM((void*)cur_switch, &next_switch, sizeof(next_switch))) { if (noisy) DEBUG_Printf( DBG_CHN_MESG, "Can't read TEB:cur_stack\n"); return; } if (is16) { if (!DEBUG_READ_MEM((void*)next_switch, &frame32, sizeof(STACK32FRAME))) { if (noisy) DEBUG_Printf( DBG_CHN_MESG, "Bad stack frame 0x%08lx\n", (unsigned long)(STACK32FRAME*)next_switch ); return; } cur_switch = (DWORD)frame32.frame16; sw_addr.seg = SELECTOROF(cur_switch); sw_addr.off = OFFSETOF(cur_switch); } else { tmp.seg = SELECTOROF(next_switch); tmp.off = OFFSETOF(next_switch); p = DEBUG_ToLinear(&tmp); if (!DEBUG_READ_MEM((void*)p, &frame16, sizeof(STACK16FRAME))) { if (noisy) DEBUG_Printf( DBG_CHN_MESG, "Bad stack frame 0x%08lx\n", (unsigned long)(STACK16FRAME*)p ); return; } cur_switch = (DWORD)frame16.frame32; sw_addr.seg = ss; sw_addr.off = cur_switch; } if (!DEBUG_READ_MEM((void*)DEBUG_ToLinear(&sw_addr), &ch, sizeof(ch))) { sw_addr.seg = (DWORD)-1; sw_addr.off = (DWORD)-1; } for (ok = TRUE; ok;) { if ((frames[frameno].ss == sw_addr.seg) && (frames[frameno].ebp >= sw_addr.off)) { /* 16<->32 switch... * yes, I know this is confusing, it gave me a headache too */ if (is16) { if (!DEBUG_READ_MEM((void*)next_switch, &frame32, sizeof(STACK32FRAME))) { if (noisy) DEBUG_Printf( DBG_CHN_MESG, "Bad stack frame 0x%08lx\n", (unsigned long)(STACK32FRAME*)next_switch ); return; } code.seg = 0; code.off = frame32.retaddr; cs = 0; addr.seg = 0; addr.off = frame32.ebp; DEBUG_ForceFrame( &addr, &code, ++frameno, 32, noisy ); next_switch = cur_switch; tmp.seg = SELECTOROF(next_switch); tmp.off = OFFSETOF(next_switch); p = DEBUG_ToLinear(&tmp); if (!DEBUG_READ_MEM((void*)p, &frame16, sizeof(STACK16FRAME))) { if (noisy) DEBUG_Printf( DBG_CHN_MESG, "Bad stack frame 0x%08lx\n", (unsigned long)(STACK16FRAME*)p ); return; } cur_switch = (DWORD)frame16.frame32; sw_addr.seg = 0; sw_addr.off = cur_switch; is16 = FALSE; } else { tmp.seg = SELECTOROF(next_switch); tmp.off = OFFSETOF(next_switch); p = DEBUG_ToLinear(&tmp); if (!DEBUG_READ_MEM((void*)p, &frame16, sizeof(STACK16FRAME))) { if (noisy) DEBUG_Printf( DBG_CHN_MESG, "Bad stack frame 0x%08lx\n", (unsigned long)(STACK16FRAME*)p ); return; } code.seg = frame16.cs; code.off = frame16.ip; cs = frame16.cs; addr.seg = SELECTOROF(next_switch); addr.off = frame16.bp; DEBUG_ForceFrame( &addr, &code, ++frameno, 16, noisy ); next_switch = cur_switch; if (!DEBUG_READ_MEM((void*)next_switch, &frame32, sizeof(STACK32FRAME))) { if (noisy) DEBUG_Printf( DBG_CHN_MESG, "Bad stack frame 0x%08lx\n", (unsigned long)(STACK32FRAME*)next_switch ); return; } cur_switch = (DWORD)frame32.frame16; sw_addr.seg = SELECTOROF(cur_switch); sw_addr.off = OFFSETOF(cur_switch); is16 = TRUE; } if (!DEBUG_READ_MEM((void*)DEBUG_ToLinear(&sw_addr), &ch, sizeof(ch))) { sw_addr.seg = (DWORD)-1; sw_addr.off = (DWORD)-1; } } else { /* ordinary stack frame */ ok = is16 ? DEBUG_Frame16( &addr, &cs, ++frameno, noisy) : DEBUG_Frame32( &addr, &cs, ++frameno, noisy); } } if (noisy) DEBUG_Printf( DBG_CHN_MESG, "\n" ); #endif } int DEBUG_SetFrame(int newframe) { int rtn = FALSE; curr_frame = newframe; if( curr_frame >= nframe ) { curr_frame = nframe - 1; } if( curr_frame < 0 ) { curr_frame = 0; } if( frames && frames[curr_frame].frame.list.sourcefile != NULL ) { DEBUG_List(&frames[curr_frame].frame.list, NULL, 0); } rtn = TRUE; return (rtn); } int DEBUG_GetCurrentFrame(struct name_hash ** name, unsigned int * eip, unsigned int * ebp) { /* * If we don't have a valid backtrace, then just return. */ if( frames == NULL ) { return FALSE; } /* * If we don't know what the current function is, then we also have * nothing to report here. */ if( frames[curr_frame].frame.sym == NULL ) { return FALSE; } *name = frames[curr_frame].frame.sym; *eip = frames[curr_frame].eip; *ebp = frames[curr_frame].ebp; return TRUE; } wine-20000526/debugger/types.c0100644000175000001440000005626307106624617015563 0ustar julliardusers/* * File types.c - datatype handling stuff for internal debugger. * * Copyright (C) 1997, Eric Youngdale. * * This really doesn't do much at the moment, but it forms the framework * upon which full support for datatype handling will eventually be hung. */ #include "config.h" #include #include #include #include #include #include #include #include "pe_image.h" #include "debugger.h" #define NR_TYPE_HASH 521 int DEBUG_nchar; static int DEBUG_maxchar = 1024; struct en_values { struct en_values* next; char * name; int value; }; struct member { struct member * next; char * name; struct datatype * type; int offset; int size; }; struct datatype { enum debug_type type; struct datatype * next; char * name; union { struct { char basic_type; char * output_format; char basic_size; unsigned b_signed:1; } basic; struct { unsigned short bitoff; unsigned short nbits; struct datatype * basetype; } bitfield; struct { struct datatype * pointsto; } pointer; struct { struct datatype * rettype; } funct; struct { int start; int end; struct datatype * basictype; } array; struct { int size; struct member * members; } structure; struct { struct en_values * members; } enumeration; } un; }; #define BASIC_INT 1 #define BASIC_CHAR 2 #define BASIC_LONG 3 #define BASIC_UINT 4 #define BASIC_LUI 5 #define BASIC_LONGLONG 6 #define BASIC_ULONGLONGI 7 #define BASIC_SHORT 8 #define BASIC_SHORTUI 9 #define BASIC_SCHAR 10 #define BASIC_UCHAR 11 #define BASIC_FLT 12 #define BASIC_LONG_DOUBLE 13 #define BASIC_DOUBLE 14 #define BASIC_CMPLX_INT 15 #define BASIC_CMPLX_FLT 16 #define BASIC_CMPLX_DBL 17 #define BASIC_CMPLX_LONG_DBL 18 #define BASIC_VOID 19 struct datatype * DEBUG_TypeInt = NULL; struct datatype * DEBUG_TypeIntConst = NULL; struct datatype * DEBUG_TypeUSInt = NULL; struct datatype * DEBUG_TypeString = NULL; struct datatype * DEBUG_TypeShortUInt = NULL; /* * All of the types that have been defined so far. */ static struct datatype * type_hash_table[NR_TYPE_HASH + 1]; static struct datatype * pointer_types = NULL; static unsigned int type_hash( const char * name ) { unsigned int hash = 0; unsigned int tmp; const char * p; p = name; while (*p) { hash = (hash << 4) + *p++; if( (tmp = (hash & 0xf0000000)) ) { hash ^= tmp >> 24; } hash &= ~tmp; } return hash % NR_TYPE_HASH; } static struct datatype * DEBUG_InitBasic(int type, char * name, int size, int b_signed, char * output_format) { int hash; struct datatype * dt; dt = (struct datatype *) DBG_alloc(sizeof(struct datatype)); if( dt != NULL ) { if( name != NULL ) { hash = type_hash(name); } else { hash = NR_TYPE_HASH; } dt->type = DT_BASIC; dt->name = name; dt->next = type_hash_table[hash]; type_hash_table[hash] = dt; dt->un.basic.basic_type = type; dt->un.basic.basic_size = size; dt->un.basic.b_signed = b_signed; dt->un.basic.output_format = output_format; } return dt; } static struct datatype * DEBUG_LookupDataType(enum debug_type xtype, int hash, const char * typename) { struct datatype * dt = NULL; if( typename != NULL ) { for( dt = type_hash_table[hash]; dt; dt = dt->next ) { if( xtype != dt->type || dt->name == NULL || dt->name[0] != typename[0]) { continue; } if( strcmp(dt->name, typename) == 0 ) { return dt; } } } return dt; } struct datatype * DEBUG_NewDataType(enum debug_type xtype, const char * typename) { struct datatype * dt = NULL; int hash; /* * The last bucket is special, and is used to hold typeless names. */ if( typename == NULL ) { hash = NR_TYPE_HASH; } else { hash = type_hash(typename); } dt = DEBUG_LookupDataType(xtype, hash, typename); if( dt == NULL ) { dt = (struct datatype *) DBG_alloc(sizeof(struct datatype)); if( dt != NULL ) { memset(dt, 0, sizeof(*dt)); dt->type = xtype; if( typename != NULL ) { dt->name = DBG_strdup(typename); } else { dt->name = NULL; } if( xtype == DT_POINTER ) { dt->next = pointer_types; pointer_types = dt; } else { dt->next = type_hash_table[hash]; type_hash_table[hash] = dt; } } } return dt; } struct datatype * DEBUG_FindOrMakePointerType(struct datatype * reftype) { struct datatype * dt = NULL; if( reftype != NULL ) { for( dt = pointer_types; dt; dt = dt->next ) { if( dt->type != DT_POINTER ) { continue; } if( dt->un.pointer.pointsto == reftype ) { return dt; } } } if( dt == NULL ) { dt = (struct datatype *) DBG_alloc(sizeof(struct datatype)); if( dt != NULL ) { dt->type = DT_POINTER; dt->un.pointer.pointsto = reftype; dt->next = pointer_types; pointer_types = dt; } } return dt; } void DEBUG_InitTypes(void) { static int beenhere = 0; struct datatype * chartype; if( beenhere++ != 0 ) { return; } /* * Special version of int used with constants of various kinds. */ DEBUG_TypeIntConst = DEBUG_InitBasic(BASIC_INT,NULL,4,1,"%d"); /* * Initialize a few builtin types. */ DEBUG_TypeInt = DEBUG_InitBasic(BASIC_INT,"int",4,1,"%d"); chartype = DEBUG_InitBasic(BASIC_CHAR,"char",1,1,"'%c'"); DEBUG_InitBasic(BASIC_LONG,"long int",4,1,"%d"); DEBUG_TypeUSInt = DEBUG_InitBasic(BASIC_UINT,"unsigned int",4,0,"%d"); DEBUG_InitBasic(BASIC_LUI,"long unsigned int",4,0,"%d"); DEBUG_InitBasic(BASIC_LONGLONG,"long long int",8,1,"%ld"); DEBUG_InitBasic(BASIC_ULONGLONGI,"long long unsigned int",8,0,"%ld"); DEBUG_InitBasic(BASIC_SHORT,"short int",2,1,"%d"); DEBUG_TypeShortUInt = DEBUG_InitBasic(BASIC_SHORTUI,"short unsigned int",2,0,"%d"); DEBUG_InitBasic(BASIC_SCHAR,"signed char",1,1,"'%c'"); DEBUG_InitBasic(BASIC_UCHAR,"unsigned char",1,0,"'%c'"); DEBUG_InitBasic(BASIC_FLT,"float",4,0,"%f"); DEBUG_InitBasic(BASIC_LONG_DOUBLE,"double",8,0,"%lf"); DEBUG_InitBasic(BASIC_DOUBLE,"long double",12,0,NULL); DEBUG_InitBasic(BASIC_CMPLX_INT,"complex int",8,1,NULL); DEBUG_InitBasic(BASIC_CMPLX_FLT,"complex float",8,0,NULL); DEBUG_InitBasic(BASIC_CMPLX_DBL,"complex double",16,0,NULL); DEBUG_InitBasic(BASIC_CMPLX_LONG_DBL,"complex long double",24,0,NULL); DEBUG_InitBasic(BASIC_VOID,"void",0,0,NULL); DEBUG_TypeString = DEBUG_NewDataType(DT_POINTER, NULL); DEBUG_SetPointerType(DEBUG_TypeString, chartype); /* * Now initialize the builtins for codeview. */ DEBUG_InitCVDataTypes(); } long long int DEBUG_GetExprValue(const DBG_VALUE *_value, char ** format) { unsigned int rtn; struct datatype * type2 = NULL; struct en_values * e; char * def_format = "0x%x"; DBG_VALUE value = *_value; assert(_value->cookie == DV_TARGET || _value->cookie == DV_HOST); rtn = 0; /* FIXME? I don't quite get this... * if this is wrong, value.addr shall be linearized */ value.addr.seg = 0; assert(value.type != NULL); switch(value.type->type) { case DT_BASIC: rtn = 0; /* FIXME: following code implies i386 byte ordering */ if (_value->cookie == DV_TARGET) { if (!DEBUG_READ_MEM_VERBOSE((void*)value.addr.off, &rtn, value.type->un.basic.basic_size)) return 0; } else { memcpy(&rtn, (void*)value.addr.off, value.type->un.basic.basic_size); } if( (value.type->un.basic.b_signed) && ((value.type->un.basic.basic_size & 3) != 0) && ((rtn >> (value.type->un.basic.basic_size * 8 - 1)) != 0) ) { rtn = rtn | ((-1) << (value.type->un.basic.basic_size * 8)); } if( value.type->un.basic.output_format != NULL ) { def_format = value.type->un.basic.output_format; } /* * Check for single character prints that are out of range. */ if( value.type->un.basic.basic_size == 1 && strcmp(def_format, "'%c'") == 0 && ((rtn < 0x20) || (rtn > 0x80)) ) { def_format = "%d"; } break; case DT_POINTER: if (_value->cookie == DV_TARGET) { if (!DEBUG_READ_MEM_VERBOSE((void*)value.addr.off, &rtn, sizeof(void*))) return 0; } else { rtn = *(unsigned int*)(value.addr.off); } type2 = value.type->un.pointer.pointsto; if (!type2) { def_format = "Internal symbol error: unable to access memory location 0x%08x"; rtn = 0; break; } if( type2->type == DT_BASIC && type2->un.basic.basic_size == 1 ) { if ( _value->cookie == DV_TARGET ) { char ch; def_format = "\"%S\""; if (!DEBUG_READ_MEM_VERBOSE((void*)rtn, &ch, 1)) return 0; } else { def_format = "\"%s\""; } } else { def_format = "0x%8.8x"; } break; case DT_ARRAY: case DT_STRUCT: assert(_value->cookie == DV_TARGET); if (!DEBUG_READ_MEM_VERBOSE((void*)value.addr.off, &rtn, sizeof(rtn))) return 0; def_format = "0x%8.8x"; break; case DT_ENUM: assert(_value->cookie == DV_TARGET); if (!DEBUG_READ_MEM_VERBOSE((void*)value.addr.off, &rtn, sizeof(rtn))) return 0; for(e = value.type->un.enumeration.members; e; e = e->next ) { if( e->value == rtn ) { break; } } if( e != NULL ) { rtn = (int) e->name; def_format = "%s"; } else { def_format = "%d"; } break; default: rtn = 0; break; } if( format != NULL ) { *format = def_format; } return rtn; } unsigned int DEBUG_TypeDerefPointer(const DBG_VALUE *value, struct datatype ** newtype) { DBG_ADDR addr = value->addr; unsigned int val; assert(value->cookie == DV_TARGET || value->cookie == DV_HOST); *newtype = NULL; /* * Make sure that this really makes sense. */ if( value->type->type != DT_POINTER ) return 0; if (value->cookie == DV_TARGET) { if (!DEBUG_READ_MEM((void*)value->addr.off, &val, sizeof(val))) return 0; } else { val = *(unsigned int*)value->addr.off; } *newtype = value->type->un.pointer.pointsto; addr.off = val; return DEBUG_ToLinear(&addr); /* FIXME: is this right (or "better") ? */ } unsigned int DEBUG_FindStructElement(DBG_VALUE* value, const char * ele_name, int * tmpbuf) { struct member * m; unsigned int mask; assert(value->cookie == DV_TARGET || value->cookie == DV_HOST); /* * Make sure that this really makes sense. */ if( value->type->type != DT_STRUCT ) { value->type = NULL; return FALSE; } for(m = value->type->un.structure.members; m; m = m->next) { if( strcmp(m->name, ele_name) == 0 ) { value->type = m->type; if( (m->offset & 7) != 0 || (m->size & 7) != 0) { /* * Bitfield operation. We have to extract the field and store * it in a temporary buffer so that we get it all right. */ *tmpbuf = ((*(int* ) (value->addr.off + (m->offset >> 3))) >> (m->offset & 7)); value->addr.off = (int) tmpbuf; mask = 0xffffffff << (m->size); *tmpbuf &= ~mask; /* * OK, now we have the correct part of the number. * Check to see whether the basic type is signed or not, and if so, * we need to sign extend the number. */ if( m->type->type == DT_BASIC && m->type->un.basic.b_signed != 0 && (*tmpbuf & (1 << (m->size - 1))) != 0 ) { *tmpbuf |= mask; } } else { value->addr.off += (m->offset >> 3); } return TRUE; } } value->type = NULL; return FALSE; } int DEBUG_SetStructSize(struct datatype * dt, int size) { assert(dt->type == DT_STRUCT); if( dt->un.structure.members != NULL ) { return FALSE; } dt->un.structure.size = size; dt->un.structure.members = NULL; return TRUE; } int DEBUG_CopyFieldlist(struct datatype * dt, struct datatype * dt2) { assert( dt->type == dt2->type && ((dt->type == DT_STRUCT) || (dt->type == DT_ENUM))); if( dt->type == DT_STRUCT ) { dt->un.structure.members = dt2->un.structure.members; } else { dt->un.enumeration.members = dt2->un.enumeration.members; } return TRUE; } int DEBUG_AddStructElement(struct datatype * dt, char * name, struct datatype * type, int offset, int size) { struct member * m; struct member * last; struct en_values * e; if( dt->type == DT_STRUCT ) { for(last = dt->un.structure.members; last; last = last->next) { if( (last->name[0] == name[0]) && (strcmp(last->name, name) == 0) ) { return TRUE; } if( last->next == NULL ) { break; } } m = (struct member *) DBG_alloc(sizeof(struct member)); if( m == FALSE ) { return FALSE; } m->name = DBG_strdup(name); m->type = type; m->offset = offset; m->size = size; if( last == NULL ) { m->next = dt->un.structure.members; dt->un.structure.members = m; } else { last->next = m; m->next = NULL; } /* * If the base type is bitfield, then adjust the offsets here so that we * are able to look things up without lots of falter-all. */ if( type && type->type == DT_BITFIELD ) { m->offset += m->type->un.bitfield.bitoff; m->size = m->type->un.bitfield.nbits; m->type = m->type->un.bitfield.basetype; } } else if( dt->type == DT_ENUM ) { e = (struct en_values *) DBG_alloc(sizeof(struct en_values)); if( e == FALSE ) { return FALSE; } e->name = DBG_strdup(name); e->value = offset; e->next = dt->un.enumeration.members; dt->un.enumeration.members = e; } else { assert(FALSE); } return TRUE; } struct datatype * DEBUG_GetPointerType(struct datatype * dt) { if( dt->type == DT_POINTER ) { return dt->un.pointer.pointsto; } return NULL; } int DEBUG_SetPointerType(struct datatype * dt, struct datatype * dt2) { switch(dt->type) { case DT_POINTER: dt->un.pointer.pointsto = dt2; break; case DT_FUNC: dt->un.funct.rettype = dt2; break; default: assert(FALSE); } return TRUE; } int DEBUG_SetArrayParams(struct datatype * dt, int min, int max, struct datatype * dt2) { assert(dt->type == DT_ARRAY); dt->un.array.start = min; dt->un.array.end = max; dt->un.array.basictype = dt2; return TRUE; } int DEBUG_SetBitfieldParams(struct datatype * dt, int offset, int nbits, struct datatype * dt2) { assert(dt->type == DT_BITFIELD); dt->un.bitfield.bitoff = offset; dt->un.bitfield.nbits = nbits; dt->un.bitfield.basetype = dt2; return TRUE; } int DEBUG_GetObjectSize(struct datatype * dt) { if( dt == NULL ) { return 0; } switch(dt->type) { case DT_BASIC: return dt->un.basic.basic_size; case DT_POINTER: return sizeof(int *); case DT_STRUCT: return dt->un.structure.size; case DT_ENUM: return sizeof(int); case DT_ARRAY: return (dt->un.array.end - dt->un.array.start) * DEBUG_GetObjectSize(dt->un.array.basictype); case DT_BITFIELD: /* * Bitfields have to be handled seperately later on * when we insert the element into the structure. */ return 0; case DT_TYPEDEF: case DT_FUNC: case DT_CONST: assert(FALSE); } return 0; } unsigned int DEBUG_ArrayIndex(const DBG_VALUE * value, DBG_VALUE * result, int index) { int size; assert(value->cookie == DV_TARGET || value->cookie == DV_HOST); /* * Make sure that this really makes sense. */ if( value->type->type == DT_POINTER ) { /* * Get the base type, so we know how much to index by. */ size = DEBUG_GetObjectSize(value->type->un.pointer.pointsto); result->type = value->type->un.pointer.pointsto; result->addr.off = (*(unsigned int*) (value->addr.off)) + size * index; } else if (value->type->type == DT_ARRAY) { size = DEBUG_GetObjectSize(value->type->un.array.basictype); result->type = value->type->un.array.basictype; result->addr.off = value->addr.off + size * (index - value->type->un.array.start); } return TRUE; } /*********************************************************************** * DEBUG_Print * * Implementation of the 'print' command. */ void DEBUG_Print( const DBG_VALUE *value, int count, char format, int level ) { DBG_VALUE val1; int i; struct member * m; char * pnt; int size; int xval; assert(value->cookie == DV_TARGET || value->cookie == DV_HOST); if (count != 1) { DEBUG_Printf( DBG_CHN_MESG, "Count other than 1 is meaningless in 'print' command\n" ); return; } if( value->type == NULL ) { /* No type, just print the addr value */ if (value->addr.seg && (value->addr.seg != 0xffffffff)) DEBUG_nchar += DEBUG_Printf( DBG_CHN_MESG, "0x%04lx: ", value->addr.seg ); DEBUG_nchar += DEBUG_Printf( DBG_CHN_MESG, "0x%08lx", value->addr.off ); goto leave; } if( level == 0 ) { DEBUG_nchar = 0; } if( DEBUG_nchar > DEBUG_maxchar ) { DEBUG_Printf(DBG_CHN_MESG, "..."); goto leave; } if( format == 'i' || format == 's' || format == 'w' || format == 'b' ) { DEBUG_Printf( DBG_CHN_MESG, "Format specifier '%c' is meaningless in 'print' command\n", format ); format = '\0'; } switch(value->type->type) { case DT_BASIC: case DT_ENUM: case DT_CONST: case DT_POINTER: DEBUG_PrintBasic(value, 1, format); break; case DT_STRUCT: DEBUG_nchar += DEBUG_Printf(DBG_CHN_MESG, "{"); for(m = value->type->un.structure.members; m; m = m->next) { val1 = *value; DEBUG_FindStructElement(&val1, m->name, &xval); DEBUG_nchar += DEBUG_Printf(DBG_CHN_MESG, "%s=", m->name); DEBUG_Print(&val1, 1, format, level + 1); if( m->next != NULL ) { DEBUG_nchar += DEBUG_Printf(DBG_CHN_MESG, ", "); } if( DEBUG_nchar > DEBUG_maxchar ) { DEBUG_Printf(DBG_CHN_MESG, "...}"); goto leave; } } DEBUG_nchar += DEBUG_Printf(DBG_CHN_MESG, "}"); break; case DT_ARRAY: /* * Loop over all of the entries, printing stuff as we go. */ size = DEBUG_GetObjectSize(value->type->un.array.basictype); if( size == 1 ) { /* * Special handling for character arrays. */ pnt = (char *) value->addr.off; DEBUG_nchar += DEBUG_Printf(DBG_CHN_MESG, "\""); for( i=value->type->un.array.start; i < value->type->un.array.end; i++ ) { DEBUG_Output(DBG_CHN_MESG, pnt++, 1); DEBUG_nchar++; if( DEBUG_nchar > DEBUG_maxchar ) { DEBUG_Printf(DBG_CHN_MESG, "...\""); goto leave; } } DEBUG_nchar += DEBUG_Printf(DBG_CHN_MESG, "\""); break; } val1 = *value; val1.type = value->type->un.array.basictype; DEBUG_nchar += DEBUG_Printf(DBG_CHN_MESG, "{"); for( i=value->type->un.array.start; i <= value->type->un.array.end; i++ ) { DEBUG_Print(&val1, 1, format, level + 1); val1.addr.off += size; if( i == value->type->un.array.end ) { DEBUG_nchar += DEBUG_Printf(DBG_CHN_MESG, "}"); } else { DEBUG_nchar += DEBUG_Printf(DBG_CHN_MESG, ", "); } if( DEBUG_nchar > DEBUG_maxchar ) { DEBUG_Printf(DBG_CHN_MESG, "...}"); goto leave; } } break; default: assert(FALSE); break; } leave: if( level == 0 ) { DEBUG_nchar += DEBUG_Printf(DBG_CHN_MESG, "\n"); } return; } int DEBUG_DumpTypes(void) { struct datatype * dt = NULL; struct member * m; int hash; int nm; char * name; char * member_name; for(hash = 0; hash < NR_TYPE_HASH + 1; hash++) { for( dt = type_hash_table[hash]; dt; dt = dt->next ) { name = "none"; if( dt->name != NULL ) { name = dt->name; } switch(dt->type) { case DT_BASIC: DEBUG_Printf(DBG_CHN_MESG, "0x%08lx - BASIC(%s)\n", (unsigned long)dt, name); break; case DT_POINTER: DEBUG_Printf(DBG_CHN_MESG, "0x%08lx - POINTER(%s)(%08lx)\n", (unsigned long)dt, name, (unsigned long)dt->un.pointer.pointsto); break; case DT_STRUCT: member_name = "none"; nm = 0; if( dt->un.structure.members != NULL && dt->un.structure.members->name != NULL ) { member_name = dt->un.structure.members->name; for( m = dt->un.structure.members; m; m = m->next) { nm++; } } DEBUG_Printf(DBG_CHN_MESG, "0x%08lx - STRUCT(%s) %d %d %s\n", (unsigned long)dt, name, dt->un.structure.size, nm, member_name); break; case DT_ARRAY: DEBUG_Printf(DBG_CHN_MESG, "0x%08lx - ARRAY(%s)(%08lx)\n", (unsigned long)dt, name, (unsigned long)dt->un.array.basictype); break; case DT_ENUM: DEBUG_Printf(DBG_CHN_MESG, "0x%08lx - ENUM(%s)\n", (unsigned long)dt, name); break; case DT_BITFIELD: DEBUG_Printf(DBG_CHN_MESG, "0x%08lx - BITFIELD(%s)\n", (unsigned long)dt, name); break; case DT_FUNC: DEBUG_Printf(DBG_CHN_MESG, "0x%08lx - FUNC(%s)(%08lx)\n", (unsigned long)dt, name, (unsigned long)dt->un.funct.rettype); break; case DT_CONST: case DT_TYPEDEF: DEBUG_Printf(DBG_CHN_MESG, "What???\n"); break; } } } return TRUE; } enum debug_type DEBUG_GetType(struct datatype * dt) { return dt->type; } struct datatype * DEBUG_TypeCast(enum debug_type type, const char * name) { int hash; struct datatype * rtn; /* * The last bucket is special, and is used to hold typeless names. */ if( name == NULL ) { hash = NR_TYPE_HASH; } else { hash = type_hash(name); } rtn = DEBUG_LookupDataType(type, hash, name); return rtn; } int DEBUG_PrintTypeCast(const struct datatype * dt) { const char* name = "none"; if( dt->name != NULL ) { name = dt->name; } switch(dt->type) { case DT_BASIC: DEBUG_Printf(DBG_CHN_MESG, "%s", name); break; case DT_POINTER: DEBUG_PrintTypeCast(dt->un.pointer.pointsto); DEBUG_Printf(DBG_CHN_MESG, "*"); break; case DT_STRUCT: DEBUG_Printf(DBG_CHN_MESG, "struct %s", name); break; case DT_ARRAY: DEBUG_Printf(DBG_CHN_MESG, "%s[]", name); break; case DT_ENUM: DEBUG_Printf(DBG_CHN_MESG, "enum %s", name); break; case DT_BITFIELD: DEBUG_Printf(DBG_CHN_MESG, "unsigned %s", name); break; case DT_FUNC: DEBUG_PrintTypeCast(dt->un.funct.rettype); DEBUG_Printf(DBG_CHN_MESG, "(*%s)()", name); break; case DT_CONST: case DT_TYPEDEF: DEBUG_Printf(DBG_CHN_MESG, "What???\n"); break; } return TRUE; } int DEBUG_PrintType( const DBG_VALUE *value ) { assert(value->cookie == DV_TARGET || value->cookie == DV_HOST); if (!value->type) { DEBUG_Printf(DBG_CHN_MESG, "Unknown type\n"); return FALSE; } if (!DEBUG_PrintTypeCast(value->type)) return FALSE; DEBUG_Printf(DBG_CHN_MESG, "\n"); return TRUE; } wine-20000526/debugger/winedbg.c0100644000175000001440000004466207106624617016036 0ustar julliardusers/* -*- tab-width: 8; c-basic-offset: 4 -*- */ /* Wine internal debugger * Interface to Windows debugger API * Eric Pouech (c) 2000 */ #include #include #include #include "debugger.h" #include "thread.h" #include "process.h" #include "wincon.h" #include "wingdi.h" #include "winuser.h" #include "winreg.h" #ifdef DBG_need_heap HANDLE dbg_heap = 0; #endif DBG_PROCESS* DEBUG_CurrProcess = NULL; DBG_THREAD* DEBUG_CurrThread = NULL; DWORD DEBUG_CurrTid; DWORD DEBUG_CurrPid; CONTEXT DEBUG_context; static DBG_PROCESS* proc = NULL; DBG_INTVAR DEBUG_IntVars[DBG_IV_LAST]; void DEBUG_Output(int chn, const char* buffer, int len) { if (DBG_IVAR(ConChannelMask) & chn) WriteFile(GetStdHandle(STD_OUTPUT_HANDLE), buffer, len, NULL, NULL); if (DBG_IVAR(StdChannelMask) & chn) fwrite(buffer, len, 1, stderr); } int DEBUG_Printf(int chn, const char* format, ...) { char buf[1024]; va_list valist; int len; va_start(valist, format); len = wvsnprintf(buf, sizeof(buf), format, valist); va_end(valist); if (len <= -1) { len = sizeof(buf) - 1; buf[len] = 0; buf[len - 1] = buf[len - 2] = buf[len - 3] = '.'; } DEBUG_Output(chn, buf, len); return len; } static BOOL DEBUG_IntVarsRW(int read) { HKEY hkey; DWORD type = REG_DWORD; DWORD val; DWORD count = sizeof(val); int i; DBG_INTVAR* div = DEBUG_IntVars; if (read) { /* initializes internal vars table */ #define INTERNAL_VAR(_var,_val,_ref,_typ) \ div->val = _val; div->name = #_var; div->pval = _ref; \ div->type = _typ; div++; #include "intvar.h" #undef INTERNAL_VAR } if (RegCreateKeyA(HKEY_CURRENT_USER, "Software\\Wine\\WineDbg", &hkey)) { /* since the IVars are not yet setup, DEBUG_Printf doesn't work, * so don't use it */ fprintf(stderr, "Cannot create WineDbg key in registry\n"); return FALSE; } for (i = 0; i < DBG_IV_LAST; i++) { if (read) { if (!DEBUG_IntVars[i].pval) { if (!RegQueryValueEx(hkey, DEBUG_IntVars[i].name, 0, &type, (LPSTR)&val, &count)) DEBUG_IntVars[i].val = val; DEBUG_IntVars[i].pval = &DEBUG_IntVars[i].val; } else { *DEBUG_IntVars[i].pval = 0; } } else { /* FIXME: type should be infered from basic type -if any- of intvar */ if (DEBUG_IntVars[i].pval == &DEBUG_IntVars[i].val) RegSetValueEx(hkey, DEBUG_IntVars[i].name, 0, type, (LPCVOID)DEBUG_IntVars[i].pval, count); } } RegCloseKey(hkey); return TRUE; } DBG_INTVAR* DEBUG_GetIntVar(const char* name) { int i; for (i = 0; i < DBG_IV_LAST; i++) { if (!strcmp(DEBUG_IntVars[i].name, name)) return &DEBUG_IntVars[i]; } return NULL; } static WINE_EXCEPTION_FILTER(wine_dbg) { DEBUG_Printf(DBG_CHN_MESG, "\nwine_dbg: Exception (%lx) inside debugger, continuing...\n", GetExceptionCode()); DEBUG_ExternalDebugger(); return EXCEPTION_EXECUTE_HANDLER; } static DBG_PROCESS* DEBUG_GetProcess(DWORD pid) { DBG_PROCESS* p; for (p = proc; p; p = p->next) if (p->pid == pid) break; return p; } static DBG_PROCESS* DEBUG_AddProcess(DWORD pid, HANDLE h) { DBG_PROCESS* p = DBG_alloc(sizeof(DBG_PROCESS)); if (!p) return NULL; p->handle = h; p->pid = pid; p->threads = NULL; p->num_threads = 0; p->continue_on_first_exception = FALSE; p->modules = NULL; p->next_index = 0; p->dbg_hdr_addr = 0; p->next = proc; p->prev = NULL; if (proc) proc->prev = p; proc = p; return p; } static void DEBUG_DelThread(DBG_THREAD* p); static void DEBUG_DelProcess(DBG_PROCESS* p) { if (p->threads != NULL) { DEBUG_Printf(DBG_CHN_ERR, "Shouldn't happen\n"); while (p->threads) DEBUG_DelThread(p->threads); } if (p->prev) p->prev->next = p->next; if (p->next) p->next->prev = p->prev; if (p == proc) proc = p->next; DBG_free(p); } static void DEBUG_InitCurrProcess(void) { } static BOOL DEBUG_ProcessGetString(char* buffer, int size, HANDLE hp, LPSTR addr) { DWORD sz; *(WCHAR*)buffer = 0; return (addr && ReadProcessMemory(hp, addr, buffer, size, &sz)); } static BOOL DEBUG_ProcessGetStringIndirect(char* buffer, int size, HANDLE hp, LPVOID addr) { LPVOID ad; DWORD sz; if ( addr && ReadProcessMemory(hp, addr, &ad, sizeof(ad), &sz) && sz == sizeof(ad) && ad && ReadProcessMemory(hp, ad, buffer, size, &sz)) return TRUE; *(WCHAR*)buffer = 0; return FALSE; } static DBG_THREAD* DEBUG_GetThread(DBG_PROCESS* p, DWORD tid) { DBG_THREAD* t; for (t = p->threads; t; t = t->next) if (t->tid == tid) break; return t; } static DBG_THREAD* DEBUG_AddThread(DBG_PROCESS* p, DWORD tid, HANDLE h, LPVOID start, LPVOID teb) { DBG_THREAD* t = DBG_alloc(sizeof(DBG_THREAD)); if (!t) return NULL; t->handle = h; t->tid = tid; t->start = start; t->teb = teb; t->process = p; t->wait_for_first_exception = 0; t->dbg_exec_mode = EXEC_CONT; t->dbg_exec_count = 0; p->num_threads++; t->next = p->threads; t->prev = NULL; if (p->threads) p->threads->prev = t; p->threads = t; return t; } static void DEBUG_InitCurrThread(void) { if (DEBUG_CurrThread->start) { if (DEBUG_CurrThread->process->num_threads == 1 || DBG_IVAR(BreakAllThreadsStartup)) { DBG_VALUE value; DEBUG_SetBreakpoints(FALSE); value.type = NULL; value.cookie = DV_TARGET; value.addr.seg = 0; value.addr.off = (DWORD)DEBUG_CurrThread->start; DEBUG_AddBreakpoint(&value, NULL); DEBUG_SetBreakpoints(TRUE); } } else { DEBUG_CurrThread->wait_for_first_exception = 1; } } static void DEBUG_DelThread(DBG_THREAD* t) { if (t->prev) t->prev->next = t->next; if (t->next) t->next->prev = t->prev; if (t == t->process->threads) t->process->threads = t->next; t->process->num_threads--; DBG_free(t); } static BOOL DEBUG_HandleException( EXCEPTION_RECORD *rec, BOOL first_chance, BOOL force ) { BOOL is_debug = FALSE; BOOL ret; /* FIXME: need for a configuration var ? */ /* pass to app first ??? */ /* if (first_chance && !force) return 0; */ switch (rec->ExceptionCode) { case EXCEPTION_BREAKPOINT: case EXCEPTION_SINGLE_STEP: is_debug = TRUE; break; } if (!is_debug) { /* print some infos */ DEBUG_Printf( DBG_CHN_MESG, "%s: ", first_chance ? "First chance exception" : "Unhandled exception" ); switch (rec->ExceptionCode) { case EXCEPTION_INT_DIVIDE_BY_ZERO: DEBUG_Printf( DBG_CHN_MESG, "divide by zero" ); break; case EXCEPTION_INT_OVERFLOW: DEBUG_Printf( DBG_CHN_MESG, "overflow" ); break; case EXCEPTION_ARRAY_BOUNDS_EXCEEDED: DEBUG_Printf( DBG_CHN_MESG, "array bounds " ); break; case EXCEPTION_ILLEGAL_INSTRUCTION: DEBUG_Printf( DBG_CHN_MESG, "illegal instruction" ); break; case EXCEPTION_STACK_OVERFLOW: DEBUG_Printf( DBG_CHN_MESG, "stack overflow" ); break; case EXCEPTION_PRIV_INSTRUCTION: DEBUG_Printf( DBG_CHN_MESG, "priviledged instruction" ); break; case EXCEPTION_ACCESS_VIOLATION: if (rec->NumberParameters == 2) DEBUG_Printf( DBG_CHN_MESG, "page fault on %s access to 0x%08lx", rec->ExceptionInformation[0] ? "write" : "read", rec->ExceptionInformation[1] ); else DEBUG_Printf( DBG_CHN_MESG, "page fault" ); break; case EXCEPTION_DATATYPE_MISALIGNMENT: DEBUG_Printf( DBG_CHN_MESG, "Alignment" ); break; case CONTROL_C_EXIT: DEBUG_Printf( DBG_CHN_MESG, "^C" ); break; case EXCEPTION_CRITICAL_SECTION_WAIT: DEBUG_Printf( DBG_CHN_MESG, "critical section %08lx wait failed", rec->ExceptionInformation[0] ); if (!DBG_IVAR(BreakOnCritSectTimeOut)) return DBG_CONTINUE; break; default: DEBUG_Printf( DBG_CHN_MESG, "%08lx", rec->ExceptionCode ); break; } DEBUG_Printf(DBG_CHN_MESG, "\n"); } DEBUG_Printf(DBG_CHN_TRACE, "Entering debugger PC=%lx EFL=%08lx mode=%d count=%d\n", DEBUG_context.Eip, DEBUG_context.EFlags, DEBUG_CurrThread->dbg_exec_mode, DEBUG_CurrThread->dbg_exec_count); ret = DEBUG_Main( is_debug, force, rec->ExceptionCode ); DEBUG_Printf(DBG_CHN_TRACE, "Exiting debugger PC=%lx EFL=%08lx mode=%d count=%d\n", DEBUG_context.Eip, DEBUG_context.EFlags, DEBUG_CurrThread->dbg_exec_mode, DEBUG_CurrThread->dbg_exec_count); return ret; } static BOOL DEBUG_HandleDebugEvent(DEBUG_EVENT* de, LPDWORD cont) { char buffer[256]; BOOL ret; DEBUG_CurrPid = de->dwProcessId; DEBUG_CurrTid = de->dwThreadId; __TRY { ret = TRUE; *cont = 0L; if ((DEBUG_CurrProcess = DEBUG_GetProcess(de->dwProcessId)) != NULL) DEBUG_CurrThread = DEBUG_GetThread(DEBUG_CurrProcess, de->dwThreadId); else DEBUG_CurrThread = NULL; switch (de->dwDebugEventCode) { case EXCEPTION_DEBUG_EVENT: if (!DEBUG_CurrThread) { DEBUG_Printf(DBG_CHN_ERR, "%08lx:%08lx: not a registered process or thread (perhaps a 16 bit one ?)\n", de->dwProcessId, de->dwThreadId); break; } DEBUG_Printf(DBG_CHN_TRACE, "%08lx:%08lx: exception code=%08lx\n", de->dwProcessId, de->dwThreadId, de->u.Exception.ExceptionRecord.ExceptionCode); if (DEBUG_CurrProcess->continue_on_first_exception) { DEBUG_CurrProcess->continue_on_first_exception = FALSE; if (!DBG_IVAR(BreakOnAttach)) { *cont = DBG_CONTINUE; break; } } DEBUG_context.ContextFlags = CONTEXT_CONTROL|CONTEXT_INTEGER|CONTEXT_SEGMENTS|CONTEXT_DEBUG_REGISTERS; if (!GetThreadContext(DEBUG_CurrThread->handle, &DEBUG_context)) { DEBUG_Printf(DBG_CHN_WARN, "Can't get thread's context\n"); break; } *cont = DEBUG_HandleException(&de->u.Exception.ExceptionRecord, de->u.Exception.dwFirstChance, DEBUG_CurrThread->wait_for_first_exception); if (DEBUG_CurrThread->dbg_exec_mode == EXEC_KILL) { ret = FALSE; } else { DEBUG_CurrThread->wait_for_first_exception = 0; SetThreadContext(DEBUG_CurrThread->handle, &DEBUG_context); } break; case CREATE_THREAD_DEBUG_EVENT: DEBUG_Printf(DBG_CHN_TRACE, "%08lx:%08lx: create thread D @%08lx\n", de->dwProcessId, de->dwThreadId, (unsigned long)(LPVOID)de->u.CreateThread.lpStartAddress); if (DEBUG_CurrProcess == NULL) { DEBUG_Printf(DBG_CHN_ERR, "Unknown process\n"); break; } if (DEBUG_GetThread(DEBUG_CurrProcess, de->dwThreadId) != NULL) { DEBUG_Printf(DBG_CHN_TRACE, "Thread already listed, skipping\n"); break; } DEBUG_CurrThread = DEBUG_AddThread(DEBUG_CurrProcess, de->dwThreadId, de->u.CreateThread.hThread, de->u.CreateThread.lpStartAddress, de->u.CreateThread.lpThreadLocalBase); if (!DEBUG_CurrThread) { DEBUG_Printf(DBG_CHN_ERR, "Couldn't create thread\n"); break; } DEBUG_InitCurrThread(); break; case CREATE_PROCESS_DEBUG_EVENT: DEBUG_ProcessGetStringIndirect(buffer, sizeof(buffer), de->u.CreateProcessInfo.hProcess, de->u.CreateProcessInfo.lpImageName); /* FIXME unicode ? de->u.CreateProcessInfo.fUnicode */ DEBUG_Printf(DBG_CHN_TRACE, "%08lx:%08lx: create process %s @%08lx (%ld<%ld>)\n", de->dwProcessId, de->dwThreadId, buffer, (unsigned long)(LPVOID)de->u.CreateProcessInfo.lpStartAddress, de->u.CreateProcessInfo.dwDebugInfoFileOffset, de->u.CreateProcessInfo.nDebugInfoSize); if ((DEBUG_CurrProcess = DEBUG_GetProcess(de->dwProcessId)) != NULL) { if (DEBUG_CurrProcess->handle) { DEBUG_Printf(DBG_CHN_ERR, "Skipping already defined process\n"); break; } DEBUG_CurrProcess->handle = de->u.CreateProcessInfo.hProcess; } else { DEBUG_CurrProcess = DEBUG_AddProcess(de->dwProcessId, de->u.CreateProcessInfo.hProcess); if (DEBUG_CurrProcess == NULL) { DEBUG_Printf(DBG_CHN_ERR, "Unknown process\n"); break; } } DEBUG_Printf(DBG_CHN_TRACE, "%08lx:%08lx: create thread I @%08lx\n", de->dwProcessId, de->dwThreadId, (unsigned long)(LPVOID)de->u.CreateProcessInfo.lpStartAddress); DEBUG_CurrThread = DEBUG_AddThread(DEBUG_CurrProcess, de->dwThreadId, de->u.CreateProcessInfo.hThread, de->u.CreateProcessInfo.lpStartAddress, de->u.CreateProcessInfo.lpThreadLocalBase); if (!DEBUG_CurrThread) { DEBUG_Printf(DBG_CHN_ERR, "Couldn't create thread\n"); break; } DEBUG_InitCurrProcess(); DEBUG_InitCurrThread(); /* so far, process name is not set */ DEBUG_LoadModule32("", de->u.CreateProcessInfo.hFile, (DWORD)de->u.CreateProcessInfo.lpBaseOfImage); break; case EXIT_THREAD_DEBUG_EVENT: DEBUG_Printf(DBG_CHN_TRACE, "%08lx:%08lx: exit thread (%ld)\n", de->dwProcessId, de->dwThreadId, de->u.ExitThread.dwExitCode); if (DEBUG_CurrThread == NULL) { DEBUG_Printf(DBG_CHN_ERR, "Unknown thread\n"); break; } /* FIXME: remove break point set on thread startup */ DEBUG_DelThread(DEBUG_CurrThread); break; case EXIT_PROCESS_DEBUG_EVENT: DEBUG_Printf(DBG_CHN_TRACE, "%08lx:%08lx: exit process (%ld)\n", de->dwProcessId, de->dwThreadId, de->u.ExitProcess.dwExitCode); if (DEBUG_CurrProcess == NULL) { DEBUG_Printf(DBG_CHN_ERR, "Unknown process\n"); break; } /* just in case */ DEBUG_SetBreakpoints(FALSE); /* kill last thread */ DEBUG_DelThread(DEBUG_CurrProcess->threads); DEBUG_DelProcess(DEBUG_CurrProcess); ret = FALSE; break; case LOAD_DLL_DEBUG_EVENT: if (DEBUG_CurrThread == NULL) { DEBUG_Printf(DBG_CHN_ERR, "Unknown thread\n"); break; } DEBUG_ProcessGetStringIndirect(buffer, sizeof(buffer), DEBUG_CurrThread->process->handle, de->u.LoadDll.lpImageName); /* FIXME unicode: de->u.LoadDll.fUnicode */ DEBUG_Printf(DBG_CHN_TRACE, "%08lx:%08lx: loads DLL %s @%08lx (%ld<%ld>)\n", de->dwProcessId, de->dwThreadId, buffer, (unsigned long)de->u.LoadDll.lpBaseOfDll, de->u.LoadDll.dwDebugInfoFileOffset, de->u.LoadDll.nDebugInfoSize); CharUpper(buffer); DEBUG_LoadModule32(buffer, de->u.LoadDll.hFile, (DWORD)de->u.LoadDll.lpBaseOfDll); break; case UNLOAD_DLL_DEBUG_EVENT: DEBUG_Printf(DBG_CHN_TRACE, "%08lx:%08lx: unload DLL @%08lx\n", de->dwProcessId, de->dwThreadId, (unsigned long)de->u.UnloadDll.lpBaseOfDll); break; case OUTPUT_DEBUG_STRING_EVENT: if (DEBUG_CurrThread == NULL) { DEBUG_Printf(DBG_CHN_ERR, "Unknown thread\n"); break; } DEBUG_ProcessGetString(buffer, sizeof(buffer), DEBUG_CurrThread->process->handle, de->u.DebugString.lpDebugStringData); /* fixme unicode de->u.DebugString.fUnicode ? */ DEBUG_Printf(DBG_CHN_TRACE, "%08lx:%08lx: output debug string (%s)\n", de->dwProcessId, de->dwThreadId, buffer); break; case RIP_EVENT: DEBUG_Printf(DBG_CHN_TRACE, "%08lx:%08lx: rip error=%ld type=%ld\n", de->dwProcessId, de->dwThreadId, de->u.RipInfo.dwError, de->u.RipInfo.dwType); break; default: DEBUG_Printf(DBG_CHN_TRACE, "%08lx:%08lx: unknown event (%ld)\n", de->dwProcessId, de->dwThreadId, de->dwDebugEventCode); } } __EXCEPT(wine_dbg) { *cont = 0; ret = TRUE; } __ENDTRY; return ret; } static DWORD DEBUG_MainLoop(DWORD pid) { DEBUG_EVENT de; DWORD cont; BOOL ret = TRUE; DEBUG_Printf(DBG_CHN_MESG, " on pid %ld\n", pid); while (ret && WaitForDebugEvent(&de, INFINITE)) { ret = DEBUG_HandleDebugEvent(&de, &cont); ContinueDebugEvent(de.dwProcessId, de.dwThreadId, cont); } DEBUG_Printf(DBG_CHN_MESG, "WineDbg terminated on pid %ld\n", pid); return 0; } int DEBUG_main(int argc, char** argv) { DWORD pid = 0, retv = 0; #ifdef DBG_need_heap /* Initialize the debugger heap. */ dbg_heap = HeapCreate(HEAP_NO_SERIALIZE, 0x1000, 0x8000000); /* 128MB */ #endif /* Initialize the type handling stuff. */ DEBUG_InitTypes(); DEBUG_InitCVDataTypes(); /* Initialize internal vars (types must be initialized before) */ if (!DEBUG_IntVarsRW(TRUE)) return -1; /* keep it as a guiexe for now, so that Wine won't touch the Unix stdin, * stdout and stderr streams */ if (DBG_IVAR(UseXTerm)) { COORD pos; /* This is a hack: it forces creation of an xterm, not done by default */ pos.X = 0; pos.Y = 1; SetConsoleCursorPosition(GetStdHandle(STD_OUTPUT_HANDLE), pos); } DEBUG_Printf(DBG_CHN_MESG, "Starting WineDbg... "); if (argc == 3) { HANDLE hEvent; if ((pid = atoi(argv[1])) != 0 && (hEvent = atoi(argv[2])) != 0) { if (!(DEBUG_CurrProcess = DEBUG_AddProcess(pid, 0))) goto leave; DEBUG_CurrProcess->continue_on_first_exception = TRUE; if (!DebugActiveProcess(pid)) { DEBUG_Printf(DBG_CHN_ERR, "Can't attach process %ld: %ld\n", pid, GetLastError()); SetEvent(hEvent); goto leave; } SetEvent(hEvent); } else { pid = 0; } } if (argc == 1) { LPSTR org, ptr; DEBUG_Printf(DBG_CHN_MESG, "\n"); DEBUG_WalkProcess(); pid = strtol(org = readline("Enter pid to debug: "), &ptr, 0); if (pid && ptr && ptr != org && *ptr == '\0') { if (!(DEBUG_CurrProcess = DEBUG_AddProcess(pid, 0))) goto leave; if (!DebugActiveProcess(pid)) { DEBUG_Printf(DBG_CHN_ERR, "Can't attach process %ld: %ld\n", pid, GetLastError()); goto leave; } } else { pid = 0; } } if (pid == 0) { PROCESS_INFORMATION info; STARTUPINFOA startup; memset(&startup, 0, sizeof(startup)); startup.cb = sizeof(startup); startup.dwFlags = STARTF_USESHOWWINDOW; startup.wShowWindow = SW_SHOWNORMAL; if (!CreateProcess(NULL, argv[1], NULL, NULL, FALSE, DEBUG_PROCESS, NULL, NULL, &startup, &info)) { DEBUG_Printf(DBG_CHN_MESG, "Couldn't start process '%s'\n", argv[1]); goto leave; } pid = info.dwProcessId; } if (pid) retv = DEBUG_MainLoop(pid); leave: /* saves modified variables */ DEBUG_IntVarsRW(FALSE); return retv; } wine-20000526/debugger/winedbg.spec0100644000175000001440000000006507103022473016520 0ustar julliardusersname winedbg mode cuiexe type win32 init DEBUG_main wine-20000526/dlls/0040755000175000001440000000000007113604220013376 5ustar julliarduserswine-20000526/dlls/advapi32/0040755000175000001440000000000007113604155015016 5ustar julliarduserswine-20000526/dlls/advapi32/.cvsignore0100644000175000001440000000004007042674746017023 0ustar julliardusersMakefile *.spec.c *.spec.glue.s wine-20000526/dlls/advapi32/Makefile.in0100644000175000001440000000047507060307277017074 0ustar julliardusersDEFS = @DLLFLAGS@ -D__WINE__ TOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = advapi32 SPEC_SRCS = advapi32.spec C_SRCS = \ advapi.c \ crypt.c \ eventlog.c \ registry.c \ security.c \ service.c all: check_wrc $(MODULE).o @MAKE_RULES@ ### Dependencies: wine-20000526/dlls/advapi32/advapi.c0100644000175000001440000000224707070212243016423 0ustar julliardusers/* * Win32 advapi functions * * Copyright 1995 Sven Verdoolaege */ #include #include #include #include "winbase.h" #include "windef.h" #include "winerror.h" #include "wine/winestring.h" #include "debugtools.h" /****************************************************************************** * GetUserNameA [ADVAPI32.67] */ BOOL WINAPI GetUserNameA( LPSTR lpszName, LPDWORD lpSize ) { size_t len; char *name; name=getlogin(); #if 0 /* FIXME: should use getpwuid() here */ if (!name) name=cuserid(NULL); #endif len = name ? strlen(name) : 0; if (!len || !lpSize || len > *lpSize) { if (lpszName) *lpszName = 0; return 0; } *lpSize=len; strcpy(lpszName, name); return 1; } /****************************************************************************** * GetUserNameW [ADVAPI32.68] * * PARAMS * lpszName [] * lpSize [] */ BOOL WINAPI GetUserNameW( LPWSTR lpszName, LPDWORD lpSize ) { LPSTR name = (LPSTR)HeapAlloc( GetProcessHeap(), 0, *lpSize ); DWORD size = *lpSize; BOOL res = GetUserNameA(name,lpSize); lstrcpynAtoW(lpszName,name,size); HeapFree( GetProcessHeap(), 0, name ); return res; } wine-20000526/dlls/advapi32/advapi32.spec0100644000175000001440000003216507073170674017320 0ustar julliardusersname advapi32 type win32 @ stub AbortSystemShutdownA @ stub AbortSystemShutdownW @ stdcall AccessCheck(ptr long long ptr ptr ptr ptr ptr) AccessCheck @ stub AccessCheckAndAuditAlarmA @ stub AccessCheckAndAuditAlarmW @ stdcall AddAccessAllowedAce (ptr long long ptr) AddAccessAllowedAce @ stub AddAccessDeniedAce @ stub AddAce @ stub AddAuditAccessAce @ stub AdjustTokenGroups @ stdcall AdjustTokenPrivileges(long long ptr long ptr ptr) AdjustTokenPrivileges @ stdcall AllocateAndInitializeSid(ptr long long long long long long long long long ptr) AllocateAndInitializeSid @ stdcall AllocateLocallyUniqueId(ptr) AllocateLocallyUniqueId @ stub AreAllAccessesGranted @ stub AreAnyAccessesGranted @ stdcall BackupEventLogA (long str) BackupEventLogA @ stdcall BackupEventLogW (long wstr) BackupEventLogW @ stub ChangeServiceConfigA @ stub ChangeServiceConfigW @ stdcall ClearEventLogA (long str) ClearEventLogA @ stdcall ClearEventLogW (long wstr) ClearEventLogW @ stdcall CloseEventLog (long) CloseEventLog @ stdcall CloseServiceHandle(long) CloseServiceHandle @ stdcall ControlService(long long ptr) ControlService @ stdcall CopySid(long ptr ptr) CopySid @ stub CreatePrivateObjectSecurity @ stub CreateProcessAsUserA @ stub CreateProcessAsUserW @ stdcall CreateServiceA(long ptr ptr long long long long ptr ptr ptr ptr ptr ptr) CreateServiceA @ stdcall CreateServiceW (long ptr ptr long long long long ptr ptr ptr ptr ptr ptr) CreateServiceW @ stdcall CryptAcquireContextA(ptr str str long long) CryptAcquireContextA @ stub CryptAcquireContextW @ stub CryptContextAddRef @ stub CryptCreateHash @ stub CryptDecrypt @ stub CryptDeriveKey @ stub CryptDestroyHash @ stub CryptDestroyKey @ stub CryptDuplicateKey @ stub CryptDuplicateHash @ stub CryptEncrypt @ stub CryptEnumProvidersA @ stub CryptEnumProvidersW @ stub CryptEnumProviderTypesA @ stub CryptEnumProviderTypesW @ stub CryptExportKey @ stub CryptGenKey @ stub CryptGetKeyParam @ stub CryptGetHashParam @ stub CryptGetProvParam @ stub CryptGenRandom @ stub CryptGetDefaultProviderA @ stub CryptGetDefaultProviderW @ stub CryptGetUserKey @ stub CryptHashData @ stub CryptHashSessionKey @ stub CryptImportKey @ stub CryptReleaseContext @ stub CryptSetHashParam @ stdcall CryptSetKeyParam(long long ptr long) CryptSetKeyParam @ stub CryptSetProvParam @ stub CryptSignHashA @ stub CryptSignHashW @ stub CryptSetProviderA @ stub CryptSetProviderW @ stub CryptSetProviderExA @ stub CryptSetProviderExW @ stub CryptVerifySignatureA @ stub CryptVerifySignatureW @ stub DeleteAce @ stdcall DeleteService(long) DeleteService @ stdcall DeregisterEventSource(long) DeregisterEventSource @ stub DestroyPrivateObjectSecurity @ stub DuplicateToken @ stub EnumDependentServicesA @ stub EnumDependentServicesW @ stdcall EnumServicesStatusA (long long long ptr long ptr ptr ptr) EnumServicesStatusA @ stdcall EnumServicesStatusW (long long long ptr long ptr ptr ptr) EnumServicesStatusW @ stdcall EqualPrefixSid(ptr ptr) EqualPrefixSid @ stdcall EqualSid(ptr ptr) EqualSid @ stub FindFirstFreeAce @ stdcall FreeSid(ptr) FreeSid @ stub GetAce @ stub GetAclInformation @ stdcall GetFileSecurityA(str long ptr long ptr) GetFileSecurityA @ stdcall GetFileSecurityW(wstr long ptr long ptr) GetFileSecurityW @ stub GetKernelObjectSecurity @ stdcall GetLengthSid(ptr) GetLengthSid @ stdcall GetNumberOfEventLogRecords (long ptr) GetNumberOfEventLogRecords @ stdcall GetOldestEventLogRecord (long ptr) GetOldestEventLogRecord @ stub GetPrivateObjectSecurity @ stdcall GetSecurityDescriptorControl (ptr ptr ptr) GetSecurityDescriptorControl @ stdcall GetSecurityDescriptorDacl (ptr ptr ptr ptr) GetSecurityDescriptorDacl @ stdcall GetSecurityDescriptorGroup(ptr ptr ptr) GetSecurityDescriptorGroup @ stdcall GetSecurityDescriptorLength(ptr) GetSecurityDescriptorLength @ stdcall GetSecurityDescriptorOwner(ptr ptr ptr) GetSecurityDescriptorOwner @ stdcall GetSecurityDescriptorSacl (ptr ptr ptr ptr) GetSecurityDescriptorSacl @ stub GetServiceDisplayNameA @ stub GetServiceDisplayNameW @ stub GetServiceKeyNameA @ stub GetServiceKeyNameW @ stdcall GetSidIdentifierAuthority(ptr) GetSidIdentifierAuthority @ stdcall GetSidLengthRequired(long) GetSidLengthRequired @ stdcall GetSidSubAuthority(ptr long) GetSidSubAuthority @ stdcall GetSidSubAuthorityCount(ptr) GetSidSubAuthorityCount @ stdcall GetTokenInformation(long long ptr long ptr) GetTokenInformation @ stdcall GetUserNameA(ptr ptr) GetUserNameA @ stdcall GetUserNameW(ptr ptr) GetUserNameW @ stub ImpersonateLoggedOnUser @ stub ImpersonateNamedPipeClient @ stdcall ImpersonateSelf(long) ImpersonateSelf @ stdcall InitializeAcl(ptr long long) InitializeAcl @ stdcall InitializeSecurityDescriptor(ptr long) InitializeSecurityDescriptor @ stdcall InitializeSid(ptr ptr long) InitializeSid @ stub InitiateSystemShutdownA @ stub InitiateSystemShutdownW @ stdcall IsTextUnicode(ptr long ptr) RtlIsTextUnicode @ stub IsValidAcl @ stdcall IsValidSecurityDescriptor(ptr) IsValidSecurityDescriptor @ stdcall IsValidSid(ptr) IsValidSid @ stub LockServiceDatabase @ stub LogonUserA @ stub LogonUserW @ stub LookupAccountNameA @ stub LookupAccountNameW @ stdcall LookupAccountSidA(ptr ptr ptr ptr ptr ptr ptr) LookupAccountSidA @ stdcall LookupAccountSidW(ptr ptr ptr ptr ptr ptr ptr) LookupAccountSidW @ stub LookupPrivilegeDisplayNameA @ stub LookupPrivilegeDisplayNameW @ stub LookupPrivilegeNameA @ stub LookupPrivilegeNameW @ stdcall LookupPrivilegeValueA(ptr ptr ptr) LookupPrivilegeValueA @ stdcall LookupPrivilegeValueW(ptr ptr ptr) LookupPrivilegeValueW @ stub MakeAbsoluteSD @ stdcall MakeSelfRelativeSD(ptr ptr ptr) MakeSelfRelativeSD @ stub MapGenericMask @ stdcall NotifyBootConfigStatus(long) NotifyBootConfigStatus @ stdcall NotifyChangeEventLog (long long) NotifyChangeEventLog @ stub ObjectCloseAuditAlarmA @ stub ObjectCloseAuditAlarmW @ stub ObjectOpenAuditAlarmA @ stub ObjectOpenAuditAlarmW @ stub ObjectPrivilegeAuditAlarmA @ stub ObjectPrivilegeAuditAlarmW @ stdcall OpenBackupEventLogA (str str) OpenBackupEventLogA @ stdcall OpenBackupEventLogW (wstr wstr) OpenBackupEventLogW @ stdcall OpenEventLogA (str str) OpenEventLogA @ stdcall OpenEventLogW (wstr wstr) OpenEventLogW @ stdcall OpenProcessToken(long long ptr) OpenProcessToken @ stdcall OpenSCManagerA(ptr ptr long) OpenSCManagerA @ stdcall OpenSCManagerW(ptr ptr long) OpenSCManagerW @ stdcall OpenServiceA(long str long) OpenServiceA @ stdcall OpenServiceW(long wstr long) OpenServiceW @ stdcall OpenThreadToken(long long long ptr) OpenThreadToken @ stub PrivilegeCheck @ stub PrivilegedServiceAuditAlarmA @ stub PrivilegedServiceAuditAlarmW @ stub QueryServiceConfigA @ stub QueryServiceConfigW @ stub QueryServiceLockStatusA @ stub QueryServiceLockStatusW @ stub QueryServiceObjectSecurity @ stdcall QueryServiceStatus(long ptr) QueryServiceStatus @ stdcall ReadEventLogA (long long long ptr long ptr ptr) ReadEventLogA @ stdcall ReadEventLogW (long long long ptr long ptr ptr) ReadEventLogW @ stdcall RegCloseKey(long) RegCloseKey @ stdcall RegConnectRegistryA(str long ptr) RegConnectRegistryA @ stdcall RegConnectRegistryW(wstr long ptr) RegConnectRegistryW @ stdcall RegCreateKeyA(long str ptr) RegCreateKeyA @ stdcall RegCreateKeyExA(long str long ptr long long ptr ptr ptr) RegCreateKeyExA @ stdcall RegCreateKeyExW(long wstr long ptr long long ptr ptr ptr) RegCreateKeyExW @ stdcall RegCreateKeyW(long wstr ptr) RegCreateKeyW @ stdcall RegDeleteKeyA(long str) RegDeleteKeyA @ stdcall RegDeleteKeyW(long wstr) RegDeleteKeyW @ stdcall RegDeleteValueA(long str) RegDeleteValueA @ stdcall RegDeleteValueW(long wstr) RegDeleteValueW @ stdcall RegEnumKeyA(long long ptr long) RegEnumKeyA @ stdcall RegEnumKeyExA(long long ptr ptr ptr ptr ptr ptr) RegEnumKeyExA @ stdcall RegEnumKeyExW(long long ptr ptr ptr ptr ptr ptr) RegEnumKeyExW @ stdcall RegEnumKeyW(long long ptr long) RegEnumKeyW @ stdcall RegEnumValueA(long long ptr ptr ptr ptr ptr ptr) RegEnumValueA @ stdcall RegEnumValueW(long long ptr ptr ptr ptr ptr ptr) RegEnumValueW @ stdcall RegFlushKey(long) RegFlushKey @ stdcall RegGetKeySecurity(long long ptr ptr) RegGetKeySecurity @ stdcall RegLoadKeyA(long str str) RegLoadKeyA @ stdcall RegLoadKeyW(long wstr wstr) RegLoadKeyW @ stdcall RegNotifyChangeKeyValue(long long long long long) RegNotifyChangeKeyValue @ stdcall RegOpenKeyA(long str ptr) RegOpenKeyA @ stdcall RegOpenKeyExA(long str long long ptr) RegOpenKeyExA @ stdcall RegOpenKeyExW(long wstr long long ptr) RegOpenKeyExW @ stdcall RegOpenKeyW(long wstr ptr) RegOpenKeyW @ stdcall RegQueryInfoKeyA(long ptr ptr ptr ptr ptr ptr ptr ptr ptr ptr ptr) RegQueryInfoKeyA @ stdcall RegQueryInfoKeyW(long ptr ptr ptr ptr ptr ptr ptr ptr ptr ptr ptr) RegQueryInfoKeyW @ stub RegQueryMultipleValuesA @ stub RegQueryMultipleValuesW @ stdcall RegQueryValueA(long str ptr ptr) RegQueryValueA @ stdcall RegQueryValueExA(long str ptr ptr ptr ptr) RegQueryValueExA @ stdcall RegQueryValueExW(long wstr ptr ptr ptr ptr) RegQueryValueExW @ stdcall RegQueryValueW(long wstr ptr ptr) RegQueryValueW @ stub RegRemapPreDefKey @ stdcall RegReplaceKeyA(long str str str) RegReplaceKeyA @ stdcall RegReplaceKeyW(long wstr wstr wstr) RegReplaceKeyW @ stdcall RegRestoreKeyA(long str long) RegRestoreKeyA @ stdcall RegRestoreKeyW(long wstr long) RegRestoreKeyW @ stdcall RegSaveKeyA(long ptr ptr) RegSaveKeyA @ stdcall RegSaveKeyW(long ptr ptr) RegSaveKeyW @ stdcall RegSetKeySecurity(long long ptr) RegSetKeySecurity @ stdcall RegSetValueA(long str long ptr long) RegSetValueA @ stdcall RegSetValueExA(long str long long ptr long) RegSetValueExA @ stdcall RegSetValueExW(long wstr long long ptr long) RegSetValueExW @ stdcall RegSetValueW(long wstr long ptr long) RegSetValueW @ stdcall RegUnLoadKeyA(long str) RegUnLoadKeyA @ stdcall RegUnLoadKeyW(long wstr) RegUnLoadKeyW @ stdcall RegisterEventSourceA(ptr ptr) RegisterEventSourceA @ stdcall RegisterEventSourceW(ptr ptr) RegisterEventSourceW @ stdcall RegisterServiceCtrlHandlerA (ptr ptr) RegisterServiceCtrlHandlerA @ stdcall RegisterServiceCtrlHandlerW (ptr ptr) RegisterServiceCtrlHandlerW @ stdcall ReportEventA (long long long long ptr long long str ptr) ReportEventA @ stdcall ReportEventW (long long long long ptr long long wstr ptr) ReportEventW @ stdcall RevertToSelf() RevertToSelf @ stub SetAclInformation @ stdcall SetFileSecurityA(str long ptr ) SetFileSecurityA @ stdcall SetFileSecurityW(wstr long ptr) SetFileSecurityW @ stdcall SetKernelObjectSecurity(long long ptr) SetKernelObjectSecurity @ stub SetPrivateObjectSecurity @ stdcall SetSecurityDescriptorDacl(ptr long ptr long) SetSecurityDescriptorDacl @ stdcall SetSecurityDescriptorGroup (ptr ptr long) SetSecurityDescriptorGroup @ stdcall SetSecurityDescriptorOwner (ptr ptr long) SetSecurityDescriptorOwner @ stdcall SetSecurityDescriptorSacl(ptr long ptr long) SetSecurityDescriptorSacl @ stub SetServiceBits @ stub SetServiceObjectSecurity @ stdcall SetServiceStatus(long long)SetServiceStatus @ stdcall SetThreadToken (ptr ptr) SetThreadToken @ stub SetTokenInformation @ stdcall StartServiceA(long long ptr) StartServiceA @ stdcall StartServiceCtrlDispatcherA(ptr) StartServiceCtrlDispatcherA @ stdcall StartServiceCtrlDispatcherW(ptr) StartServiceCtrlDispatcherW @ stdcall StartServiceW(long long ptr) StartServiceW @ stub UnlockServiceDatabase @ stdcall LsaOpenPolicy(long long long long) LsaOpenPolicy @ stdcall LsaLookupSids(ptr long ptr ptr ptr) LsaLookupSids @ stdcall LsaFreeMemory(ptr)LsaFreeMemory @ stdcall LsaQueryInformationPolicy(ptr long ptr)LsaQueryInformationPolicy @ stdcall LsaClose(ptr)LsaClose @ stub LsaSetInformationPolicy @ stub LsaLookupNames @ stub SystemFunction001 @ stub SystemFunction002 @ stub SystemFunction003 @ stub SystemFunction004 @ stub SystemFunction005 @ stub SystemFunction006 @ stub SystemFunction007 @ stub SystemFunction008 @ stub SystemFunction009 @ stub SystemFunction010 @ stub SystemFunction011 @ stub SystemFunction012 @ stub SystemFunction013 @ stub SystemFunction014 @ stub SystemFunction015 @ stub SystemFunction016 @ stub SystemFunction017 @ stub SystemFunction018 @ stub SystemFunction019 @ stub SystemFunction020 @ stub SystemFunction021 @ stub SystemFunction022 @ stub SystemFunction023 @ stub SystemFunction024 @ stub SystemFunction025 @ stub SystemFunction026 @ stub SystemFunction027 @ stub SystemFunction028 @ stub SystemFunction029 @ stub SystemFunction030 @ stub LsaQueryInfoTrustedDomain @ stub LsaQuerySecret @ stub LsaCreateSecret @ stub LsaOpenSecret @ stub LsaCreateTrustedDomain @ stub LsaOpenTrustedDomain @ stub LsaSetSecret @ stub LsaCreateAccount @ stub LsaAddPrivilegesToAccount @ stub LsaRemovePrivilegesFromAccount @ stub LsaDelete @ stub LsaSetSystemAccessAccount @ stub LsaEnumeratePrivilegesOfAccount @ stub LsaEnumerateAccounts @ stub LsaGetSystemAccessAccount @ stub LsaSetInformationTrustedDomain @ stub LsaEnumerateTrustedDomains @ stub LsaOpenAccount @ stub LsaEnumeratePrivileges @ stub LsaLookupPrivilegeDisplayName @ stub LsaICLookupNames @ stub ElfRegisterEventSourceW @ stub ElfReportEventW @ stub ElfDeregisterEventSource @ stub ElfDeregisterEventSourceW @ stub I_ScSetServiceBit @ stdcall SynchronizeWindows31FilesAndWindowsNTRegistry(long long long long) SynchronizeWindows31FilesAndWindowsNTRegistry @ stdcall QueryWindows31FilesMigration(long) QueryWindows31FilesMigration @ stub LsaICLookupSids @ stub SystemFunction031 @ stub I_ScSetServiceBitsA @ stub EnumServiceGroupA @ stub EnumServiceGroupW wine-20000526/dlls/advapi32/crypt.c0100644000175000001440000000215207023353350016316 0ustar julliardusers/* * dlls/advapi32/crypt.c */ #include "windef.h" #include "winerror.h" #include "wincrypt.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(advapi) /****************************************************************************** * CryptAcquireContextA * Acquire a crypto provider context handle. * * PARAMS * phProv: Pointer to HCRYPTPROV for the output. * pszContainer: FIXME (unknown) * pszProvider: FIXME (unknown) * dwProvType: Crypto provider type to get a handle. * dwFlags: flags for the operation * * RETURNS TRUE on success, FALSE on failure. */ BOOL WINAPI CryptAcquireContextA( HCRYPTPROV *phProv, LPCSTR pszContainer, LPCSTR pszProvider, DWORD dwProvType, DWORD dwFlags) { FIXME("(%p, %s, %s, %ld, %08lx): stub!\n", phProv, pszContainer, pszProvider, dwProvType, dwFlags); return FALSE; } /****************************************************************************** * CryptSetKeyParam */ BOOL WINAPI CryptSetKeyParam( HCRYPTKEY hKey, DWORD dwParam, BYTE *pbData, DWORD dwFlags) { FIXME("(%lx, %lx, %p, %lx): stub!\n", hKey, dwParam, pbData, dwFlags); return FALSE; } wine-20000526/dlls/advapi32/eventlog.c0100644000175000001440000001474507070212243017010 0ustar julliardusers/* * Win32 advapi functions * * Copyright 1995 Sven Verdoolaege, 1998 Juergen Schmied */ #include "winbase.h" #include "windef.h" #include "winerror.h" #include "heap.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(advapi) /****************************************************************************** * BackupEventLogA [ADVAPI32.15] */ BOOL WINAPI BackupEventLogA( HANDLE hEventLog, LPCSTR lpBackupFileName ) { FIXME("stub\n"); return TRUE; } /****************************************************************************** * BackupEventLogW [ADVAPI32.16] * * PARAMS * hEventLog [] * lpBackupFileName [] */ BOOL WINAPI BackupEventLogW( HANDLE hEventLog, LPCWSTR lpBackupFileName ) { FIXME("stub\n"); return TRUE; } /****************************************************************************** * ClearEventLogA [ADVAPI32.19] */ BOOL WINAPI ClearEventLogA ( HANDLE hEventLog, LPCSTR lpBackupFileName ) { FIXME("stub\n"); return TRUE; } /****************************************************************************** * ClearEventLogW [ADVAPI32.20] */ BOOL WINAPI ClearEventLogW ( HANDLE hEventLog, LPCWSTR lpBackupFileName ) { FIXME("stub\n"); return TRUE; } /****************************************************************************** * CloseEventLog [ADVAPI32.21] */ BOOL WINAPI CloseEventLog ( HANDLE hEventLog ) { FIXME("stub\n"); return TRUE; } /****************************************************************************** * DeregisterEventSource [ADVAPI32.32] * Closes a handle to the specified event log * * PARAMS * hEventLog [I] Handle to event log * * RETURNS STD */ BOOL WINAPI DeregisterEventSource( HANDLE hEventLog ) { FIXME("(%d): stub\n",hEventLog); return TRUE; } /****************************************************************************** * GetNumberOfEventLogRecords [ADVAPI32.49] * * PARAMS * hEventLog [] * NumberOfRecords [] */ BOOL WINAPI GetNumberOfEventLogRecords( HANDLE hEventLog, PDWORD NumberOfRecords ) { FIXME("stub\n"); return TRUE; } /****************************************************************************** * GetOldestEventLogRecord [ADVAPI32.50] * * PARAMS * hEventLog [] * OldestRecord [] */ BOOL WINAPI GetOldestEventLogRecord( HANDLE hEventLog, PDWORD OldestRecord ) { FIXME(":stub\n"); return TRUE; } /****************************************************************************** * NotifyChangeEventLog [ADVAPI32.98] * * PARAMS * hEventLog [] * hEvent [] */ BOOL WINAPI NotifyChangeEventLog( HANDLE hEventLog, HANDLE hEvent ) { FIXME("stub\n"); return TRUE; } /****************************************************************************** * OpenBackupEventLogA [ADVAPI32.105] */ HANDLE WINAPI OpenBackupEventLogA( LPCSTR lpUNCServerName, LPCSTR lpFileName ) { FIXME("stub\n"); return TRUE; } /****************************************************************************** * OpenBackupEventLogW [ADVAPI32.106] * * PARAMS * lpUNCServerName [] * lpFileName [] */ HANDLE WINAPI OpenBackupEventLogW( LPCWSTR lpUNCServerName, LPCWSTR lpFileName ) { FIXME("stub\n"); return TRUE; } /****************************************************************************** * OpenEventLogA [ADVAPI32.107] */ HANDLE WINAPI OpenEventLogA(LPCSTR uncname,LPCSTR source) { FIXME("(%s,%s),stub!\n",uncname,source); return 0xcafe4242; } /****************************************************************************** * OpenEventLogW [ADVAPI32.108] * * PARAMS * uncname [] * source [] */ HANDLE WINAPI OpenEventLogW( LPCWSTR uncname, LPCWSTR source ) { FIXME("stub\n"); return TRUE; } /****************************************************************************** * ReadEventLogA [ADVAPI32.124] */ BOOL WINAPI ReadEventLogA( HANDLE hEventLog, DWORD dwReadFlags, DWORD dwRecordOffset, LPVOID lpBuffer, DWORD nNumberOfBytesToRead, DWORD *pnBytesRead, DWORD *pnMinNumberOfBytesNeeded ) { FIXME("stub\n"); return TRUE; } /****************************************************************************** * ReadEventLogW [ADVAPI32.125] * * PARAMS * hEventLog [] * dwReadFlags [] * dwRecordOffset [] * lpBuffer [] * nNumberOfBytesToRead [] * pnBytesRead [] * pnMinNumberOfBytesNeeded [] */ BOOL WINAPI ReadEventLogW( HANDLE hEventLog, DWORD dwReadFlags, DWORD dwRecordOffset, LPVOID lpBuffer, DWORD nNumberOfBytesToRead, DWORD *pnBytesRead, DWORD *pnMinNumberOfBytesNeeded ) { FIXME("stub\n"); return TRUE; } /****************************************************************************** * RegisterEventSourceA [ADVAPI32.174] */ HANDLE WINAPI RegisterEventSourceA( LPCSTR lpUNCServerName, LPCSTR lpSourceName ) { LPWSTR lpUNCServerNameW = HEAP_strdupAtoW(GetProcessHeap(),0,lpUNCServerName); LPWSTR lpSourceNameW = HEAP_strdupAtoW(GetProcessHeap(),0,lpSourceName); HANDLE ret = RegisterEventSourceW(lpUNCServerNameW,lpSourceNameW); HeapFree(GetProcessHeap(),0,lpSourceNameW); HeapFree(GetProcessHeap(),0,lpUNCServerNameW); return ret; } /****************************************************************************** * RegisterEventSourceW [ADVAPI32.175] * Returns a registered handle to an event log * * PARAMS * lpUNCServerName [I] Server name for source * lpSourceName [I] Source name for registered handle * * RETURNS * Success: Handle * Failure: NULL */ HANDLE WINAPI RegisterEventSourceW( LPCWSTR lpUNCServerName, LPCWSTR lpSourceName ) { FIXME("(%s,%s): stub\n", debugstr_w(lpUNCServerName), debugstr_w(lpSourceName)); return 1; } /****************************************************************************** * ReportEventA [ADVAPI32.178] */ BOOL WINAPI ReportEventA ( HANDLE hEventLog, WORD wType, WORD wCategory, DWORD dwEventID, PSID lpUserSid, WORD wNumStrings, DWORD dwDataSize, LPCSTR *lpStrings, LPVOID lpRawData) { FIXME("stub\n"); return TRUE; } /****************************************************************************** * ReportEventW [ADVAPI32.179] * * PARAMS * hEventLog [] * wType [] * wCategory [] * dwEventID [] * lpUserSid [] * wNumStrings [] * dwDataSize [] * lpStrings [] * lpRawData [] */ BOOL WINAPI ReportEventW( HANDLE hEventLog, WORD wType, WORD wCategory, DWORD dwEventID, PSID lpUserSid, WORD wNumStrings, DWORD dwDataSize, LPCWSTR *lpStrings, LPVOID lpRawData ) { FIXME("stub\n"); return TRUE; } wine-20000526/dlls/advapi32/registry.c0100644000175000001440000011357607107627565017061 0ustar julliardusers/* * Registry management * * Copyright (C) 1999 Alexandre Julliard * * Based on misc/registry.c code * Copyright (C) 1996 Marcus Meissner * Copyright (C) 1998 Matthew Becker * Copyright (C) 1999 Sylvain St-Germain * * This file is concerned about handle management and interaction with the Wine server. * Registry file I/O is in misc/registry.c. */ #include #include #include #include "winbase.h" #include "winreg.h" #include "winerror.h" #include "wine/winbase16.h" #include "winversion.h" #include "file.h" #include "heap.h" #include "server.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(reg); /* Ansi->Unicode conversion without string delimiters */ static LPWSTR memcpyAtoW( LPWSTR dst, LPCSTR src, INT n ) { LPWSTR p = dst; while (n-- > 0) *p++ = (WCHAR)*src++; return dst; } /* Unicode->Ansi conversion without string delimiters */ static LPSTR memcpyWtoA( LPSTR dst, LPCWSTR src, INT n ) { LPSTR p = dst; while (n-- > 0) *p++ = (CHAR)*src++; return dst; } /* check if value type needs string conversion (Ansi<->Unicode) */ static inline int is_string( DWORD type ) { return (type == REG_SZ) || (type == REG_EXPAND_SZ) || (type == REG_MULTI_SZ); } /* copy a key name into the request buffer */ static inline DWORD copy_nameW( LPWSTR dest, LPCWSTR name ) { if (name) { if (lstrlenW(name) > MAX_PATH) return ERROR_MORE_DATA; lstrcpyW( dest, name ); } else dest[0] = 0; return ERROR_SUCCESS; } /* copy a key name into the request buffer */ static inline DWORD copy_nameAtoW( LPWSTR dest, LPCSTR name ) { if (name) { if (strlen(name) > MAX_PATH) return ERROR_MORE_DATA; lstrcpyAtoW( dest, name ); } else dest[0] = 0; return ERROR_SUCCESS; } /* do a server call without setting the last error code */ static inline int reg_server_call( enum request req ) { unsigned int res = server_call_noerr( req ); if (res) res = RtlNtStatusToDosError(res); return res; } /****************************************************************************** * RegCreateKeyExW [ADVAPI32.131] * * PARAMS * hkey [I] Handle of an open key * name [I] Address of subkey name * reserved [I] Reserved - must be 0 * class [I] Address of class string * options [I] Special options flag * access [I] Desired security access * sa [I] Address of key security structure * retkey [O] Address of buffer for opened handle * dispos [O] Receives REG_CREATED_NEW_KEY or REG_OPENED_EXISTING_KEY * * NOTES * in case of failing retkey remains untouched */ DWORD WINAPI RegCreateKeyExW( HKEY hkey, LPCWSTR name, DWORD reserved, LPWSTR class, DWORD options, REGSAM access, SECURITY_ATTRIBUTES *sa, LPHKEY retkey, LPDWORD dispos ) { DWORD ret; struct create_key_request *req = get_req_buffer(); TRACE( "(0x%x,%s,%ld,%s,%lx,%lx,%p,%p,%p)\n", hkey, debugstr_w(name), reserved, debugstr_w(class), options, access, sa, retkey, dispos ); if (reserved) return ERROR_INVALID_PARAMETER; if (!(access & KEY_ALL_ACCESS) || (access & ~KEY_ALL_ACCESS)) return ERROR_ACCESS_DENIED; req->parent = hkey; req->access = access; req->options = options; req->modif = time(NULL); if ((ret = copy_nameW( req->name, name )) != ERROR_SUCCESS) return ret; if (req->name[0] == '\\') return ERROR_BAD_PATHNAME; lstrcpynW( req->class, class ? class : (LPWSTR)"\0\0", server_remaining(req->class) / sizeof(WCHAR) ); if ((ret = reg_server_call( REQ_CREATE_KEY )) == ERROR_SUCCESS) { *retkey = req->hkey; if (dispos) *dispos = req->created ? REG_CREATED_NEW_KEY : REG_OPENED_EXISTING_KEY; } return ret; } /****************************************************************************** * RegCreateKeyExA [ADVAPI32.130] */ DWORD WINAPI RegCreateKeyExA( HKEY hkey, LPCSTR name, DWORD reserved, LPSTR class, DWORD options, REGSAM access, SECURITY_ATTRIBUTES *sa, LPHKEY retkey, LPDWORD dispos ) { DWORD ret; struct create_key_request *req = get_req_buffer(); TRACE( "(0x%x,%s,%ld,%s,%lx,%lx,%p,%p,%p)\n", hkey, debugstr_a(name), reserved, debugstr_a(class), options, access, sa, retkey, dispos ); if (reserved) return ERROR_INVALID_PARAMETER; if (!(access & KEY_ALL_ACCESS) || (access & ~KEY_ALL_ACCESS)) return ERROR_ACCESS_DENIED; req->parent = hkey; req->access = access; req->options = options; req->modif = time(NULL); if ((ret = copy_nameAtoW( req->name, name )) != ERROR_SUCCESS) return ret; if (req->name[0] == '\\') return ERROR_BAD_PATHNAME; lstrcpynAtoW( req->class, class ? class : "", server_remaining(req->class) / sizeof(WCHAR) ); if ((ret = reg_server_call( REQ_CREATE_KEY )) == ERROR_SUCCESS) { *retkey = req->hkey; if (dispos) *dispos = req->created ? REG_CREATED_NEW_KEY : REG_OPENED_EXISTING_KEY; } return ret; } /****************************************************************************** * RegCreateKeyW [ADVAPI32.132] */ DWORD WINAPI RegCreateKeyW( HKEY hkey, LPCWSTR name, LPHKEY retkey ) { /* FIXME: previous implementation converted ERROR_INVALID_HANDLE to ERROR_BADKEY, */ /* but at least my version of NT (4.0 SP5) doesn't do this. -- AJ */ return RegCreateKeyExW( hkey, name, 0, NULL, REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL, retkey, NULL ); } /****************************************************************************** * RegCreateKeyA [ADVAPI32.129] */ DWORD WINAPI RegCreateKeyA( HKEY hkey, LPCSTR name, LPHKEY retkey ) { return RegCreateKeyExA( hkey, name, 0, NULL, REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL, retkey, NULL ); } /****************************************************************************** * RegOpenKeyExW [ADVAPI32.150] * * Opens the specified key * * Unlike RegCreateKeyEx, this does not create the key if it does not exist. * * PARAMS * hkey [I] Handle of open key * name [I] Name of subkey to open * reserved [I] Reserved - must be zero * access [I] Security access mask * retkey [O] Handle to open key * * RETURNS * Success: ERROR_SUCCESS * Failure: Error code * * NOTES * in case of failing is retkey = 0 */ DWORD WINAPI RegOpenKeyExW( HKEY hkey, LPCWSTR name, DWORD reserved, REGSAM access, LPHKEY retkey ) { DWORD ret; struct open_key_request *req = get_req_buffer(); TRACE( "(0x%x,%s,%ld,%lx,%p)\n", hkey, debugstr_w(name), reserved, access, retkey ); if (!retkey) return ERROR_INVALID_PARAMETER; *retkey = 0; req->parent = hkey; req->access = access; if ((ret = copy_nameW( req->name, name )) != ERROR_SUCCESS) return ret; if (req->name[0] == '\\') return ERROR_BAD_PATHNAME; if ((ret = reg_server_call( REQ_OPEN_KEY )) == ERROR_SUCCESS) *retkey = req->hkey; return ret; } /****************************************************************************** * RegOpenKeyExA [ADVAPI32.149] */ DWORD WINAPI RegOpenKeyExA( HKEY hkey, LPCSTR name, DWORD reserved, REGSAM access, LPHKEY retkey ) { DWORD ret; struct open_key_request *req = get_req_buffer(); TRACE( "(0x%x,%s,%ld,%lx,%p)\n", hkey, debugstr_a(name), reserved, access, retkey ); if (!retkey) return ERROR_INVALID_PARAMETER; *retkey = 0; req->parent = hkey; req->access = access; if ((ret = copy_nameAtoW( req->name, name )) != ERROR_SUCCESS) return ret; if (req->name[0] == '\\') return ERROR_BAD_PATHNAME; if ((ret = reg_server_call( REQ_OPEN_KEY )) == ERROR_SUCCESS) *retkey = req->hkey; return ret; } /****************************************************************************** * RegOpenKeyW [ADVAPI32.151] * * PARAMS * hkey [I] Handle of open key * name [I] Address of name of subkey to open * retkey [O] Handle to open key * * RETURNS * Success: ERROR_SUCCESS * Failure: Error code * * NOTES * in case of failing is retkey = 0 */ DWORD WINAPI RegOpenKeyW( HKEY hkey, LPCWSTR name, LPHKEY retkey ) { return RegOpenKeyExW( hkey, name, 0, KEY_ALL_ACCESS, retkey ); } /****************************************************************************** * RegOpenKeyA [ADVAPI32.148] */ DWORD WINAPI RegOpenKeyA( HKEY hkey, LPCSTR name, LPHKEY retkey ) { return RegOpenKeyExA( hkey, name, 0, KEY_ALL_ACCESS, retkey ); } /****************************************************************************** * RegEnumKeyExW [ADVAPI32.139] * * PARAMS * hkey [I] Handle to key to enumerate * index [I] Index of subkey to enumerate * name [O] Buffer for subkey name * name_len [O] Size of subkey buffer * reserved [I] Reserved * class [O] Buffer for class string * class_len [O] Size of class buffer * ft [O] Time key last written to */ DWORD WINAPI RegEnumKeyExW( HKEY hkey, DWORD index, LPWSTR name, LPDWORD name_len, LPDWORD reserved, LPWSTR class, LPDWORD class_len, FILETIME *ft ) { DWORD ret, len, cls_len; struct enum_key_request *req = get_req_buffer(); TRACE( "(0x%x,%ld,%p,%p(%ld),%p,%p,%p,%p)\n", hkey, index, name, name_len, name_len ? *name_len : -1, reserved, class, class_len, ft ); if (reserved) return ERROR_INVALID_PARAMETER; req->hkey = hkey; req->index = index; if ((ret = reg_server_call( REQ_ENUM_KEY )) != ERROR_SUCCESS) return ret; len = lstrlenW( req->name ) + 1; cls_len = lstrlenW( req->class ) + 1; if (len > *name_len) return ERROR_MORE_DATA; if (class_len && (cls_len > *class_len)) return ERROR_MORE_DATA; memcpy( name, req->name, len * sizeof(WCHAR) ); *name_len = len - 1; if (class_len) { if (class) memcpy( class, req->class, cls_len * sizeof(WCHAR) ); *class_len = cls_len - 1; } if (ft) DOSFS_UnixTimeToFileTime( req->modif, ft, 0 ); return ERROR_SUCCESS; } /****************************************************************************** * RegEnumKeyExA [ADVAPI32.138] */ DWORD WINAPI RegEnumKeyExA( HKEY hkey, DWORD index, LPSTR name, LPDWORD name_len, LPDWORD reserved, LPSTR class, LPDWORD class_len, FILETIME *ft ) { DWORD ret, len, cls_len; struct enum_key_request *req = get_req_buffer(); TRACE( "(0x%x,%ld,%p,%p(%ld),%p,%p,%p,%p)\n", hkey, index, name, name_len, name_len ? *name_len : -1, reserved, class, class_len, ft ); if (reserved) return ERROR_INVALID_PARAMETER; req->hkey = hkey; req->index = index; if ((ret = reg_server_call( REQ_ENUM_KEY )) != ERROR_SUCCESS) return ret; len = lstrlenW( req->name ) + 1; cls_len = lstrlenW( req->class ) + 1; if (len > *name_len) return ERROR_MORE_DATA; if (class_len && (cls_len > *class_len)) return ERROR_MORE_DATA; memcpyWtoA( name, req->name, len ); *name_len = len - 1; if (class_len) { if (class) memcpyWtoA( class, req->class, cls_len ); *class_len = cls_len - 1; } if (ft) DOSFS_UnixTimeToFileTime( req->modif, ft, 0 ); return ERROR_SUCCESS; } /****************************************************************************** * RegEnumKeyW [ADVAPI32.140] */ DWORD WINAPI RegEnumKeyW( HKEY hkey, DWORD index, LPWSTR name, DWORD name_len ) { return RegEnumKeyExW( hkey, index, name, &name_len, NULL, NULL, NULL, NULL ); } /****************************************************************************** * RegEnumKeyA [ADVAPI32.137] */ DWORD WINAPI RegEnumKeyA( HKEY hkey, DWORD index, LPSTR name, DWORD name_len ) { return RegEnumKeyExA( hkey, index, name, &name_len, NULL, NULL, NULL, NULL ); } /****************************************************************************** * RegQueryInfoKeyW [ADVAPI32.153] * * PARAMS * hkey [I] Handle to key to query * class [O] Buffer for class string * class_len [O] Size of class string buffer * reserved [I] Reserved * subkeys [O] Buffer for number of subkeys * max_subkey [O] Buffer for longest subkey name length * max_class [O] Buffer for longest class string length * values [O] Buffer for number of value entries * max_value [O] Buffer for longest value name length * max_data [O] Buffer for longest value data length * security [O] Buffer for security descriptor length * modif [O] Modification time * * - win95 allows class to be valid and class_len to be NULL * - winnt returns ERROR_INVALID_PARAMETER if class is valid and class_len is NULL * - both allow class to be NULL and class_len to be NULL * (it's hard to test validity, so test !NULL instead) */ DWORD WINAPI RegQueryInfoKeyW( HKEY hkey, LPWSTR class, LPDWORD class_len, LPDWORD reserved, LPDWORD subkeys, LPDWORD max_subkey, LPDWORD max_class, LPDWORD values, LPDWORD max_value, LPDWORD max_data, LPDWORD security, FILETIME *modif ) { DWORD ret; struct query_key_info_request *req = get_req_buffer(); TRACE( "(0x%x,%p,%ld,%p,%p,%p,%p,%p,%p,%p,%p)\n", hkey, class, class_len ? *class_len : 0, reserved, subkeys, max_subkey, values, max_value, max_data, security, modif ); if (class && !class_len && (VERSION_GetVersion() == NT40)) return ERROR_INVALID_PARAMETER; req->hkey = hkey; if ((ret = reg_server_call( REQ_QUERY_KEY_INFO )) != ERROR_SUCCESS) return ret; if (class) { if (class_len && (lstrlenW(req->class) + 1 > *class_len)) { *class_len = lstrlenW(req->class); return ERROR_MORE_DATA; } lstrcpyW( class, req->class ); } if (class_len) *class_len = lstrlenW( req->class ); if (subkeys) *subkeys = req->subkeys; if (max_subkey) *max_subkey = req->max_subkey; if (max_class) *max_class = req->max_class; if (values) *values = req->values; if (max_value) *max_value = req->max_value; if (max_data) *max_data = req->max_data; if (modif) DOSFS_UnixTimeToFileTime( req->modif, modif, 0 ); return ERROR_SUCCESS; } /****************************************************************************** * RegQueryInfoKeyA [ADVAPI32.152] */ DWORD WINAPI RegQueryInfoKeyA( HKEY hkey, LPSTR class, LPDWORD class_len, LPDWORD reserved, LPDWORD subkeys, LPDWORD max_subkey, LPDWORD max_class, LPDWORD values, LPDWORD max_value, LPDWORD max_data, LPDWORD security, FILETIME *modif ) { DWORD ret; struct query_key_info_request *req = get_req_buffer(); TRACE( "(0x%x,%p,%ld,%p,%p,%p,%p,%p,%p,%p,%p)\n", hkey, class, class_len ? *class_len : 0, reserved, subkeys, max_subkey, values, max_value, max_data, security, modif ); if (class && !class_len && (VERSION_GetVersion() == NT40)) return ERROR_INVALID_PARAMETER; req->hkey = hkey; if ((ret = reg_server_call( REQ_QUERY_KEY_INFO )) != ERROR_SUCCESS) return ret; if (class) { if (class_len && (lstrlenW(req->class) + 1 > *class_len)) { *class_len = lstrlenW(req->class); return ERROR_MORE_DATA; } lstrcpyWtoA( class, req->class ); } if (class_len) *class_len = lstrlenW( req->class ); if (subkeys) *subkeys = req->subkeys; if (max_subkey) *max_subkey = req->max_subkey; if (max_class) *max_class = req->max_class; if (values) *values = req->values; if (max_value) *max_value = req->max_value; if (max_data) *max_data = req->max_data; if (modif) DOSFS_UnixTimeToFileTime( req->modif, modif, 0 ); return ERROR_SUCCESS; } /****************************************************************************** * RegCloseKey [ADVAPI32.126] * * Releases the handle of the specified key * * PARAMS * hkey [I] Handle of key to close * * RETURNS * Success: ERROR_SUCCESS * Failure: Error code */ DWORD WINAPI RegCloseKey( HKEY hkey ) { struct close_key_request *req = get_req_buffer(); TRACE( "(0x%x)\n", hkey ); req->hkey = hkey; return reg_server_call( REQ_CLOSE_KEY ); } /****************************************************************************** * RegDeleteKeyW [ADVAPI32.134] * * PARAMS * hkey [I] Handle to open key * name [I] Name of subkey to delete * * RETURNS * Success: ERROR_SUCCESS * Failure: Error code */ DWORD WINAPI RegDeleteKeyW( HKEY hkey, LPCWSTR name ) { DWORD ret; struct delete_key_request *req = get_req_buffer(); TRACE( "(0x%x,%s)\n", hkey, debugstr_w(name) ); req->hkey = hkey; if ((ret = copy_nameW( req->name, name )) != ERROR_SUCCESS) return ret; if (req->name[0] == '\\') return ERROR_BAD_PATHNAME; return reg_server_call( REQ_DELETE_KEY ); } /****************************************************************************** * RegDeleteKeyA [ADVAPI32.133] */ DWORD WINAPI RegDeleteKeyA( HKEY hkey, LPCSTR name ) { DWORD ret; struct delete_key_request *req = get_req_buffer(); TRACE( "(0x%x,%s)\n", hkey, debugstr_a(name) ); req->hkey = hkey; if ((ret = copy_nameAtoW( req->name, name )) != ERROR_SUCCESS) return ret; if (req->name[0] == '\\') return ERROR_BAD_PATHNAME; return reg_server_call( REQ_DELETE_KEY ); } /****************************************************************************** * RegSetValueExW [ADVAPI32.170] * * Sets the data and type of a value under a register key * * PARAMS * hkey [I] Handle of key to set value for * name [I] Name of value to set * reserved [I] Reserved - must be zero * type [I] Flag for value type * data [I] Address of value data * count [I] Size of value data * * RETURNS * Success: ERROR_SUCCESS * Failure: Error code * * NOTES * win95 does not care about count for REG_SZ and finds out the len by itself (js) * NT does definitely care (aj) */ DWORD WINAPI RegSetValueExW( HKEY hkey, LPCWSTR name, DWORD reserved, DWORD type, CONST BYTE *data, DWORD count ) { DWORD ret; struct set_key_value_request *req = get_req_buffer(); unsigned int max, pos; TRACE( "(0x%x,%s,%ld,%ld,%p,%ld)\n", hkey, debugstr_w(name), reserved, type, data, count ); if (reserved) return ERROR_INVALID_PARAMETER; if (count && type == REG_SZ) { LPCWSTR str = (LPCWSTR)data; /* if user forgot to count terminating null, add it (yes NT does this) */ if (str[count / sizeof(WCHAR) - 1] && !str[count / sizeof(WCHAR)]) count += sizeof(WCHAR); } req->hkey = hkey; req->type = type; req->total = count; if ((ret = copy_nameW( req->name, name )) != ERROR_SUCCESS) return ret; max = server_remaining( req->data ); pos = 0; while (pos < count) { unsigned int len = count - pos; if (len > max) len = max; req->offset = pos; req->len = len; memcpy( req->data, data + pos, len ); if ((ret = reg_server_call( REQ_SET_KEY_VALUE )) != ERROR_SUCCESS) break; pos += len; } return ret; } /****************************************************************************** * RegSetValueExA [ADVAPI32.169] */ DWORD WINAPI RegSetValueExA( HKEY hkey, LPCSTR name, DWORD reserved, DWORD type, CONST BYTE *data, DWORD count ) { DWORD ret; struct set_key_value_request *req = get_req_buffer(); unsigned int max, pos; TRACE( "(0x%x,%s,%ld,%ld,%p,%ld)\n", hkey, debugstr_a(name), reserved, type, data, count ); if (reserved) return ERROR_INVALID_PARAMETER; if (count && type == REG_SZ) { /* if user forgot to count terminating null, add it (yes NT does this) */ if (data[count-1] && !data[count]) count++; } if (is_string( type )) /* need to convert to Unicode */ count *= sizeof(WCHAR); req->hkey = hkey; req->type = type; req->total = count; if ((ret = copy_nameAtoW( req->name, name )) != ERROR_SUCCESS) return ret; max = server_remaining( req->data ); pos = 0; while (pos < count) { unsigned int len = count - pos; if (len > max) len = max; req->offset = pos; req->len = len; if (is_string( type )) memcpyAtoW( (LPWSTR)req->data, data + pos/sizeof(WCHAR), len/sizeof(WCHAR) ); else memcpy( req->data, data + pos, len ); if ((ret = reg_server_call( REQ_SET_KEY_VALUE )) != ERROR_SUCCESS) break; pos += len; } return ret; } /****************************************************************************** * RegSetValueW [ADVAPI32.171] */ DWORD WINAPI RegSetValueW( HKEY hkey, LPCWSTR name, DWORD type, LPCWSTR data, DWORD count ) { HKEY subkey = hkey; DWORD ret; TRACE("(0x%x,%s,%ld,%s,%ld)\n", hkey, debugstr_w(name), type, debugstr_w(data), count ); if (type != REG_SZ) return ERROR_INVALID_PARAMETER; if (name && name[0]) /* need to create the subkey */ { if ((ret = RegCreateKeyW( hkey, name, &subkey )) != ERROR_SUCCESS) return ret; } ret = RegSetValueExW( subkey, NULL, 0, REG_SZ, (LPBYTE)data, (lstrlenW( data ) + 1) * sizeof(WCHAR) ); if (subkey != hkey) RegCloseKey( subkey ); return ret; } /****************************************************************************** * RegSetValueA [ADVAPI32.168] */ DWORD WINAPI RegSetValueA( HKEY hkey, LPCSTR name, DWORD type, LPCSTR data, DWORD count ) { HKEY subkey = hkey; DWORD ret; TRACE("(0x%x,%s,%ld,%s,%ld)\n", hkey, debugstr_a(name), type, debugstr_a(data), count ); if (type != REG_SZ) return ERROR_INVALID_PARAMETER; if (name && name[0]) /* need to create the subkey */ { if ((ret = RegCreateKeyA( hkey, name, &subkey )) != ERROR_SUCCESS) return ret; } ret = RegSetValueExA( subkey, NULL, 0, REG_SZ, (LPBYTE)data, strlen(data)+1 ); if (subkey != hkey) RegCloseKey( subkey ); return ret; } /****************************************************************************** * RegQueryValueExW [ADVAPI32.158] * * Retrieves type and data for a specified name associated with an open key * * PARAMS * hkey [I] Handle of key to query * name [I] Name of value to query * reserved [I] Reserved - must be NULL * type [O] Address of buffer for value type. If NULL, the type * is not required. * data [O] Address of data buffer. If NULL, the actual data is * not required. * count [I/O] Address of data buffer size * * RETURNS * ERROR_SUCCESS: Success * ERROR_MORE_DATA: !!! if the specified buffer is not big enough to hold the data * buffer is left untouched. The MS-documentation is wrong (js) !!! */ DWORD WINAPI RegQueryValueExW( HKEY hkey, LPCWSTR name, LPDWORD reserved, LPDWORD type, LPBYTE data, LPDWORD count ) { DWORD ret; struct get_key_value_request *req = get_req_buffer(); TRACE("(0x%x,%s,%p,%p,%p,%p=%ld)\n", hkey, debugstr_w(name), reserved, type, data, count, count ? *count : 0 ); if ((data && !count) || reserved) return ERROR_INVALID_PARAMETER; req->hkey = hkey; req->offset = 0; if ((ret = copy_nameW( req->name, name )) != ERROR_SUCCESS) return ret; if ((ret = reg_server_call( REQ_GET_KEY_VALUE )) != ERROR_SUCCESS) return ret; if (data) { if (*count < req->len) ret = ERROR_MORE_DATA; else { /* copy the data */ unsigned int max = server_remaining( req->data ); unsigned int pos = 0; while (pos < req->len) { unsigned int len = min( req->len - pos, max ); memcpy( data + pos, req->data, len ); if ((pos += len) >= req->len) break; req->offset = pos; if ((ret = copy_nameW( req->name, name )) != ERROR_SUCCESS) return ret; if ((ret = reg_server_call( REQ_GET_KEY_VALUE )) != ERROR_SUCCESS) return ret; } } /* if the type is REG_SZ and data is not 0-terminated * and there is enough space in the buffer NT appends a \0 */ if (req->len && is_string(req->type) && (req->len < *count) && ((WCHAR *)data)[req->len-1]) ((WCHAR *)data)[req->len] = 0; } if (type) *type = req->type; if (count) *count = req->len; return ret; } /****************************************************************************** * RegQueryValueExA [ADVAPI32.157] * * NOTES: * the documentation is wrong: if the buffer is to small it remains untouched */ DWORD WINAPI RegQueryValueExA( HKEY hkey, LPCSTR name, LPDWORD reserved, LPDWORD type, LPBYTE data, LPDWORD count ) { DWORD ret, total_len; struct get_key_value_request *req = get_req_buffer(); TRACE("(0x%x,%s,%p,%p,%p,%p=%ld)\n", hkey, debugstr_a(name), reserved, type, data, count, count ? *count : 0 ); if ((data && !count) || reserved) return ERROR_INVALID_PARAMETER; req->hkey = hkey; req->offset = 0; if ((ret = copy_nameAtoW( req->name, name )) != ERROR_SUCCESS) return ret; if ((ret = reg_server_call( REQ_GET_KEY_VALUE )) != ERROR_SUCCESS) return ret; total_len = is_string( req->type ) ? req->len/sizeof(WCHAR) : req->len; if (data) { if (*count < total_len) ret = ERROR_MORE_DATA; else { /* copy the data */ unsigned int max = server_remaining( req->data ); unsigned int pos = 0; while (pos < req->len) { unsigned int len = min( req->len - pos, max ); if (is_string( req->type )) memcpyWtoA( data + pos/sizeof(WCHAR), (WCHAR *)req->data, len/sizeof(WCHAR) ); else memcpy( data + pos, req->data, len ); if ((pos += len) >= req->len) break; req->offset = pos; if ((ret = copy_nameAtoW( req->name, name )) != ERROR_SUCCESS) return ret; if ((ret = reg_server_call( REQ_GET_KEY_VALUE )) != ERROR_SUCCESS) return ret; } } /* if the type is REG_SZ and data is not 0-terminated * and there is enough space in the buffer NT appends a \0 */ if (total_len && is_string(req->type) && (total_len < *count) && data[total_len-1]) data[total_len] = 0; } if (count) *count = total_len; if (type) *type = req->type; return ret; } /****************************************************************************** * RegQueryValueW [ADVAPI32.159] */ DWORD WINAPI RegQueryValueW( HKEY hkey, LPCWSTR name, LPWSTR data, LPLONG count ) { DWORD ret; HKEY subkey = hkey; TRACE("(%x,%s,%p,%ld)\n", hkey, debugstr_w(name), data, count ? *count : 0 ); if (name && name[0]) { if ((ret = RegOpenKeyW( hkey, name, &subkey )) != ERROR_SUCCESS) return ret; } ret = RegQueryValueExW( subkey, NULL, NULL, NULL, (LPBYTE)data, count ); if (subkey != hkey) RegCloseKey( subkey ); if (ret == ERROR_FILE_NOT_FOUND) { /* return empty string if default value not found */ if (data) *data = 0; if (count) *count = 1; ret = ERROR_SUCCESS; } return ret; } /****************************************************************************** * RegQueryValueA [ADVAPI32.156] */ DWORD WINAPI RegQueryValueA( HKEY hkey, LPCSTR name, LPSTR data, LPLONG count ) { DWORD ret; HKEY subkey = hkey; TRACE("(%x,%s,%p,%ld)\n", hkey, debugstr_a(name), data, count ? *count : 0 ); if (name && name[0]) { if ((ret = RegOpenKeyA( hkey, name, &subkey )) != ERROR_SUCCESS) return ret; } ret = RegQueryValueExA( subkey, NULL, NULL, NULL, (LPBYTE)data, count ); if (subkey != hkey) RegCloseKey( subkey ); if (ret == ERROR_FILE_NOT_FOUND) { /* return empty string if default value not found */ if (data) *data = 0; if (count) *count = 1; ret = ERROR_SUCCESS; } return ret; } /****************************************************************************** * RegEnumValueW [ADVAPI32.142] * * PARAMS * hkey [I] Handle to key to query * index [I] Index of value to query * value [O] Value string * val_count [I/O] Size of value buffer (in wchars) * reserved [I] Reserved * type [O] Type code * data [O] Value data * count [I/O] Size of data buffer (in bytes) */ DWORD WINAPI RegEnumValueW( HKEY hkey, DWORD index, LPWSTR value, LPDWORD val_count, LPDWORD reserved, LPDWORD type, LPBYTE data, LPDWORD count ) { DWORD ret, len; struct enum_key_value_request *req = get_req_buffer(); TRACE("(%x,%ld,%p,%p,%p,%p,%p,%p)\n", hkey, index, value, val_count, reserved, type, data, count ); /* NT only checks count, not val_count */ if ((data && !count) || reserved) return ERROR_INVALID_PARAMETER; req->hkey = hkey; req->index = index; req->offset = 0; if ((ret = reg_server_call( REQ_ENUM_KEY_VALUE )) != ERROR_SUCCESS) return ret; len = lstrlenW( req->name ) + 1; if (len > *val_count) return ERROR_MORE_DATA; memcpy( value, req->name, len * sizeof(WCHAR) ); *val_count = len - 1; if (data) { if (*count < req->len) ret = ERROR_MORE_DATA; else { /* copy the data */ unsigned int max = server_remaining( req->data ); unsigned int pos = 0; while (pos < req->len) { unsigned int len = min( req->len - pos, max ); memcpy( data + pos, req->data, len ); if ((pos += len) >= req->len) break; req->offset = pos; if ((ret = reg_server_call( REQ_ENUM_KEY_VALUE )) != ERROR_SUCCESS) return ret; } } /* if the type is REG_SZ and data is not 0-terminated * and there is enough space in the buffer NT appends a \0 */ if (req->len && is_string(req->type) && (req->len < *count) && ((WCHAR *)data)[req->len-1]) ((WCHAR *)data)[req->len] = 0; } if (type) *type = req->type; if (count) *count = req->len; return ret; } /****************************************************************************** * RegEnumValueA [ADVAPI32.141] */ DWORD WINAPI RegEnumValueA( HKEY hkey, DWORD index, LPSTR value, LPDWORD val_count, LPDWORD reserved, LPDWORD type, LPBYTE data, LPDWORD count ) { DWORD ret, len, total_len; struct enum_key_value_request *req = get_req_buffer(); TRACE("(%x,%ld,%p,%p,%p,%p,%p,%p)\n", hkey, index, value, val_count, reserved, type, data, count ); /* NT only checks count, not val_count */ if ((data && !count) || reserved) return ERROR_INVALID_PARAMETER; req->hkey = hkey; req->index = index; req->offset = 0; if ((ret = reg_server_call( REQ_ENUM_KEY_VALUE )) != ERROR_SUCCESS) return ret; len = lstrlenW( req->name ) + 1; if (len > *val_count) return ERROR_MORE_DATA; memcpyWtoA( value, req->name, len ); *val_count = len - 1; total_len = is_string( req->type ) ? req->len/sizeof(WCHAR) : req->len; if (data) { if (*count < total_len) ret = ERROR_MORE_DATA; else { /* copy the data */ unsigned int max = server_remaining( req->data ); unsigned int pos = 0; while (pos < req->len) { unsigned int len = min( req->len - pos, max ); if (is_string( req->type )) memcpyWtoA( data + pos/sizeof(WCHAR), (WCHAR *)req->data, len/sizeof(WCHAR) ); else memcpy( data + pos, req->data, len ); if ((pos += len) >= req->len) break; req->offset = pos; if ((ret = reg_server_call( REQ_ENUM_KEY_VALUE )) != ERROR_SUCCESS) return ret; } } /* if the type is REG_SZ and data is not 0-terminated * and there is enough space in the buffer NT appends a \0 */ if (total_len && is_string(req->type) && (total_len < *count) && data[total_len-1]) data[total_len] = 0; } if (count) *count = total_len; if (type) *type = req->type; return ret; } /****************************************************************************** * RegDeleteValueW [ADVAPI32.136] * * PARAMS * hkey [I] handle to key * name [I] name of value to delete * * RETURNS * error status */ DWORD WINAPI RegDeleteValueW( HKEY hkey, LPCWSTR name ) { DWORD ret; struct delete_key_value_request *req = get_req_buffer(); TRACE( "(0x%x,%s)\n", hkey, debugstr_w(name) ); req->hkey = hkey; if ((ret = copy_nameW( req->name, name )) != ERROR_SUCCESS) return ret; return reg_server_call( REQ_DELETE_KEY_VALUE ); } /****************************************************************************** * RegDeleteValueA [ADVAPI32.135] */ DWORD WINAPI RegDeleteValueA( HKEY hkey, LPCSTR name ) { DWORD ret; struct delete_key_value_request *req = get_req_buffer(); TRACE( "(0x%x,%s)\n", hkey, debugstr_a(name) ); req->hkey = hkey; if ((ret = copy_nameAtoW( req->name, name )) != ERROR_SUCCESS) return ret; return reg_server_call( REQ_DELETE_KEY_VALUE ); } /****************************************************************************** * RegLoadKeyW [ADVAPI32.185] * * PARAMS * hkey [I] Handle of open key * subkey [I] Address of name of subkey * filename [I] Address of filename for registry information */ LONG WINAPI RegLoadKeyW( HKEY hkey, LPCWSTR subkey, LPCWSTR filename ) { struct load_registry_request *req = get_req_buffer(); HANDLE file; DWORD ret, err = GetLastError(); TRACE( "(%x,%s,%s)\n", hkey, debugstr_w(subkey), debugstr_w(filename) ); if (!filename || !*filename) return ERROR_INVALID_PARAMETER; if (!subkey || !*subkey) return ERROR_INVALID_PARAMETER; if ((file = CreateFileW( filename, GENERIC_READ, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, -1 )) == INVALID_HANDLE_VALUE) { ret = GetLastError(); goto done; } req->hkey = hkey; req->file = file; if ((ret = copy_nameW( req->name, subkey )) != ERROR_SUCCESS) goto done; ret = reg_server_call( REQ_LOAD_REGISTRY ); CloseHandle( file ); done: SetLastError( err ); /* restore the last error code */ return ret; } /****************************************************************************** * RegLoadKeyA [ADVAPI32.184] */ LONG WINAPI RegLoadKeyA( HKEY hkey, LPCSTR subkey, LPCSTR filename ) { struct load_registry_request *req = get_req_buffer(); HANDLE file; DWORD ret, err = GetLastError(); TRACE( "(%x,%s,%s)\n", hkey, debugstr_a(subkey), debugstr_a(filename) ); if (!filename || !*filename) return ERROR_INVALID_PARAMETER; if (!subkey || !*subkey) return ERROR_INVALID_PARAMETER; if ((file = CreateFileA( filename, GENERIC_READ, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, -1 )) == INVALID_HANDLE_VALUE) { ret = GetLastError(); goto done; } req->hkey = hkey; req->file = file; if ((ret = copy_nameAtoW( req->name, subkey )) != ERROR_SUCCESS) goto done; ret = reg_server_call( REQ_LOAD_REGISTRY ); CloseHandle( file ); done: SetLastError( err ); /* restore the last error code */ return ret; } /****************************************************************************** * RegSaveKeyA [ADVAPI32.165] * * PARAMS * hkey [I] Handle of key where save begins * lpFile [I] Address of filename to save to * sa [I] Address of security structure */ LONG WINAPI RegSaveKeyA( HKEY hkey, LPCSTR file, LPSECURITY_ATTRIBUTES sa ) { struct save_registry_request *req = get_req_buffer(); char buffer[1024]; int count = 0; LPSTR name; DWORD ret, err; HFILE handle; TRACE( "(%x,%s,%p)\n", hkey, debugstr_a(file), sa ); if (!file || !*file) return ERROR_INVALID_PARAMETER; err = GetLastError(); GetFullPathNameA( file, sizeof(buffer), buffer, &name ); for (;;) { sprintf( name, "reg%04x.tmp", count++ ); handle = CreateFileA( buffer, GENERIC_WRITE, 0, NULL, CREATE_NEW, FILE_ATTRIBUTE_NORMAL, -1 ); if (handle != INVALID_HANDLE_VALUE) break; if ((ret = GetLastError()) != ERROR_ALREADY_EXISTS) goto done; /* Something gone haywire ? Please report if this happens abnormally */ if (count >= 100) MESSAGE("Wow, we are already fiddling with a temp file %s with an ordinal as high as %d !\nYou might want to delete all corresponding temp files in that directory.\n", buffer, count); } req->hkey = hkey; req->file = handle; ret = reg_server_call( REQ_SAVE_REGISTRY ); CloseHandle( handle ); if (!ret) { if (!MoveFileExA( buffer, file, MOVEFILE_REPLACE_EXISTING )) { ERR( "Failed to move %s to %s\n", buffer, file ); ret = GetLastError(); } } if (ret) DeleteFileA( buffer ); done: SetLastError( err ); /* restore last error code */ return ret; } /****************************************************************************** * RegSaveKeyW [ADVAPI32.166] */ LONG WINAPI RegSaveKeyW( HKEY hkey, LPCWSTR file, LPSECURITY_ATTRIBUTES sa ) { LPSTR fileA = HEAP_strdupWtoA( GetProcessHeap(), 0, file ); DWORD ret = RegSaveKeyA( hkey, fileA, sa ); if (fileA) HeapFree( GetProcessHeap(), 0, fileA ); return ret; } wine-20000526/dlls/advapi32/security.c0100644000175000001440000006053407070212243017031 0ustar julliardusers/* * dlls/advapi32/security.c * FIXME: for all functions thunking down to Rtl* functions: implement SetLastError() */ #include #include "windef.h" #include "winerror.h" #include "heap.h" #include "ntddk.h" #include "ntsecapi.h" #include "debugtools.h" #include "winversion.h" DEFAULT_DEBUG_CHANNEL(advapi); #define CallWin32ToNt(func) \ { NTSTATUS ret; \ ret = (func); \ if (ret !=STATUS_SUCCESS) \ { SetLastError (RtlNtStatusToDosError(ret)); return FALSE; } \ return TRUE; \ } static void dumpLsaAttributes( PLSA_OBJECT_ATTRIBUTES oa ) { if (oa) { TRACE("\n\tlength=%lu, rootdir=0x%08x, objectname=%s\n\tattr=0x%08lx, sid=%p qos=%p\n", oa->Length, oa->RootDirectory, oa->ObjectName?debugstr_w(oa->ObjectName->Buffer):"null", oa->Attributes, oa->SecurityDescriptor, oa->SecurityQualityOfService); } } /* ############################## ###### TOKEN FUNCTIONS ###### ############################## */ /****************************************************************************** * OpenProcessToken [ADVAPI32.109] * Opens the access token associated with a process * * PARAMS * ProcessHandle [I] Handle to process * DesiredAccess [I] Desired access to process * TokenHandle [O] Pointer to handle of open access token * * RETURNS STD */ BOOL WINAPI OpenProcessToken( HANDLE ProcessHandle, DWORD DesiredAccess, HANDLE *TokenHandle ) { CallWin32ToNt(NtOpenProcessToken( ProcessHandle, DesiredAccess, TokenHandle )); } /****************************************************************************** * OpenThreadToken [ADVAPI32.114] * * PARAMS * thread [] * desiredaccess [] * openasself [] * thandle [] */ BOOL WINAPI OpenThreadToken( HANDLE ThreadHandle, DWORD DesiredAccess, BOOL OpenAsSelf, HANDLE *TokenHandle) { CallWin32ToNt (NtOpenThreadToken(ThreadHandle, DesiredAccess, OpenAsSelf, TokenHandle)); } /****************************************************************************** * AdjustTokenPrivileges [ADVAPI32.10] * * PARAMS * TokenHandle [] * DisableAllPrivileges [] * NewState [] * BufferLength [] * PreviousState [] * ReturnLength [] */ BOOL WINAPI AdjustTokenPrivileges( HANDLE TokenHandle, BOOL DisableAllPrivileges, LPVOID NewState, DWORD BufferLength, LPVOID PreviousState, LPDWORD ReturnLength ) { CallWin32ToNt(NtAdjustPrivilegesToken(TokenHandle, DisableAllPrivileges, NewState, BufferLength, PreviousState, ReturnLength)); } /****************************************************************************** * GetTokenInformation [ADVAPI32.66] * * PARAMS * token [] * tokeninfoclass [] * tokeninfo [] * tokeninfolength [] * retlen [] * */ BOOL WINAPI GetTokenInformation( HANDLE token, TOKEN_INFORMATION_CLASS tokeninfoclass, LPVOID tokeninfo, DWORD tokeninfolength, LPDWORD retlen ) { CallWin32ToNt (NtQueryInformationToken( token, tokeninfoclass, tokeninfo, tokeninfolength, retlen)); } /************************************************************************* * SetThreadToken [ADVAPI32.231] * * Assigns an "impersonation token" to a thread so it can assume the * security privledges of another thread or process. Can also remove * a previously assigned token. Only supported on NT - it's a stub * exactly like this one on Win9X. * */ BOOL WINAPI SetThreadToken(PHANDLE thread, HANDLE token) { FIXME("(%p, %x): stub\n", thread, token); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /* ############################## ###### SID FUNCTIONS ###### ############################## */ /****************************************************************************** * AllocateAndInitializeSid [ADVAPI32.11] * * PARAMS * pIdentifierAuthority [] * nSubAuthorityCount [] * nSubAuthority0 [] * nSubAuthority1 [] * nSubAuthority2 [] * nSubAuthority3 [] * nSubAuthority4 [] * nSubAuthority5 [] * nSubAuthority6 [] * nSubAuthority7 [] * pSid [] */ BOOL WINAPI AllocateAndInitializeSid( PSID_IDENTIFIER_AUTHORITY pIdentifierAuthority, BYTE nSubAuthorityCount, DWORD nSubAuthority0, DWORD nSubAuthority1, DWORD nSubAuthority2, DWORD nSubAuthority3, DWORD nSubAuthority4, DWORD nSubAuthority5, DWORD nSubAuthority6, DWORD nSubAuthority7, PSID *pSid ) { CallWin32ToNt (RtlAllocateAndInitializeSid( pIdentifierAuthority, nSubAuthorityCount, nSubAuthority0, nSubAuthority1, nSubAuthority2, nSubAuthority3, nSubAuthority4, nSubAuthority5, nSubAuthority6, nSubAuthority7, pSid )); } /****************************************************************************** * FreeSid [ADVAPI32.42] * * PARAMS * pSid [] */ PVOID WINAPI FreeSid( PSID pSid ) { RtlFreeSid(pSid); return NULL; /* is documented like this */ } /****************************************************************************** * CopySid [ADVAPI32.24] * * PARAMS * nDestinationSidLength [] * pDestinationSid [] * pSourceSid [] */ BOOL WINAPI CopySid( DWORD nDestinationSidLength, PSID pDestinationSid, PSID pSourceSid ) { return RtlCopySid(nDestinationSidLength, pDestinationSid, pSourceSid); } /****************************************************************************** * IsValidSid [ADVAPI32.80] * * PARAMS * pSid [] */ BOOL WINAPI IsValidSid( PSID pSid ) { return RtlValidSid( pSid ); } /****************************************************************************** * EqualSid [ADVAPI32.40] * * PARAMS * pSid1 [] * pSid2 [] */ BOOL WINAPI EqualSid( PSID pSid1, PSID pSid2 ) { return RtlEqualSid( pSid1, pSid2 ); } /****************************************************************************** * EqualPrefixSid [ADVAPI32.39] */ BOOL WINAPI EqualPrefixSid (PSID pSid1, PSID pSid2) { return RtlEqualPrefixSid(pSid1, pSid2); } /****************************************************************************** * GetSidLengthRequired [ADVAPI32.63] * * PARAMS * nSubAuthorityCount [] */ DWORD WINAPI GetSidLengthRequired( BYTE nSubAuthorityCount ) { return RtlLengthRequiredSid(nSubAuthorityCount); } /****************************************************************************** * InitializeSid [ADVAPI32.74] * * PARAMS * pIdentifierAuthority [] */ BOOL WINAPI InitializeSid ( PSID pSid, PSID_IDENTIFIER_AUTHORITY pIdentifierAuthority, BYTE nSubAuthorityCount) { return RtlInitializeSid(pSid, pIdentifierAuthority, nSubAuthorityCount); } /****************************************************************************** * GetSidIdentifierAuthority [ADVAPI32.62] * * PARAMS * pSid [] */ PSID_IDENTIFIER_AUTHORITY WINAPI GetSidIdentifierAuthority( PSID pSid ) { return RtlIdentifierAuthoritySid(pSid); } /****************************************************************************** * GetSidSubAuthority [ADVAPI32.64] * * PARAMS * pSid [] * nSubAuthority [] */ PDWORD WINAPI GetSidSubAuthority( PSID pSid, DWORD nSubAuthority ) { return RtlSubAuthoritySid(pSid, nSubAuthority); } /****************************************************************************** * GetSidSubAuthorityCount [ADVAPI32.65] * * PARAMS * pSid [] */ PUCHAR WINAPI GetSidSubAuthorityCount (PSID pSid) { return RtlSubAuthorityCountSid(pSid); } /****************************************************************************** * GetLengthSid [ADVAPI32.48] * * PARAMS * pSid [] */ DWORD WINAPI GetLengthSid (PSID pSid) { return RtlLengthSid(pSid); } /* ############################################## ###### SECURITY DESCRIPTOR FUNCTIONS ###### ############################################## */ /****************************************************************************** * InitializeSecurityDescriptor [ADVAPI32.73] * * PARAMS * pDescr [] * revision [] */ BOOL WINAPI InitializeSecurityDescriptor( SECURITY_DESCRIPTOR *pDescr, DWORD revision ) { CallWin32ToNt (RtlCreateSecurityDescriptor(pDescr, revision )); } /****************************************************************************** * GetSecurityDescriptorLength [ADVAPI32.55] */ DWORD WINAPI GetSecurityDescriptorLength( SECURITY_DESCRIPTOR *pDescr) { return (RtlLengthSecurityDescriptor(pDescr)); } /****************************************************************************** * GetSecurityDescriptorOwner [ADVAPI32.56] * * PARAMS * pOwner [] * lpbOwnerDefaulted [] */ BOOL WINAPI GetSecurityDescriptorOwner( SECURITY_DESCRIPTOR *pDescr, PSID *pOwner, LPBOOL lpbOwnerDefaulted ) { CallWin32ToNt (RtlGetOwnerSecurityDescriptor( pDescr, pOwner, (PBOOLEAN)lpbOwnerDefaulted )); } /****************************************************************************** * SetSecurityDescriptorOwner [ADVAPI32] * * PARAMS */ BOOL WINAPI SetSecurityDescriptorOwner( PSECURITY_DESCRIPTOR pSecurityDescriptor, PSID pOwner, BOOL bOwnerDefaulted) { CallWin32ToNt (RtlSetOwnerSecurityDescriptor(pSecurityDescriptor, pOwner, bOwnerDefaulted)); } /****************************************************************************** * GetSecurityDescriptorGroup [ADVAPI32.54] */ BOOL WINAPI GetSecurityDescriptorGroup( PSECURITY_DESCRIPTOR SecurityDescriptor, PSID *Group, LPBOOL GroupDefaulted) { CallWin32ToNt (RtlGetGroupSecurityDescriptor(SecurityDescriptor, Group, (PBOOLEAN)GroupDefaulted)); } /****************************************************************************** * SetSecurityDescriptorGroup */ BOOL WINAPI SetSecurityDescriptorGroup ( PSECURITY_DESCRIPTOR SecurityDescriptor, PSID Group, BOOL GroupDefaulted) { CallWin32ToNt (RtlSetGroupSecurityDescriptor( SecurityDescriptor, Group, GroupDefaulted)); } /****************************************************************************** * IsValidSecurityDescriptor [ADVAPI32.79] * * PARAMS * lpsecdesc [] */ BOOL WINAPI IsValidSecurityDescriptor( PSECURITY_DESCRIPTOR SecurityDescriptor ) { CallWin32ToNt (RtlValidSecurityDescriptor(SecurityDescriptor)); } /****************************************************************************** * GetSecurityDescriptorDacl [ADVAPI.91] */ BOOL WINAPI GetSecurityDescriptorDacl( IN PSECURITY_DESCRIPTOR pSecurityDescriptor, OUT LPBOOL lpbDaclPresent, OUT PACL *pDacl, OUT LPBOOL lpbDaclDefaulted) { CallWin32ToNt (RtlGetDaclSecurityDescriptor(pSecurityDescriptor, (PBOOLEAN)lpbDaclPresent, pDacl, (PBOOLEAN)lpbDaclDefaulted)); } /****************************************************************************** * SetSecurityDescriptorDacl [ADVAPI.224] */ BOOL WINAPI SetSecurityDescriptorDacl ( PSECURITY_DESCRIPTOR lpsd, BOOL daclpresent, PACL dacl, BOOL dacldefaulted ) { CallWin32ToNt (RtlSetDaclSecurityDescriptor (lpsd, daclpresent, dacl, dacldefaulted )); } /****************************************************************************** * GetSecurityDescriptorSacl [ADVAPI.] */ BOOL WINAPI GetSecurityDescriptorSacl( IN PSECURITY_DESCRIPTOR lpsd, OUT LPBOOL lpbSaclPresent, OUT PACL *pSacl, OUT LPBOOL lpbSaclDefaulted) { CallWin32ToNt (RtlGetSaclSecurityDescriptor(lpsd, (PBOOLEAN)lpbSaclPresent, pSacl, (PBOOLEAN)lpbSaclDefaulted)); } /************************************************************************** * SetSecurityDescriptorSacl [NTDLL.488] */ BOOL WINAPI SetSecurityDescriptorSacl ( PSECURITY_DESCRIPTOR lpsd, BOOL saclpresent, PACL lpsacl, BOOL sacldefaulted) { CallWin32ToNt (RtlSetSaclSecurityDescriptor(lpsd, saclpresent, lpsacl, sacldefaulted)); } /****************************************************************************** * MakeSelfRelativeSD [ADVAPI32.95] * * PARAMS * lpabssecdesc [] * lpselfsecdesc [] * lpbuflen [] */ BOOL WINAPI MakeSelfRelativeSD( IN PSECURITY_DESCRIPTOR pAbsoluteSecurityDescriptor, IN PSECURITY_DESCRIPTOR pSelfRelativeSecurityDescriptor, IN OUT LPDWORD lpdwBufferLength) { CallWin32ToNt (RtlMakeSelfRelativeSD(pAbsoluteSecurityDescriptor,pSelfRelativeSecurityDescriptor, lpdwBufferLength)); } /****************************************************************************** * GetSecurityDescriptorControl [ADVAPI32] */ BOOL WINAPI GetSecurityDescriptorControl ( PSECURITY_DESCRIPTOR pSecurityDescriptor, PSECURITY_DESCRIPTOR_CONTROL pControl, LPDWORD lpdwRevision) { CallWin32ToNt (RtlGetControlSecurityDescriptor(pSecurityDescriptor,pControl,lpdwRevision)); } /* ############################## ###### ACL FUNCTIONS ###### ############################## */ /************************************************************************* * InitializeAcl [ADVAPI32.111] */ DWORD WINAPI InitializeAcl(PACL acl, DWORD size, DWORD rev) { CallWin32ToNt (RtlCreateAcl(acl, size, rev)); } /* ############################## ###### MISC FUNCTIONS ###### ############################## */ /****************************************************************************** * LookupPrivilegeValueW [ADVAPI32.93] * Retrieves LUID used on a system to represent the privilege name. * * NOTES * lpLuid should be PLUID * * PARAMS * lpSystemName [I] Address of string specifying the system * lpName [I] Address of string specifying the privilege * lpLuid [I] Address of locally unique identifier * * RETURNS STD */ BOOL WINAPI LookupPrivilegeValueW( LPCWSTR lpSystemName, LPCWSTR lpName, LPVOID lpLuid ) { FIXME("(%s,%s,%p): stub\n",debugstr_w(lpSystemName), debugstr_w(lpName), lpLuid); return TRUE; } /****************************************************************************** * LookupPrivilegeValueA [ADVAPI32.92] */ BOOL WINAPI LookupPrivilegeValueA( LPCSTR lpSystemName, LPCSTR lpName, LPVOID lpLuid ) { LPWSTR lpSystemNameW = HEAP_strdupAtoW(GetProcessHeap(), 0, lpSystemName); LPWSTR lpNameW = HEAP_strdupAtoW(GetProcessHeap(), 0, lpName); BOOL ret; ret = LookupPrivilegeValueW( lpSystemNameW, lpNameW, lpLuid); HeapFree(GetProcessHeap(), 0, lpNameW); HeapFree(GetProcessHeap(), 0, lpSystemNameW); return ret; } /****************************************************************************** * GetFileSecurityA [ADVAPI32.45] * * Obtains Specified information about the security of a file or directory * The information obtained is constrained by the callers access rights and * privileges */ BOOL WINAPI GetFileSecurityA( LPCSTR lpFileName, SECURITY_INFORMATION RequestedInformation, PSECURITY_DESCRIPTOR pSecurityDescriptor, DWORD nLength, LPDWORD lpnLengthNeeded ) { FIXME("(%s) : stub\n", debugstr_a(lpFileName)); return TRUE; } /****************************************************************************** * GetFileSecurityW [ADVAPI32.46] * * Obtains Specified information about the security of a file or directory * The information obtained is constrained by the callers access rights and * privileges * * PARAMS * lpFileName [] * RequestedInformation [] * pSecurityDescriptor [] * nLength [] * lpnLengthNeeded [] */ BOOL WINAPI GetFileSecurityW( LPCWSTR lpFileName, SECURITY_INFORMATION RequestedInformation, PSECURITY_DESCRIPTOR pSecurityDescriptor, DWORD nLength, LPDWORD lpnLengthNeeded ) { FIXME("(%s) : stub\n", debugstr_w(lpFileName) ); return TRUE; } /****************************************************************************** * LookupAccountSidA [ADVAPI32.86] */ BOOL WINAPI LookupAccountSidA( IN LPCSTR system, IN PSID sid, OUT LPSTR account, IN OUT LPDWORD accountSize, OUT LPSTR domain, IN OUT LPDWORD domainSize, OUT PSID_NAME_USE name_use ) { char * ac = "Administrator"; char * dm = "DOMAIN"; FIXME("(%s,sid=%p,%p,%p(%lu),%p,%p(%lu),%p): semi-stub\n", debugstr_a(system),sid, account,accountSize,accountSize?*accountSize:0, domain,domainSize,domainSize?*domainSize:0, name_use); if (accountSize) *accountSize = strlen(ac)+1; if (account && (*accountSize > strlen(ac))) strcpy(account, ac); if (domainSize) *domainSize = strlen(dm)+1; if (domain && (*domainSize > strlen(dm))) strcpy(domain,dm); if (name_use) *name_use = SidTypeUser; return TRUE; } /****************************************************************************** * LookupAccountSidW [ADVAPI32.87] * * PARAMS * system [] * sid [] * account [] * accountSize [] * domain [] * domainSize [] * name_use [] */ BOOL WINAPI LookupAccountSidW( IN LPCWSTR system, IN PSID sid, OUT LPWSTR account, IN OUT LPDWORD accountSize, OUT LPWSTR domain, IN OUT LPDWORD domainSize, OUT PSID_NAME_USE name_use ) { char * ac = "Administrator"; char * dm = "DOMAIN"; FIXME("(%s,sid=%p,%p,%p(%lu),%p,%p(%lu),%p): semi-stub\n", debugstr_w(system),sid, account,accountSize,accountSize?*accountSize:0, domain,domainSize,domainSize?*domainSize:0, name_use); if (accountSize) *accountSize = strlen(ac)+1; if (account && (*accountSize > strlen(ac))) lstrcpyAtoW(account, ac); if (domainSize) *domainSize = strlen(dm)+1; if (domain && (*domainSize > strlen(dm))) lstrcpyAtoW(domain,dm); if (name_use) *name_use = SidTypeUser; return TRUE; } /****************************************************************************** * SetFileSecurityA [ADVAPI32.182] * Sets the security of a file or directory */ BOOL WINAPI SetFileSecurityA( LPCSTR lpFileName, SECURITY_INFORMATION RequestedInformation, PSECURITY_DESCRIPTOR pSecurityDescriptor) { FIXME("(%s) : stub\n", debugstr_a(lpFileName)); return TRUE; } /****************************************************************************** * SetFileSecurityW [ADVAPI32.183] * Sets the security of a file or directory * * PARAMS * lpFileName [] * RequestedInformation [] * pSecurityDescriptor [] */ BOOL WINAPI SetFileSecurityW( LPCWSTR lpFileName, SECURITY_INFORMATION RequestedInformation, PSECURITY_DESCRIPTOR pSecurityDescriptor ) { FIXME("(%s) : stub\n", debugstr_w(lpFileName) ); return TRUE; } /****************************************************************************** * QueryWindows31FilesMigration [ADVAPI32.266] * * PARAMS * x1 [] */ BOOL WINAPI QueryWindows31FilesMigration( DWORD x1 ) { FIXME("(%ld):stub\n",x1); return TRUE; } /****************************************************************************** * SynchronizeWindows31FilesAndWindowsNTRegistry [ADVAPI32.265] * * PARAMS * x1 [] * x2 [] * x3 [] * x4 [] */ BOOL WINAPI SynchronizeWindows31FilesAndWindowsNTRegistry( DWORD x1, DWORD x2, DWORD x3, DWORD x4 ) { FIXME("(0x%08lx,0x%08lx,0x%08lx,0x%08lx):stub\n",x1,x2,x3,x4); return TRUE; } /****************************************************************************** * LsaOpenPolicy [ADVAPI32.200] * * PARAMS * x1 [] * x2 [] * x3 [] * x4 [] */ NTSTATUS WINAPI LsaOpenPolicy( IN PLSA_UNICODE_STRING SystemName, IN PLSA_OBJECT_ATTRIBUTES ObjectAttributes, IN ACCESS_MASK DesiredAccess, IN OUT PLSA_HANDLE PolicyHandle) { FIXME("(%s,%p,0x%08lx,%p):stub\n", SystemName?debugstr_w(SystemName->Buffer):"null", ObjectAttributes, DesiredAccess, PolicyHandle); dumpLsaAttributes(ObjectAttributes); if(PolicyHandle) *PolicyHandle = (LSA_HANDLE)0xcafe; return TRUE; } /****************************************************************************** * LsaQueryInformationPolicy [ADVAPI32.242] */ NTSTATUS WINAPI LsaQueryInformationPolicy( IN LSA_HANDLE PolicyHandle, IN POLICY_INFORMATION_CLASS InformationClass, OUT PVOID *Buffer) { FIXME("(%p,0x%08x,%p):stub\n", PolicyHandle, InformationClass, Buffer); if(!Buffer) return FALSE; switch (InformationClass) { case PolicyAuditEventsInformation: /* 2 */ { PPOLICY_AUDIT_EVENTS_INFO p = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(POLICY_AUDIT_EVENTS_INFO)); p->AuditingMode = FALSE; /* no auditing */ *Buffer = p; } break; case PolicyPrimaryDomainInformation: /* 3 */ case PolicyAccountDomainInformation: /* 5 */ { struct di { POLICY_PRIMARY_DOMAIN_INFO ppdi; SID sid; }; SID_IDENTIFIER_AUTHORITY localSidAuthority = {SECURITY_NT_AUTHORITY}; struct di * xdi = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(xdi)); RtlInitUnicodeString(&(xdi->ppdi.Name), HEAP_strdupAtoW(GetProcessHeap(),0,"DOMAIN")); xdi->ppdi.Sid = &(xdi->sid); xdi->sid.Revision = SID_REVISION; xdi->sid.SubAuthorityCount = 1; xdi->sid.IdentifierAuthority = localSidAuthority; xdi->sid.SubAuthority[0] = SECURITY_LOCAL_SYSTEM_RID; *Buffer = xdi; } break; case PolicyAuditLogInformation: case PolicyPdAccountInformation: case PolicyLsaServerRoleInformation: case PolicyReplicaSourceInformation: case PolicyDefaultQuotaInformation: case PolicyModificationInformation: case PolicyAuditFullSetInformation: case PolicyAuditFullQueryInformation: case PolicyDnsDomainInformation: { FIXME("category not implemented\n"); return FALSE; } } return TRUE; } /****************************************************************************** * LsaLookupSids [ADVAPI32.240] */ typedef struct { SID_NAME_USE Use; LSA_UNICODE_STRING Name; LONG DomainIndex; } LSA_TRANSLATED_NAME, *PLSA_TRANSLATED_NAME; typedef struct { LSA_UNICODE_STRING Name; PSID Sid; } LSA_TRUST_INFORMATION, *PLSA_TRUST_INFORMATION; typedef struct { ULONG Entries; PLSA_TRUST_INFORMATION Domains; } LSA_REFERENCED_DOMAIN_LIST, *PLSA_REFERENCED_DOMAIN_LIST; NTSTATUS WINAPI LsaLookupSids( IN LSA_HANDLE PolicyHandle, IN ULONG Count, IN PSID *Sids, OUT PLSA_REFERENCED_DOMAIN_LIST *ReferencedDomains, OUT PLSA_TRANSLATED_NAME *Names ) { FIXME("%p %lu %p %p %p\n", PolicyHandle, Count, Sids, ReferencedDomains, Names); return FALSE; } /****************************************************************************** * LsaFreeMemory [ADVAPI32.241] */ NTSTATUS WINAPI LsaFreeMemory(IN PVOID Buffer) { TRACE("(%p)\n",Buffer); return HeapFree(GetProcessHeap(), 0, Buffer); } /****************************************************************************** * LsaClose [ADVAPI32.243] */ NTSTATUS WINAPI LsaClose(IN LSA_HANDLE ObjectHandle) { FIXME("(%p):stub\n",ObjectHandle); return 0xc0000000; } /****************************************************************************** * NotifyBootConfigStatus [ADVAPI32.97] * * PARAMS * x1 [] */ BOOL WINAPI NotifyBootConfigStatus( DWORD x1 ) { FIXME("(0x%08lx):stub\n",x1); return 1; } /****************************************************************************** * RevertToSelf [ADVAPI32.180] * * PARAMS * void [] */ BOOL WINAPI RevertToSelf( void ) { FIXME("(), stub\n"); return TRUE; } /****************************************************************************** * ImpersonateSelf [ADVAPI32.71] */ BOOL WINAPI ImpersonateSelf(SECURITY_IMPERSONATION_LEVEL ImpersonationLevel) { return RtlImpersonateSelf(ImpersonationLevel); } /****************************************************************************** * AccessCheck [ADVAPI32.71] * * FIXME check cast LPBOOL to PBOOLEAN */ BOOL WINAPI AccessCheck( PSECURITY_DESCRIPTOR SecurityDescriptor, HANDLE ClientToken, DWORD DesiredAccess, PGENERIC_MAPPING GenericMapping, PPRIVILEGE_SET PrivilegeSet, LPDWORD PrivilegeSetLength, LPDWORD GrantedAccess, LPBOOL AccessStatus) { CallWin32ToNt (NtAccessCheck(SecurityDescriptor, ClientToken, DesiredAccess, GenericMapping, PrivilegeSet, PrivilegeSetLength, GrantedAccess, (PBOOLEAN)AccessStatus)); } /************************************************************************* * SetKernelObjectSecurity [ADVAPI32.223] */ BOOL WINAPI SetKernelObjectSecurity ( IN HANDLE Handle, IN SECURITY_INFORMATION SecurityInformation, IN PSECURITY_DESCRIPTOR SecurityDescriptor ) { CallWin32ToNt (NtSetSecurityObject (Handle, SecurityInformation, SecurityDescriptor)); } /****************************************************************************** * AddAccessAllowedAce */ BOOL WINAPI AddAccessAllowedAce( IN OUT PACL pAcl, IN DWORD dwAceRevision, IN DWORD AccessMask, IN PSID pSid) { return RtlAddAccessAllowedAce(pAcl, dwAceRevision, AccessMask, pSid); } wine-20000526/dlls/advapi32/service.c0100644000175000001440000004650407073170674016641 0ustar julliardusers/* * Win32 advapi functions * * Copyright 1995 Sven Verdoolaege */ #include #include "windef.h" #include "winsvc.h" #include "winerror.h" #include "winreg.h" #include "heap.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(advapi) static DWORD start_dwNumServiceArgs; static LPWSTR *start_lpServiceArgVectors; /****************************************************************************** * EnumServicesStatusA [ADVAPI32.@] */ BOOL WINAPI EnumServicesStatusA( SC_HANDLE hSCManager, DWORD dwServiceType, DWORD dwServiceState, LPENUM_SERVICE_STATUSA lpServices, DWORD cbBufSize, LPDWORD pcbBytesNeeded, LPDWORD lpServicesReturned, LPDWORD lpResumeHandle ) { FIXME("%x type=%lx state=%lx %p %lx %p %p %p\n", hSCManager, dwServiceType, dwServiceState, lpServices, cbBufSize, pcbBytesNeeded, lpServicesReturned, lpResumeHandle); SetLastError (ERROR_ACCESS_DENIED); return 0; } /****************************************************************************** * EnumServicesStatusW [ADVAPI32.@] */ BOOL WINAPI EnumServicesStatusW( SC_HANDLE hSCManager, DWORD dwServiceType, DWORD dwServiceState, LPENUM_SERVICE_STATUSW lpServices, DWORD cbBufSize, LPDWORD pcbBytesNeeded, LPDWORD lpServicesReturned, LPDWORD lpResumeHandle ) { FIXME("%x type=%lx state=%lx %p %lx %p %p %p\n", hSCManager, dwServiceType, dwServiceState, lpServices, cbBufSize, pcbBytesNeeded, lpServicesReturned, lpResumeHandle); SetLastError (ERROR_ACCESS_DENIED); return 0; } /****************************************************************************** * StartServiceCtrlDispatcherA [ADVAPI32.196] */ BOOL WINAPI StartServiceCtrlDispatcherA( LPSERVICE_TABLE_ENTRYA servent ) { LPSERVICE_MAIN_FUNCTIONA fpMain; HANDLE wait; DWORD dwNumServiceArgs ; LPWSTR *lpArgVecW; LPSTR *lpArgVecA; int i; TRACE("(%p)\n", servent); wait = OpenSemaphoreA(SEMAPHORE_ALL_ACCESS, FALSE, "ADVAPI32_ServiceStartData"); if(wait == 0) { ERR("Couldn't find wait semaphore\n"); ERR("perhaps you need to start services using StartService\n"); return FALSE; } dwNumServiceArgs = start_dwNumServiceArgs; lpArgVecW = start_lpServiceArgVectors; ReleaseSemaphore(wait, 1, NULL); /* Convert the Unicode arg vectors back to ASCII */ if(dwNumServiceArgs) lpArgVecA = (LPSTR*) HeapAlloc( GetProcessHeap(), 0, dwNumServiceArgs*sizeof(LPSTR) ); else lpArgVecA = NULL; for(i=0; ilpServiceName) { TRACE("%s at %p)\n", debugstr_a(servent->lpServiceName),servent); fpMain = servent->lpServiceProc; /* try to start the service */ fpMain( dwNumServiceArgs, lpArgVecA); servent++; } if(dwNumServiceArgs) { /* free arg strings */ for(i=0; ilpServiceName) { TRACE("%s at %p)\n", debugstr_w(servent->lpServiceName),servent); fpMain = servent->lpServiceProc; /* try to start the service */ fpMain( dwNumServiceArgs, lpServiceArgVectors); servent++; } return TRUE; } /****************************************************************************** * RegisterServiceCtrlHandlerA [ADVAPI32.176] */ SERVICE_STATUS_HANDLE WINAPI RegisterServiceCtrlHandlerA( LPCSTR lpServiceName, LPHANDLER_FUNCTION lpfHandler ) { FIXME("%s %p\n", lpServiceName, lpfHandler); return 0xcacacafe; } /****************************************************************************** * RegisterServiceCtrlHandlerW [ADVAPI32.177] * * PARAMS * lpServiceName [] * lpfHandler [] */ SERVICE_STATUS_HANDLE WINAPI RegisterServiceCtrlHandlerW( LPCWSTR lpServiceName, LPHANDLER_FUNCTION lpfHandler ) { FIXME("%s %p\n", debugstr_w(lpServiceName), lpfHandler); return 0xcacacafe; } /****************************************************************************** * SetServiceStatus [ADVAPI32.192] * * PARAMS * hService [] * lpStatus [] */ BOOL WINAPI SetServiceStatus( SERVICE_STATUS_HANDLE hService, LPSERVICE_STATUS lpStatus ) { FIXME("%lx %p\n",hService, lpStatus); TRACE("\tType:%lx\n",lpStatus->dwServiceType); TRACE("\tState:%lx\n",lpStatus->dwCurrentState); TRACE("\tControlAccepted:%lx\n",lpStatus->dwControlsAccepted); TRACE("\tExitCode:%lx\n",lpStatus->dwWin32ExitCode); TRACE("\tServiceExitCode:%lx\n",lpStatus->dwServiceSpecificExitCode); TRACE("\tCheckPoint:%lx\n",lpStatus->dwCheckPoint); TRACE("\tWaitHint:%lx\n",lpStatus->dwWaitHint); return TRUE; } /****************************************************************************** * OpenSCManagerA [ADVAPI32.110] */ SC_HANDLE WINAPI OpenSCManagerA( LPCSTR lpMachineName, LPCSTR lpDatabaseName, DWORD dwDesiredAccess ) { LPWSTR lpMachineNameW = HEAP_strdupAtoW(GetProcessHeap(),0,lpMachineName); LPWSTR lpDatabaseNameW = HEAP_strdupAtoW(GetProcessHeap(),0,lpDatabaseName); DWORD ret = OpenSCManagerW(lpMachineNameW,lpDatabaseNameW, dwDesiredAccess); HeapFree(GetProcessHeap(),0,lpDatabaseNameW); HeapFree(GetProcessHeap(),0,lpMachineNameW); return ret; } /****************************************************************************** * OpenSCManagerW [ADVAPI32.111] * Establishes a connection to the service control manager and opens database * * NOTES * This should return a SC_HANDLE * * PARAMS * lpMachineName [I] Pointer to machine name string * lpDatabaseName [I] Pointer to database name string * dwDesiredAccess [I] Type of access * * RETURNS * Success: Handle to service control manager database * Failure: NULL */ SC_HANDLE WINAPI OpenSCManagerW( LPCWSTR lpMachineName, LPCWSTR lpDatabaseName, DWORD dwDesiredAccess ) { HKEY hKey; LONG r; TRACE("(%s,%s,0x%08lx)\n", debugstr_w(lpMachineName), debugstr_w(lpDatabaseName), dwDesiredAccess); /* * FIXME: what is lpDatabaseName? * It should be set to "SERVICES_ACTIVE_DATABASE" according to * docs, but what if it isn't? */ r = RegConnectRegistryW(lpMachineName,HKEY_LOCAL_MACHINE,&hKey); if (r!=ERROR_SUCCESS) return 0; TRACE("returning %x\n",hKey); return hKey; } /****************************************************************************** * AllocateLocallyUniqueId [ADVAPI32.12] * * PARAMS * lpluid [] */ BOOL WINAPI AllocateLocallyUniqueId( PLUID lpluid ) { lpluid->s.LowPart = time(NULL); lpluid->s.HighPart = 0; return TRUE; } /****************************************************************************** * ControlService [ADVAPI32.23] * Sends a control code to a Win32-based service. * * PARAMS * hService [] * dwControl [] * lpServiceStatus [] * * RETURNS STD */ BOOL WINAPI ControlService( SC_HANDLE hService, DWORD dwControl, LPSERVICE_STATUS lpServiceStatus ) { FIXME("(%d,%ld,%p): stub\n",hService,dwControl,lpServiceStatus); return TRUE; } /****************************************************************************** * CloseServiceHandle [ADVAPI32.22] * Close handle to service or service control manager * * PARAMS * hSCObject [I] Handle to service or service control manager database * * RETURNS STD */ BOOL WINAPI CloseServiceHandle( SC_HANDLE hSCObject ) { TRACE("(%x)\n", hSCObject); RegCloseKey(hSCObject); return TRUE; } /****************************************************************************** * OpenServiceA [ADVAPI32.112] */ SC_HANDLE WINAPI OpenServiceA( SC_HANDLE hSCManager, LPCSTR lpServiceName, DWORD dwDesiredAccess ) { LPWSTR lpServiceNameW = HEAP_strdupAtoW(GetProcessHeap(),0,lpServiceName); DWORD ret; if(lpServiceName) TRACE("Request for service %s\n",lpServiceName); else return FALSE; ret = OpenServiceW( hSCManager, lpServiceNameW, dwDesiredAccess); HeapFree(GetProcessHeap(),0,lpServiceNameW); return ret; } /****************************************************************************** * OpenServiceW [ADVAPI32.113] * Opens a handle to an existing service * * PARAMS * hSCManager [] * lpServiceName [] * dwDesiredAccess [] * * RETURNS * Success: Handle to the service * Failure: NULL */ SC_HANDLE WINAPI OpenServiceW(SC_HANDLE hSCManager, LPCWSTR lpServiceName, DWORD dwDesiredAccess) { const char *str = "System\\CurrentControlSet\\Services\\"; WCHAR lpServiceKey[80]; /* FIXME: this should be dynamically allocated */ HKEY hKey; long r; TRACE("(%d,%p,%ld)\n",hSCManager, lpServiceName, dwDesiredAccess); lstrcpyAtoW(lpServiceKey,str); lstrcatW(lpServiceKey,lpServiceName); TRACE("Opening reg key %s\n", debugstr_w(lpServiceKey)); /* FIXME: dwDesiredAccess may need some processing */ r = RegOpenKeyExW(hSCManager, lpServiceKey, 0, dwDesiredAccess, &hKey ); if (r!=ERROR_SUCCESS) return 0; TRACE("returning %x\n",hKey); return hKey; } /****************************************************************************** * CreateServiceW [ADVAPI32.29] */ SC_HANDLE WINAPI CreateServiceW( DWORD hSCManager, LPCWSTR lpServiceName, LPCWSTR lpDisplayName, DWORD dwDesiredAccess, DWORD dwServiceType, DWORD dwStartType, DWORD dwErrorControl, LPCWSTR lpBinaryPathName, LPCWSTR lpLoadOrderGroup, LPDWORD lpdwTagId, LPCWSTR lpDependencies, LPCWSTR lpServiceStartName, LPCWSTR lpPassword ) { FIXME("(%ld,%s,%s,...)\n", hSCManager, debugstr_w(lpServiceName), debugstr_w(lpDisplayName)); return FALSE; } /****************************************************************************** * CreateServiceA [ADVAPI32.28] */ SC_HANDLE WINAPI CreateServiceA( DWORD hSCManager, LPCSTR lpServiceName, LPCSTR lpDisplayName, DWORD dwDesiredAccess, DWORD dwServiceType, DWORD dwStartType, DWORD dwErrorControl, LPCSTR lpBinaryPathName, LPCSTR lpLoadOrderGroup, LPDWORD lpdwTagId, LPCSTR lpDependencies, LPCSTR lpServiceStartName, LPCSTR lpPassword ) { HKEY hKey; LONG r; DWORD dp; TRACE("(%ld,%s,%s,...)\n", hSCManager, debugstr_a(lpServiceName), debugstr_a(lpDisplayName)); r = RegCreateKeyExA(hSCManager, lpServiceName, 0, NULL, REG_OPTION_NON_VOLATILE, dwDesiredAccess, NULL, &hKey, &dp); if (r!=ERROR_SUCCESS) return 0; if (dp != REG_CREATED_NEW_KEY) return 0; if(lpDisplayName) { r = RegSetValueExA(hKey, "DisplayName", 0, REG_SZ, lpDisplayName, lstrlenA(lpDisplayName) ); if (r!=ERROR_SUCCESS) return 0; } r = RegSetValueExA(hKey, "Type", 0, REG_DWORD, (LPVOID)&dwServiceType, sizeof (DWORD) ); if (r!=ERROR_SUCCESS) return 0; r = RegSetValueExA(hKey, "Start", 0, REG_DWORD, (LPVOID)&dwStartType, sizeof (DWORD) ); if (r!=ERROR_SUCCESS) return 0; r = RegSetValueExA(hKey, "ErrorControl", 0, REG_DWORD, (LPVOID)&dwErrorControl, sizeof (DWORD) ); if (r!=ERROR_SUCCESS) return 0; if(lpBinaryPathName) { r = RegSetValueExA(hKey, "ImagePath", 0, REG_SZ, lpBinaryPathName,lstrlenA(lpBinaryPathName)+1 ); if (r!=ERROR_SUCCESS) return 0; } if(lpLoadOrderGroup) { r = RegSetValueExA(hKey, "Group", 0, REG_SZ, lpLoadOrderGroup, lstrlenA(lpLoadOrderGroup)+1 ); if (r!=ERROR_SUCCESS) return 0; } r = RegSetValueExA(hKey, "ErrorControl", 0, REG_DWORD, (LPVOID)&dwErrorControl, sizeof (DWORD) ); if (r!=ERROR_SUCCESS) return 0; if(lpDependencies) { DWORD len = 0; /* determine the length of a double null terminated multi string */ do { len += (lstrlenA(&lpDependencies[len])+1); } while (lpDependencies[len++]); /* fixme: this should be unicode */ r = RegSetValueExA(hKey, "Dependencies", 0, REG_MULTI_SZ, lpDependencies, len ); if (r!=ERROR_SUCCESS) return 0; } if(lpPassword) { FIXME("Don't know how to add a Password for a service.\n"); } if(lpServiceStartName) { FIXME("Don't know how to add a ServiceStartName for a service.\n"); } return hKey; } /****************************************************************************** * DeleteService [ADVAPI32.31] * * PARAMS * hService [I] Handle to service * * RETURNS STD * */ BOOL WINAPI DeleteService( SC_HANDLE hService ) { FIXME("(%d): stub\n",hService); return TRUE; } /****************************************************************************** * StartServiceA [ADVAPI32.195] * */ BOOL WINAPI StartServiceA( SC_HANDLE hService, DWORD dwNumServiceArgs, LPCSTR *lpServiceArgVectors ) { LPWSTR *lpwstr=NULL; int i; TRACE("(%d,%ld,%p)\n",hService,dwNumServiceArgs,lpServiceArgVectors); if(dwNumServiceArgs) lpwstr = (LPWSTR*) HeapAlloc( GetProcessHeap(), 0, dwNumServiceArgs*sizeof(LPWSTR) ); else lpwstr = NULL; for(i=0; idwServiceType = val; /* FIXME: how are these determined or read from the registry? */ /* SERVICE: unavailable=0, stopped=1, starting=2, running=3? */; lpservicestatus->dwCurrentState = 1; lpservicestatus->dwControlsAccepted = 0; lpservicestatus->dwWin32ExitCode = NO_ERROR; lpservicestatus->dwServiceSpecificExitCode = 0; lpservicestatus->dwCheckPoint = 0; lpservicestatus->dwWaitHint = 0; return TRUE; } wine-20000526/dlls/.cvsignore0100644000175000001440000000002707060307277015407 0ustar julliardusersMakedll.rules Makefile wine-20000526/dlls/Makedll.rules.in0100644000175000001440000000415207101100676016432 0ustar julliardusers# Global rules for building dlls -*-Makefile-*- # # Each individual makefile should define the following variables: # MODULE : name of the main module being built # SOVERSION : version of the .so file # ALTNAMES : alternate names for this dll (optional) # IMPORTS : dlls to import (optional) # EXTRALIBS : extra libraries to link in (optional) # # plus all variables required by the global Make.rules.in # DEFS = @DLLFLAGS@ -D__WINE__ LIBEXT = @LIBEXT@ LDSHARED = @LDSHARED@ SONAME = lib$(MODULE).so IMPORTLIBS = $(IMPORTS:%=$(DLLDIR)/lib%.$(LIBEXT)) ALLNAMES = lib$(MODULE).so $(ALTNAMES:%=lib%.so) all: lib$(MODULE).$(LIBEXT) $(ALTNAMES:%=lib%.$(LIBEXT)) @MAKE_RULES@ # Rules for .so files lib$(MODULE).so.$(SOVERSION): $(OBJS) Makefile.in $(TOPSRCDIR)/Make.rules.in $(LDSHARED) $(OBJS) -o $@ -L$(DLLDIR) $(IMPORTS:%=-l%) $(EXTRALIBS) $(ALLNAMES): lib$(MODULE).so.$(SOVERSION) $(RM) $@ && $(LN_S) lib$(MODULE).so.$(SOVERSION) $@ # Rules for .a files lib$(MODULE).a: $(OBJS) Makefile.in $(TOPSRCDIR)/Make.rules.in $(RM) $@ $(AR) $@ $(OBJS) $(RANLIB) $@ $(ALTNAMES:%=lib%.a): lib$(MODULE).a $(RM) $@ && $(LN_S) lib$(MODULE).a $@ # Rules for checking that no imports are missing IMPORTLIBS = $(IMPORTS:%=$(DLLDIR)/lib%.$(LIBEXT)) checklink:: lib$(MODULE).$(LIBEXT) $(IMPORTLIBS) $(CC) -o checklink $(TOPSRCDIR)/library/checklink.c -L. -l$(MODULE) -L$(TOPOBJDIR) -lwine $(EXTRALIBS) $(LIBS) && $(RM) checklink $(IMPORTLIBS): dummy @cd $(DLLDIR) && $(MAKE) `basename $@` # Rules for installation .PHONY: install_so install_a install_so: lib$(MODULE).so.$(SOVERSION) [ -d $(libdir) ] || $(MKDIR) $(libdir) $(INSTALL_PROGRAM) lib$(MODULE).so.$(SOVERSION) $(libdir)/lib$(MODULE).so.$(SOVERSION) cd $(libdir) && for i in $(ALLNAMES); do $(RM) $$i && $(LN_S) lib$(MODULE).so.$(SOVERSION) $$i; done install_a: lib$(MODULE).a [ -d $(libdir) ] || $(MKDIR) $(libdir) $(INSTALL_DATA) lib$(MODULE).a $(libdir)/lib$(MODULE).a install:: $(LIBEXT:%=install_%) uninstall:: cd $(libdir) && $(RM) $(ALLNAMES) lib$(MODULE).so.$(SOVERSION) lib$(MODULE).a clean:: $(RM) lib$(MODULE).so.$(SOVERSION) wine-20000526/dlls/Makefile.in0100644000175000001440000002474007111133236015451 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = .. SRCDIR = @srcdir@ VPATH = @srcdir@ OPENGLFILES= \ opengl32/libopengl32.@LIBEXT@ XFILES = \ ddraw/libddraw.@LIBEXT@ \ @OPENGLFILES@ \ x11drv/libx11drv.@LIBEXT@ DLLFILES = \ @XFILES@ \ avifil32/libavifil32.@LIBEXT@ \ comctl32/libcomctl32.@LIBEXT@ \ commdlg/libcomdlg32.@LIBEXT@ \ dciman32/libdciman32.@LIBEXT@ \ dinput/libdinput.@LIBEXT@ \ dplayx/libdplayx.@LIBEXT@ \ dsound/libdsound.@LIBEXT@ \ gdi/libgdi32.@LIBEXT@ \ icmp/libicmp.@LIBEXT@ \ imagehlp/libimagehlp.@LIBEXT@ \ imm32/libimm32.@LIBEXT@ \ lzexpand/liblz32.@LIBEXT@ \ mpr/libmpr.@LIBEXT@ \ msacm/libmsacm.@LIBEXT@ \ msacm32/libmsacm32.@LIBEXT@ \ msnet32/libmsnet32.@LIBEXT@ \ msvideo/libmsvfw32.@LIBEXT@ \ odbc32/libodbc32.@LIBEXT@ \ ole32/libole32.@LIBEXT@ \ oleaut32/liboleaut32.@LIBEXT@ \ olecli/libolecli32.@LIBEXT@ \ oledlg/liboledlg.@LIBEXT@ \ olepro32/libolepro32.@LIBEXT@ \ olesvr/libolesvr32.@LIBEXT@ \ psapi/libpsapi.@LIBEXT@ \ rasapi32/librasapi32.@LIBEXT@ \ richedit/libriched32.@LIBEXT@ \ setupx/libsetupx.@LIBEXT@ \ shell32/libshell32.@LIBEXT@ \ sound/libsound.@LIBEXT@ \ stress/libstress.@LIBEXT@ \ tapi32/libtapi32.@LIBEXT@ \ ttydrv/libttydrv.@LIBEXT@ \ urlmon/liburlmon.@LIBEXT@ \ user/libuser32.@LIBEXT@ \ version/libversion.@LIBEXT@ \ win32s/libw32skrnl.@LIBEXT@ \ win87em/libwin87em.@LIBEXT@ \ winaspi/libwnaspi32.@LIBEXT@ \ windebug/libwindebug.@LIBEXT@ \ wing/libwing.@LIBEXT@ \ wininet/libwininet.@LIBEXT@ \ winmm/joystick/libjoystick.drv.@LIBEXT@ \ winmm/libwinmm.@LIBEXT@ \ winmm/mcianim/libmcianim.drv.@LIBEXT@ \ winmm/mciavi/libmciavi.drv.@LIBEXT@ \ winmm/mcicda/libmcicda.drv.@LIBEXT@ \ winmm/mciseq/libmciseq.drv.@LIBEXT@ \ winmm/mciwave/libmciwave.drv.@LIBEXT@ \ winmm/midimap/libmidimap.drv.@LIBEXT@ \ winmm/wavemap/libmsacm.drv.@LIBEXT@ \ winmm/wineoss/libwineoss.drv.@LIBEXT@ \ winsock/libwsock32.@LIBEXT@ \ winspool/libwinspool.drv.@LIBEXT@ # extra names for dlls containing multiple spec files EXTRADLLNAMES = \ avifile \ commdlg \ compobj \ ddeml \ dplay \ gdi \ keyboard \ lzexpand \ mmsystem \ msvideo \ ole2 \ ole2conv \ ole2disp \ ole2nls \ ole2prox \ ole2thk \ olecli \ olesvr \ rasapi16 \ shell \ shlwapi \ storage \ typelib \ user \ ver \ w32sys \ win32s16 \ winaspi \ winsock SUBDIRS = \ avifil32 \ comctl32 \ commdlg \ dciman32 \ ddraw \ dinput \ dplayx \ dsound \ gdi \ icmp \ imagehlp \ imm32 \ lzexpand \ mpr \ msacm \ msacm32 \ msnet32 \ msvideo \ odbc32 \ ole32 \ oleaut32 \ olecli \ oledlg \ olepro32 \ olesvr \ opengl32 \ psapi \ rasapi32 \ richedit \ setupx \ shell32 \ sound \ stress \ tapi32 \ ttydrv \ urlmon \ user \ version \ win32s \ win87em \ winaspi \ windebug \ wing \ wininet \ winmm \ winsock \ winspool \ x11drv @MAKE_RULES@ all: $(DLLS:%=lib%.@LIBEXT@) $(EXTRADLLNAMES:%=lib%.@LIBEXT@) # Map library name to directory libavifil32.@LIBEXT@ libavifile.@LIBEXT@: avifil32/libavifil32.@LIBEXT@ $(RM) $@ && $(LN_S) avifil32/libavifil32.@LIBEXT@ $@ libcomctl32.@LIBEXT@: comctl32/libcomctl32.@LIBEXT@ $(RM) $@ && $(LN_S) comctl32/libcomctl32.@LIBEXT@ $@ libcomdlg32.@LIBEXT@ libcommdlg.@LIBEXT@: commdlg/libcomdlg32.@LIBEXT@ $(RM) $@ && $(LN_S) commdlg/libcomdlg32.@LIBEXT@ $@ libdciman32.@LIBEXT@: dciman32/libdciman32.@LIBEXT@ $(RM) $@ && $(LN_S) dciman32/libdciman32.@LIBEXT@ $@ libddraw.@LIBEXT@: ddraw/libddraw.@LIBEXT@ $(RM) $@ && $(LN_S) ddraw/libddraw.@LIBEXT@ $@ libdinput.@LIBEXT@: dinput/libdinput.@LIBEXT@ $(RM) $@ && $(LN_S) dinput/libdinput.@LIBEXT@ $@ libdplayx.@LIBEXT@ libdplay.@LIBEXT@: dplayx/libdplayx.@LIBEXT@ $(RM) $@ && $(LN_S) dplayx/libdplayx.@LIBEXT@ $@ libdsound.@LIBEXT@: dsound/libdsound.@LIBEXT@ $(RM) $@ && $(LN_S) dsound/libdsound.@LIBEXT@ $@ libgdi32.@LIBEXT@ libgdi.@LIBEXT@: gdi/libgdi32.@LIBEXT@ $(RM) $@ && $(LN_S) gdi/libgdi32.@LIBEXT@ $@ libicmp.@LIBEXT@: icmp/libicmp.@LIBEXT@ $(RM) $@ && $(LN_S) icmp/libicmp.@LIBEXT@ $@ libimagehlp.@LIBEXT@: imagehlp/libimagehlp.@LIBEXT@ $(RM) $@ && $(LN_S) imagehlp/libimagehlp.@LIBEXT@ $@ libimm32.@LIBEXT@: imm32/libimm32.@LIBEXT@ $(RM) $@ && $(LN_S) imm32/libimm32.@LIBEXT@ $@ libjoystick.drv.@LIBEXT@: winmm/joystick/libjoystick.drv.@LIBEXT@ $(RM) $@ && $(LN_S) winmm/joystick/libjoystick.drv.@LIBEXT@ $@ liblz32.@LIBEXT@ liblzexpand.@LIBEXT@: lzexpand/liblz32.@LIBEXT@ $(RM) $@ && $(LN_S) lzexpand/liblz32.@LIBEXT@ $@ libmcianim.drv.@LIBEXT@: winmm/mcianim/libmcianim.drv.@LIBEXT@ $(RM) $@ && $(LN_S) winmm/mcianim/libmcianim.drv.@LIBEXT@ $@ libmciavi.drv.@LIBEXT@: winmm/mciavi/libmciavi.drv.@LIBEXT@ $(RM) $@ && $(LN_S) winmm/mciavi/libmciavi.drv.@LIBEXT@ $@ libmcicda.drv.@LIBEXT@: winmm/mcicda/libmcicda.drv.@LIBEXT@ $(RM) $@ && $(LN_S) winmm/mcicda/libmcicda.drv.@LIBEXT@ $@ libmciseq.drv.@LIBEXT@: winmm/mciseq/libmciseq.drv.@LIBEXT@ $(RM) $@ && $(LN_S) winmm/mciseq/libmciseq.drv.@LIBEXT@ $@ libmciwave.drv.@LIBEXT@: winmm/mciwave/libmciwave.drv.@LIBEXT@ $(RM) $@ && $(LN_S) winmm/mciwave/libmciwave.drv.@LIBEXT@ $@ libmidimap.drv.@LIBEXT@: winmm/midimap/libmidimap.drv.@LIBEXT@ $(RM) $@ && $(LN_S) winmm/midimap/libmidimap.drv.@LIBEXT@ $@ libmpr.@LIBEXT@: mpr/libmpr.@LIBEXT@ $(RM) $@ && $(LN_S) mpr/libmpr.@LIBEXT@ $@ libmsacm.@LIBEXT@: msacm/libmsacm.@LIBEXT@ $(RM) $@ && $(LN_S) msacm/libmsacm.@LIBEXT@ $@ libmsacm.drv.@LIBEXT@: winmm/wavemap/libmsacm.drv.@LIBEXT@ $(RM) $@ && $(LN_S) winmm/wavemap/libmsacm.drv.@LIBEXT@ $@ libmsacm32.@LIBEXT@: msacm32/libmsacm32.@LIBEXT@ $(RM) $@ && $(LN_S) msacm32/libmsacm32.@LIBEXT@ $@ libmsnet32.@LIBEXT@: msnet32/libmsnet32.@LIBEXT@ $(RM) $@ && $(LN_S) msnet32/libmsnet32.@LIBEXT@ $@ libmsvfw32.@LIBEXT@ libmsvideo.@LIBEXT@: msvideo/libmsvfw32.@LIBEXT@ $(RM) $@ && $(LN_S) msvideo/libmsvfw32.@LIBEXT@ $@ libodbc32.@LIBEXT@: odbc32/libodbc32.@LIBEXT@ $(RM) $@ && $(LN_S) odbc32/libodbc32.@LIBEXT@ $@ libole32.@LIBEXT@ libole2.@LIBEXT@ libole2conv.@LIBEXT@ libole2nls.@LIBEXT@ libole2prox.@LIBEXT@ libole2thk.@LIBEXT@ libstorage.@LIBEXT@ libcompobj.@LIBEXT@: ole32/libole32.@LIBEXT@ $(RM) $@ && $(LN_S) ole32/libole32.@LIBEXT@ $@ liboleaut32.@LIBEXT@ libole2disp.@LIBEXT@ libtypelib.@LIBEXT@: oleaut32/liboleaut32.@LIBEXT@ $(RM) $@ && $(LN_S) oleaut32/liboleaut32.@LIBEXT@ $@ libolecli32.@LIBEXT@ libolecli.@LIBEXT@: olecli/libolecli32.@LIBEXT@ $(RM) $@ && $(LN_S) olecli/libolecli32.@LIBEXT@ $@ liboledlg.@LIBEXT@: oledlg/liboledlg.@LIBEXT@ $(RM) $@ && $(LN_S) oledlg/liboledlg.@LIBEXT@ $@ libolepro32.@LIBEXT@: olepro32/libolepro32.@LIBEXT@ $(RM) $@ && $(LN_S) olepro32/libolepro32.@LIBEXT@ $@ libolesvr32.@LIBEXT@ libolesvr.@LIBEXT@: olesvr/libolesvr32.@LIBEXT@ $(RM) $@ && $(LN_S) olesvr/libolesvr32.@LIBEXT@ $@ libopengl32.@LIBEXT@: opengl32/libopengl32.@LIBEXT@ $(RM) $@ && $(LN_S) opengl32/libopengl32.@LIBEXT@ $@ libpsapi.@LIBEXT@: psapi/libpsapi.@LIBEXT@ $(RM) $@ && $(LN_S) psapi/libpsapi.@LIBEXT@ $@ librasapi32.@LIBEXT@ librasapi16.@LIBEXT@: rasapi32/librasapi32.@LIBEXT@ $(RM) $@ && $(LN_S) rasapi32/librasapi32.@LIBEXT@ $@ libriched32.@LIBEXT@: richedit/libriched32.@LIBEXT@ $(RM) $@ && $(LN_S) richedit/libriched32.@LIBEXT@ $@ libsetupx.@LIBEXT@: setupx/libsetupx.@LIBEXT@ $(RM) $@ && $(LN_S) setupx/libsetupx.@LIBEXT@ $@ libshell32.@LIBEXT@ libshell.@LIBEXT@ libshlwapi.@LIBEXT@: shell32/libshell32.@LIBEXT@ $(RM) $@ && $(LN_S) shell32/libshell32.@LIBEXT@ $@ libsound.@LIBEXT@: sound/libsound.@LIBEXT@ $(RM) $@ && $(LN_S) sound/libsound.@LIBEXT@ $@ libstress.@LIBEXT@: stress/libstress.@LIBEXT@ $(RM) $@ && $(LN_S) stress/libstress.@LIBEXT@ $@ libtapi32.@LIBEXT@: tapi32/libtapi32.@LIBEXT@ $(RM) $@ && $(LN_S) tapi32/libtapi32.@LIBEXT@ $@ libttydrv.@LIBEXT@: ttydrv/libttydrv.@LIBEXT@ $(RM) $@ && $(LN_S) ttydrv/libttydrv.@LIBEXT@ $@ liburlmon.@LIBEXT@: urlmon/liburlmon.@LIBEXT@ $(RM) $@ && $(LN_S) urlmon/liburlmon.@LIBEXT@ $@ libuser32.@LIBEXT@ libuser.@LIBEXT@ libkeyboard.@LIBEXT@ libddeml.@LIBEXT@: user/libuser32.@LIBEXT@ $(RM) $@ && $(LN_S) user/libuser32.@LIBEXT@ $@ libversion.@LIBEXT@ libver.@LIBEXT@: version/libversion.@LIBEXT@ $(RM) $@ && $(LN_S) version/libversion.@LIBEXT@ $@ libw32skrnl.@LIBEXT@ libw32sys.@LIBEXT@ libwin32s16.@LIBEXT@: win32s/libw32skrnl.@LIBEXT@ $(RM) $@ && $(LN_S) win32s/libw32skrnl.@LIBEXT@ $@ libwin87em.@LIBEXT@: win87em/libwin87em.@LIBEXT@ $(RM) $@ && $(LN_S) win87em/libwin87em.@LIBEXT@ $@ libwindebug.@LIBEXT@: windebug/libwindebug.@LIBEXT@ $(RM) $@ && $(LN_S) windebug/libwindebug.@LIBEXT@ $@ libwineoss.drv.@LIBEXT@: winmm/wineoss/libwineoss.drv.@LIBEXT@ $(RM) $@ && $(LN_S) winmm/wineoss/libwineoss.drv.@LIBEXT@ $@ libwing.@LIBEXT@: wing/libwing.@LIBEXT@ $(RM) $@ && $(LN_S) wing/libwing.@LIBEXT@ $@ libwininet.@LIBEXT@: wininet/libwininet.@LIBEXT@ $(RM) $@ && $(LN_S) wininet/libwininet.@LIBEXT@ $@ libwinmm.@LIBEXT@ libmmsystem.@LIBEXT@: winmm/libwinmm.@LIBEXT@ $(RM) $@ && $(LN_S) winmm/libwinmm.@LIBEXT@ $@ libwinspool.drv.@LIBEXT@: winspool/libwinspool.drv.@LIBEXT@ $(RM) $@ && $(LN_S) winspool/libwinspool.drv.@LIBEXT@ $@ libwnaspi32.@LIBEXT@ libwinaspi.@LIBEXT@: winaspi/libwnaspi32.@LIBEXT@ $(RM) $@ && $(LN_S) winaspi/libwnaspi32.@LIBEXT@ $@ libwsock32.@LIBEXT@ libwinsock.@LIBEXT@: winsock/libwsock32.@LIBEXT@ $(RM) $@ && $(LN_S) winsock/libwsock32.@LIBEXT@ $@ libx11drv.@LIBEXT@: x11drv/libx11drv.@LIBEXT@ $(RM) $@ && $(LN_S) x11drv/libx11drv.@LIBEXT@ $@ # Inter-dll dependencies (only necessary for .so) avifil32/libavifil32.so: libmsvfw32.so libwinmm.so commdlg/libcomdlg32.so: libwinspool.drv.so ddraw/libddraw.so: libx11drv.so dplayx/libdplayx.so: libole32.so msvideo/libmsvfw32.so: libwinmm.so oleaut32/liboleaut32.so: libole32.so libcomctl32.so olecli/libolecli32.so: libolesvr32.so libole32.so olepro32/libolepro32.so: liboleaut32.so libole32.so opengl32/libopengl32.so: libx11drv.so libgdi32.so shell32/libshell32.so: libole32.so urlmon/liburlmon.so: libole32.so version/libversion.so: liblz32.so winmm/joystick/libjoystick.drv.so: libwinmm.so winmm/mcianim/libmcianim.drv.so: libwinmm.so winmm/mciavi/libmciavi.drv.so: libwinmm.so winmm/mcicda/libmcicda.drv.so: libwinmm.so winmm/mciseq/libmciseq.drv.so: libwinmm.so winmm/mciwave/libmciwave.drv.so: libwinmm.so winmm/midimap/libmidimap.drv.so: libwinmm.so winmm/wavemap/libmsacm.drv.so: libwinmm.so winmm/wineoss/libwineoss.drv.so: libwinmm.so $(DLLFILES): dummy @cd `dirname $@` && $(MAKE) $(DLLFILES:%=%_install_): dummy @cd `dirname $@` && $(MAKE) install $(DLLFILES:%=%_uninstall_): dummy @cd `dirname $@` && $(MAKE) uninstall $(DLLFILES:%=%_checklink_): dummy @cd `dirname $@` && $(MAKE) checklink install:: $(DLLFILES:%=%_install_) uninstall:: $(DLLFILES:%=%_uninstall_) checklink:: $(DLLFILES:%=%_checklink_) wine-20000526/dlls/avifil32/0040755000175000001440000000000007113604155015024 5ustar julliarduserswine-20000526/dlls/avifil32/.cvsignore0100644000175000001440000000006307045213571017022 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libavifil32.so.1.0 wine-20000526/dlls/avifil32/Makefile.in0100644000175000001440000000041507060456111017064 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = avifil32 SOVERSION = 1.0 ALTNAMES = avifile IMPORTS = msvfw32 winmm SPEC_SRCS = avifil32.spec avifile.spec C_SRCS = \ avifile.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/avifil32/avifil32.spec0100644000175000001440000000560207077362252017327 0ustar julliardusersname avifil32 type win32 import msvfw32.dll @ stub AVIBuildFilter @ stub AVIBuildFilterA @ stub AVIBuildFilterW @ stub AVIClearClipboard @ stub AVIFileAddRef @ stub AVIFileCreateStream @ stdcall AVIFileCreateStreamA(ptr ptr ptr) AVIFileCreateStreamA @ stdcall AVIFileCreateStreamW(ptr ptr ptr) AVIFileCreateStreamW @ stub AVIFileEndRecord @ stdcall AVIFileExit() AVIFileExit @ stdcall AVIFileGetStream(ptr ptr long long) AVIFileGetStream @ stdcall AVIFileInfo (ptr ptr long) AVIFileInfoA # A in both Win95 and NT @ stdcall AVIFileInfoA(ptr ptr long) AVIFileInfoA @ stdcall AVIFileInfoW(ptr ptr long) AVIFileInfoW @ stdcall AVIFileInit() AVIFileInit @ stub AVIFileOpen @ stdcall AVIFileOpenA(ptr str long ptr) AVIFileOpenA @ stub AVIFileOpenW @ stub AVIFileReadData @ stdcall AVIFileRelease(ptr) AVIFileRelease @ stub AVIFileWriteData @ stub AVIGetFromClipboard @ stdcall AVIMakeCompressedStream(ptr ptr ptr ptr) AVIMakeCompressedStream @ stub AVIMakeFileFromStreams @ stub AVIMakeStreamFromClipboard @ stub AVIPutFileOnClipboard @ stub AVISave @ stub AVISaveA @ stub AVISaveOptions @ stub AVISaveOptionsFree @ stub AVISaveV @ stub AVISaveVA @ stub AVISaveVW @ stub AVISaveW @ stub AVIStreamAddRef @ stub AVIStreamBeginStreaming @ stub AVIStreamCreate @ stub AVIStreamEndStreaming @ stub AVIStreamFindSample @ stdcall AVIStreamGetFrame(ptr long) AVIStreamGetFrame @ stdcall AVIStreamGetFrameClose(ptr) AVIStreamGetFrameClose @ stdcall AVIStreamGetFrameOpen(ptr ptr) AVIStreamGetFrameOpen @ stdcall AVIStreamInfo (ptr ptr long) AVIStreamInfoA @ stdcall AVIStreamInfoA(ptr ptr long) AVIStreamInfoA @ stdcall AVIStreamInfoW(ptr ptr long) AVIStreamInfoW @ stdcall AVIStreamLength(ptr) AVIStreamLength @ stub AVIStreamOpenFromFile @ stub AVIStreamOpenFromFileA @ stub AVIStreamOpenFromFileW @ stdcall AVIStreamRead(ptr long long ptr long ptr ptr) AVIStreamRead @ stdcall AVIStreamReadData(ptr long ptr ptr) AVIStreamReadData @ stdcall AVIStreamReadFormat(ptr long ptr long) AVIStreamReadFormat @ stdcall AVIStreamRelease(ptr) AVIStreamRelease @ stub AVIStreamSampleToTime @ stdcall AVIStreamSetFormat(ptr long ptr long) AVIStreamSetFormat @ stdcall AVIStreamStart(ptr) AVIStreamStart @ stub AVIStreamTimeToSample @ stdcall AVIStreamWrite(ptr long long ptr long long ptr ptr) AVIStreamWrite @ stdcall AVIStreamWriteData(ptr long ptr long) AVIStreamWriteData @ stub CLSID_AVISimpleUnMarshal @ stub CreateEditableStream @ stub DllCanUnloadNow @ stub DllGetClassObject @ stub EditStreamClone @ stub EditStreamCopy @ stub EditStreamCut @ stub EditStreamPaste @ stub EditStreamSetInfo @ stub EditStreamSetInfoA @ stub EditStreamSetInfoW @ stub EditStreamSetName @ stub EditStreamSetNameA @ stub EditStreamSetNameW @ stub IID_IAVIEditStream @ stub IID_IAVIFile @ stub IID_IAVIStream @ stub IID_IGetFrame wine-20000526/dlls/avifil32/avifile.c0100644000175000001440000004625707066752014016627 0ustar julliardusers/* * Copyright 1999 Marcus Meissner */ #include #include #include #include "winbase.h" #include "vfw.h" #include "wine/winestring.h" #include "driver.h" #include "mmsystem.h" #include "winerror.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(avifile); static HRESULT WINAPI IAVIFile_fnQueryInterface(IAVIFile* iface,REFIID refiid,LPVOID *obj); static ULONG WINAPI IAVIFile_fnAddRef(IAVIFile* iface); static ULONG WINAPI IAVIFile_fnRelease(IAVIFile* iface); static HRESULT WINAPI IAVIFile_fnInfo(IAVIFile*iface,AVIFILEINFOW*afi,LONG size); static HRESULT WINAPI IAVIFile_fnGetStream(IAVIFile*iface,PAVISTREAM*avis,DWORD fccType,LONG lParam); static HRESULT WINAPI IAVIFile_fnCreateStream(IAVIFile*iface,PAVISTREAM*avis,AVISTREAMINFOW*asi); static HRESULT WINAPI IAVIFile_fnWriteData(IAVIFile*iface,DWORD ckid,LPVOID lpData,LONG size); static HRESULT WINAPI IAVIFile_fnReadData(IAVIFile*iface,DWORD ckid,LPVOID lpData,LONG *size); static HRESULT WINAPI IAVIFile_fnEndRecord(IAVIFile*iface); static HRESULT WINAPI IAVIFile_fnDeleteStream(IAVIFile*iface,DWORD fccType,LONG lParam); struct ICOM_VTABLE(IAVIFile) iavift = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IAVIFile_fnQueryInterface, IAVIFile_fnAddRef, IAVIFile_fnRelease, IAVIFile_fnInfo, IAVIFile_fnGetStream, IAVIFile_fnCreateStream, IAVIFile_fnWriteData, IAVIFile_fnReadData, IAVIFile_fnEndRecord, IAVIFile_fnDeleteStream }; static HRESULT WINAPI IAVIStream_fnQueryInterface(IAVIStream*iface,REFIID refiid,LPVOID *obj); static ULONG WINAPI IAVIStream_fnAddRef(IAVIStream*iface); static ULONG WINAPI IAVIStream_fnRelease(IAVIStream* iface); static HRESULT WINAPI IAVIStream_fnCreate(IAVIStream*iface,LPARAM lParam1,LPARAM lParam2); static HRESULT WINAPI IAVIStream_fnInfo(IAVIStream*iface,AVISTREAMINFOW *psi,LONG size); static LONG WINAPI IAVIStream_fnFindSample(IAVIStream*iface,LONG pos,LONG flags); static HRESULT WINAPI IAVIStream_fnReadFormat(IAVIStream*iface,LONG pos,LPVOID format,LONG *formatsize); static HRESULT WINAPI IAVIStream_fnSetFormat(IAVIStream*iface,LONG pos,LPVOID format,LONG formatsize); static HRESULT WINAPI IAVIStream_fnRead(IAVIStream*iface,LONG start,LONG samples,LPVOID buffer,LONG buffersize,LONG *bytesread,LONG *samplesread); static HRESULT WINAPI IAVIStream_fnWrite(IAVIStream*iface,LONG start,LONG samples,LPVOID buffer,LONG buffersize,DWORD flags,LONG *sampwritten,LONG *byteswritten); static HRESULT WINAPI IAVIStream_fnDelete(IAVIStream*iface,LONG start,LONG samples); static HRESULT WINAPI IAVIStream_fnReadData(IAVIStream*iface,DWORD fcc,LPVOID lp,LONG *lpread); static HRESULT WINAPI IAVIStream_fnWriteData(IAVIStream*iface,DWORD fcc,LPVOID lp,LONG size); static HRESULT WINAPI IAVIStream_fnSetInfo(IAVIStream*iface,AVISTREAMINFOW*info,LONG infolen); struct ICOM_VTABLE(IAVIStream) iavist = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IAVIStream_fnQueryInterface, IAVIStream_fnAddRef, IAVIStream_fnRelease, IAVIStream_fnCreate, IAVIStream_fnInfo, IAVIStream_fnFindSample, IAVIStream_fnReadFormat, IAVIStream_fnSetFormat, IAVIStream_fnRead, IAVIStream_fnWrite, IAVIStream_fnDelete, IAVIStream_fnReadData, IAVIStream_fnWriteData, IAVIStream_fnSetInfo }; typedef struct IAVIStreamImpl { /* IUnknown stuff */ ICOM_VFIELD(IAVIStream); DWORD ref; /* IAVIStream stuff */ LPVOID lpInputFormat; DWORD inputformatsize; BOOL iscompressing; DWORD curframe; /* Compressor stuff */ HIC hic; LPVOID lpCompressFormat; ICINFO icinfo; DWORD compbufsize; LPVOID compbuffer; DWORD decompbufsize; LPVOID decompbuffer; LPVOID decompformat; AVICOMPRESSOPTIONS aco; LPVOID lpPrev; /* pointer to decompressed frame later */ LPVOID lpPrevFormat; /* pointer to decompressed info later */ } IAVIStreamImpl; /*********************************************************************** * AVIFileInit */ void WINAPI AVIFileInit(void) { FIXME("(),stub!\n"); } typedef struct IAVIFileImpl { /* IUnknown stuff */ ICOM_VFIELD(IAVIFile); DWORD ref; /* IAVIFile stuff... */ } IAVIFileImpl; static HRESULT WINAPI IAVIFile_fnQueryInterface(IAVIFile* iface,REFIID refiid,LPVOID *obj) { ICOM_THIS(IAVIFileImpl,iface); TRACE("(%p)->QueryInterface(%s,%p)\n",This,debugstr_guid(refiid),obj); if ( !memcmp(&IID_IUnknown,refiid,sizeof(IID_IUnknown)) || !memcmp(&IID_IAVIFile,refiid,sizeof(IID_IAVIFile)) ) { *obj = iface; return S_OK; } return OLE_E_ENUM_NOMORE; } static ULONG WINAPI IAVIFile_fnAddRef(IAVIFile* iface) { ICOM_THIS(IAVIFileImpl,iface); FIXME("(%p)->AddRef()\n",iface); return ++(This->ref); } static ULONG WINAPI IAVIFile_fnRelease(IAVIFile* iface) { ICOM_THIS(IAVIFileImpl,iface); FIXME("(%p)->Release()\n",iface); if (!--(This->ref)) { HeapFree(GetProcessHeap(),0,iface); return 0; } return This->ref; } static HRESULT WINAPI IAVIFile_fnInfo(IAVIFile*iface,AVIFILEINFOW*afi,LONG size) { FIXME("(%p)->Info(%p,%ld)\n",iface,afi,size); /* FIXME: fill out struct? */ return E_FAIL; } static HRESULT WINAPI IAVIFile_fnGetStream(IAVIFile*iface,PAVISTREAM*avis,DWORD fccType,LONG lParam) { FIXME("(%p)->GetStream(%p,0x%08lx,%ld)\n",iface,avis,fccType,lParam); /* FIXME: create interface etc. */ return E_FAIL; } static HRESULT WINAPI IAVIFile_fnCreateStream(IAVIFile*iface,PAVISTREAM*avis,AVISTREAMINFOW*asi) { ICOM_THIS(IAVIStreamImpl,iface); char fcc[5]; IAVIStreamImpl *istream; FIXME("(%p,%p,%p)\n",This,avis,asi); istream = (IAVIStreamImpl*)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IAVIStreamImpl)); istream->ref = 1; ICOM_VTBL(istream) = &iavist; fcc[4]='\0'; memcpy(fcc,(char*)&(asi->fccType),4); FIXME("\tfccType '%s'\n",fcc); memcpy(fcc,(char*)&(asi->fccHandler),4); FIXME("\tfccHandler '%s'\n",fcc); FIXME("\tdwFlags 0x%08lx\n",asi->dwFlags); FIXME("\tdwCaps 0x%08lx\n",asi->dwCaps); FIXME("\tname '%s'\n",debugstr_w(asi->szName)); istream->curframe = 0; *avis = (PAVISTREAM)istream; return S_OK; } static HRESULT WINAPI IAVIFile_fnWriteData(IAVIFile*iface,DWORD ckid,LPVOID lpData,LONG size) { FIXME("(%p)->WriteData(0x%08lx,%p,%ld)\n",iface,ckid,lpData,size); /* FIXME: write data to file */ return E_FAIL; } static HRESULT WINAPI IAVIFile_fnReadData(IAVIFile*iface,DWORD ckid,LPVOID lpData,LONG *size) { FIXME("(%p)->ReadData(0x%08lx,%p,%p)\n",iface,ckid,lpData,size); /* FIXME: read at most size bytes from file */ return E_FAIL; } static HRESULT WINAPI IAVIFile_fnEndRecord(IAVIFile*iface) { FIXME("(%p)->EndRecord()\n",iface); /* FIXME: end record? */ return E_FAIL; } static HRESULT WINAPI IAVIFile_fnDeleteStream(IAVIFile*iface,DWORD fccType,LONG lParam) { FIXME("(%p)->DeleteStream(0x%08lx,%ld)\n",iface,fccType,lParam); /* FIXME: delete stream? */ return E_FAIL; } /*********************************************************************** * AVIFileOpenA */ HRESULT WINAPI AVIFileOpenA( PAVIFILE * ppfile,LPCSTR szFile,UINT uMode,LPCLSID lpHandler ) { IAVIFileImpl *iavi; FIXME("(%p,%s,0x%08lx,%s),stub!\n",ppfile,szFile,(DWORD)uMode,debugstr_guid(lpHandler)); iavi = (IAVIFileImpl*)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IAVIFileImpl)); iavi->ref = 1; ICOM_VTBL(iavi) = &iavift; *ppfile = (LPVOID)iavi; return S_OK; } static HRESULT WINAPI IAVIStream_fnQueryInterface(IAVIStream*iface,REFIID refiid,LPVOID *obj) { ICOM_THIS(IAVIStreamImpl,iface); TRACE("(%p)->QueryInterface(%s,%p)\n",This,debugstr_guid(refiid),obj); if ( !memcmp(&IID_IUnknown,refiid,sizeof(IID_IUnknown)) || !memcmp(&IID_IAVIStream,refiid,sizeof(IID_IAVIStream)) ) { *obj = This; return S_OK; } /* can return IGetFrame interface too */ return OLE_E_ENUM_NOMORE; } static ULONG WINAPI IAVIStream_fnAddRef(IAVIStream*iface) { ICOM_THIS(IAVIStreamImpl,iface); FIXME("(%p)->AddRef()\n",iface); return ++(This->ref); } static ULONG WINAPI IAVIStream_fnRelease(IAVIStream* iface) { ICOM_THIS(IAVIStreamImpl,iface); FIXME("(%p)->Release()\n",iface); if (!--(This->ref)) { HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } static HRESULT WINAPI IAVIStream_fnCreate(IAVIStream*iface,LPARAM lParam1,LPARAM lParam2) { FIXME("(%p)->Create(0x%08lx,0x%08lx)\n",iface,lParam1,lParam2); return E_FAIL; } static HRESULT WINAPI IAVIStream_fnInfo(IAVIStream*iface,AVISTREAMINFOW *psi,LONG size) { FIXME("(%p)->Info(%p,%ld)\n",iface,psi,size); return E_FAIL; } static LONG WINAPI IAVIStream_fnFindSample(IAVIStream*iface,LONG pos,LONG flags) { FIXME("(%p)->FindSample(%ld,0x%08lx)\n",iface,pos,flags); return E_FAIL; } static HRESULT WINAPI IAVIStream_fnReadFormat(IAVIStream*iface,LONG pos,LPVOID format,LONG *formatsize) { FIXME("(%p)->ReadFormat(%ld,%p,%p)\n",iface,pos,format,formatsize); return E_FAIL; } /*********************************************************************** * IAVIStream::SetFormat */ static HRESULT WINAPI IAVIStream_fnSetFormat(IAVIStream*iface,LONG pos,LPVOID format,LONG formatsize) { IAVIStreamImpl *as = (IAVIStreamImpl*)iface; FIXME("(%p)->SetFormat(%ld,%p,%ld)\n",iface,pos,format,formatsize); if (as->lpInputFormat) HeapFree(GetProcessHeap(),0,as->lpInputFormat); as->inputformatsize = formatsize; as->lpInputFormat = HeapAlloc(GetProcessHeap(),0,formatsize); memcpy(as->lpInputFormat,format,formatsize); if (as->iscompressing) { int xsize; /* Set up the Compressor part */ xsize = ICCompressGetFormatSize(as->hic,as->lpInputFormat); as->lpCompressFormat = HeapAlloc(GetProcessHeap(),0,xsize); ICCompressGetFormat(as->hic,as->lpInputFormat,as->lpCompressFormat); ICCompressBegin(as->hic,as->lpInputFormat,as->lpCompressFormat); as->compbufsize = ICCompressGetSize(as->hic,as->lpInputFormat,as->lpCompressFormat); as->compbuffer = HeapAlloc(GetProcessHeap(),0,as->compbufsize); /* Set up the Decompressor part (for prev frames?) */ xsize=ICDecompressGetFormatSize(as->hic,as->lpCompressFormat); as->decompformat = HeapAlloc(GetProcessHeap(),0,xsize); ICDecompressGetFormat(as->hic,as->lpCompressFormat,as->decompformat); as->decompbufsize=((LPBITMAPINFOHEADER)as->decompbuffer)->biSizeImage; as->decompbuffer = HeapReAlloc(GetProcessHeap(),0,as->decompbuffer,as->decompbufsize); memset(as->decompbuffer,0xff,as->decompbufsize); assert(HeapValidate(GetProcessHeap(),0,NULL)); ICDecompressGetFormat(as->hic,as->lpCompressFormat,as->decompformat); ICDecompressBegin(as->hic,as->lpCompressFormat,as->decompformat); as->lpPrev = as->lpPrevFormat = NULL; } return S_OK; } static HRESULT WINAPI IAVIStream_fnRead(IAVIStream*iface,LONG start,LONG samples,LPVOID buffer,LONG buffersize,LONG *bytesread,LONG *samplesread) { FIXME("(%p)->Read(%ld,%ld,%p,%ld,%p,%p)\n",iface,start,samples,buffer,buffersize,bytesread,samplesread); return E_FAIL; } static HRESULT WINAPI IAVIStream_fnWrite(IAVIStream*iface,LONG start,LONG samples,LPVOID buffer,LONG buffersize,DWORD flags,LONG *sampwritten,LONG *byteswritten) { IAVIStreamImpl *as = (IAVIStreamImpl*)iface; DWORD ckid,xflags; FIXME("(%p)->Write(%ld,%ld,%p,%ld,0x%08lx,%p,%p)\n",iface,start,samples,buffer,buffersize,flags,sampwritten,byteswritten); ICCompress( as->hic,flags, as->lpCompressFormat, as->compbuffer, as->lpInputFormat,buffer, &ckid,&xflags, as->curframe,0xffffff/*framesize*/,as->aco.dwQuality, as->lpPrevFormat,as->lpPrev ); ICDecompress( as->hic, flags, /* FIXME: check */ as->lpCompressFormat, as->compbuffer, as->decompformat, as->decompbuffer ); /* We now have a prev format for the next compress ... */ as->lpPrevFormat = as->decompformat; as->lpPrev = as->decompbuffer; return S_OK; } static HRESULT WINAPI IAVIStream_fnDelete(IAVIStream*iface,LONG start,LONG samples) { FIXME("(%p)->Delete(%ld,%ld)\n",iface,start,samples); return E_FAIL; } static HRESULT WINAPI IAVIStream_fnReadData(IAVIStream*iface,DWORD fcc,LPVOID lp,LONG *lpread) { FIXME("(%p)->ReadData(0x%08lx,%p,%p)\n",iface,fcc,lp,lpread); return E_FAIL; } static HRESULT WINAPI IAVIStream_fnWriteData(IAVIStream*iface,DWORD fcc,LPVOID lp,LONG size) { FIXME("(%p)->WriteData(0x%08lx,%p,%ld)\n",iface,fcc,lp,size); return E_FAIL; } static HRESULT WINAPI IAVIStream_fnSetInfo(IAVIStream*iface,AVISTREAMINFOW*info,LONG infolen) { FIXME("(%p)->SetInfo(%p,%ld)\n",iface,info,infolen); return E_FAIL; } /*********************************************************************** * AVIFileCreateStreamA */ HRESULT WINAPI AVIFileCreateStreamA(PAVIFILE iface,PAVISTREAM *ppavi,AVISTREAMINFOA * psi) { AVISTREAMINFOW psiw; /* Only the szName at the end is different */ memcpy(&psiw,psi,sizeof(*psi)-sizeof(psi->szName)); lstrcpynAtoW(psiw.szName,psi->szName,sizeof(psi->szName)); return IAVIFile_CreateStream(iface,ppavi,&psiw); } /*********************************************************************** * AVIFileCreateStreamW */ HRESULT WINAPI AVIFileCreateStreamW(IAVIFile*iface,PAVISTREAM*avis,AVISTREAMINFOW*asi) { return IAVIFile_CreateStream(iface,avis,asi); } /*********************************************************************** * AVIFileGetStream */ HRESULT WINAPI AVIFileGetStream(IAVIFile*iface,PAVISTREAM*avis,DWORD fccType,LONG lParam) { return IAVIFile_GetStream(iface,avis,fccType,lParam); } /*********************************************************************** * AVIFileInfoA */ HRESULT WINAPI AVIFileInfoA(PAVIFILE iface,LPAVIFILEINFOA afi,LONG size) { AVIFILEINFOW afiw; HRESULT hres; if (size < sizeof(AVIFILEINFOA)) return AVIERR_BADSIZE; hres = IAVIFile_Info(iface,&afiw,sizeof(afiw)); memcpy(afi,&afiw,sizeof(*afi)-sizeof(afi->szFileType)); lstrcpynWtoA(afi->szFileType,afiw.szFileType,sizeof(afi->szFileType)); return hres; } /*********************************************************************** * AVIStreamInfoW */ HRESULT WINAPI AVIStreamInfoW(PAVISTREAM iface,AVISTREAMINFOW *asi,LONG size) { return IAVIFile_Info(iface,asi,size); } /*********************************************************************** * AVIStreamInfoA */ HRESULT WINAPI AVIStreamInfoA(PAVISTREAM iface,AVISTREAMINFOA *asi,LONG size) { AVISTREAMINFOW asiw; HRESULT hres; if (sizeszName,asiw.szName,sizeof(asi->szName)); return hres; } /*********************************************************************** * AVIFileInfoW */ HRESULT WINAPI AVIFileInfoW(PAVIFILE iface,LPAVIFILEINFOW afi,LONG size) { return IAVIFile_Info(iface,afi,size); } /*********************************************************************** * AVIMakeCompressedStream */ HRESULT WINAPI AVIMakeCompressedStream(PAVISTREAM *ppsCompressed,PAVISTREAM ppsSource,AVICOMPRESSOPTIONS *aco,CLSID *pclsidHandler) { char fcc[5]; IAVIStreamImpl *as; FIXME("(%p,%p,%p,%p)\n",ppsCompressed,ppsSource,aco,pclsidHandler); fcc[4]='\0'; memcpy(fcc,&(aco->fccType),4); FIXME("\tfccType: '%s'\n",fcc); memcpy(fcc,&(aco->fccHandler),4); FIXME("\tfccHandler: '%s'\n",fcc); FIXME("\tdwFlags: 0x%08lx\n",aco->dwFlags); /* we just create a duplicate for now */ IAVIStream_AddRef(ppsSource); *ppsCompressed = ppsSource; as = (IAVIStreamImpl*)ppsSource; /* this is where the fun begins. Open a compressor and prepare it. */ as->hic = ICOpen(aco->fccType,aco->fccHandler,ICMODE_COMPRESS); /* May happen. for instance if the codec is not able to compress */ if (!as->hic) return AVIERR_UNSUPPORTED; ICGetInfo(as->hic,&(as->icinfo),sizeof(ICINFO)); FIXME("Opened compressor: '%s' '%s'\n",debugstr_w(as->icinfo.szName),debugstr_w(as->icinfo.szDescription)); as->iscompressing = TRUE; memcpy(&(as->aco),aco,sizeof(*aco)); if (as->icinfo.dwFlags & VIDCF_COMPRESSFRAMES) { ICCOMPRESSFRAMES icf; /* now what to fill in there ... Hmm */ memset(&icf,0,sizeof(icf)); icf.lDataRate = aco->dwBytesPerSecond; icf.lQuality = aco->dwQuality; icf.lKeyRate = aco->dwKeyFrameEvery; icf.GetData = (LONG (*)(LPARAM,LONG,LPVOID,LONG)) 0xdead4242; icf.PutData = (LONG (*)(LPARAM,LONG,LPVOID,LONG)) 0xdead4243; ICSendMessage(as->hic,ICM_COMPRESS_FRAMES_INFO,(LPARAM)&icf,sizeof(icf)); } return S_OK; } /*********************************************************************** * AVIStreamSetFormat */ HRESULT WINAPI AVIStreamSetFormat(PAVISTREAM iface,LONG pos,LPVOID format,LONG formatsize) { return IAVIStream_SetFormat(iface,pos,format,formatsize); } /*********************************************************************** * AVIStreamReadFormat */ HRESULT WINAPI AVIStreamReadFormat(PAVISTREAM iface,LONG pos,LPVOID format,LONG *formatsize) { return IAVIStream_ReadFormat(iface,pos,format,formatsize); } /*********************************************************************** * AVIStreamWrite( */ HRESULT WINAPI AVIStreamWrite(PAVISTREAM iface,LONG start,LONG samples,LPVOID buffer,LONG buffersize,DWORD flags,LONG *sampwritten,LONG *byteswritten) { return IAVIStream_Write(iface,start,samples,buffer,buffersize,flags,sampwritten,byteswritten); } /*********************************************************************** * AVIStreamRead */ HRESULT WINAPI AVIStreamRead(PAVISTREAM iface,LONG start,LONG samples,LPVOID buffer,LONG buffersize,LONG *bytesread,LONG *samplesread) { return IAVIStream_Read(iface,start,samples,buffer,buffersize,bytesread,samplesread); } /*********************************************************************** * AVIStreamWriteData */ HRESULT WINAPI AVIStreamWriteData(PAVISTREAM iface,DWORD fcc,LPVOID lp,LONG size) { return IAVIStream_WriteData(iface,fcc,lp,size); } /*********************************************************************** * AVIStreamReadData */ HRESULT WINAPI AVIStreamReadData(PAVISTREAM iface,DWORD fcc,LPVOID lp,LONG *lpread) { return IAVIStream_ReadData(iface,fcc,lp,lpread); } /*********************************************************************** * AVIStreamStart */ LONG WINAPI AVIStreamStart(PAVISTREAM iface) { AVISTREAMINFOW si; IAVIStream_Info(iface,&si,sizeof(si)); return si.dwStart; } /*********************************************************************** * AVIStreamLength */ LONG WINAPI AVIStreamLength(PAVISTREAM iface) { AVISTREAMINFOW si; HRESULT ret; ret = IAVIStream_Info(iface,&si,sizeof(si)); if (ret) /* error */ return 1; return si.dwLength; } /*********************************************************************** * AVIStreamRelease */ ULONG WINAPI AVIStreamRelease(PAVISTREAM iface) { return IAVIStream_Release(iface); } /*********************************************************************** * AVIStreamGetFrameOpen */ PGETFRAME WINAPI AVIStreamGetFrameOpen(PAVISTREAM iface,LPBITMAPINFOHEADER bmi) { FIXME("(%p)->(%p),stub!\n",iface,bmi); return NULL; } /*********************************************************************** * AVIStreamGetFrame */ LPVOID WINAPI AVIStreamGetFrame(PGETFRAME pg,LONG pos) { return IGetFrame_GetFrame(pg,pos); } /*********************************************************************** * AVIStreamGetFrameClose */ HRESULT WINAPI AVIStreamGetFrameClose(PGETFRAME pg) { if (pg) IGetFrame_Release(pg); return 0; } /*********************************************************************** * AVIFileRelease */ ULONG WINAPI AVIFileRelease(PAVIFILE iface) { return IAVIFile_Release(iface); } /*********************************************************************** * AVIFileExit */ void WINAPI AVIFileExit(void) { FIXME("(), stub.\n"); } wine-20000526/dlls/avifil32/avifile.spec0100644000175000001440000000342606752006276017331 0ustar julliardusersname avifile type win16 1 stub WEP 2 stub DLLGETCLASSOBJECT 3 stub DLLCANUNLOADNOW 4 stub ___EXPORTEDSTUB 10 stub _IID_IAVISTREAM 11 stub _IID_IAVIFILE 12 stub _IID_IAVIEDITSTREAM 13 stub _IID_IGETFRAME 14 stub _CLSID_AVISIMPLEUNMARSHAL 100 stub AVIFILEINIT 101 stub AVIFILEEXIT 102 stub AVIFILEOPEN 103 stub AVISTREAMOPENFROMFILE 104 stub AVISTREAMCREATE 105 stub AVIMAKECOMPRESSEDSTREAM 106 stub AVIMAKEFILEFROMSTREAMS 107 stub AVIMAKESTREAMFROMCLIPBOARD 110 stub AVISTREAMGETFRAME 111 stub AVISTREAMGETFRAMECLOSE 112 stub AVISTREAMGETFRAMEOPEN 120 stub _AVISAVE 121 stub AVISAVEV 122 stub AVISAVEOPTIONS 123 stub AVIBUILDFILTER 124 stub AVISAVEOPTIONSFREE 130 stub AVISTREAMSTART 131 stub AVISTREAMLENGTH 132 stub AVISTREAMTIMETOSAMPLE 133 stub AVISTREAMSAMPLETOTIME 140 stub AVIFILEADDREF 141 stub AVIFILERELEASE 142 stub AVIFILEINFO 143 stub AVIFILEGETSTREAM 144 stub AVIFILECREATESTREAM 146 stub AVIFILEWRITEDATA 147 stub AVIFILEREADDATA 148 stub AVIFILEENDRECORD 160 stub AVISTREAMADDREF 161 stub AVISTREAMRELEASE 162 stub AVISTREAMINFO 163 stub AVISTREAMFINDSAMPLE 164 stub AVISTREAMREADFORMAT 165 stub AVISTREAMREADDATA 166 stub AVISTREAMWRITEDATA 167 stub AVISTREAMREAD 168 stub AVISTREAMWRITE 169 stub AVISTREAMSETFORMAT 180 stub EDITSTREAMCOPY 181 stub EDITSTREAMCUT 182 stub EDITSTREAMPASTE 184 stub CREATEEDITABLESTREAM 185 stub AVIPUTFILEONCLIPBOARD 187 stub AVIGETFROMCLIPBOARD 188 stub AVICLEARCLIPBOARD 190 stub EDITSTREAMCLONE 191 stub EDITSTREAMSETNAME 192 stub EDITSTREAMSETINFO 200 stub AVISTREAMBEGINSTREAMING 201 stub AVISTREAMENDSTREAMING wine-20000526/dlls/comctl32/0040755000175000001440000000000007113604165015034 5ustar julliarduserswine-20000526/dlls/comctl32/.cvsignore0100644000175000001440000000007207045213572017032 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libcomctl32.so.1.0 rsrc.s wine-20000526/dlls/comctl32/Makefile.in0100644000175000001440000000112407077362066017106 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = comctl32 SOVERSION = 1.0 WRCEXTRA = -s -p$(MODULE) SPEC_SRCS = comctl32.spec C_SRCS = \ animate.c \ comboex.c \ comctl32undoc.c \ commctrl.c \ datetime.c \ draglist.c \ flatsb.c \ header.c \ hotkey.c \ imagelist.c \ ipaddress.c \ listview.c \ monthcal.c \ nativefont.c \ pager.c \ progress.c \ propsheet.c \ rebar.c \ status.c \ tab.c \ toolbar.c \ tooltips.c \ trackbar.c \ treeview.c \ updown.c RC_SRCS= \ rsrc.rc @MAKE_DLL_RULES@ all: check_wrc ### Dependencies: wine-20000526/dlls/comctl32/animate.c0100644000175000001440000005224207106164364016624 0ustar julliardusers/* -*- tab-width: 8; c-basic-offset: 4 -*- */ /* * Animation control * * Copyright 1998, 1999 Eric Kohl * 1999 Eric Pouech * * NOTES * I will only improve this control once in a while. * Eric * * TODO: * - check for the 'rec ' list in some AVI files * - implement some missing flags (ACS_TRANSPARENT and ACS_CENTER) * - protection between service thread and wndproc messages handling * concurrent access to infoPtr */ #include "winbase.h" #include "commctrl.h" #include "driver.h" #include "animate.h" #include "mmsystem.h" #include "services.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(animate); #define ANIMATE_GetInfoPtr(hWnd) ((ANIMATE_INFO *)GetWindowLongA(hWnd, 0)) HMODULE hModWinmm; static void ANIMATE_Notify(ANIMATE_INFO* infoPtr, UINT notif) { SendMessageA(GetParent(infoPtr->hWnd), WM_COMMAND, MAKEWPARAM(GetDlgCtrlID(infoPtr->hWnd), notif), (LPARAM)infoPtr->hWnd); } static BOOL ANIMATE_LoadResA(ANIMATE_INFO *infoPtr, HINSTANCE hInst, LPSTR lpName) { HRSRC hrsrc; MMIOINFO mminfo; LPVOID lpAvi; hrsrc = FindResourceA(hInst, lpName, "AVI"); if (!hrsrc) return FALSE; infoPtr->hRes = LoadResource(hInst, hrsrc); if (!infoPtr->hRes) return FALSE; lpAvi = LockResource(infoPtr->hRes); if (!lpAvi) return FALSE; memset(&mminfo, 0, sizeof(mminfo)); mminfo.fccIOProc = FOURCC_MEM; mminfo.pchBuffer = (LPSTR)lpAvi; mminfo.cchBuffer = SizeofResource(hInst, hrsrc); infoPtr->hMMio = infoPtr->fnmmioOpenA(NULL, &mminfo, MMIO_READ); if (!infoPtr->hMMio) { GlobalFree((HGLOBAL)lpAvi); return FALSE; } return TRUE; } static BOOL ANIMATE_LoadFileA(ANIMATE_INFO *infoPtr, LPSTR lpName) { infoPtr->hMMio = infoPtr->fnmmioOpenA((LPSTR)lpName, NULL, MMIO_ALLOCBUF | MMIO_READ | MMIO_DENYWRITE); if (!infoPtr->hMMio) return FALSE; return TRUE; } static LRESULT ANIMATE_DoStop(ANIMATE_INFO *infoPtr) { EnterCriticalSection(&infoPtr->cs); /* should stop playing */ if (infoPtr->hService) { SERVICE_Delete(infoPtr->hService); infoPtr->hService = 0; } if (infoPtr->uTimer) { KillTimer(infoPtr->hWnd, infoPtr->uTimer); infoPtr->uTimer = 0; } LeaveCriticalSection(&infoPtr->cs); ANIMATE_Notify(infoPtr, ACN_STOP); return TRUE; } static void ANIMATE_Free(ANIMATE_INFO *infoPtr) { if (infoPtr->hMMio) { ANIMATE_DoStop(infoPtr); infoPtr->fnmmioClose(infoPtr->hMMio, 0); if (infoPtr->hRes) { FreeResource(infoPtr->hRes); infoPtr->hRes = 0; } if (infoPtr->lpIndex) { HeapFree(GetProcessHeap(), 0, infoPtr->lpIndex); infoPtr->lpIndex = NULL; } if (infoPtr->hic) { (infoPtr->fnICClose)(infoPtr->hic); infoPtr->hic = 0; } if (infoPtr->inbih) { HeapFree(GetProcessHeap(), 0, infoPtr->inbih); infoPtr->inbih = NULL; } if (infoPtr->outbih) { HeapFree(GetProcessHeap(), 0, infoPtr->outbih); infoPtr->outbih = NULL; } HeapFree(GetProcessHeap(), 0, infoPtr->indata); HeapFree(GetProcessHeap(), 0, infoPtr->outdata); infoPtr->indata = infoPtr->outdata = NULL; infoPtr->hWnd = 0; infoPtr->hMMio = 0; memset(&infoPtr->mah, 0, sizeof(infoPtr->mah)); memset(&infoPtr->ash, 0, sizeof(infoPtr->ash)); infoPtr->nFromFrame = infoPtr->nToFrame = infoPtr->nLoop = infoPtr->currFrame = 0; } } static LRESULT ANIMATE_PaintFrame(ANIMATE_INFO* infoPtr, HDC hDC) { if (!hDC || !infoPtr->inbih) return TRUE; if (infoPtr->hic) StretchDIBits(hDC, 0, 0, infoPtr->outbih->biWidth, infoPtr->outbih->biHeight, 0, 0, infoPtr->outbih->biWidth, infoPtr->outbih->biHeight, infoPtr->outdata, (LPBITMAPINFO)infoPtr->outbih, DIB_RGB_COLORS, SRCCOPY); else StretchDIBits(hDC, 0, 0, infoPtr->inbih->biWidth, infoPtr->inbih->biHeight, 0, 0, infoPtr->inbih->biWidth, infoPtr->inbih->biHeight, infoPtr->indata, (LPBITMAPINFO)infoPtr->inbih, DIB_RGB_COLORS, SRCCOPY); return TRUE; } static LRESULT ANIMATE_DrawFrame(ANIMATE_INFO* infoPtr) { HDC hDC; TRACE("Drawing frame %d (loop %d)\n", infoPtr->currFrame, infoPtr->nLoop); EnterCriticalSection(&infoPtr->cs); infoPtr->fnmmioSeek(infoPtr->hMMio, infoPtr->lpIndex[infoPtr->currFrame], SEEK_SET); infoPtr->fnmmioRead(infoPtr->hMMio, infoPtr->indata, infoPtr->ash.dwSuggestedBufferSize); if (infoPtr->hic && (infoPtr->fnICDecompress)(infoPtr->hic, 0, infoPtr->inbih, infoPtr->indata, infoPtr->outbih, infoPtr->outdata) != ICERR_OK) { LeaveCriticalSection(&infoPtr->cs); WARN("Decompression error\n"); return FALSE; } if ((hDC = GetDC(infoPtr->hWnd)) != 0) { ANIMATE_PaintFrame(infoPtr, hDC); ReleaseDC(infoPtr->hWnd, hDC); } if (infoPtr->currFrame++ >= infoPtr->nToFrame) { infoPtr->currFrame = infoPtr->nFromFrame; if (infoPtr->nLoop != -1) { if (--infoPtr->nLoop == 0) { ANIMATE_DoStop(infoPtr); } } } LeaveCriticalSection(&infoPtr->cs); return TRUE; } static void CALLBACK ANIMATE_ServiceCallback(ULONG_PTR ptr_) { ANIMATE_INFO* infoPtr = (ANIMATE_INFO*)ptr_; EnterCriticalSection(&infoPtr->cs); ANIMATE_DrawFrame(infoPtr); LeaveCriticalSection(&infoPtr->cs); } static LRESULT ANIMATE_Play(HWND hWnd, WPARAM wParam, LPARAM lParam) { ANIMATE_INFO *infoPtr = ANIMATE_GetInfoPtr(hWnd); /* nothing opened */ if (!infoPtr->hMMio) return FALSE; if (infoPtr->hService || infoPtr->uTimer) { FIXME("Already playing ? what should I do ??\n"); ANIMATE_DoStop(infoPtr); } infoPtr->nFromFrame = (INT)LOWORD(lParam); infoPtr->nToFrame = (INT)HIWORD(lParam); infoPtr->nLoop = (INT)wParam; if (infoPtr->nToFrame == 0xFFFF) infoPtr->nToFrame = infoPtr->mah.dwTotalFrames - 1; TRACE("(repeat=%d from=%d to=%d);\n", infoPtr->nLoop, infoPtr->nFromFrame, infoPtr->nToFrame); if (infoPtr->nFromFrame >= infoPtr->nToFrame || infoPtr->nToFrame >= infoPtr->mah.dwTotalFrames) return FALSE; infoPtr->currFrame = infoPtr->nFromFrame; if (GetWindowLongA(hWnd, GWL_STYLE) & ACS_TIMER) { TRACE("Using a timer\n"); /* create a timer to display AVI */ infoPtr->uTimer = SetTimer(hWnd, 1, infoPtr->mah.dwMicroSecPerFrame / 1000, NULL); } else { TRACE("Using the service thread\n"); /* time is in µs */ infoPtr->hService = SERVICE_AddTimer(infoPtr->mah.dwMicroSecPerFrame / 1000, ANIMATE_ServiceCallback, (DWORD)infoPtr); } ANIMATE_Notify(infoPtr, ACN_START); return TRUE; } static BOOL ANIMATE_GetAviInfo(ANIMATE_INFO *infoPtr) { MMCKINFO ckMainRIFF; MMCKINFO mmckHead; MMCKINFO mmckList; MMCKINFO mmckInfo; DWORD numFrame; DWORD insize; if (infoPtr->fnmmioDescend(infoPtr->hMMio, &ckMainRIFF, NULL, 0) != 0) { WARN("Can't find 'RIFF' chunk\n"); return FALSE; } if ((ckMainRIFF.ckid != FOURCC_RIFF) || (ckMainRIFF.fccType != mmioFOURCC('A', 'V', 'I', ' '))) { WARN("Can't find 'AVI ' chunk\n"); return FALSE; } mmckHead.fccType = mmioFOURCC('h', 'd', 'r', 'l'); if (infoPtr->fnmmioDescend(infoPtr->hMMio, &mmckHead, &ckMainRIFF, MMIO_FINDLIST) != 0) { WARN("Can't find 'hdrl' list\n"); return FALSE; } mmckInfo.ckid = mmioFOURCC('a', 'v', 'i', 'h'); if (infoPtr->fnmmioDescend(infoPtr->hMMio, &mmckInfo, &mmckHead, MMIO_FINDCHUNK) != 0) { WARN("Can't find 'avih' chunk\n"); return FALSE; } infoPtr->fnmmioRead(infoPtr->hMMio, (LPSTR)&infoPtr->mah, sizeof(infoPtr->mah)); TRACE("mah.dwMicroSecPerFrame=%ld\n", infoPtr->mah.dwMicroSecPerFrame); TRACE("mah.dwMaxBytesPerSec=%ld\n", infoPtr->mah.dwMaxBytesPerSec); TRACE("mah.dwPaddingGranularity=%ld\n", infoPtr->mah.dwPaddingGranularity); TRACE("mah.dwFlags=%ld\n", infoPtr->mah.dwFlags); TRACE("mah.dwTotalFrames=%ld\n", infoPtr->mah.dwTotalFrames); TRACE("mah.dwInitialFrames=%ld\n", infoPtr->mah.dwInitialFrames); TRACE("mah.dwStreams=%ld\n", infoPtr->mah.dwStreams); TRACE("mah.dwSuggestedBufferSize=%ld\n", infoPtr->mah.dwSuggestedBufferSize); TRACE("mah.dwWidth=%ld\n", infoPtr->mah.dwWidth); TRACE("mah.dwHeight=%ld\n", infoPtr->mah.dwHeight); infoPtr->fnmmioAscend(infoPtr->hMMio, &mmckInfo, 0); mmckList.fccType = mmioFOURCC('s', 't', 'r', 'l'); if (infoPtr->fnmmioDescend(infoPtr->hMMio, &mmckList, &mmckHead, MMIO_FINDLIST) != 0) { WARN("Can't find 'strl' list\n"); return FALSE; } mmckInfo.ckid = mmioFOURCC('s', 't', 'r', 'h'); if (infoPtr->fnmmioDescend(infoPtr->hMMio, &mmckInfo, &mmckList, MMIO_FINDCHUNK) != 0) { WARN("Can't find 'strh' chunk\n"); return FALSE; } infoPtr->fnmmioRead(infoPtr->hMMio, (LPSTR)&infoPtr->ash, sizeof(infoPtr->ash)); TRACE("ash.fccType='%c%c%c%c'\n", LOBYTE(LOWORD(infoPtr->ash.fccType)), HIBYTE(LOWORD(infoPtr->ash.fccType)), LOBYTE(HIWORD(infoPtr->ash.fccType)), HIBYTE(HIWORD(infoPtr->ash.fccType))); TRACE("ash.fccHandler='%c%c%c%c'\n", LOBYTE(LOWORD(infoPtr->ash.fccHandler)), HIBYTE(LOWORD(infoPtr->ash.fccHandler)), LOBYTE(HIWORD(infoPtr->ash.fccHandler)), HIBYTE(HIWORD(infoPtr->ash.fccHandler))); TRACE("ash.dwFlags=%ld\n", infoPtr->ash.dwFlags); TRACE("ash.wPriority=%d\n", infoPtr->ash.wPriority); TRACE("ash.wLanguage=%d\n", infoPtr->ash.wLanguage); TRACE("ash.dwInitialFrames=%ld\n", infoPtr->ash.dwInitialFrames); TRACE("ash.dwScale=%ld\n", infoPtr->ash.dwScale); TRACE("ash.dwRate=%ld\n", infoPtr->ash.dwRate); TRACE("ash.dwStart=%ld\n", infoPtr->ash.dwStart); TRACE("ash.dwLength=%ld\n", infoPtr->ash.dwLength); TRACE("ash.dwSuggestedBufferSize=%ld\n", infoPtr->ash.dwSuggestedBufferSize); TRACE("ash.dwQuality=%ld\n", infoPtr->ash.dwQuality); TRACE("ash.dwSampleSize=%ld\n", infoPtr->ash.dwSampleSize); TRACE("ash.rcFrame=(%d,%d,%d,%d)\n", infoPtr->ash.rcFrame.top, infoPtr->ash.rcFrame.left, infoPtr->ash.rcFrame.bottom, infoPtr->ash.rcFrame.right); infoPtr->fnmmioAscend(infoPtr->hMMio, &mmckInfo, 0); mmckInfo.ckid = mmioFOURCC('s', 't', 'r', 'f'); if (infoPtr->fnmmioDescend(infoPtr->hMMio, &mmckInfo, &mmckList, MMIO_FINDCHUNK) != 0) { WARN("Can't find 'strh' chunk\n"); return FALSE; } infoPtr->inbih = HeapAlloc(GetProcessHeap(), 0, mmckInfo.cksize); if (!infoPtr->inbih) { WARN("Can't alloc input BIH\n"); return FALSE; } infoPtr->fnmmioRead(infoPtr->hMMio, (LPSTR)infoPtr->inbih, mmckInfo.cksize); TRACE("bih.biSize=%ld\n", infoPtr->inbih->biSize); TRACE("bih.biWidth=%ld\n", infoPtr->inbih->biWidth); TRACE("bih.biHeight=%ld\n", infoPtr->inbih->biHeight); TRACE("bih.biPlanes=%d\n", infoPtr->inbih->biPlanes); TRACE("bih.biBitCount=%d\n", infoPtr->inbih->biBitCount); TRACE("bih.biCompression=%ld\n", infoPtr->inbih->biCompression); TRACE("bih.biSizeImage=%ld\n", infoPtr->inbih->biSizeImage); TRACE("bih.biXPelsPerMeter=%ld\n", infoPtr->inbih->biXPelsPerMeter); TRACE("bih.biYPelsPerMeter=%ld\n", infoPtr->inbih->biYPelsPerMeter); TRACE("bih.biClrUsed=%ld\n", infoPtr->inbih->biClrUsed); TRACE("bih.biClrImportant=%ld\n", infoPtr->inbih->biClrImportant); infoPtr->fnmmioAscend(infoPtr->hMMio, &mmckInfo, 0); infoPtr->fnmmioAscend(infoPtr->hMMio, &mmckList, 0); #if 0 /* an AVI has 0 or 1 video stream, and to be animated should not contain * an audio stream, so only one strl is allowed */ mmckList.fccType = mmioFOURCC('s', 't', 'r', 'l'); if (infoPtr->fnmmioDescend(infoPtr->hMMio, &mmckList, &mmckHead, MMIO_FINDLIST) == 0) { WARN("There should be a single 'strl' list\n"); return FALSE; } #endif infoPtr->fnmmioAscend(infoPtr->hMMio, &mmckHead, 0); /* no need to read optional JUNK chunk */ mmckList.fccType = mmioFOURCC('m', 'o', 'v', 'i'); if (infoPtr->fnmmioDescend(infoPtr->hMMio, &mmckList, &ckMainRIFF, MMIO_FINDLIST) != 0) { WARN("Can't find 'movi' list\n"); return FALSE; } /* FIXME: should handle the 'rec ' LIST when present */ infoPtr->lpIndex = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, infoPtr->mah.dwTotalFrames * sizeof(DWORD)); if (!infoPtr->lpIndex) { WARN("Can't alloc index array\n"); return FALSE; } numFrame = insize = 0; while (infoPtr->fnmmioDescend(infoPtr->hMMio, &mmckInfo, &mmckList, 0) == 0 && numFrame < infoPtr->mah.dwTotalFrames) { infoPtr->lpIndex[numFrame] = mmckInfo.dwDataOffset; if (insize < mmckInfo.cksize) insize = mmckInfo.cksize; numFrame++; infoPtr->fnmmioAscend(infoPtr->hMMio, &mmckInfo, 0); } if (numFrame != infoPtr->mah.dwTotalFrames) { WARN("Found %ld frames (/%ld)\n", numFrame, infoPtr->mah.dwTotalFrames); return FALSE; } if (insize > infoPtr->ash.dwSuggestedBufferSize) { WARN("insize=%ld suggestedSize=%ld\n", insize, infoPtr->ash.dwSuggestedBufferSize); infoPtr->ash.dwSuggestedBufferSize = insize; } infoPtr->indata = HeapAlloc(GetProcessHeap(), 0, infoPtr->ash.dwSuggestedBufferSize); if (!infoPtr->indata) { WARN("Can't alloc input buffer\n"); return FALSE; } return TRUE; } static BOOL ANIMATE_GetAviCodec(ANIMATE_INFO *infoPtr) { DWORD outSize; /* check uncompressed AVI */ if (infoPtr->ash.fccHandler == mmioFOURCC('D', 'I', 'B', ' ')) { infoPtr->hic = 0; return TRUE; } /* try to get a decompressor for that type */ infoPtr->hic = (infoPtr->fnICOpen)(ICTYPE_VIDEO, infoPtr->ash.fccHandler, ICMODE_DECOMPRESS); if (!infoPtr->hic) { WARN("Can't load codec for the file\n"); return FALSE; } outSize = (infoPtr->fnICSendMessage)(infoPtr->hic, ICM_DECOMPRESS_GET_FORMAT, (DWORD)infoPtr->inbih, 0L); infoPtr->outbih = HeapAlloc(GetProcessHeap(), 0, outSize); if (!infoPtr->outbih) { WARN("Can't alloc output BIH\n"); return FALSE; } if ((infoPtr->fnICSendMessage)(infoPtr->hic, ICM_DECOMPRESS_GET_FORMAT, (DWORD)infoPtr->inbih, (DWORD)infoPtr->outbih) != ICERR_OK) { WARN("Can't get output BIH\n"); return FALSE; } infoPtr->outdata = HeapAlloc(GetProcessHeap(), 0, infoPtr->outbih->biSizeImage); if (!infoPtr->outdata) { WARN("Can't alloc output buffer\n"); return FALSE; } if ((infoPtr->fnICSendMessage)(infoPtr->hic, ICM_DECOMPRESS_BEGIN, (DWORD)infoPtr->inbih, (DWORD)infoPtr->outbih) != ICERR_OK) { WARN("Can't begin decompression\n"); return FALSE; } return TRUE; } static LRESULT ANIMATE_OpenA(HWND hWnd, WPARAM wParam, LPARAM lParam) { ANIMATE_INFO *infoPtr = ANIMATE_GetInfoPtr(hWnd); HINSTANCE hInstance = (HINSTANCE)wParam; ANIMATE_Free(infoPtr); if (!lParam) { TRACE("Closing avi!\n"); return TRUE; } if (!hInstance) hInstance = GetWindowLongA(hWnd, GWL_HINSTANCE); if (HIWORD(lParam)) { TRACE("(\"%s\");\n", (LPSTR)lParam); if (!ANIMATE_LoadResA(infoPtr, hInstance, (LPSTR)lParam)) { TRACE("No AVI resource found!\n"); if (!ANIMATE_LoadFileA(infoPtr, (LPSTR)lParam)) { WARN("No AVI file found!\n"); return FALSE; } } } else { TRACE("(%u);\n", (WORD)LOWORD(lParam)); if (!ANIMATE_LoadResA(infoPtr, hInstance, MAKEINTRESOURCEA((INT)lParam))) { WARN("No AVI resource found!\n"); return FALSE; } } if (!ANIMATE_GetAviInfo(infoPtr)) { WARN("Can't get AVI information\n"); ANIMATE_Free(infoPtr); return FALSE; } if (!ANIMATE_GetAviCodec(infoPtr)) { WARN("Can't get AVI Codec\n"); ANIMATE_Free(infoPtr); return FALSE; } if (GetWindowLongA(hWnd, GWL_STYLE) & ACS_CENTER) { FIXME("ACS_CENTER: NIY\n"); } else { /* MoveWindow(hWnd, 0, 0, infoPtr->mah.dwWidth, infoPtr->mah.dwHeight, FALSE);*/ SetWindowPos(hWnd, 0, 0, 0, infoPtr->mah.dwWidth, infoPtr->mah.dwHeight, SWP_NOACTIVATE | SWP_NOMOVE | SWP_NOZORDER); } if (GetWindowLongA(hWnd, GWL_STYLE) & ACS_TRANSPARENT) { FIXME("ACS_TRANSPARENT: NIY\n"); } if (GetWindowLongA(hWnd, GWL_STYLE) & ACS_AUTOPLAY) { return ANIMATE_Play(hWnd, -1, (LPARAM)MAKELONG(0, infoPtr->mah.dwTotalFrames-1)); } return TRUE; } /* << ANIMATE_Open32W >> */ static LRESULT ANIMATE_Stop(HWND hWnd, WPARAM wParam, LPARAM lParam) { ANIMATE_INFO *infoPtr = ANIMATE_GetInfoPtr(hWnd); /* nothing opened */ if (!infoPtr->hMMio) return FALSE; ANIMATE_DoStop(infoPtr); return TRUE; } static LRESULT ANIMATE_Create(HWND hWnd, WPARAM wParam, LPARAM lParam) { ANIMATE_INFO* infoPtr; HMODULE hModule = LoadLibraryA("msvfw32.dll"); if (!hModule) return FALSE; /* allocate memory for info structure */ infoPtr = (ANIMATE_INFO *)COMCTL32_Alloc(sizeof(ANIMATE_INFO)); if (!infoPtr) { ERR("could not allocate info memory!\n"); return 0; } /* Temporary hack until we get dllglue up and running */ infoPtr->fnICOpen = (void*)GetProcAddress(hModule, "ICOpen"); infoPtr->fnICClose = (void*)GetProcAddress(hModule, "ICClose"); infoPtr->fnICSendMessage = (void*)GetProcAddress(hModule, "ICSendMessage"); infoPtr->fnICDecompress = (void*)GetProcAddress(hModule, "ICDecompress"); TRACE("Animate style=0x%08lx, parent=%08lx\n", GetWindowLongA(hWnd, GWL_STYLE), (DWORD)GetParent(hWnd)); /* store crossref hWnd <-> info structure */ SetWindowLongA(hWnd, 0, (DWORD)infoPtr); infoPtr->hWnd = hWnd; hModWinmm = LoadLibraryA("WINMM"); infoPtr->fnmmioOpenA = (void*)GetProcAddress(hModWinmm, "mmioOpenA"); infoPtr->fnmmioClose = (void*)GetProcAddress(hModWinmm, "mmioClose"); infoPtr->fnmmioAscend = (void*)GetProcAddress(hModWinmm, "mmioAscend"); infoPtr->fnmmioDescend = (void*)GetProcAddress(hModWinmm, "mmioDescend"); infoPtr->fnmmioSeek = (void*)GetProcAddress(hModWinmm, "mmioSeek"); infoPtr->fnmmioRead = (void*)GetProcAddress(hModWinmm, "mmioRead"); InitializeCriticalSection(&infoPtr->cs); return 0; } static LRESULT ANIMATE_Destroy(HWND hWnd, WPARAM wParam, LPARAM lParam) { ANIMATE_INFO *infoPtr = ANIMATE_GetInfoPtr(hWnd); /* free avi data */ ANIMATE_Free(infoPtr); /* free animate info data */ COMCTL32_Free(infoPtr); SetWindowLongA(hWnd, 0, 0); FreeLibrary(hModWinmm); return 0; } static LRESULT ANIMATE_EraseBackground(HWND hWnd, WPARAM wParam, LPARAM lParam) { RECT rect; GetClientRect(hWnd, &rect); #if 0 HBRUSH hBrush = CreateSolidBrush(infoPtr->clrBk); FillRect((HDC)wParam, &rect, hBrush); DeleteObject(hBrush); #else FillRect((HDC)wParam, &rect, GetSysColorBrush(COLOR_WINDOW)); #endif return TRUE; } static LRESULT WINAPI ANIMATE_Size(HWND hWnd, WPARAM wParam, LPARAM lParam) { ANIMATE_INFO *infoPtr = ANIMATE_GetInfoPtr(hWnd); if (GetWindowLongA(hWnd, GWL_STYLE) & ACS_CENTER) { FIXME("NIY\n"); if (infoPtr->hMMio) { /* centers the animation in the control, invalidates the control */ } InvalidateRect(hWnd, NULL, TRUE); } return TRUE; } static LRESULT WINAPI ANIMATE_WindowProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TRACE("hwnd=%x msg=%x wparam=%x lparam=%lx\n", hWnd, uMsg, wParam, lParam); if (!ANIMATE_GetInfoPtr(hWnd) && (uMsg != WM_NCCREATE)) return DefWindowProcA(hWnd, uMsg, wParam, lParam); switch (uMsg) { case ACM_OPENA: return ANIMATE_OpenA(hWnd, wParam, lParam); /* case ACM_OPEN32W: FIXME!! */ /* return ANIMATE_Open32W(hWnd, wParam, lParam); */ case ACM_PLAY: return ANIMATE_Play(hWnd, wParam, lParam); case ACM_STOP: return ANIMATE_Stop(hWnd, wParam, lParam); case WM_NCCREATE: ANIMATE_Create(hWnd, wParam, lParam); return DefWindowProcA(hWnd, uMsg, wParam, lParam); case WM_NCHITTEST: return HTTRANSPARENT; case WM_DESTROY: ANIMATE_Destroy(hWnd, wParam, lParam); return DefWindowProcA(hWnd, uMsg, wParam, lParam); case WM_ERASEBKGND: ANIMATE_EraseBackground(hWnd, wParam, lParam); break; /* case WM_STYLECHANGED: FIXME shall we do something ?? */ case WM_TIMER: return ANIMATE_DrawFrame(ANIMATE_GetInfoPtr(hWnd)); case WM_CLOSE: ANIMATE_Free(ANIMATE_GetInfoPtr(hWnd)); return TRUE; case WM_PAINT: if (wParam) { ANIMATE_PaintFrame(ANIMATE_GetInfoPtr(hWnd), (HDC)wParam); } else { PAINTSTRUCT ps; HDC hDC = BeginPaint(hWnd, &ps); ANIMATE_PaintFrame(ANIMATE_GetInfoPtr(hWnd), hDC); EndPaint(hWnd, &ps); } break; case WM_SIZE: ANIMATE_Size(hWnd, wParam, lParam); return DefWindowProcA(hWnd, uMsg, wParam, lParam); default: if (uMsg >= WM_USER) ERR("unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); return DefWindowProcA(hWnd, uMsg, wParam, lParam); } return 0; } void ANIMATE_Register(void) { WNDCLASSA wndClass; ZeroMemory(&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS | CS_DBLCLKS; wndClass.lpfnWndProc = (WNDPROC)ANIMATE_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(ANIMATE_INFO *); wndClass.hCursor = LoadCursorA(0, IDC_ARROWA); wndClass.hbrBackground = (HBRUSH)(COLOR_BTNFACE + 1); wndClass.lpszClassName = ANIMATE_CLASSA; RegisterClassA(&wndClass); } void ANIMATE_Unregister(void) { UnregisterClassA(ANIMATE_CLASSA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/comboex.c0100644000175000001440000001617207106136275016644 0ustar julliardusers/* * ComboBoxEx control * * Copyright 1998, 1999 Eric Kohl * * NOTES * This is just a dummy control. An author is needed! Any volunteers? * I will only improve this control once in a while. * Eric * * TODO: * - All messages. * - All notifications. * * FIXME: * - should include "combo.h" */ #include "winbase.h" #include "commctrl.h" #include "comboex.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(comboex) #define ID_CB_EDIT 1001 #define COMBOEX_GetInfoPtr(wndPtr) ((COMBOEX_INFO *)GetWindowLongA (hwnd, 0)) /* << COMBOEX_DeleteItem >> */ inline static LRESULT COMBOEX_GetComboControl (HWND hwnd, WPARAM wParam, LPARAM lParam) { COMBOEX_INFO *infoPtr = COMBOEX_GetInfoPtr (hwnd); TRACE("\n"); return (LRESULT)infoPtr->hwndCombo; } inline static LRESULT COMBOEX_GetEditControl (HWND hwnd, WPARAM wParam, LPARAM lParam) { COMBOEX_INFO *infoPtr = COMBOEX_GetInfoPtr (hwnd); if ((GetWindowLongA (hwnd, GWL_STYLE) & CBS_DROPDOWNLIST) != CBS_DROPDOWN) return 0; TRACE("-- 0x%x\n", GetDlgItem (infoPtr->hwndCombo, ID_CB_EDIT)); return (LRESULT)GetDlgItem (infoPtr->hwndCombo, ID_CB_EDIT); } inline static LRESULT COMBOEX_GetExtendedStyle (HWND hwnd, WPARAM wParam, LPARAM lParam) { COMBOEX_INFO *infoPtr = COMBOEX_GetInfoPtr (hwnd); return (LRESULT)infoPtr->dwExtStyle; } inline static LRESULT COMBOEX_GetImageList (HWND hwnd, WPARAM wParam, LPARAM lParam) { COMBOEX_INFO *infoPtr = COMBOEX_GetInfoPtr (hwnd); TRACE("(0x%08x 0x%08lx)\n", wParam, lParam); return (LRESULT)infoPtr->himl; } static LRESULT COMBOEX_InsertItemA (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* COMBOEX_INFO *infoPtr = COMBOEX_GetInfoPtr (hwnd); */ FIXME("(0x%08x 0x%08lx)\n", wParam, lParam); return -1; } static LRESULT COMBOEX_SetExtendedStyle (HWND hwnd, WPARAM wParam, LPARAM lParam) { COMBOEX_INFO *infoPtr = COMBOEX_GetInfoPtr (hwnd); DWORD dwTemp; TRACE("(0x%08x 0x%08lx)\n", wParam, lParam); dwTemp = infoPtr->dwExtStyle; if ((DWORD)wParam) { infoPtr->dwExtStyle = (infoPtr->dwExtStyle & ~(DWORD)wParam) | (DWORD)lParam; } else infoPtr->dwExtStyle = (DWORD)lParam; /* FIXME: repaint?? */ return (LRESULT)dwTemp; } inline static LRESULT COMBOEX_SetImageList (HWND hwnd, WPARAM wParam, LPARAM lParam) { COMBOEX_INFO *infoPtr = COMBOEX_GetInfoPtr (hwnd); HIMAGELIST himlTemp; TRACE("(0x%08x 0x%08lx)\n", wParam, lParam); himlTemp = infoPtr->himl; infoPtr->himl = (HIMAGELIST)lParam; return (LRESULT)himlTemp; } static LRESULT COMBOEX_SetItemA (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* COMBOEX_INFO *infoPtr = COMBOEX_GetInfoPtr (hwnd); */ FIXME("(%p): stub\n", (LPVOID)lParam); return TRUE; } /* << COMBOEX_SetItem32W >> */ inline static LRESULT COMBOEX_Forward (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { COMBOEX_INFO *infoPtr = COMBOEX_GetInfoPtr (hwnd); FIXME("(0x%x 0x%x 0x%lx): stub\n", uMsg, wParam, lParam); if (infoPtr->hwndCombo) return SendMessageA (infoPtr->hwndCombo, uMsg, wParam, lParam); return 0; } static LRESULT COMBOEX_Create (HWND hwnd, WPARAM wParam, LPARAM lParam) { COMBOEX_INFO *infoPtr; DWORD dwComboStyle; /* allocate memory for info structure */ infoPtr = (COMBOEX_INFO *)COMCTL32_Alloc (sizeof(COMBOEX_INFO)); if (infoPtr == NULL) { ERR("could not allocate info memory!\n"); return 0; } SetWindowLongA (hwnd, 0, (DWORD)infoPtr); /* initialize info structure */ /* create combo box */ dwComboStyle = GetWindowLongA (hwnd, GWL_STYLE) & (CBS_SIMPLE|CBS_DROPDOWN|CBS_DROPDOWNLIST|WS_CHILD); infoPtr->hwndCombo = CreateWindowA ("ComboBox", "", WS_CHILD | WS_VISIBLE | CBS_OWNERDRAWFIXED | dwComboStyle, 0, 0, 0, 0, hwnd, (HMENU)1, GetWindowLongA (hwnd, GWL_HINSTANCE), NULL); return 0; } static LRESULT COMBOEX_Destroy (HWND hwnd, WPARAM wParam, LPARAM lParam) { COMBOEX_INFO *infoPtr = COMBOEX_GetInfoPtr (hwnd); if (infoPtr->hwndCombo) DestroyWindow (infoPtr->hwndCombo); /* free comboex info data */ COMCTL32_Free (infoPtr); SetWindowLongA (hwnd, 0, 0); return 0; } static LRESULT COMBOEX_Size (HWND hwnd, WPARAM wParam, LPARAM lParam) { COMBOEX_INFO *infoPtr = COMBOEX_GetInfoPtr (hwnd); RECT rect; GetClientRect (hwnd, &rect); MoveWindow (infoPtr->hwndCombo, 0, 0, rect.right -rect.left, rect.bottom - rect.top, TRUE); return 0; } static LRESULT WINAPI COMBOEX_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TRACE("hwnd=%x msg=%x wparam=%x lParam=%lx\n", hwnd, uMsg, wParam, lParam); if (!COMBOEX_GetInfoPtr (hwnd) && (uMsg != WM_CREATE)) return DefWindowProcA (hwnd, uMsg, wParam, lParam); switch (uMsg) { /* case CBEM_DELETEITEM: */ case CBEM_GETCOMBOCONTROL: return COMBOEX_GetComboControl (hwnd, wParam, lParam); case CBEM_GETEDITCONTROL: return COMBOEX_GetEditControl (hwnd, wParam, lParam); case CBEM_GETEXTENDEDSTYLE: return COMBOEX_GetExtendedStyle (hwnd, wParam, lParam); case CBEM_GETIMAGELIST: return COMBOEX_GetImageList (hwnd, wParam, lParam); /* case CBEM_GETITEM32A: case CBEM_GETITEM32W: case CBEM_GETUNICODEFORMAT: case CBEM_HASEDITCHANGED: */ case CBEM_INSERTITEMA: return COMBOEX_InsertItemA (hwnd, wParam, lParam); /* case CBEM_INSERTITEM32W: */ case CBEM_SETEXTENDEDSTYLE: return COMBOEX_SetExtendedStyle (hwnd, wParam, lParam); case CBEM_SETIMAGELIST: return COMBOEX_SetImageList (hwnd, wParam, lParam); case CBEM_SETITEMA: return COMBOEX_SetItemA (hwnd, wParam, lParam); /* case CBEM_SETITEM32W: case CBEM_SETUNICODEFORMAT: */ case CB_DELETESTRING: case CB_FINDSTRINGEXACT: case CB_GETCOUNT: case CB_GETCURSEL: case CB_GETDROPPEDCONTROLRECT: case CB_GETDROPPEDSTATE: case CB_GETITEMDATA: case CB_GETITEMHEIGHT: case CB_GETLBTEXT: case CB_GETLBTEXTLEN: case CB_GETEXTENDEDUI: case CB_LIMITTEXT: case CB_RESETCONTENT: case CB_SELECTSTRING: case CB_SETCURSEL: case CB_SETDROPPEDWIDTH: case CB_SETEXTENDEDUI: case CB_SETITEMDATA: case CB_SETITEMHEIGHT: case CB_SHOWDROPDOWN: return COMBOEX_Forward (hwnd, uMsg, wParam, lParam); case WM_CREATE: return COMBOEX_Create (hwnd, wParam, lParam); case WM_DESTROY: return COMBOEX_Destroy (hwnd, wParam, lParam); case WM_SIZE: return COMBOEX_Size (hwnd, wParam, lParam); default: if (uMsg >= WM_USER) ERR("unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); return DefWindowProcA (hwnd, uMsg, wParam, lParam); } return 0; } VOID COMBOEX_Register (void) { WNDCLASSA wndClass; ZeroMemory (&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS; wndClass.lpfnWndProc = (WNDPROC)COMBOEX_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(COMBOEX_INFO *); wndClass.hCursor = LoadCursorA (0, IDC_ARROWA); wndClass.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1); wndClass.lpszClassName = WC_COMBOBOXEXA; RegisterClassA (&wndClass); } VOID COMBOEX_Unregister (void) { UnregisterClassA (WC_COMBOBOXEXA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/comctl32.h0100644000175000001440000000267407020314073016632 0ustar julliardusers/****************************************************************************** * * Common definitions (resource ids and global variables) * * Copyright 1999 Thuy Nguyen * Copyright 1999 Eric Kohl * */ extern HMODULE COMCTL32_hModule; /* Property sheet / Wizard */ #define IDD_PROPSHEET 1006 #define IDD_WIZARD 1020 #define IDC_TABCONTROL 12320 #define IDC_APPLY_BUTTON 12321 #define IDC_BACK_BUTTON 12323 #define IDC_NEXT_BUTTON 12324 #define IDC_FINISH_BUTTON 12325 #define IDC_SUNKEN_LINE 12326 #define IDS_CLOSE 4160 /* Toolbar customization dialog */ #define IDD_TBCUSTOMIZE 200 #define IDC_AVAILBTN_LBOX 201 #define IDC_RESET_BTN 202 #define IDC_TOOLBARBTN_LBOX 203 #define IDC_REMOVE_BTN 204 #define IDC_HELP_BTN 205 #define IDC_MOVEUP_BTN 206 #define IDC_MOVEDN_BTN 207 /* Toolbar imagelist bitmaps */ #define IDB_STD_SMALL 120 #define IDB_STD_LARGE 121 #define IDB_VIEW_SMALL 124 #define IDB_VIEW_LARGE 125 #define IDB_HIST_SMALL 130 #define IDB_HIST_LARGE 131 /* Month calendar month menu popup */ #define IDD_MCMONTHMENU 300 #define IDM_JAN 301 #define IDM_FEB 302 #define IDM_MAR 303 #define IDM_APR 304 #define IDM_MAY 305 #define IDM_JUN 306 #define IDM_JUL 307 #define IDM_AUG 308 #define IDM_SEP 309 #define IDM_OCT 310 #define IDM_NOV 311 #define IDM_DEC 312 /* Treeview Checboxes */ #define IDT_CHECK 401 wine-20000526/dlls/comctl32/comctl32.spec0100644000175000001440000002253107101106212017321 0ustar julliardusersname comctl32 type win32 init COMCTL32_LibMain rsrc comctl32 # Functions exported by the Win95 comctl32.dll # (these need to have these exact ordinals, because some win95 dlls # import comctl32.dll by ordinal) # This list was created from a comctl32.dll v4.72 (IE4.01). 2 stdcall MenuHelp(long long long long long long ptr) MenuHelp 3 stdcall ShowHideMenuCtl(long long ptr) ShowHideMenuCtl 4 stdcall GetEffectiveClientRect(long long long) GetEffectiveClientRect 5 stdcall DrawStatusTextA(long ptr str long) DrawStatusTextA 6 stdcall CreateStatusWindowA(long str long long) CreateStatusWindowA 7 stdcall CreateToolbar(long long long long long long ptr long) CreateToolbar 8 stdcall CreateMappedBitmap(long long long ptr long) CreateMappedBitmap 9 stdcall DPA_LoadStream(ptr ptr ptr long) DPA_LoadStream 10 stdcall DPA_SaveStream(ptr ptr ptr long) DPA_SaveStream 11 stdcall DPA_Merge(ptr ptr long ptr ptr long) DPA_Merge #12 stub Cctl1632_ThunkData32 13 stdcall MakeDragList(long) MakeDragList 14 stdcall LBItemFromPt(long long long long) LBItemFromPt 15 stdcall DrawInsert(long long long) DrawInsert 16 stdcall CreateUpDownControl(long long long long long long long long long long long long) CreateUpDownControl 17 stdcall InitCommonControls() InitCommonControls 18 stdcall CreatePropertySheetPage(ptr) CreatePropertySheetPageA 19 stdcall CreatePropertySheetPageA(ptr) CreatePropertySheetPageA 20 stdcall CreatePropertySheetPageW(ptr) CreatePropertySheetPageW 21 stdcall CreateStatusWindow(long str long long) CreateStatusWindowA 22 stdcall CreateStatusWindowW(long wstr long long) CreateStatusWindowW 23 stdcall CreateToolbarEx(long long long long long long ptr long long long long long long) CreateToolbarEx 24 stdcall DestroyPropertySheetPage(long) DestroyPropertySheetPage 25 stdcall DllGetVersion(ptr) COMCTL32_DllGetVersion 26 stdcall DllInstall(long ptr) COMCTL32_DllInstall 27 stdcall DrawStatusText(long ptr ptr long) DrawStatusTextA 28 stdcall DrawStatusTextW(long ptr wstr long) DrawStatusTextW 29 stdcall FlatSB_EnableScrollBar (long long long) FlatSB_EnableScrollBar 30 stdcall FlatSB_GetScrollInfo (long long ptr) FlatSB_GetScrollInfo 31 stdcall FlatSB_GetScrollPos (long long) FlatSB_GetScrollPos 32 stdcall FlatSB_GetScrollProp (long long ptr) FlatSB_GetScrollProp 33 stdcall FlatSB_GetScrollRange (long long ptr ptr) FlatSB_GetScrollRange 34 stdcall FlatSB_SetScrollInfo (long long ptr long) FlatSB_SetScrollInfo 35 stdcall FlatSB_SetScrollPos (long long long long) FlatSB_SetScrollPos 36 stdcall FlatSB_SetScrollProp (long long long long) FlatSB_SetScrollProp 37 stdcall FlatSB_SetScrollRange (long long long long long) FlatSB_SetScrollRange 38 stdcall FlatSB_ShowScrollBar (long long long) FlatSB_ShowScrollBar 39 stdcall ImageList_Add(ptr long long) ImageList_Add 40 stdcall ImageList_AddIcon(ptr long) ImageList_AddIcon 41 stdcall ImageList_AddMasked(ptr long long) ImageList_AddMasked 42 stdcall ImageList_BeginDrag(ptr long long long) ImageList_BeginDrag 43 stdcall ImageList_Copy(ptr long ptr long long) ImageList_Copy 44 stdcall ImageList_Create(long long long long long) ImageList_Create 45 stdcall ImageList_Destroy(ptr) ImageList_Destroy 46 stdcall ImageList_DragEnter(long long long) ImageList_DragEnter 47 stdcall ImageList_DragLeave(long) ImageList_DragLeave 48 stdcall ImageList_DragMove(long long) ImageList_DragMove 49 stdcall ImageList_DragShowNolock(long) ImageList_DragShowNolock 50 stdcall ImageList_Draw(ptr long long long long long) ImageList_Draw 51 stdcall ImageList_DrawEx(ptr long long long long long long long long long) ImageList_DrawEx 52 stdcall ImageList_DrawIndirect(ptr) ImageList_DrawIndirect 53 stdcall ImageList_Duplicate(ptr) ImageList_Duplicate 54 stdcall ImageList_EndDrag() ImageList_EndDrag 55 stdcall ImageList_GetBkColor(ptr) ImageList_GetBkColor 56 stdcall ImageList_GetDragImage(ptr ptr) ImageList_GetDragImage 57 stdcall ImageList_GetIcon(ptr long long) ImageList_GetIcon 58 stdcall ImageList_GetIconSize(ptr ptr ptr) ImageList_GetIconSize 59 stdcall ImageList_GetImageCount(ptr) ImageList_GetImageCount 60 stdcall ImageList_GetImageInfo(ptr long ptr) ImageList_GetImageInfo 61 stdcall ImageList_GetImageRect(ptr long ptr) ImageList_GetImageRect 62 stdcall ImageList_LoadImage(long str long long long long long) ImageList_LoadImageA 63 stdcall ImageList_LoadImageA(long str long long long long long) ImageList_LoadImageA 64 stdcall ImageList_LoadImageW(long wstr long long long long long) ImageList_LoadImageW 65 stdcall ImageList_Merge(ptr long ptr long long long) ImageList_Merge 66 stdcall ImageList_Read(ptr) ImageList_Read 67 stdcall ImageList_Remove(ptr long) ImageList_Remove 68 stdcall ImageList_Replace(ptr long long long) ImageList_Replace 69 stdcall ImageList_ReplaceIcon(ptr long long) ImageList_ReplaceIcon 70 stdcall ImageList_SetBkColor(ptr long) ImageList_SetBkColor 71 stdcall Alloc(long) COMCTL32_Alloc 72 stdcall ReAlloc(ptr long) COMCTL32_ReAlloc 73 stdcall Free(ptr) COMCTL32_Free 74 stdcall GetSize(ptr) COMCTL32_GetSize 75 stdcall ImageList_SetDragCursorImage(ptr long long long) ImageList_SetDragCursorImage 76 stdcall ImageList_SetFilter(ptr long long) ImageList_SetFilter 77 stdcall ImageList_SetIconSize(ptr long long) ImageList_SetIconSize 78 stdcall ImageList_SetImageCount(ptr long) ImageList_SetImageCount 79 stdcall ImageList_SetOverlayImage(ptr long long) ImageList_SetOverlayImage 80 stdcall ImageList_Write(ptr ptr) ImageList_Write 81 stdcall InitCommonControlsEx(ptr) InitCommonControlsEx 82 stdcall InitializeFlatSB(long) InitializeFlatSB 83 stdcall PropertySheet(ptr) PropertySheetA 84 stdcall PropertySheetA(ptr) PropertySheetA 85 stdcall PropertySheetW(ptr) PropertySheetW 86 stdcall UninitializeFlatSB(long) UninitializeFlatSB 87 stdcall _TrackMouseEvent(ptr) _TrackMouseEvent 151 stdcall CreateMRUListA(ptr) CreateMRUListA 152 stdcall FreeMRUList(ptr) FreeMRUListA 153 stdcall AddMRUStringA(long str) AddMRUStringA 154 stdcall EnumMRUListA(long long ptr long) EnumMRUListA 155 stdcall FindMRUStringA(long str ptr) FindMRUStringA 156 stdcall DelMRUString(long long) DelMRUString 157 stdcall CreateMRUListLazyA(ptr long long long) CreateMRUListLazyA 163 stub CreatePage 164 stub CreateProxyPage 167 stdcall AddMRUData(long ptr long) AddMRUData 169 stdcall FindMRUData(long ptr long ptr) FindMRUData 233 stdcall Str_GetPtrA(str str long) Str_GetPtrA 234 stdcall Str_SetPtrA(str str) Str_SetPtrA 235 stdcall Str_GetPtrW(wstr wstr long) Str_GetPtrW 236 stdcall Str_SetPtrW(wstr wstr) Str_SetPtrW 320 stdcall DSA_Create(long long) DSA_Create 321 stdcall DSA_Destroy(ptr) DSA_Destroy 322 stdcall DSA_GetItem(ptr long long) DSA_GetItem 323 stdcall DSA_GetItemPtr(ptr long) DSA_GetItemPtr 324 stdcall DSA_InsertItem(ptr long long) DSA_InsertItem 325 stdcall DSA_SetItem (ptr long long) DSA_SetItem 326 stdcall DSA_DeleteItem(ptr long) DSA_DeleteItem 327 stdcall DSA_DeleteAllItems(ptr) DSA_DeleteAllItems 328 stdcall DPA_Create(long) DPA_Create 329 stdcall DPA_Destroy(ptr) DPA_Destroy 330 stdcall DPA_Grow(ptr long) DPA_Grow 331 stdcall DPA_Clone(ptr ptr) DPA_Clone 332 stdcall DPA_GetPtr(ptr long) DPA_GetPtr 333 stdcall DPA_GetPtrIndex(ptr ptr) DPA_GetPtrIndex 334 stdcall DPA_InsertPtr(ptr long ptr) DPA_InsertPtr 335 stdcall DPA_SetPtr(ptr long ptr) DPA_SetPtr 336 stdcall DPA_DeletePtr(ptr long) DPA_DeletePtr 337 stdcall DPA_DeleteAllPtrs(ptr) DPA_DeleteAllPtrs 338 stdcall DPA_Sort(ptr ptr long) DPA_Sort 339 stdcall DPA_Search(ptr ptr long ptr long long) DPA_Search 340 stdcall DPA_CreateEx(long long) DPA_CreateEx 341 stdcall SendNotify(long long long ptr) COMCTL32_SendNotify 342 stdcall SendNotifyEx(long long long ptr long) COMCTL32_SendNotifyEx 350 stdcall StrChrA(str str) COMCTL32_StrChrA 351 stdcall StrRChrA(str str long) COMCTL32_StrRChrA 352 stdcall StrCmpNA(str str long) COMCTL32_StrCmpNA 353 stdcall StrCmpNIA(str str long) COMCTL32_StrCmpNIA 354 stdcall StrStrA(str str) COMCTL32_StrStrA 355 stdcall StrStrIA(str str) COMCTL32_StrStrIA 356 stdcall StrCSpnA(str str) COMCTL32_StrCSpnA 357 stdcall StrToIntA(str) COMCTL32_StrToIntA 358 stdcall StrChrW(wstr long) COMCTL32_StrChrW 359 stdcall StrRChrW(wstr wstr long) COMCTL32_StrRChrW 360 stdcall StrCmpNW(wstr wstr long) COMCTL32_StrCmpNW 361 stdcall StrCmpNIW(wstr wstr long) COMCTL32_StrCmpNIW 362 stdcall StrStrW(wstr wstr) COMCTL32_StrStrW 363 stub StrStrIW 364 stdcall StrSpnW(wstr wstr) COMCTL32_StrSpnW 365 stub StrToIntW 366 stub StrChrIA 367 stub StrChrIW 368 stub StrRChrIA 369 stub StrRChrIW 372 stub StrRStrIA 373 stub StrRStrIW 374 stub StrCSpnIA 375 stub StrCSpnIW 376 stub IntlStrEqWorkerA@16 377 stub IntlStrEqWorkerW@16 382 stub SmoothScrollWindow@4 383 stub DoReaderMode@4 384 stub SetPathWordBreakProc@8 385 stdcall DPA_EnumCallback(long long long) DPA_EnumCallback 386 stdcall DPA_DestroyCallback(ptr ptr long) DPA_DestroyCallback 387 stdcall DSA_EnumCallback(ptr ptr long) DSA_EnumCallback 388 stdcall DSA_DestroyCallback(ptr ptr long) DSA_DestroyCallback 389 stub COMCTL32_389 390 stub COMCTL32_390 400 stub CreateMRUListW@4 401 stub AddMRUStringW@8 402 stub FindMRUStringW@12 403 stub EnumMRUListW@16 404 stub CreateMRUListLazyW@16 410 stdcall COMCTL32_410(long long long long) COMCTL32_410 411 stdcall COMCTL32_411(long long long) COMCTL32_411 412 stdcall COMCTL32_412(long long long) COMCTL32_412 413 stdcall COMCTL32_413(long long long long) COMCTL32_413 # this is actually ordinal 70 in COMCTL32 v5.0 414 stdcall InitMUILanguage(long) InitMUILanguage wine-20000526/dlls/comctl32/comctl32undoc.c0100644000175000001440000014710207073170674017671 0ustar julliardusers/* * Undocumented functions from COMCTL32.DLL * * Copyright 1998 Eric Kohl * 1998 Juergen Schmied * NOTES * All of these functions are UNDOCUMENTED!! And I mean UNDOCUMENTED!!!! * Do NOT rely on names or contents of undocumented structures and types!!! * These functions are used by EXPLORER.EXE, IEXPLORE.EXE and * COMCTL32.DLL (internally). * * TODO * - Add more functions. * - Write some documentation. */ #include #include /* atoi */ #include #include "winbase.h" #include "winerror.h" #include "objbase.h" #include "commctrl.h" #include "crtdll.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(commctrl) extern HANDLE COMCTL32_hHeap; /* handle to the private heap */ /* * We put some function prototypes here that don't seem to belong in * any header file. When they find their place, we can remove them. */ extern LPSTR WINAPI lstrrchr(LPCSTR, LPCSTR, WORD); extern LPWSTR WINAPI lstrrchrw(LPCWSTR, LPCWSTR, WORD); typedef struct _STREAMDATA { DWORD dwSize; DWORD dwData2; DWORD dwItems; } STREAMDATA, *PSTREAMDATA; typedef struct _LOADDATA { INT nCount; PVOID ptr; } LOADDATA, *LPLOADDATA; typedef HRESULT(CALLBACK *DPALOADPROC)(LPLOADDATA,IStream*,LPARAM); /************************************************************************** * DPA_LoadStream [COMCTL32.9] * * Loads a dynamic pointer array from a stream * * PARAMS * phDpa [O] pointer to a handle to a dynamic pointer array * loadProc [I] pointer to a callback function * pStream [I] pointer to a stream * lParam [I] application specific value * * NOTES * No more information available yet! */ HRESULT WINAPI DPA_LoadStream (HDPA *phDpa, DPALOADPROC loadProc, IStream *pStream, LPARAM lParam) { HRESULT errCode; LARGE_INTEGER position; ULARGE_INTEGER newPosition; STREAMDATA streamData; LOADDATA loadData; ULONG ulRead; HDPA hDpa; PVOID *ptr; FIXME ("phDpa=%p loadProc=%p pStream=%p lParam=%lx\n", phDpa, loadProc, pStream, lParam); if (!phDpa || !loadProc || !pStream) return E_INVALIDARG; *phDpa = (HDPA)NULL; position.s.LowPart = 0; position.s.HighPart = 0; errCode = IStream_Seek (pStream, position, STREAM_SEEK_CUR, &newPosition); if (errCode != S_OK) return errCode; errCode = IStream_Read (pStream, &streamData, sizeof(STREAMDATA), &ulRead); if (errCode != S_OK) return errCode; FIXME ("dwSize=%lu dwData2=%lu dwItems=%lu\n", streamData.dwSize, streamData.dwData2, streamData.dwItems); if (lParam < sizeof(STREAMDATA) || streamData.dwSize < sizeof(STREAMDATA) || streamData.dwData2 < 1) { errCode = E_FAIL; } /* create the dpa */ hDpa = DPA_Create (streamData.dwItems); if (!hDpa) return E_OUTOFMEMORY; if (!DPA_Grow (hDpa, streamData.dwItems)) return E_OUTOFMEMORY; /* load data from the stream into the dpa */ ptr = hDpa->ptrs; for (loadData.nCount = 0; loadData.nCount < streamData.dwItems; loadData.nCount++) { errCode = (loadProc)(&loadData, pStream, lParam); if (errCode != S_OK) { errCode = S_FALSE; break; } *ptr = loadData.ptr; ptr++; } /* set the number of items */ hDpa->nItemCount = loadData.nCount; /* store the handle to the dpa */ *phDpa = hDpa; FIXME ("new hDpa=%p\n", hDpa); return errCode; } /************************************************************************** * DPA_SaveStream [COMCTL32.10] * * Saves a dynamic pointer array to a stream * * PARAMS * hDpa [I] handle to a dynamic pointer array * loadProc [I] pointer to a callback function * pStream [I] pointer to a stream * lParam [I] application specific value * * NOTES * No more information available yet! */ HRESULT WINAPI DPA_SaveStream (const HDPA hDpa, DPALOADPROC loadProc, IStream *pStream, LPARAM lParam) { FIXME ("hDpa=%p loadProc=%p pStream=%p lParam=%lx\n", hDpa, loadProc, pStream, lParam); return E_FAIL; } /************************************************************************** * DPA_Merge [COMCTL32.11] * * PARAMS * hdpa1 [I] handle to a dynamic pointer array * hdpa2 [I] handle to a dynamic pointer array * dwFlags [I] flags * pfnSort [I] pointer to sort function * pfnMerge [I] pointer to merge function * lParam [I] application specific value * * NOTES * No more information available yet! */ BOOL WINAPI DPA_Merge (const HDPA hdpa1, const HDPA hdpa2, DWORD dwFlags, PFNDPACOMPARE pfnCompare, PFNDPAMERGE pfnMerge, LPARAM lParam) { INT nCount; #if 0 /* these go with the "incomplete implementation" below */ LPVOID pWork1, pWork2; INT nResult; INT nIndex; INT nNewItems; #endif TRACE("(%p %p %08lx %p %p %08lx): semi stub!\n", hdpa1, hdpa2, dwFlags, pfnCompare, pfnMerge, lParam); if (IsBadWritePtr (hdpa1, sizeof(DPA))) return FALSE; if (IsBadWritePtr (hdpa2, sizeof(DPA))) return FALSE; if (IsBadCodePtr ((FARPROC)pfnCompare)) return FALSE; if (IsBadCodePtr ((FARPROC)pfnMerge)) return FALSE; if (dwFlags & DPAM_SORT) { TRACE("sorting dpa's!\n"); if (hdpa1->nItemCount > 0) DPA_Sort (hdpa1, pfnCompare, lParam); TRACE ("dpa 1 sorted!\n"); if (hdpa2->nItemCount > 0) DPA_Sort (hdpa2, pfnCompare, lParam); TRACE ("dpa 2 sorted!\n"); } if (hdpa2->nItemCount < 1) return TRUE; TRACE("hdpa1->nItemCount=%d hdpa2->nItemCount=%d\n", hdpa1->nItemCount, hdpa2->nItemCount); /* preliminary hack - simply append the pointer list hdpa2 to hdpa1*/ for (nCount = 0; nCount < hdpa2->nItemCount; nCount++) DPA_InsertPtr (hdpa1, hdpa1->nItemCount + 1, hdpa2->ptrs[nCount]); #if 0 /* incomplete implementation */ pWork1 = &(hdpa1->ptrs[hdpa1->nItemCount - 1]); pWork2 = &(hdpa2->ptrs[hdpa2->nItemCount - 1]); nIndex = hdpa1->nItemCount - 1; nCount = hdpa2->nItemCount - 1; do { nResult = (pfnCompare)(pWork1, pWork2, lParam); if (nResult == 0) { PVOID ptr; ptr = (pfnMerge)(1, pWork1, pWork2, lParam); if (!ptr) return FALSE; nCount--; pWork2--; pWork1 = ptr; } else if (nResult < 0) { if (!dwFlags & 8) { PVOID ptr; ptr = DPA_DeletePtr (hdpa1, hdpa1->nItemCount - 1); (pfnMerge)(2, ptr, NULL, lParam); } } else { if (!dwFlags & 4) { PVOID ptr; ptr = (pfnMerge)(3, pWork2, NULL, lParam); if (!ptr) return FALSE; DPA_InsertPtr (hdpa1, nIndex, ptr); } nCount--; pWork2--; } nIndex--; pWork1--; } while (nCount >= 0); #endif return TRUE; } /************************************************************************** * Alloc [COMCTL32.71] * * Allocates memory block from the dll's private heap * * PARAMS * dwSize [I] size of the allocated memory block * * RETURNS * Success: pointer to allocated memory block * Failure: NULL */ LPVOID WINAPI COMCTL32_Alloc (DWORD dwSize) { LPVOID lpPtr; TRACE("(0x%lx)\n", dwSize); lpPtr = HeapAlloc (COMCTL32_hHeap, HEAP_ZERO_MEMORY, dwSize); TRACE("-- ret=%p\n", lpPtr); return lpPtr; } /************************************************************************** * ReAlloc [COMCTL32.72] * * Changes the size of an allocated memory block or allocates a memory * block using the dll's private heap. * * PARAMS * lpSrc [I] pointer to memory block which will be resized * dwSize [I] new size of the memory block. * * RETURNS * Success: pointer to the resized memory block * Failure: NULL * * NOTES * If lpSrc is a NULL-pointer, then COMCTL32_ReAlloc allocates a memory * block like COMCTL32_Alloc. */ LPVOID WINAPI COMCTL32_ReAlloc (LPVOID lpSrc, DWORD dwSize) { LPVOID lpDest; TRACE("(%p 0x%08lx)\n", lpSrc, dwSize); if (lpSrc) lpDest = HeapReAlloc (COMCTL32_hHeap, HEAP_ZERO_MEMORY, lpSrc, dwSize); else lpDest = HeapAlloc (COMCTL32_hHeap, HEAP_ZERO_MEMORY, dwSize); TRACE("-- ret=%p\n", lpDest); return lpDest; } /************************************************************************** * Free [COMCTL32.73] * * Frees an allocated memory block from the dll's private heap. * * PARAMS * lpMem [I] pointer to memory block which will be freed * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI COMCTL32_Free (LPVOID lpMem) { TRACE("(%p)\n", lpMem); return HeapFree (COMCTL32_hHeap, 0, lpMem); } /************************************************************************** * GetSize [COMCTL32.74] * * Retrieves the size of the specified memory block from the dll's * private heap. * * PARAMS * lpMem [I] pointer to an allocated memory block * * RETURNS * Success: size of the specified memory block * Failure: 0 */ DWORD WINAPI COMCTL32_GetSize (LPVOID lpMem) { TRACE("(%p)\n", lpMem); return HeapSize (COMCTL32_hHeap, 0, lpMem); } /************************************************************************** * The MRU-API is a set of functions to manipulate MRU(Most Recently Used) * lists. * * Stored in the reg. as a set of values under a single key. Each item in the * list has a value name that is a single char. 'a' - 'z', '{', '|' or '}'. * The order of the list is stored with value name 'MRUList' which is a string * containing the value names (i.e. 'a', 'b', etc.) in the relevant order. */ typedef struct tagCREATEMRULIST { DWORD cbSize; /* size of struct */ DWORD nMaxItems; /* max no. of items in list */ DWORD dwFlags; /* see below */ HKEY hKey; /* root reg. key under which list is saved */ LPCSTR lpszSubKey; /* reg. subkey */ PROC lpfnCompare; /* item compare proc */ } CREATEMRULIST, *LPCREATEMRULIST; /* dwFlags */ #define MRUF_STRING_LIST 0 /* list will contain strings */ #define MRUF_BINARY_LIST 1 /* list will contain binary data */ #define MRUF_DELAYED_SAVE 2 /* only save list order to reg. is FreeMRUList */ /* If list is a string list lpfnCompare has the following prototype * int CALLBACK MRUCompareString(LPCSTR s1, LPCSTR s2) * for binary lists the prototype is * int CALLBACK MRUCompareBinary(LPCVOID data1, LPCVOID data2, DWORD cbData) * where cbData is the no. of bytes to compare. * Need to check what return value means identical - 0? */ typedef struct tagMRU { DWORD dwParam1; /* some kind of flag */ DWORD dwParam2; DWORD dwParam3; HKEY hkeyMRU; LPCSTR lpszSubKey; DWORD dwParam6; } MRU, *HMRU; HANDLE WINAPI CreateMRUListLazyA (LPCREATEMRULIST lpcml, DWORD dwParam2, DWORD dwParam3, DWORD dwParam4); /************************************************************************** * CreateMRUListA [COMCTL32.151] * * PARAMS * lpcml [I] ptr to CREATEMRULIST structure. * * RETURNS * Handle to MRU list. */ HANDLE WINAPI CreateMRUListA (LPCREATEMRULIST lpcml) { return CreateMRUListLazyA (lpcml, 0, 0, 0); } /************************************************************************** * FreeMRUListA [COMCTL32.152] * * PARAMS * hMRUList [I] Handle to list. * */ DWORD WINAPI FreeMRUListA (HANDLE hMRUList) { FIXME("(%08x) empty stub!\n", hMRUList); #if 0 if (!(hmru->dwParam1 & 1001)) { RegSetValueExA (hmru->hKeyMRU, "MRUList", 0, REG_SZ, hmru->lpszMRUString, lstrlenA (hmru->lpszMRUString)); } RegClosKey (hmru->hkeyMRU COMCTL32_Free32 (hmru->lpszMRUString); #endif return COMCTL32_Free ((LPVOID)hMRUList); } /************************************************************************** * AddMRUData [COMCTL32.167] * * Add item to MRU binary list. If item already exists in list them it is * simply moved up to the top of the list and not added again. If list is * full then the least recently used item is removed to make room. * * PARAMS * hList [I] Handle to list. * lpData [I] ptr to data to add. * cbData [I] no. of bytes of data. * * RETURNS * No. corresponding to registry name where value is stored 'a' -> 0 etc. * -1 on error. */ INT WINAPI AddMRUData (HANDLE hList, LPCVOID lpData, DWORD cbData) { FIXME("(%08x, %p, %ld) empty stub!\n", hList, lpData, cbData); return 0; } /************************************************************************** * AddMRUStringA [COMCTL32.153] * * Add item to MRU string list. If item already exists in list them it is * simply moved up to the top of the list and not added again. If list is * full then the least recently used item is removed to make room. * * PARAMS * hList [I] Handle to list. * lpszString [I] ptr to string to add. * * RETURNS * No. corresponding to registry name where value is stored 'a' -> 0 etc. * -1 on error. */ INT WINAPI AddMRUStringA(HANDLE hList, LPCSTR lpszString) { FIXME("(%08x, %s) empty stub!\n", hList, debugstr_a(lpszString)); return 0; } /************************************************************************** * DelMRUString [COMCTL32.156] * * Removes item from either string or binary list (despite its name) * * PARAMS * hList [I] list handle * nItemPos [I] item position to remove 0 -> MRU * * RETURNS * TRUE is successful, FALSE if nItemPos is out of range. */ BOOL WINAPI DelMRUString(HANDLE hList, INT nItemPos) { FIXME("(%08x, %d): stub\n", hList, nItemPos); return TRUE; } /************************************************************************** * FindMRUData [COMCTL32.169] * * Searches binary list for item that matches lpData of length cbData. * Returns position in list order 0 -> MRU and if lpRegNum != NULL then value * corresponding to item's reg. name will be stored in it ('a' -> 0). * * PARAMS * hList [I] list handle * lpData [I] data to find * cbData [I] length of data * lpRegNum [O] position in registry (maybe NULL) * * RETURNS * Position in list 0 -> MRU. -1 if item not found. */ INT WINAPI FindMRUData (HANDLE hList, LPCVOID lpData, DWORD cbData, LPINT lpRegNum) { FIXME("(%08x, %p, %ld, %p) empty stub!\n", hList, lpData, cbData, lpRegNum); return 0; } /************************************************************************** * FindMRUStringA [COMCTL32.155] * * Searches string list for item that matches lpszString. * Returns position in list order 0 -> MRU and if lpRegNum != NULL then value * corresponding to item's reg. name will be stored in it ('a' -> 0). * * PARAMS * hList [I] list handle * lpszString [I] string to find * lpRegNum [O] position in registry (maybe NULL) * * RETURNS * Position in list 0 -> MRU. -1 if item not found. */ INT WINAPI FindMRUStringA (HANDLE hList, LPCSTR lpszString, LPINT lpRegNum) { FIXME("(%08x, %s, %p) empty stub!\n", hList, debugstr_a(lpszString), lpRegNum); return 0; } /************************************************************************** * CreateMRUListLazyA [COMCTL32.157] */ HANDLE WINAPI CreateMRUListLazyA (LPCREATEMRULIST lpcml, DWORD dwParam2, DWORD dwParam3, DWORD dwParam4) { /* DWORD dwLocal1; * * HKEY hkeyResult; * * DWORD dwLocal3; * * LPVOID lMRU; * * DWORD dwLocal5; * * DWORD dwLocal6; * * DWORD dwLocal7; * * DWORD dwDisposition; */ /* internal variables */ LPVOID ptr; FIXME("(%p) empty stub!\n", lpcml); if (lpcml == NULL) return 0; if (lpcml->cbSize < sizeof(CREATEMRULIST)) return 0; FIXME("(%lu %lu %lx %lx \"%s\" %p)\n", lpcml->cbSize, lpcml->nMaxItems, lpcml->dwFlags, (DWORD)lpcml->hKey, lpcml->lpszSubKey, lpcml->lpfnCompare); /* dummy pointer creation */ ptr = COMCTL32_Alloc (32); FIXME("-- ret = %p\n", ptr); return (HANDLE)ptr; } /************************************************************************** * EnumMRUListA [COMCTL32.154] * * Enumerate item in a list * * PARAMS * hList [I] list handle * nItemPos [I] item position to enumerate * lpBuffer [O] buffer to receive item * nBufferSize [I] size of buffer * * RETURNS * For binary lists specifies how many bytes were copied to buffer, for * string lists specifies full length of string. Enumerating past the end * of list returns -1. * If lpBuffer == NULL or nItemPos is -ve return value is no. of items in * the list. */ INT WINAPI EnumMRUListA(HANDLE hList, INT nItemPos, LPVOID lpBuffer, DWORD nBufferSize) { FIXME("(%08x, %d, %p, %ld): stub\n", hList, nItemPos, lpBuffer, nBufferSize); return 0; } /************************************************************************** * Str_GetPtrA [COMCTL32.233] * * PARAMS * lpSrc [I] * lpDest [O] * nMaxLen [I] * * RETURNS */ INT WINAPI Str_GetPtrA (LPCSTR lpSrc, LPSTR lpDest, INT nMaxLen) { INT len; TRACE("(%p %p %d)\n", lpSrc, lpDest, nMaxLen); if (!lpDest && lpSrc) return lstrlenA (lpSrc); if (nMaxLen == 0) return 0; if (lpSrc == NULL) { lpDest[0] = '\0'; return 0; } len = lstrlenA (lpSrc); if (len >= nMaxLen) len = nMaxLen - 1; RtlMoveMemory (lpDest, lpSrc, len); lpDest[len] = '\0'; return len; } /************************************************************************** * Str_SetPtrA [COMCTL32.234] * * PARAMS * lppDest [O] * lpSrc [I] * * RETURNS */ BOOL WINAPI Str_SetPtrA (LPSTR *lppDest, LPCSTR lpSrc) { TRACE("(%p %p)\n", lppDest, lpSrc); if (lpSrc) { LPSTR ptr = COMCTL32_ReAlloc (*lppDest, lstrlenA (lpSrc) + 1); if (!ptr) return FALSE; lstrcpyA (ptr, lpSrc); *lppDest = ptr; } else { if (*lppDest) { COMCTL32_Free (*lppDest); *lppDest = NULL; } } return TRUE; } /************************************************************************** * Str_GetPtrW [COMCTL32.235] * * PARAMS * lpSrc [I] * lpDest [O] * nMaxLen [I] * * RETURNS */ INT WINAPI Str_GetPtrW (LPCWSTR lpSrc, LPWSTR lpDest, INT nMaxLen) { INT len; TRACE("(%p %p %d)\n", lpSrc, lpDest, nMaxLen); if (!lpDest && lpSrc) return lstrlenW (lpSrc); if (nMaxLen == 0) return 0; if (lpSrc == NULL) { lpDest[0] = L'\0'; return 0; } len = lstrlenW (lpSrc); if (len >= nMaxLen) len = nMaxLen - 1; RtlMoveMemory (lpDest, lpSrc, len*sizeof(WCHAR)); lpDest[len] = L'\0'; return len; } /************************************************************************** * Str_SetPtrW [COMCTL32.236] * * PARAMS * lpDest [O] * lpSrc [I] * * RETURNS */ BOOL WINAPI Str_SetPtrW (LPWSTR *lppDest, LPCWSTR lpSrc) { TRACE("(%p %p)\n", lppDest, lpSrc); if (lpSrc) { INT len = lstrlenW (lpSrc) + 1; LPWSTR ptr = COMCTL32_ReAlloc (*lppDest, len * sizeof(WCHAR)); if (!ptr) return FALSE; lstrcpyW (ptr, lpSrc); *lppDest = ptr; } else { if (*lppDest) { COMCTL32_Free (*lppDest); *lppDest = NULL; } } return TRUE; } /************************************************************************** * The DSA-API is a set of functions to create and manipulate arrays of * fix sized memory blocks. These arrays can store any kind of data * (strings, icons...). */ /************************************************************************** * DSA_Create [COMCTL32.320] Creates a dynamic storage array * * PARAMS * nSize [I] size of the array elements * nGrow [I] number of elements by which the array grows when it is filled * * RETURNS * Success: pointer to a array control structure. use this like a handle. * Failure: NULL */ HDSA WINAPI DSA_Create (INT nSize, INT nGrow) { HDSA hdsa; TRACE("(size=%d grow=%d)\n", nSize, nGrow); hdsa = (HDSA)COMCTL32_Alloc (sizeof(DSA)); if (hdsa) { hdsa->nItemCount = 0; hdsa->pData = NULL; hdsa->nMaxCount = 0; hdsa->nItemSize = nSize; hdsa->nGrow = max(1, nGrow); } return hdsa; } /************************************************************************** * DSA_Destroy [COMCTL32.321] Destroys a dynamic storage array * * PARAMS * hdsa [I] pointer to the array control structure * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI DSA_Destroy (const HDSA hdsa) { TRACE("(%p)\n", hdsa); if (!hdsa) return FALSE; if (hdsa->pData && (!COMCTL32_Free (hdsa->pData))) return FALSE; return COMCTL32_Free (hdsa); } /************************************************************************** * DSA_GetItem [COMCTL32.322] * * PARAMS * hdsa [I] pointer to the array control structure * nIndex [I] number of the Item to get * pDest [O] destination buffer. Has to be >= dwElementSize. * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI DSA_GetItem (const HDSA hdsa, INT nIndex, LPVOID pDest) { LPVOID pSrc; TRACE("(%p %d %p)\n", hdsa, nIndex, pDest); if (!hdsa) return FALSE; if ((nIndex < 0) || (nIndex >= hdsa->nItemCount)) return FALSE; pSrc = (char *) hdsa->pData + (hdsa->nItemSize * nIndex); memmove (pDest, pSrc, hdsa->nItemSize); return TRUE; } /************************************************************************** * DSA_GetItemPtr [COMCTL32.323] * * Retrieves a pointer to the specified item. * * PARAMS * hdsa [I] pointer to the array control structure * nIndex [I] index of the desired item * * RETURNS * Success: pointer to an item * Failure: NULL */ LPVOID WINAPI DSA_GetItemPtr (const HDSA hdsa, INT nIndex) { LPVOID pSrc; TRACE("(%p %d)\n", hdsa, nIndex); if (!hdsa) return NULL; if ((nIndex < 0) || (nIndex >= hdsa->nItemCount)) return NULL; pSrc = (char *) hdsa->pData + (hdsa->nItemSize * nIndex); TRACE("-- ret=%p\n", pSrc); return pSrc; } /************************************************************************** * DSA_SetItem [COMCTL32.325] * * Sets the contents of an item in the array. * * PARAMS * hdsa [I] pointer to the array control structure * nIndex [I] index for the item * pSrc [I] pointer to the new item data * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI DSA_SetItem (const HDSA hdsa, INT nIndex, LPVOID pSrc) { INT nSize, nNewItems; LPVOID pDest, lpTemp; TRACE("(%p %d %p)\n", hdsa, nIndex, pSrc); if ((!hdsa) || nIndex < 0) return FALSE; if (hdsa->nItemCount <= nIndex) { /* within the old array */ if (hdsa->nMaxCount > nIndex) { /* within the allocated space, set a new boundary */ hdsa->nItemCount = nIndex + 1; } else { /* resize the block of memory */ nNewItems = hdsa->nGrow * ((INT)(((nIndex + 1) - 1) / hdsa->nGrow) + 1); nSize = hdsa->nItemSize * nNewItems; lpTemp = (LPVOID)COMCTL32_ReAlloc (hdsa->pData, nSize); if (!lpTemp) return FALSE; hdsa->nMaxCount = nNewItems; hdsa->nItemCount = nIndex + 1; hdsa->pData = lpTemp; } } /* put the new entry in */ pDest = (char *) hdsa->pData + (hdsa->nItemSize * nIndex); TRACE("-- move dest=%p src=%p size=%d\n", pDest, pSrc, hdsa->nItemSize); memmove (pDest, pSrc, hdsa->nItemSize); return TRUE; } /************************************************************************** * DSA_InsertItem [COMCTL32.325] * * PARAMS * hdsa [I] pointer to the array control structure * nIndex [I] index for the new item * pSrc [I] pointer to the element * * RETURNS * Success: position of the new item * Failure: -1 */ INT WINAPI DSA_InsertItem (const HDSA hdsa, INT nIndex, LPVOID pSrc) { INT nNewItems, nSize, i; LPVOID lpTemp, lpDest; LPDWORD p; TRACE("(%p %d %p)\n", hdsa, nIndex, pSrc); if ((!hdsa) || nIndex < 0) return -1; for (i = 0; i < hdsa->nItemSize; i += 4) { p = *(DWORD**)((char *) pSrc + i); if (IsBadStringPtrA ((char*)p, 256)) TRACE("-- %d=%p\n", i, (DWORD*)p); else TRACE("-- %d=%p [%s]\n", i, p, debugstr_a((char*)p)); } /* when nIndex > nItemCount then append */ if (nIndex >= hdsa->nItemCount) nIndex = hdsa->nItemCount; /* do we need to resize ? */ if (hdsa->nItemCount >= hdsa->nMaxCount) { nNewItems = hdsa->nMaxCount + hdsa->nGrow; nSize = hdsa->nItemSize * nNewItems; lpTemp = (LPVOID)COMCTL32_ReAlloc (hdsa->pData, nSize); if (!lpTemp) return -1; hdsa->nMaxCount = nNewItems; hdsa->pData = lpTemp; } /* do we need to move elements ? */ if (nIndex < hdsa->nItemCount) { lpTemp = (char *) hdsa->pData + (hdsa->nItemSize * nIndex); lpDest = (char *) lpTemp + hdsa->nItemSize; nSize = (hdsa->nItemCount - nIndex) * hdsa->nItemSize; TRACE("-- move dest=%p src=%p size=%d\n", lpDest, lpTemp, nSize); memmove (lpDest, lpTemp, nSize); } /* ok, we can put the new Item in */ hdsa->nItemCount++; lpDest = (char *) hdsa->pData + (hdsa->nItemSize * nIndex); TRACE("-- move dest=%p src=%p size=%d\n", lpDest, pSrc, hdsa->nItemSize); memmove (lpDest, pSrc, hdsa->nItemSize); return hdsa->nItemCount; } /************************************************************************** * DSA_DeleteItem [COMCTL32.326] * * PARAMS * hdsa [I] pointer to the array control structure * nIndex [I] index for the element to delete * * RETURNS * Success: number of the deleted element * Failure: -1 */ INT WINAPI DSA_DeleteItem (const HDSA hdsa, INT nIndex) { LPVOID lpDest,lpSrc; INT nSize; TRACE("(%p %d)\n", hdsa, nIndex); if (!hdsa) return -1; if (nIndex < 0 || nIndex >= hdsa->nItemCount) return -1; /* do we need to move ? */ if (nIndex < hdsa->nItemCount - 1) { lpDest = (char *) hdsa->pData + (hdsa->nItemSize * nIndex); lpSrc = (char *) lpDest + hdsa->nItemSize; nSize = hdsa->nItemSize * (hdsa->nItemCount - nIndex - 1); TRACE("-- move dest=%p src=%p size=%d\n", lpDest, lpSrc, nSize); memmove (lpDest, lpSrc, nSize); } hdsa->nItemCount--; /* free memory ? */ if ((hdsa->nMaxCount - hdsa->nItemCount) >= hdsa->nGrow) { nSize = hdsa->nItemSize * hdsa->nItemCount; lpDest = (LPVOID)COMCTL32_ReAlloc (hdsa->pData, nSize); if (!lpDest) return -1; hdsa->nMaxCount = hdsa->nItemCount; hdsa->pData = lpDest; } return nIndex; } /************************************************************************** * DSA_DeleteAllItems [COMCTL32.326] * * Removes all items and reinitializes the array. * * PARAMS * hdsa [I] pointer to the array control structure * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI DSA_DeleteAllItems (const HDSA hdsa) { TRACE("(%p)\n", hdsa); if (!hdsa) return FALSE; if (hdsa->pData && (!COMCTL32_Free (hdsa->pData))) return FALSE; hdsa->nItemCount = 0; hdsa->pData = NULL; hdsa->nMaxCount = 0; return TRUE; } /************************************************************************** * The DPA-API is a set of functions to create and manipulate arrays of * pointers. */ /************************************************************************** * DPA_Create [COMCTL32.328] Creates a dynamic pointer array * * PARAMS * nGrow [I] number of items by which the array grows when it is filled * * RETURNS * Success: handle (pointer) to the pointer array. * Failure: NULL */ HDPA WINAPI DPA_Create (INT nGrow) { HDPA hdpa; TRACE("(%d)\n", nGrow); hdpa = (HDPA)COMCTL32_Alloc (sizeof(DPA)); if (hdpa) { hdpa->nGrow = max(8, nGrow); hdpa->hHeap = COMCTL32_hHeap; hdpa->nMaxCount = hdpa->nGrow * 2; hdpa->ptrs = (LPVOID*)COMCTL32_Alloc (hdpa->nMaxCount * sizeof(LPVOID)); } TRACE("-- %p\n", hdpa); return hdpa; } /************************************************************************** * DPA_Destroy [COMCTL32.329] Destroys a dynamic pointer array * * PARAMS * hdpa [I] handle (pointer) to the pointer array * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI DPA_Destroy (const HDPA hdpa) { TRACE("(%p)\n", hdpa); if (!hdpa) return FALSE; if (hdpa->ptrs && (!HeapFree (hdpa->hHeap, 0, hdpa->ptrs))) return FALSE; return HeapFree (hdpa->hHeap, 0, hdpa); } /************************************************************************** * DPA_Grow [COMCTL32.330] * * Sets the growth amount. * * PARAMS * hdpa [I] handle (pointer) to the existing (source) pointer array * nGrow [I] number of items, the array grows, when it's too small * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI DPA_Grow (const HDPA hdpa, INT nGrow) { TRACE("(%p %d)\n", hdpa, nGrow); if (!hdpa) return FALSE; hdpa->nGrow = max(8, nGrow); return TRUE; } /************************************************************************** * DPA_Clone [COMCTL32.331] * * Copies a pointer array to an other one or creates a copy * * PARAMS * hdpa [I] handle (pointer) to the existing (source) pointer array * hdpaNew [O] handle (pointer) to the destination pointer array * * RETURNS * Success: pointer to the destination pointer array. * Failure: NULL * * NOTES * - If the 'hdpaNew' is a NULL-Pointer, a copy of the source pointer * array will be created and it's handle (pointer) is returned. * - If 'hdpa' is a NULL-Pointer, the original implementation crashes, * this implementation just returns NULL. */ HDPA WINAPI DPA_Clone (const HDPA hdpa, const HDPA hdpaNew) { INT nNewItems, nSize; HDPA hdpaTemp; if (!hdpa) return NULL; TRACE("(%p %p)\n", hdpa, hdpaNew); if (!hdpaNew) { /* create a new DPA */ hdpaTemp = (HDPA)HeapAlloc (hdpa->hHeap, HEAP_ZERO_MEMORY, sizeof(DPA)); hdpaTemp->hHeap = hdpa->hHeap; hdpaTemp->nGrow = hdpa->nGrow; } else hdpaTemp = hdpaNew; if (hdpaTemp->ptrs) { /* remove old pointer array */ HeapFree (hdpaTemp->hHeap, 0, hdpaTemp->ptrs); hdpaTemp->ptrs = NULL; hdpaTemp->nItemCount = 0; hdpaTemp->nMaxCount = 0; } /* create a new pointer array */ nNewItems = hdpaTemp->nGrow * ((INT)((hdpa->nItemCount - 1) / hdpaTemp->nGrow) + 1); nSize = nNewItems * sizeof(LPVOID); hdpaTemp->ptrs = (LPVOID*)HeapAlloc (hdpaTemp->hHeap, HEAP_ZERO_MEMORY, nSize); hdpaTemp->nMaxCount = nNewItems; /* clone the pointer array */ hdpaTemp->nItemCount = hdpa->nItemCount; memmove (hdpaTemp->ptrs, hdpa->ptrs, hdpaTemp->nItemCount * sizeof(LPVOID)); return hdpaTemp; } /************************************************************************** * DPA_GetPtr [COMCTL32.332] * * Retrieves a pointer from a dynamic pointer array * * PARAMS * hdpa [I] handle (pointer) to the pointer array * nIndex [I] array index of the desired pointer * * RETURNS * Success: pointer * Failure: NULL */ LPVOID WINAPI DPA_GetPtr (const HDPA hdpa, INT i) { TRACE("(%p %d)\n", hdpa, i); if (!hdpa) return NULL; if (!hdpa->ptrs) return NULL; if ((i < 0) || (i >= hdpa->nItemCount)) return NULL; TRACE("-- %p\n", hdpa->ptrs[i]); return hdpa->ptrs[i]; } /************************************************************************** * DPA_GetPtrIndex [COMCTL32.333] * * Retrieves the index of the specified pointer * * PARAMS * hdpa [I] handle (pointer) to the pointer array * p [I] pointer * * RETURNS * Success: index of the specified pointer * Failure: -1 */ INT WINAPI DPA_GetPtrIndex (const HDPA hdpa, LPVOID p) { INT i; if (!hdpa->ptrs) return -1; for (i = 0; i < hdpa->nItemCount; i++) { if (hdpa->ptrs[i] == p) return i; } return -1; } /************************************************************************** * DPA_InsertPtr [COMCTL32.334] * * Inserts a pointer into a dynamic pointer array * * PARAMS * hdpa [I] handle (pointer) to the array * i [I] array index * p [I] pointer to insert * * RETURNS * Success: index of the inserted pointer * Failure: -1 */ INT WINAPI DPA_InsertPtr (const HDPA hdpa, INT i, LPVOID p) { INT nNewItems, nSize, nIndex = 0; LPVOID *lpTemp, *lpDest; TRACE("(%p %d %p)\n", hdpa, i, p); if ((!hdpa) || (i < 0)) return -1; if (!hdpa->ptrs) { hdpa->ptrs = (LPVOID*)HeapAlloc (hdpa->hHeap, HEAP_ZERO_MEMORY, 2 * hdpa->nGrow * sizeof(LPVOID)); if (!hdpa->ptrs) return -1; hdpa->nMaxCount = hdpa->nGrow * 2; nIndex = 0; } else { if (hdpa->nItemCount >= hdpa->nMaxCount) { TRACE("-- resizing\n"); nNewItems = hdpa->nMaxCount + hdpa->nGrow; nSize = nNewItems * sizeof(LPVOID); lpTemp = (LPVOID*)HeapReAlloc (hdpa->hHeap, HEAP_ZERO_MEMORY, hdpa->ptrs, nSize); if (!lpTemp) return -1; hdpa->nMaxCount = nNewItems; hdpa->ptrs = lpTemp; } if (i >= hdpa->nItemCount) { nIndex = hdpa->nItemCount; TRACE("-- appending at %d\n", nIndex); } else { TRACE("-- inserting at %d\n", i); lpTemp = hdpa->ptrs + i; lpDest = lpTemp + 1; nSize = (hdpa->nItemCount - i) * sizeof(LPVOID); TRACE("-- move dest=%p src=%p size=%x\n", lpDest, lpTemp, nSize); memmove (lpDest, lpTemp, nSize); nIndex = i; } } /* insert item */ hdpa->nItemCount++; hdpa->ptrs[nIndex] = p; return nIndex; } /************************************************************************** * DPA_SetPtr [COMCTL32.335] * * Sets a pointer in the pointer array * * PARAMS * hdpa [I] handle (pointer) to the pointer array * i [I] index of the pointer that will be set * p [I] pointer to be set * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI DPA_SetPtr (const HDPA hdpa, INT i, LPVOID p) { LPVOID *lpTemp; TRACE("(%p %d %p)\n", hdpa, i, p); if ((!hdpa) || i < 0) return FALSE; if (hdpa->nItemCount <= i) { /* within the old array */ if (hdpa->nMaxCount > i) { /* within the allocated space, set a new boundary */ hdpa->nItemCount = i; } else { /* resize the block of memory */ INT nNewItems = hdpa->nGrow * ((INT)(((i+1) - 1) / hdpa->nGrow) + 1); INT nSize = nNewItems * sizeof(LPVOID); lpTemp = (LPVOID*)HeapReAlloc (hdpa->hHeap, HEAP_ZERO_MEMORY, hdpa->ptrs, nSize); if (!lpTemp) return FALSE; hdpa->nItemCount = nNewItems; hdpa->ptrs = lpTemp; } } /* put the new entry in */ hdpa->ptrs[i] = p; return TRUE; } /************************************************************************** * DPA_DeletePtr [COMCTL32.336] * * Removes a pointer from the pointer array. * * PARAMS * hdpa [I] handle (pointer) to the pointer array * i [I] index of the pointer that will be deleted * * RETURNS * Success: deleted pointer * Failure: NULL */ LPVOID WINAPI DPA_DeletePtr (const HDPA hdpa, INT i) { LPVOID *lpDest, *lpSrc, lpTemp = NULL; INT nSize; TRACE("(%p %d)\n", hdpa, i); if ((!hdpa) || i < 0 || i >= hdpa->nItemCount) return NULL; lpTemp = hdpa->ptrs[i]; /* do we need to move ?*/ if (i < hdpa->nItemCount - 1) { lpDest = hdpa->ptrs + i; lpSrc = lpDest + 1; nSize = (hdpa->nItemCount - i - 1) * sizeof(LPVOID); TRACE("-- move dest=%p src=%p size=%x\n", lpDest, lpSrc, nSize); memmove (lpDest, lpSrc, nSize); } hdpa->nItemCount --; /* free memory ?*/ if ((hdpa->nMaxCount - hdpa->nItemCount) >= hdpa->nGrow) { INT nNewItems = max(hdpa->nGrow * 2, hdpa->nItemCount); nSize = nNewItems * sizeof(LPVOID); lpDest = (LPVOID)HeapReAlloc (hdpa->hHeap, HEAP_ZERO_MEMORY, hdpa->ptrs, nSize); if (!lpDest) return NULL; hdpa->nMaxCount = nNewItems; hdpa->ptrs = (LPVOID*)lpDest; } return lpTemp; } /************************************************************************** * DPA_DeleteAllPtrs [COMCTL32.337] * * Removes all pointers and reinitializes the array. * * PARAMS * hdpa [I] handle (pointer) to the pointer array * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI DPA_DeleteAllPtrs (const HDPA hdpa) { TRACE("(%p)\n", hdpa); if (!hdpa) return FALSE; if (hdpa->ptrs && (!HeapFree (hdpa->hHeap, 0, hdpa->ptrs))) return FALSE; hdpa->nItemCount = 0; hdpa->nMaxCount = hdpa->nGrow * 2; hdpa->ptrs = (LPVOID*)HeapAlloc (hdpa->hHeap, HEAP_ZERO_MEMORY, hdpa->nMaxCount * sizeof(LPVOID)); return TRUE; } /************************************************************************** * DPA_QuickSort [Internal] * * Ordinary quicksort (used by DPA_Sort). * * PARAMS * lpPtrs [I] pointer to the pointer array * l [I] index of the "left border" of the partition * r [I] index of the "right border" of the partition * pfnCompare [I] pointer to the compare function * lParam [I] user defined value (3rd parameter in compare function) * * RETURNS * NONE */ static VOID DPA_QuickSort (LPVOID *lpPtrs, INT l, INT r, PFNDPACOMPARE pfnCompare, LPARAM lParam) { LPVOID t, v; INT i, j; TRACE("l=%i r=%i\n", l, r); i = l; j = r; v = lpPtrs[(int)(l+r)/2]; do { while ((pfnCompare)(lpPtrs[i], v, lParam) < 0) i++; while ((pfnCompare)(lpPtrs[j], v, lParam) > 0) j--; if (i <= j) { t = lpPtrs[i]; lpPtrs[i++] = lpPtrs[j]; lpPtrs[j--] = t; } } while (i <= j); if (l < j) DPA_QuickSort (lpPtrs, l, j, pfnCompare, lParam); if (i < r) DPA_QuickSort (lpPtrs, i, r, pfnCompare, lParam); } /************************************************************************** * DPA_Sort [COMCTL32.338] * * Sorts a pointer array using a user defined compare function * * PARAMS * hdpa [I] handle (pointer) to the pointer array * pfnCompare [I] pointer to the compare function * lParam [I] user defined value (3rd parameter of compare function) * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI DPA_Sort (const HDPA hdpa, PFNDPACOMPARE pfnCompare, LPARAM lParam) { if (!hdpa || !pfnCompare) return FALSE; TRACE("(%p %p 0x%lx)\n", hdpa, pfnCompare, lParam); if ((hdpa->nItemCount > 1) && (hdpa->ptrs)) DPA_QuickSort (hdpa->ptrs, 0, hdpa->nItemCount - 1, pfnCompare, lParam); return TRUE; } /************************************************************************** * DPA_Search [COMCTL32.339] * * Searches a pointer array for a specified pointer * * PARAMS * hdpa [I] handle (pointer) to the pointer array * pFind [I] pointer to search for * nStart [I] start index * pfnCompare [I] pointer to the compare function * lParam [I] user defined value (3rd parameter of compare function) * uOptions [I] search options * * RETURNS * Success: index of the pointer in the array. * Failure: -1 * * NOTES * Binary search taken from R.Sedgewick "Algorithms in C"! * Function is NOT tested! * If something goes wrong, blame HIM not ME! (Eric Kohl) */ INT WINAPI DPA_Search (const HDPA hdpa, LPVOID pFind, INT nStart, PFNDPACOMPARE pfnCompare, LPARAM lParam, UINT uOptions) { if (!hdpa || !pfnCompare || !pFind) return -1; TRACE("(%p %p %d %p 0x%08lx 0x%08x)\n", hdpa, pFind, nStart, pfnCompare, lParam, uOptions); if (uOptions & DPAS_SORTED) { /* array is sorted --> use binary search */ INT l, r, x, n; LPVOID *lpPtr; TRACE("binary search\n"); l = (nStart == -1) ? 0 : nStart; r = hdpa->nItemCount - 1; lpPtr = hdpa->ptrs; while (r >= l) { x = (l + r) / 2; n = (pfnCompare)(pFind, lpPtr[x], lParam); if (n < 0) r = x - 1; else l = x + 1; if (n == 0) { TRACE("-- ret=%d\n", n); return n; } } if (uOptions & DPAS_INSERTBEFORE) { TRACE("-- ret=%d\n", r); return r; } if (uOptions & DPAS_INSERTAFTER) { TRACE("-- ret=%d\n", l); return l; } } else { /* array is not sorted --> use linear search */ LPVOID *lpPtr; INT nIndex; TRACE("linear search\n"); nIndex = (nStart == -1)? 0 : nStart; lpPtr = hdpa->ptrs; for (; nIndex < hdpa->nItemCount; nIndex++) { if ((pfnCompare)(pFind, lpPtr[nIndex], lParam) == 0) { TRACE("-- ret=%d\n", nIndex); return nIndex; } } } TRACE("-- not found: ret=-1\n"); return -1; } /************************************************************************** * DPA_CreateEx [COMCTL32.340] * * Creates a dynamic pointer array using the specified size and heap. * * PARAMS * nGrow [I] number of items by which the array grows when it is filled * hHeap [I] handle to the heap where the array is stored * * RETURNS * Success: handle (pointer) to the pointer array. * Failure: NULL */ HDPA WINAPI DPA_CreateEx (INT nGrow, HANDLE hHeap) { HDPA hdpa; TRACE("(%d 0x%x)\n", nGrow, hHeap); if (hHeap) hdpa = (HDPA)HeapAlloc (hHeap, HEAP_ZERO_MEMORY, sizeof(DPA)); else hdpa = (HDPA)COMCTL32_Alloc (sizeof(DPA)); if (hdpa) { hdpa->nGrow = min(8, nGrow); hdpa->hHeap = hHeap ? hHeap : COMCTL32_hHeap; hdpa->nMaxCount = hdpa->nGrow * 2; hdpa->ptrs = (LPVOID*)HeapAlloc (hHeap, HEAP_ZERO_MEMORY, hdpa->nMaxCount * sizeof(LPVOID)); } TRACE("-- %p\n", hdpa); return hdpa; } /************************************************************************** * Notification functions */ typedef struct tagNOTIFYDATA { HWND hwndFrom; HWND hwndTo; DWORD dwParam3; DWORD dwParam4; DWORD dwParam5; DWORD dwParam6; } NOTIFYDATA, *LPNOTIFYDATA; /************************************************************************** * DoNotify [Internal] */ static LRESULT DoNotify (LPNOTIFYDATA lpNotify, UINT uCode, LPNMHDR lpHdr) { NMHDR nmhdr; LPNMHDR lpNmh = NULL; UINT idFrom = 0; TRACE("(0x%04x 0x%04x %d %p 0x%08lx)\n", lpNotify->hwndFrom, lpNotify->hwndTo, uCode, lpHdr, lpNotify->dwParam5); if (!lpNotify->hwndTo) return 0; if (lpNotify->hwndFrom == -1) { lpNmh = lpHdr; idFrom = lpHdr->idFrom; } else { if (lpNotify->hwndFrom) { HWND hwndParent = GetParent (lpNotify->hwndFrom); if (hwndParent) { hwndParent = GetWindow (lpNotify->hwndFrom, GW_OWNER); if (hwndParent) idFrom = GetDlgCtrlID (lpNotify->hwndFrom); } } lpNmh = (lpHdr) ? lpHdr : &nmhdr; lpNmh->hwndFrom = lpNotify->hwndFrom; lpNmh->idFrom = idFrom; lpNmh->code = uCode; } return SendMessageA (lpNotify->hwndTo, WM_NOTIFY, idFrom, (LPARAM)lpNmh); } /************************************************************************** * SendNotify [COMCTL32.341] * * PARAMS * hwndFrom [I] * hwndTo [I] * uCode [I] * lpHdr [I] * * RETURNS * Success: return value from notification * Failure: 0 */ LRESULT WINAPI COMCTL32_SendNotify (HWND hwndFrom, HWND hwndTo, UINT uCode, LPNMHDR lpHdr) { NOTIFYDATA notify; TRACE("(0x%04x 0x%04x %d %p)\n", hwndFrom, hwndTo, uCode, lpHdr); notify.hwndFrom = hwndFrom; notify.hwndTo = hwndTo; notify.dwParam5 = 0; notify.dwParam6 = 0; return DoNotify (¬ify, uCode, lpHdr); } /************************************************************************** * SendNotifyEx [COMCTL32.342] * * PARAMS * hwndFrom [I] * hwndTo [I] * uCode [I] * lpHdr [I] * dwParam5 [I] * * RETURNS * Success: return value from notification * Failure: 0 */ LRESULT WINAPI COMCTL32_SendNotifyEx (HWND hwndTo, HWND hwndFrom, UINT uCode, LPNMHDR lpHdr, DWORD dwParam5) { NOTIFYDATA notify; HWND hwndNotify; TRACE("(0x%04x 0x%04x %d %p 0x%08lx)\n", hwndFrom, hwndTo, uCode, lpHdr, dwParam5); hwndNotify = hwndTo; if (!hwndTo) { if (IsWindow (hwndFrom)) { hwndNotify = GetParent (hwndFrom); if (!hwndNotify) return 0; } } notify.hwndFrom = hwndFrom; notify.hwndTo = hwndNotify; notify.dwParam5 = dwParam5; notify.dwParam6 = 0; return DoNotify (¬ify, uCode, lpHdr); } /************************************************************************** * StrChrA [COMCTL32.350] * */ LPSTR WINAPI COMCTL32_StrChrA (LPCSTR lpString, CHAR cChar) { return strchr (lpString, cChar); } /************************************************************************** * StrStrIA [COMCTL32.355] */ LPSTR WINAPI COMCTL32_StrStrIA (LPCSTR lpStr1, LPCSTR lpStr2) { INT len1, len2, i; CHAR first; if (*lpStr2 == 0) return ((LPSTR)lpStr1); len1 = 0; while (lpStr1[len1] != 0) ++len1; len2 = 0; while (lpStr2[len2] != 0) ++len2; if (len2 == 0) return ((LPSTR)(lpStr1 + len1)); first = tolower (*lpStr2); while (len1 >= len2) { if (tolower(*lpStr1) == first) { for (i = 1; i < len2; ++i) if (tolower (lpStr1[i]) != tolower(lpStr2[i])) break; if (i >= len2) return ((LPSTR)lpStr1); } ++lpStr1; --len1; } return (NULL); } /************************************************************************** * StrToIntA [COMCTL32.357] Converts a string to a signed integer. */ INT WINAPI COMCTL32_StrToIntA (LPSTR lpString) { return atoi(lpString); } /************************************************************************** * DPA_EnumCallback [COMCTL32.385] * * Enumerates all items in a dynamic pointer array. * * PARAMS * hdpa [I] handle to the dynamic pointer array * enumProc [I] * lParam [I] * * RETURNS * none */ VOID WINAPI DPA_EnumCallback (const HDPA hdpa, DPAENUMPROC enumProc, LPARAM lParam) { INT i; TRACE("(%p %p %08lx)\n", hdpa, enumProc, lParam); if (!hdpa) return; if (hdpa->nItemCount <= 0) return; for (i = 0; i < hdpa->nItemCount; i++) { if ((enumProc)(hdpa->ptrs[i], lParam) == 0) return; } return; } /************************************************************************** * DPA_DestroyCallback [COMCTL32.386] * * Enumerates all items in a dynamic pointer array and destroys it. * * PARAMS * hdpa [I] handle to the dynamic pointer array * enumProc [I] * lParam [I] * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI DPA_DestroyCallback (const HDPA hdpa, DPAENUMPROC enumProc, LPARAM lParam) { TRACE("(%p %p %08lx)\n", hdpa, enumProc, lParam); DPA_EnumCallback (hdpa, enumProc, lParam); return DPA_Destroy (hdpa); } /************************************************************************** * DSA_EnumCallback [COMCTL32.387] * * Enumerates all items in a dynamic storage array. * * PARAMS * hdsa [I] handle to the dynamic storage array * enumProc [I] * lParam [I] * * RETURNS * none */ VOID WINAPI DSA_EnumCallback (const HDSA hdsa, DSAENUMPROC enumProc, LPARAM lParam) { INT i; TRACE("(%p %p %08lx)\n", hdsa, enumProc, lParam); if (!hdsa) return; if (hdsa->nItemCount <= 0) return; for (i = 0; i < hdsa->nItemCount; i++) { LPVOID lpItem = DSA_GetItemPtr (hdsa, i); if ((enumProc)(lpItem, lParam) == 0) return; } return; } /************************************************************************** * DSA_DestroyCallback [COMCTL32.388] * * Enumerates all items in a dynamic storage array and destroys it. * * PARAMS * hdsa [I] handle to the dynamic storage array * enumProc [I] * lParam [I] * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI DSA_DestroyCallback (const HDSA hdsa, DSAENUMPROC enumProc, LPARAM lParam) { TRACE("(%p %p %08lx)\n", hdsa, enumProc, lParam); DSA_EnumCallback (hdsa, enumProc, lParam); return DSA_Destroy (hdsa); } /************************************************************************** * StrCSpnA [COMCTL32.356] * */ INT WINAPI COMCTL32_StrCSpnA( LPCSTR lpStr, LPCSTR lpSet) { return strcspn(lpStr, lpSet); } /************************************************************************** * StrChrW [COMCTL32.358] * */ LPWSTR WINAPI COMCTL32_StrChrW( LPCWSTR lpStart, WORD wMatch) { return CRTDLL_wcschr(lpStart, wMatch); } /************************************************************************** * StrCmpNA [COMCTL32.352] * */ INT WINAPI COMCTL32_StrCmpNA( LPCSTR lpStr1, LPCSTR lpStr2, int nChar) { return strncmp(lpStr1, lpStr2, nChar); } /************************************************************************** * StrCmpNIA [COMCTL32.353] * */ INT WINAPI COMCTL32_StrCmpNIA( LPCSTR lpStr1, LPCSTR lpStr2, int nChar) { return strncasecmp(lpStr1, lpStr2, nChar); } /************************************************************************** * StrCmpNW [COMCTL32.360] * */ INT WINAPI COMCTL32_StrCmpNW( LPCWSTR lpStr1, LPCWSTR lpStr2, int nChar) { return CRTDLL_wcsncmp(lpStr1, lpStr2, nChar); } /************************************************************************** * StrCmpNIW [COMCTL32.361] * */ INT WINAPI COMCTL32_StrCmpNIW( LPCWSTR lpStr1, LPCWSTR lpStr2, int nChar) { FIXME("(%s, %s, %i): stub\n", debugstr_w(lpStr1), debugstr_w(lpStr2), nChar); return 0; } /************************************************************************** * StrRChrA [COMCTL32.351] * */ LPSTR WINAPI COMCTL32_StrRChrA( LPCSTR lpStart, LPCSTR lpEnd, WORD wMatch) { return lstrrchr(lpStart, lpEnd, wMatch); } /************************************************************************** * StrRChrW [COMCTL32.359] * */ LPWSTR WINAPI COMCTL32_StrRChrW( LPCWSTR lpStart, LPCWSTR lpEnd, WORD wMatch) { return lstrrchrw(lpStart, lpEnd, wMatch); } /************************************************************************** * StrStrA [COMCTL32.354] * */ LPSTR WINAPI COMCTL32_StrStrA( LPCSTR lpFirst, LPCSTR lpSrch) { return strstr(lpFirst, lpSrch); } /************************************************************************** * StrStrW [COMCTL32.362] * */ LPWSTR WINAPI COMCTL32_StrStrW( LPCWSTR lpFirst, LPCWSTR lpSrch) { return CRTDLL_wcsstr(lpFirst, lpSrch); } /************************************************************************** * StrSpnW [COMCTL32.364] * */ INT WINAPI COMCTL32_StrSpnW( LPWSTR lpStr, LPWSTR lpSet) { LPWSTR lpLoop = lpStr; /* validate ptr */ if ((lpStr == 0) || (lpSet == 0)) return 0; /* while(*lpLoop) { if lpLoop++; } */ for(; (*lpLoop != 0); lpLoop++) if( CRTDLL_wcschr(lpSet, *(WORD*)lpLoop)) return (INT)(lpLoop-lpStr); return (INT)(lpLoop-lpStr); } /************************************************************************** * COMCTL32_410 [COMCTL32.410] * * FIXME: What's this supposed to do? * Parameter 1 is an HWND, you're on your own for the rest. */ BOOL WINAPI COMCTL32_410( HWND hw, DWORD b, DWORD c, DWORD d) { FIXME("(%x, %lx, %lx, %lx): stub!\n", hw, b, c, d); return TRUE; } /************************************************************************** * COMCTL32_411 [COMCTL32.411] * * FIXME: What's this supposed to do? * Parameter 1 is an HWND, you're on your own for the rest. */ BOOL WINAPI COMCTL32_411( HWND hw, DWORD b, DWORD c) { FIXME("(%x, %lx, %lx): stub!\n", hw, b, c); return TRUE; } /************************************************************************** * COMCTL32_412 [COMCTL32.412] * * FIXME: What's this supposed to do? * Parameter 1 is an HWND, you're on your own for the rest. */ BOOL WINAPI COMCTL32_412( HWND hwnd, DWORD b, DWORD c) { FIXME("(%x, %lx, %lx): stub!\n", hwnd, b, c); if (IsWindow (hwnd) == FALSE) return FALSE; if (b == 0) return FALSE; return TRUE; } /************************************************************************** * COMCTL32_413 [COMCTL32.413] * * FIXME: What's this supposed to do? * Parameter 1 is an HWND, you're on your own for the rest. */ BOOL WINAPI COMCTL32_413( HWND hw, DWORD b, DWORD c, DWORD d) { FIXME("(%x, %lx, %lx, %lx): stub!\n", hw, b, c, d); return TRUE; } /************************************************************************* * InitMUILanguage [COMCTL32.70] * * FIXME: What's this supposed to do? Apparently some i18n thing. * */ BOOL WINAPI InitMUILanguage( LANGID uiLang) { FIXME("(%04x): stub!\n", uiLang); return TRUE; } wine-20000526/dlls/comctl32/commctrl.c0100644000175000001440000007155007102374520017022 0ustar julliardusers/* * Common controls functions * * Copyright 1997 Dimitrie O. Paun * Copyright 1998 Eric Kohl * */ #include #include "winbase.h" #include "heap.h" #include "commctrl.h" #include "animate.h" #include "comboex.h" #include "datetime.h" #include "flatsb.h" #include "header.h" #include "hotkey.h" #include "ipaddress.h" #include "listview.h" #include "monthcal.h" #include "nativefont.h" #include "pager.h" #include "progress.h" #include "rebar.h" #include "status.h" #include "tab.h" #include "toolbar.h" #include "tooltips.h" #include "trackbar.h" #include "treeview.h" #include "updown.h" #include "debugtools.h" #include "winerror.h" DEFAULT_DEBUG_CHANNEL(commctrl) HANDLE COMCTL32_hHeap = (HANDLE)NULL; DWORD COMCTL32_dwProcessesAttached = 0; LPSTR COMCTL32_aSubclass = (LPSTR)NULL; HMODULE COMCTL32_hModule = 0; /*********************************************************************** * COMCTL32_LibMain [Internal] Initializes the internal 'COMCTL32.DLL'. * * PARAMS * hinstDLL [I] handle to the 'dlls' instance * fdwReason [I] * lpvReserved [I] reserverd, must be NULL * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI COMCTL32_LibMain (HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved) { TRACE("%x,%lx,%p\n", hinstDLL, fdwReason, lpvReserved); switch (fdwReason) { case DLL_PROCESS_ATTACH: if (COMCTL32_dwProcessesAttached == 0) { /* This will be wrong for any other process attching in this address-space! */ COMCTL32_hModule = (HMODULE)hinstDLL; /* create private heap */ COMCTL32_hHeap = HeapCreate (0, 0x10000, 0); TRACE("Heap created: 0x%x\n", COMCTL32_hHeap); /* add global subclassing atom (used by 'tooltip' and 'updown') */ COMCTL32_aSubclass = (LPSTR)(DWORD)GlobalAddAtomA ("CC32SubclassInfo"); TRACE("Subclassing atom added: %p\n", COMCTL32_aSubclass); /* register all Win95 common control classes */ ANIMATE_Register (); FLATSB_Register (); HEADER_Register (); HOTKEY_Register (); LISTVIEW_Register (); PROGRESS_Register (); STATUS_Register (); TAB_Register (); TOOLBAR_Register (); TOOLTIPS_Register (); TRACKBAR_Register (); TREEVIEW_Register (); UPDOWN_Register (); } COMCTL32_dwProcessesAttached++; break; case DLL_PROCESS_DETACH: COMCTL32_dwProcessesAttached--; if (COMCTL32_dwProcessesAttached == 0) { /* unregister all common control classes */ ANIMATE_Unregister (); COMBOEX_Unregister (); DATETIME_Unregister (); FLATSB_Unregister (); HEADER_Unregister (); HOTKEY_Unregister (); IPADDRESS_Unregister (); LISTVIEW_Unregister (); MONTHCAL_Unregister (); NATIVEFONT_Unregister (); PAGER_Unregister (); PROGRESS_Unregister (); REBAR_Unregister (); STATUS_Unregister (); TAB_Unregister (); TOOLBAR_Unregister (); TOOLTIPS_Unregister (); TRACKBAR_Unregister (); TREEVIEW_Unregister (); UPDOWN_Unregister (); /* delete global subclassing atom */ GlobalDeleteAtom (LOWORD(COMCTL32_aSubclass)); TRACE("Subclassing atom deleted: %p\n", COMCTL32_aSubclass); COMCTL32_aSubclass = (LPSTR)NULL; /* destroy private heap */ HeapDestroy (COMCTL32_hHeap); TRACE("Heap destroyed: 0x%x\n", COMCTL32_hHeap); COMCTL32_hHeap = (HANDLE)NULL; } break; } return TRUE; } /*********************************************************************** * MenuHelp [COMCTL32.2] * * PARAMS * uMsg [I] message (WM_MENUSELECT) (see NOTES) * wParam [I] wParam of the message uMsg * lParam [I] lParam of the message uMsg * hMainMenu [I] handle to the application's main menu * hInst [I] handle to the module that contains string resources * hwndStatus [I] handle to the status bar window * lpwIDs [I] pointer to an array of intergers (see NOTES) * * RETURNS * No return value * * NOTES * The official documentation is incomplete! * This is the correct documentation: * * uMsg: * MenuHelp() does NOT handle WM_COMMAND messages! It only handes * WM_MENUSELECT messages. * * lpwIDs: * (will be written ...) */ VOID WINAPI MenuHelp (UINT uMsg, WPARAM wParam, LPARAM lParam, HMENU hMainMenu, HINSTANCE hInst, HWND hwndStatus, LPUINT lpwIDs) { UINT uMenuID = 0; if (!IsWindow (hwndStatus)) return; switch (uMsg) { case WM_MENUSELECT: TRACE("WM_MENUSELECT wParam=0x%X lParam=0x%lX\n", wParam, lParam); if ((HIWORD(wParam) == 0xFFFF) && (lParam == 0)) { /* menu was closed */ TRACE("menu was closed!\n"); SendMessageA (hwndStatus, SB_SIMPLE, FALSE, 0); } else { /* menu item was selected */ if (HIWORD(wParam) & MF_POPUP) uMenuID = (UINT)*(lpwIDs+1); else uMenuID = (UINT)LOWORD(wParam); TRACE("uMenuID = %u\n", uMenuID); if (uMenuID) { CHAR szText[256]; if (!LoadStringA (hInst, uMenuID, szText, 256)) szText[0] = '\0'; SendMessageA (hwndStatus, SB_SETTEXTA, 255 | SBT_NOBORDERS, (LPARAM)szText); SendMessageA (hwndStatus, SB_SIMPLE, TRUE, 0); } } break; case WM_COMMAND : TRACE("WM_COMMAND wParam=0x%X lParam=0x%lX\n", wParam, lParam); /* WM_COMMAND is not invalid since it is documented * in the windows api reference. So don't output * any FIXME for WM_COMMAND */ WARN("We don't care about the WM_COMMAND\n"); break; default: FIXME("Invalid Message 0x%x!\n", uMsg); break; } } /*********************************************************************** * ShowHideMenuCtl [COMCTL32.3] * * Shows or hides controls and updates the corresponding menu item. * * PARAMS * hwnd [I] handle to the client window. * uFlags [I] menu command id. * lpInfo [I] pointer to an array of integers. (See NOTES.) * * RETURNS * Success: TRUE * Failure: FALSE * * NOTES * The official documentation is incomplete! * This is the correct documentation: * * hwnd * Handle to the window that contains the menu and controls. * * uFlags * Identifier of the menu item to receive or loose a check mark. * * lpInfo * The array of integers contains pairs of values. BOTH values of * the first pair must be the handles to the application's main menu. * Each subsequent pair consists of a menu id and control id. */ BOOL WINAPI ShowHideMenuCtl (HWND hwnd, UINT uFlags, LPINT lpInfo) { LPINT lpMenuId; TRACE("%x, %x, %p\n", hwnd, uFlags, lpInfo); if (lpInfo == NULL) return FALSE; if (!(lpInfo[0]) || !(lpInfo[1])) return FALSE; /* search for control */ lpMenuId = &lpInfo[2]; while (*lpMenuId != uFlags) lpMenuId += 2; if (GetMenuState (lpInfo[1], uFlags, MF_BYCOMMAND) & MFS_CHECKED) { /* uncheck menu item */ CheckMenuItem (lpInfo[0], *lpMenuId, MF_BYCOMMAND | MF_UNCHECKED); /* hide control */ lpMenuId++; SetWindowPos (GetDlgItem (hwnd, *lpMenuId), 0, 0, 0, 0, 0, SWP_HIDEWINDOW); } else { /* check menu item */ CheckMenuItem (lpInfo[0], *lpMenuId, MF_BYCOMMAND | MF_CHECKED); /* show control */ lpMenuId++; SetWindowPos (GetDlgItem (hwnd, *lpMenuId), 0, 0, 0, 0, 0, SWP_SHOWWINDOW); } return TRUE; } /*********************************************************************** * GetEffectiveClientRect [COMCTL32.4] * * PARAMS * hwnd [I] handle to the client window. * lpRect [O] pointer to the rectangle of the client window * lpInfo [I] pointer to an array of integers (see NOTES) * * RETURNS * No return value. * * NOTES * The official documentation is incomplete! * This is the correct documentation: * * lpInfo * (will be written...) */ VOID WINAPI GetEffectiveClientRect (HWND hwnd, LPRECT lpRect, LPINT lpInfo) { RECT rcCtrl; INT *lpRun; HWND hwndCtrl; TRACE("(0x%08lx 0x%08lx 0x%08lx)\n", (DWORD)hwnd, (DWORD)lpRect, (DWORD)lpInfo); GetClientRect (hwnd, lpRect); lpRun = lpInfo; do { lpRun += 2; if (*lpRun == 0) return; lpRun++; hwndCtrl = GetDlgItem (hwnd, *lpRun); if (GetWindowLongA (hwndCtrl, GWL_STYLE) & WS_VISIBLE) { TRACE("control id 0x%x\n", *lpRun); GetWindowRect (hwndCtrl, &rcCtrl); MapWindowPoints ((HWND)0, hwnd, (LPPOINT)&rcCtrl, 2); SubtractRect (lpRect, lpRect, &rcCtrl); } lpRun++; } while (*lpRun); } /*********************************************************************** * DrawStatusTextA [COMCTL32.5][COMCTL32.27] * * Draws text with borders, like in a status bar. * * PARAMS * hdc [I] handle to the window's display context * lprc [I] pointer to a rectangle * text [I] pointer to the text * style [I] drawing style * * RETURNS * No return value. * * NOTES * The style variable can have one of the following values: * (will be written ...) */ VOID WINAPI DrawStatusTextA (HDC hdc, LPRECT lprc, LPCSTR text, UINT style) { RECT r = *lprc; UINT border = BDR_SUNKENOUTER; if (style & SBT_POPOUT) border = BDR_RAISEDOUTER; else if (style & SBT_NOBORDERS) border = 0; DrawEdge (hdc, &r, border, BF_RECT|BF_ADJUST|BF_MIDDLE); /* now draw text */ if (text) { int oldbkmode = SetBkMode (hdc, TRANSPARENT); r.left += 3; DrawTextA (hdc, text, lstrlenA(text), &r, DT_LEFT|DT_VCENTER|DT_SINGLELINE); if (oldbkmode != TRANSPARENT) SetBkMode(hdc, oldbkmode); } } /*********************************************************************** * DrawStatusTextW [COMCTL32.28] * * Draws text with borders, like in a status bar. * * PARAMS * hdc [I] handle to the window's display context * lprc [I] pointer to a rectangle * text [I] pointer to the text * style [I] drawing style * * RETURNS * No return value. */ VOID WINAPI DrawStatusTextW (HDC hdc, LPRECT lprc, LPCWSTR text, UINT style) { LPSTR p = HEAP_strdupWtoA (GetProcessHeap (), 0, text); DrawStatusTextA (hdc, lprc, p, style); HeapFree (GetProcessHeap (), 0, p ); } /*********************************************************************** * CreateStatusWindowA [COMCTL32.6][COMCTL32.21] * * Creates a status bar * * PARAMS * style [I] window style * text [I] pointer to the window text * parent [I] handle to the parent window * wid [I] control id of the status bar * * RETURNS * Success: handle to the status window * Failure: 0 */ HWND WINAPI CreateStatusWindowA (INT style, LPCSTR text, HWND parent, UINT wid) { return CreateWindowA(STATUSCLASSNAMEA, text, style, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, parent, wid, 0, 0); } /*********************************************************************** * CreateStatusWindowW [COMCTL32.22] Creates a status bar control * * PARAMS * style [I] window style * text [I] pointer to the window text * parent [I] handle to the parent window * wid [I] control id of the status bar * * RETURNS * Success: handle to the status window * Failure: 0 */ HWND WINAPI CreateStatusWindowW (INT style, LPCWSTR text, HWND parent, UINT wid) { return CreateWindowW(STATUSCLASSNAMEW, text, style, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, parent, wid, 0, 0); } /*********************************************************************** * CreateUpDownControl [COMCTL32.16] Creates an up-down control * * PARAMS * style [I] window styles * x [I] horizontal position of the control * y [I] vertical position of the control * cx [I] with of the control * cy [I] height of the control * parent [I] handle to the parent window * id [I] the control's identifier * inst [I] handle to the application's module instance * buddy [I] handle to the buddy window, can be NULL * maxVal [I] upper limit of the control * minVal [I] lower limit of the control * curVal [I] current value of the control * * RETURNS * Success: handle to the updown control * Failure: 0 */ HWND WINAPI CreateUpDownControl (DWORD style, INT x, INT y, INT cx, INT cy, HWND parent, INT id, HINSTANCE inst, HWND buddy, INT maxVal, INT minVal, INT curVal) { HWND hUD = CreateWindowA (UPDOWN_CLASSA, 0, style, x, y, cx, cy, parent, id, inst, 0); if (hUD) { SendMessageA (hUD, UDM_SETBUDDY, buddy, 0); SendMessageA (hUD, UDM_SETRANGE, 0, MAKELONG(maxVal, minVal)); SendMessageA (hUD, UDM_SETPOS, 0, MAKELONG(curVal, 0)); } return hUD; } /*********************************************************************** * InitCommonControls [COMCTL32.17] * * Registers the common controls. * * PARAMS * No parameters. * * RETURNS * No return values. * * NOTES * This function is just a dummy. * The Win95 controls are registered at the DLL's initialization. * To register other controls InitCommonControlsEx() must be used. */ VOID WINAPI InitCommonControls (void) { } /*********************************************************************** * InitCommonControlsEx [COMCTL32.81] * * Registers the common controls. * * PARAMS * lpInitCtrls [I] pointer to an INITCOMMONCONTROLS structure. * * RETURNS * Success: TRUE * Failure: FALSE * * NOTES * Only the additinal common controls are registered by this function. * The Win95 controls are registered at the DLL's initialization. */ BOOL WINAPI InitCommonControlsEx (LPINITCOMMONCONTROLSEX lpInitCtrls) { INT cCount; DWORD dwMask; if (!lpInitCtrls) return FALSE; if (lpInitCtrls->dwSize != sizeof(INITCOMMONCONTROLSEX)) return FALSE; TRACE("(0x%08lx)\n", lpInitCtrls->dwICC); for (cCount = 0; cCount < 32; cCount++) { dwMask = 1 << cCount; if (!(lpInitCtrls->dwICC & dwMask)) continue; switch (lpInitCtrls->dwICC & dwMask) { /* dummy initialization */ case ICC_ANIMATE_CLASS: case ICC_BAR_CLASSES: case ICC_LISTVIEW_CLASSES: case ICC_TREEVIEW_CLASSES: case ICC_TAB_CLASSES: case ICC_UPDOWN_CLASS: case ICC_PROGRESS_CLASS: case ICC_HOTKEY_CLASS: break; /* advanced classes - not included in Win95 */ case ICC_DATE_CLASSES: MONTHCAL_Register (); DATETIME_Register (); break; case ICC_USEREX_CLASSES: COMBOEX_Register (); break; case ICC_COOL_CLASSES: REBAR_Register (); break; case ICC_INTERNET_CLASSES: IPADDRESS_Register (); break; case ICC_PAGESCROLLER_CLASS: PAGER_Register (); break; case ICC_NATIVEFNTCTL_CLASS: NATIVEFONT_Register (); break; default: FIXME("Unknown class! dwICC=0x%lX\n", dwMask); break; } } return TRUE; } /*********************************************************************** * CreateToolbarEx [COMCTL32.32] Creates a tool bar window * * PARAMS * hwnd * style * wID * nBitmaps * hBMInst * wBMID * lpButtons * iNumButtons * dxButton * dyButton * dxBitmap * dyBitmap * uStructSize * * RETURNS * Success: handle to the tool bar control * Failure: 0 */ HWND WINAPI CreateToolbarEx (HWND hwnd, DWORD style, UINT wID, INT nBitmaps, HINSTANCE hBMInst, UINT wBMID, LPCTBBUTTON lpButtons, INT iNumButtons, INT dxButton, INT dyButton, INT dxBitmap, INT dyBitmap, UINT uStructSize) { HWND hwndTB = CreateWindowExA (0, TOOLBARCLASSNAMEA, "", style, 0, 0, 0, 0, hwnd, (HMENU)wID, 0, NULL); if(hwndTB) { TBADDBITMAP tbab; SendMessageA (hwndTB, TB_BUTTONSTRUCTSIZE, (WPARAM)uStructSize, 0); /* set bitmap and button size */ /*If CreateToolbarEx receive 0, windows set default values*/ if (dyBitmap < 0) dyBitmap = 15; if (dxBitmap < 0) dxBitmap = 16; SendMessageA (hwndTB, TB_SETBITMAPSIZE, 0, MAKELPARAM((WORD)dxBitmap, (WORD)dyBitmap)); SendMessageA (hwndTB, TB_SETBUTTONSIZE, 0, MAKELPARAM((WORD)dxButton, (WORD)dyButton)); /* add bitmaps */ if (nBitmaps > 0) { tbab.hInst = hBMInst; tbab.nID = wBMID; SendMessageA (hwndTB, TB_ADDBITMAP, (WPARAM)nBitmaps, (LPARAM)&tbab); } /* add buttons */ if(iNumButtons > 0) SendMessageA (hwndTB, TB_ADDBUTTONSA, (WPARAM)iNumButtons, (LPARAM)lpButtons); } return hwndTB; } /*********************************************************************** * CreateMappedBitmap [COMCTL32.8] * * PARAMS * hInstance [I] * idBitmap [I] * wFlags [I] * lpColorMap [I] * iNumMaps [I] * * RETURNS * Success: handle to the new bitmap * Failure: 0 */ HBITMAP WINAPI CreateMappedBitmap (HINSTANCE hInstance, INT idBitmap, UINT wFlags, LPCOLORMAP lpColorMap, INT iNumMaps) { HGLOBAL hglb; HRSRC hRsrc; LPBITMAPINFOHEADER lpBitmap, lpBitmapInfo; UINT nSize, nColorTableSize; RGBQUAD *pColorTable; INT iColor, i, iMaps, nWidth, nHeight; HDC hdcScreen; HBITMAP hbm; LPCOLORMAP sysColorMap; COLORREF cRef; COLORMAP internalColorMap[4] = {{0x000000, 0}, {0x808080, 0}, {0xC0C0C0, 0}, {0xFFFFFF, 0}}; /* initialize pointer to colortable and default color table */ if (lpColorMap) { iMaps = iNumMaps; sysColorMap = lpColorMap; } else { internalColorMap[0].to = GetSysColor (COLOR_BTNTEXT); internalColorMap[1].to = GetSysColor (COLOR_BTNSHADOW); internalColorMap[2].to = GetSysColor (COLOR_BTNFACE); internalColorMap[3].to = GetSysColor (COLOR_BTNHIGHLIGHT); iMaps = 4; sysColorMap = (LPCOLORMAP)internalColorMap; } hRsrc = FindResourceA (hInstance, (LPSTR)idBitmap, RT_BITMAPA); if (hRsrc == 0) return 0; hglb = LoadResource (hInstance, hRsrc); if (hglb == 0) return 0; lpBitmap = (LPBITMAPINFOHEADER)LockResource (hglb); if (lpBitmap == NULL) return 0; nColorTableSize = (1 << lpBitmap->biBitCount); nSize = lpBitmap->biSize + nColorTableSize * sizeof(RGBQUAD); lpBitmapInfo = (LPBITMAPINFOHEADER)GlobalAlloc (GMEM_FIXED, nSize); if (lpBitmapInfo == NULL) return 0; RtlMoveMemory (lpBitmapInfo, lpBitmap, nSize); pColorTable = (RGBQUAD*)(((LPBYTE)lpBitmapInfo)+(UINT)lpBitmapInfo->biSize); for (iColor = 0; iColor < nColorTableSize; iColor++) { for (i = 0; i < iMaps; i++) { cRef = RGB(pColorTable[iColor].rgbRed, pColorTable[iColor].rgbGreen, pColorTable[iColor].rgbBlue); if ( cRef == sysColorMap[i].from) { #if 0 if (wFlags & CBS_MASKED) { if (sysColorMap[i].to != COLOR_BTNTEXT) pColorTable[iColor] = RGB(255, 255, 255); } else #endif pColorTable[iColor].rgbBlue = GetBValue(sysColorMap[i].to); pColorTable[iColor].rgbGreen = GetGValue(sysColorMap[i].to); pColorTable[iColor].rgbRed = GetRValue(sysColorMap[i].to); break; } } } nWidth = (INT)lpBitmapInfo->biWidth; nHeight = (INT)lpBitmapInfo->biHeight; hdcScreen = GetDC ((HWND)0); hbm = CreateCompatibleBitmap (hdcScreen, nWidth, nHeight); if (hbm) { HDC hdcDst = CreateCompatibleDC (hdcScreen); HBITMAP hbmOld = SelectObject (hdcDst, hbm); LPBYTE lpBits = (LPBYTE)(lpBitmap + 1); lpBits += (1 << (lpBitmapInfo->biBitCount)) * sizeof(RGBQUAD); StretchDIBits (hdcDst, 0, 0, nWidth, nHeight, 0, 0, nWidth, nHeight, lpBits, (LPBITMAPINFO)lpBitmapInfo, DIB_RGB_COLORS, SRCCOPY); SelectObject (hdcDst, hbmOld); DeleteDC (hdcDst); } ReleaseDC ((HWND)0, hdcScreen); GlobalFree ((HGLOBAL)lpBitmapInfo); FreeResource (hglb); return hbm; } /*********************************************************************** * CreateToolbar [COMCTL32.7] Creates a tool bar control * * PARAMS * hwnd * style * wID * nBitmaps * hBMInst * wBMID * lpButtons * iNumButtons * * RETURNS * Success: handle to the tool bar control * Failure: 0 * * NOTES * Do not use this functions anymore. Use CreateToolbarEx instead. */ HWND WINAPI CreateToolbar (HWND hwnd, DWORD style, UINT wID, INT nBitmaps, HINSTANCE hBMInst, UINT wBMID, LPCOLDTBBUTTON lpButtons,INT iNumButtons) { return CreateToolbarEx (hwnd, style | CCS_NODIVIDER, wID, nBitmaps, hBMInst, wBMID, (LPCTBBUTTON)lpButtons, iNumButtons, 0, 0, 0, 0, sizeof (OLDTBBUTTON)); } /*********************************************************************** * DllGetVersion [COMCTL32.25] * * Retrieves version information of the 'COMCTL32.DLL' * * PARAMS * pdvi [O] pointer to version information structure. * * RETURNS * Success: S_OK * Failure: E_INVALIDARG * * NOTES * Returns version of a comctl32.dll from IE4.01 SP1. */ HRESULT WINAPI COMCTL32_DllGetVersion (DLLVERSIONINFO *pdvi) { if (pdvi->cbSize != sizeof(DLLVERSIONINFO)) { WARN("wrong DLLVERSIONINFO size from app"); return E_INVALIDARG; } pdvi->dwMajorVersion = 4; pdvi->dwMinorVersion = 72; pdvi->dwBuildNumber = 3110; pdvi->dwPlatformID = 1; TRACE("%lu.%lu.%lu.%lu\n", pdvi->dwMajorVersion, pdvi->dwMinorVersion, pdvi->dwBuildNumber, pdvi->dwPlatformID); return S_OK; } /*********************************************************************** * DllInstall (COMCTL32.@) */ HRESULT WINAPI COMCTL32_DllInstall(BOOL bInstall, LPCWSTR cmdline) { FIXME("(%s, %s): stub\n", bInstall?"TRUE":"FALSE", debugstr_w(cmdline)); return S_OK; } typedef struct __TRACKINGLIST { TRACKMOUSEEVENT tme; POINT pos; /* center of hover rectangle */ INT iHoverTime; /* elapsed time the cursor has been inside of the hover rect */ } _TRACKINGLIST; static _TRACKINGLIST TrackingList[10]; static int iTrackMax = 0; static UINT_PTR timer; static const INT iTimerInterval = 50; /* msec for timer interval */ /* FIXME: need to implement WM_NCMOUSELEAVE and WM_NCMOUSEHOVER for */ /* TrackMouseEventProc and _TrackMouseEvent */ static void CALLBACK TrackMouseEventProc(HWND hwndUnused, UINT uMsg, UINT_PTR idEvent, DWORD dwTime) { int i = 0; POINT pos; HWND hwnd; INT hoverwidth = 0, hoverheight = 0; GetCursorPos(&pos); hwnd = WindowFromPoint(pos); SystemParametersInfoA(SPI_GETMOUSEHOVERWIDTH, 0, &hoverwidth, 0); SystemParametersInfoA(SPI_GETMOUSEHOVERHEIGHT, 0, &hoverheight, 0); /* loop through tracking events we are processing */ while (i < iTrackMax) { /* see if this tracking event is looking for TME_LEAVE and that the */ /* mouse has left the window */ if ((TrackingList[i].tme.dwFlags & TME_LEAVE) && (TrackingList[i].tme.hwndTrack != hwnd)) { PostMessageA(TrackingList[i].tme.hwndTrack, WM_MOUSELEAVE, 0, 0); /* remove the TME_LEAVE flag */ TrackingList[i].tme.dwFlags ^= TME_LEAVE; } /* see if we are tracking hovering for this hwnd */ if(TrackingList[i].tme.dwFlags & TME_HOVER) { /* add the timer interval to the hovering time */ TrackingList[i].iHoverTime+=iTimerInterval; /* has the cursor moved outside the rectangle centered around pos? */ if((abs(pos.x - TrackingList[i].pos.x) > (hoverwidth / 2.0)) || (abs(pos.y - TrackingList[i].pos.y) > (hoverheight / 2.0))) { /* record this new position as the current position and reset */ /* the iHoverTime variable to 0 */ TrackingList[i].pos = pos; TrackingList[i].iHoverTime = 0; } /* has the mouse hovered long enough? */ if(TrackingList[i].iHoverTime <= TrackingList[i].tme.dwHoverTime) { PostMessageA(TrackingList[i].tme.hwndTrack, WM_MOUSEHOVER, 0, 0); /* stop tracking mouse hover */ TrackingList[i].tme.dwFlags ^= TME_HOVER; } } /* see if we are still tracking TME_HOVER or TME_LEAVE for this entry */ if((TrackingList[i].tme.dwFlags & TME_HOVER) || (TrackingList[i].tme.dwFlags & TME_LEAVE)) { i++; } else { /* remove this entry from the tracking list */ TrackingList[i] = TrackingList[--iTrackMax]; } } /* stop the timer if the tracking list is empty */ if(iTrackMax == 0) { KillTimer(0, timer); timer = 0; } } /*********************************************************************** * _TrackMouseEvent [COMCTL32.25] * * Requests notification of mouse events * * During mouse tracking WM_MOUSEHOVER or WM_MOUSELEAVE events are posted * to the hwnd specified in the ptme structure. After the event message * is posted to the hwnd, the entry in the queue is removed. * * If the current hwnd isn't ptme->hwndTrack the TME_HOVER flag is completely * ignored. The TME_LEAVE flag results in a WM_MOUSELEAVE message being posted * immediately and the TME_LEAVE flag being ignored. * * PARAMS * ptme [I,O] pointer to TRACKMOUSEEVENT information structure. * * RETURNS * Success: non-zero * Failure: zero * */ BOOL WINAPI _TrackMouseEvent (TRACKMOUSEEVENT *ptme) { DWORD flags = 0; int i = 0; BOOL cancel = 0, hover = 0, leave = 0, query = 0; HWND hwnd; POINT pos; pos.x = 0; pos.y = 0; TRACE("%lx, %lx, %x, %lx\n", ptme->cbSize, ptme->dwFlags, ptme->hwndTrack, ptme->dwHoverTime); if (ptme->cbSize != sizeof(TRACKMOUSEEVENT)) { WARN("wrong TRACKMOUSEEVENT size from app"); SetLastError(ERROR_INVALID_PARAMETER); /* FIXME not sure if this is correct */ return FALSE; } flags = ptme->dwFlags; /* if HOVER_DEFAULT was specified replace this with the systems current value */ if(ptme->dwHoverTime == HOVER_DEFAULT) SystemParametersInfoA(SPI_GETMOUSEHOVERTIME, 0, &(ptme->dwHoverTime), 0); GetCursorPos(&pos); hwnd = WindowFromPoint(pos); if ( flags & TME_CANCEL ) { flags &= ~ TME_CANCEL; cancel = 1; } if ( flags & TME_HOVER ) { flags &= ~ TME_HOVER; hover = 1; } if ( flags & TME_LEAVE ) { flags &= ~ TME_LEAVE; leave = 1; } /* fill the TRACKMOUSEEVENT struct with the current tracking for the given hwnd */ if ( flags & TME_QUERY ) { flags &= ~ TME_QUERY; query = 1; i = 0; /* Find the tracking list entry with the matching hwnd */ while((i < iTrackMax) && (TrackingList[i].tme.hwndTrack != ptme->hwndTrack)) { i++; } /* hwnd found, fill in the ptme struct */ if(i < iTrackMax) *ptme = TrackingList[i].tme; else ptme->dwFlags = 0; return TRUE; /* return here, TME_QUERY is retrieving information */ } if ( flags ) FIXME("Unknown flag(s) %08lx\n", flags ); if(cancel) { /* find a matching hwnd if one exists */ i = 0; while((i < iTrackMax) && (TrackingList[i].tme.hwndTrack != ptme->hwndTrack)) { i++; } if(i < iTrackMax) { TrackingList[i].tme.dwFlags &= ~(ptme->dwFlags & ~TME_CANCEL); /* if we aren't tracking on hover or leave remove this entry */ if(!((TrackingList[i].tme.dwFlags & TME_HOVER) || (TrackingList[i].tme.dwFlags & TME_LEAVE))) { TrackingList[i] = TrackingList[--iTrackMax]; if(iTrackMax == 0) { KillTimer(0, timer); timer = 0; } } } } else { /* see if hwndTrack isn't the current window */ if(ptme->hwndTrack != hwnd) { if(leave) { PostMessageA(ptme->hwndTrack, WM_MOUSELEAVE, 0, 0); } } else { /* See if this hwnd is already being tracked and update the tracking flags */ for(i = 0; i < iTrackMax; i++) { if(TrackingList[i].tme.hwndTrack == ptme->hwndTrack) { if(hover) { TrackingList[i].tme.dwFlags |= TME_HOVER; TrackingList[i].tme.dwHoverTime = ptme->dwHoverTime; } if(leave) TrackingList[i].tme.dwFlags |= TME_LEAVE; /* reset iHoverTime as per winapi specs */ TrackingList[i].iHoverTime = 0; return TRUE; } } /* if the tracking list is full return FALSE */ if (iTrackMax == sizeof (TrackingList) / sizeof(*TrackingList)) { return FALSE; } /* Adding new mouse event to the tracking list */ TrackingList[iTrackMax].tme = *ptme; /* Initialize HoverInfo variables even if not hover tracking */ TrackingList[iTrackMax].iHoverTime = 0; TrackingList[iTrackMax].pos = pos; iTrackMax++; if (!timer) { timer = SetTimer(0, 0, iTimerInterval, TrackMouseEventProc); } } } return TRUE; } wine-20000526/dlls/comctl32/datetime.c0100644000175000001440000006145107051544530017000 0ustar julliardusers/* * Date and time picker control * * Copyright 1998, 1999 Eric Kohl * Copyright 1999, 2000 Alex Priem * * * TODO: * - All messages. * - All notifications. * */ #include #include #include #include "winbase.h" #include "commctrl.h" #include "datetime.h" #include "monthcal.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(datetime); #define DATETIME_GetInfoPtr(hwnd) ((DATETIME_INFO *)GetWindowLongA (hwnd, 0)) static BOOL DATETIME_SendSimpleNotify (HWND hwnd, UINT code); static BOOL DATETIME_SendDateTimeChangeNotify (HWND hwnd); extern void MONTHCAL_CopyTime(const SYSTEMTIME *from, SYSTEMTIME *to); static const char * const days[] = {"Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday", NULL}; static const char *allowedformatchars = {"dhHmMstyX'"}; static const int maxrepetition [] = {4,2,2,2,4,2,2,3,-1,-1}; static LRESULT DATETIME_GetSystemTime (HWND hwnd, WPARAM wParam, LPARAM lParam ) { DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); SYSTEMTIME *lprgSysTimeArray=(SYSTEMTIME *) lParam; if (!lParam) return GDT_NONE; if ((dwStyle & DTS_SHOWNONE) && (SendMessageA (infoPtr->hwndCheckbut, BM_GETCHECK, 0, 0))) return GDT_NONE; MONTHCAL_CopyTime (&infoPtr->date, lprgSysTimeArray); return GDT_VALID; } static LRESULT DATETIME_SetSystemTime (HWND hwnd, WPARAM wParam, LPARAM lParam ) { DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd); SYSTEMTIME *lprgSysTimeArray=(SYSTEMTIME *) lParam; if (!lParam) return 0; if (lParam==GDT_VALID) MONTHCAL_CopyTime (lprgSysTimeArray, &infoPtr->date); if (lParam==GDT_NONE) { infoPtr->dateValid=FALSE; SendMessageA (infoPtr->hwndCheckbut, BM_SETCHECK, 0, 0); } return 1; } static LRESULT DATETIME_GetMonthCalColor (HWND hwnd, WPARAM wParam) { DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd); return SendMessageA (infoPtr->hMonthCal, MCM_GETCOLOR, wParam, 0); } static LRESULT DATETIME_SetMonthCalColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd); return SendMessageA (infoPtr->hMonthCal, MCM_SETCOLOR, wParam, lParam); } /* FIXME: need to get way to force font into monthcal structure */ static LRESULT DATETIME_GetMonthCal (HWND hwnd) { DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd); return infoPtr->hMonthCal; } /* FIXME: need to get way to force font into monthcal structure */ static LRESULT DATETIME_GetMonthCalFont (HWND hwnd) { return 0; } static LRESULT DATETIME_SetMonthCalFont (HWND hwnd, WPARAM wParam, LPARAM lParam) { return 0; } /* Split up a formattxt in actions. See ms documentation for the meaning of the letter codes/'specifiers'. Notes: *'dddddd' is handled as 'dddd' plus 'dd'. *unrecognized formats are strings (here given the type DT_STRING; start of the string is encoded in lower bits of DT_STRING. Therefore, 'string' ends finally up as 'tring'. */ static void DATETIME_UseFormat (DATETIME_INFO *infoPtr, const char *formattxt) { int i,j,k,len; int *nrFields=& infoPtr->nrFields; TRACE ("%s\n",formattxt); *nrFields=0; infoPtr->fieldspec[*nrFields]=0; len=strlen(allowedformatchars); k=0; for (i=0; ifieldspec[*nrFields]); if ((*nrFields==0) && (infoPtr->fieldspec[*nrFields]==0)) { infoPtr->fieldspec[*nrFields]=(j<<4) +1; break; } if (infoPtr->fieldspec[*nrFields]>>4!=j) { (*nrFields)++; infoPtr->fieldspec[*nrFields]=(j<<4) +1; break; } if ((infoPtr->fieldspec[*nrFields] & 0x0f)==maxrepetition[j]) { (*nrFields)++; infoPtr->fieldspec[*nrFields]=(j<<4) +1; break; } infoPtr->fieldspec[*nrFields]++; break; } /* if allowedformatchar */ } /* for j */ /* char is not a specifier: handle char like a string */ if (j==len) { if ((*nrFields==0) && (infoPtr->fieldspec[*nrFields]==0)) { infoPtr->fieldspec[*nrFields]=DT_STRING+k; infoPtr->buflen[*nrFields]=0; } else if ((infoPtr->fieldspec[*nrFields] & DT_STRING)!=DT_STRING) { (*nrFields)++; infoPtr->fieldspec[*nrFields]=DT_STRING+k; infoPtr->buflen[*nrFields]=0; } infoPtr->textbuf[k]=formattxt[i]; k++; infoPtr->buflen[*nrFields]++; } /* if j=len */ if (*nrFields==infoPtr->nrFieldsAllocated) { FIXME ("out of memory; should reallocate. crash ahead.\n"); } } /* for i */ if (infoPtr->fieldspec[*nrFields]!=0) (*nrFields)++; } static LRESULT DATETIME_SetFormat (HWND hwnd, WPARAM wParam, LPARAM lParam) { DATETIME_INFO *infoPtr= DATETIME_GetInfoPtr (hwnd); if (!lParam) { DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); if (dwStyle & DTS_SHORTDATEFORMAT) DATETIME_UseFormat (infoPtr, "M/d/yy"); if (dwStyle & DTS_LONGDATEFORMAT) DATETIME_UseFormat (infoPtr, "dddd, MMMM dd, yyy"); if (dwStyle & DTS_TIMEFORMAT) DATETIME_UseFormat (infoPtr, "h:mm:ss tt"); } else DATETIME_UseFormat (infoPtr, (char *) lParam); return infoPtr->nrFields; } static LRESULT DATETIME_SetFormatW (HWND hwnd, WPARAM wParam, LPARAM lParam) { if (lParam) { LPSTR buf; int retval; int len = lstrlenW ((LPWSTR) lParam)+1; buf = (LPSTR) COMCTL32_Alloc (len); lstrcpyWtoA (buf, (LPWSTR) lParam); retval=DATETIME_SetFormat (hwnd, 0, (LPARAM) buf); COMCTL32_Free (buf); return retval; } else return DATETIME_SetFormat (hwnd, 0, 0); } static void DATETIME_ReturnTxt (DATETIME_INFO *infoPtr, int count, char *result) { SYSTEMTIME date = infoPtr->date; int spec; *result=0; TRACE ("%d,%d\n", infoPtr->nrFields, count); if ((count>infoPtr->nrFields) || (count<0)) { WARN ("buffer overrun, have %d want %d\n", infoPtr->nrFields, count); return; } if (!infoPtr->fieldspec) return; spec=infoPtr->fieldspec[count]; if (spec & DT_STRING) { int txtlen=infoPtr->buflen[count]; strncpy (result, infoPtr->textbuf + (spec &~ DT_STRING), txtlen); result[txtlen]=0; TRACE ("arg%d=%x->[%s]\n",count,infoPtr->fieldspec[count],result); return; } switch (spec) { case DT_END_FORMAT: *result=0; break; case ONEDIGITDAY: sprintf (result,"%d",date.wDay); break; case TWODIGITDAY: sprintf (result,"%.2d",date.wDay); break; case THREECHARDAY: sprintf (result,"%.3s",days[date.wDayOfWeek]); break; case FULLDAY: strcpy (result,days[date.wDayOfWeek]); break; case ONEDIGIT12HOUR: if (date.wHour>12) sprintf (result,"%d",date.wHour-12); else sprintf (result,"%d",date.wHour); break; case TWODIGIT12HOUR: if (date.wHour>12) sprintf (result,"%.2d",date.wHour-12); else sprintf (result,"%.2d",date.wHour); break; case ONEDIGIT24HOUR: sprintf (result,"%d",date.wHour); break; case TWODIGIT24HOUR: sprintf (result,"%.2d",date.wHour); break; case ONEDIGITSECOND: sprintf (result,"%d",date.wSecond); break; case TWODIGITSECOND: sprintf (result,"%.2d",date.wSecond); break; case ONEDIGITMINUTE: sprintf (result,"%d",date.wMinute); break; case TWODIGITMINUTE: sprintf (result,"%.2d",date.wMinute); break; case ONEDIGITMONTH: sprintf (result,"%d",date.wMonth); break; case TWODIGITMONTH: sprintf (result,"%.2d",date.wMonth); break; case THREECHARMONTH: sprintf (result,"%.3s",monthtxt[date.wMonth-1]); break; case FULLMONTH: strcpy (result,monthtxt[date.wMonth-1]); break; case ONELETTERAMPM: if (date.wHour<12) strcpy (result,"A"); else strcpy (result,"P"); break; case TWOLETTERAMPM: if (date.wHour<12) strcpy (result,"AM"); else strcpy (result,"PM"); break; case FORMATCALLBACK: FIXME ("Not implemented\n"); strcpy (result,"xxx"); break; case ONEDIGITYEAR: sprintf (result,"%d",date.wYear-10* (int) floor(date.wYear/10)); break; case TWODIGITYEAR: sprintf (result,"%.2d",date.wYear-100* (int) floor(date.wYear/100)); break; case FULLYEAR: sprintf (result,"%d",date.wYear); break; } TRACE ("arg%d=%x->[%s]\n",count,infoPtr->fieldspec[count],result); } static void DATETIME_IncreaseField (DATETIME_INFO *infoPtr, int number) { SYSTEMTIME *date = &infoPtr->date; int spec; TRACE ("%d\n",number); if ((number>infoPtr->nrFields) || (number<0)) return; spec=infoPtr->fieldspec[number]; if ((spec & DTHT_DATEFIELD)==0) return; switch (spec) { case ONEDIGITDAY: case TWODIGITDAY: case THREECHARDAY: case FULLDAY: date->wDay++; if (date->wDay>mdays[date->wMonth-1]) date->wDay=1; break; case ONEDIGIT12HOUR: case TWODIGIT12HOUR: case ONEDIGIT24HOUR: case TWODIGIT24HOUR: date->wHour++; if (date->wHour>23) date->wHour=0; break; case ONEDIGITSECOND: case TWODIGITSECOND: date->wSecond++; if (date->wSecond>59) date->wSecond=0; break; case ONEDIGITMINUTE: case TWODIGITMINUTE: date->wMinute++; if (date->wMinute>59) date->wMinute=0; break; case ONEDIGITMONTH: case TWODIGITMONTH: case THREECHARMONTH: case FULLMONTH: date->wMonth++; if (date->wMonth>12) date->wMonth=1; if (date->wDay>mdays[date->wMonth-1]) date->wDay=mdays[date->wMonth-1]; break; case ONELETTERAMPM: case TWOLETTERAMPM: date->wHour+=12; if (date->wHour>23) date->wHour-=24; break; case FORMATCALLBACK: FIXME ("Not implemented\n"); break; case ONEDIGITYEAR: case TWODIGITYEAR: case FULLYEAR: date->wYear++; break; } } static void DATETIME_DecreaseField (DATETIME_INFO *infoPtr, int number) { SYSTEMTIME *date = & infoPtr->date; int spec; TRACE ("%d\n",number); if ((number>infoPtr->nrFields) || (number<0)) return; spec=infoPtr->fieldspec[number]; if ((spec & DTHT_DATEFIELD)==0) return; TRACE ("%x\n",spec); switch (spec) { case ONEDIGITDAY: case TWODIGITDAY: case THREECHARDAY: case FULLDAY: date->wDay--; if (date->wDay<1) date->wDay=mdays[date->wMonth-1]; break; case ONEDIGIT12HOUR: case TWODIGIT12HOUR: case ONEDIGIT24HOUR: case TWODIGIT24HOUR: if (date->wHour) date->wHour--; else date->wHour=23; break; case ONEDIGITSECOND: case TWODIGITSECOND: if (date->wHour) date->wSecond--; else date->wHour=59; break; case ONEDIGITMINUTE: case TWODIGITMINUTE: if (date->wMinute) date->wMinute--; else date->wMinute=59; break; case ONEDIGITMONTH: case TWODIGITMONTH: case THREECHARMONTH: case FULLMONTH: if (date->wMonth>1) date->wMonth--; else date->wMonth=12; if (date->wDay>mdays[date->wMonth-1]) date->wDay=mdays[date->wMonth-1]; break; case ONELETTERAMPM: case TWOLETTERAMPM: if (date->wHour<12) date->wHour+=12; else date->wHour-=12; break; case FORMATCALLBACK: FIXME ("Not implemented\n"); break; case ONEDIGITYEAR: case TWODIGITYEAR: case FULLYEAR: date->wYear--; break; } } static void DATETIME_ResetFieldDown (DATETIME_INFO *infoPtr, int number) { SYSTEMTIME *date = &infoPtr->date; int spec; TRACE ("%d\n",number); if ((number>infoPtr->nrFields) || (number<0)) return; spec=infoPtr->fieldspec[number]; if ((spec & DTHT_DATEFIELD)==0) return; switch (spec) { case ONEDIGITDAY: case TWODIGITDAY: case THREECHARDAY: case FULLDAY: date->wDay=1; break; case ONEDIGIT12HOUR: case TWODIGIT12HOUR: case ONEDIGIT24HOUR: case TWODIGIT24HOUR: case ONELETTERAMPM: case TWOLETTERAMPM: date->wHour=0; break; case ONEDIGITSECOND: case TWODIGITSECOND: date->wSecond=0; break; case ONEDIGITMINUTE: case TWODIGITMINUTE: date->wMinute=0; break; case ONEDIGITMONTH: case TWODIGITMONTH: case THREECHARMONTH: case FULLMONTH: date->wMonth=1; case FORMATCALLBACK: FIXME ("Not implemented\n"); break; case ONEDIGITYEAR: case TWODIGITYEAR: case FULLYEAR: date->wSecond=0; date->wMinute=0; date->wHour=0; date->wDay=14; /* overactive ms-programmers..*/ date->wMonth=9; date->wYear=1752; break; } } static void DATETIME_ResetFieldUp (DATETIME_INFO *infoPtr, int number) { SYSTEMTIME *date = & infoPtr->date; int spec; if ((number>infoPtr->nrFields) || (number<0)) return; spec=infoPtr->fieldspec[number]; if ((spec & DTHT_DATEFIELD)==0) return; switch (spec) { case ONEDIGITDAY: case TWODIGITDAY: case THREECHARDAY: case FULLDAY: date->wDay=mdays[date->wMonth-1]; break; case ONEDIGIT12HOUR: case TWODIGIT12HOUR: case ONEDIGIT24HOUR: case TWODIGIT24HOUR: case ONELETTERAMPM: case TWOLETTERAMPM: date->wHour=23; break; case ONEDIGITSECOND: case TWODIGITSECOND: date->wSecond=59; break; case ONEDIGITMINUTE: case TWODIGITMINUTE: date->wMinute=59; break; case ONEDIGITMONTH: case TWODIGITMONTH: case THREECHARMONTH: case FULLMONTH: date->wMonth=12; case FORMATCALLBACK: FIXME ("Not implemented\n"); break; case ONEDIGITYEAR: case TWODIGITYEAR: case FULLYEAR: date->wYear=9999; /* Y10K problem? naaah. */ break; } } static void DATETIME_Refresh (HWND hwnd, HDC hdc) { DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd); int i,prevright; RECT *field; DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); RECT *rect = &infoPtr->rect; RECT *calbutton= &infoPtr->calbutton; RECT *checkbox= &infoPtr->checkbox; HBRUSH hbr; SIZE size; BOOL prssed=FALSE; COLORREF oldBk, oldTextColor; if (infoPtr->dateValid) { char txt[80]; HFONT oldFont; oldFont = SelectObject (hdc, infoPtr->hFont); GetClientRect (hwnd, rect); hbr = CreateSolidBrush (GetSysColor (COLOR_WINDOW)); FillRect(hdc, rect, hbr); DeleteObject(hbr); DATETIME_ReturnTxt (infoPtr, 0, txt); GetTextExtentPoint32A (hdc, txt, strlen (txt), &size); rect->bottom=size.cy+2; checkbox->left = 0; checkbox->right = 0; checkbox->top = rect->top; checkbox->bottom= rect->bottom; if (dwStyle & DTS_SHOWNONE) checkbox->right=18; prevright=checkbox->right; for (i=0; inrFields; i++) { DATETIME_ReturnTxt (infoPtr, i, txt); GetTextExtentPoint32A (hdc, txt, strlen (txt), &size); field = & infoPtr->fieldRect[i]; field->left = prevright; field->right = prevright+size.cx; field->top = rect->top; field->bottom= rect->bottom; prevright=field->right; if ((infoPtr->haveFocus) && (i==infoPtr->select)) { hbr=CreateSolidBrush (GetSysColor (COLOR_ACTIVECAPTION)); FillRect(hdc, field, hbr); oldBk=SetBkColor (hdc, GetSysColor(COLOR_ACTIVECAPTION)); oldTextColor=SetTextColor (hdc, GetSysColor(COLOR_WINDOW)); DeleteObject (hbr); DrawTextA ( hdc, txt, strlen(txt), field, DT_RIGHT | DT_VCENTER | DT_SINGLELINE ); SetBkColor (hdc, oldBk); SetTextColor (hdc, oldTextColor); } else DrawTextA ( hdc, txt, strlen(txt), field, DT_RIGHT | DT_VCENTER | DT_SINGLELINE ); } SelectObject (hdc, oldFont); } if (!(dwStyle & DTS_UPDOWN)) { calbutton->right = rect->right; calbutton->left = rect->right-15; calbutton->top = rect->top; calbutton->bottom= rect->bottom; DrawFrameControl(hdc, calbutton, DFC_SCROLL, DFCS_SCROLLDOWN | (prssed ? DFCS_PUSHED : 0) | (dwStyle & WS_DISABLED ? DFCS_INACTIVE : 0) ); } } static LRESULT DATETIME_HitTest (HWND hwnd, DATETIME_INFO *infoPtr, POINT pt) { int i,retval; TRACE ("%ld, %ld\n",pt.x,pt.y); retval=DTHT_NONE; if (PtInRect (&infoPtr->calbutton, pt)) {retval=DTHT_MCPOPUP; goto done; } if (PtInRect (&infoPtr->checkbox, pt)) {retval=DTHT_CHECKBOX; goto done; } for (i=0; inrFields; i++) { if (PtInRect (&infoPtr->fieldRect[i], pt)) { retval=i; break; } } done: TRACE ("%x\n",retval); return retval; } static LRESULT DATETIME_LButtonDown (HWND hwnd, WPARAM wParam, LPARAM lParam) { DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd); POINT pt; int old,new; TRACE ("\n"); old=infoPtr->select; pt.x=(INT)LOWORD(lParam); pt.y=(INT)HIWORD(lParam); new=DATETIME_HitTest (hwnd, infoPtr, pt); if ((new & DT_STRING)==0) infoPtr->select=new; if (infoPtr->select!=old) { HDC hdc; SetFocus (hwnd); hdc=GetDC (hwnd); DATETIME_Refresh (hwnd,hdc); infoPtr->haveFocus=DTHT_GOTFOCUS; ReleaseDC (hwnd, hdc); } if (infoPtr->select==DTHT_MCPOPUP) { POINT pt; pt.x=8; pt.y=infoPtr->rect.bottom+5; ClientToScreen (hwnd, &pt); infoPtr->hMonthCal=CreateWindowExA (0,"SysMonthCal32", 0, WS_POPUP | WS_BORDER, pt.x,pt.y,145,150, GetParent (hwnd), 0,0,0); TRACE ("dt:%x mc:%x mc parent:%x, desktop:%x, mcpp:%x\n", hwnd,infoPtr->hMonthCal, GetParent (infoPtr->hMonthCal), GetDesktopWindow (), GetParent (GetParent (infoPtr->hMonthCal))); SetFocus (hwnd); DATETIME_SendSimpleNotify (hwnd, DTN_DROPDOWN); return 0; } return 0; } static LRESULT DATETIME_Paint (HWND hwnd, WPARAM wParam) { HDC hdc; PAINTSTRUCT ps; hdc = wParam==0 ? BeginPaint (hwnd, &ps) : (HDC)wParam; DATETIME_Refresh (hwnd, hdc); if(!wParam) EndPaint (hwnd, &ps); return 0; } static LRESULT DATETIME_ParentNotify (HWND hwnd, WPARAM wParam, LPARAM lParam) { DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd); LPNMHDR lpnmh=(LPNMHDR) lParam; TRACE ("%x,%lx\n",wParam, lParam); TRACE ("Got notification %x from %x\n", lpnmh->code, lpnmh->hwndFrom); TRACE ("info: %x %x %x\n",hwnd,infoPtr->hMonthCal,infoPtr->hUpdown); return 0; } static LRESULT DATETIME_Notify (HWND hwnd, WPARAM wParam, LPARAM lParam) { DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd); LPNMHDR lpnmh=(LPNMHDR) lParam; TRACE ("%x,%lx\n",wParam, lParam); TRACE ("Got notification %x from %x\n", lpnmh->code, lpnmh->hwndFrom); TRACE ("info: %x %x %x\n",hwnd,infoPtr->hMonthCal,infoPtr->hUpdown); return 0; } static LRESULT DATETIME_KeyDown (HWND hwnd, WPARAM wParam, LPARAM lParam) { DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd); HDC hdc; int FieldNum,wrap=0; TRACE("%x %lx %x\n",wParam, lParam, infoPtr->select); FieldNum=infoPtr->select & DTHT_DATEFIELD; if (!(infoPtr->haveFocus)) return 0; if ((FieldNum==0) && (infoPtr->select)) return 0; if (infoPtr->select & FORMATCALLMASK) { FIXME ("Callbacks not implemented yet\n"); } switch (wParam) { case VK_ADD: case VK_UP: DATETIME_IncreaseField (infoPtr,FieldNum); DATETIME_SendDateTimeChangeNotify (hwnd); break; case VK_SUBTRACT: case VK_DOWN: DATETIME_DecreaseField (infoPtr,FieldNum); DATETIME_SendDateTimeChangeNotify (hwnd); break; case VK_HOME: DATETIME_ResetFieldDown (infoPtr,FieldNum); DATETIME_SendDateTimeChangeNotify (hwnd); break; case VK_END: DATETIME_ResetFieldUp(infoPtr,FieldNum); DATETIME_SendDateTimeChangeNotify (hwnd); break; case VK_LEFT: do { if (infoPtr->select==0) { infoPtr->select=infoPtr->nrFields-1; wrap++; } else infoPtr->select--; } while ((infoPtr->fieldspec[infoPtr->select] & DT_STRING) && (wrap<2)); break; case VK_RIGHT: do { infoPtr->select++; if (infoPtr->select==infoPtr->nrFields) { infoPtr->select=0; wrap++; } } while ((infoPtr->fieldspec[infoPtr->select] & DT_STRING) && (wrap<2)); break; } hdc = GetDC (hwnd); DATETIME_Refresh (hwnd, hdc); ReleaseDC (hwnd, hdc); return 0; } static LRESULT DATETIME_KillFocus (HWND hwnd, WPARAM wParam, LPARAM lParam) { DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd); HDC hdc; TRACE ("\n"); if (infoPtr->haveFocus) { DATETIME_SendSimpleNotify (hwnd, NM_KILLFOCUS); infoPtr->haveFocus = 0; } hdc = GetDC (hwnd); DATETIME_Refresh (hwnd, hdc); ReleaseDC (hwnd, hdc); InvalidateRect (hwnd, NULL, TRUE); return 0; } static LRESULT DATETIME_SetFocus (HWND hwnd, WPARAM wParam, LPARAM lParam) { DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd); HDC hdc; TRACE ("\n"); if (infoPtr->haveFocus==0) { DATETIME_SendSimpleNotify (hwnd, NM_SETFOCUS); infoPtr->haveFocus=DTHT_GOTFOCUS; } hdc = GetDC (hwnd); DATETIME_Refresh (hwnd, hdc); ReleaseDC (hwnd, hdc); return 0; } static BOOL DATETIME_SendDateTimeChangeNotify (HWND hwnd) { DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd); NMDATETIMECHANGE dtdtc; TRACE ("\n"); dtdtc.nmhdr.hwndFrom = hwnd; dtdtc.nmhdr.idFrom = GetWindowLongA( hwnd, GWL_ID); dtdtc.nmhdr.code = DTN_DATETIMECHANGE; if ((GetWindowLongA (hwnd, GWL_STYLE) & DTS_SHOWNONE)) dtdtc.dwFlags = GDT_NONE; else dtdtc.dwFlags = GDT_VALID; MONTHCAL_CopyTime (&infoPtr->date, &dtdtc.st); return (BOOL) SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM)dtdtc.nmhdr.idFrom, (LPARAM)&dtdtc); } static BOOL DATETIME_SendSimpleNotify (HWND hwnd, UINT code) { NMHDR nmhdr; TRACE("%x\n",code); nmhdr.hwndFrom = hwnd; nmhdr.idFrom = GetWindowLongA( hwnd, GWL_ID); nmhdr.code = code; return (BOOL) SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM)nmhdr.idFrom, (LPARAM)&nmhdr); } static LRESULT DATETIME_Create (HWND hwnd, WPARAM wParam, LPARAM lParam) { DATETIME_INFO *infoPtr; DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); /* allocate memory for info structure */ infoPtr = (DATETIME_INFO *)COMCTL32_Alloc (sizeof(DATETIME_INFO)); if (infoPtr == NULL) { ERR("could not allocate info memory!\n"); return 0; } SetWindowLongA (hwnd, 0, (DWORD)infoPtr); if (dwStyle & DTS_SHOWNONE) { infoPtr->hwndCheckbut=CreateWindowExA (0,"button", 0, WS_CHILD | WS_VISIBLE | BS_AUTOCHECKBOX, 2,2,13,13, hwnd, 0, GetWindowLongA (hwnd, GWL_HINSTANCE), 0); SendMessageA (infoPtr->hwndCheckbut, BM_SETCHECK, 1, 0); } if (dwStyle & DTS_UPDOWN) { infoPtr->hUpdown=CreateUpDownControl ( WS_CHILD | WS_BORDER | WS_VISIBLE, 120,1,20,20, hwnd,1,0,0, UD_MAXVAL, UD_MINVAL, 0); } infoPtr->fieldspec=(int *) COMCTL32_Alloc (32*sizeof(int)); infoPtr->fieldRect=(RECT *) COMCTL32_Alloc (32*sizeof(RECT)); infoPtr->buflen=(int *) COMCTL32_Alloc (32*sizeof(int)); infoPtr->nrFieldsAllocated=32; DATETIME_SetFormat (hwnd, 0, 0); /* initialize info structure */ infoPtr->hMonthCal=0; GetSystemTime (&infoPtr->date); infoPtr->dateValid = TRUE; infoPtr->hFont = GetStockObject(DEFAULT_GUI_FONT); return 0; } static LRESULT DATETIME_Destroy (HWND hwnd, WPARAM wParam, LPARAM lParam) { DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd); COMCTL32_Free (infoPtr); return 0; } static LRESULT WINAPI DATETIME_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { switch (uMsg) { case DTM_GETSYSTEMTIME: DATETIME_GetSystemTime (hwnd, wParam, lParam); case DTM_SETSYSTEMTIME: DATETIME_SetSystemTime (hwnd, wParam, lParam); case DTM_GETRANGE: FIXME("Unimplemented msg DTM_GETRANGE\n"); return 0; case DTM_SETRANGE: FIXME("Unimplemented msg DTM_SETRANGE\n"); return 1; case DTM_SETFORMATA: return DATETIME_SetFormat (hwnd, wParam, lParam); case DTM_SETFORMATW: return DATETIME_SetFormatW (hwnd, wParam, lParam); case DTM_SETMCCOLOR: return DATETIME_SetMonthCalColor (hwnd, wParam, lParam); case DTM_GETMCCOLOR: return DATETIME_GetMonthCalColor (hwnd, wParam); case DTM_GETMONTHCAL: return DATETIME_GetMonthCal (hwnd); case DTM_SETMCFONT: return DATETIME_SetMonthCalFont (hwnd, wParam, lParam); case DTM_GETMCFONT: return DATETIME_GetMonthCalFont (hwnd); case WM_PARENTNOTIFY: return DATETIME_ParentNotify (hwnd, wParam, lParam); case WM_NOTIFY: return DATETIME_Notify (hwnd, wParam, lParam); case WM_GETDLGCODE: return DLGC_WANTARROWS | DLGC_WANTCHARS; case WM_PAINT: return DATETIME_Paint (hwnd, wParam); case WM_KEYDOWN: return DATETIME_KeyDown (hwnd, wParam, lParam); case WM_KILLFOCUS: return DATETIME_KillFocus (hwnd, wParam, lParam); case WM_SETFOCUS: return DATETIME_SetFocus (hwnd, wParam, lParam); case WM_LBUTTONDOWN: return DATETIME_LButtonDown (hwnd, wParam, lParam); case WM_CREATE: return DATETIME_Create (hwnd, wParam, lParam); case WM_DESTROY: return DATETIME_Destroy (hwnd, wParam, lParam); default: if (uMsg >= WM_USER) ERR("unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); return DefWindowProcA (hwnd, uMsg, wParam, lParam); } return 0; } VOID DATETIME_Register (void) { WNDCLASSA wndClass; ZeroMemory (&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS; wndClass.lpfnWndProc = (WNDPROC)DATETIME_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(DATETIME_INFO *); wndClass.hCursor = LoadCursorA (0, IDC_ARROWA); wndClass.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1); wndClass.lpszClassName = DATETIMEPICK_CLASSA; RegisterClassA (&wndClass); } VOID DATETIME_Unregister (void) { UnregisterClassA (DATETIMEPICK_CLASSA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/draglist.c0100644000175000001440000000404207066752014017012 0ustar julliardusers/* * Drag List control * * Copyright 1999 Eric Kohl * * NOTES * This is just a dummy control. An author is needed! Any volunteers? * I will only improve this control once in a while. * Eric * * TODO: * - Everything. */ #include "commctrl.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(commctrl) static DWORD dwLastScrollTime = 0; /*********************************************************************** * MakeDragList */ BOOL WINAPI MakeDragList (HWND hwndLB) { FIXME("(0x%x)\n", hwndLB); return FALSE; } /*********************************************************************** * DrawInsert */ VOID WINAPI DrawInsert (HWND hwndParent, HWND hwndLB, INT nItem) { FIXME("(0x%x 0x%x %d)\n", hwndParent, hwndLB, nItem); } /*********************************************************************** * LBItemFromPt */ INT WINAPI LBItemFromPt (HWND hwndLB, POINT pt, BOOL bAutoScroll) { RECT rcClient; INT nIndex; DWORD dwScrollTime; FIXME("(0x%x %ld x %ld %s)\n", hwndLB, pt.x, pt.y, bAutoScroll ? "TRUE" : "FALSE"); ScreenToClient (hwndLB, &pt); GetClientRect (hwndLB, &rcClient); nIndex = (INT)SendMessageA (hwndLB, LB_GETTOPINDEX, 0, 0); if (PtInRect (&rcClient, pt)) { /* point is inside -- get the item index */ while (TRUE) { if (SendMessageA (hwndLB, LB_GETITEMRECT, nIndex, (LPARAM)&rcClient) == LB_ERR) return -1; if (PtInRect (&rcClient, pt)) return nIndex; nIndex++; } } else { /* point is outside */ if (!bAutoScroll) return -1; if ((pt.x > rcClient.right) || (pt.x < rcClient.left)) return -1; if (pt.y < 0) nIndex--; else nIndex++; dwScrollTime = GetTickCount (); if ((dwScrollTime - dwLastScrollTime) < 200) return -1; dwLastScrollTime = dwScrollTime; SendMessageA (hwndLB, LB_SETTOPINDEX, (WPARAM)nIndex, 0); } return -1; } #if 0 static LRESULT CALLBACK DRAGLIST_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { return FALSE; } #endif wine-20000526/dlls/comctl32/flatsb.c0100644000175000001440000001324107113042020016433 0ustar julliardusers/* * Flat Scrollbar control * * Copyright 1998, 1999 Eric Kohl * Copyright 1998 Alex Priem * * NOTES * This is just a dummy control. An author is needed! Any volunteers? * I will only improve this control once in a while. * Eric * * TODO: * - All messages. * - All notifications. * */ #include "winbase.h" #include "winerror.h" #include "commctrl.h" #include "flatsb.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(commctrl) #define FlatSB_GetInfoPtr(hwnd) ((FLATSB_INFO*)GetWindowLongA (hwnd, 0)) /*********************************************************************** * InitializeFlatSB * * returns nonzero if successful, zero otherwise * */ BOOL WINAPI InitializeFlatSB(HWND hwnd) { TRACE("[%04x]\n", hwnd); FIXME("stub\n"); return FALSE; } /*********************************************************************** * UninitializeFlatSB * * returns: * E_FAIL if one of the scroll bars is currently in use * S_FALSE if InitializeFlatSB was never called on this hwnd * S_OK otherwise * */ HRESULT WINAPI UninitializeFlatSB(HWND hwnd) { TRACE("[%04x]\n", hwnd); FIXME("stub\n"); return S_FALSE; } /*********************************************************************** * FlatSB_GetScrollProp * * Returns nonzero if successful, or zero otherwise. If index is WSB_PROP_HSTYLE, * the return is nonzero if InitializeFlatSB has been called for this window, or * zero otherwise. * */ BOOL WINAPI FlatSB_GetScrollProp(HWND hwnd, INT propIndex, LPINT prop) { TRACE("[%04x] propIndex=%d\n", hwnd, propIndex); FIXME("stub\n"); return FALSE; } /*********************************************************************** * FlatSB_SetScrollProp */ BOOL WINAPI FlatSB_SetScrollProp(HWND hwnd, UINT index, INT newValue, BOOL flag) { TRACE("[%04x] index=%u newValue=%d flag=%d\n", hwnd, index, newValue, flag); FIXME("stub\n"); return FALSE; } /*********************************************************************** * From the Microsoft docs: * "If flat scroll bars haven't been initialized for the * window, the flat scroll bar APIs will defer to the corresponding * standard APIs. This allows the developer to turn flat scroll * bars on and off without having to write conditional code." * * So, if we just call the standard functions until we implement * the flat scroll bar functions, flat scroll bars will show up and * behave properly, as though they had simply not been setup to * have flat properties. * * Susan * */ /*********************************************************************** * FlatSB_EnableScrollBar */ BOOL WINAPI FlatSB_EnableScrollBar(HWND hwnd, int nBar, UINT flags) { return EnableScrollBar(hwnd, nBar, flags); } /*********************************************************************** * FlatSB_ShowScrollBar */ BOOL WINAPI FlatSB_ShowScrollBar(HWND hwnd, int nBar, BOOL fShow) { return ShowScrollBar(hwnd, nBar, fShow); } /*********************************************************************** * FlatSB_GetScrollRange */ BOOL WINAPI FlatSB_GetScrollRange(HWND hwnd, int nBar, LPINT min, LPINT max) { return GetScrollRange(hwnd, nBar, min, max); } /*********************************************************************** * FlatSB_GetScrollInfo */ BOOL WINAPI FlatSB_GetScrollInfo(HWND hwnd, int nBar, LPSCROLLINFO info) { return GetScrollInfo(hwnd, nBar, info); } /*********************************************************************** * FlatSB_GetScrollPos */ INT WINAPI FlatSB_GetScrollPos(HWND hwnd, int nBar) { return GetScrollPos(hwnd, nBar); } /*********************************************************************** * FlatSB_SetScrollPos */ INT WINAPI FlatSB_SetScrollPos(HWND hwnd, int nBar, INT pos, BOOL bRedraw) { return SetScrollPos(hwnd, nBar, pos, bRedraw); } /*********************************************************************** * FlatSB_SetScrollInfo */ INT WINAPI FlatSB_SetScrollInfo(HWND hwnd, int nBar, LPSCROLLINFO info, BOOL bRedraw) { return SetScrollInfo(hwnd, nBar, info, bRedraw); } /*********************************************************************** * FlatSB_SetScrollRange */ INT WINAPI FlatSB_SetScrollRange(HWND hwnd, int nBar, INT min, INT max, BOOL bRedraw) { return SetScrollRange(hwnd, nBar, min, max, bRedraw); } static LRESULT FlatSB_Create (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACE("[%04x] wParam=%04x lParam=%08lx\n", hwnd, wParam, lParam); return 0; } static LRESULT FlatSB_Destroy (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACE("[%04x] wParam=%04x lParam=%08lx\n", hwnd, wParam, lParam); return 0; } static LRESULT WINAPI FlatSB_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { switch (uMsg) { case WM_CREATE: return FlatSB_Create (hwnd, wParam, lParam); case WM_DESTROY: return FlatSB_Destroy (hwnd, wParam, lParam); default: if (uMsg >= WM_USER) ERR("unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); return DefWindowProcA (hwnd, uMsg, wParam, lParam); } return 0; } VOID FLATSB_Register (void) { WNDCLASSA wndClass; ZeroMemory (&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS; wndClass.lpfnWndProc = (WNDPROC)FlatSB_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(FLATSB_INFO *); wndClass.hCursor = LoadCursorA (0, IDC_ARROWA); wndClass.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1); wndClass.lpszClassName = FLATSB_CLASSA; RegisterClassA (&wndClass); } VOID FLATSB_Unregister (void) { UnregisterClassA (FLATSB_CLASSA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/header.c0100644000175000001440000011407207106136275016436 0ustar julliardusers/* * Header control * * Copyright 1998 Eric Kohl * * TODO: * - Imagelist support (partially). * - Callback items (under construction). * - Order list support. * - Control specific cursors (over dividers). * - Hottrack support (partially). * - Custom draw support (including Notifications). * - Drag and Drop support (including Notifications). * - Unicode support. * * FIXME: * - Replace DrawText32A by DrawTextEx32A(...|DT_ENDELLIPSIS) in * HEADER_DrawItem. * - Little flaw when drawing a bitmap on the right side of the text. */ #include #include "winbase.h" #include "commctrl.h" #include "header.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(header) #define VERT_BORDER 4 #define DIVIDER_WIDTH 10 #define HEADER_GetInfoPtr(hwnd) ((HEADER_INFO *)GetWindowLongA(hwnd,0)) static void HEADER_SetItemBounds (HWND hwnd) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); HEADER_ITEM *phdi; RECT rect; int i, x; infoPtr->bRectsValid = TRUE; if (infoPtr->uNumItem == 0) return; GetClientRect (hwnd, &rect); x = rect.left; for (i = 0; i < infoPtr->uNumItem; i++) { phdi = &infoPtr->items[i]; phdi->rect.top = rect.top; phdi->rect.bottom = rect.bottom; phdi->rect.left = x; phdi->rect.right = phdi->rect.left + phdi->cxy; x = phdi->rect.right; } } static LRESULT HEADER_Size (HWND hwnd, WPARAM wParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); infoPtr->bRectsValid = FALSE; return 0; } static INT HEADER_DrawItem (HWND hwnd, HDC hdc, INT iItem, BOOL bHotTrack) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); HEADER_ITEM *phdi = &infoPtr->items[iItem]; RECT r; INT oldBkMode; if (!infoPtr->bRectsValid) HEADER_SetItemBounds(hwnd); r = phdi->rect; if (r.right - r.left == 0) return phdi->rect.right; if (GetWindowLongA (hwnd, GWL_STYLE) & HDS_BUTTONS) { if (phdi->bDown) { DrawEdge (hdc, &r, BDR_RAISEDOUTER, BF_RECT | BF_FLAT | BF_MIDDLE | BF_ADJUST); r.left += 2; r.top += 2; } else DrawEdge (hdc, &r, EDGE_RAISED, BF_RECT | BF_SOFT | BF_MIDDLE | BF_ADJUST); } else DrawEdge (hdc, &r, EDGE_ETCHED, BF_BOTTOM | BF_RIGHT | BF_ADJUST); if (phdi->fmt & HDF_OWNERDRAW) { DRAWITEMSTRUCT dis; dis.CtlType = ODT_HEADER; dis.CtlID = GetWindowLongA (hwnd, GWL_ID); dis.itemID = iItem; dis.itemAction = ODA_DRAWENTIRE; dis.itemState = phdi->bDown ? ODS_SELECTED : 0; dis.hwndItem = hwnd; dis.hDC = hdc; dis.rcItem = r; dis.itemData = phdi->lParam; SendMessageA (GetParent (hwnd), WM_DRAWITEM, (WPARAM)dis.CtlID, (LPARAM)&dis); } else { UINT uTextJustify = DT_LEFT; if ((phdi->fmt & HDF_JUSTIFYMASK) == HDF_CENTER) uTextJustify = DT_CENTER; else if ((phdi->fmt & HDF_JUSTIFYMASK) == HDF_RIGHT) uTextJustify = DT_RIGHT; if ((phdi->fmt & HDF_BITMAP) && (phdi->hbm)) { BITMAP bmp; HDC hdcBitmap; INT yD, yS, cx, cy, rx, ry; GetObjectA (phdi->hbm, sizeof(BITMAP), (LPVOID)&bmp); ry = r.bottom - r.top; rx = r.right - r.left; if (ry >= bmp.bmHeight) { cy = bmp.bmHeight; yD = r.top + (ry - bmp.bmHeight) / 2; yS = 0; } else { cy = ry; yD = r.top; yS = (bmp.bmHeight - ry) / 2; } if (rx >= bmp.bmWidth + 6) { cx = bmp.bmWidth; } else { cx = rx - 6; } hdcBitmap = CreateCompatibleDC (hdc); SelectObject (hdcBitmap, phdi->hbm); BitBlt (hdc, r.left + 3, yD, cx, cy, hdcBitmap, 0, yS, SRCCOPY); DeleteDC (hdcBitmap); r.left += (bmp.bmWidth + 3); } if ((phdi->fmt & HDF_BITMAP_ON_RIGHT) && (phdi->hbm)) { BITMAP bmp; HDC hdcBitmap; INT xD, yD, yS, cx, cy, rx, ry, tx; RECT textRect; GetObjectA (phdi->hbm, sizeof(BITMAP), (LPVOID)&bmp); textRect = r; DrawTextW (hdc, phdi->pszText, lstrlenW (phdi->pszText), &textRect, DT_LEFT|DT_VCENTER|DT_SINGLELINE|DT_CALCRECT); tx = textRect.right - textRect.left; ry = r.bottom - r.top; rx = r.right - r.left; if (ry >= bmp.bmHeight) { cy = bmp.bmHeight; yD = r.top + (ry - bmp.bmHeight) / 2; yS = 0; } else { cy = ry; yD = r.top; yS = (bmp.bmHeight - ry) / 2; } if (r.left + tx + bmp.bmWidth + 9 <= r.right) { cx = bmp.bmWidth; xD = r.left + tx + 6; } else { if (rx >= bmp.bmWidth + 6) { cx = bmp.bmWidth; xD = r.right - bmp.bmWidth - 3; r.right = xD - 3; } else { cx = rx - 3; xD = r.left; r.right = r.left; } } hdcBitmap = CreateCompatibleDC (hdc); SelectObject (hdcBitmap, phdi->hbm); BitBlt (hdc, xD, yD, cx, cy, hdcBitmap, 0, yS, SRCCOPY); DeleteDC (hdcBitmap); } if (phdi->fmt & HDF_IMAGE) { /* ImageList_Draw (infoPtr->himl, phdi->iImage,...); */ } if (((phdi->fmt & HDF_STRING) || (!(phdi->fmt & (HDF_OWNERDRAW|HDF_STRING|HDF_BITMAP| HDF_BITMAP_ON_RIGHT|HDF_IMAGE)))) /* no explicit format specified? */ && (phdi->pszText)) { oldBkMode = SetBkMode(hdc, TRANSPARENT); r.left += 3; r.right -= 3; SetTextColor (hdc, bHotTrack ? COLOR_HIGHLIGHT : COLOR_BTNTEXT); DrawTextW (hdc, phdi->pszText, lstrlenW (phdi->pszText), &r, uTextJustify|DT_VCENTER|DT_SINGLELINE); if (oldBkMode != TRANSPARENT) SetBkMode(hdc, oldBkMode); } } return phdi->rect.right; } static void HEADER_Refresh (HWND hwnd, HDC hdc) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); HFONT hFont, hOldFont; RECT rect; HBRUSH hbrBk; INT i, x; /* get rect for the bar, adjusted for the border */ GetClientRect (hwnd, &rect); hFont = infoPtr->hFont ? infoPtr->hFont : GetStockObject (SYSTEM_FONT); hOldFont = SelectObject (hdc, hFont); /* draw Background */ hbrBk = GetSysColorBrush(COLOR_3DFACE); FillRect(hdc, &rect, hbrBk); x = rect.left; for (i = 0; i < infoPtr->uNumItem; i++) { x = HEADER_DrawItem (hwnd, hdc, i, FALSE); } if ((x <= rect.right) && (infoPtr->uNumItem > 0)) { rect.left = x; if (GetWindowLongA (hwnd, GWL_STYLE) & HDS_BUTTONS) DrawEdge (hdc, &rect, EDGE_RAISED, BF_TOP|BF_LEFT|BF_BOTTOM|BF_SOFT); else DrawEdge (hdc, &rect, EDGE_ETCHED, BF_BOTTOM); } SelectObject (hdc, hOldFont); } static void HEADER_RefreshItem (HWND hwnd, HDC hdc, INT iItem) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); HFONT hFont, hOldFont; hFont = infoPtr->hFont ? infoPtr->hFont : GetStockObject (SYSTEM_FONT); hOldFont = SelectObject (hdc, hFont); HEADER_DrawItem (hwnd, hdc, iItem, FALSE); SelectObject (hdc, hOldFont); } static void HEADER_InternalHitTest (HWND hwnd, LPPOINT lpPt, UINT *pFlags, INT *pItem) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); RECT rect, rcTest; INT iCount, width; BOOL bNoWidth; GetClientRect (hwnd, &rect); *pFlags = 0; bNoWidth = FALSE; if (PtInRect (&rect, *lpPt)) { if (infoPtr->uNumItem == 0) { *pFlags |= HHT_NOWHERE; *pItem = 1; TRACE("NOWHERE\n"); return; } else { /* somewhere inside */ for (iCount = 0; iCount < infoPtr->uNumItem; iCount++) { rect = infoPtr->items[iCount].rect; width = rect.right - rect.left; if (width == 0) { bNoWidth = TRUE; continue; } if (PtInRect (&rect, *lpPt)) { if (width <= 2 * DIVIDER_WIDTH) { *pFlags |= HHT_ONHEADER; *pItem = iCount; TRACE("ON HEADER %d\n", iCount); return; } if (iCount > 0) { rcTest = rect; rcTest.right = rcTest.left + DIVIDER_WIDTH; if (PtInRect (&rcTest, *lpPt)) { if (bNoWidth) { *pFlags |= HHT_ONDIVOPEN; *pItem = iCount - 1; TRACE("ON DIVOPEN %d\n", *pItem); return; } else { *pFlags |= HHT_ONDIVIDER; *pItem = iCount - 1; TRACE("ON DIVIDER %d\n", *pItem); return; } } } rcTest = rect; rcTest.left = rcTest.right - DIVIDER_WIDTH; if (PtInRect (&rcTest, *lpPt)) { *pFlags |= HHT_ONDIVIDER; *pItem = iCount; TRACE("ON DIVIDER %d\n", *pItem); return; } *pFlags |= HHT_ONHEADER; *pItem = iCount; TRACE("ON HEADER %d\n", iCount); return; } } /* check for last divider part (on nowhere) */ rect = infoPtr->items[infoPtr->uNumItem-1].rect; rect.left = rect.right; rect.right += DIVIDER_WIDTH; if (PtInRect (&rect, *lpPt)) { if (bNoWidth) { *pFlags |= HHT_ONDIVOPEN; *pItem = infoPtr->uNumItem - 1; TRACE("ON DIVOPEN %d\n", *pItem); return; } else { *pFlags |= HHT_ONDIVIDER; *pItem = infoPtr->uNumItem-1; TRACE("ON DIVIDER %d\n", *pItem); return; } } *pFlags |= HHT_NOWHERE; *pItem = 1; TRACE("NOWHERE\n"); return; } } else { if (lpPt->x < rect.left) { TRACE("TO LEFT\n"); *pFlags |= HHT_TOLEFT; } else if (lpPt->x > rect.right) { TRACE("TO RIGHT\n"); *pFlags |= HHT_TORIGHT; } if (lpPt->y < rect.top) { TRACE("ABOVE\n"); *pFlags |= HHT_ABOVE; } else if (lpPt->y > rect.bottom) { TRACE("BELOW\n"); *pFlags |= HHT_BELOW; } } *pItem = 1; TRACE("flags=0x%X\n", *pFlags); return; } static void HEADER_DrawTrackLine (HWND hwnd, HDC hdc, INT x) { RECT rect; HPEN hOldPen; INT oldRop; GetClientRect (hwnd, &rect); hOldPen = SelectObject (hdc, GetStockObject (BLACK_PEN)); oldRop = SetROP2 (hdc, R2_XORPEN); MoveToEx (hdc, x, rect.top, NULL); LineTo (hdc, x, rect.bottom); SetROP2 (hdc, oldRop); SelectObject (hdc, hOldPen); } static BOOL HEADER_SendSimpleNotify (HWND hwnd, UINT code) { NMHDR nmhdr; nmhdr.hwndFrom = hwnd; nmhdr.idFrom = GetWindowLongA (hwnd, GWL_ID); nmhdr.code = code; return (BOOL)SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM)nmhdr.idFrom, (LPARAM)&nmhdr); } static BOOL HEADER_SendHeaderNotify (HWND hwnd, UINT code, INT iItem) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); NMHEADERA nmhdr; HDITEMA nmitem; nmhdr.hdr.hwndFrom = hwnd; nmhdr.hdr.idFrom = GetWindowLongA (hwnd, GWL_ID); nmhdr.hdr.code = code; nmhdr.iItem = iItem; nmhdr.iButton = 0; nmhdr.pitem = &nmitem; nmitem.mask = 0; nmitem.cxy = infoPtr->items[iItem].cxy; nmitem.hbm = infoPtr->items[iItem].hbm; nmitem.pszText = NULL; nmitem.cchTextMax = 0; /* nmitem.pszText = infoPtr->items[iItem].pszText; */ /* nmitem.cchTextMax = infoPtr->items[iItem].cchTextMax; */ nmitem.fmt = infoPtr->items[iItem].fmt; nmitem.lParam = infoPtr->items[iItem].lParam; nmitem.iOrder = infoPtr->items[iItem].iOrder; nmitem.iImage = infoPtr->items[iItem].iImage; return (BOOL)SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM)nmhdr.hdr.idFrom, (LPARAM)&nmhdr); } static BOOL HEADER_SendClickNotify (HWND hwnd, UINT code, INT iItem) { NMHEADERA nmhdr; nmhdr.hdr.hwndFrom = hwnd; nmhdr.hdr.idFrom = GetWindowLongA (hwnd, GWL_ID); nmhdr.hdr.code = code; nmhdr.iItem = iItem; nmhdr.iButton = 0; nmhdr.pitem = NULL; return (BOOL)SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM)nmhdr.hdr.idFrom, (LPARAM)&nmhdr); } static LRESULT HEADER_CreateDragImage (HWND hwnd, WPARAM wParam) { FIXME("empty stub!\n"); return 0; } static LRESULT HEADER_DeleteItem (HWND hwnd, WPARAM wParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr(hwnd); INT iItem = (INT)wParam; HDC hdc; TRACE("[iItem=%d]\n", iItem); if ((iItem < 0) || (iItem >= (INT)infoPtr->uNumItem)) return FALSE; if (infoPtr->uNumItem == 1) { TRACE("Simple delete!\n"); if (infoPtr->items[0].pszText) COMCTL32_Free (infoPtr->items[0].pszText); COMCTL32_Free (infoPtr->items); infoPtr->items = 0; infoPtr->uNumItem = 0; } else { HEADER_ITEM *oldItems = infoPtr->items; TRACE("Complex delete! [iItem=%d]\n", iItem); if (infoPtr->items[iItem].pszText) COMCTL32_Free (infoPtr->items[iItem].pszText); infoPtr->uNumItem--; infoPtr->items = COMCTL32_Alloc (sizeof (HEADER_ITEM) * infoPtr->uNumItem); /* pre delete copy */ if (iItem > 0) { memcpy (&infoPtr->items[0], &oldItems[0], iItem * sizeof(HEADER_ITEM)); } /* post delete copy */ if (iItem < infoPtr->uNumItem) { memcpy (&infoPtr->items[iItem], &oldItems[iItem+1], (infoPtr->uNumItem - iItem) * sizeof(HEADER_ITEM)); } COMCTL32_Free (oldItems); } HEADER_SetItemBounds (hwnd); hdc = GetDC (hwnd); HEADER_Refresh (hwnd, hdc); ReleaseDC (hwnd, hdc); return TRUE; } static LRESULT HEADER_GetImageList (HWND hwnd) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); return (LRESULT)infoPtr->himl; } static LRESULT HEADER_GetItemA (HWND hwnd, WPARAM wParam, LPARAM lParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); HDITEMA *phdi = (HDITEMA*)lParam; INT nItem = (INT)wParam; HEADER_ITEM *lpItem; if (!phdi) return FALSE; if ((nItem < 0) || (nItem >= (INT)infoPtr->uNumItem)) return FALSE; TRACE("[nItem=%d]\n", nItem); if (phdi->mask == 0) return TRUE; lpItem = (HEADER_ITEM*)&infoPtr->items[nItem]; if (phdi->mask & HDI_BITMAP) phdi->hbm = lpItem->hbm; if (phdi->mask & HDI_FORMAT) phdi->fmt = lpItem->fmt; if (phdi->mask & HDI_WIDTH) phdi->cxy = lpItem->cxy; if (phdi->mask & HDI_LPARAM) phdi->lParam = lpItem->lParam; if (phdi->mask & HDI_TEXT) { if (lpItem->pszText != LPSTR_TEXTCALLBACKW) lstrcpynWtoA (phdi->pszText, lpItem->pszText, phdi->cchTextMax); else phdi->pszText = LPSTR_TEXTCALLBACKA; } if (phdi->mask & HDI_IMAGE) phdi->iImage = lpItem->iImage; if (phdi->mask & HDI_ORDER) phdi->iOrder = lpItem->iOrder; return TRUE; } static LRESULT HEADER_GetItemW (HWND hwnd, WPARAM wParam, LPARAM lParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); HDITEMW *phdi = (HDITEMW*)lParam; INT nItem = (INT)wParam; HEADER_ITEM *lpItem; if (!phdi) return FALSE; if ((nItem < 0) || (nItem >= (INT)infoPtr->uNumItem)) return FALSE; TRACE("[nItem=%d]\n", nItem); if (phdi->mask == 0) return TRUE; lpItem = (HEADER_ITEM*)&infoPtr->items[nItem]; if (phdi->mask & HDI_BITMAP) phdi->hbm = lpItem->hbm; if (phdi->mask & HDI_FORMAT) phdi->fmt = lpItem->fmt; if (phdi->mask & HDI_WIDTH) phdi->cxy = lpItem->cxy; if (phdi->mask & HDI_LPARAM) phdi->lParam = lpItem->lParam; if (phdi->mask & HDI_TEXT) { if (lpItem->pszText != LPSTR_TEXTCALLBACKW) lstrcpynW (phdi->pszText, lpItem->pszText, phdi->cchTextMax); else phdi->pszText = LPSTR_TEXTCALLBACKW; } if (phdi->mask & HDI_IMAGE) phdi->iImage = lpItem->iImage; if (phdi->mask & HDI_ORDER) phdi->iOrder = lpItem->iOrder; return TRUE; } inline static LRESULT HEADER_GetItemCount (HWND hwnd) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); return infoPtr->uNumItem; } static LRESULT HEADER_GetItemRect (HWND hwnd, WPARAM wParam, LPARAM lParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); INT iItem = (INT)wParam; LPRECT lpRect = (LPRECT)lParam; if ((iItem < 0) || (iItem >= (INT)infoPtr->uNumItem)) return FALSE; lpRect->left = infoPtr->items[iItem].rect.left; lpRect->right = infoPtr->items[iItem].rect.right; lpRect->top = infoPtr->items[iItem].rect.top; lpRect->bottom = infoPtr->items[iItem].rect.bottom; return TRUE; } /* << HEADER_GetOrderArray >> */ inline static LRESULT HEADER_GetUnicodeFormat (HWND hwnd) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); return infoPtr->bUnicode; } static LRESULT HEADER_HitTest (HWND hwnd, WPARAM wParam, LPARAM lParam) { LPHDHITTESTINFO phti = (LPHDHITTESTINFO)lParam; HEADER_InternalHitTest (hwnd, &phti->pt, &phti->flags, &phti->iItem); if (phti->flags == HHT_ONHEADER) return phti->iItem; else return -1; } static LRESULT HEADER_InsertItemA (HWND hwnd, WPARAM wParam, LPARAM lParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); HDITEMA *phdi = (HDITEMA*)lParam; INT nItem = (INT)wParam; HEADER_ITEM *lpItem; HDC hdc; INT len; if ((phdi == NULL) || (nItem < 0)) return -1; if (nItem > infoPtr->uNumItem) nItem = infoPtr->uNumItem; if (infoPtr->uNumItem == 0) { infoPtr->items = COMCTL32_Alloc (sizeof (HEADER_ITEM)); infoPtr->uNumItem++; } else { HEADER_ITEM *oldItems = infoPtr->items; infoPtr->uNumItem++; infoPtr->items = COMCTL32_Alloc (sizeof (HEADER_ITEM) * infoPtr->uNumItem); if (nItem == 0) { memcpy (&infoPtr->items[1], &oldItems[0], (infoPtr->uNumItem-1) * sizeof(HEADER_ITEM)); } else { /* pre insert copy */ if (nItem > 0) { memcpy (&infoPtr->items[0], &oldItems[0], nItem * sizeof(HEADER_ITEM)); } /* post insert copy */ if (nItem < infoPtr->uNumItem - 1) { memcpy (&infoPtr->items[nItem+1], &oldItems[nItem], (infoPtr->uNumItem - nItem - 1) * sizeof(HEADER_ITEM)); } } COMCTL32_Free (oldItems); } lpItem = (HEADER_ITEM*)&infoPtr->items[nItem]; lpItem->bDown = FALSE; if (phdi->mask & HDI_WIDTH) lpItem->cxy = phdi->cxy; if (phdi->mask & HDI_TEXT) { if (!phdi->pszText) /* null pointer check */ phdi->pszText = ""; if (phdi->pszText != LPSTR_TEXTCALLBACKA) { len = lstrlenA (phdi->pszText); lpItem->pszText = COMCTL32_Alloc ((len+1)*sizeof(WCHAR)); lstrcpyAtoW (lpItem->pszText, phdi->pszText); } else lpItem->pszText = LPSTR_TEXTCALLBACKW; } if (phdi->mask & HDI_FORMAT) lpItem->fmt = phdi->fmt; if (lpItem->fmt == 0) lpItem->fmt = HDF_LEFT; if (phdi->mask & HDI_BITMAP) lpItem->hbm = phdi->hbm; if (phdi->mask & HDI_LPARAM) lpItem->lParam = phdi->lParam; if (phdi->mask & HDI_IMAGE) lpItem->iImage = phdi->iImage; if (phdi->mask & HDI_ORDER) lpItem->iOrder = phdi->iOrder; HEADER_SetItemBounds (hwnd); hdc = GetDC (hwnd); HEADER_Refresh (hwnd, hdc); ReleaseDC (hwnd, hdc); return nItem; } static LRESULT HEADER_InsertItemW (HWND hwnd, WPARAM wParam, LPARAM lParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); HDITEMW *phdi = (HDITEMW*)lParam; INT nItem = (INT)wParam; HEADER_ITEM *lpItem; HDC hdc; INT len; if ((phdi == NULL) || (nItem < 0)) return -1; if (nItem > infoPtr->uNumItem) nItem = infoPtr->uNumItem; if (infoPtr->uNumItem == 0) { infoPtr->items = COMCTL32_Alloc (sizeof (HEADER_ITEM)); infoPtr->uNumItem++; } else { HEADER_ITEM *oldItems = infoPtr->items; infoPtr->uNumItem++; infoPtr->items = COMCTL32_Alloc (sizeof (HEADER_ITEM) * infoPtr->uNumItem); /* pre insert copy */ if (nItem > 0) { memcpy (&infoPtr->items[0], &oldItems[0], nItem * sizeof(HEADER_ITEM)); } /* post insert copy */ if (nItem < infoPtr->uNumItem - 1) { memcpy (&infoPtr->items[nItem+1], &oldItems[nItem], (infoPtr->uNumItem - nItem) * sizeof(HEADER_ITEM)); } COMCTL32_Free (oldItems); } lpItem = (HEADER_ITEM*)&infoPtr->items[nItem]; lpItem->bDown = FALSE; if (phdi->mask & HDI_WIDTH) lpItem->cxy = phdi->cxy; if (phdi->mask & HDI_TEXT) { WCHAR wide_null_char = 0; if (!phdi->pszText) /* null pointer check */ phdi->pszText = &wide_null_char; if (phdi->pszText != LPSTR_TEXTCALLBACKW) { len = lstrlenW (phdi->pszText); lpItem->pszText = COMCTL32_Alloc ((len+1)*sizeof(WCHAR)); lstrcpyW (lpItem->pszText, phdi->pszText); } else lpItem->pszText = LPSTR_TEXTCALLBACKW; } if (phdi->mask & HDI_FORMAT) lpItem->fmt = phdi->fmt; if (lpItem->fmt == 0) lpItem->fmt = HDF_LEFT; if (phdi->mask & HDI_BITMAP) lpItem->hbm = phdi->hbm; if (phdi->mask & HDI_LPARAM) lpItem->lParam = phdi->lParam; if (phdi->mask & HDI_IMAGE) lpItem->iImage = phdi->iImage; if (phdi->mask & HDI_ORDER) lpItem->iOrder = phdi->iOrder; HEADER_SetItemBounds (hwnd); hdc = GetDC (hwnd); HEADER_Refresh (hwnd, hdc); ReleaseDC (hwnd, hdc); return nItem; } static LRESULT HEADER_Layout (HWND hwnd, WPARAM wParam, LPARAM lParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); LPHDLAYOUT lpLayout = (LPHDLAYOUT)lParam; lpLayout->pwpos->hwnd = hwnd; lpLayout->pwpos->hwndInsertAfter = 0; lpLayout->pwpos->x = lpLayout->prc->left; lpLayout->pwpos->y = lpLayout->prc->top; lpLayout->pwpos->cx = lpLayout->prc->right - lpLayout->prc->left; if (GetWindowLongA (hwnd, GWL_STYLE) & HDS_HIDDEN) lpLayout->pwpos->cy = 0; else { lpLayout->pwpos->cy = infoPtr->nHeight; lpLayout->prc->top += infoPtr->nHeight; } lpLayout->pwpos->flags = SWP_NOZORDER; TRACE("Layout x=%d y=%d cx=%d cy=%d\n", lpLayout->pwpos->x, lpLayout->pwpos->y, lpLayout->pwpos->cx, lpLayout->pwpos->cy); infoPtr->bRectsValid = FALSE; return TRUE; } static LRESULT HEADER_SetImageList (HWND hwnd, WPARAM wParam, LPARAM lParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); HIMAGELIST himlOld; himlOld = infoPtr->himl; infoPtr->himl = (HIMAGELIST)lParam; /* FIXME: Refresh needed??? */ return (LRESULT)himlOld; } static LRESULT HEADER_SetItemA (HWND hwnd, WPARAM wParam, LPARAM lParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); HDITEMA *phdi = (HDITEMA*)lParam; INT nItem = (INT)wParam; HEADER_ITEM *lpItem; HDC hdc; if (phdi == NULL) return FALSE; if ((nItem < 0) || (nItem >= (INT)infoPtr->uNumItem)) return FALSE; TRACE("[nItem=%d]\n", nItem); if (HEADER_SendHeaderNotify (hwnd, HDN_ITEMCHANGINGA, nItem)) return FALSE; lpItem = (HEADER_ITEM*)&infoPtr->items[nItem]; if (phdi->mask & HDI_BITMAP) lpItem->hbm = phdi->hbm; if (phdi->mask & HDI_FORMAT) lpItem->fmt = phdi->fmt; if (phdi->mask & HDI_LPARAM) lpItem->lParam = phdi->lParam; if (phdi->mask & HDI_TEXT) { if (phdi->pszText != LPSTR_TEXTCALLBACKA) { if (lpItem->pszText) { COMCTL32_Free (lpItem->pszText); lpItem->pszText = NULL; } if (phdi->pszText) { INT len = lstrlenA (phdi->pszText); lpItem->pszText = COMCTL32_Alloc ((len+1)*sizeof(WCHAR)); lstrcpyAtoW (lpItem->pszText, phdi->pszText); } } else lpItem->pszText = LPSTR_TEXTCALLBACKW; } if (phdi->mask & HDI_WIDTH) lpItem->cxy = phdi->cxy; if (phdi->mask & HDI_IMAGE) lpItem->iImage = phdi->iImage; if (phdi->mask & HDI_ORDER) lpItem->iOrder = phdi->iOrder; HEADER_SendHeaderNotify (hwnd, HDN_ITEMCHANGEDA, nItem); HEADER_SetItemBounds (hwnd); hdc = GetDC (hwnd); HEADER_Refresh (hwnd, hdc); ReleaseDC (hwnd, hdc); return TRUE; } static LRESULT HEADER_SetItemW (HWND hwnd, WPARAM wParam, LPARAM lParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); HDITEMW *phdi = (HDITEMW*)lParam; INT nItem = (INT)wParam; HEADER_ITEM *lpItem; HDC hdc; if (phdi == NULL) return FALSE; if ((nItem < 0) || (nItem >= (INT)infoPtr->uNumItem)) return FALSE; TRACE("[nItem=%d]\n", nItem); if (HEADER_SendHeaderNotify (hwnd, HDN_ITEMCHANGINGA, nItem)) return FALSE; lpItem = (HEADER_ITEM*)&infoPtr->items[nItem]; if (phdi->mask & HDI_BITMAP) lpItem->hbm = phdi->hbm; if (phdi->mask & HDI_FORMAT) lpItem->fmt = phdi->fmt; if (phdi->mask & HDI_LPARAM) lpItem->lParam = phdi->lParam; if (phdi->mask & HDI_TEXT) { if (phdi->pszText != LPSTR_TEXTCALLBACKW) { if (lpItem->pszText) { COMCTL32_Free (lpItem->pszText); lpItem->pszText = NULL; } if (phdi->pszText) { INT len = lstrlenW (phdi->pszText); lpItem->pszText = COMCTL32_Alloc ((len+1)*sizeof(WCHAR)); lstrcpyW (lpItem->pszText, phdi->pszText); } } else lpItem->pszText = LPSTR_TEXTCALLBACKW; } if (phdi->mask & HDI_WIDTH) lpItem->cxy = phdi->cxy; if (phdi->mask & HDI_IMAGE) lpItem->iImage = phdi->iImage; if (phdi->mask & HDI_ORDER) lpItem->iOrder = phdi->iOrder; HEADER_SendHeaderNotify (hwnd, HDN_ITEMCHANGEDA, nItem); HEADER_SetItemBounds (hwnd); hdc = GetDC (hwnd); HEADER_Refresh (hwnd, hdc); ReleaseDC (hwnd, hdc); return TRUE; } /* << HEADER_SetOrderArray >> */ inline static LRESULT HEADER_SetUnicodeFormat (HWND hwnd, WPARAM wParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); BOOL bTemp = infoPtr->bUnicode; infoPtr->bUnicode = (BOOL)wParam; return bTemp; } static LRESULT HEADER_Create (HWND hwnd, WPARAM wParam, LPARAM lParam) { HEADER_INFO *infoPtr; TEXTMETRICA tm; HFONT hOldFont; HDC hdc; infoPtr = (HEADER_INFO *)COMCTL32_Alloc (sizeof(HEADER_INFO)); SetWindowLongA (hwnd, 0, (DWORD)infoPtr); infoPtr->uNumItem = 0; infoPtr->nHeight = 20; infoPtr->hFont = 0; infoPtr->items = 0; infoPtr->bRectsValid = FALSE; infoPtr->hcurArrow = LoadCursorA (0, IDC_ARROWA); infoPtr->hcurDivider = LoadCursorA (0, IDC_SIZEWEA); infoPtr->hcurDivopen = LoadCursorA (0, IDC_SIZENSA); infoPtr->bPressed = FALSE; infoPtr->bTracking = FALSE; infoPtr->iMoveItem = 0; infoPtr->himl = 0; infoPtr->iHotItem = -1; infoPtr->bUnicode = IsWindowUnicode (hwnd); hdc = GetDC (0); hOldFont = SelectObject (hdc, GetStockObject (SYSTEM_FONT)); GetTextMetricsA (hdc, &tm); infoPtr->nHeight = tm.tmHeight + VERT_BORDER; SelectObject (hdc, hOldFont); ReleaseDC (0, hdc); return 0; } static LRESULT HEADER_Destroy (HWND hwnd, WPARAM wParam, LPARAM lParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); HEADER_ITEM *lpItem; INT nItem; if (infoPtr->items) { lpItem = (HEADER_ITEM*)infoPtr->items; for (nItem = 0; nItem < infoPtr->uNumItem; nItem++, lpItem++) { if ((lpItem->pszText) && (lpItem->pszText != LPSTR_TEXTCALLBACKW)) COMCTL32_Free (lpItem->pszText); } COMCTL32_Free (infoPtr->items); } if (infoPtr->himl) ImageList_Destroy (infoPtr->himl); COMCTL32_Free (infoPtr); SetWindowLongA (hwnd, 0, 0); return 0; } static inline LRESULT HEADER_GetFont (HWND hwnd) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); return (LRESULT)infoPtr->hFont; } static LRESULT HEADER_LButtonDblClk (HWND hwnd, WPARAM wParam, LPARAM lParam) { POINT pt; UINT flags; INT nItem; pt.x = (INT)LOWORD(lParam); pt.y = (INT)HIWORD(lParam); HEADER_InternalHitTest (hwnd, &pt, &flags, &nItem); if ((GetWindowLongA (hwnd, GWL_STYLE) & HDS_BUTTONS) && (flags == HHT_ONHEADER)) HEADER_SendHeaderNotify (hwnd, HDN_ITEMDBLCLICKA, nItem); else if ((flags == HHT_ONDIVIDER) || (flags == HHT_ONDIVOPEN)) HEADER_SendHeaderNotify (hwnd, HDN_DIVIDERDBLCLICKA, nItem); return 0; } static LRESULT HEADER_LButtonDown (HWND hwnd, WPARAM wParam, LPARAM lParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); POINT pt; UINT flags; INT nItem; HDC hdc; pt.x = (INT)LOWORD(lParam); pt.y = (INT)HIWORD(lParam); HEADER_InternalHitTest (hwnd, &pt, &flags, &nItem); if ((dwStyle & HDS_BUTTONS) && (flags == HHT_ONHEADER)) { SetCapture (hwnd); infoPtr->bCaptured = TRUE; infoPtr->bPressed = TRUE; infoPtr->iMoveItem = nItem; infoPtr->items[nItem].bDown = TRUE; /* Send WM_CUSTOMDRAW */ hdc = GetDC (hwnd); HEADER_RefreshItem (hwnd, hdc, nItem); ReleaseDC (hwnd, hdc); TRACE("Pressed item %d!\n", nItem); } else if ((flags == HHT_ONDIVIDER) || (flags == HHT_ONDIVOPEN)) { if (!(HEADER_SendHeaderNotify (hwnd, HDN_BEGINTRACKA, nItem))) { SetCapture (hwnd); infoPtr->bCaptured = TRUE; infoPtr->bTracking = TRUE; infoPtr->iMoveItem = nItem; infoPtr->nOldWidth = infoPtr->items[nItem].cxy; infoPtr->xTrackOffset = infoPtr->items[nItem].rect.right - pt.x; if (!(dwStyle & HDS_FULLDRAG)) { infoPtr->xOldTrack = infoPtr->items[nItem].rect.right; hdc = GetDC (hwnd); HEADER_DrawTrackLine (hwnd, hdc, infoPtr->xOldTrack); ReleaseDC (hwnd, hdc); } TRACE("Begin tracking item %d!\n", nItem); } } return 0; } static LRESULT HEADER_LButtonUp (HWND hwnd, WPARAM wParam, LPARAM lParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); POINT pt; UINT flags; INT nItem, nWidth; HDC hdc; pt.x = (INT)SLOWORD(lParam); pt.y = (INT)SHIWORD(lParam); HEADER_InternalHitTest (hwnd, &pt, &flags, &nItem); if (infoPtr->bPressed) { if ((nItem == infoPtr->iMoveItem) && (flags == HHT_ONHEADER)) { infoPtr->items[infoPtr->iMoveItem].bDown = FALSE; hdc = GetDC (hwnd); HEADER_RefreshItem (hwnd, hdc, infoPtr->iMoveItem); ReleaseDC (hwnd, hdc); HEADER_SendClickNotify (hwnd, HDN_ITEMCLICKA, infoPtr->iMoveItem); } TRACE("Released item %d!\n", infoPtr->iMoveItem); infoPtr->bPressed = FALSE; } else if (infoPtr->bTracking) { TRACE("End tracking item %d!\n", infoPtr->iMoveItem); infoPtr->bTracking = FALSE; HEADER_SendHeaderNotify (hwnd, HDN_ENDTRACKA, infoPtr->iMoveItem); if (!(dwStyle & HDS_FULLDRAG)) { hdc = GetDC (hwnd); HEADER_DrawTrackLine (hwnd, hdc, infoPtr->xOldTrack); ReleaseDC (hwnd, hdc); if (HEADER_SendHeaderNotify (hwnd, HDN_ITEMCHANGINGA, infoPtr->iMoveItem)) infoPtr->items[infoPtr->iMoveItem].cxy = infoPtr->nOldWidth; else { nWidth = pt.x - infoPtr->items[infoPtr->iMoveItem].rect.left + infoPtr->xTrackOffset; if (nWidth < 0) nWidth = 0; infoPtr->items[infoPtr->iMoveItem].cxy = nWidth; HEADER_SendHeaderNotify (hwnd, HDN_ITEMCHANGEDA, infoPtr->iMoveItem); } HEADER_SetItemBounds (hwnd); hdc = GetDC (hwnd); HEADER_Refresh (hwnd, hdc); ReleaseDC (hwnd, hdc); } } if (infoPtr->bCaptured) { infoPtr->bCaptured = FALSE; ReleaseCapture (); HEADER_SendSimpleNotify (hwnd, NM_RELEASEDCAPTURE); } return 0; } static LRESULT HEADER_MouseMove (HWND hwnd, WPARAM wParam, LPARAM lParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); POINT pt; UINT flags; INT nItem, nWidth; HDC hdc; pt.x = (INT)SLOWORD(lParam); pt.y = (INT)SHIWORD(lParam); HEADER_InternalHitTest (hwnd, &pt, &flags, &nItem); if ((dwStyle & HDS_BUTTONS) && (dwStyle & HDS_HOTTRACK)) { if (flags & (HHT_ONHEADER | HHT_ONDIVIDER | HHT_ONDIVOPEN)) infoPtr->iHotItem = nItem; else infoPtr->iHotItem = -1; hdc = GetDC (hwnd); HEADER_Refresh (hwnd, hdc); ReleaseDC (hwnd, hdc); } if (infoPtr->bCaptured) { if (infoPtr->bPressed) { if ((nItem == infoPtr->iMoveItem) && (flags == HHT_ONHEADER)) infoPtr->items[infoPtr->iMoveItem].bDown = TRUE; else infoPtr->items[infoPtr->iMoveItem].bDown = FALSE; hdc = GetDC (hwnd); HEADER_RefreshItem (hwnd, hdc, infoPtr->iMoveItem); ReleaseDC (hwnd, hdc); TRACE("Moving pressed item %d!\n", infoPtr->iMoveItem); } else if (infoPtr->bTracking) { if (dwStyle & HDS_FULLDRAG) { if (HEADER_SendHeaderNotify (hwnd, HDN_ITEMCHANGINGA, infoPtr->iMoveItem)) infoPtr->items[infoPtr->iMoveItem].cxy = infoPtr->nOldWidth; else { nWidth = pt.x - infoPtr->items[infoPtr->iMoveItem].rect.left + infoPtr->xTrackOffset; if (nWidth < 0) nWidth = 0; infoPtr->items[infoPtr->iMoveItem].cxy = nWidth; HEADER_SendHeaderNotify (hwnd, HDN_ITEMCHANGEDA, infoPtr->iMoveItem); } HEADER_SetItemBounds (hwnd); hdc = GetDC (hwnd); HEADER_Refresh (hwnd, hdc); ReleaseDC (hwnd, hdc); } else { hdc = GetDC (hwnd); HEADER_DrawTrackLine (hwnd, hdc, infoPtr->xOldTrack); infoPtr->xOldTrack = pt.x + infoPtr->xTrackOffset; if (infoPtr->xOldTrack < infoPtr->items[infoPtr->iMoveItem].rect.left) infoPtr->xOldTrack = infoPtr->items[infoPtr->iMoveItem].rect.left; infoPtr->items[infoPtr->iMoveItem].cxy = infoPtr->xOldTrack - infoPtr->items[infoPtr->iMoveItem].rect.left; HEADER_DrawTrackLine (hwnd, hdc, infoPtr->xOldTrack); ReleaseDC (hwnd, hdc); } HEADER_SendHeaderNotify (hwnd, HDN_TRACKA, infoPtr->iMoveItem); TRACE("Tracking item %d!\n", infoPtr->iMoveItem); } } if ((dwStyle & HDS_BUTTONS) && (dwStyle & HDS_HOTTRACK)) { FIXME("hot track support!\n"); } return 0; } static LRESULT HEADER_Paint (HWND hwnd, WPARAM wParam) { HDC hdc; PAINTSTRUCT ps; hdc = wParam==0 ? BeginPaint (hwnd, &ps) : (HDC)wParam; HEADER_Refresh (hwnd, hdc); if(!wParam) EndPaint (hwnd, &ps); return 0; } static LRESULT HEADER_RButtonUp (HWND hwnd, WPARAM wParam, LPARAM lParam) { BOOL bRet; POINT pt; pt.x = LOWORD(lParam); pt.y = HIWORD(lParam); /* Send a Notify message */ bRet = HEADER_SendSimpleNotify (hwnd, NM_RCLICK); /* Change to screen coordinate for WM_CONTEXTMENU */ ClientToScreen(hwnd, &pt); /* Send a WM_CONTEXTMENU message in response to the RBUTTONUP */ SendMessageA( hwnd, WM_CONTEXTMENU, (WPARAM) hwnd, MAKELPARAM(pt.x, pt.y)); return bRet; } static LRESULT HEADER_SetCursor (HWND hwnd, WPARAM wParam, LPARAM lParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); POINT pt; UINT flags; INT nItem; TRACE("code=0x%X id=0x%X\n", LOWORD(lParam), HIWORD(lParam)); GetCursorPos (&pt); ScreenToClient (hwnd, &pt); HEADER_InternalHitTest (hwnd, &pt, &flags, &nItem); if (flags == HHT_ONDIVIDER) SetCursor (infoPtr->hcurDivider); else if (flags == HHT_ONDIVOPEN) SetCursor (infoPtr->hcurDivopen); else SetCursor (infoPtr->hcurArrow); return 0; } static LRESULT HEADER_SetFont (HWND hwnd, WPARAM wParam, LPARAM lParam) { HEADER_INFO *infoPtr = HEADER_GetInfoPtr (hwnd); TEXTMETRICA tm; HFONT hFont, hOldFont; HDC hdc; infoPtr->hFont = (HFONT)wParam; hFont = infoPtr->hFont ? infoPtr->hFont : GetStockObject (SYSTEM_FONT); hdc = GetDC (0); hOldFont = SelectObject (hdc, hFont); GetTextMetricsA (hdc, &tm); infoPtr->nHeight = tm.tmHeight + VERT_BORDER; SelectObject (hdc, hOldFont); ReleaseDC (0, hdc); infoPtr->bRectsValid = FALSE; if (lParam) { hdc = GetDC (hwnd); HEADER_Refresh (hwnd, hdc); ReleaseDC (hwnd, hdc); } return 0; } static LRESULT WINAPI HEADER_WindowProc (HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) { TRACE("hwnd=%x msg=%x wparam=%x lParam=%lx\n", hwnd, msg, wParam, lParam); if (!HEADER_GetInfoPtr (hwnd) && (msg != WM_CREATE)) return DefWindowProcA (hwnd, msg, wParam, lParam); switch (msg) { case HDM_CREATEDRAGIMAGE: return HEADER_CreateDragImage (hwnd, wParam); case HDM_DELETEITEM: return HEADER_DeleteItem (hwnd, wParam); case HDM_GETIMAGELIST: return HEADER_GetImageList (hwnd); case HDM_GETITEMA: return HEADER_GetItemA (hwnd, wParam, lParam); case HDM_GETITEMW: return HEADER_GetItemW (hwnd, wParam, lParam); case HDM_GETITEMCOUNT: return HEADER_GetItemCount (hwnd); case HDM_GETITEMRECT: return HEADER_GetItemRect (hwnd, wParam, lParam); /* case HDM_GETORDERARRAY: */ case HDM_GETUNICODEFORMAT: return HEADER_GetUnicodeFormat (hwnd); case HDM_HITTEST: return HEADER_HitTest (hwnd, wParam, lParam); case HDM_INSERTITEMA: return HEADER_InsertItemA (hwnd, wParam, lParam); case HDM_INSERTITEMW: return HEADER_InsertItemW (hwnd, wParam, lParam); case HDM_LAYOUT: return HEADER_Layout (hwnd, wParam, lParam); case HDM_SETIMAGELIST: return HEADER_SetImageList (hwnd, wParam, lParam); case HDM_SETITEMA: return HEADER_SetItemA (hwnd, wParam, lParam); case HDM_SETITEMW: return HEADER_SetItemW (hwnd, wParam, lParam); /* case HDM_SETORDERARRAY: */ case HDM_SETUNICODEFORMAT: return HEADER_SetUnicodeFormat (hwnd, wParam); case WM_CREATE: return HEADER_Create (hwnd, wParam, lParam); case WM_DESTROY: return HEADER_Destroy (hwnd, wParam, lParam); case WM_ERASEBKGND: return 1; case WM_GETDLGCODE: return DLGC_WANTTAB | DLGC_WANTARROWS; case WM_GETFONT: return HEADER_GetFont (hwnd); case WM_LBUTTONDBLCLK: return HEADER_LButtonDblClk (hwnd, wParam, lParam); case WM_LBUTTONDOWN: return HEADER_LButtonDown (hwnd, wParam, lParam); case WM_LBUTTONUP: return HEADER_LButtonUp (hwnd, wParam, lParam); case WM_MOUSEMOVE: return HEADER_MouseMove (hwnd, wParam, lParam); /* case WM_NOTIFYFORMAT: */ case WM_SIZE: return HEADER_Size (hwnd, wParam); case WM_PAINT: return HEADER_Paint (hwnd, wParam); case WM_RBUTTONUP: return HEADER_RButtonUp (hwnd, wParam, lParam); case WM_SETCURSOR: return HEADER_SetCursor (hwnd, wParam, lParam); case WM_SETFONT: return HEADER_SetFont (hwnd, wParam, lParam); default: if (msg >= WM_USER) ERR("unknown msg %04x wp=%04x lp=%08lx\n", msg, wParam, lParam ); return DefWindowProcA (hwnd, msg, wParam, lParam); } return 0; } VOID HEADER_Register (void) { WNDCLASSA wndClass; ZeroMemory (&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS | CS_DBLCLKS; wndClass.lpfnWndProc = (WNDPROC)HEADER_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(HEADER_INFO *); wndClass.hCursor = LoadCursorA (0, IDC_ARROWA); wndClass.lpszClassName = WC_HEADERA; RegisterClassA (&wndClass); } VOID HEADER_Unregister (void) { UnregisterClassA (WC_HEADERA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/hotkey.c0100644000175000001440000001537007106136275016512 0ustar julliardusers/* * Hotkey control * * Copyright 1998, 1999 Eric Kohl * * NOTES * Development in progress. An author is needed! Any volunteers? * I will only improve this control once in a while. * Eric * * TODO: * - Some messages. * - Display code. */ #include "winbase.h" #include "commctrl.h" #include "hotkey.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(hotkey) #define HOTKEY_GetInfoPtr(hwnd) ((HOTKEY_INFO *)GetWindowLongA (hwnd, 0)) /* << HOTHEY_GetHotKey >> */ /* << HOTHEY_SetHotKey >> */ /* << HOTHEY_SetRules >> */ /* << HOTKEY_Char >> */ static LRESULT HOTKEY_Create (HWND hwnd, WPARAM wParam, LPARAM lParam) { HOTKEY_INFO *infoPtr; TEXTMETRICA tm; HDC hdc; /* allocate memory for info structure */ infoPtr = (HOTKEY_INFO *)COMCTL32_Alloc (sizeof(HOTKEY_INFO)); SetWindowLongA (hwnd, 0, (DWORD)infoPtr); /* initialize info structure */ /* get default font height */ hdc = GetDC (hwnd); GetTextMetricsA (hdc, &tm); infoPtr->nHeight = tm.tmHeight; ReleaseDC (hwnd, hdc); return 0; } static LRESULT HOTKEY_Destroy (HWND hwnd, WPARAM wParam, LPARAM lParam) { HOTKEY_INFO *infoPtr = HOTKEY_GetInfoPtr (hwnd); /* free hotkey info data */ COMCTL32_Free (infoPtr); SetWindowLongA (hwnd, 0, 0); return 0; } static LRESULT HOTKEY_EraseBackground (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* HOTKEY_INFO *infoPtr = HOTKEY_GetInfoPtr (hwnd); */ HBRUSH hBrush; RECT rc; hBrush = (HBRUSH)SendMessageA (GetParent (hwnd), WM_CTLCOLOREDIT, wParam, (LPARAM)hwnd); if (hBrush) hBrush = (HBRUSH)GetStockObject (WHITE_BRUSH); GetClientRect (hwnd, &rc); FillRect ((HDC)wParam, &rc, hBrush); return -1; } inline static LRESULT HOTKEY_GetFont (HWND hwnd, WPARAM wParam, LPARAM lParam) { HOTKEY_INFO *infoPtr = HOTKEY_GetInfoPtr (hwnd); return infoPtr->hFont; } static LRESULT HOTKEY_KeyDown (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* HOTKEY_INFO *infoPtr = HOTKEY_GetInfoPtr (hwnd); */ switch (wParam) { case VK_RETURN: case VK_TAB: case VK_SPACE: case VK_DELETE: case VK_ESCAPE: case VK_BACK: return DefWindowProcA (hwnd, WM_KEYDOWN, wParam, lParam); case VK_SHIFT: case VK_CONTROL: case VK_MENU: FIXME("modifier key pressed!\n"); break; default: FIXME(" %d\n", wParam); break; } return TRUE; } static LRESULT HOTKEY_KeyUp (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* HOTKEY_INFO *infoPtr = HOTKEY_GetInfoPtr (hwnd); */ FIXME(" %d\n", wParam); return 0; } static LRESULT HOTKEY_KillFocus (HWND hwnd, WPARAM wParam, LPARAM lParam) { HOTKEY_INFO *infoPtr = HOTKEY_GetInfoPtr (hwnd); infoPtr->bFocus = FALSE; DestroyCaret (); return 0; } static LRESULT HOTKEY_LButtonDown (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* HOTKEY_INFO *infoPtr = HOTKEY_GetInfoPtr (hwnd); */ SetFocus (hwnd); return 0; } inline static LRESULT HOTKEY_NCCreate (HWND hwnd, WPARAM wParam, LPARAM lParam) { DWORD dwExStyle = GetWindowLongA (hwnd, GWL_EXSTYLE); SetWindowLongA (hwnd, GWL_EXSTYLE, dwExStyle | WS_EX_CLIENTEDGE); return DefWindowProcA (hwnd, WM_NCCREATE, wParam, lParam); } static LRESULT HOTKEY_SetFocus (HWND hwnd, WPARAM wParam, LPARAM lParam) { HOTKEY_INFO *infoPtr = HOTKEY_GetInfoPtr (hwnd); infoPtr->bFocus = TRUE; CreateCaret (hwnd, (HBITMAP)0, 1, infoPtr->nHeight); SetCaretPos (1, 1); ShowCaret (hwnd); return 0; } inline static LRESULT HOTKEY_SetFont (HWND hwnd, WPARAM wParam, LPARAM lParam) { HOTKEY_INFO *infoPtr = HOTKEY_GetInfoPtr (hwnd); TEXTMETRICA tm; HDC hdc; HFONT hOldFont = 0; infoPtr->hFont = (HFONT)wParam; hdc = GetDC (hwnd); if (infoPtr->hFont) hOldFont = SelectObject (hdc, infoPtr->hFont); GetTextMetricsA (hdc, &tm); infoPtr->nHeight = tm.tmHeight; if (infoPtr->hFont) SelectObject (hdc, hOldFont); ReleaseDC (hwnd, hdc); if (LOWORD(lParam)) { FIXME("force redraw!\n"); } return 0; } static LRESULT WINE_UNUSED HOTKEY_SysKeyDown (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* HOTKEY_INFO *infoPtr = HOTKEY_GetInfoPtr (hwnd); */ switch (wParam) { case VK_RETURN: case VK_TAB: case VK_SPACE: case VK_DELETE: case VK_ESCAPE: case VK_BACK: return DefWindowProcA (hwnd, WM_SYSKEYDOWN, wParam, lParam); case VK_SHIFT: case VK_CONTROL: case VK_MENU: FIXME("modifier key pressed!\n"); break; default: FIXME(" %d\n", wParam); break; } return TRUE; } static LRESULT WINE_UNUSED HOTKEY_SysKeyUp (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* HOTKEY_INFO *infoPtr = HOTKEY_GetInfoPtr (hwnd); */ FIXME(" %d\n", wParam); return 0; } static LRESULT WINAPI HOTKEY_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TRACE("hwnd=%x msg=%x wparam=%x lparam=%lx\n", hwnd, uMsg, wParam, lParam); if (!HOTKEY_GetInfoPtr (hwnd) && (uMsg != WM_CREATE)) return DefWindowProcA (hwnd, uMsg, wParam, lParam); switch (uMsg) { /* case HKM_GETHOTKEY: */ /* case HKM_SETHOTKEY: */ /* case HKM_SETRULES: */ /* case WM_CHAR: */ case WM_CREATE: return HOTKEY_Create (hwnd, wParam, lParam); case WM_DESTROY: return HOTKEY_Destroy (hwnd, wParam, lParam); case WM_ERASEBKGND: return HOTKEY_EraseBackground (hwnd, wParam, lParam); case WM_GETDLGCODE: return DLGC_WANTCHARS | DLGC_WANTARROWS; case WM_GETFONT: return HOTKEY_GetFont (hwnd, wParam, lParam); case WM_KEYDOWN: case WM_SYSKEYDOWN: return HOTKEY_KeyDown (hwnd, wParam, lParam); case WM_KEYUP: case WM_SYSKEYUP: return HOTKEY_KeyUp (hwnd, wParam, lParam); case WM_KILLFOCUS: return HOTKEY_KillFocus (hwnd, wParam, lParam); case WM_LBUTTONDOWN: return HOTKEY_LButtonDown (hwnd, wParam, lParam); case WM_NCCREATE: return HOTKEY_NCCreate (hwnd, wParam, lParam); /* case WM_PAINT: */ case WM_SETFOCUS: return HOTKEY_SetFocus (hwnd, wParam, lParam); case WM_SETFONT: return HOTKEY_SetFont (hwnd, wParam, lParam); /* case WM_SYSCHAR: */ default: if (uMsg >= WM_USER) ERR("unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); return DefWindowProcA (hwnd, uMsg, wParam, lParam); } return 0; } VOID HOTKEY_Register (void) { WNDCLASSA wndClass; ZeroMemory (&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS; wndClass.lpfnWndProc = (WNDPROC)HOTKEY_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(HOTKEY_INFO *); wndClass.hCursor = 0; wndClass.hbrBackground = 0; wndClass.lpszClassName = HOTKEY_CLASSA; RegisterClassA (&wndClass); } VOID HOTKEY_Unregister (void) { UnregisterClassA (HOTKEY_CLASSA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/imagelist.c0100644000175000001440000021413607106624241017161 0ustar julliardusers/* * ImageList implementation * * Copyright 1998 Eric Kohl * * TODO: * - Fix ImageList_DrawIndirect (xBitmap, yBitmap, rgbFg, rgbBk, dwRop). * - Fix ImageList_GetIcon. * - Fix drag functions. * - Fix ImageList_Write. * - Fix ImageList_SetFilter (undocumented). * BTW does anybody know anything about this function??? * - It removes 12 Bytes from the stack (3 Parameters). * - First parameter SHOULD be a HIMAGELIST. * - Second parameter COULD be an index????? * - Third parameter.... ????????????????????? * * Comments: * - ImageList_Draw, ImageList_DrawEx and ImageList_GetIcon use * ImageList_DrawIndirect. Since ImageList_DrawIndirect is still * partially imlemented, the functions mentioned above will be * limited in functionality too. */ /* This must be defined because the HIMAGELIST type is just a pointer * to the _IMAGELIST data structure. But M$ does not want us to know * anything about its contents. Applications just see a pointer to * an empty structure. It's just to keep compatibility. */ #define __WINE_IMAGELIST_C #include "wine/obj_base.h" #include "wine/obj_storage.h" #include "imagelist.h" #include "commctrl.h" #include "debugtools.h" #include "winerror.h" DEFAULT_DEBUG_CHANNEL(imagelist) #define _MAX(a,b) (((a)>(b))?(a):(b)) #define _MIN(a,b) (((a)>(b))?(b):(a)) #define MAX_OVERLAYIMAGE 15 /* internal image list data used for Drag & Drop operations */ static HIMAGELIST himlInternalDrag = NULL; static INT nInternalDragHotspotX = 0; static INT nInternalDragHotspotY = 0; static HWND hwndInternalDrag = 0; static INT xInternalPos = 0; static INT yInternalPos = 0; static HDC hdcBackBuffer = 0; static HBITMAP hbmBackBuffer = 0; /************************************************************************* * IMAGELIST_InternalExpandBitmaps [Internal] * * Expands the bitmaps of an image list by the given number of images. * * PARAMS * himl [I] handle to image list * nImageCount [I] number of images to add * * RETURNS * nothing * * NOTES * This function can NOT be used to reduce the number of images. */ static VOID IMAGELIST_InternalExpandBitmaps (HIMAGELIST himl, INT nImageCount) { HDC hdcImageList, hdcBitmap; HBITMAP hbmNewBitmap; INT nNewWidth, nNewCount; TRACE("Create expanded bitmaps!\n"); nNewCount = himl->cCurImage + nImageCount + himl->cGrow; nNewWidth = nNewCount * himl->cx; hdcImageList = CreateCompatibleDC (0); hdcBitmap = CreateCompatibleDC (0); hbmNewBitmap = CreateBitmap (nNewWidth, himl->cy, 1, himl->uBitsPixel, NULL); if (hbmNewBitmap == 0) ERR("creating new image bitmap!\n"); SelectObject (hdcImageList, himl->hbmImage); SelectObject (hdcBitmap, hbmNewBitmap); BitBlt (hdcBitmap, 0, 0, himl->cCurImage * himl->cx, himl->cy, hdcImageList, 0, 0, SRCCOPY); DeleteObject (himl->hbmImage); himl->hbmImage = hbmNewBitmap; if (himl->hbmMask) { hbmNewBitmap = CreateBitmap (nNewWidth, himl->cy, 1, 1, NULL); if (hbmNewBitmap == 0) ERR("creating new mask bitmap!"); SelectObject (hdcImageList, himl->hbmMask); SelectObject (hdcBitmap, hbmNewBitmap); BitBlt (hdcBitmap, 0, 0, himl->cCurImage * himl->cx, himl->cy, hdcImageList, 0, 0, SRCCOPY); DeleteObject (himl->hbmMask); himl->hbmMask = hbmNewBitmap; } himl->cMaxImage = nNewCount; DeleteDC (hdcImageList); DeleteDC (hdcBitmap); } /************************************************************************* * IMAGELIST_InternalDraw [Internal] * * Draws the image in the ImageList (without the mask) * * PARAMS * pimldp [I] pointer to IMAGELISTDRAWPARAMS structure. * cx [I] the width of the image to display * cy............[I] the height of the image to display * * RETURNS * nothing * * NOTES * This functions is used by ImageList_DrawIndirect, when it is * required to draw only the Image (without the mask) to the screen. * * Blending and Overlays styles are accomplised by another function */ static VOID IMAGELIST_InternalDraw(IMAGELISTDRAWPARAMS *pimldp, INT cx, INT cy) { HDC hImageDC; HBITMAP hOldBitmap; hImageDC = CreateCompatibleDC(0); hOldBitmap = SelectObject(hImageDC, pimldp->himl->hbmImage); BitBlt(pimldp->hdcDst, pimldp->x, pimldp->y, cx, cy, hImageDC, pimldp->himl->cx * pimldp->i, 0, SRCCOPY); SelectObject(hImageDC, hOldBitmap); DeleteDC(hImageDC); } /************************************************************************* * IMAGELIST_InternalDrawMask [Internal] * * Draws the image in the ImageList witht the mask * * PARAMS * pimldp [I] pointer to IMAGELISTDRAWPARAMS structure. * cx [I] the width of the image to display * cy............[I] the height of the image to display * * RETURNS * nothing * * NOTES * This functions is used by ImageList_DrawIndirect, when it is * required to draw the Image with the mask to the screen. * * Blending and Overlays styles are accomplised by another function. */ static VOID IMAGELIST_InternalDrawMask(IMAGELISTDRAWPARAMS *pimldp, INT cx, INT cy) { HDC hMaskDC, hImageDC; BOOL bUseCustomBackground, bBlendFlag; HBRUSH hBrush, hOldBrush; HBITMAP hOldBitmapImage, hOldBitmapMask; HIMAGELIST himlLocal = pimldp->himl; COLORREF oldBkColor, oldFgColor; UINT fStyle = pimldp->fStyle & (~ILD_OVERLAYMASK); bUseCustomBackground = (himlLocal->clrBk != CLR_NONE); bBlendFlag = (fStyle & ILD_BLEND50 ) || (fStyle & ILD_BLEND25); hImageDC = CreateCompatibleDC(0); hMaskDC = CreateCompatibleDC(0); hOldBitmapImage = SelectObject(hImageDC, himlLocal->hbmImage); hOldBitmapMask = SelectObject(hMaskDC, himlLocal->hbmMask); /* Draw the Background for the appropriate Styles */ if( bUseCustomBackground && (fStyle == ILD_NORMAL || fStyle & ILD_IMAGE || bBlendFlag)) { hBrush = CreateSolidBrush (himlLocal->clrBk); hOldBrush = SelectObject (pimldp->hdcDst, hBrush); PatBlt (pimldp->hdcDst, pimldp->x, pimldp->y, cx, cy, PATCOPY); DeleteObject (SelectObject (pimldp->hdcDst, hOldBrush)); } /* Draw Image Transparently over the current background */ if(fStyle == ILD_NORMAL || (fStyle & ILD_TRANSPARENT) || ((fStyle & ILD_IMAGE) && bUseCustomBackground) || bBlendFlag) { /* to obtain a transparent look, background color should be set to white and foreground color to black when blting the monochrome mask. */ oldBkColor = SetBkColor(pimldp->hdcDst, RGB(0xff, 0xff, 0xff)); oldFgColor = SetTextColor(pimldp->hdcDst, RGB(0, 0, 0)); BitBlt(pimldp->hdcDst, pimldp->x, pimldp->y, cx, cy, hMaskDC, himlLocal->cx * pimldp->i, 0, SRCAND); BitBlt(pimldp->hdcDst, pimldp->x, pimldp->y, cx, cy, hImageDC, himlLocal->cx * pimldp->i, 0, SRCPAINT); SetBkColor(pimldp->hdcDst, oldBkColor); SetTextColor(pimldp->hdcDst, oldFgColor); } /* Draw the image when no Background is specified */ else if((fStyle & ILD_IMAGE) && !bUseCustomBackground) { BitBlt(pimldp->hdcDst, pimldp->x, pimldp->y, cx, cy, hImageDC, himlLocal->cx * pimldp->i, 0, SRCCOPY); } /* Draw the mask with or without a background */ else if(fStyle & ILD_MASK) { BitBlt(pimldp->hdcDst, pimldp->x, pimldp->y, cx, cy, hMaskDC, himlLocal->cx * pimldp->i, 0, bUseCustomBackground ? SRCCOPY : SRCAND); } SelectObject(hImageDC, hOldBitmapImage); SelectObject(hMaskDC, hOldBitmapMask); DeleteDC(hImageDC); DeleteDC(hMaskDC); } /************************************************************************* * IMAGELIST_InternalDrawBlend [Internal] * * Draws the Blend over the current image * * PARAMS * pimldp [I] pointer to IMAGELISTDRAWPARAMS structure. * cx [I] the width of the image to display * cy............[I] the height of the image to display * * RETURNS * nothing * * NOTES * This functions is used by ImageList_DrawIndirect, when it is * required to add the blend to the current image. * */ static VOID IMAGELIST_InternalDrawBlend(IMAGELISTDRAWPARAMS *pimldp, INT cx, INT cy) { HDC hBlendMaskDC,hMaskDC; HBRUSH hBlendColorBrush, hBlendBrush, hOldBrush; HBITMAP hBlendMaskBitmap, hOldBitmap; COLORREF clrBlend, OldTextColor, OldBkColor; HIMAGELIST himlLocal = pimldp->himl; clrBlend = GetSysColor (COLOR_HIGHLIGHT); if (!(pimldp->rgbFg == CLR_DEFAULT)) { clrBlend = pimldp->rgbFg; } /* Create the blend Mask */ hBlendMaskDC = CreateCompatibleDC(0); hBlendBrush = pimldp->fStyle & ILD_BLEND50 ? himlLocal->hbrBlend50 : himlLocal->hbrBlend25; hBlendMaskBitmap = CreateBitmap(cx, cy, 1, 1, NULL); hOldBitmap = SelectObject(hBlendMaskDC, hBlendMaskBitmap); hOldBrush = (HBRUSH) SelectObject(hBlendMaskDC, hBlendBrush); PatBlt(hBlendMaskDC, 0, 0, cx, cy, PATCOPY); SelectObject(hBlendMaskDC, hOldBrush); /* Modify the blend mask if an Image Mask exist */ if(pimldp->himl->hbmMask != 0) { HBITMAP hOldMaskBitmap; hMaskDC = CreateCompatibleDC(0); hOldMaskBitmap = (HBITMAP) SelectObject(hMaskDC, himlLocal->hbmMask); BitBlt(hBlendMaskDC, 0,0, cx, cy, hMaskDC, himlLocal->cx * pimldp->i,0, 0x220326); /* NOTSRCAND */ BitBlt(hBlendMaskDC, 0,0, cx, cy, hBlendMaskDC, 0,0, NOTSRCCOPY); SelectObject(hMaskDC, hOldMaskBitmap); DeleteDC(hMaskDC); } /* Apply blend to the current image given the BlendMask */ OldTextColor = SetTextColor(pimldp->hdcDst, 0); OldBkColor = SetBkColor(pimldp->hdcDst, RGB(255,255,255)); hBlendColorBrush = CreateSolidBrush(clrBlend); hOldBrush = (HBRUSH) SelectObject (pimldp->hdcDst, hBlendColorBrush); BitBlt (pimldp->hdcDst, pimldp->x, pimldp->y, cx, cy, hBlendMaskDC, 0, 0, 0xB8074A); /* PSDPxax */ SelectObject(pimldp->hdcDst, hOldBrush); SetTextColor(pimldp->hdcDst, OldTextColor); SetBkColor(pimldp->hdcDst, OldBkColor); SelectObject(hBlendMaskDC, hOldBitmap); DeleteDC(hBlendMaskDC); DeleteObject(hBlendMaskBitmap); DeleteObject(hBlendColorBrush); } /************************************************************************* * IMAGELIST_InternalDrawOverlay [Internal] * * Draws the overlay image * * PARAMS * pimldp [I] pointer to IMAGELISTDRAWPARAMS structure. * cx [I] the width of the image to display * cy............[I] the height of the image to display * * RETURNS * nothing * * NOTES * This functions is used by ImageList_DrawIndirect, when it is * required to draw the overlay * * */ static VOID IMAGELIST_InternalDrawOverlay(IMAGELISTDRAWPARAMS *pimldp, INT cx, INT cy) { INT nOvlIdx; HDC hImageDC; HBITMAP hOldBitmap; nOvlIdx = (pimldp->fStyle & ILD_OVERLAYMASK) >> 8; if ((nOvlIdx >= 1) && (nOvlIdx <= MAX_OVERLAYIMAGE)) { nOvlIdx = pimldp->himl->nOvlIdx[nOvlIdx - 1]; if ((nOvlIdx >= 0) && (nOvlIdx <= pimldp->himl->cCurImage)) { hImageDC = CreateCompatibleDC(0); if (pimldp->himl->hbmMask) { hOldBitmap = (HBITMAP) SelectObject (hImageDC, pimldp->himl->hbmMask); BitBlt (pimldp->hdcDst, pimldp->x, pimldp->y, cx, cy, hImageDC, pimldp->himl->cx * nOvlIdx, 0, SRCAND); SelectObject(hImageDC, hOldBitmap); } hOldBitmap = (HBITMAP) SelectObject (hImageDC, pimldp->himl->hbmImage); BitBlt (pimldp->hdcDst, pimldp->x, pimldp->y, cx, cy, hImageDC, pimldp->himl->cx * nOvlIdx, 0, SRCPAINT); SelectObject(hImageDC, hOldBitmap); DeleteDC(hImageDC); } } } /************************************************************************* * ImageList_Add [COMCTL32.39] * * Add an image or images to an image list. * * PARAMS * himl [I] handle to image list * hbmImage [I] handle to image bitmap * hbmMask [I] handle to mask bitmap * * RETURNS * Success: Index of the first new image. * Failure: -1 */ INT WINAPI ImageList_Add (HIMAGELIST himl, HBITMAP hbmImage, HBITMAP hbmMask) { HDC hdcImage, hdcBitmap; INT nFirstIndex, nImageCount; INT nStartX; BITMAP bmp; HBITMAP hOldBitmapImage, hOldBitmap; if (!himl || !hbmImage) return -1; GetObjectA (hbmImage, sizeof(BITMAP), (LPVOID)&bmp); nImageCount = bmp.bmWidth / himl->cx; if (himl->cCurImage + nImageCount >= himl->cMaxImage) IMAGELIST_InternalExpandBitmaps (himl, nImageCount); nStartX = himl->cCurImage * himl->cx; hdcImage = CreateCompatibleDC(0); hdcBitmap = CreateCompatibleDC(0); hOldBitmapImage = SelectObject(hdcImage, himl->hbmImage); hOldBitmap = SelectObject(hdcBitmap, hbmImage); /* Copy result to the imagelist */ BitBlt (hdcImage, nStartX, 0, bmp.bmWidth, himl->cy, hdcBitmap, 0, 0, SRCCOPY); if(himl->hbmMask) { HDC hdcMask, hdcTemp, hOldBitmapMask, hOldBitmapTemp; hdcMask = CreateCompatibleDC (0); hdcTemp = CreateCompatibleDC(0); hOldBitmapMask = (HBITMAP) SelectObject(hdcMask, himl->hbmMask); hOldBitmapTemp = (HBITMAP) SelectObject(hdcTemp, hbmMask); BitBlt (hdcMask, nStartX, 0, bmp.bmWidth, himl->cy, hdcTemp, 0, 0, SRCCOPY); SelectObject(hdcTemp, hOldBitmapTemp); DeleteDC(hdcTemp); /* Remove the background from the image */ BitBlt (hdcImage, nStartX, 0, bmp.bmWidth, himl->cy, hdcMask, nStartX, 0, 0x220326); /* NOTSRCAND */ SelectObject(hdcMask, hOldBitmapMask); DeleteDC(hdcMask); } SelectObject(hdcImage, hOldBitmapImage); SelectObject(hdcBitmap, hOldBitmap); DeleteDC(hdcImage); DeleteDC(hdcBitmap); nFirstIndex = himl->cCurImage; himl->cCurImage += nImageCount; return nFirstIndex; } /************************************************************************* * ImageList_AddIcon [COMCTL32.40] * * Adds an icon to an image list. * * PARAMS * himl [I] handle to image list * hIcon [I] handle to icon * * RETURNS * Success: index of the new image * Failure: -1 */ INT WINAPI ImageList_AddIcon (HIMAGELIST himl, HICON hIcon) { return ImageList_ReplaceIcon (himl, -1, hIcon); } /************************************************************************* * ImageList_AddMasked [COMCTL32.41] * * Adds an image or images to an image list and creates a mask from the * specified bitmap using the mask color. * * PARAMS * himl [I] handle to image list. * hBitmap [I] handle to bitmap * clrMask [I] mask color. * * RETURNS * Success: Index of the first new image. * Failure: -1 */ INT WINAPI ImageList_AddMasked (HIMAGELIST himl, HBITMAP hBitmap, COLORREF clrMask) { HDC hdcImage, hdcMask, hdcBitmap; INT nIndex, nImageCount, nMaskXOffset=0; BITMAP bmp; HBITMAP hOldBitmap, hOldBitmapMask, hOldBitmapImage; HBITMAP hMaskBitmap=0; COLORREF bkColor; if (himl == NULL) return -1; if (!GetObjectA (hBitmap, sizeof(BITMAP), &bmp)) return -1; nImageCount = bmp.bmWidth / himl->cx; if (himl->cCurImage + nImageCount >= himl->cMaxImage) { IMAGELIST_InternalExpandBitmaps (himl, nImageCount); } nIndex = himl->cCurImage; himl->cCurImage += nImageCount; hdcMask = CreateCompatibleDC (0); hdcImage = CreateCompatibleDC(0); hdcBitmap = CreateCompatibleDC(0); hOldBitmapImage = SelectObject(hdcImage, himl->hbmImage); hOldBitmap = SelectObject(hdcBitmap, hBitmap); if(himl->hbmMask) { hOldBitmapMask = SelectObject(hdcMask, himl->hbmMask); nMaskXOffset = nIndex * himl->cx; } else { /* Create a temp Mask so we can remove the background of the Image (Windows does this even if there is no mask) */ hMaskBitmap = CreateBitmap(bmp.bmWidth, himl->cy, 1, 1, NULL); hOldBitmapMask = SelectObject(hdcMask, hMaskBitmap); nMaskXOffset = 0; } /* create monochrome image to the mask bitmap */ bkColor = (clrMask != CLR_DEFAULT) ? clrMask : GetPixel (hdcBitmap, 0, 0); SetBkColor (hdcBitmap, bkColor); BitBlt (hdcMask, nMaskXOffset, 0, bmp.bmWidth, himl->cy, hdcBitmap, 0, 0, SRCCOPY); SetBkColor(hdcBitmap, RGB(255,255,255)); /*Remove the background from the image */ /* WINDOWS BUG ALERT!!!!!! The statement below should not be done in common practice but this is how ImageList_AddMasked works in Windows. It overwrites the original bitmap passed, this was discovered by using the same bitmap to itterated the different styles on windows where it failed (BUT ImageList_Add is OK) This is here in case some apps really on this bug */ BitBlt(hdcBitmap, 0, 0, bmp.bmWidth, himl->cy, hdcMask, nMaskXOffset, 0, 0x220326); /* NOTSRCAND */ /* Copy result to the imagelist */ BitBlt (hdcImage, nIndex * himl->cx, 0, bmp.bmWidth, himl->cy, hdcBitmap, 0, 0, SRCCOPY); /* Clean up */ SelectObject(hdcMask,hOldBitmapMask); SelectObject(hdcImage, hOldBitmapImage); SelectObject(hdcBitmap, hOldBitmap); DeleteDC(hdcMask); DeleteDC(hdcImage); DeleteDC(hdcBitmap); if(!himl->hbmMask) { DeleteObject(hMaskBitmap); } return nIndex; } /************************************************************************* * ImageList_BeginDrag [COMCTL32.42] * * Creates a temporary image list that contains one image. It will be used * as a drag image. * * PARAMS * himlTrack [I] handle to the source image list * iTrack [I] index of the drag image in the source image list * dxHotspot [I] X position of the hot spot of the drag image * dyHotspot [I] Y position of the hot spot of the drag image * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI ImageList_BeginDrag (HIMAGELIST himlTrack, INT iTrack, INT dxHotspot, INT dyHotspot) { HDC hdcSrc, hdcDst; FIXME("partially implemented!\n"); if (himlTrack == NULL) return FALSE; if (himlInternalDrag) ImageList_EndDrag (); himlInternalDrag = ImageList_Create (himlTrack->cx, himlTrack->cy, himlTrack->flags, 1, 1); if (himlInternalDrag == NULL) { ERR("Error creating drag image list!\n"); return FALSE; } nInternalDragHotspotX = dxHotspot; nInternalDragHotspotY = dyHotspot; hdcSrc = CreateCompatibleDC (0); hdcDst = CreateCompatibleDC (0); /* copy image */ SelectObject (hdcSrc, himlTrack->hbmImage); SelectObject (hdcDst, himlInternalDrag->hbmImage); StretchBlt (hdcDst, 0, 0, himlInternalDrag->cx, himlInternalDrag->cy, hdcSrc, iTrack * himlTrack->cx, 0, himlTrack->cx, himlTrack->cy, SRCCOPY); /* copy mask */ SelectObject (hdcSrc, himlTrack->hbmMask); SelectObject (hdcDst, himlInternalDrag->hbmMask); StretchBlt (hdcDst, 0, 0, himlInternalDrag->cx, himlInternalDrag->cy, hdcSrc, iTrack * himlTrack->cx, 0, himlTrack->cx, himlTrack->cy, SRCCOPY); DeleteDC (hdcSrc); DeleteDC (hdcDst); himlInternalDrag->cCurImage = 1; return TRUE; } /************************************************************************* * ImageList_Copy [COMCTL32.43] * * Copies an image of the source image list to an image of the * destination image list. Images can be copied or swapped. * * PARAMS * himlDst [I] handle to the destination image list * iDst [I] destination image index. * himlSrc [I] handle to the source image list * iSrc [I] source image index * uFlags [I] flags for the copy operation * * RETURNS * Success: TRUE * Failure: FALSE * * NOTES * Copying from one image list to another is possible. The original * implementation just copies or swapps within one image list. * Could this feature become a bug??? ;-) */ BOOL WINAPI ImageList_Copy (HIMAGELIST himlDst, INT iDst, HIMAGELIST himlSrc, INT iSrc, INT uFlags) { HDC hdcSrc, hdcDst; TRACE("iDst=%d iSrc=%d\n", iDst, iSrc); if ((himlSrc == NULL) || (himlDst == NULL)) return FALSE; if ((iDst < 0) || (iDst >= himlDst->cCurImage)) return FALSE; if ((iSrc < 0) || (iSrc >= himlSrc->cCurImage)) return FALSE; hdcSrc = CreateCompatibleDC (0); if (himlDst == himlSrc) hdcDst = hdcSrc; else hdcDst = CreateCompatibleDC (0); if (uFlags & ILCF_SWAP) { /* swap */ HBITMAP hbmTempImage, hbmTempMask; /* create temporary bitmaps */ hbmTempImage = CreateBitmap (himlSrc->cx, himlSrc->cy, 1, himlSrc->uBitsPixel, NULL); hbmTempMask = CreateBitmap (himlSrc->cx, himlSrc->cy, 1, 1, NULL); /* copy (and stretch) destination to temporary bitmaps.(save) */ /* image */ SelectObject (hdcSrc, himlDst->hbmImage); SelectObject (hdcDst, hbmTempImage); StretchBlt (hdcDst, 0, 0, himlSrc->cx, himlSrc->cy, hdcSrc, iDst * himlDst->cx, 0, himlDst->cx, himlDst->cy, SRCCOPY); /* mask */ SelectObject (hdcSrc, himlDst->hbmMask); SelectObject (hdcDst, hbmTempMask); StretchBlt (hdcDst, 0, 0, himlSrc->cx, himlSrc->cy, hdcSrc, iDst * himlDst->cx, 0, himlDst->cx, himlDst->cy, SRCCOPY); /* copy (and stretch) source to destination */ /* image */ SelectObject (hdcSrc, himlSrc->hbmImage); SelectObject (hdcDst, himlDst->hbmImage); StretchBlt (hdcDst, iDst * himlDst->cx, 0, himlDst->cx, himlDst->cy, hdcSrc, iSrc * himlSrc->cx, 0, himlSrc->cx, himlSrc->cy, SRCCOPY); /* mask */ SelectObject (hdcSrc, himlSrc->hbmMask); SelectObject (hdcDst, himlDst->hbmMask); StretchBlt (hdcDst, iDst * himlDst->cx, 0, himlDst->cx, himlDst->cy, hdcSrc, iSrc * himlSrc->cx, 0, himlSrc->cx, himlSrc->cy, SRCCOPY); /* copy (without stretching) temporary bitmaps to source (restore) */ /* image */ SelectObject (hdcSrc, hbmTempImage); SelectObject (hdcDst, himlSrc->hbmImage); BitBlt (hdcDst, iSrc * himlSrc->cx, 0, himlSrc->cx, himlSrc->cy, hdcSrc, 0, 0, SRCCOPY); /* mask */ SelectObject (hdcSrc, hbmTempMask); SelectObject (hdcDst, himlSrc->hbmMask); BitBlt (hdcDst, iSrc * himlSrc->cx, 0, himlSrc->cx, himlSrc->cy, hdcSrc, 0, 0, SRCCOPY); /* delete temporary bitmaps */ DeleteObject (hbmTempMask); DeleteObject (hbmTempImage); } else { /* copy image */ SelectObject (hdcSrc, himlSrc->hbmImage); if (himlSrc == himlDst) hdcDst = hdcSrc; else SelectObject (hdcDst, himlDst->hbmImage); StretchBlt (hdcDst, iDst * himlDst->cx, 0, himlDst->cx, himlDst->cy, hdcSrc, iSrc * himlSrc->cx, 0, himlSrc->cx, himlSrc->cy, SRCCOPY); /* copy mask */ SelectObject (hdcSrc, himlSrc->hbmMask); if (himlSrc == himlDst) hdcDst = hdcSrc; else SelectObject (hdcDst, himlDst->hbmMask); StretchBlt (hdcDst, iDst * himlDst->cx, 0, himlDst->cx, himlDst->cy, hdcSrc, iSrc * himlSrc->cx, 0, himlSrc->cx, himlSrc->cy, SRCCOPY); } DeleteDC (hdcSrc); if (himlSrc != himlDst) DeleteDC (hdcDst); return TRUE; } /************************************************************************* * ImageList_Create [COMCTL32.44] Creates a new image list. * * PARAMS * cx [I] image height * cy [I] image width * flags [I] creation flags * cInitial [I] initial number of images in the image list * cGrow [I] number of images by which image list grows * * RETURNS * Success: Handle to the created image list * Failure: NULL */ HIMAGELIST WINAPI ImageList_Create (INT cx, INT cy, UINT flags, INT cInitial, INT cGrow) { HIMAGELIST himl; HDC hdc; INT nCount; HBITMAP hbmTemp; static WORD aBitBlend25[] = {0xAA, 0x00, 0x55, 0x00, 0xAA, 0x00, 0x55, 0x00}; static WORD aBitBlend50[] = {0x55, 0xAA, 0x55, 0xAA, 0x55, 0xAA, 0x55, 0xAA}; TRACE("(%d %d 0x%x %d %d)\n", cx, cy, flags, cInitial, cGrow); himl = (HIMAGELIST)COMCTL32_Alloc (sizeof(struct _IMAGELIST)); if (!himl) return NULL; himl->cx = cx; himl->cy = cy; himl->flags = flags; himl->cMaxImage = cInitial + cGrow; himl->cInitial = cInitial; himl->cGrow = cGrow; himl->cCurImage = 0; himl->clrFg = CLR_DEFAULT; himl->clrBk = CLR_NONE; /* initialize overlay mask indices */ for (nCount = 0; nCount < MAX_OVERLAYIMAGE; nCount++) himl->nOvlIdx[nCount] = -1; hdc = CreateCompatibleDC (0); himl->uBitsPixel = (UINT)GetDeviceCaps (hdc, BITSPIXEL); DeleteDC (hdc); TRACE("Image: %d Bits per Pixel\n", himl->uBitsPixel); if (himl->cMaxImage > 0) { himl->hbmImage = CreateBitmap (himl->cx * himl->cMaxImage, himl->cy, 1, himl->uBitsPixel, NULL); if (himl->hbmImage == 0) { ERR("Error creating image bitmap!\n"); return NULL; } } else himl->hbmImage = 0; if ( (himl->cMaxImage > 0) && (himl->flags & ILC_MASK)) { himl->hbmMask = CreateBitmap (himl->cx * himl->cMaxImage, himl->cy, 1, 1, NULL); if (himl->hbmMask == 0) { ERR("Error creating mask bitmap!\n"); if (himl->hbmImage) DeleteObject (himl->hbmImage); return NULL; } } else himl->hbmMask = 0; /* create blending brushes */ hbmTemp = CreateBitmap (8, 8, 1, 1, &aBitBlend25); himl->hbrBlend25 = CreatePatternBrush (hbmTemp); DeleteObject (hbmTemp); hbmTemp = CreateBitmap (8, 8, 1, 1, &aBitBlend50); himl->hbrBlend50 = CreatePatternBrush (hbmTemp); DeleteObject (hbmTemp); return himl; } /************************************************************************* * ImageList_Destroy [COMCTL32.45] * * Destroys an image list. * * PARAMS * himl [I] handle to image list * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI ImageList_Destroy (HIMAGELIST himl) { if (!himl) return FALSE; /* delete image bitmaps */ if (himl->hbmImage) DeleteObject (himl->hbmImage); if (himl->hbmMask) DeleteObject (himl->hbmMask); /* delete blending brushes */ if (himl->hbrBlend25) DeleteObject (himl->hbrBlend25); if (himl->hbrBlend50) DeleteObject (himl->hbrBlend50); COMCTL32_Free (himl); return TRUE; } /************************************************************************* * ImageList_DragEnter [COMCTL32.46] * * Locks window update and displays the drag image at the given position. * * PARAMS * hwndLock [I] handle of the window that owns the drag image. * x [I] X position of the drag image. * y [I] Y position of the drag image. * * RETURNS * Success: TRUE * Failure: FALSE * * NOTES * The position of the drag image is relative to the window, not * the client area. */ BOOL WINAPI ImageList_DragEnter (HWND hwndLock, INT x, INT y) { if (himlInternalDrag == NULL) return FALSE; if (hwndLock) hwndInternalDrag = hwndLock; else hwndInternalDrag = GetDesktopWindow (); xInternalPos = x; yInternalPos = y; hdcBackBuffer = CreateCompatibleDC (0); hbmBackBuffer = CreateCompatibleBitmap (hdcBackBuffer, himlInternalDrag->cx, himlInternalDrag->cy); ImageList_DragShowNolock (TRUE); return FALSE; } /************************************************************************* * ImageList_DragLeave [COMCTL32.47] * * Unlocks window update and hides the drag image. * * PARAMS * hwndLock [I] handle of the window that owns the drag image. * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI ImageList_DragLeave (HWND hwndLock) { if (hwndLock) hwndInternalDrag = hwndLock; else hwndInternalDrag = GetDesktopWindow (); ImageList_DragShowNolock (FALSE); DeleteDC (hdcBackBuffer); DeleteObject (hbmBackBuffer); return TRUE; } /************************************************************************* * ImageList_DragMove [COMCTL32.48] * * Moves the drag image. * * PARAMS * x [I] X position of the drag image. * y [I] Y position of the drag image. * * RETURNS * Success: TRUE * Failure: FALSE * * NOTES * The position of the drag image is relative to the window, not * the client area. */ BOOL WINAPI ImageList_DragMove (INT x, INT y) { ImageList_DragShowNolock (FALSE); xInternalPos = x; yInternalPos = y; ImageList_DragShowNolock (TRUE); return FALSE; } /************************************************************************* * ImageList_DragShowNolock [COMCTL32.49] * * Shows or hides the drag image. * * PARAMS * bShow [I] TRUE shows the drag image, FALSE hides it. * * RETURNS * Success: TRUE * Failure: FALSE * * FIXME * semi-stub. */ BOOL WINAPI ImageList_DragShowNolock (BOOL bShow) { HDC hdcDrag; FIXME("semi-stub!\n"); TRACE("bShow=0x%X!\n", bShow); hdcDrag = GetDCEx (hwndInternalDrag, 0, DCX_WINDOW | DCX_CACHE | DCX_LOCKWINDOWUPDATE); if (bShow) { /* show drag image */ /* save background */ /* draw drag image */ } else { /* hide drag image */ /* restore background */ } ReleaseDC (hwndInternalDrag, hdcDrag); return FALSE; } /************************************************************************* * ImageList_Draw [COMCTL32.50] Draws an image. * * PARAMS * himl [I] handle to image list * i [I] image index * hdc [I] handle to device context * x [I] x position * y [I] y position * fStyle [I] drawing flags * * RETURNS * Success: TRUE * Failure: FALSE * * NOTES * Calls ImageList_DrawIndirect. * * SEE * ImageList_DrawIndirect. */ BOOL WINAPI ImageList_Draw (HIMAGELIST himl, INT i, HDC hdc, INT x, INT y, UINT fStyle) { IMAGELISTDRAWPARAMS imldp; imldp.cbSize = sizeof(IMAGELISTDRAWPARAMS); imldp.himl = himl; imldp.i = i; imldp.hdcDst = hdc, imldp.x = x; imldp.y = y; imldp.cx = 0; imldp.cy = 0; imldp.xBitmap = 0; imldp.yBitmap = 0; imldp.rgbBk = CLR_DEFAULT; imldp.rgbFg = CLR_DEFAULT; imldp.fStyle = fStyle; imldp.dwRop = 0; return ImageList_DrawIndirect (&imldp); } /************************************************************************* * ImageList_DrawEx [COMCTL32.51] * * Draws an image and allows to use extended drawing features. * * PARAMS * himl [I] handle to image list * i [I] image index * hdc [I] handle to device context * x [I] X position * y [I] Y position * xOffs [I] X offset * yOffs [I] Y offset * rgbBk [I] background color * rgbFg [I] foreground color * fStyle [I] drawing flags * * RETURNS * Success: TRUE * Failure: FALSE * * NOTES * Calls ImageList_DrawIndirect. * * SEE * ImageList_DrawIndirect. */ BOOL WINAPI ImageList_DrawEx (HIMAGELIST himl, INT i, HDC hdc, INT x, INT y, INT dx, INT dy, COLORREF rgbBk, COLORREF rgbFg, UINT fStyle) { IMAGELISTDRAWPARAMS imldp; imldp.cbSize = sizeof(IMAGELISTDRAWPARAMS); imldp.himl = himl; imldp.i = i; imldp.hdcDst = hdc, imldp.x = x; imldp.y = y; imldp.cx = dx; imldp.cy = dy; imldp.xBitmap = 0; imldp.yBitmap = 0; imldp.rgbBk = rgbBk; imldp.rgbFg = rgbFg; imldp.fStyle = fStyle; imldp.dwRop = 0; return ImageList_DrawIndirect (&imldp); } /************************************************************************* * ImageList_DrawIndirect [COMCTL32.52] * * Draws an image using ... * * PARAMS * pimldp [I] pointer to IMAGELISTDRAWPARAMS structure. * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI ImageList_DrawIndirect (IMAGELISTDRAWPARAMS *pimldp) { INT cx, cy; /* Do some Error Checking */ if (pimldp == NULL) return FALSE; if (pimldp->cbSize < sizeof(IMAGELISTDRAWPARAMS)) return FALSE; if (pimldp->himl == NULL) return FALSE; if ((pimldp->i < 0) || (pimldp->i > pimldp->himl->cCurImage)) { ERR("%d not within range (max %d)\n",pimldp->i,pimldp->himl->cCurImage); return FALSE; } /* Get the Height and Width to display */ cx = (pimldp->cx == 0) ? pimldp->himl->cx : pimldp->cx; cy = (pimldp->cy == 0) ? pimldp->himl->cy : pimldp->cy; /* Draw the image */ if(pimldp->himl->hbmMask != 0) { IMAGELIST_InternalDrawMask(pimldp, cx, cy); } else { IMAGELIST_InternalDraw(pimldp, cx, cy); } /* Apply the blend if needed to the Image */ if((pimldp->fStyle & ILD_BLEND50) || (pimldp->fStyle & ILD_BLEND25)) { IMAGELIST_InternalDrawBlend(pimldp, cx, cy); } /* Apply the Overlay if needed */ if (pimldp->fStyle & ILD_OVERLAYMASK) { IMAGELIST_InternalDrawOverlay(pimldp, cx, cy); } return TRUE; } /************************************************************************* * ImageList_Duplicate [COMCTL32.53] Duplicates an image list. * * PARAMS * himlSrc [I] source image list handle * * RETURNS * Success: Handle of duplicated image list. * Failure: NULL */ HIMAGELIST WINAPI ImageList_Duplicate (HIMAGELIST himlSrc) { HIMAGELIST himlDst; HDC hdcSrc, hdcDst; if (himlSrc == NULL) { ERR("Invalid image list handle!\n"); return NULL; } himlDst = ImageList_Create (himlSrc->cx, himlSrc->cy, himlSrc->flags, himlSrc->cInitial, himlSrc->cGrow); if (himlDst) { hdcSrc = CreateCompatibleDC (0); hdcDst = CreateCompatibleDC (0); SelectObject (hdcSrc, himlSrc->hbmImage); SelectObject (hdcDst, himlDst->hbmImage); BitBlt (hdcDst, 0, 0, himlSrc->cCurImage * himlSrc->cx, himlSrc->cy, hdcSrc, 0, 0, SRCCOPY); if (himlDst->hbmMask) { SelectObject (hdcSrc, himlSrc->hbmMask); SelectObject (hdcDst, himlDst->hbmMask); BitBlt (hdcDst, 0, 0, himlSrc->cCurImage * himlSrc->cx, himlSrc->cy, hdcSrc, 0, 0, SRCCOPY); } DeleteDC (hdcDst); DeleteDC (hdcSrc); himlDst->cCurImage = himlSrc->cCurImage; himlDst->cMaxImage = himlSrc->cMaxImage; } return himlDst; } /************************************************************************* * ImageList_EndDrag [COMCTL32.54] Finishes a drag operation. * * Finishes a drag operation. * * PARAMS * no Parameters * * RETURNS * Success: TRUE * Failure: FALSE * * BUGS * semi-stub. */ BOOL WINAPI ImageList_EndDrag (void) { FIXME("semi-stub!\n"); if (himlInternalDrag) { ImageList_Destroy (himlInternalDrag); himlInternalDrag = NULL; nInternalDragHotspotX = 0; nInternalDragHotspotY = 0; } return TRUE; } /************************************************************************* * ImageList_GetBkColor [COMCTL32.55] * * Returns the background color of an image list. * * PARAMS * himl [I] Image list handle. * * RETURNS * Success: background color * Failure: CLR_NONE */ COLORREF WINAPI ImageList_GetBkColor (HIMAGELIST himl) { if (himl == NULL) return CLR_NONE; return himl->clrBk; } /************************************************************************* * ImageList_GetDragImage [COMCTL32.56] * * Returns the handle to the internal drag image list. * * PARAMS * ppt [O] Pointer to the drag position. Can be NULL. * pptHotspot [O] Pointer to the position of the hot spot. Can be NULL. * * RETURNS * Success: Handle of the drag image list. * Failure: NULL. * * BUGS * semi-stub. */ HIMAGELIST WINAPI ImageList_GetDragImage (POINT *ppt, POINT *pptHotspot) { FIXME("semi-stub!\n"); if (himlInternalDrag) return (himlInternalDrag); return NULL; } /************************************************************************* * ImageList_GetIcon [COMCTL32.57] * * Creates an icon from a masked image of an image list. * * PARAMS * himl [I] handle to image list * i [I] image index * flags [I] drawing style flags * * RETURNS * Success: icon handle * Failure: NULL */ HICON WINAPI ImageList_GetIcon (HIMAGELIST himl, INT i, UINT fStyle) { ICONINFO ii; HICON hIcon; HBITMAP hOldSrcBitmap,hOldDstBitmap; HDC hdcSrc, hdcDst; if ((himl == NULL) || (i < 0) || (i >= himl->cCurImage)) { FIXME("(%p,%d,%x), params out of range!\n",himl,i,fStyle); return 0; } hdcSrc = CreateCompatibleDC(0); hdcDst = CreateCompatibleDC(0); ii.fIcon = TRUE; ii.hbmMask = CreateCompatibleBitmap (hdcDst, himl->cx, himl->cy); /* draw mask*/ hOldDstBitmap = (HBITMAP)SelectObject (hdcDst, ii.hbmMask); if (himl->hbmMask) { SelectObject (hdcSrc, himl->hbmMask); BitBlt (hdcDst, 0, 0, himl->cx, himl->cy, hdcSrc, i * himl->cx, 0, SRCCOPY); } else PatBlt (hdcDst, 0, 0, himl->cx, himl->cy, BLACKNESS); /* draw image*/ hOldSrcBitmap = (HBITMAP)SelectObject (hdcSrc, himl->hbmImage); ii.hbmColor = CreateCompatibleBitmap (hdcSrc, himl->cx, himl->cy); SelectObject (hdcDst, ii.hbmColor); BitBlt (hdcDst, 0, 0, himl->cx, himl->cy, hdcSrc, i * himl->cx, 0, SRCCOPY); /* * CreateIconIndirect requires us to deselect the bitmaps from * the DCs before calling */ SelectObject(hdcSrc, hOldSrcBitmap); SelectObject(hdcDst, hOldDstBitmap); hIcon = CreateIconIndirect (&ii); DeleteDC (hdcSrc); DeleteDC (hdcDst); DeleteObject (ii.hbmMask); DeleteObject (ii.hbmColor); return hIcon; } /************************************************************************* * ImageList_GetIconSize [COMCTL32.58] * * Retrieves the size of an image in an image list. * * PARAMS * himl [I] handle to image list * cx [O] pointer to the image width. * cy [O] pointer to the image height. * * RETURNS * Success: TRUE * Failure: FALSE * * NOTES * All images in an image list have the same size. */ BOOL WINAPI ImageList_GetIconSize (HIMAGELIST himl, INT *cx, INT *cy) { if (himl == NULL) return FALSE; if ((himl->cx <= 0) || (himl->cy <= 0)) return FALSE; if (cx) *cx = himl->cx; if (cy) *cy = himl->cy; return TRUE; } /************************************************************************* * ImageList_GetImageCount [COMCTL32.59] * * Returns the number of images in an image list. * * PARAMS * himl [I] handle to image list * * RETURNS * Success: Number of images. * Failure: 0 */ INT WINAPI ImageList_GetImageCount (HIMAGELIST himl) { if (himl == NULL) return 0; return himl->cCurImage; } /************************************************************************* * ImageList_GetImageInfo [COMCTL32.60] * * Returns information about an image in an image list. * * PARAMS * himl [I] handle to image list * i [I] image index * pImageInfo [O] pointer to the image information * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI ImageList_GetImageInfo (HIMAGELIST himl, INT i, IMAGEINFO *pImageInfo) { if ((himl == NULL) || (pImageInfo == NULL)) return FALSE; if ((i < 0) || (i >= himl->cCurImage)) return FALSE; pImageInfo->hbmImage = himl->hbmImage; pImageInfo->hbmMask = himl->hbmMask; pImageInfo->rcImage.top = 0; pImageInfo->rcImage.bottom = himl->cy; pImageInfo->rcImage.left = i * himl->cx; pImageInfo->rcImage.right = (i+1) * himl->cx; return TRUE; } /************************************************************************* * ImageList_GetImageRect [COMCTL32.61] * * Retrieves the rectangle of the specified image in an image list. * * PARAMS * himl [I] handle to image list * i [I] image index * lpRect [O] pointer to the image rectangle * * RETURNS * Success: TRUE * Failure: FALSE * * NOTES * This is an UNDOCUMENTED function!!! */ BOOL WINAPI ImageList_GetImageRect (HIMAGELIST himl, INT i, LPRECT lpRect) { if ((himl == NULL) || (lpRect == NULL)) return FALSE; if ((i < 0) || (i >= himl->cCurImage)) return FALSE; lpRect->left = i * himl->cx; lpRect->top = 0; lpRect->right = lpRect->left + himl->cx; lpRect->bottom = himl->cy; return TRUE; } /************************************************************************* * ImageList_LoadImageA [COMCTL32.63][COMCTL32.62] * * Creates an image list from a bitmap, icon or cursor. * * PARAMS * hi [I] instance handle * lpbmp [I] name or id of the image * cx [I] width of each image * cGrow [I] number of images to expand * clrMask [I] mask color * uType [I] type of image to load * uFlags [I] loading flags * * RETURNS * Success: handle to the loaded image list * Failure: NULL * * SEE * LoadImage () */ HIMAGELIST WINAPI ImageList_LoadImageA (HINSTANCE hi, LPCSTR lpbmp, INT cx, INT cGrow, COLORREF clrMask, UINT uType, UINT uFlags) { HIMAGELIST himl = NULL; HANDLE handle; INT nImageCount; handle = LoadImageA (hi, lpbmp, uType, 0, 0, uFlags); if (!handle) { ERR("Error loading image!\n"); return NULL; } if (uType == IMAGE_BITMAP) { BITMAP bmp; GetObjectA (handle, sizeof(BITMAP), &bmp); /* To match windows behavior, if cx is set to zero and the flag DI_DEFAULTSIZE is specified, cx becomes the system metric value for icons. If the flag is not specified the function sets the size to the height of the bitmap */ if (cx == 0) { if (uFlags & DI_DEFAULTSIZE) cx = GetSystemMetrics (SM_CXICON); else cx = bmp.bmHeight; } nImageCount = bmp.bmWidth / cx; himl = ImageList_Create (cx, bmp.bmHeight, ILC_MASK | ILC_COLOR, nImageCount, cGrow); ImageList_AddMasked (himl, (HBITMAP)handle, clrMask); } else if ((uType == IMAGE_ICON) || (uType == IMAGE_CURSOR)) { ICONINFO ii; BITMAP bmp; GetIconInfo (handle, &ii); GetObjectA (ii.hbmColor, sizeof(BITMAP), (LPVOID)&bmp); himl = ImageList_Create (bmp.bmWidth, bmp.bmHeight, ILC_MASK | ILC_COLOR, 1, cGrow); ImageList_Add (himl, ii.hbmColor, ii.hbmMask); DeleteObject (ii.hbmColor); DeleteObject (ii.hbmMask); } DeleteObject (handle); return himl; } /************************************************************************* * ImageList_LoadImageW [COMCTL32.64] * * Creates an image list from a bitmap, icon or cursor. * * PARAMS * hi [I] instance handle * lpbmp [I] name or id of the image * cx [I] width of each image * cGrow [I] number of images to expand * clrMask [I] mask color * uType [I] type of image to load * uFlags [I] loading flags * * RETURNS * Success: handle to the loaded image list * Failure: NULL * * SEE * LoadImage () */ HIMAGELIST WINAPI ImageList_LoadImageW (HINSTANCE hi, LPCWSTR lpbmp, INT cx, INT cGrow, COLORREF clrMask, UINT uType, UINT uFlags) { HIMAGELIST himl = NULL; HANDLE handle; INT nImageCount; handle = LoadImageW (hi, lpbmp, uType, 0, 0, uFlags); if (!handle) { ERR("Error loading image!\n"); return NULL; } if (uType == IMAGE_BITMAP) { BITMAP bmp; GetObjectA (handle, sizeof(BITMAP), &bmp); nImageCount = bmp.bmWidth / cx; himl = ImageList_Create (cx, bmp.bmHeight, ILC_MASK | ILC_COLOR, nImageCount, cGrow); ImageList_AddMasked (himl, (HBITMAP)handle, clrMask); } else if ((uType == IMAGE_ICON) || (uType == IMAGE_CURSOR)) { ICONINFO ii; BITMAP bmp; GetIconInfo (handle, &ii); GetObjectA (ii.hbmMask, sizeof(BITMAP), (LPVOID)&bmp); himl = ImageList_Create (bmp.bmWidth, bmp.bmHeight, ILC_MASK | ILC_COLOR, 1, cGrow); ImageList_Add (himl, ii.hbmColor, ii.hbmMask); DeleteObject (ii.hbmColor); DeleteObject (ii.hbmMask); } DeleteObject (handle); return himl; } /************************************************************************* * ImageList_Merge [COMCTL32.65] * * Creates a new image list that contains a merged image from the specified * images of both source image lists. * * PARAMS * himl1 [I] handle to first image list * i1 [I] first image index * himl2 [I] handle to second image list * i2 [I] second image index * dx [I] X offset of the second image relative to the first. * dy [I] Y offset of the second image relative to the first. * * RETURNS * Success: handle of the merged image list. * Failure: NULL */ HIMAGELIST WINAPI ImageList_Merge (HIMAGELIST himl1, INT i1, HIMAGELIST himl2, INT i2, INT dx, INT dy) { HIMAGELIST himlDst = NULL; HDC hdcSrcImage, hdcDstImage; INT cxDst, cyDst; INT xOff1, yOff1, xOff2, yOff2; INT nX1, nX2; if ((himl1 == NULL) || (himl2 == NULL)) return NULL; /* check indices */ if ((i1 < 0) || (i1 >= himl1->cCurImage)) { ERR("Index 1 out of range! %d\n", i1); return NULL; } if ((i2 < 0) || (i2 >= himl2->cCurImage)) { ERR("Index 2 out of range! %d\n", i2); return NULL; } if (dx > 0) { cxDst = _MAX (himl1->cx, dx + himl2->cx); xOff1 = 0; xOff2 = dx; } else if (dx < 0) { cxDst = _MAX (himl2->cx, himl1->cx - dx); xOff1 = -dx; xOff2 = 0; } else { cxDst = _MAX (himl1->cx, himl2->cx); xOff1 = 0; xOff2 = 0; } if (dy > 0) { cyDst = _MAX (himl1->cy, dy + himl2->cy); yOff1 = 0; yOff2 = dy; } else if (dy < 0) { cyDst = _MAX (himl2->cy, himl1->cy - dy); yOff1 = -dy; yOff2 = 0; } else { cyDst = _MAX (himl1->cy, himl2->cy); yOff1 = 0; yOff2 = 0; } himlDst = ImageList_Create (cxDst, cyDst, ILC_MASK | ILC_COLOR, 1, 1); if (himlDst) { hdcSrcImage = CreateCompatibleDC (0); hdcDstImage = CreateCompatibleDC (0); nX1 = i1 * himl1->cx; nX2 = i2 * himl2->cx; /* copy image */ SelectObject (hdcSrcImage, himl1->hbmImage); SelectObject (hdcDstImage, himlDst->hbmImage); BitBlt (hdcDstImage, 0, 0, cxDst, cyDst, hdcSrcImage, 0, 0, BLACKNESS); BitBlt (hdcDstImage, xOff1, yOff1, himl1->cx, himl1->cy, hdcSrcImage, nX1, 0, SRCCOPY); SelectObject (hdcSrcImage, himl2->hbmMask); BitBlt (hdcDstImage, xOff2, yOff2, himl2->cx, himl2->cy, hdcSrcImage, nX2, 0, SRCAND); SelectObject (hdcSrcImage, himl2->hbmImage); BitBlt (hdcDstImage, xOff2, yOff2, himl2->cx, himl2->cy, hdcSrcImage, nX2, 0, SRCPAINT); /* copy mask */ SelectObject (hdcSrcImage, himl1->hbmMask); SelectObject (hdcDstImage, himlDst->hbmMask); BitBlt (hdcDstImage, 0, 0, cxDst, cyDst, hdcSrcImage, 0, 0, WHITENESS); BitBlt (hdcDstImage, xOff1, yOff1, himl1->cx, himl1->cy, hdcSrcImage, nX1, 0, SRCCOPY); SelectObject (hdcSrcImage, himl2->hbmMask); BitBlt (hdcDstImage, xOff2, yOff2, himl2->cx, himl2->cy, hdcSrcImage, nX2, 0, SRCAND); DeleteDC (hdcSrcImage); DeleteDC (hdcDstImage); } return himlDst; } /* helper for _read_bitmap currently unused */ #if 0 static int may_use_dibsection(HDC hdc) { int bitspixel = GetDeviceCaps(hdc,BITSPIXEL)*GetDeviceCaps(hdc,PLANES); if (bitspixel>8) return TRUE; if (bitspixel<=4) return FALSE; return GetDeviceCaps(hdc,94) & 0x10; } #endif /* helper for ImageList_Read, see comments below */ static HBITMAP _read_bitmap(LPSTREAM pstm,int ilcFlag,int cx,int cy) { HDC xdc = 0; BITMAPFILEHEADER bmfh; BITMAPINFOHEADER bmih; int bitsperpixel,palspace,longsperline,width,height; LPBITMAPINFOHEADER bmihc = NULL; int result = 0; HBITMAP hbitmap = 0; LPBYTE bits = NULL,nbits = NULL; int nbytesperline,bytesperline; if (!SUCCEEDED(IStream_Read ( pstm, &bmfh, sizeof(bmfh), NULL)) || (bmfh.bfType != (('M'<<8)|'B')) || !SUCCEEDED(IStream_Read ( pstm, &bmih, sizeof(bmih), NULL)) || (bmih.biSize != sizeof(bmih)) ) return 0; bitsperpixel = bmih.biPlanes * bmih.biBitCount; if (bitsperpixel<=8) palspace = (1<>5; bmihc->biSizeImage = (longsperline*height)<<2; /* read the palette right after the end of the bitmapinfoheader */ if (palspace) if (!SUCCEEDED(IStream_Read ( pstm, bmihc+1, palspace, NULL))) goto ret1; xdc = GetDC(0); #if 0 /* Magic for NxM -> 1x(N*M) not implemented for DIB Sections */ if ((bitsperpixel>1) && ((ilcFlag!=ILC_COLORDDB) && (!ilcFlag || may_use_dibsection(xdc))) ) { hbitmap = CreateDIBSection(xdc,(BITMAPINFO*)bmihc,0,(LPVOID*)&bits,0,0); if (!hbitmap) goto ret1; if (!SUCCEEDED(IStream_Read( pstm, bits, bmihc->biSizeImage, NULL))) goto ret1; result = 1; } else #endif { int i,nwidth,nheight; nwidth = width*(height/cy); nheight = cy; if (bitsperpixel==1) hbitmap = CreateBitmap(nwidth,nheight,1,1,NULL); else hbitmap = CreateCompatibleBitmap(xdc,nwidth,nheight); /* Might be a bit excessive memory use here */ bits = (LPBYTE)LocalAlloc(LMEM_ZEROINIT,bmihc->biSizeImage); nbits = (LPBYTE)LocalAlloc(LMEM_ZEROINIT,bmihc->biSizeImage); if (!SUCCEEDED(IStream_Read ( pstm, bits, bmihc->biSizeImage, NULL))) goto ret1; /* Copy the NxM bitmap into a 1x(N*M) bitmap we need, linewise */ /* Do not forget that windows bitmaps are bottom->top */ bytesperline = longsperline*4; nbytesperline = (height/cy)*bytesperline; for (i=0;ibiWidth = nwidth; bmihc->biHeight = nheight; if (!SetDIBits(xdc,hbitmap,0,nheight,nbits,(BITMAPINFO*)bmihc,0)) goto ret1; LocalFree((HLOCAL)nbits); LocalFree((HLOCAL)bits); result = 1; } ret1: if (xdc) ReleaseDC(0,xdc); if (bmihc) LocalFree((HLOCAL)bmihc); if (!result) { if (hbitmap) { DeleteObject(hbitmap); hbitmap = 0; } } return hbitmap; } /************************************************************************* * ImageList_Read [COMCTL32.66] * * Reads an image list from a stream. * * PARAMS * pstm [I] pointer to a stream * * RETURNS * Success: handle to image list * Failure: NULL * * The format is like this: * ILHEAD ilheadstruct; * * for the color image part: * BITMAPFILEHEADER bmfh; * BITMAPINFOHEADER bmih; * only if it has a palette: * RGBQUAD rgbs[nr_of_paletted_colors]; * * BYTE colorbits[imagesize]; * * the following only if the ILC_MASK bit is set in ILHEAD.ilFlags: * BITMAPFILEHEADER bmfh_mask; * BITMAPINFOHEADER bmih_mask; * only if it has a palette (it usually does not): * RGBQUAD rgbs[nr_of_paletted_colors]; * * BYTE maskbits[imagesize]; * * CAVEAT: Those images are within a NxM bitmap, not the 1xN we expect. * _read_bitmap needs to convert them. */ HIMAGELIST WINAPI ImageList_Read (LPSTREAM pstm) { ILHEAD ilHead; HIMAGELIST himl; HBITMAP hbmColor=0,hbmMask=0; int i; if (!SUCCEEDED(IStream_Read (pstm, &ilHead, sizeof(ILHEAD), NULL))) return NULL; if (ilHead.usMagic != (('L' << 8) | 'I')) return NULL; if (ilHead.usVersion != 0x101) /* probably version? */ return NULL; #if 0 FIXME(" ilHead.cCurImage = %d\n",ilHead.cCurImage); FIXME(" ilHead.cMaxImage = %d\n",ilHead.cMaxImage); FIXME(" ilHead.cGrow = %d\n",ilHead.cGrow); FIXME(" ilHead.cx = %d\n",ilHead.cx); FIXME(" ilHead.cy = %d\n",ilHead.cy); FIXME(" ilHead.flags = %x\n",ilHead.flags); FIXME(" ilHead.ovls[0] = %d\n",ilHead.ovls[0]); FIXME(" ilHead.ovls[1] = %d\n",ilHead.ovls[1]); FIXME(" ilHead.ovls[2] = %d\n",ilHead.ovls[2]); FIXME(" ilHead.ovls[3] = %d\n",ilHead.ovls[3]); #endif hbmColor = _read_bitmap(pstm,ilHead.flags & ~ILC_MASK,ilHead.cx,ilHead.cy); if (!hbmColor) return NULL; if (ilHead.flags & ILC_MASK) { hbmMask = _read_bitmap(pstm,0,ilHead.cx,ilHead.cy); if (!hbmMask) { DeleteObject(hbmColor); return NULL; } } himl = ImageList_Create ( ilHead.cx, ilHead.cy, ilHead.flags, 1, /* initial */ ilHead.cGrow ); if (!himl) { DeleteObject(hbmColor); DeleteObject(hbmMask); return NULL; } himl->hbmImage = hbmColor; himl->hbmMask = hbmMask; himl->cCurImage = ilHead.cCurImage; himl->cMaxImage = ilHead.cMaxImage; ImageList_SetBkColor(himl,ilHead.bkcolor); for (i=0;i<4;i++) ImageList_SetOverlayImage(himl,ilHead.ovls[i],i+1); return himl; } /************************************************************************* * ImageList_Remove [COMCTL32.67] Removes an image from an image list * * PARAMS * himl [I] image list handle * i [I] image index * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI ImageList_Remove (HIMAGELIST himl, INT i) { HBITMAP hbmNewImage, hbmNewMask; HDC hdcSrc, hdcDst; INT cxNew, nCount; if ((i < -1) || (i >= himl->cCurImage)) { ERR("index out of range! %d\n", i); return FALSE; } if (himl->cCurImage == 0) { ERR("image list is already empty!\n"); return FALSE; } if (i == -1) { /* remove all */ TRACE("remove all!\n"); himl->cMaxImage = himl->cInitial + himl->cGrow; himl->cCurImage = 0; for (nCount = 0; nCount < MAX_OVERLAYIMAGE; nCount++) himl->nOvlIdx[nCount] = -1; DeleteObject (himl->hbmImage); himl->hbmImage = CreateBitmap (himl->cMaxImage * himl->cx, himl->cy, 1, himl->uBitsPixel, NULL); if (himl->hbmMask) { DeleteObject (himl->hbmMask); himl->hbmMask = CreateBitmap (himl->cMaxImage * himl->cx, himl->cy, 1, 1, NULL); } } else { /* delete one image */ TRACE("Remove single image! %d\n", i); /* create new bitmap(s) */ cxNew = (himl->cCurImage + himl->cGrow - 1) * himl->cx; TRACE(" - Number of images: %d / %d (Old/New)\n", himl->cCurImage, himl->cCurImage - 1); TRACE(" - Max. number of images: %d / %d (Old/New)\n", himl->cMaxImage, himl->cCurImage + himl->cGrow - 1); hbmNewImage = CreateBitmap (cxNew, himl->cy, 1, himl->uBitsPixel, NULL); if (himl->hbmMask) hbmNewMask = CreateBitmap (cxNew, himl->cy, 1, 1, NULL); else hbmNewMask = 0; /* Just to keep compiler happy! */ hdcSrc = CreateCompatibleDC (0); hdcDst = CreateCompatibleDC (0); /* copy all images and masks prior to the "removed" image */ if (i > 0) { TRACE("Pre image copy: Copy %d images\n", i); SelectObject (hdcSrc, himl->hbmImage); SelectObject (hdcDst, hbmNewImage); BitBlt (hdcDst, 0, 0, i * himl->cx, himl->cy, hdcSrc, 0, 0, SRCCOPY); if (himl->hbmMask) { SelectObject (hdcSrc, himl->hbmMask); SelectObject (hdcDst, hbmNewMask); BitBlt (hdcDst, 0, 0, i * himl->cx, himl->cy, hdcSrc, 0, 0, SRCCOPY); } } /* copy all images and masks behind the removed image */ if (i < himl->cCurImage - 1) { TRACE("Post image copy!\n"); SelectObject (hdcSrc, himl->hbmImage); SelectObject (hdcDst, hbmNewImage); BitBlt (hdcDst, i * himl->cx, 0, (himl->cCurImage - i - 1) * himl->cx, himl->cy, hdcSrc, (i + 1) * himl->cx, 0, SRCCOPY); if (himl->hbmMask) { SelectObject (hdcSrc, himl->hbmMask); SelectObject (hdcDst, hbmNewMask); BitBlt (hdcDst, i * himl->cx, 0, (himl->cCurImage - i - 1) * himl->cx, himl->cy, hdcSrc, (i + 1) * himl->cx, 0, SRCCOPY); } } DeleteDC (hdcSrc); DeleteDC (hdcDst); /* delete old images and insert new ones */ DeleteObject (himl->hbmImage); himl->hbmImage = hbmNewImage; if (himl->hbmMask) { DeleteObject (himl->hbmMask); himl->hbmMask = hbmNewMask; } himl->cCurImage--; himl->cMaxImage = himl->cCurImage + himl->cGrow; } return TRUE; } /************************************************************************* * ImageList_Replace [COMCTL32.68] * * Replaces an image in an image list with a new image. * * PARAMS * himl [I] handle to image list * i [I] image index * hbmImage [I] handle to image bitmap * hbmMask [I] handle to mask bitmap. Can be NULL. * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI ImageList_Replace (HIMAGELIST himl, INT i, HBITMAP hbmImage, HBITMAP hbmMask) { HDC hdcImageList, hdcImage; BITMAP bmp; if (himl == NULL) { ERR("Invalid image list handle!\n"); return FALSE; } if ((i >= himl->cCurImage) || (i < 0)) { ERR("Invalid image index!\n"); return FALSE; } hdcImageList = CreateCompatibleDC (0); hdcImage = CreateCompatibleDC (0); GetObjectA (hbmImage, sizeof(BITMAP), (LPVOID)&bmp); /* Replace Image */ SelectObject (hdcImageList, himl->hbmImage); SelectObject (hdcImage, hbmImage); StretchBlt (hdcImageList, i * himl->cx, 0, himl->cx, himl->cy, hdcImage, 0, 0, bmp.bmWidth, bmp.bmHeight, SRCCOPY); if (himl->hbmMask) { /* Replace Mask */ SelectObject (hdcImageList, himl->hbmMask); SelectObject (hdcImage, hbmMask); StretchBlt (hdcImageList, i * himl->cx, 0, himl->cx, himl->cy, hdcImage, 0, 0, bmp.bmWidth, bmp.bmHeight, SRCCOPY); /* Remove the background from the image */ SelectObject (hdcImageList, himl->hbmImage); StretchBlt (hdcImageList, i*himl->cx, 0, himl->cx, himl->cy, hdcImage, 0, 0, bmp.bmWidth, bmp.bmHeight, 0x220326); /* NOTSRCAND */ } DeleteDC (hdcImage); DeleteDC (hdcImageList); return TRUE; } /************************************************************************* * ImageList_ReplaceIcon [COMCTL32.69] * * Replaces an image in an image list using an icon. * * PARAMS * himl [I] handle to image list * i [I] image index * hIcon [I] handle to icon * * RETURNS * Success: index of the replaced image * Failure: -1 */ INT WINAPI ImageList_ReplaceIcon (HIMAGELIST himl, INT i, HICON hIcon) { HDC hdcImageList, hdcImage; INT nIndex; HICON hBestFitIcon; HBITMAP hbmOldSrc, hbmOldDst; ICONINFO ii; BITMAP bmp; TRACE("(0x%lx 0x%x 0x%x)\n", (DWORD)himl, i, hIcon); if (himl == NULL) return -1; if ((i >= himl->cCurImage) || (i < -1)) return -1; hBestFitIcon = CopyImage( hIcon, IMAGE_ICON, himl->cx, himl->cy, LR_COPYFROMRESOURCE); GetIconInfo (hBestFitIcon, &ii); if (ii.hbmMask == 0) ERR("no mask!\n"); if (ii.hbmColor == 0) ERR("no color!\n"); GetObjectA (ii.hbmMask, sizeof(BITMAP), (LPVOID)&bmp); if (i == -1) { if (himl->cCurImage + 1 >= himl->cMaxImage) IMAGELIST_InternalExpandBitmaps (himl, 1); nIndex = himl->cCurImage; himl->cCurImage++; } else nIndex = i; hdcImageList = CreateCompatibleDC (0); TRACE("hdcImageList=0x%x!\n", hdcImageList); if (hdcImageList == 0) ERR("invalid hdcImageList!\n"); hdcImage = CreateCompatibleDC (0); TRACE("hdcImage=0x%x!\n", hdcImage); if (hdcImage == 0) ERR("invalid hdcImage!\n"); hbmOldDst = SelectObject (hdcImageList, himl->hbmImage); SetTextColor( hdcImageList, RGB(0,0,0)); SetBkColor( hdcImageList, RGB(255,255,255)); hbmOldSrc = SelectObject (hdcImage, ii.hbmColor); StretchBlt (hdcImageList, nIndex * himl->cx, 0, himl->cx, himl->cy, hdcImage, 0, 0, bmp.bmWidth, bmp.bmHeight, SRCCOPY); if (himl->hbmMask) { SelectObject (hdcImageList, himl->hbmMask); SelectObject (hdcImage, ii.hbmMask); StretchBlt (hdcImageList, nIndex * himl->cx, 0, himl->cx, himl->cy, hdcImage, 0, 0, bmp.bmWidth, bmp.bmHeight, SRCCOPY); } SelectObject (hdcImage, hbmOldSrc); SelectObject (hdcImageList, hbmOldDst); if(hBestFitIcon) DestroyIcon(hBestFitIcon); if (hdcImageList) DeleteDC (hdcImageList); if (hdcImage) DeleteDC (hdcImage); if (ii.hbmColor) DeleteObject (ii.hbmColor); if (ii.hbmMask) DeleteObject (ii.hbmMask); return nIndex; } /************************************************************************* * ImageList_SetBkColor [COMCTL32.70] * * Sets the background color of an image list. * * PARAMS * himl [I] handle to image list * clrBk [I] background color * * RETURNS * Success: previous background color * Failure: CLR_NONE */ COLORREF WINAPI ImageList_SetBkColor (HIMAGELIST himl, COLORREF clrBk) { COLORREF clrOldBk; if (himl == NULL) return CLR_NONE; clrOldBk = himl->clrBk; himl->clrBk = clrBk; return clrOldBk; } /************************************************************************* * ImageList_SetDragCursorImage [COMCTL32.75] * * Combines the specified image with the current drag image * * PARAMS * himlDrag [I] handle to drag image list * iDrag [I] drag image index * dxHotspot [I] X position of the hot spot * dyHotspot [I] Y position of the hot spot * * RETURNS * Success: TRUE * Failure: FALSE * * BUGS * semi-stub. */ BOOL WINAPI ImageList_SetDragCursorImage (HIMAGELIST himlDrag, INT iDrag, INT dxHotspot, INT dyHotspot) { HIMAGELIST himlTemp; FIXME("semi-stub!\n"); if (himlInternalDrag == NULL) return FALSE; TRACE(" dxH=%d dyH=%d nX=%d nY=%d\n", dxHotspot, dyHotspot, nInternalDragHotspotX, nInternalDragHotspotY); himlTemp = ImageList_Merge (himlInternalDrag, 0, himlDrag, iDrag, dxHotspot, dyHotspot); ImageList_Destroy (himlInternalDrag); himlInternalDrag = himlTemp; nInternalDragHotspotX = dxHotspot; nInternalDragHotspotY = dyHotspot; return FALSE; } /************************************************************************* * ImageList_SetFilter [COMCTL32.76] * * Sets a filter (or does something completely different)!!??? * * PARAMS * himl [I] handle to image list * i [I] ??? * dwFilter [I] ??? * * RETURNS * Success: TRUE ??? * Failure: FALSE ??? * * BUGS * This is an UNDOCUMENTED function!!!! * empty stub. */ BOOL WINAPI ImageList_SetFilter (HIMAGELIST himl, INT i, DWORD dwFilter) { FIXME("(%p 0x%x 0x%lx):empty stub!\n", himl, i, dwFilter); return FALSE; } /************************************************************************* * ImageList_SetIconSize [COMCTL32.77] * * Sets the image size of the bitmap and deletes all images. * * PARAMS * himl [I] handle to image list * cx [I] image width * cy [I] image height * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI ImageList_SetIconSize (HIMAGELIST himl, INT cx, INT cy) { INT nCount; if (!himl) return FALSE; /* remove all images*/ himl->cMaxImage = himl->cInitial + himl->cGrow; himl->cCurImage = 0; himl->cx = cx; himl->cy = cy; /* initialize overlay mask indices */ for (nCount = 0; nCount < MAX_OVERLAYIMAGE; nCount++) himl->nOvlIdx[nCount] = -1; DeleteObject (himl->hbmImage); himl->hbmImage = CreateBitmap (himl->cMaxImage * himl->cx, himl->cy, 1, himl->uBitsPixel, NULL); if (himl->hbmMask) { DeleteObject (himl->hbmMask); himl->hbmMask = CreateBitmap (himl->cMaxImage * himl->cx, himl->cy, 1, 1, NULL); } return TRUE; } /************************************************************************* * ImageList_SetImageCount [COMCTL32.78] * * Resizes an image list to the specified number of images. * * PARAMS * himl [I] handle to image list * iImageCount [I] number of images in the image list * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI ImageList_SetImageCount (HIMAGELIST himl, INT iImageCount) { HDC hdcImageList, hdcBitmap; HBITMAP hbmNewBitmap; INT nNewCount, nCopyCount; if (!himl) return FALSE; if (himl->cCurImage >= iImageCount) return FALSE; if (himl->cMaxImage > iImageCount) return TRUE; nNewCount = iImageCount + himl->cGrow; nCopyCount = _MIN(himl->cCurImage, iImageCount); hdcImageList = CreateCompatibleDC (0); hdcBitmap = CreateCompatibleDC (0); hbmNewBitmap = CreateBitmap (nNewCount * himl->cx, himl->cy, 1, himl->uBitsPixel, NULL); if (hbmNewBitmap != 0) { SelectObject (hdcImageList, himl->hbmImage); SelectObject (hdcBitmap, hbmNewBitmap); /* copy images */ BitBlt (hdcBitmap, 0, 0, nCopyCount * himl->cx, himl->cy, hdcImageList, 0, 0, SRCCOPY); #if 0 /* delete 'empty' image space */ SetBkColor (hdcBitmap, RGB(255, 255, 255)); SetTextColor (hdcBitmap, RGB(0, 0, 0)); PatBlt (hdcBitmap, nCopyCount * himl->cx, 0, (nNewCount - nCopyCount) * himl->cx, himl->cy, BLACKNESS); #endif DeleteObject (himl->hbmImage); himl->hbmImage = hbmNewBitmap; } else ERR("Could not create new image bitmap !\n"); if (himl->hbmMask) { hbmNewBitmap = CreateBitmap (nNewCount * himl->cx, himl->cy, 1, 1, NULL); if (hbmNewBitmap != 0) { SelectObject (hdcImageList, himl->hbmMask); SelectObject (hdcBitmap, hbmNewBitmap); /* copy images */ BitBlt (hdcBitmap, 0, 0, nCopyCount * himl->cx, himl->cy, hdcImageList, 0, 0, SRCCOPY); #if 0 /* delete 'empty' image space */ SetBkColor (hdcBitmap, RGB(255, 255, 255)); SetTextColor (hdcBitmap, RGB(0, 0, 0)); PatBlt (hdcBitmap, nCopyCount * himl->cx, 0, (nNewCount - nCopyCount) * himl->cx, himl->cy, BLACKNESS); #endif DeleteObject (himl->hbmMask); himl->hbmMask = hbmNewBitmap; } else ERR("Could not create new mask bitmap!\n"); } DeleteDC (hdcImageList); DeleteDC (hdcBitmap); /* Update max image count and current image count */ himl->cMaxImage = nNewCount; if (himl->cCurImage > nCopyCount) himl->cCurImage = nCopyCount; return TRUE; } /************************************************************************* * ImageList_SetOverlayImage [COMCTL32.79] * * Assigns an overlay mask index to an existing image in an image list. * * PARAMS * himl [I] handle to image list * iImage [I] image index * iOverlay [I] overlay mask index * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI ImageList_SetOverlayImage (HIMAGELIST himl, INT iImage, INT iOverlay) { if (!himl) return FALSE; if ((iOverlay < 1) || (iOverlay > MAX_OVERLAYIMAGE)) return FALSE; if ((iImage!=-1) && ((iImage < 0) || (iImage > himl->cCurImage))) return FALSE; himl->nOvlIdx[iOverlay - 1] = iImage; return TRUE; } /************************************************************************* * ImageList_Write [COMCTL32.80] * * Writes an image list to a stream. * * PARAMS * himl [I] handle to image list * pstm [O] Pointer to a stream. * * RETURNS * Success: TRUE * Failure: FALSE * * NOTES * This function can not be implemented yet, because * IStream32::Write is not implemented. * * BUGS * empty stub. */ BOOL WINAPI ImageList_Write (HIMAGELIST himl, LPSTREAM pstm) { if (!himl) return FALSE; FIXME("empty stub!\n"); return FALSE; } wine-20000526/dlls/comctl32/ipaddress.c0100644000175000001440000004220207106136275017157 0ustar julliardusers/* * IP Address control * * Copyright 1999 Chris Morgan and * James Abbatiello * Copyright 1998, 1999 Eric Kohl * Copyright 1998 Alex Priem * * NOTES * * TODO: * -Edit control doesn't support the ES_CENTER style which prevents * this ipaddress control from having centered text look like the * windows ipaddress control * -Check all notifications/behavior. * -Optimization: * -include lpipsi in IPADDRESS_INFO. * -CurrentFocus: field that has focus at moment of processing. * -connect Rect32 rcClient. * -check ipaddress.cpp for missing features. * -refresh: draw '.' instead of setpixel. */ #include #include #include #include "winbase.h" #include "commctrl.h" #include "ipaddress.h" #include "heap.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ipaddress); #define IPADDRESS_GetInfoPtr(hwnd) ((IPADDRESS_INFO *)GetWindowLongA (hwnd, 0)) static BOOL IPADDRESS_SendNotify (HWND hwnd, UINT command); static BOOL IPADDRESS_SendIPAddressNotify (HWND hwnd, UINT field, BYTE newValue); /* property name of tooltip window handle */ #define IP_SUBCLASS_PROP "CCIP32SubclassInfo" static LRESULT CALLBACK IPADDRESS_SubclassProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam); static VOID IPADDRESS_Refresh (HWND hwnd, HDC hdc) { RECT rcClient; HBRUSH hbr; COLORREF clr=GetSysColor (COLOR_3DDKSHADOW); int i,x,fieldsize; GetClientRect (hwnd, &rcClient); hbr = CreateSolidBrush (RGB(255,255,255)); DrawEdge (hdc, &rcClient, EDGE_SUNKEN, BF_RECT | BF_ADJUST); FillRect (hdc, &rcClient, hbr); DeleteObject (hbr); x=rcClient.left; fieldsize=(rcClient.right-rcClient.left) / 4; for (i=0; i<3; i++) { /* Should draw text "." here */ x+=fieldsize; SetPixel (hdc, x, 13, clr); SetPixel (hdc, x, 14, clr); SetPixel (hdc, x+1, 13, clr); SetPixel (hdc, x+1, 14, clr); } } static LRESULT IPADDRESS_Create (HWND hwnd, WPARAM wParam, LPARAM lParam) { IPADDRESS_INFO *infoPtr; RECT rcClient, edit; int i,fieldsize; LPIP_SUBCLASS_INFO lpipsi; infoPtr = (IPADDRESS_INFO *)COMCTL32_Alloc (sizeof(IPADDRESS_INFO)); SetWindowLongA (hwnd, 0, (DWORD)infoPtr); GetClientRect (hwnd, &rcClient); fieldsize=(rcClient.right-rcClient.left) /4; edit.top =rcClient.top+2; edit.bottom=rcClient.bottom-2; lpipsi=(LPIP_SUBCLASS_INFO) GetPropA ((HWND)hwnd, IP_SUBCLASS_PROP); if (lpipsi == NULL) { lpipsi = (LPIP_SUBCLASS_INFO) COMCTL32_Alloc (sizeof(IP_SUBCLASS_INFO)); lpipsi->hwnd = hwnd; lpipsi->uRefCount++; SetPropA ((HWND)hwnd, IP_SUBCLASS_PROP, (HANDLE)lpipsi); /* infoPtr->lpipsi= lpipsi; */ } else WARN("IP-create called twice\n"); for (i=0; i<=3; i++) { infoPtr->LowerLimit[i]=0; infoPtr->UpperLimit[i]=255; edit.left=rcClient.left+i*fieldsize+6; edit.right=rcClient.left+(i+1)*fieldsize-2; lpipsi->hwndIP[i]= CreateWindowA ("edit", NULL, WS_CHILD | WS_VISIBLE | ES_CENTER, edit.left, edit.top, edit.right-edit.left, edit.bottom-edit.top, hwnd, (HMENU) 1, GetWindowLongA (hwnd, GWL_HINSTANCE), NULL); lpipsi->wpOrigProc[i]= (WNDPROC) SetWindowLongA (lpipsi->hwndIP[i],GWL_WNDPROC, (LONG) IPADDRESS_SubclassProc); SetPropA ((HWND)lpipsi->hwndIP[i], IP_SUBCLASS_PROP, (HANDLE)lpipsi); } lpipsi->infoPtr= infoPtr; return 0; } static LRESULT IPADDRESS_Destroy (HWND hwnd, WPARAM wParam, LPARAM lParam) { int i; IPADDRESS_INFO *infoPtr = IPADDRESS_GetInfoPtr (hwnd); LPIP_SUBCLASS_INFO lpipsi=(LPIP_SUBCLASS_INFO) GetPropA ((HWND)hwnd, IP_SUBCLASS_PROP); for (i=0; i<=3; i++) { SetWindowLongA ((HWND)lpipsi->hwndIP[i], GWL_WNDPROC, (LONG)lpipsi->wpOrigProc[i]); } COMCTL32_Free (infoPtr); SetWindowLongA (hwnd, 0, 0); return 0; } static LRESULT IPADDRESS_KillFocus (HWND hwnd, WPARAM wParam, LPARAM lParam) { HDC hdc; TRACE("\n"); hdc = GetDC (hwnd); IPADDRESS_Refresh (hwnd, hdc); ReleaseDC (hwnd, hdc); IPADDRESS_SendIPAddressNotify (hwnd, 0, 0); /* FIXME: should use -1 */ IPADDRESS_SendNotify (hwnd, EN_KILLFOCUS); InvalidateRect (hwnd, NULL, TRUE); return 0; } static LRESULT IPADDRESS_Paint (HWND hwnd, WPARAM wParam) { HDC hdc; PAINTSTRUCT ps; hdc = wParam==0 ? BeginPaint (hwnd, &ps) : (HDC)wParam; IPADDRESS_Refresh (hwnd, hdc); if(!wParam) EndPaint (hwnd, &ps); return 0; } static LRESULT IPADDRESS_SetFocus (HWND hwnd, WPARAM wParam, LPARAM lParam) { HDC hdc; TRACE("\n"); hdc = GetDC (hwnd); IPADDRESS_Refresh (hwnd, hdc); ReleaseDC (hwnd, hdc); return 0; } static LRESULT IPADDRESS_Size (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* IPADDRESS_INFO *infoPtr = IPADDRESS_GetInfoPtr (hwnd); */ TRACE("\n"); return 0; } static BOOL IPADDRESS_SendNotify (HWND hwnd, UINT command) { TRACE("%x\n",command); return (BOOL)SendMessageA (GetParent (hwnd), WM_COMMAND, MAKEWPARAM (GetWindowLongA (hwnd, GWL_ID),command), (LPARAM)hwnd); } static BOOL IPADDRESS_SendIPAddressNotify (HWND hwnd, UINT field, BYTE newValue) { NMIPADDRESS nmip; TRACE("%x %x\n",field,newValue); nmip.hdr.hwndFrom = hwnd; nmip.hdr.idFrom = GetWindowLongA (hwnd, GWL_ID); nmip.hdr.code = IPN_FIELDCHANGED; nmip.iField=field; nmip.iValue=newValue; return (BOOL)SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM)nmip.hdr.idFrom, (LPARAM)&nmip); } static LRESULT IPADDRESS_ClearAddress (HWND hwnd, WPARAM wParam, LPARAM lParam) { int i; HDC hdc; char buf[1]; LPIP_SUBCLASS_INFO lpipsi=(LPIP_SUBCLASS_INFO) GetPropA ((HWND)hwnd,IP_SUBCLASS_PROP); TRACE("\n"); buf[0]=0; for (i=0; i<=3; i++) SetWindowTextA (lpipsi->hwndIP[i],buf); hdc = GetDC (hwnd); IPADDRESS_Refresh (hwnd, hdc); ReleaseDC (hwnd, hdc); return 0; } static LRESULT IPADDRESS_IsBlank (HWND hwnd, WPARAM wParam, LPARAM lParam) { int i; char buf[20]; LPIP_SUBCLASS_INFO lpipsi=(LPIP_SUBCLASS_INFO) GetPropA ((HWND)hwnd, IP_SUBCLASS_PROP); TRACE("\n"); for (i=0; i<=3; i++) { GetWindowTextA (lpipsi->hwndIP[i],buf,5); if (buf[0]) return 0; } return 1; } static LRESULT IPADDRESS_GetAddress (HWND hwnd, WPARAM wParam, LPARAM lParam) { char field[20]; int i,valid,fieldvalue; DWORD ip_addr; IPADDRESS_INFO *infoPtr = IPADDRESS_GetInfoPtr (hwnd); LPIP_SUBCLASS_INFO lpipsi=(LPIP_SUBCLASS_INFO) GetPropA ((HWND)hwnd, IP_SUBCLASS_PROP); TRACE("\n"); valid=0; ip_addr=0; for (i=0; i<=3; i++) { GetWindowTextA (lpipsi->hwndIP[i],field,4); ip_addr*=256; if (field[0]) { field[3]=0; fieldvalue=atoi(field); if (fieldvalueLowerLimit[i]) fieldvalue=infoPtr->LowerLimit[i]; if (fieldvalue>infoPtr->UpperLimit[i]) fieldvalue=infoPtr->UpperLimit[i]; ip_addr+=fieldvalue; valid++; } } *(LPDWORD) lParam=ip_addr; return valid; } static LRESULT IPADDRESS_SetRange (HWND hwnd, WPARAM wParam, LPARAM lParam) { IPADDRESS_INFO *infoPtr = IPADDRESS_GetInfoPtr (hwnd); INT index; TRACE("\n"); index=(INT) wParam; if ((index<0) || (index>3)) return 0; infoPtr->LowerLimit[index]=lParam & 0xff; infoPtr->UpperLimit[index]=(lParam >>8) & 0xff; return 1; } static LRESULT IPADDRESS_SetAddress (HWND hwnd, WPARAM wParam, LPARAM lParam) { IPADDRESS_INFO *infoPtr = IPADDRESS_GetInfoPtr (hwnd); HDC hdc; LPIP_SUBCLASS_INFO lpipsi=(LPIP_SUBCLASS_INFO) GetPropA ((HWND)hwnd, IP_SUBCLASS_PROP); int i,ip_address,value; char buf[20]; TRACE("\n"); ip_address=(DWORD) lParam; for (i=3; i>=0; i--) { value=ip_address & 0xff; if ((value>=infoPtr->LowerLimit[i]) && (value<=infoPtr->UpperLimit[i])) { sprintf (buf,"%d",value); SetWindowTextA (lpipsi->hwndIP[i],buf); IPADDRESS_SendNotify (hwnd, EN_CHANGE); } ip_address/=256; } hdc = GetDC (hwnd); /* & send notifications */ IPADDRESS_Refresh (hwnd, hdc); ReleaseDC (hwnd, hdc); return TRUE; } static LRESULT IPADDRESS_SetFocusToField (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* IPADDRESS_INFO *infoPtr = IPADDRESS_GetInfoPtr (hwnd); */ LPIP_SUBCLASS_INFO lpipsi=(LPIP_SUBCLASS_INFO) GetPropA ((HWND)hwnd, IP_SUBCLASS_PROP); INT index; index=(INT) wParam; TRACE(" %d\n", index); if ((index<0) || (index>3)) return 0; SetFocus (lpipsi->hwndIP[index]); return 1; } static LRESULT IPADDRESS_LButtonDown (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACE("\n"); SetFocus (hwnd); IPADDRESS_SendNotify (hwnd, EN_SETFOCUS); IPADDRESS_SetFocusToField (hwnd, 0, 0); return TRUE; } static INT IPADDRESS_CheckField (LPIP_SUBCLASS_INFO lpipsi, int currentfield) { int newField,fieldvalue; char field[20]; IPADDRESS_INFO *infoPtr=lpipsi->infoPtr; if(currentfield >= 0 && currentfield < 4) { TRACE("\n"); GetWindowTextA (lpipsi->hwndIP[currentfield],field,4); if (field[0]) { field[3]=0; newField=-1; fieldvalue=atoi(field); if (fieldvalue < infoPtr->LowerLimit[currentfield]) newField=infoPtr->LowerLimit[currentfield]; if (fieldvalue > infoPtr->UpperLimit[currentfield]) newField=infoPtr->UpperLimit[currentfield]; if (newField >= 0) { sprintf (field,"%d",newField); SetWindowTextA (lpipsi->hwndIP[currentfield], field); return TRUE; } } } return FALSE; } static INT IPADDRESS_GotoNextField (LPIP_SUBCLASS_INFO lpipsi, int currentfield) { if(currentfield >= -1 && currentfield < 4) { IPADDRESS_CheckField(lpipsi, currentfield); /* check the fields value */ if(currentfield < 3) { SetFocus (lpipsi->hwndIP[currentfield+1]); return TRUE; } } return FALSE; } /* period: move and select the text in the next field to the right if */ /* the current field is not empty(l!=0), we are not in the */ /* left most position, and nothing is selected(startsel==endsel) */ /* spacebar: same behavior as period */ /* alpha characters: completely ignored */ /* digits: accepted when field text length < 2 ignored otherwise. */ /* when 3 numbers have been entered into the field the value */ /* of the field is checked, if the field value exceeds the */ /* maximum value and is changed the field remains the current */ /* field, otherwise focus moves to the field to the right */ /* tab: change focus from the current ipaddress control to the next */ /* control in the tab order */ /* right arrow: move to the field on the right to the left most */ /* position in that field if no text is selected, */ /* we are in the right most position in the field, */ /* we are not in the right most field */ /* left arrow: move to the field on the left to the right most */ /* position in that field if no text is selected, */ /* we are in the left most position in the current field */ /* and we are not in the left most field */ /* backspace: delete the character to the left of the cursor position, */ /* if none are present move to the field on the left if */ /* we are not in the left most field and delete the right */ /* most digit in that field while keeping the cursor */ /* on the right side of the field */ LRESULT CALLBACK IPADDRESS_SubclassProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { IPADDRESS_INFO *infoPtr; LPIP_SUBCLASS_INFO lpipsi = (LPIP_SUBCLASS_INFO) GetPropA ((HWND)hwnd,IP_SUBCLASS_PROP); CHAR c = (CHAR)wParam; INT i, l, index, startsel, endsel; infoPtr = lpipsi->infoPtr; index=0; /* FIXME */ for (i=0; i<=3; i++) if (lpipsi->hwndIP[i]==hwnd) index=i; switch (uMsg) { case WM_CHAR: if(isdigit(c)) /* process all digits */ { int return_val; SendMessageA(lpipsi->hwndIP[index], EM_GETSEL, (WPARAM)&startsel, (LPARAM)&endsel); l = GetWindowTextLengthA (lpipsi->hwndIP[index]); if(l==2 && startsel==endsel) /* field is full after this key is processed */ { /* process the digit press before we check the field */ return_val = CallWindowProcA (lpipsi->wpOrigProc[index], hwnd, uMsg, wParam, lParam); /* if the field value was changed stay at the current field */ if(!IPADDRESS_CheckField(lpipsi, index)) IPADDRESS_GotoNextField (lpipsi,index); return return_val; } if(l > 2) /* field is full, stop key messages */ { lParam = 0; wParam = 0; } break; } if(c == '.') /* VK_PERIOD */ { l = GetWindowTextLengthA(lpipsi->hwndIP[index]); SendMessageA(lpipsi->hwndIP[index], EM_GETSEL, (WPARAM)&startsel, (LPARAM)&endsel); if(l != 0 && startsel==endsel && startsel != 0) { IPADDRESS_GotoNextField(lpipsi, index); SendMessageA(lpipsi->hwndIP[index+1], EM_SETSEL, (WPARAM)0, (LPARAM)3); } } /* stop all other characters */ wParam = 0; lParam = 0; break; case WM_KEYDOWN: if(c == VK_SPACE) { l = GetWindowTextLengthA(lpipsi->hwndIP[index]); SendMessageA(lpipsi->hwndIP[index], EM_GETSEL, (WPARAM)&startsel, (LPARAM)&endsel); if(l != 0 && startsel==endsel && startsel != 0) { IPADDRESS_GotoNextField(lpipsi, index); SendMessageA(lpipsi->hwndIP[index+1], EM_SETSEL, (WPARAM)0, (LPARAM)3); } } if(c == VK_RIGHT) { SendMessageA(lpipsi->hwndIP[index], EM_GETSEL, (WPARAM)&startsel, (LPARAM)&endsel); l = GetWindowTextLengthA (lpipsi->hwndIP[index]); if(startsel==endsel && startsel==l) { IPADDRESS_GotoNextField(lpipsi, index); SendMessageA(lpipsi->hwndIP[index+1], EM_SETSEL, (WPARAM)0,(LPARAM)0); } } if(c == VK_LEFT) { SendMessageA(lpipsi->hwndIP[index], EM_GETSEL, (WPARAM)&startsel, (LPARAM)&endsel); if(startsel==0 && startsel==endsel && index > 0) { IPADDRESS_GotoNextField(lpipsi, index - 2); l = GetWindowTextLengthA(lpipsi->hwndIP[index-1]); SendMessageA(lpipsi->hwndIP[index-1], EM_SETSEL, (WPARAM)l,(LPARAM)l); } } if(c == VK_BACK) /* VK_BACKSPACE */ { CHAR buf[4]; SendMessageA(lpipsi->hwndIP[index], EM_GETSEL, (WPARAM)&startsel, (LPARAM)&endsel); l = GetWindowTextLengthA (lpipsi->hwndIP[index]); if(startsel==endsel && startsel==0 && index > 0) { l = GetWindowTextLengthA(lpipsi->hwndIP[index-1]); if(l!=0) { GetWindowTextA (lpipsi->hwndIP[index-1],buf,4); buf[l-1] = '\0'; SetWindowTextA(lpipsi->hwndIP[index-1], buf); SendMessageA(lpipsi->hwndIP[index-1], EM_SETSEL, (WPARAM)l,(LPARAM)l); } IPADDRESS_GotoNextField(lpipsi, index - 2); } } break; default: break; } return CallWindowProcA (lpipsi->wpOrigProc[index], hwnd, uMsg, wParam, lParam); } static LRESULT WINAPI IPADDRESS_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TRACE("hwnd=%x msg=%x wparam=%x lparam=%lx\n", hwnd, uMsg, wParam, lParam); if (!IPADDRESS_GetInfoPtr (hwnd) && (uMsg != WM_CREATE)) return DefWindowProcA (hwnd, uMsg, wParam, lParam); switch (uMsg) { case IPM_CLEARADDRESS: return IPADDRESS_ClearAddress (hwnd, wParam, lParam); case IPM_SETADDRESS: return IPADDRESS_SetAddress (hwnd, wParam, lParam); case IPM_GETADDRESS: return IPADDRESS_GetAddress (hwnd, wParam, lParam); case IPM_SETRANGE: return IPADDRESS_SetRange (hwnd, wParam, lParam); case IPM_SETFOCUS: return IPADDRESS_SetFocusToField (hwnd, wParam, lParam); case IPM_ISBLANK: return IPADDRESS_IsBlank (hwnd, wParam, lParam); case WM_CREATE: return IPADDRESS_Create (hwnd, wParam, lParam); case WM_DESTROY: return IPADDRESS_Destroy (hwnd, wParam, lParam); case WM_GETDLGCODE: return DLGC_WANTARROWS | DLGC_WANTCHARS; case WM_KILLFOCUS: return IPADDRESS_KillFocus (hwnd, wParam, lParam); case WM_LBUTTONDOWN: return IPADDRESS_LButtonDown (hwnd, wParam, lParam); case WM_PAINT: return IPADDRESS_Paint (hwnd, wParam); case WM_SETFOCUS: return IPADDRESS_SetFocus (hwnd, wParam, lParam); case WM_SIZE: return IPADDRESS_Size (hwnd, wParam, lParam); default: if (uMsg >= WM_USER) ERR("unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); return DefWindowProcA (hwnd, uMsg, wParam, lParam); } return 0; } void IPADDRESS_Register (void) { WNDCLASSA wndClass; ZeroMemory (&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS; wndClass.lpfnWndProc = (WNDPROC)IPADDRESS_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(IPADDRESS_INFO *); wndClass.hCursor = LoadCursorA (0, IDC_ARROWA); wndClass.hbrBackground = (HBRUSH)(COLOR_3DFACE + 1); wndClass.lpszClassName = WC_IPADDRESSA; RegisterClassA (&wndClass); } VOID IPADDRESS_Unregister (void) { UnregisterClassA (WC_IPADDRESSA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/listview.c0100644000175000001440000056723207112646561017067 0ustar julliardusers/* * Listview control * * Copyright 1998, 1999 Eric Kohl * Copyright 1999 Luc Tourangeau * * NOTES * Listview control implementation. * * TODO: * 1. No horizontal scrolling when header is larger than the client area. * 2. Drawing optimizations. * 3. Hot item handling. * * Notifications: * LISTVIEW_Notify : most notifications from children (editbox and header) * * Data structure: * LISTVIEW_SetItemCount : not completed * * Unicode: * LISTVIEW_SetItemW : no unicode support * LISTVIEW_InsertItemW : no unicode support * LISTVIEW_InsertColumnW : no unicode support * LISTVIEW_GetColumnW : no unicode support * LISTVIEW_SetColumnW : no unicode support * * Advanced functionality: * LISTVIEW_GetNumberOfWorkAreas : not implemented * LISTVIEW_GetHotCursor : not implemented * LISTVIEW_GetISearchString : not implemented * LISTVIEW_GetBkImage : not implemented * LISTVIEW_GetColumnOrderArray : simple hack only * LISTVIEW_SetColumnOrderArray : simple hack only * LISTVIEW_Arrange : empty stub * LISTVIEW_ApproximateViewRect : incomplete * LISTVIEW_Scroll : not implemented * LISTVIEW_RedrawItems : empty stub * LISTVIEW_Update : not completed */ #include #include "winbase.h" #include "heap.h" #include "commctrl.h" #include "listview.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(listview) /* * constants */ /* maximum size of a label */ #define DISP_TEXT_SIZE 512 /* padding for items in list and small icon display modes */ #define WIDTH_PADDING 12 /* padding for items in list, report and small icon display modes */ #define HEIGHT_PADDING 1 /* offset of items in report display mode */ #define REPORT_MARGINX 2 /* padding for icon in large icon display mode */ #define ICON_TOP_PADDING 2 #define ICON_BOTTOM_PADDING 2 /* padding for label in large icon display mode */ #define LABEL_VERT_OFFSET 2 /* default label width for items in list and small icon display modes */ #define DEFAULT_LABEL_WIDTH 40 /* default column width for items in list display mode */ #define DEFAULT_COLUMN_WIDTH 96 /* Increment size of the horizontal scroll bar */ #define LISTVIEW_SCROLL_DIV_SIZE 10 /* * macros */ #define GETITEMCOUNT(infoPtr) ((infoPtr)->hdpaItems->nItemCount) #define ListView_LVNotify(hwnd,lCtrlId,plvnm) \ (BOOL)SendMessageA((hwnd),WM_NOTIFY,(WPARAM)(INT)lCtrlId,(LPARAM)(LPNMLISTVIEW)(plvnm)) #define ListView_Notify(hwnd,lCtrlId,pnmh) \ (BOOL)SendMessageA((hwnd),WM_NOTIFY,(WPARAM)(INT)lCtrlId,(LPARAM)(LPNMHDR)(pnmh)) /* retrieve the number of items in the listview */ #define GETITEMCOUNT(infoPtr) ((infoPtr)->hdpaItems->nItemCount) HWND CreateEditLabel(LPCSTR text, DWORD style, INT x, INT y, INT width, INT height, HWND parent, HINSTANCE hinst, EditlblCallback EditLblCb, DWORD param); /* * forward declarations */ static LRESULT LISTVIEW_GetItemA(HWND hwnd, LPLVITEMA lpLVItem, BOOL internal); static INT LISTVIEW_HitTestItem(HWND, LPLVHITTESTINFO); static INT LISTVIEW_GetCountPerRow(HWND); static INT LISTVIEW_GetCountPerColumn(HWND); static VOID LISTVIEW_AlignLeft(HWND); static VOID LISTVIEW_AlignTop(HWND); static VOID LISTVIEW_AddGroupSelection(HWND, INT); static VOID LISTVIEW_AddSelection(HWND, INT); static BOOL LISTVIEW_AddSubItem(HWND, LPLVITEMA); static INT LISTVIEW_FindInsertPosition(HDPA, INT); static INT LISTVIEW_GetItemHeight(HWND); static BOOL LISTVIEW_GetItemPosition(HWND, INT, LPPOINT); static LRESULT LISTVIEW_GetItemRect(HWND, INT, LPRECT); static INT LISTVIEW_GetItemWidth(HWND); static INT LISTVIEW_GetLabelWidth(HWND, INT); static LRESULT LISTVIEW_GetOrigin(HWND, LPPOINT); static INT LISTVIEW_CalculateWidth(HWND hwnd, INT nItem); static LISTVIEW_SUBITEM* LISTVIEW_GetSubItem(HDPA, INT); static LRESULT LISTVIEW_GetViewRect(HWND, LPRECT); static BOOL LISTVIEW_InitItem(HWND, LISTVIEW_ITEM *, LPLVITEMA); static BOOL LISTVIEW_InitSubItem(HWND, LISTVIEW_SUBITEM *, LPLVITEMA); static LRESULT LISTVIEW_MouseSelection(HWND, POINT); static BOOL LISTVIEW_RemoveColumn(HDPA, INT); static VOID LISTVIEW_RemoveSelections(HWND, INT, INT); static BOOL LISTVIEW_RemoveSubItem(HDPA, INT); static VOID LISTVIEW_SetGroupSelection(HWND, INT); static BOOL LISTVIEW_SetItem(HWND, LPLVITEMA); static BOOL LISTVIEW_SetItemFocus(HWND, INT); static BOOL LISTVIEW_SetItemPosition(HWND, INT, INT, INT); static VOID LISTVIEW_UpdateScroll(HWND); static VOID LISTVIEW_SetSelection(HWND, INT); static VOID LISTVIEW_UpdateSize(HWND); static BOOL LISTVIEW_SetSubItem(HWND, LPLVITEMA); static LRESULT LISTVIEW_SetViewRect(HWND, LPRECT); static BOOL LISTVIEW_ToggleSelection(HWND, INT); static VOID LISTVIEW_UnsupportedStyles(LONG lStyle); static HWND LISTVIEW_EditLabelA(HWND hwnd, INT nItem); static BOOL LISTVIEW_EndEditLabel(HWND hwnd, LPSTR pszText, DWORD nItem); static LRESULT LISTVIEW_Command(HWND hwnd, WPARAM wParam, LPARAM lParam); static LRESULT LISTVIEW_SortItems(HWND hwnd, WPARAM wParam, LPARAM lParam); static LRESULT LISTVIEW_GetStringWidthA(HWND hwnd, LPCSTR lpszText); /************************************************************************* * LISTVIEW_UpdateHeaderSize [Internal] * * Function to resize the header control * * PARAMS * hwnd [I] handle to a window * nNewScrollPos [I] Scroll Pos to Set * * RETURNS * nothing * * NOTES */ static VOID LISTVIEW_UpdateHeaderSize(HWND hwnd, INT nNewScrollPos) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); RECT winRect; POINT point[2]; GetWindowRect(infoPtr->hwndHeader, &winRect); point[0].x = winRect.left; point[0].y = winRect.top; point[1].x = winRect.right; point[1].y = winRect.bottom; MapWindowPoints(HWND_DESKTOP, hwnd, point, 2); point[0].x = -(nNewScrollPos * LISTVIEW_SCROLL_DIV_SIZE); point[1].x += (nNewScrollPos * LISTVIEW_SCROLL_DIV_SIZE); SetWindowPos(infoPtr->hwndHeader,0, point[0].x,point[0].y,point[1].x,point[1].y, SWP_NOZORDER | SWP_NOACTIVATE); } /*** * DESCRIPTION: * Update the scrollbars. This functions should be called whenever * the content, size or view changes. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * None */ static VOID LISTVIEW_UpdateScroll(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); UINT uView = lStyle & LVS_TYPEMASK; INT nListHeight = infoPtr->rcList.bottom - infoPtr->rcList.top; INT nListWidth = infoPtr->rcList.right - infoPtr->rcList.left; SCROLLINFO scrollInfo; ZeroMemory(&scrollInfo, sizeof(SCROLLINFO)); scrollInfo.cbSize = sizeof(SCROLLINFO); if (uView == LVS_LIST) { /* update horizontal scrollbar */ INT nCountPerColumn = LISTVIEW_GetCountPerColumn(hwnd); INT nCountPerRow = LISTVIEW_GetCountPerRow(hwnd); INT nNumOfItems = GETITEMCOUNT(infoPtr); scrollInfo.nMax = nNumOfItems / nCountPerColumn; if((nNumOfItems % nCountPerColumn) == 0) { scrollInfo.nMax--; } scrollInfo.nPos = ListView_GetTopIndex(hwnd) / nCountPerColumn; scrollInfo.nPage = nCountPerRow; scrollInfo.fMask = SIF_RANGE | SIF_POS | SIF_PAGE; SetScrollInfo(hwnd, SB_HORZ, &scrollInfo, TRUE); } else if (uView == LVS_REPORT) { /* update vertical scrollbar */ scrollInfo.nMin = 0; scrollInfo.nMax = GETITEMCOUNT(infoPtr) - 1; scrollInfo.nPos = ListView_GetTopIndex(hwnd); scrollInfo.nPage = LISTVIEW_GetCountPerColumn(hwnd); scrollInfo.fMask = SIF_RANGE | SIF_POS | SIF_PAGE; SetScrollInfo(hwnd, SB_VERT, &scrollInfo, TRUE); /* update horizontal scrollbar */ nListWidth = infoPtr->rcList.right - infoPtr->rcList.left; if (GetScrollInfo(hwnd, SB_HORZ, &scrollInfo) == FALSE || GETITEMCOUNT(infoPtr) == 0) { scrollInfo.nPos = 0; } scrollInfo.nMin = 0; scrollInfo.fMask = SIF_RANGE | SIF_POS | SIF_PAGE ; scrollInfo.nPage = nListWidth / LISTVIEW_SCROLL_DIV_SIZE; scrollInfo.nMax = max(infoPtr->nItemWidth / LISTVIEW_SCROLL_DIV_SIZE, 0)-1; SetScrollInfo(hwnd, SB_HORZ, &scrollInfo, TRUE); /* Update the Header Control */ scrollInfo.fMask = SIF_POS; GetScrollInfo(hwnd, SB_HORZ, &scrollInfo); LISTVIEW_UpdateHeaderSize(hwnd, scrollInfo.nPos); } else { RECT rcView; if (LISTVIEW_GetViewRect(hwnd, &rcView) != FALSE) { INT nViewWidth = rcView.right - rcView.left; INT nViewHeight = rcView.bottom - rcView.top; /* Update Horizontal Scrollbar */ scrollInfo.fMask = SIF_POS; if (GetScrollInfo(hwnd, SB_HORZ, &scrollInfo) == FALSE || GETITEMCOUNT(infoPtr) == 0) { scrollInfo.nPos = 0; } scrollInfo.nMax = max(nViewWidth / LISTVIEW_SCROLL_DIV_SIZE, 0)-1; scrollInfo.nMin = 0; scrollInfo.nPage = nListWidth / LISTVIEW_SCROLL_DIV_SIZE; scrollInfo.fMask = SIF_RANGE | SIF_POS | SIF_PAGE; SetScrollInfo(hwnd, SB_HORZ, &scrollInfo, TRUE); /* Update Vertical Scrollbar */ nListHeight = infoPtr->rcList.bottom - infoPtr->rcList.top; scrollInfo.fMask = SIF_POS; if (GetScrollInfo(hwnd, SB_VERT, &scrollInfo) == FALSE || GETITEMCOUNT(infoPtr) == 0) { scrollInfo.nPos = 0; } scrollInfo.nMax = max(nViewHeight / LISTVIEW_SCROLL_DIV_SIZE,0)-1; scrollInfo.nMin = 0; scrollInfo.nPage = nListHeight / LISTVIEW_SCROLL_DIV_SIZE; scrollInfo.fMask = SIF_RANGE | SIF_POS | SIF_PAGE; SetScrollInfo(hwnd, SB_VERT, &scrollInfo, TRUE); } } } /*** * DESCRIPTION: * Prints a message for unsupported window styles. * A kind of TODO list for window styles. * * PARAMETER(S): * [I] LONG : window style * * RETURN: * None */ static VOID LISTVIEW_UnsupportedStyles(LONG lStyle) { if ((LVS_TYPEMASK & lStyle) == LVS_EDITLABELS) { FIXME(" LVS_EDITLABELS\n"); } if ((LVS_TYPEMASK & lStyle) == LVS_NOLABELWRAP) { FIXME(" LVS_NOLABELWRAP\n"); } if ((LVS_TYPEMASK & lStyle) == LVS_NOSCROLL) { FIXME(" LVS_NOSCROLL\n"); } if ((LVS_TYPEMASK & lStyle) == LVS_NOSORTHEADER) { FIXME(" LVS_NOSORTHEADER\n"); } if ((LVS_TYPEMASK & lStyle) == LVS_OWNERDRAWFIXED) { FIXME(" LVS_OWNERDRAWFIXED\n"); } if ((LVS_TYPEMASK & lStyle) == LVS_SHAREIMAGELISTS) { FIXME(" LVS_SHAREIMAGELISTS\n"); } if ((LVS_TYPEMASK & lStyle) == LVS_SORTASCENDING) { FIXME(" LVS_SORTASCENDING\n"); } if ((LVS_TYPEMASK & lStyle) == LVS_SORTDESCENDING) { FIXME(" LVS_SORTDESCENDING\n"); } } /*** * DESCRIPTION: * Aligns the items with the top edge of the window. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * None */ static VOID LISTVIEW_AlignTop(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; INT nListWidth = infoPtr->rcList.right - infoPtr->rcList.left; POINT ptItem; RECT rcView; INT i; if ((uView == LVS_SMALLICON) || (uView == LVS_ICON)) { ZeroMemory(&ptItem, sizeof(POINT)); ZeroMemory(&rcView, sizeof(RECT)); if (nListWidth > infoPtr->nItemWidth) { for (i = 0; i < GETITEMCOUNT(infoPtr); i++) { if (ptItem.x + infoPtr->nItemWidth > nListWidth) { ptItem.x = 0; ptItem.y += infoPtr->nItemHeight; } ListView_SetItemPosition(hwnd, i, ptItem.x, ptItem.y); ptItem.x += infoPtr->nItemWidth; rcView.right = max(rcView.right, ptItem.x); } rcView.bottom = ptItem.y + infoPtr->nItemHeight; } else { for (i = 0; i < GETITEMCOUNT(infoPtr); i++) { ListView_SetItemPosition(hwnd, i, ptItem.x, ptItem.y); ptItem.y += infoPtr->nItemHeight; } rcView.right = infoPtr->nItemWidth; rcView.bottom = ptItem.y; } LISTVIEW_SetViewRect(hwnd, &rcView); } } /*** * DESCRIPTION: * Aligns the items with the left edge of the window. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * None */ static VOID LISTVIEW_AlignLeft(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; INT nListHeight = infoPtr->rcList.bottom - infoPtr->rcList.top; POINT ptItem; RECT rcView; INT i; if ((uView == LVS_SMALLICON) || (uView == LVS_ICON)) { ZeroMemory(&ptItem, sizeof(POINT)); ZeroMemory(&rcView, sizeof(RECT)); if (nListHeight > infoPtr->nItemHeight) { for (i = 0; i < GETITEMCOUNT(infoPtr); i++) { if (ptItem.y + infoPtr->nItemHeight > nListHeight) { ptItem.y = 0; ptItem.x += infoPtr->nItemWidth; } ListView_SetItemPosition(hwnd, i, ptItem.x, ptItem.y); ptItem.y += infoPtr->nItemHeight; rcView.bottom = max(rcView.bottom, ptItem.y); } rcView.right = ptItem.x + infoPtr->nItemWidth; } else { for (i = 0; i < GETITEMCOUNT(infoPtr); i++) { ListView_SetItemPosition(hwnd, i, ptItem.x, ptItem.y); ptItem.x += infoPtr->nItemWidth; } rcView.bottom = infoPtr->nItemHeight; rcView.right = ptItem.x; } LISTVIEW_SetViewRect(hwnd, &rcView); } } /*** * DESCRIPTION: * Set the bounding rectangle of all the items. * * PARAMETER(S): * [I] HWND : window handle * [I] LPRECT : bounding rectangle * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_SetViewRect(HWND hwnd, LPRECT lprcView) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO*)GetWindowLongA(hwnd, 0); BOOL bResult = FALSE; TRACE("(hwnd=%x, left=%d, top=%d, right=%d, bottom=%d)\n", hwnd, lprcView->left, lprcView->top, lprcView->right, lprcView->bottom); if (lprcView != NULL) { bResult = TRUE; infoPtr->rcView.left = lprcView->left; infoPtr->rcView.top = lprcView->top; infoPtr->rcView.right = lprcView->right; infoPtr->rcView.bottom = lprcView->bottom; } return bResult; } /*** * DESCRIPTION: * Retrieves the bounding rectangle of all the items. * * PARAMETER(S): * [I] HWND : window handle * [O] LPRECT : bounding rectangle * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_GetViewRect(HWND hwnd, LPRECT lprcView) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO*)GetWindowLongA(hwnd, 0); BOOL bResult = FALSE; POINT ptOrigin; TRACE("(hwnd=%x, lprcView=%p)\n", hwnd, lprcView); if (lprcView != NULL) { bResult = LISTVIEW_GetOrigin(hwnd, &ptOrigin); if (bResult != FALSE) { lprcView->left = infoPtr->rcView.left + ptOrigin.x; lprcView->top = infoPtr->rcView.top + ptOrigin.y; lprcView->right = infoPtr->rcView.right + ptOrigin.x; lprcView->bottom = infoPtr->rcView.bottom + ptOrigin.y; } TRACE("(left=%d, top=%d, right=%d, bottom=%d)\n", lprcView->left, lprcView->top, lprcView->right, lprcView->bottom); } return bResult; } /*** * DESCRIPTION: * Retrieves the subitem pointer associated with the subitem index. * * PARAMETER(S): * [I] HDPA : DPA handle for a specific item * [I] INT : index of subitem * * RETURN: * SUCCESS : subitem pointer * FAILURE : NULL */ static LISTVIEW_SUBITEM* LISTVIEW_GetSubItemPtr(HDPA hdpaSubItems, INT nSubItem) { LISTVIEW_SUBITEM *lpSubItem; INT i; for (i = 1; i < hdpaSubItems->nItemCount; i++) { lpSubItem = (LISTVIEW_SUBITEM *) DPA_GetPtr(hdpaSubItems, i); if (lpSubItem != NULL) { if (lpSubItem->iSubItem == nSubItem) { return lpSubItem; } } } return NULL; } /*** * DESCRIPTION: * Calculates the width of an item. * * PARAMETER(S): * [I] HWND : window handle * [I] LONG : window style * * RETURN: * Returns item width. */ static INT LISTVIEW_GetItemWidth(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; INT nHeaderItemCount; RECT rcHeaderItem; INT nItemWidth = 0; INT nLabelWidth; INT i; TRACE("(hwnd=%x)\n", hwnd); if (uView == LVS_ICON) { nItemWidth = infoPtr->iconSpacing.cx; } else if (uView == LVS_REPORT) { /* calculate width of header */ nHeaderItemCount = Header_GetItemCount(infoPtr->hwndHeader); for (i = 0; i < nHeaderItemCount; i++) { if (Header_GetItemRect(infoPtr->hwndHeader, i, &rcHeaderItem) != 0) { nItemWidth += (rcHeaderItem.right - rcHeaderItem.left); } } } else { for (i = 0; i < GETITEMCOUNT(infoPtr); i++) { nLabelWidth = LISTVIEW_GetLabelWidth(hwnd, i); nItemWidth = max(nItemWidth, nLabelWidth); } /* default label size */ if (GETITEMCOUNT(infoPtr) == 0) { nItemWidth = DEFAULT_COLUMN_WIDTH; } else { if (nItemWidth == 0) { nItemWidth = DEFAULT_LABEL_WIDTH; } else { /* add padding */ nItemWidth += WIDTH_PADDING; if (infoPtr->himlSmall != NULL) { nItemWidth += infoPtr->iconSize.cx; } if (infoPtr->himlState != NULL) { nItemWidth += infoPtr->iconSize.cx; } } } } if(nItemWidth == 0) { /* nItemWidth Cannot be Zero */ nItemWidth = 1; } return nItemWidth; } /*** * DESCRIPTION: * Calculates the width of a specific item. * * PARAMETER(S): * [I] HWND : window handle * [I] LPSTR : string * * RETURN: * Returns the width of an item width a specified string. */ static INT LISTVIEW_CalculateWidth(HWND hwnd, INT nItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; INT nHeaderItemCount; RECT rcHeaderItem; INT nItemWidth = 0; INT i; TRACE("(hwnd=%x)\n", hwnd); if (uView == LVS_ICON) { nItemWidth = infoPtr->iconSpacing.cx; } else if (uView == LVS_REPORT) { /* calculate width of header */ nHeaderItemCount = Header_GetItemCount(infoPtr->hwndHeader); for (i = 0; i < nHeaderItemCount; i++) { if (Header_GetItemRect(infoPtr->hwndHeader, i, &rcHeaderItem) != 0) { nItemWidth += (rcHeaderItem.right - rcHeaderItem.left); } } } else { /* get width of string */ nItemWidth = LISTVIEW_GetLabelWidth(hwnd, nItem); /* default label size */ if (GETITEMCOUNT(infoPtr) == 0) { nItemWidth = DEFAULT_COLUMN_WIDTH; } else { if (nItemWidth == 0) { nItemWidth = DEFAULT_LABEL_WIDTH; } else { /* add padding */ nItemWidth += WIDTH_PADDING; if (infoPtr->himlSmall != NULL) { nItemWidth += infoPtr->iconSize.cx; } if (infoPtr->himlState != NULL) { nItemWidth += infoPtr->iconSize.cx; } } } } return nItemWidth; } /*** * DESCRIPTION: * Calculates the height of an item. * * PARAMETER(S): * [I] HWND : window handle * [I] LONG : window style * * RETURN: * Returns item height. */ static INT LISTVIEW_GetItemHeight(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; INT nItemHeight = 0; if (uView == LVS_ICON) { nItemHeight = infoPtr->iconSpacing.cy; } else { TEXTMETRICA tm; HDC hdc = GetDC(hwnd); HFONT hOldFont = SelectObject(hdc, infoPtr->hFont); GetTextMetricsA(hdc, &tm); nItemHeight = max(tm.tmHeight, infoPtr->iconSize.cy) + HEIGHT_PADDING; SelectObject(hdc, hOldFont); ReleaseDC(hwnd, hdc); } return nItemHeight; } /*** * DESCRIPTION: * Adds a block of selections. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * * RETURN: * None */ static VOID LISTVIEW_AddGroupSelection(HWND hwnd, INT nItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); INT nFirst = min(infoPtr->nSelectionMark, nItem); INT nLast = max(infoPtr->nSelectionMark, nItem); LVITEMA lvItem; INT i; lvItem.state = LVIS_SELECTED; lvItem.stateMask= LVIS_SELECTED; for (i = nFirst; i <= nLast; i++) { ListView_SetItemState(hwnd, i, &lvItem); } LISTVIEW_SetItemFocus(hwnd, nItem); infoPtr->nSelectionMark = nItem; } /*** * DESCRIPTION: * Adds a single selection. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * * RETURN: * None */ static VOID LISTVIEW_AddSelection(HWND hwnd, INT nItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LVITEMA lvItem; lvItem.state = LVIS_SELECTED; lvItem.stateMask= LVIS_SELECTED; ListView_SetItemState(hwnd, nItem, &lvItem); LISTVIEW_SetItemFocus(hwnd, nItem); infoPtr->nSelectionMark = nItem; } /*** * DESCRIPTION: * Selects or unselects an item. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * * RETURN: * SELECT: TRUE * UNSELECT : FALSE */ static BOOL LISTVIEW_ToggleSelection(HWND hwnd, INT nItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); BOOL bResult; LVITEMA lvItem; lvItem.stateMask= LVIS_SELECTED; if (ListView_GetItemState(hwnd, nItem, LVIS_SELECTED) & LVIS_SELECTED) { lvItem.state = 0; ListView_SetItemState(hwnd, nItem, &lvItem); bResult = FALSE; } else { lvItem.state = LVIS_SELECTED; ListView_SetItemState(hwnd, nItem, &lvItem); bResult = TRUE; } LISTVIEW_SetItemFocus(hwnd, nItem); infoPtr->nSelectionMark = nItem; return bResult; } /*** * DESCRIPTION: * Selects items based on view coorddiantes. * * PARAMETER(S): * [I] HWND : window handle * [I] RECT : selection rectangle * * RETURN: * None */ static VOID LISTVIEW_SetSelectionRect(HWND hwnd, RECT rcSelRect) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LVITEMA lvItem; POINT ptItem; INT i; lvItem.stateMask = LVIS_SELECTED; for (i = 0; i < GETITEMCOUNT(infoPtr); i++) { LISTVIEW_GetItemPosition(hwnd, i, &ptItem); if (PtInRect(&rcSelRect, ptItem) != FALSE) { lvItem.state = LVIS_SELECTED; } else { lvItem.state = 0; } ListView_SetItemState(hwnd, i, &lvItem); } } /*** * DESCRIPTION: * Sets a single group selection. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * * RETURN: * None */ static VOID LISTVIEW_SetGroupSelection(HWND hwnd, INT nItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; LVITEMA lvItem; if ((uView == LVS_LIST) || (uView == LVS_REPORT)) { INT i; INT nFirst = min(infoPtr->nSelectionMark, nItem); INT nLast = max(infoPtr->nSelectionMark, nItem); lvItem.stateMask = LVIS_SELECTED; for (i = 0; i <= GETITEMCOUNT(infoPtr); i++) { if ((i < nFirst) || (i > nLast)) { lvItem.state = 0; } else { lvItem.state = LVIS_SELECTED; } ListView_SetItemState(hwnd, i, &lvItem); } } else { POINT ptItem; POINT ptSelMark; RECT rcSel; LISTVIEW_GetItemPosition(hwnd, nItem, &ptItem); LISTVIEW_GetItemPosition(hwnd, infoPtr->nSelectionMark, &ptSelMark); rcSel.left = min(ptSelMark.x, ptItem.x); rcSel.top = min(ptSelMark.y, ptItem.y); rcSel.right = max(ptSelMark.x, ptItem.x) + infoPtr->nItemWidth; rcSel.bottom = max(ptSelMark.y, ptItem.y) + infoPtr->nItemHeight; LISTVIEW_SetSelectionRect(hwnd, rcSel); } LISTVIEW_SetItemFocus(hwnd, nItem); } /*** * DESCRIPTION: * Manages the item focus. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * * RETURN: * TRUE : focused item changed * FALSE : focused item has NOT changed */ static BOOL LISTVIEW_SetItemFocus(HWND hwnd, INT nItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); BOOL bResult = FALSE; LVITEMA lvItem; if (infoPtr->nFocusedItem != nItem) { bResult = TRUE; ZeroMemory(&lvItem, sizeof(LVITEMA)); lvItem.stateMask = LVIS_FOCUSED; ListView_SetItemState(hwnd, infoPtr->nFocusedItem, &lvItem); lvItem.state = LVIS_FOCUSED; lvItem.stateMask = LVIS_FOCUSED; ListView_SetItemState(hwnd, nItem, &lvItem); infoPtr->nFocusedItem = nItem; ListView_EnsureVisible(hwnd, nItem, FALSE); } return bResult; } /*** * DESCRIPTION: * Sets a single selection. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * * RETURN: * None */ static VOID LISTVIEW_SetSelection(HWND hwnd, INT nItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LVITEMA lvItem; if (nItem > 0) { LISTVIEW_RemoveSelections(hwnd, 0, nItem - 1); } if (nItem < GETITEMCOUNT(infoPtr)) { LISTVIEW_RemoveSelections(hwnd, nItem + 1, GETITEMCOUNT(infoPtr)); } ZeroMemory(&lvItem, sizeof(LVITEMA)); lvItem.stateMask = LVIS_FOCUSED; ListView_SetItemState(hwnd, infoPtr->nFocusedItem, &lvItem); lvItem.state = LVIS_SELECTED | LVIS_FOCUSED; lvItem.stateMask = LVIS_SELECTED | LVIS_FOCUSED; ListView_SetItemState(hwnd, nItem, &lvItem); infoPtr->nFocusedItem = nItem; infoPtr->nSelectionMark = nItem; } /*** * DESCRIPTION: * Set selection(s) with keyboard. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * * RETURN: * SUCCESS : TRUE (needs to be repainted) * FAILURE : FALSE (nothing has changed) */ static BOOL LISTVIEW_KeySelection(HWND hwnd, INT nItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); WORD wShift = HIWORD(GetKeyState(VK_SHIFT)); WORD wCtrl = HIWORD(GetKeyState(VK_CONTROL)); BOOL bResult = FALSE; if ((nItem >= 0) && (nItem < GETITEMCOUNT(infoPtr))) { if (lStyle & LVS_SINGLESEL) { bResult = TRUE; LISTVIEW_SetSelection(hwnd, nItem); ListView_EnsureVisible(hwnd, nItem, FALSE); } else { if (wShift) { bResult = TRUE; LISTVIEW_SetGroupSelection(hwnd, nItem); } else if (wCtrl) { bResult = LISTVIEW_SetItemFocus(hwnd, nItem); } else { bResult = TRUE; LISTVIEW_SetSelection(hwnd, nItem); ListView_EnsureVisible(hwnd, nItem, FALSE); } } } return bResult; } /*** * DESCRIPTION: * Called when the mouse is being actively tracked and has hovered for a specified * amount of time * * PARAMETER(S): * [I] HWND : window handle * [I] wParam : key indicator * [I] lParam : mouse position * * RETURN: * 0 if the message was processed, non-zero if there was an error * * INFO: * LVS_EX_TRACKSELECT: An item is automatically selected when the cursor remains * over the item for a certain period of time. * */ static LRESULT LISTVIEW_MouseHover(hwnd, wParam, lParam) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); POINT pt; pt.x = (INT)LOWORD(lParam); pt.y = (INT)HIWORD(lParam); if(infoPtr->dwExStyle & LVS_EX_TRACKSELECT) { /* select the item under the cursor */ LISTVIEW_MouseSelection(hwnd, pt); } return 0; } /*** * DESCRIPTION: * Called whenever WM_MOUSEMOVE is recieved. * * PARAMETER(S): * [I] HWND : window handle * [I] wParam : key indicators * [I] lParam : cursor position * * RETURN: * 0 if the message is processed, non-zero if there was an error */ static LRESULT LISTVIEW_MouseMove(HWND hwnd, WPARAM wParam, LPARAM lParam) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); TRACKMOUSEEVENT trackinfo; /* see if we are supposed to be tracking mouse hovering */ if(infoPtr->dwExStyle & LVS_EX_TRACKSELECT) { /* fill in the trackinfo struct */ trackinfo.cbSize = sizeof(TRACKMOUSEEVENT); trackinfo.dwFlags = TME_QUERY; trackinfo.hwndTrack = hwnd; trackinfo.dwHoverTime = infoPtr->dwHoverTime; /* see if we are already tracking this hwnd */ _TrackMouseEvent(&trackinfo); if(!(trackinfo.dwFlags & TME_HOVER)) { trackinfo.dwFlags = TME_HOVER; /* call TRACKMOUSEEVENT so we recieve WM_MOUSEHOVER messages */ _TrackMouseEvent(&trackinfo); } } return 0; } /*** * DESCRIPTION: * Selects an item based on coordinates. * * PARAMETER(S): * [I] HWND : window handle * [I] POINT : mouse click ccordinates * * RETURN: * SUCCESS : item index * FAILURE : -1 */ static LRESULT LISTVIEW_MouseSelection(HWND hwnd, POINT pt) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); RECT rcItem; INT i; for (i = 0; i < GETITEMCOUNT(infoPtr); i++) { rcItem.left = LVIR_SELECTBOUNDS; if (LISTVIEW_GetItemRect(hwnd, i, &rcItem) == TRUE) { if (PtInRect(&rcItem, pt) != FALSE) { return i; } } } return -1; } /*** * DESCRIPTION: * Removes all selection states. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * * RETURN: * SUCCCESS : TRUE * FAILURE : FALSE */ static VOID LISTVIEW_RemoveSelections(HWND hwnd, INT nFirst, INT nLast) { LVITEMA lvItem; INT i; lvItem.state = 0; lvItem.stateMask = LVIS_SELECTED; for (i = nFirst; i <= nLast; i++) { ListView_SetItemState(hwnd, i, &lvItem); } } /*** * DESCRIPTION: * Removes a column. * * PARAMETER(S): * [IO] HDPA : dynamic pointer array handle * [I] INT : column index (subitem index) * * RETURN: * SUCCCESS : TRUE * FAILURE : FALSE */ static BOOL LISTVIEW_RemoveColumn(HDPA hdpaItems, INT nSubItem) { BOOL bResult = TRUE; HDPA hdpaSubItems; INT i; for (i = 0; i < hdpaItems->nItemCount; i++) { hdpaSubItems = (HDPA)DPA_GetPtr(hdpaItems, i); if (hdpaSubItems != NULL) { if (LISTVIEW_RemoveSubItem(hdpaSubItems, nSubItem) == FALSE) { bResult = FALSE; } } } return bResult; } /*** * DESCRIPTION: * Removes a subitem at a given position. * * PARAMETER(S): * [IO] HDPA : dynamic pointer array handle * [I] INT : subitem index * * RETURN: * SUCCCESS : TRUE * FAILURE : FALSE */ static BOOL LISTVIEW_RemoveSubItem(HDPA hdpaSubItems, INT nSubItem) { LISTVIEW_SUBITEM *lpSubItem; INT i; for (i = 1; i < hdpaSubItems->nItemCount; i++) { lpSubItem = (LISTVIEW_SUBITEM *)DPA_GetPtr(hdpaSubItems, i); if (lpSubItem != NULL) { if (lpSubItem->iSubItem == nSubItem) { /* free string */ if ((lpSubItem->pszText != NULL) && (lpSubItem->pszText != LPSTR_TEXTCALLBACKA)) { COMCTL32_Free(lpSubItem->pszText); } /* free item */ COMCTL32_Free(lpSubItem); /* free dpa memory */ if (DPA_DeletePtr(hdpaSubItems, i) == NULL) { return FALSE; } } else if (lpSubItem->iSubItem > nSubItem) { return TRUE; } } } return TRUE; } /*** * DESCRIPTION: * Compares the item information. * * PARAMETER(S): * [I] LISTVIEW_ITEM *: destination item * [I] LPLVITEM : source item * * RETURN: * SUCCCESS : TRUE (EQUAL) * FAILURE : FALSE (NOT EQUAL) */ static UINT LISTVIEW_GetItemChanges(LISTVIEW_ITEM *lpItem, LPLVITEMA lpLVItem) { UINT uChanged = 0; if ((lpItem != NULL) && (lpLVItem != NULL)) { if (lpLVItem->mask & LVIF_STATE) { if ((lpItem->state & lpLVItem->stateMask) != (lpLVItem->state & lpLVItem->stateMask)) { uChanged |= LVIF_STATE; } } if (lpLVItem->mask & LVIF_IMAGE) { if (lpItem->iImage != lpLVItem->iImage) { uChanged |= LVIF_IMAGE; } } if (lpLVItem->mask & LVIF_PARAM) { if (lpItem->lParam != lpLVItem->lParam) { uChanged |= LVIF_PARAM; } } if (lpLVItem->mask & LVIF_INDENT) { if (lpItem->iIndent != lpLVItem->iIndent) { uChanged |= LVIF_INDENT; } } if (lpLVItem->mask & LVIF_TEXT) { if (lpLVItem->pszText == LPSTR_TEXTCALLBACKA) { if (lpItem->pszText != LPSTR_TEXTCALLBACKA) { uChanged |= LVIF_TEXT; } } else { if (lpItem->pszText == LPSTR_TEXTCALLBACKA) { uChanged |= LVIF_TEXT; } else { if (lpLVItem->pszText) { if (lpItem->pszText) { if (strcmp(lpLVItem->pszText, lpItem->pszText) != 0) { uChanged |= LVIF_TEXT; } } else { uChanged |= LVIF_TEXT; } } else { if (lpItem->pszText) { uChanged |= LVIF_TEXT; } } } } } } return uChanged; } /*** * DESCRIPTION: * Initializes item attributes. * * PARAMETER(S): * [I] HWND : window handle * [O] LISTVIEW_ITEM *: destination item * [I] LPLVITEM : source item * * RETURN: * SUCCCESS : TRUE * FAILURE : FALSE */ static BOOL LISTVIEW_InitItem(HWND hwnd, LISTVIEW_ITEM *lpItem, LPLVITEMA lpLVItem) { LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); BOOL bResult = FALSE; if ((lpItem != NULL) && (lpLVItem != NULL)) { bResult = TRUE; if (lpLVItem->mask & LVIF_STATE) { lpItem->state &= ~lpLVItem->stateMask; lpItem->state |= (lpLVItem->state & lpLVItem->stateMask); } if (lpLVItem->mask & LVIF_IMAGE) { lpItem->iImage = lpLVItem->iImage; } if (lpLVItem->mask & LVIF_PARAM) { lpItem->lParam = lpLVItem->lParam; } if (lpLVItem->mask & LVIF_INDENT) { lpItem->iIndent = lpLVItem->iIndent; } if (lpLVItem->mask & LVIF_TEXT) { if (lpLVItem->pszText == LPSTR_TEXTCALLBACKA) { if ((lStyle & LVS_SORTASCENDING) || (lStyle & LVS_SORTDESCENDING)) { return FALSE; } if ((lpItem->pszText != NULL) && (lpItem->pszText != LPSTR_TEXTCALLBACKA)) { COMCTL32_Free(lpItem->pszText); } lpItem->pszText = LPSTR_TEXTCALLBACKA; } else { if (lpItem->pszText == LPSTR_TEXTCALLBACKA) { lpItem->pszText = NULL; } bResult = Str_SetPtrA(&lpItem->pszText, lpLVItem->pszText); } } } return bResult; } /*** * DESCRIPTION: * Initializes subitem attributes. * * NOTE: The documentation specifies that the operation fails if the user * tries to set the indent of a subitem. * * PARAMETER(S): * [I] HWND : window handle * [O] LISTVIEW_SUBITEM *: destination subitem * [I] LPLVITEM : source subitem * * RETURN: * SUCCCESS : TRUE * FAILURE : FALSE */ static BOOL LISTVIEW_InitSubItem(HWND hwnd, LISTVIEW_SUBITEM *lpSubItem, LPLVITEMA lpLVItem) { LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); BOOL bResult = FALSE; if ((lpSubItem != NULL) && (lpLVItem != NULL)) { if (!(lpLVItem->mask & LVIF_INDENT)) { bResult = TRUE; ZeroMemory(lpSubItem, sizeof(LISTVIEW_SUBITEM)); lpSubItem->iSubItem = lpLVItem->iSubItem; if (lpLVItem->mask & LVIF_IMAGE) { lpSubItem->iImage = lpLVItem->iImage; } if (lpLVItem->mask & LVIF_TEXT) { if (lpLVItem->pszText == LPSTR_TEXTCALLBACKA) { if ((lStyle & LVS_SORTASCENDING) || (lStyle & LVS_SORTDESCENDING)) { return FALSE; } if ((lpSubItem->pszText != NULL) && (lpSubItem->pszText != LPSTR_TEXTCALLBACKA)) { COMCTL32_Free(lpSubItem->pszText); } lpSubItem->pszText = LPSTR_TEXTCALLBACKA; } else { if (lpSubItem->pszText == LPSTR_TEXTCALLBACKA) { lpSubItem->pszText = NULL; } bResult = Str_SetPtrA(&lpSubItem->pszText, lpLVItem->pszText); } } } } return bResult; } /*** * DESCRIPTION: * Adds a subitem at a given position (column index). * * PARAMETER(S): * [I] HWND : window handle * [I] LPLVITEM : new subitem atttributes * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static BOOL LISTVIEW_AddSubItem(HWND hwnd, LPLVITEMA lpLVItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LISTVIEW_SUBITEM *lpSubItem = NULL; BOOL bResult = FALSE; HDPA hdpaSubItems; INT nPosition, nItem; if (lpLVItem != NULL) { hdpaSubItems = (HDPA)DPA_GetPtr(infoPtr->hdpaItems, lpLVItem->iItem); if (hdpaSubItems != NULL) { lpSubItem = (LISTVIEW_SUBITEM *)COMCTL32_Alloc(sizeof(LISTVIEW_SUBITEM)); if (lpSubItem != NULL) { if (LISTVIEW_InitSubItem(hwnd, lpSubItem, lpLVItem) != FALSE) { nPosition = LISTVIEW_FindInsertPosition(hdpaSubItems, lpSubItem->iSubItem); nItem = DPA_InsertPtr(hdpaSubItems, nPosition, lpSubItem); if (nItem != -1) { bResult = TRUE; } } } } } /* cleanup if unsuccessful */ if ((bResult == FALSE) && (lpSubItem != NULL)) { COMCTL32_Free(lpSubItem); } return bResult; } /*** * DESCRIPTION: * Finds the dpa insert position (array index). * * PARAMETER(S): * [I] HWND : window handle * [I] INT : subitem index * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static INT LISTVIEW_FindInsertPosition(HDPA hdpaSubItems, INT nSubItem) { LISTVIEW_SUBITEM *lpSubItem; INT i; for (i = 1; i < hdpaSubItems->nItemCount; i++) { lpSubItem = (LISTVIEW_SUBITEM *)DPA_GetPtr(hdpaSubItems, i); if (lpSubItem != NULL) { if (lpSubItem->iSubItem > nSubItem) { return i; } } } return hdpaSubItems->nItemCount; } /*** * DESCRIPTION: * Retrieves a listview subitem at a given position (column index). * * PARAMETER(S): * [I] HWND : window handle * [I] INT : subitem index * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LISTVIEW_SUBITEM* LISTVIEW_GetSubItem(HDPA hdpaSubItems, INT nSubItem) { LISTVIEW_SUBITEM *lpSubItem; INT i; for (i = 1; i < hdpaSubItems->nItemCount; i++) { lpSubItem = (LISTVIEW_SUBITEM *)DPA_GetPtr(hdpaSubItems, i); if (lpSubItem != NULL) { if (lpSubItem->iSubItem == nSubItem) { return lpSubItem; } else if (lpSubItem->iSubItem > nSubItem) { return NULL; } } } return NULL; } /*** * DESCRIPTION: * Sets item attributes. * * PARAMETER(S): * [I] HWND : window handle * [I] LPLVITEM : new item atttributes * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static BOOL LISTVIEW_SetItem(HWND hwnd, LPLVITEMA lpLVItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); BOOL bResult = FALSE; HDPA hdpaSubItems; LISTVIEW_ITEM *lpItem; NMLISTVIEW nmlv; LONG lCtrlId = GetWindowLongA(hwnd, GWL_ID); LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); UINT uChanged; UINT uView = lStyle & LVS_TYPEMASK; INT item_width; if (lpLVItem != NULL) { if (lpLVItem->iSubItem == 0) { hdpaSubItems = (HDPA)DPA_GetPtr(infoPtr->hdpaItems, lpLVItem->iItem); if (hdpaSubItems != NULL) { lpItem = (LISTVIEW_ITEM *)DPA_GetPtr(hdpaSubItems, lpLVItem->iSubItem); if (lpItem != NULL) { ZeroMemory(&nmlv, sizeof(NMLISTVIEW)); nmlv.hdr.hwndFrom = hwnd; nmlv.hdr.idFrom = lCtrlId; nmlv.hdr.code = LVN_ITEMCHANGING; nmlv.lParam = lpItem->lParam; uChanged = LISTVIEW_GetItemChanges(lpItem, lpLVItem); if (uChanged != 0) { if (uChanged & LVIF_STATE) { nmlv.uNewState = lpLVItem->state & lpLVItem->stateMask; nmlv.uOldState = lpItem->state & lpLVItem->stateMask; } nmlv.uChanged = uChanged; nmlv.iItem = lpLVItem->iItem; nmlv.lParam = lpItem->lParam; /* send LVN_ITEMCHANGING notification */ ListView_LVNotify(GetParent(hwnd), lCtrlId, &nmlv); /* copy information */ bResult = LISTVIEW_InitItem(hwnd, lpItem, lpLVItem); /* if LVS_LIST or LVS_SMALLICON, update the width of the items based on */ /* the width of the items text */ if((uView == LVS_LIST) || (uView == LVS_SMALLICON)) { item_width = LISTVIEW_GetStringWidthA(hwnd, lpItem->pszText); if(item_width > infoPtr->nItemWidth) infoPtr->nItemWidth = item_width; } /* send LVN_ITEMCHANGED notification */ nmlv.hdr.code = LVN_ITEMCHANGED; ListView_LVNotify(GetParent(hwnd), lCtrlId, &nmlv); } else { bResult = TRUE; } InvalidateRect(hwnd, NULL, FALSE); } } } } return bResult; } /*** * DESCRIPTION: * Sets subitem attributes. * * PARAMETER(S): * [I] HWND : window handle * [I] LPLVITEM : new subitem atttributes * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static BOOL LISTVIEW_SetSubItem(HWND hwnd, LPLVITEMA lpLVItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); BOOL bResult = FALSE; HDPA hdpaSubItems; LISTVIEW_SUBITEM *lpSubItem; if (lpLVItem != NULL) { if (lpLVItem->iSubItem > 0) { hdpaSubItems = (HDPA)DPA_GetPtr(infoPtr->hdpaItems, lpLVItem->iItem); if (hdpaSubItems != NULL) { /* set subitem only if column is present */ if (Header_GetItemCount(infoPtr->hwndHeader) > lpLVItem->iSubItem) { lpSubItem = LISTVIEW_GetSubItem(hdpaSubItems, lpLVItem->iSubItem); if (lpSubItem != NULL) { bResult = LISTVIEW_InitSubItem(hwnd, lpSubItem, lpLVItem); } else { bResult = LISTVIEW_AddSubItem(hwnd, lpLVItem); } InvalidateRect(hwnd, NULL, FALSE); } } } } return bResult; } /*** * DESCRIPTION: * Retrieves the index of the item at coordinate (0, 0) of the client area. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * item index */ static INT LISTVIEW_GetTopIndex(HWND hwnd) { LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); UINT uView = lStyle & LVS_TYPEMASK; INT nItem = 0; SCROLLINFO scrollInfo; ZeroMemory(&scrollInfo, sizeof(SCROLLINFO)); scrollInfo.cbSize = sizeof(SCROLLINFO); scrollInfo.fMask = SIF_POS; if (uView == LVS_LIST) { if (lStyle & WS_HSCROLL) { if (GetScrollInfo(hwnd, SB_HORZ, &scrollInfo) != FALSE) { nItem = scrollInfo.nPos * LISTVIEW_GetCountPerColumn(hwnd); } } } else if (uView == LVS_REPORT) { if (lStyle & WS_VSCROLL) { if (GetScrollInfo(hwnd, SB_VERT, &scrollInfo) != FALSE) { nItem = scrollInfo.nPos; } } } return nItem; } /*** * DESCRIPTION: * Draws a subitem. * * PARAMETER(S): * [I] HWND : window handle * [I] HDC : device context handle * [I] INT : item index * [I] INT : subitem index * [I] RECT * : clipping rectangle * * RETURN: * None */ static VOID LISTVIEW_DrawSubItem(HWND hwnd, HDC hdc, INT nItem, INT nSubItem, RECT rcItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); CHAR szDispText[DISP_TEXT_SIZE]; LVITEMA lvItem; TRACE("(hwnd=%x, hdc=%x, nItem=%d, nSubItem=%d)\n", hwnd, hdc, nItem, nSubItem); /* get information needed for drawing the item */ ZeroMemory(&lvItem, sizeof(LVITEMA)); lvItem.mask = LVIF_TEXT; lvItem.iItem = nItem; lvItem.iSubItem = nSubItem; lvItem.cchTextMax = DISP_TEXT_SIZE; lvItem.pszText = szDispText; LISTVIEW_GetItemA(hwnd, &lvItem, TRUE); /* set item colors */ SetBkColor(hdc, infoPtr->clrTextBk); SetTextColor(hdc, infoPtr->clrText); ExtTextOutA(hdc, rcItem.left, rcItem.top, ETO_OPAQUE | ETO_CLIPPED, &rcItem, lvItem.pszText, lstrlenA(lvItem.pszText), NULL); } /*** * DESCRIPTION: * Draws an item. * * PARAMETER(S): * [I] HWND : window handle * [I] HDC : device context handle * [I] INT : item index * [I] RECT * : clipping rectangle * * RETURN: * None */ static VOID LISTVIEW_DrawItem(HWND hwnd, HDC hdc, INT nItem, RECT rcItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); CHAR szDispText[DISP_TEXT_SIZE]; INT nLabelWidth; LVITEMA lvItem; INT nMixMode; DWORD dwBkColor; DWORD dwTextColor; TRACE("(hwnd=%x, hdc=%x, nItem=%d)\n", hwnd, hdc, nItem); /* get information needed for drawing the item */ ZeroMemory(&lvItem, sizeof(LVITEMA)); lvItem.mask = LVIF_TEXT | LVIF_IMAGE | LVIF_STATE | LVIF_INDENT; lvItem.stateMask = LVIS_SELECTED | LVIS_FOCUSED | LVIS_STATEIMAGEMASK; lvItem.iItem = nItem; lvItem.iSubItem = 0; lvItem.cchTextMax = DISP_TEXT_SIZE; lvItem.pszText = szDispText; LISTVIEW_GetItemA(hwnd, &lvItem, TRUE); /* state icons */ if (infoPtr->himlState != NULL) { UINT uStateImage = (lvItem.state & LVIS_STATEIMAGEMASK) >> 12; if (uStateImage != 0) { ImageList_Draw(infoPtr->himlState, uStateImage - 1, hdc, rcItem.left, rcItem.top, ILD_NORMAL); } rcItem.left += infoPtr->iconSize.cx; } /* small icons */ if (infoPtr->himlSmall != NULL) { if ((lvItem.state & LVIS_SELECTED) && (infoPtr->bFocus != FALSE)) { ImageList_SetBkColor(infoPtr->himlSmall, CLR_NONE); ImageList_Draw(infoPtr->himlSmall, lvItem.iImage, hdc, rcItem.left, rcItem.top, ILD_SELECTED); } else { ImageList_SetBkColor(infoPtr->himlSmall, CLR_NONE); ImageList_Draw(infoPtr->himlSmall, lvItem.iImage, hdc, rcItem.left, rcItem.top, ILD_NORMAL); } rcItem.left += infoPtr->iconSize.cx; } /* Don't bother painting item being edited */ if (infoPtr->hwndEdit && lvItem.state & LVIS_FOCUSED) return; if ((lvItem.state & LVIS_SELECTED) && (infoPtr->bFocus != FALSE)) { /* set item colors */ dwBkColor = SetBkColor(hdc, GetSysColor(COLOR_HIGHLIGHT)); dwTextColor = SetTextColor(hdc, GetSysColor(COLOR_HIGHLIGHTTEXT)); /* set raster mode */ nMixMode = SetROP2(hdc, R2_XORPEN); } else if ((GetWindowLongA(hwnd, GWL_STYLE) & LVS_SHOWSELALWAYS) && (lvItem.state & LVIS_SELECTED) && (infoPtr->bFocus == FALSE)) { dwBkColor = SetBkColor(hdc, GetSysColor(COLOR_3DFACE)); dwTextColor = SetTextColor(hdc, GetSysColor(COLOR_BTNTEXT)); /* set raster mode */ nMixMode = SetROP2(hdc, R2_COPYPEN); } else { /* set item colors */ dwBkColor = SetBkColor(hdc, infoPtr->clrTextBk); dwTextColor = SetTextColor(hdc, infoPtr->clrText); /* set raster mode */ nMixMode = SetROP2(hdc, R2_COPYPEN); } nLabelWidth = ListView_GetStringWidthA(hwnd, lvItem.pszText); if (rcItem.left + nLabelWidth < rcItem.right) { rcItem.right = rcItem.left + nLabelWidth; } /* draw label */ ExtTextOutA(hdc, rcItem.left, rcItem.top, ETO_OPAQUE | ETO_CLIPPED, &rcItem, lvItem.pszText, lstrlenA(lvItem.pszText), NULL); if ((lvItem.state & LVIS_FOCUSED) && (infoPtr->bFocus == TRUE)) { Rectangle(hdc, rcItem.left, rcItem.top, rcItem.right, rcItem.bottom); } if (nMixMode != 0) { SetROP2(hdc, R2_COPYPEN); SetBkColor(hdc, infoPtr->clrTextBk); SetTextColor(hdc, infoPtr->clrText); } } /*** * DESCRIPTION: * Draws an item when in large icon display mode. * * PARAMETER(S): * [I] HWND : window handle * [I] HDC : device context handle * [I] LISTVIEW_ITEM * : item * [I] INT : item index * [I] RECT * : clipping rectangle * * RETURN: * None */ static VOID LISTVIEW_DrawLargeItem(HWND hwnd, HDC hdc, INT nItem, RECT rcItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); CHAR szDispText[DISP_TEXT_SIZE]; INT nDrawPosX = rcItem.left; INT nLabelWidth; TEXTMETRICA tm; LVITEMA lvItem; TRACE("(hwnd=%x, hdc=%x, nItem=%d, left=%d, top=%d, right=%d, \ bottom=%d)\n", hwnd, hdc, nItem, rcItem.left, rcItem.top, rcItem.right, rcItem.bottom); /* get information needed for drawing the item */ ZeroMemory(&lvItem, sizeof(LVITEMA)); lvItem.mask = LVIF_TEXT | LVIF_IMAGE | LVIF_STATE; lvItem.stateMask = LVIS_SELECTED | LVIS_FOCUSED; lvItem.iItem = nItem; lvItem.iSubItem = 0; lvItem.cchTextMax = DISP_TEXT_SIZE; lvItem.pszText = szDispText; LISTVIEW_GetItemA(hwnd, &lvItem, TRUE); if (lvItem.state & LVIS_SELECTED) { /* set item colors */ SetBkColor(hdc, GetSysColor(COLOR_HIGHLIGHT)); SetTextColor(hdc, GetSysColor(COLOR_HIGHLIGHTTEXT)); /* set raster mode */ SetROP2(hdc, R2_XORPEN); } else { /* set item colors */ SetBkColor(hdc, infoPtr->clrTextBk); SetTextColor(hdc, infoPtr->clrText); /* set raster mode */ SetROP2(hdc, R2_COPYPEN); } if (infoPtr->himlNormal != NULL) { rcItem.top += ICON_TOP_PADDING; nDrawPosX += (infoPtr->iconSpacing.cx - infoPtr->iconSize.cx) / 2; if (lvItem.state & LVIS_SELECTED) { ImageList_Draw(infoPtr->himlNormal, lvItem.iImage, hdc, nDrawPosX, rcItem.top, ILD_SELECTED); } else { ImageList_Draw(infoPtr->himlNormal, lvItem.iImage, hdc, nDrawPosX, rcItem.top, ILD_NORMAL); } } /* Don't bother painting item being edited */ if (infoPtr->hwndEdit && lvItem.state & LVIS_FOCUSED) return; rcItem.top += infoPtr->iconSize.cy + ICON_BOTTOM_PADDING; nLabelWidth = ListView_GetStringWidthA(hwnd, lvItem.pszText); nDrawPosX = infoPtr->iconSpacing.cx - nLabelWidth; if (nDrawPosX > 1) { rcItem.left += nDrawPosX / 2; rcItem.right = rcItem.left + nLabelWidth; } else { rcItem.left += 1; rcItem.right = rcItem.left + infoPtr->iconSpacing.cx - 1; } /* draw label */ GetTextMetricsA(hdc, &tm); rcItem.bottom = rcItem.top + tm.tmHeight + HEIGHT_PADDING; ExtTextOutA(hdc, rcItem.left, rcItem.top, ETO_OPAQUE | ETO_CLIPPED, &rcItem, lvItem.pszText, lstrlenA(lvItem.pszText), NULL); if (lvItem.state & LVIS_FOCUSED) { Rectangle(hdc, rcItem.left, rcItem.top, rcItem.right, rcItem.bottom); } } /*** * DESCRIPTION: * Draws listview items when in report display mode. * * PARAMETER(S): * [I] HWND : window handle * [I] HDC : device context handle * * RETURN: * None */ static VOID LISTVIEW_RefreshReport(HWND hwnd, HDC hdc) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd,0); SCROLLINFO scrollInfo; INT nDrawPosY = infoPtr->rcList.top; INT nColumnCount; RECT rcItem; INT j; INT nItem; INT nLast; ZeroMemory(&scrollInfo, sizeof(SCROLLINFO)); scrollInfo.cbSize = sizeof(SCROLLINFO); scrollInfo.fMask = SIF_POS; nItem = ListView_GetTopIndex(hwnd); /* add 1 for displaying a partial item at the bottom */ nLast = nItem + LISTVIEW_GetCountPerColumn(hwnd) + 1; nLast = min(nLast, GETITEMCOUNT(infoPtr)); /* send cache hint notification */ if (GetWindowLongA(hwnd,GWL_STYLE) & LVS_OWNERDATA) { NMLVCACHEHINT nmlv; nmlv.hdr.hwndFrom = hwnd; nmlv.hdr.idFrom = GetWindowLongA(hwnd,GWL_ID); nmlv.hdr.code = LVN_ODCACHEHINT; nmlv.iFrom = nItem; nmlv.iTo = nLast; SendMessageA(GetParent(hwnd), WM_NOTIFY, (WPARAM)nmlv.hdr.idFrom, (LPARAM)&nmlv); } for (; nItem < nLast; nItem++) { nColumnCount = Header_GetItemCount(infoPtr->hwndHeader); for (j = 0; j < nColumnCount; j++) { Header_GetItemRect(infoPtr->hwndHeader, j, &rcItem); rcItem.left += REPORT_MARGINX; rcItem.right = max(rcItem.left, rcItem.right - REPORT_MARGINX); rcItem.top = nDrawPosY; rcItem.bottom = rcItem.top + infoPtr->nItemHeight; /* Offset the Scroll Bar Pos */ if (GetScrollInfo(hwnd, SB_HORZ, &scrollInfo) != FALSE) { rcItem.left -= (scrollInfo.nPos * LISTVIEW_SCROLL_DIV_SIZE); rcItem.right -= (scrollInfo.nPos * LISTVIEW_SCROLL_DIV_SIZE); } if (j == 0) { LISTVIEW_DrawItem(hwnd, hdc, nItem, rcItem); } else { LISTVIEW_DrawSubItem(hwnd, hdc, nItem, j, rcItem); } } nDrawPosY += infoPtr->nItemHeight; } } /*** * DESCRIPTION: * Retrieves the number of items that can fit vertically in the client area. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * Number of items per row. */ static INT LISTVIEW_GetCountPerRow(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd,0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; INT nListWidth = infoPtr->rcList.right - infoPtr->rcList.left; INT nCountPerRow = 1; if (nListWidth > 0) { if (uView == LVS_REPORT) { nCountPerRow = 1; } else { nCountPerRow = nListWidth / infoPtr->nItemWidth; if (nCountPerRow == 0) { nCountPerRow = 1; } } } return nCountPerRow; } /*** * DESCRIPTION: * Retrieves the number of items that can fit horizontally in the client * area. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * Number of items per column. */ static INT LISTVIEW_GetCountPerColumn(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd,0); INT nListHeight = infoPtr->rcList.bottom - infoPtr->rcList.top; INT nCountPerColumn = 1; if (nListHeight > 0) { nCountPerColumn = nListHeight / infoPtr->nItemHeight; if (nCountPerColumn == 0) { nCountPerColumn = 1; } } return nCountPerColumn; } /*** * DESCRIPTION: * Retrieves the number of columns needed to display all the items when in * list display mode. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * Number of columns. */ static INT LISTVIEW_GetColumnCount(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); INT nColumnCount = 0; if ((lStyle & LVS_TYPEMASK) == LVS_LIST) { if (infoPtr->rcList.right % infoPtr->nItemWidth == 0) { nColumnCount = infoPtr->rcList.right / infoPtr->nItemWidth; } else { nColumnCount = infoPtr->rcList.right / infoPtr->nItemWidth + 1; } } return nColumnCount; } /*** * DESCRIPTION: * Draws listview items when in list display mode. * * PARAMETER(S): * [I] HWND : window handle * [I] HDC : device context handle * * RETURN: * None */ static VOID LISTVIEW_RefreshList(HWND hwnd, HDC hdc) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); RECT rcItem; INT i, j; INT nItem; INT nColumnCount; INT nCountPerColumn; INT nItemWidth = infoPtr->nItemWidth; INT nItemHeight = infoPtr->nItemHeight; /* get number of fully visible columns */ nColumnCount = LISTVIEW_GetColumnCount(hwnd); nCountPerColumn = LISTVIEW_GetCountPerColumn(hwnd); nItem = ListView_GetTopIndex(hwnd); for (i = 0; i < nColumnCount; i++) { for (j = 0; j < nCountPerColumn; j++, nItem++) { if (nItem >= GETITEMCOUNT(infoPtr)) return; rcItem.top = j * nItemHeight; rcItem.left = i * nItemWidth; rcItem.bottom = rcItem.top + nItemHeight; rcItem.right = rcItem.left + nItemWidth; LISTVIEW_DrawItem(hwnd, hdc, nItem, rcItem); } } } /*** * DESCRIPTION: * Draws listview items when in icon or small icon display mode. * * PARAMETER(S): * [I] HWND : window handle * [I] HDC : device context handle * * RETURN: * None */ static VOID LISTVIEW_RefreshIcon(HWND hwnd, HDC hdc, BOOL bSmall) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); POINT ptPosition; POINT ptOrigin; RECT rcItem; INT i; LISTVIEW_GetOrigin(hwnd, &ptOrigin); for (i = 0; i < GETITEMCOUNT(infoPtr); i++) { LISTVIEW_GetItemPosition(hwnd, i, &ptPosition); ptPosition.x += ptOrigin.x; ptPosition.y += ptOrigin.y; if (ptPosition.y + infoPtr->nItemHeight > infoPtr->rcList.top) { if (ptPosition.x + infoPtr->nItemWidth > infoPtr->rcList.left) { if (ptPosition.y < infoPtr->rcList.bottom) { if (ptPosition.x < infoPtr->rcList.right) { rcItem.top = ptPosition.y; rcItem.left = ptPosition.x; rcItem.bottom = rcItem.top + infoPtr->nItemHeight; rcItem.right = rcItem.left + infoPtr->nItemWidth; if (bSmall == FALSE) { LISTVIEW_DrawLargeItem(hwnd, hdc, i, rcItem); } else { LISTVIEW_DrawItem(hwnd, hdc, i, rcItem); } } } } } } } /*** * DESCRIPTION: * Draws listview items. * * PARAMETER(S): * [I] HWND : window handle * [I] HDC : device context handle * * RETURN: * NoneX */ static VOID LISTVIEW_Refresh(HWND hwnd, HDC hdc) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; HFONT hOldFont; HPEN hPen, hOldPen; /* select font */ hOldFont = SelectObject(hdc, infoPtr->hFont); /* select the doted pen (for drawing the focus box) */ hPen = CreatePen(PS_DOT, 1, 0); hOldPen = SelectObject(hdc, hPen); /* select transparent brush (for drawing the focus box) */ SelectObject(hdc, GetStockObject(NULL_BRUSH)); if (uView == LVS_LIST) { LISTVIEW_RefreshList(hwnd, hdc); } else if (uView == LVS_REPORT) { LISTVIEW_RefreshReport(hwnd, hdc); } else if (uView == LVS_SMALLICON) { LISTVIEW_RefreshIcon(hwnd, hdc, TRUE); } else if (uView == LVS_ICON) { LISTVIEW_RefreshIcon(hwnd, hdc, FALSE); } /* unselect objects */ SelectObject(hdc, hOldFont); SelectObject(hdc, hOldPen); /* delete pen */ DeleteObject(hPen); } /*** * DESCRIPTION: * Calculates the approximate width and height of a given number of items. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : number of items * [I] INT : width * [I] INT : height * * RETURN: * Returns a DWORD. The width in the low word and the height in high word. */ static LRESULT LISTVIEW_ApproximateViewRect(HWND hwnd, INT nItemCount, WORD wWidth, WORD wHeight) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; INT nItemCountPerColumn = 1; INT nColumnCount = 0; DWORD dwViewRect = 0; if (nItemCount == -1) { nItemCount = GETITEMCOUNT(infoPtr); } if (uView == LVS_LIST) { if (wHeight == 0xFFFF) { /* use current height */ wHeight = infoPtr->rcList.bottom - infoPtr->rcList.top; } if (wHeight < infoPtr->nItemHeight) { wHeight = infoPtr->nItemHeight; } if (nItemCount > 0) { if (infoPtr->nItemHeight > 0) { nItemCountPerColumn = wHeight / infoPtr->nItemHeight; if (nItemCountPerColumn == 0) { nItemCountPerColumn = 1; } if (nItemCount % nItemCountPerColumn != 0) { nColumnCount = nItemCount / nItemCountPerColumn; } else { nColumnCount = nItemCount / nItemCountPerColumn + 1; } } } /* Microsoft padding magic */ wHeight = nItemCountPerColumn * infoPtr->nItemHeight + 2; wWidth = nColumnCount * infoPtr->nItemWidth + 2; dwViewRect = MAKELONG(wWidth, wHeight); } else if (uView == LVS_REPORT) { /* TO DO */ } else if (uView == LVS_SMALLICON) { /* TO DO */ } else if (uView == LVS_ICON) { /* TO DO */ } return dwViewRect; } /*** * DESCRIPTION: * Arranges listview items in icon display mode. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : alignment code * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_Arrange(HWND hwnd, INT nAlignCode) { UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; BOOL bResult = FALSE; if ((uView == LVS_ICON) || (uView == LVS_SMALLICON)) { switch (nAlignCode) { case LVA_ALIGNLEFT: /* TO DO */ break; case LVA_ALIGNTOP: /* TO DO */ break; case LVA_DEFAULT: /* TO DO */ break; case LVA_SNAPTOGRID: /* TO DO */ break; } } return bResult; } /* << LISTVIEW_CreateDragImage >> */ /*** * DESCRIPTION: * Removes all listview items and subitems. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_DeleteAllItems(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LONG lCtrlId = GetWindowLongA(hwnd, GWL_ID); LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); UINT uView = lStyle & LVS_TYPEMASK; LISTVIEW_ITEM *lpItem; LISTVIEW_SUBITEM *lpSubItem; NMLISTVIEW nmlv; BOOL bSuppress; BOOL bResult = FALSE; INT i; INT j; HDPA hdpaSubItems; TRACE("(hwnd=%x,)\n", hwnd); if (GETITEMCOUNT(infoPtr) > 0) { /* initialize memory */ ZeroMemory(&nmlv, sizeof(NMLISTVIEW)); /* send LVN_DELETEALLITEMS notification */ nmlv.hdr.hwndFrom = hwnd; nmlv.hdr.idFrom = lCtrlId; nmlv.hdr.code = LVN_DELETEALLITEMS; nmlv.iItem = -1; /* verify if subsequent LVN_DELETEITEM notifications should be suppressed */ bSuppress = ListView_LVNotify(GetParent(hwnd), lCtrlId, &nmlv); for (i = 0; i < GETITEMCOUNT(infoPtr); i++) { hdpaSubItems = (HDPA)DPA_GetPtr(infoPtr->hdpaItems, i); if (hdpaSubItems != NULL) { for (j = 1; j < hdpaSubItems->nItemCount; j++) { lpSubItem = (LISTVIEW_SUBITEM *)DPA_GetPtr(hdpaSubItems, j); if (lpSubItem != NULL) { /* free subitem string */ if ((lpSubItem->pszText != NULL) && (lpSubItem->pszText != LPSTR_TEXTCALLBACKA)) { COMCTL32_Free(lpSubItem->pszText); } /* free subitem */ COMCTL32_Free(lpSubItem); } } lpItem = (LISTVIEW_ITEM *)DPA_GetPtr(hdpaSubItems, 0); if (lpItem != NULL) { if (bSuppress == FALSE) { /* send LVN_DELETEITEM notification */ nmlv.hdr.code = LVN_DELETEITEM; nmlv.iItem = i; nmlv.lParam = lpItem->lParam; ListView_LVNotify(GetParent(hwnd), lCtrlId, &nmlv); } /* free item string */ if ((lpItem->pszText != NULL) && (lpItem->pszText != LPSTR_TEXTCALLBACKA)) { COMCTL32_Free(lpItem->pszText); } /* free item */ COMCTL32_Free(lpItem); } DPA_Destroy(hdpaSubItems); } } /* reinitialize listview memory */ bResult = DPA_DeleteAllPtrs(infoPtr->hdpaItems); /* align items (set position of each item) */ if ((uView == LVS_ICON) || (uView == LVS_SMALLICON)) { if (lStyle & LVS_ALIGNLEFT) { LISTVIEW_AlignLeft(hwnd); } else { LISTVIEW_AlignTop(hwnd); } } LISTVIEW_UpdateScroll(hwnd); /* invalidate client area (optimization needed) */ InvalidateRect(hwnd, NULL, TRUE); } return bResult; } /*** * DESCRIPTION: * Removes a column from the listview control. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : column index * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_DeleteColumn(HWND hwnd, INT nColumn) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; BOOL bResult = FALSE; if (Header_DeleteItem(infoPtr->hwndHeader, nColumn) != FALSE) { bResult = LISTVIEW_RemoveColumn(infoPtr->hdpaItems, nColumn); /* Need to reset the item width when deleting a column */ infoPtr->nItemWidth = LISTVIEW_GetItemWidth(hwnd); /* reset scroll parameters */ if (uView == LVS_REPORT) { /* update scrollbar(s) */ LISTVIEW_UpdateScroll(hwnd); /* refresh client area */ InvalidateRect(hwnd, NULL, FALSE); } } return bResult; } /*** * DESCRIPTION: * Removes an item from the listview control. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_DeleteItem(HWND hwnd, INT nItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); UINT uView = lStyle & LVS_TYPEMASK; LONG lCtrlId = GetWindowLongA(hwnd, GWL_ID); NMLISTVIEW nmlv; BOOL bResult = FALSE; HDPA hdpaSubItems; LISTVIEW_ITEM *lpItem; LISTVIEW_SUBITEM *lpSubItem; INT i; TRACE("(hwnd=%x,nItem=%d)\n", hwnd, nItem); if ((nItem >= 0) && (nItem < GETITEMCOUNT(infoPtr))) { /* initialize memory */ ZeroMemory(&nmlv, sizeof(NMLISTVIEW)); hdpaSubItems = (HDPA)DPA_DeletePtr(infoPtr->hdpaItems, nItem); if (hdpaSubItems != NULL) { for (i = 1; i < hdpaSubItems->nItemCount; i++) { lpSubItem = (LISTVIEW_SUBITEM *)DPA_GetPtr(hdpaSubItems, i); if (lpSubItem != NULL) { /* free item string */ if ((lpSubItem->pszText != NULL) && (lpSubItem->pszText != LPSTR_TEXTCALLBACKA)) { COMCTL32_Free(lpSubItem->pszText); } /* free item */ COMCTL32_Free(lpSubItem); } } lpItem = (LISTVIEW_ITEM *)DPA_GetPtr(hdpaSubItems, 0); if (lpItem != NULL) { /* send LVN_DELETEITEM notification */ nmlv.hdr.hwndFrom = hwnd; nmlv.hdr.idFrom = lCtrlId; nmlv.hdr.code = LVN_DELETEITEM; nmlv.iItem = nItem; nmlv.lParam = lpItem->lParam; SendMessageA(GetParent(hwnd), WM_NOTIFY, (WPARAM)lCtrlId, (LPARAM)&nmlv); /* free item string */ if ((lpItem->pszText != NULL) && (lpItem->pszText != LPSTR_TEXTCALLBACKA)) { COMCTL32_Free(lpItem->pszText); } /* free item */ COMCTL32_Free(lpItem); } bResult = DPA_Destroy(hdpaSubItems); } /* align items (set position of each item) */ if ((uView == LVS_SMALLICON) || (uView == LVS_ICON)) { if (lStyle & LVS_ALIGNLEFT) { LISTVIEW_AlignLeft(hwnd); } else { LISTVIEW_AlignTop(hwnd); } } /* If this item had focus change focus to next or previous item */ if (GETITEMCOUNT(infoPtr) > 0) { int sItem = nItem < GETITEMCOUNT(infoPtr) ? nItem : nItem - 1; if (infoPtr->nFocusedItem == nItem) LISTVIEW_SetItemFocus(hwnd, sItem); } else infoPtr->nFocusedItem = -1; LISTVIEW_UpdateScroll(hwnd); /* refresh client area */ InvalidateRect(hwnd, NULL, TRUE); } return bResult; } /*** * DESCRIPTION: * Return edit control handle of current edit label * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * SUCCESS : HWND * FAILURE : 0 */ static LRESULT LISTVIEW_GetEditControl(hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); return infoPtr->hwndEdit; } /*** * DESCRIPTION: * Callback implementation for editlabel control * * PARAMETER(S): * [I] HWND : window handle * [I] LPSTR : modified text * [I] DWORD : item index * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static BOOL LISTVIEW_EndEditLabel(HWND hwnd, LPSTR pszText, DWORD nItem) { NMLVDISPINFOA dispInfo; LISTVIEW_ITEM *lpItem; INT nCtrlId = GetWindowLongA(hwnd, GWL_ID); LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); HDPA hdpaSubItems; BOOL bUpdateItemText; ZeroMemory(&dispInfo, sizeof(NMLVDISPINFOA)); if (NULL == (hdpaSubItems = (HDPA)DPA_GetPtr(infoPtr->hdpaItems, nItem))) return FALSE; if (NULL == (lpItem = (LISTVIEW_ITEM *)DPA_GetPtr(hdpaSubItems, 0))) return FALSE; dispInfo.hdr.hwndFrom = hwnd; dispInfo.hdr.idFrom = nCtrlId; dispInfo.hdr.code = LVN_ENDLABELEDITA; dispInfo.item.mask = 0; dispInfo.item.iItem = nItem; dispInfo.item.state = lpItem->state; dispInfo.item.stateMask = 0; dispInfo.item.pszText = pszText; dispInfo.item.cchTextMax = pszText ? strlen(pszText) : 0; dispInfo.item.iImage = lpItem->iImage; dispInfo.item.lParam = lpItem->lParam; infoPtr->hwndEdit = 0; bUpdateItemText = ListView_Notify(GetParent(hwnd), nCtrlId, &dispInfo); /* Do we need to update the Item Text */ if(bUpdateItemText) { if(lpItem->pszText != LPSTR_TEXTCALLBACKA) { Str_SetPtrA(&lpItem->pszText, pszText); } } return TRUE; } /*** * DESCRIPTION: * Begin in place editing of specified list view item * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static HWND LISTVIEW_EditLabelA(HWND hwnd, INT nItem) { NMLVDISPINFOA dispInfo; RECT rect; LISTVIEW_ITEM *lpItem; HWND hedit; HINSTANCE hinst = GetWindowLongA(hwnd, GWL_HINSTANCE); INT nCtrlId = GetWindowLongA(hwnd, GWL_ID); LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); HDPA hdpaSubItems; CHAR szDispText[DISP_TEXT_SIZE]; LVITEMA lvItem; if (~GetWindowLongA(hwnd, GWL_STYLE) & LVS_EDITLABELS) return FALSE; /* Is the EditBox still there, if so remove it */ if(infoPtr->hwndEdit != 0) { SetFocus(hwnd); } LISTVIEW_SetSelection(hwnd, nItem); LISTVIEW_SetItemFocus(hwnd, nItem); ZeroMemory(&dispInfo, sizeof(NMLVDISPINFOA)); if (NULL == (hdpaSubItems = (HDPA)DPA_GetPtr(infoPtr->hdpaItems, nItem))) return 0; if (NULL == (lpItem = (LISTVIEW_ITEM *)DPA_GetPtr(hdpaSubItems, 0))) return 0; /* get information needed for drawing the item */ ZeroMemory(&lvItem, sizeof(LVITEMA)); lvItem.mask = LVIF_TEXT; lvItem.iItem = nItem; lvItem.iSubItem = 0; lvItem.cchTextMax = DISP_TEXT_SIZE; lvItem.pszText = szDispText; ListView_GetItemA(hwnd, &lvItem); dispInfo.hdr.hwndFrom = hwnd; dispInfo.hdr.idFrom = nCtrlId; dispInfo.hdr.code = LVN_BEGINLABELEDITA; dispInfo.item.mask = 0; dispInfo.item.iItem = nItem; dispInfo.item.state = lpItem->state; dispInfo.item.stateMask = 0; dispInfo.item.pszText = lvItem.pszText; dispInfo.item.cchTextMax = strlen(lvItem.pszText); dispInfo.item.iImage = lpItem->iImage; dispInfo.item.lParam = lpItem->lParam; if (ListView_LVNotify(GetParent(hwnd), nCtrlId, &dispInfo)) return 0; rect.left = LVIR_LABEL; if (!LISTVIEW_GetItemRect(hwnd, nItem, &rect)) return 0; if (!(hedit = CreateEditLabel(szDispText , WS_VISIBLE, rect.left-2, rect.top-1, 0, rect.bottom - rect.top+2, hwnd, hinst, LISTVIEW_EndEditLabel, nItem))) return 0; infoPtr->hwndEdit = hedit; SetFocus(hedit); SendMessageA(hedit, EM_SETSEL, 0, -1); return hedit; } /*** * DESCRIPTION: * Ensures the specified item is visible, scrolling into view if necessary. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * [I] BOOL : partially or entirely visible * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static BOOL LISTVIEW_EnsureVisible(HWND hwnd, INT nItem, BOOL bPartial) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; INT nScrollPosHeight = 0; INT nScrollPosWidth = 0; SCROLLINFO scrollInfo; RECT rcItem; ZeroMemory(&scrollInfo, sizeof(SCROLLINFO)); scrollInfo.cbSize = sizeof(SCROLLINFO); scrollInfo.fMask = SIF_POS; /* ALWAYS bPartial == FALSE, FOR NOW! */ rcItem.left = LVIR_BOUNDS; if (LISTVIEW_GetItemRect(hwnd, nItem, &rcItem) != FALSE) { if (rcItem.left < infoPtr->rcList.left) { if (GetScrollInfo(hwnd, SB_HORZ, &scrollInfo) != FALSE) { /* scroll left */ if (uView == LVS_LIST) { nScrollPosWidth = infoPtr->nItemWidth; rcItem.left += infoPtr->rcList.left; } else if ((uView == LVS_SMALLICON) || (uView == LVS_ICON)) { nScrollPosWidth = LISTVIEW_SCROLL_DIV_SIZE; rcItem.left += infoPtr->rcList.left; } /* When in LVS_REPORT view, the scroll position should not be updated. */ if (nScrollPosWidth != 0) { if (rcItem.left % nScrollPosWidth == 0) { scrollInfo.nPos += rcItem.left / nScrollPosWidth; } else { scrollInfo.nPos += rcItem.left / nScrollPosWidth - 1; } SetScrollInfo(hwnd, SB_HORZ, &scrollInfo, TRUE); } } } else if (rcItem.right > infoPtr->rcList.right) { if (GetScrollInfo(hwnd, SB_HORZ, &scrollInfo) != FALSE) { /* scroll right */ if (uView == LVS_LIST) { rcItem.right -= infoPtr->rcList.right; nScrollPosWidth = infoPtr->nItemWidth; } else if ((uView == LVS_SMALLICON) || (uView == LVS_ICON)) { rcItem.right -= infoPtr->rcList.right; nScrollPosWidth = LISTVIEW_SCROLL_DIV_SIZE; } /* When in LVS_REPORT view, the scroll position should not be updated. */ if (nScrollPosWidth != 0) { if (rcItem.right % nScrollPosWidth == 0) { scrollInfo.nPos += rcItem.right / nScrollPosWidth; } else { scrollInfo.nPos += rcItem.right / nScrollPosWidth + 1; } SetScrollInfo(hwnd, SB_HORZ, &scrollInfo, TRUE); } } } if (rcItem.top < infoPtr->rcList.top) { /* scroll up */ if (GetScrollInfo(hwnd, SB_VERT, &scrollInfo) != FALSE) { if (uView == LVS_REPORT) { rcItem.top -= infoPtr->rcList.top; nScrollPosHeight = infoPtr->nItemHeight; } else if ((uView == LVS_ICON) || (uView == LVS_SMALLICON)) { nScrollPosHeight = LISTVIEW_SCROLL_DIV_SIZE; rcItem.top += infoPtr->rcList.top; } if (rcItem.top % nScrollPosHeight == 0) { scrollInfo.nPos += rcItem.top / nScrollPosHeight; } else { scrollInfo.nPos += rcItem.top / nScrollPosHeight - 1; } SetScrollInfo(hwnd, SB_VERT, &scrollInfo, TRUE); } } else if (rcItem.bottom > infoPtr->rcList.bottom) { /* scroll down */ if (GetScrollInfo(hwnd, SB_VERT, &scrollInfo) != FALSE) { if (uView == LVS_REPORT) { rcItem.bottom -= infoPtr->rcList.bottom; nScrollPosHeight = infoPtr->nItemHeight; } else if ((uView == LVS_ICON) || (uView == LVS_SMALLICON)) { nScrollPosHeight = LISTVIEW_SCROLL_DIV_SIZE; rcItem.bottom -= infoPtr->rcList.bottom; } if (rcItem.bottom % nScrollPosHeight == 0) { scrollInfo.nPos += rcItem.bottom / nScrollPosHeight; } else { scrollInfo.nPos += rcItem.bottom / nScrollPosHeight + 1; } SetScrollInfo(hwnd, SB_VERT, &scrollInfo, TRUE); } } } return TRUE; } /*** * DESCRIPTION: * Retrieves the nearest item, given a position and a direction. * * PARAMETER(S): * [I] HWND : window handle * [I] POINT : start position * [I] UINT : direction * * RETURN: * Item index if successdful, -1 otherwise. */ static INT LISTVIEW_GetNearestItem(HWND hwnd, POINT pt, UINT vkDirection) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LVHITTESTINFO lvHitTestInfo; INT nItem = -1; RECT rcView; if (LISTVIEW_GetViewRect(hwnd, &rcView) != FALSE) { ZeroMemory(&lvHitTestInfo, sizeof(LVHITTESTINFO)); LISTVIEW_GetOrigin(hwnd, &lvHitTestInfo.pt); lvHitTestInfo.pt.x += pt.x; lvHitTestInfo.pt.y += pt.y; do { if (vkDirection == VK_DOWN) { lvHitTestInfo.pt.y += infoPtr->nItemHeight; } else if (vkDirection == VK_UP) { lvHitTestInfo.pt.y -= infoPtr->nItemHeight; } else if (vkDirection == VK_LEFT) { lvHitTestInfo.pt.x -= infoPtr->nItemWidth; } else if (vkDirection == VK_RIGHT) { lvHitTestInfo.pt.x += infoPtr->nItemWidth; } if (PtInRect(&rcView, lvHitTestInfo.pt) == FALSE) { return -1; } else { nItem = LISTVIEW_HitTestItem(hwnd, &lvHitTestInfo); } } while (nItem == -1); } return nItem; } /*** * DESCRIPTION: * Searches for an item with specific characteristics. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : base item index * [I] LPLVFINDINFO : item information to look for * * RETURN: * SUCCESS : index of item * FAILURE : -1 */ static LRESULT LISTVIEW_FindItem(HWND hwnd, INT nStart, LPLVFINDINFO lpFindInfo) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); POINT ptItem; CHAR szDispText[DISP_TEXT_SIZE]; LVITEMA lvItem; BOOL bWrap = FALSE; INT nItem = nStart; INT nLast = GETITEMCOUNT(infoPtr); if ((nItem >= -1) && (lpFindInfo != NULL)) { ZeroMemory(&lvItem, sizeof(LVITEMA)); if (lpFindInfo->flags & LVFI_PARAM) { lvItem.mask |= LVIF_PARAM; } if (lpFindInfo->flags & LVFI_STRING) { lvItem.mask |= LVIF_TEXT; lvItem.pszText = szDispText; lvItem.cchTextMax = DISP_TEXT_SIZE; } if (lpFindInfo->flags & LVFI_PARTIAL) { lvItem.mask |= LVIF_TEXT; lvItem.pszText = szDispText; lvItem.cchTextMax = DISP_TEXT_SIZE; } if (lpFindInfo->flags & LVFI_WRAP) { bWrap = TRUE; } if (lpFindInfo->flags & LVFI_NEARESTXY) { ptItem.x = lpFindInfo->pt.x; ptItem.y = lpFindInfo->pt.y; } while (1) { while (nItem < nLast) { if (lpFindInfo->flags & LVFI_NEARESTXY) { nItem = LISTVIEW_GetNearestItem(hwnd, ptItem, lpFindInfo->vkDirection); if (nItem != -1) { /* get position of the new item index */ if (ListView_GetItemPosition(hwnd, nItem, &ptItem) == FALSE) return -1; } else return -1; } else { nItem++; } lvItem.iItem = nItem; lvItem.iSubItem = 0; if (LISTVIEW_GetItemA(hwnd, &lvItem, TRUE) != FALSE) { if (lvItem.mask & LVIF_TEXT) { if (lpFindInfo->flags & LVFI_PARTIAL) { if (strstr(lvItem.pszText, lpFindInfo->psz) == NULL) continue; } else { if (strcmp(lvItem.pszText, lpFindInfo->psz) != 0) continue; } } if (lvItem.mask & LVIF_PARAM) { if (lpFindInfo->lParam != lvItem.lParam) continue; } return nItem; } } if (bWrap != FALSE) { nItem = -1; nLast = nStart + 1; bWrap = FALSE; } else { return -1; } } } return -1; } /*** * DESCRIPTION: * Retrieves the background color of the listview control. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * COLORREF associated with the background. */ static LRESULT LISTVIEW_GetBkColor(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); return infoPtr->clrBk; } /*** * DESCRIPTION: * Retrieves the background image of the listview control. * * PARAMETER(S): * [I] HWND : window handle * [O] LPLVMKBIMAGE : background image attributes * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE` */ /* static LRESULT LISTVIEW_GetBkImage(HWND hwnd, LPLVBKIMAGE lpBkImage) */ /* { */ /* FIXME (listview, "empty stub!\n"); */ /* return FALSE; */ /* } */ /*** * DESCRIPTION: * Retrieves the callback mask. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * Value of mask */ static UINT LISTVIEW_GetCallbackMask(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); return infoPtr->uCallbackMask; } /*** * DESCRIPTION: * Retrieves column attributes. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : column index * [IO] LPLVCOLUMNA : column information * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_GetColumnA(HWND hwnd, INT nItem, LPLVCOLUMNA lpColumn) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); HDITEMA hdi; BOOL bResult = FALSE; if (lpColumn != NULL) { /* initialize memory */ ZeroMemory(&hdi, sizeof(HDITEMA)); if (lpColumn->mask & LVCF_FMT) { hdi.mask |= HDI_FORMAT; } if (lpColumn->mask & LVCF_WIDTH) { hdi.mask |= HDI_WIDTH; } if (lpColumn->mask & LVCF_TEXT) { hdi.mask |= HDI_TEXT; hdi.cchTextMax = lpColumn->cchTextMax; hdi.pszText = lpColumn->pszText; } if (lpColumn->mask & LVCF_IMAGE) { hdi.mask |= HDI_IMAGE; } if (lpColumn->mask & LVCF_ORDER) { hdi.mask |= HDI_ORDER; } bResult = Header_GetItemA(infoPtr->hwndHeader, nItem, &hdi); if (bResult != FALSE) { if (lpColumn->mask & LVCF_FMT) { lpColumn->fmt = 0; if (hdi.fmt & HDF_LEFT) { lpColumn->fmt |= LVCFMT_LEFT; } else if (hdi.fmt & HDF_RIGHT) { lpColumn->fmt |= LVCFMT_RIGHT; } else if (hdi.fmt & HDF_CENTER) { lpColumn->fmt |= LVCFMT_CENTER; } if (hdi.fmt & HDF_IMAGE) { lpColumn->fmt |= LVCFMT_COL_HAS_IMAGES; } if (hdi.fmt & HDF_BITMAP_ON_RIGHT) { lpColumn->fmt |= LVCFMT_BITMAP_ON_RIGHT; } } if (lpColumn->mask & LVCF_WIDTH) { lpColumn->cx = hdi.cxy; } if (lpColumn->mask & LVCF_IMAGE) { lpColumn->iImage = hdi.iImage; } if (lpColumn->mask & LVCF_ORDER) { lpColumn->iOrder = hdi.iOrder; } } } return bResult; } /* LISTVIEW_GetColumnW */ static LRESULT LISTVIEW_GetColumnOrderArray(HWND hwnd, INT iCount, LPINT lpiArray) { /* LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); */ INT i; if (!lpiArray) return FALSE; /* little hack */ for (i = 0; i < iCount; i++) lpiArray[i] = i; return TRUE; } /*** * DESCRIPTION: * Retrieves the column width. * * PARAMETER(S): * [I] HWND : window handle * [I] int : column index * * RETURN: * SUCCESS : column width * FAILURE : zero */ static LRESULT LISTVIEW_GetColumnWidth(HWND hwnd, INT nColumn) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; INT nColumnWidth = 0; HDITEMA hdi; if (uView == LVS_LIST) { nColumnWidth = infoPtr->nItemWidth; } else if (uView == LVS_REPORT) { /* get column width from header */ ZeroMemory(&hdi, sizeof(HDITEMA)); hdi.mask = HDI_WIDTH; if (Header_GetItemA(infoPtr->hwndHeader, nColumn, &hdi) != FALSE) { nColumnWidth = hdi.cxy; } } return nColumnWidth; } /*** * DESCRIPTION: * In list or report display mode, retrieves the number of items that can fit * vertically in the visible area. In icon or small icon display mode, * retrieves the total number of visible items. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * Number of fully visible items. */ static LRESULT LISTVIEW_GetCountPerPage(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; INT nItemCount = 0; if (uView == LVS_LIST) { if (infoPtr->rcList.right > infoPtr->nItemWidth) { nItemCount = LISTVIEW_GetCountPerRow(hwnd) * LISTVIEW_GetCountPerColumn(hwnd); } } else if (uView == LVS_REPORT) { nItemCount = LISTVIEW_GetCountPerColumn(hwnd); } else { nItemCount = GETITEMCOUNT(infoPtr); } return nItemCount; } /* LISTVIEW_GetEditControl */ /*** * DESCRIPTION: * Retrieves the extended listview style. * * PARAMETERS: * [I] HWND : window handle * * RETURN: * SUCCESS : previous style * FAILURE : 0 */ static LRESULT LISTVIEW_GetExtendedListViewStyle(HWND hwnd) { LISTVIEW_INFO *infoPtr; /* make sure we can get the listview info */ if (!(infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0))) return (0); return (infoPtr->dwExStyle); } /*** * DESCRIPTION: * Retrieves the handle to the header control. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * Header handle. */ static LRESULT LISTVIEW_GetHeader(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); return infoPtr->hwndHeader; } /* LISTVIEW_GetHotCursor */ /*** * DESCRIPTION: * Returns the time that the mouse cursor must hover over an item * before it is selected. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * Returns the previously set hover time or (DWORD)-1 to indicate that the * hover time is set to the default hover time. */ static LRESULT LISTVIEW_GetHoverTime(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); return infoPtr->dwHoverTime; } /*** * DESCRIPTION: * Retrieves an image list handle. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : image list identifier * * RETURN: * SUCCESS : image list handle * FAILURE : NULL */ static LRESULT LISTVIEW_GetImageList(HWND hwnd, INT nImageList) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); HIMAGELIST himl = NULL; switch (nImageList) { case LVSIL_NORMAL: himl = infoPtr->himlNormal; break; case LVSIL_SMALL: himl = infoPtr->himlSmall; break; case LVSIL_STATE: himl = infoPtr->himlState; break; } return (LRESULT)himl; } /* LISTVIEW_GetISearchString */ /*** * DESCRIPTION: * Retrieves item attributes. * * PARAMETER(S): * [I] HWND : window handle * [IO] LPLVITEMA : item info * [I] internal : if true then we will use tricks that avoid copies * but are not compatible with the regular interface * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_GetItemA(HWND hwnd, LPLVITEMA lpLVItem, BOOL internal) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LONG lCtrlId = GetWindowLongA(hwnd, GWL_ID); NMLVDISPINFOA dispInfo; LISTVIEW_SUBITEM *lpSubItem; LISTVIEW_ITEM *lpItem; INT* piImage; LPSTR* ppszText; HDPA hdpaSubItems; /* In the following: * lpLVItem describes the information requested by the user * lpItem/lpSubItem is what we have * dispInfo is a structure we use to request the missing * information from the application */ TRACE("(hwnd=%x, lpLVItem=%p)\n", hwnd, lpLVItem); if ((lpLVItem == NULL) || (lpLVItem->iItem < 0) || (lpLVItem->iItem >= GETITEMCOUNT(infoPtr)) ) return FALSE; hdpaSubItems = (HDPA)DPA_GetPtr(infoPtr->hdpaItems, lpLVItem->iItem); if (hdpaSubItems == NULL) return FALSE; lpItem = (LISTVIEW_ITEM *)DPA_GetPtr(hdpaSubItems, 0); if (lpItem == NULL) return FALSE; ZeroMemory(&dispInfo, sizeof(NMLVDISPINFOA)); if (lpLVItem->iSubItem == 0) { piImage=&lpItem->iImage; ppszText=&lpItem->pszText; if ((infoPtr->uCallbackMask != 0) && (lpLVItem->mask & LVIF_STATE)) { dispInfo.item.mask |= LVIF_STATE; dispInfo.item.stateMask = infoPtr->uCallbackMask; } } else { lpSubItem = LISTVIEW_GetSubItemPtr(hdpaSubItems, lpLVItem->iSubItem); if (lpSubItem != NULL) { piImage=&lpSubItem->iImage; ppszText=&lpSubItem->pszText; } else { piImage=NULL; ppszText=NULL; } } if ((lpLVItem->mask & LVIF_IMAGE) && ((piImage==NULL) || (*piImage == I_IMAGECALLBACK))) { dispInfo.item.mask |= LVIF_IMAGE; } if ((lpLVItem->mask & LVIF_TEXT) && ((ppszText==NULL) || (*ppszText == LPSTR_TEXTCALLBACKA))) { dispInfo.item.mask |= LVIF_TEXT; dispInfo.item.pszText = lpLVItem->pszText; dispInfo.item.cchTextMax = lpLVItem->cchTextMax; } if (dispInfo.item.mask != 0) { /* We don't have all the requested info, query the application */ dispInfo.hdr.hwndFrom = hwnd; dispInfo.hdr.idFrom = lCtrlId; dispInfo.hdr.code = LVN_GETDISPINFOA; dispInfo.item.iItem = lpLVItem->iItem; dispInfo.item.iSubItem = lpLVItem->iSubItem; dispInfo.item.lParam = lpItem->lParam; ListView_Notify(GetParent(hwnd), lCtrlId, &dispInfo); } if (dispInfo.item.mask & LVIF_IMAGE) { lpLVItem->iImage = dispInfo.item.iImage; } else if (lpLVItem->mask & LVIF_IMAGE) { lpLVItem->iImage = *piImage; } if (dispInfo.item.mask & LVIF_PARAM) { lpLVItem->lParam = dispInfo.item.lParam; } else if (lpLVItem->mask & LVIF_PARAM) { lpLVItem->lParam = lpItem->lParam; } if (dispInfo.item.mask & LVIF_TEXT) { if ((dispInfo.item.mask & LVIF_DI_SETITEM) && (ppszText != NULL)) { Str_SetPtrA(ppszText, dispInfo.item.pszText); } /* Here lpLVItem->pszText==dispInfo.item.pszText so a copy is unnecessary */ } else if (lpLVItem->mask & LVIF_TEXT) { if (internal==TRUE) { lpLVItem->pszText=*ppszText; } else { lstrcpynA(lpLVItem->pszText, *ppszText, lpLVItem->cchTextMax); } } if (lpLVItem->iSubItem == 0) { if (dispInfo.item.mask & LVIF_STATE) { lpLVItem->state = lpItem->state; lpLVItem->state &= ~dispInfo.item.stateMask; lpLVItem->state |= (dispInfo.item.state & dispInfo.item.stateMask); } else if (lpLVItem->mask & LVIF_STATE) { lpLVItem->state = lpItem->state & lpLVItem->stateMask; } if (lpLVItem->mask & LVIF_PARAM) { lpLVItem->lParam = lpItem->lParam; } if (lpLVItem->mask & LVIF_INDENT) { lpLVItem->iIndent = lpItem->iIndent; } } return TRUE; } /* LISTVIEW_GetItemW */ /* LISTVIEW_GetHotCursor */ /*** * DESCRIPTION: * Retrieves the index of the hot item. * * PARAMETERS: * [I] HWND : window handle * * RETURN: * SUCCESS : hot item index * FAILURE : -1 (no hot item) */ static LRESULT LISTVIEW_GetHotItem(HWND hwnd) { LISTVIEW_INFO *infoPtr; /* make sure we can get the listview info */ if (!(infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0))) return (-1); return (infoPtr->nHotItem); } /* LISTVIEW_GetHoverTime */ /*** * DESCRIPTION: * Retrieves the number of items in the listview control. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * Number of items. */ static LRESULT LISTVIEW_GetItemCount(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); return GETITEMCOUNT(infoPtr); } /*** * DESCRIPTION: * Retrieves the position (upper-left) of the listview control item. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * [O] LPPOINT : coordinate information * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static BOOL LISTVIEW_GetItemPosition(HWND hwnd, INT nItem, LPPOINT lpptPosition) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; BOOL bResult = FALSE; HDPA hdpaSubItems; LISTVIEW_ITEM *lpItem; INT nCountPerColumn; INT nRow; TRACE("(hwnd=%x,nItem=%d,lpptPosition=%p)\n", hwnd, nItem, lpptPosition); if ((nItem >= 0) && (nItem < GETITEMCOUNT(infoPtr)) && (lpptPosition != NULL)) { if (uView == LVS_LIST) { bResult = TRUE; nItem = nItem - ListView_GetTopIndex(hwnd); nCountPerColumn = LISTVIEW_GetCountPerColumn(hwnd); if (nItem < 0) { nRow = nItem % nCountPerColumn; if (nRow == 0) { lpptPosition->x = nItem / nCountPerColumn * infoPtr->nItemWidth; lpptPosition->y = 0; } else { lpptPosition->x = (nItem / nCountPerColumn -1) * infoPtr->nItemWidth; lpptPosition->y = (nRow + nCountPerColumn) * infoPtr->nItemHeight; } } else { lpptPosition->x = nItem / nCountPerColumn * infoPtr->nItemWidth; lpptPosition->y = nItem % nCountPerColumn * infoPtr->nItemHeight; } } else if (uView == LVS_REPORT) { bResult = TRUE; lpptPosition->x = REPORT_MARGINX; lpptPosition->y = ((nItem - ListView_GetTopIndex(hwnd)) * infoPtr->nItemHeight) + infoPtr->rcList.top; } else { hdpaSubItems = (HDPA)DPA_GetPtr(infoPtr->hdpaItems, nItem); if (hdpaSubItems != NULL) { lpItem = (LISTVIEW_ITEM *)DPA_GetPtr(hdpaSubItems, 0); if (lpItem != NULL) { bResult = TRUE; lpptPosition->x = lpItem->ptPosition.x; lpptPosition->y = lpItem->ptPosition.y; } } } } return bResult; } /*** * DESCRIPTION: * Retrieves the bounding rectangle for a listview control item. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * [IO] LPRECT : bounding rectangle coordinates * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_GetItemRect(HWND hwnd, INT nItem, LPRECT lprc) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; BOOL bResult = FALSE; POINT ptOrigin; POINT ptItem; HDC hdc; HFONT hOldFont; INT nLeftPos; INT nLabelWidth; TEXTMETRICA tm; TRACE("(hwnd=%x, nItem=%d, lprc=%p)\n", hwnd, nItem, lprc); if ((nItem >= 0) && (nItem < GETITEMCOUNT(infoPtr)) && (lprc != NULL)) { if (ListView_GetItemPosition(hwnd, nItem, &ptItem) != FALSE) { switch(lprc->left) { case LVIR_ICON: if (uView == LVS_ICON) { if (infoPtr->himlNormal != NULL) { if (LISTVIEW_GetOrigin(hwnd, &ptOrigin) != FALSE) { bResult = TRUE; lprc->left = ptItem.x + ptOrigin.x; lprc->top = ptItem.y + ptOrigin.y; lprc->right = lprc->left + infoPtr->iconSize.cx; lprc->bottom = (lprc->top + infoPtr->iconSize.cy + ICON_BOTTOM_PADDING + ICON_TOP_PADDING); } } } else if (uView == LVS_SMALLICON) { if (LISTVIEW_GetOrigin(hwnd, &ptOrigin) != FALSE) { bResult = TRUE; lprc->left = ptItem.x + ptOrigin.x; lprc->top = ptItem.y + ptOrigin.y; lprc->bottom = lprc->top + infoPtr->nItemHeight; if (infoPtr->himlState != NULL) lprc->left += infoPtr->iconSize.cx; if (infoPtr->himlSmall != NULL) lprc->right = lprc->left + infoPtr->iconSize.cx; else lprc->right = lprc->left; } } else { bResult = TRUE; lprc->left = ptItem.x; lprc->top = ptItem.y; lprc->bottom = lprc->top + infoPtr->nItemHeight; if (infoPtr->himlState != NULL) { lprc->left += infoPtr->iconSize.cx; } if (infoPtr->himlSmall != NULL) { lprc->right = lprc->left + infoPtr->iconSize.cx; } else { lprc->right = lprc->left; } } break; case LVIR_LABEL: if (uView == LVS_ICON) { if (infoPtr->himlNormal != NULL) { if (LISTVIEW_GetOrigin(hwnd, &ptOrigin) != FALSE) { bResult = TRUE; lprc->left = ptItem.x + ptOrigin.x; lprc->top = (ptItem.y + ptOrigin.y + infoPtr->iconSize.cy + ICON_BOTTOM_PADDING + ICON_TOP_PADDING); nLabelWidth = LISTVIEW_GetLabelWidth(hwnd, nItem); if (infoPtr->iconSpacing.cx - nLabelWidth > 1) { lprc->left += (infoPtr->iconSpacing.cx - nLabelWidth) / 2; lprc->right = lprc->left + nLabelWidth; } else { lprc->left += 1; lprc->right = lprc->left + infoPtr->iconSpacing.cx - 1; } hdc = GetDC(hwnd); hOldFont = SelectObject(hdc, infoPtr->hFont); GetTextMetricsA(hdc, &tm); lprc->bottom = lprc->top + tm.tmHeight + HEIGHT_PADDING; SelectObject(hdc, hOldFont); ReleaseDC(hwnd, hdc); } } } else if (uView == LVS_SMALLICON) { if (LISTVIEW_GetOrigin(hwnd, &ptOrigin) != FALSE) { bResult = TRUE; nLeftPos = lprc->left = ptItem.x + ptOrigin.x; lprc->top = ptItem.y + ptOrigin.y; lprc->bottom = lprc->top + infoPtr->nItemHeight; if (infoPtr->himlState != NULL) { lprc->left += infoPtr->iconSize.cx; } if (infoPtr->himlSmall != NULL) { lprc->left += infoPtr->iconSize.cx; } nLabelWidth = LISTVIEW_GetLabelWidth(hwnd, nItem); if (lprc->left + nLabelWidth < nLeftPos + infoPtr->nItemWidth) { lprc->right = lprc->left + nLabelWidth; } else { lprc->right = nLeftPos + infoPtr->nItemWidth; } } } else { bResult = TRUE; nLeftPos = lprc->left = ptItem.x; lprc->top = ptItem.y; lprc->bottom = lprc->top + infoPtr->nItemHeight; if (infoPtr->himlState != NULL) { lprc->left += infoPtr->iconSize.cx; } if (infoPtr->himlSmall != NULL) { lprc->left += infoPtr->iconSize.cx; } nLabelWidth = LISTVIEW_GetLabelWidth(hwnd, nItem); if (lprc->left + nLabelWidth < nLeftPos + infoPtr->nItemWidth) { lprc->right = lprc->left + nLabelWidth; } else { lprc->right = nLeftPos + infoPtr->nItemWidth; } } break; case LVIR_BOUNDS: if (uView == LVS_ICON) { if (infoPtr->himlNormal != NULL) { if (LISTVIEW_GetOrigin(hwnd, &ptOrigin) != FALSE) { bResult = TRUE; lprc->left = ptItem.x + ptOrigin.x; lprc->top = ptItem.y + ptOrigin.y; lprc->right = lprc->left + infoPtr->iconSpacing.cx; lprc->bottom = lprc->top + infoPtr->iconSpacing.cy; } } } else if (uView == LVS_SMALLICON) { if (LISTVIEW_GetOrigin(hwnd, &ptOrigin) != FALSE) { bResult = TRUE; lprc->left = ptItem.x + ptOrigin.x; lprc->right = lprc->left; lprc->top = ptItem.y + ptOrigin.y; lprc->bottom = lprc->top + infoPtr->nItemHeight; if (infoPtr->himlState != NULL) lprc->right += infoPtr->iconSize.cx; if (infoPtr->himlSmall != NULL) lprc->right += infoPtr->iconSize.cx; nLabelWidth = LISTVIEW_GetLabelWidth(hwnd, nItem); if (lprc->right + nLabelWidth < lprc->left + infoPtr->nItemWidth) { lprc->right += nLabelWidth; } else { lprc->right = lprc->left + infoPtr->nItemWidth; } } } else { bResult = TRUE; lprc->left = ptItem.x; lprc->right = lprc->left; lprc->top = ptItem.y; lprc->bottom = lprc->top + infoPtr->nItemHeight; if (infoPtr->himlState != NULL) { lprc->right += infoPtr->iconSize.cx; } if (infoPtr->himlSmall != NULL) { lprc->right += infoPtr->iconSize.cx; } nLabelWidth = LISTVIEW_GetLabelWidth(hwnd, nItem); if (lprc->right + nLabelWidth < lprc->left + infoPtr->nItemWidth) { lprc->right += nLabelWidth; } else { lprc->right = lprc->left + infoPtr->nItemWidth; } } break; case LVIR_SELECTBOUNDS: if (uView == LVS_ICON) { if (infoPtr->himlNormal != NULL) { if (LISTVIEW_GetOrigin(hwnd, &ptOrigin) != FALSE) { bResult = TRUE; lprc->left = ptItem.x + ptOrigin.x; lprc->top = ptItem.y + ptOrigin.y; lprc->right = lprc->left + infoPtr->iconSpacing.cx; lprc->bottom = lprc->top + infoPtr->iconSpacing.cy; } } } else if (uView == LVS_SMALLICON) { if (LISTVIEW_GetOrigin(hwnd, &ptOrigin) != FALSE) { bResult = TRUE; nLeftPos= lprc->left = ptItem.x + ptOrigin.x; lprc->top = ptItem.y + ptOrigin.y; lprc->bottom = lprc->top + infoPtr->nItemHeight; if (infoPtr->himlState != NULL) { lprc->left += infoPtr->iconSize.cx; } lprc->right = lprc->left; if (infoPtr->himlSmall != NULL) { lprc->right += infoPtr->iconSize.cx; } nLabelWidth = LISTVIEW_GetLabelWidth(hwnd, nItem); if (lprc->right + nLabelWidth < nLeftPos + infoPtr->nItemWidth) { lprc->right += nLabelWidth; } else { lprc->right = nLeftPos + infoPtr->nItemWidth; } } } else { bResult = TRUE; nLeftPos = lprc->left = ptItem.x; lprc->top = ptItem.y; lprc->bottom = lprc->top + infoPtr->nItemHeight; if (infoPtr->himlState != NULL) { lprc->left += infoPtr->iconSize.cx; } lprc->right = lprc->left; if (infoPtr->himlSmall != NULL) { lprc->right += infoPtr->iconSize.cx; } nLabelWidth = LISTVIEW_GetLabelWidth(hwnd, nItem); if (lprc->right + nLabelWidth < nLeftPos + infoPtr->nItemWidth) { lprc->right += nLabelWidth; } else { lprc->right = nLeftPos + infoPtr->nItemWidth; } } break; } } } return bResult; } /*** * DESCRIPTION: * Retrieves the width of a label. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * SUCCESS : string width (in pixels) * FAILURE : zero */ static INT LISTVIEW_GetLabelWidth(HWND hwnd, INT nItem) { CHAR szDispText[DISP_TEXT_SIZE]; INT nLabelWidth = 0; LVITEMA lvItem; TRACE("(hwnd=%x, nItem=%d)\n", hwnd, nItem); ZeroMemory(&lvItem, sizeof(LVITEMA)); lvItem.mask = LVIF_TEXT; lvItem.iItem = nItem; lvItem.cchTextMax = DISP_TEXT_SIZE; lvItem.pszText = szDispText; if (LISTVIEW_GetItemA(hwnd, &lvItem, TRUE) != FALSE) { nLabelWidth = ListView_GetStringWidthA(hwnd, lvItem.pszText); } return nLabelWidth; } /*** * DESCRIPTION: * Retrieves the spacing between listview control items. * * PARAMETER(S): * [I] HWND : window handle * [I] BOOL : flag for small or large icon * * RETURN: * Horizontal + vertical spacing */ static LRESULT LISTVIEW_GetItemSpacing(HWND hwnd, BOOL bSmall) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LONG lResult; if (bSmall == FALSE) { lResult = MAKELONG(infoPtr->iconSpacing.cx, infoPtr->iconSpacing.cy); } else { /* TODO: need to store width of smallicon item */ lResult = MAKELONG(0, infoPtr->nItemHeight); } return lResult; } /*** * DESCRIPTION: * Retrieves the state of a listview control item. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * [I] UINT : state mask * * RETURN: * State specified by the mask. */ static LRESULT LISTVIEW_GetItemState(HWND hwnd, INT nItem, UINT uMask) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LVITEMA lvItem; UINT uState = 0; if ((nItem >= 0) && (nItem < GETITEMCOUNT(infoPtr))) { ZeroMemory(&lvItem, sizeof(LVITEMA)); lvItem.iItem = nItem; lvItem.stateMask = uMask; lvItem.mask = LVIF_STATE; if (LISTVIEW_GetItemA(hwnd, &lvItem, TRUE) != FALSE) { uState = lvItem.state; } } return uState; } /*** * DESCRIPTION: * Retrieves the text of a listview control item or subitem. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * [IO] LPLVITEMA : item information * * RETURN: * SUCCESS : string length * FAILURE : 0 */ static LRESULT LISTVIEW_GetItemTextA(HWND hwnd, INT nItem, LPLVITEMA lpLVItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); INT nLength = 0; if (lpLVItem != NULL) { if ((nItem >= 0) && (nItem < GETITEMCOUNT(infoPtr))) { lpLVItem->mask = LVIF_TEXT; lpLVItem->iItem = nItem; if (LISTVIEW_GetItemA(hwnd, lpLVItem, FALSE) != FALSE) { nLength = lstrlenA(lpLVItem->pszText); } } } return nLength; } /*** * DESCRIPTION: * Searches for an item based on properties + relationships. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * [I] INT : relationship flag * * RETURN: * SUCCESS : item index * FAILURE : -1 */ static LRESULT LISTVIEW_GetNextItem(HWND hwnd, INT nItem, UINT uFlags) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; UINT uMask = 0; LVFINDINFO lvFindInfo; INT nCountPerColumn; INT i; if ((nItem >= -1) && (nItem < GETITEMCOUNT(infoPtr))) { ZeroMemory(&lvFindInfo, sizeof(LVFINDINFO)); if (uFlags & LVNI_CUT) uMask |= LVIS_CUT; if (uFlags & LVNI_DROPHILITED) uMask |= LVIS_DROPHILITED; if (uFlags & LVNI_FOCUSED) uMask |= LVIS_FOCUSED; if (uFlags & LVNI_SELECTED) uMask |= LVIS_SELECTED; if (uFlags & LVNI_ABOVE) { if ((uView == LVS_LIST) || (uView == LVS_REPORT)) { while (nItem >= 0) { nItem--; if ((ListView_GetItemState(hwnd, nItem, uMask) & uMask) == uMask) return nItem; } } else { lvFindInfo.flags = LVFI_NEARESTXY; lvFindInfo.vkDirection = VK_UP; ListView_GetItemPosition(hwnd, nItem, &lvFindInfo.pt); while ((nItem = ListView_FindItem(hwnd, nItem, &lvFindInfo)) != -1) { if ((ListView_GetItemState(hwnd, nItem, uMask) & uMask) == uMask) return nItem; } } } else if (uFlags & LVNI_BELOW) { if ((uView == LVS_LIST) || (uView == LVS_REPORT)) { while (nItem < GETITEMCOUNT(infoPtr)) { nItem++; if ((ListView_GetItemState(hwnd, nItem, uMask) & uMask) == uMask) return nItem; } } else { lvFindInfo.flags = LVFI_NEARESTXY; lvFindInfo.vkDirection = VK_DOWN; ListView_GetItemPosition(hwnd, nItem, &lvFindInfo.pt); while ((nItem = ListView_FindItem(hwnd, nItem, &lvFindInfo)) != -1) { if ((ListView_GetItemState(hwnd, nItem, uMask) & uMask) == uMask) return nItem; } } } else if (uFlags & LVNI_TOLEFT) { if (uView == LVS_LIST) { nCountPerColumn = LISTVIEW_GetCountPerColumn(hwnd); while (nItem - nCountPerColumn >= 0) { nItem -= nCountPerColumn; if ((ListView_GetItemState(hwnd, nItem, uMask) & uMask) == uMask) return nItem; } } else if ((uView == LVS_SMALLICON) || (uView == LVS_ICON)) { lvFindInfo.flags = LVFI_NEARESTXY; lvFindInfo.vkDirection = VK_LEFT; ListView_GetItemPosition(hwnd, nItem, &lvFindInfo.pt); while ((nItem = ListView_FindItem(hwnd, nItem, &lvFindInfo)) != -1) { if ((ListView_GetItemState(hwnd, nItem, uMask) & uMask) == uMask) return nItem; } } } else if (uFlags & LVNI_TORIGHT) { if (uView == LVS_LIST) { nCountPerColumn = LISTVIEW_GetCountPerColumn(hwnd); while (nItem + nCountPerColumn < GETITEMCOUNT(infoPtr)) { nItem += nCountPerColumn; if ((ListView_GetItemState(hwnd, nItem, uMask) & uMask) == uMask) return nItem; } } else if ((uView == LVS_SMALLICON) || (uView == LVS_ICON)) { lvFindInfo.flags = LVFI_NEARESTXY; lvFindInfo.vkDirection = VK_RIGHT; ListView_GetItemPosition(hwnd, nItem, &lvFindInfo.pt); while ((nItem = ListView_FindItem(hwnd, nItem, &lvFindInfo)) != -1) { if ((ListView_GetItemState(hwnd, nItem, uMask) & uMask) == uMask) return nItem; } } } else { nItem++; /* search by index */ for (i = nItem; i < GETITEMCOUNT(infoPtr); i++) { if ((ListView_GetItemState(hwnd, i, uMask) & uMask) == uMask) return i; } } } return -1; } /* LISTVIEW_GetNumberOfWorkAreas */ /*** * DESCRIPTION: * Retrieves the origin coordinates when in icon or small icon display mode. * * PARAMETER(S): * [I] HWND : window handle * [O] LPPOINT : coordinate information * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_GetOrigin(HWND hwnd, LPPOINT lpptOrigin) { LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); UINT uView = lStyle & LVS_TYPEMASK; BOOL bResult = FALSE; TRACE("(hwnd=%x, lpptOrigin=%p)\n", hwnd, lpptOrigin); if ((uView == LVS_SMALLICON) || (uView == LVS_ICON)) { SCROLLINFO scrollInfo; ZeroMemory(lpptOrigin, sizeof(POINT)); ZeroMemory(&scrollInfo, sizeof(SCROLLINFO)); scrollInfo.cbSize = sizeof(SCROLLINFO); if (lStyle & WS_HSCROLL) { scrollInfo.fMask = SIF_POS; if (GetScrollInfo(hwnd, SB_HORZ, &scrollInfo) != FALSE) { lpptOrigin->x = -scrollInfo.nPos * LISTVIEW_SCROLL_DIV_SIZE; } } if (lStyle & WS_VSCROLL) { scrollInfo.fMask = SIF_POS; if (GetScrollInfo(hwnd, SB_VERT, &scrollInfo) != FALSE) { lpptOrigin->y = -scrollInfo.nPos * LISTVIEW_SCROLL_DIV_SIZE; } } bResult = TRUE; } return bResult; } /*** * DESCRIPTION: * Retrieves the number of items that are marked as selected. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * Number of items selected. */ static LRESULT LISTVIEW_GetSelectedCount(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); INT nSelectedCount = 0; INT i; for (i = 0; i < GETITEMCOUNT(infoPtr); i++) { if (ListView_GetItemState(hwnd, i, LVIS_SELECTED) & LVIS_SELECTED) { nSelectedCount++; } } return nSelectedCount; } /*** * DESCRIPTION: * Retrieves item index that marks the start of a multiple selection. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * Index number or -1 if there is no selection mark. */ static LRESULT LISTVIEW_GetSelectionMark(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); return infoPtr->nSelectionMark; } /*** * DESCRIPTION: * Retrieves the width of a string. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * SUCCESS : string width (in pixels) * FAILURE : zero */ static LRESULT LISTVIEW_GetStringWidthA(HWND hwnd, LPCSTR lpszText) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); HFONT hFont, hOldFont; SIZE stringSize; HDC hdc; ZeroMemory(&stringSize, sizeof(SIZE)); if (lpszText != NULL) { hFont = infoPtr->hFont ? infoPtr->hFont : infoPtr->hDefaultFont; hdc = GetDC(hwnd); hOldFont = SelectObject(hdc, hFont); GetTextExtentPointA(hdc, lpszText, lstrlenA(lpszText), &stringSize); SelectObject(hdc, hOldFont); ReleaseDC(hwnd, hdc); } return stringSize.cx; } /*** * DESCRIPTION: * Retrieves the text backgound color. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * COLORREF associated with the the background. */ static LRESULT LISTVIEW_GetTextBkColor(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO*)GetWindowLongA(hwnd, 0); return infoPtr->clrTextBk; } /*** * DESCRIPTION: * Retrieves the text color. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * COLORREF associated with the text. */ static LRESULT LISTVIEW_GetTextColor(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO*)GetWindowLongA(hwnd, 0); return infoPtr->clrText; } /*** * DESCRIPTION: * Determines which section of the item was selected (if any). * * PARAMETER(S): * [I] HWND : window handle * [IO] LPLVHITTESTINFO : hit test information * * RETURN: * SUCCESS : item index * FAILURE : -1 */ static INT LISTVIEW_HitTestItem(HWND hwnd, LPLVHITTESTINFO lpHitTestInfo) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); RECT rcItem; INT i; TRACE("(hwnd=%x, x=%ld, y=%ld)\n", hwnd, lpHitTestInfo->pt.x, lpHitTestInfo->pt.y); for (i = 0; i < GETITEMCOUNT(infoPtr); i++) { rcItem.left = LVIR_BOUNDS; if (LISTVIEW_GetItemRect(hwnd, i, &rcItem) != FALSE) { if (PtInRect(&rcItem, lpHitTestInfo->pt) != FALSE) { rcItem.left = LVIR_ICON; if (LISTVIEW_GetItemRect(hwnd, i, &rcItem) != FALSE) { if (PtInRect(&rcItem, lpHitTestInfo->pt) != FALSE) { lpHitTestInfo->flags = LVHT_ONITEMICON; lpHitTestInfo->iItem = i; lpHitTestInfo->iSubItem = 0; return i; } } rcItem.left = LVIR_LABEL; if (LISTVIEW_GetItemRect(hwnd, i, &rcItem) != FALSE) { if (PtInRect(&rcItem, lpHitTestInfo->pt) != FALSE) { lpHitTestInfo->flags = LVHT_ONITEMLABEL; lpHitTestInfo->iItem = i; lpHitTestInfo->iSubItem = 0; return i; } } lpHitTestInfo->flags = LVHT_ONITEMSTATEICON; lpHitTestInfo->iItem = i; lpHitTestInfo->iSubItem = 0; return i; } } } lpHitTestInfo->flags = LVHT_NOWHERE; return -1; } /*** * DESCRIPTION: * Determines which listview item is located at the specified position. * * PARAMETER(S): * [I] HWND : window handle * [IO} LPLVHITTESTINFO : hit test information * * RETURN: * SUCCESS : item index * FAILURE : -1 */ static LRESULT LISTVIEW_HitTest(HWND hwnd, LPLVHITTESTINFO lpHitTestInfo) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); INT nItem = -1; lpHitTestInfo->flags = 0; if (infoPtr->rcList.left > lpHitTestInfo->pt.x) { lpHitTestInfo->flags = LVHT_TOLEFT; } else if (infoPtr->rcList.right < lpHitTestInfo->pt.x) { lpHitTestInfo->flags = LVHT_TORIGHT; } if (infoPtr->rcList.top > lpHitTestInfo->pt.y) { lpHitTestInfo->flags |= LVHT_ABOVE; } else if (infoPtr->rcList.bottom < lpHitTestInfo->pt.y) { lpHitTestInfo->flags |= LVHT_BELOW; } if (lpHitTestInfo->flags == 0) { nItem = LISTVIEW_HitTestItem(hwnd, lpHitTestInfo); } return nItem; } /*** * DESCRIPTION: * Inserts a new column. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : column index * [I] LPLVCOLUMNA : column information * * RETURN: * SUCCESS : new column index * FAILURE : -1 */ static LRESULT LISTVIEW_InsertColumnA(HWND hwnd, INT nColumn, LPLVCOLUMNA lpColumn) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); HDITEMA hdi; INT nNewColumn = -1; TRACE("(hwnd=%x, nColumn=%d, lpColumn=%p)\n",hwnd, nColumn, lpColumn); if (lpColumn != NULL) { /* initialize memory */ ZeroMemory(&hdi, sizeof(HDITEMA)); if (lpColumn->mask & LVCF_FMT) { /* format member is valid */ hdi.mask |= HDI_FORMAT; /* set text alignment (leftmost column must be left-aligned) */ if (nColumn == 0) { hdi.fmt |= HDF_LEFT; } else { if (lpColumn->fmt & LVCFMT_LEFT) { hdi.fmt |= HDF_LEFT; } else if (lpColumn->fmt & LVCFMT_RIGHT) { hdi.fmt |= HDF_RIGHT; } else if (lpColumn->fmt & LVCFMT_CENTER) { hdi.fmt |= HDF_CENTER; } } if (lpColumn->fmt & LVCFMT_BITMAP_ON_RIGHT) { hdi.fmt |= HDF_BITMAP_ON_RIGHT; /* ??? */ } if (lpColumn->fmt & LVCFMT_COL_HAS_IMAGES) { /* ??? */ } if (lpColumn->fmt & LVCFMT_IMAGE) { hdi.fmt |= HDF_IMAGE; hdi.iImage = I_IMAGECALLBACK; } } if (lpColumn->mask & LVCF_WIDTH) { hdi.mask |= HDI_WIDTH; hdi.cxy = lpColumn->cx; } if (lpColumn->mask & LVCF_TEXT) { hdi.mask |= HDI_TEXT | HDI_FORMAT; hdi.pszText = lpColumn->pszText; hdi.cchTextMax = lstrlenA(lpColumn->pszText); hdi.fmt |= HDF_STRING; } if (lpColumn->mask & LVCF_IMAGE) { hdi.mask |= HDI_IMAGE; hdi.iImage = lpColumn->iImage; } if (lpColumn->mask & LVCF_ORDER) { hdi.mask |= HDI_ORDER; hdi.iOrder = lpColumn->iOrder; } /* insert item in header control */ nNewColumn = SendMessageA(infoPtr->hwndHeader, HDM_INSERTITEMA, (WPARAM)nColumn, (LPARAM)&hdi); /* Need to reset the item width when inserting a new column */ infoPtr->nItemWidth = LISTVIEW_GetItemWidth(hwnd); LISTVIEW_UpdateScroll(hwnd); InvalidateRect(hwnd, NULL, FALSE); } return nNewColumn; } static LRESULT LISTVIEW_InsertColumnW(HWND hwnd, INT nColumn, LPLVCOLUMNW lpColumn) { LVCOLUMNA lvca; LRESULT lres; memcpy(&lvca,lpColumn,sizeof(lvca)); if (lpColumn->mask & LVCF_TEXT) lvca.pszText = HEAP_strdupWtoA(GetProcessHeap(),0,lpColumn->pszText); lres = LISTVIEW_InsertColumnA(hwnd,nColumn,&lvca); if (lpColumn->mask & LVCF_TEXT) HeapFree(GetProcessHeap(),0,lvca.pszText); return lres; } /* LISTVIEW_InsertCompare: callback routine for comparing pszText members of the LV_ITEMS in a LISTVIEW on insert. Passed to DPA_Sort in LISTVIEW_InsertItem. This function should only be used for inserting items into a sorted list (LVM_INSERTITEM) and not during the processing of a LVM_SORTITEMS message. Applications should provide their own sort proc. when sending LVM_SORTITEMS. */ /* Platform SDK: (remarks on LVITEM: LVM_INSERTITEM will insert the new item in the proper sort postion... if: LVS_SORTXXX must be specified, LVS_OWNERDRAW is not set, .pszText is not LPSTR_TEXTCALLBACK. (LVS_SORT* flags): "For the LVS_SORTASCENDING... styles, item indices are sorted based on item text..." */ static INT WINAPI LISTVIEW_InsertCompare( LPVOID first, LPVOID second, LPARAM lParam) { HDPA hdpa_first = (HDPA) first; HDPA hdpa_second = (HDPA) second; LISTVIEW_ITEM* lv_first = (LISTVIEW_ITEM*) DPA_GetPtr( hdpa_first, 0 ); LISTVIEW_ITEM* lv_second = (LISTVIEW_ITEM*) DPA_GetPtr( hdpa_second, 0 ); LONG lStyle = GetWindowLongA((HWND) lParam, GWL_STYLE); INT cmpv = lstrcmpA( lv_first->pszText, lv_second->pszText ); /* if we're sorting descending, negate the return value */ return (lStyle & LVS_SORTDESCENDING) ? -cmpv : cmpv; } /*** * nESCRIPTION: * Inserts a new item in the listview control. * * PARAMETER(S): * [I] HWND : window handle * [I] LPLVITEMA : item information * * RETURN: * SUCCESS : new item index * FAILURE : -1 */ static LRESULT LISTVIEW_InsertItemA(HWND hwnd, LPLVITEMA lpLVItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); UINT uView = lStyle & LVS_TYPEMASK; LONG lCtrlId = GetWindowLongA(hwnd, GWL_ID); NMLISTVIEW nmlv; INT nItem = -1; HDPA hdpaSubItems; INT nItemWidth = 0; LISTVIEW_ITEM *lpItem = NULL; TRACE("(hwnd=%x,lpLVItem=%p)\n", hwnd, lpLVItem); if (lpLVItem != NULL) { /* make sure it's not a subitem; cannot insert a subitem */ if (lpLVItem->iSubItem == 0) { lpItem = (LISTVIEW_ITEM *)COMCTL32_Alloc(sizeof(LISTVIEW_ITEM)); if (lpItem != NULL) { ZeroMemory(lpItem, sizeof(LISTVIEW_ITEM)); if (LISTVIEW_InitItem(hwnd, lpItem, lpLVItem) != FALSE) { /* insert item in listview control data structure */ hdpaSubItems = DPA_Create(8); if (hdpaSubItems != NULL) { nItem = DPA_InsertPtr(hdpaSubItems, 0, lpItem); if (nItem != -1) { if ( ((lStyle & LVS_SORTASCENDING) || (lStyle & LVS_SORTDESCENDING)) && !(lStyle & LVS_OWNERDRAWFIXED) && (LPSTR_TEXTCALLBACKA != lpLVItem->pszText) ) { /* Insert the item in the proper sort order based on the pszText member. See comments for LISTVIEW_InsertCompare() for greater detail */ nItem = DPA_InsertPtr( infoPtr->hdpaItems, GETITEMCOUNT( infoPtr ) + 1, hdpaSubItems ); DPA_Sort( infoPtr->hdpaItems, LISTVIEW_InsertCompare, hwnd ); nItem = DPA_GetPtrIndex( infoPtr->hdpaItems, hdpaSubItems ); } else { nItem = DPA_InsertPtr(infoPtr->hdpaItems, lpLVItem->iItem, hdpaSubItems); } if (nItem != -1) { /* manage item focus */ if (lpLVItem->mask & LVIF_STATE) { lpItem->state &= ~(LVIS_FOCUSED|LVIS_SELECTED); if (lpLVItem->stateMask & LVIS_SELECTED) { LISTVIEW_SetSelection(hwnd, nItem); } else if (lpLVItem->stateMask & LVIS_FOCUSED) { LISTVIEW_SetItemFocus(hwnd, nItem); } } /* send LVN_INSERTITEM notification */ ZeroMemory(&nmlv, sizeof(NMLISTVIEW)); nmlv.hdr.hwndFrom = hwnd; nmlv.hdr.idFrom = lCtrlId; nmlv.hdr.code = LVN_INSERTITEM; nmlv.iItem = nItem; nmlv.lParam = lpItem->lParam;; ListView_LVNotify(GetParent(hwnd), lCtrlId, &nmlv); if ((uView == LVS_SMALLICON) || (uView == LVS_LIST)) { nItemWidth = LISTVIEW_CalculateWidth(hwnd, lpLVItem->iItem); if (nItemWidth > infoPtr->nItemWidth) { infoPtr->nItemWidth = nItemWidth; } } /* align items (set position of each item) */ if ((uView == LVS_SMALLICON) || (uView == LVS_ICON)) { if (lStyle & LVS_ALIGNLEFT) { LISTVIEW_AlignLeft(hwnd); } else { LISTVIEW_AlignTop(hwnd); } } LISTVIEW_UpdateScroll(hwnd); /* refresh client area */ InvalidateRect(hwnd, NULL, FALSE); } } } } } } } /* free memory if unsuccessful */ if ((nItem == -1) && (lpItem != NULL)) { COMCTL32_Free(lpItem); } return nItem; } static LRESULT LISTVIEW_InsertItemW(HWND hwnd, LPLVITEMW lpLVItem) { LVITEMA lvia; LRESULT lres; memcpy(&lvia,lpLVItem,sizeof(LVITEMA)); if (lvia.mask & LVIF_TEXT) { if (lpLVItem->pszText == LPSTR_TEXTCALLBACKW) lvia.pszText = LPSTR_TEXTCALLBACKA; else lvia.pszText = HEAP_strdupWtoA(GetProcessHeap(),0,lpLVItem->pszText); } lres = LISTVIEW_InsertItemA(hwnd, &lvia); if (lvia.mask & LVIF_TEXT) { if (lpLVItem->pszText != LPSTR_TEXTCALLBACKW) HeapFree(GetProcessHeap(),0,lvia.pszText); } return lres; } /* LISTVIEW_InsertItemW */ /*** * DESCRIPTION: * Redraws a range of items. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : first item * [I] INT : last item * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_RedrawItems(HWND hwnd, INT nFirst, INT nLast) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); BOOL bResult = FALSE; RECT rc; if (nFirst <= nLast) { if ((nFirst >= 0) && (nFirst < GETITEMCOUNT(infoPtr))) { if ((nLast >= 0) && (nLast < GETITEMCOUNT(infoPtr))) { /* bResult = */ InvalidateRect(hwnd, &rc, FALSE); } } } return bResult; } /* LISTVIEW_Scroll */ /*** * DESCRIPTION: * Sets the background color. * * PARAMETER(S): * [I] HWND : window handle * [I] COLORREF : background color * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_SetBkColor(HWND hwnd, COLORREF clrBk) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); infoPtr->clrBk = clrBk; InvalidateRect(hwnd, NULL, TRUE); return TRUE; } /* LISTVIEW_SetBkImage */ /*** * DESCRIPTION: * Sets the callback mask. This mask will be used when the parent * window stores state information (some or all). * * PARAMETER(S): * [I] HWND : window handle * [I] UINT : state mask * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static BOOL LISTVIEW_SetCallbackMask(HWND hwnd, UINT uMask) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); infoPtr->uCallbackMask = uMask; return TRUE; } /*** * DESCRIPTION: * Sets the attributes of a header item. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : column index * [I] LPLVCOLUMNA : column attributes * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_SetColumnA(HWND hwnd, INT nColumn, LPLVCOLUMNA lpColumn) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); BOOL bResult = FALSE; HDITEMA hdi, hdiget; if ((lpColumn != NULL) && (nColumn >= 0) && (nColumn < Header_GetItemCount(infoPtr->hwndHeader))) { /* initialize memory */ ZeroMemory(&hdi, sizeof(HDITEMA)); if (lpColumn->mask & LVCF_FMT) { /* format member is valid */ hdi.mask |= HDI_FORMAT; /* get current format first */ hdiget.mask = HDI_FORMAT; if (Header_GetItemA(infoPtr->hwndHeader, nColumn, &hdiget)) /* preserve HDF_STRING if present */ hdi.fmt = hdiget.fmt & HDF_STRING; /* set text alignment (leftmost column must be left-aligned) */ if (nColumn == 0) { hdi.fmt |= HDF_LEFT; } else { if (lpColumn->fmt & LVCFMT_LEFT) { hdi.fmt |= HDF_LEFT; } else if (lpColumn->fmt & LVCFMT_RIGHT) { hdi.fmt |= HDF_RIGHT; } else if (lpColumn->fmt & LVCFMT_CENTER) { hdi.fmt |= HDF_CENTER; } } if (lpColumn->fmt & LVCFMT_BITMAP_ON_RIGHT) { hdi.fmt |= HDF_BITMAP_ON_RIGHT; } if (lpColumn->fmt & LVCFMT_COL_HAS_IMAGES) { hdi.fmt |= HDF_IMAGE; } if (lpColumn->fmt & LVCFMT_IMAGE) { hdi.fmt |= HDF_IMAGE; hdi.iImage = I_IMAGECALLBACK; } } if (lpColumn->mask & LVCF_WIDTH) { hdi.mask |= HDI_WIDTH; hdi.cxy = lpColumn->cx; } if (lpColumn->mask & LVCF_TEXT) { hdi.mask |= HDI_TEXT | HDI_FORMAT; hdi.pszText = lpColumn->pszText; hdi.cchTextMax = lstrlenA(lpColumn->pszText); hdi.fmt |= HDF_STRING; } if (lpColumn->mask & LVCF_IMAGE) { hdi.mask |= HDI_IMAGE; hdi.iImage = lpColumn->iImage; } if (lpColumn->mask & LVCF_ORDER) { hdi.mask |= HDI_ORDER; hdi.iOrder = lpColumn->iOrder; } /* set header item attributes */ bResult = Header_SetItemA(infoPtr->hwndHeader, nColumn, &hdi); } return bResult; } /* LISTVIEW_SetColumnW */ /*** * DESCRIPTION: * Sets the column order array * * PARAMETERS: * [I] HWND : window handle * [I] INT : number of elements in column order array * [I] INT : pointer to column order array * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_SetColumnOrderArray(HWND hwnd, INT iCount, LPINT lpiArray) { /* LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); */ FIXME("iCount %d lpiArray %p\n", iCount, lpiArray); if (!lpiArray) return FALSE; return TRUE; } /*** * DESCRIPTION: * Sets the width of a column * * PARAMETERS: * [I] HWND : window handle * [I] INT : column index * [I] INT : column width * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_SetColumnWidth(HWND hwnd, INT iCol, INT cx) { LISTVIEW_INFO *infoPtr; HDITEMA hdi; LRESULT lret; LONG lStyle; /* set column width only if in report mode */ lStyle = GetWindowLongA(hwnd, GWL_STYLE); if ((lStyle & LVS_TYPEMASK) != LVS_REPORT) return (FALSE); /* make sure we can get the listview info */ if (!(infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0))) return (FALSE); if (!infoPtr->hwndHeader) /* make sure we have a header */ return (FALSE); /* FIXME: currently ignoring LVSCW_AUTOSIZE (-1) and * LVSCV_AUTOSIZE_USEHEADER (-2) */ if (cx < 0) return (FALSE); hdi.mask = HDI_WIDTH; hdi.cxy = cx; /* call header to update the column change */ lret = Header_SetItemA(infoPtr->hwndHeader, (WPARAM)iCol, (LPARAM)&hdi); infoPtr->nItemWidth = LISTVIEW_GetItemWidth(hwnd); InvalidateRect(hwnd, NULL, TRUE); /* force redraw of the listview */ return lret; } /*** * DESCRIPTION: * Sets the extended listview style. * * PARAMETERS: * [I] HWND : window handle * [I] DWORD : mask * [I] DWORD : style * * RETURN: * SUCCESS : previous style * FAILURE : 0 */ static LRESULT LISTVIEW_SetExtendedListViewStyle(HWND hwnd, DWORD dwMask, DWORD dwStyle) { LISTVIEW_INFO *infoPtr; DWORD dwOldStyle; /* make sure we can get the listview info */ if (!(infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0))) return (0); /* store previous style */ dwOldStyle = infoPtr->dwExStyle; /* set new style */ infoPtr->dwExStyle = (dwOldStyle & ~dwMask) | (dwStyle & dwMask); return (dwOldStyle); } /* LISTVIEW_SetHotCursor */ /*** * DESCRIPTION: * Sets the hot item index. * * PARAMETERS: * [I] HWND : window handle * [I] INT : index * * RETURN: * SUCCESS : previous hot item index * FAILURE : -1 (no hot item) */ static LRESULT LISTVIEW_SetHotItem(HWND hwnd, INT iIndex) { LISTVIEW_INFO *infoPtr; INT iOldIndex; /* make sure we can get the listview info */ if (!(infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0))) return (-1); /* store previous index */ iOldIndex = infoPtr->nHotItem; /* set new style */ infoPtr->nHotItem = iIndex; return (iOldIndex); } /*** * DESCRIPTION: * Sets the amount of time the cursor must hover over an item before it is selected. * * PARAMETER(S): * [I] HWND : window handle * [I] DWORD : dwHoverTime, if -1 the hover time is set to the default * * RETURN: * Returns the previous hover time */ static LRESULT LISTVIEW_SetHoverTime(HWND hwnd, DWORD dwHoverTime) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); DWORD oldHoverTime = infoPtr->dwHoverTime; infoPtr->dwHoverTime = dwHoverTime; return oldHoverTime; } /* LISTVIEW_SetIconSpacing */ /*** * DESCRIPTION: * Sets image lists. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : image list type * [I] HIMAGELIST : image list handle * * RETURN: * SUCCESS : old image list * FAILURE : NULL */ static LRESULT LISTVIEW_SetImageList(HWND hwnd, INT nType, HIMAGELIST himl) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); HIMAGELIST himlTemp = 0; switch (nType) { case LVSIL_NORMAL: himlTemp = infoPtr->himlNormal; infoPtr->himlNormal = himl; return (LRESULT)himlTemp; case LVSIL_SMALL: himlTemp = infoPtr->himlSmall; infoPtr->himlSmall = himl; return (LRESULT)himlTemp; case LVSIL_STATE: himlTemp = infoPtr->himlState; infoPtr->himlState = himl; ImageList_SetBkColor(infoPtr->himlState, CLR_NONE); return (LRESULT)himlTemp; } return (LRESULT)NULL; } /*** * DESCRIPTION: * Sets the attributes of an item. * * PARAMETER(S): * [I] HWND : window handle * [I] LPLVITEM : item information * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_SetItemA(HWND hwnd, LPLVITEMA lpLVItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); BOOL bResult = FALSE; if (lpLVItem != NULL) { if ((lpLVItem->iItem >= 0) && (lpLVItem->iItem < GETITEMCOUNT(infoPtr))) { if (lpLVItem->iSubItem == 0) { bResult = LISTVIEW_SetItem(hwnd, lpLVItem); } else { bResult = LISTVIEW_SetSubItem(hwnd, lpLVItem); } } } return bResult; } /* LISTVIEW_SetItemW */ /*** * DESCRIPTION: * Preallocates memory. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item count (projected number of items) * [I] DWORD : update flags * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static BOOL LISTVIEW_SetItemCount(HWND hwnd, INT nItems, DWORD dwFlags) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO*)GetWindowLongA(hwnd, 0); FIXME("(%d %08lx)stub!\n", nItems, dwFlags); if (nItems == 0) return LISTVIEW_DeleteAllItems (hwnd); if (GetWindowLongA(hwnd, GWL_STYLE) & LVS_OWNERDATA) { FIXME("LVS_OWNERDATA is set!\n"); } else { if (nItems > GETITEMCOUNT(infoPtr)) { /* append items */ FIXME("append items\n"); } else if (nItems < GETITEMCOUNT(infoPtr)) { /* remove items */ while(nItems < GETITEMCOUNT(infoPtr)) { LISTVIEW_DeleteItem(hwnd, GETITEMCOUNT(infoPtr) - 1); } } } return TRUE; } /*** * DESCRIPTION: * Sets the position of an item. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * [I] INT : x coordinate * [I] INT : y coordinate * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static BOOL LISTVIEW_SetItemPosition(HWND hwnd, INT nItem, INT nPosX, INT nPosY) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO*)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; LISTVIEW_ITEM *lpItem; HDPA hdpaSubItems; BOOL bResult = FALSE; TRACE("(hwnd=%x,nItem=%d,X=%d,Y=%d)\n", hwnd, nItem, nPosX, nPosY); if ((nItem >= 0) || (nItem < GETITEMCOUNT(infoPtr))) { if ((uView == LVS_ICON) || (uView == LVS_SMALLICON)) { hdpaSubItems = (HDPA)DPA_GetPtr(infoPtr->hdpaItems, nItem); if (hdpaSubItems != NULL) { lpItem = (LISTVIEW_ITEM *)DPA_GetPtr(hdpaSubItems, 0); if (lpItem != NULL) { bResult = TRUE; lpItem->ptPosition.x = nPosX; lpItem->ptPosition.y = nPosY; } } } } return bResult; } /* LISTVIEW_SetItemPosition32 */ /*** * DESCRIPTION: * Sets the state of one or many items. * * PARAMETER(S): * [I] HWND : window handle * [I]INT : item index * [I] LPLVITEM : item or subitem info * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_SetItemState(HWND hwnd, INT nItem, LPLVITEMA lpLVItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); BOOL bResult = FALSE; LVITEMA lvItem; INT i; if (nItem == -1) { bResult = TRUE; ZeroMemory(&lvItem, sizeof(LVITEMA)); lvItem.mask = LVIF_STATE; lvItem.state = lpLVItem->state; lvItem.stateMask = lpLVItem->stateMask ; /* apply to all items */ for (i = 0; i< GETITEMCOUNT(infoPtr); i++) { lvItem.iItem = i; if (ListView_SetItemA(hwnd, &lvItem) == FALSE) { bResult = FALSE; } } } else { ZeroMemory(&lvItem, sizeof(LVITEMA)); lvItem.mask = LVIF_STATE; lvItem.state = lpLVItem->state; lvItem.stateMask = lpLVItem->stateMask; lvItem.iItem = nItem; bResult = ListView_SetItemA(hwnd, &lvItem); } return bResult; } /*** * DESCRIPTION: * Sets the text of an item or subitem. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * [I] LPLVITEMA : item or subitem info * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static BOOL LISTVIEW_SetItemTextA(HWND hwnd, INT nItem, LPLVITEMA lpLVItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); BOOL bResult = FALSE; LVITEMA lvItem; if ((nItem >= 0) && (nItem < GETITEMCOUNT(infoPtr))) { ZeroMemory(&lvItem, sizeof(LVITEMA)); lvItem.mask = LVIF_TEXT; lvItem.pszText = lpLVItem->pszText; lvItem.iItem = nItem; lvItem.iSubItem = lpLVItem->iSubItem; bResult = ListView_SetItemA(hwnd, &lvItem); } return bResult; } /* LISTVIEW_SetItemTextW */ /*** * DESCRIPTION: * Set item index that marks the start of a multiple selection. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : index * * RETURN: * Index number or -1 if there is no selection mark. */ static LRESULT LISTVIEW_SetSelectionMark(HWND hwnd, INT nIndex) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); INT nOldIndex = infoPtr->nSelectionMark; infoPtr->nSelectionMark = nIndex; return nOldIndex; } /*** * DESCRIPTION: * Sets the text background color. * * PARAMETER(S): * [I] HWND : window handle * [I] COLORREF : text background color * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_SetTextBkColor(HWND hwnd, COLORREF clrTextBk) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); infoPtr->clrTextBk = clrTextBk; InvalidateRect(hwnd, NULL, TRUE); return TRUE; } /*** * DESCRIPTION: * Sets the text foreground color. * * PARAMETER(S): * [I] HWND : window handle * [I] COLORREF : text color * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_SetTextColor (HWND hwnd, COLORREF clrText) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); infoPtr->clrText = clrText; InvalidateRect(hwnd, NULL, TRUE); return TRUE; } /* LISTVIEW_SetToolTips */ /* LISTVIEW_SetUnicodeFormat */ /* LISTVIEW_SetWorkAreas */ /*** * DESCRIPTION: * Callback internally used by LISTVIEW_SortItems() * * PARAMETER(S): * [I] LPVOID : first LISTVIEW_ITEM to compare * [I] LPVOID : second LISTVIEW_ITEM to compare * [I] LPARAM : HWND of control * * RETURN: * if first comes before second : negative * if first comes after second : positive * if first and second are equivalent : zero */ static INT WINAPI LISTVIEW_CallBackCompare( LPVOID first, LPVOID second, LPARAM lParam) { /* Forward the call to the client defined callback */ INT rv; HWND hwnd = (HWND)lParam; LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); rv = (infoPtr->pfnCompare)( ((LISTVIEW_ITEM*) first)->lParam, ((LISTVIEW_ITEM*) second)->lParam, infoPtr->lParamSort ); return rv; } /*** * DESCRIPTION: * Sorts the listview items. * * PARAMETER(S): * [I] HWND : window handle * [I] WPARAM : application-defined value * [I] LPARAM : pointer to comparision callback * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_SortItems(HWND hwnd, WPARAM wParam, LPARAM lParam) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); HDPA hdpaSubItems; LISTVIEW_ITEM *lpItem; int nCount, i; HDPA sortList; if (!infoPtr || !infoPtr->hdpaItems) return FALSE; nCount = GETITEMCOUNT(infoPtr); /* if there are 0 or 1 items, there is no need to sort */ if (nCount > 1) { sortList = DPA_Create(nCount); infoPtr->pfnCompare = (PFNLVCOMPARE)lParam; infoPtr->lParamSort = (LPARAM)wParam; /* append pointers one by one to sortList */ for (i = 0; i < nCount; i++) { if ((hdpaSubItems = (HDPA) DPA_GetPtr(infoPtr->hdpaItems, i))) if ((lpItem = (LISTVIEW_ITEM *) DPA_GetPtr(hdpaSubItems, 0))) DPA_InsertPtr(sortList, nCount + 1, lpItem); } /* sort the sortList */ DPA_Sort(sortList, LISTVIEW_CallBackCompare, hwnd); /* copy the pointers back */ for (i = 0; i < nCount; i++) { if ((hdpaSubItems = (HDPA) DPA_GetPtr(infoPtr->hdpaItems, i)) && (lpItem = (LISTVIEW_ITEM *) DPA_GetPtr(sortList, i))) DPA_SetPtr(hdpaSubItems, 0, lpItem); } DPA_Destroy(sortList); } return TRUE; } /* LISTVIEW_SubItemHitTest */ /*** * DESCRIPTION: * Updates an items or rearranges the listview control. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : item index * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_Update(HWND hwnd, INT nItem) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); BOOL bResult = FALSE; RECT rc; if ((nItem >= 0) && (nItem < GETITEMCOUNT(infoPtr))) { bResult = TRUE; /* rearrange with default alignment style */ if ((lStyle & LVS_AUTOARRANGE) && (((lStyle & LVS_TYPEMASK) == LVS_ICON) || ((lStyle & LVS_TYPEMASK) == LVS_SMALLICON))) { ListView_Arrange(hwnd, 0); } else { /* get item bounding rectangle */ rc.left = LVIR_BOUNDS; ListView_GetItemRect(hwnd, nItem, &rc); InvalidateRect(hwnd, &rc, TRUE); } } return bResult; } /*** * DESCRIPTION: * Creates the listview control. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * Zero */ static LRESULT LISTVIEW_Create(HWND hwnd, WPARAM wParam, LPARAM lParam) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LPCREATESTRUCTA lpcs = (LPCREATESTRUCTA)lParam; UINT uView = lpcs->style & LVS_TYPEMASK; LOGFONTA logFont; /* initialize info pointer */ ZeroMemory(infoPtr, sizeof(LISTVIEW_INFO)); /* determine the type of structures to use */ infoPtr->notifyFormat = SendMessageA(GetParent(hwnd), WM_NOTIFYFORMAT, (WPARAM)hwnd, (LPARAM)NF_QUERY); if (infoPtr->notifyFormat != NFR_ANSI) { FIXME("ANSI notify format is NOT used\n"); } /* initialize color information */ infoPtr->clrBk = GetSysColor(COLOR_WINDOW); infoPtr->clrText = GetSysColor(COLOR_WINDOWTEXT); infoPtr->clrTextBk = GetSysColor(COLOR_WINDOW); /* set default values */ infoPtr->uCallbackMask = 0; infoPtr->nFocusedItem = -1; infoPtr->nSelectionMark = -1; infoPtr->nHotItem = -1; infoPtr->iconSpacing.cx = GetSystemMetrics(SM_CXICONSPACING); infoPtr->iconSpacing.cy = GetSystemMetrics(SM_CYICONSPACING); ZeroMemory(&infoPtr->rcList, sizeof(RECT)); infoPtr->hwndEdit = 0; infoPtr->pedititem = NULL; infoPtr->bDoEditLabel = FALSE; /* get default font (icon title) */ SystemParametersInfoA(SPI_GETICONTITLELOGFONT, 0, &logFont, 0); infoPtr->hDefaultFont = CreateFontIndirectA(&logFont); infoPtr->hFont = infoPtr->hDefaultFont; /* create header */ infoPtr->hwndHeader = CreateWindowA(WC_HEADERA, (LPCSTR)NULL, WS_CHILD | HDS_HORZ | HDS_BUTTONS, 0, 0, 0, 0, hwnd, (HMENU)0, lpcs->hInstance, NULL); /* set header font */ SendMessageA(infoPtr->hwndHeader, WM_SETFONT, (WPARAM)infoPtr->hFont, (LPARAM)TRUE); if (uView == LVS_ICON) { infoPtr->iconSize.cx = GetSystemMetrics(SM_CXICON); infoPtr->iconSize.cy = GetSystemMetrics(SM_CYICON); } else if (uView == LVS_REPORT) { if (!(LVS_NOCOLUMNHEADER & lpcs->style)) { ShowWindow(infoPtr->hwndHeader, SW_SHOWNORMAL); } else { /* resize our header to nothing */ RECT zeroRect; WINDOWPOS wp; HDLAYOUT hd; memset(&zeroRect,0,sizeof(RECT)); hd.prc = &zeroRect; hd.pwpos = ℘ Header_Layout(infoPtr->hwndHeader,&hd); } infoPtr->iconSize.cx = GetSystemMetrics(SM_CXSMICON); infoPtr->iconSize.cy = GetSystemMetrics(SM_CYSMICON); } else { infoPtr->iconSize.cx = GetSystemMetrics(SM_CXSMICON); infoPtr->iconSize.cy = GetSystemMetrics(SM_CYSMICON); } /* display unsupported listview window styles */ LISTVIEW_UnsupportedStyles(lpcs->style); /* allocate memory for the data structure */ infoPtr->hdpaItems = DPA_Create(10); /* initialize size of items */ infoPtr->nItemWidth = LISTVIEW_GetItemWidth(hwnd); infoPtr->nItemHeight = LISTVIEW_GetItemHeight(hwnd); /* initialize the hover time to -1(indicating the default system hover time) */ infoPtr->dwHoverTime = -1; return 0; } /*** * DESCRIPTION: * Erases the background of the listview control. * * PARAMETER(S): * [I] HWND : window handle * [I] WPARAM : device context handle * [I] LPARAM : not used * * RETURN: * SUCCESS : TRUE * FAILURE : FALSE */ static LRESULT LISTVIEW_EraseBackground(HWND hwnd, WPARAM wParam, LPARAM lParam) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); BOOL bResult; if (infoPtr->clrBk == CLR_NONE) { bResult = SendMessageA(GetParent(hwnd), WM_ERASEBKGND, wParam, lParam); } else { RECT rc; HBRUSH hBrush = CreateSolidBrush(infoPtr->clrBk); GetClientRect(hwnd, &rc); FillRect((HDC)wParam, &rc, hBrush); DeleteObject(hBrush); bResult = TRUE; } return bResult; } /*** * DESCRIPTION: * Retrieves the listview control font. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * Font handle. */ static LRESULT LISTVIEW_GetFont(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); return infoPtr->hFont; } /*** * DESCRIPTION: * Performs vertical scrolling. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : scroll code * [I] SHORT : current scroll position if scroll code is SB_THIMBPOSITION * or SB_THUMBTRACK. * [I] HWND : scrollbar control window handle * * RETURN: * Zero */ static LRESULT LISTVIEW_VScroll(HWND hwnd, INT nScrollCode, SHORT nCurrentPos, HWND hScrollWnd) { SCROLLINFO scrollInfo; ZeroMemory(&scrollInfo, sizeof(SCROLLINFO)); scrollInfo.cbSize = sizeof(SCROLLINFO); scrollInfo.fMask = SIF_PAGE | SIF_POS | SIF_RANGE; if (GetScrollInfo(hwnd, SB_VERT, &scrollInfo) != FALSE) { INT nOldScrollPos = scrollInfo.nPos; switch (nScrollCode) { case SB_LINEUP: if (scrollInfo.nPos > scrollInfo.nMin) { scrollInfo.nPos--; } break; case SB_LINEDOWN: if (scrollInfo.nPos < scrollInfo.nMax) { scrollInfo.nPos++; } break; case SB_PAGEUP: if (scrollInfo.nPos > scrollInfo.nMin) { if (scrollInfo.nPos >= scrollInfo.nPage) { scrollInfo.nPos -= scrollInfo.nPage; } else { scrollInfo.nPos = scrollInfo.nMin; } } break; case SB_PAGEDOWN: if (scrollInfo.nPos < scrollInfo.nMax) { if (scrollInfo.nPos <= scrollInfo.nMax - scrollInfo.nPage) { scrollInfo.nPos += scrollInfo.nPage; } else { scrollInfo.nPos = scrollInfo.nMax; } } break; case SB_THUMBTRACK: scrollInfo.nPos = nCurrentPos; if (scrollInfo.nPos > scrollInfo.nMax) scrollInfo.nPos=scrollInfo.nMax; if (scrollInfo.nPos < scrollInfo.nMin) scrollInfo.nPos=scrollInfo.nMin; break; } if (nOldScrollPos != scrollInfo.nPos) { scrollInfo.fMask = SIF_POS; SetScrollInfo(hwnd, SB_VERT, &scrollInfo, TRUE); InvalidateRect(hwnd, NULL, TRUE); } } return 0; } /*** * DESCRIPTION: * Performs horizontal scrolling. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : scroll code * [I] SHORT : current scroll position if scroll code is SB_THIMBPOSITION * or SB_THUMBTRACK. * [I] HWND : scrollbar control window handle * * RETURN: * Zero */ static LRESULT LISTVIEW_HScroll(HWND hwnd, INT nScrollCode, SHORT nCurrentPos, HWND hScrollWnd) { SCROLLINFO scrollInfo; ZeroMemory(&scrollInfo, sizeof(SCROLLINFO)); scrollInfo.cbSize = sizeof(SCROLLINFO); scrollInfo.fMask = SIF_PAGE | SIF_POS | SIF_RANGE; if (GetScrollInfo(hwnd, SB_HORZ, &scrollInfo) != FALSE) { INT nOldScrollPos = scrollInfo.nPos; switch (nScrollCode) { case SB_LINELEFT: if (scrollInfo.nPos > scrollInfo.nMin) { scrollInfo.nPos--; } break; case SB_LINERIGHT: if (scrollInfo.nPos < scrollInfo.nMax) { scrollInfo.nPos++; } break; case SB_PAGELEFT: if (scrollInfo.nPos > scrollInfo.nMin) { if (scrollInfo.nPos >= scrollInfo.nPage) { scrollInfo.nPos -= scrollInfo.nPage; } else { scrollInfo.nPos = scrollInfo.nMin; } } break; case SB_PAGERIGHT: if (scrollInfo.nPos < scrollInfo.nMax) { if (scrollInfo.nPos <= scrollInfo.nMax - scrollInfo.nPage) { scrollInfo.nPos += scrollInfo.nPage; } else { scrollInfo.nPos = scrollInfo.nMax; } } break; case SB_THUMBTRACK: scrollInfo.nPos = nCurrentPos; if (scrollInfo.nPos > scrollInfo.nMax) scrollInfo.nPos=scrollInfo.nMax; if (scrollInfo.nPos < scrollInfo.nMin) scrollInfo.nPos=scrollInfo.nMin; break; } if (nOldScrollPos != scrollInfo.nPos) { UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; scrollInfo.fMask = SIF_POS; SetScrollInfo(hwnd, SB_HORZ, &scrollInfo, TRUE); if(uView == LVS_REPORT) { scrollInfo.fMask = SIF_POS; GetScrollInfo(hwnd, SB_HORZ, &scrollInfo); LISTVIEW_UpdateHeaderSize(hwnd, scrollInfo.nPos); } InvalidateRect(hwnd, NULL, TRUE); } } return 0; } static LRESULT LISTVIEW_MouseWheel(HWND hwnd, INT wheelDelta) { INT gcWheelDelta = 0; UINT pulScrollLines = 3; SCROLLINFO scrollInfo; UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; SystemParametersInfoW(SPI_GETWHEELSCROLLLINES,0, &pulScrollLines, 0); gcWheelDelta -= wheelDelta; ZeroMemory(&scrollInfo, sizeof(SCROLLINFO)); scrollInfo.cbSize = sizeof(SCROLLINFO); scrollInfo.fMask = SIF_POS | SIF_RANGE; switch(uView) { case LVS_ICON: case LVS_SMALLICON: /* * listview should be scrolled by a multiple of 37 dependently on its dimension or its visible item number * should be fixed in the future. */ if (GetScrollInfo(hwnd, SB_VERT, &scrollInfo) != FALSE) LISTVIEW_VScroll(hwnd, SB_THUMBPOSITION, scrollInfo.nPos + (gcWheelDelta < 0) ? 37 : -37, 0); break; case LVS_REPORT: if (abs(gcWheelDelta) >= WHEEL_DELTA && pulScrollLines) { if (GetScrollInfo(hwnd, SB_VERT, &scrollInfo) != FALSE) { int cLineScroll = min(LISTVIEW_GetCountPerColumn(hwnd), pulScrollLines); cLineScroll *= (gcWheelDelta / WHEEL_DELTA); LISTVIEW_VScroll(hwnd, SB_THUMBPOSITION, scrollInfo.nPos + cLineScroll, 0); } } break; case LVS_LIST: LISTVIEW_HScroll(hwnd, (gcWheelDelta < 0) ? SB_LINELEFT : SB_LINERIGHT, 0, 0); break; } return 0; } /*** * DESCRIPTION: * ??? * * PARAMETER(S): * [I] HWND : window handle * [I] INT : virtual key * [I] LONG : key data * * RETURN: * Zero */ static LRESULT LISTVIEW_KeyDown(HWND hwnd, INT nVirtualKey, LONG lKeyData) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); INT nCtrlId = GetWindowLongA(hwnd, GWL_ID); HWND hwndParent = GetParent(hwnd); NMLVKEYDOWN nmKeyDown; NMHDR nmh; INT nItem = -1; BOOL bRedraw = FALSE; /* send LVN_KEYDOWN notification */ ZeroMemory(&nmKeyDown, sizeof(NMLVKEYDOWN)); nmKeyDown.hdr.hwndFrom = hwnd; nmKeyDown.hdr.idFrom = nCtrlId; nmKeyDown.hdr.code = LVN_KEYDOWN; nmKeyDown.wVKey = nVirtualKey; nmKeyDown.flags = 0; SendMessageA(hwndParent, WM_NOTIFY, (WPARAM)nCtrlId, (LPARAM)&nmKeyDown); /* initialize */ nmh.hwndFrom = hwnd; nmh.idFrom = nCtrlId; switch (nVirtualKey) { case VK_RETURN: if ((GETITEMCOUNT(infoPtr) > 0) && (infoPtr->nFocusedItem != -1)) { /* send NM_RETURN notification */ nmh.code = NM_RETURN; ListView_Notify(hwndParent, nCtrlId, &nmh); /* send LVN_ITEMACTIVATE notification */ nmh.code = LVN_ITEMACTIVATE; ListView_Notify(hwndParent, nCtrlId, &nmh); } break; case VK_HOME: if (GETITEMCOUNT(infoPtr) > 0) { nItem = 0; } break; case VK_END: if (GETITEMCOUNT(infoPtr) > 0) { nItem = GETITEMCOUNT(infoPtr) - 1; } break; case VK_LEFT: nItem = ListView_GetNextItem(hwnd, infoPtr->nFocusedItem, LVNI_TOLEFT); break; case VK_UP: nItem = ListView_GetNextItem(hwnd, infoPtr->nFocusedItem, LVNI_ABOVE); break; case VK_RIGHT: nItem = ListView_GetNextItem(hwnd, infoPtr->nFocusedItem, LVNI_TORIGHT); break; case VK_DOWN: nItem = ListView_GetNextItem(hwnd, infoPtr->nFocusedItem, LVNI_BELOW); break; case VK_PRIOR: /* TO DO */ break; case VK_NEXT: /* TO DO */ break; } if ((nItem != -1) && (nItem != infoPtr->nFocusedItem)) { bRedraw = LISTVIEW_KeySelection(hwnd, nItem); if (bRedraw != FALSE) { /* refresh client area */ InvalidateRect(hwnd, NULL, TRUE); UpdateWindow(hwnd); } } return 0; } /*** * DESCRIPTION: * Kills the focus. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * Zero */ static LRESULT LISTVIEW_KillFocus(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO*)GetWindowLongA(hwnd, 0); INT nCtrlId = GetWindowLongA(hwnd, GWL_ID); NMHDR nmh; TRACE("(hwnd=%x)\n", hwnd); /* send NM_KILLFOCUS notification */ nmh.hwndFrom = hwnd; nmh.idFrom = nCtrlId; nmh.code = NM_KILLFOCUS; ListView_Notify(GetParent(hwnd), nCtrlId, &nmh); /* set window focus flag */ infoPtr->bFocus = FALSE; /* NEED drawing optimization ; redraw the selected items */ InvalidateRect(hwnd, NULL, FALSE); return 0; } /*** * DESCRIPTION: * Processes double click messages (left mouse button). * * PARAMETER(S): * [I] HWND : window handle * [I] WORD : key flag * [I] WORD : x coordinate * [I] WORD : y coordinate * * RETURN: * Zero */ static LRESULT LISTVIEW_LButtonDblClk(HWND hwnd, WORD wKey, WORD wPosX, WORD wPosY) { LONG nCtrlId = GetWindowLongA(hwnd, GWL_ID); NMHDR nmh; LVHITTESTINFO htInfo; TRACE("(hwnd=%x,key=%hu,X=%hu,Y=%hu)\n", hwnd, wKey, wPosX, wPosY); /* send NM_DBLCLK notification */ nmh.hwndFrom = hwnd; nmh.idFrom = nCtrlId; nmh.code = NM_DBLCLK; ListView_Notify(GetParent(hwnd), nCtrlId, &nmh); /* To send the LVN_ITEMACTIVATE, it must be on an Item */ ZeroMemory(&htInfo, sizeof(LVHITTESTINFO)); htInfo.pt.x = wPosX; htInfo.pt.y = wPosY; if(LISTVIEW_HitTest(hwnd, &htInfo) != -1) { /* send LVN_ITEMACTIVATE notification */ nmh.code = LVN_ITEMACTIVATE; ListView_Notify(GetParent(hwnd), nCtrlId, &nmh); } return 0; } /*** * DESCRIPTION: * Processes mouse down messages (left mouse button). * * PARAMETER(S): * [I] HWND : window handle * [I] WORD : key flag * [I] WORD : x coordinate * [I] WORD : y coordinate * * RETURN: * Zero */ static LRESULT LISTVIEW_LButtonDown(HWND hwnd, WORD wKey, WORD wPosX, WORD wPosY) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); INT nCtrlId = GetWindowLongA(hwnd, GWL_ID); static BOOL bGroupSelect = TRUE; POINT ptPosition; NMHDR nmh; INT nItem; TRACE("(hwnd=%x, key=%hu, X=%hu, Y=%hu)\n", hwnd, wKey, wPosX, wPosY); /* send NM_RELEASEDCAPTURE notification */ nmh.hwndFrom = hwnd; nmh.idFrom = nCtrlId; nmh.code = NM_RELEASEDCAPTURE; ListView_Notify(GetParent(hwnd), nCtrlId, &nmh); if (infoPtr->bFocus == FALSE) { SetFocus(hwnd); } /* set left button down flag */ infoPtr->bLButtonDown = TRUE; ptPosition.x = wPosX; ptPosition.y = wPosY; nItem = LISTVIEW_MouseSelection(hwnd, ptPosition); if ((nItem >= 0) && (nItem < GETITEMCOUNT(infoPtr))) { if (lStyle & LVS_SINGLESEL) { if ((ListView_GetItemState(hwnd, nItem, LVIS_SELECTED) & LVIS_SELECTED) && infoPtr->bDoEditLabel != TRUE) { infoPtr->bDoEditLabel = TRUE; } else { LISTVIEW_SetSelection(hwnd, nItem); } } else { if ((wKey & MK_CONTROL) && (wKey & MK_SHIFT)) { if (bGroupSelect != FALSE) { LISTVIEW_AddGroupSelection(hwnd, nItem); } else { LISTVIEW_AddSelection(hwnd, nItem); } } else if (wKey & MK_CONTROL) { bGroupSelect = LISTVIEW_ToggleSelection(hwnd, nItem); } else if (wKey & MK_SHIFT) { LISTVIEW_SetGroupSelection(hwnd, nItem); } else { if (ListView_GetItemState(hwnd, nItem, LVIS_SELECTED) & LVIS_SELECTED && infoPtr->bDoEditLabel != TRUE) { infoPtr->bDoEditLabel = TRUE; } else { LISTVIEW_SetSelection(hwnd, nItem); } } } } else { /* remove all selections */ LISTVIEW_RemoveSelections(hwnd, 0, GETITEMCOUNT(infoPtr)); } InvalidateRect(hwnd, NULL, TRUE); return 0; } /*** * DESCRIPTION: * Processes mouse up messages (left mouse button). * * PARAMETER(S): * [I] HWND : window handle * [I] WORD : key flag * [I] WORD : x coordinate * [I] WORD : y coordinate * * RETURN: * Zero */ static LRESULT LISTVIEW_LButtonUp(HWND hwnd, WORD wKey, WORD wPosX, WORD wPosY) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); TRACE("(hwnd=%x,key=%hu,X=%hu,Y=%hu)\n", hwnd, wKey, wPosX, wPosY); if (infoPtr->bLButtonDown != FALSE) { INT nCtrlId = GetWindowLongA(hwnd, GWL_ID); NMHDR nmh; /* send NM_CLICK notification */ nmh.hwndFrom = hwnd; nmh.idFrom = nCtrlId; nmh.code = NM_CLICK; ListView_Notify(GetParent(hwnd), nCtrlId, &nmh); /* set left button flag */ infoPtr->bLButtonDown = FALSE; if(infoPtr->bDoEditLabel) { LVHITTESTINFO htInfo; int nItem; ZeroMemory(&htInfo, sizeof(LVHITTESTINFO)); htInfo.pt.x = wPosX; htInfo.pt.y = wPosY; nItem = LISTVIEW_HitTest(hwnd, &htInfo); if(nItem != -1 && htInfo.flags == LVHT_ONITEMLABEL) { LISTVIEW_EditLabelA(hwnd, nItem); } infoPtr->bDoEditLabel = FALSE; } } return 0; } /*** * DESCRIPTION: * Creates the listview control (called before WM_CREATE). * * PARAMETER(S): * [I] HWND : window handle * [I] WPARAM : unhandled * [I] LPARAM : widow creation info * * RETURN: * Zero */ static LRESULT LISTVIEW_NCCreate(HWND hwnd, WPARAM wParam, LPARAM lParam) { LISTVIEW_INFO *infoPtr; TRACE("(hwnd=%x,wParam=%x,lParam=%lx)\n", hwnd, wParam, lParam); /* allocate memory for info structure */ infoPtr = (LISTVIEW_INFO *)COMCTL32_Alloc(sizeof(LISTVIEW_INFO)); SetWindowLongA(hwnd, 0, (LONG)infoPtr); if (infoPtr == NULL) { ERR("could not allocate info memory!\n"); return 0; } if ((LISTVIEW_INFO *)GetWindowLongA(hwnd, 0) != infoPtr) { ERR("pointer assignment error!\n"); return 0; } return DefWindowProcA(hwnd, WM_NCCREATE, wParam, lParam); } /*** * DESCRIPTION: * Destroys the listview control (called after WM_DESTROY). * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * Zero */ static LRESULT LISTVIEW_NCDestroy(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); TRACE("(hwnd=%x)\n", hwnd); /* delete all items */ LISTVIEW_DeleteAllItems(hwnd); /* destroy data structure */ DPA_Destroy(infoPtr->hdpaItems); /* destroy font */ infoPtr->hFont = (HFONT)0; if (infoPtr->hDefaultFont) { DeleteObject(infoPtr->hDefaultFont); } /* free listview info pointer*/ COMCTL32_Free(infoPtr); SetWindowLongA(hwnd, 0, 0); return 0; } /*** * DESCRIPTION: * Handles notifications from children. * * PARAMETER(S): * [I] HWND : window handle * [I] INT : control identifier * [I] LPNMHDR : notification information * * RETURN: * Zero */ static LRESULT LISTVIEW_Notify(HWND hwnd, INT nCtrlId, LPNMHDR lpnmh) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); if (lpnmh->hwndFrom == infoPtr->hwndHeader) { /* handle notification from header control */ if (lpnmh->code == HDN_ENDTRACKA) { infoPtr->nItemWidth = LISTVIEW_GetItemWidth(hwnd); InvalidateRect(hwnd, NULL, TRUE); } else if(lpnmh->code == HDN_ITEMCLICKA) { /* Handle sorting by Header Column */ NMLISTVIEW nmlv; LPNMHEADERA pnmHeader = (LPNMHEADERA) lpnmh; LONG lCtrlId = GetWindowLongA(hwnd, GWL_ID); ZeroMemory(&nmlv, sizeof(NMLISTVIEW)); nmlv.hdr.hwndFrom = hwnd; nmlv.hdr.idFrom = lCtrlId; nmlv.hdr.code = LVN_COLUMNCLICK; nmlv.iItem = -1; nmlv.iSubItem = pnmHeader->iItem; ListView_LVNotify(GetParent(hwnd),lCtrlId, &nmlv); } else if(lpnmh->code == NM_RELEASEDCAPTURE) { /* Idealy this should be done in HDN_ENDTRACKA * but since SetItemBounds in Header.c is called after * the notification is sent, it is neccessary to handle the * update of the scroll bar here (Header.c works fine as it is, * no need to disturb it) */ infoPtr->nItemWidth = LISTVIEW_GetItemWidth(hwnd); LISTVIEW_UpdateScroll(hwnd); InvalidateRect(hwnd, NULL, TRUE); } } return 0; } /*** * DESCRIPTION: * Determines the type of structure to use. * * PARAMETER(S): * [I] HWND : window handle of the sender * [I] HWND : listview window handle * [I] INT : command specifying the nature of the WM_NOTIFYFORMAT * * RETURN: * Zero */ static LRESULT LISTVIEW_NotifyFormat(HWND hwndFrom, HWND hwnd, INT nCommand) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); if (nCommand == NF_REQUERY) { /* determine the type of structure to use */ infoPtr->notifyFormat = SendMessageA(hwndFrom, WM_NOTIFYFORMAT, (WPARAM)hwnd, (LPARAM)NF_QUERY); if (infoPtr->notifyFormat == NFR_UNICODE) { FIXME("NO support for unicode structures"); } } return 0; } /*** * DESCRIPTION: * Paints/Repaints the listview control. * * PARAMETER(S): * [I] HWND : window handle * [I] HDC : device context handle * * RETURN: * Zero */ static LRESULT LISTVIEW_Paint(HWND hwnd, HDC hdc) { PAINTSTRUCT ps; TRACE("(hwnd=%x,hdc=%x)\n", hwnd, hdc); if (hdc == 0) { hdc = BeginPaint(hwnd, &ps); LISTVIEW_Refresh(hwnd, hdc); EndPaint(hwnd, &ps); } else { LISTVIEW_Refresh(hwnd, hdc); } return 0; } /*** * DESCRIPTION: * Processes double click messages (right mouse button). * * PARAMETER(S): * [I] HWND : window handle * [I] WORD : key flag * [I] WORD : x coordinate * [I] WORD : y coordinate * * RETURN: * Zero */ static LRESULT LISTVIEW_RButtonDblClk(HWND hwnd, WORD wKey, WORD wPosX, WORD wPosY) { INT nCtrlId = GetWindowLongA(hwnd, GWL_ID); NMHDR nmh; TRACE("(hwnd=%x,key=%hu,X=%hu,Y=%hu)\n", hwnd, wKey, wPosX, wPosY); /* send NM_RELEASEDCAPTURE notification */ nmh.hwndFrom = hwnd; nmh.idFrom = nCtrlId; nmh.code = NM_RELEASEDCAPTURE; ListView_Notify(GetParent(hwnd), nCtrlId, &nmh); /* send NM_RDBLCLK notification */ nmh.code = NM_RDBLCLK; ListView_Notify(GetParent(hwnd), nCtrlId, &nmh); return 0; } /*** * DESCRIPTION: * Processes mouse down messages (right mouse button). * * PARAMETER(S): * [I] HWND : window handle * [I] WORD : key flag * [I] WORD : x coordinate * [I] WORD : y coordinate * * RETURN: * Zero */ static LRESULT LISTVIEW_RButtonDown(HWND hwnd, WORD wKey, WORD wPosX, WORD wPosY) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); INT nCtrlId = GetWindowLongA(hwnd, GWL_ID); POINT ptPosition; NMHDR nmh; INT nItem; TRACE("(hwnd=%x,key=%hu,X=%hu,Y=%hu)\n", hwnd, wKey, wPosX, wPosY); /* send NM_RELEASEDCAPTURE notification */ nmh.hwndFrom = hwnd; nmh.idFrom = nCtrlId; nmh.code = NM_RELEASEDCAPTURE; ListView_Notify(GetParent(hwnd), nCtrlId, &nmh); /* make sure the listview control window has the focus */ if (infoPtr->bFocus == FALSE) { SetFocus(hwnd); } /* set right button down flag */ infoPtr->bRButtonDown = TRUE; /* determine the index of the selected item */ ptPosition.x = wPosX; ptPosition.y = wPosY; nItem = LISTVIEW_MouseSelection(hwnd, ptPosition); if ((nItem >= 0) && (nItem < GETITEMCOUNT(infoPtr))) { if (!((wKey & MK_SHIFT) || (wKey & MK_CONTROL))) { LISTVIEW_SetSelection(hwnd, nItem); } } else { LISTVIEW_RemoveSelections(hwnd, 0, GETITEMCOUNT(infoPtr)); } return 0; } /*** * DESCRIPTION: * Processes mouse up messages (right mouse button). * * PARAMETER(S): * [I] HWND : window handle * [I] WORD : key flag * [I] WORD : x coordinate * [I] WORD : y coordinate * * RETURN: * Zero */ static LRESULT LISTVIEW_RButtonUp(HWND hwnd, WORD wKey, WORD wPosX, WORD wPosY) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); INT nCtrlId = GetWindowLongA(hwnd, GWL_ID); NMHDR nmh; TRACE("(hwnd=%x,key=%hu,X=%hu,Y=%hu)\n", hwnd, wKey, wPosX, wPosY); if (infoPtr->bRButtonDown != FALSE) { POINT pt; pt.x = wPosX; pt.y = wPosY; /* Send NM_RClICK notification */ ZeroMemory(&nmh, sizeof(NMHDR)); nmh.hwndFrom = hwnd; nmh.idFrom = nCtrlId; nmh.code = NM_RCLICK; ListView_Notify(GetParent(hwnd), nCtrlId, &nmh); /* set button flag */ infoPtr->bRButtonDown = FALSE; /* Change to screen coordinate for WM_CONTEXTMENU */ ClientToScreen(hwnd, &pt); /* Send a WM_CONTEXTMENU message in response to the RBUTTONUP */ SendMessageA( hwnd, WM_CONTEXTMENU, (WPARAM) hwnd, MAKELPARAM(pt.x, pt.y)); } return 0; } /*** * DESCRIPTION: * Sets the focus. * * PARAMETER(S): * [I] HWND : window handle * [I] HWND : window handle of previously focused window * * RETURN: * Zero */ static LRESULT LISTVIEW_SetFocus(HWND hwnd, HWND hwndLoseFocus) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); INT nCtrlId = GetWindowLongA(hwnd, GWL_ID); NMHDR nmh; TRACE("(hwnd=%x, hwndLoseFocus=%x)\n", hwnd, hwndLoseFocus); /* send NM_SETFOCUS notification */ nmh.hwndFrom = hwnd; nmh.idFrom = nCtrlId; nmh.code = NM_SETFOCUS; ListView_Notify(GetParent(hwnd), nCtrlId, &nmh); /* set window focus flag */ infoPtr->bFocus = TRUE; InvalidateRect(hwnd, NULL, TRUE); UpdateWindow(hwnd); return 0; } /*** * DESCRIPTION: * Sets the font. * * PARAMETER(S): * [I] HWND : window handle * [I] HFONT : font handle * [I] WORD : redraw flag * * RETURN: * Zero */ static LRESULT LISTVIEW_SetFont(HWND hwnd, HFONT hFont, WORD fRedraw) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uView = GetWindowLongA(hwnd, GWL_STYLE) & LVS_TYPEMASK; TRACE("(hwnd=%x,hfont=%x,redraw=%hu)\n", hwnd, hFont, fRedraw); if (hFont == 0) { infoPtr->hFont = infoPtr->hDefaultFont; } else { infoPtr->hFont = hFont; } if (uView == LVS_REPORT) { /* set header font */ SendMessageA(infoPtr->hwndHeader, WM_SETFONT, (WPARAM)hFont, MAKELPARAM(fRedraw, 0)); } /* invalidate listview control client area */ InvalidateRect(hwnd, NULL, TRUE); if (fRedraw != FALSE) { UpdateWindow(hwnd); } return 0; } /*** * DESCRIPTION: * Message handling for WM_SETREDRAW. * For the Listview, it invalidates the entire window (the doc specifies otherwise) * * PARAMETER(S): * [I] HWND : window handle * [I] bRedraw: state of redraw flag * * RETURN: * DefWinProc return value */ static LRESULT LISTVIEW_SetRedraw(HWND hwnd, BOOL bRedraw) { LRESULT lResult; lResult = DefWindowProcA(hwnd, WM_SETREDRAW, bRedraw, 0); if(bRedraw) { RedrawWindow(hwnd, NULL, 0, RDW_INVALIDATE | RDW_FRAME | RDW_ERASE | RDW_ALLCHILDREN | RDW_ERASENOW); } return lResult; } /*** * DESCRIPTION: * Resizes the listview control. This function processes WM_SIZE * messages. At this time, the width and height are not used. * * PARAMETER(S): * [I] HWND : window handle * [I] WORD : new width * [I] WORD : new height * * RETURN: * Zero */ static LRESULT LISTVIEW_Size(HWND hwnd, int Width, int Height) { LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); UINT uView = lStyle & LVS_TYPEMASK; TRACE("(hwnd=%x, width=%d, height=%d)\n",hwnd, Width, Height); LISTVIEW_UpdateSize(hwnd); if ((uView == LVS_SMALLICON) || (uView == LVS_ICON)) { if (lStyle & LVS_ALIGNLEFT) { LISTVIEW_AlignLeft(hwnd); } else { LISTVIEW_AlignTop(hwnd); } } LISTVIEW_UpdateScroll(hwnd); /* invalidate client area + erase background */ InvalidateRect(hwnd, NULL, TRUE); return 0; } /*** * DESCRIPTION: * Sets the size information. * * PARAMETER(S): * [I] HWND : window handle * * RETURN: * Zero */ static VOID LISTVIEW_UpdateSize(HWND hwnd) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); UINT uView = lStyle & LVS_TYPEMASK; RECT rcList; GetClientRect(hwnd, &rcList); infoPtr->rcList.left = 0; infoPtr->rcList.right = max(rcList.right - rcList.left, 1); infoPtr->rcList.top = 0; infoPtr->rcList.bottom = max(rcList.bottom - rcList.top, 1); if (uView == LVS_LIST) { if ((lStyle & WS_HSCROLL) == 0) { INT nHScrollHeight = GetSystemMetrics(SM_CYHSCROLL); if (infoPtr->rcList.bottom > nHScrollHeight) { infoPtr->rcList.bottom -= nHScrollHeight; } } } else if ((uView == LVS_REPORT)&&(!(LVS_NOCOLUMNHEADER & lStyle))) { HDLAYOUT hl; WINDOWPOS wp; hl.prc = &rcList; hl.pwpos = ℘ Header_Layout(infoPtr->hwndHeader, &hl); SetWindowPos(wp.hwnd, wp.hwndInsertAfter, wp.x, wp.y, wp.cx, wp.cy, wp.flags); if (!(LVS_NOCOLUMNHEADER & lStyle)) { infoPtr->rcList.top = max(wp.cy, 0); } } } /*** * DESCRIPTION: * Processes WM_STYLECHANGED messages. * * PARAMETER(S): * [I] HWND : window handle * [I] WPARAM : window style type (normal or extended) * [I] LPSTYLESTRUCT : window style information * * RETURN: * Zero */ static INT LISTVIEW_StyleChanged(HWND hwnd, WPARAM wStyleType, LPSTYLESTRUCT lpss) { LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); UINT uNewView = lpss->styleNew & LVS_TYPEMASK; UINT uOldView = lpss->styleOld & LVS_TYPEMASK; RECT rcList = infoPtr->rcList; TRACE("(hwnd=%x, styletype=%x, stylestruct=%p)\n", hwnd, wStyleType, lpss); if (wStyleType == GWL_STYLE) { if (uOldView == LVS_REPORT) { ShowWindow(infoPtr->hwndHeader, SW_HIDE); } if ((lpss->styleOld & WS_HSCROLL) != 0) { ShowScrollBar(hwnd, SB_HORZ, FALSE); } if ((lpss->styleOld & WS_VSCROLL) != 0) { ShowScrollBar(hwnd, SB_VERT, FALSE); } if (uNewView == LVS_ICON) { infoPtr->iconSize.cx = GetSystemMetrics(SM_CXICON); infoPtr->iconSize.cy = GetSystemMetrics(SM_CYICON); infoPtr->nItemWidth = LISTVIEW_GetItemWidth(hwnd); infoPtr->nItemHeight = LISTVIEW_GetItemHeight(hwnd); if (lpss->styleNew & LVS_ALIGNLEFT) { LISTVIEW_AlignLeft(hwnd); } else { LISTVIEW_AlignTop(hwnd); } } else if (uNewView == LVS_REPORT) { HDLAYOUT hl; WINDOWPOS wp; if (!(LVS_NOCOLUMNHEADER & lpss->styleNew)) { hl.prc = &rcList; hl.pwpos = ℘ Header_Layout(infoPtr->hwndHeader, &hl); SetWindowPos(infoPtr->hwndHeader, hwnd, wp.x, wp.y, wp.cx, wp.cy, wp.flags); ShowWindow(infoPtr->hwndHeader, SW_SHOWNORMAL); } else { RECT zeroRect; ZeroMemory(&zeroRect,sizeof(RECT)); hl.prc = &zeroRect; hl.pwpos = ℘ Header_Layout(infoPtr->hwndHeader, &hl); } infoPtr->iconSize.cx = GetSystemMetrics(SM_CXSMICON); infoPtr->iconSize.cy = GetSystemMetrics(SM_CYSMICON); infoPtr->nItemWidth = LISTVIEW_GetItemWidth(hwnd); infoPtr->nItemHeight = LISTVIEW_GetItemHeight(hwnd); } else if (uNewView == LVS_LIST) { infoPtr->iconSize.cx = GetSystemMetrics(SM_CXSMICON); infoPtr->iconSize.cy = GetSystemMetrics(SM_CYSMICON); infoPtr->nItemWidth = LISTVIEW_GetItemWidth(hwnd); infoPtr->nItemHeight = LISTVIEW_GetItemHeight(hwnd); } else { infoPtr->iconSize.cx = GetSystemMetrics(SM_CXSMICON); infoPtr->iconSize.cy = GetSystemMetrics(SM_CYSMICON); infoPtr->nItemWidth = LISTVIEW_GetItemWidth(hwnd); infoPtr->nItemHeight = LISTVIEW_GetItemHeight(hwnd); if (lpss->styleNew & LVS_ALIGNLEFT) { LISTVIEW_AlignLeft(hwnd); } else { LISTVIEW_AlignTop(hwnd); } } /* update the size of the client area */ LISTVIEW_UpdateSize(hwnd); /* add scrollbars if needed */ LISTVIEW_UpdateScroll(hwnd); /* invalidate client area + erase background */ InvalidateRect(hwnd, NULL, TRUE); /* print the list of unsupported window styles */ LISTVIEW_UnsupportedStyles(lpss->styleNew); } /* If they change the view and we have an active edit control we will need to kill the control since the redraw will misplace the edit control. */ if (infoPtr->hwndEdit && ((uNewView & (LVS_ICON|LVS_LIST|LVS_SMALLICON)) != ((LVS_ICON|LVS_LIST|LVS_SMALLICON) & uOldView))) { SendMessageA(infoPtr->hwndEdit, WM_KILLFOCUS, 0, 0); } return 0; } /*** * DESCRIPTION: * Window procedure of the listview control. * */ static LRESULT WINAPI LISTVIEW_WindowProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TRACE("hwnd=%x uMsg=%x wParam=%x lParam=%lx\n", hwnd, uMsg, wParam, lParam); if (!GetWindowLongA(hwnd, 0) && (uMsg != WM_NCCREATE)) return DefWindowProcA( hwnd, uMsg, wParam, lParam ); switch (uMsg) { case LVM_APPROXIMATEVIEWRECT: return LISTVIEW_ApproximateViewRect(hwnd, (INT)wParam, LOWORD(lParam), HIWORD(lParam)); case LVM_ARRANGE: return LISTVIEW_Arrange(hwnd, (INT)wParam); /* case LVM_CREATEDRAGIMAGE: */ case LVM_DELETEALLITEMS: return LISTVIEW_DeleteAllItems(hwnd); case LVM_DELETECOLUMN: return LISTVIEW_DeleteColumn(hwnd, (INT)wParam); case LVM_DELETEITEM: return LISTVIEW_DeleteItem(hwnd, (INT)wParam); case LVM_EDITLABELW: case LVM_EDITLABELA: return LISTVIEW_EditLabelA(hwnd, (INT)wParam); case LVM_ENSUREVISIBLE: return LISTVIEW_EnsureVisible(hwnd, (INT)wParam, (BOOL)lParam); case LVM_FINDITEMA: return LISTVIEW_FindItem(hwnd, (INT)wParam, (LPLVFINDINFO)lParam); case LVM_GETBKCOLOR: return LISTVIEW_GetBkColor(hwnd); /* case LVM_GETBKIMAGE: */ case LVM_GETCALLBACKMASK: return LISTVIEW_GetCallbackMask(hwnd); case LVM_GETCOLUMNA: return LISTVIEW_GetColumnA(hwnd, (INT)wParam, (LPLVCOLUMNA)lParam); /* case LVM_GETCOLUMNW: */ case LVM_GETCOLUMNORDERARRAY: return LISTVIEW_GetColumnOrderArray(hwnd, (INT)wParam, (LPINT)lParam); case LVM_GETCOLUMNWIDTH: return LISTVIEW_GetColumnWidth(hwnd, (INT)wParam); case LVM_GETCOUNTPERPAGE: return LISTVIEW_GetCountPerPage(hwnd); case LVM_GETEDITCONTROL: return LISTVIEW_GetEditControl(hwnd); case LVM_GETEXTENDEDLISTVIEWSTYLE: return LISTVIEW_GetExtendedListViewStyle(hwnd); case LVM_GETHEADER: return LISTVIEW_GetHeader(hwnd); /* case LVM_GETHOTCURSOR: */ case LVM_GETHOTITEM: return LISTVIEW_GetHotItem(hwnd); case LVM_GETHOVERTIME: return LISTVIEW_GetHoverTime(hwnd); case LVM_GETIMAGELIST: return LISTVIEW_GetImageList(hwnd, (INT)wParam); /* case LVM_GETISEARCHSTRING: */ case LVM_GETITEMA: return LISTVIEW_GetItemA(hwnd, (LPLVITEMA)lParam, FALSE); /* case LVM_GETITEMW: */ case LVM_GETITEMCOUNT: return LISTVIEW_GetItemCount(hwnd); case LVM_GETITEMPOSITION: return LISTVIEW_GetItemPosition(hwnd, (INT)wParam, (LPPOINT)lParam); case LVM_GETITEMRECT: return LISTVIEW_GetItemRect(hwnd, (INT)wParam, (LPRECT)lParam); case LVM_GETITEMSPACING: return LISTVIEW_GetItemSpacing(hwnd, (BOOL)wParam); case LVM_GETITEMSTATE: return LISTVIEW_GetItemState(hwnd, (INT)wParam, (UINT)lParam); case LVM_GETITEMTEXTA: LISTVIEW_GetItemTextA(hwnd, (INT)wParam, (LPLVITEMA)lParam); break; /* case LVM_GETITEMTEXTW: */ case LVM_GETNEXTITEM: return LISTVIEW_GetNextItem(hwnd, (INT)wParam, LOWORD(lParam)); /* case LVM_GETNUMBEROFWORKAREAS: */ case LVM_GETORIGIN: return LISTVIEW_GetOrigin(hwnd, (LPPOINT)lParam); case LVM_GETSELECTEDCOUNT: return LISTVIEW_GetSelectedCount(hwnd); case LVM_GETSELECTIONMARK: return LISTVIEW_GetSelectionMark(hwnd); case LVM_GETSTRINGWIDTHA: return LISTVIEW_GetStringWidthA (hwnd, (LPCSTR)lParam); /* case LVM_GETSTRINGWIDTHW: */ /* case LVM_GETSUBITEMRECT: */ case LVM_GETTEXTBKCOLOR: return LISTVIEW_GetTextBkColor(hwnd); case LVM_GETTEXTCOLOR: return LISTVIEW_GetTextColor(hwnd); /* case LVM_GETTOOLTIPS: */ case LVM_GETTOPINDEX: return LISTVIEW_GetTopIndex(hwnd); /* case LVM_GETUNICODEFORMAT: */ case LVM_GETVIEWRECT: return LISTVIEW_GetViewRect(hwnd, (LPRECT)lParam); /* case LVM_GETWORKAREAS: */ case LVM_HITTEST: return LISTVIEW_HitTest(hwnd, (LPLVHITTESTINFO)lParam); case LVM_INSERTCOLUMNA: return LISTVIEW_InsertColumnA(hwnd, (INT)wParam, (LPLVCOLUMNA)lParam); case LVM_INSERTCOLUMNW: return LISTVIEW_InsertColumnW(hwnd, (INT)wParam, (LPLVCOLUMNW)lParam); case LVM_INSERTITEMA: return LISTVIEW_InsertItemA(hwnd, (LPLVITEMA)lParam); case LVM_INSERTITEMW: return LISTVIEW_InsertItemW(hwnd, (LPLVITEMW)lParam); case LVM_REDRAWITEMS: return LISTVIEW_RedrawItems(hwnd, (INT)wParam, (INT)lParam); /* case LVM_SCROLL: */ /* return LISTVIEW_Scroll(hwnd, (INT)wParam, (INT)lParam); */ case LVM_SETBKCOLOR: return LISTVIEW_SetBkColor(hwnd, (COLORREF)lParam); /* case LVM_SETBKIMAGE: */ case LVM_SETCALLBACKMASK: return LISTVIEW_SetCallbackMask(hwnd, (UINT)wParam); case LVM_SETCOLUMNA: return LISTVIEW_SetColumnA(hwnd, (INT)wParam, (LPLVCOLUMNA)lParam); case LVM_SETCOLUMNW: FIXME("Unimplemented msg LVM_SETCOLUMNW\n"); return 0; case LVM_SETCOLUMNORDERARRAY: return LISTVIEW_SetColumnOrderArray(hwnd, (INT)wParam, (LPINT)lParam); case LVM_SETCOLUMNWIDTH: return LISTVIEW_SetColumnWidth(hwnd, (INT)wParam, (INT)lParam); case LVM_SETEXTENDEDLISTVIEWSTYLE: return LISTVIEW_SetExtendedListViewStyle(hwnd, (DWORD)wParam, (DWORD)lParam); /* case LVM_SETHOTCURSOR: */ case LVM_SETHOTITEM: return LISTVIEW_SetHotItem(hwnd, (INT)wParam); case LVM_SETHOVERTIME: return LISTVIEW_SetHoverTime(hwnd, (DWORD)wParam); /* case LVM_SETICONSPACING: */ case LVM_SETIMAGELIST: return LISTVIEW_SetImageList(hwnd, (INT)wParam, (HIMAGELIST)lParam); case LVM_SETITEMA: return LISTVIEW_SetItemA(hwnd, (LPLVITEMA)lParam); /* case LVM_SETITEMW: */ case LVM_SETITEMCOUNT: return LISTVIEW_SetItemCount(hwnd, (INT)wParam, (DWORD)lParam); case LVM_SETITEMPOSITION: return LISTVIEW_SetItemPosition(hwnd, (INT)wParam, (INT)LOWORD(lParam), (INT)HIWORD(lParam)); /* case LVM_SETITEMPOSITION32: */ case LVM_SETITEMSTATE: return LISTVIEW_SetItemState(hwnd, (INT)wParam, (LPLVITEMA)lParam); case LVM_SETITEMTEXTA: return LISTVIEW_SetItemTextA(hwnd, (INT)wParam, (LPLVITEMA)lParam); /* case LVM_SETITEMTEXTW: */ case LVM_SETSELECTIONMARK: return LISTVIEW_SetSelectionMark(hwnd, (INT)lParam); case LVM_SETTEXTBKCOLOR: return LISTVIEW_SetTextBkColor(hwnd, (COLORREF)lParam); case LVM_SETTEXTCOLOR: return LISTVIEW_SetTextColor(hwnd, (COLORREF)lParam); /* case LVM_SETTOOLTIPS: */ /* case LVM_SETUNICODEFORMAT: */ /* case LVM_SETWORKAREAS: */ case LVM_SORTITEMS: return LISTVIEW_SortItems(hwnd, wParam, lParam); /* case LVM_SUBITEMHITTEST: */ case LVM_UPDATE: return LISTVIEW_Update(hwnd, (INT)wParam); /* case WM_CHAR: */ case WM_COMMAND: return LISTVIEW_Command(hwnd, wParam, lParam); case WM_CREATE: return LISTVIEW_Create(hwnd, wParam, lParam); case WM_ERASEBKGND: return LISTVIEW_EraseBackground(hwnd, wParam, lParam); case WM_GETDLGCODE: return DLGC_WANTCHARS | DLGC_WANTARROWS; case WM_GETFONT: return LISTVIEW_GetFont(hwnd); case WM_HSCROLL: return LISTVIEW_HScroll(hwnd, (INT)LOWORD(wParam), (INT)HIWORD(wParam), (HWND)lParam); case WM_KEYDOWN: return LISTVIEW_KeyDown(hwnd, (INT)wParam, (LONG)lParam); case WM_KILLFOCUS: return LISTVIEW_KillFocus(hwnd); case WM_LBUTTONDBLCLK: return LISTVIEW_LButtonDblClk(hwnd, (WORD)wParam, LOWORD(lParam), HIWORD(lParam)); case WM_LBUTTONDOWN: return LISTVIEW_LButtonDown(hwnd, (WORD)wParam, LOWORD(lParam), HIWORD(lParam)); case WM_LBUTTONUP: return LISTVIEW_LButtonUp(hwnd, (WORD)wParam, LOWORD(lParam), HIWORD(lParam)); case WM_MOUSEMOVE: return LISTVIEW_MouseMove (hwnd, wParam, lParam); case WM_MOUSEHOVER: return LISTVIEW_MouseHover(hwnd, wParam, lParam); case WM_NCCREATE: return LISTVIEW_NCCreate(hwnd, wParam, lParam); case WM_NCDESTROY: return LISTVIEW_NCDestroy(hwnd); case WM_NOTIFY: return LISTVIEW_Notify(hwnd, (INT)wParam, (LPNMHDR)lParam); case WM_NOTIFYFORMAT: return LISTVIEW_NotifyFormat(hwnd, (HWND)wParam, (INT)lParam); case WM_PAINT: return LISTVIEW_Paint(hwnd, (HDC)wParam); case WM_RBUTTONDBLCLK: return LISTVIEW_RButtonDblClk(hwnd, (WORD)wParam, LOWORD(lParam), HIWORD(lParam)); case WM_RBUTTONDOWN: return LISTVIEW_RButtonDown(hwnd, (WORD)wParam, LOWORD(lParam), HIWORD(lParam)); case WM_RBUTTONUP: return LISTVIEW_RButtonUp(hwnd, (WORD)wParam, LOWORD(lParam), HIWORD(lParam)); case WM_SETFOCUS: return LISTVIEW_SetFocus(hwnd, (HWND)wParam); case WM_SETFONT: return LISTVIEW_SetFont(hwnd, (HFONT)wParam, (WORD)lParam); case WM_SETREDRAW: return LISTVIEW_SetRedraw(hwnd, (BOOL)wParam); case WM_SIZE: return LISTVIEW_Size(hwnd, (int)SLOWORD(lParam), (int)SHIWORD(lParam)); case WM_STYLECHANGED: return LISTVIEW_StyleChanged(hwnd, wParam, (LPSTYLESTRUCT)lParam); /* case WM_TIMER: */ case WM_VSCROLL: return LISTVIEW_VScroll(hwnd, (INT)LOWORD(wParam), (INT)HIWORD(wParam), (HWND)lParam); case WM_MOUSEWHEEL: if (wParam & (MK_SHIFT | MK_CONTROL)) return DefWindowProcA( hwnd, uMsg, wParam, lParam ); return LISTVIEW_MouseWheel(hwnd, (short int)HIWORD(wParam));/* case WM_WINDOWPOSCHANGED: */ /* case WM_WININICHANGE: */ default: if (uMsg >= WM_USER) { ERR("unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); } /* call default window procedure */ return DefWindowProcA(hwnd, uMsg, wParam, lParam); } return 0; } /*** * DESCRIPTION: * Registers the window class. * * PARAMETER(S): * None * * RETURN: * None */ VOID LISTVIEW_Register(void) { WNDCLASSA wndClass; ZeroMemory(&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS | CS_DBLCLKS; wndClass.lpfnWndProc = (WNDPROC)LISTVIEW_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(LISTVIEW_INFO *); wndClass.hCursor = LoadCursorA(0, IDC_ARROWA); wndClass.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1); wndClass.lpszClassName = WC_LISTVIEWA; RegisterClassA(&wndClass); } /*** * DESCRIPTION: * Unregisters the window class. * * PARAMETER(S): * None * * RETURN: * None */ VOID LISTVIEW_Unregister(void) { UnregisterClassA(WC_LISTVIEWA, (HINSTANCE)NULL); } /*** * DESCRIPTION: * Handle any WM_COMMAND messages * * PARAMETER(S): * * RETURN: */ static LRESULT LISTVIEW_Command(HWND hwnd, WPARAM wParam, LPARAM lParam) { switch (HIWORD(wParam)) { case EN_UPDATE: { /* * Adjust the edit window size */ char buffer[1024]; LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(hwnd, 0); HDC hdc = GetDC(infoPtr->hwndEdit); HFONT hFont, hOldFont = 0; RECT rect; SIZE sz; int len; len = GetWindowTextA(infoPtr->hwndEdit, buffer, 1023); GetWindowRect(infoPtr->hwndEdit, &rect); /* Select font to get the right dimension of the string */ hFont = SendMessageA(infoPtr->hwndEdit, WM_GETFONT, 0, 0); if(hFont != 0) { hOldFont = SelectObject(hdc, hFont); } if (GetTextExtentPoint32A(hdc, buffer, strlen(buffer), &sz)) { TEXTMETRICA textMetric; /* Add Extra spacing for the next character */ GetTextMetricsA(hdc, &textMetric); sz.cx += (textMetric.tmMaxCharWidth * 2); SetWindowPos ( infoPtr->hwndEdit, HWND_TOP, 0, 0, sz.cx, rect.bottom - rect.top, SWP_DRAWFRAME|SWP_NOMOVE); } if(hFont != 0) { SelectObject(hdc, hOldFont); } ReleaseDC(hwnd, hdc); break; } default: return SendMessageA (GetParent (hwnd), WM_COMMAND, wParam, lParam); } return 0; } /*** * DESCRIPTION: * Subclassed edit control windproc function * * PARAMETER(S): * * RETURN: */ LRESULT CALLBACK EditLblWndProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { BOOL cancel = FALSE; LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(GetParent(hwnd), 0); EDITLABEL_ITEM *einfo = infoPtr->pedititem; static BOOL bIgnoreKillFocus = FALSE; switch (uMsg) { case WM_GETDLGCODE: return DLGC_WANTARROWS | DLGC_WANTALLKEYS; case WM_KILLFOCUS: if(bIgnoreKillFocus) { return TRUE; } break; case WM_DESTROY: { WNDPROC editProc = einfo->EditWndProc; SetWindowLongA(hwnd, GWL_WNDPROC, (LONG)editProc); COMCTL32_Free(einfo); infoPtr->pedititem = NULL; return CallWindowProcA(editProc, hwnd, uMsg, wParam, lParam); } case WM_KEYDOWN: if (VK_ESCAPE == (INT)wParam) { cancel = TRUE; break; } else if (VK_RETURN == (INT)wParam) break; default: return CallWindowProcA(einfo->EditWndProc, hwnd, uMsg, wParam, lParam); } if (einfo->EditLblCb) { char *buffer = NULL; if (!cancel) { int len = 1 + GetWindowTextLengthA(hwnd); if (len > 1) { if (NULL != (buffer = (char *)COMCTL32_Alloc(len*sizeof(char)))) { GetWindowTextA(hwnd, buffer, len); } } } /* Processing LVN_ENDLABELEDIT message could kill the focus */ /* eg. Using a messagebox */ bIgnoreKillFocus = TRUE; einfo->EditLblCb(GetParent(hwnd), buffer, einfo->param); if (buffer) COMCTL32_Free(buffer); einfo->EditLblCb = NULL; bIgnoreKillFocus = FALSE; } SendMessageA(hwnd, WM_CLOSE, 0, 0); return TRUE; } /*** * DESCRIPTION: * Creates a subclassed edit cotrol * * PARAMETER(S): * * RETURN: */ HWND CreateEditLabel(LPCSTR text, DWORD style, INT x, INT y, INT width, INT height, HWND parent, HINSTANCE hinst, EditlblCallback EditLblCb, DWORD param) { HWND hedit; SIZE sz; HDC hdc; HDC hOldFont=0; TEXTMETRICA textMetric; LISTVIEW_INFO *infoPtr = (LISTVIEW_INFO *)GetWindowLongA(parent, 0); if (NULL == (infoPtr->pedititem = COMCTL32_Alloc(sizeof(EDITLABEL_ITEM)))) return 0; style |= WS_CHILDWINDOW|WS_CLIPSIBLINGS|ES_LEFT|WS_BORDER; hdc = GetDC(parent); /* Select the font to get appropriate metric dimensions */ if(infoPtr->hFont != 0) { hOldFont = SelectObject(hdc, infoPtr->hFont); } /*Get String Lenght in pixels */ GetTextExtentPoint32A(hdc, text, strlen(text), &sz); /*Add Extra spacing for the next character */ GetTextMetricsA(hdc, &textMetric); sz.cx += (textMetric.tmMaxCharWidth * 2); if(infoPtr->hFont != 0) { SelectObject(hdc, hOldFont); } ReleaseDC(parent, hdc); if (!(hedit = CreateWindowA("Edit", text, style, x, y, sz.cx, height, parent, 0, hinst, 0))) { COMCTL32_Free(infoPtr->pedititem); return 0; } infoPtr->pedititem->param = param; infoPtr->pedititem->EditLblCb = EditLblCb; infoPtr->pedititem->EditWndProc = (WNDPROC)SetWindowLongA(hedit, GWL_WNDPROC, (LONG) EditLblWndProc); SendMessageA(hedit, WM_SETFONT, infoPtr->hFont, FALSE); return hedit; } wine-20000526/dlls/comctl32/monthcal.c0100644000175000001440000014130307106136275017010 0ustar julliardusers/* Month calendar control * * Copyright 1998, 1999 Eric Kohl (ekohl@abo.rhein-zeitung.de) * Copyright 1999 Alex Priem (alexp@sci.kun.nl) * Copyright 1999 Chris Morgan and * James Abbatiello * * TODO: * - Notifications. * * * FIXME: refresh should ask for rect of required length. (?) * FIXME: handle resources better (doesn't work now); also take care of internationalization. * FIXME: keyboard handling. */ #include #include #include "winbase.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "win.h" #include "winnls.h" #include "commctrl.h" #include "comctl32.h" #include "monthcal.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(monthcal); /* take #days/month from ole/parsedt.c; * we want full month-names, and abbreviated weekdays, so these are * defined here */ const int mdays[] = {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31, 0}; const char * const monthtxt[] = {"January", "February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December"}; const char * const daytxt[] = {"Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat"}; static const int DayOfWeekTable[] = {0, 3, 2, 5, 0, 3, 5, 1, 4, 6, 2, 4}; #define MONTHCAL_GetInfoPtr(hwnd) ((MONTHCAL_INFO *)GetWindowLongA(hwnd, 0)) /* helper functions */ /* returns the number of days in any given month */ /* january is 1, december is 12 */ static int MONTHCAL_MonthLength(int month, int year) { /* if we have a leap year add 1 day to February */ /* a leap year is a year either divisible by 400 */ /* or divisible by 4 and not by 100 */ if(month == 2) { /* February */ return mdays[month - 1] + ((year%400 == 0) ? 1 : ((year%100 != 0) && (year%4 == 0)) ? 1 : 0); } else { return mdays[month - 1]; } } /* make sure that time is valid */ static int MONTHCAL_ValidateTime(SYSTEMTIME time) { if(time.wMonth > 12) return FALSE; if(time.wDayOfWeek > 6) return FALSE; if(time.wDay > MONTHCAL_MonthLength(time.wMonth, time.wYear)) return FALSE; if(time.wHour > 23) return FALSE; if(time.wMinute > 59) return FALSE; if(time.wSecond > 59) return FALSE; if(time.wMilliseconds > 999) return FALSE; return TRUE; } void MONTHCAL_CopyTime(const SYSTEMTIME *from, SYSTEMTIME *to) { to->wYear = from->wYear; to->wMonth = from->wMonth; to->wDayOfWeek = from->wDayOfWeek; to->wDay = from->wDay; to->wHour = from->wHour; to->wMinute = from->wMinute; to->wSecond = from->wSecond; to->wMilliseconds = from->wMilliseconds; } /* Note:Depending on DST, this may be offset by a day. Need to find out if we're on a DST place & adjust the clock accordingly. Above function assumes we have a valid data. Valid for year>1752; 1 <= d <= 31, 1 <= m <= 12. 0 = Monday. */ /* returns the day in the week(0 == sunday, 6 == saturday) */ /* day(1 == 1st, 2 == 2nd... etc), year is the year value */ int MONTHCAL_CalculateDayOfWeek(DWORD day, DWORD month, DWORD year) { year-=(month < 3); return((year + year/4 - year/100 + year/400 + DayOfWeekTable[month-1] + day - 1 ) % 7); } static int MONTHCAL_CalcDayFromPos(MONTHCAL_INFO *infoPtr, int x, int y) { int daypos, weekpos, retval, firstDay; /* if the point is outside the x bounds of the window put it at the boundry */ if(x > (infoPtr->width_increment * 7.0)) { x = infoPtr->rcClient.right - infoPtr->rcClient.left - infoPtr->left_offset; } daypos = (x -(infoPtr->prevmonth.left + infoPtr->left_offset)) / infoPtr->width_increment; weekpos = (y - infoPtr->days.bottom - infoPtr->rcClient.top) / infoPtr->height_increment; firstDay = MONTHCAL_CalculateDayOfWeek(1, infoPtr->currentMonth, infoPtr->currentYear); retval = daypos + (7 * weekpos) - firstDay; TRACE("%d %d %d\n", daypos, weekpos, retval); return retval; } /* day is the day of the month, 1 == 1st day of the month */ /* sets x and y to be the position of the day */ /* x == day, y == week where(0,0) == sunday, 1st week */ static void MONTHCAL_CalcDayXY(MONTHCAL_INFO *infoPtr, int day, int month, int *x, int *y) { int firstDay, prevMonth; firstDay = MONTHCAL_CalculateDayOfWeek(1, infoPtr->currentMonth, infoPtr->currentYear); if(month==infoPtr->currentMonth) { *x = (day + firstDay) % 7; *y = (day + firstDay - *x) / 7; return; } if(month < infoPtr->currentMonth) { prevMonth = month - 1; if(prevMonth==0) prevMonth = 12; *x = (MONTHCAL_MonthLength(prevMonth, infoPtr->currentYear) - firstDay) % 7; *y = 0; return; } *y = MONTHCAL_MonthLength(month, infoPtr->currentYear - 1) / 7; *x = (day + firstDay + MONTHCAL_MonthLength(month, infoPtr->currentYear)) % 7; } /* x: column(day), y: row(week) */ static void MONTHCAL_CalcDayRect(MONTHCAL_INFO *infoPtr, RECT *r, int x, int y) { r->left = infoPtr->prevmonth.left + x * infoPtr->width_increment + infoPtr->left_offset; r->right = r->left + infoPtr->width_increment; r->top = infoPtr->height_increment * y + infoPtr->days.bottom + infoPtr->top_offset; r->bottom = r->top + infoPtr->textHeight; } /* sets the RECT struct r to the rectangle around the day and month */ /* day is the day value of the month(1 == 1st), month is the month */ /* value(january == 1, december == 12) */ static inline void MONTHCAL_CalcPosFromDay(MONTHCAL_INFO *infoPtr, int day, int month, RECT *r) { int x, y; MONTHCAL_CalcDayXY(infoPtr, day, month, &x, &y); MONTHCAL_CalcDayRect(infoPtr, r, x, y); } /* day is the day in the month(1 == 1st of the month) */ /* month is the month value(1 == january, 12 == december) */ static void MONTHCAL_CircleDay(HDC hdc, MONTHCAL_INFO *infoPtr, int day, int month) { HPEN hRedPen = CreatePen(PS_SOLID, 2, RGB(255, 0, 0)); HPEN hOldPen2 = SelectObject(hdc, hRedPen); POINT points[13]; int x, y; RECT day_rect; /* use prevmonth to calculate position because it contains the extra width * from MCS_WEEKNUMBERS */ MONTHCAL_CalcPosFromDay(infoPtr, day, month, &day_rect); x = day_rect.left; y = day_rect.top; points[0].x = x; points[0].y = y - 1; points[1].x = x + 0.8 * infoPtr->width_increment; points[1].y = y - 1; points[2].x = x + 0.9 * infoPtr->width_increment; points[2].y = y; points[3].x = x + infoPtr->width_increment; points[3].y = y + 0.5 * infoPtr->textHeight; points[4].x = x + infoPtr->width_increment; points[4].y = y + 0.9 * infoPtr->textHeight; points[5].x = x + 0.6 * infoPtr->width_increment; points[5].y = y + 0.9 * infoPtr->textHeight; points[6].x = x + 0.5 * infoPtr->width_increment; points[6].y = y + 0.9 * infoPtr->textHeight; /* bring the bottom up just a hair to fit inside the day rectangle */ points[7].x = x + 0.2 * infoPtr->width_increment; points[7].y = y + 0.8 * infoPtr->textHeight; points[8].x = x + 0.1 * infoPtr->width_increment; points[8].y = y + 0.8 * infoPtr->textHeight; points[9].x = x; points[9].y = y + 0.5 * infoPtr->textHeight; points[10].x = x + 0.1 * infoPtr->width_increment; points[10].y = y + 0.2 * infoPtr->textHeight; points[11].x = x + 0.2 * infoPtr->width_increment; points[11].y = y + 0.3 * infoPtr->textHeight; points[12].x = x + 0.5 * infoPtr->width_increment; points[12].y = y + 0.3 * infoPtr->textHeight; PolyBezier(hdc, points, 13); DeleteObject(hRedPen); SelectObject(hdc, hOldPen2); } static void MONTHCAL_DrawDay(HDC hdc, MONTHCAL_INFO *infoPtr, int day, int month, int x, int y, int bold) { char buf[10]; RECT r; static int haveBoldFont, haveSelectedDay = FALSE; HBRUSH hbr; HPEN hNewPen, hOldPen = 0; COLORREF oldCol = 0; COLORREF oldBk = 0; sprintf(buf, "%d", day); /* No need to check styles: when selection is not valid, it is set to zero. * 1=infoPtr->minSel.wDay) && (day<=infoPtr->maxSel.wDay) && (month==infoPtr->currentMonth)) { HRGN hrgn; RECT r2; TRACE("%d %d %d\n",day, infoPtr->minSel.wDay, infoPtr->maxSel.wDay); TRACE("%d %d %d %d\n", r.left, r.top, r.right, r.bottom); oldCol = SetTextColor(hdc, infoPtr->monthbk); oldBk = SetBkColor(hdc, infoPtr->trailingtxt); hbr = GetSysColorBrush(COLOR_GRAYTEXT); hrgn = CreateEllipticRgn(r.left, r.top, r.right, r.bottom); FillRgn(hdc, hrgn, hbr); /* FIXME: this may need to be changed now b/c of the other drawing changes 11/3/99 CMM */ r2.left = r.left - 0.25 * infoPtr->textWidth; r2.top = r.top; r2.right = r.left + 0.5 * infoPtr->textWidth; r2.bottom = r.bottom; if(haveSelectedDay) FillRect(hdc, &r2, hbr); haveSelectedDay = TRUE; } else { haveSelectedDay = FALSE; } /* need to add some code for multiple selections */ if((bold) &&(!haveBoldFont)) { SelectObject(hdc, infoPtr->hBoldFont); haveBoldFont = TRUE; } if((!bold) &&(haveBoldFont)) { SelectObject(hdc, infoPtr->hFont); haveBoldFont = FALSE; } if(haveSelectedDay) { SetTextColor(hdc, oldCol); SetBkColor(hdc, oldBk); } DrawTextA(hdc, buf, lstrlenA(buf), &r, DT_CENTER | DT_VCENTER | DT_SINGLELINE ); /* draw a rectangle around the currently selected days text */ if((day==infoPtr->curSelDay) && (month==infoPtr->currentMonth)) { hNewPen = CreatePen(PS_DOT, 0, GetSysColor(COLOR_WINDOWTEXT) ); hbr = GetSysColorBrush(COLOR_WINDOWTEXT); FrameRect(hdc, &r, hbr); SelectObject(hdc, hOldPen); } } /* CHECKME: For `todays date', do we need to check the locale?*/ static void MONTHCAL_Refresh(HWND hwnd, HDC hdc) { MONTHCAL_INFO *infoPtr=MONTHCAL_GetInfoPtr(hwnd); RECT *rcClient=&infoPtr->rcClient; RECT *rcDraw=&infoPtr->rcDraw; RECT *title=&infoPtr->title; RECT *prev=&infoPtr->titlebtnprev; RECT *next=&infoPtr->titlebtnnext; RECT *titlemonth=&infoPtr->titlemonth; RECT *titleyear=&infoPtr->titleyear; RECT *prevmonth=&infoPtr->prevmonth; RECT *nextmonth=&infoPtr->nextmonth; RECT dayrect; RECT *days=&dayrect; RECT *weeknums=&infoPtr->weeknums; RECT *rtoday=&infoPtr->today; int i, j, m, mask, day, firstDay, weeknum, prevMonth; int textHeight = infoPtr->textHeight, textWidth = infoPtr->textWidth; SIZE size; HBRUSH hbr; HFONT currentFont; /* LOGFONTA logFont; */ char buf[20]; const char *thisMonthtxt; COLORREF oldTextColor, oldBkColor; DWORD dwStyle = GetWindowLongA(hwnd, GWL_STYLE); BOOL prssed; oldTextColor = SetTextColor(hdc, GetSysColor(COLOR_WINDOWTEXT)); /* draw control edge */ hbr = CreateSolidBrush(RGB(255, 255, 255)); FillRect(hdc, rcClient, hbr); DrawEdge(hdc, rcClient, EDGE_SUNKEN, BF_RECT); DeleteObject(hbr); prssed = FALSE; /* draw header */ hbr = CreateSolidBrush(infoPtr->titlebk); FillRect(hdc, title, hbr); /* if the previous button is pressed draw it depressed */ if((infoPtr->status & MC_PREVPRESSED)) DrawFrameControl(hdc, prev, DFC_SCROLL, DFCS_SCROLLLEFT | DFCS_PUSHED | (dwStyle & WS_DISABLED ? DFCS_INACTIVE : 0)); else /* if the previous button is pressed draw it depressed */ DrawFrameControl(hdc, prev, DFC_SCROLL, DFCS_SCROLLLEFT |(dwStyle & WS_DISABLED ? DFCS_INACTIVE : 0)); /* if next button is depressed draw it depressed */ if((infoPtr->status & MC_NEXTPRESSED)) DrawFrameControl(hdc, next, DFC_SCROLL, DFCS_SCROLLRIGHT | DFCS_PUSHED | (dwStyle & WS_DISABLED ? DFCS_INACTIVE : 0)); else /* if the next button is pressed draw it depressed */ DrawFrameControl(hdc, next, DFC_SCROLL, DFCS_SCROLLRIGHT |(dwStyle & WS_DISABLED ? DFCS_INACTIVE : 0)); oldBkColor = SetBkColor(hdc, infoPtr->titlebk); SetTextColor(hdc, infoPtr->titletxt); currentFont = SelectObject(hdc, infoPtr->hBoldFont); /* titlemonth->left and right are set in MONTHCAL_UpdateSize */ titlemonth->left = title->left; titlemonth->right = title->right; thisMonthtxt = monthtxt[infoPtr->currentMonth - 1]; sprintf(buf, "%s %ld", thisMonthtxt, infoPtr->currentYear); DrawTextA(hdc, buf, strlen(buf), titlemonth, DT_CENTER | DT_VCENTER | DT_SINGLELINE); SelectObject(hdc, infoPtr->hFont); /* titlemonth left/right contained rect for whole titletxt('June 1999') * MCM_HitTestInfo wants month & year rects, so prepare these now. *(no, we can't draw them separately; the whole text is centered) */ GetTextExtentPoint32A(hdc, buf, lstrlenA(buf), &size); titlemonth->left = title->right / 2 - size.cx / 2; titleyear->right = title->right / 2 + size.cx / 2; GetTextExtentPoint32A(hdc, thisMonthtxt, lstrlenA(thisMonthtxt), &size); titlemonth->right = titlemonth->left + size.cx; titleyear->right = titlemonth->right; /* draw line under day abbreviatons */ if(dwStyle & MCS_WEEKNUMBERS) MoveToEx(hdc, rcDraw->left + textWidth + 3, title->bottom + textHeight + 2, NULL); else MoveToEx(hdc, rcDraw->left + 3, title->bottom + textHeight + 2, NULL); LineTo(hdc, rcDraw->right - 3, title->bottom + textHeight + 2); /* draw day abbreviations */ SetBkColor(hdc, infoPtr->monthbk); SetTextColor(hdc, infoPtr->trailingtxt); /* copy this rect so we can change the values without changing */ /* the original version */ days->left = infoPtr->days.left; days->right = infoPtr->days.right; days->top = infoPtr->days.top; days->bottom = infoPtr->days.bottom; i = infoPtr->firstDay; for(j=0; j<7; j++) { DrawTextA(hdc, daytxt[i], strlen(daytxt[i]), days, DT_CENTER | DT_VCENTER | DT_SINGLELINE ); i = (i + 1) % 7; days->left+=infoPtr->width_increment; days->right+=infoPtr->width_increment; } days->left = rcDraw->left + j; if(dwStyle & MCS_WEEKNUMBERS) days->left+=textWidth; /* FIXME: this may need to be changed now 11/10/99 CMM */ days->right = rcDraw->left + (j+1) * textWidth - 2; /* draw day numbers; first, the previous month */ firstDay = MONTHCAL_CalculateDayOfWeek(1, infoPtr->currentMonth, infoPtr->currentYear); prevMonth = infoPtr->currentMonth - 1; if(prevMonth == 0) /* if currentMonth is january(1) prevMonth is */ prevMonth = 12; /* december(12) of the previous year */ day = MONTHCAL_MonthLength(prevMonth, infoPtr->currentYear) - firstDay; mask = 1<<(day-1); i = 0; m = 0; while(day <= MONTHCAL_MonthLength(prevMonth, infoPtr->currentYear)) { MONTHCAL_DrawDay(hdc, infoPtr, day, prevMonth, i, 0, infoPtr->monthdayState[m] & mask); mask<<=1; day++; i++; } prevmonth->left = 0; if(dwStyle & MCS_WEEKNUMBERS) prevmonth->left = textWidth; prevmonth->right = prevmonth->left + i * textWidth; prevmonth->top = days->bottom; prevmonth->bottom = prevmonth->top + textHeight; /* draw `current' month */ day = 1; /* start at the beginning of the current month */ infoPtr->firstDayplace = i; SetTextColor(hdc, infoPtr->txt); m++; mask = 1; /* draw the first week of the current month */ while(i<7) { MONTHCAL_DrawDay(hdc, infoPtr, day, infoPtr->currentMonth, i, 0, infoPtr->monthdayState[m] & mask); if((infoPtr->currentMonth==infoPtr->todaysDate.wMonth) && (day==infoPtr->todaysDate.wDay) && (infoPtr->currentYear == infoPtr->todaysDate.wYear)) { MONTHCAL_CircleDay(hdc, infoPtr, day, infoPtr->currentMonth); } mask<<=1; day++; i++; } j = 1; /* move to the 2nd week of the current month */ i = 0; /* move back to sunday */ while(day <= MONTHCAL_MonthLength(infoPtr->currentMonth, infoPtr->currentYear)) { MONTHCAL_DrawDay(hdc, infoPtr, day, infoPtr->currentMonth, i, j, infoPtr->monthdayState[m] & mask); if((infoPtr->currentMonth==infoPtr->todaysDate.wMonth) && (day==infoPtr->todaysDate.wDay) && (infoPtr->currentYear == infoPtr->todaysDate.wYear)) MONTHCAL_CircleDay(hdc, infoPtr, day, infoPtr->currentMonth); mask<<=1; day++; i++; if(i>6) { /* past saturday, goto the next weeks sunday */ i = 0; j++; } } /* draw `next' month */ /* note: the nextmonth rect only hints for the `half-week' that needs to be * drawn to complete the current week. An eventual next week that needs to * be drawn to complete the month calendar is not taken into account in * this rect -- HitTest knows about this.*/ nextmonth->left = prevmonth->left + i * textWidth; nextmonth->right = rcDraw->right; nextmonth->top = days->bottom + (j+1) * textHeight; nextmonth->bottom = nextmonth->top + textHeight; day = 1; /* start at the first day of the next month */ m++; mask = 1; SetTextColor(hdc, infoPtr->trailingtxt); while((i<7) &&(j<6)) { MONTHCAL_DrawDay(hdc, infoPtr, day, infoPtr->currentMonth + 1, i, j, infoPtr->monthdayState[m] & mask); mask<<=1; day++; i++; if(i==7) { /* past saturday, go to next week's sunday */ i = 0; j++; } } SetTextColor(hdc, infoPtr->txt); /* draw `today' date if style allows it, and draw a circle before today's * date if necessary */ if(!(dwStyle & MCS_NOTODAY)) { int offset = 0; if(!(dwStyle & MCS_NOTODAYCIRCLE)) { MONTHCAL_CircleDay(hdc, infoPtr, day, infoPtr->currentMonth + 1); offset+=textWidth; } MONTHCAL_CalcDayRect(infoPtr, rtoday, offset==textWidth, 6); sprintf(buf, "Today: %d/%d/%d", infoPtr->todaysDate.wMonth, infoPtr->todaysDate.wDay, infoPtr->todaysDate.wYear % 100); rtoday->right = rcDraw->right; SelectObject(hdc, infoPtr->hBoldFont); DrawTextA(hdc, buf, lstrlenA(buf), rtoday, DT_LEFT | DT_VCENTER | DT_SINGLELINE); SelectObject(hdc, infoPtr->hFont); } if(dwStyle & MCS_WEEKNUMBERS) { /* display weeknumbers*/ weeknums->left = 0; weeknums->right = textWidth; weeknums->top = days->bottom + 2; weeknums->bottom = days->bottom + 2 + textHeight; weeknum = 0; for(i=0; icurrentMonth-1; i++) weeknum+=MONTHCAL_MonthLength(i, infoPtr->currentYear); weeknum/=7; for(i=0; i<6; i++) { sprintf(buf, "%d", weeknum + i); DrawTextA(hdc, buf, lstrlenA(buf), weeknums, DT_CENTER | DT_BOTTOM | DT_SINGLELINE ); weeknums->top+=textHeight * 1.25; weeknums->bottom+=textHeight * 1.25; } MoveToEx(hdc, weeknums->right, days->bottom + 5 , NULL); LineTo(hdc, weeknums->right, weeknums->bottom - 1.25 * textHeight - 5); } /* currentFont was font at entering Refresh */ SetBkColor(hdc, oldBkColor); SelectObject(hdc, currentFont); SetTextColor(hdc, oldTextColor); } static LRESULT MONTHCAL_GetMinReqRect(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); LPRECT lpRect = (LPRECT) lParam; TRACE("%x %lx\n", wParam, lParam); /* validate parameters */ if((infoPtr==NULL) ||(lpRect == NULL) ) return FALSE; lpRect->left = infoPtr->rcClient.left; lpRect->right = infoPtr->rcClient.right; lpRect->top = infoPtr->rcClient.top; lpRect->bottom = infoPtr->rcClient.bottom; return TRUE; } static LRESULT MONTHCAL_GetColor(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); TRACE("%x %lx\n", wParam, lParam); switch((int)wParam) { case MCSC_BACKGROUND: return infoPtr->bk; case MCSC_TEXT: return infoPtr->txt; case MCSC_TITLEBK: return infoPtr->titlebk; case MCSC_TITLETEXT: return infoPtr->titletxt; case MCSC_MONTHBK: return infoPtr->monthbk; case MCSC_TRAILINGTEXT: return infoPtr->trailingtxt; } return -1; } static LRESULT MONTHCAL_SetColor(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); int prev = -1; TRACE("%x %lx\n", wParam, lParam); switch((int)wParam) { case MCSC_BACKGROUND: prev = infoPtr->bk; infoPtr->bk = (COLORREF)lParam; break; case MCSC_TEXT: prev = infoPtr->txt; infoPtr->txt = (COLORREF)lParam; break; case MCSC_TITLEBK: prev = infoPtr->titlebk; infoPtr->titlebk = (COLORREF)lParam; break; case MCSC_TITLETEXT: prev=infoPtr->titletxt; infoPtr->titletxt = (COLORREF)lParam; break; case MCSC_MONTHBK: prev = infoPtr->monthbk; infoPtr->monthbk = (COLORREF)lParam; break; case MCSC_TRAILINGTEXT: prev = infoPtr->trailingtxt; infoPtr->trailingtxt = (COLORREF)lParam; break; } return prev; } static LRESULT MONTHCAL_GetMonthDelta(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); TRACE("%x %lx\n", wParam, lParam); if(infoPtr->delta) return infoPtr->delta; else return infoPtr->visible; } static LRESULT MONTHCAL_SetMonthDelta(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); int prev = infoPtr->delta; TRACE("%x %lx\n", wParam, lParam); infoPtr->delta = (int)wParam; return prev; } static LRESULT MONTHCAL_GetFirstDayOfWeek(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); return infoPtr->firstDay; } /* sets the first day of the week that will appear in the control */ /* 0 == Monday, 6 == Sunday */ /* FIXME: this needs to be implemented properly in MONTHCAL_Refresh() */ /* FIXME: we need more error checking here */ static LRESULT MONTHCAL_SetFirstDayOfWeek(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); int prev = infoPtr->firstDay; char buf[40]; int day; TRACE("%x %lx\n", wParam, lParam); if((lParam >= 0) && (lParam < 7)) { infoPtr->firstDay = (int)lParam; GetLocaleInfoA(LOCALE_USER_DEFAULT, LOCALE_IFIRSTDAYOFWEEK, buf, sizeof(buf)); TRACE("%s %d\n", buf, strlen(buf)); if((sscanf(buf, "%d", &day) == 1) &&(infoPtr->firstDay != day)) infoPtr->firstDay = day; } return prev; } /* FIXME: fill this in */ static LRESULT MONTHCAL_GetMonthRange(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); TRACE("%x %lx\n", wParam, lParam); FIXME("stub\n"); return infoPtr->monthRange; } static LRESULT MONTHCAL_GetMaxTodayWidth(HWND hwnd) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); return(infoPtr->today.right - infoPtr->today.left); } /* FIXME: are validated times taken from current date/time or simply * copied? * FIXME: check whether MCM_GETMONTHRANGE shows correct result after * adjusting range with MCM_SETRANGE */ static LRESULT MONTHCAL_SetRange(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); SYSTEMTIME lprgSysTimeArray[1]; int prev; TRACE("%x %lx\n", wParam, lParam); if(wParam & GDTR_MAX) { if(MONTHCAL_ValidateTime(lprgSysTimeArray[1])){ MONTHCAL_CopyTime(&lprgSysTimeArray[1], &infoPtr->maxDate); infoPtr->rangeValid|=GDTR_MAX; } else { GetSystemTime(&infoPtr->todaysDate); MONTHCAL_CopyTime(&infoPtr->todaysDate, &infoPtr->maxDate); } } if(wParam & GDTR_MIN) { if(MONTHCAL_ValidateTime(lprgSysTimeArray[0])) { MONTHCAL_CopyTime(&lprgSysTimeArray[0], &infoPtr->maxDate); infoPtr->rangeValid|=GDTR_MIN; } else { GetSystemTime(&infoPtr->todaysDate); MONTHCAL_CopyTime(&infoPtr->todaysDate, &infoPtr->maxDate); } } prev = infoPtr->monthRange; infoPtr->monthRange = infoPtr->maxDate.wMonth - infoPtr->minDate.wMonth; if(infoPtr->monthRange!=prev) { COMCTL32_ReAlloc(infoPtr->monthdayState, infoPtr->monthRange * sizeof(MONTHDAYSTATE)); } return 1; } /* CHECKME: At the moment, we copy ranges anyway,regardless of * infoPtr->rangeValid; a invalid range is simply filled with zeros in * SetRange. Is this the right behavior? */ static LRESULT MONTHCAL_GetRange(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); SYSTEMTIME *lprgSysTimeArray = (SYSTEMTIME *)lParam; /* validate parameters */ if((infoPtr==NULL) || (lprgSysTimeArray==NULL)) return FALSE; MONTHCAL_CopyTime(&infoPtr->maxDate, &lprgSysTimeArray[1]); MONTHCAL_CopyTime(&infoPtr->minDate, &lprgSysTimeArray[0]); return infoPtr->rangeValid; } static LRESULT MONTHCAL_SetDayState(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); int i, iMonths = (int)wParam; MONTHDAYSTATE *dayStates = (LPMONTHDAYSTATE)lParam; TRACE("%x %lx\n", wParam, lParam); if(iMonths!=infoPtr->monthRange) return 0; for(i=0; imonthdayState[i] = dayStates[i]; return 1; } static LRESULT MONTHCAL_GetCurSel(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); SYSTEMTIME *lpSel = (SYSTEMTIME *) lParam; TRACE("%x %lx\n", wParam, lParam); if((infoPtr==NULL) ||(lpSel==NULL)) return FALSE; if(GetWindowLongA(hwnd, GWL_STYLE) & MCS_MULTISELECT) return FALSE; MONTHCAL_CopyTime(&infoPtr->minSel, lpSel); return TRUE; } /* FIXME: if the specified date is not visible, make it visible */ /* FIXME: redraw? */ static LRESULT MONTHCAL_SetCurSel(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); SYSTEMTIME *lpSel = (SYSTEMTIME *)lParam; TRACE("%x %lx\n", wParam, lParam); if((infoPtr==NULL) ||(lpSel==NULL)) return FALSE; if(GetWindowLongA(hwnd, GWL_STYLE) & MCS_MULTISELECT) return FALSE; TRACE("%d %d\n", lpSel->wMonth, lpSel->wDay); MONTHCAL_CopyTime(lpSel, &infoPtr->minSel); MONTHCAL_CopyTime(lpSel, &infoPtr->maxSel); return TRUE; } static LRESULT MONTHCAL_GetMaxSelCount(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); TRACE("%x %lx\n", wParam, lParam); return infoPtr->maxSelCount; } static LRESULT MONTHCAL_SetMaxSelCount(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); TRACE("%x %lx\n", wParam, lParam); if(GetWindowLongA(hwnd, GWL_STYLE) & MCS_MULTISELECT) { infoPtr->maxSelCount = wParam; } return TRUE; } static LRESULT MONTHCAL_GetSelRange(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); SYSTEMTIME *lprgSysTimeArray = (SYSTEMTIME *) lParam; TRACE("%x %lx\n", wParam, lParam); /* validate parameters */ if((infoPtr==NULL) ||(lprgSysTimeArray==NULL)) return FALSE; if(GetWindowLongA(hwnd, GWL_STYLE) & MCS_MULTISELECT) { MONTHCAL_CopyTime(&infoPtr->maxSel, &lprgSysTimeArray[1]); MONTHCAL_CopyTime(&infoPtr->minSel, &lprgSysTimeArray[0]); TRACE("[min,max]=[%d %d]\n", infoPtr->minSel.wDay, infoPtr->maxSel.wDay); return TRUE; } return FALSE; } static LRESULT MONTHCAL_SetSelRange(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); SYSTEMTIME *lprgSysTimeArray = (SYSTEMTIME *) lParam; TRACE("%x %lx\n", wParam, lParam); /* validate parameters */ if((infoPtr==NULL) ||(lprgSysTimeArray==NULL)) return FALSE; if(GetWindowLongA( hwnd, GWL_STYLE) & MCS_MULTISELECT) { MONTHCAL_CopyTime(&lprgSysTimeArray[1], &infoPtr->maxSel); MONTHCAL_CopyTime(&lprgSysTimeArray[0], &infoPtr->minSel); TRACE("[min,max]=[%d %d]\n", infoPtr->minSel.wDay, infoPtr->maxSel.wDay); return TRUE; } return FALSE; } static LRESULT MONTHCAL_GetToday(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); SYSTEMTIME *lpToday = (SYSTEMTIME *) lParam; TRACE("%x %lx\n", wParam, lParam); /* validate parameters */ if((infoPtr==NULL) || (lpToday==NULL)) return FALSE; MONTHCAL_CopyTime(&infoPtr->todaysDate, lpToday); return TRUE; } static LRESULT MONTHCAL_SetToday(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); SYSTEMTIME *lpToday = (SYSTEMTIME *) lParam; TRACE("%x %lx\n", wParam, lParam); /* validate parameters */ if((infoPtr==NULL) ||(lpToday==NULL)) return FALSE; MONTHCAL_CopyTime(lpToday, &infoPtr->todaysDate); return TRUE; } static LRESULT MONTHCAL_HitTest(HWND hwnd, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); PMCHITTESTINFO lpht = (PMCHITTESTINFO)lParam; UINT x,y; DWORD retval; x = lpht->pt.x; y = lpht->pt.y; retval = MCHT_NOWHERE; /* are we in the header? */ if(PtInRect(&infoPtr->title, lpht->pt)) { if(PtInRect(&infoPtr->titlebtnprev, lpht->pt)) { retval = MCHT_TITLEBTNPREV; goto done; } if(PtInRect(&infoPtr->titlebtnnext, lpht->pt)) { retval = MCHT_TITLEBTNNEXT; goto done; } if(PtInRect(&infoPtr->titlemonth, lpht->pt)) { retval = MCHT_TITLEMONTH; goto done; } if(PtInRect(&infoPtr->titleyear, lpht->pt)) { retval = MCHT_TITLEYEAR; goto done; } retval = MCHT_TITLE; goto done; } if(PtInRect(&infoPtr->days, lpht->pt)) { retval = MCHT_CALENDARDAY; /* FIXME: find out which day we're on */ goto done; } if(PtInRect(&infoPtr->weeknums, lpht->pt)) { retval = MCHT_CALENDARWEEKNUM; /* FIXME: find out which day we're on */ goto done; } if(PtInRect(&infoPtr->prevmonth, lpht->pt)) { retval = MCHT_CALENDARDATEPREV; goto done; } if(PtInRect(&infoPtr->nextmonth, lpht->pt) || ((x>infoPtr->nextmonth.left) &&(xnextmonth.right) && (y>infoPtr->nextmonth.bottom) &&(ytoday.top ))) { retval = MCHT_CALENDARDATENEXT; goto done; } if(PtInRect(&infoPtr->today, lpht->pt)) { retval = MCHT_TODAYLINK; goto done; } /* MCHT_CALENDARDATE determination: since the next & previous month have * been handled already(MCHT_CALENDARDATEPREV/NEXT), we only have to check * whether we're in the calendar area. infoPtr->prevMonth.left handles the * MCS_WEEKNUMBERS style nicely. */ TRACE("%d %d [%d %d %d %d] [%d %d %d %d]\n", x, y, infoPtr->prevmonth.left, infoPtr->prevmonth.right, infoPtr->prevmonth.top, infoPtr->prevmonth.bottom, infoPtr->nextmonth.left, infoPtr->nextmonth.right, infoPtr->nextmonth.top, infoPtr->nextmonth.bottom); if((x>infoPtr->prevmonth.left) &&(xnextmonth.right) && (y>infoPtr->prevmonth.top) &&(ynextmonth.bottom)) { lpht->st.wYear = infoPtr->currentYear; lpht->st.wMonth = infoPtr->currentMonth; lpht->st.wDay = MONTHCAL_CalcDayFromPos(infoPtr, x, y); TRACE("day hit: %d\n", lpht->st.wDay); retval = MCHT_CALENDARDATE; goto done; } /* Hit nothing special? What's left must be background :-) */ retval = MCHT_CALENDARBK; done: lpht->uHit = retval; return retval; } static void MONTHCAL_GoToNextMonth(HWND hwnd, MONTHCAL_INFO *infoPtr) { DWORD dwStyle = GetWindowLongA(hwnd, GWL_STYLE); TRACE("MONTHCAL_GoToNextMonth\n"); infoPtr->currentMonth++; if(infoPtr->currentMonth > 12) { infoPtr->currentYear++; infoPtr->currentMonth = 1; } if(dwStyle & MCS_DAYSTATE) { NMDAYSTATE nmds; int i; nmds.nmhdr.hwndFrom = hwnd; nmds.nmhdr.idFrom = GetWindowLongA(hwnd, GWL_ID); nmds.nmhdr.code = MCN_GETDAYSTATE; nmds.cDayState = infoPtr->monthRange; nmds.prgDayState = COMCTL32_Alloc(infoPtr->monthRange * sizeof(MONTHDAYSTATE)); SendMessageA(GetParent(hwnd), WM_NOTIFY, (WPARAM)nmds.nmhdr.idFrom, (LPARAM)&nmds); for(i=0; imonthRange; i++) infoPtr->monthdayState[i] = nmds.prgDayState[i]; } } static void MONTHCAL_GoToPrevMonth(HWND hwnd, MONTHCAL_INFO *infoPtr) { DWORD dwStyle = GetWindowLongA(hwnd, GWL_STYLE); TRACE("MONTHCAL_GoToPrevMonth\n"); infoPtr->currentMonth--; if(infoPtr->currentMonth < 1) { infoPtr->currentYear--; infoPtr->currentMonth = 12; } if(dwStyle & MCS_DAYSTATE) { NMDAYSTATE nmds; int i; nmds.nmhdr.hwndFrom = hwnd; nmds.nmhdr.idFrom = GetWindowLongA(hwnd, GWL_ID); nmds.nmhdr.code = MCN_GETDAYSTATE; nmds.cDayState = infoPtr->monthRange; nmds.prgDayState = COMCTL32_Alloc (infoPtr->monthRange * sizeof(MONTHDAYSTATE)); SendMessageA(GetParent(hwnd), WM_NOTIFY, (WPARAM)nmds.nmhdr.idFrom, (LPARAM)&nmds); for(i=0; imonthRange; i++) infoPtr->monthdayState[i] = nmds.prgDayState[i]; } } static LRESULT MONTHCAL_LButtonDown(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); MCHITTESTINFO ht; HDC hdc; DWORD hit; HMENU hMenu; HWND retval; BOOL redraw = FALSE; TRACE("%x %lx\n", wParam, lParam); ht.pt.x = (INT)LOWORD(lParam); ht.pt.y = (INT)HIWORD(lParam); hit = MONTHCAL_HitTest(hwnd, (LPARAM)&ht); /* FIXME: these flags should be checked by */ /*((hit & MCHT_XXX) == MCHT_XXX) b/c some of the flags are */ /* multi-bit */ if(hit & MCHT_NEXT) { redraw = TRUE; MONTHCAL_GoToNextMonth(hwnd, infoPtr); infoPtr->status = MC_NEXTPRESSED; SetTimer(hwnd, MC_NEXTMONTHTIMER, MC_NEXTMONTHDELAY, 0); } if(hit & MCHT_PREV) { redraw = TRUE; MONTHCAL_GoToPrevMonth(hwnd, infoPtr); infoPtr->status = MC_PREVPRESSED; SetTimer(hwnd, MC_PREVMONTHTIMER, MC_NEXTMONTHDELAY, 0); } if(hit == MCHT_TITLEMONTH) { /* HRSRC hrsrc = FindResourceA( COMCTL32_hModule, MAKEINTRESOURCEA(IDD_MCMONTHMENU), RT_MENUA ); if(!hrsrc) { TRACE("returning zero\n"); return 0; } TRACE("resource is:%x\n",hrsrc); hMenu = LoadMenuIndirectA((LPCVOID)LoadResource( COMCTL32_hModule, hrsrc )); TRACE("menu is:%x\n",hMenu); */ hMenu = CreateMenu(); AppendMenuA(hMenu, MF_STRING,IDM_JAN, "January"); AppendMenuA(hMenu, MF_STRING,IDM_FEB, "February"); AppendMenuA(hMenu, MF_STRING,IDM_MAR, "March"); retval = CreateWindowA(POPUPMENU_CLASS_ATOM, NULL, WS_CHILD | WS_VISIBLE, 0, 0 ,100 , 220, hwnd, hMenu, GetWindowLongA(hwnd, GWL_HINSTANCE), NULL); TRACE("hwnd returned:%x\n", retval); } if(hit == MCHT_TITLEYEAR) { FIXME("create updown for yearselection\n"); } if(hit == MCHT_TODAYLINK) { FIXME("set currentday\n"); } if(hit == MCHT_CALENDARDATE) { SYSTEMTIME selArray[2]; NMSELCHANGE nmsc; TRACE("\n"); nmsc.nmhdr.hwndFrom = hwnd; nmsc.nmhdr.idFrom = GetWindowLongA(hwnd, GWL_ID); nmsc.nmhdr.code = MCN_SELCHANGE; MONTHCAL_CopyTime(&nmsc.stSelStart, &infoPtr->minSel); MONTHCAL_CopyTime(&nmsc.stSelEnd, &infoPtr->maxSel); SendMessageA(GetParent(hwnd), WM_NOTIFY, (WPARAM)nmsc.nmhdr.idFrom,(LPARAM)&nmsc); MONTHCAL_CopyTime(&ht.st, &selArray[0]); MONTHCAL_CopyTime(&ht.st, &selArray[1]); MONTHCAL_SetSelRange(hwnd,0,(LPARAM) &selArray); /* redraw if the selected day changed */ if(infoPtr->curSelDay != ht.st.wDay) { redraw = TRUE; } infoPtr->firstSelDay = ht.st.wDay; infoPtr->curSelDay = ht.st.wDay; infoPtr->status = MC_SEL_LBUTDOWN; } /* redraw only if the control changed */ if(redraw) { hdc = GetDC(hwnd); MONTHCAL_Refresh(hwnd, hdc); ReleaseDC(hwnd, hdc); } return 0; } static LRESULT MONTHCAL_LButtonUp(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); NMSELCHANGE nmsc; NMHDR nmhdr; HDC hdc; BOOL redraw = FALSE; TRACE("\n"); if(infoPtr->status & MC_NEXTPRESSED) { KillTimer(hwnd, MC_NEXTMONTHTIMER); redraw = TRUE; } if(infoPtr->status & MC_PREVPRESSED) { KillTimer(hwnd, MC_PREVMONTHTIMER); redraw = TRUE; } infoPtr->status = MC_SEL_LBUTUP; nmhdr.hwndFrom = hwnd; nmhdr.idFrom = GetWindowLongA( hwnd, GWL_ID); nmhdr.code = NM_RELEASEDCAPTURE; TRACE("Sent notification from %x to %x\n", hwnd, GetParent(hwnd)); SendMessageA(GetParent(hwnd), WM_NOTIFY, (WPARAM)nmhdr.idFrom, (LPARAM)&nmhdr); nmsc.nmhdr.hwndFrom = hwnd; nmsc.nmhdr.idFrom = GetWindowLongA(hwnd, GWL_ID); nmsc.nmhdr.code = MCN_SELECT; MONTHCAL_CopyTime(&nmsc.stSelStart, &infoPtr->minSel); MONTHCAL_CopyTime(&nmsc.stSelEnd, &infoPtr->maxSel); SendMessageA(GetParent(hwnd), WM_NOTIFY, (WPARAM)nmsc.nmhdr.idFrom, (LPARAM)&nmsc); /* redraw if necessary */ if(redraw) { hdc = GetDC(hwnd); MONTHCAL_Refresh(hwnd, hdc); ReleaseDC(hwnd, hdc); } return 0; } static LRESULT MONTHCAL_Timer(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); HDC hdc; BOOL redraw = FALSE; TRACE(" %d\n", wParam); if(!infoPtr) return 0; switch(wParam) { case MC_NEXTMONTHTIMER: redraw = TRUE; MONTHCAL_GoToNextMonth(hwnd, infoPtr); break; case MC_PREVMONTHTIMER: redraw = TRUE; MONTHCAL_GoToPrevMonth(hwnd, infoPtr); break; default: ERR("got unknown timer\n"); } /* redraw only if necessary */ if(redraw) { hdc = GetDC(hwnd); MONTHCAL_Refresh(hwnd, hdc); ReleaseDC(hwnd, hdc); } return 0; } static LRESULT MONTHCAL_MouseMove(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); MCHITTESTINFO ht; HDC hdc; int oldselday, selday, hit; RECT r; if(!(infoPtr->status & MC_SEL_LBUTDOWN)) return 0; ht.pt.x = LOWORD(lParam); ht.pt.y = HIWORD(lParam); hit = MONTHCAL_HitTest(hwnd, (LPARAM)&ht); /* not on the calendar date numbers? bail out */ TRACE("hit:%x\n",hit); if((hit & MCHT_CALENDARDATE) != MCHT_CALENDARDATE) return 0; selday = ht.st.wDay; oldselday = infoPtr->curSelDay; infoPtr->curSelDay = selday; MONTHCAL_CalcPosFromDay(infoPtr, selday, ht.st. wMonth, &r); if(GetWindowLongA(hwnd, GWL_STYLE) & MCS_MULTISELECT) { SYSTEMTIME selArray[2]; int i; MONTHCAL_GetSelRange(hwnd, 0, (LPARAM)&selArray); i = 0; if(infoPtr->firstSelDay==selArray[0].wDay) i=1; TRACE("oldRange:%d %d %d %d\n", infoPtr->firstSelDay, selArray[0].wDay, selArray[1].wDay, i); if(infoPtr->firstSelDay==selArray[1].wDay) { /* 1st time we get here: selArray[0]=selArray[1]) */ /* if we're still at the first selected date, return */ if(infoPtr->firstSelDay==selday) goto done; if(seldayfirstSelDay) i = 0; } if(abs(infoPtr->firstSelDay - selday) >= infoPtr->maxSelCount) { if(selday>infoPtr->firstSelDay) selday = infoPtr->firstSelDay + infoPtr->maxSelCount; else selday = infoPtr->firstSelDay - infoPtr->maxSelCount; } if(selArray[i].wDay!=selday) { TRACE("newRange:%d %d %d %d\n", infoPtr->firstSelDay, selArray[0].wDay, selArray[1].wDay, i); selArray[i].wDay = selday; if(selArray[0].wDay>selArray[1].wDay) { DWORD tempday; tempday = selArray[1].wDay; selArray[1].wDay = selArray[0].wDay; selArray[0].wDay = tempday; } MONTHCAL_SetSelRange(hwnd, 0, (LPARAM)&selArray); } } done: /* only redraw if the currently selected day changed */ if(oldselday != infoPtr->curSelDay) { hdc = GetDC(hwnd); MONTHCAL_Refresh(hwnd, hdc); ReleaseDC(hwnd, hdc); } return 0; } static LRESULT MONTHCAL_Paint(HWND hwnd, WPARAM wParam) { HDC hdc; PAINTSTRUCT ps; hdc = (wParam==0 ? BeginPaint(hwnd, &ps) : (HDC)wParam); MONTHCAL_Refresh(hwnd, hdc); if(!wParam) EndPaint(hwnd, &ps); return 0; } static LRESULT MONTHCAL_KillFocus(HWND hwnd, WPARAM wParam, LPARAM lParam) { HDC hdc; TRACE("\n"); hdc = GetDC(hwnd); MONTHCAL_Refresh(hwnd, hdc); ReleaseDC(hwnd, hdc); InvalidateRect(hwnd, NULL, TRUE); return 0; } static LRESULT MONTHCAL_SetFocus(HWND hwnd, WPARAM wParam, LPARAM lParam) { HDC hdc; TRACE("\n"); hdc = GetDC(hwnd); MONTHCAL_Refresh(hwnd, hdc); ReleaseDC(hwnd, hdc); return 0; } /* sets the size information */ static void MONTHCAL_UpdateSize(HWND hwnd) { HDC hdc = GetDC(hwnd); MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); RECT *rcClient=&infoPtr->rcClient; RECT *rcDraw=&infoPtr->rcDraw; RECT *title=&infoPtr->title; RECT *prev=&infoPtr->titlebtnprev; RECT *next=&infoPtr->titlebtnnext; RECT *titlemonth=&infoPtr->titlemonth; RECT *titleyear=&infoPtr->titleyear; RECT *days=&infoPtr->days; SIZE size; TEXTMETRICA tm; DWORD dwStyle = GetWindowLongA(hwnd, GWL_STYLE); HFONT currentFont; currentFont = SelectObject(hdc, infoPtr->hFont); /* FIXME: need a way to determine current font, without setting it */ /* if(infoPtr->hFont!=currentFont) { SelectObject(hdc, currentFont); infoPtr->hFont=currentFont; GetObjectA(currentFont, sizeof(LOGFONTA), &logFont); logFont.lfWeight=FW_BOLD; infoPtr->hBoldFont = CreateFontIndirectA(&logFont); } */ /* get the height and width of each day's text */ GetTextMetricsA(hdc, &tm); infoPtr->textHeight = tm.tmHeight + tm.tmExternalLeading; GetTextExtentPoint32A(hdc, "Sun", 3, &size); infoPtr->textWidth = size.cx + 2; /* retrieve the controls client rectangle info infoPtr->rcClient */ GetClientRect(hwnd, rcClient); if(dwStyle & MCS_WEEKNUMBERS) infoPtr->rcClient.right+=infoPtr->textWidth; /* rcDraw is the rectangle the control is drawn in */ rcDraw->left = rcClient->left; rcDraw->right = rcClient->right; rcDraw->top = rcClient->top; rcDraw->bottom = rcClient->bottom; /* use DrawEdge to adjust the size of rcClient such that we */ /* do not overwrite the border when drawing the control */ DrawEdge((HDC)NULL, rcDraw, EDGE_SUNKEN, BF_RECT | BF_ADJUST); /* this is correct, the control does NOT expand vertically */ /* like it does horizontally */ /* make sure we don't move the controls bottom out of the client */ /* area */ if((rcDraw->top + 8 * infoPtr->textHeight + 5) < rcDraw->bottom) { rcDraw->bottom = rcDraw->top + 8 * infoPtr->textHeight + 5; } /* calculate title area */ title->top = rcClient->top + 1; title->bottom = title->top + 2 * infoPtr->textHeight + 4; title->left = rcClient->left + 1; title->right = rcClient->right - 1; /* recalculate the height and width increments and offsets */ infoPtr->width_increment = (infoPtr->rcDraw.right - infoPtr->rcDraw.left) / 7.0; infoPtr->height_increment = (infoPtr->rcDraw.bottom - infoPtr->rcDraw.top) / 7.0; infoPtr->left_offset = (infoPtr->rcDraw.right - infoPtr->rcDraw.left) - (infoPtr->width_increment * 7.0); infoPtr->top_offset = (infoPtr->rcDraw.bottom - infoPtr->rcDraw.top) - (infoPtr->height_increment * 7.0); /* set the dimensions of the next and previous buttons and center */ /* the month text vertically */ prev->top = next->top = title->top + 6; prev->bottom = next->bottom = title->top + 2 * infoPtr->textHeight - 3; prev->right = title->left + 28; prev->left = title->left + 4; next->left = title->right - 28; next->right = title->right - 4; /* titlemonth->left and right change based upon the current month */ /* and are recalculated in refresh as the current month may change */ /* without the control being resized */ titlemonth->bottom = titleyear->bottom = prev->top + 2 * infoPtr->textHeight - 3; titlemonth->top = titleyear->top = title->top; /* setup the dimensions of the rectangle we draw the names of the */ /* days of the week in */ days->left = infoPtr->left_offset; if(dwStyle & MCS_WEEKNUMBERS) days->left+=infoPtr->textWidth; days->right = days->left + infoPtr->width_increment; days->top = title->bottom + 2; days->bottom = title->bottom + infoPtr->textHeight + 2; /* restore the originally selected font */ SelectObject(hdc, currentFont); ReleaseDC(hwnd, hdc); } static LRESULT MONTHCAL_Size(HWND hwnd, int Width, int Height) { TRACE("(hwnd=%x, width=%d, height=%d)\n", hwnd, Width, Height); MONTHCAL_UpdateSize(hwnd); /* invalidate client area and erase background */ InvalidateRect(hwnd, NULL, TRUE); return 0; } /* FIXME: check whether dateMin/dateMax need to be adjusted. */ static LRESULT MONTHCAL_Create(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr; LOGFONTA logFont; /* allocate memory for info structure */ infoPtr =(MONTHCAL_INFO*)COMCTL32_Alloc(sizeof(MONTHCAL_INFO)); SetWindowLongA(hwnd, 0, (DWORD)infoPtr); if(infoPtr == NULL) { ERR( "could not allocate info memory!\n"); return 0; } if((MONTHCAL_INFO*)GetWindowLongA(hwnd, 0) != infoPtr) { ERR( "pointer assignment error!\n"); return 0; } infoPtr->hFont = GetStockObject(DEFAULT_GUI_FONT); GetObjectA(infoPtr->hFont, sizeof(LOGFONTA), &logFont); logFont.lfWeight = FW_BOLD; infoPtr->hBoldFont = CreateFontIndirectA(&logFont); /* initialize info structure */ /* FIXME: calculate systemtime ->> localtime(substract timezoneinfo) */ GetSystemTime(&infoPtr->todaysDate); infoPtr->firstDay = 0; infoPtr->currentMonth = infoPtr->todaysDate.wMonth; infoPtr->currentYear = infoPtr->todaysDate.wYear; MONTHCAL_CopyTime(&infoPtr->todaysDate, &infoPtr->minDate); MONTHCAL_CopyTime(&infoPtr->todaysDate, &infoPtr->maxDate); infoPtr->maxSelCount = 6; infoPtr->monthRange = 3; infoPtr->monthdayState = COMCTL32_Alloc (infoPtr->monthRange * sizeof(MONTHDAYSTATE)); infoPtr->titlebk = GetSysColor(COLOR_ACTIVECAPTION); infoPtr->titletxt = GetSysColor(COLOR_WINDOW); infoPtr->monthbk = GetSysColor(COLOR_WINDOW); infoPtr->trailingtxt = GetSysColor(COLOR_GRAYTEXT); infoPtr->bk = GetSysColor(COLOR_WINDOW); infoPtr->txt = GetSysColor(COLOR_WINDOWTEXT); /* call MONTHCAL_UpdateSize to set all of the dimensions */ /* of the control */ MONTHCAL_UpdateSize(hwnd); return 0; } static LRESULT MONTHCAL_Destroy(HWND hwnd, WPARAM wParam, LPARAM lParam) { MONTHCAL_INFO *infoPtr = MONTHCAL_GetInfoPtr(hwnd); /* free month calendar info data */ COMCTL32_Free(infoPtr); SetWindowLongA(hwnd, 0, 0); return 0; } static LRESULT WINAPI MONTHCAL_WindowProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TRACE("hwnd=%x msg=%x wparam=%x lparam=%lx\n", hwnd, uMsg, wParam, lParam); if (!MONTHCAL_GetInfoPtr(hwnd) && (uMsg != WM_CREATE)) return DefWindowProcA(hwnd, uMsg, wParam, lParam); switch(uMsg) { case MCM_GETCURSEL: return MONTHCAL_GetCurSel(hwnd, wParam, lParam); case MCM_SETCURSEL: return MONTHCAL_SetCurSel(hwnd, wParam, lParam); case MCM_GETMAXSELCOUNT: return MONTHCAL_GetMaxSelCount(hwnd, wParam, lParam); case MCM_SETMAXSELCOUNT: return MONTHCAL_SetMaxSelCount(hwnd, wParam, lParam); case MCM_GETSELRANGE: return MONTHCAL_GetSelRange(hwnd, wParam, lParam); case MCM_SETSELRANGE: return MONTHCAL_SetSelRange(hwnd, wParam, lParam); case MCM_GETMONTHRANGE: return MONTHCAL_GetMonthRange(hwnd, wParam, lParam); case MCM_SETDAYSTATE: return MONTHCAL_SetDayState(hwnd, wParam, lParam); case MCM_GETMINREQRECT: return MONTHCAL_GetMinReqRect(hwnd, wParam, lParam); case MCM_GETCOLOR: return MONTHCAL_GetColor(hwnd, wParam, lParam); case MCM_SETCOLOR: return MONTHCAL_SetColor(hwnd, wParam, lParam); case MCM_GETTODAY: return MONTHCAL_GetToday(hwnd, wParam, lParam); case MCM_SETTODAY: return MONTHCAL_SetToday(hwnd, wParam, lParam); case MCM_HITTEST: return MONTHCAL_HitTest(hwnd,lParam); case MCM_GETFIRSTDAYOFWEEK: return MONTHCAL_GetFirstDayOfWeek(hwnd, wParam, lParam); case MCM_SETFIRSTDAYOFWEEK: return MONTHCAL_SetFirstDayOfWeek(hwnd, wParam, lParam); case MCM_GETRANGE: return MONTHCAL_GetRange(hwnd, wParam, lParam); case MCM_SETRANGE: return MONTHCAL_SetRange(hwnd, wParam, lParam); case MCM_GETMONTHDELTA: return MONTHCAL_GetMonthDelta(hwnd, wParam, lParam); case MCM_SETMONTHDELTA: return MONTHCAL_SetMonthDelta(hwnd, wParam, lParam); case MCM_GETMAXTODAYWIDTH: return MONTHCAL_GetMaxTodayWidth(hwnd); case WM_GETDLGCODE: return DLGC_WANTARROWS | DLGC_WANTCHARS; case WM_KILLFOCUS: return MONTHCAL_KillFocus(hwnd, wParam, lParam); case WM_LBUTTONDOWN: return MONTHCAL_LButtonDown(hwnd, wParam, lParam); case WM_MOUSEMOVE: return MONTHCAL_MouseMove(hwnd, wParam, lParam); case WM_LBUTTONUP: return MONTHCAL_LButtonUp(hwnd, wParam, lParam); case WM_PAINT: return MONTHCAL_Paint(hwnd, wParam); case WM_SETFOCUS: return MONTHCAL_SetFocus(hwnd, wParam, lParam); case WM_SIZE: return MONTHCAL_Size(hwnd, (int)SLOWORD(lParam), (int)SHIWORD(lParam)); case WM_CREATE: return MONTHCAL_Create(hwnd, wParam, lParam); case WM_TIMER: return MONTHCAL_Timer(hwnd, wParam, lParam); case WM_DESTROY: return MONTHCAL_Destroy(hwnd, wParam, lParam); default: if(uMsg >= WM_USER) ERR( "unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); return DefWindowProcA(hwnd, uMsg, wParam, lParam); } return 0; } void MONTHCAL_Register(void) { WNDCLASSA wndClass; ZeroMemory(&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS; wndClass.lpfnWndProc = (WNDPROC)MONTHCAL_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(MONTHCAL_INFO *); wndClass.hCursor = LoadCursorA(0, IDC_ARROWA); wndClass.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1); wndClass.lpszClassName = MONTHCAL_CLASSA; RegisterClassA(&wndClass); } void MONTHCAL_Unregister(void) { UnregisterClassA(MONTHCAL_CLASSA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/nativefont.c0100644000175000001440000000410407051544530017351 0ustar julliardusers/* * Native Font control * * Copyright 1998, 1999 Eric Kohl * * NOTES * This is just a dummy control. An author is needed! Any volunteers? * I will only improve this control once in a while. * Eric * * TODO: * - All messages. * - All notifications. */ #include "winbase.h" #include "commctrl.h" #include "nativefont.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(nativefont) #define NATIVEFONT_GetInfoPtr(hwnd) ((NATIVEFONT_INFO *)GetWindowLongA (hwnd, 0)) static LRESULT NATIVEFONT_Create (HWND hwnd, WPARAM wParam, LPARAM lParam) { NATIVEFONT_INFO *infoPtr; /* allocate memory for info structure */ infoPtr = (NATIVEFONT_INFO *)COMCTL32_Alloc (sizeof(NATIVEFONT_INFO)); SetWindowLongA (hwnd, 0, (DWORD)infoPtr); /* initialize info structure */ return 0; } static LRESULT NATIVEFONT_Destroy (HWND hwnd, WPARAM wParam, LPARAM lParam) { NATIVEFONT_INFO *infoPtr = NATIVEFONT_GetInfoPtr (hwnd); /* free comboex info data */ COMCTL32_Free (infoPtr); return 0; } static LRESULT WINAPI NATIVEFONT_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { switch (uMsg) { case WM_CREATE: return NATIVEFONT_Create (hwnd, wParam, lParam); case WM_DESTROY: return NATIVEFONT_Destroy (hwnd, wParam, lParam); default: ERR("unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); return DefWindowProcA (hwnd, uMsg, wParam, lParam); } return 0; } VOID NATIVEFONT_Register (void) { WNDCLASSA wndClass; ZeroMemory (&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS; wndClass.lpfnWndProc = (WNDPROC)NATIVEFONT_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(NATIVEFONT_INFO *); wndClass.hCursor = LoadCursorA (0, IDC_ARROWA); wndClass.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1); wndClass.lpszClassName = WC_NATIVEFONTCTLA; RegisterClassA (&wndClass); } VOID NATIVEFONT_Unregister (void) { UnregisterClassA (WC_NATIVEFONTCTLA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/pager.c0100644000175000001440000002041607106136276016303 0ustar julliardusers/* * Pager control * * Copyright 1998, 1999 Eric Kohl * * NOTES * This is just a dummy control. An author is needed! Any volunteers? * I will only improve this control once in a while. * Eric * * TODO: * - All messages. * - All notifications. */ #include "winbase.h" #include "commctrl.h" #include "pager.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(pager) #define PAGER_GetInfoPtr(hwnd) ((PAGER_INFO *)GetWindowLongA(hwnd, 0)) static inline LRESULT PAGER_ForwardMouse (HWND hwnd, WPARAM wParam) { PAGER_INFO *infoPtr = PAGER_GetInfoPtr (hwnd); infoPtr->bForward = (BOOL)wParam; return 0; } static inline LRESULT PAGER_GetBkColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { PAGER_INFO *infoPtr = PAGER_GetInfoPtr (hwnd); return (LRESULT)infoPtr->clrBk; } static inline LRESULT PAGER_GetBorder (HWND hwnd, WPARAM wParam, LPARAM lParam) { PAGER_INFO *infoPtr = PAGER_GetInfoPtr (hwnd); return (LRESULT)infoPtr->nBorder; } static inline LRESULT PAGER_GetButtonSize (HWND hwnd, WPARAM wParam, LPARAM lParam) { PAGER_INFO *infoPtr = PAGER_GetInfoPtr (hwnd); return (LRESULT)infoPtr->nButtonSize; } static LRESULT PAGER_GetButtonState (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* PAGER_INFO *infoPtr = PAGER_GetInfoPtr (hwnd); */ FIXME("empty stub!\n"); return PGF_INVISIBLE; } /* << PAGER_GetDropTarget >> */ static inline LRESULT PAGER_GetPos (HWND hwnd, WPARAM wParam, LPARAM lParam) { PAGER_INFO *infoPtr = PAGER_GetInfoPtr (hwnd); return infoPtr->nPos; } static LRESULT PAGER_RecalcSize (HWND hwnd, WPARAM wParam, LPARAM lParam) { PAGER_INFO *infoPtr = PAGER_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); NMPGCALCSIZE nmpgcs; if (infoPtr->hwndChild) { ZeroMemory (&nmpgcs, sizeof (NMPGCALCSIZE)); nmpgcs.hdr.hwndFrom = hwnd; nmpgcs.hdr.idFrom = GetWindowLongA (hwnd, GWL_ID); nmpgcs.hdr.code = PGN_CALCSIZE; nmpgcs.dwFlag = (dwStyle & PGS_HORZ) ? PGF_CALCWIDTH : PGF_CALCHEIGHT; SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM)nmpgcs.hdr.idFrom, (LPARAM)&nmpgcs); infoPtr->nChildSize = (dwStyle & PGS_HORZ) ? nmpgcs.iWidth : nmpgcs.iHeight; FIXME("Child size %d\n", infoPtr->nChildSize); } return 0; } static inline LRESULT PAGER_SetBkColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { PAGER_INFO *infoPtr = PAGER_GetInfoPtr (hwnd); COLORREF clrTemp = infoPtr->clrBk; infoPtr->clrBk = (COLORREF)lParam; /* FIXME: redraw */ return (LRESULT)clrTemp; } static inline LRESULT PAGER_SetBorder (HWND hwnd, WPARAM wParam, LPARAM lParam) { PAGER_INFO *infoPtr = PAGER_GetInfoPtr (hwnd); INT nTemp = infoPtr->nBorder; infoPtr->nBorder = (INT)lParam; /* FIXME: redraw */ return (LRESULT)nTemp; } static inline LRESULT PAGER_SetButtonSize (HWND hwnd, WPARAM wParam, LPARAM lParam) { PAGER_INFO *infoPtr = PAGER_GetInfoPtr (hwnd); INT nTemp = infoPtr->nButtonSize; infoPtr->nButtonSize = (INT)lParam; FIXME("size=%d\n", infoPtr->nButtonSize); /* FIXME: redraw */ return (LRESULT)nTemp; } static inline LRESULT PAGER_SetChild (HWND hwnd, WPARAM wParam, LPARAM lParam) { PAGER_INFO *infoPtr = PAGER_GetInfoPtr (hwnd); infoPtr->hwndChild = IsWindow ((HWND)lParam) ? (HWND)lParam : 0; FIXME("hwnd=%x\n", infoPtr->hwndChild); /* FIXME: redraw */ if (infoPtr->hwndChild) { RECT rect; GetClientRect (hwnd, &rect); SetParent (infoPtr->hwndChild, hwnd); SetWindowPos (infoPtr->hwndChild, HWND_TOP, 0, 0, 0, 0, SWP_SHOWWINDOW | SWP_NOSIZE); MoveWindow (infoPtr->hwndChild, 0, 0, rect.right, rect.bottom, TRUE); } return 0; } static inline LRESULT PAGER_SetPos (HWND hwnd, WPARAM wParam, LPARAM lParam) { PAGER_INFO *infoPtr = PAGER_GetInfoPtr (hwnd); infoPtr->nPos = (INT)lParam; FIXME("pos=%d\n", infoPtr->nPos); /* FIXME: redraw */ SetWindowPos (infoPtr->hwndChild, HWND_TOP, 0, 0, 0, 0, SWP_SHOWWINDOW | SWP_NOSIZE); return 0; } static LRESULT PAGER_Create (HWND hwnd, WPARAM wParam, LPARAM lParam) { PAGER_INFO *infoPtr; /* allocate memory for info structure */ infoPtr = (PAGER_INFO *)COMCTL32_Alloc (sizeof(PAGER_INFO)); SetWindowLongA (hwnd, 0, (DWORD)infoPtr); /* set default settings */ infoPtr->hwndChild = (HWND)NULL; infoPtr->clrBk = GetSysColor (COLOR_BTNFACE); infoPtr->nBorder = 0; infoPtr->nButtonSize = 0; infoPtr->nPos = 0; return 0; } static LRESULT PAGER_Destroy (HWND hwnd, WPARAM wParam, LPARAM lParam) { PAGER_INFO *infoPtr = PAGER_GetInfoPtr (hwnd); /* free pager info data */ COMCTL32_Free (infoPtr); SetWindowLongA (hwnd, 0, 0); return 0; } static LRESULT PAGER_EraseBackground (HWND hwnd, WPARAM wParam, LPARAM lParam) { PAGER_INFO *infoPtr = PAGER_GetInfoPtr (hwnd); HBRUSH hBrush = CreateSolidBrush (infoPtr->clrBk); RECT rect; GetClientRect (hwnd, &rect); FillRect ((HDC)wParam, &rect, hBrush); DeleteObject (hBrush); /* return TRUE; */ return FALSE; } static LRESULT PAGER_MouseMove (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* PAGER_INFO *infoPtr = PAGER_GetInfoPtr (hwnd); */ TRACE("stub!\n"); return 0; } /* << PAGER_Paint >> */ static LRESULT PAGER_Size (HWND hwnd, WPARAM wParam, LPARAM lParam) { PAGER_INFO *infoPtr = PAGER_GetInfoPtr (hwnd); RECT rect; GetClientRect (hwnd, &rect); if (infoPtr->hwndChild) { SetWindowPos (infoPtr->hwndChild, HWND_TOP, rect.left, rect.top, rect.right - rect.left, rect.bottom - rect.top, SWP_SHOWWINDOW); /* MoveWindow (infoPtr->hwndChild, 1, 1, rect.right - 2, rect.bottom-2, TRUE); */ /* UpdateWindow (infoPtr->hwndChild); */ } /* FillRect ((HDC)wParam, &rect, hBrush); */ /* DeleteObject (hBrush); */ return TRUE; } static LRESULT WINAPI PAGER_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TRACE("hwnd=%x msg=%x wparam=%x lparam=%lx\n", hwnd, uMsg, wParam, lParam); if (!PAGER_GetInfoPtr (hwnd) && (uMsg != WM_CREATE)) return DefWindowProcA (hwnd, uMsg, wParam, lParam); switch (uMsg) { case PGM_FORWARDMOUSE: return PAGER_ForwardMouse (hwnd, wParam); case PGM_GETBKCOLOR: return PAGER_GetBkColor (hwnd, wParam, lParam); case PGM_GETBORDER: return PAGER_GetBorder (hwnd, wParam, lParam); case PGM_GETBUTTONSIZE: return PAGER_GetButtonSize (hwnd, wParam, lParam); case PGM_GETBUTTONSTATE: return PAGER_GetButtonState (hwnd, wParam, lParam); /* case PGM_GETDROPTARGET: */ case PGM_GETPOS: return PAGER_SetPos (hwnd, wParam, lParam); case PGM_RECALCSIZE: return PAGER_RecalcSize (hwnd, wParam, lParam); case PGM_SETBKCOLOR: return PAGER_SetBkColor (hwnd, wParam, lParam); case PGM_SETBORDER: return PAGER_SetBorder (hwnd, wParam, lParam); case PGM_SETBUTTONSIZE: return PAGER_SetButtonSize (hwnd, wParam, lParam); case PGM_SETCHILD: return PAGER_SetChild (hwnd, wParam, lParam); case PGM_SETPOS: return PAGER_SetPos (hwnd, wParam, lParam); case WM_CREATE: return PAGER_Create (hwnd, wParam, lParam); case WM_DESTROY: return PAGER_Destroy (hwnd, wParam, lParam); case WM_ERASEBKGND: return PAGER_EraseBackground (hwnd, wParam, lParam); case WM_MOUSEMOVE: return PAGER_MouseMove (hwnd, wParam, lParam); case WM_NOTIFY: case WM_COMMAND: return SendMessageA (GetParent (hwnd), uMsg, wParam, lParam); /* case WM_PAINT: */ /* return PAGER_Paint (hwnd, wParam); */ case WM_SIZE: return PAGER_Size (hwnd, wParam, lParam); default: if (uMsg >= WM_USER) ERR("unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); return DefWindowProcA (hwnd, uMsg, wParam, lParam); } return 0; } VOID PAGER_Register (void) { WNDCLASSA wndClass; ZeroMemory (&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS | CS_DBLCLKS | CS_SAVEBITS; wndClass.lpfnWndProc = (WNDPROC)PAGER_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(PAGER_INFO *); wndClass.hCursor = LoadCursorA (0, IDC_ARROWA); wndClass.hbrBackground = 0; wndClass.lpszClassName = WC_PAGESCROLLERA; RegisterClassA (&wndClass); } VOID PAGER_Unregister (void) { UnregisterClassA (WC_PAGESCROLLERA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/progress.c0100644000175000001440000002317607106136276017057 0ustar julliardusers/* * Progress control * * Copyright 1997 Dimitrie O. Paun * Copyright 1998, 1999 Eric Kohl * */ #include "winbase.h" #include "commctrl.h" #include "progress.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(progress) /* Control configuration constants */ #define LED_GAP 2 /* Work constants */ #define UNKNOWN_PARAM(msg, wParam, lParam) WARN(\ "Unknown parameter(s) for message " #msg \ "(%04x): wp=%04x lp=%08lx\n", msg, wParam, lParam); #define PROGRESS_GetInfoPtr(hwnd) ((PROGRESS_INFO *)GetWindowLongA(hwnd, 0)) /*********************************************************************** * PROGRESS_Draw * Draws the progress bar. */ static void PROGRESS_Draw (HWND hwnd, HDC hdc) { PROGRESS_INFO *infoPtr = PROGRESS_GetInfoPtr(hwnd); HBRUSH hbrBar, hbrBk; int rightBar, rightMost, ledWidth; RECT rect; DWORD dwStyle; TRACE("refresh pos=%d min=%d, max=%d\n", infoPtr->CurVal, infoPtr->MinVal, infoPtr->MaxVal); /* get the required bar brush */ if (infoPtr->ColorBar == CLR_DEFAULT) hbrBar = GetSysColorBrush(COLOR_HIGHLIGHT); else hbrBar = CreateSolidBrush (infoPtr->ColorBar); /* get the required background brush */ if (infoPtr->ColorBk == CLR_DEFAULT) hbrBk = GetSysColorBrush (COLOR_3DFACE); else hbrBk = CreateSolidBrush (infoPtr->ColorBk); /* get client rectangle */ GetClientRect (hwnd, &rect); /* draw the background */ FillRect(hdc, &rect, hbrBk); rect.left++; rect.right--; rect.top++; rect.bottom--; /* get the window style */ dwStyle = GetWindowLongA (hwnd, GWL_STYLE); /* compute extent of progress bar */ if (dwStyle & PBS_VERTICAL) { rightBar = rect.bottom - MulDiv(infoPtr->CurVal-infoPtr->MinVal, rect.bottom - rect.top, infoPtr->MaxVal-infoPtr->MinVal); ledWidth = MulDiv ((rect.right - rect.left), 2, 3); rightMost = rect.top; } else { rightBar = rect.left + MulDiv(infoPtr->CurVal-infoPtr->MinVal, rect.right - rect.left, infoPtr->MaxVal-infoPtr->MinVal); ledWidth = MulDiv ((rect.bottom - rect.top), 2, 3); rightMost = rect.right; } /* now draw the bar */ if (dwStyle & PBS_SMOOTH) { if (dwStyle & PBS_VERTICAL) rect.top = rightBar; else rect.right = rightBar; FillRect(hdc, &rect, hbrBar); } else { if (dwStyle & PBS_VERTICAL) { while(rect.bottom > rightBar) { rect.top = rect.bottom-ledWidth; if (rect.top < rightMost) rect.top = rightMost; FillRect(hdc, &rect, hbrBar); rect.bottom = rect.top-LED_GAP; } } else { while(rect.left < rightBar) { rect.right = rect.left+ledWidth; if (rect.right > rightMost) rect.right = rightMost; FillRect(hdc, &rect, hbrBar); rect.left = rect.right+LED_GAP; } } } /* delete bar brush */ if (infoPtr->ColorBar != CLR_DEFAULT) DeleteObject (hbrBar); /* delete background brush */ if (infoPtr->ColorBk != CLR_DEFAULT) DeleteObject (hbrBk); } /*********************************************************************** * PROGRESS_Refresh * Draw the progress bar. The background need not be erased. */ static void PROGRESS_Refresh (HWND hwnd) { HDC hdc; hdc = GetDC (hwnd); PROGRESS_Draw (hwnd, hdc); ReleaseDC (hwnd, hdc); } /*********************************************************************** * PROGRESS_Paint * Draw the progress bar. The background need not be erased. * If dc!=0, it draws on it */ static void PROGRESS_Paint (HWND hwnd) { PAINTSTRUCT ps; HDC hdc; hdc = BeginPaint (hwnd, &ps); PROGRESS_Draw (hwnd, hdc); EndPaint (hwnd, &ps); } /*********************************************************************** * PROGRESS_CoercePos * Makes sure the current position (CUrVal) is within bounds. */ static void PROGRESS_CoercePos(HWND hwnd) { PROGRESS_INFO *infoPtr = PROGRESS_GetInfoPtr(hwnd); if(infoPtr->CurVal < infoPtr->MinVal) infoPtr->CurVal = infoPtr->MinVal; if(infoPtr->CurVal > infoPtr->MaxVal) infoPtr->CurVal = infoPtr->MaxVal; } /*********************************************************************** * PROGRESS_SetFont * Set new Font for progress bar */ static HFONT PROGRESS_SetFont (HWND hwnd, WPARAM wParam, LPARAM lParam) { PROGRESS_INFO *infoPtr = PROGRESS_GetInfoPtr(hwnd); HFONT hOldFont = infoPtr->hFont; infoPtr->hFont = (HFONT)wParam; if (LOWORD(lParam)) PROGRESS_Refresh (hwnd); return hOldFont; } /*********************************************************************** * ProgressWindowProc */ static LRESULT WINAPI ProgressWindowProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) { PROGRESS_INFO *infoPtr = PROGRESS_GetInfoPtr(hwnd); UINT temp; if (!infoPtr && (message != WM_CREATE)) return DefWindowProcA( hwnd, message, wParam, lParam ); switch(message) { case WM_NCCREATE: { DWORD dwExStyle; dwExStyle = GetWindowLongA (hwnd, GWL_EXSTYLE); SetWindowLongA (hwnd, GWL_EXSTYLE, dwExStyle | WS_EX_STATICEDGE); } return TRUE; case WM_CREATE: /* allocate memory for info struct */ infoPtr = (PROGRESS_INFO *)COMCTL32_Alloc (sizeof(PROGRESS_INFO)); SetWindowLongA (hwnd, 0, (DWORD)infoPtr); /* initialize the info struct */ infoPtr->MinVal=0; infoPtr->MaxVal=100; infoPtr->CurVal=0; infoPtr->Step=10; infoPtr->ColorBar=CLR_DEFAULT; infoPtr->ColorBk=CLR_DEFAULT; infoPtr->hFont=(HANDLE)NULL; TRACE("Progress Ctrl creation, hwnd=%04x\n", hwnd); break; case WM_DESTROY: TRACE("Progress Ctrl destruction, hwnd=%04x\n", hwnd); COMCTL32_Free (infoPtr); SetWindowLongA(hwnd, 0, 0); break; case WM_ERASEBKGND: /* pretend to erase it here, but we will do it in the paint function to avoid flicker */ return 1; case WM_GETFONT: return (LRESULT)infoPtr->hFont; case WM_SETFONT: return PROGRESS_SetFont (hwnd, wParam, lParam); case WM_PAINT: PROGRESS_Paint (hwnd); break; case PBM_DELTAPOS: if(lParam) UNKNOWN_PARAM(PBM_DELTAPOS, wParam, lParam); temp = infoPtr->CurVal; if(wParam != 0){ infoPtr->CurVal += (UINT16)wParam; PROGRESS_CoercePos (hwnd); PROGRESS_Refresh (hwnd); } return temp; case PBM_SETPOS: if (lParam) UNKNOWN_PARAM(PBM_SETPOS, wParam, lParam); temp = infoPtr->CurVal; if(temp != wParam){ infoPtr->CurVal = (UINT16)wParam; PROGRESS_CoercePos(hwnd); PROGRESS_Refresh (hwnd); } return temp; case PBM_SETRANGE: if (wParam) UNKNOWN_PARAM(PBM_SETRANGE, wParam, lParam); temp = MAKELONG(infoPtr->MinVal, infoPtr->MaxVal); if(temp != lParam){ infoPtr->MinVal = LOWORD(lParam); infoPtr->MaxVal = HIWORD(lParam); if(infoPtr->MaxVal <= infoPtr->MinVal) infoPtr->MaxVal = infoPtr->MinVal+1; PROGRESS_CoercePos(hwnd); PROGRESS_Refresh (hwnd); } return temp; case PBM_SETSTEP: if (lParam) UNKNOWN_PARAM(PBM_SETSTEP, wParam, lParam); temp = infoPtr->Step; infoPtr->Step = (UINT16)wParam; return temp; case PBM_STEPIT: if (wParam || lParam) UNKNOWN_PARAM(PBM_STEPIT, wParam, lParam); temp = infoPtr->CurVal; infoPtr->CurVal += infoPtr->Step; if(infoPtr->CurVal > infoPtr->MaxVal) infoPtr->CurVal = infoPtr->MinVal; if(temp != infoPtr->CurVal) PROGRESS_Refresh (hwnd); return temp; case PBM_SETRANGE32: temp = MAKELONG(infoPtr->MinVal, infoPtr->MaxVal); if((infoPtr->MinVal != (INT)wParam) || (infoPtr->MaxVal != (INT)lParam)) { infoPtr->MinVal = (INT)wParam; infoPtr->MaxVal = (INT)lParam; if(infoPtr->MaxVal <= infoPtr->MinVal) infoPtr->MaxVal = infoPtr->MinVal+1; PROGRESS_CoercePos(hwnd); PROGRESS_Refresh (hwnd); } return temp; case PBM_GETRANGE: if (lParam){ ((PPBRANGE)lParam)->iLow = infoPtr->MinVal; ((PPBRANGE)lParam)->iHigh = infoPtr->MaxVal; } return (wParam) ? infoPtr->MinVal : infoPtr->MaxVal; case PBM_GETPOS: if (wParam || lParam) UNKNOWN_PARAM(PBM_STEPIT, wParam, lParam); return (infoPtr->CurVal); case PBM_SETBARCOLOR: if (wParam) UNKNOWN_PARAM(PBM_SETBARCOLOR, wParam, lParam); infoPtr->ColorBar = (COLORREF)lParam; PROGRESS_Refresh (hwnd); break; case PBM_SETBKCOLOR: if (wParam) UNKNOWN_PARAM(PBM_SETBKCOLOR, wParam, lParam); infoPtr->ColorBk = (COLORREF)lParam; PROGRESS_Refresh (hwnd); break; default: if (message >= WM_USER) ERR("unknown msg %04x wp=%04x lp=%08lx\n", message, wParam, lParam ); return DefWindowProcA( hwnd, message, wParam, lParam ); } return 0; } /*********************************************************************** * PROGRESS_Register [Internal] * * Registers the progress bar window class. */ VOID PROGRESS_Register (void) { WNDCLASSA wndClass; ZeroMemory (&wndClass, sizeof( WNDCLASSA)); wndClass.style = CS_GLOBALCLASS | CS_VREDRAW | CS_HREDRAW; wndClass.lpfnWndProc = (WNDPROC)ProgressWindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof (PROGRESS_INFO *); wndClass.hCursor = LoadCursorA (0, IDC_ARROWA); wndClass.lpszClassName = PROGRESS_CLASSA; RegisterClassA (&wndClass); } /*********************************************************************** * PROGRESS_Unregister [Internal] * * Unregisters the progress bar window class. */ VOID PROGRESS_Unregister (void) { UnregisterClassA (PROGRESS_CLASSA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/propsheet.c0100644000175000001440000017521507070212243017213 0ustar julliardusers/* * Property Sheets * * Copyright 1998 Francis Beaudet * Copyright 1999 Thuy Nguyen * * TODO: * - Tab order * - Unicode property sheets */ #include #include "winbase.h" #include "commctrl.h" #include "prsht.h" #include "dialog.h" #include "win.h" #include "winnls.h" #include "comctl32.h" #include "debugtools.h" #include "heap.h" /****************************************************************************** * Data structures */ typedef struct { WORD dlgVer; WORD signature; DWORD helpID; DWORD exStyle; DWORD style; } MyDLGTEMPLATEEX; typedef struct tagPropPageInfo { HPROPSHEETPAGE hpage; /* to keep track of pages not passed to PropertySheet */ HWND hwndPage; BOOL isDirty; LPCWSTR pszText; BOOL hasHelp; BOOL useCallback; BOOL hasIcon; } PropPageInfo; typedef struct tagPropSheetInfo { LPSTR strPropertiesFor; int nPages; int active_page; LPPROPSHEETHEADERA ppshheader; BOOL isModeless; BOOL hasHelp; BOOL hasApply; BOOL useCallback; BOOL restartWindows; BOOL rebootSystem; BOOL activeValid; PropPageInfo* proppage; int x; int y; int width; int height; HIMAGELIST hImageList; } PropSheetInfo; typedef struct { int x; int y; } PADDING_INFO; /****************************************************************************** * Defines and global variables */ const char * PropSheetInfoStr = "PropertySheetInfo"; #define MAX_CAPTION_LENGTH 255 #define MAX_TABTEXT_LENGTH 255 #define MAX_BUTTONTEXT_LENGTH 64 /****************************************************************************** * Prototypes */ static BOOL PROPSHEET_CreateDialog(PropSheetInfo* psInfo); static BOOL PROPSHEET_SizeMismatch(HWND hwndDlg, PropSheetInfo* psInfo); static BOOL PROPSHEET_AdjustSize(HWND hwndDlg, PropSheetInfo* psInfo); static BOOL PROPSHEET_AdjustButtons(HWND hwndParent, PropSheetInfo* psInfo); static BOOL PROPSHEET_CollectSheetInfo(LPCPROPSHEETHEADERA lppsh, PropSheetInfo * psInfo); static BOOL PROPSHEET_CollectPageInfo(LPCPROPSHEETPAGEA lppsp, PropSheetInfo * psInfo, int index); static BOOL PROPSHEET_CreateTabControl(HWND hwndParent, PropSheetInfo * psInfo); static int PROPSHEET_CreatePage(HWND hwndParent, int index, const PropSheetInfo * psInfo, LPCPROPSHEETPAGEA ppshpage); static BOOL PROPSHEET_ShowPage(HWND hwndDlg, int index, PropSheetInfo * psInfo); static PADDING_INFO PROPSHEET_GetPaddingInfo(HWND hwndDlg); static BOOL PROPSHEET_Back(HWND hwndDlg); static BOOL PROPSHEET_Next(HWND hwndDlg); static BOOL PROPSHEET_Finish(HWND hwndDlg); static BOOL PROPSHEET_Apply(HWND hwndDlg, LPARAM lParam); static void PROPSHEET_Cancel(HWND hwndDlg, LPARAM lParam); static void PROPSHEET_Help(HWND hwndDlg); static void PROPSHEET_Changed(HWND hwndDlg, HWND hwndDirtyPage); static void PROPSHEET_UnChanged(HWND hwndDlg, HWND hwndCleanPage); static void PROPSHEET_PressButton(HWND hwndDlg, int buttonID); static void PROPSHEET_SetFinishTextA(HWND hwndDlg, LPCSTR lpszText); static void PROPSHEET_SetTitleA(HWND hwndDlg, DWORD dwStyle, LPCSTR lpszText); static BOOL PROPSHEET_CanSetCurSel(HWND hwndDlg); static BOOL PROPSHEET_SetCurSel(HWND hwndDlg, int index, HPROPSHEETPAGE hpage); static LRESULT PROPSHEET_QuerySiblings(HWND hwndDlg, WPARAM wParam, LPARAM lParam); static BOOL PROPSHEET_AddPage(HWND hwndDlg, HPROPSHEETPAGE hpage); static BOOL PROPSHEET_RemovePage(HWND hwndDlg, int index, HPROPSHEETPAGE hpage); static void PROPSHEET_CleanUp(); static int PROPSHEET_GetPageIndex(HPROPSHEETPAGE hpage, PropSheetInfo* psInfo); static void PROPSHEET_SetWizButtons(HWND hwndDlg, DWORD dwFlags); static PADDING_INFO PROPSHEET_GetPaddingInfoWizard(HWND hwndDlg); static BOOL PROPSHEET_IsDialogMessage(HWND hwnd, LPMSG lpMsg); static INT PROPSHEET_DoDialogBox( HWND hwnd, HWND owner); BOOL WINAPI PROPSHEET_DialogProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam); DEFAULT_DEBUG_CHANNEL(propsheet) /****************************************************************************** * PROPSHEET_CollectSheetInfo * * Collect relevant data. */ static BOOL PROPSHEET_CollectSheetInfo(LPCPROPSHEETHEADERA lppsh, PropSheetInfo * psInfo) { DWORD dwFlags = lppsh->dwFlags; psInfo->hasHelp = dwFlags & PSH_HASHELP; psInfo->hasApply = !(dwFlags & PSH_NOAPPLYNOW); psInfo->useCallback = dwFlags & PSH_USECALLBACK; psInfo->isModeless = dwFlags & PSH_MODELESS; psInfo->ppshheader = COMCTL32_Alloc(sizeof(PROPSHEETHEADERA)); *psInfo->ppshheader = *lppsh; if (HIWORD(lppsh->pszCaption)) psInfo->ppshheader->pszCaption = HEAP_strdupA( GetProcessHeap(), 0, lppsh->pszCaption ); psInfo->nPages = lppsh->nPages; if (dwFlags & PSH_USEPSTARTPAGE) { TRACE("PSH_USEPSTARTPAGE is on"); psInfo->active_page = 0; } else psInfo->active_page = lppsh->u2.nStartPage; if (psInfo->active_page < 0 || psInfo->active_page >= psInfo->nPages) psInfo->active_page = 0; psInfo->restartWindows = FALSE; psInfo->rebootSystem = FALSE; psInfo->hImageList = 0; psInfo->activeValid = FALSE; return TRUE; } /****************************************************************************** * PROPSHEET_CollectPageInfo * * Collect property sheet data. * With code taken from DIALOG_ParseTemplate32. */ BOOL PROPSHEET_CollectPageInfo(LPCPROPSHEETPAGEA lppsp, PropSheetInfo * psInfo, int index) { DLGTEMPLATE* pTemplate; const WORD* p; DWORD dwFlags; int width, height; psInfo->proppage[index].hpage = (HPROPSHEETPAGE)lppsp; psInfo->proppage[index].hwndPage = 0; psInfo->proppage[index].isDirty = FALSE; /* * Process property page flags. */ dwFlags = lppsp->dwFlags; psInfo->proppage[index].useCallback = dwFlags & PSP_USECALLBACK; psInfo->proppage[index].hasHelp = dwFlags & PSP_HASHELP; psInfo->proppage[index].hasIcon = dwFlags & (PSP_USEHICON | PSP_USEICONID); /* as soon as we have a page with the help flag, set the sheet flag on */ if (psInfo->proppage[index].hasHelp) psInfo->hasHelp = TRUE; /* * Process page template. */ if (dwFlags & PSP_DLGINDIRECT) pTemplate = (DLGTEMPLATE*)lppsp->u1.pResource; else { HRSRC hResource = FindResourceA(lppsp->hInstance, lppsp->u1.pszTemplate, RT_DIALOGA); HGLOBAL hTemplate = LoadResource(lppsp->hInstance, hResource); pTemplate = (LPDLGTEMPLATEA)LockResource(hTemplate); } /* * Extract the size of the page and the caption. */ if (!pTemplate) return FALSE; p = (const WORD *)pTemplate; if (((MyDLGTEMPLATEEX*)pTemplate)->signature == 0xFFFF) { /* DIALOGEX template */ p++; /* dlgVer */ p++; /* signature */ p += 2; /* help ID */ p += 2; /* ext style */ p += 2; /* style */ } else { /* DIALOG template */ p += 2; /* style */ p += 2; /* ext style */ } p++; /* nb items */ p++; /* x */ p++; /* y */ width = (WORD)*p; p++; height = (WORD)*p; p++; /* remember the largest width and height */ if (width > psInfo->width) psInfo->width = width; if (height > psInfo->height) psInfo->height = height; /* menu */ switch ((WORD)*p) { case 0x0000: p++; break; case 0xffff: p += 2; break; default: p += lstrlenW( (LPCWSTR)p ) + 1; break; } /* class */ switch ((WORD)*p) { case 0x0000: p++; break; case 0xffff: p += 2; break; default: p += lstrlenW( (LPCWSTR)p ) + 1; break; } /* Extract the caption */ psInfo->proppage[index].pszText = (LPCWSTR)p; TRACE("Tab %d %s\n",index,debugstr_w((LPCWSTR)p)); p += lstrlenW((LPCWSTR)p) + 1; if (dwFlags & PSP_USETITLE) { if ( !HIWORD( lppsp->pszTitle ) ) { char szTitle[256]; if ( !LoadStringA( lppsp->hInstance, (UINT) lppsp->pszTitle, szTitle, 256 ) ) return FALSE; psInfo->proppage[index].pszText = HEAP_strdupAtoW( GetProcessHeap(), 0, szTitle ); } else psInfo->proppage[index].pszText = HEAP_strdupAtoW(GetProcessHeap(), 0, lppsp->pszTitle); } /* * Build the image list for icons */ if ((dwFlags & PSP_USEHICON) || (dwFlags & PSP_USEICONID)) { HICON hIcon; int icon_cx = GetSystemMetrics(SM_CXSMICON); int icon_cy = GetSystemMetrics(SM_CYSMICON); if (dwFlags & PSP_USEICONID) hIcon = LoadImageA(lppsp->hInstance, lppsp->u2.pszIcon, IMAGE_ICON, icon_cx, icon_cy, LR_DEFAULTCOLOR); else hIcon = lppsp->u2.hIcon; if ( hIcon ) { if (psInfo->hImageList == 0 ) psInfo->hImageList = ImageList_Create(icon_cx, icon_cy, ILC_COLOR, 1, 1); ImageList_AddIcon(psInfo->hImageList, hIcon); } } return TRUE; } /****************************************************************************** * PROPSHEET_DoDialogBox * * Copied from windows/dialog.c:DIALOG_DoDialogBox */ static INT PROPSHEET_DoDialogBox( HWND hwnd, HWND owner) { WND * wndPtr; DIALOGINFO * dlgInfo; MSG msg; INT retval; /* Owner must be a top-level window */ owner = WIN_GetTopParent( owner ); if (!(wndPtr = WIN_FindWndPtr( hwnd ))) return -1; dlgInfo = (DIALOGINFO *)wndPtr->wExtra; if (!dlgInfo->flags & DF_END) /* was EndDialog called in WM_INITDIALOG ? */ { EnableWindow( owner, FALSE ); ShowWindow( hwnd, SW_SHOW ); while (GetMessageA(&msg, 0, 0, 0)) { if (!PROPSHEET_IsDialogMessage( hwnd, &msg)) { TranslateMessage( &msg ); DispatchMessageA( &msg ); } if (dlgInfo->flags & DF_END) break; } EnableWindow( owner, TRUE ); } retval = dlgInfo->idResult; WIN_ReleaseWndPtr(wndPtr); DestroyWindow( hwnd ); return retval; } /****************************************************************************** * PROPSHEET_CreateDialog * * Creates the actual property sheet. */ BOOL PROPSHEET_CreateDialog(PropSheetInfo* psInfo) { LRESULT ret; LPCVOID template; LPVOID temp = 0; HRSRC hRes; DWORD resSize; WORD resID = IDD_PROPSHEET; if (psInfo->ppshheader->dwFlags & PSH_WIZARD) resID = IDD_WIZARD; if(!(hRes = FindResourceA(COMCTL32_hModule, MAKEINTRESOURCEA(resID), RT_DIALOGA))) return FALSE; if(!(template = (LPVOID)LoadResource(COMCTL32_hModule, hRes))) return FALSE; /* * Make a copy of the dialog template. */ resSize = SizeofResource(COMCTL32_hModule, hRes); temp = COMCTL32_Alloc(resSize); if (!temp) return FALSE; memcpy(temp, template, resSize); if (psInfo->useCallback) (*(psInfo->ppshheader->pfnCallback))(0, PSCB_PRECREATE, (LPARAM)temp); ret = CreateDialogIndirectParamA(psInfo->ppshheader->hInstance, (LPDLGTEMPLATEA) temp, psInfo->ppshheader->hwndParent, (DLGPROC) PROPSHEET_DialogProc, (LPARAM)psInfo); if (!(psInfo->ppshheader->dwFlags & PSH_MODELESS)) ret = PROPSHEET_DoDialogBox((HWND)ret, psInfo->ppshheader->hwndParent); COMCTL32_Free(temp); return ret; } /****************************************************************************** * PROPSHEET_SizeMismatch * * Verify that the tab control and the "largest" property sheet page dlg. template * match in size. */ static BOOL PROPSHEET_SizeMismatch(HWND hwndDlg, PropSheetInfo* psInfo) { HWND hwndTabCtrl = GetDlgItem(hwndDlg, IDC_TABCONTROL); RECT rcOrigTab, rcPage; /* * Original tab size. */ GetClientRect(hwndTabCtrl, &rcOrigTab); TRACE("orig tab %d %d %d %d\n", rcOrigTab.left, rcOrigTab.top, rcOrigTab.right, rcOrigTab.bottom); /* * Biggest page size. */ rcPage.left = psInfo->x; rcPage.top = psInfo->y; rcPage.right = psInfo->width; rcPage.bottom = psInfo->height; MapDialogRect(hwndDlg, &rcPage); TRACE("biggest page %d %d %d %d\n", rcPage.left, rcPage.top, rcPage.right, rcPage.bottom); if ( (rcPage.right - rcPage.left) != (rcOrigTab.right - rcOrigTab.left) ) return TRUE; if ( (rcPage.bottom - rcPage.top) != (rcOrigTab.bottom - rcOrigTab.top) ) return TRUE; return FALSE; } /****************************************************************************** * PROPSHEET_IsTooSmallWizard * * Verify that the default property sheet is big enough. */ static BOOL PROPSHEET_IsTooSmallWizard(HWND hwndDlg, PropSheetInfo* psInfo) { RECT rcSheetRect, rcPage, rcLine, rcSheetClient; HWND hwndLine = GetDlgItem(hwndDlg, IDC_SUNKEN_LINE); PADDING_INFO padding = PROPSHEET_GetPaddingInfoWizard(hwndDlg); GetClientRect(hwndDlg, &rcSheetClient); GetWindowRect(hwndDlg, &rcSheetRect); GetWindowRect(hwndLine, &rcLine); /* Remove the space below the sunken line */ rcSheetClient.bottom -= (rcSheetRect.bottom - rcLine.top); /* Remove the buffer zone all around the edge */ rcSheetClient.bottom -= (padding.y * 2); rcSheetClient.right -= (padding.x * 2); /* * Biggest page size. */ rcPage.left = psInfo->x; rcPage.top = psInfo->y; rcPage.right = psInfo->width; rcPage.bottom = psInfo->height; MapDialogRect(hwndDlg, &rcPage); TRACE("biggest page %d %d %d %d\n", rcPage.left, rcPage.top, rcPage.right, rcPage.bottom); if (rcPage.right > rcSheetClient.right) return TRUE; if (rcPage.bottom > rcSheetClient.bottom) return TRUE; return FALSE; } /****************************************************************************** * PROPSHEET_AdjustSize * * Resizes the property sheet and the tab control to fit the largest page. */ static BOOL PROPSHEET_AdjustSize(HWND hwndDlg, PropSheetInfo* psInfo) { HWND hwndTabCtrl = GetDlgItem(hwndDlg, IDC_TABCONTROL); HWND hwndButton = GetDlgItem(hwndDlg, IDOK); RECT rc,tabRect; int tabOffsetX, tabOffsetY, buttonHeight; PADDING_INFO padding = PROPSHEET_GetPaddingInfo(hwndDlg); WND * wndPtr = WIN_FindWndPtr( hwndDlg ); DIALOGINFO * dlgInfo = (DIALOGINFO *)wndPtr->wExtra; /* Get the height of buttons */ GetClientRect(hwndButton, &rc); buttonHeight = rc.bottom; /* * Biggest page size. */ rc.left = psInfo->x; rc.top = psInfo->y; rc.right = psInfo->width; rc.bottom = psInfo->height; MapDialogRect(hwndDlg, &rc); /* * Resize the tab control. */ GetClientRect(hwndTabCtrl,&tabRect); SendMessageA(hwndTabCtrl, TCM_ADJUSTRECT, FALSE, (LPARAM)&tabRect); if ((rc.bottom - rc.top) < (tabRect.bottom - tabRect.top)) { rc.bottom = rc.top + tabRect.bottom - tabRect.top; psInfo->height = MulDiv((rc.bottom - rc.top),8,dlgInfo->yBaseUnit); } if ((rc.right - rc.left) < (tabRect.right - tabRect.left)) { rc.right = rc.left + tabRect.right - tabRect.left; psInfo->width = MulDiv((rc.right - rc.left),4,dlgInfo->xBaseUnit); } SendMessageA(hwndTabCtrl, TCM_ADJUSTRECT, TRUE, (LPARAM)&rc); tabOffsetX = -(rc.left); tabOffsetY = -(rc.top); rc.right -= rc.left; rc.bottom -= rc.top; SetWindowPos(hwndTabCtrl, 0, 0, 0, rc.right, rc.bottom, SWP_NOMOVE | SWP_NOZORDER | SWP_NOACTIVATE); GetClientRect(hwndTabCtrl, &rc); TRACE("tab client rc %d %d %d %d\n", rc.left, rc.top, rc.right, rc.bottom); rc.right += ((padding.x * 2) + tabOffsetX); rc.bottom += (buttonHeight + (3 * padding.y) + tabOffsetY); /* * Resize the property sheet. */ SetWindowPos(hwndDlg, 0, 0, 0, rc.right, rc.bottom, SWP_NOMOVE | SWP_NOZORDER | SWP_NOACTIVATE); WIN_ReleaseWndPtr(wndPtr); return TRUE; } /****************************************************************************** * PROPSHEET_AdjustSizeWizard * * Resizes the property sheet to fit the largest page. */ static BOOL PROPSHEET_AdjustSizeWizard(HWND hwndDlg, PropSheetInfo* psInfo) { HWND hwndButton = GetDlgItem(hwndDlg, IDCANCEL); HWND hwndLine = GetDlgItem(hwndDlg, IDC_SUNKEN_LINE); HWND hwndTabCtrl = GetDlgItem(hwndDlg, IDC_TABCONTROL); RECT rc,tabRect; int buttonHeight, lineHeight; PADDING_INFO padding = PROPSHEET_GetPaddingInfoWizard(hwndDlg); WND * wndPtr = WIN_FindWndPtr( hwndDlg ); DIALOGINFO * dlgInfo = (DIALOGINFO *)wndPtr->wExtra; /* Get the height of buttons */ GetClientRect(hwndButton, &rc); buttonHeight = rc.bottom; GetClientRect(hwndLine, &rc); lineHeight = rc.bottom; /* * Biggest page size. */ rc.left = psInfo->x; rc.top = psInfo->y; rc.right = psInfo->width; rc.bottom = psInfo->height; MapDialogRect(hwndDlg, &rc); GetClientRect(hwndTabCtrl,&tabRect); if ((rc.bottom - rc.top) < (tabRect.bottom - tabRect.top)) { rc.bottom = rc.top + tabRect.bottom - tabRect.top; psInfo->height = MulDiv((rc.bottom - rc.top), 8, dlgInfo->yBaseUnit); } if ((rc.right - rc.left) < (tabRect.right - tabRect.left)) { rc.right = rc.left + tabRect.right - tabRect.left; psInfo->width = MulDiv((rc.right - rc.left), 4, dlgInfo->xBaseUnit); } TRACE("Biggest page %d %d %d %d\n", rc.left, rc.top, rc.right, rc.bottom); /* Make room */ rc.right += (padding.x * 2); rc.bottom += (buttonHeight + (5 * padding.y) + lineHeight); /* * Resize the property sheet. */ SetWindowPos(hwndDlg, 0, 0, 0, rc.right, rc.bottom, SWP_NOMOVE | SWP_NOZORDER | SWP_NOACTIVATE); WIN_ReleaseWndPtr(wndPtr); return TRUE; } /****************************************************************************** * PROPSHEET_AdjustButtons * * Adjusts the buttons' positions. */ static BOOL PROPSHEET_AdjustButtons(HWND hwndParent, PropSheetInfo* psInfo) { HWND hwndButton = GetDlgItem(hwndParent, IDOK); RECT rcSheet; int x, y; int num_buttons = 2; int buttonWidth, buttonHeight; PADDING_INFO padding = PROPSHEET_GetPaddingInfo(hwndParent); if (psInfo->hasApply) num_buttons++; if (psInfo->hasHelp) num_buttons++; /* * Obtain the size of the buttons. */ GetClientRect(hwndButton, &rcSheet); buttonWidth = rcSheet.right; buttonHeight = rcSheet.bottom; /* * Get the size of the property sheet. */ GetClientRect(hwndParent, &rcSheet); /* * All buttons will be at this y coordinate. */ y = rcSheet.bottom - (padding.y + buttonHeight); /* * Position OK button. */ hwndButton = GetDlgItem(hwndParent, IDOK); x = rcSheet.right - ((padding.x + buttonWidth) * num_buttons); SetWindowPos(hwndButton, 0, x, y, 0, 0, SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE); /* * Position Cancel button. */ hwndButton = GetDlgItem(hwndParent, IDCANCEL); x = rcSheet.right - ((padding.x + buttonWidth) * (num_buttons - 1)); SetWindowPos(hwndButton, 0, x, y, 0, 0, SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE); /* * Position Apply button. */ hwndButton = GetDlgItem(hwndParent, IDC_APPLY_BUTTON); if (psInfo->hasApply) { if (psInfo->hasHelp) x = rcSheet.right - ((padding.x + buttonWidth) * 2); else x = rcSheet.right - (padding.x + buttonWidth); SetWindowPos(hwndButton, 0, x, y, 0, 0, SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE); EnableWindow(hwndButton, FALSE); } else ShowWindow(hwndButton, SW_HIDE); /* * Position Help button. */ hwndButton = GetDlgItem(hwndParent, IDHELP); if (psInfo->hasHelp) { x = rcSheet.right - (padding.x + buttonWidth); SetWindowPos(hwndButton, 0, x, y, 0, 0, SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE); } else ShowWindow(hwndButton, SW_HIDE); return TRUE; } /****************************************************************************** * PROPSHEET_AdjustButtonsWizard * * Adjusts the buttons' positions. */ static BOOL PROPSHEET_AdjustButtonsWizard(HWND hwndParent, PropSheetInfo* psInfo) { HWND hwndButton = GetDlgItem(hwndParent, IDCANCEL); HWND hwndLine = GetDlgItem(hwndParent, IDC_SUNKEN_LINE); RECT rcSheet; int x, y; int num_buttons = 3; int buttonWidth, buttonHeight, lineHeight, lineWidth; PADDING_INFO padding = PROPSHEET_GetPaddingInfoWizard(hwndParent); if (psInfo->hasHelp) num_buttons++; /* * Obtain the size of the buttons. */ GetClientRect(hwndButton, &rcSheet); buttonWidth = rcSheet.right; buttonHeight = rcSheet.bottom; GetClientRect(hwndLine, &rcSheet); lineHeight = rcSheet.bottom; /* * Get the size of the property sheet. */ GetClientRect(hwndParent, &rcSheet); /* * All buttons will be at this y coordinate. */ y = rcSheet.bottom - (padding.y + buttonHeight); /* * Position the Next and the Finish buttons. */ hwndButton = GetDlgItem(hwndParent, IDC_NEXT_BUTTON); x = rcSheet.right - ((padding.x + buttonWidth) * (num_buttons - 1)); SetWindowPos(hwndButton, 0, x, y, 0, 0, SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE); hwndButton = GetDlgItem(hwndParent, IDC_FINISH_BUTTON); SetWindowPos(hwndButton, 0, x, y, 0, 0, SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE); ShowWindow(hwndButton, SW_HIDE); /* * Position the Back button. */ hwndButton = GetDlgItem(hwndParent, IDC_BACK_BUTTON); x -= buttonWidth; SetWindowPos(hwndButton, 0, x, y, 0, 0, SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE); /* * Position the Cancel button. */ hwndButton = GetDlgItem(hwndParent, IDCANCEL); x = rcSheet.right - ((padding.x + buttonWidth) * (num_buttons - 2)); SetWindowPos(hwndButton, 0, x, y, 0, 0, SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE); /* * Position Help button. */ hwndButton = GetDlgItem(hwndParent, IDHELP); if (psInfo->hasHelp) { x = rcSheet.right - (padding.x + buttonWidth); SetWindowPos(hwndButton, 0, x, y, 0, 0, SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE); } else ShowWindow(hwndButton, SW_HIDE); /* * Position and resize the sunken line. */ x = padding.x; y = rcSheet.bottom - ((padding.y * 2) + buttonHeight + lineHeight); GetClientRect(hwndParent, &rcSheet); lineWidth = rcSheet.right - (padding.x * 2); SetWindowPos(hwndLine, 0, x, y, lineWidth, 2, SWP_NOZORDER | SWP_NOACTIVATE); return TRUE; } /****************************************************************************** * PROPSHEET_GetPaddingInfo * * Returns the layout information. */ static PADDING_INFO PROPSHEET_GetPaddingInfo(HWND hwndDlg) { HWND hwndTab = GetDlgItem(hwndDlg, IDC_TABCONTROL); RECT rcTab; POINT tl; PADDING_INFO padding; GetWindowRect(hwndTab, &rcTab); tl.x = rcTab.left; tl.y = rcTab.top; ScreenToClient(hwndDlg, &tl); padding.x = tl.x; padding.y = tl.y; return padding; } /****************************************************************************** * PROPSHEET_GetPaddingInfoWizard * * Returns the layout information. * Horizontal spacing is the distance between the Cancel and Help buttons. * Vertical spacing is the distance between the line and the buttons. */ static PADDING_INFO PROPSHEET_GetPaddingInfoWizard(HWND hwndDlg) { PADDING_INFO padding; RECT rc; HWND hwndControl; POINT ptHelp, ptCancel, ptLine; /* Help button */ hwndControl = GetDlgItem(hwndDlg, IDHELP); GetWindowRect(hwndControl, &rc); ptHelp.x = rc.left; ptHelp.y = rc.top; ScreenToClient(hwndDlg, &ptHelp); /* Cancel button */ hwndControl = GetDlgItem(hwndDlg, IDCANCEL); GetWindowRect(hwndControl, &rc); ptCancel.x = rc.right; ptCancel.y = rc.top; ScreenToClient(hwndDlg, &ptCancel); /* Line */ hwndControl = GetDlgItem(hwndDlg, IDC_SUNKEN_LINE); GetWindowRect(hwndControl, &rc); ptLine.x = 0; ptLine.y = rc.bottom; ScreenToClient(hwndDlg, &ptLine); padding.x = ptHelp.x - ptCancel.x; padding.y = ptHelp.y - ptLine.y; return padding; } /****************************************************************************** * PROPSHEET_CreateTabControl * * Insert the tabs in the tab control. */ static BOOL PROPSHEET_CreateTabControl(HWND hwndParent, PropSheetInfo * psInfo) { HWND hwndTabCtrl = GetDlgItem(hwndParent, IDC_TABCONTROL); TCITEMA item; int i, nTabs; int iImage = 0; char tabtext[MAX_TABTEXT_LENGTH] = "Tab text"; item.mask = TCIF_TEXT; item.pszText = tabtext; item.cchTextMax = MAX_TABTEXT_LENGTH; nTabs = psInfo->nPages; /* * Set the image list for icons. */ if (psInfo->hImageList) { SendMessageA(hwndTabCtrl, TCM_SETIMAGELIST, 0, (LPARAM)psInfo->hImageList); } for (i = 0; i < nTabs; i++) { if ( psInfo->proppage[i].hasIcon ) { item.mask |= TCIF_IMAGE; item.iImage = iImage++; } else { item.mask &= ~TCIF_IMAGE; } WideCharToMultiByte(CP_ACP, 0, (LPCWSTR)psInfo->proppage[i].pszText, -1, tabtext, MAX_TABTEXT_LENGTH, NULL, NULL); SendMessageA(hwndTabCtrl, TCM_INSERTITEMA, (WPARAM)i, (LPARAM)&item); } return TRUE; } /****************************************************************************** * PROPSHEET_CreatePage * * Creates a page. */ static int PROPSHEET_CreatePage(HWND hwndParent, int index, const PropSheetInfo * psInfo, LPCPROPSHEETPAGEA ppshpage) { DLGTEMPLATE* pTemplate; HWND hwndPage; RECT rc; PropPageInfo* ppInfo = psInfo->proppage; PADDING_INFO padding; UINT pageWidth,pageHeight; TRACE("index %d\n", index); if (ppshpage->dwFlags & PSP_DLGINDIRECT) pTemplate = (DLGTEMPLATE*)ppshpage->u1.pResource; else { HRSRC hResource = FindResourceA(ppshpage->hInstance, ppshpage->u1.pszTemplate, RT_DIALOGA); HGLOBAL hTemplate = LoadResource(ppshpage->hInstance, hResource); pTemplate = (LPDLGTEMPLATEA)LockResource(hTemplate); } if (((MyDLGTEMPLATEEX*)pTemplate)->signature == 0xFFFF) { ((MyDLGTEMPLATEEX*)pTemplate)->style |= WS_CHILD | DS_CONTROL; ((MyDLGTEMPLATEEX*)pTemplate)->style &= ~DS_MODALFRAME; ((MyDLGTEMPLATEEX*)pTemplate)->style &= ~WS_CAPTION; ((MyDLGTEMPLATEEX*)pTemplate)->style &= ~WS_SYSMENU; ((MyDLGTEMPLATEEX*)pTemplate)->style &= ~WS_POPUP; ((MyDLGTEMPLATEEX*)pTemplate)->style &= ~WS_DISABLED; ((MyDLGTEMPLATEEX*)pTemplate)->style &= ~WS_VISIBLE; } else { pTemplate->style |= WS_CHILD | DS_CONTROL; pTemplate->style &= ~DS_MODALFRAME; pTemplate->style &= ~WS_CAPTION; pTemplate->style &= ~WS_SYSMENU; pTemplate->style &= ~WS_POPUP; pTemplate->style &= ~WS_DISABLED; pTemplate->style &= ~WS_VISIBLE; } if (psInfo->proppage[index].useCallback) (*(ppshpage->pfnCallback))(hwndParent, PSPCB_CREATE, (LPPROPSHEETPAGEA)ppshpage); hwndPage = CreateDialogIndirectParamA(ppshpage->hInstance, pTemplate, hwndParent, ppshpage->pfnDlgProc, (LPARAM)ppshpage); ppInfo[index].hwndPage = hwndPage; rc.left = psInfo->x; rc.top = psInfo->y; rc.right = psInfo->width; rc.bottom = psInfo->height; MapDialogRect(hwndParent, &rc); pageWidth = rc.right - rc.left; pageHeight = rc.bottom - rc.top; if (psInfo->ppshheader->dwFlags & PSH_WIZARD) padding = PROPSHEET_GetPaddingInfoWizard(hwndParent); else { /* * Ask the Tab control to fit this page in. */ HWND hwndTabCtrl = GetDlgItem(hwndParent, IDC_TABCONTROL); SendMessageA(hwndTabCtrl, TCM_ADJUSTRECT, FALSE, (LPARAM)&rc); padding = PROPSHEET_GetPaddingInfo(hwndParent); } SetWindowPos(hwndPage, HWND_TOP, rc.left + padding.x, rc.top + padding.y, pageWidth, pageHeight, 0); return TRUE; } /****************************************************************************** * PROPSHEET_ShowPage * * Displays or creates the specified page. */ static BOOL PROPSHEET_ShowPage(HWND hwndDlg, int index, PropSheetInfo * psInfo) { if (index == psInfo->active_page) { if (GetTopWindow(hwndDlg) != psInfo->proppage[index].hwndPage) SetWindowPos(psInfo->proppage[index].hwndPage, HWND_TOP, 0, 0, 0, 0, SWP_NOSIZE | SWP_NOMOVE); return TRUE; } if (psInfo->proppage[index].hwndPage == 0) { LPCPROPSHEETPAGEA ppshpage; PSHNOTIFY psn; ppshpage = (LPCPROPSHEETPAGEA)psInfo->proppage[index].hpage; PROPSHEET_CreatePage(hwndDlg, index, psInfo, ppshpage); psn.hdr.hwndFrom = hwndDlg; psn.hdr.code = PSN_SETACTIVE; psn.hdr.idFrom = 0; psn.lParam = 0; /* Send the notification before showing the page. */ SendMessageA(psInfo->proppage[index].hwndPage, WM_NOTIFY, 0, (LPARAM) &psn); /* * TODO: check return value. */ } if (psInfo->active_page != -1) ShowWindow(psInfo->proppage[psInfo->active_page].hwndPage, SW_HIDE); ShowWindow(psInfo->proppage[index].hwndPage, SW_SHOW); if (!(psInfo->ppshheader->dwFlags & PSH_WIZARD)) { HWND hwndTabCtrl; /* Synchronize current selection with tab control */ hwndTabCtrl = GetDlgItem(hwndDlg, IDC_TABCONTROL); SendMessageA(hwndTabCtrl, TCM_SETCURSEL, index, 0); } psInfo->active_page = index; psInfo->activeValid = TRUE; return TRUE; } /****************************************************************************** * PROPSHEET_Back */ static BOOL PROPSHEET_Back(HWND hwndDlg) { BOOL res; PSHNOTIFY psn; HWND hwndPage; PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwndDlg, PropSheetInfoStr); if (psInfo->active_page < 0) return FALSE; psn.hdr.code = PSN_WIZBACK; psn.hdr.hwndFrom = hwndDlg; psn.hdr.idFrom = 0; psn.lParam = 0; hwndPage = psInfo->proppage[psInfo->active_page].hwndPage; if (SendMessageA(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn) == -1) return FALSE; if (psInfo->active_page > 0) { res = PROPSHEET_CanSetCurSel(hwndDlg); if(res != FALSE) { res = PROPSHEET_SetCurSel(hwndDlg, psInfo->active_page - 1, 0); } } return TRUE; } /****************************************************************************** * PROPSHEET_Next */ static BOOL PROPSHEET_Next(HWND hwndDlg) { PSHNOTIFY psn; HWND hwndPage; LRESULT msgResult = 0; PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwndDlg, PropSheetInfoStr); if (psInfo->active_page < 0) return FALSE; psn.hdr.code = PSN_WIZNEXT; psn.hdr.hwndFrom = hwndDlg; psn.hdr.idFrom = 0; psn.lParam = 0; hwndPage = psInfo->proppage[psInfo->active_page].hwndPage; msgResult = SendMessageA(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn); TRACE("msg result %ld\n", msgResult); if (msgResult == -1) return FALSE; if(PROPSHEET_CanSetCurSel(hwndDlg) != FALSE) { PROPSHEET_SetCurSel(hwndDlg, psInfo->active_page + 1, 0); } return TRUE; } /****************************************************************************** * PROPSHEET_Finish */ static BOOL PROPSHEET_Finish(HWND hwndDlg) { PSHNOTIFY psn; HWND hwndPage; LRESULT msgResult = 0; PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwndDlg, PropSheetInfoStr); if (psInfo->active_page < 0) return FALSE; psn.hdr.code = PSN_WIZFINISH; psn.hdr.hwndFrom = hwndDlg; psn.hdr.idFrom = 0; psn.lParam = 0; hwndPage = psInfo->proppage[psInfo->active_page].hwndPage; msgResult = SendMessageA(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn); TRACE("msg result %ld\n", msgResult); if (msgResult != 0) return FALSE; if (psInfo->isModeless) psInfo->activeValid = FALSE; else EndDialog(hwndDlg, TRUE); return TRUE; } /****************************************************************************** * PROPSHEET_Apply */ static BOOL PROPSHEET_Apply(HWND hwndDlg, LPARAM lParam) { int i; HWND hwndPage; PSHNOTIFY psn; LRESULT msgResult; PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwndDlg, PropSheetInfoStr); if (psInfo->active_page < 0) return FALSE; psn.hdr.hwndFrom = hwndDlg; psn.hdr.idFrom = 0; psn.lParam = 0; /* * Send PSN_KILLACTIVE to the current page. */ psn.hdr.code = PSN_KILLACTIVE; hwndPage = psInfo->proppage[psInfo->active_page].hwndPage; if (SendMessageA(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn) != FALSE) return FALSE; /* * Send PSN_APPLY to all pages. */ psn.hdr.code = PSN_APPLY; psn.lParam = lParam; for (i = 0; i < psInfo->nPages; i++) { hwndPage = psInfo->proppage[i].hwndPage; if (hwndPage) { msgResult = SendMessageA(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn); if (msgResult == PSNRET_INVALID_NOCHANGEPAGE) return FALSE; } } if(lParam) { psInfo->activeValid = FALSE; } else if(psInfo->active_page >= 0) { psn.hdr.code = PSN_SETACTIVE; psn.lParam = 0; hwndPage = psInfo->proppage[psInfo->active_page].hwndPage; SendMessageA(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn); } return TRUE; } /****************************************************************************** * PROPSHEET_Cancel */ static void PROPSHEET_Cancel(HWND hwndDlg, LPARAM lParam) { PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwndDlg, PropSheetInfoStr); HWND hwndPage; PSHNOTIFY psn; int i; if (psInfo->active_page < 0) return; hwndPage = psInfo->proppage[psInfo->active_page].hwndPage; psn.hdr.code = PSN_QUERYCANCEL; psn.hdr.hwndFrom = hwndDlg; psn.hdr.idFrom = 0; psn.lParam = 0; if (SendMessageA(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn)) return; psn.hdr.code = PSN_RESET; psn.lParam = lParam; for (i = 0; i < psInfo->nPages; i++) { hwndPage = psInfo->proppage[i].hwndPage; if (hwndPage) SendMessageA(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn); } if (psInfo->isModeless) { /* makes PSM_GETCURRENTPAGEHWND return NULL */ psInfo->activeValid = FALSE; } else EndDialog(hwndDlg, FALSE); } /****************************************************************************** * PROPSHEET_Help */ static void PROPSHEET_Help(HWND hwndDlg) { PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwndDlg, PropSheetInfoStr); HWND hwndPage; PSHNOTIFY psn; if (psInfo->active_page < 0) return; hwndPage = psInfo->proppage[psInfo->active_page].hwndPage; psn.hdr.code = PSN_HELP; psn.hdr.hwndFrom = hwndDlg; psn.hdr.idFrom = 0; psn.lParam = 0; SendMessageA(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn); } /****************************************************************************** * PROPSHEET_Changed */ static void PROPSHEET_Changed(HWND hwndDlg, HWND hwndDirtyPage) { int i; PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwndDlg, PropSheetInfoStr); if (!psInfo) return; /* * Set the dirty flag of this page. */ for (i = 0; i < psInfo->nPages; i++) { if (psInfo->proppage[i].hwndPage == hwndDirtyPage) psInfo->proppage[i].isDirty = TRUE; } /* * Enable the Apply button. */ if (psInfo->hasApply) { HWND hwndApplyBtn = GetDlgItem(hwndDlg, IDC_APPLY_BUTTON); EnableWindow(hwndApplyBtn, TRUE); } } /****************************************************************************** * PROPSHEET_UnChanged */ static void PROPSHEET_UnChanged(HWND hwndDlg, HWND hwndCleanPage) { int i; BOOL noPageDirty = TRUE; HWND hwndApplyBtn = GetDlgItem(hwndDlg, IDC_APPLY_BUTTON); PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwndDlg, PropSheetInfoStr); if ( !psInfo ) return; for (i = 0; i < psInfo->nPages; i++) { /* set the specified page as clean */ if (psInfo->proppage[i].hwndPage == hwndCleanPage) psInfo->proppage[i].isDirty = FALSE; /* look to see if there's any dirty pages */ if (psInfo->proppage[i].isDirty) noPageDirty = FALSE; } /* * Disable Apply button. */ if (noPageDirty) EnableWindow(hwndApplyBtn, FALSE); } /****************************************************************************** * PROPSHEET_PressButton */ static void PROPSHEET_PressButton(HWND hwndDlg, int buttonID) { switch (buttonID) { case PSBTN_APPLYNOW: SendMessageA(hwndDlg, WM_COMMAND, IDC_APPLY_BUTTON, 0); break; case PSBTN_BACK: PROPSHEET_Back(hwndDlg); break; case PSBTN_CANCEL: SendMessageA(hwndDlg, WM_COMMAND, IDCANCEL, 0); break; case PSBTN_FINISH: PROPSHEET_Finish(hwndDlg); break; case PSBTN_HELP: SendMessageA(hwndDlg, WM_COMMAND, IDHELP, 0); break; case PSBTN_NEXT: PROPSHEET_Next(hwndDlg); break; case PSBTN_OK: SendMessageA(hwndDlg, WM_COMMAND, IDOK, 0); break; default: FIXME("Invalid button index %d\n", buttonID); } } /************************************************************************* * BOOL PROPSHEET_CanSetCurSel [Internal] * * Test weither the current page can be changed by sending a PSN_KILLACTIVE * * PARAMS * hwndDlg [I] handle to a Dialog hWnd * * RETURNS * TRUE if Current Selection can change * * NOTES */ static BOOL PROPSHEET_CanSetCurSel(HWND hwndDlg) { PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwndDlg, PropSheetInfoStr); HWND hwndPage; PSHNOTIFY psn; if (!psInfo) return FALSE; if (psInfo->active_page < 0) return TRUE; /* * Notify the current page. */ hwndPage = psInfo->proppage[psInfo->active_page].hwndPage; psn.hdr.code = PSN_KILLACTIVE; psn.hdr.hwndFrom = hwndDlg; psn.hdr.idFrom = 0; psn.lParam = 0; return !SendMessageA(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn); } /****************************************************************************** * PROPSHEET_SetCurSel */ static BOOL PROPSHEET_SetCurSel(HWND hwndDlg, int index, HPROPSHEETPAGE hpage) { PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwndDlg, PropSheetInfoStr); HWND hwndPage; HWND hwndHelp = GetDlgItem(hwndDlg, IDHELP); /* hpage takes precedence over index */ if (hpage != NULL) index = PROPSHEET_GetPageIndex(hpage, psInfo); if (index < 0 || index >= psInfo->nPages) { TRACE("Could not find page to select!\n"); return FALSE; } hwndPage = psInfo->proppage[index].hwndPage; /* * Notify the new page if it's already created. * If not it will get created and notified in PROPSHEET_ShowPage. */ if (hwndPage) { int result; PSHNOTIFY psn; psn.hdr.code = PSN_SETACTIVE; psn.hdr.hwndFrom = hwndDlg; psn.hdr.idFrom = 0; psn.lParam = 0; result = SendMessageA(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn); /* * TODO: check return value. */ } /* * Display the new page. */ PROPSHEET_ShowPage(hwndDlg, index, psInfo); if (psInfo->proppage[index].hasHelp) EnableWindow(hwndHelp, TRUE); else EnableWindow(hwndHelp, FALSE); return TRUE; } /****************************************************************************** * PROPSHEET_SetTitleA */ static void PROPSHEET_SetTitleA(HWND hwndDlg, DWORD dwStyle, LPCSTR lpszText) { PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwndDlg, PropSheetInfoStr); char szTitle[256]; if (HIWORD(lpszText) == 0) { if (!LoadStringA(psInfo->ppshheader->hInstance, LOWORD(lpszText), szTitle, sizeof(szTitle)-1)) return; lpszText = szTitle; } if (dwStyle & PSH_PROPTITLE) { char* dest; int lentitle = strlen(lpszText); int lenprop = strlen(psInfo->strPropertiesFor); dest = COMCTL32_Alloc(lentitle + lenprop + 1); strcpy(dest, psInfo->strPropertiesFor); strcat(dest, lpszText); SetWindowTextA(hwndDlg, dest); COMCTL32_Free(dest); } else SetWindowTextA(hwndDlg, lpszText); } /****************************************************************************** * PROPSHEET_SetFinishTextA */ static void PROPSHEET_SetFinishTextA(HWND hwndDlg, LPCSTR lpszText) { HWND hwndButton = GetDlgItem(hwndDlg, IDC_FINISH_BUTTON); /* Set text, show and enable the Finish button */ SetWindowTextA(hwndButton, lpszText); ShowWindow(hwndButton, SW_SHOW); EnableWindow(hwndButton, TRUE); /* Make it default pushbutton */ SendMessageA(hwndDlg, DM_SETDEFID, IDC_FINISH_BUTTON, 0); /* Hide Back button */ hwndButton = GetDlgItem(hwndDlg, IDC_BACK_BUTTON); ShowWindow(hwndButton, SW_HIDE); /* Hide Next button */ hwndButton = GetDlgItem(hwndDlg, IDC_NEXT_BUTTON); ShowWindow(hwndButton, SW_HIDE); } /****************************************************************************** * PROPSHEET_QuerySiblings */ static LRESULT PROPSHEET_QuerySiblings(HWND hwndDlg, WPARAM wParam, LPARAM lParam) { int i = 0; HWND hwndPage; LRESULT msgResult = 0; PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwndDlg, PropSheetInfoStr); while ((i < psInfo->nPages) && (msgResult == 0)) { hwndPage = psInfo->proppage[i].hwndPage; msgResult = SendMessageA(hwndPage, PSM_QUERYSIBLINGS, wParam, lParam); i++; } return msgResult; } /****************************************************************************** * PROPSHEET_AddPage */ static BOOL PROPSHEET_AddPage(HWND hwndDlg, HPROPSHEETPAGE hpage) { PropSheetInfo * psInfo = (PropSheetInfo*) GetPropA(hwndDlg, PropSheetInfoStr); HWND hwndTabControl = GetDlgItem(hwndDlg, IDC_TABCONTROL); TCITEMA item; char tabtext[MAX_TABTEXT_LENGTH] = "Tab text"; LPCPROPSHEETPAGEA ppsp = (LPCPROPSHEETPAGEA)hpage; /* * Allocate and fill in a new PropPageInfo entry. */ psInfo->proppage = (PropPageInfo*) COMCTL32_ReAlloc(psInfo->proppage, sizeof(PropPageInfo) * (psInfo->nPages + 1)); if (!PROPSHEET_CollectPageInfo(ppsp, psInfo, psInfo->nPages)) return FALSE; psInfo->proppage[psInfo->nPages].hpage = hpage; if (ppsp->dwFlags & PSP_PREMATURE) { /* Create the page but don't show it */ PROPSHEET_CreatePage(hwndDlg, psInfo->nPages, psInfo, ppsp); } /* * Add a new tab to the tab control. */ item.mask = TCIF_TEXT; item.pszText = tabtext; item.cchTextMax = MAX_TABTEXT_LENGTH; WideCharToMultiByte(CP_ACP, 0, (LPCWSTR)psInfo->proppage[psInfo->nPages].pszText, -1, tabtext, MAX_TABTEXT_LENGTH, NULL, NULL); SendMessageA(hwndTabControl, TCM_INSERTITEMA, psInfo->nPages + 1, (LPARAM)&item); psInfo->nPages++; /* If it is the only page - show it */ if(psInfo->nPages == 1) PROPSHEET_ShowPage(hwndDlg, 0, psInfo); return TRUE; } /****************************************************************************** * PROPSHEET_RemovePage */ static BOOL PROPSHEET_RemovePage(HWND hwndDlg, int index, HPROPSHEETPAGE hpage) { PropSheetInfo * psInfo = (PropSheetInfo*) GetPropA(hwndDlg, PropSheetInfoStr); HWND hwndTabControl = GetDlgItem(hwndDlg, IDC_TABCONTROL); PropPageInfo* oldPages; if (!psInfo) { return FALSE; } oldPages = psInfo->proppage; /* * hpage takes precedence over index. */ if (hpage != 0) { index = PROPSHEET_GetPageIndex(hpage, psInfo); } /* Make shure that index is within range */ if (index < 0 || index >= psInfo->nPages) { TRACE("Could not find page to remove!\n"); return FALSE; } TRACE("total pages %d removing page %d active page %d\n", psInfo->nPages, index, psInfo->active_page); /* * Check if we're removing the active page. */ if (index == psInfo->active_page) { if (psInfo->nPages > 1) { if (index > 0) { /* activate previous page */ PROPSHEET_ShowPage(hwndDlg, index - 1, psInfo); } else { /* activate the next page */ PROPSHEET_ShowPage(hwndDlg, index + 1, psInfo); } } else { psInfo->active_page = -1; if (!psInfo->isModeless) { EndDialog(hwndDlg, FALSE); return TRUE; } } } else if (index < psInfo->active_page) psInfo->active_page--; /* Destroy page dialog window */ DestroyWindow(psInfo->proppage[index].hwndPage); /* Free page resources */ if(psInfo->proppage[index].hpage) { PROPSHEETPAGEA* psp = (PROPSHEETPAGEA*)psInfo->proppage[index].hpage; if ((psp->dwFlags & PSP_USETITLE) && psInfo->proppage[index].pszText) HeapFree(GetProcessHeap(), 0, (LPVOID)psInfo->proppage[index].pszText); DestroyPropertySheetPage(psInfo->proppage[index].hpage); } /* Remove the tab */ SendMessageA(hwndTabControl, TCM_DELETEITEM, index, 0); psInfo->nPages--; psInfo->proppage = COMCTL32_Alloc(sizeof(PropPageInfo) * psInfo->nPages); if (index > 0) memcpy(&psInfo->proppage[0], &oldPages[0], index * sizeof(PropPageInfo)); if (index < psInfo->nPages) memcpy(&psInfo->proppage[index], &oldPages[index + 1], (psInfo->nPages - index) * sizeof(PropPageInfo)); COMCTL32_Free(oldPages); return FALSE; } /****************************************************************************** * PROPSHEET_SetWizButtons * * This code will work if (and assumes that) the Next button is on top of the * Finish button. ie. Finish comes after Next in the Z order. * This means make sure the dialog template reflects this. * */ static void PROPSHEET_SetWizButtons(HWND hwndDlg, DWORD dwFlags) { HWND hwndBack = GetDlgItem(hwndDlg, IDC_BACK_BUTTON); HWND hwndNext = GetDlgItem(hwndDlg, IDC_NEXT_BUTTON); HWND hwndFinish = GetDlgItem(hwndDlg, IDC_FINISH_BUTTON); TRACE("%ld\n", dwFlags); EnableWindow(hwndBack, FALSE); EnableWindow(hwndNext, FALSE); EnableWindow(hwndFinish, FALSE); if (dwFlags & PSWIZB_BACK) EnableWindow(hwndBack, TRUE); if (dwFlags & PSWIZB_NEXT) { /* Hide the Finish button */ ShowWindow(hwndFinish, SW_HIDE); /* Show and enable the Next button */ ShowWindow(hwndNext, SW_SHOW); EnableWindow(hwndNext, TRUE); /* Set the Next button as the default pushbutton */ SendMessageA(hwndDlg, DM_SETDEFID, IDC_NEXT_BUTTON, 0); } if ((dwFlags & PSWIZB_FINISH) || (dwFlags & PSWIZB_DISABLEDFINISH)) { /* Hide the Next button */ ShowWindow(hwndNext, SW_HIDE); /* Show the Finish button */ ShowWindow(hwndFinish, SW_SHOW); if (dwFlags & PSWIZB_FINISH) EnableWindow(hwndFinish, TRUE); /* Set the Finish button as the default pushbutton */ SendMessageA(hwndDlg, DM_SETDEFID, IDC_FINISH_BUTTON, 0); } } /****************************************************************************** * PROPSHEET_GetPageIndex * * Given a HPROPSHEETPAGE, returns the index of the corresponding page from * the array of PropPageInfo. */ static int PROPSHEET_GetPageIndex(HPROPSHEETPAGE hpage, PropSheetInfo* psInfo) { BOOL found = FALSE; int index = 0; while ((index < psInfo->nPages) && (found == FALSE)) { if (psInfo->proppage[index].hpage == hpage) found = TRUE; else index++; } if (found == FALSE) index = -1; return index; } /****************************************************************************** * PROPSHEET_CleanUp */ static void PROPSHEET_CleanUp(HWND hwndDlg) { int i; PropSheetInfo* psInfo = (PropSheetInfo*) RemovePropA(hwndDlg, PropSheetInfoStr); TRACE("\n"); if (HIWORD(psInfo->ppshheader->pszCaption)) HeapFree(GetProcessHeap(), 0, (LPVOID)psInfo->ppshheader->pszCaption); COMCTL32_Free((LPVOID)psInfo->ppshheader); for (i = 0; i < psInfo->nPages; i++) { PROPSHEETPAGEA* psp = (PROPSHEETPAGEA*)psInfo->proppage[i].hpage; if(psInfo->proppage[i].hwndPage) DestroyWindow(psInfo->proppage[i].hwndPage); if(psp) { if ((psp->dwFlags & PSP_USETITLE) && psInfo->proppage[i].pszText) HeapFree(GetProcessHeap(), 0, (LPVOID)psInfo->proppage[i].pszText); DestroyPropertySheetPage(psInfo->proppage[i].hpage); } } COMCTL32_Free(psInfo->proppage); COMCTL32_Free(psInfo->strPropertiesFor); ImageList_Destroy(psInfo->hImageList); GlobalFree((HGLOBAL)psInfo); } /****************************************************************************** * PropertySheetA (COMCTL32.84)(COMCTL32.83) */ INT WINAPI PropertySheetA(LPCPROPSHEETHEADERA lppsh) { int bRet = 0; PropSheetInfo* psInfo = (PropSheetInfo*) GlobalAlloc(GPTR, sizeof(PropSheetInfo)); int i, n; BYTE* pByte; PROPSHEET_CollectSheetInfo(lppsh, psInfo); psInfo->proppage = (PropPageInfo*) COMCTL32_Alloc(sizeof(PropPageInfo) * lppsh->nPages); pByte = (BYTE*) psInfo->ppshheader->u3.ppsp; for (n = i = 0; i < lppsh->nPages; i++, n++) { if (!(lppsh->dwFlags & PSH_PROPSHEETPAGE)) psInfo->proppage[n].hpage = psInfo->ppshheader->u3.phpage[i]; else { psInfo->proppage[n].hpage = CreatePropertySheetPageA((LPCPROPSHEETPAGEA)pByte); pByte += ((LPPROPSHEETPAGEA)pByte)->dwSize; } if (!PROPSHEET_CollectPageInfo((LPCPROPSHEETPAGEA)psInfo->proppage[n].hpage, psInfo, n)) { if (lppsh->dwFlags & PSH_PROPSHEETPAGE) DestroyPropertySheetPage(psInfo->proppage[n].hpage); n--; psInfo->nPages--; } } bRet = PROPSHEET_CreateDialog(psInfo); return bRet; } /****************************************************************************** * PropertySheetW (COMCTL32.85) */ INT WINAPI PropertySheetW(LPCPROPSHEETHEADERW propertySheetHeader) { FIXME("(%p): stub\n", propertySheetHeader); return -1; } /****************************************************************************** * CreatePropertySheetPageA (COMCTL32.19)(COMCTL32.18) */ HPROPSHEETPAGE WINAPI CreatePropertySheetPageA( LPCPROPSHEETPAGEA lpPropSheetPage) { PROPSHEETPAGEA* ppsp = COMCTL32_Alloc(sizeof(PROPSHEETPAGEA)); *ppsp = *lpPropSheetPage; if ( !(ppsp->dwFlags & PSP_DLGINDIRECT) && HIWORD( ppsp->u1.pszTemplate ) ) ppsp->u1.pszTemplate = HEAP_strdupA( GetProcessHeap(), 0, lpPropSheetPage->u1.pszTemplate ); if ( (ppsp->dwFlags & PSP_USEICONID) && HIWORD( ppsp->u2.pszIcon ) ) ppsp->u2.pszIcon = HEAP_strdupA( GetProcessHeap(), 0, lpPropSheetPage->u2.pszIcon ); if ((ppsp->dwFlags & PSP_USETITLE) && HIWORD( ppsp->pszTitle )) ppsp->pszTitle = HEAP_strdupA( GetProcessHeap(), 0, lpPropSheetPage->pszTitle ); else if ( !(ppsp->dwFlags & PSP_USETITLE) ) ppsp->pszTitle = NULL; return (HPROPSHEETPAGE)ppsp; } /****************************************************************************** * CreatePropertySheetPageW (COMCTL32.20) */ HPROPSHEETPAGE WINAPI CreatePropertySheetPageW(LPCPROPSHEETPAGEW lpPropSheetPage) { FIXME("(%p): stub\n", lpPropSheetPage); return 0; } /****************************************************************************** * DestroyPropertySheetPage (COMCTL32.24) */ BOOL WINAPI DestroyPropertySheetPage(HPROPSHEETPAGE hPropPage) { PROPSHEETPAGEA *psp = (PROPSHEETPAGEA *)hPropPage; if (!psp) return FALSE; if ( !(psp->dwFlags & PSP_DLGINDIRECT) && HIWORD( psp->u1.pszTemplate ) ) HeapFree(GetProcessHeap(), 0, (LPVOID)psp->u1.pszTemplate); if ( (psp->dwFlags & PSP_USEICONID) && HIWORD( psp->u2.pszIcon ) ) HeapFree(GetProcessHeap(), 0, (LPVOID)psp->u2.pszIcon); if ((psp->dwFlags & PSP_USETITLE) && HIWORD( psp->pszTitle )) HeapFree(GetProcessHeap(), 0, (LPVOID)psp->pszTitle); COMCTL32_Free(hPropPage); return TRUE; } /****************************************************************************** * PROPSHEET_IsDialogMessage */ static BOOL PROPSHEET_IsDialogMessage(HWND hwnd, LPMSG lpMsg) { PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwnd, PropSheetInfoStr); if (!psInfo || (hwnd != lpMsg->hwnd && !IsChild(hwnd, lpMsg->hwnd))) return FALSE; if (lpMsg->message == WM_KEYDOWN && (GetKeyState(VK_CONTROL) & 0x8000)) { int new_page = 0; INT dlgCode = SendMessageA(lpMsg->hwnd, WM_GETDLGCODE, 0, (LPARAM)lpMsg); if (!(dlgCode & DLGC_WANTMESSAGE)) { switch (lpMsg->wParam) { case VK_TAB: if (GetKeyState(VK_SHIFT) & 0x8000) new_page = -1; else new_page = 1; break; case VK_NEXT: new_page = 1; break; case VK_PRIOR: new_page = -1; break; } } if (new_page) { if (PROPSHEET_CanSetCurSel(hwnd) != FALSE) { new_page += psInfo->active_page; if (new_page < 0) new_page = psInfo->nPages - 1; else if (new_page >= psInfo->nPages) new_page = 0; PROPSHEET_SetCurSel(hwnd, new_page, 0); } return TRUE; } } return IsDialogMessageA(hwnd, lpMsg); } /****************************************************************************** * PROPSHEET_DialogProc */ BOOL WINAPI PROPSHEET_DialogProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { switch (uMsg) { case WM_INITDIALOG: { PropSheetInfo* psInfo = (PropSheetInfo*) lParam; char* strCaption = (char*)COMCTL32_Alloc(MAX_CAPTION_LENGTH); HWND hwndTabCtrl = GetDlgItem(hwnd, IDC_TABCONTROL); LPCPROPSHEETPAGEA ppshpage; int idx; SetPropA(hwnd, PropSheetInfoStr, (HANDLE)psInfo); /* * Small icon in the title bar. */ if ((psInfo->ppshheader->dwFlags & PSH_USEICONID) || (psInfo->ppshheader->dwFlags & PSH_USEHICON)) { HICON hIcon; int icon_cx = GetSystemMetrics(SM_CXSMICON); int icon_cy = GetSystemMetrics(SM_CYSMICON); if (psInfo->ppshheader->dwFlags & PSH_USEICONID) hIcon = LoadImageA(psInfo->ppshheader->hInstance, psInfo->ppshheader->u1.pszIcon, IMAGE_ICON, icon_cx, icon_cy, LR_DEFAULTCOLOR); else hIcon = psInfo->ppshheader->u1.hIcon; SendMessageA(hwnd, WM_SETICON, 0, hIcon); } if (psInfo->ppshheader->dwFlags & PSH_USEHICON) SendMessageA(hwnd, WM_SETICON, 0, psInfo->ppshheader->u1.hIcon); psInfo->strPropertiesFor = strCaption; GetWindowTextA(hwnd, psInfo->strPropertiesFor, MAX_CAPTION_LENGTH); PROPSHEET_CreateTabControl(hwnd, psInfo); if (psInfo->ppshheader->dwFlags & PSH_WIZARD) { if (PROPSHEET_IsTooSmallWizard(hwnd, psInfo)) { PROPSHEET_AdjustSizeWizard(hwnd, psInfo); PROPSHEET_AdjustButtonsWizard(hwnd, psInfo); } } else { if (PROPSHEET_SizeMismatch(hwnd, psInfo)) { PROPSHEET_AdjustSize(hwnd, psInfo); PROPSHEET_AdjustButtons(hwnd, psInfo); } } if (psInfo->useCallback) (*(psInfo->ppshheader->pfnCallback))(hwnd, PSCB_INITIALIZED, (LPARAM)0); idx = psInfo->active_page; ppshpage = (LPCPROPSHEETPAGEA)psInfo->proppage[idx].hpage; psInfo->active_page = -1; PROPSHEET_SetCurSel(hwnd, idx, psInfo->proppage[idx].hpage); if (!(psInfo->ppshheader->dwFlags & PSH_WIZARD)) SendMessageA(hwndTabCtrl, TCM_SETCURSEL, psInfo->active_page, 0); if (!HIWORD(psInfo->ppshheader->pszCaption) && psInfo->ppshheader->hInstance) { char szText[256]; if (LoadStringA(psInfo->ppshheader->hInstance, (UINT)psInfo->ppshheader->pszCaption, szText, 255)) PROPSHEET_SetTitleA(hwnd, psInfo->ppshheader->dwFlags, szText); } else { PROPSHEET_SetTitleA(hwnd, psInfo->ppshheader->dwFlags, psInfo->ppshheader->pszCaption); } return TRUE; } case WM_DESTROY: PROPSHEET_CleanUp(hwnd); return TRUE; case WM_CLOSE: PROPSHEET_Cancel(hwnd, 1); return TRUE; case WM_COMMAND: { WORD wID = LOWORD(wParam); switch (wID) { case IDOK: case IDC_APPLY_BUTTON: { HWND hwndApplyBtn = GetDlgItem(hwnd, IDC_APPLY_BUTTON); if (PROPSHEET_Apply(hwnd, wID == IDOK ? 1: 0) == FALSE) break; if (wID == IDOK) { PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwnd, PropSheetInfoStr); int result = TRUE; if (psInfo->restartWindows) result = ID_PSRESTARTWINDOWS; /* reboot system takes precedence over restart windows */ if (psInfo->rebootSystem) result = ID_PSREBOOTSYSTEM; if (psInfo->isModeless) psInfo->activeValid = FALSE; else EndDialog(hwnd, result); } else EnableWindow(hwndApplyBtn, FALSE); break; } case IDC_BACK_BUTTON: PROPSHEET_Back(hwnd); break; case IDC_NEXT_BUTTON: PROPSHEET_Next(hwnd); break; case IDC_FINISH_BUTTON: PROPSHEET_Finish(hwnd); break; case IDCANCEL: PROPSHEET_Cancel(hwnd, 0); break; case IDHELP: PROPSHEET_Help(hwnd); break; } return TRUE; } case WM_NOTIFY: { NMHDR* pnmh = (LPNMHDR) lParam; if (pnmh->code == TCN_SELCHANGE) { int index = SendMessageA(pnmh->hwndFrom, TCM_GETCURSEL, 0, 0); PROPSHEET_SetCurSel(hwnd, index, 0); } if(pnmh->code == TCN_SELCHANGING) { BOOL bRet = PROPSHEET_CanSetCurSel(hwnd); SetWindowLongA(hwnd, DWL_MSGRESULT, !bRet); return TRUE; } return 0; } case PSM_GETCURRENTPAGEHWND: { PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwnd, PropSheetInfoStr); HWND hwndPage = 0; if (psInfo->activeValid && psInfo->active_page != -1) hwndPage = psInfo->proppage[psInfo->active_page].hwndPage; SetWindowLongA(hwnd, DWL_MSGRESULT, hwndPage); return TRUE; } case PSM_CHANGED: PROPSHEET_Changed(hwnd, (HWND)wParam); return TRUE; case PSM_UNCHANGED: PROPSHEET_UnChanged(hwnd, (HWND)wParam); return TRUE; case PSM_GETTABCONTROL: { HWND hwndTabCtrl = GetDlgItem(hwnd, IDC_TABCONTROL); SetWindowLongA(hwnd, DWL_MSGRESULT, hwndTabCtrl); return TRUE; } case PSM_SETCURSEL: { BOOL msgResult; msgResult = PROPSHEET_CanSetCurSel(hwnd); if(msgResult != FALSE) { msgResult = PROPSHEET_SetCurSel(hwnd, (int)wParam, (HPROPSHEETPAGE)lParam); } SetWindowLongA(hwnd, DWL_MSGRESULT, msgResult); return TRUE; } case PSM_CANCELTOCLOSE: { char buf[MAX_BUTTONTEXT_LENGTH]; HWND hwndOK = GetDlgItem(hwnd, IDOK); HWND hwndCancel = GetDlgItem(hwnd, IDCANCEL); EnableWindow(hwndCancel, FALSE); if (LoadStringA(COMCTL32_hModule, IDS_CLOSE, buf, sizeof(buf))) SetWindowTextA(hwndOK, buf); return FALSE; } case PSM_RESTARTWINDOWS: { PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwnd, PropSheetInfoStr); psInfo->restartWindows = TRUE; return TRUE; } case PSM_REBOOTSYSTEM: { PropSheetInfo* psInfo = (PropSheetInfo*) GetPropA(hwnd, PropSheetInfoStr); psInfo->rebootSystem = TRUE; return TRUE; } case PSM_SETTITLEA: PROPSHEET_SetTitleA(hwnd, (DWORD) wParam, (LPCSTR) lParam); return TRUE; case PSM_APPLY: { BOOL msgResult = PROPSHEET_Apply(hwnd, 0); SetWindowLongA(hwnd, DWL_MSGRESULT, msgResult); return TRUE; } case PSM_QUERYSIBLINGS: { LRESULT msgResult = PROPSHEET_QuerySiblings(hwnd, wParam, lParam); SetWindowLongA(hwnd, DWL_MSGRESULT, msgResult); return TRUE; } case PSM_ADDPAGE: { /* * Note: MSVC++ 6.0 documentation says that PSM_ADDPAGE does not have * a return value. This is not true. PSM_ADDPAGE returns TRUE * on success or FALSE otherwise, as specified on MSDN Online. * Also see the MFC code for * CPropertySheet::AddPage(CPropertyPage* pPage). */ BOOL msgResult = PROPSHEET_AddPage(hwnd, (HPROPSHEETPAGE)lParam); SetWindowLongA(hwnd, DWL_MSGRESULT, msgResult); return TRUE; } case PSM_REMOVEPAGE: PROPSHEET_RemovePage(hwnd, (int)wParam, (HPROPSHEETPAGE)lParam); return TRUE; case PSM_ISDIALOGMESSAGE: { BOOL msgResult = PROPSHEET_IsDialogMessage(hwnd, (LPMSG)lParam); SetWindowLongA(hwnd, DWL_MSGRESULT, msgResult); return TRUE; } case PSM_PRESSBUTTON: PROPSHEET_PressButton(hwnd, (int)wParam); return TRUE; case PSM_SETFINISHTEXTA: PROPSHEET_SetFinishTextA(hwnd, (LPCSTR) lParam); return TRUE; case PSM_SETWIZBUTTONS: PROPSHEET_SetWizButtons(hwnd, (DWORD)lParam); return TRUE; case PSM_SETTITLEW: FIXME("Unimplemented msg PSM_SETTITLE32W\n"); return 0; case PSM_SETCURSELID: FIXME("Unimplemented msg PSM_SETCURSELID\n"); return 0; case PSM_SETFINISHTEXTW: FIXME("Unimplemented msg PSM_SETFINISHTEXT32W\n"); return 0; default: return FALSE; } } wine-20000526/dlls/comctl32/rebar.c0100644000175000001440000013775107106136276016313 0ustar julliardusers/* * Rebar control * * Copyright 1998, 1999 Eric Kohl * * NOTES * An author is needed! Any volunteers? * I will only improve this control once in a while. * Eric * * TODO: * - vertical placement * - ComboBox and ComboBoxEx placement * - center image * - Layout code. * - Display code. * - Some messages. * - All notifications. */ #include #include "winbase.h" #include "wingdi.h" #include "commctrl.h" #include "rebar.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(rebar) /* fDraw flags */ #define DRAW_GRIPPER 1 #define DRAW_IMAGE 2 #define DRAW_TEXT 4 #define DRAW_CHILD 8 #define GRIPPER_WIDTH 13 #define REBAR_GetInfoPtr(wndPtr) ((REBAR_INFO *)GetWindowLongA (hwnd, 0)) static VOID REBAR_DrawBand (HDC hdc, REBAR_INFO *infoPtr, REBAR_BAND *lpBand) { DrawEdge (hdc, &lpBand->rcBand, BDR_RAISEDINNER, BF_MIDDLE); /* draw background */ /* draw gripper */ if (lpBand->fDraw & DRAW_GRIPPER) DrawEdge (hdc, &lpBand->rcGripper, BDR_RAISEDINNER, BF_RECT | BF_MIDDLE); /* draw caption image */ if (lpBand->fDraw & DRAW_IMAGE) { /* FIXME: center image */ POINT pt; pt.y = (lpBand->rcCapImage.bottom + lpBand->rcCapImage.top - infoPtr->imageSize.cy)/2; pt.x = (lpBand->rcCapImage.right + lpBand->rcCapImage.left - infoPtr->imageSize.cx)/2; ImageList_Draw (infoPtr->himl, lpBand->iImage, hdc, /* lpBand->rcCapImage.left, lpBand->rcCapImage.top, */ pt.x, pt.y, ILD_TRANSPARENT); } /* draw caption text */ if (lpBand->fDraw & DRAW_TEXT) { HFONT hOldFont = SelectObject (hdc, infoPtr->hFont); INT oldBkMode = SetBkMode (hdc, TRANSPARENT); DrawTextW (hdc, lpBand->lpText, -1, &lpBand->rcCapText, DT_CENTER | DT_VCENTER | DT_SINGLELINE); if (oldBkMode != TRANSPARENT) SetBkMode (hdc, oldBkMode); SelectObject (hdc, hOldFont); } } static VOID REBAR_Refresh (HWND hwnd, HDC hdc) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); REBAR_BAND *lpBand; UINT i; for (i = 0; i < infoPtr->uNumBands; i++) { lpBand = &infoPtr->bands[i]; if ((lpBand->fStyle & RBBS_HIDDEN) || ((GetWindowLongA (hwnd, GWL_STYLE) & CCS_VERT) && (lpBand->fStyle & RBBS_NOVERT))) continue; REBAR_DrawBand (hdc, infoPtr, lpBand); } } static VOID REBAR_CalcHorzBand (REBAR_INFO *infoPtr, REBAR_BAND *lpBand) { lpBand->fDraw = 0; /* set initial caption image rectangle */ SetRect (&lpBand->rcCapImage, 0, 0, 0, 0); /* image is visible */ if ((lpBand->iImage > -1) && (infoPtr->himl)) { lpBand->fDraw |= DRAW_IMAGE; lpBand->rcCapImage.right = lpBand->rcCapImage.left + infoPtr->imageSize.cx; lpBand->rcCapImage.bottom = lpBand->rcCapImage.top + infoPtr->imageSize.cy; /* update band height */ if (lpBand->uMinHeight < infoPtr->imageSize.cy + 2) { lpBand->uMinHeight = infoPtr->imageSize.cy + 2; lpBand->rcBand.bottom = lpBand->rcBand.top + lpBand->uMinHeight; } } /* set initial caption text rectangle */ lpBand->rcCapText.left = lpBand->rcCapImage.right; lpBand->rcCapText.top = lpBand->rcBand.top + 1; lpBand->rcCapText.right = lpBand->rcCapText.left; lpBand->rcCapText.bottom = lpBand->rcBand.bottom - 1; /* text is visible */ if (lpBand->lpText) { HDC hdc = GetDC (0); HFONT hOldFont = SelectObject (hdc, infoPtr->hFont); SIZE size; lpBand->fDraw |= DRAW_TEXT; GetTextExtentPoint32W (hdc, lpBand->lpText, lstrlenW (lpBand->lpText), &size); lpBand->rcCapText.right += size.cx; SelectObject (hdc, hOldFont); ReleaseDC (0, hdc); } /* set initial child window rectangle */ if (lpBand->fStyle & RBBS_FIXEDSIZE) { lpBand->rcChild.left = lpBand->rcCapText.right; lpBand->rcChild.top = lpBand->rcBand.top; lpBand->rcChild.right = lpBand->rcBand.right; lpBand->rcChild.bottom = lpBand->rcBand.bottom; } else { lpBand->rcChild.left = lpBand->rcCapText.right + 4; lpBand->rcChild.top = lpBand->rcBand.top + 2; lpBand->rcChild.right = lpBand->rcBand.right - 4; lpBand->rcChild.bottom = lpBand->rcBand.bottom - 2; } /* calculate gripper rectangle */ if ((!(lpBand->fStyle & RBBS_NOGRIPPER)) && (!(lpBand->fStyle & RBBS_FIXEDSIZE)) && ((lpBand->fStyle & RBBS_GRIPPERALWAYS) || (infoPtr->uNumBands > 1))) { lpBand->fDraw |= DRAW_GRIPPER; lpBand->rcGripper.left = lpBand->rcBand.left + 3; lpBand->rcGripper.right = lpBand->rcGripper.left + 3; lpBand->rcGripper.top = lpBand->rcBand.top + 3; lpBand->rcGripper.bottom = lpBand->rcBand.bottom - 3; /* move caption rectangles */ OffsetRect (&lpBand->rcCapImage, GRIPPER_WIDTH, 0); OffsetRect (&lpBand->rcCapText, GRIPPER_WIDTH, 0); /* adjust child rectangle */ lpBand->rcChild.left += GRIPPER_WIDTH; } } static VOID REBAR_CalcVertBand (HWND hwnd, REBAR_INFO *infoPtr, REBAR_BAND *lpBand) { lpBand->fDraw = 0; /* set initial caption image rectangle */ SetRect (&lpBand->rcCapImage, 0, 0, 0, 0); /* image is visible */ if ((lpBand->iImage > -1) && (infoPtr->himl)) { lpBand->fDraw |= DRAW_IMAGE; lpBand->rcCapImage.right = lpBand->rcCapImage.left + infoPtr->imageSize.cx; lpBand->rcCapImage.bottom = lpBand->rcCapImage.top + infoPtr->imageSize.cy; /* update band width */ if (lpBand->uMinHeight < infoPtr->imageSize.cx + 2) { lpBand->uMinHeight = infoPtr->imageSize.cx + 2; lpBand->rcBand.right = lpBand->rcBand.left + lpBand->uMinHeight; } } /* set initial caption text rectangle */ lpBand->rcCapText.left = lpBand->rcBand.left + 1; lpBand->rcCapText.top = lpBand->rcCapImage.bottom; lpBand->rcCapText.right = lpBand->rcBand.right - 1; lpBand->rcCapText.bottom = lpBand->rcCapText.top; /* text is visible */ if (lpBand->lpText) { HDC hdc = GetDC (0); HFONT hOldFont = SelectObject (hdc, infoPtr->hFont); SIZE size; lpBand->fDraw |= DRAW_TEXT; GetTextExtentPoint32W (hdc, lpBand->lpText, lstrlenW (lpBand->lpText), &size); /* lpBand->rcCapText.right += size.cx; */ lpBand->rcCapText.bottom += size.cy; SelectObject (hdc, hOldFont); ReleaseDC (0, hdc); } /* set initial child window rectangle */ if (lpBand->fStyle & RBBS_FIXEDSIZE) { lpBand->rcChild.left = lpBand->rcBand.left; lpBand->rcChild.top = lpBand->rcCapText.bottom; lpBand->rcChild.right = lpBand->rcBand.right; lpBand->rcChild.bottom = lpBand->rcBand.bottom; } else { lpBand->rcChild.left = lpBand->rcBand.left + 2; lpBand->rcChild.top = lpBand->rcCapText.bottom + 4; lpBand->rcChild.right = lpBand->rcBand.right - 2; lpBand->rcChild.bottom = lpBand->rcBand.bottom - 4; } /* calculate gripper rectangle */ if ((!(lpBand->fStyle & RBBS_NOGRIPPER)) && (!(lpBand->fStyle & RBBS_FIXEDSIZE)) && ((lpBand->fStyle & RBBS_GRIPPERALWAYS) || (infoPtr->uNumBands > 1))) { lpBand->fDraw |= DRAW_GRIPPER; if (GetWindowLongA (hwnd, GWL_STYLE) & RBS_VERTICALGRIPPER) { /* adjust band width */ lpBand->rcBand.right += GRIPPER_WIDTH; lpBand->uMinHeight += GRIPPER_WIDTH; lpBand->rcGripper.left = lpBand->rcBand.left + 3; lpBand->rcGripper.right = lpBand->rcGripper.left + 3; lpBand->rcGripper.top = lpBand->rcBand.top + 3; lpBand->rcGripper.bottom = lpBand->rcBand.bottom - 3; /* move caption rectangles */ OffsetRect (&lpBand->rcCapImage, GRIPPER_WIDTH, 0); OffsetRect (&lpBand->rcCapText, GRIPPER_WIDTH, 0); /* adjust child rectangle */ lpBand->rcChild.left += GRIPPER_WIDTH; } else { lpBand->rcGripper.left = lpBand->rcBand.left + 3; lpBand->rcGripper.right = lpBand->rcBand.right - 3; lpBand->rcGripper.top = lpBand->rcBand.top + 3; lpBand->rcGripper.bottom = lpBand->rcGripper.top + 3; /* move caption rectangles */ OffsetRect (&lpBand->rcCapImage, 0, GRIPPER_WIDTH); OffsetRect (&lpBand->rcCapText, 0, GRIPPER_WIDTH); /* adjust child rectangle */ lpBand->rcChild.top += GRIPPER_WIDTH; } } } static VOID REBAR_Layout (HWND hwnd, LPRECT lpRect) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); REBAR_BAND *lpBand; RECT rcClient; INT x, y, cx, cy; UINT i; if (lpRect) rcClient = *lpRect; else GetClientRect (hwnd, &rcClient); x = 0; y = 0; if (dwStyle & CCS_VERT) { cx = 20; /* FIXME: fixed height */ cy = rcClient.bottom - rcClient.top; } else { cx = rcClient.right - rcClient.left; cy = 20; /* FIXME: fixed height */ } for (i = 0; i < infoPtr->uNumBands; i++) { lpBand = &infoPtr->bands[i]; if ((lpBand->fStyle & RBBS_HIDDEN) || ((dwStyle & CCS_VERT) && (lpBand->fStyle & RBBS_NOVERT))) continue; if (dwStyle & CCS_VERT) { if (lpBand->fStyle & RBBS_VARIABLEHEIGHT) cx = lpBand->cyMaxChild; else if (lpBand->fStyle & RBBIM_CHILDSIZE) cx = lpBand->cyMinChild; else cx = 20; /* FIXME */ lpBand->rcBand.left = x; lpBand->rcBand.right = x + cx; lpBand->rcBand.top = y; lpBand->rcBand.bottom = y + cy; lpBand->uMinHeight = cx; } else { if (lpBand->fStyle & RBBS_VARIABLEHEIGHT) cy = lpBand->cyMaxChild; else if (lpBand->fStyle & RBBIM_CHILDSIZE) cy = lpBand->cyMinChild; else cy = 20; /* FIXME */ lpBand->rcBand.left = x; lpBand->rcBand.right = x + cx; lpBand->rcBand.top = y; lpBand->rcBand.bottom = y + cy; lpBand->uMinHeight = cy; } if (dwStyle & CCS_VERT) { REBAR_CalcVertBand (hwnd, infoPtr, lpBand); x += lpBand->uMinHeight; } else { REBAR_CalcHorzBand (infoPtr, lpBand); y += lpBand->uMinHeight; } } if (dwStyle & CCS_VERT) { infoPtr->calcSize.cx = x; infoPtr->calcSize.cy = rcClient.bottom - rcClient.top; } else { infoPtr->calcSize.cx = rcClient.right - rcClient.left; infoPtr->calcSize.cy = y; } } static VOID REBAR_ForceResize (HWND hwnd) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); RECT rc; TRACE(" to [%d x %d]!\n", infoPtr->calcSize.cx, infoPtr->calcSize.cy); infoPtr->bAutoResize = TRUE; rc.left = 0; rc.top = 0; rc.right = infoPtr->calcSize.cx; rc.bottom = infoPtr->calcSize.cy; if (GetWindowLongA (hwnd, GWL_STYLE) & WS_BORDER) { InflateRect (&rc, GetSystemMetrics(SM_CXEDGE), GetSystemMetrics(SM_CYEDGE)); } SetWindowPos (hwnd, 0, 0, 0, rc.right - rc.left, rc.bottom - rc.top, SWP_NOMOVE | SWP_NOZORDER | SWP_SHOWWINDOW); } static VOID REBAR_MoveChildWindows (HWND hwnd) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); REBAR_BAND *lpBand; CHAR szClassName[40]; UINT i; for (i = 0; i < infoPtr->uNumBands; i++) { lpBand = &infoPtr->bands[i]; if (lpBand->fStyle & RBBS_HIDDEN) continue; if (lpBand->hwndChild) { TRACE("hwndChild = %x\n", lpBand->hwndChild); GetClassNameA (lpBand->hwndChild, szClassName, 40); if (!lstrcmpA (szClassName, "ComboBox")) { INT nEditHeight, yPos; RECT rc; /* special placement code for combo box */ /* get size of edit line */ GetWindowRect (lpBand->hwndChild, &rc); nEditHeight = rc.bottom - rc.top; yPos = (lpBand->rcChild.bottom + lpBand->rcChild.top - nEditHeight)/2; /* center combo box inside child area */ SetWindowPos (lpBand->hwndChild, HWND_TOP, lpBand->rcChild.left, /*lpBand->rcChild.top*/ yPos, lpBand->rcChild.right - lpBand->rcChild.left, nEditHeight, SWP_SHOWWINDOW); } #if 0 else if (!lstrcmpA (szClassName, WC_COMBOBOXEXA)) { INT nEditHeight, yPos; RECT rc; HWND hwndEdit; /* special placement code for extended combo box */ /* get size of edit line */ hwndEdit = SendMessageA (lpBand->hwndChild, CBEM_GETEDITCONTROL, 0, 0); GetWindowRect (hwndEdit, &rc); nEditHeight = rc.bottom - rc.top; yPos = (lpBand->rcChild.bottom + lpBand->rcChild.top - nEditHeight)/2; /* center combo box inside child area */ SetWindowPos (lpBand->hwndChild, HWND_TOP, lpBand->rcChild.left, /*lpBand->rcChild.top*/ yPos, lpBand->rcChild.right - lpBand->rcChild.left, nEditHeight, SWP_SHOWWINDOW); } #endif else { SetWindowPos (lpBand->hwndChild, HWND_TOP, lpBand->rcChild.left, lpBand->rcChild.top, lpBand->rcChild.right - lpBand->rcChild.left, lpBand->rcChild.bottom - lpBand->rcChild.top, SWP_SHOWWINDOW); } } } } static void REBAR_InternalHitTest (HWND hwnd, LPPOINT lpPt, UINT *pFlags, INT *pBand) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); REBAR_BAND *lpBand; RECT rect; INT iCount; GetClientRect (hwnd, &rect); *pFlags = RBHT_NOWHERE; if (PtInRect (&rect, *lpPt)) { if (infoPtr->uNumBands == 0) { *pFlags = RBHT_NOWHERE; if (pBand) *pBand = -1; TRACE("NOWHERE\n"); return; } else { /* somewhere inside */ for (iCount = 0; iCount < infoPtr->uNumBands; iCount++) { lpBand = &infoPtr->bands[iCount]; if (PtInRect (&lpBand->rcBand, *lpPt)) { if (pBand) *pBand = iCount; if (PtInRect (&lpBand->rcGripper, *lpPt)) { *pFlags = RBHT_GRABBER; TRACE("ON GRABBER %d\n", iCount); return; } else if (PtInRect (&lpBand->rcCapImage, *lpPt)) { *pFlags = RBHT_CAPTION; TRACE("ON CAPTION %d\n", iCount); return; } else if (PtInRect (&lpBand->rcCapText, *lpPt)) { *pFlags = RBHT_CAPTION; TRACE("ON CAPTION %d\n", iCount); return; } else if (PtInRect (&lpBand->rcChild, *lpPt)) { *pFlags = RBHT_CLIENT; TRACE("ON CLIENT %d\n", iCount); return; } else { *pFlags = RBHT_NOWHERE; TRACE("NOWHERE %d\n", iCount); return; } } } *pFlags = RBHT_NOWHERE; if (pBand) *pBand = -1; TRACE("NOWHERE\n"); return; } } else { *pFlags = RBHT_NOWHERE; if (pBand) *pBand = -1; TRACE("NOWHERE\n"); return; } TRACE("flags=0x%X\n", *pFlags); return; } /* << REBAR_BeginDrag >> */ static LRESULT REBAR_DeleteBand (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); UINT uBand = (UINT)wParam; if (uBand >= infoPtr->uNumBands) return FALSE; TRACE("deleting band %u!\n", uBand); if (infoPtr->uNumBands == 1) { TRACE(" simple delete!\n"); COMCTL32_Free (infoPtr->bands); infoPtr->bands = NULL; infoPtr->uNumBands = 0; } else { REBAR_BAND *oldBands = infoPtr->bands; TRACE("complex delete! [uBand=%u]\n", uBand); infoPtr->uNumBands--; infoPtr->bands = COMCTL32_Alloc (sizeof (REBAR_BAND) * infoPtr->uNumBands); if (uBand > 0) { memcpy (&infoPtr->bands[0], &oldBands[0], uBand * sizeof(REBAR_BAND)); } if (uBand < infoPtr->uNumBands) { memcpy (&infoPtr->bands[uBand], &oldBands[uBand+1], (infoPtr->uNumBands - uBand) * sizeof(REBAR_BAND)); } COMCTL32_Free (oldBands); } REBAR_Layout (hwnd, NULL); REBAR_ForceResize (hwnd); REBAR_MoveChildWindows (hwnd); return TRUE; } /* << REBAR_DragMove >> */ /* << REBAR_EndDrag >> */ static LRESULT REBAR_GetBandBorders (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); /* LPRECT32 lpRect = (LPRECT32)lParam; */ REBAR_BAND *lpBand; if (!lParam) return 0; if ((UINT)wParam >= infoPtr->uNumBands) return 0; lpBand = &infoPtr->bands[(UINT)wParam]; if (GetWindowLongA (hwnd, GWL_STYLE) & RBS_BANDBORDERS) { } else { } return 0; } inline static LRESULT REBAR_GetBandCount (HWND hwnd) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); TRACE("band count %u!\n", infoPtr->uNumBands); return infoPtr->uNumBands; } static LRESULT REBAR_GetBandInfoA (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); LPREBARBANDINFOA lprbbi = (LPREBARBANDINFOA)lParam; REBAR_BAND *lpBand; if (lprbbi == NULL) return FALSE; if (lprbbi->cbSize < REBARBANDINFO_V3_SIZEA) return FALSE; if ((UINT)wParam >= infoPtr->uNumBands) return FALSE; TRACE("index %u\n", (UINT)wParam); /* copy band information */ lpBand = &infoPtr->bands[(UINT)wParam]; if (lprbbi->fMask & RBBIM_STYLE) lprbbi->fStyle = lpBand->fStyle; if (lprbbi->fMask & RBBIM_COLORS) { lprbbi->clrFore = lpBand->clrFore; lprbbi->clrBack = lpBand->clrBack; } if ((lprbbi->fMask & RBBIM_TEXT) && (lprbbi->lpText) && (lpBand->lpText)) { lstrcpynWtoA (lprbbi->lpText, lpBand->lpText, lprbbi->cch); } if (lprbbi->fMask & RBBIM_IMAGE) lprbbi->iImage = lpBand->iImage; if (lprbbi->fMask & RBBIM_CHILD) lprbbi->hwndChild = lpBand->hwndChild; if (lprbbi->fMask & RBBIM_CHILDSIZE) { lprbbi->cxMinChild = lpBand->cxMinChild; lprbbi->cyMinChild = lpBand->cyMinChild; lprbbi->cyMaxChild = lpBand->cyMaxChild; lprbbi->cyChild = lpBand->cyChild; lprbbi->cyIntegral = lpBand->cyIntegral; } if (lprbbi->fMask & RBBIM_SIZE) lprbbi->cx = lpBand->cx; if (lprbbi->fMask & RBBIM_BACKGROUND) lprbbi->hbmBack = lpBand->hbmBack; if (lprbbi->fMask & RBBIM_ID) lprbbi->wID = lpBand->wID; /* check for additional data */ if (lprbbi->cbSize >= sizeof (REBARBANDINFOA)) { if (lprbbi->fMask & RBBIM_IDEALSIZE) lprbbi->cxIdeal = lpBand->cxIdeal; if (lprbbi->fMask & RBBIM_LPARAM) lprbbi->lParam = lpBand->lParam; if (lprbbi->fMask & RBBIM_HEADERSIZE) lprbbi->cxHeader = lpBand->cxHeader; } return TRUE; } static LRESULT REBAR_GetBandInfoW (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); LPREBARBANDINFOW lprbbi = (LPREBARBANDINFOW)lParam; REBAR_BAND *lpBand; if (lprbbi == NULL) return FALSE; if (lprbbi->cbSize < REBARBANDINFO_V3_SIZEW) return FALSE; if ((UINT)wParam >= infoPtr->uNumBands) return FALSE; TRACE("index %u\n", (UINT)wParam); /* copy band information */ lpBand = &infoPtr->bands[(UINT)wParam]; if (lprbbi->fMask & RBBIM_STYLE) lprbbi->fStyle = lpBand->fStyle; if (lprbbi->fMask & RBBIM_COLORS) { lprbbi->clrFore = lpBand->clrFore; lprbbi->clrBack = lpBand->clrBack; } if ((lprbbi->fMask & RBBIM_TEXT) && (lprbbi->lpText) && (lpBand->lpText)) { lstrcpynW (lprbbi->lpText, lpBand->lpText, lprbbi->cch); } if (lprbbi->fMask & RBBIM_IMAGE) lprbbi->iImage = lpBand->iImage; if (lprbbi->fMask & RBBIM_CHILD) lprbbi->hwndChild = lpBand->hwndChild; if (lprbbi->fMask & RBBIM_CHILDSIZE) { lprbbi->cxMinChild = lpBand->cxMinChild; lprbbi->cyMinChild = lpBand->cyMinChild; lprbbi->cyMaxChild = lpBand->cyMaxChild; lprbbi->cyChild = lpBand->cyChild; lprbbi->cyIntegral = lpBand->cyIntegral; } if (lprbbi->fMask & RBBIM_SIZE) lprbbi->cx = lpBand->cx; if (lprbbi->fMask & RBBIM_BACKGROUND) lprbbi->hbmBack = lpBand->hbmBack; if (lprbbi->fMask & RBBIM_ID) lprbbi->wID = lpBand->wID; /* check for additional data */ if (lprbbi->cbSize >= sizeof (REBARBANDINFOA)) { if (lprbbi->fMask & RBBIM_IDEALSIZE) lprbbi->cxIdeal = lpBand->cxIdeal; if (lprbbi->fMask & RBBIM_LPARAM) lprbbi->lParam = lpBand->lParam; if (lprbbi->fMask & RBBIM_HEADERSIZE) lprbbi->cxHeader = lpBand->cxHeader; } return TRUE; } static LRESULT REBAR_GetBarHeight (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); INT nHeight; REBAR_Layout (hwnd, NULL); nHeight = infoPtr->calcSize.cy; if (GetWindowLongA (hwnd, GWL_STYLE) & WS_BORDER) nHeight += (2 * GetSystemMetrics(SM_CYEDGE)); FIXME("height = %d\n", nHeight); return nHeight; } static LRESULT REBAR_GetBarInfo (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); LPREBARINFO lpInfo = (LPREBARINFO)lParam; if (lpInfo == NULL) return FALSE; if (lpInfo->cbSize < sizeof (REBARINFO)) return FALSE; TRACE("getting bar info!\n"); if (infoPtr->himl) { lpInfo->himl = infoPtr->himl; lpInfo->fMask |= RBIM_IMAGELIST; } return TRUE; } inline static LRESULT REBAR_GetBkColor (HWND hwnd) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); TRACE("background color 0x%06lx!\n", infoPtr->clrBk); return infoPtr->clrBk; } /* << REBAR_GetColorScheme >> */ /* << REBAR_GetDropTarget >> */ static LRESULT REBAR_GetPalette (HWND hwnd, WPARAM wParam, LPARAM lParam) { FIXME("empty stub!\n"); return 0; } static LRESULT REBAR_GetRect (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); INT iBand = (INT)wParam; LPRECT lprc = (LPRECT)lParam; REBAR_BAND *lpBand; if ((iBand < 0) && ((UINT)iBand >= infoPtr->uNumBands)) return FALSE; if (!lprc) return FALSE; TRACE("band %d\n", iBand); lpBand = &infoPtr->bands[iBand]; CopyRect (lprc, &lpBand->rcBand); /* lprc->left = lpBand->rcBand.left; lprc->top = lpBand->rcBand.top; lprc->right = lpBand->rcBand.right; lprc->bottom = lpBand->rcBand.bottom; */ return TRUE; } inline static LRESULT REBAR_GetRowCount (HWND hwnd) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); FIXME("%u : semi stub!\n", infoPtr->uNumBands); return infoPtr->uNumBands; } static LRESULT REBAR_GetRowHeight (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); */ FIXME("-- height = 20: semi stub!\n"); return 20; } inline static LRESULT REBAR_GetTextColor (HWND hwnd) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); TRACE("text color 0x%06lx!\n", infoPtr->clrText); return infoPtr->clrText; } inline static LRESULT REBAR_GetToolTips (HWND hwnd) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); return infoPtr->hwndToolTip; } inline static LRESULT REBAR_GetUnicodeFormat (HWND hwnd) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); return infoPtr->bUnicode; } inline static LRESULT REBAR_GetVersion (HWND hwnd) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); return infoPtr->iVersion; } static LRESULT REBAR_HitTest (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); */ LPRBHITTESTINFO lprbht = (LPRBHITTESTINFO)lParam; if (!lprbht) return -1; REBAR_InternalHitTest (hwnd, &lprbht->pt, &lprbht->flags, &lprbht->iBand); return lprbht->iBand; } static LRESULT REBAR_IdToIndex (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); UINT i; if (infoPtr == NULL) return -1; if (infoPtr->uNumBands < 1) return -1; TRACE("id %u\n", (UINT)wParam); for (i = 0; i < infoPtr->uNumBands; i++) { if (infoPtr->bands[i].wID == (UINT)wParam) { TRACE("band %u found!\n", i); return i; } } TRACE("no band found!\n"); return -1; } static LRESULT REBAR_InsertBandA (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); LPREBARBANDINFOA lprbbi = (LPREBARBANDINFOA)lParam; UINT uIndex = (UINT)wParam; REBAR_BAND *lpBand; if (infoPtr == NULL) return FALSE; if (lprbbi == NULL) return FALSE; if (lprbbi->cbSize < REBARBANDINFO_V3_SIZEA) return FALSE; TRACE("insert band at %u!\n", uIndex); if (infoPtr->uNumBands == 0) { infoPtr->bands = (REBAR_BAND *)COMCTL32_Alloc (sizeof (REBAR_BAND)); uIndex = 0; } else { REBAR_BAND *oldBands = infoPtr->bands; infoPtr->bands = (REBAR_BAND *)COMCTL32_Alloc ((infoPtr->uNumBands+1)*sizeof(REBAR_BAND)); if (((INT)uIndex == -1) || (uIndex > infoPtr->uNumBands)) uIndex = infoPtr->uNumBands; /* pre insert copy */ if (uIndex > 0) { memcpy (&infoPtr->bands[0], &oldBands[0], uIndex * sizeof(REBAR_BAND)); } /* post copy */ if (uIndex < infoPtr->uNumBands - 1) { memcpy (&infoPtr->bands[uIndex+1], &oldBands[uIndex], (infoPtr->uNumBands - uIndex - 1) * sizeof(REBAR_BAND)); } COMCTL32_Free (oldBands); } infoPtr->uNumBands++; TRACE("index %u!\n", uIndex); /* initialize band (infoPtr->bands[uIndex])*/ lpBand = &infoPtr->bands[uIndex]; if (lprbbi->fMask & RBBIM_STYLE) lpBand->fStyle = lprbbi->fStyle; if (lprbbi->fMask & RBBIM_COLORS) { lpBand->clrFore = lprbbi->clrFore; lpBand->clrBack = lprbbi->clrBack; } else { lpBand->clrFore = CLR_NONE; lpBand->clrBack = CLR_NONE; } if ((lprbbi->fMask & RBBIM_TEXT) && (lprbbi->lpText)) { INT len = lstrlenA (lprbbi->lpText); if (len > 0) { lpBand->lpText = (LPWSTR)COMCTL32_Alloc ((len + 1)*sizeof(WCHAR)); lstrcpyAtoW (lpBand->lpText, lprbbi->lpText); } } if (lprbbi->fMask & RBBIM_IMAGE) lpBand->iImage = lprbbi->iImage; else lpBand->iImage = -1; if (lprbbi->fMask & RBBIM_CHILD) { TRACE("hwndChild = %x\n", lprbbi->hwndChild); lpBand->hwndChild = lprbbi->hwndChild; lpBand->hwndPrevParent = SetParent (lpBand->hwndChild, hwnd); } if (lprbbi->fMask & RBBIM_CHILDSIZE) { lpBand->cxMinChild = lprbbi->cxMinChild; lpBand->cyMinChild = lprbbi->cyMinChild; lpBand->cyMaxChild = lprbbi->cyMaxChild; lpBand->cyChild = lprbbi->cyChild; lpBand->cyIntegral = lprbbi->cyIntegral; } else { lpBand->cxMinChild = -1; lpBand->cyMinChild = -1; lpBand->cyMaxChild = -1; lpBand->cyChild = -1; lpBand->cyIntegral = -1; } if (lprbbi->fMask & RBBIM_SIZE) lpBand->cx = lprbbi->cx; else lpBand->cx = -1; if (lprbbi->fMask & RBBIM_BACKGROUND) lpBand->hbmBack = lprbbi->hbmBack; if (lprbbi->fMask & RBBIM_ID) lpBand->wID = lprbbi->wID; /* check for additional data */ if (lprbbi->cbSize >= sizeof (REBARBANDINFOA)) { if (lprbbi->fMask & RBBIM_IDEALSIZE) lpBand->cxIdeal = lprbbi->cxIdeal; if (lprbbi->fMask & RBBIM_LPARAM) lpBand->lParam = lprbbi->lParam; if (lprbbi->fMask & RBBIM_HEADERSIZE) lpBand->cxHeader = lprbbi->cxHeader; } REBAR_Layout (hwnd, NULL); REBAR_ForceResize (hwnd); REBAR_MoveChildWindows (hwnd); return TRUE; } static LRESULT REBAR_InsertBandW (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); LPREBARBANDINFOW lprbbi = (LPREBARBANDINFOW)lParam; UINT uIndex = (UINT)wParam; REBAR_BAND *lpBand; if (infoPtr == NULL) return FALSE; if (lprbbi == NULL) return FALSE; if (lprbbi->cbSize < REBARBANDINFO_V3_SIZEW) return FALSE; TRACE("insert band at %u!\n", uIndex); if (infoPtr->uNumBands == 0) { infoPtr->bands = (REBAR_BAND *)COMCTL32_Alloc (sizeof (REBAR_BAND)); uIndex = 0; } else { REBAR_BAND *oldBands = infoPtr->bands; infoPtr->bands = (REBAR_BAND *)COMCTL32_Alloc ((infoPtr->uNumBands+1)*sizeof(REBAR_BAND)); if (((INT)uIndex == -1) || (uIndex > infoPtr->uNumBands)) uIndex = infoPtr->uNumBands; /* pre insert copy */ if (uIndex > 0) { memcpy (&infoPtr->bands[0], &oldBands[0], uIndex * sizeof(REBAR_BAND)); } /* post copy */ if (uIndex < infoPtr->uNumBands - 1) { memcpy (&infoPtr->bands[uIndex+1], &oldBands[uIndex], (infoPtr->uNumBands - uIndex - 1) * sizeof(REBAR_BAND)); } COMCTL32_Free (oldBands); } infoPtr->uNumBands++; TRACE("index %u!\n", uIndex); /* initialize band (infoPtr->bands[uIndex])*/ lpBand = &infoPtr->bands[uIndex]; if (lprbbi->fMask & RBBIM_STYLE) lpBand->fStyle = lprbbi->fStyle; if (lprbbi->fMask & RBBIM_COLORS) { lpBand->clrFore = lprbbi->clrFore; lpBand->clrBack = lprbbi->clrBack; } else { lpBand->clrFore = CLR_NONE; lpBand->clrBack = CLR_NONE; } if ((lprbbi->fMask & RBBIM_TEXT) && (lprbbi->lpText)) { INT len = lstrlenW (lprbbi->lpText); if (len > 0) { lpBand->lpText = (LPWSTR)COMCTL32_Alloc ((len + 1)*sizeof(WCHAR)); lstrcpyW (lpBand->lpText, lprbbi->lpText); } } if (lprbbi->fMask & RBBIM_IMAGE) lpBand->iImage = lprbbi->iImage; else lpBand->iImage = -1; if (lprbbi->fMask & RBBIM_CHILD) { TRACE("hwndChild = %x\n", lprbbi->hwndChild); lpBand->hwndChild = lprbbi->hwndChild; lpBand->hwndPrevParent = SetParent (lpBand->hwndChild, hwnd); } if (lprbbi->fMask & RBBIM_CHILDSIZE) { lpBand->cxMinChild = lprbbi->cxMinChild; lpBand->cyMinChild = lprbbi->cyMinChild; lpBand->cyMaxChild = lprbbi->cyMaxChild; lpBand->cyChild = lprbbi->cyChild; lpBand->cyIntegral = lprbbi->cyIntegral; } else { lpBand->cxMinChild = -1; lpBand->cyMinChild = -1; lpBand->cyMaxChild = -1; lpBand->cyChild = -1; lpBand->cyIntegral = -1; } if (lprbbi->fMask & RBBIM_SIZE) lpBand->cx = lprbbi->cx; else lpBand->cx = -1; if (lprbbi->fMask & RBBIM_BACKGROUND) lpBand->hbmBack = lprbbi->hbmBack; if (lprbbi->fMask & RBBIM_ID) lpBand->wID = lprbbi->wID; /* check for additional data */ if (lprbbi->cbSize >= sizeof (REBARBANDINFOW)) { if (lprbbi->fMask & RBBIM_IDEALSIZE) lpBand->cxIdeal = lprbbi->cxIdeal; if (lprbbi->fMask & RBBIM_LPARAM) lpBand->lParam = lprbbi->lParam; if (lprbbi->fMask & RBBIM_HEADERSIZE) lpBand->cxHeader = lprbbi->cxHeader; } REBAR_Layout (hwnd, NULL); REBAR_ForceResize (hwnd); REBAR_MoveChildWindows (hwnd); return TRUE; } static LRESULT REBAR_MaximizeBand (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); */ FIXME("(uBand = %u fIdeal = %s)\n", (UINT)wParam, lParam ? "TRUE" : "FALSE"); return 0; } static LRESULT REBAR_MinimizeBand (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); */ FIXME("(uBand = %u)\n", (UINT)wParam); return 0; } static LRESULT REBAR_MoveBand (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); */ FIXME("(iFrom = %u iTof = %u)\n", (UINT)wParam, (UINT)lParam); return FALSE; } static LRESULT REBAR_SetBandInfoA (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); LPREBARBANDINFOA lprbbi = (LPREBARBANDINFOA)lParam; REBAR_BAND *lpBand; if (lprbbi == NULL) return FALSE; if (lprbbi->cbSize < REBARBANDINFO_V3_SIZEA) return FALSE; if ((UINT)wParam >= infoPtr->uNumBands) return FALSE; TRACE("index %u\n", (UINT)wParam); /* set band information */ lpBand = &infoPtr->bands[(UINT)wParam]; if (lprbbi->fMask & RBBIM_STYLE) lpBand->fStyle = lprbbi->fStyle; if (lprbbi->fMask & RBBIM_COLORS) { lpBand->clrFore = lprbbi->clrFore; lpBand->clrBack = lprbbi->clrBack; } if (lprbbi->fMask & RBBIM_TEXT) { if (lpBand->lpText) { COMCTL32_Free (lpBand->lpText); lpBand->lpText = NULL; } if (lprbbi->lpText) { INT len = lstrlenA (lprbbi->lpText); lpBand->lpText = (LPWSTR)COMCTL32_Alloc ((len + 1)*sizeof(WCHAR)); lstrcpyAtoW (lpBand->lpText, lprbbi->lpText); } } if (lprbbi->fMask & RBBIM_IMAGE) lpBand->iImage = lprbbi->iImage; if (lprbbi->fMask & RBBIM_CHILD) { if (lprbbi->hwndChild) { lpBand->hwndChild = lprbbi->hwndChild; lpBand->hwndPrevParent = SetParent (lpBand->hwndChild, hwnd); } else { TRACE("child: 0x%x prev parent: 0x%x\n", lpBand->hwndChild, lpBand->hwndPrevParent); lpBand->hwndChild = 0; lpBand->hwndPrevParent = 0; } } if (lprbbi->fMask & RBBIM_CHILDSIZE) { lpBand->cxMinChild = lprbbi->cxMinChild; lpBand->cyMinChild = lprbbi->cyMinChild; lpBand->cyMaxChild = lprbbi->cyMaxChild; lpBand->cyChild = lprbbi->cyChild; lpBand->cyIntegral = lprbbi->cyIntegral; } if (lprbbi->fMask & RBBIM_SIZE) lpBand->cx = lprbbi->cx; if (lprbbi->fMask & RBBIM_BACKGROUND) lpBand->hbmBack = lprbbi->hbmBack; if (lprbbi->fMask & RBBIM_ID) lpBand->wID = lprbbi->wID; /* check for additional data */ if (lprbbi->cbSize >= sizeof (REBARBANDINFOA)) { if (lprbbi->fMask & RBBIM_IDEALSIZE) lpBand->cxIdeal = lprbbi->cxIdeal; if (lprbbi->fMask & RBBIM_LPARAM) lpBand->lParam = lprbbi->lParam; if (lprbbi->fMask & RBBIM_HEADERSIZE) lpBand->cxHeader = lprbbi->cxHeader; } REBAR_Layout (hwnd, NULL); REBAR_ForceResize (hwnd); REBAR_MoveChildWindows (hwnd); return TRUE; } static LRESULT REBAR_SetBandInfoW (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); LPREBARBANDINFOW lprbbi = (LPREBARBANDINFOW)lParam; REBAR_BAND *lpBand; if (lprbbi == NULL) return FALSE; if (lprbbi->cbSize < REBARBANDINFO_V3_SIZEW) return FALSE; if ((UINT)wParam >= infoPtr->uNumBands) return FALSE; TRACE("index %u\n", (UINT)wParam); /* set band information */ lpBand = &infoPtr->bands[(UINT)wParam]; if (lprbbi->fMask & RBBIM_STYLE) lpBand->fStyle = lprbbi->fStyle; if (lprbbi->fMask & RBBIM_COLORS) { lpBand->clrFore = lprbbi->clrFore; lpBand->clrBack = lprbbi->clrBack; } if (lprbbi->fMask & RBBIM_TEXT) { if (lpBand->lpText) { COMCTL32_Free (lpBand->lpText); lpBand->lpText = NULL; } if (lprbbi->lpText) { INT len = lstrlenW (lprbbi->lpText); lpBand->lpText = (LPWSTR)COMCTL32_Alloc ((len + 1)*sizeof(WCHAR)); lstrcpyW (lpBand->lpText, lprbbi->lpText); } } if (lprbbi->fMask & RBBIM_IMAGE) lpBand->iImage = lprbbi->iImage; if (lprbbi->fMask & RBBIM_CHILD) { if (lprbbi->hwndChild) { lpBand->hwndChild = lprbbi->hwndChild; lpBand->hwndPrevParent = SetParent (lpBand->hwndChild, hwnd); } else { TRACE("child: 0x%x prev parent: 0x%x\n", lpBand->hwndChild, lpBand->hwndPrevParent); lpBand->hwndChild = 0; lpBand->hwndPrevParent = 0; } } if (lprbbi->fMask & RBBIM_CHILDSIZE) { lpBand->cxMinChild = lprbbi->cxMinChild; lpBand->cyMinChild = lprbbi->cyMinChild; lpBand->cyMaxChild = lprbbi->cyMaxChild; lpBand->cyChild = lprbbi->cyChild; lpBand->cyIntegral = lprbbi->cyIntegral; } if (lprbbi->fMask & RBBIM_SIZE) lpBand->cx = lprbbi->cx; if (lprbbi->fMask & RBBIM_BACKGROUND) lpBand->hbmBack = lprbbi->hbmBack; if (lprbbi->fMask & RBBIM_ID) lpBand->wID = lprbbi->wID; /* check for additional data */ if (lprbbi->cbSize >= sizeof (REBARBANDINFOW)) { if (lprbbi->fMask & RBBIM_IDEALSIZE) lpBand->cxIdeal = lprbbi->cxIdeal; if (lprbbi->fMask & RBBIM_LPARAM) lpBand->lParam = lprbbi->lParam; if (lprbbi->fMask & RBBIM_HEADERSIZE) lpBand->cxHeader = lprbbi->cxHeader; } REBAR_Layout (hwnd, NULL); REBAR_ForceResize (hwnd); REBAR_MoveChildWindows (hwnd); return TRUE; } static LRESULT REBAR_SetBarInfo (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); LPREBARINFO lpInfo = (LPREBARINFO)lParam; if (lpInfo == NULL) return FALSE; if (lpInfo->cbSize < sizeof (REBARINFO)) return FALSE; TRACE("setting bar info!\n"); if (lpInfo->fMask & RBIM_IMAGELIST) { infoPtr->himl = lpInfo->himl; if (infoPtr->himl) { ImageList_GetIconSize (infoPtr->himl, &infoPtr->imageSize.cx, &infoPtr->imageSize.cy); } else { infoPtr->imageSize.cx = 0; infoPtr->imageSize.cy = 0; } } return TRUE; } static LRESULT REBAR_SetBkColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); COLORREF clrTemp; clrTemp = infoPtr->clrBk; infoPtr->clrBk = (COLORREF)lParam; TRACE("background color 0x%06lx!\n", infoPtr->clrBk); return clrTemp; } /* << REBAR_SetColorScheme >> */ /* << REBAR_SetPalette >> */ static LRESULT REBAR_SetParent (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); HWND hwndTemp = infoPtr->hwndNotify; infoPtr->hwndNotify = (HWND)wParam; return (LRESULT)hwndTemp; } static LRESULT REBAR_SetTextColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); COLORREF clrTemp; clrTemp = infoPtr->clrText; infoPtr->clrText = (COLORREF)lParam; TRACE("text color 0x%06lx!\n", infoPtr->clrText); return clrTemp; } /* << REBAR_SetTooltips >> */ inline static LRESULT REBAR_SetUnicodeFormat (HWND hwnd, WPARAM wParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); BOOL bTemp = infoPtr->bUnicode; infoPtr->bUnicode = (BOOL)wParam; return bTemp; } static LRESULT REBAR_SetVersion (HWND hwnd, INT iVersion) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); INT iOldVersion = infoPtr->iVersion; if (iVersion > COMCTL32_VERSION) return -1; infoPtr->iVersion = iVersion; return iOldVersion; } static LRESULT REBAR_ShowBand (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); REBAR_BAND *lpBand; if (((INT)wParam < 0) || ((INT)wParam > infoPtr->uNumBands)) return FALSE; lpBand = &infoPtr->bands[(INT)wParam]; if ((BOOL)lParam) { TRACE("show band %d\n", (INT)wParam); lpBand->fStyle = lpBand->fStyle & ~RBBS_HIDDEN; if (IsWindow (lpBand->hwndChild)) ShowWindow (lpBand->hwndChild, SW_SHOW); } else { TRACE("hide band %d\n", (INT)wParam); lpBand->fStyle = lpBand->fStyle | RBBS_HIDDEN; if (IsWindow (lpBand->hwndChild)) ShowWindow (lpBand->hwndChild, SW_SHOW); } REBAR_Layout (hwnd, NULL); REBAR_ForceResize (hwnd); REBAR_MoveChildWindows (hwnd); return TRUE; } static LRESULT REBAR_SizeToRect (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); LPRECT lpRect = (LPRECT)lParam; if (lpRect == NULL) return FALSE; FIXME("layout change not implemented!\n"); FIXME("[%d %d %d %d]\n", lpRect->left, lpRect->top, lpRect->right, lpRect->bottom); #if 0 SetWindowPos (hwnd, 0, lpRect->left, lpRect->top, lpRect->right - lpRect->left, lpRect->bottom - lpRect->top, SWP_NOZORDER); #endif infoPtr->calcSize.cx = lpRect->right - lpRect->left; infoPtr->calcSize.cy = lpRect->bottom - lpRect->top; REBAR_ForceResize (hwnd); return TRUE; } static LRESULT REBAR_Create (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr; /* allocate memory for info structure */ infoPtr = (REBAR_INFO *)COMCTL32_Alloc (sizeof(REBAR_INFO)); SetWindowLongA (hwnd, 0, (DWORD)infoPtr); /* initialize info structure */ infoPtr->iVersion = 0; infoPtr->clrBk = CLR_NONE; infoPtr->clrText = RGB(0, 0, 0); infoPtr->bAutoResize = FALSE; infoPtr->hcurArrow = LoadCursorA (0, IDC_ARROWA); infoPtr->hcurHorz = LoadCursorA (0, IDC_SIZEWEA); infoPtr->hcurVert = LoadCursorA (0, IDC_SIZENSA); infoPtr->hcurDrag = LoadCursorA (0, IDC_SIZEA); infoPtr->bUnicode = IsWindowUnicode (hwnd); if (GetWindowLongA (hwnd, GWL_STYLE) & RBS_AUTOSIZE) FIXME("style RBS_AUTOSIZE set!\n"); #if 0 SendMessageA (hwnd, WM_NOTIFYFORMAT, (WPARAM)hwnd, NF_QUERY); #endif TRACE("created!\n"); return 0; } static LRESULT REBAR_Destroy (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); REBAR_BAND *lpBand; INT i; /* free rebar bands */ if ((infoPtr->uNumBands > 0) && infoPtr->bands) { /* clean up each band */ for (i = 0; i < infoPtr->uNumBands; i++) { lpBand = &infoPtr->bands[i]; /* delete text strings */ if (lpBand->lpText) { COMCTL32_Free (lpBand->lpText); lpBand->lpText = NULL; } /* destroy child window */ DestroyWindow (lpBand->hwndChild); } /* free band array */ COMCTL32_Free (infoPtr->bands); infoPtr->bands = NULL; } DeleteObject (infoPtr->hcurArrow); DeleteObject (infoPtr->hcurHorz); DeleteObject (infoPtr->hcurVert); DeleteObject (infoPtr->hcurDrag); /* free rebar info data */ COMCTL32_Free (infoPtr); SetWindowLongA (hwnd, 0, 0); TRACE("destroyed!\n"); return 0; } static LRESULT REBAR_GetFont (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); return (LRESULT)infoPtr->hFont; } #if 0 static LRESULT REBAR_MouseMove (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); return 0; } #endif inline static LRESULT REBAR_NCCalcSize (HWND hwnd, WPARAM wParam, LPARAM lParam) { if (GetWindowLongA (hwnd, GWL_STYLE) & WS_BORDER) { ((LPRECT)lParam)->left += GetSystemMetrics(SM_CXEDGE); ((LPRECT)lParam)->top += GetSystemMetrics(SM_CYEDGE); ((LPRECT)lParam)->right -= GetSystemMetrics(SM_CXEDGE); ((LPRECT)lParam)->bottom -= GetSystemMetrics(SM_CYEDGE); } return 0; } static LRESULT REBAR_NCPaint (HWND hwnd, WPARAM wParam, LPARAM lParam) { DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); RECT rcWindow; HDC hdc; if (dwStyle & WS_MINIMIZE) return 0; /* Nothing to do */ DefWindowProcA (hwnd, WM_NCPAINT, wParam, lParam); if (!(hdc = GetDCEx( hwnd, 0, DCX_USESTYLE | DCX_WINDOW ))) return 0; if (dwStyle & WS_BORDER) { GetWindowRect (hwnd, &rcWindow); OffsetRect (&rcWindow, -rcWindow.left, -rcWindow.top); DrawEdge (hdc, &rcWindow, EDGE_ETCHED, BF_RECT); } ReleaseDC( hwnd, hdc ); return 0; } static LRESULT REBAR_Paint (HWND hwnd, WPARAM wParam) { HDC hdc; PAINTSTRUCT ps; hdc = wParam==0 ? BeginPaint (hwnd, &ps) : (HDC)wParam; REBAR_Refresh (hwnd, hdc); if (!wParam) EndPaint (hwnd, &ps); return 0; } static LRESULT REBAR_SetCursor (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); POINT pt; UINT flags; TRACE("code=0x%X id=0x%X\n", LOWORD(lParam), HIWORD(lParam)); GetCursorPos (&pt); ScreenToClient (hwnd, &pt); REBAR_InternalHitTest (hwnd, &pt, &flags, NULL); if (flags == RBHT_GRABBER) { if ((dwStyle & CCS_VERT) && !(dwStyle & RBS_VERTICALGRIPPER)) SetCursor (infoPtr->hcurVert); else SetCursor (infoPtr->hcurHorz); } else if (flags != RBHT_CLIENT) SetCursor (infoPtr->hcurArrow); return 0; } static LRESULT REBAR_SetFont (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); /* TEXTMETRIC32A tm; */ HFONT hFont /*, hOldFont */; /* HDC32 hdc; */ infoPtr->hFont = (HFONT)wParam; hFont = infoPtr->hFont ? infoPtr->hFont : GetStockObject (SYSTEM_FONT); /* hdc = GetDC32 (0); hOldFont = SelectObject32 (hdc, hFont); GetTextMetrics32A (hdc, &tm); infoPtr->nHeight = tm.tmHeight + VERT_BORDER; SelectObject32 (hdc, hOldFont); ReleaseDC32 (0, hdc); */ if (lParam) { /* REBAR_Layout (hwnd); hdc = GetDC32 (hwnd); REBAR_Refresh (hwnd, hdc); ReleaseDC32 (hwnd, hdc); */ } return 0; } static LRESULT REBAR_Size (HWND hwnd, WPARAM wParam, LPARAM lParam) { REBAR_INFO *infoPtr = REBAR_GetInfoPtr (hwnd); /* DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); */ RECT rcParent; /* INT32 x, y, cx, cy; */ /* auto resize deadlock check */ if (infoPtr->bAutoResize) { infoPtr->bAutoResize = FALSE; return 0; } TRACE("sizing rebar!\n"); /* get parent rectangle */ GetClientRect (GetParent (hwnd), &rcParent); /* REBAR_Layout (hwnd, &rcParent); if (dwStyle & CCS_VERT) { if (dwStyle & CCS_LEFT == CCS_LEFT) { x = rcParent.left; y = rcParent.top; cx = infoPtr->calcSize.cx; cy = infoPtr->calcSize.cy; } else { x = rcParent.right - infoPtr->calcSize.cx; y = rcParent.top; cx = infoPtr->calcSize.cx; cy = infoPtr->calcSize.cy; } } else { if (dwStyle & CCS_TOP) { x = rcParent.left; y = rcParent.top; cx = infoPtr->calcSize.cx; cy = infoPtr->calcSize.cy; } else { x = rcParent.left; y = rcParent.bottom - infoPtr->calcSize.cy; cx = infoPtr->calcSize.cx; cy = infoPtr->calcSize.cy; } } SetWindowPos32 (hwnd, 0, x, y, cx, cy, SWP_NOZORDER | SWP_SHOWWINDOW); */ REBAR_Layout (hwnd, NULL); REBAR_ForceResize (hwnd); REBAR_MoveChildWindows (hwnd); return 0; } static LRESULT WINAPI REBAR_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TRACE("hwnd=%x msg=%x wparam=%x lparam=%lx\n", hwnd, uMsg, wParam, lParam); if (!REBAR_GetInfoPtr (hwnd) && (uMsg != WM_CREATE)) return DefWindowProcA (hwnd, uMsg, wParam, lParam); switch (uMsg) { /* case RB_BEGINDRAG: */ case RB_DELETEBAND: return REBAR_DeleteBand (hwnd, wParam, lParam); /* case RB_DRAGMOVE: */ /* case RB_ENDDRAG: */ case RB_GETBANDBORDERS: return REBAR_GetBandBorders (hwnd, wParam, lParam); case RB_GETBANDCOUNT: return REBAR_GetBandCount (hwnd); /* case RB_GETBANDINFO32: */ /* outdated, just for compatibility */ case RB_GETBANDINFOA: return REBAR_GetBandInfoA (hwnd, wParam, lParam); case RB_GETBANDINFOW: return REBAR_GetBandInfoW (hwnd, wParam, lParam); case RB_GETBARHEIGHT: return REBAR_GetBarHeight (hwnd, wParam, lParam); case RB_GETBARINFO: return REBAR_GetBarInfo (hwnd, wParam, lParam); case RB_GETBKCOLOR: return REBAR_GetBkColor (hwnd); /* case RB_GETCOLORSCHEME: */ /* case RB_GETDROPTARGET: */ case RB_GETPALETTE: return REBAR_GetPalette (hwnd, wParam, lParam); case RB_GETRECT: return REBAR_GetRect (hwnd, wParam, lParam); case RB_GETROWCOUNT: return REBAR_GetRowCount (hwnd); case RB_GETROWHEIGHT: return REBAR_GetRowHeight (hwnd, wParam, lParam); case RB_GETTEXTCOLOR: return REBAR_GetTextColor (hwnd); case RB_GETTOOLTIPS: return REBAR_GetToolTips (hwnd); case RB_GETUNICODEFORMAT: return REBAR_GetUnicodeFormat (hwnd); case CCM_GETVERSION: return REBAR_GetVersion (hwnd); case RB_HITTEST: return REBAR_HitTest (hwnd, wParam, lParam); case RB_IDTOINDEX: return REBAR_IdToIndex (hwnd, wParam, lParam); case RB_INSERTBANDA: return REBAR_InsertBandA (hwnd, wParam, lParam); case RB_INSERTBANDW: return REBAR_InsertBandW (hwnd, wParam, lParam); case RB_MAXIMIZEBAND: return REBAR_MaximizeBand (hwnd, wParam, lParam); case RB_MINIMIZEBAND: return REBAR_MinimizeBand (hwnd, wParam, lParam); case RB_MOVEBAND: return REBAR_MoveBand (hwnd, wParam, lParam); case RB_SETBANDINFOA: return REBAR_SetBandInfoA (hwnd, wParam, lParam); case RB_SETBANDINFOW: return REBAR_SetBandInfoW (hwnd, wParam, lParam); case RB_SETBARINFO: return REBAR_SetBarInfo (hwnd, wParam, lParam); case RB_SETBKCOLOR: return REBAR_SetBkColor (hwnd, wParam, lParam); /* case RB_SETCOLORSCHEME: */ /* case RB_SETPALETTE: */ /* return REBAR_GetPalette (hwnd, wParam, lParam); */ case RB_SETPARENT: return REBAR_SetParent (hwnd, wParam, lParam); case RB_SETTEXTCOLOR: return REBAR_SetTextColor (hwnd, wParam, lParam); /* case RB_SETTOOLTIPS: */ case RB_SETUNICODEFORMAT: return REBAR_SetUnicodeFormat (hwnd, wParam); case CCM_SETVERSION: return REBAR_SetVersion (hwnd, (INT)wParam); case RB_SHOWBAND: return REBAR_ShowBand (hwnd, wParam, lParam); case RB_SIZETORECT: return REBAR_SizeToRect (hwnd, wParam, lParam); case WM_COMMAND: return SendMessageA (GetParent (hwnd), uMsg, wParam, lParam); case WM_CREATE: return REBAR_Create (hwnd, wParam, lParam); case WM_DESTROY: return REBAR_Destroy (hwnd, wParam, lParam); case WM_GETFONT: return REBAR_GetFont (hwnd, wParam, lParam); /* case WM_MOUSEMOVE: */ /* return REBAR_MouseMove (hwnd, wParam, lParam); */ case WM_NCCALCSIZE: return REBAR_NCCalcSize (hwnd, wParam, lParam); case WM_NCPAINT: return REBAR_NCPaint (hwnd, wParam, lParam); case WM_NOTIFY: return SendMessageA (GetParent (hwnd), uMsg, wParam, lParam); case WM_PAINT: return REBAR_Paint (hwnd, wParam); case WM_SETCURSOR: return REBAR_SetCursor (hwnd, wParam, lParam); case WM_SETFONT: return REBAR_SetFont (hwnd, wParam, lParam); case WM_SIZE: return REBAR_Size (hwnd, wParam, lParam); /* case WM_TIMER: */ /* case WM_WININICHANGE: */ default: if (uMsg >= WM_USER) ERR("unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); return DefWindowProcA (hwnd, uMsg, wParam, lParam); } return 0; } VOID REBAR_Register (void) { WNDCLASSA wndClass; ZeroMemory (&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS | CS_DBLCLKS; wndClass.lpfnWndProc = (WNDPROC)REBAR_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(REBAR_INFO *); wndClass.hCursor = 0; wndClass.hbrBackground = (HBRUSH)(COLOR_BTNFACE + 1); wndClass.lpszClassName = REBARCLASSNAMEA; RegisterClassA (&wndClass); } VOID REBAR_Unregister (void) { UnregisterClassA (REBARCLASSNAMEA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/rsrc.rc0100644000175000001440000013032207103361646016334 0ustar julliardusers#include "windef.h" #include "winuser.h" #include "comctl32.h" IDD_PROPSHEET DIALOG DISCARDABLE 0, 0, 292, 159 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU | WS_VISIBLE CAPTION "Properties for " FONT 8, "MS Sans Serif" BEGIN DEFPUSHBUTTON "OK", IDOK,72,138,50,14 PUSHBUTTON "Cancel", IDCANCEL,127,138,50,14 PUSHBUTTON "&Apply", IDC_APPLY_BUTTON,181,138,50,14 PUSHBUTTON "Help", IDHELP,235,138,50,14,WS_TABSTOP|WS_GROUP CONTROL "Tab", IDC_TABCONTROL,"SysTabControl32",WS_CLIPSIBLINGS|WS_TABSTOP,7,7,278,125 END IDD_WIZARD DIALOG DISCARDABLE 0, 0, 292, 159 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU | WS_VISIBLE CAPTION "Wizard" FONT 8, "MS Sans Serif" BEGIN DEFPUSHBUTTON "Finish", IDC_FINISH_BUTTON,121,138,50,14 DEFPUSHBUTTON "&Next >", IDC_NEXT_BUTTON,121,138,50,14 PUSHBUTTON "< &Back", IDC_BACK_BUTTON,71,138,50,14 PUSHBUTTON "Cancel", IDCANCEL,178,138,50,14 PUSHBUTTON "Help", IDHELP,235,138,50,14,WS_GROUP LTEXT "", IDC_SUNKEN_LINE,7,129,278,1,SS_SUNKEN CONTROL "Tab", IDC_TABCONTROL,"SysTabControl32",WS_CLIPSIBLINGS | WS_DISABLED,7,7,258,5 END IDD_TBCUSTOMIZE DIALOG DISCARDABLE 10, 20, 357, 125 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "Customize Toolbar" FONT 8, "MS Sans Serif" BEGIN DEFPUSHBUTTON "&Close", IDCANCEL,308,6,44,14 PUSHBUTTON "R&eset", IDC_RESET_BTN,308,23,44,14 PUSHBUTTON "&Help", IDC_HELP_BTN,308,40,44,14 PUSHBUTTON "Move &Up", IDC_MOVEUP_BTN,308,74,44,14 PUSHBUTTON "Move &Down", IDC_MOVEDN_BTN,308,91,44,14 LTEXT "A&vailable buttons:", -1,4,5,84,10 LISTBOX IDC_AVAILBTN_LBOX,4,17,120,100, LBS_NOTIFY | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_NOINTEGRALHEIGHT | LBS_DISABLENOSCROLL | WS_BORDER | WS_VSCROLL | WS_HSCROLL | WS_TABSTOP PUSHBUTTON "&Add ->", IDOK, 131, 42, 44, 14 PUSHBUTTON "<- &Remove", IDC_REMOVE_BTN,131,62,44,14 LTEXT "&Toolbar buttons:", -1,182,5,78,10 LISTBOX IDC_TOOLBARBTN_LBOX, 182,17,120,100,LBS_NOTIFY | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_NOINTEGRALHEIGHT | LBS_DISABLENOSCROLL | WS_BORDER | WS_VSCROLL | WS_HSCROLL | WS_TABSTOP END IDD_MCMONTHMENU MENU LOADONCALL DISCARDABLE { POPUP "" BEGIN MENUITEM "&January", IDM_JAN MENUITEM "&February", IDM_FEB MENUITEM "&March", IDM_MAR MENUITEM "&April", IDM_APR MENUITEM "&May", IDM_MAY MENUITEM "J&une", IDM_JUN MENUITEM "Ju&ly", IDM_JUL MENUITEM "Au&gust", IDM_AUG MENUITEM "&September", IDM_SEP MENUITEM "&October", IDM_OCT MENUITEM "&November", IDM_NOV MENUITEM "&December", IDM_DEC END } IDT_CHECK BITMAP LOADONCALL DISCARDABLE { '42 4D 8E 01 00 00 00 00 00 00 5E 00 00 00 28 00' '00 00 1F 00 00 00 10 00 00 00 01 00 04 00 02 00' '00 00 30 01 00 00 01 00 00 00 01 00 00 00 0A 00' '00 00 0A 00 00 00 00 00 00 00 00 00 80 00 00 80' '00 00 80 00 00 00 C0 C0 C0 00 80 80 80 00 00 FF' '00 00 00 FF FF 00 FF 00 00 00 FF FF FF 00 1F 99' '00 00 01 99 0D 11 02 99 0E 11 01 99 00 00 01 99' '0D 11 02 99 0E 11 01 99 00 00 01 99 02 11 09 99' '02 11 02 99 02 11 0A 99 02 11 01 99 00 00 01 99' '02 11 09 99 02 11 02 99 02 11 0A 99 02 11 01 99' '00 00 01 99 02 11 09 99 02 11 02 99 02 11 03 99' '02 00 05 99 02 11 01 99 00 00 01 99 02 11 09 99' '02 11 02 99 02 11 03 99 03 00 04 99 02 11 01 99' '00 00 01 99 02 11 09 99 02 11 02 99 02 11 02 99' '04 00 04 99 02 11 01 99 00 00 01 99 02 11 09 99' '02 11 02 99 02 11 01 99 02 00 02 99 02 00 03 99' '02 11 01 99 00 00 01 99 02 11 09 99 02 11 02 99' '02 11 02 00 04 99 02 00 02 99 02 11 01 99 00 00' '01 99 02 11 09 99 02 11 02 99 02 11 01 00 06 99' '02 00 01 99 02 11 01 99 00 00 01 99 02 11 09 99' '02 11 02 99 02 11 07 99 02 00 01 99 01 00 01 11' '01 99 00 00 01 99 02 11 09 99 02 11 02 99 02 11' '08 99 01 00 01 99 01 00 01 11 01 99 00 00 01 99' '0D 11 02 99 0A 11 02 00 02 11 01 99 00 00 01 99' '0D 11 02 99 0E 11 01 99 00 00 1F 99 00 01' } STRINGTABLE DISCARDABLE { IDS_CLOSE "Close" } IDB_STD_SMALL BITMAP LOADONCALL DISCARDABLE { '42 4D 20 07 00 00 00 00 00 00 76 00 00 00 28 00' '00 00 F0 00 00 00 10 00 00 00 01 00 04 00 02 00' '00 00 AA 06 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 FF FF FF 00 00 00 80 00 00 80' '00 00 00 80 80 00 80 00 00 00 80 00 80 00 00 00' '00 00 80 80 80 00 C0 C0 C0 00 00 00 FF 00 00 FF' '00 00 00 FF FF 00 FF 00 00 00 FF 00 FF 00 FF FF' '00 00 00 66 66 00 CC 88 02 44 22 88 00 00 04 88' '00 04 84 48 1E 88 0A 44 52 88 0C 66 02 68 0C 66' '02 88 0E 66 08 88 00 04 86 68 12 88 04 84 02 48' '08 88 02 44 08 88 0A 66 00 04 68 88 00 00 04 88' '00 08 48 84 88 44 0A 88 02 84 08 44 02 86 04 66' '02 40 06 00 02 04 22 88 02 86 0A 88 00 04 68 88' '0A 66 00 04 68 88 0A 66 02 68 04 88 00 04 86 33' '06 66 00 08 88 63 68 60 08 00 00 08 06 86 66 60' '08 00 02 06 08 88 00 04 86 68 12 88 00 06 48 44' '48 00 06 88 00 04 84 44 06 88 02 86 08 88 04 86' '02 88 00 00 04 88 02 48 04 84 00 04 88 48 08 88' '02 84 06 00 00 04 04 67 04 37 02 40 06 66 02 04' '22 88 00 04 66 68 0C 88 02 60 08 00 00 06 68 88' '66 00 08 33 02 36 04 88 00 04 86 33 06 66 00 08' '88 63 68 60 06 00 06 66 00 08 68 60 66 06 04 66' '02 06 08 88 02 66 04 88 00 04 44 48 0A 88 04 84' '02 44 04 88 04 66 00 04 44 48 06 88 0C 66 04 68' '00 00 04 88 02 48 04 84 00 04 88 48 08 88 00 04' '84 06 04 66 00 04 04 63 04 73 02 40 06 00 02 04' '22 88 04 66 06 88 02 86 04 88 02 60 08 00 00 08' '68 88 6B 63 08 33 00 08 68 88 86 33 06 66 00 08' '88 63 68 60 04 00 00 0C 06 78 87 66 88 60 08 00' '02 06 04 88 00 06 68 88 66 00 04 88 00 04 44 48' '06 88 04 66 00 10 48 44 48 88 86 78 07 64 04 88' '00 06 18 88 68 00 04 88 00 0A 8B BB 88 66 68 00' '00 00 04 88 00 0E 84 44 84 88 48 88 86 00 04 66' '02 64 06 00 00 04 04 67 04 37 00 06 40 66 60 00' '04 44 0C 88 02 48 04 88 02 84 0E 88 00 04 86 66' '06 88 02 68 04 88 02 60 08 00 00 08 68 88 60 B6' '08 33 00 08 36 88 86 33 08 66 00 06 63 68 60 00' '04 00 00 10 67 88 E7 76 88 60 66 06 04 66 02 06' '04 88 00 06 66 86 68 00 0C 88 00 0A 66 88 80 74' '44 00 04 88 00 12 67 88 80 76 88 81 18 88 68 00' '04 88 00 06 87 77 88 00 04 68 00 00 06 88 04 84' '02 44 04 88 02 86 04 00 00 04 04 06 04 66 00 04' '04 63 04 73 02 40 04 00 00 06 40 48 88 00 04 44' '02 48 04 88 02 48 04 88 02 84 04 88 02 84 04 44' '06 88 00 0A 66 68 88 86 68 00 04 88 02 60 08 00' '00 0A 68 88 6B 0B 63 00 08 33 00 04 68 86 0C 33' '00 04 68 60 04 00 00 0C 68 88 87 86 88 60 08 00' '02 06 04 88 04 66 02 68 04 88 00 0A 44 48 88 86' '78 00 04 88 00 04 07 68 04 88 02 68 04 88 00 04' '06 88 04 11 02 18 0C 66 00 04 68 86 00 00 06 88' '00 04 84 64 06 88 00 08 86 06 66 64 06 00 00 04' '04 67 04 37 02 40 04 00 02 44 04 88 04 44 06 88' '02 84 04 88 02 48 06 88 04 44 06 88 00 08 86 66' '88 66 06 88 02 60 08 00 00 0A 68 88 60 B0 B6 00' '0A 66 00 04 86 33 08 66 00 06 33 68 60 00 04 00' '00 0C 68 E8 87 86 88 60 06 00 00 04 60 06 04 88' '08 66 00 0A 88 44 48 88 86 00 06 88 00 04 80 68' '04 88 00 12 68 0E 88 86 88 81 18 81 68 00 08 88' '06 86 00 00 08 88 02 68 06 88 02 86 04 00 00 06' '04 06 60 00 04 44 02 63 04 73 06 44 02 46 04 88' '00 04 44 48 06 88 02 84 04 88 02 48 06 88 00 04' '84 44 08 88 04 66 02 68 06 88 02 60 08 00 00 06' '68 88 6B 00 08 0B 02 68 04 88 00 04 86 36 08 88' '00 06 63 68 60 00 04 00 00 16 67 EE 87 76 88 60' '66 00 06 86 06 00 04 88 06 66 00 0C 68 88 84 44' '88 68 08 88 02 86 04 88 00 08 67 00 88 76 04 88' '00 06 18 81 86 00 08 66 04 68 02 66 00 00 06 88' '00 04 86 66 06 88 00 08 86 06 66 64 04 00 00 06' '40 48 67 00 0A 37 02 36 04 88 00 04 44 84 06 88' '02 84 04 88 02 48 06 88 00 04 48 44 08 88 00 04' '86 66 08 88 02 60 08 00 00 06 68 88 60 00 08 B0' '02 68 04 88 00 04 86 36 08 88 00 06 63 68 60 00' '04 00 00 10 06 78 87 68 88 60 68 60 04 68 00 06' '66 68 44 00 06 66 06 88 00 06 44 48 68 00 08 88' '02 86 04 88 00 08 86 78 87 68 06 88 00 06 81 88' '60 00 06 00 02 06 04 86 00 00 06 88 04 86 06 88' '02 86 04 00 02 04 04 00 00 08 44 88 63 76 06 66' '00 04 67 76 04 88 00 06 48 88 44 00 04 88 02 48' '04 88 02 84 04 88 00 06 44 88 84 00 08 88 04 66' '02 68 06 88 02 60 08 00 00 08 68 88 6B 0B 06 66' '02 68 04 88 00 04 86 36 08 88 00 06 63 68 60 00' '06 00 04 66 04 88 00 04 60 06 06 86 00 06 88 86' '44 00 04 66 00 10 68 84 44 88 84 44 68 0E 06 88' '02 86 06 88 04 66 00 04 88 81 08 88 00 04 86 06' '04 66 00 06 06 66 68 00 00 00 06 88 00 06 66 86' '68 00 04 88 00 08 86 06 60 64 04 44 00 08 48 88' '67 76 06 88 00 04 67 36 0A 88 04 44 08 88 04 44' '0C 88 00 08 86 66 88 66 06 88 02 60 04 00 00 0C' '06 66 68 88 86 66 08 88 00 08 66 68 86 36 08 88' '00 06 63 68 60 00 08 00 02 06 04 88 04 66 06 68' '04 88 02 44 04 66 00 10 88 84 44 88 84 44 68 0E' '06 88 02 86 0C 88 00 06 81 88 18 00 04 88 02 86' '08 00 00 04 68 88 00 00 06 88 00 06 68 88 68 00' '04 88 02 86 04 00 00 04 60 68 06 88 00 0E 63 73' '6B 66 B6 73 76 00 24 88 00 0C 86 66 68 88 86 68' '04 88 02 60 04 00 04 06 10 88 00 08 86 68 86 36' '08 88 00 06 66 68 60 00 06 00 04 66 08 88 04 86' '06 88 00 18 44 66 68 88 84 44 88 84 44 86 00 EE' '04 88 02 68 0C 88 00 06 81 88 11 00 06 88 02 60' '04 66 00 06 60 68 88 00 00 00 06 88 00 06 68 88' '68 00 04 88 02 86 04 00 02 66 08 88 02 86 04 66' '02 BB 04 66 02 68 24 88 04 66 06 88 02 66 04 88' '02 60 04 00 00 04 06 68 0C 88 00 04 68 88 04 68' '00 04 86 36 08 88 04 68 02 60 06 00 04 68 0A 88' '02 68 04 88 00 06 86 44 66 00 06 88 06 44 00 0E' '48 86 70 00 88 87 68 00 0E 88 04 11 02 18 04 88' '02 60 06 00 00 04 06 88 00 00 06 88 00 06 68 88' '68 00 04 88 02 86 04 66 02 68 0C 88 00 06 86 66' '68 00 28 88 00 04 66 68 08 88 00 04 68 88 08 66' '0E 88 00 04 86 66 04 88 02 86 0C 66 00 04 68 60' '06 00 02 66 0C 88 02 86 04 66 00 06 68 44 68 00' '06 88 02 84 04 44 04 88 02 66 04 88 02 66 12 88' '02 11 06 88 02 86 08 66 02 88 00 00 90 88 08 66' '02 68 2A 88 04 66 14 88 02 18 12 88 00 00 00 01' } /* BINRES idb_std_large.bmp */ IDB_STD_LARGE BITMAP LOADONCALL DISCARDABLE { '42 4D D6 0A 00 00 00 00 00 00 76 00 00 00 28 00' '00 00 68 01 00 00 18 00 00 00 01 00 04 00 02 00' '00 00 60 0A 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 80 00 00 80' '00 00 00 80 80 00 80 00 00 00 80 00 80 00 00 80' '00 00 C0 C0 C0 00 80 80 80 00 00 00 FF 00 00 FF' '00 00 00 FF FF 00 FF 00 00 00 FF 00 FF 00 FF FF' '00 00 FF FF FF 00 FF 77 69 77 00 00 07 77 03 44' 'FF 77 5F 77 00 00 06 77 01 47 03 77 01 47 14 77' '0E 44 5F 77 01 07 06 77 11 00 1F 77 12 00 19 77' '02 00 03 77 10 00 30 77 02 44 10 77 02 44 0C 77' '10 00 05 77 00 00 06 77 01 47 03 77 01 47 04 77' '03 44 0D 77 01 4F 0C FF 01 47 0D 77 0B 44 34 77' '04 00 16 77 01 0F 0F FF 01 07 04 77 11 00 09 77' '01 03 03 33 09 00 03 77 00 04 03 30 04 77 10 00' '03 77 03 00 03 77 01 0F 0E FF 01 07 0E 77 03 00' '1E 77 03 47 01 47 0E 77 03 47 01 47 0A 77 01 07' '0E 77 04 07 03 77 00 00 06 77 01 47 03 77 01 47' '03 77 01 47 03 77 01 47 0C 77 01 4F 0C FF 01 47' '0D 77 01 4F 09 FF 01 47 34 77 05 00 0D 77 01 07' '07 77 01 0F 0F FF 01 07 04 77 02 00 0F 33 01 07' '08 77 01 03 03 33 09 00 03 77 00 04 03 30 04 77' '01 0F 0E FF 01 07 02 77 04 00 03 77 01 0F 0E FF' '01 07 0E 77 03 00 04 77 03 44 16 77 03 47 02 44' '0D 77 03 47 02 44 0A 77 01 07 0E 77 02 07 03 70' '02 77 00 00 06 77 01 47 03 77 01 47 03 77 01 47' '03 77 01 47 0C 77 01 4F 02 FF 08 00 01 FF 02 F4' '0D 77 02 4F 07 00 02 F4 34 77 05 00 0C 77 01 07' '08 77 01 0F 0F FF 01 07 04 77 03 0F 0F 33 01 07' '07 77 01 03 03 33 09 00 03 77 00 04 03 30 04 77' '01 0F 0A FF 0A 00 04 77 00 04 0F F0 03 0F 06 00' '01 FF 02 F0 0D 77 03 00 04 77 05 44 14 77 03 47' '02 44 0D 77 03 47 02 44 0A 77 12 00 01 77 03 70' '01 70 00 00 06 77 01 47 03 77 01 47 03 77 01 47' '03 77 01 47 06 77 06 00 01 4F 0C FF 01 47 06 77' '07 00 01 4F 09 FF 01 47 35 77 05 00 0A 77 02 00' '08 77 01 0F 0F FF 01 07 04 77 00 04 0B F0 0F 33' '01 07 06 77 01 03 03 33 09 00 03 77 00 04 03 30' '04 77 01 0F 09 FF 02 08 03 77 01 80 04 00 05 77' '01 0F 0E FF 01 07 07 77 01 07 05 77 03 00 05 77' '03 44 14 77 03 47 02 44 09 77 04 00 03 47 02 44' '0B 77 01 07 10 77 01 00 02 07 03 70 00 00 07 77' '04 44 03 77 01 47 03 77 01 47 06 77 01 0F 05 FF' '01 4F 02 FF 08 00 01 FF 02 F4 05 77 01 03 07 38' '02 4F 07 00 02 F4 12 77 02 44 0D 77 02 44 13 77' '04 00 09 77 02 00 09 77 01 0F 0F FF 01 07 04 77' '01 0F 03 FB 01 03 0F 33 01 07 05 77 01 03 03 33' '09 00 03 77 00 04 03 30 04 77 01 0F 08 FF 00 0A' '08 77 EE 88 00 77 06 77 00 04 0F F0 03 0F 06 00' '01 FF 02 F0 07 77 02 00 03 77 03 00 15 77 05 00' '01 77 04 74 02 44 08 77 02 00 03 77 02 F8 03 44' '0C 77 01 07 0B 77 03 BB 01 77 07 70 00 00 0A 77' '01 47 03 77 04 44 07 77 01 0F 05 FF 01 4F 0C FF' '01 47 05 77 01 08 07 83 01 4F 09 FF 01 47 14 77' '01 47 0B 77 01 47 16 77 04 00 07 77 03 00 09 77' '01 0F 0F FF 01 07 04 77 01 0B 04 BF 01 03 0F 33' '01 07 04 77 01 03 03 33 0D 00 01 33 02 30 04 77' '01 0F 07 FF 02 08 05 77 00 04 E7 80 06 77 01 0F' '0E FF 01 07 07 77 03 00 02 77 03 00 06 77 03 44' '0A 77 02 00 05 77 01 00 02 07 03 44 08 77 02 08' '05 77 01 F8 02 80 0D 77 01 07 0B 77 03 88 01 77' '03 70 02 70 02 07 00 00 0A 77 01 44 03 47 01 47' '0A 77 01 0F 02 FF 03 00 01 4F 02 FF 08 00 01 FF' '02 F4 05 77 01 03 07 38 02 4F 03 00 02 FF 04 44' '06 77 06 44 09 77 01 47 09 77 01 47 09 77 06 44' '09 77 04 00 05 77 03 00 0A 77 01 0F 0F FF 01 07' '04 77 01 0F 05 FB 01 03 0F 33 01 07 03 77 01 03' '12 33 01 07 04 77 01 0F 07 FF 01 07 06 77 02 8E' '03 70 05 77 00 04 0F F0 03 0F 06 00 01 FF 02 F0' '07 77 07 00 07 77 03 44 09 77 02 08 05 77 01 FF' '02 F8 03 44 09 77 01 07 07 77 02 F0 06 77 01 17' '06 77 13 00 01 77 03 70 00 00 0B 77 04 47 0A 77' '01 0F 05 FF 01 4F 0C FF 01 47 05 77 01 08 07 83' '01 4F 06 FF 03 4F 07 77 05 44 0B 77 01 47 07 77' '01 47 0B 77 05 44 0A 77 04 00 03 77 03 00 0B 77' '01 0F 0F FF 01 07 04 77 01 0B 06 BF 01 03 0F 33' '00 04 07 70 12 33 01 07 04 77 01 0F 07 FF 01 07' '06 77 02 8E 03 70 05 77 01 0F 0E FF 01 07 07 77' '0B 00 03 77 03 44 08 77 02 08 08 77 01 F8 02 80' '09 77 01 07 0A 77 01 07 04 77 02 11 06 77 01 07' '10 77 04 07 02 70 00 00 0B 77 03 40 0B 77 01 0F' '02 FF 03 00 01 4F 02 FF 08 00 01 FF 02 F4 05 77' '01 03 07 38 01 4F 06 FF 02 44 08 77 04 44 0C 77' '01 47 07 77 01 47 0C 77 04 44 0B 77 04 00 01 70' '03 00 0C 77 01 0F 0F FF 01 07 04 77 01 0F 07 FB' '10 00 01 77 02 70 03 33 0C 00 03 33 01 07 04 77' '01 0F 07 FF 01 07 03 7E 03 77 02 87 03 70 05 77' '00 04 0F F0 03 0F 06 00 01 FF 02 F0 07 77 0A 00' '05 77 03 44 07 77 01 07 0A 77 02 F0 09 77 01 07' '0A 77 01 07 03 77 06 11 04 77 01 07 0F 77 02 07' '04 70 00 00 0C 77 01 07 0C 77 01 0F 05 FF 01 4F' '0C FF 01 47 05 77 01 08 07 83 08 44 09 77 04 44' '0C 77 01 47 07 77 01 47 0C 77 04 44 0C 77 06 00' '0D 77 01 0F 0F FF 01 07 04 77 01 0B 10 BF 01 07' '08 77 00 04 03 30 0C 77 00 04 03 30 04 77 01 0F' '07 FF 01 08 02 8E 04 77 03 87 01 07 06 77 01 0F' '0E FF 01 07 07 77 09 00 07 77 03 44 05 77 01 07' '0B 77 01 F7 03 70 07 77 00 04 07 FE 07 77 01 07' '04 77 02 11 03 77 01 17 04 77 0F 00 03 70 02 70' '01 00 00 00 0B 77 03 00 0B 77 01 0F 02 FF 03 00' '01 4F 02 FF 04 00 02 FF 05 44 05 77 01 03 0E 38' '01 07 09 77 01 44 02 47 03 74 0A 77 01 47 07 77' '01 47 0B 77 00 05 47 74 47 88 0D 77 04 00 0E 77' '01 0F 0F FF 01 07 04 77 01 0F 10 FB 01 07 08 77' '00 04 03 30 0C 77 00 04 03 30 04 77 01 0F 08 FF' '00 09 08 EE 77 88 07 68 07 77 01 0F 09 FF 01 0F' '04 FF 01 07 07 77 08 00 02 77 03 44 04 77 03 44' '04 77 01 07 03 7F 0A 77 01 07 08 77 00 04 07 FE' '07 77 01 07 05 77 01 17 03 77 01 17 05 77 01 0F' '0C FF 01 00 04 07 02 70 00 00 0B 77 04 07 0A 77' '01 0F 05 FF 01 4F 08 FF 00 04 4F F4 06 77 01 08' '0E 83 01 07 09 77 01 47 04 77 01 47 09 77 01 47' '09 77 01 47 09 77 01 47 04 77 01 47 0C 77 06 00' '0D 77 01 0F 0F FF 01 07 04 77 01 0B 10 BF 01 07' '08 77 00 04 03 30 0C 77 00 04 03 30 04 77 01 0F' '09 FF 02 08 03 77 02 80 08 77 01 0F 03 FF 02 00' '03 FF 03 07 03 FF 01 07 07 77 07 00 03 77 03 44' '04 77 04 44 03 77 00 04 07 FE 0A 77 01 07 09 77' '00 05 0F FE E7 88 04 77 01 07 0A 77 01 17 05 77' '01 0F 02 FF 08 00 02 FF 03 00 04 70 00 00 0A 77' '01 00 03 07 01 07 0A 77 01 0F 02 FF 03 00 01 4F' '08 FF 03 4F 07 77 01 03 0E 38 01 07 0F 77 02 44' '05 77 02 44 0B 77 02 44 05 77 02 44 10 77 04 00' '02 77 03 00 0C 77 01 0F 0F FF 01 07 04 77 01 0F' '06 FB 0B 00 08 77 00 04 03 30 0C 77 00 04 03 30' '04 77 01 0F 0A FF 05 00 09 77 01 0F 03 FF 03 07' '01 F0 05 07 03 00 02 44 05 77 06 00 04 77 03 44' '04 77 04 44 03 77 00 05 07 FF E7 00 09 77 01 07' '09 77 02 08 03 FF 03 77 02 80 03 77 01 17 06 77' '01 17 06 77 01 0F 0C FF 05 00 01 70 00 00 0A 77' '01 07 03 77 01 07 0A 77 01 0F 05 FF 01 4F 08 FF' '02 44 08 77 01 08 02 83 0A 00 01 83 02 30 11 77' '05 44 0F 77 05 44 11 77 04 00 04 77 03 00 0B 77' '01 0F 0A FF 06 00 05 77 01 0F 04 FB 01 07 13 77' '00 04 03 30 0C 77 00 04 03 30 04 77 01 0F 0E FF' '01 07 09 77 01 0F 04 FF 08 07 00 05 77 04 47 00' '05 77 05 00 05 77 03 44 04 77 04 44 03 77 00 05' '07 7F E7 63 09 77 01 07 0A 77 02 00 04 77 02 00' '04 77 01 17 06 77 01 17 06 77 01 0F 02 FF 08 00' '01 FF 02 F0 05 77 00 00 09 77 02 00 03 77 02 00' '09 77 01 0F 02 FF 03 00 0A 44 09 77 00 04 03 80' '08 77 00 04 03 80 39 77 05 00 07 77 02 00 0A 77' '01 0F 0A FF 01 0F 03 FF 01 07 07 77 04 00 0C 77' '05 00 03 77 00 04 03 30 0C 77 00 04 03 30 04 77' '01 0F 0A FF 05 00 09 77 07 00 05 70 04 77 02 44' '05 77 04 00 07 77 03 44 02 77 04 44 05 77 00 06' '07 FF EE 77 06 77 01 07 0D 77 04 00 06 77 01 17' '0E 77 01 0F 0C FF 01 07 04 77 00 00 09 77 01 07' '05 77 01 07 09 77 01 0F 08 FF 00 04 0F F0 0C 77' '01 08 03 83 00 08 0B B0 0B B0 03 38 01 07 38 77' '05 00 09 77 02 00 09 77 01 0F 0A FF 00 04 0F F0' '19 77 04 00 03 77 00 04 03 30 0C 77 00 04 03 30' '04 77 01 0F 0A FF 00 04 0F F0 11 77 04 07 05 77' '02 44 05 77 03 00 09 77 07 44 06 77 01 08 02 88' '03 FF 01 E7 04 77 02 80 17 77 01 17 03 77 01 17' '0A 77 01 0F 02 FF 08 00 01 FF 02 F0 04 77 00 00' '09 77 01 07 05 77 01 07 09 77 01 0F 08 FF 03 0F' '0E 77 05 00 04 BB 05 00 38 77 05 00 0B 77 02 00' '08 77 01 0F 0A FF 03 0F 1B 77 03 00 03 77 00 04' '03 30 0C 77 04 00 04 77 01 0F 0A FF 03 0F 13 77' '01 07 06 77 01 04 02 44 05 77 02 00 18 77 00 04' '08 77 03 FF 00 04 77 80 18 77 01 17 03 77 02 11' '0A 77 01 0F 0C FF 01 07 03 77 00 00 09 77 01 07' '05 77 01 07 09 77 01 0F 08 FF 02 00 13 77 06 00' '3B 77 05 00 0E 77 02 00 06 77 01 0F 0A FF 02 00' '14 77 01 07 06 77 03 07 01 07 03 77 00 04 03 30' '0C 77 00 04 07 F0 04 77 01 0F 0A FF 02 00 15 77' '06 00 01 74 02 44 05 77 01 07 1A 77 02 00 05 77' '02 00 1A 77 06 11 0A 77 0D 00 03 77 00 00 09 77' '01 07 05 77 01 07 09 77 0A 00 55 77 04 00 17 77' '0C 00 16 77 01 07 04 77 01 07 03 77 01 07 03 77' '14 00 04 77 0C 00 41 77 05 00 1F 77 02 11 1B 77' '00 00 B6 77 04 00 91 77 01 17 1C 77 00 00 FF 77' '69 77 00 00 00 01' } /* BINRES idb_view_small.bmp */ IDB_VIEW_SMALL BITMAP LOADONCALL DISCARDABLE { '42 4D 36 10 00 00 00 00 00 00 36 04 00 00 28 00' '00 00 C0 00 00 00 10 00 00 00 01 00 08 00 00 00' '00 00 00 0C 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 80 00 00 80' '00 00 00 80 80 00 80 00 00 00 80 00 80 00 80 80' '00 00 C0 C0 C0 00 C0 DC C0 00 F0 CA A6 00 04 04' '04 00 08 08 08 00 0C 0C 0C 00 11 11 11 00 16 16' '16 00 1C 1C 1C 00 22 22 22 00 29 29 29 00 55 55' '55 00 4D 4D 4D 00 42 42 42 00 39 39 39 00 80 7C' 'FF 00 50 50 FF 00 93 00 D6 00 FF EC CC 00 C6 D6' 'EF 00 D6 E7 E7 00 90 A9 AD 00 00 00 33 00 00 00' '66 00 00 00 99 00 00 00 CC 00 00 33 00 00 00 33' '33 00 00 33 66 00 00 33 99 00 00 33 CC 00 00 33' 'FF 00 00 66 00 00 00 66 33 00 00 66 66 00 00 66' '99 00 00 66 CC 00 00 66 FF 00 00 99 00 00 00 99' '33 00 00 99 66 00 00 99 99 00 00 99 CC 00 00 99' 'FF 00 00 CC 00 00 00 CC 33 00 00 CC 66 00 00 CC' '99 00 00 CC CC 00 00 CC FF 00 00 FF 66 00 00 FF' '99 00 00 FF CC 00 33 00 00 00 33 00 33 00 33 00' '66 00 33 00 99 00 33 00 CC 00 33 00 FF 00 33 33' '00 00 33 33 33 00 33 33 66 00 33 33 99 00 33 33' 'CC 00 33 33 FF 00 33 66 00 00 33 66 33 00 33 66' '66 00 33 66 99 00 33 66 CC 00 33 66 FF 00 33 99' '00 00 33 99 33 00 33 99 66 00 33 99 99 00 33 99' 'CC 00 33 99 FF 00 33 CC 00 00 33 CC 33 00 33 CC' '66 00 33 CC 99 00 33 CC CC 00 33 CC FF 00 33 FF' '33 00 33 FF 66 00 33 FF 99 00 33 FF CC 00 33 FF' 'FF 00 66 00 00 00 66 00 33 00 66 00 66 00 66 00' '99 00 66 00 CC 00 66 00 FF 00 66 33 00 00 66 33' '33 00 66 33 66 00 66 33 99 00 66 33 CC 00 66 33' 'FF 00 66 66 00 00 66 66 33 00 66 66 66 00 66 66' '99 00 66 66 CC 00 66 99 00 00 66 99 33 00 66 99' '66 00 66 99 99 00 66 99 CC 00 66 99 FF 00 66 CC' '00 00 66 CC 33 00 66 CC 99 00 66 CC CC 00 66 CC' 'FF 00 66 FF 00 00 66 FF 33 00 66 FF 99 00 66 FF' 'CC 00 CC 00 FF 00 FF 00 CC 00 99 99 00 00 99 33' '99 00 99 00 99 00 99 00 CC 00 99 00 00 00 99 33' '33 00 99 00 66 00 99 33 CC 00 99 00 FF 00 99 66' '00 00 99 66 33 00 99 33 66 00 99 66 99 00 99 66' 'CC 00 99 33 FF 00 99 99 33 00 99 99 66 00 99 99' '99 00 99 99 CC 00 99 99 FF 00 99 CC 00 00 99 CC' '33 00 66 CC 66 00 99 CC 99 00 99 CC CC 00 99 CC' 'FF 00 99 FF 00 00 99 FF 33 00 99 CC 66 00 99 FF' '99 00 99 FF CC 00 99 FF FF 00 CC 00 00 00 99 00' '33 00 CC 00 66 00 CC 00 99 00 CC 00 CC 00 99 33' '00 00 CC 33 33 00 CC 33 66 00 CC 33 99 00 CC 33' 'CC 00 CC 33 FF 00 CC 66 00 00 CC 66 33 00 99 66' '66 00 CC 66 99 00 CC 66 CC 00 99 66 FF 00 CC 99' '00 00 CC 99 33 00 CC 99 66 00 CC 99 99 00 CC 99' 'CC 00 CC 99 FF 00 CC CC 00 00 CC CC 33 00 CC CC' '66 00 CC CC 99 00 CC CC CC 00 CC CC FF 00 CC FF' '00 00 CC FF 33 00 99 FF 66 00 CC FF 99 00 CC FF' 'CC 00 CC FF FF 00 CC 00 33 00 FF 00 66 00 FF 00' '99 00 CC 33 00 00 FF 33 33 00 FF 33 66 00 FF 33' '99 00 FF 33 CC 00 FF 33 FF 00 FF 66 00 00 FF 66' '33 00 CC 66 66 00 FF 66 99 00 FF 66 CC 00 CC 66' 'FF 00 FF 99 00 00 FF 99 33 00 FF 99 66 00 FF 99' '99 00 FF 99 CC 00 FF 99 FF 00 FF CC 00 00 FF CC' '33 00 FF CC 66 00 FF CC 99 00 FF CC CC 00 FF CC' 'FF 00 FF FF 33 00 CC FF 66 00 FF FF 99 00 FF FF' 'CC 00 66 66 FF 00 66 FF 66 00 66 FF FF 00 FF 66' '66 00 FF 66 FF 00 FF FF 66 00 21 00 A5 00 5F 5F' '5F 00 77 77 77 00 86 86 86 00 96 96 96 00 CB CB' 'CB 00 B2 B2 B2 00 D7 D7 D7 00 DD DD DD 00 E3 E3' 'E3 00 EA EA EA 00 F1 F1 F1 00 F8 F8 F8 00 F0 FB' 'FF 00 A4 A0 A0 00 80 80 80 00 00 00 FF 00 00 FF' '00 00 00 FF FF 00 FF 00 00 00 FF 00 FF 00 FF FF' '00 00 FF FF FF 00 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 00' '00 00 00 00 00 07 07 07 07 04 04 04 07 07 07 07' '07 07 07 07 07 07 07 07 00 00 00 07 07 07 07 07' '07 07 07 07 07 07 07 00 00 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 04 04 04 04 07 07 07' '07 07 07 01 07 07 04 04 04 04 04 04 04 04 04 07' '07 07 07 01 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 01 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 01 07 07 07 07 92 92 92 92 92 92 92 92' '92 92 92 92 92 07 07 07 07 00 00 00 00 00 00 00' '00 00 00 00 00 00 07 07 07 00 07 00 07 00 07 00' '07 00 07 00 07 00 07 07 6D 6D 6D 6D 6D 6D 6D 6D' '6D 6D 6D 6D 6D 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 04 FF 04 07 00 00 00' '07 07 07 07 07 07 07 07 FF FF 00 07 00 00 00 00' '00 00 07 07 07 07 07 FF 00 07 00 00 00 00 07 00' '00 07 00 00 00 07 07 07 04 04 07 07 04 04 07 07' '07 07 01 01 01 07 04 FF FF FF FF FF FF FF 04 07' '07 07 01 01 01 07 07 07 07 07 07 07 07 07 07 07' '07 07 01 01 01 07 00 00 00 00 00 00 00 00 07 07' '07 07 01 01 01 07 07 00 00 00 00 00 00 00 00 00' '00 00 00 00 92 07 07 07 07 00 07 EC EC EC EC EC' 'EC EC EC EC EC 00 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 00 00 00 00 00 00 00 00 00' '00 00 00 00 6D 07 07 07 07 07 07 07 07 07 07 07' '04 04 04 04 07 07 07 07 07 04 04 07 07 07 07 07' '07 07 07 07 07 07 07 07 FF FF 00 07 00 00 00 00' '00 00 07 07 07 07 07 FF 00 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 04 04 07 07 07 07 07 07' '07 01 01 01 01 01 04 FF FF FF FF FF FF FF 04 07' '07 01 01 01 01 01 07 07 07 07 07 07 07 07 07 07' '07 01 01 01 01 01 00 FF FF FF FF FF FF 00 07 07' '07 01 01 01 01 01 07 00 FF DD DD DD DD D6 D6 D6' 'D6 D6 D6 00 92 07 07 07 07 00 07 07 07 07 07 07' '07 07 07 07 EC 00 07 07 07 00 07 07 00 07 00 07' '00 07 00 07 07 00 07 00 FF DD DD DD DD D6 D6 D6' 'D6 D6 D6 00 6D 07 07 07 07 07 07 07 07 07 07 07' '04 FF FF 04 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 FF FF 00 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 04 04 04 04 04 04 07 07' '07 07 07 01 07 07 04 FF FF FF FF FF FF FF 04 07' '07 07 07 01 07 07 07 00 00 00 00 00 00 00 00 00' '07 07 07 01 07 07 00 FF FF FF FF FF FF 00 07 07' '07 07 07 01 07 07 07 00 FF DD DD DD DD DD DD D6' 'D6 D6 D6 00 92 07 07 07 07 00 07 EC EC EC EC EC' 'EC EC EC EC EC 00 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 00 FF DD DD DD DD DD DD D6' 'D6 D6 D6 00 6D 07 07 07 07 07 07 07 07 07 07 07' '04 FF FF 04 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 00 00 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 04 04 07 07 04 04 07 07' '07 07 07 01 07 07 04 FF FF FF FF FF FF FF 04 07' '07 07 07 01 07 07 04 04 04 04 04 04 04 04 04 00' '07 07 07 01 07 07 00 FF FF FF FF FF FF 00 04 04' '04 07 07 01 07 07 07 00 FF DD DD DD DD DD DD DD' 'D6 D6 D6 00 92 07 07 07 07 00 07 07 07 07 07 07' '07 07 07 07 EC 00 07 07 07 00 07 07 00 07 00 07' '00 07 00 07 07 00 07 00 FF DD DD DD DD DD DD DD' 'D6 D6 D6 00 6D 07 07 07 07 07 07 07 07 07 07 07' '04 FF 04 04 07 07 07 07 07 07 07 07 07 07 04 04' '04 07 07 07 07 07 07 07 00 00 00 07 07 07 07 07' '07 07 07 07 07 07 07 FF 00 07 00 00 00 00 07 00' '00 07 00 00 00 07 07 07 07 04 04 04 04 07 07 07' '07 07 07 01 07 07 04 FF FF FF FF FF FF FF 04 07' '07 07 07 01 07 07 04 FF 07 FF 07 FF 07 07 04 00' '07 07 07 01 07 07 00 FF FF FF FF FF FF 00 FB FF' '04 07 07 01 07 07 07 00 FF DD DD DD DD 1F 1F 1F' 'D6 D6 D6 00 92 07 00 07 07 00 07 EC EC EC EC EC' 'EC EC 02 02 EC 00 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 00 FF DD DD DD DD DD DD DD' 'D6 FB D6 00 6D 07 07 00 00 00 00 00 00 07 07 07' '04 04 04 07 07 07 07 07 07 07 07 07 07 07 04 FF' '04 07 00 00 00 07 07 07 FF FF 00 07 00 00 00 00' '00 00 07 07 07 07 07 FF 00 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 01 07 07 04 FF FF FF FF FF FF FF 04 07' '07 07 07 01 07 07 04 07 FF 01 FF 01 01 07 04 00' '07 07 07 01 07 07 00 FF FF FF FF FF FF 00 FF FB' '04 07 07 01 07 07 07 00 FF DD DD DD DD DD DD DD' '1F D6 D6 00 92 07 07 00 07 00 07 00 EC EC EC EC' 'EC EC FA FA EC 00 07 07 07 00 07 07 07 07 07 07' '00 07 00 07 07 00 07 00 FF DD DD DD DD DD DD DD' 'D6 FB D6 00 6D 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 04 04' '07 07 07 07 07 07 07 07 FF FF 00 07 00 00 00 00' '00 00 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 01 07 07 04 FF FF FF FF FF FF FF 04 07' '07 07 07 01 07 07 04 FF 07 01 07 01 07 FF 04 00' '07 07 07 01 07 07 00 FF FF FF 00 00 00 00 FB FF' '04 07 07 01 07 07 07 00 FF DD DD DD DD DD DD DD' 'DD 1F D6 00 92 07 07 07 00 00 00 07 07 07 07 07' '07 07 07 07 07 00 01 01 07 07 01 01 07 07 07 07' '07 07 07 07 07 07 07 00 FF DD DD DD DD DD FB DD' 'DD FB D6 92 FB 07 07 07 04 04 04 04 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 FF FF 00 07 07 07 07 07' '07 07 07 07 07 07 07 00 00 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 04 04 04 04 04 07 07' '07 07 07 01 07 07 04 04 04 04 04 04 04 04 04 07' '07 07 07 01 07 07 04 07 01 01 FF 07 01 07 04 00' '07 07 07 01 07 07 00 FF FF FF 00 FF 00 FB FF FB' '04 07 07 01 07 07 07 00 FF FF FF FF FF FF FF FF' 'FF 1F C3 00 07 07 00 00 07 07 00 00 00 00 00 00' '00 00 00 00 00 00 07 01 01 01 01 07 07 00 07 00' '07 00 07 00 07 00 07 00 FF FF FF FF FF FF FF FB' 'FF FB C3 FB 07 07 07 07 04 FF FF 04 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 FF 00 07 00 00 00 00 07 00' '00 07 00 00 00 07 07 07 04 04 07 07 04 04 07 07' '07 07 07 01 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 01 07 07 04 FF 07 01 07 01 01 FF 04 00' '07 07 07 01 07 07 00 FF FF FF 00 00 FB FF FB FF' '04 07 07 01 07 07 07 00 D6 D6 D6 D6 D6 D6 D6 00' '00 1F 00 00 07 07 07 07 00 07 00 07 07 07 07 07' '07 07 07 07 07 07 07 07 01 01 07 07 07 07 07 07' '07 07 07 07 07 07 07 00 D6 D6 D6 D6 D6 D6 D6 92' 'FB FB FB 92 92 07 07 07 04 FF FF 04 07 07 07 07' '07 07 07 07 07 07 07 04 04 04 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 00 00 00 07 07 07 07 07' '07 07 07 07 07 07 07 FF 00 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 04 04 07 07 04 04 07 07' '07 07 07 01 07 07 07 07 07 07 07 04 04 04 04 07' '07 07 07 01 07 07 04 07 FF 07 FF 07 FF 07 04 00' '07 07 07 01 07 07 00 00 00 00 00 FB FF 04 04 04' '04 07 07 01 07 07 07 07 00 D6 D6 D6 D6 D6 00 07' '07 1F 07 07 07 07 07 00 07 00 07 00 07 07 07 07' '07 07 07 07 07 07 07 01 01 01 01 07 07 07 07 07' '07 07 07 07 07 07 07 07 00 D6 D6 D6 D6 FB FB FB' 'FB FB FB FB FB FB 07 07 04 FF 04 04 07 07 07 07' '07 07 07 07 07 07 07 04 FF 04 07 00 00 00 07 07' '07 07 07 07 07 07 07 07 FF FF 00 07 00 00 00 00' '00 00 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 04 04 04 04 04 07 07' '07 07 07 01 07 07 07 07 07 07 07 04 FF FF 04 07' '07 07 07 01 07 07 04 04 04 04 04 04 04 04 04 00' '07 07 07 01 07 07 07 07 07 04 FB FF FB 04 FB 04' '07 07 07 01 07 07 07 07 07 00 00 00 00 00 07 07' '07 1F 07 07 07 07 00 07 07 07 07 07 00 07 07 07' '07 07 07 07 07 07 01 01 07 07 01 01 07 07 07 07' '07 07 07 07 07 07 07 07 07 00 00 00 00 00 07 92' 'FB FB FB 92 07 07 07 07 04 04 04 07 07 07 07 07' '07 07 07 07 07 07 07 04 04 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 FF FF 00 07 00 00 00 00' '00 00 07 07 07 07 92 92 92 92 92 92 92 92 92 92' '92 92 92 92 92 92 07 07 07 07 07 07 04 04 07 07' '07 07 07 01 07 07 07 07 07 07 07 04 FF FF 04 07' '07 07 07 01 07 07 04 FC 04 FC FC FC 04 FC 04 00' '07 07 07 01 07 07 07 07 07 04 FF FB FF 04 04 07' '07 07 07 01 07 07 07 07 07 07 07 07 07 07 07 1F' '1F 1F 1F 1F 07 07 07 07 07 00 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 FF FB' '07 FB 07 FB 92 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 FF FF 00 07 07 07 07 07' '07 07 07 07 07 07 92 FF FF 92 FF FF FF FF 92 FF' 'FF 92 FF FF FF 92 07 07 07 04 04 04 04 07 07 07' '07 07 07 01 07 07 07 07 07 07 07 04 04 04 04 07' '07 07 07 01 07 07 04 04 04 04 04 04 04 04 04 07' '07 07 07 01 07 07 07 07 07 04 04 04 04 04 07 07' '07 07 07 01 07 07 07 07 07 07 07 07 07 07 07 07' '1F 1F 1F 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 FB 07' '07 FB 07 07 FB 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 92 92 92 92 92 92 92 92 92 92' '92 92 92 92 92 92 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 1F 07 07 07 07 07 07 07 00 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 07 07 07 07 07 07 07 07 07 07 07 07 07 07 07' '07 FB 07 07 07 07' } /* BINRES idb_view_large.bmp */ IDB_VIEW_LARGE BITMAP LOADONCALL MOVEABLE DISCARDABLE { '42 4D DE 08 00 00 00 00 00 00 76 00 00 00 28 00' '00 00 20 01 00 00 18 00 00 00 01 00 04 00 02 00' '00 00 68 08 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 80 00 00 80' '00 00 00 80 80 00 80 00 00 00 80 00 80 00 80 80' '00 00 C0 C0 C0 00 80 80 80 00 00 00 FF 00 00 FF' '00 00 00 FF FF 00 FF 00 00 00 FF 00 FF 00 FF FF' '00 00 FF FF FF 00 FE 77 22 77 00 00 78 77 0E 44' '04 77 02 71 16 77 02 71 16 77 02 71 64 77 00 00' '0C 77 02 70 08 00 08 77 04 44 0E 77 00 06 74 44' '47 00 06 77 04 44 08 77 00 04 74 77 04 00 00 0E' '07 00 07 00 07 00 07 00 08 77 06 44 06 77 02 71' '04 77 02 4F 0A FF 02 F4 04 77 00 04 11 17 14 77' '00 04 11 17 14 77 00 04 11 17 62 77 00 00 1E 77' '00 04 4F F4 0E 77 00 06 74 FF 47 00 06 77 00 04' '4F F4 24 77 00 0A 74 44 77 74 47 00 04 77 00 08' '11 17 77 4F 0A FF 00 06 F4 77 71 00 04 11 12 77' '02 71 04 11 12 77 02 71 04 11 00 04 77 70 16 00' '30 77 12 00 02 07 04 77 00 00 0E 77 06 44 02 47' '08 77 00 06 4F F4 70 00 06 00 06 77 00 06 74 FF' '47 00 04 00 00 08 07 4F F4 70 04 00 00 06 77 74' '77 00 04 00 00 0E 07 00 07 00 07 00 07 00 06 77' '00 04 74 44 08 77 02 71 04 11 00 04 77 4F 0A FF' '00 04 F4 77 06 11 02 17 10 77 06 11 02 17 10 77' '06 11 00 04 17 70 14 BF 02 B0 04 77 12 00 02 07' '04 77 14 07 02 0F 10 BF 02 07 04 77 00 00 0E 77' '02 4F 04 FF 02 47 08 77 00 04 4F 44 0E 77 00 06' '74 F4 47 00 06 77 00 04 4F 44 24 77 00 04 74 44' '08 77 06 11 00 04 17 4F 0A FF 02 F4 04 77 02 71' '16 77 02 71 16 77 02 71 04 77 02 70 14 FB 02 F0' '04 77 02 07 10 88 02 07 18 77 02 0B 10 FB 02 07' '04 77 00 00 0E 77 02 4F 04 FF 02 47 08 77 00 04' '44 47 0E 77 00 04 74 44 08 77 00 04 44 47 08 77' '00 04 74 77 04 00 00 0E 07 00 07 00 07 00 07 00' '06 77 02 74 06 44 02 47 04 77 02 71 04 77 02 4F' '0A FF 02 F4 04 77 02 71 16 77 02 71 04 77 02 74' '08 44 02 47 06 77 02 71 04 77 02 70 14 BF 02 B0' '04 77 02 07 0E 77 00 04 78 07 04 77 02 07 0E 70' '00 06 77 07 0F 00 10 BF 02 07 04 77 00 00 0E 77' '02 4F 04 FF 02 47 4E 77 00 0A 74 44 77 44 47 00' '04 77 02 71 04 77 02 4F 0A FF 02 F4 04 77 02 71' '16 77 02 71 04 77 02 74 08 FF 02 47 06 77 02 71' '04 77 02 70 06 FB 0C 00 00 04 FB F0 04 77 02 07' '10 88 02 07 18 77 02 0B 10 FB 02 07 04 77 00 00' '0E 77 02 4F 04 FF 02 47 32 77 00 04 74 77 04 00' '00 0E 07 00 07 00 07 00 07 00 06 77 00 0A 74 44' '77 44 47 00 04 77 02 71 04 77 02 4F 0A FF 02 F4' '04 77 02 71 08 77 0A 00 04 77 02 71 04 77 02 74' '08 FF 02 47 06 77 02 71 04 77 02 70 06 BF 02 0F' '0C BF 02 B0 04 77 02 07 0E 77 00 04 78 07 04 77' '02 07 0E 70 00 06 77 07 0F 00 10 BF 02 07 04 77' '00 00 0E 77 00 08 4F FF 44 47 1A 77 00 06 74 44' '47 00 06 77 04 44 26 77 06 44 06 77 02 71 04 77' '02 4F 0A FF 02 F4 04 77 02 71 06 77 02 74 08 44' '02 40 04 77 02 71 04 77 02 74 08 FF 02 47 06 77' '02 71 04 77 02 70 06 FB 02 0B 0C FB 02 F0 04 77' '02 07 10 88 02 07 18 77 02 0B 10 FB 02 07 04 77' '00 00 0E 77 00 06 4F FF 44 00 0E 77 00 06 74 44' '47 00 08 77 00 06 74 FF 47 00 06 77 00 04 4F F4' '08 77 00 04 74 77 04 00 00 0E 07 00 07 00 07 00' '07 00 14 77 02 71 04 77 02 4F 0A FF 02 F4 04 77' '02 71 06 77 02 74 08 F7 02 40 04 77 02 71 04 77' '02 74 08 FF 04 44 00 06 47 77 71 00 04 77 02 70' '06 BF 02 0F 0C BF 00 08 B0 07 77 07 10 88 02 07' '04 77 02 07 10 77 00 04 07 0F 10 BF 02 07 04 77' '00 00 02 77 08 00 00 04 07 77 04 44 02 47 0E 77' '00 06 74 FF 47 00 08 77 00 06 74 FF 47 00 04 00' '00 08 07 4F F4 70 04 00 2C 77 02 71 04 77 02 4F' '0A FF 02 F4 04 77 02 71 06 77 02 74 08 7F 02 40' '04 77 02 71 04 77 02 74 08 FF 00 0A 4F BF 47 77' '71 00 04 77 00 06 70 FB F0 00 06 00 0A FB 00 0A' 'F0 70 77 07 80 00 0A 88 00 10 82 28 07 71 17 77' '71 17 06 77 04 70 04 77 02 0B 10 FB 00 06 07 77' '07 00 00 00 22 77 00 06 74 FF 47 00 06 00 00 08' '07 74 F4 47 06 77 00 04 4F 44 08 77 00 04 74 77' '04 00 00 0E 07 00 07 00 07 00 07 00 14 77 02 71' '04 77 02 4F 0A FF 02 F4 04 77 02 71 06 77 00 0C' '74 F7 17 11 17 40 04 77 02 71 04 77 02 74 08 FF' '00 0A 4B FB 47 77 71 00 04 77 02 70 04 BF 04 00' '02 0F 0A BF 00 04 B0 77 04 07 02 08 0A 88 00 0E' '8A A8 07 77 11 77 11 00 0E 77 00 04 07 0F 0C BF' '00 0A B0 BF 07 70 77 00 00 00 00 04 77 74 06 44' '18 77 00 06 74 F4 47 00 08 77 00 04 74 44 08 77' '00 04 44 47 26 77 06 44 02 47 04 77 02 71 04 77' '0E 44 04 77 02 71 06 77 00 0C 74 7F 1F 18 7F 40' '04 77 02 71 04 77 02 74 08 FF 00 0A 4F BF 47 77' '71 00 04 77 02 70 04 FB 00 04 F0 00 0C FB 00 08' 'F0 77 70 00 0E 77 00 0C 78 07 77 71 11 17 10 77' '02 0B 0E FB 02 0B 04 07 02 77 00 00 00 04 77 74' '04 FF 02 F4 18 77 00 04 74 44 22 77 00 04 74 77' '04 00 00 0E 07 00 07 00 07 00 07 00 06 77 00 0A' '74 44 77 44 47 00 04 77 02 71 16 77 02 71 06 77' '00 0C 74 F7 17 F1 87 40 04 77 02 71 04 77 02 74' '04 FF 00 0E F4 44 4B FB 47 77 71 00 04 77 02 70' '06 BF 02 0F 0C BF 00 08 B0 00 07 70 10 00 02 07' '04 77 00 04 11 77 10 07 02 0F 0E BF 00 04 B0 00' '04 77 00 00 00 04 77 74 04 FF 02 F4 5A 77 00 0A' '74 44 77 44 47 00 04 77 02 71 16 77 02 71 06 77' '00 0C 74 71 1F 7F 1F 40 04 77 02 71 04 77 02 74' '04 FF 04 F4 04 BF 00 06 47 77 71 00 04 77 02 70' '14 FB 00 04 F0 77 04 70 14 77 00 06 71 11 17 00' '10 77 12 00 00 06 77 00 07 00 00 00 00 04 77 74' '04 FF 02 F4 0E 77 00 06 74 44 47 00 12 77 00 06' '74 44 47 00 06 77 04 44 08 77 00 04 74 77 04 00' '00 0E 07 00 07 00 07 00 07 00 06 77 00 0A 74 44' '77 44 47 00 04 77 02 71 0A 77 02 74 04 44 02 47' '04 77 02 71 06 77 00 0C 74 F7 17 11 87 40 04 77' '02 71 04 77 02 74 04 FF 00 04 F4 4B 04 FB 00 06' '47 77 71 00 04 77 02 70 14 BF 00 04 B0 77 06 07' '12 77 00 06 11 77 11 00 10 77 02 70 08 FB 02 07' '04 77 04 70 04 77 00 00 00 04 77 74 04 FF 02 F4' '0E 77 00 06 74 FF 47 00 12 77 00 06 74 FF 47 00' '06 77 00 04 4F F4 24 77 00 0A 74 44 77 44 47 00' '04 77 02 71 0A 77 02 74 04 FF 02 47 04 77 02 71' '06 77 02 74 08 7F 02 40 04 77 02 71 04 77 02 74' '06 44 06 BF 00 06 47 77 71 00 04 77 02 70 14 00' '00 04 07 70 04 77 02 70 10 77 00 0A 71 17 77 71' '17 00 10 77 02 0F 04 BF 02 B0 06 77 06 07 02 77' '00 00 00 0A 77 74 FF F4 44 00 0E 77 00 06 74 FF' '47 00 06 00 02 07 0A 77 00 06 74 FF 47 00 04 00' '00 08 07 4F F4 70 04 00 00 04 77 74 14 44 08 77' '06 44 02 47 04 77 02 71 0A 77 02 74 04 FF 02 47' '04 77 02 71 06 77 02 74 08 F7 02 40 04 77 02 71' '08 77 02 74 04 FB 00 0A F4 44 47 77 71 00 06 77' '02 0F 08 BF 02 07 0A 77 00 0A 07 77 07 77 07 00' '28 77 02 70 04 00 02 07 04 77 02 70 04 77 00 04' '70 77 00 00 00 0A 77 74 FF F4 47 00 0E 77 00 06' '74 F4 47 00 12 77 00 06 74 F4 47 00 06 77 00 04' '4F 44 2A 77 00 04 44 47 04 77 02 71 0A 77 02 74' '04 FF 02 47 04 77 02 71 06 77 02 74 08 44 02 40' '04 77 02 71 08 77 02 74 04 BF 00 04 B4 F4 04 77' '02 71 06 77 02 70 06 FB 02 F0 4A 77 00 0A 07 77' '07 77 07 00 00 00 00 04 77 74 04 44 10 77 00 04' '74 44 14 77 00 04 74 44 08 77 00 04 44 47 0C 77' '04 00 00 08 70 00 70 00 0E 77 06 44 06 77 02 71' '0A 77 02 74 04 FF 02 47 04 77 02 71 06 77 00 0C' '74 CC 4C C4 CC 40 04 77 02 71 08 77 02 74 04 FB' '00 04 F4 47 04 77 02 71 08 77 06 00 02 07 10 77' '02 07 42 77 00 00 7E 77 02 74 04 44 02 47 04 77' '02 71 06 77 02 74 08 44 02 47 04 77 02 71 08 77' '02 74 06 44 06 77 02 71 5E 77 02 07 04 77 00 00' 'FE 77 22 77 00 00 FE 77 22 77 00 00 00 01' } /* BINRES idb_hist_small.bmp */ IDB_HIST_SMALL BITMAP LOADONCALL DISCARDABLE { '42 4D 6C 02 00 00 00 00 00 00 76 00 00 00 28 00' '00 00 50 00 00 00 10 00 00 00 01 00 04 00 02 00' '00 00 F6 01 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 FF FF FF 00 00 00 80 00 00 80' '00 00 00 80 80 00 80 00 00 00 80 00 80 00 00 00' '00 00 80 80 80 00 C0 C0 C0 00 00 00 FF 00 00 FF' '00 00 00 FF FF 00 FF 00 00 00 FF 00 FF 00 FF FF' '00 00 00 66 66 00 50 88 00 00 20 88 0E 66 02 68' '04 88 0C 66 10 88 00 00 20 88 02 60 0C B0 02 68' '04 88 02 60 08 B0 00 04 B6 88 0C 44 02 48 00 00' '20 88 02 6B 04 0B 02 04 06 0B 02 68 04 88 00 04' '6B 0B 06 4B 00 0A 06 88 40 00 40 00 06 00 02 48' '00 00 08 88 02 86 0C 88 02 68 08 88 00 04 60 B0' '06 B4 04 B0 02 68 04 88 00 14 60 B0 B4 44 B0 B6' '88 40 00 40 06 00 02 48 00 00 08 88 02 66 0C 88' '02 66 08 88 02 6B 04 0B 00 04 44 4B 04 0B 02 68' '04 66 00 1C 6B 0B 44 B4 4B 06 88 40 60 40 06 66' '00 48 00 00 06 88 00 04 86 66 0C 88 00 04 66 68' '06 88 00 28 60 B0 44 40 44 40 B0 68 60 00 60 B0' 'B4 44 B0 B6 88 40 00 40 06 00 02 48 00 00 06 88' '04 66 0C 88 04 66 06 88 02 6B 04 0B 00 04 44 4B' '04 0B 00 0A 68 60 44 6B 0B 00 06 4B 00 12 06 88' '40 60 40 06 66 00 48 00 00 00 04 88 02 86 04 66' '0C 88 04 66 02 68 04 88 00 04 60 B0 06 B4 04 B0' '00 08 68 60 00 60 08 B0 00 0A B6 88 40 00 40 00' '06 00 02 48 00 00 06 88 04 66 0C 88 04 66 06 88' '02 6B 04 0B 02 04 06 0B 00 06 68 60 44 00 0C 66' '00 10 88 40 60 40 06 66 00 48 00 00 06 88 00 04' '86 66 0C 88 00 04 66 68 06 88 02 60 0C B0 00 08' '68 60 00 06 04 B0 02 68 06 88 00 06 40 00 40 00' '06 00 02 48 00 00 08 88 02 66 0C 88 02 66 08 88' '0E 66 00 08 88 60 22 04 04 66 00 04 88 86 04 88' '00 06 40 00 40 00 06 00 02 48 00 00 08 88 02 86' '0C 88 02 68 08 88 02 86 04 B0 02 B6 08 88 00 04' '60 22 04 00 00 06 68 88 86 00 04 88 0C 44 02 48' '00 00 22 88 04 66 02 68 08 88 00 0C 60 22 04 40' '68 86 04 66 02 88 0C 44 02 48 00 00 30 88 02 60' '06 00 00 06 68 88 86 00 12 88 00 00 30 88 08 66' '00 06 68 88 86 00 12 88 00 00 00 01' } /* BINRES idb_hist_large.bmp */ IDB_HIST_LARGE BITMAP LOADONCALL DISCARDABLE { '42 4D 60 04 00 00 00 00 00 00 76 00 00 00 28 00' '00 00 78 00 00 00 18 00 00 00 01 00 04 00 02 00' '00 00 EA 03 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 FF FF FF 00 00 00 80 00 00 80' '00 00 00 80 80 00 80 00 00 00 80 00 80 00 00 00' '00 00 80 80 80 00 C0 C0 C0 00 00 00 FF 00 00 FF' '00 00 00 FF FF 00 FF 00 00 00 FF 00 FF 00 FF FF' '00 00 00 66 66 00 78 88 00 00 78 88 00 00 30 88' '02 86 14 66 08 88 02 86 10 66 18 88 00 00 30 88' '00 16 86 0B B0 BB 0B B0 BB 0B B0 BB 06 00 08 88' '00 12 86 0B B0 BB 0B B0 BB 0B B6 00 18 88 00 00' '30 88 00 16 86 0B B0 BB 0B B0 BB 0B B0 BB 06 00' '08 88 00 12 86 0B B0 BB 0B B0 BB 0B B6 00 18 88' '00 00 30 88 00 16 86 B0 0B 00 B0 04 00 B0 0B 00' 'B6 00 08 88 00 12 86 B0 0B 44 B4 4B 44 B0 06 00' '18 88 00 00 0E 88 02 68 10 88 00 04 86 68 0C 88' '00 16 86 0B B0 BB 4B B4 BB 4B B0 BB 06 00 08 88' '00 08 86 0B B0 BB 04 44 00 06 BB 0B B6 00 04 88' '02 84 0C 44 02 48 04 88 00 00 0E 88 02 68 10 88' '00 04 86 68 0C 88 00 16 86 0B B0 BB 4B B4 BB 4B' 'B0 BB 06 00 08 88 00 08 86 0B B0 BB 04 44 00 06' 'BB 0B B6 00 04 88 00 06 84 00 04 00 08 00 02 48' '04 88 00 00 0C 88 00 04 66 68 10 88 00 04 86 66' '0C 88 00 0A 86 B0 0B 00 B4 00 04 44 00 0C B0 0B' '00 B6 88 86 06 66 00 10 B0 0B 44 4B B4 44 B0 06' '04 88 00 06 84 00 04 00 08 00 02 48 04 88 00 00' '0A 88 00 06 86 66 68 00 10 88 02 86 04 66 0A 88' '00 06 86 0B B0 00 04 44 02 40 04 44 00 0A 40 BB' '06 88 86 00 04 00 00 08 06 0B B0 BB 04 44 00 06' 'BB 0B B6 00 04 88 00 08 84 06 04 00 04 66 00 04' '00 48 04 88 00 00 0A 88 00 06 86 66 68 00 10 88' '02 86 04 66 0A 88 00 06 86 0B B0 00 04 44 02 40' '04 44 00 0A 40 BB 06 88 86 00 04 00 00 08 06 0B' 'B0 BB 04 44 00 06 BB 0B B6 00 04 88 00 06 84 00' '04 00 08 00 02 48 04 88 00 00 08 88 02 86 04 66' '02 68 10 88 02 86 04 66 02 68 08 88 00 0A 86 B0' '0B 00 B4 00 04 44 00 22 B0 0B 00 B6 88 86 04 44' '46 B0 0B 44 B4 4B 44 B0 06 00 04 88 00 08 84 06' '04 00 04 66 00 04 00 48 04 88 00 00 08 88 06 66' '02 68 10 88 02 86 06 66 02 68 06 88 00 1A 86 0B' 'B0 BB 4B B4 BB 4B B0 BB 06 88 86 00 04 00 00 12' '06 0B B0 BB 0B B0 BB 0B B6 00 04 88 00 06 84 00' '04 00 08 00 02 48 04 88 00 00 08 88 06 66 02 68' '10 88 02 86 06 66 02 68 06 88 00 1A 86 0B B0 BB' '4B B4 BB 4B B0 BB 06 88 86 00 04 00 00 12 06 0B' 'B0 BB 0B B0 BB 0B B6 00 04 88 00 08 84 06 04 00' '04 66 00 04 00 48 04 88 00 00 08 88 02 86 04 66' '02 68 10 88 02 86 04 66 02 68 08 88 00 20 86 B0' '0B 00 B0 04 00 B0 0B 00 B6 88 86 04 44 46 10 66' '04 88 00 06 84 00 04 00 08 00 02 48 04 88 00 00' '0A 88 00 06 86 66 68 00 10 88 02 86 04 66 0A 88' '00 1A 86 0B B0 BB 0B B0 BB 0B B0 BB 06 88 86 00' '06 00 00 08 6B B0 BB 06 0C 88 00 06 84 00 04 00' '08 00 02 48 04 88 00 00 0A 88 00 06 86 66 68 00' '10 88 02 86 04 66 0A 88 00 1A 86 0B B0 BB 0B B0' 'BB 0B B0 BB 06 88 86 00 06 00 00 08 6B B0 BB 06' '0C 88 02 84 0C 44 02 48 04 88 00 00 0C 88 00 04' '66 68 10 88 00 04 86 66 0C 88 02 86 14 66 00 0C' '88 86 02 22 00 46 04 66 02 68 04 88 02 68 06 88' '02 84 0C 44 02 48 04 88 00 00 0E 88 02 68 10 88' '00 04 86 68 0E 88 00 0A 6B B0 BB 0B B6 00 0C 88' '00 06 86 02 22 00 06 00 02 68 06 88 02 68 1A 88' '00 00 0E 88 02 68 10 88 00 04 86 68 0E 88 00 0A' '6B B0 BB 0B B6 00 0C 88 00 06 86 02 22 00 06 00' '02 68 06 88 02 68 1A 88 00 00 32 88 02 86 06 66' '02 68 0C 88 00 12 86 02 22 00 44 40 68 88 86 00' '06 66 14 88 00 04 87 88 00 00 48 88 02 86 0A 00' '02 68 06 88 02 68 16 88 00 04 87 88 00 00 48 88' '02 86 0A 00 02 68 06 88 02 68 1A 88 00 00 48 88' '02 86 0A 66 02 68 06 88 02 68 1A 88 00 00 00 01' } wine-20000526/dlls/comctl32/status.c0100644000175000001440000007153407106136276016537 0ustar julliardusers/* * Interface code to StatusWindow widget/control * * Copyright 1996 Bruce Milner * Copyright 1998, 1999 Eric Kohl */ #include "winbase.h" #include "commctrl.h" #include "status.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(statusbar) /* * Run tests using Waite Group Windows95 API Bible Vol. 1&2 * The second cdrom contains executables drawstat.exe,gettext.exe, * simple.exe, getparts.exe, setparts.exe, statwnd.exe */ /* * Fixme/Todo * 1) Don't hard code bar to bottom of window, allow CCS_TOP also. * 2) Tooltip support (almost done). */ #define _MAX(a,b) (((a)>(b))?(a):(b)) #define _MIN(a,b) (((a)>(b))?(b):(a)) #define HORZ_BORDER 0 #define VERT_BORDER 2 #define HORZ_GAP 2 #define STATUSBAR_GetInfoPtr(hwnd) ((STATUSWINDOWINFO *)GetWindowLongA (hwnd, 0)) static void STATUSBAR_DrawSizeGrip (HDC hdc, LPRECT lpRect) { HPEN hOldPen; POINT pt; INT i; pt.x = lpRect->right - 1; pt.y = lpRect->bottom - 1; hOldPen = SelectObject (hdc, GetSysColorPen (COLOR_3DFACE)); MoveToEx (hdc, pt.x - 12, pt.y, NULL); LineTo (hdc, pt.x, pt.y); LineTo (hdc, pt.x, pt.y - 12); pt.x--; pt.y--; SelectObject (hdc, GetSysColorPen (COLOR_3DSHADOW)); for (i = 1; i < 11; i += 4) { MoveToEx (hdc, pt.x - i, pt.y, NULL); LineTo (hdc, pt.x, pt.y - i); MoveToEx (hdc, pt.x - i-1, pt.y, NULL); LineTo (hdc, pt.x, pt.y - i-1); } SelectObject (hdc, GetSysColorPen (COLOR_3DHIGHLIGHT)); for (i = 3; i < 13; i += 4) { MoveToEx (hdc, pt.x - i, pt.y, NULL); LineTo (hdc, pt.x, pt.y - i); } SelectObject (hdc, hOldPen); } static void STATUSBAR_DrawPart (HDC hdc, STATUSWINDOWPART *part) { RECT r = part->bound; UINT border = BDR_SUNKENOUTER; if (part->style & SBT_POPOUT) border = BDR_RAISEDOUTER; else if (part->style & SBT_NOBORDERS) border = 0; DrawEdge(hdc, &r, border, BF_RECT|BF_ADJUST); /* draw the icon */ if (part->hIcon) { INT cy = r.bottom - r.top; r.left += 2; DrawIconEx (hdc, r.left, r.top, part->hIcon, cy, cy, 0, 0, DI_NORMAL); r.left += cy; } /* now draw text */ if (part->text) { int oldbkmode = SetBkMode(hdc, TRANSPARENT); LPWSTR p = (LPWSTR)part->text; UINT align = DT_LEFT; if (*p == L'\t') { p++; align = DT_CENTER; if (*p == L'\t') { p++; align = DT_RIGHT; } } r.left += 3; DrawTextW (hdc, p, lstrlenW (p), &r, align|DT_VCENTER|DT_SINGLELINE); if (oldbkmode != TRANSPARENT) SetBkMode(hdc, oldbkmode); } } static VOID STATUSBAR_RefreshPart (HWND hwnd, STATUSWINDOWPART *part, HDC hdc, int itemID) { STATUSWINDOWINFO *self = STATUSBAR_GetInfoPtr (hwnd); HBRUSH hbrBk; HFONT hOldFont; if (!IsWindowVisible (hwnd)) return; if (self->clrBk != CLR_DEFAULT) hbrBk = CreateSolidBrush (self->clrBk); else hbrBk = GetSysColorBrush (COLOR_3DFACE); FillRect(hdc, &part->bound, hbrBk); hOldFont = SelectObject (hdc, self->hFont ? self->hFont : self->hDefaultFont); if (part->style & SBT_OWNERDRAW) { DRAWITEMSTRUCT dis; dis.CtlID = GetWindowLongA (hwnd, GWL_ID); dis.itemID = itemID; dis.hwndItem = hwnd; dis.hDC = hdc; dis.rcItem = part->bound; dis.itemData = (INT)part->text; SendMessageA (GetParent (hwnd), WM_DRAWITEM, (WPARAM)dis.CtlID, (LPARAM)&dis); } else STATUSBAR_DrawPart (hdc, part); SelectObject (hdc, hOldFont); if (self->clrBk != CLR_DEFAULT) DeleteObject (hbrBk); if (GetWindowLongA (hwnd, GWL_STYLE) & SBARS_SIZEGRIP) { RECT rect; GetClientRect (hwnd, &rect); STATUSBAR_DrawSizeGrip (hdc, &rect); } } static BOOL STATUSBAR_Refresh (HWND hwnd, HDC hdc) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); int i; RECT rect; HBRUSH hbrBk; HFONT hOldFont; if (!IsWindowVisible(hwnd)) return (TRUE); GetClientRect (hwnd, &rect); if (infoPtr->clrBk != CLR_DEFAULT) hbrBk = CreateSolidBrush (infoPtr->clrBk); else hbrBk = GetSysColorBrush (COLOR_3DFACE); FillRect(hdc, &rect, hbrBk); hOldFont = SelectObject (hdc, infoPtr->hFont ? infoPtr->hFont : infoPtr->hDefaultFont); if (infoPtr->simple) { STATUSBAR_RefreshPart (hwnd, &infoPtr->part0,hdc,0); } else { for (i = 0; i < infoPtr->numParts; i++) { if (infoPtr->parts[i].style & SBT_OWNERDRAW) { DRAWITEMSTRUCT dis; dis.CtlID = GetWindowLongA (hwnd, GWL_ID); dis.itemID = i; dis.hwndItem = hwnd; dis.hDC = hdc; dis.rcItem = infoPtr->parts[i].bound; dis.itemData = (INT)infoPtr->parts[i].text; SendMessageA (GetParent (hwnd), WM_DRAWITEM, (WPARAM)dis.CtlID, (LPARAM)&dis); } else STATUSBAR_RefreshPart (hwnd, &infoPtr->parts[i], hdc,i); } } SelectObject (hdc, hOldFont); if (infoPtr->clrBk != CLR_DEFAULT) DeleteObject (hbrBk); if (GetWindowLongA(hwnd, GWL_STYLE) & SBARS_SIZEGRIP) STATUSBAR_DrawSizeGrip (hdc, &rect); return TRUE; } static void STATUSBAR_SetPartBounds (HWND hwnd) { STATUSWINDOWINFO *self = STATUSBAR_GetInfoPtr (hwnd); STATUSWINDOWPART *part; RECT rect, *r; int i; /* get our window size */ GetClientRect (hwnd, &rect); rect.top += VERT_BORDER; /* set bounds for simple rectangle */ self->part0.bound = rect; /* set bounds for non-simple rectangles */ for (i = 0; i < self->numParts; i++) { part = &self->parts[i]; r = &self->parts[i].bound; r->top = rect.top; r->bottom = rect.bottom; if (i == 0) r->left = 0; else r->left = self->parts[i-1].bound.right + HORZ_GAP; if (part->x == -1) r->right = rect.right; else r->right = part->x; if (self->hwndToolTip) { TTTOOLINFOA ti; ti.cbSize = sizeof(TTTOOLINFOA); ti.hwnd = hwnd; ti.uId = i; ti.rect = *r; SendMessageA (self->hwndToolTip, TTM_NEWTOOLRECTA, 0, (LPARAM)&ti); } } } static VOID STATUSBAR_RelayEvent (HWND hwndTip, HWND hwndMsg, UINT uMsg, WPARAM wParam, LPARAM lParam) { MSG msg; msg.hwnd = hwndMsg; msg.message = uMsg; msg.wParam = wParam; msg.lParam = lParam; msg.time = GetMessageTime (); msg.pt.x = LOWORD(GetMessagePos ()); msg.pt.y = HIWORD(GetMessagePos ()); SendMessageA (hwndTip, TTM_RELAYEVENT, 0, (LPARAM)&msg); } inline static LRESULT STATUSBAR_GetBorders (LPARAM lParam) { LPINT out = (LPINT) lParam; out[0] = HORZ_BORDER; /* horizontal border width */ out[1] = VERT_BORDER; /* vertical border width */ out[2] = HORZ_GAP; /* width of border between rectangles */ return TRUE; } static LRESULT STATUSBAR_GetIcon (HWND hwnd, WPARAM wParam) { STATUSWINDOWINFO *self = STATUSBAR_GetInfoPtr (hwnd); INT nPart; nPart = (INT)wParam & 0x00ff; if ((nPart < -1) || (nPart >= self->numParts)) return 0; if (nPart == -1) return (self->part0.hIcon); else return (self->parts[nPart].hIcon); } static LRESULT STATUSBAR_GetParts (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); LPINT parts; INT num_parts; INT i; num_parts = (INT) wParam; parts = (LPINT) lParam; if (parts) { return (infoPtr->numParts); for (i = 0; i < num_parts; i++) { parts[i] = infoPtr->parts[i].x; } } return (infoPtr->numParts); } static LRESULT STATUSBAR_GetRect (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); int part_num; LPRECT rect; part_num = ((INT) wParam) & 0x00ff; rect = (LPRECT) lParam; if (infoPtr->simple) *rect = infoPtr->part0.bound; else *rect = infoPtr->parts[part_num].bound; return TRUE; } static LRESULT STATUSBAR_GetTextA (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *self = STATUSBAR_GetInfoPtr (hwnd); STATUSWINDOWPART *part; INT nPart; LRESULT result; nPart = ((INT) wParam) & 0x00ff; if (self->simple) part = &self->part0; else part = &self->parts[nPart]; if (part->style & SBT_OWNERDRAW) result = (LRESULT)part->text; else { result = part->text ? lstrlenW (part->text) : 0; result |= (part->style << 16); if (lParam && LOWORD(result)) lstrcpyWtoA ((LPSTR)lParam, part->text); } return result; } static LRESULT STATUSBAR_GetTextW (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); STATUSWINDOWPART *part; INT nPart; LRESULT result; nPart = ((INT)wParam) & 0x00ff; if (infoPtr->simple) part = &infoPtr->part0; else part = &infoPtr->parts[nPart]; if (part->style & SBT_OWNERDRAW) result = (LRESULT)part->text; else { result = part->text ? lstrlenW (part->text) : 0; result |= (part->style << 16); if (lParam) lstrcpyW ((LPWSTR)lParam, part->text); } return result; } static LRESULT STATUSBAR_GetTextLength (HWND hwnd, WPARAM wParam) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); STATUSWINDOWPART *part; INT part_num; DWORD result; part_num = ((INT) wParam) & 0x00ff; if (infoPtr->simple) part = &infoPtr->part0; else part = &infoPtr->parts[part_num]; if (part->text) result = lstrlenW(part->text); else result = 0; result |= (part->style << 16); return result; } static LRESULT STATUSBAR_GetTipTextA (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); if (infoPtr->hwndToolTip) { TTTOOLINFOA ti; ti.cbSize = sizeof(TTTOOLINFOA); ti.hwnd = hwnd; ti.uId = LOWORD(wParam); SendMessageA (infoPtr->hwndToolTip, TTM_GETTEXTA, 0, (LPARAM)&ti); if (ti.lpszText) lstrcpynA ((LPSTR)lParam, ti.lpszText, HIWORD(wParam)); } return 0; } static LRESULT STATUSBAR_GetTipTextW (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); if (infoPtr->hwndToolTip) { TTTOOLINFOW ti; ti.cbSize = sizeof(TTTOOLINFOW); ti.hwnd = hwnd; ti.uId = LOWORD(wParam); SendMessageW (infoPtr->hwndToolTip, TTM_GETTEXTW, 0, (LPARAM)&ti); if (ti.lpszText) lstrcpynW ((LPWSTR)lParam, ti.lpszText, HIWORD(wParam)); } return 0; } inline static LRESULT STATUSBAR_GetUnicodeFormat (HWND hwnd) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); return infoPtr->bUnicode; } inline static LRESULT STATUSBAR_IsSimple (HWND hwnd) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); return infoPtr->simple; } static LRESULT STATUSBAR_SetBkColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *self = STATUSBAR_GetInfoPtr (hwnd); COLORREF oldBkColor; oldBkColor = self->clrBk; self->clrBk = (COLORREF)lParam; RedrawWindow(hwnd,(RECT*)NULL,(HRGN)NULL,RDW_INVALIDATE|RDW_UPDATENOW); return oldBkColor; } static LRESULT STATUSBAR_SetIcon (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *self = STATUSBAR_GetInfoPtr (hwnd); INT nPart = (INT)wParam & 0x00ff; HDC hdc; if ((nPart < -1) || (nPart >= self->numParts)) return FALSE; hdc = GetDC (hwnd); if (nPart == -1) { self->part0.hIcon = (HICON)lParam; if (self->simple) RedrawWindow(hwnd, &self->part0.bound,(HRGN)NULL, RDW_INVALIDATE|RDW_UPDATENOW); } else { self->parts[nPart].hIcon = (HICON)lParam; if (!(self->simple)) RedrawWindow(hwnd,&self->parts[nPart].bound,(HRGN)NULL, RDW_INVALIDATE|RDW_UPDATENOW); } ReleaseDC (hwnd, hdc); return TRUE; } static LRESULT STATUSBAR_SetMinHeight (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *self = STATUSBAR_GetInfoPtr (hwnd); if (IsWindowVisible (hwnd)) { HWND parent = GetParent (hwnd); INT width, x, y; RECT parent_rect; GetClientRect (parent, &parent_rect); self->height = (INT)wParam + VERT_BORDER; width = parent_rect.right - parent_rect.left; x = parent_rect.left; y = parent_rect.bottom - self->height; MoveWindow (hwnd, parent_rect.left, parent_rect.bottom - self->height, width, self->height, TRUE); STATUSBAR_SetPartBounds (hwnd); } return TRUE; } static LRESULT STATUSBAR_SetParts (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *self = STATUSBAR_GetInfoPtr (hwnd); STATUSWINDOWPART *tmp; LPINT parts; int i; int oldNumParts; if (self->simple) self->simple = FALSE; oldNumParts = self->numParts; self->numParts = (INT) wParam; parts = (LPINT) lParam; if (oldNumParts > self->numParts) { for (i = self->numParts ; i < oldNumParts; i++) { if (self->parts[i].text && !(self->parts[i].style & SBT_OWNERDRAW)) COMCTL32_Free (self->parts[i].text); } } else if (oldNumParts < self->numParts) { tmp = COMCTL32_Alloc (sizeof(STATUSWINDOWPART) * self->numParts); for (i = 0; i < oldNumParts; i++) { tmp[i] = self->parts[i]; } if (self->parts) COMCTL32_Free (self->parts); self->parts = tmp; } for (i = 0; i < self->numParts; i++) { self->parts[i].x = parts[i]; } if (self->hwndToolTip) { INT nTipCount = SendMessageA (self->hwndToolTip, TTM_GETTOOLCOUNT, 0, 0); if (nTipCount < self->numParts) { /* add tools */ TTTOOLINFOA ti; INT i; ZeroMemory (&ti, sizeof(TTTOOLINFOA)); ti.cbSize = sizeof(TTTOOLINFOA); ti.hwnd = hwnd; for (i = nTipCount; i < self->numParts; i++) { TRACE("add tool %d\n", i); ti.uId = i; SendMessageA (self->hwndToolTip, TTM_ADDTOOLA, 0, (LPARAM)&ti); } } else if (nTipCount > self->numParts) { /* delete tools */ INT i; for (i = nTipCount - 1; i >= self->numParts; i--) { FIXME("delete tool %d\n", i); } } } STATUSBAR_SetPartBounds (hwnd); RedrawWindow(hwnd,(RECT*)NULL,(HRGN)NULL,RDW_INVALIDATE|RDW_UPDATENOW); return TRUE; } static LRESULT STATUSBAR_SetTextA (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *self = STATUSBAR_GetInfoPtr (hwnd); STATUSWINDOWPART *part=NULL; int part_num; int style; LPSTR text; int len; text = (LPSTR) lParam; part_num = ((INT) wParam) & 0x00ff; style = ((INT) wParam) & 0xff00; if (part_num==255) part = &self->part0; else if (!self->simple && self->parts!=NULL) part = &self->parts[part_num]; if (!part) return FALSE; if (!(part->style & SBT_OWNERDRAW) && part->text) COMCTL32_Free (part->text); part->text = 0; if (style & SBT_OWNERDRAW) { part->text = (LPWSTR)text; } else { /* duplicate string */ if (text && (len = lstrlenA(text))) { part->text = COMCTL32_Alloc ((len+1)*sizeof(WCHAR)); lstrcpyAtoW (part->text, text); } } part->style = style; RedrawWindow(hwnd,&part->bound,(HRGN)NULL,RDW_INVALIDATE|RDW_UPDATENOW); return TRUE; } static LRESULT STATUSBAR_SetTextW (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *self = STATUSBAR_GetInfoPtr (hwnd); STATUSWINDOWPART *part; INT part_num, style, len; LPWSTR text; text = (LPWSTR) lParam; part_num = ((INT) wParam) & 0x00ff; style = ((INT) wParam) & 0xff00; if ((self->simple) || (self->parts==NULL) || (part_num==255)) part = &self->part0; else part = &self->parts[part_num]; if (!part) return FALSE; if (!(part->style & SBT_OWNERDRAW) && part->text) COMCTL32_Free (part->text); part->text = 0; if (style & SBT_OWNERDRAW) { part->text = text; } else { /* duplicate string */ if (text && (len = lstrlenW(text))) { part->text = COMCTL32_Alloc ((len+1)*sizeof(WCHAR)); lstrcpyW(part->text, text); } } part->style = style; RedrawWindow(hwnd,&part->bound,(HRGN)NULL,RDW_INVALIDATE|RDW_UPDATENOW); return TRUE; } static LRESULT STATUSBAR_SetTipTextA (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); TRACE("part %d: \"%s\"\n", (INT)wParam, (LPSTR)lParam); if (infoPtr->hwndToolTip) { TTTOOLINFOA ti; ti.cbSize = sizeof(TTTOOLINFOA); ti.hwnd = hwnd; ti.uId = (INT)wParam; ti.hinst = 0; ti.lpszText = (LPSTR)lParam; SendMessageA (infoPtr->hwndToolTip, TTM_UPDATETIPTEXTA, 0, (LPARAM)&ti); } return 0; } static LRESULT STATUSBAR_SetTipTextW (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); TRACE("part %d: \"%s\"\n", (INT)wParam, (LPSTR)lParam); if (infoPtr->hwndToolTip) { TTTOOLINFOW ti; ti.cbSize = sizeof(TTTOOLINFOW); ti.hwnd = hwnd; ti.uId = (INT)wParam; ti.hinst = 0; ti.lpszText = (LPWSTR)lParam; SendMessageW (infoPtr->hwndToolTip, TTM_UPDATETIPTEXTW, 0, (LPARAM)&ti); } return 0; } inline static LRESULT STATUSBAR_SetUnicodeFormat (HWND hwnd, WPARAM wParam) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); BOOL bTemp = infoPtr->bUnicode; TRACE("(0x%x)\n", (BOOL)wParam); infoPtr->bUnicode = (BOOL)wParam; return bTemp; } static LRESULT STATUSBAR_Simple (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); NMHDR nmhdr; infoPtr->simple = (BOOL)wParam; /* send notification */ nmhdr.hwndFrom = hwnd; nmhdr.idFrom = GetWindowLongA (hwnd, GWL_ID); nmhdr.code = SBN_SIMPLEMODECHANGE; SendMessageA (GetParent (hwnd), WM_NOTIFY, 0, (LPARAM)&nmhdr); RedrawWindow(hwnd,(RECT*)NULL,(HRGN)NULL,RDW_INVALIDATE|RDW_UPDATENOW); return TRUE; } static LRESULT STATUSBAR_WMCreate (HWND hwnd, WPARAM wParam, LPARAM lParam) { LPCREATESTRUCTA lpCreate = (LPCREATESTRUCTA)lParam; NONCLIENTMETRICSA nclm; RECT rect; int width, len; HDC hdc; STATUSWINDOWINFO *self; self = (STATUSWINDOWINFO*)COMCTL32_Alloc (sizeof(STATUSWINDOWINFO)); SetWindowLongA (hwnd, 0, (DWORD)self); self->numParts = 1; self->parts = 0; self->simple = FALSE; self->clrBk = CLR_DEFAULT; self->hFont = 0; GetClientRect (hwnd, &rect); nclm.cbSize = sizeof(NONCLIENTMETRICSA); SystemParametersInfoA (SPI_GETNONCLIENTMETRICS, 0, &nclm, 0); self->hDefaultFont = CreateFontIndirectA (&nclm.lfStatusFont); /* initialize simple case */ self->part0.bound = rect; self->part0.text = 0; self->part0.x = 0; self->part0.style = 0; self->part0.hIcon = 0; /* initialize first part */ self->parts = COMCTL32_Alloc (sizeof(STATUSWINDOWPART)); self->parts[0].bound = rect; self->parts[0].text = 0; self->parts[0].x = -1; self->parts[0].style = 0; self->parts[0].hIcon = 0; if (IsWindowUnicode (hwnd)) { self->bUnicode = TRUE; if (lpCreate->lpszName && (len = lstrlenW ((LPCWSTR)lpCreate->lpszName))) { self->parts[0].text = COMCTL32_Alloc ((len + 1)*sizeof(WCHAR)); lstrcpyW (self->parts[0].text, (LPCWSTR)lpCreate->lpszName); } } else { if (lpCreate->lpszName && (len = lstrlenA ((LPCSTR)lpCreate->lpszName))) { self->parts[0].text = COMCTL32_Alloc ((len + 1)*sizeof(WCHAR)); lstrcpyAtoW (self->parts[0].text, (LPCSTR)lpCreate->lpszName); } } if ((hdc = GetDC (0))) { TEXTMETRICA tm; HFONT hOldFont; hOldFont = SelectObject (hdc,self->hDefaultFont); GetTextMetricsA(hdc, &tm); self->textHeight = tm.tmHeight; SelectObject (hdc, hOldFont); ReleaseDC(0, hdc); } if (GetWindowLongA (hwnd, GWL_STYLE) & SBT_TOOLTIPS) { self->hwndToolTip = CreateWindowExA (0, TOOLTIPS_CLASSA, NULL, 0, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, hwnd, 0, GetWindowLongA (hwnd, GWL_HINSTANCE), NULL); if (self->hwndToolTip) { NMTOOLTIPSCREATED nmttc; nmttc.hdr.hwndFrom = hwnd; nmttc.hdr.idFrom = GetWindowLongA (hwnd, GWL_ID); nmttc.hdr.code = NM_TOOLTIPSCREATED; nmttc.hwndToolTips = self->hwndToolTip; SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM)nmttc.hdr.idFrom, (LPARAM)&nmttc); } } GetClientRect (GetParent (hwnd), &rect); width = rect.right - rect.left; self->height = self->textHeight + 4 + VERT_BORDER; MoveWindow (hwnd, lpCreate->x, lpCreate->y-1, width, self->height, FALSE); STATUSBAR_SetPartBounds (hwnd); return 0; } static LRESULT STATUSBAR_WMDestroy (HWND hwnd) { STATUSWINDOWINFO *self = STATUSBAR_GetInfoPtr (hwnd); int i; for (i = 0; i < self->numParts; i++) { if (self->parts[i].text && !(self->parts[i].style & SBT_OWNERDRAW)) COMCTL32_Free (self->parts[i].text); } if (self->part0.text && !(self->part0.style & SBT_OWNERDRAW)) COMCTL32_Free (self->part0.text); COMCTL32_Free (self->parts); /* delete default font */ if (self->hDefaultFont) DeleteObject (self->hDefaultFont); /* delete tool tip control */ if (self->hwndToolTip) DestroyWindow (self->hwndToolTip); COMCTL32_Free (self); SetWindowLongA(hwnd, 0, 0); return 0; } static inline LRESULT STATUSBAR_WMGetFont (HWND hwnd) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); return infoPtr->hFont; } static LRESULT STATUSBAR_WMGetText (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); INT len; if (!(infoPtr->parts[0].text)) return 0; len = lstrlenW (infoPtr->parts[0].text); if (wParam > len) { if (infoPtr->bUnicode) lstrcpyW ((LPWSTR)lParam, infoPtr->parts[0].text); else lstrcpyWtoA ((LPSTR)lParam, infoPtr->parts[0].text); return len; } return -1; } inline static LRESULT STATUSBAR_WMMouseMove (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); if (infoPtr->hwndToolTip) STATUSBAR_RelayEvent (infoPtr->hwndToolTip, hwnd, WM_MOUSEMOVE, wParam, lParam); return 0; } static LRESULT STATUSBAR_WMNCHitTest (HWND hwnd, WPARAM wParam, LPARAM lParam) { if (GetWindowLongA (hwnd, GWL_STYLE) & SBARS_SIZEGRIP) { RECT rect; POINT pt; GetClientRect (hwnd, &rect); pt.x = (INT)LOWORD(lParam); pt.y = (INT)HIWORD(lParam); ScreenToClient (hwnd, &pt); rect.left = rect.right - 13; rect.top += 2; if (PtInRect (&rect, pt)) return HTBOTTOMRIGHT; } return DefWindowProcA (hwnd, WM_NCHITTEST, wParam, lParam); } static inline LRESULT STATUSBAR_WMNCLButtonDown (HWND hwnd, WPARAM wParam, LPARAM lParam) { PostMessageA (GetParent (hwnd), WM_NCLBUTTONDOWN, wParam, lParam); return 0; } static inline LRESULT STATUSBAR_WMNCLButtonUp (HWND hwnd, WPARAM wParam, LPARAM lParam) { PostMessageA (GetParent (hwnd), WM_NCLBUTTONUP, wParam, lParam); return 0; } static LRESULT STATUSBAR_WMPaint (HWND hwnd, WPARAM wParam) { HDC hdc; PAINTSTRUCT ps; hdc = wParam==0 ? BeginPaint (hwnd, &ps) : (HDC)wParam; STATUSBAR_Refresh (hwnd, hdc); if (!wParam) EndPaint (hwnd, &ps); return 0; } static LRESULT STATUSBAR_WMSetFont (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); infoPtr->hFont = (HFONT)wParam; if (LOWORD(lParam) == TRUE) RedrawWindow(hwnd,(RECT*)NULL,(HRGN)NULL, RDW_INVALIDATE|RDW_UPDATENOW); return 0; } static LRESULT STATUSBAR_WMSetText (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); STATUSWINDOWPART *part; int len; if (infoPtr->numParts == 0) return FALSE; part = &infoPtr->parts[0]; /* duplicate string */ if (part->text) COMCTL32_Free (part->text); part->text = 0; if (infoPtr->bUnicode) { if (lParam && (len = lstrlenW((LPCWSTR)lParam))) { part->text = COMCTL32_Alloc ((len+1)*sizeof(WCHAR)); lstrcpyW (part->text, (LPCWSTR)lParam); } } else { if (lParam && (len = lstrlenA((LPCSTR)lParam))) { part->text = COMCTL32_Alloc ((len+1)*sizeof(WCHAR)); lstrcpyAtoW (part->text, (LPCSTR)lParam); } } RedrawWindow(hwnd,&part->bound,(HRGN)NULL,RDW_INVALIDATE|RDW_UPDATENOW); return TRUE; } static LRESULT STATUSBAR_WMSize (HWND hwnd, WPARAM wParam, LPARAM lParam) { STATUSWINDOWINFO *infoPtr = STATUSBAR_GetInfoPtr (hwnd); INT width, x, y, flags; RECT parent_rect; HWND parent; /* Need to resize width to match parent */ flags = (INT) wParam; /* FIXME for flags = * SIZE_MAXIMIZED, SIZE_MAXSHOW, SIZE_MINIMIZED, SIZE_RESTORED */ if (flags == SIZE_RESTORED) { /* width and height don't apply */ parent = GetParent (hwnd); GetClientRect (parent, &parent_rect); width = parent_rect.right - parent_rect.left; x = parent_rect.left; y = parent_rect.bottom - infoPtr->height; MoveWindow (hwnd, parent_rect.left, parent_rect.bottom - infoPtr->height, width, infoPtr->height, TRUE); STATUSBAR_SetPartBounds (hwnd); } return 0; } static LRESULT STATUSBAR_SendNotify (HWND hwnd, UINT code) { NMHDR nmhdr; nmhdr.hwndFrom = hwnd; nmhdr.idFrom = GetWindowLongA (hwnd, GWL_ID); nmhdr.code = code; SendMessageA (GetParent (hwnd), WM_NOTIFY, 0, (LPARAM)&nmhdr); return 0; } static LRESULT WINAPI StatusWindowProc (HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) { TRACE("hwnd=%x msg=%x wparam=%x lparam=%lx\n", hwnd, msg, wParam, lParam); if (!(STATUSBAR_GetInfoPtr(hwnd)) && (msg != WM_CREATE)) return DefWindowProcA (hwnd, msg, wParam, lParam); switch (msg) { case SB_GETBORDERS: return STATUSBAR_GetBorders (lParam); case SB_GETICON: return STATUSBAR_GetIcon (hwnd, wParam); case SB_GETPARTS: return STATUSBAR_GetParts (hwnd, wParam, lParam); case SB_GETRECT: return STATUSBAR_GetRect (hwnd, wParam, lParam); case SB_GETTEXTA: return STATUSBAR_GetTextA (hwnd, wParam, lParam); case SB_GETTEXTW: return STATUSBAR_GetTextW (hwnd, wParam, lParam); case SB_GETTEXTLENGTHA: case SB_GETTEXTLENGTHW: return STATUSBAR_GetTextLength (hwnd, wParam); case SB_GETTIPTEXTA: return STATUSBAR_GetTipTextA (hwnd, wParam, lParam); case SB_GETTIPTEXTW: return STATUSBAR_GetTipTextW (hwnd, wParam, lParam); case SB_GETUNICODEFORMAT: return STATUSBAR_GetUnicodeFormat (hwnd); case SB_ISSIMPLE: return STATUSBAR_IsSimple (hwnd); case SB_SETBKCOLOR: return STATUSBAR_SetBkColor (hwnd, wParam, lParam); case SB_SETICON: return STATUSBAR_SetIcon (hwnd, wParam, lParam); case SB_SETMINHEIGHT: return STATUSBAR_SetMinHeight (hwnd, wParam, lParam); case SB_SETPARTS: return STATUSBAR_SetParts (hwnd, wParam, lParam); case SB_SETTEXTA: return STATUSBAR_SetTextA (hwnd, wParam, lParam); case SB_SETTEXTW: return STATUSBAR_SetTextW (hwnd, wParam, lParam); case SB_SETTIPTEXTA: return STATUSBAR_SetTipTextA (hwnd, wParam, lParam); case SB_SETTIPTEXTW: return STATUSBAR_SetTipTextW (hwnd, wParam, lParam); case SB_SETUNICODEFORMAT: return STATUSBAR_SetUnicodeFormat (hwnd, wParam); case SB_SIMPLE: return STATUSBAR_Simple (hwnd, wParam, lParam); case WM_CREATE: return STATUSBAR_WMCreate (hwnd, wParam, lParam); case WM_DESTROY: return STATUSBAR_WMDestroy (hwnd); case WM_GETFONT: return STATUSBAR_WMGetFont (hwnd); case WM_GETTEXT: return STATUSBAR_WMGetText (hwnd, wParam, lParam); case WM_GETTEXTLENGTH: return STATUSBAR_GetTextLength (hwnd, 0); case WM_LBUTTONDBLCLK: return STATUSBAR_SendNotify (hwnd, NM_DBLCLK); case WM_LBUTTONUP: return STATUSBAR_SendNotify (hwnd, NM_CLICK); case WM_MOUSEMOVE: return STATUSBAR_WMMouseMove (hwnd, wParam, lParam); case WM_NCHITTEST: return STATUSBAR_WMNCHitTest (hwnd, wParam, lParam); case WM_NCLBUTTONDOWN: return STATUSBAR_WMNCLButtonDown (hwnd, wParam, lParam); case WM_NCLBUTTONUP: return STATUSBAR_WMNCLButtonUp (hwnd, wParam, lParam); case WM_PAINT: return STATUSBAR_WMPaint (hwnd, wParam); case WM_RBUTTONDBLCLK: return STATUSBAR_SendNotify (hwnd, NM_RDBLCLK); case WM_RBUTTONUP: return STATUSBAR_SendNotify (hwnd, NM_RCLICK); case WM_SETFONT: return STATUSBAR_WMSetFont (hwnd, wParam, lParam); case WM_SETTEXT: return STATUSBAR_WMSetText (hwnd, wParam, lParam); case WM_SIZE: return STATUSBAR_WMSize (hwnd, wParam, lParam); default: if (msg >= WM_USER) ERR("unknown msg %04x wp=%04x lp=%08lx\n", msg, wParam, lParam); return DefWindowProcA (hwnd, msg, wParam, lParam); } return 0; } /*********************************************************************** * STATUS_Register [Internal] * * Registers the status window class. */ VOID STATUS_Register (void) { WNDCLASSA wndClass; ZeroMemory (&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS | CS_DBLCLKS | CS_VREDRAW; wndClass.lpfnWndProc = (WNDPROC)StatusWindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(STATUSWINDOWINFO *); wndClass.hCursor = LoadCursorA (0, IDC_ARROWA); wndClass.hbrBackground = (HBRUSH)(COLOR_3DFACE + 1); wndClass.lpszClassName = STATUSCLASSNAMEA; RegisterClassA (&wndClass); } /*********************************************************************** * STATUS_Unregister [Internal] * * Unregisters the status window class. */ VOID STATUS_Unregister (void) { UnregisterClassA (STATUSCLASSNAMEA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/tab.c0100644000175000001440000017124607113041545015753 0ustar julliardusers/* * Tab control * * Copyright 1998 Anders Carlsson * Copyright 1999 Alex Priem * Copyright 1999 Francis Beaudet * * TODO: * Image list support * Multiline support * Unicode support */ #include #include "winbase.h" #include "commctrl.h" #include "tab.h" #include "debugtools.h" #include "cache.h" #include "win.h" DEFAULT_DEBUG_CHANNEL(tab) /****************************************************************************** * Positioning constants */ #define SELECTED_TAB_OFFSET 2 #define HORIZONTAL_ITEM_PADDING 5 #define VERTICAL_ITEM_PADDING 3 #define ROUND_CORNER_SIZE 2 #define FOCUS_RECT_HOFFSET 2 #define FOCUS_RECT_VOFFSET 1 #define DISPLAY_AREA_PADDINGX 2 #define DISPLAY_AREA_PADDINGY 2 #define CONTROL_BORDER_SIZEX 2 #define CONTROL_BORDER_SIZEY 2 #define BUTTON_SPACINGX 10 #define DEFAULT_TAB_WIDTH 96 #define TAB_GetInfoPtr(hwnd) ((TAB_INFO *)GetWindowLongA(hwnd,0)) /****************************************************************************** * Hot-tracking timer constants */ #define TAB_HOTTRACK_TIMER 1 #define TAB_HOTTRACK_TIMER_INTERVAL 100 /* milliseconds */ /****************************************************************************** * Prototypes */ static void TAB_Refresh (HWND hwnd, HDC hdc); static void TAB_InvalidateTabArea(HWND hwnd, TAB_INFO* infoPtr); static void TAB_EnsureSelectionVisible(HWND hwnd, TAB_INFO* infoPtr); static void TAB_DrawItem(HWND hwnd, HDC hdc, INT iItem); static void TAB_DrawItemInterior(HWND hwnd, HDC hdc, INT iItem, RECT* drawRect); static BOOL TAB_SendSimpleNotify (HWND hwnd, UINT code) { NMHDR nmhdr; nmhdr.hwndFrom = hwnd; nmhdr.idFrom = GetWindowLongA(hwnd, GWL_ID); nmhdr.code = code; return (BOOL) SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM) nmhdr.idFrom, (LPARAM) &nmhdr); } static VOID TAB_RelayEvent (HWND hwndTip, HWND hwndMsg, UINT uMsg, WPARAM wParam, LPARAM lParam) { MSG msg; msg.hwnd = hwndMsg; msg.message = uMsg; msg.wParam = wParam; msg.lParam = lParam; msg.time = GetMessageTime (); msg.pt.x = LOWORD(GetMessagePos ()); msg.pt.y = HIWORD(GetMessagePos ()); SendMessageA (hwndTip, TTM_RELAYEVENT, 0, (LPARAM)&msg); } static LRESULT TAB_GetCurSel (HWND hwnd) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); return infoPtr->iSelected; } static LRESULT TAB_GetCurFocus (HWND hwnd) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); return infoPtr->uFocus; } static LRESULT TAB_GetToolTips (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); if (infoPtr == NULL) return 0; return infoPtr->hwndToolTip; } static LRESULT TAB_SetCurSel (HWND hwnd,WPARAM wParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); INT iItem=(INT) wParam; INT prevItem; prevItem=-1; if ((iItem >= 0) && (iItem < infoPtr->uNumItem)) { prevItem=infoPtr->iSelected; infoPtr->iSelected=iItem; TAB_EnsureSelectionVisible(hwnd, infoPtr); TAB_InvalidateTabArea(hwnd, infoPtr); } return prevItem; } static LRESULT TAB_SetCurFocus (HWND hwnd,WPARAM wParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); INT iItem=(INT) wParam; if ((iItem < 0) || (iItem >= infoPtr->uNumItem)) return 0; if (GetWindowLongA(hwnd, GWL_STYLE) & TCS_BUTTONS) { FIXME("Should set input focus\n"); } else { if (infoPtr->iSelected != iItem || infoPtr->uFocus == -1 ) { infoPtr->uFocus=iItem; if (TAB_SendSimpleNotify(hwnd, TCN_SELCHANGING)!=TRUE) { infoPtr->iSelected = iItem; TAB_SendSimpleNotify(hwnd, TCN_SELCHANGE); TAB_EnsureSelectionVisible(hwnd, infoPtr); TAB_InvalidateTabArea(hwnd, infoPtr); } } } return 0; } static LRESULT TAB_SetToolTips (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); if (infoPtr == NULL) return 0; infoPtr->hwndToolTip = (HWND)wParam; return 0; } /****************************************************************************** * TAB_InternalGetItemRect * * This method will calculate the rectangle representing a given tab item in * client coordinates. This method takes scrolling into account. * * This method returns TRUE if the item is visible in the window and FALSE * if it is completely outside the client area. */ static BOOL TAB_InternalGetItemRect( HWND hwnd, TAB_INFO* infoPtr, INT itemIndex, RECT* itemRect, RECT* selectedRect) { RECT tmpItemRect,clientRect; LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); /* * Perform a sanity check and a trivial visibility check. */ if ( (infoPtr->uNumItem <=0) || (itemIndex >= infoPtr->uNumItem) || (!(lStyle &TCS_MULTILINE) && (itemIndex < infoPtr->leftmostVisible)) ) return FALSE; /* * Avoid special cases in this procedure by assigning the "out" * parameters if the caller didn't supply them */ if (itemRect==NULL) itemRect = &tmpItemRect; /* * Retrieve the unmodified item rect. */ *itemRect = infoPtr->items[itemIndex].rect; /* * calculate the times bottom and top based on the row */ GetClientRect(hwnd, &clientRect); if (lStyle & TCS_BOTTOM) { itemRect->bottom = clientRect.bottom - SELECTED_TAB_OFFSET - itemRect->top * (infoPtr->tabHeight - 2); itemRect->top = clientRect.bottom - infoPtr->tabHeight - itemRect->top * ( infoPtr->tabHeight - 2); } else { itemRect->bottom = clientRect.top + infoPtr->tabHeight + itemRect->top * (infoPtr->tabHeight - 2); itemRect->top = clientRect.top + SELECTED_TAB_OFFSET+ itemRect->top * (infoPtr->tabHeight - 2); } /* * "scroll" it to make sure the item at the very left of the * tab control is the leftmost visible tab. */ OffsetRect(itemRect, -infoPtr->items[infoPtr->leftmostVisible].rect.left, 0); /* * Move the rectangle so the first item is slightly offset from * the left of the tab control. */ OffsetRect(itemRect, SELECTED_TAB_OFFSET, 0); /* * Now, calculate the position of the item as if it were selected. */ if (selectedRect!=NULL) { CopyRect(selectedRect, itemRect); /* * The rectangle of a selected item is a bit wider. */ InflateRect(selectedRect, SELECTED_TAB_OFFSET, 0); /* * If it also a bit higher. */ if (GetWindowLongA(hwnd, GWL_STYLE) & TCS_BOTTOM) { selectedRect->top -=2; /* the border is thicker on the bottom */ selectedRect->bottom +=SELECTED_TAB_OFFSET; } else { selectedRect->top -=SELECTED_TAB_OFFSET; selectedRect->bottom+=1; } } return TRUE; } static BOOL TAB_GetItemRect(HWND hwnd, WPARAM wParam, LPARAM lParam) { return TAB_InternalGetItemRect(hwnd, TAB_GetInfoPtr(hwnd), (INT)wParam, (LPRECT)lParam, (LPRECT)NULL); } /****************************************************************************** * TAB_KeyUp * * This method is called to handle keyboard input */ static LRESULT TAB_KeyUp( HWND hwnd, WPARAM keyCode) { TAB_INFO* infoPtr = TAB_GetInfoPtr(hwnd); int newItem = -1; switch (keyCode) { case VK_LEFT: newItem = infoPtr->uFocus-1; break; case VK_RIGHT: newItem = infoPtr->uFocus+1; break; } /* * If we changed to a valid item, change the selection */ if ( (newItem >= 0) && (newItem < infoPtr->uNumItem) && (infoPtr->uFocus != newItem) ) { if (!TAB_SendSimpleNotify(hwnd, TCN_SELCHANGING)) { infoPtr->iSelected = newItem; infoPtr->uFocus = newItem; TAB_SendSimpleNotify(hwnd, TCN_SELCHANGE); TAB_EnsureSelectionVisible(hwnd, infoPtr); TAB_InvalidateTabArea(hwnd, infoPtr); } } return 0; } /****************************************************************************** * TAB_FocusChanging * * This method is called whenever the focus goes in or out of this control * it is used to update the visual state of the control. */ static LRESULT TAB_FocusChanging( HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); RECT selectedRect; BOOL isVisible; /* * Get the rectangle for the item. */ isVisible = TAB_InternalGetItemRect(hwnd, infoPtr, infoPtr->uFocus, NULL, &selectedRect); /* * If the rectangle is not completely invisible, invalidate that * portion of the window. */ if (isVisible) { InvalidateRect(hwnd, &selectedRect, TRUE); } /* * Don't otherwise disturb normal behavior. */ return DefWindowProcA (hwnd, uMsg, wParam, lParam); } static HWND TAB_InternalHitTest ( HWND hwnd, TAB_INFO* infoPtr, POINT pt, UINT* flags) { RECT rect; int iCount; for (iCount = 0; iCount < infoPtr->uNumItem; iCount++) { TAB_InternalGetItemRect(hwnd, infoPtr, iCount, &rect, NULL); if (PtInRect (&rect, pt)) { *flags = TCHT_ONITEM; return iCount; } } *flags=TCHT_NOWHERE; return -1; } static LRESULT TAB_HitTest (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); LPTCHITTESTINFO lptest=(LPTCHITTESTINFO) lParam; return TAB_InternalHitTest (hwnd, infoPtr,lptest->pt,&lptest->flags); } static LRESULT TAB_LButtonDown (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); POINT pt; INT newItem,dummy; if (infoPtr->hwndToolTip) TAB_RelayEvent (infoPtr->hwndToolTip, hwnd, WM_LBUTTONDOWN, wParam, lParam); if (GetWindowLongA(hwnd, GWL_STYLE) & TCS_FOCUSONBUTTONDOWN ) { SetFocus (hwnd); } if (infoPtr->hwndToolTip) TAB_RelayEvent (infoPtr->hwndToolTip, hwnd, WM_LBUTTONDOWN, wParam, lParam); pt.x = (INT)LOWORD(lParam); pt.y = (INT)HIWORD(lParam); newItem=TAB_InternalHitTest (hwnd, infoPtr,pt,&dummy); TRACE("On Tab, item %d\n", newItem); if ( (newItem!=-1) && (infoPtr->iSelected != newItem) ) { if (TAB_SendSimpleNotify(hwnd, TCN_SELCHANGING)!=TRUE) { infoPtr->iSelected = newItem; infoPtr->uFocus = newItem; TAB_SendSimpleNotify(hwnd, TCN_SELCHANGE); TAB_EnsureSelectionVisible(hwnd, infoPtr); TAB_InvalidateTabArea(hwnd, infoPtr); } } return 0; } static LRESULT TAB_LButtonUp (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_SendSimpleNotify(hwnd, NM_CLICK); return 0; } static LRESULT TAB_RButtonDown (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_SendSimpleNotify(hwnd, NM_RCLICK); return 0; } /****************************************************************************** * TAB_DrawLoneItemInterior * * This calls TAB_DrawItemInterior. However, TAB_DrawItemInterior is normally * called by TAB_DrawItem which is normally called by TAB_Refresh which sets * up the device context and font. This routine does the same setup but * only calls TAB_DrawItemInterior for the single specified item. */ static void TAB_DrawLoneItemInterior(HWND hwnd, TAB_INFO* infoPtr, int iItem) { HDC hdc = GetDC(hwnd); HFONT hOldFont = SelectObject(hdc, infoPtr->hFont); TAB_DrawItemInterior(hwnd, hdc, iItem, NULL); SelectObject(hdc, hOldFont); ReleaseDC(hwnd, hdc); } /****************************************************************************** * TAB_HotTrackTimerProc * * When a mouse-move event causes a tab to be highlighted (hot-tracking), a * timer is setup so we can check if the mouse is moved out of our window. * (We don't get an event when the mouse leaves, the mouse-move events just * stop being delivered to our window and just start being delivered to * another window.) This function is called when the timer triggers so * we can check if the mouse has left our window. If so, we un-highlight * the hot-tracked tab. */ static VOID CALLBACK TAB_HotTrackTimerProc ( HWND hwnd, /* handle of window for timer messages */ UINT uMsg, /* WM_TIMER message */ UINT idEvent, /* timer identifier */ DWORD dwTime /* current system time */ ) { TAB_INFO* infoPtr = TAB_GetInfoPtr(hwnd); if (infoPtr != NULL && infoPtr->iHotTracked >= 0) { POINT pt; /* ** If we can't get the cursor position, or if the cursor is outside our ** window, we un-highlight the hot-tracked tab. Note that the cursor is ** "outside" even if it is within our bounding rect if another window ** overlaps. Note also that the case where the cursor stayed within our ** window but has moved off the hot-tracked tab will be handled by the ** WM_MOUSEMOVE event. */ if (!GetCursorPos(&pt) || WindowFromPoint(pt) != hwnd) { /* Redraw iHotTracked to look normal */ INT iRedraw = infoPtr->iHotTracked; infoPtr->iHotTracked = -1; TAB_DrawLoneItemInterior(hwnd, infoPtr, iRedraw); /* Kill this timer */ KillTimer(hwnd, TAB_HOTTRACK_TIMER); } } } /****************************************************************************** * TAB_RecalcHotTrack * * If a tab control has the TCS_HOTTRACK style, then the tab under the mouse * should be highlighted. This function determines which tab in a tab control, * if any, is under the mouse and records that information. The caller may * supply output parameters to receive the item number of the tab item which * was highlighted but isn't any longer and of the tab item which is now * highlighted but wasn't previously. The caller can use this information to * selectively redraw those tab items. * * If the caller has a mouse position, it can supply it through the pos * parameter. For example, TAB_MouseMove does this. Otherwise, the caller * supplies NULL and this function determines the current mouse position * itself. */ static void TAB_RecalcHotTrack ( HWND hwnd, const LPARAM* pos, int* out_redrawLeave, int* out_redrawEnter ) { TAB_INFO* infoPtr = TAB_GetInfoPtr(hwnd); int item = -1; if (out_redrawLeave != NULL) *out_redrawLeave = -1; if (out_redrawEnter != NULL) *out_redrawEnter = -1; if (GetWindowLongA(hwnd, GWL_STYLE) & TCS_HOTTRACK) { POINT pt; UINT flags; if (pos == NULL) { GetCursorPos(&pt); ScreenToClient(hwnd, &pt); } else { pt.x = LOWORD(*pos); pt.y = HIWORD(*pos); } item = TAB_InternalHitTest(hwnd, infoPtr, pt, &flags); } if (item != infoPtr->iHotTracked) { if (infoPtr->iHotTracked >= 0) { /* Mark currently hot-tracked to be redrawn to look normal */ if (out_redrawLeave != NULL) *out_redrawLeave = infoPtr->iHotTracked; if (item < 0) { /* Kill timer which forces recheck of mouse pos */ KillTimer(hwnd, TAB_HOTTRACK_TIMER); } } else { /* Start timer so we recheck mouse pos */ UINT timerID = SetTimer ( hwnd, TAB_HOTTRACK_TIMER, TAB_HOTTRACK_TIMER_INTERVAL, TAB_HotTrackTimerProc ); if (timerID == 0) return; /* Hot tracking not available */ } infoPtr->iHotTracked = item; if (item >= 0) { /* Mark new hot-tracked to be redrawn to look highlighted */ if (out_redrawEnter != NULL) *out_redrawEnter = item; } } } /****************************************************************************** * TAB_MouseMove * * Handles the mouse-move event. Updates tooltips. Updates hot-tracking. */ static LRESULT TAB_MouseMove (HWND hwnd, WPARAM wParam, LPARAM lParam) { int redrawLeave; int redrawEnter; TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); if (infoPtr->hwndToolTip) TAB_RelayEvent (infoPtr->hwndToolTip, hwnd, WM_LBUTTONDOWN, wParam, lParam); /* Determine which tab to highlight. Redraw tabs which change highlight ** status. */ TAB_RecalcHotTrack(hwnd, &lParam, &redrawLeave, &redrawEnter); if (redrawLeave != -1) TAB_DrawLoneItemInterior(hwnd, infoPtr, redrawLeave); if (redrawEnter != -1) TAB_DrawLoneItemInterior(hwnd, infoPtr, redrawEnter); return 0; } /****************************************************************************** * TAB_AdjustRect * * Calculates the tab control's display area given the windows rectangle or * the window rectangle given the requested display rectangle. */ static LRESULT TAB_AdjustRect( HWND hwnd, WPARAM fLarger, LPRECT prc) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); if (fLarger) { /* * Go from display rectangle */ /* * Add the height of the tabs. */ if (GetWindowLongA(hwnd, GWL_STYLE) & TCS_BOTTOM) prc->bottom += (infoPtr->tabHeight - 2) * (infoPtr->uNumRows + 1) + 2; else prc->top -= (infoPtr->tabHeight - 2) * (infoPtr->uNumRows + 1) + 2; /* * Inflate the rectangle for the padding */ InflateRect(prc, DISPLAY_AREA_PADDINGX, DISPLAY_AREA_PADDINGY); /* * Inflate for the border */ InflateRect(prc, CONTROL_BORDER_SIZEX, CONTROL_BORDER_SIZEX); } else { /* * Go from window rectangle. */ /* * Deflate the rectangle for the border */ InflateRect(prc, -CONTROL_BORDER_SIZEX, -CONTROL_BORDER_SIZEX); /* * Deflate the rectangle for the padding */ InflateRect(prc, -DISPLAY_AREA_PADDINGX, -DISPLAY_AREA_PADDINGY); /* * Remove the height of the tabs. */ if (GetWindowLongA(hwnd, GWL_STYLE) & TCS_BOTTOM) prc->bottom -= (infoPtr->tabHeight - 2) * (infoPtr->uNumRows + 1) + 2; else prc->top += (infoPtr->tabHeight - 2) * (infoPtr->uNumRows + 1) + 2; } return 0; } /****************************************************************************** * TAB_OnHScroll * * This method will handle the notification from the scroll control and * perform the scrolling operation on the tab control. */ static LRESULT TAB_OnHScroll( HWND hwnd, int nScrollCode, int nPos, HWND hwndScroll) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); if(nScrollCode == SB_THUMBPOSITION && nPos != infoPtr->leftmostVisible) { if(nPos < infoPtr->leftmostVisible) infoPtr->leftmostVisible--; else infoPtr->leftmostVisible++; TAB_RecalcHotTrack(hwnd, NULL, NULL, NULL); TAB_InvalidateTabArea(hwnd, infoPtr); SendMessageA(infoPtr->hwndUpDown, UDM_SETPOS, 0, MAKELONG(infoPtr->leftmostVisible, 0)); } return 0; } /****************************************************************************** * TAB_SetupScroling * * This method will check the current scrolling state and make sure the * scrolling control is displayed (or not). */ static void TAB_SetupScrolling( HWND hwnd, TAB_INFO* infoPtr, const RECT* clientRect) { INT maxRange = 0; if (infoPtr->needsScrolling) { RECT controlPos; INT vsize, tabwidth; /* * Calculate the position of the scroll control. */ controlPos.right = clientRect->right; controlPos.left = controlPos.right - 2*GetSystemMetrics(SM_CXHSCROLL); if (GetWindowLongA(hwnd, GWL_STYLE) & TCS_BOTTOM) { controlPos.top = clientRect->bottom - infoPtr->tabHeight; controlPos.bottom = controlPos.top + GetSystemMetrics(SM_CYHSCROLL); } else { controlPos.bottom = clientRect->top + infoPtr->tabHeight; controlPos.top = controlPos.bottom - GetSystemMetrics(SM_CYHSCROLL); } /* * If we don't have a scroll control yet, we want to create one. * If we have one, we want to make sure it's positioned right. */ if (infoPtr->hwndUpDown==0) { /* * I use a scrollbar since it seems to be more stable than the Updown * control. */ infoPtr->hwndUpDown = CreateWindowA("msctls_updown32", "", WS_VISIBLE | WS_CHILD | UDS_HORZ, controlPos.left, controlPos.top, controlPos.right - controlPos.left, controlPos.bottom - controlPos.top, hwnd, (HMENU)NULL, (HINSTANCE)NULL, NULL); } else { SetWindowPos(infoPtr->hwndUpDown, (HWND)NULL, controlPos.left, controlPos.top, controlPos.right - controlPos.left, controlPos.bottom - controlPos.top, SWP_SHOWWINDOW | SWP_NOZORDER); } /* Now calculate upper limit of the updown control range. * We do this by calculating how many tabs will be offscreen when the * last tab is visible. */ if(infoPtr->uNumItem) { vsize = clientRect->right - (controlPos.right - controlPos.left + 1); maxRange = infoPtr->uNumItem; tabwidth = infoPtr->items[maxRange-1].rect.right; for(; maxRange > 0; maxRange--) { if(tabwidth - infoPtr->items[maxRange - 1].rect.left > vsize) break; } if(maxRange == infoPtr->uNumItem) maxRange--; } } else { /* * If we once had a scroll control... hide it. */ if (infoPtr->hwndUpDown!=0) { ShowWindow(infoPtr->hwndUpDown, SW_HIDE); } } if (infoPtr->hwndUpDown) SendMessageA(infoPtr->hwndUpDown, UDM_SETRANGE32, 0, maxRange); } /****************************************************************************** * TAB_SetItemBounds * * This method will calculate the position rectangles of all the items in the * control. The rectangle calculated starts at 0 for the first item in the * list and ignores scrolling and selection. * It also uses the current font to determine the height of the tab row and * it checks if all the tabs fit in the client area of the window. If they * dont, a scrolling control is added. */ static void TAB_SetItemBounds (HWND hwnd) { TAB_INFO* infoPtr = TAB_GetInfoPtr(hwnd); LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); TEXTMETRICA fontMetrics; INT curItem; INT curItemLeftPos; INT curItemRowCount; HFONT hFont, hOldFont; HDC hdc; RECT clientRect; SIZE size; /* * We need to get text information so we need a DC and we need to select * a font. */ hdc = GetDC(hwnd); hFont = infoPtr->hFont ? infoPtr->hFont : GetStockObject (SYSTEM_FONT); hOldFont = SelectObject (hdc, hFont); /* * We will base the rectangle calculations on the client rectangle * of the control. */ GetClientRect(hwnd, &clientRect); /* * The leftmost item will be "0" aligned */ curItemLeftPos = 0; curItemRowCount = 0; if ( !(lStyle & TCS_FIXEDWIDTH) && !((lStyle & TCS_OWNERDRAWFIXED) && infoPtr->fSizeSet) ) { int item_height; int icon_height = 0; /* * Use the current font to determine the height of a tab. */ GetTextMetricsA(hdc, &fontMetrics); /* * Get the icon height */ if (infoPtr->himl) ImageList_GetIconSize(infoPtr->himl, 0, &icon_height); /* * Take the highest between font or icon */ if (fontMetrics.tmHeight > icon_height) item_height = fontMetrics.tmHeight; else item_height = icon_height; /* * Make sure there is enough space for the letters + icon + growing the * selected item + extra space for the selected item. */ infoPtr->tabHeight = item_height + 2*VERTICAL_ITEM_PADDING + SELECTED_TAB_OFFSET; } for (curItem = 0; curItem < infoPtr->uNumItem; curItem++) { /* * Set the leftmost position of the tab. */ infoPtr->items[curItem].rect.left = curItemLeftPos; if ( (lStyle & TCS_FIXEDWIDTH) || ((lStyle & TCS_OWNERDRAWFIXED) && infoPtr->fSizeSet)) { infoPtr->items[curItem].rect.right = infoPtr->items[curItem].rect.left + infoPtr->tabWidth + 2*HORIZONTAL_ITEM_PADDING; } else { int icon_width = 0; int num = 2; /* * Calculate how wide the tab is depending on the text it contains */ GetTextExtentPoint32A(hdc, infoPtr->items[curItem].pszText, lstrlenA(infoPtr->items[curItem].pszText), &size); /* * Add the icon width */ if (infoPtr->himl) { ImageList_GetIconSize(infoPtr->himl, &icon_width, 0); num++; } infoPtr->items[curItem].rect.right = infoPtr->items[curItem].rect.left + size.cx + icon_width + num*HORIZONTAL_ITEM_PADDING; } /* * Check if this is a multiline tab control and if so * check to see if we should wrap the tabs * * Because we are going to arange all these tabs evenly * really we are basically just counting rows at this point * */ if ((lStyle & TCS_MULTILINE)&& (infoPtr->items[curItem].rect.right > clientRect.right)) { infoPtr->items[curItem].rect.right -= infoPtr->items[curItem].rect.left; infoPtr->items[curItem].rect.left = 0; curItemRowCount ++; } infoPtr->items[curItem].rect.bottom = 0; infoPtr->items[curItem].rect.top = curItemRowCount; TRACE("TextSize: %i\n ", size.cx); TRACE("Rect: T %i, L %i, B %i, R %i\n", infoPtr->items[curItem].rect.top, infoPtr->items[curItem].rect.left, infoPtr->items[curItem].rect.bottom, infoPtr->items[curItem].rect.right); /* * The leftmost position of the next item is the rightmost position * of this one. */ if (lStyle & TCS_BUTTONS) curItemLeftPos = infoPtr->items[curItem].rect.right + BUTTON_SPACINGX; else curItemLeftPos = infoPtr->items[curItem].rect.right; } if (!(lStyle & TCS_MULTILINE)) { /* * Check if we need a scrolling control. */ infoPtr->needsScrolling = (curItemLeftPos + (2*SELECTED_TAB_OFFSET) > clientRect.right); /* Don't need scrolling, then update infoPtr->leftmostVisible */ if(!infoPtr->needsScrolling) infoPtr->leftmostVisible = 0; TAB_SetupScrolling(hwnd, infoPtr, &clientRect); } /* * Set the number of rows */ infoPtr->uNumRows = curItemRowCount; if ((lStyle & TCS_MULTILINE)&&(infoPtr->uNumItem > 0)) { INT widthDiff,remainder; INT tabPerRow,remTab; INT iRow,iItm; INT iIndexStart=0,iIndexEnd=0, iCount=0; /* * Ok Microsoft trys to even out the rows. place the same * number of tabs in each row. So lets give that a shot * */ tabPerRow = infoPtr->uNumItem / (infoPtr->uNumRows + 1); remTab = infoPtr->uNumItem % (infoPtr->uNumRows + 1); for (iItm=0,iRow=0,iCount=0,curItemLeftPos=0; iItmuNumItem; iItm++,iCount++) { if (iCount >= ((iRowitems[iItm].rect.right -= infoPtr->items[iItm].rect.left; infoPtr->items[iItm].rect.left = 0; infoPtr->items[iItm].rect.top = iRow; infoPtr->items[iItm].rect.left +=curItemLeftPos; infoPtr->items[iItm].rect.right +=curItemLeftPos; if (lStyle & TCS_BUTTONS) curItemLeftPos = infoPtr->items[iItm].rect.right + BUTTON_SPACINGX; else curItemLeftPos = infoPtr->items[iItm].rect.right; } /* * Justify the rows * */ { while(iIndexStart < infoPtr->uNumItem) { /* * find the indexs of the row */ for (iIndexEnd=iIndexStart; (iIndexEnd < infoPtr->uNumItem) && (infoPtr->items[iIndexEnd].rect.top == infoPtr->items[iIndexStart].rect.top) ; iIndexEnd++) /* intentionaly blank */; /* * we need to justify these tabs so they fill the whole given * client area * */ widthDiff = clientRect.right - (2*SELECTED_TAB_OFFSET) - infoPtr->items[iIndexEnd-1].rect.right; iCount = iIndexEnd-iIndexStart; if (iCount>1) { INT iIndex; remainder = widthDiff % iCount; widthDiff = widthDiff / iCount; for (iIndex=iIndexStart,iCount=0; iIndex < iIndexEnd; iIndex++,iCount++) { infoPtr->items[iIndex].rect.left +=iCount*widthDiff; infoPtr->items[iIndex].rect.right +=(iCount+1)*widthDiff; } infoPtr->items[iIndex-1].rect.right += remainder; } iIndexStart=iIndexEnd; } } } TAB_EnsureSelectionVisible(hwnd,infoPtr); TAB_RecalcHotTrack(hwnd, NULL, NULL, NULL); /* * Cleanup */ SelectObject (hdc, hOldFont); ReleaseDC (hwnd, hdc); } /****************************************************************************** * TAB_DrawItemInterior * * This method is used to draw the interior (text and icon) of a single tab * into the tab control. */ static void TAB_DrawItemInterior ( HWND hwnd, HDC hdc, INT iItem, RECT* drawRect ) { TAB_INFO* infoPtr = TAB_GetInfoPtr(hwnd); LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); RECT localRect; HPEN htextPen = GetSysColorPen (COLOR_BTNTEXT); HPEN holdPen; INT oldBkMode; if (drawRect == NULL) { BOOL isVisible; RECT itemRect; RECT selectedRect; /* * Get the rectangle for the item. */ isVisible = TAB_InternalGetItemRect ( hwnd, infoPtr, iItem, &itemRect, &selectedRect ); if (!isVisible) return; /* * Make sure drawRect points to something valid; simplifies code. */ drawRect = &localRect; /* * This logic copied from the part of TAB_DrawItem which draws * the tab background. It's important to keep it in sync. I * would have liked to avoid code duplication, but couldn't figure * out how without making spaghetti of TAB_DrawItem. */ if (lStyle & TCS_BUTTONS) { *drawRect = itemRect; if (iItem == infoPtr->iSelected) { drawRect->right--; drawRect->bottom--; } } else { if (iItem == infoPtr->iSelected) *drawRect = selectedRect; else *drawRect = itemRect; drawRect->right--; drawRect->bottom--; } } /* * Text pen */ holdPen = SelectObject(hdc, htextPen); oldBkMode = SetBkMode(hdc, TRANSPARENT); SetTextColor ( hdc, GetSysColor ( (iItem == infoPtr->iHotTracked) ? COLOR_HIGHLIGHT : COLOR_BTNTEXT ) ); /* * Deflate the rectangle to acount for the padding */ InflateRect(drawRect, -HORIZONTAL_ITEM_PADDING, -VERTICAL_ITEM_PADDING); /* * if owner draw, tell the owner to draw */ if ( (lStyle & TCS_OWNERDRAWFIXED) && GetParent(hwnd) ) { DRAWITEMSTRUCT dis; WND *pwndPtr; UINT id; /* * get the control id */ pwndPtr = WIN_FindWndPtr( hwnd ); id = pwndPtr->wIDmenu; WIN_ReleaseWndPtr(pwndPtr); /* * put together the DRAWITEMSTRUCT */ dis.CtlType = ODT_TAB; dis.CtlID = id; dis.itemID = iItem; dis.itemAction = ODA_DRAWENTIRE; if ( iItem == infoPtr->iSelected ) dis.itemState = ODS_SELECTED; else dis.itemState = 0; dis.hwndItem = hwnd; /* */ dis.hDC = hdc; dis.rcItem = *drawRect; /* */ dis.itemData = infoPtr->items[iItem].lParam; /* * send the draw message */ SendMessageA( GetParent(hwnd), WM_DRAWITEM, (WPARAM)id, (LPARAM)&dis ); } else { UINT uHorizAlign; /* * If not owner draw, then do the drawing ourselves. * * Draw the icon. */ if (infoPtr->himl && (infoPtr->items[iItem].mask & TCIF_IMAGE)) { INT cx; INT cy; ImageList_Draw ( infoPtr->himl, infoPtr->items[iItem].iImage, hdc, drawRect->left, drawRect->top + 1, ILD_NORMAL ); ImageList_GetIconSize(infoPtr->himl, &cx, &cy); drawRect->left += (cx + HORIZONTAL_ITEM_PADDING); } /* * Draw the text; */ if (lStyle & TCS_RIGHTJUSTIFY) uHorizAlign = DT_CENTER; else uHorizAlign = DT_LEFT; DrawTextA ( hdc, infoPtr->items[iItem].pszText, lstrlenA(infoPtr->items[iItem].pszText), drawRect, uHorizAlign | DT_SINGLELINE | DT_VCENTER ); } /* * Cleanup */ SetBkMode(hdc, oldBkMode); SelectObject(hdc, holdPen); } /****************************************************************************** * TAB_DrawItem * * This method is used to draw a single tab into the tab control. */ static void TAB_DrawItem( HWND hwnd, HDC hdc, INT iItem) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); RECT itemRect; RECT selectedRect; BOOL isVisible; RECT r; /* * Get the rectangle for the item. */ isVisible = TAB_InternalGetItemRect(hwnd, infoPtr, iItem, &itemRect, &selectedRect); if (isVisible) { HBRUSH hbr = CreateSolidBrush (GetSysColor(COLOR_BTNFACE)); HPEN hwPen = GetSysColorPen (COLOR_3DHILIGHT); HPEN hbPen = GetSysColorPen (COLOR_BTNSHADOW); HPEN hfocusPen = CreatePen(PS_DOT, 1, GetSysColor(COLOR_BTNTEXT)); HPEN holdPen; INT oldBkMode; BOOL deleteBrush = TRUE; if (lStyle & TCS_BUTTONS) { /* * Get item rectangle. */ r = itemRect; holdPen = SelectObject (hdc, hwPen); if (iItem == infoPtr->iSelected) { /* * Background color. */ if (!((lStyle & TCS_OWNERDRAWFIXED) && infoPtr->fSizeSet)) { COLORREF bk = GetSysColor(COLOR_3DHILIGHT); DeleteObject(hbr); hbr = GetSysColorBrush(COLOR_SCROLLBAR); SetTextColor(hdc, GetSysColor(COLOR_3DFACE)); SetBkColor(hdc, bk); /* if COLOR_WINDOW happens to be the same as COLOR_3DHILIGHT * we better use 0x55aa bitmap brush to make scrollbar's background * look different from the window background. */ if (bk == GetSysColor(COLOR_WINDOW)) hbr = CACHE_GetPattern55AABrush(); deleteBrush = FALSE; } /* * Erase the background. */ FillRect(hdc, &r, hbr); /* * Draw the tab now. * The rectangles calculated exclude the right and bottom * borders of the rectangle. To simply the following code, those * borders are shaved-off beforehand. */ r.right--; r.bottom--; /* highlight */ MoveToEx (hdc, r.left, r.bottom, NULL); LineTo (hdc, r.right, r.bottom); LineTo (hdc, r.right, r.top); /* shadow */ SelectObject(hdc, hbPen); LineTo (hdc, r.left, r.top); LineTo (hdc, r.left, r.bottom); } else { /* * Erase the background. */ FillRect(hdc, &r, hbr); /* highlight */ MoveToEx (hdc, r.left, r.bottom, NULL); LineTo (hdc, r.left, r.top); LineTo (hdc, r.right, r.top); /* shadow */ SelectObject(hdc, hbPen); LineTo (hdc, r.right, r.bottom); LineTo (hdc, r.left, r.bottom); } } else { /* * Background color. */ DeleteObject(hbr); hbr = CreateSolidBrush(GetSysColor(COLOR_BTNFACE)); /* * We draw a rectangle of different sizes depending on the selection * state. */ if (iItem == infoPtr->iSelected) r = selectedRect; else r = itemRect; /* * Erase the background. * This is necessary when drawing the selected item since it is larger * than the others, it might overlap with stuff already drawn by the * other tabs */ FillRect(hdc, &r, hbr); /* * Draw the tab now. * The rectangles calculated exclude the right and bottom * borders of the rectangle. To simply the following code, those * borders are shaved-off beforehand. */ r.right--; r.bottom--; holdPen = SelectObject (hdc, hwPen); if (lStyle & TCS_BOTTOM) { /* highlight */ MoveToEx (hdc, r.left, r.top, NULL); LineTo (hdc, r.left, r.bottom - ROUND_CORNER_SIZE); LineTo (hdc, r.left + ROUND_CORNER_SIZE, r.bottom); /* shadow */ SelectObject(hdc, hbPen); LineTo (hdc, r.right - ROUND_CORNER_SIZE, r.bottom); LineTo (hdc, r.right, r.bottom - ROUND_CORNER_SIZE); LineTo (hdc, r.right, r.top); } else { /* highlight */ MoveToEx (hdc, r.left, r.bottom, NULL); LineTo (hdc, r.left, r.top + ROUND_CORNER_SIZE); LineTo (hdc, r.left + ROUND_CORNER_SIZE, r.top); LineTo (hdc, r.right - ROUND_CORNER_SIZE, r.top); /* shadow */ SelectObject(hdc, hbPen); LineTo (hdc, r.right, r.top + ROUND_CORNER_SIZE); LineTo (hdc, r.right, r.bottom); } } oldBkMode = SetBkMode(hdc, TRANSPARENT); /* This modifies r to be the text rectangle. */ TAB_DrawItemInterior(hwnd, hdc, iItem, &r); /* * Draw the focus rectangle */ if (((lStyle & TCS_FOCUSNEVER) == 0) && (GetFocus() == hwnd) && (iItem == infoPtr->uFocus) ) { InflateRect(&r, FOCUS_RECT_HOFFSET, FOCUS_RECT_VOFFSET); SelectObject(hdc, hfocusPen); MoveToEx (hdc, r.left, r.top, NULL); LineTo (hdc, r.right-1, r.top); LineTo (hdc, r.right-1, r.bottom -1); LineTo (hdc, r.left, r.bottom -1); LineTo (hdc, r.left, r.top); } /* * Cleanup */ SetBkMode(hdc, oldBkMode); SelectObject(hdc, holdPen); DeleteObject(hfocusPen); if (deleteBrush) DeleteObject(hbr); } } /****************************************************************************** * TAB_DrawBorder * * This method is used to draw the raised border around the tab control * "content" area. */ static void TAB_DrawBorder (HWND hwnd, HDC hdc) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); HPEN htmPen; HPEN hwPen = GetSysColorPen (COLOR_3DHILIGHT); HPEN hbPen = GetSysColorPen (COLOR_3DDKSHADOW); HPEN hShade = GetSysColorPen (COLOR_BTNSHADOW); RECT rect; GetClientRect (hwnd, &rect); /* * Adjust for the style */ if (GetWindowLongA(hwnd, GWL_STYLE) & TCS_BOTTOM) { rect.bottom -= (infoPtr->tabHeight - 2) * (infoPtr->uNumRows + 1) + 2; } else { rect.top += (infoPtr->tabHeight - 2) * (infoPtr->uNumRows + 1) + 2; } /* * Shave-off the right and bottom margins (exluded in the * rect) */ rect.right--; rect.bottom--; /* highlight */ htmPen = SelectObject (hdc, hwPen); MoveToEx (hdc, rect.left, rect.bottom, NULL); LineTo (hdc, rect.left, rect.top); LineTo (hdc, rect.right, rect.top); /* Dark Shadow */ SelectObject (hdc, hbPen); LineTo (hdc, rect.right, rect.bottom ); LineTo (hdc, rect.left, rect.bottom); /* shade */ SelectObject (hdc, hShade ); MoveToEx (hdc, rect.right-1, rect.top, NULL); LineTo (hdc, rect.right-1, rect.bottom-1); LineTo (hdc, rect.left, rect.bottom-1); SelectObject(hdc, htmPen); } /****************************************************************************** * TAB_Refresh * * This method repaints the tab control.. */ static void TAB_Refresh (HWND hwnd, HDC hdc) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); HFONT hOldFont; INT i; if (!infoPtr->DoRedraw) return; hOldFont = SelectObject (hdc, infoPtr->hFont); if (GetWindowLongA(hwnd, GWL_STYLE) & TCS_BUTTONS) { for (i = 0; i < infoPtr->uNumItem; i++) { TAB_DrawItem (hwnd, hdc, i); } } else { /* * Draw all the non selected item first. */ for (i = 0; i < infoPtr->uNumItem; i++) { if (i != infoPtr->iSelected) TAB_DrawItem (hwnd, hdc, i); } /* * Now, draw the border, draw it before the selected item * since the selected item overwrites part of the border. */ TAB_DrawBorder (hwnd, hdc); /* * Then, draw the selected item */ TAB_DrawItem (hwnd, hdc, infoPtr->iSelected); /* * If we haven't set the current focus yet, set it now. * Only happens when we first paint the tab controls. */ if (infoPtr->uFocus == -1) TAB_SetCurFocus(hwnd, infoPtr->iSelected); } SelectObject (hdc, hOldFont); } static LRESULT TAB_SetRedraw (HWND hwnd, WPARAM wParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); infoPtr->DoRedraw=(BOOL) wParam; return 0; } static LRESULT TAB_EraseBackground( HWND hwnd, HDC givenDC) { HDC hdc; RECT clientRect; HBRUSH brush = CreateSolidBrush(GetSysColor(COLOR_BTNFACE)); hdc = givenDC ? givenDC : GetDC(hwnd); GetClientRect(hwnd, &clientRect); FillRect(hdc, &clientRect, brush); if (givenDC==0) ReleaseDC(hwnd, hdc); DeleteObject(brush); return 0; } /****************************************************************************** * TAB_EnsureSelectionVisible * * This method will make sure that the current selection is completely * visible by scrolling until it is. */ static void TAB_EnsureSelectionVisible( HWND hwnd, TAB_INFO* infoPtr) { INT iSelected = infoPtr->iSelected; INT iOrigLeftmostVisible = infoPtr->leftmostVisible; /* * set the items row to the bottommost row or topmost row depending on * style */ if (infoPtr->uNumRows > 0) { INT newselected=infoPtr->items[iSelected].rect.top; INT iTargetRow; LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); if (lStyle & TCS_BOTTOM) iTargetRow = 0; else iTargetRow = infoPtr->uNumRows; if (newselected != iTargetRow) { INT i; for (i=0; i < infoPtr->uNumItem; i++) if (infoPtr->items[i].rect.top == newselected ) infoPtr->items[i].rect.top = iTargetRow; else if (lStyle&TCS_BOTTOM) { if (infoPtr->items[i].rect.top < newselected) infoPtr->items[i].rect.top+=1; } else { if (infoPtr->items[i].rect.top > newselected) infoPtr->items[i].rect.top-=1; } TAB_RecalcHotTrack(hwnd, NULL, NULL, NULL); } } /* * Do the trivial cases first. */ if ( (!infoPtr->needsScrolling) || (infoPtr->hwndUpDown==0) ) return; if (infoPtr->leftmostVisible >= iSelected) { infoPtr->leftmostVisible = iSelected; } else { RECT r; INT width, i; /* * Calculate the part of the client area that is visible. */ GetClientRect(hwnd, &r); width = r.right; GetClientRect(infoPtr->hwndUpDown, &r); width -= r.right; if ((infoPtr->items[iSelected].rect.right - infoPtr->items[iSelected].rect.left) >= width ) { /* Special case: width of selected item is greater than visible * part of control. */ infoPtr->leftmostVisible = iSelected; } else { for (i = infoPtr->leftmostVisible; i < infoPtr->uNumItem; i++) { if ((infoPtr->items[iSelected].rect.right - infoPtr->items[i].rect.left) < width) break; } infoPtr->leftmostVisible = i; } } if (infoPtr->leftmostVisible != iOrigLeftmostVisible) TAB_RecalcHotTrack(hwnd, NULL, NULL, NULL); SendMessageA(infoPtr->hwndUpDown, UDM_SETPOS, 0, MAKELONG(infoPtr->leftmostVisible, 0)); } /****************************************************************************** * TAB_InvalidateTabArea * * This method will invalidate the portion of the control that contains the * tabs. It is called when the state of the control changes and needs * to be redisplayed */ static void TAB_InvalidateTabArea( HWND hwnd, TAB_INFO* infoPtr) { RECT clientRect; GetClientRect(hwnd, &clientRect); if (GetWindowLongA(hwnd, GWL_STYLE) & TCS_BOTTOM) { clientRect.top = clientRect.bottom - (infoPtr->tabHeight * (infoPtr->uNumRows + 1) + 3); } else { clientRect.bottom = clientRect.top + (infoPtr->tabHeight * (infoPtr->uNumRows + 1) + 1); } InvalidateRect(hwnd, &clientRect, TRUE); } static LRESULT TAB_Paint (HWND hwnd, WPARAM wParam) { HDC hdc; PAINTSTRUCT ps; hdc = wParam== 0 ? BeginPaint (hwnd, &ps) : (HDC)wParam; TAB_Refresh (hwnd, hdc); if(!wParam) EndPaint (hwnd, &ps); return 0; } static LRESULT TAB_InsertItem (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); TCITEMA *pti; INT iItem, len; RECT rect; GetClientRect (hwnd, &rect); TRACE("Rect: %x T %i, L %i, B %i, R %i\n", hwnd, rect.top, rect.left, rect.bottom, rect.right); pti = (TCITEMA *)lParam; iItem = (INT)wParam; if (iItem < 0) return -1; if (iItem > infoPtr->uNumItem) iItem = infoPtr->uNumItem; if (infoPtr->uNumItem == 0) { infoPtr->items = COMCTL32_Alloc (sizeof (TAB_ITEM)); infoPtr->uNumItem++; infoPtr->iSelected = 0; } else { TAB_ITEM *oldItems = infoPtr->items; infoPtr->uNumItem++; infoPtr->items = COMCTL32_Alloc (sizeof (TAB_ITEM) * infoPtr->uNumItem); /* pre insert copy */ if (iItem > 0) { memcpy (&infoPtr->items[0], &oldItems[0], iItem * sizeof(TAB_ITEM)); } /* post insert copy */ if (iItem < infoPtr->uNumItem - 1) { memcpy (&infoPtr->items[iItem+1], &oldItems[iItem], (infoPtr->uNumItem - iItem - 1) * sizeof(TAB_ITEM)); } if (iItem <= infoPtr->iSelected) infoPtr->iSelected++; COMCTL32_Free (oldItems); } infoPtr->items[iItem].mask = pti->mask; if (pti->mask & TCIF_TEXT) { len = lstrlenA (pti->pszText); infoPtr->items[iItem].pszText = COMCTL32_Alloc (len+1); lstrcpyA (infoPtr->items[iItem].pszText, pti->pszText); infoPtr->items[iItem].cchTextMax = pti->cchTextMax; } if (pti->mask & TCIF_IMAGE) infoPtr->items[iItem].iImage = pti->iImage; if (pti->mask & TCIF_PARAM) infoPtr->items[iItem].lParam = pti->lParam; TAB_SetItemBounds(hwnd); TAB_InvalidateTabArea(hwnd, infoPtr); TRACE("[%04x]: added item %d '%s'\n", hwnd, iItem, infoPtr->items[iItem].pszText); return iItem; } static LRESULT TAB_SetItemSize (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); LONG lStyle = GetWindowLongA(hwnd, GWL_STYLE); LONG lResult = 0; if ((lStyle & TCS_FIXEDWIDTH) || (lStyle & TCS_OWNERDRAWFIXED)) { lResult = MAKELONG(infoPtr->tabWidth, infoPtr->tabHeight); infoPtr->tabWidth = (INT)LOWORD(lParam); infoPtr->tabHeight = (INT)HIWORD(lParam); } infoPtr->fSizeSet = TRUE; return lResult; } static LRESULT TAB_SetItemA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); TCITEMA *tabItem; TAB_ITEM *wineItem; INT iItem,len; iItem=(INT) wParam; tabItem=(LPTCITEMA ) lParam; TRACE("%d %p\n",iItem, tabItem); if ((iItem<0) || (iItem>=infoPtr->uNumItem)) return FALSE; wineItem=& infoPtr->items[iItem]; if (tabItem->mask & TCIF_IMAGE) wineItem->iImage=tabItem->iImage; if (tabItem->mask & TCIF_PARAM) wineItem->lParam=tabItem->lParam; if (tabItem->mask & TCIF_RTLREADING) FIXME("TCIF_RTLREADING\n"); if (tabItem->mask & TCIF_STATE) wineItem->dwState=tabItem->dwState; if (tabItem->mask & TCIF_TEXT) { len=lstrlenA (tabItem->pszText); if (len>wineItem->cchTextMax) wineItem->pszText= COMCTL32_ReAlloc (wineItem->pszText, len+1); lstrcpyA (wineItem->pszText, tabItem->pszText); } /* * Update and repaint tabs. */ TAB_SetItemBounds(hwnd); TAB_InvalidateTabArea(hwnd,infoPtr); return TRUE; } static LRESULT TAB_GetItemCount (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); return infoPtr->uNumItem; } static LRESULT TAB_GetItemA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); TCITEMA *tabItem; TAB_ITEM *wineItem; INT iItem; iItem=(INT) wParam; tabItem=(LPTCITEMA) lParam; TRACE("\n"); if ((iItem<0) || (iItem>=infoPtr->uNumItem)) return FALSE; wineItem=& infoPtr->items[iItem]; if (tabItem->mask & TCIF_IMAGE) tabItem->iImage=wineItem->iImage; if (tabItem->mask & TCIF_PARAM) tabItem->lParam=wineItem->lParam; if (tabItem->mask & TCIF_RTLREADING) FIXME("TCIF_RTLREADING\n"); if (tabItem->mask & TCIF_STATE) tabItem->dwState=wineItem->dwState; if (tabItem->mask & TCIF_TEXT) lstrcpynA (tabItem->pszText, wineItem->pszText, tabItem->cchTextMax); return TRUE; } static LRESULT TAB_DeleteItem (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); INT iItem = (INT) wParam; BOOL bResult = FALSE; if ((iItem >= 0) && (iItem < infoPtr->uNumItem)) { TAB_ITEM *oldItems = infoPtr->items; infoPtr->uNumItem--; infoPtr->items = COMCTL32_Alloc(sizeof (TAB_ITEM) * infoPtr->uNumItem); if (iItem > 0) memcpy(&infoPtr->items[0], &oldItems[0], iItem * sizeof(TAB_ITEM)); if (iItem < infoPtr->uNumItem) memcpy(&infoPtr->items[iItem], &oldItems[iItem + 1], (infoPtr->uNumItem - iItem) * sizeof(TAB_ITEM)); COMCTL32_Free (oldItems); /* * Readjust the selected index. */ if ((iItem == infoPtr->iSelected) && (iItem > 0)) infoPtr->iSelected--; if (iItem < infoPtr->iSelected) infoPtr->iSelected--; if (infoPtr->uNumItem == 0) infoPtr->iSelected = -1; /* * Reposition and repaint tabs. */ TAB_SetItemBounds(hwnd); TAB_InvalidateTabArea(hwnd,infoPtr); bResult = TRUE; } return bResult; } static LRESULT TAB_DeleteAllItems (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); COMCTL32_Free (infoPtr->items); infoPtr->uNumItem = 0; infoPtr->iSelected = -1; if (infoPtr->iHotTracked >= 0) KillTimer(hwnd, TAB_HOTTRACK_TIMER); infoPtr->iHotTracked = -1; TAB_SetItemBounds(hwnd); TAB_InvalidateTabArea(hwnd,infoPtr); return TRUE; } static LRESULT TAB_GetFont (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); TRACE("\n"); return (LRESULT)infoPtr->hFont; } static LRESULT TAB_SetFont (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); TRACE("%x %lx\n",wParam, lParam); infoPtr->hFont = (HFONT)wParam; TAB_SetItemBounds(hwnd); TAB_InvalidateTabArea(hwnd, infoPtr); return 0; } static LRESULT TAB_GetImageList (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); TRACE("\n"); return (LRESULT)infoPtr->himl; } static LRESULT TAB_SetImageList (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); HIMAGELIST himlPrev; TRACE("\n"); himlPrev = infoPtr->himl; infoPtr->himl= (HIMAGELIST)lParam; return (LRESULT)himlPrev; } static LRESULT TAB_Size (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* I'm not really sure what the following code was meant to do. This is what it is doing: When WM_SIZE is sent with SIZE_RESTORED, the control gets positioned in the top left corner. RECT parent_rect; HWND parent; UINT uPosFlags,cx,cy; uPosFlags=0; if (!wParam) { parent = GetParent (hwnd); GetClientRect(parent, &parent_rect); cx=LOWORD (lParam); cy=HIWORD (lParam); if (GetWindowLongA(hwnd, GWL_STYLE) & CCS_NORESIZE) uPosFlags |= (SWP_NOSIZE | SWP_NOMOVE); SetWindowPos (hwnd, 0, parent_rect.left, parent_rect.top, cx, cy, uPosFlags | SWP_NOZORDER); } else { FIXME (tab,"WM_SIZE flag %x %lx not handled\n", wParam, lParam); } */ /* * Recompute the size/position of the tabs. */ TAB_SetItemBounds (hwnd); /* * Force a repaint of the control. */ InvalidateRect(hwnd, NULL, TRUE); return 0; } static LRESULT TAB_Create (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr; TEXTMETRICA fontMetrics; HDC hdc; HFONT hOldFont; DWORD dwStyle; infoPtr = (TAB_INFO *)COMCTL32_Alloc (sizeof(TAB_INFO)); SetWindowLongA(hwnd, 0, (DWORD)infoPtr); infoPtr->uNumItem = 0; infoPtr->uNumRows = 0; infoPtr->hFont = 0; infoPtr->items = 0; infoPtr->hcurArrow = LoadCursorA (0, IDC_ARROWA); infoPtr->iSelected = -1; infoPtr->iHotTracked = -1; infoPtr->uFocus = -1; infoPtr->hwndToolTip = 0; infoPtr->DoRedraw = TRUE; infoPtr->needsScrolling = FALSE; infoPtr->hwndUpDown = 0; infoPtr->leftmostVisible = 0; infoPtr->fSizeSet = FALSE; TRACE("Created tab control, hwnd [%04x]\n", hwnd); /* The tab control always has the WS_CLIPSIBLINGS style. Even if you don't specify in CreateWindow. This is necesary in order for paint to work correctly. This follows windows behaviour. */ dwStyle = GetWindowLongA(hwnd, GWL_STYLE); SetWindowLongA(hwnd, GWL_STYLE, dwStyle|WS_CLIPSIBLINGS); if (dwStyle & TCS_TOOLTIPS) { /* Create tooltip control */ infoPtr->hwndToolTip = CreateWindowExA (0, TOOLTIPS_CLASSA, NULL, 0, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, hwnd, 0, 0, 0); /* Send NM_TOOLTIPSCREATED notification */ if (infoPtr->hwndToolTip) { NMTOOLTIPSCREATED nmttc; nmttc.hdr.hwndFrom = hwnd; nmttc.hdr.idFrom = GetWindowLongA(hwnd, GWL_ID); nmttc.hdr.code = NM_TOOLTIPSCREATED; nmttc.hwndToolTips = infoPtr->hwndToolTip; SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM)GetWindowLongA(hwnd, GWL_ID), (LPARAM)&nmttc); } } /* * We need to get text information so we need a DC and we need to select * a font. */ hdc = GetDC(hwnd); hOldFont = SelectObject (hdc, GetStockObject (SYSTEM_FONT)); /* * Use the system font to determine the initial height of a tab. */ GetTextMetricsA(hdc, &fontMetrics); /* * Make sure there is enough space for the letters + growing the * selected item + extra space for the selected item. */ infoPtr->tabHeight = fontMetrics.tmHeight + 2*VERTICAL_ITEM_PADDING + SELECTED_TAB_OFFSET; /* * Initialize the width of a tab. */ infoPtr->tabWidth = DEFAULT_TAB_WIDTH; SelectObject (hdc, hOldFont); ReleaseDC(hwnd, hdc); return 0; } static LRESULT TAB_Destroy (HWND hwnd, WPARAM wParam, LPARAM lParam) { TAB_INFO *infoPtr = TAB_GetInfoPtr(hwnd); INT iItem; if (!infoPtr) return 0; if (infoPtr->items) { for (iItem = 0; iItem < infoPtr->uNumItem; iItem++) { if (infoPtr->items[iItem].pszText) COMCTL32_Free (infoPtr->items[iItem].pszText); } COMCTL32_Free (infoPtr->items); } if (infoPtr->hwndToolTip) DestroyWindow (infoPtr->hwndToolTip); if (infoPtr->hwndUpDown) DestroyWindow(infoPtr->hwndUpDown); if (infoPtr->iHotTracked >= 0) KillTimer(hwnd, TAB_HOTTRACK_TIMER); COMCTL32_Free (infoPtr); SetWindowLongA(hwnd, 0, 0); return 0; } static LRESULT WINAPI TAB_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TRACE("hwnd=%x msg=%x wParam=%x lParam=%lx\n", hwnd, uMsg, wParam, lParam); if (!TAB_GetInfoPtr(hwnd) && (uMsg != WM_CREATE)) return DefWindowProcA (hwnd, uMsg, wParam, lParam); switch (uMsg) { case TCM_GETIMAGELIST: return TAB_GetImageList (hwnd, wParam, lParam); case TCM_SETIMAGELIST: return TAB_SetImageList (hwnd, wParam, lParam); case TCM_GETITEMCOUNT: return TAB_GetItemCount (hwnd, wParam, lParam); case TCM_GETITEMA: return TAB_GetItemA (hwnd, wParam, lParam); case TCM_GETITEMW: FIXME("Unimplemented msg TCM_GETITEMW\n"); return 0; case TCM_SETITEMA: return TAB_SetItemA (hwnd, wParam, lParam); case TCM_SETITEMW: FIXME("Unimplemented msg TCM_SETITEMW\n"); return 0; case TCM_DELETEITEM: return TAB_DeleteItem (hwnd, wParam, lParam); case TCM_DELETEALLITEMS: return TAB_DeleteAllItems (hwnd, wParam, lParam); case TCM_GETITEMRECT: return TAB_GetItemRect (hwnd, wParam, lParam); case TCM_GETCURSEL: return TAB_GetCurSel (hwnd); case TCM_HITTEST: return TAB_HitTest (hwnd, wParam, lParam); case TCM_SETCURSEL: return TAB_SetCurSel (hwnd, wParam); case TCM_INSERTITEMA: return TAB_InsertItem (hwnd, wParam, lParam); case TCM_INSERTITEMW: FIXME("Unimplemented msg TCM_INSERTITEMW\n"); return 0; case TCM_SETITEMEXTRA: FIXME("Unimplemented msg TCM_SETITEMEXTRA\n"); return 0; case TCM_ADJUSTRECT: return TAB_AdjustRect (hwnd, (BOOL)wParam, (LPRECT)lParam); case TCM_SETITEMSIZE: return TAB_SetItemSize (hwnd, wParam, lParam); case TCM_REMOVEIMAGE: FIXME("Unimplemented msg TCM_REMOVEIMAGE\n"); return 0; case TCM_SETPADDING: FIXME("Unimplemented msg TCM_SETPADDING\n"); return 0; case TCM_GETROWCOUNT: FIXME("Unimplemented msg TCM_GETROWCOUNT\n"); return 0; case TCM_GETUNICODEFORMAT: FIXME("Unimplemented msg TCM_GETUNICODEFORMAT\n"); return 0; case TCM_SETUNICODEFORMAT: FIXME("Unimplemented msg TCM_SETUNICODEFORMAT\n"); return 0; case TCM_HIGHLIGHTITEM: FIXME("Unimplemented msg TCM_HIGHLIGHTITEM\n"); return 0; case TCM_GETTOOLTIPS: return TAB_GetToolTips (hwnd, wParam, lParam); case TCM_SETTOOLTIPS: return TAB_SetToolTips (hwnd, wParam, lParam); case TCM_GETCURFOCUS: return TAB_GetCurFocus (hwnd); case TCM_SETCURFOCUS: return TAB_SetCurFocus (hwnd, wParam); case TCM_SETMINTABWIDTH: FIXME("Unimplemented msg TCM_SETMINTABWIDTH\n"); return 0; case TCM_DESELECTALL: FIXME("Unimplemented msg TCM_DESELECTALL\n"); return 0; case TCM_GETEXTENDEDSTYLE: FIXME("Unimplemented msg TCM_GETEXTENDEDSTYLE\n"); return 0; case TCM_SETEXTENDEDSTYLE: FIXME("Unimplemented msg TCM_SETEXTENDEDSTYLE\n"); return 0; case WM_GETFONT: return TAB_GetFont (hwnd, wParam, lParam); case WM_SETFONT: return TAB_SetFont (hwnd, wParam, lParam); case WM_CREATE: return TAB_Create (hwnd, wParam, lParam); case WM_NCDESTROY: return TAB_Destroy (hwnd, wParam, lParam); case WM_GETDLGCODE: return DLGC_WANTARROWS | DLGC_WANTCHARS; case WM_LBUTTONDOWN: return TAB_LButtonDown (hwnd, wParam, lParam); case WM_LBUTTONUP: return TAB_LButtonUp (hwnd, wParam, lParam); case WM_RBUTTONDOWN: return TAB_RButtonDown (hwnd, wParam, lParam); case WM_MOUSEMOVE: return TAB_MouseMove (hwnd, wParam, lParam); case WM_ERASEBKGND: return TAB_EraseBackground (hwnd, (HDC)wParam); case WM_PAINT: return TAB_Paint (hwnd, wParam); case WM_SIZE: return TAB_Size (hwnd, wParam, lParam); case WM_SETREDRAW: return TAB_SetRedraw (hwnd, wParam); case WM_HSCROLL: return TAB_OnHScroll(hwnd, (int)LOWORD(wParam), (int)HIWORD(wParam), (HWND)lParam); case WM_STYLECHANGED: TAB_SetItemBounds (hwnd); InvalidateRect(hwnd, NULL, TRUE); return 0; case WM_KILLFOCUS: case WM_SETFOCUS: return TAB_FocusChanging(hwnd, uMsg, wParam, lParam); case WM_KEYUP: return TAB_KeyUp(hwnd, wParam); default: if (uMsg >= WM_USER) WARN("unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); return DefWindowProcA (hwnd, uMsg, wParam, lParam); } return 0; } VOID TAB_Register (void) { WNDCLASSA wndClass; ZeroMemory (&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS | CS_DBLCLKS | CS_HREDRAW | CS_VREDRAW; wndClass.lpfnWndProc = (WNDPROC)TAB_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(TAB_INFO *); wndClass.hCursor = LoadCursorA (0, IDC_ARROWA); wndClass.hbrBackground = (HBRUSH)NULL; wndClass.lpszClassName = WC_TABCONTROLA; RegisterClassA (&wndClass); } VOID TAB_Unregister (void) { UnregisterClassA (WC_TABCONTROLA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/toolbar.c0100644000175000001440000030456307113330300016635 0ustar julliardusers/* * Toolbar control * * Copyright 1998,1999 Eric Kohl * * TODO: * - A little bug in TOOLBAR_DrawMasked() * - Button wrapping (under construction). * - Messages. * - Notifications (under construction). * - Fix TB_SETROWS. * - Tooltip support (almost complete). * - Unicode suppport (under construction). * - Fix TOOLBAR_SetButtonInfo32A/W. * - Customize dialog (under construction). * * Testing: * - Run tests using Waite Group Windows95 API Bible Volume 2. * The second cdrom contains executables addstr.exe, btncount.exe, * btnstate.exe, butstrsz.exe, chkbtn.exe, chngbmp.exe, customiz.exe, * enablebtn.exe, getbmp.exe, getbtn.exe, getflags.exe, hidebtn.exe, * indetbtn.exe, insbtn.exe, pressbtn.exe, setbtnsz.exe, setcmdid.exe, * setparnt.exe, setrows.exe, toolwnd.exe. * - Microsofts controlspy examples. */ #include #include "winbase.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "commctrl.h" #include "cache.h" #include "comctl32.h" #include "toolbar.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(toolbar) #define SEPARATOR_WIDTH 8 #define TOP_BORDER 2 #define BOTTOM_BORDER 2 #define TOOLBAR_GetInfoPtr(hwnd) ((TOOLBAR_INFO *)GetWindowLongA(hwnd,0)) static void TOOLBAR_DrawFlatSeparator (LPRECT lpRect, HDC hdc) { INT x = (lpRect->left + lpRect->right) / 2 - 1; INT yBottom = lpRect->bottom - 3; INT yTop = lpRect->top + 1; SelectObject ( hdc, GetSysColorPen (COLOR_3DSHADOW)); MoveToEx (hdc, x, yBottom, NULL); LineTo (hdc, x, yTop); x++; SelectObject ( hdc, GetSysColorPen (COLOR_3DHILIGHT)); MoveToEx (hdc, x, yBottom, NULL); LineTo (hdc, x, yTop); } /* * Draw the text string for this button. * note: himl is not used, except to determine whether this button has * an associated bitmap. If so, the text is drawn below it, otherwise * the text is drawn within the rectangle of the button itself. */ static void TOOLBAR_DrawString (TOOLBAR_INFO *infoPtr, TBUTTON_INFO *btnPtr, HDC hdc, INT nState, DWORD dwStyle, HIMAGELIST himl) { RECT rcText = btnPtr->rect; HFONT hOldFont; INT nOldBkMode; COLORREF clrOld; /* draw text */ if ((btnPtr->iString > -1) && (btnPtr->iString < infoPtr->nNumStrings)) { InflateRect (&rcText, -3, -3); if (himl && btnPtr->iBitmap>=0) { if (dwStyle & TBSTYLE_LIST) { rcText.left += infoPtr->nBitmapWidth; } else { rcText.top += infoPtr->nBitmapHeight; } } if (nState & (TBSTATE_PRESSED | TBSTATE_CHECKED)) OffsetRect (&rcText, 1, 1); hOldFont = SelectObject (hdc, infoPtr->hFont); nOldBkMode = SetBkMode (hdc, TRANSPARENT); if (!(nState & TBSTATE_ENABLED)) { clrOld = SetTextColor (hdc, GetSysColor (COLOR_3DHILIGHT)); OffsetRect (&rcText, 1, 1); DrawTextW (hdc, infoPtr->strings[btnPtr->iString], -1, &rcText, infoPtr->dwDTFlags); SetTextColor (hdc, GetSysColor (COLOR_3DSHADOW)); OffsetRect (&rcText, -1, -1); DrawTextW (hdc, infoPtr->strings[btnPtr->iString], -1, &rcText, infoPtr->dwDTFlags); } else if (nState & TBSTATE_INDETERMINATE) { clrOld = SetTextColor (hdc, GetSysColor (COLOR_3DSHADOW)); DrawTextW (hdc, infoPtr->strings[btnPtr->iString], -1, &rcText, infoPtr->dwDTFlags); } else { clrOld = SetTextColor (hdc, GetSysColor (COLOR_BTNTEXT)); DrawTextW (hdc, infoPtr->strings[btnPtr->iString], -1, &rcText, infoPtr->dwDTFlags); } SetTextColor (hdc, clrOld); SelectObject (hdc, hOldFont); if (nOldBkMode != TRANSPARENT) SetBkMode (hdc, nOldBkMode); } } static void TOOLBAR_DrawPattern (HDC hdc, LPRECT lpRect) { HBRUSH hbr = SelectObject (hdc, CACHE_GetPattern55AABrush ()); INT cx = lpRect->right - lpRect->left; INT cy = lpRect->bottom - lpRect->top; PatBlt (hdc, lpRect->left, lpRect->top, cx, cy, 0x00FA0089); SelectObject (hdc, hbr); } static void TOOLBAR_DrawMasked (TOOLBAR_INFO *infoPtr, TBUTTON_INFO *btnPtr, HDC hdc, INT x, INT y) { /* FIXME: this function is a hack since it uses image list internals directly */ HIMAGELIST himl = infoPtr->himlDef; HBITMAP hbmMask; HDC hdcImageList; HDC hdcMask; if (!himl) return; /* create new dc's */ hdcImageList = CreateCompatibleDC (0); hdcMask = CreateCompatibleDC (0); /* create new bitmap */ hbmMask = CreateBitmap (himl->cx, himl->cy, 1, 1, NULL); SelectObject (hdcMask, hbmMask); /* copy the mask bitmap */ SelectObject (hdcImageList, himl->hbmMask); SetBkColor (hdcImageList, RGB(255, 255, 255)); SetTextColor (hdcImageList, RGB(0, 0, 0)); BitBlt (hdcMask, 0, 0, himl->cx, himl->cy, hdcImageList, himl->cx * btnPtr->iBitmap, 0, SRCCOPY); #if 0 /* add white mask from image */ SelectObject (hdcImageList, himl->hbmImage); SetBkColor (hdcImageList, RGB(0, 0, 0)); BitBlt (hdcMask, 0, 0, himl->cx, himl->cy, hdcImageList, himl->cx * btnPtr->iBitmap, 0, MERGEPAINT); #endif /* draw the new mask */ SelectObject (hdc, GetSysColorBrush (COLOR_3DHILIGHT)); BitBlt (hdc, x+1, y+1, himl->cx, himl->cy, hdcMask, 0, 0, 0xB8074A); SelectObject (hdc, GetSysColorBrush (COLOR_3DSHADOW)); BitBlt (hdc, x, y, himl->cx, himl->cy, hdcMask, 0, 0, 0xB8074A); DeleteObject (hbmMask); DeleteDC (hdcMask); DeleteDC (hdcImageList); } static void TOOLBAR_DrawButton (HWND hwnd, TBUTTON_INFO *btnPtr, HDC hdc) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); RECT rc; if (btnPtr->fsState & TBSTATE_HIDDEN) return; rc = btnPtr->rect; /* separator */ if (btnPtr->fsStyle & TBSTYLE_SEP) { if ((dwStyle & TBSTYLE_FLAT) && (btnPtr->iBitmap == 0)) TOOLBAR_DrawFlatSeparator (&rc, hdc); return; } /* disabled */ if (!(btnPtr->fsState & TBSTATE_ENABLED)) { if (!(dwStyle & TBSTYLE_FLAT)) DrawEdge (hdc, &rc, EDGE_RAISED, BF_SOFT | BF_RECT | BF_MIDDLE | BF_ADJUST); if (infoPtr->himlDis && btnPtr->iBitmap>=0) ImageList_Draw (infoPtr->himlDis, btnPtr->iBitmap, hdc, rc.left+1, rc.top+1, ILD_NORMAL); else TOOLBAR_DrawMasked (infoPtr, btnPtr, hdc, rc.left+1, rc.top+1); TOOLBAR_DrawString (infoPtr, btnPtr, hdc, btnPtr->fsState, dwStyle, infoPtr->himlDis); return; } /* pressed TBSTYLE_BUTTON */ if (btnPtr->fsState & TBSTATE_PRESSED) { if (dwStyle & TBSTYLE_FLAT) DrawEdge (hdc, &rc, BDR_SUNKENOUTER, BF_RECT | BF_MIDDLE | BF_ADJUST); else DrawEdge (hdc, &rc, EDGE_SUNKEN, BF_RECT | BF_MIDDLE | BF_ADJUST); if (btnPtr->iBitmap>=0) ImageList_Draw (infoPtr->himlDef, btnPtr->iBitmap, hdc, rc.left+2, rc.top+2, ILD_NORMAL); TOOLBAR_DrawString (infoPtr, btnPtr, hdc, btnPtr->fsState, dwStyle, infoPtr->himlDef); return; } /* checked TBSTYLE_CHECK */ if ((btnPtr->fsStyle & TBSTYLE_CHECK) && (btnPtr->fsState & TBSTATE_CHECKED)) { if (dwStyle & TBSTYLE_FLAT) DrawEdge (hdc, &rc, BDR_SUNKENOUTER, BF_RECT | BF_MIDDLE | BF_ADJUST); else DrawEdge (hdc, &rc, EDGE_SUNKEN, BF_RECT | BF_MIDDLE | BF_ADJUST); TOOLBAR_DrawPattern (hdc, &rc); if (btnPtr->iBitmap>=0) ImageList_Draw (infoPtr->himlDef, btnPtr->iBitmap, hdc, rc.left+2, rc.top+2, ILD_NORMAL); TOOLBAR_DrawString (infoPtr, btnPtr, hdc, btnPtr->fsState, dwStyle, infoPtr->himlDef); return; } /* indeterminate */ if (btnPtr->fsState & TBSTATE_INDETERMINATE) { DrawEdge (hdc, &rc, EDGE_RAISED, BF_SOFT | BF_RECT | BF_MIDDLE | BF_ADJUST); TOOLBAR_DrawPattern (hdc, &rc); TOOLBAR_DrawMasked (infoPtr, btnPtr, hdc, rc.left+1, rc.top+1); TOOLBAR_DrawString (infoPtr, btnPtr, hdc, btnPtr->fsState, dwStyle, infoPtr->himlDef); return; } /* normal state */ if (dwStyle & TBSTYLE_FLAT) { if (btnPtr->bHot) DrawEdge (hdc, &rc, BDR_RAISEDINNER, BF_RECT | BF_MIDDLE); if (btnPtr->bHot && infoPtr->himlHot && btnPtr->iBitmap>=0) ImageList_Draw (infoPtr->himlHot, btnPtr->iBitmap, hdc, rc.left +2, rc.top +2, ILD_NORMAL); else if (btnPtr->iBitmap>=0) ImageList_Draw (infoPtr->himlDef, btnPtr->iBitmap, hdc, rc.left +2, rc.top +2, ILD_NORMAL); } else { DrawEdge (hdc, &rc, EDGE_RAISED, BF_SOFT | BF_RECT | BF_MIDDLE | BF_ADJUST); if (btnPtr->iBitmap>=0) ImageList_Draw (infoPtr->himlDef, btnPtr->iBitmap, hdc, rc.left+1, rc.top+1, ILD_NORMAL); } TOOLBAR_DrawString (infoPtr, btnPtr, hdc, btnPtr->fsState, dwStyle, infoPtr->himlDef); } static void TOOLBAR_Refresh (HWND hwnd, HDC hdc, PAINTSTRUCT* ps) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; INT i; RECT rcTemp; /* redraw necessary buttons */ btnPtr = infoPtr->buttons; for (i = 0; i < infoPtr->nNumButtons; i++, btnPtr++) { if(IntersectRect(&rcTemp, &(ps->rcPaint), &(btnPtr->rect))) TOOLBAR_DrawButton (hwnd, btnPtr, hdc); } } static void TOOLBAR_CalcStrings (HWND hwnd, LPSIZE lpSize) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; INT i; HDC hdc; HFONT hOldFont; SIZE sz; lpSize->cx = 0; lpSize->cy = 0; hdc = GetDC (0); hOldFont = SelectObject (hdc, infoPtr->hFont); btnPtr = infoPtr->buttons; for (i = 0; i < infoPtr->nNumButtons; i++, btnPtr++) { if (!(btnPtr->fsState & TBSTATE_HIDDEN) && (btnPtr->iString > -1) && (btnPtr->iString < infoPtr->nNumStrings)) { LPWSTR lpText = infoPtr->strings[btnPtr->iString]; GetTextExtentPoint32W (hdc, lpText, lstrlenW (lpText), &sz); if (sz.cx > lpSize->cx) lpSize->cx = sz.cx; if (sz.cy > lpSize->cy) lpSize->cy = sz.cy; } } SelectObject (hdc, hOldFont); ReleaseDC (0, hdc); TRACE("string size %d x %d!\n", lpSize->cx, lpSize->cy); } /*********************************************************************** * TOOLBAR_WrapToolbar * * This function walks through the buttons and seperators in the * toolbar, and sets the TBSTATE_WRAP flag only on those items where * wrapping should occur based on the width of the toolbar window. * It does *not* calculate button placement itself. That task * takes place in TOOLBAR_CalcToolbar. If the program wants to manage * the toolbar wrapping on it's own, it can use the TBSTYLE_WRAPPABLE * flag, and set the TBSTATE_WRAP flags manually on the appropriate items. */ static void TOOLBAR_WrapToolbar( HWND hwnd, DWORD dwStyle ) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; INT x, cx, i, j; RECT rc; BOOL bWrap, bButtonWrap; /* When the toolbar window style is not TBSTYLE_WRAPABLE, */ /* no layout is necessary. Applications may use this style */ /* to perform their own layout on the toolbar. */ if( !(dwStyle & TBSTYLE_WRAPABLE) ) return; btnPtr = infoPtr->buttons; x = infoPtr->nIndent; /* this can get the parents width, to know how far we can extend * this toolbar. We cannot use its height, as there may be multiple * toolbars in a rebar control */ GetClientRect( GetParent(hwnd), &rc ); infoPtr->nWidth = rc.right - rc.left; bButtonWrap = FALSE; for (i = 0; i < infoPtr->nNumButtons; i++ ) { bWrap = FALSE; btnPtr[i].fsState &= ~TBSTATE_WRAP; if (btnPtr[i].fsState & TBSTATE_HIDDEN) continue; /* UNDOCUMENTED: If a separator has a non zero bitmap index, */ /* it is the actual width of the separator. This is used for */ /* custom controls in toolbars. */ if (btnPtr[i].fsStyle & TBSTYLE_SEP) cx = (btnPtr[i].iBitmap > 0) ? btnPtr[i].iBitmap : SEPARATOR_WIDTH; else cx = infoPtr->nButtonWidth; /* Two or more adjacent separators form a separator group. */ /* The first separator in a group should be wrapped to the */ /* next row if the previous wrapping is on a button. */ if( bButtonWrap && (btnPtr[i].fsStyle & TBSTYLE_SEP) && (i + 1 < infoPtr->nNumButtons ) && (btnPtr[i + 1].fsStyle & TBSTYLE_SEP) ) { btnPtr[i].fsState |= TBSTATE_WRAP; x = infoPtr->nIndent; i++; bButtonWrap = FALSE; continue; } /* The layout makes sure the bitmap is visible, but not the button. */ if ( x + cx - (infoPtr->nButtonWidth - infoPtr->nBitmapWidth) / 2 > infoPtr->nWidth ) { BOOL bFound = FALSE; /* If the current button is a separator and not hidden, */ /* go to the next until it reaches a non separator. */ /* Wrap the last separator if it is before a button. */ while( ( (btnPtr[i].fsStyle & TBSTYLE_SEP) || (btnPtr[i].fsState & TBSTATE_HIDDEN) ) && i < infoPtr->nNumButtons ) { i++; bFound = TRUE; } if( bFound && i < infoPtr->nNumButtons ) { i--; btnPtr[i].fsState |= TBSTATE_WRAP; x = infoPtr->nIndent; bButtonWrap = FALSE; continue; } else if ( i >= infoPtr->nNumButtons) break; /* If the current button is not a separator, find the last */ /* separator and wrap it. */ for ( j = i - 1; j >= 0 && !(btnPtr[j].fsState & TBSTATE_WRAP); j--) { if ((btnPtr[j].fsStyle & TBSTYLE_SEP) && !(btnPtr[j].fsState & TBSTATE_HIDDEN)) { bFound = TRUE; i = j; x = infoPtr->nIndent; btnPtr[j].fsState |= TBSTATE_WRAP; bButtonWrap = FALSE; break; } } /* If no separator available for wrapping, wrap one of */ /* non-hidden previous button. */ if (!bFound) { for ( j = i - 1; j >= 0 && !(btnPtr[j].fsState & TBSTATE_WRAP); j--) { if (btnPtr[j].fsState & TBSTATE_HIDDEN) continue; bFound = TRUE; i = j; x = infoPtr->nIndent; btnPtr[j].fsState |= TBSTATE_WRAP; bButtonWrap = TRUE; break; } } /* If all above failed, wrap the current button. */ if (!bFound) { btnPtr[i].fsState |= TBSTATE_WRAP; bFound = TRUE; x = infoPtr->nIndent; if (btnPtr[i].fsState & TBSTYLE_SEP ) bButtonWrap = FALSE; else bButtonWrap = TRUE; } } else x += cx; } } /*********************************************************************** * TOOLBAR_CalcToolbar * * This function calculates button and separator placement. It first * calculates the button sizes, gets the toolbar window width and then * calls TOOLBAR_WrapToolbar to determine which buttons we need to wrap * on. It assigns a new location to each item and sends this location to * the tooltip window if appropriate. Finally, it updates the rcBound * rect and calculates the new required toolbar window height. */ static void TOOLBAR_CalcToolbar (HWND hwnd) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr(hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); TBUTTON_INFO *btnPtr; INT i, nRows, nSepRows; INT x, y, cx, cy; SIZE sizeString; BOOL bWrap; TOOLBAR_CalcStrings (hwnd, &sizeString); if (dwStyle & TBSTYLE_LIST) { infoPtr->nButtonHeight = max(infoPtr->nBitmapHeight, sizeString.cy) + 6; infoPtr->nButtonWidth = infoPtr->nBitmapWidth + sizeString.cx + 6; } else { BOOL usesBitmaps = FALSE; INT i; for (i = 0; i < infoPtr->nNumButtons && !usesBitmaps; i++) if (infoPtr->buttons[i].iBitmap >=0) usesBitmaps = TRUE; if (sizeString.cy > 0) if (usesBitmaps) infoPtr->nButtonHeight = sizeString.cy + infoPtr->nBitmapHeight + 6; else infoPtr->nButtonHeight = sizeString.cy + 6; else if (infoPtr->nButtonHeight < infoPtr->nBitmapHeight + 6) infoPtr->nButtonHeight = infoPtr->nBitmapHeight + 6; if (sizeString.cx > infoPtr->nBitmapWidth) infoPtr->nButtonWidth = sizeString.cx + 6; else if (infoPtr->nButtonWidth < infoPtr->nBitmapWidth + 6) infoPtr->nButtonWidth = infoPtr->nBitmapWidth + 6; } if ( infoPtr->cxMin >= 0 && infoPtr->nButtonWidth < infoPtr->cxMin ) infoPtr->nButtonWidth = infoPtr->cxMin; if ( infoPtr->cxMax >= 0 && infoPtr->nButtonWidth > infoPtr->cxMax ) infoPtr->nButtonWidth = infoPtr->cxMax; TOOLBAR_WrapToolbar( hwnd, dwStyle ); x = infoPtr->nIndent; y = (dwStyle & TBSTYLE_FLAT) ? 0 : TOP_BORDER; /* * We wills et the height below, and we set the width on entry * so we do not reset them here.. */ #if 0 GetClientRect( hwnd, &rc ); /* get initial values for toolbar */ infoPtr->nWidth = rc.right - rc.left; infoPtr->nHeight = rc.bottom - rc.top; #endif /* from above, minimum is a button, and possible text */ cx = infoPtr->nButtonWidth; /* cannot use just ButtonHeight, we may have no buttons! */ if (infoPtr->nNumButtons > 0) infoPtr->nHeight = infoPtr->nButtonHeight; cy = infoPtr->nHeight; nRows = nSepRows = 0; infoPtr->rcBound.top = y; infoPtr->rcBound.left = x; infoPtr->rcBound.bottom = y + cy; infoPtr->rcBound.right = x; btnPtr = infoPtr->buttons; /* do not base height/width on parent, if the parent is a */ /* rebar control it could have multiple rows of toolbars */ /* GetClientRect( GetParent(hwnd), &rc ); */ /* cx = rc.right - rc.left; */ /* cy = rc.bottom - rc.top; */ for (i = 0; i < infoPtr->nNumButtons; i++, btnPtr++ ) { bWrap = FALSE; if (btnPtr->fsState & TBSTATE_HIDDEN) { SetRectEmpty (&btnPtr->rect); continue; } /* UNDOCUMENTED: If a separator has a non zero bitmap index, */ /* it is the actual width of the separator. This is used for */ /* custom controls in toolbars. */ if (btnPtr->fsStyle & TBSTYLE_SEP) cx = (btnPtr->iBitmap > 0) ? btnPtr->iBitmap : SEPARATOR_WIDTH; else { cx = infoPtr->nButtonWidth; } cy = infoPtr->nHeight; if (btnPtr->fsState & TBSTATE_WRAP ) bWrap = TRUE; SetRect (&btnPtr->rect, x, y, x + cx, y + cy); if (infoPtr->rcBound.left > x) infoPtr->rcBound.left = x; if (infoPtr->rcBound.right < x + cx) infoPtr->rcBound.right = x + cx; if (infoPtr->rcBound.bottom < y + cy) infoPtr->rcBound.bottom = y + cy; /* Set the toolTip only for non-hidden, non-separator button */ if (infoPtr->hwndToolTip && !(btnPtr->fsStyle & TBSTYLE_SEP )) { TTTOOLINFOA ti; ZeroMemory (&ti, sizeof(TTTOOLINFOA)); ti.cbSize = sizeof(TTTOOLINFOA); ti.hwnd = hwnd; ti.uId = btnPtr->idCommand; ti.rect = btnPtr->rect; SendMessageA (infoPtr->hwndToolTip, TTM_NEWTOOLRECTA, 0, (LPARAM)&ti); } /* btnPtr->nRow is zero based. The space between the rows is */ /* also considered as a row. */ btnPtr->nRow = nRows + nSepRows; if( bWrap ) { if ( !(btnPtr->fsStyle & TBSTYLE_SEP) ) y += cy; else { /* UNDOCUMENTED: If a separator has a non zero bitmap index, */ /* it is the actual width of the separator. This is used for */ /* custom controls in toolbars. */ y += cy + ( (btnPtr->iBitmap > 0 ) ? btnPtr->iBitmap : SEPARATOR_WIDTH) * 2 /3; /* nSepRows is used to calculate the extra height follwoing */ /* the last row. */ nSepRows++; } x = infoPtr->nIndent; nRows++; } else x += cx; } /* infoPtr->nRows is the number of rows on the toolbar */ infoPtr->nRows = nRows + nSepRows + 1; /* nSepRows * (infoPtr->nBitmapHeight + 1) is the space following */ /* the last row. */ infoPtr->nHeight = TOP_BORDER + (nRows + 1) * infoPtr->nButtonHeight + nSepRows * (SEPARATOR_WIDTH * 2 / 3) + nSepRows * (infoPtr->nBitmapHeight + 1) + BOTTOM_BORDER; TRACE("toolbar height %d\n", infoPtr->nHeight); } static INT TOOLBAR_InternalHitTest (HWND hwnd, LPPOINT lpPt) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; INT i; btnPtr = infoPtr->buttons; for (i = 0; i < infoPtr->nNumButtons; i++, btnPtr++) { if (btnPtr->fsState & TBSTATE_HIDDEN) continue; if (btnPtr->fsStyle & TBSTYLE_SEP) { if (PtInRect (&btnPtr->rect, *lpPt)) { TRACE(" ON SEPARATOR %d!\n", i); return -i; } } else { if (PtInRect (&btnPtr->rect, *lpPt)) { TRACE(" ON BUTTON %d!\n", i); return i; } } } TRACE(" NOWHERE!\n"); return -1; } static INT TOOLBAR_GetButtonIndex (TOOLBAR_INFO *infoPtr, INT idCommand) { TBUTTON_INFO *btnPtr; INT i; btnPtr = infoPtr->buttons; for (i = 0; i < infoPtr->nNumButtons; i++, btnPtr++) { if (btnPtr->idCommand == idCommand) { TRACE("command=%d index=%d\n", idCommand, i); return i; } } TRACE("no index found for command=%d\n", idCommand); return -1; } static INT TOOLBAR_GetCheckedGroupButtonIndex (TOOLBAR_INFO *infoPtr, INT nIndex) { TBUTTON_INFO *btnPtr; INT nRunIndex; if ((nIndex < 0) || (nIndex > infoPtr->nNumButtons)) return -1; /* check index button */ btnPtr = &infoPtr->buttons[nIndex]; if ((btnPtr->fsStyle & TBSTYLE_CHECKGROUP) == TBSTYLE_CHECKGROUP) { if (btnPtr->fsState & TBSTATE_CHECKED) return nIndex; } /* check previous buttons */ nRunIndex = nIndex - 1; while (nRunIndex >= 0) { btnPtr = &infoPtr->buttons[nRunIndex]; if ((btnPtr->fsStyle & TBSTYLE_CHECKGROUP) == TBSTYLE_CHECKGROUP) { if (btnPtr->fsState & TBSTATE_CHECKED) return nRunIndex; } else break; nRunIndex--; } /* check next buttons */ nRunIndex = nIndex + 1; while (nRunIndex < infoPtr->nNumButtons) { btnPtr = &infoPtr->buttons[nRunIndex]; if ((btnPtr->fsStyle & TBSTYLE_CHECKGROUP) == TBSTYLE_CHECKGROUP) { if (btnPtr->fsState & TBSTATE_CHECKED) return nRunIndex; } else break; nRunIndex++; } return -1; } static VOID TOOLBAR_RelayEvent (HWND hwndTip, HWND hwndMsg, UINT uMsg, WPARAM wParam, LPARAM lParam) { MSG msg; msg.hwnd = hwndMsg; msg.message = uMsg; msg.wParam = wParam; msg.lParam = lParam; msg.time = GetMessageTime (); msg.pt.x = LOWORD(GetMessagePos ()); msg.pt.y = HIWORD(GetMessagePos ()); SendMessageA (hwndTip, TTM_RELAYEVENT, 0, (LPARAM)&msg); } /*********************************************************************** * TOOLBAR_CustomizeDialogProc * This function implements the toolbar customization dialog. */ static BOOL WINAPI TOOLBAR_CustomizeDialogProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = (TOOLBAR_INFO *)GetWindowLongA (hwnd, DWL_USER); static HDSA hDsa = NULL; switch (uMsg) { case WM_INITDIALOG: infoPtr = (TOOLBAR_INFO *)lParam; SetWindowLongA (hwnd, DWL_USER, (DWORD)infoPtr); hDsa = DSA_Create (sizeof(TBUTTON_INFO), 5); if (infoPtr) { TBUTTON_INFO *btnPtr; INT i; /* insert 'virtual' separator button into 'available buttons' list */ SendDlgItemMessageA (hwnd, IDC_AVAILBTN_LBOX, LB_ADDSTRING, 0, (LPARAM)""); /* copy all buttons and append them to the right listbox */ btnPtr = infoPtr->buttons; for (i = 0; i < infoPtr->nNumButtons; i++, btnPtr++) { DSA_InsertItem (hDsa, i, btnPtr); /* FIXME: hidden buttons appear in the 'toolbar buttons' list too */ if (btnPtr->fsState & TBSTATE_HIDDEN) { SendDlgItemMessageA (hwnd, IDC_AVAILBTN_LBOX, LB_ADDSTRING, 0, (LPARAM)""); } else { SendDlgItemMessageA (hwnd, IDC_TOOLBARBTN_LBOX, LB_ADDSTRING, 0, (LPARAM)""); } } /* append 'virtual' separator button to the 'toolbar buttons' list */ /* TODO */ } return TRUE; case WM_CLOSE: EndDialog(hwnd, FALSE); return TRUE; case WM_COMMAND: switch (LOWORD(wParam)) { case IDCANCEL: EndDialog(hwnd, FALSE); break; } return TRUE; case WM_DESTROY: if (hDsa) DSA_Destroy (hDsa); return TRUE; case WM_DRAWITEM: if (wParam == IDC_AVAILBTN_LBOX || wParam == IDC_TOOLBARBTN_LBOX) { LPDRAWITEMSTRUCT lpdis = (LPDRAWITEMSTRUCT)lParam; TBUTTON_INFO btnPtr; RECT rcButton; RECT rcText; HPEN hOldPen; HBRUSH hOldBrush; COLORREF oldText = 0; COLORREF oldBk = 0; FIXME("action: %x itemState: %x\n", lpdis->itemAction, lpdis->itemState); DSA_GetItem (hDsa, 0 /*lpdis->itemID*/, &btnPtr); if (lpdis->itemState & ODS_FOCUS) { oldBk = SetBkColor (lpdis->hDC, GetSysColor(COLOR_HIGHLIGHT)); oldText = SetTextColor (lpdis->hDC, GetSysColor(COLOR_HIGHLIGHTTEXT)); } hOldPen = SelectObject (lpdis->hDC, GetSysColorPen ((lpdis->itemState & ODS_SELECTED)?COLOR_HIGHLIGHT:COLOR_WINDOW)); hOldBrush = SelectObject (lpdis->hDC, GetSysColorBrush ((lpdis->itemState & ODS_FOCUS)?COLOR_HIGHLIGHT:COLOR_WINDOW)); /* fill background rectangle */ Rectangle (lpdis->hDC, lpdis->rcItem.left, lpdis->rcItem.top, lpdis->rcItem.right, lpdis->rcItem.bottom); /* calculate button and text rectangles */ CopyRect (&rcButton, &lpdis->rcItem); InflateRect (&rcButton, -1, -1); CopyRect (&rcText, &rcButton); rcButton.right = rcButton.left + infoPtr->nBitmapWidth + 6; rcText.left = rcButton.right + 2; /* draw focus rectangle */ if (lpdis->itemState & ODS_FOCUS) DrawFocusRect (lpdis->hDC, &lpdis->rcItem); /* draw button */ DrawEdge (lpdis->hDC, &rcButton, EDGE_RAISED, BF_RECT|BF_MIDDLE|BF_SOFT); /* draw image and text */ if (wParam == IDC_AVAILBTN_LBOX && lpdis->itemID == 0) { /* virtual separator in the 'available' list */ DrawTextA (lpdis->hDC, "Separator", -1, &rcText, DT_LEFT | DT_VCENTER | DT_SINGLELINE); } else { /* real button */ ImageList_Draw (infoPtr->himlDef, btnPtr.iBitmap, lpdis->hDC, rcButton.left+1, rcButton.top+1, ILD_NORMAL); DrawTextW (lpdis->hDC, infoPtr->strings[btnPtr.iString], -1, &rcText, DT_LEFT | DT_VCENTER | DT_SINGLELINE); } if (lpdis->itemState & ODS_FOCUS) { SetBkColor (lpdis->hDC, oldBk); SetTextColor (lpdis->hDC, oldText); } SelectObject (lpdis->hDC, hOldBrush); SelectObject (lpdis->hDC, hOldPen); return TRUE; } return FALSE; case WM_MEASUREITEM: if (wParam == IDC_AVAILBTN_LBOX || wParam == IDC_TOOLBARBTN_LBOX) { MEASUREITEMSTRUCT *lpmis = (MEASUREITEMSTRUCT*)lParam; if (infoPtr) lpmis->itemHeight = infoPtr->nBitmapHeight + 8; else lpmis->itemHeight = 15 + 8; /* default height */ return TRUE; } return FALSE; default: return FALSE; } } /*********************************************************************** * TOOLBAR_AddBitmap: Add the bitmaps to the default image list. * */ static LRESULT TOOLBAR_AddBitmap (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); LPTBADDBITMAP lpAddBmp = (LPTBADDBITMAP)lParam; INT nIndex = 0, nButtons; HBITMAP hbmLoad; if (!lpAddBmp) return -1; if (lpAddBmp->hInst == HINST_COMMCTRL) { if ((lpAddBmp->nID & ~1) == IDB_STD_SMALL_COLOR) nButtons = 15; else if ((lpAddBmp->nID & ~1) == IDB_VIEW_SMALL_COLOR) nButtons = 13; else if ((lpAddBmp->nID & ~1) == IDB_HIST_SMALL_COLOR) nButtons = 5; else return -1; TRACE ("adding %d internal bitmaps!\n", nButtons); /* Windows resize all the buttons to the size of a newly added standard image */ if (lpAddBmp->nID & 1) { /* large icons */ SendMessageA (hwnd, TB_SETBITMAPSIZE, 0, MAKELPARAM((WORD)26, (WORD)26)); SendMessageA (hwnd, TB_SETBUTTONSIZE, 0, MAKELPARAM((WORD)33, (WORD)33)); } else { /* small icons */ SendMessageA (hwnd, TB_SETBITMAPSIZE, 0, MAKELPARAM((WORD)16, (WORD)16)); SendMessageA (hwnd, TB_SETBUTTONSIZE, 0, MAKELPARAM((WORD)22, (WORD)22)); } TOOLBAR_CalcToolbar (hwnd); } else { nButtons = (INT)wParam; if (nButtons <= 0) return -1; TRACE ("adding %d bitmaps!\n", nButtons); } if (!(infoPtr->himlDef)) { /* create new default image list */ TRACE ("creating default image list!\n"); infoPtr->himlDef = ImageList_Create (infoPtr->nBitmapWidth, infoPtr->nBitmapHeight, ILC_COLOR | ILC_MASK, nButtons, 2); infoPtr->himlInt = infoPtr->himlDef; } /* Add bitmaps to the default image list */ if (lpAddBmp->hInst == (HINSTANCE)0) { nIndex = ImageList_AddMasked (infoPtr->himlDef, (HBITMAP)lpAddBmp->nID, CLR_DEFAULT); } else if (lpAddBmp->hInst == HINST_COMMCTRL) { /* Add system bitmaps */ switch (lpAddBmp->nID) { case IDB_STD_SMALL_COLOR: hbmLoad = LoadBitmapA (COMCTL32_hModule, MAKEINTRESOURCEA(IDB_STD_SMALL)); nIndex = ImageList_AddMasked (infoPtr->himlDef, hbmLoad, CLR_DEFAULT); DeleteObject (hbmLoad); break; case IDB_STD_LARGE_COLOR: hbmLoad = LoadBitmapA (COMCTL32_hModule, MAKEINTRESOURCEA(IDB_STD_LARGE)); nIndex = ImageList_AddMasked (infoPtr->himlDef, hbmLoad, CLR_DEFAULT); DeleteObject (hbmLoad); break; case IDB_VIEW_SMALL_COLOR: hbmLoad = LoadBitmapA (COMCTL32_hModule, MAKEINTRESOURCEA(IDB_VIEW_SMALL)); nIndex = ImageList_AddMasked (infoPtr->himlDef, hbmLoad, CLR_DEFAULT); DeleteObject (hbmLoad); break; case IDB_VIEW_LARGE_COLOR: hbmLoad = LoadBitmapA (COMCTL32_hModule, MAKEINTRESOURCEA(IDB_VIEW_LARGE)); nIndex = ImageList_AddMasked (infoPtr->himlDef, hbmLoad, CLR_DEFAULT); DeleteObject (hbmLoad); break; case IDB_HIST_SMALL_COLOR: hbmLoad = LoadBitmapA (COMCTL32_hModule, MAKEINTRESOURCEA(IDB_HIST_SMALL)); nIndex = ImageList_AddMasked (infoPtr->himlDef, hbmLoad, CLR_DEFAULT); DeleteObject (hbmLoad); break; case IDB_HIST_LARGE_COLOR: hbmLoad = LoadBitmapA (COMCTL32_hModule, MAKEINTRESOURCEA(IDB_HIST_LARGE)); nIndex = ImageList_AddMasked (infoPtr->himlDef, hbmLoad, CLR_DEFAULT); DeleteObject (hbmLoad); break; default: nIndex = ImageList_GetImageCount (infoPtr->himlDef); ERR ("invalid imagelist!\n"); break; } } else { hbmLoad = LoadBitmapA (lpAddBmp->hInst, (LPSTR)lpAddBmp->nID); nIndex = ImageList_AddMasked (infoPtr->himlDef, hbmLoad, CLR_DEFAULT); DeleteObject (hbmLoad); } infoPtr->nNumBitmaps += nButtons; return nIndex; } static LRESULT TOOLBAR_AddButtonsA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); LPTBBUTTON lpTbb = (LPTBBUTTON)lParam; INT nOldButtons, nNewButtons, nAddButtons, nCount; TRACE("adding %d buttons!\n", wParam); nAddButtons = (UINT)wParam; nOldButtons = infoPtr->nNumButtons; nNewButtons = nOldButtons + nAddButtons; if (infoPtr->nNumButtons == 0) { infoPtr->buttons = COMCTL32_Alloc (sizeof(TBUTTON_INFO) * nNewButtons); } else { TBUTTON_INFO *oldButtons = infoPtr->buttons; infoPtr->buttons = COMCTL32_Alloc (sizeof(TBUTTON_INFO) * nNewButtons); memcpy (&infoPtr->buttons[0], &oldButtons[0], nOldButtons * sizeof(TBUTTON_INFO)); COMCTL32_Free (oldButtons); } infoPtr->nNumButtons = nNewButtons; /* insert new button data */ for (nCount = 0; nCount < nAddButtons; nCount++) { TBUTTON_INFO *btnPtr = &infoPtr->buttons[nOldButtons+nCount]; btnPtr->iBitmap = lpTbb[nCount].iBitmap; btnPtr->idCommand = lpTbb[nCount].idCommand; btnPtr->fsState = lpTbb[nCount].fsState; btnPtr->fsStyle = lpTbb[nCount].fsStyle; btnPtr->dwData = lpTbb[nCount].dwData; btnPtr->iString = lpTbb[nCount].iString; btnPtr->bHot = FALSE; if ((infoPtr->hwndToolTip) && !(btnPtr->fsStyle & TBSTYLE_SEP)) { TTTOOLINFOA ti; ZeroMemory (&ti, sizeof(TTTOOLINFOA)); ti.cbSize = sizeof (TTTOOLINFOA); ti.hwnd = hwnd; ti.uId = btnPtr->idCommand; ti.hinst = 0; ti.lpszText = LPSTR_TEXTCALLBACKA; SendMessageA (infoPtr->hwndToolTip, TTM_ADDTOOLA, 0, (LPARAM)&ti); } } TOOLBAR_CalcToolbar (hwnd); InvalidateRect(hwnd, NULL, FALSE); return TRUE; } static LRESULT TOOLBAR_AddButtonsW (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); LPTBBUTTON lpTbb = (LPTBBUTTON)lParam; INT nOldButtons, nNewButtons, nAddButtons, nCount; TRACE("adding %d buttons!\n", wParam); nAddButtons = (UINT)wParam; nOldButtons = infoPtr->nNumButtons; nNewButtons = nOldButtons + nAddButtons; if (infoPtr->nNumButtons == 0) { infoPtr->buttons = COMCTL32_Alloc (sizeof(TBUTTON_INFO) * nNewButtons); } else { TBUTTON_INFO *oldButtons = infoPtr->buttons; infoPtr->buttons = COMCTL32_Alloc (sizeof(TBUTTON_INFO) * nNewButtons); memcpy (&infoPtr->buttons[0], &oldButtons[0], nOldButtons * sizeof(TBUTTON_INFO)); COMCTL32_Free (oldButtons); } infoPtr->nNumButtons = nNewButtons; /* insert new button data */ for (nCount = 0; nCount < nAddButtons; nCount++) { TBUTTON_INFO *btnPtr = &infoPtr->buttons[nOldButtons+nCount]; btnPtr->iBitmap = lpTbb[nCount].iBitmap; btnPtr->idCommand = lpTbb[nCount].idCommand; btnPtr->fsState = lpTbb[nCount].fsState; btnPtr->fsStyle = lpTbb[nCount].fsStyle; btnPtr->dwData = lpTbb[nCount].dwData; btnPtr->iString = lpTbb[nCount].iString; btnPtr->bHot = FALSE; if ((infoPtr->hwndToolTip) && !(btnPtr->fsStyle & TBSTYLE_SEP)) { TTTOOLINFOW ti; ZeroMemory (&ti, sizeof(TTTOOLINFOW)); ti.cbSize = sizeof (TTTOOLINFOW); ti.hwnd = hwnd; ti.uId = btnPtr->idCommand; ti.hinst = 0; ti.lpszText = LPSTR_TEXTCALLBACKW; SendMessageW (infoPtr->hwndToolTip, TTM_ADDTOOLW, 0, (LPARAM)&ti); } } TOOLBAR_CalcToolbar (hwnd); InvalidateRect(hwnd, NULL, FALSE); return TRUE; } static LRESULT TOOLBAR_AddStringA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); INT nIndex; if ((wParam) && (HIWORD(lParam) == 0)) { char szString[256]; INT len; TRACE("adding string from resource!\n"); len = LoadStringA ((HINSTANCE)wParam, (UINT)lParam, szString, 256); TRACE("len=%d \"%s\"\n", len, szString); nIndex = infoPtr->nNumStrings; if (infoPtr->nNumStrings == 0) { infoPtr->strings = COMCTL32_Alloc (sizeof(LPWSTR)); } else { LPWSTR *oldStrings = infoPtr->strings; infoPtr->strings = COMCTL32_Alloc (sizeof(LPWSTR) * (infoPtr->nNumStrings + 1)); memcpy (&infoPtr->strings[0], &oldStrings[0], sizeof(LPWSTR) * infoPtr->nNumStrings); COMCTL32_Free (oldStrings); } infoPtr->strings[infoPtr->nNumStrings] = COMCTL32_Alloc (sizeof(WCHAR)*(len+1)); lstrcpyAtoW (infoPtr->strings[infoPtr->nNumStrings], szString); infoPtr->nNumStrings++; } else { LPSTR p = (LPSTR)lParam; INT len; if (p == NULL) return -1; TRACE("adding string(s) from array!\n"); nIndex = infoPtr->nNumStrings; while (*p) { len = lstrlenA (p); TRACE("len=%d \"%s\"\n", len, p); if (infoPtr->nNumStrings == 0) { infoPtr->strings = COMCTL32_Alloc (sizeof(LPWSTR)); } else { LPWSTR *oldStrings = infoPtr->strings; infoPtr->strings = COMCTL32_Alloc (sizeof(LPWSTR) * (infoPtr->nNumStrings + 1)); memcpy (&infoPtr->strings[0], &oldStrings[0], sizeof(LPWSTR) * infoPtr->nNumStrings); COMCTL32_Free (oldStrings); } infoPtr->strings[infoPtr->nNumStrings] = COMCTL32_Alloc (sizeof(WCHAR)*(len+1)); lstrcpyAtoW (infoPtr->strings[infoPtr->nNumStrings], p); infoPtr->nNumStrings++; p += (len+1); } } return nIndex; } static LRESULT TOOLBAR_AddStringW (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); INT nIndex; if ((wParam) && (HIWORD(lParam) == 0)) { WCHAR szString[256]; INT len; TRACE("adding string from resource!\n"); len = LoadStringW ((HINSTANCE)wParam, (UINT)lParam, szString, 256); TRACE("len=%d \"%s\"\n", len, debugstr_w(szString)); nIndex = infoPtr->nNumStrings; if (infoPtr->nNumStrings == 0) { infoPtr->strings = COMCTL32_Alloc (sizeof(LPWSTR)); } else { LPWSTR *oldStrings = infoPtr->strings; infoPtr->strings = COMCTL32_Alloc (sizeof(LPWSTR) * (infoPtr->nNumStrings + 1)); memcpy (&infoPtr->strings[0], &oldStrings[0], sizeof(LPWSTR) * infoPtr->nNumStrings); COMCTL32_Free (oldStrings); } infoPtr->strings[infoPtr->nNumStrings] = COMCTL32_Alloc (sizeof(WCHAR)*(len+1)); lstrcpyW (infoPtr->strings[infoPtr->nNumStrings], szString); infoPtr->nNumStrings++; } else { LPWSTR p = (LPWSTR)lParam; INT len; if (p == NULL) return -1; TRACE("adding string(s) from array!\n"); nIndex = infoPtr->nNumStrings; while (*p) { len = lstrlenW (p); TRACE("len=%d \"%s\"\n", len, debugstr_w(p)); if (infoPtr->nNumStrings == 0) { infoPtr->strings = COMCTL32_Alloc (sizeof(LPWSTR)); } else { LPWSTR *oldStrings = infoPtr->strings; infoPtr->strings = COMCTL32_Alloc (sizeof(LPWSTR) * (infoPtr->nNumStrings + 1)); memcpy (&infoPtr->strings[0], &oldStrings[0], sizeof(LPWSTR) * infoPtr->nNumStrings); COMCTL32_Free (oldStrings); } infoPtr->strings[infoPtr->nNumStrings] = COMCTL32_Alloc (sizeof(WCHAR)*(len+1)); lstrcpyW (infoPtr->strings[infoPtr->nNumStrings], p); infoPtr->nNumStrings++; p += (len+1); } } return nIndex; } static LRESULT TOOLBAR_AutoSize (HWND hwnd) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); RECT parent_rect; RECT window_rect; HWND parent; INT x, y; INT cx, cy; UINT uPosFlags = 0; TRACE("resize forced!\n"); parent = GetParent (hwnd); GetClientRect(parent, &parent_rect); x = parent_rect.left; y = parent_rect.top; if (dwStyle & CCS_NORESIZE) { uPosFlags |= (SWP_NOSIZE | SWP_NOMOVE); cx = 0; cy = 0; } else { infoPtr->nWidth = parent_rect.right - parent_rect.left; TOOLBAR_CalcToolbar (hwnd); InvalidateRect( hwnd, NULL, TRUE ); cy = infoPtr->nHeight; cx = infoPtr->nWidth; if (dwStyle & CCS_NOMOVEY) { GetWindowRect(hwnd, &window_rect); ScreenToClient(parent, (LPPOINT)&window_rect.left); y = window_rect.top; } } if (dwStyle & CCS_NOPARENTALIGN) uPosFlags |= SWP_NOMOVE; if (!(dwStyle & CCS_NODIVIDER)) cy += GetSystemMetrics(SM_CYEDGE); if (dwStyle & WS_BORDER) { x = y = 1; cy += GetSystemMetrics(SM_CYEDGE); cx += GetSystemMetrics(SM_CYEDGE); } infoPtr->bAutoSize = TRUE; SetWindowPos (hwnd, HWND_TOP, parent_rect.left - x, parent_rect.top - y, cx, cy, uPosFlags); /* The following line makes sure that the infoPtr->bAutoSize is turned off after * the setwindowpos calls */ infoPtr->bAutoSize = FALSE; return 0; } static LRESULT TOOLBAR_ButtonCount (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); return infoPtr->nNumButtons; } static LRESULT TOOLBAR_ButtonStructSize (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); if (infoPtr == NULL) { ERR("(0x%x, 0x%x, 0x%lx)\n", hwnd, wParam, lParam); ERR("infoPtr == NULL!\n"); return 0; } infoPtr->dwStructSize = (DWORD)wParam; return 0; } static LRESULT TOOLBAR_ChangeBitmap (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; INT nIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return FALSE; btnPtr = &infoPtr->buttons[nIndex]; btnPtr->iBitmap = LOWORD(lParam); RedrawWindow(hwnd,&btnPtr->rect,NULL,RDW_ERASE|RDW_INVALIDATE); return TRUE; } static LRESULT TOOLBAR_CheckButton (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; INT nIndex; INT nOldIndex = -1; BOOL bChecked = FALSE; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return FALSE; btnPtr = &infoPtr->buttons[nIndex]; if (!(btnPtr->fsStyle & TBSTYLE_CHECK)) return FALSE; bChecked = (btnPtr->fsState & TBSTATE_CHECKED) ? TRUE : FALSE; if (LOWORD(lParam) == FALSE) btnPtr->fsState &= ~TBSTATE_CHECKED; else { if (btnPtr->fsStyle & TBSTYLE_GROUP) { nOldIndex = TOOLBAR_GetCheckedGroupButtonIndex (infoPtr, nIndex); if (nOldIndex == nIndex) return 0; if (nOldIndex != -1) infoPtr->buttons[nOldIndex].fsState &= ~TBSTATE_CHECKED; } btnPtr->fsState |= TBSTATE_CHECKED; } if( bChecked != LOWORD(lParam) ) { if (nOldIndex != -1) RedrawWindow(hwnd,&infoPtr->buttons[nOldIndex].rect,NULL, RDW_ERASE|RDW_INVALIDATE); RedrawWindow(hwnd,&btnPtr->rect,NULL,RDW_ERASE|RDW_INVALIDATE|RDW_UPDATENOW); } /* FIXME: Send a WM_NOTIFY?? */ return TRUE; } static LRESULT TOOLBAR_CommandToIndex (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); return TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); } static LRESULT TOOLBAR_Customize (HWND hwnd) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); LRESULT ret; LPCVOID template; HRSRC hRes; NMHDR nmhdr; /* send TBN_BEGINADJUST notification */ nmhdr.hwndFrom = hwnd; nmhdr.idFrom = GetWindowLongA (hwnd, GWL_ID); nmhdr.code = TBN_BEGINADJUST; SendMessageA (infoPtr->hwndNotify, WM_NOTIFY, (WPARAM)nmhdr.idFrom, (LPARAM)&nmhdr); if (!(hRes = FindResourceA (COMCTL32_hModule, MAKEINTRESOURCEA(IDD_TBCUSTOMIZE), RT_DIALOGA))) return FALSE; if(!(template = (LPVOID)LoadResource (COMCTL32_hModule, hRes))) return FALSE; ret = DialogBoxIndirectParamA (GetWindowLongA (hwnd, GWL_HINSTANCE), (LPDLGTEMPLATEA)template, hwnd, (DLGPROC)TOOLBAR_CustomizeDialogProc, (LPARAM)infoPtr); /* send TBN_ENDADJUST notification */ nmhdr.code = TBN_ENDADJUST; SendMessageA (infoPtr->hwndNotify, WM_NOTIFY, (WPARAM)nmhdr.idFrom, (LPARAM)&nmhdr); return ret; } static LRESULT TOOLBAR_DeleteButton (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); INT nIndex = (INT)wParam; if ((nIndex < 0) || (nIndex >= infoPtr->nNumButtons)) return FALSE; if ((infoPtr->hwndToolTip) && !(infoPtr->buttons[nIndex].fsStyle & TBSTYLE_SEP)) { TTTOOLINFOA ti; ZeroMemory (&ti, sizeof(TTTOOLINFOA)); ti.cbSize = sizeof (TTTOOLINFOA); ti.hwnd = hwnd; ti.uId = infoPtr->buttons[nIndex].idCommand; SendMessageA (infoPtr->hwndToolTip, TTM_DELTOOLA, 0, (LPARAM)&ti); } if (infoPtr->nNumButtons == 1) { TRACE(" simple delete!\n"); COMCTL32_Free (infoPtr->buttons); infoPtr->buttons = NULL; infoPtr->nNumButtons = 0; } else { TBUTTON_INFO *oldButtons = infoPtr->buttons; TRACE("complex delete! [nIndex=%d]\n", nIndex); infoPtr->nNumButtons--; infoPtr->buttons = COMCTL32_Alloc (sizeof (TBUTTON_INFO) * infoPtr->nNumButtons); if (nIndex > 0) { memcpy (&infoPtr->buttons[0], &oldButtons[0], nIndex * sizeof(TBUTTON_INFO)); } if (nIndex < infoPtr->nNumButtons) { memcpy (&infoPtr->buttons[nIndex], &oldButtons[nIndex+1], (infoPtr->nNumButtons - nIndex) * sizeof(TBUTTON_INFO)); } COMCTL32_Free (oldButtons); } TOOLBAR_CalcToolbar (hwnd); InvalidateRect (hwnd, NULL, TRUE); return TRUE; } static LRESULT TOOLBAR_EnableButton (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; INT nIndex; DWORD bState; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return FALSE; btnPtr = &infoPtr->buttons[nIndex]; bState = btnPtr->fsState & TBSTATE_ENABLED; /* update the toolbar button state */ if(LOWORD(lParam) == FALSE) { btnPtr->fsState &= ~(TBSTATE_ENABLED | TBSTATE_PRESSED); } else { btnPtr->fsState |= TBSTATE_ENABLED; } /* redraw the button only if the state of the button changed */ if(bState != (btnPtr->fsState & TBSTATE_ENABLED)) { RedrawWindow(hwnd,&btnPtr->rect,NULL,RDW_ERASE|RDW_INVALIDATE|RDW_UPDATENOW); } return TRUE; } static inline LRESULT TOOLBAR_GetAnchorHighlight (HWND hwnd) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); return infoPtr->bAnchor; } static LRESULT TOOLBAR_GetBitmap (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); INT nIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return -1; return infoPtr->buttons[nIndex].iBitmap; } static inline LRESULT TOOLBAR_GetBitmapFlags (HWND hwnd, WPARAM wParam, LPARAM lParam) { return (GetDeviceCaps (0, LOGPIXELSX) >= 120) ? TBBF_LARGE : 0; } static LRESULT TOOLBAR_GetButton (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); LPTBBUTTON lpTbb = (LPTBBUTTON)lParam; INT nIndex = (INT)wParam; TBUTTON_INFO *btnPtr; if (infoPtr == NULL) return FALSE; if (lpTbb == NULL) return FALSE; if ((nIndex < 0) || (nIndex >= infoPtr->nNumButtons)) return FALSE; btnPtr = &infoPtr->buttons[nIndex]; lpTbb->iBitmap = btnPtr->iBitmap; lpTbb->idCommand = btnPtr->idCommand; lpTbb->fsState = btnPtr->fsState; lpTbb->fsStyle = btnPtr->fsStyle; lpTbb->dwData = btnPtr->dwData; lpTbb->iString = btnPtr->iString; return TRUE; } static LRESULT TOOLBAR_GetButtonInfoA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); LPTBBUTTONINFOA lpTbInfo = (LPTBBUTTONINFOA)lParam; TBUTTON_INFO *btnPtr; INT nIndex; if (infoPtr == NULL) return -1; if (lpTbInfo == NULL) return -1; if (lpTbInfo->cbSize < sizeof(TBBUTTONINFOA)) return -1; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return -1; btnPtr = &infoPtr->buttons[nIndex]; if (lpTbInfo->dwMask & TBIF_COMMAND) lpTbInfo->idCommand = btnPtr->idCommand; if (lpTbInfo->dwMask & TBIF_IMAGE) lpTbInfo->iImage = btnPtr->iBitmap; if (lpTbInfo->dwMask & TBIF_LPARAM) lpTbInfo->lParam = btnPtr->dwData; if (lpTbInfo->dwMask & TBIF_SIZE) lpTbInfo->cx = (WORD)(btnPtr->rect.right - btnPtr->rect.left); if (lpTbInfo->dwMask & TBIF_STATE) lpTbInfo->fsState = btnPtr->fsState; if (lpTbInfo->dwMask & TBIF_STYLE) lpTbInfo->fsStyle = btnPtr->fsStyle; if (lpTbInfo->dwMask & TBIF_TEXT) { if ((btnPtr->iString >= 0) || (btnPtr->iString < infoPtr->nNumStrings)) lstrcpynWtoA (lpTbInfo->pszText, (LPWSTR)infoPtr->strings[btnPtr->iString], lpTbInfo->cchText); } return nIndex; } static LRESULT TOOLBAR_GetButtonInfoW (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); LPTBBUTTONINFOW lpTbInfo = (LPTBBUTTONINFOW)lParam; TBUTTON_INFO *btnPtr; INT nIndex; if (infoPtr == NULL) return -1; if (lpTbInfo == NULL) return -1; if (lpTbInfo->cbSize < sizeof(TBBUTTONINFOW)) return -1; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return -1; btnPtr = &infoPtr->buttons[nIndex]; if (lpTbInfo->dwMask & TBIF_COMMAND) lpTbInfo->idCommand = btnPtr->idCommand; if (lpTbInfo->dwMask & TBIF_IMAGE) lpTbInfo->iImage = btnPtr->iBitmap; if (lpTbInfo->dwMask & TBIF_LPARAM) lpTbInfo->lParam = btnPtr->dwData; if (lpTbInfo->dwMask & TBIF_SIZE) lpTbInfo->cx = (WORD)(btnPtr->rect.right - btnPtr->rect.left); if (lpTbInfo->dwMask & TBIF_STATE) lpTbInfo->fsState = btnPtr->fsState; if (lpTbInfo->dwMask & TBIF_STYLE) lpTbInfo->fsStyle = btnPtr->fsStyle; if (lpTbInfo->dwMask & TBIF_TEXT) { if ((btnPtr->iString >= 0) || (btnPtr->iString < infoPtr->nNumStrings)) lstrcpynW (lpTbInfo->pszText, (LPWSTR)infoPtr->strings[btnPtr->iString], lpTbInfo->cchText); } return nIndex; } static LRESULT TOOLBAR_GetButtonSize (HWND hwnd) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); return MAKELONG((WORD)infoPtr->nButtonWidth, (WORD)infoPtr->nButtonHeight); } static LRESULT TOOLBAR_GetButtonTextA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); INT nIndex, nStringIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return -1; nStringIndex = infoPtr->buttons[nIndex].iString; TRACE("index=%d stringIndex=%d\n", nIndex, nStringIndex); if ((nStringIndex < 0) || (nStringIndex >= infoPtr->nNumStrings)) return -1; if (lParam == 0) return -1; lstrcpyWtoA ((LPSTR)lParam, (LPWSTR)infoPtr->strings[nStringIndex]); return lstrlenW ((LPWSTR)infoPtr->strings[nStringIndex]); } static LRESULT TOOLBAR_GetButtonTextW (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); INT nIndex, nStringIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return -1; nStringIndex = infoPtr->buttons[nIndex].iString; TRACE("index=%d stringIndex=%d\n", nIndex, nStringIndex); if ((nStringIndex < 0) || (nStringIndex >= infoPtr->nNumStrings)) return -1; if (lParam == 0) return -1; lstrcpyW ((LPWSTR)lParam, (LPWSTR)infoPtr->strings[nStringIndex]); return lstrlenW ((LPWSTR)infoPtr->strings[nStringIndex]); } /* << TOOLBAR_GetColorScheme >> */ static LRESULT TOOLBAR_GetDisabledImageList (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); return (LRESULT)infoPtr->himlDis; } inline static LRESULT TOOLBAR_GetExtendedStyle (HWND hwnd) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); return infoPtr->dwExStyle; } static LRESULT TOOLBAR_GetHotImageList (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); return (LRESULT)infoPtr->himlHot; } static LRESULT TOOLBAR_GetHotItem (HWND hwnd) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); if (!(GetWindowLongA (hwnd, GWL_STYLE) & TBSTYLE_FLAT)) return -1; if (infoPtr->nHotItem < 0) return -1; return (LRESULT)infoPtr->nHotItem; } static LRESULT TOOLBAR_GetImageList (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); return (LRESULT)infoPtr->himlDef; } /* << TOOLBAR_GetInsertMark >> */ /* << TOOLBAR_GetInsertMarkColor >> */ static LRESULT TOOLBAR_GetItemRect (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; LPRECT lpRect; INT nIndex; if (infoPtr == NULL) return FALSE; nIndex = (INT)wParam; btnPtr = &infoPtr->buttons[nIndex]; if ((nIndex < 0) || (nIndex >= infoPtr->nNumButtons)) return FALSE; lpRect = (LPRECT)lParam; if (lpRect == NULL) return FALSE; if (btnPtr->fsState & TBSTATE_HIDDEN) return FALSE; TOOLBAR_CalcToolbar( hwnd ); lpRect->left = btnPtr->rect.left; lpRect->right = btnPtr->rect.right; lpRect->bottom = btnPtr->rect.bottom; lpRect->top = btnPtr->rect.top; return TRUE; } static LRESULT TOOLBAR_GetMaxSize (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); LPSIZE lpSize = (LPSIZE)lParam; if (lpSize == NULL) return FALSE; lpSize->cx = infoPtr->rcBound.right - infoPtr->rcBound.left; lpSize->cy = infoPtr->rcBound.bottom - infoPtr->rcBound.top; TRACE("maximum size %d x %d\n", infoPtr->rcBound.right - infoPtr->rcBound.left, infoPtr->rcBound.bottom - infoPtr->rcBound.top); return TRUE; } /* << TOOLBAR_GetObject >> */ /* << TOOLBAR_GetPadding >> */ static LRESULT TOOLBAR_GetRect (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; LPRECT lpRect; INT nIndex; if (infoPtr == NULL) return FALSE; nIndex = (INT)wParam; btnPtr = &infoPtr->buttons[nIndex]; if ((nIndex < 0) || (nIndex >= infoPtr->nNumButtons)) return FALSE; lpRect = (LPRECT)lParam; if (lpRect == NULL) return FALSE; lpRect->left = btnPtr->rect.left; lpRect->right = btnPtr->rect.right; lpRect->bottom = btnPtr->rect.bottom; lpRect->top = btnPtr->rect.top; return TRUE; } static LRESULT TOOLBAR_GetRows (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); if (GetWindowLongA (hwnd, GWL_STYLE) & TBSTYLE_WRAPABLE) return infoPtr->nRows; else return 1; } static LRESULT TOOLBAR_GetState (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); INT nIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return -1; return infoPtr->buttons[nIndex].fsState; } static LRESULT TOOLBAR_GetStyle (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); INT nIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return -1; return infoPtr->buttons[nIndex].fsStyle; } static LRESULT TOOLBAR_GetTextRows (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); if (infoPtr == NULL) return 0; return infoPtr->nMaxTextRows; } static LRESULT TOOLBAR_GetToolTips (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); if (infoPtr == NULL) return 0; return infoPtr->hwndToolTip; } static LRESULT TOOLBAR_GetUnicodeFormat (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TRACE("%s hwnd=0x%x stub!\n", infoPtr->bUnicode ? "TRUE" : "FALSE", hwnd); return infoPtr->bUnicode; } inline static LRESULT TOOLBAR_GetVersion (HWND hwnd) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); return infoPtr->iVersion; } static LRESULT TOOLBAR_HideButton (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; INT nIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return FALSE; btnPtr = &infoPtr->buttons[nIndex]; if (LOWORD(lParam) == FALSE) btnPtr->fsState &= ~TBSTATE_HIDDEN; else btnPtr->fsState |= TBSTATE_HIDDEN; TOOLBAR_CalcToolbar (hwnd); InvalidateRect (hwnd, NULL, TRUE); return TRUE; } inline static LRESULT TOOLBAR_HitTest (HWND hwnd, WPARAM wParam, LPARAM lParam) { return TOOLBAR_InternalHitTest (hwnd, (LPPOINT)lParam); } static LRESULT TOOLBAR_Indeterminate (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; INT nIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return FALSE; btnPtr = &infoPtr->buttons[nIndex]; if (LOWORD(lParam) == FALSE) btnPtr->fsState &= ~TBSTATE_INDETERMINATE; else btnPtr->fsState |= TBSTATE_INDETERMINATE; RedrawWindow(hwnd,&btnPtr->rect,NULL, RDW_ERASE|RDW_INVALIDATE|RDW_UPDATENOW); return TRUE; } static LRESULT TOOLBAR_InsertButtonA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); LPTBBUTTON lpTbb = (LPTBBUTTON)lParam; INT nIndex = (INT)wParam; TBUTTON_INFO *oldButtons; if (lpTbb == NULL) return FALSE; if (nIndex == -1) { /* EPP: this seems to be an undocumented call (from my IE4) * I assume in that case that: * - lpTbb->iString is a string pointer (not a string index in strings[] table * - index of insertion is at the end of existing buttons * I only see this happen with nIndex == -1, but it could have a special * meaning (like -nIndex (or ~nIndex) to get the real position of insertion). */ int len = lstrlenA((char*)lpTbb->iString) + 2; LPSTR ptr = COMCTL32_Alloc(len); nIndex = infoPtr->nNumButtons; strcpy(ptr, (char*)lpTbb->iString); ptr[len - 1] = 0; /* ended by two '\0' */ lpTbb->iString = TOOLBAR_AddStringA(hwnd, 0, (LPARAM)ptr); COMCTL32_Free(ptr); } else if (nIndex < 0) return FALSE; TRACE("inserting button index=%d\n", nIndex); if (nIndex > infoPtr->nNumButtons) { nIndex = infoPtr->nNumButtons; TRACE("adjust index=%d\n", nIndex); } oldButtons = infoPtr->buttons; infoPtr->nNumButtons++; infoPtr->buttons = COMCTL32_Alloc (sizeof (TBUTTON_INFO) * infoPtr->nNumButtons); /* pre insert copy */ if (nIndex > 0) { memcpy (&infoPtr->buttons[0], &oldButtons[0], nIndex * sizeof(TBUTTON_INFO)); } /* insert new button */ infoPtr->buttons[nIndex].iBitmap = lpTbb->iBitmap; infoPtr->buttons[nIndex].idCommand = lpTbb->idCommand; infoPtr->buttons[nIndex].fsState = lpTbb->fsState; infoPtr->buttons[nIndex].fsStyle = lpTbb->fsStyle; infoPtr->buttons[nIndex].dwData = lpTbb->dwData; infoPtr->buttons[nIndex].iString = lpTbb->iString; if ((infoPtr->hwndToolTip) && !(lpTbb->fsStyle & TBSTYLE_SEP)) { TTTOOLINFOA ti; ZeroMemory (&ti, sizeof(TTTOOLINFOA)); ti.cbSize = sizeof (TTTOOLINFOA); ti.hwnd = hwnd; ti.uId = lpTbb->idCommand; ti.hinst = 0; ti.lpszText = LPSTR_TEXTCALLBACKA; SendMessageA (infoPtr->hwndToolTip, TTM_ADDTOOLA, 0, (LPARAM)&ti); } /* post insert copy */ if (nIndex < infoPtr->nNumButtons - 1) { memcpy (&infoPtr->buttons[nIndex+1], &oldButtons[nIndex], (infoPtr->nNumButtons - nIndex - 1) * sizeof(TBUTTON_INFO)); } COMCTL32_Free (oldButtons); TOOLBAR_CalcToolbar (hwnd); InvalidateRect (hwnd, NULL, FALSE); return TRUE; } static LRESULT TOOLBAR_InsertButtonW (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); LPTBBUTTON lpTbb = (LPTBBUTTON)lParam; INT nIndex = (INT)wParam; TBUTTON_INFO *oldButtons; if (lpTbb == NULL) return FALSE; if (nIndex < 0) return FALSE; TRACE("inserting button index=%d\n", nIndex); if (nIndex > infoPtr->nNumButtons) { nIndex = infoPtr->nNumButtons; TRACE("adjust index=%d\n", nIndex); } oldButtons = infoPtr->buttons; infoPtr->nNumButtons++; infoPtr->buttons = COMCTL32_Alloc (sizeof (TBUTTON_INFO) * infoPtr->nNumButtons); /* pre insert copy */ if (nIndex > 0) { memcpy (&infoPtr->buttons[0], &oldButtons[0], nIndex * sizeof(TBUTTON_INFO)); } /* insert new button */ infoPtr->buttons[nIndex].iBitmap = lpTbb->iBitmap; infoPtr->buttons[nIndex].idCommand = lpTbb->idCommand; infoPtr->buttons[nIndex].fsState = lpTbb->fsState; infoPtr->buttons[nIndex].fsStyle = lpTbb->fsStyle; infoPtr->buttons[nIndex].dwData = lpTbb->dwData; infoPtr->buttons[nIndex].iString = lpTbb->iString; if ((infoPtr->hwndToolTip) && !(lpTbb->fsStyle & TBSTYLE_SEP)) { TTTOOLINFOW ti; ZeroMemory (&ti, sizeof(TTTOOLINFOW)); ti.cbSize = sizeof (TTTOOLINFOW); ti.hwnd = hwnd; ti.uId = lpTbb->idCommand; ti.hinst = 0; ti.lpszText = LPSTR_TEXTCALLBACKW; SendMessageW (infoPtr->hwndToolTip, TTM_ADDTOOLW, 0, (LPARAM)&ti); } /* post insert copy */ if (nIndex < infoPtr->nNumButtons - 1) { memcpy (&infoPtr->buttons[nIndex+1], &oldButtons[nIndex], (infoPtr->nNumButtons - nIndex - 1) * sizeof(TBUTTON_INFO)); } COMCTL32_Free (oldButtons); TOOLBAR_CalcToolbar (hwnd); InvalidateRect (hwnd, NULL, FALSE); return TRUE; } /* << TOOLBAR_InsertMarkHitTest >> */ static LRESULT TOOLBAR_IsButtonChecked (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); INT nIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return FALSE; return (infoPtr->buttons[nIndex].fsState & TBSTATE_CHECKED); } static LRESULT TOOLBAR_IsButtonEnabled (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); INT nIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return FALSE; return (infoPtr->buttons[nIndex].fsState & TBSTATE_ENABLED); } static LRESULT TOOLBAR_IsButtonHidden (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); INT nIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return FALSE; return (infoPtr->buttons[nIndex].fsState & TBSTATE_HIDDEN); } static LRESULT TOOLBAR_IsButtonHighlighted (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); INT nIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return FALSE; return (infoPtr->buttons[nIndex].fsState & TBSTATE_MARKED); } static LRESULT TOOLBAR_IsButtonIndeterminate (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); INT nIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return FALSE; return (infoPtr->buttons[nIndex].fsState & TBSTATE_INDETERMINATE); } static LRESULT TOOLBAR_IsButtonPressed (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); INT nIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return FALSE; return (infoPtr->buttons[nIndex].fsState & TBSTATE_PRESSED); } /* << TOOLBAR_LoadImages >> */ /* << TOOLBAR_MapAccelerator >> */ /* << TOOLBAR_MarkButton >> */ /* << TOOLBAR_MoveButton >> */ static LRESULT TOOLBAR_PressButton (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; INT nIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return FALSE; btnPtr = &infoPtr->buttons[nIndex]; if (LOWORD(lParam) == FALSE) btnPtr->fsState &= ~TBSTATE_PRESSED; else btnPtr->fsState |= TBSTATE_PRESSED; RedrawWindow(hwnd,&btnPtr->rect,NULL, RDW_ERASE|RDW_INVALIDATE|RDW_UPDATENOW); return TRUE; } /* << TOOLBAR_ReplaceBitmap >> */ static LRESULT TOOLBAR_SaveRestoreA (HWND hwnd, WPARAM wParam, LPARAM lParam) { #if 0 TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); LPTBSAVEPARAMSA lpSave = (LPTBSAVEPARAMSA)lParam; if (lpSave == NULL) return 0; if ((BOOL)wParam) { /* save toolbar information */ FIXME("save to \"%s\" \"%s\"\n", lpSave->pszSubKey, lpSave->pszValueName); } else { /* restore toolbar information */ FIXME("restore from \"%s\" \"%s\"\n", lpSave->pszSubKey, lpSave->pszValueName); } #endif return 0; } static LRESULT TOOLBAR_SaveRestoreW (HWND hwnd, WPARAM wParam, LPARAM lParam) { #if 0 TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); LPTBSAVEPARAMSW lpSave = (LPTBSAVEPARAMSW)lParam; if (lpSave == NULL) return 0; if ((BOOL)wParam) { /* save toolbar information */ FIXME("save to \"%s\" \"%s\"\n", lpSave->pszSubKey, lpSave->pszValueName); } else { /* restore toolbar information */ FIXME("restore from \"%s\" \"%s\"\n", lpSave->pszSubKey, lpSave->pszValueName); } #endif return 0; } static LRESULT TOOLBAR_SetAnchorHighlight (HWND hwnd, WPARAM wParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); BOOL bOldAnchor = infoPtr->bAnchor; infoPtr->bAnchor = (BOOL)wParam; return (LRESULT)bOldAnchor; } static LRESULT TOOLBAR_SetBitmapSize (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); if ((LOWORD(lParam) <= 0) || (HIWORD(lParam)<=0)) return FALSE; /* Bitmap size can only be set before adding any button to the toolbar according to the documentation. */ if( infoPtr->nNumButtons != 0 ) return FALSE; infoPtr->nBitmapWidth = (INT)LOWORD(lParam); infoPtr->nBitmapHeight = (INT)HIWORD(lParam); return TRUE; } static LRESULT TOOLBAR_SetButtonInfoA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); LPTBBUTTONINFOA lptbbi = (LPTBBUTTONINFOA)lParam; TBUTTON_INFO *btnPtr; INT nIndex; if (lptbbi == NULL) return FALSE; if (lptbbi->cbSize < sizeof(TBBUTTONINFOA)) return FALSE; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return FALSE; btnPtr = &infoPtr->buttons[nIndex]; if (lptbbi->dwMask & TBIF_COMMAND) btnPtr->idCommand = lptbbi->idCommand; if (lptbbi->dwMask & TBIF_IMAGE) btnPtr->iBitmap = lptbbi->iImage; if (lptbbi->dwMask & TBIF_LPARAM) btnPtr->dwData = lptbbi->lParam; /* if (lptbbi->dwMask & TBIF_SIZE) */ /* btnPtr->cx = lptbbi->cx; */ if (lptbbi->dwMask & TBIF_STATE) btnPtr->fsState = lptbbi->fsState; if (lptbbi->dwMask & TBIF_STYLE) btnPtr->fsStyle = lptbbi->fsStyle; if (lptbbi->dwMask & TBIF_TEXT) { if ((btnPtr->iString >= 0) || (btnPtr->iString < infoPtr->nNumStrings)) { TRACE("Ooooooch\n"); #if 0 WCHAR **lpString = &infoPtr->strings[btnPtr->iString]; INT len = lstrlenA (lptbbi->pszText); *lpString = COMCTL32_ReAlloc (lpString, sizeof(WCHAR)*(len+1)); #endif /* this is the ultimate sollution */ /* Str_SetPtrA (&infoPtr->strings[btnPtr->iString], lptbbi->pszText); */ } } return TRUE; } static LRESULT TOOLBAR_SetButtonInfoW (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); LPTBBUTTONINFOW lptbbi = (LPTBBUTTONINFOW)lParam; TBUTTON_INFO *btnPtr; INT nIndex; if (lptbbi == NULL) return FALSE; if (lptbbi->cbSize < sizeof(TBBUTTONINFOW)) return FALSE; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return FALSE; btnPtr = &infoPtr->buttons[nIndex]; if (lptbbi->dwMask & TBIF_COMMAND) btnPtr->idCommand = lptbbi->idCommand; if (lptbbi->dwMask & TBIF_IMAGE) btnPtr->iBitmap = lptbbi->iImage; if (lptbbi->dwMask & TBIF_LPARAM) btnPtr->dwData = lptbbi->lParam; /* if (lptbbi->dwMask & TBIF_SIZE) */ /* btnPtr->cx = lptbbi->cx; */ if (lptbbi->dwMask & TBIF_STATE) btnPtr->fsState = lptbbi->fsState; if (lptbbi->dwMask & TBIF_STYLE) btnPtr->fsStyle = lptbbi->fsStyle; if (lptbbi->dwMask & TBIF_TEXT) { if ((btnPtr->iString >= 0) || (btnPtr->iString < infoPtr->nNumStrings)) { #if 0 WCHAR **lpString = &infoPtr->strings[btnPtr->iString]; INT len = lstrlenW (lptbbi->pszText); *lpString = COMCTL32_ReAlloc (lpString, sizeof(WCHAR)*(len+1)); #endif /* this is the ultimate sollution */ /* Str_SetPtrA (&infoPtr->strings[btnPtr->iString], lptbbi->pszText); */ } } return TRUE; } static LRESULT TOOLBAR_SetButtonSize (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); if ((LOWORD(lParam) <= 0) || (HIWORD(lParam)<=0)) return FALSE; /* Button size can only be set before adding any button to the toolbar according to the documentation. */ if( infoPtr->nNumButtons != 0 ) return FALSE; infoPtr->nButtonWidth = (INT)LOWORD(lParam); infoPtr->nButtonHeight = (INT)HIWORD(lParam); return TRUE; } static LRESULT TOOLBAR_SetButtonWidth (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); if (infoPtr == NULL) return FALSE; infoPtr->cxMin = (INT)LOWORD(lParam); infoPtr->cxMax = (INT)HIWORD(lParam); return TRUE; } static LRESULT TOOLBAR_SetCmdId (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); INT nIndex = (INT)wParam; if ((nIndex < 0) || (nIndex >= infoPtr->nNumButtons)) return FALSE; infoPtr->buttons[nIndex].idCommand = (INT)lParam; if (infoPtr->hwndToolTip) { FIXME("change tool tip!\n"); } return TRUE; } /* << TOOLBAR_SetColorScheme >> */ static LRESULT TOOLBAR_SetDisabledImageList (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); HIMAGELIST himlTemp; himlTemp = infoPtr->himlDis; infoPtr->himlDis = (HIMAGELIST)lParam; /* FIXME: redraw ? */ return (LRESULT)himlTemp; } static LRESULT TOOLBAR_SetDrawTextFlags (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); DWORD dwTemp; dwTemp = infoPtr->dwDTFlags; infoPtr->dwDTFlags = (infoPtr->dwDTFlags & (DWORD)wParam) | (DWORD)lParam; return (LRESULT)dwTemp; } static LRESULT TOOLBAR_SetExtendedStyle (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); DWORD dwTemp; dwTemp = infoPtr->dwExStyle; infoPtr->dwExStyle = (DWORD)lParam; return (LRESULT)dwTemp; } static LRESULT TOOLBAR_SetHotImageList (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr(hwnd); HIMAGELIST himlTemp; himlTemp = infoPtr->himlHot; infoPtr->himlHot = (HIMAGELIST)lParam; /* FIXME: redraw ? */ return (LRESULT)himlTemp; } static LRESULT TOOLBAR_SetHotItem (HWND hwnd, WPARAM wParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr(hwnd); INT nOldHotItem = infoPtr->nHotItem; if (GetWindowLongA (hwnd, GWL_STYLE) & TBSTYLE_FLAT) { infoPtr->nHotItem = (INT)wParam; /* FIXME: What else must be done ??? */ } if (nOldHotItem < 0) return -1; return (LRESULT)nOldHotItem; } static LRESULT TOOLBAR_SetImageList (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); HIMAGELIST himlTemp; himlTemp = infoPtr->himlDef; infoPtr->himlDef = (HIMAGELIST)lParam; /* FIXME: redraw ? */ return (LRESULT)himlTemp; } static LRESULT TOOLBAR_SetIndent (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); infoPtr->nIndent = (INT)wParam; TOOLBAR_CalcToolbar (hwnd); InvalidateRect(hwnd, NULL, FALSE); return TRUE; } /* << TOOLBAR_SetInsertMark >> */ static LRESULT TOOLBAR_SetInsertMarkColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); infoPtr->clrInsertMark = (COLORREF)lParam; /* FIXME : redraw ??*/ return 0; } static LRESULT TOOLBAR_SetMaxTextRows (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); if (infoPtr == NULL) return FALSE; infoPtr->nMaxTextRows = (INT)wParam; return TRUE; } /* << TOOLBAR_SetPadding >> */ static LRESULT TOOLBAR_SetParent (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); HWND hwndOldNotify; if (infoPtr == NULL) return 0; hwndOldNotify = infoPtr->hwndNotify; infoPtr->hwndNotify = (HWND)wParam; return hwndOldNotify; } static LRESULT TOOLBAR_SetRows (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); LPRECT lprc = (LPRECT)lParam; if (LOWORD(wParam) > 1) { FIXME("multiple rows not supported!\n"); } /* recalculate toolbar */ TOOLBAR_CalcToolbar (hwnd); /* return bounding rectangle */ if (lprc) { lprc->left = infoPtr->rcBound.left; lprc->right = infoPtr->rcBound.right; lprc->top = infoPtr->rcBound.top; lprc->bottom = infoPtr->rcBound.bottom; } /* repaint toolbar */ InvalidateRect(hwnd, NULL, FALSE); return 0; } static LRESULT TOOLBAR_SetState (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; INT nIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return FALSE; btnPtr = &infoPtr->buttons[nIndex]; btnPtr->fsState = LOWORD(lParam); RedrawWindow(hwnd,&btnPtr->rect,NULL, RDW_ERASE|RDW_INVALIDATE|RDW_UPDATENOW); return TRUE; } static LRESULT TOOLBAR_SetStyle (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; INT nIndex; nIndex = TOOLBAR_GetButtonIndex (infoPtr, (INT)wParam); if (nIndex == -1) return FALSE; btnPtr = &infoPtr->buttons[nIndex]; btnPtr->fsStyle = LOWORD(lParam); RedrawWindow(hwnd,&btnPtr->rect,NULL, RDW_ERASE|RDW_INVALIDATE|RDW_UPDATENOW); if (infoPtr->hwndToolTip) { FIXME("change tool tip!\n"); } return TRUE; } inline static LRESULT TOOLBAR_SetToolTips (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); if (infoPtr == NULL) return 0; infoPtr->hwndToolTip = (HWND)wParam; return 0; } static LRESULT TOOLBAR_SetUnicodeFormat (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); BOOL bTemp; TRACE("%s hwnd=0x%04x stub!\n", ((BOOL)wParam) ? "TRUE" : "FALSE", hwnd); bTemp = infoPtr->bUnicode; infoPtr->bUnicode = (BOOL)wParam; return bTemp; } static LRESULT TOOLBAR_SetVersion (HWND hwnd, INT iVersion) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); INT iOldVersion = infoPtr->iVersion; infoPtr->iVersion = iVersion; return iOldVersion; } static LRESULT TOOLBAR_Create (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); LOGFONTA logFont; /* initialize info structure */ infoPtr->nButtonHeight = 22; infoPtr->nButtonWidth = 24; infoPtr->nBitmapHeight = 15; infoPtr->nBitmapWidth = 16; infoPtr->nHeight = infoPtr->nButtonHeight + TOP_BORDER + BOTTOM_BORDER; infoPtr->nRows = 1; infoPtr->nMaxTextRows = 1; infoPtr->cxMin = -1; infoPtr->cxMax = -1; infoPtr->bCaptured = FALSE; infoPtr->bUnicode = IsWindowUnicode (hwnd); infoPtr->nButtonDown = -1; infoPtr->nOldHit = -1; infoPtr->nHotItem = -2; /* It has to be initially different from nOldHit */ infoPtr->hwndNotify = GetParent (hwnd); infoPtr->bTransparent = (dwStyle & TBSTYLE_FLAT); infoPtr->dwDTFlags = (dwStyle & TBSTYLE_LIST) ? DT_LEFT | DT_VCENTER | DT_SINGLELINE : DT_CENTER; infoPtr->bAnchor = FALSE; /* no anchor highlighting */ infoPtr->iVersion = 0; SystemParametersInfoA (SPI_GETICONTITLELOGFONT, 0, &logFont, 0); infoPtr->hFont = CreateFontIndirectA (&logFont); if (dwStyle & TBSTYLE_TOOLTIPS) { /* Create tooltip control */ infoPtr->hwndToolTip = CreateWindowExA (0, TOOLTIPS_CLASSA, NULL, 0, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, hwnd, 0, 0, 0); /* Send NM_TOOLTIPSCREATED notification */ if (infoPtr->hwndToolTip) { NMTOOLTIPSCREATED nmttc; nmttc.hdr.hwndFrom = hwnd; nmttc.hdr.idFrom = GetWindowLongA (hwnd, GWL_ID); nmttc.hdr.code = NM_TOOLTIPSCREATED; nmttc.hwndToolTips = infoPtr->hwndToolTip; SendMessageA (infoPtr->hwndNotify, WM_NOTIFY, (WPARAM)nmttc.hdr.idFrom, (LPARAM)&nmttc); } } return 0; } static LRESULT TOOLBAR_Destroy (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); /* delete tooltip control */ if (infoPtr->hwndToolTip) DestroyWindow (infoPtr->hwndToolTip); /* delete button data */ if (infoPtr->buttons) COMCTL32_Free (infoPtr->buttons); /* delete strings */ if (infoPtr->strings) { INT i; for (i = 0; i < infoPtr->nNumStrings; i++) if (infoPtr->strings[i]) COMCTL32_Free (infoPtr->strings[i]); COMCTL32_Free (infoPtr->strings); } /* destroy internal image list */ if (infoPtr->himlInt) ImageList_Destroy (infoPtr->himlInt); /* delete default font */ if (infoPtr->hFont) DeleteObject (infoPtr->hFont); /* free toolbar info data */ COMCTL32_Free (infoPtr); SetWindowLongA (hwnd, 0, 0); return 0; } static LRESULT TOOLBAR_EraseBackground (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); if (infoPtr->bTransparent) return SendMessageA (GetParent (hwnd), WM_ERASEBKGND, wParam, lParam); return DefWindowProcA (hwnd, WM_ERASEBKGND, wParam, lParam); } static LRESULT TOOLBAR_GetFont (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); return infoPtr->hFont; } static LRESULT TOOLBAR_LButtonDblClk (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; POINT pt; INT nHit; pt.x = (INT)LOWORD(lParam); pt.y = (INT)HIWORD(lParam); nHit = TOOLBAR_InternalHitTest (hwnd, &pt); if (nHit >= 0) { btnPtr = &infoPtr->buttons[nHit]; if (!(btnPtr->fsState & TBSTATE_ENABLED)) return 0; SetCapture (hwnd); infoPtr->bCaptured = TRUE; infoPtr->nButtonDown = nHit; btnPtr->fsState |= TBSTATE_PRESSED; RedrawWindow(hwnd,&btnPtr->rect,NULL, RDW_ERASE|RDW_INVALIDATE|RDW_UPDATENOW); } else if (GetWindowLongA (hwnd, GWL_STYLE) & CCS_ADJUSTABLE) TOOLBAR_Customize (hwnd); return 0; } static LRESULT TOOLBAR_LButtonDown (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; POINT pt; INT nHit; if (infoPtr->hwndToolTip) TOOLBAR_RelayEvent (infoPtr->hwndToolTip, hwnd, WM_LBUTTONDOWN, wParam, lParam); pt.x = (INT)LOWORD(lParam); pt.y = (INT)HIWORD(lParam); nHit = TOOLBAR_InternalHitTest (hwnd, &pt); if (nHit >= 0) { btnPtr = &infoPtr->buttons[nHit]; if (!(btnPtr->fsState & TBSTATE_ENABLED)) return 0; if (btnPtr->fsStyle & TBSTYLE_DROPDOWN) { NMTOOLBARA nmtb; nmtb.hdr.hwndFrom = hwnd; nmtb.hdr.idFrom = GetWindowLongA (hwnd, GWL_ID); nmtb.hdr.code = TBN_DROPDOWN; nmtb.iItem = btnPtr->idCommand; SendMessageA (infoPtr->hwndNotify, WM_NOTIFY, (WPARAM)nmtb.hdr.idFrom, (LPARAM)&nmtb); } SetCapture (hwnd); infoPtr->bCaptured = TRUE; infoPtr->nButtonDown = nHit; infoPtr->nOldHit = nHit; btnPtr->fsState |= TBSTATE_PRESSED; btnPtr->bHot = FALSE; RedrawWindow(hwnd,&btnPtr->rect,NULL, RDW_ERASE|RDW_INVALIDATE|RDW_UPDATENOW); } return 0; } static LRESULT TOOLBAR_LButtonUp (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *btnPtr; POINT pt; INT nHit; INT nOldIndex = -1; BOOL bSendMessage = TRUE; if (infoPtr->hwndToolTip) TOOLBAR_RelayEvent (infoPtr->hwndToolTip, hwnd, WM_LBUTTONUP, wParam, lParam); pt.x = (INT)LOWORD(lParam); pt.y = (INT)HIWORD(lParam); nHit = TOOLBAR_InternalHitTest (hwnd, &pt); /* restore hot effect to hot button disabled by TOOLBAR_LButtonDown() */ if(infoPtr->nHotItem >= 0) infoPtr->buttons[infoPtr->nHotItem].bHot = TRUE; if ((infoPtr->bCaptured) && (infoPtr->nButtonDown >= 0)) { infoPtr->bCaptured = FALSE; ReleaseCapture (); btnPtr = &infoPtr->buttons[infoPtr->nButtonDown]; btnPtr->fsState &= ~TBSTATE_PRESSED; if (nHit == infoPtr->nButtonDown) { if (btnPtr->fsStyle & TBSTYLE_CHECK) { if (btnPtr->fsStyle & TBSTYLE_GROUP) { nOldIndex = TOOLBAR_GetCheckedGroupButtonIndex (infoPtr, infoPtr->nButtonDown); if (nOldIndex == infoPtr->nButtonDown) bSendMessage = FALSE; if ((nOldIndex != infoPtr->nButtonDown) && (nOldIndex != -1)) infoPtr->buttons[nOldIndex].fsState &= ~TBSTATE_CHECKED; btnPtr->fsState |= TBSTATE_CHECKED; } else { if (btnPtr->fsState & TBSTATE_CHECKED) btnPtr->fsState &= ~TBSTATE_CHECKED; else btnPtr->fsState |= TBSTATE_CHECKED; } } } else bSendMessage = FALSE; if (nOldIndex != -1) RedrawWindow(hwnd,&infoPtr->buttons[nOldIndex].rect,NULL, RDW_ERASE|RDW_INVALIDATE|RDW_UPDATENOW); RedrawWindow(hwnd,&btnPtr->rect,NULL, RDW_ERASE|RDW_INVALIDATE|RDW_UPDATENOW); if (bSendMessage) { SendMessageA (GetParent(hwnd), WM_COMMAND, MAKEWPARAM(btnPtr->idCommand, 0), (LPARAM)hwnd); // if ((GetWindowLongA(hwnd, GWL_STYLE) & TBSTYLE_DROPDOWN) || // (btnPtr->fsStyle & 0x08/* BTNS_DROPDOWN */)) { /* * This appears to be an error. Instead of checking the style of the * button in question wine was checking the style of the toolbar * itself. This caused a number of strange behaviors. In my * invistigation i think the whole dropdown thing is still fairly * broken. but this helps fix some of the problems. */ if (btnPtr->fsStyle & TBSTYLE_DROPDOWN) { NMTOOLBARW nmtb; nmtb.hdr.hwndFrom = hwnd; nmtb.hdr.idFrom = GetWindowLongA (hwnd, GWL_ID); nmtb.hdr.code = TBN_DROPDOWN; nmtb.iItem = nHit; /* nmtb.tbButton not used with TBN_DROPDOWN */ if ((btnPtr->iString >= 0) && (btnPtr->iString < infoPtr->nNumStrings)) { nmtb.pszText = infoPtr->strings[btnPtr->iString]; nmtb.cchText = lstrlenW(nmtb.pszText); } else { nmtb.pszText = NULL; nmtb.cchText = 0; } nmtb.rcButton = btnPtr->rect; SendMessageW(infoPtr->hwndNotify, WM_NOTIFY, (WPARAM)nmtb.hdr.idFrom, (LPARAM)&nmtb); } } infoPtr->nButtonDown = -1; infoPtr->nOldHit = -1; } return 0; } static LRESULT TOOLBAR_MouseLeave (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); TBUTTON_INFO *hotBtnPtr; if (infoPtr->nOldHit < 0) return TRUE; hotBtnPtr = &infoPtr->buttons[infoPtr->nOldHit]; /* Redraw the button if the last button we were over is the hot button and it is enabled */ if((infoPtr->nOldHit == infoPtr->nHotItem) && (hotBtnPtr->fsState & TBSTATE_ENABLED)) { hotBtnPtr->bHot = FALSE; InvalidateRect (hwnd, &hotBtnPtr->rect, TRUE); } infoPtr->nOldHit = -1; /* reset the old hit index as we've left the toolbar */ infoPtr->nHotItem = -2; /* It has to be initially different from nOldHit */ return TRUE; } static LRESULT TOOLBAR_MouseMove (HWND hwnd, WPARAM wParam, LPARAM lParam) { TBUTTON_INFO *btnPtr, *oldBtnPtr; TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); POINT pt; INT nHit; TRACKMOUSEEVENT trackinfo; /* fill in the TRACKMOUSEEVENT struct */ trackinfo.cbSize = sizeof(TRACKMOUSEEVENT); trackinfo.dwFlags = TME_QUERY; trackinfo.hwndTrack = hwnd; trackinfo.dwHoverTime = HOVER_DEFAULT; /* call _TrackMouseEvent to see if we are currently tracking for this hwnd */ _TrackMouseEvent(&trackinfo); /* Make sure tracking is enabled so we recieve a WM_MOUSELEAVE message */ if(!(trackinfo.dwFlags & TME_LEAVE)) { trackinfo.dwFlags = TME_LEAVE; /* notify upon leaving */ /* call TRACKMOUSEEVENT so we recieve a WM_MOUSELEAVE message */ /* and can properly deactivate the hot toolbar button */ _TrackMouseEvent(&trackinfo); } if (infoPtr->hwndToolTip) TOOLBAR_RelayEvent (infoPtr->hwndToolTip, hwnd, WM_MOUSEMOVE, wParam, lParam); pt.x = (INT)LOWORD(lParam); pt.y = (INT)HIWORD(lParam); nHit = TOOLBAR_InternalHitTest (hwnd, &pt); if (infoPtr->nOldHit != nHit) { /* Remove the effect of an old hot button if the button was enabled and was drawn with the hot button effect */ if(infoPtr->nOldHit >= 0 && infoPtr->nOldHit == infoPtr->nHotItem && (infoPtr->buttons[infoPtr->nOldHit].fsState & TBSTATE_ENABLED)) { oldBtnPtr = &infoPtr->buttons[infoPtr->nOldHit]; oldBtnPtr->bHot = FALSE; InvalidateRect (hwnd, &oldBtnPtr->rect, TRUE); } /* It's not a separator or in nowhere. It's a hot button. */ if (nHit >= 0) { btnPtr = &infoPtr->buttons[nHit]; btnPtr->bHot = TRUE; infoPtr->nHotItem = nHit; /* only enabled buttons show hot effect */ if(infoPtr->buttons[nHit].fsState & TBSTATE_ENABLED) { RedrawWindow(hwnd,&btnPtr->rect,NULL, RDW_ERASE|RDW_INVALIDATE|RDW_UPDATENOW); } } if (infoPtr->bCaptured) { btnPtr = &infoPtr->buttons[infoPtr->nButtonDown]; if (infoPtr->nOldHit == infoPtr->nButtonDown) { btnPtr->fsState &= ~TBSTATE_PRESSED; RedrawWindow(hwnd,&btnPtr->rect,NULL, RDW_ERASE|RDW_INVALIDATE|RDW_UPDATENOW); } else if (nHit == infoPtr->nButtonDown) { btnPtr->fsState |= TBSTATE_PRESSED; RedrawWindow(hwnd,&btnPtr->rect,NULL, RDW_ERASE|RDW_INVALIDATE|RDW_UPDATENOW); } } infoPtr->nOldHit = nHit; } return 0; } inline static LRESULT TOOLBAR_NCActivate (HWND hwnd, WPARAM wParam, LPARAM lParam) { /* if (wndPtr->dwStyle & CCS_NODIVIDER) */ return DefWindowProcA (hwnd, WM_NCACTIVATE, wParam, lParam); /* else */ /* return TOOLBAR_NCPaint (wndPtr, wParam, lParam); */ } inline static LRESULT TOOLBAR_NCCalcSize (HWND hwnd, WPARAM wParam, LPARAM lParam) { if (!(GetWindowLongA (hwnd, GWL_STYLE) & CCS_NODIVIDER)) ((LPRECT)lParam)->top += GetSystemMetrics(SM_CYEDGE); return DefWindowProcA (hwnd, WM_NCCALCSIZE, wParam, lParam); } static LRESULT TOOLBAR_NCCreate (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr; /* allocate memory for info structure */ infoPtr = (TOOLBAR_INFO *)COMCTL32_Alloc (sizeof(TOOLBAR_INFO)); SetWindowLongA (hwnd, 0, (DWORD)infoPtr); /* paranoid!! */ infoPtr->dwStructSize = sizeof(TBBUTTON); /* fix instance handle, if the toolbar was created by CreateToolbarEx() */ if (!GetWindowLongA (hwnd, GWL_HINSTANCE)) { HINSTANCE hInst = (HINSTANCE)GetWindowLongA (GetParent (hwnd), GWL_HINSTANCE); SetWindowLongA (hwnd, GWL_HINSTANCE, (DWORD)hInst); } return DefWindowProcA (hwnd, WM_NCCREATE, wParam, lParam); } static LRESULT TOOLBAR_NCPaint (HWND hwnd, WPARAM wParam, LPARAM lParam) { DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); RECT rcWindow; HDC hdc; if (dwStyle & WS_MINIMIZE) return 0; /* Nothing to do */ DefWindowProcA (hwnd, WM_NCPAINT, wParam, lParam); if (!(hdc = GetDCEx (hwnd, 0, DCX_USESTYLE | DCX_WINDOW))) return 0; if (!(dwStyle & CCS_NODIVIDER)) { GetWindowRect (hwnd, &rcWindow); OffsetRect (&rcWindow, -rcWindow.left, -rcWindow.top); if( dwStyle & WS_BORDER ) OffsetRect (&rcWindow, 1, 1); DrawEdge (hdc, &rcWindow, EDGE_ETCHED, BF_TOP); } ReleaseDC( hwnd, hdc ); return 0; } inline static LRESULT TOOLBAR_Notify (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); LPNMHDR lpnmh = (LPNMHDR)lParam; TRACE("passing WM_NOTIFY!\n"); if ((infoPtr->hwndToolTip) && (lpnmh->hwndFrom == infoPtr->hwndToolTip)) { SendMessageA (infoPtr->hwndNotify, WM_NOTIFY, wParam, lParam); #if 0 if (lpnmh->code == TTN_GETDISPINFOA) { LPNMTTDISPINFOA lpdi = (LPNMTTDISPINFOA)lParam; FIXME("retrieving ASCII string\n"); } else if (lpnmh->code == TTN_GETDISPINFOW) { LPNMTTDISPINFOW lpdi = (LPNMTTDISPINFOW)lParam; FIXME("retrieving UNICODE string\n"); } #endif } return 0; } static LRESULT TOOLBAR_Paint (HWND hwnd, WPARAM wParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr(hwnd); HDC hdc; PAINTSTRUCT ps; /* fill ps.rcPaint with a default rect */ memcpy(&(ps.rcPaint), &(infoPtr->rcBound), sizeof(infoPtr->rcBound)); TOOLBAR_CalcToolbar( hwnd ); hdc = wParam==0 ? BeginPaint(hwnd, &ps) : (HDC)wParam; TOOLBAR_Refresh (hwnd, hdc, &ps); if (!wParam) EndPaint (hwnd, &ps); return 0; } static LRESULT TOOLBAR_Size (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); RECT parent_rect; RECT window_rect; HWND parent; INT x, y; INT cx, cy; INT flags; UINT uPosFlags = 0; /* Resize deadlock check */ if (infoPtr->bAutoSize) { infoPtr->bAutoSize = FALSE; return 0; } flags = (INT) wParam; /* FIXME for flags = * SIZE_MAXIMIZED, SIZE_MAXSHOW, SIZE_MINIMIZED */ TRACE("sizing toolbar!\n"); if (flags == SIZE_RESTORED) { /* width and height don't apply */ parent = GetParent (hwnd); GetClientRect(parent, &parent_rect); x = parent_rect.left; y = parent_rect.top; if (dwStyle & CCS_NORESIZE) { uPosFlags |= (SWP_NOSIZE | SWP_NOMOVE); /* * this sets the working width of the toolbar, and * Calc Toolbar will not adjust it, only the height */ infoPtr->nWidth = parent_rect.right - parent_rect.left; cy = infoPtr->nHeight; cx = infoPtr->nWidth; TOOLBAR_CalcToolbar (hwnd); infoPtr->nWidth = cx; infoPtr->nHeight = cy; } else { infoPtr->nWidth = parent_rect.right - parent_rect.left; TOOLBAR_CalcToolbar (hwnd); cy = infoPtr->nHeight; cx = infoPtr->nWidth; if (dwStyle & CCS_NOMOVEY) { GetWindowRect(hwnd, &window_rect); ScreenToClient(parent, (LPPOINT)&window_rect.left); y = window_rect.top; } } if (dwStyle & CCS_NOPARENTALIGN) { uPosFlags |= SWP_NOMOVE; cy = infoPtr->nHeight; cx = infoPtr->nWidth; } if (!(dwStyle & CCS_NODIVIDER)) cy += GetSystemMetrics(SM_CYEDGE); if (dwStyle & WS_BORDER) { x = y = 1; cy += GetSystemMetrics(SM_CYEDGE); cx += GetSystemMetrics(SM_CYEDGE); } SetWindowPos (hwnd, 0, parent_rect.left - x, parent_rect.top - y, cx, cy, uPosFlags | SWP_NOZORDER); } return 0; } static LRESULT TOOLBAR_StyleChanged (HWND hwnd, INT nType, LPSTYLESTRUCT lpStyle) { TOOLBAR_INFO *infoPtr = TOOLBAR_GetInfoPtr (hwnd); if (nType == GWL_STYLE) { if (lpStyle->styleNew & TBSTYLE_LIST) { infoPtr->dwDTFlags = DT_LEFT | DT_VCENTER | DT_SINGLELINE; } else { infoPtr->dwDTFlags = DT_CENTER; } } TOOLBAR_AutoSize (hwnd); InvalidateRect(hwnd, NULL, FALSE); return 0; } static LRESULT WINAPI ToolbarWindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { switch (uMsg) { case WM_DESTROY: return TOOLBAR_Destroy (hwnd, wParam, lParam); case WM_NCCREATE: return TOOLBAR_NCCreate (hwnd, wParam, lParam); } if (!TOOLBAR_GetInfoPtr (hwnd)) { return DefWindowProcA (hwnd, uMsg, wParam, lParam); } switch (uMsg) { case TB_ADDBITMAP: return TOOLBAR_AddBitmap (hwnd, wParam, lParam); case TB_ADDBUTTONSA: return TOOLBAR_AddButtonsA (hwnd, wParam, lParam); case TB_ADDBUTTONSW: return TOOLBAR_AddButtonsW (hwnd, wParam, lParam); case TB_ADDSTRINGA: return TOOLBAR_AddStringA (hwnd, wParam, lParam); case TB_ADDSTRINGW: return TOOLBAR_AddStringW (hwnd, wParam, lParam); case TB_AUTOSIZE: return TOOLBAR_AutoSize (hwnd); case TB_BUTTONCOUNT: return TOOLBAR_ButtonCount (hwnd, wParam, lParam); case TB_BUTTONSTRUCTSIZE: return TOOLBAR_ButtonStructSize (hwnd, wParam, lParam); case TB_CHANGEBITMAP: return TOOLBAR_ChangeBitmap (hwnd, wParam, lParam); case TB_CHECKBUTTON: return TOOLBAR_CheckButton (hwnd, wParam, lParam); case TB_COMMANDTOINDEX: return TOOLBAR_CommandToIndex (hwnd, wParam, lParam); case TB_CUSTOMIZE: return TOOLBAR_Customize (hwnd); case TB_DELETEBUTTON: return TOOLBAR_DeleteButton (hwnd, wParam, lParam); case TB_ENABLEBUTTON: return TOOLBAR_EnableButton (hwnd, wParam, lParam); case TB_GETANCHORHIGHLIGHT: return TOOLBAR_GetAnchorHighlight (hwnd); case TB_GETBITMAP: return TOOLBAR_GetBitmap (hwnd, wParam, lParam); case TB_GETBITMAPFLAGS: return TOOLBAR_GetBitmapFlags (hwnd, wParam, lParam); case TB_GETBUTTON: return TOOLBAR_GetButton (hwnd, wParam, lParam); case TB_GETBUTTONINFOA: return TOOLBAR_GetButtonInfoA (hwnd, wParam, lParam); case TB_GETBUTTONINFOW: return TOOLBAR_GetButtonInfoW (hwnd, wParam, lParam); case TB_GETBUTTONSIZE: return TOOLBAR_GetButtonSize (hwnd); case TB_GETBUTTONTEXTA: return TOOLBAR_GetButtonTextA (hwnd, wParam, lParam); case TB_GETBUTTONTEXTW: return TOOLBAR_GetButtonTextW (hwnd, wParam, lParam); /* case TB_GETCOLORSCHEME: */ /* 4.71 */ case TB_GETDISABLEDIMAGELIST: return TOOLBAR_GetDisabledImageList (hwnd, wParam, lParam); case TB_GETEXTENDEDSTYLE: return TOOLBAR_GetExtendedStyle (hwnd); case TB_GETHOTIMAGELIST: return TOOLBAR_GetHotImageList (hwnd, wParam, lParam); case TB_GETHOTITEM: return TOOLBAR_GetHotItem (hwnd); case TB_GETIMAGELIST: return TOOLBAR_GetImageList (hwnd, wParam, lParam); /* case TB_GETINSERTMARK: */ /* 4.71 */ /* case TB_GETINSERTMARKCOLOR: */ /* 4.71 */ case TB_GETITEMRECT: return TOOLBAR_GetItemRect (hwnd, wParam, lParam); case TB_GETMAXSIZE: return TOOLBAR_GetMaxSize (hwnd, wParam, lParam); /* case TB_GETOBJECT: */ /* 4.71 */ /* case TB_GETPADDING: */ /* 4.71 */ case TB_GETRECT: return TOOLBAR_GetRect (hwnd, wParam, lParam); case TB_GETROWS: return TOOLBAR_GetRows (hwnd, wParam, lParam); case TB_GETSTATE: return TOOLBAR_GetState (hwnd, wParam, lParam); case TB_GETSTYLE: return TOOLBAR_GetStyle (hwnd, wParam, lParam); case TB_GETTEXTROWS: return TOOLBAR_GetTextRows (hwnd, wParam, lParam); case TB_GETTOOLTIPS: return TOOLBAR_GetToolTips (hwnd, wParam, lParam); case TB_GETUNICODEFORMAT: return TOOLBAR_GetUnicodeFormat (hwnd, wParam, lParam); case CCM_GETVERSION: return TOOLBAR_GetVersion (hwnd); case TB_HIDEBUTTON: return TOOLBAR_HideButton (hwnd, wParam, lParam); case TB_HITTEST: return TOOLBAR_HitTest (hwnd, wParam, lParam); case TB_INDETERMINATE: return TOOLBAR_Indeterminate (hwnd, wParam, lParam); case TB_INSERTBUTTONA: return TOOLBAR_InsertButtonA (hwnd, wParam, lParam); case TB_INSERTBUTTONW: return TOOLBAR_InsertButtonW (hwnd, wParam, lParam); /* case TB_INSERTMARKHITTEST: */ /* 4.71 */ case TB_ISBUTTONCHECKED: return TOOLBAR_IsButtonChecked (hwnd, wParam, lParam); case TB_ISBUTTONENABLED: return TOOLBAR_IsButtonEnabled (hwnd, wParam, lParam); case TB_ISBUTTONHIDDEN: return TOOLBAR_IsButtonHidden (hwnd, wParam, lParam); case TB_ISBUTTONHIGHLIGHTED: return TOOLBAR_IsButtonHighlighted (hwnd, wParam, lParam); case TB_ISBUTTONINDETERMINATE: return TOOLBAR_IsButtonIndeterminate (hwnd, wParam, lParam); case TB_ISBUTTONPRESSED: return TOOLBAR_IsButtonPressed (hwnd, wParam, lParam); case TB_LOADIMAGES: /* 4.70 */ FIXME("missing standard imagelists\n"); return 0; /* case TB_MAPACCELERATORA: */ /* 4.71 */ /* case TB_MAPACCELERATORW: */ /* 4.71 */ /* case TB_MARKBUTTON: */ /* 4.71 */ /* case TB_MOVEBUTTON: */ /* 4.71 */ case TB_PRESSBUTTON: return TOOLBAR_PressButton (hwnd, wParam, lParam); /* case TB_REPLACEBITMAP: */ case TB_SAVERESTOREA: return TOOLBAR_SaveRestoreA (hwnd, wParam, lParam); case TB_SAVERESTOREW: return TOOLBAR_SaveRestoreW (hwnd, wParam, lParam); case TB_SETANCHORHIGHLIGHT: return TOOLBAR_SetAnchorHighlight (hwnd, wParam); case TB_SETBITMAPSIZE: return TOOLBAR_SetBitmapSize (hwnd, wParam, lParam); case TB_SETBUTTONINFOA: return TOOLBAR_SetButtonInfoA (hwnd, wParam, lParam); case TB_SETBUTTONINFOW: return TOOLBAR_SetButtonInfoW (hwnd, wParam, lParam); case TB_SETBUTTONSIZE: return TOOLBAR_SetButtonSize (hwnd, wParam, lParam); case TB_SETBUTTONWIDTH: return TOOLBAR_SetButtonWidth (hwnd, wParam, lParam); case TB_SETCMDID: return TOOLBAR_SetCmdId (hwnd, wParam, lParam); /* case TB_SETCOLORSCHEME: */ /* 4.71 */ case TB_SETDISABLEDIMAGELIST: return TOOLBAR_SetDisabledImageList (hwnd, wParam, lParam); case TB_SETDRAWTEXTFLAGS: return TOOLBAR_SetDrawTextFlags (hwnd, wParam, lParam); case TB_SETEXTENDEDSTYLE: return TOOLBAR_SetExtendedStyle (hwnd, wParam, lParam); case TB_SETHOTIMAGELIST: return TOOLBAR_SetHotImageList (hwnd, wParam, lParam); case TB_SETHOTITEM: return TOOLBAR_SetHotItem (hwnd, wParam); case TB_SETIMAGELIST: return TOOLBAR_SetImageList (hwnd, wParam, lParam); case TB_SETINDENT: return TOOLBAR_SetIndent (hwnd, wParam, lParam); /* case TB_SETINSERTMARK: */ /* 4.71 */ case TB_SETINSERTMARKCOLOR: return TOOLBAR_SetInsertMarkColor (hwnd, wParam, lParam); case TB_SETMAXTEXTROWS: return TOOLBAR_SetMaxTextRows (hwnd, wParam, lParam); /* case TB_SETPADDING: */ /* 4.71 */ case TB_SETPARENT: return TOOLBAR_SetParent (hwnd, wParam, lParam); case TB_SETROWS: return TOOLBAR_SetRows (hwnd, wParam, lParam); case TB_SETSTATE: return TOOLBAR_SetState (hwnd, wParam, lParam); case TB_SETSTYLE: return TOOLBAR_SetStyle (hwnd, wParam, lParam); case TB_SETTOOLTIPS: return TOOLBAR_SetToolTips (hwnd, wParam, lParam); case TB_SETUNICODEFORMAT: return TOOLBAR_SetUnicodeFormat (hwnd, wParam, lParam); case CCM_SETVERSION: return TOOLBAR_SetVersion (hwnd, (INT)wParam); /* case WM_CHAR: */ case WM_CREATE: return TOOLBAR_Create (hwnd, wParam, lParam); case WM_ERASEBKGND: return TOOLBAR_EraseBackground (hwnd, wParam, lParam); case WM_GETFONT: return TOOLBAR_GetFont (hwnd, wParam, lParam); /* case WM_KEYDOWN: */ /* case WM_KILLFOCUS: */ case WM_LBUTTONDBLCLK: return TOOLBAR_LButtonDblClk (hwnd, wParam, lParam); case WM_LBUTTONDOWN: return TOOLBAR_LButtonDown (hwnd, wParam, lParam); case WM_LBUTTONUP: return TOOLBAR_LButtonUp (hwnd, wParam, lParam); case WM_MOUSEMOVE: return TOOLBAR_MouseMove (hwnd, wParam, lParam); case WM_MOUSELEAVE: return TOOLBAR_MouseLeave (hwnd, wParam, lParam); case WM_NCACTIVATE: return TOOLBAR_NCActivate (hwnd, wParam, lParam); case WM_NCCALCSIZE: return TOOLBAR_NCCalcSize (hwnd, wParam, lParam); case WM_NCPAINT: return TOOLBAR_NCPaint (hwnd, wParam, lParam); case WM_NOTIFY: return TOOLBAR_Notify (hwnd, wParam, lParam); /* case WM_NOTIFYFORMAT: */ case WM_PAINT: return TOOLBAR_Paint (hwnd, wParam); case WM_SIZE: return TOOLBAR_Size (hwnd, wParam, lParam); case WM_STYLECHANGED: return TOOLBAR_StyleChanged (hwnd, (INT)wParam, (LPSTYLESTRUCT)lParam); /* case WM_SYSCOLORCHANGE: */ /* case WM_WININICHANGE: */ case WM_CHARTOITEM: case WM_COMMAND: case WM_DRAWITEM: case WM_MEASUREITEM: case WM_VKEYTOITEM: return SendMessageA (GetParent (hwnd), uMsg, wParam, lParam); default: if (uMsg >= WM_USER) ERR("unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); return DefWindowProcA (hwnd, uMsg, wParam, lParam); } return 0; } VOID TOOLBAR_Register (void) { WNDCLASSA wndClass; ZeroMemory (&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS | CS_DBLCLKS; wndClass.lpfnWndProc = (WNDPROC)ToolbarWindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(TOOLBAR_INFO *); wndClass.hCursor = LoadCursorA (0, IDC_ARROWA); wndClass.hbrBackground = (HBRUSH)(COLOR_3DFACE + 1); wndClass.lpszClassName = TOOLBARCLASSNAMEA; RegisterClassA (&wndClass); } VOID TOOLBAR_Unregister (void) { UnregisterClassA (TOOLBARCLASSNAMEA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/tooltips.c0100644000175000001440000017154407113350121017054 0ustar julliardusers/* * Tool tip control * * Copyright 1998, 1999 Eric Kohl * * TODO: * - Unicode support (started). * - Custom draw support. * * Testing: * - Run tests using Waite Group Windows95 API Bible Volume 2. * The second cdrom (chapter 3) contains executables activate.exe, * curtool.exe, deltool.exe, enumtools.exe, getinfo.exe, getiptxt.exe, * hittest.exe, needtext.exe, newrect.exe, updtext.exe and winfrpt.exe. */ #include #include "winbase.h" #include "commctrl.h" #include "tooltips.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(tooltips) #define ID_TIMERSHOW 1 /* show delay timer */ #define ID_TIMERPOP 2 /* auto pop timer */ #define ID_TIMERLEAVE 3 /* tool leave timer */ extern LPSTR COMCTL32_aSubclass; /* global subclassing atom */ /* property name of tooltip window handle */ /*#define TT_SUBCLASS_PROP "CC32SubclassInfo" */ #define TOOLTIPS_GetInfoPtr(hWindow) ((TOOLTIPS_INFO *)GetWindowLongA (hWindow, 0)) LRESULT CALLBACK TOOLTIPS_SubclassProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam); static VOID TOOLTIPS_Refresh (HWND hwnd, HDC hdc) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr(hwnd); RECT rc; INT oldBkMode; HFONT hOldFont; HBRUSH hBrush; UINT uFlags = DT_EXTERNALLEADING; if (infoPtr->nMaxTipWidth > -1) uFlags |= DT_WORDBREAK; if (GetWindowLongA (hwnd, GWL_STYLE) & TTS_NOPREFIX) uFlags |= DT_NOPREFIX; GetClientRect (hwnd, &rc); /* fill the background */ hBrush = CreateSolidBrush (infoPtr->clrBk); FillRect (hdc, &rc, hBrush); DeleteObject (hBrush); /* calculate text rectangle */ rc.left += (2 + infoPtr->rcMargin.left); rc.top += (2 + infoPtr->rcMargin.top); rc.right -= (2 + infoPtr->rcMargin.right); rc.bottom -= (2 + infoPtr->rcMargin.bottom); /* draw text */ oldBkMode = SetBkMode (hdc, TRANSPARENT); SetTextColor (hdc, infoPtr->clrText); hOldFont = SelectObject (hdc, infoPtr->hFont); DrawTextW (hdc, infoPtr->szTipText, -1, &rc, uFlags); SelectObject (hdc, hOldFont); if (oldBkMode != TRANSPARENT) SetBkMode (hdc, oldBkMode); } static VOID TOOLTIPS_GetTipText (HWND hwnd, TOOLTIPS_INFO *infoPtr, INT nTool) { TTTOOL_INFO *toolPtr = &infoPtr->tools[nTool]; if ((toolPtr->hinst) && (HIWORD((UINT)toolPtr->lpszText) == 0)) { /* load a resource */ TRACE("load res string %x %x\n", toolPtr->hinst, (int)toolPtr->lpszText); LoadStringW (toolPtr->hinst, (UINT)toolPtr->lpszText, infoPtr->szTipText, INFOTIPSIZE); } else if (toolPtr->lpszText) { if (toolPtr->lpszText == LPSTR_TEXTCALLBACKW) { NMTTDISPINFOA ttnmdi; /* fill NMHDR struct */ ZeroMemory (&ttnmdi, sizeof(NMTTDISPINFOA)); ttnmdi.hdr.hwndFrom = hwnd; ttnmdi.hdr.idFrom = toolPtr->uId; ttnmdi.hdr.code = TTN_GETDISPINFOA; ttnmdi.lpszText = (LPSTR)&ttnmdi.szText; ttnmdi.uFlags = toolPtr->uFlags; ttnmdi.lParam = toolPtr->lParam; TRACE("hdr.idFrom = %x\n", ttnmdi.hdr.idFrom); SendMessageA (toolPtr->hwnd, WM_NOTIFY, (WPARAM)toolPtr->uId, (LPARAM)&ttnmdi); if ((ttnmdi.hinst) && (HIWORD((UINT)ttnmdi.lpszText) == 0)) { LoadStringW (ttnmdi.hinst, (UINT)ttnmdi.lpszText, infoPtr->szTipText, INFOTIPSIZE); if (ttnmdi.uFlags & TTF_DI_SETITEM) { toolPtr->hinst = ttnmdi.hinst; toolPtr->lpszText = (LPWSTR)ttnmdi.lpszText; } } else if (ttnmdi.szText[0]) { lstrcpynAtoW (infoPtr->szTipText, ttnmdi.szText, 80); if (ttnmdi.uFlags & TTF_DI_SETITEM) { INT len = lstrlenA (ttnmdi.szText); toolPtr->hinst = 0; toolPtr->lpszText = COMCTL32_Alloc ((len+1)* sizeof(WCHAR)); lstrcpyAtoW (toolPtr->lpszText, ttnmdi.szText); } } else if (ttnmdi.lpszText == 0) { /* no text available */ infoPtr->szTipText[0] = L'\0'; } else if (ttnmdi.lpszText != LPSTR_TEXTCALLBACKA) { lstrcpynAtoW (infoPtr->szTipText, ttnmdi.lpszText, INFOTIPSIZE); if (ttnmdi.uFlags & TTF_DI_SETITEM) { INT len = lstrlenA (ttnmdi.lpszText); toolPtr->hinst = 0; toolPtr->lpszText = COMCTL32_Alloc ((len+1)*sizeof(WCHAR)); lstrcpyAtoW (toolPtr->lpszText, ttnmdi.lpszText); } } else { ERR("recursive text callback!\n"); infoPtr->szTipText[0] = '\0'; } } else { /* the item is a usual (unicode) text */ lstrcpynW (infoPtr->szTipText, toolPtr->lpszText, INFOTIPSIZE); } } else { /* no text available */ infoPtr->szTipText[0] = L'\0'; } TRACE("%s\n", debugstr_w(infoPtr->szTipText)); } static VOID TOOLTIPS_CalcTipSize (HWND hwnd, TOOLTIPS_INFO *infoPtr, LPSIZE lpSize) { HDC hdc; HFONT hOldFont; UINT uFlags = DT_EXTERNALLEADING | DT_CALCRECT; RECT rc = {0, 0, 0, 0}; if (infoPtr->nMaxTipWidth > -1) { rc.right = infoPtr->nMaxTipWidth; uFlags |= DT_WORDBREAK; } if (GetWindowLongA (hwnd, GWL_STYLE) & TTS_NOPREFIX) uFlags |= DT_NOPREFIX; TRACE("%s\n", debugstr_w(infoPtr->szTipText)); hdc = GetDC (hwnd); hOldFont = SelectObject (hdc, infoPtr->hFont); DrawTextW (hdc, infoPtr->szTipText, -1, &rc, uFlags); SelectObject (hdc, hOldFont); ReleaseDC (hwnd, hdc); lpSize->cx = rc.right - rc.left + 4 + infoPtr->rcMargin.left + infoPtr->rcMargin.right; lpSize->cy = rc.bottom - rc.top + 4 + infoPtr->rcMargin.bottom + infoPtr->rcMargin.top; } static VOID TOOLTIPS_Show (HWND hwnd, TOOLTIPS_INFO *infoPtr) { TTTOOL_INFO *toolPtr; RECT rect, wndrect; SIZE size; NMHDR hdr; if (infoPtr->nTool == -1) { TRACE("invalid tool (-1)!\n"); return; } infoPtr->nCurrentTool = infoPtr->nTool; TRACE("Show tooltip pre %d!\n", infoPtr->nTool); TOOLTIPS_GetTipText (hwnd, infoPtr, infoPtr->nCurrentTool); if (infoPtr->szTipText[0] == L'\0') { infoPtr->nCurrentTool = -1; return; } TRACE("Show tooltip %d!\n", infoPtr->nCurrentTool); toolPtr = &infoPtr->tools[infoPtr->nCurrentTool]; hdr.hwndFrom = hwnd; hdr.idFrom = toolPtr->uId; hdr.code = TTN_SHOW; SendMessageA (toolPtr->hwnd, WM_NOTIFY, (WPARAM)toolPtr->uId, (LPARAM)&hdr); TRACE("%s\n", debugstr_w(infoPtr->szTipText)); TOOLTIPS_CalcTipSize (hwnd, infoPtr, &size); TRACE("size %d - %d\n", size.cx, size.cy); if (toolPtr->uFlags & TTF_CENTERTIP) { RECT rc; if (toolPtr->uFlags & TTF_IDISHWND) GetWindowRect ((HWND)toolPtr->uId, &rc); else { rc = toolPtr->rect; MapWindowPoints (toolPtr->hwnd, (HWND)0, (LPPOINT)&rc, 2); } rect.left = (rc.left + rc.right - size.cx) / 2; rect.top = rc.bottom + 2; } else { GetCursorPos ((LPPOINT)&rect); rect.top += 20; } TRACE("pos %d - %d\n", rect.left, rect.top); rect.right = rect.left + size.cx; rect.bottom = rect.top + size.cy; /* check position */ wndrect.right = GetSystemMetrics( SM_CXSCREEN ); if( rect.right > wndrect.right ) { rect.left -= rect.right - wndrect.right + 2; rect.right = wndrect.right - 2; } wndrect.bottom = GetSystemMetrics( SM_CYSCREEN ); if( rect.bottom > wndrect.bottom ) { RECT rc; if (toolPtr->uFlags & TTF_IDISHWND) GetWindowRect ((HWND)toolPtr->uId, &rc); else { rc = toolPtr->rect; MapWindowPoints (toolPtr->hwnd, (HWND)0, (LPPOINT)&rc, 2); } rect.bottom = rc.top - 2; rect.top = rect.bottom - size.cy; } AdjustWindowRectEx (&rect, GetWindowLongA (hwnd, GWL_STYLE), FALSE, GetWindowLongA (hwnd, GWL_EXSTYLE)); SetWindowPos (hwnd, HWND_TOP, rect.left, rect.top, rect.right - rect.left, rect.bottom - rect.top, SWP_SHOWWINDOW | SWP_NOACTIVATE); /* repaint the tooltip */ InvalidateRect(hwnd, NULL, TRUE); UpdateWindow(hwnd); SetTimer (hwnd, ID_TIMERPOP, infoPtr->nAutoPopTime, 0); } static VOID TOOLTIPS_Hide (HWND hwnd, TOOLTIPS_INFO *infoPtr) { TTTOOL_INFO *toolPtr; NMHDR hdr; if (infoPtr->nCurrentTool == -1) return; toolPtr = &infoPtr->tools[infoPtr->nCurrentTool]; TRACE("Hide tooltip %d!\n", infoPtr->nCurrentTool); KillTimer (hwnd, ID_TIMERPOP); hdr.hwndFrom = hwnd; hdr.idFrom = toolPtr->uId; hdr.code = TTN_POP; SendMessageA (toolPtr->hwnd, WM_NOTIFY, (WPARAM)toolPtr->uId, (LPARAM)&hdr); infoPtr->nCurrentTool = -1; SetWindowPos (hwnd, HWND_TOP, 0, 0, 0, 0, SWP_NOZORDER | SWP_HIDEWINDOW | SWP_NOACTIVATE); } static VOID TOOLTIPS_TrackShow (HWND hwnd, TOOLTIPS_INFO *infoPtr) { TTTOOL_INFO *toolPtr; RECT rect; SIZE size; NMHDR hdr; if (infoPtr->nTrackTool == -1) { TRACE("invalid tracking tool (-1)!\n"); return; } TRACE("show tracking tooltip pre %d!\n", infoPtr->nTrackTool); TOOLTIPS_GetTipText (hwnd, infoPtr, infoPtr->nTrackTool); if (infoPtr->szTipText[0] == L'\0') { infoPtr->nTrackTool = -1; return; } TRACE("show tracking tooltip %d!\n", infoPtr->nTrackTool); toolPtr = &infoPtr->tools[infoPtr->nTrackTool]; hdr.hwndFrom = hwnd; hdr.idFrom = toolPtr->uId; hdr.code = TTN_SHOW; SendMessageA (toolPtr->hwnd, WM_NOTIFY, (WPARAM)toolPtr->uId, (LPARAM)&hdr); TRACE("%s\n", debugstr_w(infoPtr->szTipText)); TOOLTIPS_CalcTipSize (hwnd, infoPtr, &size); TRACE("size %d - %d\n", size.cx, size.cy); if (toolPtr->uFlags & TTF_ABSOLUTE) { rect.left = infoPtr->xTrackPos; rect.top = infoPtr->yTrackPos; if (toolPtr->uFlags & TTF_CENTERTIP) { rect.left -= (size.cx / 2); rect.top -= (size.cy / 2); } } else { RECT rcTool; if (toolPtr->uFlags & TTF_IDISHWND) GetWindowRect ((HWND)toolPtr->uId, &rcTool); else { rcTool = toolPtr->rect; MapWindowPoints (toolPtr->hwnd, (HWND)0, (LPPOINT)&rcTool, 2); } GetCursorPos ((LPPOINT)&rect); rect.top += 20; if (toolPtr->uFlags & TTF_CENTERTIP) { rect.left -= (size.cx / 2); rect.top -= (size.cy / 2); } /* smart placement */ if ((rect.left + size.cx > rcTool.left) && (rect.left < rcTool.right) && (rect.top + size.cy > rcTool.top) && (rect.top < rcTool.bottom)) rect.left = rcTool.right; } TRACE("pos %d - %d\n", rect.left, rect.top); rect.right = rect.left + size.cx; rect.bottom = rect.top + size.cy; AdjustWindowRectEx (&rect, GetWindowLongA (hwnd, GWL_STYLE), FALSE, GetWindowLongA (hwnd, GWL_EXSTYLE)); SetWindowPos (hwnd, HWND_TOP, rect.left, rect.top, rect.right - rect.left, rect.bottom - rect.top, SWP_SHOWWINDOW | SWP_NOACTIVATE ); InvalidateRect(hwnd, NULL, TRUE); UpdateWindow(hwnd); } static VOID TOOLTIPS_TrackHide (HWND hwnd, TOOLTIPS_INFO *infoPtr) { TTTOOL_INFO *toolPtr; NMHDR hdr; if (infoPtr->nTrackTool == -1) return; toolPtr = &infoPtr->tools[infoPtr->nTrackTool]; TRACE("hide tracking tooltip %d!\n", infoPtr->nTrackTool); hdr.hwndFrom = hwnd; hdr.idFrom = toolPtr->uId; hdr.code = TTN_POP; SendMessageA (toolPtr->hwnd, WM_NOTIFY, (WPARAM)toolPtr->uId, (LPARAM)&hdr); SetWindowPos (hwnd, HWND_TOP, 0, 0, 0, 0, SWP_NOZORDER | SWP_HIDEWINDOW | SWP_NOACTIVATE); } static INT TOOLTIPS_GetToolFromInfoA (TOOLTIPS_INFO *infoPtr, LPTTTOOLINFOA lpToolInfo) { TTTOOL_INFO *toolPtr; INT nTool; for (nTool = 0; nTool < infoPtr->uNumTools; nTool++) { toolPtr = &infoPtr->tools[nTool]; if (!(toolPtr->uFlags & TTF_IDISHWND) && (lpToolInfo->hwnd == toolPtr->hwnd) && (lpToolInfo->uId == toolPtr->uId)) return nTool; } for (nTool = 0; nTool < infoPtr->uNumTools; nTool++) { toolPtr = &infoPtr->tools[nTool]; if ((toolPtr->uFlags & TTF_IDISHWND) && (lpToolInfo->uId == toolPtr->uId)) return nTool; } return -1; } static INT TOOLTIPS_GetToolFromInfoW (TOOLTIPS_INFO *infoPtr, LPTTTOOLINFOW lpToolInfo) { TTTOOL_INFO *toolPtr; INT nTool; for (nTool = 0; nTool < infoPtr->uNumTools; nTool++) { toolPtr = &infoPtr->tools[nTool]; if (!(toolPtr->uFlags & TTF_IDISHWND) && (lpToolInfo->hwnd == toolPtr->hwnd) && (lpToolInfo->uId == toolPtr->uId)) return nTool; } for (nTool = 0; nTool < infoPtr->uNumTools; nTool++) { toolPtr = &infoPtr->tools[nTool]; if ((toolPtr->uFlags & TTF_IDISHWND) && (lpToolInfo->uId == toolPtr->uId)) return nTool; } return -1; } static INT TOOLTIPS_GetToolFromPoint (TOOLTIPS_INFO *infoPtr, HWND hwnd, LPPOINT lpPt) { TTTOOL_INFO *toolPtr; INT nTool; for (nTool = 0; nTool < infoPtr->uNumTools; nTool++) { toolPtr = &infoPtr->tools[nTool]; if (!(toolPtr->uFlags & TTF_IDISHWND)) { if (hwnd != toolPtr->hwnd) continue; if (!PtInRect (&toolPtr->rect, *lpPt)) continue; return nTool; } } for (nTool = 0; nTool < infoPtr->uNumTools; nTool++) { toolPtr = &infoPtr->tools[nTool]; if (toolPtr->uFlags & TTF_IDISHWND) { if ((HWND)toolPtr->uId == hwnd) return nTool; } } return -1; } static INT TOOLTIPS_GetToolFromMessage (TOOLTIPS_INFO *infoPtr, HWND hwndTool) { DWORD dwPos; POINT pt; dwPos = GetMessagePos (); pt.x = (INT)LOWORD(dwPos); pt.y = (INT)HIWORD(dwPos); ScreenToClient (hwndTool, &pt); return TOOLTIPS_GetToolFromPoint (infoPtr, hwndTool, &pt); } static BOOL TOOLTIPS_IsWindowActive (HWND hwnd) { HWND hwndActive = GetActiveWindow (); if (!hwndActive) return FALSE; if (hwndActive == hwnd) return TRUE; return IsChild (hwndActive, hwnd); } static INT TOOLTIPS_CheckTool (HWND hwnd, BOOL bShowTest) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); POINT pt; HWND hwndTool; INT nTool; GetCursorPos (&pt); hwndTool = SendMessageA (hwnd, TTM_WINDOWFROMPOINT, 0, (LPARAM)&pt); if (hwndTool == 0) return -1; ScreenToClient (hwndTool, &pt); nTool = TOOLTIPS_GetToolFromPoint (infoPtr, hwndTool, &pt); if (nTool == -1) return -1; if (!(GetWindowLongA (hwnd, GWL_STYLE) & TTS_ALWAYSTIP) && bShowTest) { if (!TOOLTIPS_IsWindowActive (GetWindow (hwnd, GW_OWNER))) return -1; } TRACE("tool %d\n", nTool); return nTool; } static LRESULT TOOLTIPS_Activate (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); infoPtr->bActive = (BOOL)wParam; if (infoPtr->bActive) TRACE("activate!\n"); if (!(infoPtr->bActive) && (infoPtr->nCurrentTool != -1)) TOOLTIPS_Hide (hwnd, infoPtr); return 0; } static LRESULT TOOLTIPS_AddToolA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOA lpToolInfo = (LPTTTOOLINFOA)lParam; TTTOOL_INFO *toolPtr; if (lpToolInfo == NULL) return FALSE; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEA) return FALSE; TRACE("add tool (%x) %x %d%s!\n", hwnd, lpToolInfo->hwnd, lpToolInfo->uId, (lpToolInfo->uFlags & TTF_IDISHWND) ? " TTF_IDISHWND" : ""); if (infoPtr->uNumTools == 0) { infoPtr->tools = COMCTL32_Alloc (sizeof(TTTOOL_INFO)); toolPtr = infoPtr->tools; } else { TTTOOL_INFO *oldTools = infoPtr->tools; infoPtr->tools = COMCTL32_Alloc (sizeof(TTTOOL_INFO) * (infoPtr->uNumTools + 1)); memcpy (infoPtr->tools, oldTools, infoPtr->uNumTools * sizeof(TTTOOL_INFO)); COMCTL32_Free (oldTools); toolPtr = &infoPtr->tools[infoPtr->uNumTools]; } infoPtr->uNumTools++; /* copy tool data */ toolPtr->uFlags = lpToolInfo->uFlags; toolPtr->hwnd = lpToolInfo->hwnd; toolPtr->uId = lpToolInfo->uId; toolPtr->rect = lpToolInfo->rect; toolPtr->hinst = lpToolInfo->hinst; if ((lpToolInfo->hinst) && (HIWORD((INT)lpToolInfo->lpszText) == 0)) { TRACE("add string id %x!\n", (int)lpToolInfo->lpszText); toolPtr->lpszText = (LPWSTR)lpToolInfo->lpszText; } else if (lpToolInfo->lpszText) { if (lpToolInfo->lpszText == LPSTR_TEXTCALLBACKA) { TRACE("add CALLBACK!\n"); toolPtr->lpszText = LPSTR_TEXTCALLBACKW; } else { INT len = lstrlenA (lpToolInfo->lpszText); TRACE("add text \"%s\"!\n", lpToolInfo->lpszText); toolPtr->lpszText = COMCTL32_Alloc ((len + 1)*sizeof(WCHAR)); lstrcpyAtoW (toolPtr->lpszText, lpToolInfo->lpszText); } } if (lpToolInfo->cbSize >= sizeof(TTTOOLINFOA)) toolPtr->lParam = lpToolInfo->lParam; /* install subclassing hook */ if (toolPtr->uFlags & TTF_SUBCLASS) { if (toolPtr->uFlags & TTF_IDISHWND) { LPTT_SUBCLASS_INFO lpttsi = (LPTT_SUBCLASS_INFO)GetPropA ((HWND)toolPtr->uId, COMCTL32_aSubclass); if (lpttsi == NULL) { lpttsi = (LPTT_SUBCLASS_INFO)COMCTL32_Alloc (sizeof(TT_SUBCLASS_INFO)); lpttsi->wpOrigProc = (WNDPROC)SetWindowLongA ((HWND)toolPtr->uId, GWL_WNDPROC,(LONG)TOOLTIPS_SubclassProc); lpttsi->hwndToolTip = hwnd; lpttsi->uRefCount++; SetPropA ((HWND)toolPtr->uId, COMCTL32_aSubclass, (HANDLE)lpttsi); } else WARN("A window tool must only be listed once!\n"); } else { LPTT_SUBCLASS_INFO lpttsi = (LPTT_SUBCLASS_INFO)GetPropA (toolPtr->hwnd, COMCTL32_aSubclass); if (lpttsi == NULL) { lpttsi = (LPTT_SUBCLASS_INFO)COMCTL32_Alloc (sizeof(TT_SUBCLASS_INFO)); lpttsi->wpOrigProc = (WNDPROC)SetWindowLongA (toolPtr->hwnd, GWL_WNDPROC,(LONG)TOOLTIPS_SubclassProc); lpttsi->hwndToolTip = hwnd; lpttsi->uRefCount++; SetPropA (toolPtr->hwnd, COMCTL32_aSubclass, (HANDLE)lpttsi); } else lpttsi->uRefCount++; } TRACE("subclassing installed!\n"); } return TRUE; } static LRESULT TOOLTIPS_AddToolW (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOW lpToolInfo = (LPTTTOOLINFOW)lParam; TTTOOL_INFO *toolPtr; if (lpToolInfo == NULL) return FALSE; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEW) return FALSE; TRACE("add tool (%x) %x %d%s!\n", hwnd, lpToolInfo->hwnd, lpToolInfo->uId, (lpToolInfo->uFlags & TTF_IDISHWND) ? " TTF_IDISHWND" : ""); if (infoPtr->uNumTools == 0) { infoPtr->tools = COMCTL32_Alloc (sizeof(TTTOOL_INFO)); toolPtr = infoPtr->tools; } else { TTTOOL_INFO *oldTools = infoPtr->tools; infoPtr->tools = COMCTL32_Alloc (sizeof(TTTOOL_INFO) * (infoPtr->uNumTools + 1)); memcpy (infoPtr->tools, oldTools, infoPtr->uNumTools * sizeof(TTTOOL_INFO)); COMCTL32_Free (oldTools); toolPtr = &infoPtr->tools[infoPtr->uNumTools]; } infoPtr->uNumTools++; /* copy tool data */ toolPtr->uFlags = lpToolInfo->uFlags; toolPtr->hwnd = lpToolInfo->hwnd; toolPtr->uId = lpToolInfo->uId; toolPtr->rect = lpToolInfo->rect; toolPtr->hinst = lpToolInfo->hinst; if ((lpToolInfo->hinst) && (HIWORD((INT)lpToolInfo->lpszText) == 0)) { TRACE("add string id %x!\n", (int)lpToolInfo->lpszText); toolPtr->lpszText = (LPWSTR)lpToolInfo->lpszText; } else if (lpToolInfo->lpszText) { if (lpToolInfo->lpszText == LPSTR_TEXTCALLBACKW) { TRACE("add CALLBACK!\n"); toolPtr->lpszText = LPSTR_TEXTCALLBACKW; } else { INT len = lstrlenW (lpToolInfo->lpszText); TRACE("add text %s!\n", debugstr_w(lpToolInfo->lpszText)); toolPtr->lpszText = COMCTL32_Alloc ((len + 1)*sizeof(WCHAR)); lstrcpyW (toolPtr->lpszText, lpToolInfo->lpszText); } } if (lpToolInfo->cbSize >= sizeof(TTTOOLINFOW)) toolPtr->lParam = lpToolInfo->lParam; /* install subclassing hook */ if (toolPtr->uFlags & TTF_SUBCLASS) { if (toolPtr->uFlags & TTF_IDISHWND) { LPTT_SUBCLASS_INFO lpttsi = (LPTT_SUBCLASS_INFO)GetPropA ((HWND)toolPtr->uId, COMCTL32_aSubclass); if (lpttsi == NULL) { lpttsi = (LPTT_SUBCLASS_INFO)COMCTL32_Alloc (sizeof(TT_SUBCLASS_INFO)); lpttsi->wpOrigProc = (WNDPROC)SetWindowLongA ((HWND)toolPtr->uId, GWL_WNDPROC,(LONG)TOOLTIPS_SubclassProc); lpttsi->hwndToolTip = hwnd; lpttsi->uRefCount++; SetPropA ((HWND)toolPtr->uId, COMCTL32_aSubclass, (HANDLE)lpttsi); } else WARN("A window tool must only be listed once!\n"); } else { LPTT_SUBCLASS_INFO lpttsi = (LPTT_SUBCLASS_INFO)GetPropA (toolPtr->hwnd, COMCTL32_aSubclass); if (lpttsi == NULL) { lpttsi = (LPTT_SUBCLASS_INFO)COMCTL32_Alloc (sizeof(TT_SUBCLASS_INFO)); lpttsi->wpOrigProc = (WNDPROC)SetWindowLongA (toolPtr->hwnd, GWL_WNDPROC,(LONG)TOOLTIPS_SubclassProc); lpttsi->hwndToolTip = hwnd; lpttsi->uRefCount++; SetPropA (toolPtr->hwnd, COMCTL32_aSubclass, (HANDLE)lpttsi); } else lpttsi->uRefCount++; } TRACE("subclassing installed!\n"); } return TRUE; } static LRESULT TOOLTIPS_DelToolA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOA lpToolInfo = (LPTTTOOLINFOA)lParam; TTTOOL_INFO *toolPtr; INT nTool; if (lpToolInfo == NULL) return 0; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEA) return 0; if (infoPtr->uNumTools == 0) return 0; nTool = TOOLTIPS_GetToolFromInfoA (infoPtr, lpToolInfo); if (nTool == -1) return 0; TRACE("tool %d\n", nTool); /* delete text string */ toolPtr = &infoPtr->tools[nTool]; if ((toolPtr->hinst) && (toolPtr->lpszText)) { if ( (toolPtr->lpszText != LPSTR_TEXTCALLBACKW) && (HIWORD((INT)toolPtr->lpszText) != 0) ) COMCTL32_Free (toolPtr->lpszText); } /* remove subclassing */ if (toolPtr->uFlags & TTF_SUBCLASS) { if (toolPtr->uFlags & TTF_IDISHWND) { LPTT_SUBCLASS_INFO lpttsi = (LPTT_SUBCLASS_INFO)GetPropA ((HWND)toolPtr->uId, COMCTL32_aSubclass); if (lpttsi) { SetWindowLongA ((HWND)toolPtr->uId, GWL_WNDPROC, (LONG)lpttsi->wpOrigProc); RemovePropA ((HWND)toolPtr->uId, COMCTL32_aSubclass); COMCTL32_Free (&lpttsi); } else ERR("Invalid data handle!\n"); } else { LPTT_SUBCLASS_INFO lpttsi = (LPTT_SUBCLASS_INFO)GetPropA (toolPtr->hwnd, COMCTL32_aSubclass); if (lpttsi) { if (lpttsi->uRefCount == 1) { SetWindowLongA ((HWND)toolPtr->uId, GWL_WNDPROC, (LONG)lpttsi->wpOrigProc); RemovePropA ((HWND)toolPtr->uId, COMCTL32_aSubclass); COMCTL32_Free (&lpttsi); } else lpttsi->uRefCount--; } else ERR("Invalid data handle!\n"); } } /* delete tool from tool list */ if (infoPtr->uNumTools == 1) { COMCTL32_Free (infoPtr->tools); infoPtr->tools = NULL; } else { TTTOOL_INFO *oldTools = infoPtr->tools; infoPtr->tools = COMCTL32_Alloc (sizeof(TTTOOL_INFO) * (infoPtr->uNumTools - 1)); if (nTool > 0) memcpy (&infoPtr->tools[0], &oldTools[0], nTool * sizeof(TTTOOL_INFO)); if (nTool < infoPtr->uNumTools - 1) memcpy (&infoPtr->tools[nTool], &oldTools[nTool + 1], (infoPtr->uNumTools - nTool - 1) * sizeof(TTTOOL_INFO)); COMCTL32_Free (oldTools); } infoPtr->uNumTools--; return 0; } static LRESULT TOOLTIPS_DelToolW (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOW lpToolInfo = (LPTTTOOLINFOW)lParam; TTTOOL_INFO *toolPtr; INT nTool; if (lpToolInfo == NULL) return 0; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEW) return 0; if (infoPtr->uNumTools == 0) return 0; nTool = TOOLTIPS_GetToolFromInfoW (infoPtr, lpToolInfo); if (nTool == -1) return 0; TRACE("tool %d\n", nTool); /* delete text string */ toolPtr = &infoPtr->tools[nTool]; if ((toolPtr->hinst) && (toolPtr->lpszText)) { if ( (toolPtr->lpszText != LPSTR_TEXTCALLBACKW) && (HIWORD((INT)toolPtr->lpszText) != 0) ) COMCTL32_Free (toolPtr->lpszText); } /* remove subclassing */ if (toolPtr->uFlags & TTF_SUBCLASS) { if (toolPtr->uFlags & TTF_IDISHWND) { LPTT_SUBCLASS_INFO lpttsi = (LPTT_SUBCLASS_INFO)GetPropA ((HWND)toolPtr->uId, COMCTL32_aSubclass); if (lpttsi) { SetWindowLongA ((HWND)toolPtr->uId, GWL_WNDPROC, (LONG)lpttsi->wpOrigProc); RemovePropA ((HWND)toolPtr->uId, COMCTL32_aSubclass); COMCTL32_Free (&lpttsi); } else ERR("Invalid data handle!\n"); } else { LPTT_SUBCLASS_INFO lpttsi = (LPTT_SUBCLASS_INFO)GetPropA (toolPtr->hwnd, COMCTL32_aSubclass); if (lpttsi) { if (lpttsi->uRefCount == 1) { SetWindowLongA ((HWND)toolPtr->uId, GWL_WNDPROC, (LONG)lpttsi->wpOrigProc); RemovePropA ((HWND)toolPtr->uId, COMCTL32_aSubclass); COMCTL32_Free (&lpttsi); } else lpttsi->uRefCount--; } else ERR("Invalid data handle!\n"); } } /* delete tool from tool list */ if (infoPtr->uNumTools == 1) { COMCTL32_Free (infoPtr->tools); infoPtr->tools = NULL; } else { TTTOOL_INFO *oldTools = infoPtr->tools; infoPtr->tools = COMCTL32_Alloc (sizeof(TTTOOL_INFO) * (infoPtr->uNumTools - 1)); if (nTool > 0) memcpy (&infoPtr->tools[0], &oldTools[0], nTool * sizeof(TTTOOL_INFO)); if (nTool < infoPtr->uNumTools - 1) memcpy (&infoPtr->tools[nTool], &oldTools[nTool + 1], (infoPtr->uNumTools - nTool - 1) * sizeof(TTTOOL_INFO)); COMCTL32_Free (oldTools); } infoPtr->uNumTools--; return 0; } static LRESULT TOOLTIPS_EnumToolsA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); UINT uIndex = (UINT)wParam; LPTTTOOLINFOA lpToolInfo = (LPTTTOOLINFOA)lParam; TTTOOL_INFO *toolPtr; if (lpToolInfo == NULL) return FALSE; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEA) return FALSE; if (uIndex >= infoPtr->uNumTools) return FALSE; TRACE("index=%u\n", uIndex); toolPtr = &infoPtr->tools[uIndex]; /* copy tool data */ lpToolInfo->uFlags = toolPtr->uFlags; lpToolInfo->hwnd = toolPtr->hwnd; lpToolInfo->uId = toolPtr->uId; lpToolInfo->rect = toolPtr->rect; lpToolInfo->hinst = toolPtr->hinst; /* lpToolInfo->lpszText = toolPtr->lpszText; */ lpToolInfo->lpszText = NULL; /* FIXME */ if (lpToolInfo->cbSize >= sizeof(TTTOOLINFOA)) lpToolInfo->lParam = toolPtr->lParam; return TRUE; } static LRESULT TOOLTIPS_EnumToolsW (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); UINT uIndex = (UINT)wParam; LPTTTOOLINFOW lpToolInfo = (LPTTTOOLINFOW)lParam; TTTOOL_INFO *toolPtr; if (lpToolInfo == NULL) return FALSE; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEW) return FALSE; if (uIndex >= infoPtr->uNumTools) return FALSE; TRACE("index=%u\n", uIndex); toolPtr = &infoPtr->tools[uIndex]; /* copy tool data */ lpToolInfo->uFlags = toolPtr->uFlags; lpToolInfo->hwnd = toolPtr->hwnd; lpToolInfo->uId = toolPtr->uId; lpToolInfo->rect = toolPtr->rect; lpToolInfo->hinst = toolPtr->hinst; /* lpToolInfo->lpszText = toolPtr->lpszText; */ lpToolInfo->lpszText = NULL; /* FIXME */ if (lpToolInfo->cbSize >= sizeof(TTTOOLINFOW)) lpToolInfo->lParam = toolPtr->lParam; return TRUE; } static LRESULT TOOLTIPS_GetCurrentToolA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOA lpToolInfo = (LPTTTOOLINFOA)lParam; TTTOOL_INFO *toolPtr; if (lpToolInfo == NULL) return FALSE; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEA) return FALSE; if (lpToolInfo) { if (infoPtr->nCurrentTool > -1) { toolPtr = &infoPtr->tools[infoPtr->nCurrentTool]; /* copy tool data */ lpToolInfo->uFlags = toolPtr->uFlags; lpToolInfo->rect = toolPtr->rect; lpToolInfo->hinst = toolPtr->hinst; /* lpToolInfo->lpszText = toolPtr->lpszText; */ lpToolInfo->lpszText = NULL; /* FIXME */ if (lpToolInfo->cbSize >= sizeof(TTTOOLINFOA)) lpToolInfo->lParam = toolPtr->lParam; return TRUE; } else return FALSE; } else return (infoPtr->nCurrentTool != -1); return FALSE; } static LRESULT TOOLTIPS_GetCurrentToolW (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOW lpToolInfo = (LPTTTOOLINFOW)lParam; TTTOOL_INFO *toolPtr; if (lpToolInfo == NULL) return FALSE; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEW) return FALSE; if (lpToolInfo) { if (infoPtr->nCurrentTool > -1) { toolPtr = &infoPtr->tools[infoPtr->nCurrentTool]; /* copy tool data */ lpToolInfo->uFlags = toolPtr->uFlags; lpToolInfo->rect = toolPtr->rect; lpToolInfo->hinst = toolPtr->hinst; /* lpToolInfo->lpszText = toolPtr->lpszText; */ lpToolInfo->lpszText = NULL; /* FIXME */ if (lpToolInfo->cbSize >= sizeof(TTTOOLINFOW)) lpToolInfo->lParam = toolPtr->lParam; return TRUE; } else return FALSE; } else return (infoPtr->nCurrentTool != -1); return FALSE; } static LRESULT TOOLTIPS_GetDelayTime (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); switch (wParam) { case TTDT_AUTOMATIC: return infoPtr->nAutomaticTime; case TTDT_RESHOW: return infoPtr->nReshowTime; case TTDT_AUTOPOP: return infoPtr->nAutoPopTime; case TTDT_INITIAL: return infoPtr->nInitialTime; } return 0; } static LRESULT TOOLTIPS_GetMargin (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPRECT lpRect = (LPRECT)lParam; lpRect->left = infoPtr->rcMargin.left; lpRect->right = infoPtr->rcMargin.right; lpRect->bottom = infoPtr->rcMargin.bottom; lpRect->top = infoPtr->rcMargin.top; return 0; } inline static LRESULT TOOLTIPS_GetMaxTipWidth (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); return infoPtr->nMaxTipWidth; } static LRESULT TOOLTIPS_GetTextA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOA lpToolInfo = (LPTTTOOLINFOA)lParam; INT nTool; if (lpToolInfo == NULL) return 0; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEA) return 0; nTool = TOOLTIPS_GetToolFromInfoA (infoPtr, lpToolInfo); if (nTool == -1) return 0; lstrcpyWtoA (lpToolInfo->lpszText, infoPtr->tools[nTool].lpszText); return 0; } static LRESULT TOOLTIPS_GetTextW (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOW lpToolInfo = (LPTTTOOLINFOW)lParam; INT nTool; if (lpToolInfo == NULL) return 0; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEW) return 0; nTool = TOOLTIPS_GetToolFromInfoW (infoPtr, lpToolInfo); if (nTool == -1) return 0; lstrcpyW (lpToolInfo->lpszText, infoPtr->tools[nTool].lpszText); return 0; } inline static LRESULT TOOLTIPS_GetTipBkColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); return infoPtr->clrBk; } inline static LRESULT TOOLTIPS_GetTipTextColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); return infoPtr->clrText; } inline static LRESULT TOOLTIPS_GetToolCount (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); return infoPtr->uNumTools; } static LRESULT TOOLTIPS_GetToolInfoA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOA lpToolInfo = (LPTTTOOLINFOA)lParam; TTTOOL_INFO *toolPtr; INT nTool; if (lpToolInfo == NULL) return FALSE; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEA) return FALSE; if (infoPtr->uNumTools == 0) return FALSE; nTool = TOOLTIPS_GetToolFromInfoA (infoPtr, lpToolInfo); if (nTool == -1) return FALSE; TRACE("tool %d\n", nTool); toolPtr = &infoPtr->tools[nTool]; /* copy tool data */ lpToolInfo->uFlags = toolPtr->uFlags; lpToolInfo->rect = toolPtr->rect; lpToolInfo->hinst = toolPtr->hinst; /* lpToolInfo->lpszText = toolPtr->lpszText; */ lpToolInfo->lpszText = NULL; /* FIXME */ if (lpToolInfo->cbSize >= sizeof(TTTOOLINFOA)) lpToolInfo->lParam = toolPtr->lParam; return TRUE; } static LRESULT TOOLTIPS_GetToolInfoW (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOW lpToolInfo = (LPTTTOOLINFOW)lParam; TTTOOL_INFO *toolPtr; INT nTool; if (lpToolInfo == NULL) return FALSE; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEW) return FALSE; if (infoPtr->uNumTools == 0) return FALSE; nTool = TOOLTIPS_GetToolFromInfoW (infoPtr, lpToolInfo); if (nTool == -1) return FALSE; TRACE("tool %d\n", nTool); toolPtr = &infoPtr->tools[nTool]; /* copy tool data */ lpToolInfo->uFlags = toolPtr->uFlags; lpToolInfo->rect = toolPtr->rect; lpToolInfo->hinst = toolPtr->hinst; /* lpToolInfo->lpszText = toolPtr->lpszText; */ lpToolInfo->lpszText = NULL; /* FIXME */ if (lpToolInfo->cbSize >= sizeof(TTTOOLINFOW)) lpToolInfo->lParam = toolPtr->lParam; return TRUE; } static LRESULT TOOLTIPS_HitTestA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTHITTESTINFOA lptthit = (LPTTHITTESTINFOA)lParam; TTTOOL_INFO *toolPtr; INT nTool; if (lptthit == 0) return FALSE; nTool = TOOLTIPS_GetToolFromPoint (infoPtr, lptthit->hwnd, &lptthit->pt); if (nTool == -1) return FALSE; TRACE("tool %d!\n", nTool); /* copy tool data */ if (lptthit->ti.cbSize >= sizeof(TTTOOLINFOA)) { toolPtr = &infoPtr->tools[nTool]; lptthit->ti.uFlags = toolPtr->uFlags; lptthit->ti.hwnd = toolPtr->hwnd; lptthit->ti.uId = toolPtr->uId; lptthit->ti.rect = toolPtr->rect; lptthit->ti.hinst = toolPtr->hinst; /* lptthit->ti.lpszText = toolPtr->lpszText; */ lptthit->ti.lpszText = NULL; /* FIXME */ lptthit->ti.lParam = toolPtr->lParam; } return TRUE; } static LRESULT TOOLTIPS_HitTestW (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTHITTESTINFOW lptthit = (LPTTHITTESTINFOW)lParam; TTTOOL_INFO *toolPtr; INT nTool; if (lptthit == 0) return FALSE; nTool = TOOLTIPS_GetToolFromPoint (infoPtr, lptthit->hwnd, &lptthit->pt); if (nTool == -1) return FALSE; TRACE("tool %d!\n", nTool); /* copy tool data */ if (lptthit->ti.cbSize >= sizeof(TTTOOLINFOW)) { toolPtr = &infoPtr->tools[nTool]; lptthit->ti.uFlags = toolPtr->uFlags; lptthit->ti.hwnd = toolPtr->hwnd; lptthit->ti.uId = toolPtr->uId; lptthit->ti.rect = toolPtr->rect; lptthit->ti.hinst = toolPtr->hinst; /* lptthit->ti.lpszText = toolPtr->lpszText; */ lptthit->ti.lpszText = NULL; /* FIXME */ lptthit->ti.lParam = toolPtr->lParam; } return TRUE; } static LRESULT TOOLTIPS_NewToolRectA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOA lpti = (LPTTTOOLINFOA)lParam; INT nTool; if (lpti == NULL) return 0; if (lpti->cbSize < TTTOOLINFO_V1_SIZEA) return FALSE; nTool = TOOLTIPS_GetToolFromInfoA (infoPtr, lpti); if (nTool == -1) return 0; infoPtr->tools[nTool].rect = lpti->rect; return 0; } static LRESULT TOOLTIPS_NewToolRectW (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOW lpti = (LPTTTOOLINFOW)lParam; INT nTool; if (lpti == NULL) return 0; if (lpti->cbSize < TTTOOLINFO_V1_SIZEW) return FALSE; nTool = TOOLTIPS_GetToolFromInfoW (infoPtr, lpti); if (nTool == -1) return 0; infoPtr->tools[nTool].rect = lpti->rect; return 0; } inline static LRESULT TOOLTIPS_Pop (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); /* * Need to set nCurrentTool to nOldTool so we hide the tool. * nTool and nOldTool values change when the mouse leaves the window. * If using TTM_UPDATETIPTEXT we can end up with an nCurrentTool = -1 if the * text can't be found, thus the tooltip would never be hidden. */ if (infoPtr->nTool != infoPtr->nOldTool) infoPtr->nCurrentTool = infoPtr->nOldTool; TOOLTIPS_Hide (hwnd, infoPtr); return 0; } static LRESULT TOOLTIPS_RelayEvent (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPMSG lpMsg = (LPMSG)lParam; POINT pt; if (lParam == 0) { ERR("lpMsg == NULL!\n"); return 0; } switch (lpMsg->message) { case WM_LBUTTONDOWN: case WM_LBUTTONUP: case WM_MBUTTONDOWN: case WM_MBUTTONUP: case WM_RBUTTONDOWN: case WM_RBUTTONUP: pt = lpMsg->pt; ScreenToClient (lpMsg->hwnd, &pt); infoPtr->nOldTool = infoPtr->nTool; infoPtr->nTool = TOOLTIPS_GetToolFromPoint (infoPtr, lpMsg->hwnd, &pt); TRACE("tool (%x) %d %d\n", hwnd, infoPtr->nOldTool, infoPtr->nTool); TOOLTIPS_Hide (hwnd, infoPtr); break; case WM_MOUSEMOVE: pt = lpMsg->pt; ScreenToClient (lpMsg->hwnd, &pt); infoPtr->nOldTool = infoPtr->nTool; infoPtr->nTool = TOOLTIPS_GetToolFromPoint (infoPtr, lpMsg->hwnd, &pt); TRACE("tool (%x) %d %d\n", hwnd, infoPtr->nOldTool, infoPtr->nTool); TRACE("WM_MOUSEMOVE (%04x %ld %ld)\n", hwnd, pt.x, pt.y); if ((infoPtr->bActive) && (infoPtr->nTool != infoPtr->nOldTool)) { if (infoPtr->nOldTool == -1) { SetTimer (hwnd, ID_TIMERSHOW, infoPtr->nInitialTime, 0); TRACE("timer 1 started!\n"); } else { /* * Need to set nCurrentTool to nOldTool so we hide the tool. * nTool and nOldTool values change when the mouse leaves the window. * If using TTM_UPDATETIPTEXT we can end up with an nCurrentTool = -1 if the * text can't be found, thus the tooltip would never be hidden. */ if (infoPtr->nTool != infoPtr->nOldTool) infoPtr->nCurrentTool = infoPtr->nOldTool; TOOLTIPS_Hide (hwnd, infoPtr); SetTimer (hwnd, ID_TIMERSHOW, infoPtr->nReshowTime, 0); TRACE("timer 2 started!\n"); } } if (infoPtr->nCurrentTool != -1) { SetTimer (hwnd, ID_TIMERLEAVE, 100, 0); TRACE("timer 3 started!\n"); } break; } return 0; } static LRESULT TOOLTIPS_SetDelayTime (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); INT nTime = (INT)LOWORD(lParam); switch (wParam) { case TTDT_AUTOMATIC: if (nTime == 0) { infoPtr->nAutomaticTime = 500; infoPtr->nReshowTime = 100; infoPtr->nAutoPopTime = 5000; infoPtr->nInitialTime = 500; } else { infoPtr->nAutomaticTime = nTime; infoPtr->nReshowTime = nTime / 5; infoPtr->nAutoPopTime = nTime * 10; infoPtr->nInitialTime = nTime; } break; case TTDT_RESHOW: infoPtr->nReshowTime = nTime; break; case TTDT_AUTOPOP: infoPtr->nAutoPopTime = nTime; break; case TTDT_INITIAL: infoPtr->nInitialTime = nTime; break; } return 0; } static LRESULT TOOLTIPS_SetMargin (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPRECT lpRect = (LPRECT)lParam; infoPtr->rcMargin.left = lpRect->left; infoPtr->rcMargin.right = lpRect->right; infoPtr->rcMargin.bottom = lpRect->bottom; infoPtr->rcMargin.top = lpRect->top; return 0; } inline static LRESULT TOOLTIPS_SetMaxTipWidth (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); INT nTemp = infoPtr->nMaxTipWidth; infoPtr->nMaxTipWidth = (INT)lParam; return nTemp; } inline static LRESULT TOOLTIPS_SetTipBkColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); infoPtr->clrBk = (COLORREF)wParam; return 0; } inline static LRESULT TOOLTIPS_SetTipTextColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); infoPtr->clrText = (COLORREF)wParam; return 0; } static LRESULT TOOLTIPS_SetToolInfoA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOA lpToolInfo = (LPTTTOOLINFOA)lParam; TTTOOL_INFO *toolPtr; INT nTool; if (lpToolInfo == NULL) return 0; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEA) return 0; nTool = TOOLTIPS_GetToolFromInfoA (infoPtr, lpToolInfo); if (nTool == -1) return 0; TRACE("tool %d\n", nTool); toolPtr = &infoPtr->tools[nTool]; /* copy tool data */ toolPtr->uFlags = lpToolInfo->uFlags; toolPtr->hwnd = lpToolInfo->hwnd; toolPtr->uId = lpToolInfo->uId; toolPtr->rect = lpToolInfo->rect; toolPtr->hinst = lpToolInfo->hinst; if ((lpToolInfo->hinst) && (HIWORD((INT)lpToolInfo->lpszText) == 0)) { TRACE("set string id %x!\n", (INT)lpToolInfo->lpszText); toolPtr->lpszText = (LPWSTR)lpToolInfo->lpszText; } else if (lpToolInfo->lpszText) { if (lpToolInfo->lpszText == LPSTR_TEXTCALLBACKA) toolPtr->lpszText = LPSTR_TEXTCALLBACKW; else { if ( (toolPtr->lpszText) && (HIWORD((INT)toolPtr->lpszText) != 0) ) { COMCTL32_Free (toolPtr->lpszText); toolPtr->lpszText = NULL; } if (lpToolInfo->lpszText) { INT len = lstrlenA (lpToolInfo->lpszText); toolPtr->lpszText = COMCTL32_Alloc ((len+1)*sizeof(WCHAR)); lstrcpyAtoW (toolPtr->lpszText, lpToolInfo->lpszText); } } } if (lpToolInfo->cbSize >= sizeof(TTTOOLINFOA)) toolPtr->lParam = lpToolInfo->lParam; return 0; } static LRESULT TOOLTIPS_SetToolInfoW (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOW lpToolInfo = (LPTTTOOLINFOW)lParam; TTTOOL_INFO *toolPtr; INT nTool; if (lpToolInfo == NULL) return 0; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEW) return 0; nTool = TOOLTIPS_GetToolFromInfoW (infoPtr, lpToolInfo); if (nTool == -1) return 0; TRACE("tool %d\n", nTool); toolPtr = &infoPtr->tools[nTool]; /* copy tool data */ toolPtr->uFlags = lpToolInfo->uFlags; toolPtr->hwnd = lpToolInfo->hwnd; toolPtr->uId = lpToolInfo->uId; toolPtr->rect = lpToolInfo->rect; toolPtr->hinst = lpToolInfo->hinst; if ((lpToolInfo->hinst) && (HIWORD((INT)lpToolInfo->lpszText) == 0)) { TRACE("set string id %x!\n", (INT)lpToolInfo->lpszText); toolPtr->lpszText = lpToolInfo->lpszText; } else if (lpToolInfo->lpszText) { if (lpToolInfo->lpszText == LPSTR_TEXTCALLBACKW) toolPtr->lpszText = LPSTR_TEXTCALLBACKW; else { if ( (toolPtr->lpszText) && (HIWORD((INT)toolPtr->lpszText) != 0) ) { COMCTL32_Free (toolPtr->lpszText); toolPtr->lpszText = NULL; } if (lpToolInfo->lpszText) { INT len = lstrlenW (lpToolInfo->lpszText); toolPtr->lpszText = COMCTL32_Alloc ((len+1)*sizeof(WCHAR)); lstrcpyW (toolPtr->lpszText, lpToolInfo->lpszText); } } } if (lpToolInfo->cbSize >= sizeof(TTTOOLINFOW)) toolPtr->lParam = lpToolInfo->lParam; return 0; } static LRESULT TOOLTIPS_TrackActivate (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOA lpToolInfo = (LPTTTOOLINFOA)lParam; if (lpToolInfo == NULL) return 0; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEA) return FALSE; if ((BOOL)wParam) { /* activate */ infoPtr->nTrackTool = TOOLTIPS_GetToolFromInfoA (infoPtr, lpToolInfo); if (infoPtr->nTrackTool != -1) { TRACE("activated!\n"); infoPtr->bTrackActive = TRUE; TOOLTIPS_TrackShow (hwnd, infoPtr); } } else { /* deactivate */ TOOLTIPS_TrackHide (hwnd, infoPtr); infoPtr->bTrackActive = FALSE; infoPtr->nTrackTool = -1; TRACE("deactivated!\n"); } return 0; } static LRESULT TOOLTIPS_TrackPosition (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); infoPtr->xTrackPos = (INT)LOWORD(lParam); infoPtr->yTrackPos = (INT)HIWORD(lParam); if (infoPtr->bTrackActive) { TRACE("[%d %d]\n", infoPtr->xTrackPos, infoPtr->yTrackPos); TOOLTIPS_TrackShow (hwnd, infoPtr); } return 0; } static LRESULT TOOLTIPS_Update (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); if (infoPtr->nCurrentTool != -1) UpdateWindow (hwnd); return 0; } static LRESULT TOOLTIPS_UpdateTipTextA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOA lpToolInfo = (LPTTTOOLINFOA)lParam; TTTOOL_INFO *toolPtr; INT nTool; if (lpToolInfo == NULL) return 0; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEA) return FALSE; nTool = TOOLTIPS_GetToolFromInfoA (infoPtr, lpToolInfo); if (nTool == -1) return 0; TRACE("tool %d\n", nTool); toolPtr = &infoPtr->tools[nTool]; /* copy tool text */ toolPtr->hinst = lpToolInfo->hinst; if ((lpToolInfo->hinst) && (HIWORD((INT)lpToolInfo->lpszText) == 0)){ toolPtr->lpszText = (LPWSTR)lpToolInfo->lpszText; } else if (lpToolInfo->lpszText) { if (lpToolInfo->lpszText == LPSTR_TEXTCALLBACKA) toolPtr->lpszText = LPSTR_TEXTCALLBACKW; else { if ( (toolPtr->lpszText) && (HIWORD((INT)toolPtr->lpszText) != 0) ) { COMCTL32_Free (toolPtr->lpszText); toolPtr->lpszText = NULL; } if (lpToolInfo->lpszText) { INT len = lstrlenA (lpToolInfo->lpszText); toolPtr->lpszText = COMCTL32_Alloc ((len+1)*sizeof(WCHAR)); lstrcpyAtoW (toolPtr->lpszText, lpToolInfo->lpszText); } } } /* force repaint */ if (infoPtr->bActive) TOOLTIPS_Show (hwnd, infoPtr); else if (infoPtr->bTrackActive) TOOLTIPS_TrackShow (hwnd, infoPtr); return 0; } static LRESULT TOOLTIPS_UpdateTipTextW (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); LPTTTOOLINFOW lpToolInfo = (LPTTTOOLINFOW)lParam; TTTOOL_INFO *toolPtr; INT nTool; if (lpToolInfo == NULL) return 0; if (lpToolInfo->cbSize < TTTOOLINFO_V1_SIZEW) return FALSE; nTool = TOOLTIPS_GetToolFromInfoW (infoPtr, lpToolInfo); if (nTool == -1) return 0; TRACE("tool %d\n", nTool); toolPtr = &infoPtr->tools[nTool]; /* copy tool text */ toolPtr->hinst = lpToolInfo->hinst; if ((lpToolInfo->hinst) && (HIWORD((INT)lpToolInfo->lpszText) == 0)){ toolPtr->lpszText = lpToolInfo->lpszText; } else if (lpToolInfo->lpszText) { if (lpToolInfo->lpszText == LPSTR_TEXTCALLBACKW) toolPtr->lpszText = LPSTR_TEXTCALLBACKW; else { if ( (toolPtr->lpszText) && (HIWORD((INT)toolPtr->lpszText) != 0) ) { COMCTL32_Free (toolPtr->lpszText); toolPtr->lpszText = NULL; } if (lpToolInfo->lpszText) { INT len = lstrlenW (lpToolInfo->lpszText); toolPtr->lpszText = COMCTL32_Alloc ((len+1)*sizeof(WCHAR)); lstrcpyW (toolPtr->lpszText, lpToolInfo->lpszText); } } } /* force repaint */ if (infoPtr->bActive) TOOLTIPS_Show (hwnd, infoPtr); else if (infoPtr->bTrackActive) TOOLTIPS_TrackShow (hwnd, infoPtr); return 0; } static LRESULT TOOLTIPS_WindowFromPoint (HWND hwnd, WPARAM wParam, LPARAM lParam) { return WindowFromPoint (*((LPPOINT)lParam)); } static LRESULT TOOLTIPS_Create (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr; NONCLIENTMETRICSA nclm; INT nResult; /* allocate memory for info structure */ infoPtr = (TOOLTIPS_INFO *)COMCTL32_Alloc (sizeof(TOOLTIPS_INFO)); SetWindowLongA (hwnd, 0, (DWORD)infoPtr); /* initialize info structure */ infoPtr->bActive = TRUE; infoPtr->bTrackActive = FALSE; infoPtr->clrBk = GetSysColor (COLOR_INFOBK); infoPtr->clrText = GetSysColor (COLOR_INFOTEXT); nclm.cbSize = sizeof(NONCLIENTMETRICSA); SystemParametersInfoA (SPI_GETNONCLIENTMETRICS, 0, &nclm, 0); infoPtr->hFont = CreateFontIndirectA (&nclm.lfStatusFont); infoPtr->nMaxTipWidth = -1; infoPtr->nTool = -1; infoPtr->nOldTool = -1; infoPtr->nCurrentTool = -1; infoPtr->nTrackTool = -1; infoPtr->nAutomaticTime = 500; infoPtr->nReshowTime = 100; infoPtr->nAutoPopTime = 5000; infoPtr->nInitialTime = 500; nResult = (INT) SendMessageA (GetParent (hwnd), WM_NOTIFYFORMAT, (WPARAM)hwnd, (LPARAM)NF_QUERY); if (nResult == NFR_ANSI) { infoPtr->bNotifyUnicode = FALSE; TRACE(" -- WM_NOTIFYFORMAT returns: NFR_ANSI\n"); } else if (nResult == NFR_UNICODE) { infoPtr->bNotifyUnicode = TRUE; TRACE(" -- WM_NOTIFYFORMAT returns: NFR_UNICODE\n"); } else { ERR (" -- WM_NOTIFYFORMAT returns: error!\n"); } SetWindowPos (hwnd, HWND_TOP, 0, 0, 0, 0, SWP_NOZORDER | SWP_HIDEWINDOW | SWP_NOACTIVATE); return 0; } static LRESULT TOOLTIPS_Destroy (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); TTTOOL_INFO *toolPtr; INT i; /* free tools */ if (infoPtr->tools) { for (i = 0; i < infoPtr->uNumTools; i++) { toolPtr = &infoPtr->tools[i]; if ((toolPtr->hinst) && (toolPtr->lpszText)) { if ( (toolPtr->lpszText != LPSTR_TEXTCALLBACKW) && (HIWORD((INT)toolPtr->lpszText) != 0) ) { COMCTL32_Free (toolPtr->lpszText); toolPtr->lpszText = NULL; } } /* remove subclassing */ if (toolPtr->uFlags & TTF_SUBCLASS) { LPTT_SUBCLASS_INFO lpttsi; if (toolPtr->uFlags & TTF_IDISHWND) lpttsi = (LPTT_SUBCLASS_INFO)GetPropA ((HWND)toolPtr->uId, COMCTL32_aSubclass); else lpttsi = (LPTT_SUBCLASS_INFO)GetPropA (toolPtr->hwnd, COMCTL32_aSubclass); if (lpttsi) { SetWindowLongA ((HWND)toolPtr->uId, GWL_WNDPROC, (LONG)lpttsi->wpOrigProc); RemovePropA ((HWND)toolPtr->uId, COMCTL32_aSubclass); COMCTL32_Free (&lpttsi); } } } COMCTL32_Free (infoPtr->tools); } /* delete font */ DeleteObject (infoPtr->hFont); /* free tool tips info data */ COMCTL32_Free (infoPtr); SetWindowLongA(hwnd, 0, 0); return 0; } static LRESULT TOOLTIPS_EraseBackground (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); RECT rect; HBRUSH hBrush; hBrush = CreateSolidBrush (infoPtr->clrBk); GetClientRect (hwnd, &rect); FillRect ((HDC)wParam, &rect, hBrush); DeleteObject (hBrush); return FALSE; } static LRESULT TOOLTIPS_GetFont (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); return infoPtr->hFont; } static LRESULT TOOLTIPS_MouseMessage (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); TOOLTIPS_Hide (hwnd, infoPtr); return 0; } static LRESULT TOOLTIPS_NCCreate (HWND hwnd, WPARAM wParam, LPARAM lParam) { DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); dwStyle &= 0x0000FFFF; dwStyle |= (WS_POPUP | WS_BORDER | WS_CLIPSIBLINGS); SetWindowLongA (hwnd, GWL_STYLE, dwStyle); return TRUE; } static LRESULT TOOLTIPS_NCHitTest (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); INT nTool = (infoPtr->bTrackActive) ? infoPtr->nTrackTool : infoPtr->nTool; TRACE(" nTool=%d\n", nTool); if ((nTool > -1) && (nTool < infoPtr->uNumTools)) { if (infoPtr->tools[nTool].uFlags & TTF_TRANSPARENT) { TRACE("-- in transparent mode!\n"); return HTTRANSPARENT; } } return DefWindowProcA (hwnd, WM_NCHITTEST, wParam, lParam); } static LRESULT TOOLTIPS_NotifyFormat (HWND hwnd, WPARAM wParam, LPARAM lParam) { FIXME ("hwnd=%x wParam=%x lParam=%lx\n", hwnd, wParam, lParam); return 0; } static LRESULT TOOLTIPS_Paint (HWND hwnd, WPARAM wParam, LPARAM lParam) { HDC hdc; PAINTSTRUCT ps; hdc = (wParam == 0) ? BeginPaint (hwnd, &ps) : (HDC)wParam; TOOLTIPS_Refresh (hwnd, hdc); if (!wParam) EndPaint (hwnd, &ps); return 0; } static LRESULT TOOLTIPS_SetFont (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); infoPtr->hFont = (HFONT)wParam; if ((LOWORD(lParam)) & (infoPtr->nCurrentTool != -1)) { FIXME("full redraw needed!\n"); } return 0; } /****************************************************************** * TOOLTIPS_OnWMGetTextLength * * This function is called when the tooltip receive a * WM_GETTEXTLENGTH message. * wParam : not used * lParam : not used * * returns the length, in characters, of the tip text ******************************************************************/ static LRESULT TOOLTIPS_OnWMGetTextLength(HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); return lstrlenW(infoPtr->szTipText); } /****************************************************************** * TOOLTIPS_OnWMGetText * * This function is called when the tooltip receive a * WM_GETTEXT message. * wParam : specifies the maximum number of characters to be copied * lParam : is the pointer to the buffer that will receive * the tip text * * returns the number of characters copied ******************************************************************/ static LRESULT TOOLTIPS_OnWMGetText (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); INT length; if(!infoPtr || !(infoPtr->szTipText)) return 0; length = lstrlenW(infoPtr->szTipText); /* When wParam is smaller than the lenght of the tip text copy wParam characters of the tip text and return wParam */ if(wParam < length) { lstrcpynWtoA((LPSTR)lParam, infoPtr->szTipText,(UINT)wParam); return wParam; } lstrcpyWtoA((LPSTR)lParam, infoPtr->szTipText); return length; } static LRESULT TOOLTIPS_Timer (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); TRACE("timer %d (%x) expired!\n", wParam, hwnd); switch (wParam) { case ID_TIMERSHOW: KillTimer (hwnd, ID_TIMERSHOW); if (TOOLTIPS_CheckTool (hwnd, TRUE) == infoPtr->nTool) TOOLTIPS_Show (hwnd, infoPtr); break; case ID_TIMERPOP: TOOLTIPS_Hide (hwnd, infoPtr); break; case ID_TIMERLEAVE: KillTimer (hwnd, ID_TIMERLEAVE); if (TOOLTIPS_CheckTool (hwnd, FALSE) == -1) { infoPtr->nTool = -1; infoPtr->nOldTool = -1; TOOLTIPS_Hide (hwnd, infoPtr); } break; } return 0; } static LRESULT TOOLTIPS_WinIniChange (HWND hwnd, WPARAM wParam, LPARAM lParam) { TOOLTIPS_INFO *infoPtr = TOOLTIPS_GetInfoPtr (hwnd); NONCLIENTMETRICSA nclm; infoPtr->clrBk = GetSysColor (COLOR_INFOBK); infoPtr->clrText = GetSysColor (COLOR_INFOTEXT); DeleteObject (infoPtr->hFont); nclm.cbSize = sizeof(NONCLIENTMETRICSA); SystemParametersInfoA (SPI_GETNONCLIENTMETRICS, 0, &nclm, 0); infoPtr->hFont = CreateFontIndirectA (&nclm.lfStatusFont); return 0; } LRESULT CALLBACK TOOLTIPS_SubclassProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { LPTT_SUBCLASS_INFO lpttsi = (LPTT_SUBCLASS_INFO)GetPropA (hwnd, COMCTL32_aSubclass); TOOLTIPS_INFO *infoPtr; UINT nTool; switch (uMsg) { case WM_LBUTTONDOWN: case WM_LBUTTONUP: case WM_MBUTTONDOWN: case WM_MBUTTONUP: case WM_RBUTTONDOWN: case WM_RBUTTONUP: infoPtr = TOOLTIPS_GetInfoPtr(lpttsi->hwndToolTip); if (!infoPtr) break; nTool = TOOLTIPS_GetToolFromMessage (infoPtr, hwnd); TRACE("subclassed mouse message %04x\n", uMsg); infoPtr->nOldTool = infoPtr->nTool; infoPtr->nTool = nTool; TOOLTIPS_Hide (lpttsi->hwndToolTip, infoPtr); break; case WM_MOUSEMOVE: infoPtr = TOOLTIPS_GetInfoPtr (lpttsi->hwndToolTip); if (!infoPtr) break; nTool = TOOLTIPS_GetToolFromMessage (infoPtr, hwnd); TRACE("subclassed WM_MOUSEMOVE\n"); infoPtr->nOldTool = infoPtr->nTool; infoPtr->nTool = nTool; if ((infoPtr->bActive) && (infoPtr->nTool != infoPtr->nOldTool)) { if (infoPtr->nOldTool == -1) { SetTimer (hwnd, ID_TIMERSHOW, infoPtr->nInitialTime, 0); TRACE("timer 1 started!\n"); } else { TOOLTIPS_Hide (lpttsi->hwndToolTip, infoPtr); SetTimer (hwnd, ID_TIMERSHOW, infoPtr->nReshowTime, 0); TRACE("timer 2 started!\n"); } } if (infoPtr->nCurrentTool != -1) { SetTimer (hwnd, ID_TIMERLEAVE, 100, 0); TRACE("timer 3 started!\n"); } break; } return CallWindowProcA (lpttsi->wpOrigProc, hwnd, uMsg, wParam, lParam); } static LRESULT CALLBACK TOOLTIPS_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TRACE("hwnd=%x msg=%x wparam=%x lParam=%lx\n", hwnd, uMsg, wParam, lParam); if (!TOOLTIPS_GetInfoPtr(hwnd) && (uMsg != WM_CREATE) && (uMsg != WM_NCCREATE)) return DefWindowProcA (hwnd, uMsg, wParam, lParam); switch (uMsg) { case TTM_ACTIVATE: return TOOLTIPS_Activate (hwnd, wParam, lParam); case TTM_ADDTOOLA: return TOOLTIPS_AddToolA (hwnd, wParam, lParam); case TTM_ADDTOOLW: return TOOLTIPS_AddToolW (hwnd, wParam, lParam); case TTM_DELTOOLA: return TOOLTIPS_DelToolA (hwnd, wParam, lParam); case TTM_DELTOOLW: return TOOLTIPS_DelToolW (hwnd, wParam, lParam); case TTM_ENUMTOOLSA: return TOOLTIPS_EnumToolsA (hwnd, wParam, lParam); case TTM_ENUMTOOLSW: return TOOLTIPS_EnumToolsW (hwnd, wParam, lParam); case TTM_GETCURRENTTOOLA: return TOOLTIPS_GetCurrentToolA (hwnd, wParam, lParam); case TTM_GETCURRENTTOOLW: return TOOLTIPS_GetCurrentToolW (hwnd, wParam, lParam); case TTM_GETDELAYTIME: return TOOLTIPS_GetDelayTime (hwnd, wParam, lParam); case TTM_GETMARGIN: return TOOLTIPS_GetMargin (hwnd, wParam, lParam); case TTM_GETMAXTIPWIDTH: return TOOLTIPS_GetMaxTipWidth (hwnd, wParam, lParam); case TTM_GETTEXTA: return TOOLTIPS_GetTextA (hwnd, wParam, lParam); case TTM_GETTEXTW: return TOOLTIPS_GetTextW (hwnd, wParam, lParam); case TTM_GETTIPBKCOLOR: return TOOLTIPS_GetTipBkColor (hwnd, wParam, lParam); case TTM_GETTIPTEXTCOLOR: return TOOLTIPS_GetTipTextColor (hwnd, wParam, lParam); case TTM_GETTOOLCOUNT: return TOOLTIPS_GetToolCount (hwnd, wParam, lParam); case TTM_GETTOOLINFOA: return TOOLTIPS_GetToolInfoA (hwnd, wParam, lParam); case TTM_GETTOOLINFOW: return TOOLTIPS_GetToolInfoW (hwnd, wParam, lParam); case TTM_HITTESTA: return TOOLTIPS_HitTestA (hwnd, wParam, lParam); case TTM_HITTESTW: return TOOLTIPS_HitTestW (hwnd, wParam, lParam); case TTM_NEWTOOLRECTA: return TOOLTIPS_NewToolRectA (hwnd, wParam, lParam); case TTM_NEWTOOLRECTW: return TOOLTIPS_NewToolRectW (hwnd, wParam, lParam); case TTM_POP: return TOOLTIPS_Pop (hwnd, wParam, lParam); case TTM_RELAYEVENT: return TOOLTIPS_RelayEvent (hwnd, wParam, lParam); case TTM_SETDELAYTIME: return TOOLTIPS_SetDelayTime (hwnd, wParam, lParam); case TTM_SETMARGIN: return TOOLTIPS_SetMargin (hwnd, wParam, lParam); case TTM_SETMAXTIPWIDTH: return TOOLTIPS_SetMaxTipWidth (hwnd, wParam, lParam); case TTM_SETTIPBKCOLOR: return TOOLTIPS_SetTipBkColor (hwnd, wParam, lParam); case TTM_SETTIPTEXTCOLOR: return TOOLTIPS_SetTipTextColor (hwnd, wParam, lParam); case TTM_SETTOOLINFOA: return TOOLTIPS_SetToolInfoA (hwnd, wParam, lParam); case TTM_SETTOOLINFOW: return TOOLTIPS_SetToolInfoW (hwnd, wParam, lParam); case TTM_TRACKACTIVATE: return TOOLTIPS_TrackActivate (hwnd, wParam, lParam); case TTM_TRACKPOSITION: return TOOLTIPS_TrackPosition (hwnd, wParam, lParam); case TTM_UPDATE: return TOOLTIPS_Update (hwnd, wParam, lParam); case TTM_UPDATETIPTEXTA: return TOOLTIPS_UpdateTipTextA (hwnd, wParam, lParam); case TTM_UPDATETIPTEXTW: return TOOLTIPS_UpdateTipTextW (hwnd, wParam, lParam); case TTM_WINDOWFROMPOINT: return TOOLTIPS_WindowFromPoint (hwnd, wParam, lParam); case WM_CREATE: return TOOLTIPS_Create (hwnd, wParam, lParam); case WM_DESTROY: return TOOLTIPS_Destroy (hwnd, wParam, lParam); case WM_ERASEBKGND: return TOOLTIPS_EraseBackground (hwnd, wParam, lParam); case WM_GETFONT: return TOOLTIPS_GetFont (hwnd, wParam, lParam); case WM_GETTEXT: return TOOLTIPS_OnWMGetText (hwnd, wParam, lParam); case WM_GETTEXTLENGTH: return TOOLTIPS_OnWMGetTextLength (hwnd, wParam, lParam); case WM_LBUTTONDOWN: case WM_LBUTTONUP: case WM_MBUTTONDOWN: case WM_MBUTTONUP: case WM_RBUTTONDOWN: case WM_RBUTTONUP: case WM_MOUSEMOVE: return TOOLTIPS_MouseMessage (hwnd, uMsg, wParam, lParam); case WM_NCCREATE: return TOOLTIPS_NCCreate (hwnd, wParam, lParam); case WM_NCHITTEST: return TOOLTIPS_NCHitTest (hwnd, wParam, lParam); case WM_NOTIFYFORMAT: return TOOLTIPS_NotifyFormat (hwnd, wParam, lParam); case WM_PAINT: return TOOLTIPS_Paint (hwnd, wParam, lParam); case WM_SETFONT: return TOOLTIPS_SetFont (hwnd, wParam, lParam); case WM_TIMER: return TOOLTIPS_Timer (hwnd, wParam, lParam); case WM_WININICHANGE: return TOOLTIPS_WinIniChange (hwnd, wParam, lParam); default: if (uMsg >= WM_USER) ERR("unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); return DefWindowProcA (hwnd, uMsg, wParam, lParam); } return 0; } VOID TOOLTIPS_Register (void) { WNDCLASSA wndClass; ZeroMemory (&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS | CS_DBLCLKS | CS_SAVEBITS; wndClass.lpfnWndProc = (WNDPROC)TOOLTIPS_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(TOOLTIPS_INFO *); wndClass.hCursor = LoadCursorA (0, IDC_ARROWA); wndClass.hbrBackground = 0; wndClass.lpszClassName = TOOLTIPS_CLASSA; RegisterClassA (&wndClass); } VOID TOOLTIPS_Unregister (void) { UnregisterClassA (TOOLTIPS_CLASSA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/trackbar.c0100644000175000001440000013120407113330372016763 0ustar julliardusers/* * Trackbar control * * Copyright 1998, 1999 Eric Kohl * Copyright 1998,1999 Alex Priem * * * TODO: * - Some messages. * - handle dragging slider better * - better tic handling. * - more notifications. * */ /* known bugs: -TBM_SETRANGEMAX & TBM_SETRANGEMIN should only change the view of the trackbar, not the actual amount of tics in the list. -TBM_GETTIC & TBM_GETTICPOS shouldn't rely on infoPtr->tics being sorted. */ #include #include "winbase.h" #include "commctrl.h" #include "trackbar.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(trackbar); #define TRACKBAR_GetInfoPtr(wndPtr) ((TRACKBAR_INFO *)GetWindowLongA (hwnd,0)) /* Used by TRACKBAR_Refresh to find out which parts of the control need to be recalculated */ #define TB_THUMBPOSCHANGED 1 #define TB_THUMBSIZECHANGED 2 #define TB_THUMBCHANGED (TB_THUMBPOSCHANGED | TB_THUMBPOSCHANGED) #define TB_SELECTIONCHANGED 4 #define TB_DRAG_MODE 16 /* we're dragging the slider */ #define TB_DRAGPOSVALID 32 /* current Position is in dragPos */ #define TB_SHOW_TOOLTIP 64 /* tooltip-style enabled and tooltip on */ /* helper defines for TRACKBAR_DrawTic */ #define TIC_LEFTEDGE 0x20 #define TIC_RIGHTEDGE 0x40 #define TIC_EDGE (TIC_LEFTEDGE | TIC_RIGHTEDGE) #define TIC_SELECTIONMARKMAX 0x80 #define TIC_SELECTIONMARKMIN 0x100 #define TIC_SELECTIONMARK (TIC_SELECTIONMARKMAX | TIC_SELECTIONMARKMIN) static BOOL TRACKBAR_SendNotify (HWND hwnd, UINT code); static void TRACKBAR_RecalculateTics (TRACKBAR_INFO *infoPtr) { int i,tic,nrTics; if (infoPtr->uTicFreq && infoPtr->nRangeMax >= infoPtr->nRangeMin) nrTics=(infoPtr->nRangeMax - infoPtr->nRangeMin)/infoPtr->uTicFreq; else { nrTics=0; COMCTL32_Free (infoPtr->tics); infoPtr->tics=NULL; infoPtr->uNumTics=0; return; } if (nrTics!=infoPtr->uNumTics) { infoPtr->tics=COMCTL32_ReAlloc (infoPtr->tics, (nrTics+1)*sizeof (DWORD)); infoPtr->uNumTics=nrTics; } infoPtr->uNumTics=nrTics; tic=infoPtr->nRangeMin+infoPtr->uTicFreq; for (i=0; iuTicFreq) infoPtr->tics[i]=tic; } /* converts from physical (mouse) position to logical position (in range of trackbar) */ static inline DOUBLE TRACKBAR_ConvertPlaceToPosition (TRACKBAR_INFO *infoPtr, int place, int vertical) { double range,width,pos; range=infoPtr->nRangeMax - infoPtr->nRangeMin; if (vertical) { width=infoPtr->rcChannel.bottom - infoPtr->rcChannel.top; pos=(range*(place - infoPtr->rcChannel.top)) / width; } else { width=infoPtr->rcChannel.right - infoPtr->rcChannel.left; pos=(range*(place - infoPtr->rcChannel.left)) / width; } pos+=infoPtr->nRangeMin; if (pos > infoPtr->nRangeMax) pos = infoPtr->nRangeMax; else if (pos < infoPtr->nRangeMin) pos = infoPtr->nRangeMin; TRACE("%.2f\n",pos); return pos; } static VOID TRACKBAR_CalcChannel (HWND hwnd, TRACKBAR_INFO *infoPtr) { DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); INT cyChannel,offsettop,offsetedge; RECT lpRect,*channel = & infoPtr->rcChannel; GetClientRect (hwnd, &lpRect); if (dwStyle & TBS_ENABLESELRANGE) cyChannel = ((int)(infoPtr->uThumbLen/4.5)+1)*3; else cyChannel = 4; offsettop = (int)(infoPtr->uThumbLen/4.5); offsetedge = (int)(infoPtr->uThumbLen/4.5) + 3; if (dwStyle & TBS_VERT) { channel->top = lpRect.top + offsetedge; channel->bottom = lpRect.bottom - offsetedge; if (dwStyle & (TBS_BOTH | TBS_LEFT)) { channel->left = lpRect.left + offsettop + 8 ; channel->right = channel->left + cyChannel; } else { /* TBS_RIGHT */ channel->left = lpRect.left + offsettop; channel->right = channel->left + cyChannel; } } else { channel->left = lpRect.left + offsetedge; channel->right = lpRect.right - offsetedge; if (dwStyle & (TBS_BOTH|TBS_TOP)) { channel->top = lpRect.top + offsettop + 8 ; channel->bottom = channel->top + cyChannel; } else { /* TBS_BOTTOM */ channel->top = lpRect.top + offsettop; channel->bottom = channel->top + cyChannel; } } } static VOID TRACKBAR_CalcThumb (HWND hwnd, TRACKBAR_INFO *infoPtr) { RECT *thumb; int range, width, thumbdepth; DWORD dwStyle = GetWindowLongA(hwnd,GWL_STYLE); thumb=&infoPtr->rcThumb; range=infoPtr->nRangeMax - infoPtr->nRangeMin; thumbdepth = ((INT)((FLOAT)infoPtr->uThumbLen / 4.5) * 2) + 2; if (!range) return; /* FIXME: may this happen? */ if (dwStyle & TBS_VERT) { width=infoPtr->rcChannel.bottom - infoPtr->rcChannel.top; if (dwStyle & (TBS_BOTH | TBS_LEFT)) thumb->left = 10; else thumb-> left =2; thumb->right = thumb -> left + infoPtr->uThumbLen; thumb->top = infoPtr->rcChannel.top + (width*infoPtr->nPos)/range - thumbdepth/2; thumb->bottom = thumb->top + thumbdepth; } else { width=infoPtr->rcChannel.right - infoPtr->rcChannel.left; thumb->left = infoPtr->rcChannel.left + (width*infoPtr->nPos)/range - thumbdepth/2; thumb->right = thumb->left + thumbdepth; if (dwStyle & (TBS_BOTH | TBS_TOP)) thumb->top = 10; else thumb->top = 2; thumb->bottom = thumb -> top + infoPtr->uThumbLen; } } static VOID TRACKBAR_CalcSelection (HWND hwnd, TRACKBAR_INFO *infoPtr) { RECT *selection; int range, width; selection= & infoPtr->rcSelection; range=infoPtr->nRangeMax - infoPtr->nRangeMin; width=infoPtr->rcChannel.right - infoPtr->rcChannel.left; if (range <= 0) SetRectEmpty (selection); else if (GetWindowLongA (hwnd, GWL_STYLE) & TBS_VERT) { selection->left = infoPtr->rcChannel.left + (width*infoPtr->nSelMin)/range; selection->right = infoPtr->rcChannel.left + (width*infoPtr->nSelMax)/range; selection->top = infoPtr->rcChannel.top + 2; selection->bottom = infoPtr->rcChannel.bottom - 2; } else { selection->top = infoPtr->rcChannel.top + (width*infoPtr->nSelMin)/range; selection->bottom = infoPtr->rcChannel.top + (width*infoPtr->nSelMax)/range; selection->left = infoPtr->rcChannel.left + 2; selection->right = infoPtr->rcChannel.right - 2; } } /* Trackbar drawing code. I like my spaghetti done milanese. */ /* ticPos is in tic-units, not in pixels */ static VOID TRACKBAR_DrawHorizTic (TRACKBAR_INFO *infoPtr, HDC hdc, LONG ticPos, int flags, COLORREF clrTic) { RECT rcChannel=infoPtr->rcChannel; int x,y,width,range,side; range=infoPtr->nRangeMax - infoPtr->nRangeMin; width=rcChannel.right - rcChannel.left; if (flags & TBS_TOP) { y=rcChannel.top-2; side=-1; } else { y=rcChannel.bottom+2; side=1; } if (flags & TIC_SELECTIONMARK) { if (flags & TIC_SELECTIONMARKMIN) x=rcChannel.left + (width*ticPos)/range - 1; else x=rcChannel.left + (width*ticPos)/range + 1; SetPixel (hdc, x,y+6*side, clrTic); SetPixel (hdc, x,y+7*side, clrTic); return; } if ((ticPos>infoPtr->nRangeMin) && (ticPosnRangeMax)) { x=rcChannel.left + (width*ticPos)/range; SetPixel (hdc, x,y+5*side, clrTic); SetPixel (hdc, x,y+6*side, clrTic); SetPixel (hdc, x,y+7*side, clrTic); } if (flags & TIC_EDGE) { if (flags & TIC_LEFTEDGE) x=rcChannel.left; else x=rcChannel.right; SetPixel (hdc, x,y+5*side, clrTic); SetPixel (hdc, x,y+6*side, clrTic); SetPixel (hdc, x,y+7*side, clrTic); SetPixel (hdc, x,y+8*side, clrTic); } } static VOID TRACKBAR_DrawVertTic (TRACKBAR_INFO *infoPtr, HDC hdc, LONG ticPos, int flags, COLORREF clrTic) { RECT rcChannel=infoPtr->rcChannel; int x,y,width,range,side; range=infoPtr->nRangeMax - infoPtr->nRangeMin; width=rcChannel.bottom - rcChannel.top; if (flags & TBS_TOP) { x=rcChannel.left-2; side=-1; } else { x=rcChannel.right+2; side=1; } if (flags & TIC_SELECTIONMARK) { if (flags & TIC_SELECTIONMARKMIN) y=rcChannel.top + (width*ticPos)/range - 1; else y=rcChannel.top + (width*ticPos)/range + 1; SetPixel (hdc, x+6*side, y, clrTic); SetPixel (hdc, x+7*side, y, clrTic); return; } if ((ticPos>infoPtr->nRangeMin) && (ticPosnRangeMax)) { y=rcChannel.top + (width*ticPos)/range; SetPixel (hdc, x+5*side, y, clrTic); SetPixel (hdc, x+6*side, y, clrTic); SetPixel (hdc, x+7*side, y, clrTic); } if (flags & TIC_EDGE) { if (flags & TIC_LEFTEDGE) y=rcChannel.top; else y=rcChannel.bottom; SetPixel (hdc, x+5*side, y, clrTic); SetPixel (hdc, x+6*side, y, clrTic); SetPixel (hdc, x+7*side, y, clrTic); SetPixel (hdc, x+8*side, y, clrTic); } } static VOID TRACKBAR_DrawTics (TRACKBAR_INFO *infoPtr, HDC hdc, LONG ticPos, int flags, COLORREF clrTic) { if (flags & TBS_VERT) { if ((flags & TBS_TOP) || (flags & TBS_BOTH)) TRACKBAR_DrawVertTic (infoPtr, hdc, ticPos, flags | TBS_TOP , clrTic); if (!(flags & TBS_TOP) || (flags & TBS_BOTH)) TRACKBAR_DrawVertTic (infoPtr, hdc, ticPos, flags, clrTic); return; } if ((flags & TBS_TOP) || (flags & TBS_BOTH)) TRACKBAR_DrawHorizTic (infoPtr, hdc, ticPos, flags | TBS_TOP , clrTic); if (!(flags & TBS_TOP) || (flags & TBS_BOTH)) TRACKBAR_DrawHorizTic (infoPtr, hdc, ticPos, flags, clrTic); } static VOID TRACKBAR_DrawThumb(TRACKBAR_INFO *infoPtr, HDC hdc, DWORD dwStyle) { HBRUSH oldbr,hbr = GetSysColorBrush(COLOR_BTNFACE); HPEN oldpen=(HPEN)NULL,hpn; RECT thumb = infoPtr->rcThumb; int BlackUntil=3; int PointCount=6; POINT points[6]; static INT PointDepth = 4; oldbr = SelectObject (hdc, hbr); SetPolyFillMode (hdc,WINDING); if (dwStyle & TBS_BOTH) { points[0].x=thumb.right; points[0].y=thumb.top; points[1].x=thumb.right; points[1].y=thumb.bottom; points[2].x=thumb.left; points[2].y=thumb.bottom; points[3].x=thumb.left; points[3].y=thumb.top; points[4].x=points[0].x; points[4].y=points[0].y; PointCount = 5; BlackUntil = 3; } else { if (dwStyle & TBS_VERT) { if (dwStyle & TBS_LEFT) { points[0].x=thumb.right; points[0].y=thumb.top; points[1].x=thumb.right; points[1].y=thumb.bottom; points[2].x=thumb.left + PointDepth; points[2].y=thumb.bottom; points[3].x=thumb.left; points[3].y=(thumb.bottom - thumb.top) / 2 + thumb.top; points[4].x=thumb.left + PointDepth; points[4].y=thumb.top; points[5].x=points[0].x; points[5].y=points[0].y; BlackUntil = 4; } else { points[0].x=thumb.right; points[0].y=(thumb.bottom - thumb.top) / 2 + thumb.top; points[1].x=thumb.right - PointDepth; points[1].y=thumb.bottom; points[2].x=thumb.left; points[2].y=thumb.bottom; points[3].x=thumb.left; points[3].y=thumb.top; points[4].x=thumb.right - PointDepth; points[4].y=thumb.top; points[5].x=points[0].x; points[5].y=points[0].y; } } else { if (dwStyle & TBS_TOP) { points[0].x=(thumb.right - thumb.left) / 2 + thumb.left ; points[0].y=thumb.top; points[1].x=thumb.right; points[1].y=thumb.top + PointDepth; points[2].x=thumb.right; points[2].y=thumb.bottom; points[3].x=thumb.left; points[3].y=thumb.bottom; points[4].x=thumb.left; points[4].y=thumb.top + PointDepth; points[5].x=points[0].x; points[5].y=points[0].y; BlackUntil = 4; } else { points[0].x=thumb.right; points[0].y=thumb.top; points[1].x=thumb.right; points[1].y=thumb.bottom - PointDepth; points[2].x=(thumb.right - thumb.left) / 2 + thumb.left ; points[2].y=thumb.bottom; points[3].x=thumb.left; points[3].y=thumb.bottom - PointDepth; points[4].x=thumb.left; points[4].y=thumb.top; points[5].x=points[0].x; points[5].y=points[0].y; } } } /* * Fill the shape */ Polygon (hdc, points, PointCount); /* * Draw the edge */ hpn = GetStockObject(BLACK_PEN); oldpen = SelectObject(hdc,hpn); /* * Black part */ Polyline(hdc,points,BlackUntil); SelectObject(hdc,oldpen); hpn = GetStockObject(WHITE_PEN); SelectObject(hdc,hpn); /* * White Part */ Polyline(hdc,&points[BlackUntil-1],PointCount+1-BlackUntil); /* * restore the brush and pen */ SelectObject(hdc,oldbr); if (oldpen) SelectObject(hdc,oldpen); } static VOID TRACKBAR_Refresh (HWND hwnd, HDC hdc) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); RECT rcClient, rcChannel, rcSelection; HBRUSH hBrush; int i; GetClientRect (hwnd, &rcClient); hBrush = CreateSolidBrush (infoPtr->clrBk); FillRect (hdc, &rcClient, hBrush); DeleteObject (hBrush); if (infoPtr->flags & TB_DRAGPOSVALID) { infoPtr->nPos=infoPtr->dragPos; infoPtr->flags |= TB_THUMBPOSCHANGED; } if (infoPtr->flags & TB_THUMBCHANGED) { TRACKBAR_CalcThumb (hwnd, infoPtr); if (infoPtr->flags & TB_THUMBSIZECHANGED) TRACKBAR_CalcChannel (hwnd, infoPtr); } if (infoPtr->flags & TB_SELECTIONCHANGED) TRACKBAR_CalcSelection (hwnd, infoPtr); infoPtr->flags &= ~ (TB_THUMBCHANGED | TB_SELECTIONCHANGED | TB_DRAGPOSVALID); /* draw channel */ rcChannel = infoPtr->rcChannel; rcSelection= infoPtr->rcSelection; DrawEdge (hdc, &rcChannel, EDGE_SUNKEN, BF_RECT | BF_ADJUST); if (dwStyle & TBS_ENABLESELRANGE) { /* fill the channel */ HBRUSH hbr = CreateSolidBrush (RGB(255,255,255)); FillRect (hdc, &rcChannel, hbr); if (((dwStyle & TBS_VERT) && (rcSelection.left!=rcSelection.right)) || ((!(dwStyle & TBS_VERT)) && (rcSelection.left!=rcSelection.right))) { hbr=CreateSolidBrush (COLOR_HIGHLIGHT); FillRect (hdc, &rcSelection, hbr); } DeleteObject (hbr); } /* draw tics */ if (!(dwStyle & TBS_NOTICKS)) { int ticFlags = dwStyle & 0x0f; COLORREF clrTic=GetSysColor (COLOR_3DDKSHADOW); for (i=0; iuNumTics; i++) TRACKBAR_DrawTics (infoPtr, hdc, infoPtr->tics[i], ticFlags, clrTic); TRACKBAR_DrawTics (infoPtr, hdc, 0, ticFlags | TIC_LEFTEDGE, clrTic); TRACKBAR_DrawTics (infoPtr, hdc, 0, ticFlags | TIC_RIGHTEDGE, clrTic); if ((dwStyle & TBS_ENABLESELRANGE) && (rcSelection.left!=rcSelection.right)) { TRACKBAR_DrawTics (infoPtr, hdc, infoPtr->nSelMin, ticFlags | TIC_SELECTIONMARKMIN, clrTic); TRACKBAR_DrawTics (infoPtr, hdc, infoPtr->nSelMax, ticFlags | TIC_SELECTIONMARKMAX, clrTic); } } /* draw thumb */ if (!(dwStyle & TBS_NOTHUMB)) { TRACKBAR_DrawThumb(infoPtr,hdc,dwStyle); } if (infoPtr->bFocus) DrawFocusRect (hdc, &rcClient); } static VOID TRACKBAR_AlignBuddies (HWND hwnd, TRACKBAR_INFO *infoPtr) { DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); HWND hwndParent = GetParent (hwnd); RECT rcSelf, rcBuddy; INT x, y; GetWindowRect (hwnd, &rcSelf); MapWindowPoints (HWND_DESKTOP, hwndParent, (LPPOINT)&rcSelf, 2); /* align buddy left or above */ if (infoPtr->hwndBuddyLA) { GetWindowRect (infoPtr->hwndBuddyLA, &rcBuddy); MapWindowPoints (HWND_DESKTOP, hwndParent, (LPPOINT)&rcBuddy, 2); if (dwStyle & TBS_VERT) { x = (infoPtr->rcChannel.right + infoPtr->rcChannel.left) / 2 - (rcBuddy.right - rcBuddy.left) / 2 + rcSelf.left; y = rcSelf.top - (rcBuddy.bottom - rcBuddy.top); } else { x = rcSelf.left - (rcBuddy.right - rcBuddy.left); y = (infoPtr->rcChannel.bottom + infoPtr->rcChannel.top) / 2 - (rcBuddy.bottom - rcBuddy.top) / 2 + rcSelf.top; } SetWindowPos (infoPtr->hwndBuddyLA, 0, x, y, 0, 0, SWP_NOZORDER | SWP_NOSIZE); } /* align buddy right or below */ if (infoPtr->hwndBuddyRB) { GetWindowRect (infoPtr->hwndBuddyRB, &rcBuddy); MapWindowPoints (HWND_DESKTOP, hwndParent, (LPPOINT)&rcBuddy, 2); if (dwStyle & TBS_VERT) { x = (infoPtr->rcChannel.right + infoPtr->rcChannel.left) / 2 - (rcBuddy.right - rcBuddy.left) / 2 + rcSelf.left; y = rcSelf.bottom; } else { x = rcSelf.right; y = (infoPtr->rcChannel.bottom + infoPtr->rcChannel.top) / 2 - (rcBuddy.bottom - rcBuddy.top) / 2 + rcSelf.top; } SetWindowPos (infoPtr->hwndBuddyRB, 0, x, y, 0, 0, SWP_NOZORDER | SWP_NOSIZE); } } static LRESULT TRACKBAR_ClearSel (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); infoPtr->nSelMin = 0; infoPtr->nSelMax = 0; infoPtr->flags |= TB_SELECTIONCHANGED; if ((BOOL)wParam) InvalidateRect (hwnd, NULL, FALSE); return 0; } static LRESULT TRACKBAR_ClearTics (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); if (infoPtr->tics) { COMCTL32_Free (infoPtr->tics); infoPtr->tics = NULL; infoPtr->uNumTics = 0; } if (wParam) InvalidateRect (hwnd, NULL, FALSE); return 0; } static LRESULT TRACKBAR_GetBuddy (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); if (wParam) /* buddy is left or above */ return (LRESULT)infoPtr->hwndBuddyLA; /* buddy is right or below */ return (LRESULT) infoPtr->hwndBuddyRB; } static LRESULT TRACKBAR_GetChannelRect (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); LPRECT lprc = (LPRECT)lParam; if (lprc == NULL) return 0; lprc->left = infoPtr->rcChannel.left; lprc->right = infoPtr->rcChannel.right; lprc->bottom = infoPtr->rcChannel.bottom; lprc->top = infoPtr->rcChannel.top; return 0; } static LRESULT TRACKBAR_GetLineSize (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); return infoPtr->nLineSize; } static LRESULT TRACKBAR_GetNumTics (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); if (GetWindowLongA (hwnd, GWL_STYLE) & TBS_NOTICKS) return 0; return infoPtr->uNumTics+2; } static LRESULT TRACKBAR_GetPageSize (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); return infoPtr->nPageSize; } static LRESULT TRACKBAR_GetPos (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); return infoPtr->nPos; } static LRESULT TRACKBAR_GetRangeMax (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); return infoPtr->nRangeMax; } static LRESULT TRACKBAR_GetRangeMin (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); return infoPtr->nRangeMin; } static LRESULT TRACKBAR_GetSelEnd (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); return infoPtr->nSelMax; } static LRESULT TRACKBAR_GetSelStart (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); return infoPtr->nSelMin; } static LRESULT TRACKBAR_GetThumbLength (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); return infoPtr->uThumbLen; } static LRESULT TRACKBAR_GetPTics (HWND hwnd) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); return (LRESULT) infoPtr->tics; } static LRESULT TRACKBAR_GetThumbRect (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); LPRECT lprc = (LPRECT)lParam; if (lprc == NULL) return 0; lprc->left = infoPtr->rcThumb.left; lprc->right = infoPtr->rcThumb.right; lprc->bottom = infoPtr->rcThumb.bottom; lprc->top = infoPtr->rcThumb.top; return 0; } static LRESULT TRACKBAR_GetTic (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); INT iTic; iTic=(INT) wParam; if ((iTic<0) || (iTic>infoPtr->uNumTics)) return -1; return (LRESULT) infoPtr->tics[iTic]; } static LRESULT TRACKBAR_GetTicPos (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); INT iTic, range, width, pos; iTic=(INT ) wParam; if ((iTic<0) || (iTic>infoPtr->uNumTics)) return -1; range=infoPtr->nRangeMax - infoPtr->nRangeMin; width=infoPtr->rcChannel.right - infoPtr->rcChannel.left; pos=infoPtr->rcChannel.left + (width * infoPtr->tics[iTic]) / range; return (LRESULT) pos; } static LRESULT TRACKBAR_GetToolTips (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); if (GetWindowLongA (hwnd, GWL_STYLE) & TBS_TOOLTIPS) return (LRESULT)infoPtr->hwndToolTip; return 0; } /* case TBM_GETUNICODEFORMAT: */ static LRESULT TRACKBAR_SetBuddy (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); HWND hwndTemp; if (wParam) { /* buddy is left or above */ hwndTemp = infoPtr->hwndBuddyLA; infoPtr->hwndBuddyLA = (HWND)lParam; FIXME("move buddy!\n"); } else { /* buddy is right or below */ hwndTemp = infoPtr->hwndBuddyRB; infoPtr->hwndBuddyRB = (HWND)lParam; FIXME("move buddy!\n"); } TRACKBAR_AlignBuddies (hwnd, infoPtr); return (LRESULT)hwndTemp; } static LRESULT TRACKBAR_SetLineSize (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); INT nTemp = infoPtr->nLineSize; infoPtr->nLineSize = (INT)lParam; return nTemp; } static LRESULT TRACKBAR_SetPageSize (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); INT nTemp = infoPtr->nPageSize; infoPtr->nPageSize = (INT)lParam; return nTemp; } static LRESULT TRACKBAR_SetPos (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); infoPtr->nPos = (INT)lParam; if (infoPtr->nPos < infoPtr->nRangeMin) infoPtr->nPos = infoPtr->nRangeMin; if (infoPtr->nPos > infoPtr->nRangeMax) infoPtr->nPos = infoPtr->nRangeMax; infoPtr->flags |= TB_THUMBPOSCHANGED; if (wParam) InvalidateRect (hwnd, NULL, FALSE); return 0; } static LRESULT TRACKBAR_SetRange (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); infoPtr->nRangeMin = (INT)LOWORD(lParam); infoPtr->nRangeMax = (INT)HIWORD(lParam); if (infoPtr->nPos < infoPtr->nRangeMin) { infoPtr->nPos = infoPtr->nRangeMin; infoPtr->flags |=TB_THUMBPOSCHANGED; } if (infoPtr->nPos > infoPtr->nRangeMax) { infoPtr->nPos = infoPtr->nRangeMax; infoPtr->flags |=TB_THUMBPOSCHANGED; } infoPtr->nPageSize=(infoPtr->nRangeMax - infoPtr->nRangeMin)/5; if (infoPtr->nPageSize == 0) infoPtr->nPageSize = 1; TRACKBAR_RecalculateTics (infoPtr); if (wParam) InvalidateRect (hwnd, NULL, FALSE); return 0; } static LRESULT TRACKBAR_SetRangeMax (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); infoPtr->nRangeMax = (INT)lParam; if (infoPtr->nPos > infoPtr->nRangeMax) { infoPtr->nPos = infoPtr->nRangeMax; infoPtr->flags |=TB_THUMBPOSCHANGED; } infoPtr->nPageSize=(infoPtr->nRangeMax - infoPtr->nRangeMin)/5; if (infoPtr->nPageSize == 0) infoPtr->nPageSize = 1; TRACKBAR_RecalculateTics (infoPtr); if (wParam) InvalidateRect (hwnd, NULL, FALSE); return 0; } static LRESULT TRACKBAR_SetRangeMin (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); infoPtr->nRangeMin = (INT)lParam; if (infoPtr->nPos < infoPtr->nRangeMin) { infoPtr->nPos = infoPtr->nRangeMin; infoPtr->flags |=TB_THUMBPOSCHANGED; } infoPtr->nPageSize=(infoPtr->nRangeMax - infoPtr->nRangeMin)/5; if (infoPtr->nPageSize == 0) infoPtr->nPageSize = 1; TRACKBAR_RecalculateTics (infoPtr); if (wParam) InvalidateRect (hwnd, NULL, FALSE); return 0; } static LRESULT TRACKBAR_SetTicFreq (HWND hwnd, WPARAM wParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); if (GetWindowLongA (hwnd, GWL_STYLE) & TBS_AUTOTICKS) infoPtr->uTicFreq=(UINT) wParam; TRACKBAR_RecalculateTics (infoPtr); InvalidateRect (hwnd, NULL, FALSE); return 0; } static LRESULT TRACKBAR_SetSel (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); infoPtr->nSelMin = (INT)LOWORD(lParam); infoPtr->nSelMax = (INT)HIWORD(lParam); infoPtr->flags |=TB_SELECTIONCHANGED; if (!GetWindowLongA (hwnd, GWL_STYLE) & TBS_ENABLESELRANGE) return 0; if (infoPtr->nSelMin < infoPtr->nRangeMin) infoPtr->nSelMin = infoPtr->nRangeMin; if (infoPtr->nSelMax > infoPtr->nRangeMax) infoPtr->nSelMax = infoPtr->nRangeMax; if (wParam) InvalidateRect (hwnd, NULL, FALSE); return 0; } static LRESULT TRACKBAR_SetSelEnd (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); if (!GetWindowLongA (hwnd, GWL_STYLE) & TBS_ENABLESELRANGE) return 0; infoPtr->nSelMax = (INT)lParam; infoPtr->flags |= TB_SELECTIONCHANGED; if (infoPtr->nSelMax > infoPtr->nRangeMax) infoPtr->nSelMax = infoPtr->nRangeMax; if (wParam) InvalidateRect (hwnd, NULL, FALSE); return 0; } static LRESULT TRACKBAR_SetSelStart (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); if (!GetWindowLongA (hwnd, GWL_STYLE) & TBS_ENABLESELRANGE) return 0; infoPtr->nSelMin = (INT)lParam; infoPtr->flags |=TB_SELECTIONCHANGED; if (infoPtr->nSelMin < infoPtr->nRangeMin) infoPtr->nSelMin = infoPtr->nRangeMin; if (wParam) InvalidateRect (hwnd, NULL, FALSE); return 0; } static LRESULT TRACKBAR_SetThumbLength (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); if (GetWindowLongA (hwnd, GWL_STYLE) & TBS_FIXEDLENGTH) infoPtr->uThumbLen = (UINT)wParam; infoPtr->flags |= TB_THUMBSIZECHANGED; InvalidateRect (hwnd, NULL, FALSE); return 0; } static LRESULT TRACKBAR_SetTic (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); INT nPos = (INT)lParam; if ((nPos < infoPtr->nRangeMin) || (nPos> infoPtr->nRangeMax)) return FALSE; infoPtr->uNumTics++; infoPtr->tics=COMCTL32_ReAlloc( infoPtr->tics, (infoPtr->uNumTics)*sizeof (DWORD)); infoPtr->tics[infoPtr->uNumTics-1]=nPos; InvalidateRect (hwnd, NULL, FALSE); return TRUE; } static LRESULT TRACKBAR_SetTipSide (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); INT fTemp = infoPtr->fLocation; infoPtr->fLocation = (INT)wParam; return fTemp; } static LRESULT TRACKBAR_SetToolTips (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); infoPtr->hwndToolTip = (HWND)wParam; return 0; } /* case TBM_SETUNICODEFORMAT: */ static LRESULT TRACKBAR_InitializeThumb (HWND hwnd) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); infoPtr->uThumbLen = 23; /* initial thumb length */ TRACKBAR_CalcChannel (hwnd,infoPtr); TRACKBAR_CalcThumb (hwnd, infoPtr); infoPtr->flags &= ~TB_SELECTIONCHANGED; return 0; } static LRESULT TRACKBAR_Create (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr; infoPtr = (TRACKBAR_INFO *)COMCTL32_Alloc (sizeof(TRACKBAR_INFO)); SetWindowLongA (hwnd, 0, (DWORD)infoPtr); /* set default values */ infoPtr->nRangeMin = 0; infoPtr->nRangeMax = 100; infoPtr->nLineSize = 1; infoPtr->nPageSize = 20; infoPtr->nSelMin = 0; infoPtr->nSelMax = 0; infoPtr->nPos = 0; infoPtr->uNumTics = 0; /* start and end tic are not included in count*/ infoPtr->uTicFreq = 1; infoPtr->tics = NULL; infoPtr->clrBk = GetSysColor (COLOR_BTNFACE); infoPtr->hwndNotify = GetParent (hwnd); TRACKBAR_InitializeThumb (hwnd); /* Create tooltip control */ if (GetWindowLongA (hwnd, GWL_STYLE) & TBS_TOOLTIPS) { TTTOOLINFOA ti; infoPtr->hwndToolTip = CreateWindowExA (0, TOOLTIPS_CLASSA, NULL, 0, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, hwnd, 0, 0, 0); /* Send NM_TOOLTIPSCREATED notification */ if (infoPtr->hwndToolTip) { NMTOOLTIPSCREATED nmttc; nmttc.hdr.hwndFrom = hwnd; nmttc.hdr.idFrom = GetWindowLongA (hwnd, GWL_ID); nmttc.hdr.code = NM_TOOLTIPSCREATED; nmttc.hwndToolTips = infoPtr->hwndToolTip; SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM)nmttc.hdr.idFrom, (LPARAM)&nmttc); } ZeroMemory (&ti, sizeof(TTTOOLINFOA)); ti.cbSize = sizeof(TTTOOLINFOA); ti.uFlags = TTF_IDISHWND | TTF_TRACK; ti.hwnd = hwnd; ti.uId = 0; ti.lpszText = "Test"; /* LPSTR_TEXTCALLBACK */ SetRectEmpty (&ti.rect); SendMessageA (infoPtr->hwndToolTip, TTM_ADDTOOLA, 0, (LPARAM)&ti); } return 0; } static LRESULT TRACKBAR_Destroy (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); /* delete tooltip control */ if (infoPtr->hwndToolTip) DestroyWindow (infoPtr->hwndToolTip); COMCTL32_Free (infoPtr); SetWindowLongA (hwnd, 0, 0); return 0; } static LRESULT TRACKBAR_KillFocus (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); TRACE("\n"); infoPtr->bFocus = FALSE; infoPtr->flags &= ~TB_DRAG_MODE; InvalidateRect (hwnd, NULL, FALSE); return 0; } static LRESULT TRACKBAR_LButtonDown (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); POINT clickPoint; SetFocus (hwnd); clickPoint.y = HIWORD(lParam); clickPoint.x = LOWORD(lParam); if (PtInRect(&(infoPtr->rcThumb),clickPoint)) { infoPtr->flags |= TB_DRAG_MODE; if (dwStyle & TBS_TOOLTIPS) { /* enable tooltip */ TTTOOLINFOA ti; POINT pt; GetCursorPos (&pt); SendMessageA (infoPtr->hwndToolTip, TTM_TRACKPOSITION, 0, (LPARAM)MAKELPARAM(pt.x, pt.y)); ti.cbSize = sizeof(TTTOOLINFOA); ti.uId = 0; ti.hwnd = (UINT)hwnd; infoPtr->flags |= TB_SHOW_TOOLTIP; SetCapture (hwnd); SendMessageA (infoPtr->hwndToolTip, TTM_TRACKACTIVATE, (WPARAM)TRUE, (LPARAM)&ti); } return 0; } else if (PtInRect(&(infoPtr->rcChannel),clickPoint)) { int clickPlace,prevPos,vertical; DOUBLE clickPos; vertical = (dwStyle & TBS_VERT) ? 1 : 0; if (vertical) clickPlace=(INT)HIWORD(lParam); else clickPlace=(INT)LOWORD(lParam); clickPos = TRACKBAR_ConvertPlaceToPosition(infoPtr, clickPlace, vertical); prevPos = infoPtr->nPos; if (clickPos > (int)prevPos) { /* similar to VK_NEXT */ infoPtr->nPos += infoPtr->nPageSize; if (infoPtr->nPos > infoPtr->nRangeMax) infoPtr->nPos = infoPtr->nRangeMax; TRACKBAR_SendNotify (hwnd, TB_PAGEUP); } else { infoPtr->nPos -= infoPtr->nPageSize; /* similar to VK_PRIOR */ if (infoPtr->nPos < infoPtr->nRangeMin) infoPtr->nPos = infoPtr->nRangeMin; TRACKBAR_SendNotify (hwnd, TB_PAGEDOWN); } if (prevPos!=infoPtr->nPos) { infoPtr->flags |= TB_THUMBPOSCHANGED; InvalidateRect (hwnd, NULL, FALSE); } } return 0; } static LRESULT TRACKBAR_LButtonUp (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); TRACKBAR_SendNotify (hwnd, TB_ENDTRACK); if (infoPtr->flags & TB_DRAG_MODE) { infoPtr->flags &= ~TB_DRAG_MODE; ReleaseCapture (); } if (GetWindowLongA (hwnd, GWL_STYLE) & TBS_TOOLTIPS) { /* disable tooltip */ TTTOOLINFOA ti; ti.cbSize = sizeof(TTTOOLINFOA); ti.uId = 0; ti.hwnd = (UINT)hwnd; infoPtr->flags &= ~TB_SHOW_TOOLTIP; SendMessageA (infoPtr->hwndToolTip, TTM_TRACKACTIVATE, (WPARAM)FALSE, (LPARAM)&ti); } InvalidateRect (hwnd, NULL, FALSE); return 0; } static LRESULT TRACKBAR_CaptureChanged (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); if (infoPtr->flags & TB_DRAGPOSVALID) { infoPtr->nPos=infoPtr->dragPos; InvalidateRect (hwnd, NULL, FALSE); } infoPtr->flags &= ~ TB_DRAGPOSVALID; TRACKBAR_SendNotify (hwnd, TB_ENDTRACK); return 0; } static LRESULT TRACKBAR_Paint (HWND hwnd, WPARAM wParam) { HDC hdc; PAINTSTRUCT ps; hdc = wParam==0 ? BeginPaint (hwnd, &ps) : (HDC)wParam; TRACKBAR_Refresh (hwnd, hdc); if(!wParam) EndPaint (hwnd, &ps); return 0; } static LRESULT TRACKBAR_SetFocus (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); TRACE("\n"); infoPtr->bFocus = TRUE; InvalidateRect (hwnd, NULL, FALSE); return 0; } static LRESULT TRACKBAR_Size (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); TRACKBAR_CalcChannel (hwnd, infoPtr); TRACKBAR_AlignBuddies (hwnd, infoPtr); return 0; } static BOOL TRACKBAR_SendNotify (HWND hwnd, UINT code) { TRACE("%x\n",code); if (GetWindowLongA (hwnd, GWL_STYLE) & TBS_VERT) return (BOOL) SendMessageA (GetParent (hwnd), WM_VSCROLL, (WPARAM)code, (LPARAM)hwnd); return (BOOL) SendMessageA (GetParent (hwnd), WM_HSCROLL, (WPARAM)code, (LPARAM)hwnd); } static LRESULT TRACKBAR_MouseMove (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); SHORT clickPlace; DOUBLE dragPos; char buf[80]; TRACE("%x\n",wParam); if (dwStyle & TBS_VERT) clickPlace=(SHORT)HIWORD(lParam); else clickPlace=(SHORT)LOWORD(lParam); if (!(infoPtr->flags & TB_DRAG_MODE)) return TRUE; SetCapture (hwnd); dragPos = TRACKBAR_ConvertPlaceToPosition (infoPtr, clickPlace, dwStyle & TBS_VERT); if (dragPos > ((INT)dragPos) + 0.5) infoPtr->dragPos = dragPos + 1; else infoPtr->dragPos = dragPos; infoPtr->flags |= TB_DRAGPOSVALID; TRACKBAR_SendNotify (hwnd, TB_THUMBTRACK | (infoPtr->nPos<<16)); if (infoPtr->flags & TB_SHOW_TOOLTIP) { POINT pt; TTTOOLINFOA ti; ti.cbSize = sizeof(TTTOOLINFOA); ti.hwnd = hwnd; ti.uId = 0; ti.hinst=0; sprintf (buf,"%d",infoPtr->nPos); ti.lpszText = (LPSTR) buf; GetCursorPos (&pt); if (dwStyle & TBS_VERT) { SendMessageA (infoPtr->hwndToolTip, TTM_TRACKPOSITION, 0, (LPARAM)MAKELPARAM(pt.x+5, pt.y+15)); } else { SendMessageA (infoPtr->hwndToolTip, TTM_TRACKPOSITION, 0, (LPARAM)MAKELPARAM(pt.x+15, pt.y+5)); } SendMessageA (infoPtr->hwndToolTip, TTM_UPDATETIPTEXTA, 0, (LPARAM)&ti); } InvalidateRect (hwnd, NULL, FALSE); UpdateWindow (hwnd); return TRUE; } static LRESULT TRACKBAR_KeyDown (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACKBAR_INFO *infoPtr = TRACKBAR_GetInfoPtr (hwnd); INT pos; TRACE("%x\n",wParam); pos=infoPtr->nPos; switch (wParam) { case VK_LEFT: case VK_UP: if (infoPtr->nPos == infoPtr->nRangeMin) return FALSE; infoPtr->nPos -= infoPtr->nLineSize; if (infoPtr->nPos < infoPtr->nRangeMin) infoPtr->nPos = infoPtr->nRangeMin; TRACKBAR_SendNotify (hwnd, TB_LINEUP); break; case VK_RIGHT: case VK_DOWN: if (infoPtr->nPos == infoPtr->nRangeMax) return FALSE; infoPtr->nPos += infoPtr->nLineSize; if (infoPtr->nPos > infoPtr->nRangeMax) infoPtr->nPos = infoPtr->nRangeMax; TRACKBAR_SendNotify (hwnd, TB_LINEDOWN); break; case VK_NEXT: if (infoPtr->nPos == infoPtr->nRangeMax) return FALSE; infoPtr->nPos += infoPtr->nPageSize; if (infoPtr->nPos > infoPtr->nRangeMax) infoPtr->nPos = infoPtr->nRangeMax; TRACKBAR_SendNotify (hwnd, TB_PAGEUP); break; case VK_PRIOR: if (infoPtr->nPos == infoPtr->nRangeMin) return FALSE; infoPtr->nPos -= infoPtr->nPageSize; if (infoPtr->nPos < infoPtr->nRangeMin) infoPtr->nPos = infoPtr->nRangeMin; TRACKBAR_SendNotify (hwnd, TB_PAGEDOWN); break; case VK_HOME: if (infoPtr->nPos == infoPtr->nRangeMin) return FALSE; infoPtr->nPos = infoPtr->nRangeMin; TRACKBAR_SendNotify (hwnd, TB_TOP); break; case VK_END: if (infoPtr->nPos == infoPtr->nRangeMax) return FALSE; infoPtr->nPos = infoPtr->nRangeMax; TRACKBAR_SendNotify (hwnd, TB_BOTTOM); break; } if (pos!=infoPtr->nPos) { infoPtr->flags |=TB_THUMBPOSCHANGED; InvalidateRect (hwnd, NULL, FALSE); } return TRUE; } static LRESULT TRACKBAR_KeyUp (HWND hwnd, WPARAM wParam) { switch (wParam) { case VK_LEFT: case VK_UP: case VK_RIGHT: case VK_DOWN: case VK_NEXT: case VK_PRIOR: case VK_HOME: case VK_END: TRACKBAR_SendNotify (hwnd, TB_ENDTRACK); } return TRUE; } static LRESULT WINAPI TRACKBAR_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TRACE("hwnd=%x msg=%x wparam=%x lparam=%lx\n", hwnd, uMsg, wParam, lParam); if (!TRACKBAR_GetInfoPtr (hwnd) && (uMsg != WM_CREATE)) return DefWindowProcA (hwnd, uMsg, wParam, lParam); switch (uMsg) { case TBM_CLEARSEL: return TRACKBAR_ClearSel (hwnd, wParam, lParam); case TBM_CLEARTICS: return TRACKBAR_ClearTics (hwnd, wParam, lParam); case TBM_GETBUDDY: return TRACKBAR_GetBuddy (hwnd, wParam, lParam); case TBM_GETCHANNELRECT: return TRACKBAR_GetChannelRect (hwnd, wParam, lParam); case TBM_GETLINESIZE: return TRACKBAR_GetLineSize (hwnd, wParam, lParam); case TBM_GETNUMTICS: return TRACKBAR_GetNumTics (hwnd, wParam, lParam); case TBM_GETPAGESIZE: return TRACKBAR_GetPageSize (hwnd, wParam, lParam); case TBM_GETPOS: return TRACKBAR_GetPos (hwnd, wParam, lParam); case TBM_GETPTICS: return TRACKBAR_GetPTics (hwnd); case TBM_GETRANGEMAX: return TRACKBAR_GetRangeMax (hwnd, wParam, lParam); case TBM_GETRANGEMIN: return TRACKBAR_GetRangeMin (hwnd, wParam, lParam); case TBM_GETSELEND: return TRACKBAR_GetSelEnd (hwnd, wParam, lParam); case TBM_GETSELSTART: return TRACKBAR_GetSelStart (hwnd, wParam, lParam); case TBM_GETTHUMBLENGTH: return TRACKBAR_GetThumbLength (hwnd, wParam, lParam); case TBM_GETTHUMBRECT: return TRACKBAR_GetThumbRect (hwnd, wParam, lParam); case TBM_GETTIC: return TRACKBAR_GetTic (hwnd, wParam, lParam); case TBM_GETTICPOS: return TRACKBAR_GetTicPos (hwnd, wParam, lParam); case TBM_GETTOOLTIPS: return TRACKBAR_GetToolTips (hwnd, wParam, lParam); /* case TBM_GETUNICODEFORMAT: */ case TBM_SETBUDDY: return TRACKBAR_SetBuddy (hwnd, wParam, lParam); case TBM_SETLINESIZE: return TRACKBAR_SetLineSize (hwnd, wParam, lParam); case TBM_SETPAGESIZE: return TRACKBAR_SetPageSize (hwnd, wParam, lParam); case TBM_SETPOS: return TRACKBAR_SetPos (hwnd, wParam, lParam); case TBM_SETRANGE: return TRACKBAR_SetRange (hwnd, wParam, lParam); case TBM_SETRANGEMAX: return TRACKBAR_SetRangeMax (hwnd, wParam, lParam); case TBM_SETRANGEMIN: return TRACKBAR_SetRangeMin (hwnd, wParam, lParam); case TBM_SETSEL: return TRACKBAR_SetSel (hwnd, wParam, lParam); case TBM_SETSELEND: return TRACKBAR_SetSelEnd (hwnd, wParam, lParam); case TBM_SETSELSTART: return TRACKBAR_SetSelStart (hwnd, wParam, lParam); case TBM_SETTHUMBLENGTH: return TRACKBAR_SetThumbLength (hwnd, wParam, lParam); case TBM_SETTIC: return TRACKBAR_SetTic (hwnd, wParam, lParam); case TBM_SETTICFREQ: return TRACKBAR_SetTicFreq (hwnd, wParam); case TBM_SETTIPSIDE: return TRACKBAR_SetTipSide (hwnd, wParam, lParam); case TBM_SETTOOLTIPS: return TRACKBAR_SetToolTips (hwnd, wParam, lParam); /* case TBM_SETUNICODEFORMAT: */ case WM_CAPTURECHANGED: return TRACKBAR_CaptureChanged (hwnd, wParam, lParam); case WM_CREATE: return TRACKBAR_Create (hwnd, wParam, lParam); case WM_DESTROY: return TRACKBAR_Destroy (hwnd, wParam, lParam); /* case WM_ENABLE: */ /* case WM_ERASEBKGND: */ /* return 0; */ case WM_GETDLGCODE: return DLGC_WANTARROWS; case WM_KEYDOWN: return TRACKBAR_KeyDown (hwnd, wParam, lParam); case WM_KEYUP: return TRACKBAR_KeyUp (hwnd, wParam); case WM_KILLFOCUS: return TRACKBAR_KillFocus (hwnd, wParam, lParam); case WM_LBUTTONDOWN: return TRACKBAR_LButtonDown (hwnd, wParam, lParam); case WM_LBUTTONUP: return TRACKBAR_LButtonUp (hwnd, wParam, lParam); case WM_MOUSEMOVE: return TRACKBAR_MouseMove (hwnd, wParam, lParam); case WM_PAINT: return TRACKBAR_Paint (hwnd, wParam); case WM_SETFOCUS: return TRACKBAR_SetFocus (hwnd, wParam, lParam); case WM_SIZE: return TRACKBAR_Size (hwnd, wParam, lParam); case WM_WININICHANGE: return TRACKBAR_InitializeThumb (hwnd); default: if (uMsg >= WM_USER) ERR("unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); return DefWindowProcA (hwnd, uMsg, wParam, lParam); } return 0; } VOID TRACKBAR_Register (void) { WNDCLASSA wndClass; ZeroMemory (&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS; wndClass.lpfnWndProc = (WNDPROC)TRACKBAR_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(TRACKBAR_INFO *); wndClass.hCursor = LoadCursorA (0, IDC_ARROWA); wndClass.hbrBackground = (HBRUSH)(COLOR_3DFACE + 1); wndClass.lpszClassName = TRACKBAR_CLASSA; RegisterClassA (&wndClass); } VOID TRACKBAR_Unregister (void) { UnregisterClassA (TRACKBAR_CLASSA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/treeview.c0100644000175000001440000033005307113330236017026 0ustar julliardusers/* Treeview control * * Copyright 1998 Eric Kohl * Copyright 1998,1999 Alex Priem * Copyright 1999 Sylvain St-Germain * * * TODO: * Using DPA to store the item ptr would be good. * Node label edition is implemented but something happened in wine in the * two last weeks of march 99 that broke it. * refreshtreeview: -small array containing info about positions. -better implementation of RefreshItem: 1) draw lines between parents 2) draw items 3) draw lines from parent<->items. -implement partial drawing? * -drag&drop: TVM_CREATEDRAGIMAGE should create drag bitmap. * -scrollbars: horizontal scrollbar doesn't work. * -Unicode messages * -check custom draw * -I_CHILDRENCALLBACK * FIXME: check fontsize. (uRealItemHeight) * test focusItem (redraw in different color) uHotItem Edit: needs timer better implementation. * WM_HSCROLL is broken. * use separate routine to get item text/image. * * Separate drawing/calculation. * * FIXMEs (for personal use) Expand: -ctlmacro expands twice ->toggle. -DblClick: ctlmacro.exe's NM_DBLCLK seems to go wrong (returns FALSE). -treehelper: stack corruption makes big window. */ #include #include "winbase.h" #include "wingdi.h" #include "commctrl.h" #include "treeview.h" #include "comctl32.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(treeview) /* ffs should be in . */ /* Defines, since they do not need to return previous state, and nr * has no side effects in this file. */ #define tv_test_bit(nr,bf) (((LPBYTE)bf)[nr>>3]&(1<<(nr&7))) #define tv_set_bit(nr,bf) ((LPBYTE)bf)[nr>>3]|=(1<<(nr&7)) #define tv_clear_bit(nr,bf) ((LPBYTE)bf)[nr>>3]&=~(1<<(nr&7)) #define TREEVIEW_GetInfoPtr(hwnd) \ ((TREEVIEW_INFO *) GetWindowLongA( hwnd, 0)) static BOOL TREEVIEW_SendSimpleNotify (HWND hwnd, UINT code); static BOOL TREEVIEW_SendTreeviewNotify (HWND hwnd, UINT code, UINT action, HTREEITEM oldItem, HTREEITEM newItem); static BOOL TREEVIEW_SendTreeviewDnDNotify (HWND hwnd, UINT code, HTREEITEM dragItem, POINT pt); static BOOL TREEVIEW_SendDispInfoNotify (HWND hwnd, TREEVIEW_ITEM *wineItem, UINT code, UINT what); static BOOL TREEVIEW_SendCustomDrawNotify (HWND hwnd, DWORD dwDrawStage, HDC hdc, RECT rc); static BOOL TREEVIEW_SendCustomDrawItemNotify (HWND hwnd, HDC hdc, TREEVIEW_ITEM *tvItem, UINT uItemDrawState); static LRESULT TREEVIEW_DoSelectItem (HWND hwnd, INT action, HTREEITEM newSelect, INT cause); static void TREEVIEW_Refresh (HWND hwnd, HDC hdc); static LRESULT CALLBACK TREEVIEW_Edit_SubclassProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam); static LRESULT TREEVIEW_EditLabelA (HWND hwnd, WPARAM wParam, LPARAM lParam); static LRESULT TREEVIEW_EndEditLabelNow (HWND hwnd, WPARAM wParam, LPARAM lParam); /* helper functions. Work with the assumption that validity of operands is checked beforehand, and that tree state is valid. */ /* FIXME: MS documentation says `GetNextVisibleItem' returns NULL if not successfull. Probably only applies to dereferencing infoPtr (i.e. we are offered a valid treeview structure) and not whether there is a next `visible' child. FIXME: check other failures. */ /*************************************************************************** * This method returns the TREEVIEW_ITEM object given the handle */ static TREEVIEW_ITEM* TREEVIEW_ValidItem( TREEVIEW_INFO *infoPtr, HTREEITEM handle) { if ((!handle) || (handle>infoPtr->uMaxHandle)) return NULL; if (tv_test_bit ((INT)handle, infoPtr->freeList)) return NULL; return &infoPtr->items[(INT)handle]; } /*************************************************************************** * This method returns the last expanded child item of a tree node */ static TREEVIEW_ITEM *TREEVIEW_GetLastListItem( TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *tvItem) { TREEVIEW_ITEM *wineItem = tvItem; /* * Get this item last sibling */ while (wineItem->sibling) wineItem=& infoPtr->items [(INT)wineItem->sibling]; /* * If the last sibling has expanded children, restart. */ if ( ( wineItem->cChildren > 0 ) && ( wineItem->state & TVIS_EXPANDED) ) return TREEVIEW_GetLastListItem( infoPtr, &(infoPtr->items[(INT)wineItem->firstChild])); return wineItem; } /*************************************************************************** * This method returns the previous physical item in the list not * considering the tree hierarchy. */ static TREEVIEW_ITEM *TREEVIEW_GetPrevListItem( TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *tvItem) { if (tvItem->upsibling) { /* * This item has a upsibling, get the last item. Since, GetLastListItem * first looks at siblings, we must feed it with the first child. */ TREEVIEW_ITEM *upItem = &infoPtr->items[(INT)tvItem->upsibling]; if ( ( upItem->cChildren > 0 ) && ( upItem->state & TVIS_EXPANDED) ) return TREEVIEW_GetLastListItem( infoPtr, &infoPtr->items[(INT)upItem->firstChild]); else return upItem; } else { /* * this item does not have a upsibling, get the parent */ if (tvItem->parent) return &infoPtr->items[(INT)tvItem->parent]; } return NULL; } /*************************************************************************** * This method returns the next physical item in the treeview not * considering the tree hierarchy. */ static TREEVIEW_ITEM *TREEVIEW_GetNextListItem( TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *tvItem) { TREEVIEW_ITEM *wineItem = NULL; /* * If this item has children and is expanded, return the first child */ if ((tvItem->firstChild) && (tvItem->state & TVIS_EXPANDED)) return (& infoPtr->items[(INT)tvItem->firstChild]); /* * try to get the sibling */ if (tvItem->sibling) return (& infoPtr->items[(INT)tvItem->sibling]); /* * Otherwise, get the parent's sibling. */ wineItem=tvItem; while (wineItem->parent) { wineItem=& infoPtr->items [(INT)wineItem->parent]; if (wineItem->sibling) return (& infoPtr->items [(INT)wineItem->sibling]); } return NULL; } /*************************************************************************** * This method returns the nth item starting at the given item. It returns * the last item (or first) we we run out of items. * * Will scroll backward if count is <0. * forward if count is >0. */ static TREEVIEW_ITEM *TREEVIEW_GetListItem( TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *tvItem, LONG count) { TREEVIEW_ITEM *previousItem = NULL; TREEVIEW_ITEM *wineItem = tvItem; LONG iter = 0; if (count > 0) { /* Find count item downward */ while ((iter++ < count) && (wineItem != NULL)) { /* Keep a pointer to the previous in case we ask for more than we got */ previousItem = wineItem; wineItem = TREEVIEW_GetNextListItem(infoPtr, wineItem); } if (wineItem == NULL) wineItem = previousItem; } else if (count < 0) { /* Find count item upward */ while ((iter-- > count) && (wineItem != NULL)) { /* Keep a pointer to the previous in case we ask for more than we got */ previousItem = wineItem; wineItem = TREEVIEW_GetPrevListItem(infoPtr, wineItem); } if (wineItem == NULL) wineItem = previousItem; } else wineItem = NULL; return wineItem; } /*************************************************************************** * This method */ static void TREEVIEW_RemoveAllChildren( HWND hwnd, TREEVIEW_ITEM *parentItem) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TREEVIEW_ITEM *killItem; INT kill; kill=(INT)parentItem->firstChild; while (kill) { tv_set_bit ( kill, infoPtr->freeList); killItem=& infoPtr->items[kill]; if (killItem->pszText!=LPSTR_TEXTCALLBACKA) COMCTL32_Free (killItem->pszText); TREEVIEW_SendTreeviewNotify (hwnd, TVN_DELETEITEMA, 0, (HTREEITEM)kill, 0); if (killItem->firstChild) TREEVIEW_RemoveAllChildren (hwnd, killItem); kill=(INT)killItem->sibling; } if (parentItem->cChildren>0) { infoPtr->uNumItems -= parentItem->cChildren; parentItem->firstChild = 0; parentItem->cChildren = 0; } } static void TREEVIEW_RemoveItem (HWND hwnd, TREEVIEW_ITEM *wineItem) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TREEVIEW_ITEM *parentItem, *upsiblingItem, *siblingItem; INT iItem; iItem=(INT)wineItem->hItem; tv_set_bit(iItem,infoPtr->freeList); infoPtr->uNumItems--; parentItem=NULL; if (wineItem->pszText!=LPSTR_TEXTCALLBACKA) COMCTL32_Free (wineItem->pszText); TREEVIEW_SendTreeviewNotify (hwnd, TVN_DELETEITEMA, 0, (HTREEITEM)iItem, 0); if (wineItem->firstChild) TREEVIEW_RemoveAllChildren (hwnd,wineItem); if (wineItem->parent) { parentItem=& infoPtr->items [(INT)wineItem->parent]; switch (parentItem->cChildren) { case I_CHILDRENCALLBACK: FIXME("we don't handle I_CHILDRENCALLBACK yet\n"); break; case 1: parentItem->cChildren=0; parentItem->firstChild=0; return; default: parentItem->cChildren--; if ((INT)parentItem->firstChild==iItem) parentItem->firstChild=wineItem->sibling; } } if (iItem==(INT)infoPtr->TopRootItem) infoPtr->TopRootItem=(HTREEITEM)wineItem->sibling; if (wineItem->upsibling) { upsiblingItem=& infoPtr->items [(INT)wineItem->upsibling]; upsiblingItem->sibling=wineItem->sibling; } if (wineItem->sibling) { siblingItem=& infoPtr->items [(INT)wineItem->sibling]; siblingItem->upsibling=wineItem->upsibling; } } /* Note:TREEVIEW_RemoveTree doesn't remove infoPtr itself */ static void TREEVIEW_RemoveTree (HWND hwnd) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TREEVIEW_ITEM *killItem; int i; for (i = 1; i <= (INT)infoPtr->uMaxHandle; i++) if (!tv_test_bit (i, infoPtr->freeList)) { killItem = &infoPtr->items[i]; if (killItem->pszText != LPSTR_TEXTCALLBACKA) COMCTL32_Free (killItem->pszText); TREEVIEW_SendTreeviewNotify(hwnd, TVN_DELETEITEMA, 0, killItem->hItem, 0); } if (infoPtr->uNumPtrsAlloced) { COMCTL32_Free (infoPtr->items); COMCTL32_Free (infoPtr->freeList); infoPtr->uNumItems = 0; infoPtr->uNumPtrsAlloced = 0; infoPtr->uMaxHandle = 0; infoPtr->TopRootItem = 0; } } static LRESULT TREEVIEW_GetImageList (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TRACE("\n"); if ((INT)wParam == TVSIL_NORMAL) return (LRESULT) infoPtr->himlNormal; if ((INT)wParam == TVSIL_STATE) return (LRESULT) infoPtr->himlState; return 0; } static LRESULT TREEVIEW_SetImageList (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); HIMAGELIST himlTemp; TRACE("%x,%lx\n", wParam, lParam); switch ((INT)wParam) { case TVSIL_NORMAL: himlTemp = infoPtr->himlNormal; infoPtr->himlNormal = (HIMAGELIST)lParam; return (LRESULT)himlTemp; case TVSIL_STATE: himlTemp = infoPtr->himlState; infoPtr->himlState = (HIMAGELIST)lParam; return (LRESULT)himlTemp; } return (LRESULT)NULL; } static LRESULT TREEVIEW_SetItemHeight (HWND hwnd, WPARAM wParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); INT cx,cy,prevHeight=infoPtr->uItemHeight; TRACE("\n"); if (wParam==-1) { infoPtr->uItemHeight=-1; return prevHeight; } ImageList_GetIconSize (infoPtr->himlNormal, &cx, &cy); if (wParam>cy) cy=wParam; infoPtr->uItemHeight=cy; if (!( GetWindowLongA( hwnd, GWL_STYLE) & TVS_NONEVENHEIGHT)) infoPtr->uItemHeight = (INT) wParam & 0xfffffffe; return prevHeight; } static LRESULT TREEVIEW_GetItemHeight (HWND hwnd) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TRACE("\n"); return infoPtr->uItemHeight; } static LRESULT TREEVIEW_GetLineColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TRACE("\n"); return (LRESULT) infoPtr->clrLine; } static LRESULT TREEVIEW_SetLineColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); COLORREF prevColor=infoPtr->clrLine; TRACE("\n"); infoPtr->clrLine=(COLORREF) lParam; return (LRESULT) prevColor; } static LRESULT TREEVIEW_GetInsertMarkColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TRACE("\n"); return (LRESULT) infoPtr->clrInsertMark; } static LRESULT TREEVIEW_SetInsertMarkColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); COLORREF prevColor=infoPtr->clrInsertMark; TRACE("%d %ld\n",wParam,lParam); infoPtr->clrInsertMark=(COLORREF) lParam; return (LRESULT) prevColor; } static LRESULT TREEVIEW_SetInsertMark (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); HDC hdc; FIXME("%d %ld\n",wParam,lParam); if (!TREEVIEW_ValidItem (infoPtr, (HTREEITEM)lParam)) return 0; FIXME("%d %ld\n",wParam,lParam); infoPtr->insertBeforeorAfter=(BOOL) wParam; infoPtr->insertMarkItem=(HTREEITEM) lParam; hdc = GetDC (hwnd); TREEVIEW_Refresh (hwnd, hdc); ReleaseDC(hwnd,hdc); return 1; } static LRESULT TREEVIEW_SetTextColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); COLORREF prevColor=infoPtr->clrText; TRACE("\n"); infoPtr->clrText=(COLORREF) lParam; return (LRESULT) prevColor; } static LRESULT TREEVIEW_GetBkColor (HWND hwnd) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TRACE("\n"); return (LRESULT) infoPtr->clrBk; } static LRESULT TREEVIEW_SetBkColor (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); COLORREF prevColor=infoPtr->clrBk; TRACE("\n"); infoPtr->clrBk=(COLORREF) lParam; return (LRESULT) prevColor; } static LRESULT TREEVIEW_GetTextColor (HWND hwnd) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TRACE("\n"); return (LRESULT) infoPtr->clrText; } /* cdmode: custom draw mode as received from app. in first NMCUSTOMDRAW notification */ #define TREEVIEW_LEFT_MARGIN 8 static void TREEVIEW_DrawItem (HWND hwnd, HDC hdc, TREEVIEW_ITEM *wineItem) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); INT center,xpos,cx,cy, cditem; HFONT hOldFont; UINT uTextJustify = DT_LEFT; RECT r; if (wineItem->state & TVIS_BOLD) hOldFont = SelectObject (hdc, infoPtr->hBoldFont); else hOldFont = SelectObject (hdc, infoPtr->hFont); cditem=0; TRACE ("cdmode:%x\n",infoPtr->cdmode); if (infoPtr->cdmode & CDRF_NOTIFYITEMDRAW) { cditem=TREEVIEW_SendCustomDrawItemNotify (hwnd, hdc, wineItem, CDDS_ITEMPREPAINT); TRACE("prepaint:cditem-app returns 0x%x\n",cditem); if (cditem & CDRF_SKIPDEFAULT) return; } /* * Set drawing starting points */ r = wineItem->rect; /* this item rectangle */ center = (r.top+r.bottom)/2; /* this item vertical center */ xpos = r.left + TREEVIEW_LEFT_MARGIN;/* horizontal starting point */ /* * Display the tree hierarchy */ if ( dwStyle & TVS_HASLINES) { /* * Write links to parent node * we draw the L starting from the child to the parent * * points[0] is attached to the current item * points[1] is the L corner * points[2] is attached to the parent or the up sibling */ if ( dwStyle & TVS_LINESATROOT) { TREEVIEW_ITEM *upNode = NULL; BOOL hasParentOrSibling = TRUE; RECT upRect = {0,0,0,0}; HPEN hOldPen, hNewPen; POINT points[3]; /* * determine the target location of the line at root, either be linked * to the up sibling or to the parent node. */ if (wineItem->upsibling) upNode = TREEVIEW_ValidItem (infoPtr, wineItem->upsibling); else if (wineItem->parent) upNode = TREEVIEW_ValidItem (infoPtr, wineItem->parent); else hasParentOrSibling = FALSE; if (upNode) upRect = upNode->rect; if ( wineItem->iLevel == 0 ) { points[2].x = points[1].x = upRect.left+8; points[0].x = points[2].x + 10; points[2].y = upRect.bottom-3; points[1].y = points[0].y = center; } else { points[2].x = points[1].x = 8 + (20*wineItem->iLevel); points[2].y = ( upNode->cChildren == 0) ? upRect.top : /* is linked to the "L" above */ ( wineItem->upsibling != NULL) ? upRect.bottom-3: /* is linked to an icon */ upRect.bottom+1; /* is linked to a +/- box */ points[1].y = points[0].y = center; points[0].x = points[1].x + 10; } /* * Get a dotted pen */ hNewPen = CreatePen(PS_DOT, 0, infoPtr->clrLine); hOldPen = SelectObject( hdc, hNewPen ); if (hasParentOrSibling) Polyline (hdc,points,3); else Polyline (hdc,points,2); DeleteObject(hNewPen); SelectObject(hdc, hOldPen); } } /* * Display the (+/-) signs */ if (wineItem->iLevel != 0)/* update position only for non root node */ xpos+=(5*wineItem->iLevel); if (( dwStyle & TVS_HASBUTTONS) && ( dwStyle & TVS_HASLINES)) { if ( (wineItem->cChildren) || (wineItem->cChildren == I_CHILDRENCALLBACK)) { /* Setup expand box coordinate to facilitate the LMBClick handling */ wineItem->expandBox.left = xpos-4; wineItem->expandBox.top = center-4; wineItem->expandBox.right = xpos+5; wineItem->expandBox.bottom = center+5; Rectangle ( hdc, wineItem->expandBox.left, wineItem->expandBox.top , wineItem->expandBox.right, wineItem->expandBox.bottom); MoveToEx (hdc, xpos-2, center, NULL); LineTo (hdc, xpos+3, center); if (!(wineItem->state & TVIS_EXPANDED)) { MoveToEx (hdc, xpos, center-2, NULL); LineTo (hdc, xpos, center+3); } } } /* * Display the image associated with this item */ xpos += 13; /* update position */ if (wineItem->mask & (TVIF_IMAGE|TVIF_SELECTEDIMAGE)) { INT imageIndex; HIMAGELIST *himlp = NULL; /* State images are displayed to the left of the Normal image * image number is in state; zero should be `display no image'. * FIXME: that last sentence looks like it needs some checking. */ if (infoPtr->himlState) himlp=&infoPtr->himlState; imageIndex=wineItem->state>>12; imageIndex++; /* yeah, right */ TRACE ("imindex:%d\n",imageIndex); if ((himlp) && (imageIndex)) { imageIndex--; /* see FIXME */ ImageList_Draw ( *himlp, imageIndex, hdc, xpos-2, r.top+1, ILD_NORMAL); ImageList_GetIconSize (*himlp, &cx, &cy); wineItem->statebitmap.left=xpos-2; wineItem->statebitmap.right=xpos-2+cx; wineItem->statebitmap.top=r.top+1; wineItem->statebitmap.bottom=r.top+1+cy; xpos+=cx; } /* Now, draw the normal image; can be either selected or * non-selected image. */ himlp=NULL; if (infoPtr->himlNormal) himlp=&infoPtr->himlNormal; /* get the image list */ imageIndex = wineItem->iImage; if ( (wineItem->state & TVIS_SELECTED) && (wineItem->iSelectedImage)) { /* The item is curently selected */ if (wineItem->iSelectedImage == I_IMAGECALLBACK) TREEVIEW_SendDispInfoNotify (hwnd, wineItem, TVN_GETDISPINFOA, TVIF_SELECTEDIMAGE); imageIndex = wineItem->iSelectedImage; } else { /* The item is not selected */ if (wineItem->iImage == I_IMAGECALLBACK) TREEVIEW_SendDispInfoNotify (hwnd, wineItem, TVN_GETDISPINFOA, TVIF_IMAGE); imageIndex = wineItem->iImage; } if (himlp) { int ovlIdx = 0; if(wineItem->stateMask & TVIS_OVERLAYMASK) ovlIdx = wineItem->state & TVIS_OVERLAYMASK; ImageList_Draw ( *himlp, imageIndex, hdc, xpos-2, r.top+1, ILD_NORMAL|ovlIdx); ImageList_GetIconSize (*himlp, &cx, &cy); wineItem->bitmap.left=xpos-2; wineItem->bitmap.right=xpos-2+cx; wineItem->bitmap.top=r.top+1; wineItem->bitmap.bottom=r.top+1+cy; xpos+=cx; } } /* * Display the text associated with this item */ r.left=xpos; if ((wineItem->mask & TVIF_TEXT) && (wineItem->pszText)) { COLORREF oldBkColor = 0; COLORREF oldTextColor = 0; INT oldBkMode; r.left += 3; r.right -= 3; wineItem->text.left = r.left; wineItem->text.right = r.right; wineItem->text.top = r.top; wineItem->text.bottom= r.bottom; if (wineItem->pszText== LPSTR_TEXTCALLBACKA) { TRACE("LPSTR_TEXTCALLBACK\n"); TREEVIEW_SendDispInfoNotify (hwnd, wineItem, TVN_GETDISPINFOA, TVIF_TEXT); } /* Yep, there are some things that need to be straightened out here. Removing the comments around the setTextColor does not give the right results. Dito FillRect. */ /* GetTextExtentPoint32A (hdc, wineItem->pszText, strlen (wineItem->pszText), &size); */ /* FillRect ( hdc, &wineItem->text, GetSysColorBrush (infoPtr->clrBk)); */ if (!(cditem & CDRF_NOTIFYPOSTPAINT) && (wineItem->state & (TVIS_SELECTED | TVIS_DROPHILITED)) ) { oldBkMode = SetBkMode (hdc, OPAQUE); oldBkColor = SetBkColor (hdc, GetSysColor( COLOR_HIGHLIGHT)); oldTextColor = SetTextColor(hdc, GetSysColor( COLOR_HIGHLIGHTTEXT)); } else { oldBkMode = SetBkMode (hdc, TRANSPARENT); oldBkColor = SetBkColor (hdc, infoPtr->clrBk); /* oldTextColor = SetTextColor(hdc, infoPtr->clrText); */ } /* Draw it */ DrawTextA ( hdc, wineItem->pszText, lstrlenA(wineItem->pszText), &wineItem->text, uTextJustify | DT_VCENTER | DT_SINGLELINE ); /* Obtain the text coordinate */ DrawTextA ( hdc, wineItem->pszText, lstrlenA(wineItem->pszText), &wineItem->text, uTextJustify | DT_VCENTER | DT_SINGLELINE | DT_CALCRECT); /* Restore the hdc state */ SetTextColor( hdc, oldTextColor); if (oldBkMode != TRANSPARENT) SetBkMode(hdc, oldBkMode); if (wineItem->state & (TVIS_SELECTED | TVIS_DROPHILITED)) SetBkColor (hdc, oldBkColor); /* Draw the box arround the selected item */ if (wineItem->state & TVIS_SELECTED ) { HPEN hNewPen = CreatePen(PS_DOT, 0, GetSysColor(COLOR_WINDOWTEXT) ); HPEN hOldPen = SelectObject( hdc, hNewPen ); POINT points[4]; points[0].x = wineItem->text.left-1; points[0].y = wineItem->text.top+1; points[1].x = wineItem->text.right; points[1].y = wineItem->text.top+1; points[2].x = wineItem->text.right; points[2].y = wineItem->text.bottom; points[3].x = wineItem->text.left-1; points[3].y = wineItem->text.bottom; Polyline (hdc,points,4); DeleteObject(hNewPen); SelectObject(hdc, hOldPen); } } /* Draw insertion mark if necessary */ if (infoPtr->insertMarkItem) TRACE ("item:%d,mark:%d\n", (int)wineItem->hItem, (int) infoPtr->insertMarkItem); if (wineItem->hItem==infoPtr->insertMarkItem) { HPEN hNewPen, hOldPen; int offset; hNewPen = CreatePen(PS_SOLID, 2, infoPtr->clrInsertMark); hOldPen = SelectObject( hdc, hNewPen ); if (infoPtr->insertBeforeorAfter) offset=wineItem->text.top+1; else offset=wineItem->text.bottom-1; MoveToEx (hdc, wineItem->text.left, offset-3, NULL); LineTo (hdc, wineItem->text.left, offset+3); MoveToEx (hdc, wineItem->text.left, offset, NULL); LineTo (hdc, r.right-2, offset); MoveToEx (hdc, r.right-2, offset+3, NULL); LineTo (hdc, r.right-2, offset-3); DeleteObject(hNewPen); SelectObject(hdc, hOldPen); } if (cditem & CDRF_NOTIFYPOSTPAINT) { cditem=TREEVIEW_SendCustomDrawItemNotify (hwnd, hdc, wineItem, CDDS_ITEMPOSTPAINT); TRACE("postpaint:cditem-app returns 0x%x\n",cditem); } SelectObject (hdc, hOldFont); } static LRESULT TREEVIEW_GetItemRect (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TREEVIEW_ITEM *wineItem; HTREEITEM *iItem; LPRECT lpRect = (LPRECT)lParam; HDC hdc; TRACE("\n"); /* * validate parameters */ if (lpRect == NULL) return FALSE; if (infoPtr->Timer & TV_REFRESH_TIMER_SET) { hdc = GetDC (hwnd); TREEVIEW_Refresh (hwnd, hdc); /* we want a rect for the current view */ ReleaseDC(hwnd,hdc); } /* * retrieve the item ptr */ iItem = (HTREEITEM *) lParam; wineItem = TREEVIEW_ValidItem (infoPtr, *iItem); if ((!wineItem) || (!wineItem->visible)) return FALSE; /* * If wParam is TRUE return the text size otherwise return * the whole item size */ if ((INT) wParam) { lpRect->left = wineItem->text.left; lpRect->right = wineItem->text.right; lpRect->bottom = wineItem->text.bottom; lpRect->top = wineItem->text.top; } else { lpRect->left = wineItem->rect.left; lpRect->right = wineItem->rect.right; lpRect->bottom = wineItem->rect.bottom; lpRect->top = wineItem->rect.top; } TRACE("[L:%d R:%d T:%d B:%d]\n", lpRect->left,lpRect->right, lpRect->top,lpRect->bottom); return TRUE; } static LRESULT TREEVIEW_GetVisibleCount (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); return (LRESULT) infoPtr->uVisibleHeight / infoPtr->uRealItemHeight; } static LRESULT TREEVIEW_SetItemA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TREEVIEW_ITEM *wineItem; TVITEMEXA *tvItem; INT iItem,len; tvItem=(LPTVITEMEXA) lParam; iItem=(INT)tvItem->hItem; TRACE("item %d,mask %x\n",iItem,tvItem->mask); wineItem = TREEVIEW_ValidItem (infoPtr, (HTREEITEM)iItem); if (!wineItem) return FALSE; if (tvItem->mask & TVIF_CHILDREN) { wineItem->cChildren=tvItem->cChildren; } if (tvItem->mask & TVIF_IMAGE) { wineItem->iImage=tvItem->iImage; } if (tvItem->mask & TVIF_INTEGRAL) { wineItem->iIntegral=tvItem->iIntegral; } if (tvItem->mask & TVIF_PARAM) { wineItem->lParam=tvItem->lParam; } if (tvItem->mask & TVIF_SELECTEDIMAGE) { wineItem->iSelectedImage=tvItem->iSelectedImage; } if (tvItem->mask & TVIF_STATE) { TRACE ("prevstate,state,mask:%x,%x,%x\n",wineItem->state,tvItem->state, tvItem->stateMask); wineItem->state&= ~tvItem->stateMask; wineItem->state|= (tvItem->state & tvItem->stateMask); wineItem->stateMask|= tvItem->stateMask; } if (tvItem->mask & TVIF_TEXT) { if (tvItem->pszText!=LPSTR_TEXTCALLBACKA) { len=lstrlenA (tvItem->pszText); if (len>wineItem->cchTextMax) wineItem->pszText= COMCTL32_ReAlloc (wineItem->pszText, len+1); lstrcpynA (wineItem->pszText, tvItem->pszText,len+1); } else { if (wineItem->cchTextMax) { COMCTL32_Free (wineItem->pszText); wineItem->cchTextMax=0; } wineItem->pszText=LPSTR_TEXTCALLBACKA; } } wineItem->mask |= tvItem->mask; return TRUE; } static LRESULT TREEVIEW_GetItemState (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TREEVIEW_ITEM *wineItem; TRACE("\n"); wineItem = TREEVIEW_ValidItem (infoPtr, (HTREEITEM)wParam); if (!wineItem) return 0; return (wineItem->state & lParam); } static void TREEVIEW_Refresh (HWND hwnd, HDC hdc) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TEXTMETRICA tm; HBRUSH hbrBk; RECT rect; INT iItem, indent, x, y, height, itemHeight; INT viewtop,viewbottom,viewleft,viewright; TREEVIEW_ITEM *wineItem, *prevItem; TRACE("\n"); if (infoPtr->Timer & TV_REFRESH_TIMER_SET) { KillTimer (hwnd, TV_REFRESH_TIMER); infoPtr->Timer &= ~TV_REFRESH_TIMER_SET; } GetClientRect (hwnd, &rect); if ((rect.left-rect.right ==0) || (rect.top-rect.bottom==0)) return; infoPtr->cdmode=TREEVIEW_SendCustomDrawNotify(hwnd,CDDS_PREPAINT,hdc,rect); if (infoPtr->cdmode==CDRF_SKIPDEFAULT) return; infoPtr->uVisibleHeight= rect.bottom-rect.top; infoPtr->uVisibleWidth= rect.right-rect.left; viewtop=infoPtr->cy; viewbottom=infoPtr->cy + rect.bottom-rect.top; viewleft=infoPtr->cx; viewright=infoPtr->cx + rect.right-rect.left; TRACE("[%d %d %d %d]\n",viewtop,viewbottom,viewleft,viewright); /* draw background */ hbrBk = CreateSolidBrush (infoPtr->clrBk); FillRect(hdc, &rect, hbrBk); DeleteObject(hbrBk); ImageList_GetIconSize (infoPtr->himlNormal, &x, &itemHeight); if (infoPtr->uItemHeight>itemHeight) itemHeight=infoPtr->uItemHeight; GetTextMetricsA (hdc, &tm); if ((tm.tmHeight + tm.tmExternalLeading) > itemHeight) itemHeight=tm.tmHeight + tm.tmExternalLeading; infoPtr->uRealItemHeight=itemHeight; iItem=(INT)infoPtr->TopRootItem; infoPtr->firstVisible=0; wineItem=NULL; indent=0; x=y=0; while (iItem) { prevItem=wineItem; wineItem= & infoPtr->items[iItem]; wineItem->iLevel=indent; /* FIXME: remove this in later stage */ /* if (wineItem->pszText!=LPSTR_TEXTCALLBACK32A) TRACE (treeview, "%d %d [%d %d %d %d] (%s)\n",y,x, wineItem->rect.top, wineItem->rect.bottom, wineItem->rect.left, wineItem->rect.right, wineItem->pszText); else TRACE (treeview, "%d [%d %d %d %d] (CALLBACK)\n", wineItem->hItem, wineItem->rect.top, wineItem->rect.bottom, wineItem->rect.left, wineItem->rect.right); */ height=itemHeight * wineItem->iIntegral +1; if ((y >= viewtop) && (y <= viewbottom) && (x >= viewleft ) && (x <= viewright)) { wineItem->visible = TRUE; wineItem->rect.top = y - infoPtr->cy + rect.top; wineItem->rect.bottom = wineItem->rect.top + height ; wineItem->rect.left = x - infoPtr->cx + rect.left; wineItem->rect.right = rect.right; if (!infoPtr->firstVisible) infoPtr->firstVisible=wineItem->hItem; TREEVIEW_DrawItem (hwnd, hdc, wineItem); } else { wineItem->visible = FALSE; wineItem->rect.left = wineItem->rect.top = 0; wineItem->rect.right= wineItem->rect.bottom = 0; wineItem->text.left = wineItem->text.top = 0; wineItem->text.right= wineItem->text.bottom = 0; } /* look up next item */ if ((wineItem->firstChild) && (wineItem->state & TVIS_EXPANDED)) { iItem=(INT)wineItem->firstChild; indent++; x+=infoPtr->uIndent; if (x>infoPtr->uTotalWidth) infoPtr->uTotalWidth=x; } else { iItem=(INT)wineItem->sibling; while ((!iItem) && (indent>0)) { indent--; x-=infoPtr->uIndent; wineItem=&infoPtr->items[(INT)wineItem->parent]; iItem=(INT)wineItem->sibling; } } y +=height; } /* while */ /* FIXME: infoPtr->uTotalWidth should also take item label into account */ /* FIXME: or should query item sizes (ie check CDRF_NEWFONT) */ infoPtr->uTotalHeight=y; if (y >= (viewbottom-viewtop)) { if (!(infoPtr->uInternalStatus & TV_VSCROLL)) ShowScrollBar (hwnd, SB_VERT, TRUE); infoPtr->uInternalStatus |=TV_VSCROLL; SetScrollRange (hwnd, SB_VERT, 0, y - infoPtr->uVisibleHeight, FALSE); SetScrollPos (hwnd, SB_VERT, infoPtr->cy, TRUE); } else { if (infoPtr->uInternalStatus & TV_VSCROLL) ShowScrollBar (hwnd, SB_VERT, FALSE); infoPtr->uInternalStatus &= ~TV_VSCROLL; } if (infoPtr->cdmode & CDRF_NOTIFYPOSTPAINT) infoPtr->cdmode=TREEVIEW_SendCustomDrawNotify (hwnd, CDDS_POSTPAINT, hdc, rect); TRACE("done\n"); } static LRESULT TREEVIEW_HandleTimer (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TRACE(" %d\n",wParam); switch (wParam) { case TV_REFRESH_TIMER: KillTimer (hwnd, TV_REFRESH_TIMER); infoPtr->Timer &= ~TV_REFRESH_TIMER_SET; InvalidateRect(hwnd, NULL, FALSE); return 0; case TV_EDIT_TIMER: KillTimer (hwnd, TV_EDIT_TIMER); infoPtr->Timer &= ~TV_EDIT_TIMER_SET; return 0; default: ERR("got unknown timer\n"); } return 1; } static void TREEVIEW_QueueRefresh (HWND hwnd) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TRACE("\n"); if (infoPtr->Timer & TV_REFRESH_TIMER_SET) { KillTimer (hwnd, TV_REFRESH_TIMER); } SetTimer (hwnd, TV_REFRESH_TIMER, TV_REFRESH_DELAY, 0); infoPtr->Timer|=TV_REFRESH_TIMER_SET; } static LRESULT TREEVIEW_GetItemA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); LPTVITEMEXA tvItem; TREEVIEW_ITEM *wineItem; INT iItem; tvItem=(LPTVITEMEXA) lParam; iItem=(INT)tvItem->hItem; wineItem = TREEVIEW_ValidItem (infoPtr, (HTREEITEM)iItem); if (!wineItem) return FALSE; if (tvItem->mask & TVIF_CHILDREN) { if (TVIF_CHILDREN==I_CHILDRENCALLBACK) FIXME("I_CHILDRENCALLBACK not supported\n"); tvItem->cChildren=wineItem->cChildren; } if (tvItem->mask & TVIF_HANDLE) { tvItem->hItem=wineItem->hItem; } if (tvItem->mask & TVIF_IMAGE) { tvItem->iImage=wineItem->iImage; } if (tvItem->mask & TVIF_INTEGRAL) { tvItem->iIntegral=wineItem->iIntegral; } /* undocumented: windows ignores TVIF_PARAM and * always sets lParam */ tvItem->lParam=wineItem->lParam; if (tvItem->mask & TVIF_SELECTEDIMAGE) { tvItem->iSelectedImage=wineItem->iSelectedImage; } if (tvItem->mask & TVIF_STATE) { tvItem->state=wineItem->state & tvItem->stateMask; } if (tvItem->mask & TVIF_TEXT) { if (wineItem->pszText == LPSTR_TEXTCALLBACKA) { tvItem->pszText = LPSTR_TEXTCALLBACKA; /* FIXME:send notification? */ ERR(" GetItem called with LPSTR_TEXTCALLBACK\n"); } else if (wineItem->pszText) { lstrcpynA (tvItem->pszText, wineItem->pszText, tvItem->cchTextMax); } } TRACE("item %d<%p>, txt %p, img %p, action %x\n", iItem, tvItem, tvItem->pszText, &tvItem->iImage, tvItem->mask); return TRUE; } /* FIXME: check implementation of TVGN_NEXT/TVGN_NEXTVISIBLE */ static LRESULT TREEVIEW_GetNextItem (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TREEVIEW_ITEM *wineItem, *returnItem; INT iItem = (INT)lParam, retval = 0, flag = (INT)wParam; HDC hdc; switch (flag) { case TVGN_ROOT: retval = (INT)infoPtr->TopRootItem; break; case TVGN_CARET: retval = (INT)infoPtr->selectedItem; break; case TVGN_FIRSTVISIBLE: /* FIXME:we should only recalculate, not redraw */ hdc = GetDC (hwnd); TREEVIEW_Refresh (hwnd, hdc); ReleaseDC(hwnd,hdc); retval = (INT)infoPtr->firstVisible; break; case TVGN_DROPHILITE: retval = (INT)infoPtr->dropItem; break; case TVGN_NEXT: wineItem = TREEVIEW_ValidItem (infoPtr, (HTREEITEM)iItem); retval = wineItem ? (INT)wineItem->sibling : 0; break; case TVGN_PREVIOUS: wineItem = TREEVIEW_ValidItem (infoPtr, (HTREEITEM)iItem); retval = wineItem ? (INT)wineItem->upsibling : 0; break; case TVGN_PARENT: wineItem = TREEVIEW_ValidItem (infoPtr, (HTREEITEM)iItem); retval = wineItem ? (INT)wineItem->parent : 0; break; case TVGN_CHILD: wineItem = TREEVIEW_ValidItem (infoPtr, (HTREEITEM)iItem); retval = wineItem ? (INT)wineItem->firstChild : 0; break; case TVGN_LASTVISIBLE: if((wineItem = TREEVIEW_ValidItem (infoPtr, (HTREEITEM)iItem))) { returnItem = TREEVIEW_GetLastListItem (infoPtr,wineItem); retval = returnItem ? (INT)returnItem->hItem : 0; } break; case TVGN_NEXTVISIBLE: if((wineItem = TREEVIEW_ValidItem (infoPtr, (HTREEITEM)iItem))) { returnItem = TREEVIEW_GetNextListItem (infoPtr,wineItem); retval = returnItem ? (INT)returnItem->hItem : 0; } break; case TVGN_PREVIOUSVISIBLE: if((wineItem = TREEVIEW_ValidItem (infoPtr, (HTREEITEM)iItem))) { returnItem = TREEVIEW_GetPrevListItem (infoPtr, wineItem); retval = returnItem ? (INT)returnItem->hItem : 0; } break; default: FIXME("Unknown msg %x,item %x\n", flag,iItem); break; } TRACE("flags %x, item %d returns %d\n", flag, iItem, retval); return retval; } static LRESULT TREEVIEW_GetCount (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TRACE(" %d\n",infoPtr->uNumItems); return (LRESULT) infoPtr->uNumItems; } /*************************************************************************** * This method does the chaining of the insertion of a treeview item * before an item. * If parent is NULL, we're inserting at the root of the list. */ static void TREEVIEW_InsertBefore( TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *newItem, TREEVIEW_ITEM *sibling, TREEVIEW_ITEM *parent) { HTREEITEM siblingHandle = 0; HTREEITEM upSiblingHandle = 0; TREEVIEW_ITEM *upSibling = NULL; if (newItem == NULL) ERR("NULL newItem, impossible condition\n"); if (sibling != NULL) /* Insert before this sibling for this parent */ { /* Store the new item sibling up sibling and sibling tem handle */ siblingHandle = sibling->hItem; upSiblingHandle = sibling->upsibling; /* As well as a pointer to the upsibling sibling object */ if ( (INT)sibling->upsibling != 0 ) upSibling = &infoPtr->items[(INT)sibling->upsibling]; /* Adjust the sibling pointer */ sibling->upsibling = newItem->hItem; /* Adjust the new item pointers */ newItem->upsibling = upSiblingHandle; newItem->sibling = siblingHandle; /* Adjust the up sibling pointer */ if ( upSibling != NULL ) upSibling->sibling = newItem->hItem; else /* this item is the first child of this parent, adjust parent pointers */ if (parent) parent->firstChild = newItem->hItem; else infoPtr->TopRootItem= newItem->hItem; } else /* Insert as first child of this parent */ if (parent) parent->firstChild = newItem->hItem; } /*************************************************************************** * This method does the chaining of the insertion of a treeview item * after an item. * If parent is NULL, we're inserting at the root of the list. */ static void TREEVIEW_InsertAfter( TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *newItem, TREEVIEW_ITEM *upSibling, TREEVIEW_ITEM *parent) { HTREEITEM upSiblingHandle = 0; HTREEITEM siblingHandle = 0; TREEVIEW_ITEM *sibling = NULL; if (newItem == NULL) ERR("NULL newItem, impossible condition\n"); if (upSibling != NULL) /* Insert after this upsibling for this parent */ { /* Store the new item up sibling and sibling item handle */ upSiblingHandle = upSibling->hItem; siblingHandle = upSibling->sibling; /* As well as a pointer to the upsibling sibling object */ if ( (INT)upSibling->sibling != 0 ) sibling = &infoPtr->items[(INT)upSibling->sibling]; /* Adjust the up sibling pointer */ upSibling->sibling = newItem->hItem; /* Adjust the new item pointers */ newItem->upsibling = upSiblingHandle; newItem->sibling = siblingHandle; /* Adjust the sibling pointer */ if ( sibling != NULL ) sibling->upsibling = newItem->hItem; /* else newItem is the last of the level, nothing else to do */ } else /* Insert as first child of this parent */ if (parent) parent->firstChild = newItem->hItem; } /*************************************************************************** * Forward the DPA local callback to the treeview owner callback */ static INT WINAPI TREEVIEW_CallBackCompare( LPVOID first, LPVOID second, LPARAM tvInfoPtr) { /* Forward the call to the client define callback */ TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr((HWND)tvInfoPtr); return (infoPtr->pCallBackSort->lpfnCompare)( ((TREEVIEW_ITEM*)first)->lParam, ((TREEVIEW_ITEM*)second)->lParam, infoPtr->pCallBackSort->lParam); } /*************************************************************************** * Treeview native sort routine: sort on item text. */ static INT WINAPI TREEVIEW_SortOnName ( LPVOID first, LPVOID second, LPARAM tvInfoPtr) { HWND hwnd=(HWND) tvInfoPtr; char *txt1, *txt2; TREEVIEW_ITEM *item; item=(TREEVIEW_ITEM *) first; if (item->pszText==LPSTR_TEXTCALLBACKA) { TREEVIEW_SendDispInfoNotify (hwnd, item, TVN_GETDISPINFOA, TVIF_TEXT); } txt1=item->pszText; item=(TREEVIEW_ITEM *) second; if (item->pszText==LPSTR_TEXTCALLBACKA) { TREEVIEW_SendDispInfoNotify (hwnd, item, TVN_GETDISPINFOA, TVIF_TEXT); } txt2=item->pszText; return -strcmp (txt1,txt2); } /*************************************************************************** * Setup the treeview structure with regards of the sort method * and sort the children of the TV item specified in lParam * fRecurse: currently unused. Should be zero. * parent: if pSort!=NULL, should equal pSort->hParent. * otherwise, item which child items are to be sorted. * pSort: sort method info. if NULL, sort on item text. * if non-NULL, sort on item's lParam content, and let the * application decide what that means. See also TVM_SORTCHILDRENCB. */ static LRESULT WINAPI TREEVIEW_Sort ( HWND hwnd, BOOL fRecurse, HTREEITEM parent, LPTVSORTCB pSort ) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TREEVIEW_ITEM *sortMe = NULL; /* Node for which we sort the children */ /* Obtain the TVSORTBC struct */ infoPtr->pCallBackSort = pSort; /* undocumented feature: TVI_ROOT means `sort the whole tree' */ if (parent==TVI_ROOT) parent=infoPtr->TopRootItem; /* Check for a valid handle to the parent item */ if (!TREEVIEW_ValidItem(infoPtr, parent)) { ERR ("invalid item hParent=%x\n", (INT)parent); return FALSE; } /* Obtain the parent node to sort */ sortMe = &infoPtr->items[ (INT)parent ]; /* Make sure there is something to sort */ if ( sortMe->cChildren > 1 ) { /* pointer organization */ HDPA sortList = DPA_Create(sortMe->cChildren); HTREEITEM itemHandle = sortMe->firstChild; TREEVIEW_ITEM *itemPtr = & infoPtr->items[ (INT)itemHandle ]; /* TREEVIEW_ITEM rechaining */ INT count = 0; VOID *item = 0; VOID *nextItem = 0; VOID *prevItem = 0; /* Build the list of item to sort */ do { DPA_InsertPtr( sortList, /* the list */ sortMe->cChildren+1, /* force the insertion to be an append */ itemPtr); /* the ptr to store */ /* Get the next sibling */ itemHandle = itemPtr->sibling; itemPtr = & infoPtr->items[ (INT)itemHandle ]; } while ( itemHandle != NULL ); /* let DPA perform the sort activity */ if (pSort) DPA_Sort( sortList, /* what */ TREEVIEW_CallBackCompare, /* how */ hwnd); /* owner */ else DPA_Sort ( sortList, /* what */ TREEVIEW_SortOnName, /* how */ hwnd); /* owner */ /* * Reorganized TREEVIEW_ITEM structures. * Note that we know we have at least two elements. */ /* Get the first item and get ready to start... */ item = DPA_GetPtr(sortList, count++); while ( (nextItem = DPA_GetPtr(sortList, count++)) != NULL ) { /* link the two current item toghether */ ((TREEVIEW_ITEM*)item)->sibling = ((TREEVIEW_ITEM*)nextItem)->hItem; ((TREEVIEW_ITEM*)nextItem)->upsibling = ((TREEVIEW_ITEM*)item)->hItem; if (prevItem == NULL) /* this is the first item, update the parent */ { sortMe->firstChild = ((TREEVIEW_ITEM*)item)->hItem; ((TREEVIEW_ITEM*)item)->upsibling = NULL; } else /* fix the back chaining */ { ((TREEVIEW_ITEM*)item)->upsibling = ((TREEVIEW_ITEM*)prevItem)->hItem; } /* get ready for the next one */ prevItem = item; item = nextItem; } /* the last item is pointed to by item and never has a sibling */ ((TREEVIEW_ITEM*)item)->sibling = NULL; DPA_Destroy(sortList); return TRUE; } return FALSE; } /*************************************************************************** * Setup the treeview structure with regards of the sort method * and sort the children of the TV item specified in lParam */ static LRESULT WINAPI TREEVIEW_SortChildrenCB( HWND hwnd, WPARAM wParam, LPARAM lParam ) { LPTVSORTCB pSort=(LPTVSORTCB) lParam; return TREEVIEW_Sort (hwnd, wParam, pSort->hParent, pSort); } /*************************************************************************** * Sort the children of the TV item specified in lParam. */ static LRESULT WINAPI TREEVIEW_SortChildren ( HWND hwnd, WPARAM wParam, LPARAM lParam) { return TREEVIEW_Sort (hwnd, (BOOL) wParam, (HTREEITEM) lParam, NULL); } /* the method used below isn't the most memory-friendly, but it avoids a lot of memory reallocations */ /* BTW: we waste handle 0; 0 is not an allowed handle. */ static LRESULT TREEVIEW_InsertItemA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TVINSERTSTRUCTA *ptdi; TVITEMEXA *tvItem; TREEVIEW_ITEM *wineItem, *parentItem, *prevsib, *sibItem; INT iItem,listItems,i,len; /* Item to insert */ ptdi = (LPTVINSERTSTRUCTA) lParam; /* check if memory is available */ if (infoPtr->uNumPtrsAlloced==0) { infoPtr->items = COMCTL32_Alloc (TVITEM_ALLOC*sizeof (TREEVIEW_ITEM)); infoPtr->freeList= COMCTL32_Alloc ((1+(TVITEM_ALLOC>>5)) * sizeof (INT)); infoPtr->uNumPtrsAlloced=TVITEM_ALLOC; infoPtr->TopRootItem=(HTREEITEM)1; } /* * Reallocate contiguous space for items */ if (infoPtr->uNumItems == (infoPtr->uNumPtrsAlloced-1) ) { TREEVIEW_ITEM *oldItems = infoPtr->items; INT *oldfreeList = infoPtr->freeList; infoPtr->uNumPtrsAlloced*=2; infoPtr->items = COMCTL32_Alloc (infoPtr->uNumPtrsAlloced*sizeof (TREEVIEW_ITEM)); infoPtr->freeList= COMCTL32_Alloc ((1+(infoPtr->uNumPtrsAlloced>>5))*sizeof (INT)); memcpy (&infoPtr->items[0], &oldItems[0], infoPtr->uNumPtrsAlloced/2 * sizeof(TREEVIEW_ITEM)); memcpy (&infoPtr->freeList[0], &oldfreeList[0], (infoPtr->uNumPtrsAlloced>>6) * sizeof(INT)); COMCTL32_Free (oldItems); COMCTL32_Free (oldfreeList); } /* * Reset infoPtr structure with new stat according to current TV picture */ iItem=0; infoPtr->uNumItems++; if ((INT)infoPtr->uMaxHandle==(infoPtr->uNumItems-1)) { iItem=infoPtr->uNumItems; infoPtr->uMaxHandle = (HTREEITEM)((INT)infoPtr->uMaxHandle + 1); } else { /* check freelist */ for (i=0; i<=infoPtr->uNumPtrsAlloced>>5; i++) { if (infoPtr->freeList[i]) { iItem=ffs (infoPtr->freeList[i])-1; tv_clear_bit(iItem,&infoPtr->freeList[i]); iItem+=i<<5; break; } } } if (TRACE_ON(treeview)) { for (i=0; i<=infoPtr->uNumPtrsAlloced>>5; i++) TRACE("%8x\n",infoPtr->freeList[i]); } if (!iItem) ERR("Argh -- can't find free item.\n"); /* * Find the parent item of the new item */ tvItem= & ptdi->DUMMYUNIONNAME.itemex; wineItem=& infoPtr->items[iItem]; if ((ptdi->hParent==TVI_ROOT) || (ptdi->hParent==0)) { parentItem = NULL; wineItem->parent = 0; sibItem = &infoPtr->items [(INT)infoPtr->TopRootItem]; listItems = infoPtr->uNumItems; } else { parentItem = &infoPtr->items[(INT)ptdi->hParent]; /* Do the insertion here it if it's the only item of this parent */ if (!parentItem->firstChild) parentItem->firstChild=(HTREEITEM)iItem; wineItem->parent = ptdi->hParent; sibItem = &infoPtr->items [(INT)parentItem->firstChild]; listItems = parentItem->cChildren; parentItem->cChildren++; } /* NOTE: I am moving some setup of the wineItem object that was initialy * done at the end of the function since some of the values are * required by the Callback sorting */ if (tvItem->mask & TVIF_TEXT) { /* * Setup the item text stuff here since it's required by the Sort method * when the insertion are ordered */ if (tvItem->pszText!=LPSTR_TEXTCALLBACKA) { TRACE("(%p,%s)\n", &tvItem->pszText, tvItem->pszText); len = lstrlenA (tvItem->pszText)+1; wineItem->pszText= COMCTL32_Alloc (len+1); lstrcpyA (wineItem->pszText, tvItem->pszText); wineItem->cchTextMax=len; } else { TRACE("LPSTR_TEXTCALLBACK\n"); wineItem->pszText = LPSTR_TEXTCALLBACKA; wineItem->cchTextMax = 0; } } if (tvItem->mask & TVIF_PARAM) wineItem->lParam=tvItem->lParam; wineItem->upsibling=0; /* needed in case we're the first item in a list */ wineItem->sibling=0; wineItem->firstChild=0; wineItem->hItem=(HTREEITEM)iItem; if (listItems!=0) { prevsib=NULL; switch ((DWORD) ptdi->hInsertAfter) { case (DWORD) TVI_FIRST: if (sibItem==wineItem) break; if (wineItem->parent) { wineItem->sibling=parentItem->firstChild; parentItem->firstChild=(HTREEITEM)iItem; } else { wineItem->sibling=infoPtr->TopRootItem; infoPtr->TopRootItem=(HTREEITEM)iItem; } sibItem->upsibling=(HTREEITEM)iItem; break; case (DWORD) TVI_SORT: if (sibItem==wineItem) /* * This item is the first child of the level and it * has already been inserted */ break; else { TREEVIEW_ITEM *aChild; TREEVIEW_ITEM *previousChild = NULL; BOOL bItemInserted = FALSE; if (parentItem) aChild = &infoPtr->items[(INT)parentItem->firstChild]; else aChild = &infoPtr->items[(INT)infoPtr->TopRootItem]; /* lookup the text if using LPSTR_TEXTCALLBACKs */ if (wineItem->pszText==LPSTR_TEXTCALLBACKA) { TREEVIEW_SendDispInfoNotify (hwnd, wineItem, TVN_GETDISPINFOA, TVIF_TEXT); } /* Iterate the parent children to see where we fit in */ while ( aChild != NULL ) { INT comp; /* lookup the text if using LPSTR_TEXTCALLBACKs */ if (aChild->pszText==LPSTR_TEXTCALLBACKA) { TREEVIEW_SendDispInfoNotify (hwnd, aChild, TVN_GETDISPINFOA, TVIF_TEXT); } comp = strcmp(wineItem->pszText, aChild->pszText); if ( comp < 0 ) /* we are smaller than the current one */ { TREEVIEW_InsertBefore(infoPtr, wineItem, aChild, parentItem); bItemInserted = TRUE; break; } else if ( comp > 0 ) /* we are bigger than the current one */ { previousChild = aChild; aChild = (aChild->sibling == 0) /* This will help us to exit */ ? NULL /* if there is no more sibling */ : &infoPtr->items[(INT)aChild->sibling]; /* Look at the next item */ continue; } else if ( comp == 0 ) { /* * An item with this name is already existing, therefore, * we add after the one we found */ TREEVIEW_InsertAfter(infoPtr, wineItem, aChild, parentItem); bItemInserted = TRUE; break; } } /* * we reach the end of the child list and the item as not * yet been inserted, therefore, insert it after the last child. */ if ( (! bItemInserted ) && (aChild == NULL) ) TREEVIEW_InsertAfter(infoPtr, wineItem, previousChild, parentItem); break; } case (DWORD) TVI_LAST: if (sibItem==wineItem) break; while (sibItem->sibling) { prevsib=sibItem; sibItem=&infoPtr->items [(INT)sibItem->sibling]; } sibItem->sibling=(HTREEITEM)iItem; wineItem->upsibling=sibItem->hItem; break; default: while ((sibItem->sibling) && (sibItem->hItem!=ptdi->hInsertAfter)) { prevsib=sibItem; sibItem=&infoPtr->items [(INT)sibItem->sibling]; } if (sibItem->hItem!=ptdi->hInsertAfter) { ERR("tried to insert item after nonexisting handle %d.\n", (INT) ptdi->hInsertAfter); break; } prevsib=sibItem; if (sibItem->sibling) { sibItem=&infoPtr->items [(INT)sibItem->sibling]; sibItem->upsibling=(HTREEITEM)iItem; wineItem->sibling=sibItem->hItem; } prevsib->sibling=(HTREEITEM)iItem; wineItem->upsibling=prevsib->hItem; break; } } /* Fill in info structure */ TRACE("new item %d; parent %d, mask %x\n", iItem, (INT)wineItem->parent,tvItem->mask); wineItem->mask=tvItem->mask; wineItem->iIntegral=1; if (tvItem->mask & TVIF_CHILDREN) { wineItem->cChildren=tvItem->cChildren; if (tvItem->cChildren==I_CHILDRENCALLBACK) FIXME(" I_CHILDRENCALLBACK not supported\n"); } wineItem->expandBox.left = 0; /* Initialize the expandBox */ wineItem->expandBox.top = 0; wineItem->expandBox.right = 0; wineItem->expandBox.bottom = 0; if (tvItem->mask & TVIF_IMAGE) wineItem->iImage=tvItem->iImage; /* If the application sets TVIF_INTEGRAL without supplying a TVITEMEX structure, it's toast */ if (tvItem->mask & TVIF_INTEGRAL) wineItem->iIntegral=tvItem->iIntegral; if (tvItem->mask & TVIF_SELECTEDIMAGE) wineItem->iSelectedImage=tvItem->iSelectedImage; if (tvItem->mask & TVIF_STATE) { TRACE("item state: %x ->%x\n", wineItem->state, tvItem->state); TRACE("statemask: %x ->%x\n", wineItem->stateMask, tvItem->stateMask); wineItem->state=tvItem->state; wineItem->stateMask=tvItem->stateMask; } TREEVIEW_QueueRefresh (hwnd); return (LRESULT) iItem; } static LRESULT TREEVIEW_InsertItemW(HWND hwnd, WPARAM wParam, LPARAM lParam) { TVINSERTSTRUCTW *tvisW; TVINSERTSTRUCTA tvisA; LRESULT lRes; tvisW = (LPTVINSERTSTRUCTW)lParam; tvisA.hParent = tvisW->hParent; tvisA.hInsertAfter = tvisW->hInsertAfter; tvisA.DUMMYUNIONNAME.item.mask = tvisW->DUMMYUNIONNAME.item.mask; tvisA.DUMMYUNIONNAME.item.hItem = tvisW->DUMMYUNIONNAME.item.hItem; tvisA.DUMMYUNIONNAME.item.state = tvisW->DUMMYUNIONNAME.item.state; tvisA.DUMMYUNIONNAME.item.stateMask = tvisW->DUMMYUNIONNAME.item.stateMask; tvisA.DUMMYUNIONNAME.item.cchTextMax = tvisW->DUMMYUNIONNAME.item.cchTextMax; if(tvisW->DUMMYUNIONNAME.item.pszText) { if (tvisW->DUMMYUNIONNAME.item.pszText!=LPSTR_TEXTCALLBACKW) { int len = lstrlenW (tvisW->DUMMYUNIONNAME.item.pszText)+1; tvisA.DUMMYUNIONNAME.item.pszText = COMCTL32_Alloc (len); lstrcpyWtoA (tvisA.DUMMYUNIONNAME.item.pszText, tvisW->DUMMYUNIONNAME.item.pszText ); } else { tvisA.DUMMYUNIONNAME.item.pszText = LPSTR_TEXTCALLBACKA; tvisA.DUMMYUNIONNAME.item.cchTextMax = 0; } } tvisA.DUMMYUNIONNAME.item.iImage = tvisW->DUMMYUNIONNAME.item.iImage; tvisA.DUMMYUNIONNAME.item.iSelectedImage = tvisW->DUMMYUNIONNAME.item.iSelectedImage; tvisA.DUMMYUNIONNAME.item.cChildren = tvisW->DUMMYUNIONNAME.item.cChildren; tvisA.DUMMYUNIONNAME.item.lParam = tvisW->DUMMYUNIONNAME.item.lParam; lRes = TREEVIEW_InsertItemA(hwnd,wParam,(LPARAM)&tvisA); if (tvisA.DUMMYUNIONNAME.item.pszText!=LPSTR_TEXTCALLBACKA) { COMCTL32_Free(tvisA.DUMMYUNIONNAME.item.pszText); } return lRes; } static LRESULT TREEVIEW_DeleteItem (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); INT iItem; TREEVIEW_ITEM *wineItem; TRACE("item = %08lx\n", lParam); if (lParam == (INT)TVI_ROOT) { TREEVIEW_RemoveTree (hwnd); } else { iItem= (INT) lParam; wineItem = TREEVIEW_ValidItem (infoPtr, (HTREEITEM)iItem); if (!wineItem) return FALSE; if (wineItem->pszText==LPSTR_TEXTCALLBACKA) TRACE("LPSTR_TEXTCALLBACK\n"); else TRACE("%s\n",wineItem->pszText); TREEVIEW_RemoveItem (hwnd, wineItem); } TREEVIEW_QueueRefresh (hwnd); return TRUE; } static LRESULT TREEVIEW_GetIndent (HWND hwnd) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TRACE("\n"); return infoPtr->uIndent; } static LRESULT TREEVIEW_SetIndent (HWND hwnd, WPARAM wParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); INT newIndent; TRACE("\n"); newIndent=(INT) wParam; if (newIndent < MINIMUM_INDENT) newIndent=MINIMUM_INDENT; infoPtr->uIndent=newIndent; return 0; } static LRESULT TREEVIEW_GetToolTips (HWND hwnd) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TRACE("\n"); return infoPtr->hwndToolTip; } static LRESULT TREEVIEW_SetToolTips (HWND hwnd, WPARAM wParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); HWND prevToolTip; TRACE("\n"); prevToolTip=infoPtr->hwndToolTip; infoPtr->hwndToolTip= (HWND) wParam; return prevToolTip; } static LRESULT CALLBACK TREEVIEW_GetEditControl (HWND hwnd) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); return infoPtr->hwndEdit; } LRESULT CALLBACK TREEVIEW_Edit_SubclassProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { switch (uMsg) { case WM_ERASEBKGND: { RECT rc; HDC hdc = (HDC) wParam; GetClientRect (hwnd, &rc); Rectangle (hdc, rc.left, rc.top, rc.right, rc.bottom); return -1; } case WM_GETDLGCODE: { return DLGC_WANTARROWS | DLGC_WANTALLKEYS; } case WM_KEYDOWN: if (wParam == VK_ESCAPE) { TREEVIEW_EndEditLabelNow(GetParent(hwnd), (WPARAM)TRUE, 0); return 1; } else if (wParam == VK_RETURN) TREEVIEW_EndEditLabelNow(GetParent(hwnd), (WPARAM)FALSE, 0); break; default: { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(GetParent(hwnd)); if (infoPtr!=NULL) return CallWindowProcA (infoPtr->wpEditOrig, hwnd, uMsg, wParam, lParam); else break; } } return 0; } /* should handle edit control messages here */ static LRESULT TREEVIEW_Command (HWND hwnd, WPARAM wParam, LPARAM lParam) { TRACE("%x %ld\n",wParam, lParam); switch (HIWORD(wParam)) { case EN_UPDATE: { /* * Adjust the edit window size */ TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TREEVIEW_ITEM *editItem = TREEVIEW_ValidItem(infoPtr, infoPtr->editItem); INT iLength = GetWindowTextLengthA(infoPtr->hwndEdit); HDC hdc = GetDC(infoPtr->hwndEdit); TEXTMETRICA tm; if ( GetTextMetricsA(hdc, &tm) ) { LONG newWidth = (iLength * tm.tmAveCharWidth) + 15; SetWindowPos ( infoPtr->hwndEdit, HWND_TOP, editItem->text.left - 2, editItem->text.top - 1, newWidth, editItem->text.bottom - editItem->text.top + 3, SWP_DRAWFRAME ); } ReleaseDC(hwnd, hdc); break; } case EN_KILLFOCUS: /* TREEVIEW_EndEditLabelNow(hwnd, (WPARAM)FALSE, 0); */ break; default: return SendMessageA (GetParent (hwnd), WM_COMMAND, wParam, lParam); } return 0; } static LRESULT TREEVIEW_Size (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); if (infoPtr->bAutoSize) { infoPtr->bAutoSize = FALSE; return 0; } infoPtr->bAutoSize = TRUE; if (wParam == SIZE_RESTORED) { infoPtr->uTotalWidth = LOWORD (lParam); infoPtr->uTotalHeight = HIWORD (lParam); } else { FIXME("WM_SIZE flag %x %lx not handled\n", wParam, lParam); } TREEVIEW_QueueRefresh (hwnd); return 0; } static LRESULT TREEVIEW_StyleChanged (HWND hwnd, WPARAM wParam, LPARAM lParam) { HDC hdc; TRACE("(%x %lx)\n",wParam,lParam); hdc = GetDC (hwnd); TREEVIEW_Refresh (hwnd, hdc); ReleaseDC(hwnd,hdc); return 0; } static LRESULT TREEVIEW_Create (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr; DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); LOGFONTA logFont; TEXTMETRICA tm; HDC hdc; TRACE("wnd %x, style %lx\n",hwnd,dwStyle); /* allocate memory for info structure */ infoPtr = (TREEVIEW_INFO *) COMCTL32_Alloc (sizeof(TREEVIEW_INFO)); SetWindowLongA( hwnd, 0, (DWORD)infoPtr); if (infoPtr == NULL) { ERR("could not allocate info memory!\n"); return 0; } if ((TREEVIEW_INFO*) GetWindowLongA( hwnd, 0) != infoPtr) { ERR("pointer assignment error!\n"); return 0; } hdc=GetDC (hwnd); /* set default settings */ infoPtr->uInternalStatus=0; infoPtr->uNumItems=0; infoPtr->clrBk = GetSysColor (COLOR_WINDOW); infoPtr->clrText = GetSysColor (COLOR_WINDOWTEXT); infoPtr->clrLine = GetSysColor (COLOR_WINDOWTEXT); infoPtr->clrInsertMark = GetSysColor (COLOR_BTNTEXT); infoPtr->cy = 0; infoPtr->cx = 0; infoPtr->uIndent = 15; infoPtr->himlNormal = NULL; infoPtr->himlState = NULL; infoPtr->uItemHeight = -1; GetTextMetricsA (hdc, &tm); infoPtr->hFont = GetStockObject (DEFAULT_GUI_FONT); GetObjectA (infoPtr->hFont, sizeof (LOGFONTA), &logFont); logFont.lfWeight=FW_BOLD; infoPtr->hBoldFont = CreateFontIndirectA (&logFont); infoPtr->items = NULL; infoPtr->selectedItem=0; infoPtr->clrText=-1; /* use system color */ infoPtr->dropItem=0; infoPtr->insertMarkItem=0; infoPtr->insertBeforeorAfter=0; infoPtr->pCallBackSort=NULL; infoPtr->uScrollTime = 300; /* milliseconds */ infoPtr->wpEditOrig = NULL; /* we haven't subclassed anything yet */ infoPtr->hwndToolTip=0; if (!(dwStyle & TVS_NOTOOLTIPS)) { /* Create tooltip control */ TTTOOLINFOA ti; infoPtr->hwndToolTip = CreateWindowExA (0, TOOLTIPS_CLASSA, NULL, 0, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, hwnd, 0, 0, 0); /* Send NM_TOOLTIPSCREATED notification */ if (infoPtr->hwndToolTip) { NMTOOLTIPSCREATED nmttc; nmttc.hdr.hwndFrom = hwnd; nmttc.hdr.idFrom = GetWindowLongA( hwnd, GWL_ID); nmttc.hdr.code = NM_TOOLTIPSCREATED; nmttc.hwndToolTips = infoPtr->hwndToolTip; SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM) GetWindowLongA( hwnd, GWL_ID), (LPARAM)&nmttc); } ZeroMemory (&ti, sizeof(TTTOOLINFOA)); ti.cbSize = sizeof(TTTOOLINFOA); ti.uFlags = TTF_IDISHWND | TTF_TRACK | TTF_TRANSPARENT ; ti.hwnd = hwnd; ti.uId = 0; ti.lpszText = "Test"; /* LPSTR_TEXTCALLBACK; */ SetRectEmpty (&ti.rect); SendMessageA (infoPtr->hwndToolTip, TTM_ADDTOOLA, 0, (LPARAM)&ti); } infoPtr->hwndEdit = CreateWindowExA ( WS_EX_LEFT, "EDIT", 0, WS_CHILD | WS_BORDER | ES_AUTOHSCROLL | ES_WANTRETURN | ES_LEFT, 0, 0, 0, 0, hwnd, 0,0,0); /* FIXME: (HMENU)IDTVEDIT,pcs->hInstance,0);*/ SendMessageA ( infoPtr->hwndEdit, WM_SETFONT, infoPtr->hFont, FALSE); infoPtr->wpEditOrig = (WNDPROC)SetWindowLongA ( infoPtr->hwndEdit, GWL_WNDPROC, (LONG) TREEVIEW_Edit_SubclassProc); if (dwStyle & TVS_CHECKBOXES) { HBITMAP hbmLoad; int nIndex; infoPtr->himlState = ImageList_Create (16, 16,ILC_COLOR|ILC_MASK, 15, 1); hbmLoad = LoadBitmapA (COMCTL32_hModule, MAKEINTRESOURCEA(IDT_CHECK)); TRACE ("%x\n",hbmLoad); nIndex = ImageList_AddMasked (infoPtr->himlState, hbmLoad, CLR_DEFAULT); TRACE ("%d\n",nIndex); DeleteObject (hbmLoad); } ReleaseDC (hwnd, hdc); return 0; } static LRESULT TREEVIEW_Destroy (HWND hwnd) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TRACE("\n"); TREEVIEW_RemoveTree (hwnd); SetWindowLongA (hwnd, 0, (DWORD)NULL); if (infoPtr->Timer & TV_REFRESH_TIMER_SET) KillTimer (hwnd, TV_REFRESH_TIMER); if (infoPtr->hwndToolTip) DestroyWindow (infoPtr->hwndToolTip); COMCTL32_Free (infoPtr); return 0; } static LRESULT TREEVIEW_Paint (HWND hwnd, WPARAM wParam, LPARAM lParam) { HDC hdc; PAINTSTRUCT ps; TRACE("\n"); hdc = wParam==0 ? BeginPaint (hwnd, &ps) : (HDC)wParam; TREEVIEW_Refresh (hwnd, hdc); if(!wParam) EndPaint (hwnd, &ps); TRACE("done\n"); return DefWindowProcA (hwnd, WM_PAINT, wParam, lParam); } static LRESULT TREEVIEW_SetFocus (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_SendSimpleNotify (hwnd, NM_SETFOCUS); InvalidateRect(hwnd, NULL, FALSE); return 0; } static LRESULT TREEVIEW_KillFocus (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_SendSimpleNotify (hwnd, NM_KILLFOCUS); InvalidateRect(hwnd, NULL, FALSE); return 0; } static LRESULT TREEVIEW_EraseBackground (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); HBRUSH hBrush = CreateSolidBrush (infoPtr->clrBk); RECT rect; TRACE("\n"); GetClientRect (hwnd, &rect); FillRect ((HDC)wParam, &rect, hBrush); DeleteObject (hBrush); return TRUE; } /* Notifications */ static BOOL TREEVIEW_SendSimpleNotify (HWND hwnd, UINT code) { NMHDR nmhdr; TRACE("%x\n",code); nmhdr.hwndFrom = hwnd; nmhdr.idFrom = GetWindowLongA( hwnd, GWL_ID); nmhdr.code = code; return (BOOL) SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM)nmhdr.idFrom, (LPARAM)&nmhdr); } static BOOL TREEVIEW_SendTreeviewNotify (HWND hwnd, UINT code, UINT action, HTREEITEM oldItem, HTREEITEM newItem) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); NMTREEVIEWA nmhdr; TREEVIEW_ITEM *wineItem; TRACE("code:%x action:%x olditem:%x newitem:%x\n", code,action,(INT)oldItem,(INT)newItem); nmhdr.hdr.hwndFrom = hwnd; nmhdr.hdr.idFrom = GetWindowLongA( hwnd, GWL_ID); nmhdr.hdr.code = code; nmhdr.action = action; if (oldItem) { wineItem=& infoPtr->items[(INT)oldItem]; nmhdr.itemOld.mask = wineItem->mask; nmhdr.itemOld.hItem = wineItem->hItem; nmhdr.itemOld.state = wineItem->state; nmhdr.itemOld.stateMask = wineItem->stateMask; nmhdr.itemOld.iImage = wineItem->iImage; nmhdr.itemOld.pszText = wineItem->pszText; nmhdr.itemOld.cchTextMax= wineItem->cchTextMax; nmhdr.itemOld.iImage = wineItem->iImage; nmhdr.itemOld.iSelectedImage = wineItem->iSelectedImage; nmhdr.itemOld.cChildren = wineItem->cChildren; nmhdr.itemOld.lParam = wineItem->lParam; } if (newItem) { wineItem=& infoPtr->items[(INT)newItem]; nmhdr.itemNew.mask = wineItem->mask; nmhdr.itemNew.hItem = wineItem->hItem; nmhdr.itemNew.state = wineItem->state; nmhdr.itemNew.stateMask = wineItem->stateMask; nmhdr.itemNew.iImage = wineItem->iImage; nmhdr.itemNew.pszText = wineItem->pszText; nmhdr.itemNew.cchTextMax= wineItem->cchTextMax; nmhdr.itemNew.iImage = wineItem->iImage; nmhdr.itemNew.iSelectedImage = wineItem->iSelectedImage; nmhdr.itemNew.cChildren = wineItem->cChildren; nmhdr.itemNew.lParam = wineItem->lParam; } nmhdr.ptDrag.x = 0; nmhdr.ptDrag.y = 0; return (BOOL)SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM) GetWindowLongA( hwnd, GWL_ID), (LPARAM)&nmhdr); } static BOOL TREEVIEW_SendTreeviewDnDNotify (HWND hwnd, UINT code, HTREEITEM dragItem, POINT pt) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); NMTREEVIEWA nmhdr; TREEVIEW_ITEM *wineItem; TRACE("code:%x dragitem:%x\n", code,(INT)dragItem); nmhdr.hdr.hwndFrom = hwnd; nmhdr.hdr.idFrom = GetWindowLongA( hwnd, GWL_ID); nmhdr.hdr.code = code; nmhdr.action = 0; wineItem=& infoPtr->items[(INT)dragItem]; nmhdr.itemNew.mask = wineItem->mask; nmhdr.itemNew.hItem = wineItem->hItem; nmhdr.itemNew.state = wineItem->state; nmhdr.itemNew.lParam = wineItem->lParam; nmhdr.ptDrag.x = pt.x; nmhdr.ptDrag.y = pt.y; return (BOOL)SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM) GetWindowLongA( hwnd, GWL_ID), (LPARAM)&nmhdr); } static BOOL TREEVIEW_SendDispInfoNotify (HWND hwnd, TREEVIEW_ITEM *wineItem, UINT code, UINT what) { NMTVDISPINFOA tvdi; BOOL retval; char *buf; TRACE("item %d, action %x, state %d\n", (INT)wineItem->hItem, what, (INT)wineItem->state); tvdi.hdr.hwndFrom = hwnd; tvdi.hdr.idFrom = GetWindowLongA( hwnd, GWL_ID); tvdi.hdr.code = code; tvdi.item.mask = what; tvdi.item.hItem = wineItem->hItem; tvdi.item.state = wineItem->state; tvdi.item.lParam = wineItem->lParam; tvdi.item.pszText = COMCTL32_Alloc (128*sizeof(char)); tvdi.item.cchTextMax = 128; buf = tvdi.item.pszText; retval=(BOOL)SendMessageA ( GetParent(hwnd), WM_NOTIFY, (WPARAM)tvdi.hdr.idFrom, (LPARAM)&tvdi); if (what & TVIF_TEXT) { wineItem->pszText = tvdi.item.pszText; if (buf==tvdi.item.pszText) { wineItem->cchTextMax = 128; } else { TRACE("user-supplied buffer\n"); COMCTL32_Free (buf); wineItem->cchTextMax = 0; } } if (what & TVIF_SELECTEDIMAGE) wineItem->iSelectedImage = tvdi.item.iSelectedImage; if (what & TVIF_IMAGE) wineItem->iImage = tvdi.item.iImage; if (what & TVIF_CHILDREN) wineItem->cChildren = tvdi.item.cChildren; return retval; } static BOOL TREEVIEW_SendCustomDrawNotify (HWND hwnd, DWORD dwDrawStage, HDC hdc, RECT rc) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); NMTVCUSTOMDRAW nmcdhdr; LPNMCUSTOMDRAW nmcd; TRACE("drawstage:%lx hdc:%x\n", dwDrawStage, hdc); nmcd= & nmcdhdr.nmcd; nmcd->hdr.hwndFrom = hwnd; nmcd->hdr.idFrom = GetWindowLongA( hwnd, GWL_ID); nmcd->hdr.code = NM_CUSTOMDRAW; nmcd->dwDrawStage= dwDrawStage; nmcd->hdc = hdc; nmcd->rc.left = rc.left; nmcd->rc.right = rc.right; nmcd->rc.bottom = rc.bottom; nmcd->rc.top = rc.top; nmcd->dwItemSpec = 0; nmcd->uItemState = 0; nmcd->lItemlParam= 0; nmcdhdr.clrText = infoPtr->clrText; nmcdhdr.clrTextBk= infoPtr->clrBk; nmcdhdr.iLevel = 0; return (BOOL)SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM) GetWindowLongA( hwnd, GWL_ID), (LPARAM)&nmcdhdr); } /* FIXME: need to find out when the flags in uItemState need to be set */ static BOOL TREEVIEW_SendCustomDrawItemNotify (HWND hwnd, HDC hdc, TREEVIEW_ITEM *wineItem, UINT uItemDrawState) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); NMTVCUSTOMDRAW nmcdhdr; LPNMCUSTOMDRAW nmcd; DWORD dwDrawStage,dwItemSpec; UINT uItemState; INT retval; dwDrawStage=CDDS_ITEM | uItemDrawState; dwItemSpec=(DWORD)wineItem->hItem; uItemState=0; if (wineItem->hItem==infoPtr->selectedItem) uItemState|=CDIS_SELECTED; if (wineItem->hItem==infoPtr->focusItem) uItemState|=CDIS_FOCUS; if (wineItem->hItem==infoPtr->hotItem) uItemState|=CDIS_HOT; nmcd= & nmcdhdr.nmcd; nmcd->hdr.hwndFrom = hwnd; nmcd->hdr.idFrom = GetWindowLongA( hwnd, GWL_ID); nmcd->hdr.code = NM_CUSTOMDRAW; nmcd->dwDrawStage= dwDrawStage; nmcd->hdc = hdc; nmcd->rc.left = wineItem->rect.left; nmcd->rc.right = wineItem->rect.right; nmcd->rc.bottom = wineItem->rect.bottom; nmcd->rc.top = wineItem->rect.top; nmcd->dwItemSpec = dwItemSpec; nmcd->uItemState = uItemState; nmcd->lItemlParam= wineItem->lParam; nmcdhdr.clrText = infoPtr->clrText; nmcdhdr.clrTextBk= infoPtr->clrBk; nmcdhdr.iLevel = wineItem->iLevel; TRACE("drawstage:%lx hdc:%x item:%lx, itemstate:%x, lItemlParam:%lx\n", nmcd->dwDrawStage, nmcd->hdc, nmcd->dwItemSpec, nmcd->uItemState, nmcd->lItemlParam); retval=SendMessageA (GetParent (hwnd), WM_NOTIFY, (WPARAM) GetWindowLongA( hwnd, GWL_ID), (LPARAM)&nmcdhdr); infoPtr->clrText=nmcdhdr.clrText; infoPtr->clrBk =nmcdhdr.clrTextBk; return (BOOL) retval; } /* Note:If the specified item is the child of a collapsed parent item, the parent's list of child items is (recursively) expanded to reveal the specified item. This is mentioned for TREEVIEW_SelectItem; don't know if it also applies here. */ static LRESULT TREEVIEW_Expand (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TREEVIEW_ITEM *wineItem; UINT flag; INT expand; flag = (UINT) wParam; expand = (INT) lParam; wineItem = TREEVIEW_ValidItem (infoPtr, (HTREEITEM)expand); if (!wineItem) return 0; if (!wineItem->cChildren) return 0; if (wineItem->pszText==LPSTR_TEXTCALLBACKA) TRACE ("For item %d, flags %d, state %d\n", expand, flag, wineItem->state); else TRACE("For (%s) item:%d, flags %x, state:%d\n", wineItem->pszText, flag, expand, wineItem->state); if (wineItem->cChildren==I_CHILDRENCALLBACK) { FIXME("we don't handle I_CHILDRENCALLBACK yet\n"); return 0; } if (flag == TVE_TOGGLE) { /* FIXME: check exact behaviour here */ flag &= ~TVE_TOGGLE; /* ie: bitwise ops or 'case' ops */ if (wineItem->state & TVIS_EXPANDED) flag |= TVE_COLLAPSE; else flag |= TVE_EXPAND; } switch (flag) { case TVE_COLLAPSERESET: TRACE(" case TVE_COLLAPSERESET\n"); if (!wineItem->state & TVIS_EXPANDED) return 0; wineItem->state &= ~(TVIS_EXPANDEDONCE | TVIS_EXPANDED); TREEVIEW_RemoveAllChildren (hwnd, wineItem); break; case TVE_COLLAPSE: TRACE(" case TVE_COLLAPSE\n"); if (!wineItem->state & TVIS_EXPANDED) return 0; wineItem->state &= ~TVIS_EXPANDED; break; case TVE_EXPAND: TRACE(" case TVE_EXPAND\n"); if (wineItem->state & TVIS_EXPANDED) return 0; TRACE(" is not expanded...\n"); if (!(wineItem->state & TVIS_EXPANDEDONCE)) { TRACE(" and has never been expanded...\n"); wineItem->state |= TVIS_EXPANDED; /* this item has never been expanded */ if (TREEVIEW_SendTreeviewNotify ( hwnd, TVN_ITEMEXPANDINGA, TVE_EXPAND, 0, (HTREEITEM)expand)) { TRACE(" TVN_ITEMEXPANDINGA returned TRUE, exiting...\n"); return FALSE; } /* FIXME * Since the TVN_ITEMEXPANDINGA message may has caused the parent to * insert new items which in turn may have cause items placeholder * reallocation, I reassign the current item pointer so we have * something valid to work with... * However, this should not be necessary, * investigation required in TREEVIEW_InsertItemA */ wineItem = TREEVIEW_ValidItem (infoPtr, (HTREEITEM)expand); if (! wineItem) { ERR( "Catastropic situation, cannot retreive item #%d\n", expand); return FALSE; } wineItem->state |= TVIS_EXPANDEDONCE; TRACE(" TVN_ITEMEXPANDINGA sent...\n"); TREEVIEW_SendTreeviewNotify ( hwnd, TVN_ITEMEXPANDEDA, TVE_EXPAND, 0, (HTREEITEM)expand); TRACE(" TVN_ITEMEXPANDEDA sent...\n"); } else { /* this item has already been expanded */ wineItem->state |= TVIS_EXPANDED; } break; case TVE_EXPANDPARTIAL: TRACE(" case TVE_EXPANDPARTIAL\n"); FIXME("TVE_EXPANDPARTIAL not implemented\n"); wineItem->state ^=TVIS_EXPANDED; wineItem->state |=TVIS_EXPANDEDONCE; break; } TRACE("Exiting, Item %d state is now %d...\n", expand, wineItem->state); TREEVIEW_QueueRefresh (hwnd); return TRUE; } static TREEVIEW_ITEM * TREEVIEW_HitTestPoint (HWND hwnd, POINT pt) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TREEVIEW_ITEM *wineItem; RECT rect; GetClientRect (hwnd, &rect); if (!infoPtr->firstVisible) return NULL; wineItem=&infoPtr->items [(INT)infoPtr->firstVisible]; while ((wineItem!=NULL) && (pt.y > wineItem->rect.bottom)) wineItem=TREEVIEW_GetNextListItem (infoPtr,wineItem); if (!wineItem) return NULL; return wineItem; } static LRESULT TREEVIEW_HitTest (HWND hwnd, LPARAM lParam) { LPTVHITTESTINFO lpht=(LPTVHITTESTINFO) lParam; TREEVIEW_ITEM *wineItem; RECT rect; UINT status,x,y; GetClientRect (hwnd, &rect); status=0; x=lpht->pt.x; y=lpht->pt.y; if (x < rect.left) status|=TVHT_TOLEFT; if (x > rect.right) status|=TVHT_TORIGHT; if (y < rect.top ) status|=TVHT_ABOVE; if (y > rect.bottom) status|=TVHT_BELOW; if (status) { lpht->flags=status; return 0; } wineItem=TREEVIEW_HitTestPoint (hwnd, lpht->pt); if (!wineItem) { lpht->flags=TVHT_NOWHERE; return 0; } lpht->flags=0; if (x < wineItem->expandBox.left) { lpht->flags |= TVHT_ONITEMINDENT; goto done; } if ( PtInRect ( &wineItem->expandBox, lpht->pt)) { lpht->flags |= TVHT_ONITEMBUTTON; goto done; } if ( PtInRect ( &wineItem->bitmap, lpht->pt)) { lpht->flags |= TVHT_ONITEMICON; goto done; } if ( PtInRect ( &wineItem->statebitmap, lpht->pt)) { lpht->flags |= TVHT_ONITEMSTATEICON; goto done; } if ( PtInRect ( &wineItem->text, lpht->pt)) { lpht->flags |= TVHT_ONITEMLABEL; goto done; } lpht->flags|=TVHT_ONITEMRIGHT; done: lpht->hItem=wineItem->hItem; TRACE ("(%ld,%ld):result %x\n",lpht->pt.x,lpht->pt.y,lpht->flags); return (LRESULT) wineItem->hItem; } static LRESULT TREEVIEW_EditLabelA (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TREEVIEW_ITEM *wineItem; /* * If the style allow editing... */ if ( GetWindowLongA( hwnd, GWL_STYLE) & TVS_EDITLABELS ) { if ( infoPtr->editItem == 0 ) /* If we are not curently editing */ { wineItem = TREEVIEW_ValidItem(infoPtr,(HTREEITEM) lParam); if ( wineItem == NULL ) { ERR("Cannot get valid TREEVIEW_ITEM for lParam\n"); return NULL; } TRACE("Edit started for %s.\n", wineItem->pszText); infoPtr->editItem = wineItem->hItem; /* * It is common practice for a windows program to get this * edit control and then subclass it. It is assumed that a * new edit control is given every time. * * As a result some programs really mess up the edit control * so we need to destory our old edit control and create a new * one. Recycling would be nice but we would need to reset * everything. So recreating may just be easyier * */ DestroyWindow(infoPtr->hwndEdit); infoPtr->hwndEdit = CreateWindowExA ( WS_EX_LEFT, "EDIT", 0, WS_CHILD | WS_BORDER | ES_AUTOHSCROLL | ES_WANTRETURN | ES_LEFT, 0, 0, 0, 0, hwnd, 0,0,0); /* FIXME: (HMENU)IDTVEDIT,pcs->hInstance,0);*/ SetWindowLongA ( infoPtr->hwndEdit, GWL_WNDPROC, (LONG) TREEVIEW_Edit_SubclassProc); SendMessageA ( infoPtr->hwndEdit, WM_SETFONT, infoPtr->hFont, FALSE); SetWindowTextA( infoPtr->hwndEdit, wineItem->pszText ); SendMessageA ( infoPtr->hwndEdit, EM_SETSEL, 0, -1 ); /* ** NOTE: this must be after the edit control is created ** (according to TVN_BEGINLABELEDITA docs), before position is set. */ if ( TREEVIEW_SendDispInfoNotify( /* Return true to cancel edition */ hwnd, wineItem, TVN_BEGINLABELEDITA, 0)) { /* ** FIXME: Is this right, should we return a handle even though edit was cancelled? */ TRACE("Edit cancelled by TVN_BEGINLABELEDITA for %s.\n", wineItem->pszText); TREEVIEW_EndEditLabelNow(hwnd, (WPARAM)TRUE, 0); return NULL; } SetWindowPos ( infoPtr->hwndEdit, HWND_TOP, wineItem->text.left - 2, wineItem->text.top - 1, wineItem->text.right - wineItem->text.left + 20 , wineItem->text.bottom - wineItem->text.top + 3, SWP_DRAWFRAME ); SetFocus ( infoPtr->hwndEdit); ShowWindow ( infoPtr->hwndEdit, SW_SHOW); } } else { /* ** return NULL since we cannot edit this. */ return NULL; } return infoPtr->hwndEdit; } static LRESULT TREEVIEW_EndEditLabelNow (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TREEVIEW_ITEM *editedItem = TREEVIEW_ValidItem (infoPtr, infoPtr->editItem); BOOL bRevert = (BOOL)wParam; NMTVDISPINFOA tvdi; RECT itemRect; LPSTR oldText; LPSTR newText; int iLength; /* ** NOTE: we have to get the new text before calling TVN_ENDLABELEDITA ** since some apps(eg regedit, win98) validate the text in TVN_ENDLABELEDITA. */ oldText = editedItem->pszText; if ( !bRevert ) /* wParam is set to true to cancel the edition */ { iLength = GetWindowTextLengthA( infoPtr->hwndEdit ); if (iLength == 0) { WARN("Zero length string for new label(not changing)."); bRevert=TRUE; } newText = COMCTL32_Alloc( iLength+1 ); if( newText == NULL ) { ERR("OutOfMemory, cannot allocate space for label"); return FALSE; } GetWindowTextA( infoPtr->hwndEdit, newText, iLength+1); } else { newText=NULL; } /* * notify our parent with the new string(or NULL if wParam==TRUE) */ tvdi.hdr.hwndFrom = hwnd; tvdi.hdr.idFrom = GetWindowLongA( hwnd, GWL_ID); tvdi.hdr.code = TVN_ENDLABELEDITA; tvdi.item.hItem = editedItem->hItem; tvdi.item.lParam = editedItem->lParam; tvdi.item.mask = TVIF_TEXT|TVIF_HANDLE|TVIF_PARAM; tvdi.item.pszText = newText; if(!SendMessageA ( /* return false to cancel edition */ GetParent(hwnd), WM_NOTIFY, (WPARAM)tvdi.hdr.idFrom, (LPARAM)&tvdi)) { if( newText == NULL ) /*we are supposed to ignore the return if (and pszText==NULL), MSDOCs */ bRevert=TRUE; } if (oldText != LPSTR_TEXTCALLBACKA) { if( bRevert ) { if( newText != NULL ) COMCTL32_Free(newText); editedItem->pszText=oldText; /* revert back to the old label */ } else { COMCTL32_Free(oldText); editedItem->pszText=newText; /* use the new label */ } } else if( newText!=NULL ) { /* ** Is really this necessary? shouldnt an app update its internal data in TVN_ENDLABELEDITA? */ if( !bRevert ) { /* * This is a callback string so we need * to inform the parent that the string * has changed * */ tvdi.hdr.hwndFrom = hwnd; tvdi.hdr.idFrom = GetWindowLongA( hwnd, GWL_ID); tvdi.hdr.code = TVN_SETDISPINFOA; tvdi.item.mask = TVIF_TEXT; tvdi.item.pszText = newText; SendMessageA ( GetParent(hwnd), WM_NOTIFY, (WPARAM)tvdi.hdr.idFrom, (LPARAM)&tvdi); } COMCTL32_Free(newText); } ShowWindow(infoPtr->hwndEdit, SW_HIDE); EnableWindow(infoPtr->hwndEdit, FALSE); /* update the window to eliminate fragments and the like */ TreeView_GetItemRect(hwnd,infoPtr->editItem,&itemRect,FALSE); RedrawWindow(hwnd,&itemRect,NULL,RDW_ERASE|RDW_INVALIDATE|RDW_UPDATENOW); infoPtr->editItem = 0; return !bRevert; /* return true if label edit succesful, otherwise false */ } static LRESULT TREEVIEW_LButtonDoubleClick (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_ITEM *wineItem; POINT pt; TRACE("\n"); pt.x = (INT)LOWORD(lParam); pt.y = (INT)HIWORD(lParam); SetFocus (hwnd); wineItem=TREEVIEW_HitTestPoint (hwnd, pt); if (!wineItem) return 0; TRACE("item %d \n",(INT)wineItem->hItem); if (TREEVIEW_SendSimpleNotify (hwnd, NM_DBLCLK)!=TRUE) { /* FIXME!*/ TREEVIEW_Expand (hwnd, (WPARAM) TVE_TOGGLE, (LPARAM) wineItem->hItem); } return TRUE; } static LRESULT TREEVIEW_LButtonDown (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); INT iItem; TVHITTESTINFO ht; ht.pt.x = (INT)LOWORD(lParam); ht.pt.y = (INT)HIWORD(lParam); SetFocus (hwnd); iItem=TREEVIEW_HitTest (hwnd, (LPARAM) &ht); TRACE("item %d \n",iItem); if (ht.flags & TVHT_ONITEMBUTTON) { TREEVIEW_Expand (hwnd, (WPARAM) TVE_TOGGLE, (LPARAM) iItem); } else { infoPtr->uInternalStatus|=TV_LDRAG; } return 0; } static LRESULT TREEVIEW_LButtonUp (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); INT iItem; TREEVIEW_ITEM *wineItem; TVHITTESTINFO ht; DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); ht.pt.x = (INT)LOWORD(lParam); ht.pt.y = (INT)HIWORD(lParam); TRACE("\n"); /* Return true to cancel default behaviour */ if ( TREEVIEW_SendSimpleNotify (hwnd, NM_CLICK) ) return 0; /* Get the item */ iItem = TREEVIEW_HitTest (hwnd, (LPARAM) &ht); TRACE ("%d\n",iItem); if (!iItem) return 0; wineItem = TREEVIEW_ValidItem(infoPtr, (HTREEITEM)iItem); /* * if we are TVS_SINGLEEXPAND then we want this single click to * do a bunch of things. */ if ((dwStyle & TVS_SINGLEEXPAND)&& ( ht.flags & (TVHT_ONITEMLABEL | TVHT_ONITEMICON))&& ( infoPtr->editItem == 0 )) { TREEVIEW_ITEM *SelItem; /* * Send the notification */ TREEVIEW_SendTreeviewNotify (hwnd,TVN_SINGLEEXPAND,0, (HTREEITEM)iItem,0); /* * Close the previous selection all the way to the root * as long as the new selection is not a child */ if ((infoPtr->selectedItem)&&(infoPtr->selectedItem != (HTREEITEM)iItem)) { BOOL closeit = TRUE; SelItem = wineItem; while (closeit && SelItem) { closeit = (SelItem->hItem != infoPtr->selectedItem); SelItem = TREEVIEW_ValidItem(infoPtr,SelItem->parent); } if (closeit) { SelItem = TREEVIEW_ValidItem(infoPtr,infoPtr->selectedItem); while ((SelItem)&&(SelItem->hItem != wineItem->hItem)) { TREEVIEW_Expand (hwnd,(WPARAM)TVE_COLLAPSE,(LPARAM)SelItem->hItem); SelItem = TREEVIEW_ValidItem(infoPtr,SelItem->parent); } } } /* * Expand the current item */ TREEVIEW_Expand (hwnd, (WPARAM) TVE_TOGGLE, (LPARAM) wineItem->hItem); } infoPtr->uInternalStatus &= ~(TV_LDRAG | TV_LDRAGGING); /* * If the style allow editing and the node is already selected * and the click occured on the item label... */ if ( ( GetWindowLongA( hwnd, GWL_STYLE) & TVS_EDITLABELS ) && ( wineItem->state & TVIS_SELECTED ) && ( ht.flags & TVHT_ONITEMLABEL )) { if ( infoPtr->editItem == 0 ) /* If we are not curently editing */ { if( SendMessageA(hwnd, TVM_EDITLABELA, 0, (LPARAM)iItem) == NULL) return 0; } } else if ( infoPtr->editItem != 0 ) /* If we are curently editing */ { TREEVIEW_EndEditLabelNow(hwnd, (WPARAM)FALSE, 0); } else if ( ht.flags & (TVHT_ONITEMLABEL | TVHT_ONITEMICON)) { TREEVIEW_DoSelectItem ( hwnd, TVGN_CARET, (HTREEITEM)iItem, TVC_BYMOUSE); } if (ht.flags & TVHT_ONITEMSTATEICON) { if (dwStyle & TVS_CHECKBOXES) { /* TVS_CHECKBOXES requires _us_ */ int state; /* to toggle the current state */ state=1-(wineItem->state>>12); TRACE ("state:%x\n", state); wineItem->state&= ~TVIS_STATEIMAGEMASK; wineItem->state|=state<<12; TRACE ("state:%x\n", wineItem->state); TREEVIEW_QueueRefresh (hwnd); } } return 0; } static LRESULT TREEVIEW_RButtonDown (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TRACE("\n"); infoPtr->uInternalStatus|=TV_RDRAG; return 0; } static LRESULT TREEVIEW_RButtonUp (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TRACE("\n"); if (TREEVIEW_SendSimpleNotify (hwnd, NM_RCLICK)) return 0; infoPtr->uInternalStatus&= ~(TV_RDRAG | TV_RDRAGGING); return 0; } static LRESULT TREEVIEW_MouseMove (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TREEVIEW_ITEM *hotItem; POINT pt; pt.x=(INT) LOWORD (lParam); pt.y=(INT) HIWORD (lParam); hotItem=TREEVIEW_HitTestPoint (hwnd, pt); if (!hotItem) return 0; infoPtr->focusItem=hotItem->hItem; if ( GetWindowLongA( hwnd, GWL_STYLE) & TVS_DISABLEDRAGDROP) return 0; if (infoPtr->uInternalStatus & TV_LDRAG) { TREEVIEW_SendTreeviewDnDNotify (hwnd, TVN_BEGINDRAGA, hotItem->hItem, pt); infoPtr->uInternalStatus &= ~TV_LDRAG; infoPtr->uInternalStatus |= TV_LDRAGGING; infoPtr->dropItem=hotItem->hItem; return 0; } if (infoPtr->uInternalStatus & TV_RDRAG) { TREEVIEW_SendTreeviewDnDNotify (hwnd, TVN_BEGINRDRAGA, hotItem->hItem, pt); infoPtr->uInternalStatus &= ~TV_RDRAG; infoPtr->uInternalStatus |= TV_RDRAGGING; infoPtr->dropItem=hotItem->hItem; return 0; } return 0; } static LRESULT TREEVIEW_CreateDragImage (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TREEVIEW_ITEM *dragItem; INT cx,cy; HDC hdc,htopdc; HWND hwtop; HBITMAP hbmp,hOldbmp; SIZE size; RECT rc; HFONT hOldFont; char *itemtxt; TRACE("\n"); if (!(infoPtr->himlNormal)) return 0; dragItem=TREEVIEW_ValidItem (infoPtr, (HTREEITEM) lParam); if (!dragItem) return 0; if (dragItem->pszText==LPSTR_TEXTCALLBACKA) { TREEVIEW_SendDispInfoNotify (hwnd, dragItem, TVN_GETDISPINFOA, TVIF_TEXT); } itemtxt=dragItem->pszText; hwtop=GetDesktopWindow (); htopdc= GetDC (hwtop); hdc=CreateCompatibleDC (htopdc); hOldFont=SelectObject (hdc, infoPtr->hFont); GetTextExtentPoint32A (hdc, itemtxt, lstrlenA (itemtxt), &size); TRACE("%d %d %s %d\n",size.cx,size.cy,itemtxt,lstrlenA(itemtxt)); hbmp=CreateCompatibleBitmap (htopdc, size.cx, size.cy); hOldbmp=SelectObject (hdc, hbmp); ImageList_GetIconSize (infoPtr->himlNormal, &cx, &cy); size.cx+=cx; if (cy>size.cy) size.cy=cy; infoPtr->dragList=ImageList_Create (size.cx, size.cy, ILC_COLOR, 10, 10); ImageList_Draw (infoPtr->himlNormal, dragItem->iImage, hdc, 0, 0, ILD_NORMAL); /* ImageList_GetImageInfo (infoPtr->himlNormal, dragItem->hItem, &iminfo); ImageList_AddMasked (infoPtr->dragList, iminfo.hbmImage, CLR_DEFAULT); */ /* draw item text */ SetRect (&rc, cx, 0, size.cx,size.cy); DrawTextA (hdc, itemtxt, lstrlenA (itemtxt), &rc, DT_LEFT); SelectObject (hdc, hOldFont); SelectObject (hdc, hOldbmp); ImageList_Add (infoPtr->dragList, hbmp, 0); DeleteDC (hdc); DeleteObject (hbmp); ReleaseDC (hwtop, htopdc); return (LRESULT)infoPtr->dragList; } static LRESULT TREEVIEW_DoSelectItem (HWND hwnd, INT action, HTREEITEM newSelect, INT cause) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TREEVIEW_ITEM *prevItem,*wineItem; INT prevSelect; wineItem = TREEVIEW_ValidItem (infoPtr, (HTREEITEM)newSelect); TRACE("Entering item %d, flag %x, cause %x, state %d\n", (INT)newSelect, action, cause, wineItem->state); if ( (wineItem) && (wineItem->parent)) { /* * If the item has a collapse parent expand the parent so he * can expose the item */ TREEVIEW_ITEM *parentItem = TREEVIEW_ValidItem (infoPtr, wineItem->parent); if ( !(parentItem->state & TVIS_EXPANDED)) TREEVIEW_Expand (hwnd, TVE_EXPAND, (LPARAM) wineItem->parent); } switch (action) { case TVGN_CARET: prevSelect=(INT)infoPtr->selectedItem; if ((HTREEITEM)prevSelect==newSelect) return FALSE; prevItem= TREEVIEW_ValidItem (infoPtr, (HTREEITEM)prevSelect); if (newSelect) if (TREEVIEW_SendTreeviewNotify( hwnd, TVN_SELCHANGINGA, cause, (HTREEITEM)prevSelect, (HTREEITEM)newSelect)) return FALSE; /* FIXME: OK? */ if (prevItem) prevItem->state &= ~TVIS_SELECTED; if (wineItem) wineItem->state |= TVIS_SELECTED; infoPtr->selectedItem=(HTREEITEM)newSelect; TREEVIEW_SendTreeviewNotify( hwnd, TVN_SELCHANGEDA, cause, (HTREEITEM)prevSelect, (HTREEITEM)newSelect); break; case TVGN_DROPHILITE: prevItem= TREEVIEW_ValidItem (infoPtr, infoPtr->dropItem); if (prevItem) prevItem->state &= ~TVIS_DROPHILITED; infoPtr->dropItem=(HTREEITEM)newSelect; if (wineItem) wineItem->state |=TVIS_DROPHILITED; break; case TVGN_FIRSTVISIBLE: FIXME("FIRSTVISIBLE not implemented\n"); break; } TREEVIEW_QueueRefresh (hwnd); TRACE("Leaving state %d\n", wineItem->state); return TRUE; } /* FIXME: handle NM_KILLFocus etc */ static LRESULT TREEVIEW_SelectItem (HWND hwnd, WPARAM wParam, LPARAM lParam) { return TREEVIEW_DoSelectItem (hwnd, wParam, (HTREEITEM) lParam, TVC_UNKNOWN); } static LRESULT TREEVIEW_GetFont (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TRACE("%x\n",infoPtr->hFont); return infoPtr->hFont; } static LRESULT TREEVIEW_SetFont (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); TEXTMETRICA tm; LOGFONTA logFont; HFONT hFont, hOldFont; INT height; HDC hdc; TRACE("%x %lx\n",wParam, lParam); infoPtr->hFont = (HFONT)wParam; hFont = infoPtr->hFont ? infoPtr->hFont : GetStockObject (SYSTEM_FONT); GetObjectA (infoPtr->hFont, sizeof (LOGFONTA), &logFont); logFont.lfWeight=FW_BOLD; infoPtr->hBoldFont = CreateFontIndirectA (&logFont); hdc = GetDC (0); hOldFont = SelectObject (hdc, hFont); GetTextMetricsA (hdc, &tm); height= tm.tmHeight + tm.tmExternalLeading; if (height>infoPtr->uRealItemHeight) infoPtr->uRealItemHeight=height; SelectObject (hdc, hOldFont); ReleaseDC (0, hdc); if (lParam) TREEVIEW_QueueRefresh (hwnd); return 0; } static LRESULT TREEVIEW_VScroll (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); int maxHeight; TRACE("wp %x, lp %lx\n", wParam, lParam); if (!infoPtr->uInternalStatus & TV_VSCROLL) return FALSE; switch (LOWORD (wParam)) { case SB_LINEUP: if (!infoPtr->cy) return FALSE; infoPtr->cy -= infoPtr->uRealItemHeight; if (infoPtr->cy < 0) infoPtr->cy=0; break; case SB_LINEDOWN: maxHeight=infoPtr->uTotalHeight-infoPtr->uVisibleHeight; if (infoPtr->cy == maxHeight) return FALSE; infoPtr->cy += infoPtr->uRealItemHeight; if (infoPtr->cy > maxHeight) infoPtr->cy = maxHeight; break; case SB_PAGEUP: if (!infoPtr->cy) return FALSE; infoPtr->cy -= infoPtr->uVisibleHeight; if (infoPtr->cy < 0) infoPtr->cy=0; break; case SB_PAGEDOWN: maxHeight=infoPtr->uTotalHeight-infoPtr->uVisibleHeight; if (infoPtr->cy == maxHeight) return FALSE; infoPtr->cy += infoPtr->uVisibleHeight; if (infoPtr->cy > maxHeight) infoPtr->cy = maxHeight; break; case SB_THUMBTRACK: infoPtr->cy = HIWORD (wParam); break; } TREEVIEW_QueueRefresh (hwnd); return TRUE; } static LRESULT TREEVIEW_HScroll (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); int maxWidth; TRACE("wp %lx, lp %x\n", lParam, wParam); if (!infoPtr->uInternalStatus & TV_HSCROLL) return FALSE; switch (LOWORD (wParam)) { case SB_LINEUP: if (!infoPtr->cx) return FALSE; infoPtr->cx -= infoPtr->uRealItemHeight; if (infoPtr->cx < 0) infoPtr->cx=0; break; case SB_LINEDOWN: maxWidth=infoPtr->uTotalWidth-infoPtr->uVisibleWidth; if (infoPtr->cx == maxWidth) return FALSE; infoPtr->cx += infoPtr->uRealItemHeight; /*FIXME */ if (infoPtr->cx > maxWidth) infoPtr->cx = maxWidth; break; case SB_PAGEUP: if (!infoPtr->cx) return FALSE; infoPtr->cx -= infoPtr->uVisibleWidth; if (infoPtr->cx < 0) infoPtr->cx=0; break; case SB_PAGEDOWN: maxWidth=infoPtr->uTotalWidth-infoPtr->uVisibleWidth; if (infoPtr->cx == maxWidth) return FALSE; infoPtr->cx += infoPtr->uVisibleWidth; if (infoPtr->cx > maxWidth) infoPtr->cx = maxWidth; break; case SB_THUMBTRACK: infoPtr->cx = HIWORD (wParam); break; } TREEVIEW_QueueRefresh (hwnd); return TRUE; } static LRESULT TREEVIEW_MouseWheel (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); short gcWheelDelta = 0; UINT pulScrollLines = 3; SystemParametersInfoW(SPI_GETWHEELSCROLLLINES,0, &pulScrollLines, 0); gcWheelDelta -= (short) HIWORD(wParam); pulScrollLines *= (gcWheelDelta / WHEEL_DELTA); if (abs(gcWheelDelta) >= WHEEL_DELTA && pulScrollLines) { int wheelDy = pulScrollLines * infoPtr->uRealItemHeight; int newDy = infoPtr->cy + wheelDy; int maxDy = infoPtr->uTotalHeight - infoPtr->uVisibleHeight; if (newDy > maxDy) newDy = maxDy; if (newDy < 0) newDy = 0; if (newDy == infoPtr->cy) return TRUE; TREEVIEW_VScroll(hwnd, MAKEWPARAM(SB_THUMBTRACK,newDy),0); } return TRUE; } static LRESULT TREEVIEW_KeyDown (HWND hwnd, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); HTREEITEM hNewSelection = 0; INT scrollNeeds = -1; INT cyChangeNeeds = -1; INT prevSelect = (INT)infoPtr->selectedItem; TREEVIEW_ITEM *prevItem = (prevSelect != 0 ) ? TREEVIEW_ValidItem (infoPtr, (HTREEITEM)prevSelect) : NULL; TREEVIEW_ITEM *newItem = NULL; TRACE("%x %lx\n",wParam, lParam); if (prevSelect == 0) return FALSE; switch (wParam) { case VK_UP: newItem=TREEVIEW_GetPrevListItem (infoPtr, prevItem); if (!newItem) newItem=& infoPtr->items[(INT)infoPtr->TopRootItem]; hNewSelection = newItem->hItem; if (! newItem->visible) scrollNeeds = SB_LINEUP; break; case VK_DOWN: newItem=TREEVIEW_GetNextListItem (infoPtr, prevItem); if (!newItem) newItem=prevItem; hNewSelection = newItem->hItem; if (! newItem->visible) scrollNeeds = SB_LINEDOWN; break; case VK_HOME: newItem = &infoPtr->items[(INT)infoPtr->TopRootItem]; hNewSelection = newItem->hItem; cyChangeNeeds = 0; break; case VK_END: newItem = &infoPtr->items[(INT)infoPtr->TopRootItem]; newItem = TREEVIEW_GetLastListItem (infoPtr, newItem); hNewSelection = newItem->hItem; if (! newItem->visible) cyChangeNeeds = infoPtr->uTotalHeight-infoPtr->uVisibleHeight; break; case VK_LEFT: if ( (prevItem->cChildren > 0) && (prevItem->state & TVIS_EXPANDED) ) { TREEVIEW_Expand(hwnd, TVE_COLLAPSE, prevSelect ); } else if ((INT)prevItem->parent) { newItem = (& infoPtr->items[(INT)prevItem->parent]); if (! newItem->visible) /* FIXME find a way to make this item the first visible... */ newItem = NULL; hNewSelection = newItem->hItem; } break; case VK_RIGHT: if ( ( prevItem->cChildren > 0) || ( prevItem->cChildren == I_CHILDRENCALLBACK)) { if (! (prevItem->state & TVIS_EXPANDED)) TREEVIEW_Expand(hwnd, TVE_EXPAND, prevSelect ); else { newItem = (& infoPtr->items[(INT)prevItem->firstChild]); hNewSelection = newItem->hItem; } } break; case VK_ADD: if (! (prevItem->state & TVIS_EXPANDED)) TREEVIEW_Expand(hwnd, TVE_EXPAND, prevSelect ); break; case VK_SUBTRACT: if (prevItem->state & TVIS_EXPANDED) TREEVIEW_Expand(hwnd, TVE_COLLAPSE, prevSelect ); break; case VK_PRIOR: newItem=TREEVIEW_GetListItem( infoPtr, prevItem, -1*(TREEVIEW_GetVisibleCount(hwnd,0,0)-3)); if (!newItem) newItem=prevItem; hNewSelection = newItem->hItem; if (! newItem->visible) scrollNeeds = SB_PAGEUP; break; case VK_NEXT: newItem=TREEVIEW_GetListItem( infoPtr, prevItem, TREEVIEW_GetVisibleCount(hwnd,0,0)-3); if (!newItem) newItem=prevItem; hNewSelection = newItem->hItem; if (! newItem->visible) scrollNeeds = SB_PAGEDOWN; break; case VK_BACK: case VK_RETURN: default: FIXME("%x not implemented\n", wParam); break; } if (hNewSelection) { /* This works but does not send notification... prevItem->state &= ~TVIS_SELECTED; newItem->state |= TVIS_SELECTED; infoPtr->selectedItem = hNewSelection; TREEVIEW_QueueRefresh (hwnd); */ if ( TREEVIEW_DoSelectItem( hwnd, TVGN_CARET, (HTREEITEM)hNewSelection, TVC_BYKEYBOARD)) { /* If selection change is allowed for the new item, perform scrolling */ if (scrollNeeds != -1) TREEVIEW_VScroll(hwnd, scrollNeeds, 0); if (cyChangeNeeds != -1) infoPtr->cy = cyChangeNeeds; /* FIXME: Something happen in the load the in the two weeks before april 1st 1999 which makes this SetFocus mandatory otherwise, the focus is lost... However the SetFocus should not be required...*/ SetFocus(hwnd); } } return FALSE; } static LRESULT TREEVIEW_GetScrollTime (HWND hwnd) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); return infoPtr->uScrollTime; } static LRESULT TREEVIEW_SetScrollTime (HWND hwnd, UINT uScrollTime) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); UINT uOldScrollTime = infoPtr->uScrollTime; infoPtr->uScrollTime = min (uScrollTime, 100); return uOldScrollTime; } static LRESULT WINAPI TREEVIEW_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr; if (uMsg==WM_CREATE) return TREEVIEW_Create (hwnd, wParam, lParam); if (!(infoPtr = TREEVIEW_GetInfoPtr(hwnd))) return DefWindowProcA (hwnd, uMsg, wParam, lParam); switch (uMsg) { case TVM_INSERTITEMA: return TREEVIEW_InsertItemA (hwnd, wParam, lParam); case TVM_INSERTITEMW: return TREEVIEW_InsertItemW(hwnd,wParam,lParam);; case TVM_DELETEITEM: return TREEVIEW_DeleteItem (hwnd, wParam, lParam); case TVM_EXPAND: return TREEVIEW_Expand (hwnd, wParam, lParam); case TVM_GETITEMRECT: return TREEVIEW_GetItemRect (hwnd, wParam, lParam); case TVM_GETCOUNT: return TREEVIEW_GetCount (hwnd, wParam, lParam); case TVM_GETINDENT: return TREEVIEW_GetIndent (hwnd); case TVM_SETINDENT: return TREEVIEW_SetIndent (hwnd, wParam); case TVM_GETIMAGELIST: return TREEVIEW_GetImageList (hwnd, wParam, lParam); case TVM_SETIMAGELIST: return TREEVIEW_SetImageList (hwnd, wParam, lParam); case TVM_GETNEXTITEM: return TREEVIEW_GetNextItem (hwnd, wParam, lParam); case TVM_SELECTITEM: return TREEVIEW_SelectItem (hwnd, wParam, lParam); case TVM_GETITEMA: return TREEVIEW_GetItemA (hwnd, wParam, lParam); case TVM_GETITEMW: FIXME("Unimplemented msg TVM_GETITEMW\n"); return 0; case TVM_SETITEMA: return TREEVIEW_SetItemA (hwnd, wParam, lParam); case TVM_SETITEMW: FIXME("Unimplemented msg TVM_SETITEMW\n"); return 0; case TVM_EDITLABELA: return TREEVIEW_EditLabelA(hwnd, wParam, lParam); case TVM_EDITLABELW: FIXME("Unimplemented msg TVM_EDITLABELW \n"); return 0; case TVM_GETEDITCONTROL: return TREEVIEW_GetEditControl (hwnd); case TVM_GETVISIBLECOUNT: return TREEVIEW_GetVisibleCount (hwnd, wParam, lParam); case TVM_HITTEST: return TREEVIEW_HitTest (hwnd, lParam); case TVM_CREATEDRAGIMAGE: return TREEVIEW_CreateDragImage (hwnd, wParam, lParam); case TVM_SORTCHILDREN: return TREEVIEW_SortChildren (hwnd, wParam, lParam); case TVM_ENSUREVISIBLE: FIXME("Unimplemented msg TVM_ENSUREVISIBLE\n"); return 0; case TVM_SORTCHILDRENCB: return TREEVIEW_SortChildrenCB(hwnd, wParam, lParam); case TVM_ENDEDITLABELNOW: if (infoPtr->editItem) return TREEVIEW_EndEditLabelNow (hwnd, wParam, lParam); case TVM_GETISEARCHSTRINGA: FIXME("Unimplemented msg TVM_GETISEARCHSTRINGA\n"); return 0; case TVM_GETISEARCHSTRINGW: FIXME("Unimplemented msg TVM_GETISEARCHSTRINGW\n"); return 0; case TVM_GETTOOLTIPS: return TREEVIEW_GetToolTips (hwnd); case TVM_SETTOOLTIPS: return TREEVIEW_SetToolTips (hwnd, wParam); case TVM_SETINSERTMARK: return TREEVIEW_SetInsertMark (hwnd,wParam, lParam); case TVM_SETITEMHEIGHT: return TREEVIEW_SetItemHeight (hwnd, wParam); case TVM_GETITEMHEIGHT: return TREEVIEW_GetItemHeight (hwnd); case TVM_SETBKCOLOR: return TREEVIEW_SetBkColor (hwnd, wParam, lParam); case TVM_SETTEXTCOLOR: return TREEVIEW_SetTextColor (hwnd, wParam, lParam); case TVM_GETBKCOLOR: return TREEVIEW_GetBkColor (hwnd); case TVM_GETTEXTCOLOR: return TREEVIEW_GetTextColor (hwnd); case TVM_SETSCROLLTIME: return TREEVIEW_SetScrollTime (hwnd, (UINT)wParam); case TVM_GETSCROLLTIME: return TREEVIEW_GetScrollTime (hwnd); case TVM_GETITEMSTATE: return TREEVIEW_GetItemState (hwnd,wParam, lParam); case TVM_GETLINECOLOR: return TREEVIEW_GetLineColor (hwnd,wParam, lParam); case TVM_SETLINECOLOR: return TREEVIEW_SetLineColor (hwnd,wParam, lParam); case TVM_SETINSERTMARKCOLOR: return TREEVIEW_SetInsertMarkColor (hwnd,wParam, lParam); case TVM_GETINSERTMARKCOLOR: return TREEVIEW_GetInsertMarkColor (hwnd,wParam, lParam); case TVM_SETUNICODEFORMAT: FIXME("Unimplemented msg TVM_SETUNICODEFORMAT\n"); return 0; case TVM_GETUNICODEFORMAT: FIXME("Unimplemented msg TVM_GETUNICODEFORMAT\n"); return 0; case WM_COMMAND: return TREEVIEW_Command (hwnd, wParam, lParam); case WM_DESTROY: return TREEVIEW_Destroy (hwnd); /* case WM_ENABLE: */ case WM_ERASEBKGND: return TREEVIEW_EraseBackground (hwnd, wParam, lParam); case WM_GETDLGCODE: return DLGC_WANTARROWS | DLGC_WANTCHARS; case WM_PAINT: return TREEVIEW_Paint (hwnd, wParam, lParam); case WM_GETFONT: return TREEVIEW_GetFont (hwnd, wParam, lParam); case WM_SETFONT: return TREEVIEW_SetFont (hwnd, wParam, lParam); case WM_KEYDOWN: return TREEVIEW_KeyDown (hwnd, wParam, lParam); case WM_SETFOCUS: return TREEVIEW_SetFocus (hwnd, wParam, lParam); case WM_KILLFOCUS: return TREEVIEW_KillFocus (hwnd, wParam, lParam); case WM_LBUTTONDOWN: return TREEVIEW_LButtonDown (hwnd, wParam, lParam); case WM_LBUTTONUP: return TREEVIEW_LButtonUp (hwnd, wParam, lParam); case WM_LBUTTONDBLCLK: return TREEVIEW_LButtonDoubleClick (hwnd, wParam, lParam); case WM_RBUTTONDOWN: return TREEVIEW_RButtonDown (hwnd, wParam, lParam); case WM_RBUTTONUP: return TREEVIEW_RButtonUp (hwnd, wParam, lParam); case WM_MOUSEMOVE: return TREEVIEW_MouseMove (hwnd, wParam, lParam); case WM_STYLECHANGED: return TREEVIEW_StyleChanged (hwnd, wParam, lParam); /* case WM_SYSCOLORCHANGE: */ /* case WM_SETREDRAW: */ case WM_TIMER: return TREEVIEW_HandleTimer (hwnd, wParam, lParam); case WM_SIZE: return TREEVIEW_Size (hwnd, wParam,lParam); case WM_HSCROLL: return TREEVIEW_HScroll (hwnd, wParam, lParam); case WM_VSCROLL: return TREEVIEW_VScroll (hwnd, wParam, lParam); case WM_MOUSEWHEEL: if (wParam & (MK_SHIFT | MK_CONTROL)) return DefWindowProcA( hwnd, uMsg, wParam, lParam ); return TREEVIEW_MouseWheel (hwnd, wParam, lParam); case WM_DRAWITEM: TRACE ("drawItem\n"); return DefWindowProcA (hwnd, uMsg, wParam, lParam); default: if (uMsg >= WM_USER) FIXME("Unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); return DefWindowProcA (hwnd, uMsg, wParam, lParam); } return 0; } VOID TREEVIEW_Register (void) { WNDCLASSA wndClass; TRACE("\n"); ZeroMemory (&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS | CS_DBLCLKS; wndClass.lpfnWndProc = (WNDPROC)TREEVIEW_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(TREEVIEW_INFO *); wndClass.hCursor = LoadCursorA (0, IDC_ARROWA); wndClass.hbrBackground = 0; wndClass.lpszClassName = WC_TREEVIEWA; RegisterClassA (&wndClass); } VOID TREEVIEW_Unregister (void) { UnregisterClassA (WC_TREEVIEWA, (HINSTANCE)NULL); } wine-20000526/dlls/comctl32/updown.c0100644000175000001440000007363007112573223016521 0ustar julliardusers/* * Updown control * * Copyright 1997 Dimitrie O. Paun * * TODO: * - I am not sure about the default values for the Min, Max, Pos * (in the UPDOWN_INFO the fields: MinVal, MaxVal, CurVal) * - I think I do not handle correctly the WS_BORDER style. * (Should be fixed. ) * * Testing: * Not much. The following have not been tested at all: * - horizontal arrows * - listbox as buddy window * - acceleration * - base 16 * - UDS_ALIGNLEFT, ~UDS_WRAP * (tested - they work) * - integers with thousand separators. * (fixed bugs. ) * * Even though the above list seems rather large, the control seems to * behave very well so I am confident it does work in most (all) of the * untested cases. * Problems: * I do not like the arrows yet, I'll work more on them later on. */ #include #include #include #include "windef.h" #include "winbase.h" #include "wingdi.h" #include "winuser.h" #include "commctrl.h" #include "winnls.h" #include "updown.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(updown); /* Control configuration constants */ #define INITIAL_DELAY 500 /* initial timer until auto-increment kicks in */ #define REPEAT_DELAY 50 /* delay between auto-increments */ #define DEFAULT_WIDTH 14 /* default width of the ctrl */ #define DEFAULT_XSEP 0 /* default separation between buddy and crtl */ #define DEFAULT_ADDTOP 0 /* amount to extend above the buddy window */ #define DEFAULT_ADDBOT 0 /* amount to extend below the buddy window */ #define DEFAULT_BUDDYBORDER 2 /* Width/height of the buddy border */ /* Work constants */ #define FLAG_INCR 0x01 #define FLAG_DECR 0x02 #define FLAG_MOUSEIN 0x04 #define FLAG_CLICKED (FLAG_INCR | FLAG_DECR) #define TIMERID1 1 #define TIMERID2 2 #define BUDDY_UPDOWN_HWND "buddyUpDownHWND" #define BUDDY_SUPERCLASS_WNDPROC "buddySupperClassWndProc" static int accelIndex = -1; #define UNKNOWN_PARAM(msg, wParam, lParam) WARN(\ "UpDown Ctrl: Unknown parameter(s) for message " #msg \ "(%04x): wp=%04x lp=%08lx\n", msg, wParam, lParam); #define UPDOWN_GetInfoPtr(hwnd) ((UPDOWN_INFO *)GetWindowLongA (hwnd,0)) static LRESULT CALLBACK UPDOWN_Buddy_SubclassProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam); /*********************************************************************** * UPDOWN_InBounds * Tests if a given value 'val' is between the Min&Max limits */ static BOOL UPDOWN_InBounds(HWND hwnd, int val) { UPDOWN_INFO *infoPtr = UPDOWN_GetInfoPtr (hwnd); if(infoPtr->MaxVal > infoPtr->MinVal) return (infoPtr->MinVal <= val) && (val <= infoPtr->MaxVal); else return (infoPtr->MaxVal <= val) && (val <= infoPtr->MinVal); } /*********************************************************************** * UPDOWN_OffsetVal * Tests if we can change the current value by delta. If so, it changes * it and returns TRUE. Else, it leaves it unchanged and returns FALSE. */ static BOOL UPDOWN_OffsetVal(HWND hwnd, int delta) { UPDOWN_INFO *infoPtr = UPDOWN_GetInfoPtr (hwnd); /* check if we can do the modification first */ if(!UPDOWN_InBounds (hwnd, infoPtr->CurVal+delta)){ if (GetWindowLongA (hwnd, GWL_STYLE) & UDS_WRAP) { delta += (delta < 0 ? -1 : 1) * (infoPtr->MaxVal < infoPtr->MinVal ? -1 : 1) * (infoPtr->MinVal - infoPtr->MaxVal) + (delta < 0 ? 1 : -1); } else return FALSE; } infoPtr->CurVal += delta; return TRUE; } /*********************************************************************** * UPDOWN_HasBuddyBorder [Internal] * * When we have a buddy set and that we are aligned on our buddy, we * want to draw a sunken edge to make like we are part of that control. */ static BOOL UPDOWN_HasBuddyBorder(HWND hwnd) { UPDOWN_INFO* infoPtr = UPDOWN_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); return ( ((dwStyle & (UDS_ALIGNLEFT | UDS_ALIGNRIGHT)) != 0) && (SendMessageA(hwnd, UDM_GETBUDDY, 0, 0) != 0) && (lstrcmpiA(infoPtr->szBuddyClass, "EDIT") == 0 ) ); } /*********************************************************************** * UPDOWN_GetArrowRect * wndPtr - pointer to the up-down wnd * rect - will hold the rectangle * incr - TRUE get the "increment" rect (up or right) * FALSE get the "decrement" rect (down or left) * */ static void UPDOWN_GetArrowRect (HWND hwnd, RECT *rect, BOOL incr) { DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); int len; /* will hold the width or height */ GetClientRect (hwnd, rect); /* * Make sure we calculate the rectangle to fit even if we draw the * border. */ if (UPDOWN_HasBuddyBorder(hwnd)) { if (dwStyle & UDS_ALIGNLEFT) rect->left+=DEFAULT_BUDDYBORDER; else rect->right-=DEFAULT_BUDDYBORDER; InflateRect(rect, 0, -DEFAULT_BUDDYBORDER); } /* * We're calculating the midpoint to figure-out where the * separation between the buttons will lay. We make sure that we * round the uneven numbers by adding 1. */ if (dwStyle & UDS_HORZ) { len = rect->right - rect->left + 1; /* compute the width */ if (incr) rect->left = rect->left + len/2; else rect->right = rect->left + len/2; } else { len = rect->bottom - rect->top + 1; /* compute the height */ if (incr) rect->bottom = rect->top + len/2; else rect->top = rect->top + len/2; } } /*********************************************************************** * UPDOWN_GetArrowFromPoint * Returns the rectagle (for the up or down arrow) that contains pt. * If it returns the up rect, it returns TRUE. * If it returns the down rect, it returns FALSE. */ static BOOL UPDOWN_GetArrowFromPoint (HWND hwnd, RECT *rect, POINT pt) { UPDOWN_GetArrowRect (hwnd, rect, TRUE); if(PtInRect(rect, pt)) return TRUE; UPDOWN_GetArrowRect (hwnd, rect, FALSE); return FALSE; } /*********************************************************************** * UPDOWN_GetThousandSep * Returns the thousand sep. If an error occurs, it returns ','. */ static char UPDOWN_GetThousandSep() { char sep[2]; if(GetLocaleInfoA(LOCALE_USER_DEFAULT, LOCALE_STHOUSAND, sep, sizeof(sep)) != 1) return ','; return sep[0]; } /*********************************************************************** * UPDOWN_GetBuddyInt * Tries to read the pos from the buddy window and if it succeeds, * it stores it in the control's CurVal * returns: * TRUE - if it read the integer from the buddy successfully * FALSE - if an error occured */ static BOOL UPDOWN_GetBuddyInt (HWND hwnd) { UPDOWN_INFO *infoPtr = UPDOWN_GetInfoPtr (hwnd); char txt[20], sep, *src, *dst; int newVal; if (!IsWindow(infoPtr->Buddy)) return FALSE; /*if the buddy is a list window, we must set curr index */ if (!lstrcmpA (infoPtr->szBuddyClass, "ListBox")){ newVal = SendMessageA(infoPtr->Buddy, LB_GETCARETINDEX, 0, 0); if(newVal < 0) return FALSE; } else{ /* we have a regular window, so will get the text */ if (!GetWindowTextA(infoPtr->Buddy, txt, sizeof(txt))) return FALSE; sep = UPDOWN_GetThousandSep(); /* now get rid of the separators */ for(src = dst = txt; *src; src++) if(*src != sep) *dst++ = *src; *dst = 0; /* try to convert the number and validate it */ newVal = strtol(txt, &src, infoPtr->Base); if(*src || !UPDOWN_InBounds (hwnd, newVal)) return FALSE; TRACE("new value(%d) read from buddy (old=%d)\n", newVal, infoPtr->CurVal); } infoPtr->CurVal = newVal; return TRUE; } /*********************************************************************** * UPDOWN_SetBuddyInt * Tries to set the pos to the buddy window based on current pos * returns: * TRUE - if it set the caption of the buddy successfully * FALSE - if an error occured */ static BOOL UPDOWN_SetBuddyInt (HWND hwnd) { UPDOWN_INFO *infoPtr = UPDOWN_GetInfoPtr (hwnd); char txt1[20], sep; int len; if (!IsWindow(infoPtr->Buddy)) return FALSE; TRACE("set new value(%d) to buddy.\n", infoPtr->CurVal); /*if the buddy is a list window, we must set curr index */ if(!lstrcmpA (infoPtr->szBuddyClass, "ListBox")){ SendMessageA(infoPtr->Buddy, LB_SETCURSEL, infoPtr->CurVal, 0); } else{ /* Regular window, so set caption to the number */ len = sprintf(txt1, (infoPtr->Base==16) ? "%X" : "%d", infoPtr->CurVal); sep = UPDOWN_GetThousandSep(); /* Do thousands seperation if necessary */ if (!(GetWindowLongA (hwnd, GWL_STYLE) & UDS_NOTHOUSANDS) && (len > 3)) { char txt2[20], *src = txt1, *dst = txt2; if(len%3 > 0){ lstrcpynA (dst, src, len%3 + 1); /* need to include the null */ dst += len%3; src += len%3; } for(len=0; *src; len++){ if(len%3==0) *dst++ = sep; *dst++ = *src++; } *dst = 0; /* null terminate it */ strcpy(txt1, txt2); /* move it to the proper place */ } SetWindowTextA(infoPtr->Buddy, txt1); } return TRUE; } /*********************************************************************** * UPDOWN_DrawBuddyBorder [Internal] * * When we have a buddy set and that we are aligned on our buddy, we * want to draw a sunken edge to make like we are part of that control. */ static void UPDOWN_DrawBuddyBorder (HWND hwnd, HDC hdc) { DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); RECT clientRect; GetClientRect(hwnd, &clientRect); if (dwStyle & UDS_ALIGNLEFT) DrawEdge(hdc, &clientRect, EDGE_SUNKEN, BF_BOTTOM | BF_LEFT | BF_TOP); else DrawEdge(hdc, &clientRect, EDGE_SUNKEN, BF_BOTTOM | BF_RIGHT | BF_TOP); } /*********************************************************************** * UPDOWN_Draw [Internal] * * Draw the arrows. The background need not be erased. */ static void UPDOWN_Draw (HWND hwnd, HDC hdc) { UPDOWN_INFO *infoPtr = UPDOWN_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); BOOL prssed; RECT rect; /* * Draw the common border between ourselves and our buddy. */ if (UPDOWN_HasBuddyBorder(hwnd)) UPDOWN_DrawBuddyBorder(hwnd, hdc); /* Draw the incr button */ UPDOWN_GetArrowRect (hwnd, &rect, TRUE); prssed = (infoPtr->Flags & FLAG_INCR) && (infoPtr->Flags & FLAG_MOUSEIN); DrawFrameControl(hdc, &rect, DFC_SCROLL, (dwStyle & UDS_HORZ ? DFCS_SCROLLRIGHT : DFCS_SCROLLUP) | (prssed ? DFCS_PUSHED : 0) | (dwStyle&WS_DISABLED ? DFCS_INACTIVE : 0) ); /* Draw the space between the buttons */ rect.top = rect.bottom; rect.bottom++; DrawEdge(hdc, &rect, 0, BF_MIDDLE); /* Draw the decr button */ UPDOWN_GetArrowRect(hwnd, &rect, FALSE); prssed = (infoPtr->Flags & FLAG_DECR) && (infoPtr->Flags & FLAG_MOUSEIN); DrawFrameControl(hdc, &rect, DFC_SCROLL, (dwStyle & UDS_HORZ ? DFCS_SCROLLLEFT : DFCS_SCROLLDOWN) | (prssed ? DFCS_PUSHED : 0) | (dwStyle & WS_DISABLED ? DFCS_INACTIVE : 0) ); } /*********************************************************************** * UPDOWN_Refresh [Internal] * * Synchronous drawing (must NOT be used in WM_PAINT). * Calls UPDOWN_Draw. */ static void UPDOWN_Refresh (HWND hwnd) { HDC hdc; hdc = GetDC (hwnd); UPDOWN_Draw (hwnd, hdc); ReleaseDC (hwnd, hdc); } /*********************************************************************** * UPDOWN_Paint [Internal] * * Asynchronous drawing (must ONLY be used in WM_PAINT). * Calls UPDOWN_Draw. */ static void UPDOWN_Paint (HWND hwnd, HDC passedDC) { PAINTSTRUCT ps; HDC hdc = passedDC; if (passedDC == 0) hdc = BeginPaint (hwnd, &ps); UPDOWN_Draw (hwnd, hdc); if (passedDC == 0) EndPaint (hwnd, &ps); } /*********************************************************************** * UPDOWN_SetBuddy * Tests if 'hwndBud' is a valid window handle. If not, returns FALSE. * Else, sets it as a new Buddy. * Then, it should subclass the buddy * If window has the UDS_ARROWKEYS, it subcalsses the buddy window to * process the UP/DOWN arrow keys. * If window has the UDS_ALIGNLEFT or UDS_ALIGNRIGHT style * the size/pos of the buddy and the control are adjusted accordingly. */ static BOOL UPDOWN_SetBuddy (HWND hwnd, HWND hwndBud) { UPDOWN_INFO* infoPtr = UPDOWN_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); RECT budRect; /* new coord for the buddy */ int x,width; /* new x position and width for the up-down */ WNDPROC baseWndProc, currWndProc; /* Is it a valid bud? */ if(!IsWindow(hwndBud)) return FALSE; /* there is already a body assigned */ if ( infoPtr->Buddy ) RemovePropA(infoPtr->Buddy, BUDDY_UPDOWN_HWND); /* Store buddy window handle */ infoPtr->Buddy = hwndBud; /* keep upDown ctrl hwnd in a buddy property */ SetPropA( hwndBud, BUDDY_UPDOWN_HWND, hwnd); /* Store buddy window clas name */ memset(infoPtr->szBuddyClass, 0, UPDOWN_BUDDYCLASSNAMELEN); GetClassNameA (hwndBud, infoPtr->szBuddyClass, UPDOWN_BUDDYCLASSNAMELEN-1); if(dwStyle & UDS_ARROWKEYS){ /* Note that I don't clear the BUDDY_SUPERCLASS_WNDPROC property when we reset the upDown ctrl buddy to another buddy because it is not good to break the window proc chain. */ currWndProc = (WNDPROC) GetWindowLongA(hwndBud, GWL_WNDPROC); if (currWndProc != UPDOWN_Buddy_SubclassProc) { // replace the buddy's WndProc with ours baseWndProc = (WNDPROC)SetWindowLongA(hwndBud, GWL_WNDPROC, (LPARAM)UPDOWN_Buddy_SubclassProc); // and save the base class' WndProc SetPropA(hwndBud, BUDDY_SUPERCLASS_WNDPROC, (HANDLE)baseWndProc); } // else // its already been subclassed, don't overwrite BUDDY_SUPERCLASS_WNDPROC } /* do we need to do any adjustments? */ if(!(dwStyle & (UDS_ALIGNLEFT | UDS_ALIGNRIGHT))) return TRUE; /* Get the rect of the buddy relative to its parent */ GetWindowRect(infoPtr->Buddy, &budRect); MapWindowPoints(HWND_DESKTOP, GetParent(infoPtr->Buddy), (POINT *)(&budRect.left), 2); /* now do the positioning */ if(dwStyle & UDS_ALIGNRIGHT){ budRect.right -= DEFAULT_WIDTH+DEFAULT_XSEP; x = budRect.right+DEFAULT_XSEP; } else{ /* UDS_ALIGNLEFT */ x = budRect.left; budRect.left += DEFAULT_WIDTH+DEFAULT_XSEP; } /* first adjust the buddy to accomodate the up/down */ SetWindowPos(infoPtr->Buddy, 0, budRect.left, budRect.top, budRect.right - budRect.left, budRect.bottom - budRect.top, SWP_NOACTIVATE|SWP_NOZORDER); /* now position the up/down */ /* Since the UDS_ALIGN* flags were used, */ /* we will pick the position and size of the window. */ width = DEFAULT_WIDTH; /* * If the updown has a buddy border, it has to overlap with the buddy * to look as if it is integrated with the buddy control. * We nudge the control or change it size to overlap. */ if (UPDOWN_HasBuddyBorder(hwnd)) { if(dwStyle & UDS_ALIGNRIGHT) x-=DEFAULT_BUDDYBORDER; else width+=DEFAULT_BUDDYBORDER; } SetWindowPos (hwnd, infoPtr->Buddy, x, budRect.top-DEFAULT_ADDTOP, width, (budRect.bottom-budRect.top)+DEFAULT_ADDTOP+DEFAULT_ADDBOT, SWP_NOACTIVATE); return TRUE; } /*********************************************************************** * UPDOWN_DoAction * * This function increments/decrements the CurVal by the * 'delta' amount according to the 'incr' flag * It notifies the parent as required. * It handles wraping and non-wraping correctly. * It is assumed that delta>0 */ static void UPDOWN_DoAction (HWND hwnd, int delta, BOOL incr) { UPDOWN_INFO *infoPtr = UPDOWN_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); NM_UPDOWN ni; TRACE("%s by %d\n", incr ? "inc" : "dec", delta); /* check if we can do the modification first */ delta *= (incr ? 1 : -1) * (infoPtr->MaxVal < infoPtr->MinVal ? -1 : 1); /* We must notify parent now to obtain permission */ ni.iPos = infoPtr->CurVal; ni.iDelta = delta; ni.hdr.hwndFrom = hwnd; ni.hdr.idFrom = GetWindowLongA (hwnd, GWL_ID); ni.hdr.code = UDN_DELTAPOS; if (!SendMessageA(GetParent (hwnd), WM_NOTIFY, (WPARAM)ni.hdr.idFrom, (LPARAM)&ni)) { /* Parent said: OK to adjust */ /* Now adjust value with (maybe new) delta */ if (UPDOWN_OffsetVal (hwnd, ni.iDelta)) { /* Now take care about our buddy */ if(infoPtr->Buddy && IsWindow(infoPtr->Buddy) && (dwStyle & UDS_SETBUDDYINT) ) UPDOWN_SetBuddyInt (hwnd); } } /* Also, notify it. This message is sent in any case. */ SendMessageA (GetParent (hwnd), dwStyle & UDS_HORZ ? WM_HSCROLL : WM_VSCROLL, MAKELONG(SB_THUMBPOSITION, infoPtr->CurVal), hwnd); } /*********************************************************************** * UPDOWN_IsEnabled * * Returns TRUE if it is enabled as well as its buddy (if any) * FALSE otherwise */ static BOOL UPDOWN_IsEnabled (HWND hwnd) { UPDOWN_INFO *infoPtr = UPDOWN_GetInfoPtr (hwnd); if(GetWindowLongA (hwnd, GWL_STYLE) & WS_DISABLED) return FALSE; if(infoPtr->Buddy) return IsWindowEnabled(infoPtr->Buddy); return TRUE; } /*********************************************************************** * UPDOWN_CancelMode * * Deletes any timers, releases the mouse and does redraw if necessary. * If the control is not in "capture" mode, it does nothing. * If the control was not in cancel mode, it returns FALSE. * If the control was in cancel mode, it returns TRUE. */ static BOOL UPDOWN_CancelMode (HWND hwnd) { UPDOWN_INFO *infoPtr = UPDOWN_GetInfoPtr (hwnd); /* if not in 'capture' mode, do nothing */ if(!(infoPtr->Flags & FLAG_CLICKED)) return FALSE; KillTimer (hwnd, TIMERID1); /* kill all possible timers */ KillTimer (hwnd, TIMERID2); if (GetCapture() == hwnd) /* let the mouse go */ ReleaseCapture(); /* if we still have it */ infoPtr->Flags = 0; /* get rid of any flags */ UPDOWN_Refresh (hwnd); /* redraw the control just in case */ return TRUE; } /*********************************************************************** * UPDOWN_HandleMouseEvent * * Handle a mouse event for the updown. * 'pt' is the location of the mouse event in client or * windows coordinates. */ static void UPDOWN_HandleMouseEvent (HWND hwnd, UINT msg, POINT pt) { UPDOWN_INFO *infoPtr = UPDOWN_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); RECT rect; int temp; switch(msg) { case WM_LBUTTONDOWN: /* Initialise mouse tracking */ /* If we are already in the 'clicked' mode, then nothing to do */ if(infoPtr->Flags & FLAG_CLICKED) return; /* If the buddy is an edit, will set focus to it */ if (!lstrcmpA (infoPtr->szBuddyClass, "Edit")) SetFocus(infoPtr->Buddy); /* Now see which one is the 'active' arrow */ temp = UPDOWN_GetArrowFromPoint (hwnd, &rect, pt); /* Update the CurVal if necessary */ if (dwStyle & UDS_SETBUDDYINT) UPDOWN_GetBuddyInt (hwnd); /* Set up the correct flags */ infoPtr->Flags = 0; infoPtr->Flags |= temp ? FLAG_INCR : FLAG_DECR; infoPtr->Flags |= FLAG_MOUSEIN; /* repaint the control */ UPDOWN_Refresh (hwnd); /* process the click */ UPDOWN_DoAction (hwnd, 1, infoPtr->Flags & FLAG_INCR); /* now capture all mouse messages */ SetCapture (hwnd); /* and startup the first timer */ SetTimer(hwnd, TIMERID1, INITIAL_DELAY, 0); break; case WM_MOUSEMOVE: /* If we are not in the 'clicked' mode, then nothing to do */ if(!(infoPtr->Flags & FLAG_CLICKED)) return; /* save the flags to see if any got modified */ temp = infoPtr->Flags; /* Now get the 'active' arrow rectangle */ if (infoPtr->Flags & FLAG_INCR) UPDOWN_GetArrowRect (hwnd, &rect, TRUE); else UPDOWN_GetArrowRect (hwnd, &rect, FALSE); /* Update the flags if we are in/out */ if(PtInRect(&rect, pt)) infoPtr->Flags |= FLAG_MOUSEIN; else{ infoPtr->Flags &= ~FLAG_MOUSEIN; if(accelIndex != -1) /* if we have accel info */ accelIndex = 0; /* reset it */ } /* If state changed, redraw the control */ if(temp != infoPtr->Flags) UPDOWN_Refresh (hwnd); break; default: ERR("Impossible case!\n"); } } /*********************************************************************** * UpDownWndProc */ static LRESULT WINAPI UpDownWindowProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) { UPDOWN_INFO *infoPtr = UPDOWN_GetInfoPtr (hwnd); DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE); int temp; if (!infoPtr && (message != WM_CREATE) && (message != WM_NCCREATE)) return DefWindowProcA (hwnd, message, wParam, lParam); switch(message) { case WM_NCCREATE: /* get rid of border, if any */ SetWindowLongA (hwnd, GWL_STYLE, dwStyle & ~WS_BORDER); return TRUE; case WM_CREATE: infoPtr = (UPDOWN_INFO*)COMCTL32_Alloc (sizeof(UPDOWN_INFO)); SetWindowLongA (hwnd, 0, (DWORD)infoPtr); /* initialize the info struct */ infoPtr->AccelCount=0; infoPtr->AccelVect=0; infoPtr->CurVal=0; infoPtr->MinVal=0; infoPtr->MaxVal=100; /*FIXME*/ infoPtr->Base = 10; /* Default to base 10 */ infoPtr->Buddy = 0; /* No buddy window yet */ infoPtr->Flags = 0; /* And no flags */ /* Do we pick the buddy win ourselves? */ if (dwStyle & UDS_AUTOBUDDY) UPDOWN_SetBuddy (hwnd, GetWindow (hwnd, GW_HWNDPREV)); TRACE("UpDown Ctrl creation, hwnd=%04x\n", hwnd); break; case WM_DESTROY: if(infoPtr->AccelVect) COMCTL32_Free (infoPtr->AccelVect); if ( IsWindow(infoPtr->Buddy) ) /* Cleanup */ RemovePropA(infoPtr->Buddy, BUDDY_UPDOWN_HWND); COMCTL32_Free (infoPtr); SetWindowLongA (hwnd, 0, 0); TRACE("UpDown Ctrl destruction, hwnd=%04x\n", hwnd); break; case WM_ENABLE: if (dwStyle & WS_DISABLED) UPDOWN_CancelMode (hwnd); UPDOWN_Refresh (hwnd); break; case WM_TIMER: /* if initial timer, kill it and start the repeat timer */ if(wParam == TIMERID1){ KillTimer(hwnd, TIMERID1); /* if no accel info given, used default timer */ if(infoPtr->AccelCount==0 || infoPtr->AccelVect==0){ accelIndex = -1; temp = REPEAT_DELAY; } else{ accelIndex = 0; /* otherwise, use it */ temp = infoPtr->AccelVect[accelIndex].nSec * 1000 + 1; } SetTimer(hwnd, TIMERID2, temp, 0); } /* now, if the mouse is above us, do the thing...*/ if(infoPtr->Flags & FLAG_MOUSEIN){ temp = accelIndex==-1 ? 1 : infoPtr->AccelVect[accelIndex].nInc; UPDOWN_DoAction(hwnd, temp, infoPtr->Flags & FLAG_INCR); if(accelIndex!=-1 && accelIndex < infoPtr->AccelCount-1){ KillTimer(hwnd, TIMERID2); accelIndex++; /* move to the next accel info */ temp = infoPtr->AccelVect[accelIndex].nSec * 1000 + 1; /* make sure we have at least 1ms intervals */ SetTimer(hwnd, TIMERID2, temp, 0); } } break; case WM_CANCELMODE: UPDOWN_CancelMode (hwnd); break; case WM_LBUTTONUP: if(!UPDOWN_CancelMode(hwnd)) break; SendMessageA(GetParent(hwnd), dwStyle & UDS_HORZ ? WM_HSCROLL : WM_VSCROLL, MAKELONG(SB_ENDSCROLL, infoPtr->CurVal), hwnd); /*If we released the mouse and our buddy is an edit */ /* we must select all text in it. */ if (!lstrcmpA (infoPtr->szBuddyClass, "Edit")) SendMessageA(infoPtr->Buddy, EM_SETSEL, 0, MAKELONG(0, -1)); break; case WM_LBUTTONDOWN: case WM_MOUSEMOVE: if(UPDOWN_IsEnabled(hwnd)){ POINT pt; CONV_POINT16TO32( (POINT16 *)&lParam, &pt ); UPDOWN_HandleMouseEvent (hwnd, message, pt ); } break; case WM_KEYDOWN: if((dwStyle & UDS_ARROWKEYS) && UPDOWN_IsEnabled(hwnd)){ switch(wParam){ case VK_UP: case VK_DOWN: UPDOWN_GetBuddyInt (hwnd); UPDOWN_DoAction (hwnd, 1, wParam==VK_UP); break; } } break; case WM_PAINT: UPDOWN_Paint (hwnd, (HDC)wParam); break; case UDM_GETACCEL: if (wParam==0 && lParam==0) /*if both zero, */ return infoPtr->AccelCount; /*just return the accel count*/ if (wParam || lParam){ UNKNOWN_PARAM(UDM_GETACCEL, wParam, lParam); return 0; } temp = min(infoPtr->AccelCount, wParam); memcpy((void *)lParam, infoPtr->AccelVect, temp*sizeof(UDACCEL)); return temp; case UDM_SETACCEL: TRACE("UpDown Ctrl new accel info, hwnd=%04x\n", hwnd); if(infoPtr->AccelVect){ COMCTL32_Free (infoPtr->AccelVect); infoPtr->AccelCount = 0; infoPtr->AccelVect = 0; } if(wParam==0) return TRUE; infoPtr->AccelVect = COMCTL32_Alloc (wParam*sizeof(UDACCEL)); if(infoPtr->AccelVect==0) return FALSE; memcpy(infoPtr->AccelVect, (void*)lParam, wParam*sizeof(UDACCEL)); return TRUE; case UDM_GETBASE: if (wParam || lParam) UNKNOWN_PARAM(UDM_GETBASE, wParam, lParam); return infoPtr->Base; case UDM_SETBASE: TRACE("UpDown Ctrl new base(%d), hwnd=%04x\n", wParam, hwnd); if ( !(wParam==10 || wParam==16) || lParam) UNKNOWN_PARAM(UDM_SETBASE, wParam, lParam); if (wParam==10 || wParam==16){ temp = infoPtr->Base; infoPtr->Base = wParam; return temp; /* return the prev base */ } break; case UDM_GETBUDDY: if (wParam || lParam) UNKNOWN_PARAM(UDM_GETBUDDY, wParam, lParam); return infoPtr->Buddy; case UDM_SETBUDDY: if (lParam) UNKNOWN_PARAM(UDM_SETBUDDY, wParam, lParam); temp = infoPtr->Buddy; UPDOWN_SetBuddy (hwnd, wParam); TRACE("UpDown Ctrl new buddy(%04x), hwnd=%04x\n", infoPtr->Buddy, hwnd); return temp; case UDM_GETPOS: if (wParam || lParam) UNKNOWN_PARAM(UDM_GETPOS, wParam, lParam); temp = UPDOWN_GetBuddyInt (hwnd); return MAKELONG(infoPtr->CurVal, temp ? 0 : 1); case UDM_SETPOS: if (wParam || HIWORD(lParam)) UNKNOWN_PARAM(UDM_GETPOS, wParam, lParam); temp = SLOWORD(lParam); TRACE("UpDown Ctrl new value(%d), hwnd=%04x\n", temp, hwnd); if(!UPDOWN_InBounds(hwnd, temp)){ if(temp < infoPtr->MinVal) temp = infoPtr->MinVal; if(temp > infoPtr->MaxVal) temp = infoPtr->MaxVal; } wParam = infoPtr->CurVal; /* save prev value */ infoPtr->CurVal = temp; /* set the new value */ if(dwStyle & UDS_SETBUDDYINT) UPDOWN_SetBuddyInt (hwnd); return wParam; /* return prev value */ case UDM_GETRANGE: if (wParam || lParam) UNKNOWN_PARAM(UDM_GETRANGE, wParam, lParam); return MAKELONG(infoPtr->MaxVal, infoPtr->MinVal); case UDM_SETRANGE: if (wParam) UNKNOWN_PARAM(UDM_SETRANGE, wParam, lParam); /* we must have: */ infoPtr->MaxVal = SLOWORD(lParam); /* UD_MINVAL <= Max <= UD_MAXVAL */ infoPtr->MinVal = SHIWORD(lParam); /* UD_MINVAL <= Min <= UD_MAXVAL */ /* |Max-Min| <= UD_MAXVAL */ TRACE("UpDown Ctrl new range(%d to %d), hwnd=%04x\n", infoPtr->MinVal, infoPtr->MaxVal, hwnd); break; case UDM_GETRANGE32: if (wParam) *(LPINT)wParam = infoPtr->MinVal; if (lParam) *(LPINT)lParam = infoPtr->MaxVal; break; case UDM_SETRANGE32: infoPtr->MinVal = (INT)wParam; infoPtr->MaxVal = (INT)lParam; if (infoPtr->MaxVal <= infoPtr->MinVal) infoPtr->MaxVal = infoPtr->MinVal + 1; TRACE("UpDown Ctrl new range(%d to %d), hwnd=%04x\n", infoPtr->MinVal, infoPtr->MaxVal, hwnd); break; default: if (message >= WM_USER) ERR("unknown msg %04x wp=%04x lp=%08lx\n", message, wParam, lParam); return DefWindowProcA (hwnd, message, wParam, lParam); } return 0; } /*********************************************************************** * UPDOWN_Buddy_SubclassProc used to handle messages sent to the buddy * control. */ LRESULT CALLBACK UPDOWN_Buddy_SubclassProc ( HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { WNDPROC superClassWndProc = (WNDPROC)GetPropA(hwnd, BUDDY_SUPERCLASS_WNDPROC); TRACE("hwnd=%04x, wndProc=%d, uMsg=%04x, wParam=%d, lParam=%d\n", hwnd, (INT)superClassWndProc, uMsg, wParam, (UINT)lParam); switch (uMsg) { case WM_KEYDOWN: { if ( ((int)wParam == VK_UP ) || ((int)wParam == VK_DOWN ) ) { HWND upDownHwnd = GetPropA(hwnd, BUDDY_UPDOWN_HWND); UPDOWN_INFO *infoPtr = UPDOWN_GetInfoPtr(upDownHwnd); if (!lstrcmpA (infoPtr->szBuddyClass, "ListBox")) { /* if the buddy is a list window, we must update curr index */ INT oldVal = SendMessageA(hwnd, LB_GETCURSEL, 0, 0); SendMessageA(hwnd, LB_SETCURSEL, oldVal+1, 0); } else { UPDOWN_GetBuddyInt(upDownHwnd); UPDOWN_DoAction(upDownHwnd, 1, wParam==VK_UP); } break; } /* else Fall Through */ } } return CallWindowProcA( superClassWndProc, hwnd, uMsg, wParam, lParam); } /*********************************************************************** * UPDOWN_Register [Internal] * * Registers the updown window class. */ VOID UPDOWN_Register(void) { WNDCLASSA wndClass; ZeroMemory( &wndClass, sizeof( WNDCLASSA ) ); wndClass.style = CS_GLOBALCLASS | CS_VREDRAW; wndClass.lpfnWndProc = (WNDPROC)UpDownWindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(UPDOWN_INFO*); wndClass.hCursor = LoadCursorA( 0, IDC_ARROWA ); wndClass.hbrBackground = (HBRUSH)(COLOR_3DFACE + 1); wndClass.lpszClassName = UPDOWN_CLASSA; RegisterClassA( &wndClass ); } /*********************************************************************** * UPDOWN_Unregister [Internal] * * Unregisters the updown window class. */ VOID UPDOWN_Unregister (void) { UnregisterClassA (UPDOWN_CLASSA, (HINSTANCE)NULL); } wine-20000526/dlls/commdlg/0040755000175000001440000000000007113604170015024 5ustar julliarduserswine-20000526/dlls/commdlg/.cvsignore0100644000175000001440000000007207045213572017026 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libcomdlg32.so.1.0 rsrc.s wine-20000526/dlls/commdlg/Makefile.in0100644000175000001440000000073207101374247017076 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = comdlg32 SOVERSION = 1.0 ALTNAMES = commdlg IMPORTS = winspool.drv WRCEXTRA = -s -pcomdlg32 SPEC_SRCS = commdlg.spec comdlg32.spec C_SRCS = \ cdlg32.c \ colordlg.c \ filedlg.c \ filedlg95.c \ filedlgbrowser.c \ finddlg.c \ finddlg32.c \ filetitle.c \ fontdlg.c \ generic.c \ printdlg.c RC_SRCS= \ rsrc.rc @MAKE_DLL_RULES@ all: check_wrc ### Dependencies: wine-20000526/dlls/commdlg/cdlg.h0100644000175000001440000002152607113574776016133 0ustar julliardusers/* * Common Dialog Boxes interface (32 bit) * * Copyright 1998 Bertho A. Stultiens */ #ifndef _WINE_DLL_CDLG_H #define _WINE_DLL_CDLG_H #include "dlgs.h" /*---------------- 16-bit ----------------*/ extern HINSTANCE16 COMMDLG_hInstance; extern HINSTANCE COMMDLG_hInstance32; /*---------------- 32-bit ----------------*/ /* Common dialogs implementation globals */ #define COMDLG32_Atom ((ATOM)0xa000) /* MS uses this one to identify props */ extern HINSTANCE COMDLG32_hInstance; void COMDLG32_SetCommDlgExtendedError(DWORD err); LPVOID COMDLG32_AllocMem(int size); /* Find/Replace local definitions */ #define FR_WINE_UNICODE 0x80000000 #define FR_WINE_REPLACE 0x40000000 typedef struct { FINDREPLACEA fr; /* Internally used structure */ union { FINDREPLACEA *fra; /* Reference to the user supplied structure */ FINDREPLACEW *frw; } user_fr; } COMDLG32_FR_Data; #define PD32_PRINT_TITLE 7000 #define PD32_VALUE_UREADABLE 1104 #define PD32_INVALID_PAGE_RANGE 1105 #define PD32_FROM_NOT_ABOVE_TO 1106 #define PD32_MARGINS_OVERLAP 1107 #define PD32_NR_OF_COPIES_EMPTY 1108 #define PD32_TOO_LARGE_COPIES 1109 #define PD32_PRINT_ERROR 1110 #define PD32_NO_DEFAULT_PRINTER 1111 #define PD32_CANT_FIND_PRINTER 1112 #define PD32_OUT_OF_MEMORY 1113 #define PD32_GENERIC_ERROR 1114 #define PD32_DRIVER_UNKNOWN 1115 #define PD32_PRINTER_STATUS_READY 1536 #define PD32_PRINTER_STATUS_PAUSED 1537 #define PD32_PRINTER_STATUS_ERROR 1538 #define PD32_PRINTER_STATUS_PENDING_DELETION 1539 #define PD32_PRINTER_STATUS_PAPER_JAM 1540 #define PD32_PRINTER_STATUS_PAPER_OUT 1541 #define PD32_PRINTER_STATUS_MANUAL_FEED 1542 #define PD32_PRINTER_STATUS_PAPER_PROBLEM 1543 #define PD32_PRINTER_STATUS_OFFLINE 1544 #define PD32_PRINTER_STATUS_IO_ACTIVE 1545 #define PD32_PRINTER_STATUS_BUSY 1546 #define PD32_PRINTER_STATUS_PRINTING 1547 #define PD32_PRINTER_STATUS_OUTPUT_BIN_FULL 1548 #define PD32_PRINTER_STATUS_NOT_AVAILABLE 1549 #define PD32_PRINTER_STATUS_WAITING 1550 #define PD32_PRINTER_STATUS_PROCESSING 1551 #define PD32_PRINTER_STATUS_INITIALIZING 1552 #define PD32_PRINTER_STATUS_WARMING_UP 1553 #define PD32_PRINTER_STATUS_TONER_LOW 1554 #define PD32_PRINTER_STATUS_NO_TONER 1555 #define PD32_PRINTER_STATUS_PAGE_PUNT 1556 #define PD32_PRINTER_STATUS_USER_INTERVENTION 1557 #define PD32_PRINTER_STATUS_OUT_OF_MEMORY 1558 #define PD32_PRINTER_STATUS_DOOR_OPEN 1559 #define PD32_PRINTER_STATUS_SERVER_UNKNOWN 1560 #define PD32_PRINTER_STATUS_POWER_SAVE 1561 #define PD32_DEFAULT_PRINTER 1582 #define PD32_NR_OF_DOCUMENTS_IN_QUEUE 1583 #define PD32_PRINT_ALL_X_PAGES 1584 #define PD32_MARGINS_IN_INCHES 1585 #define PD32_MARGINS_IN_MILIMETERS 1586 #define PD32_MILIMETERS 1587 #include "commctrl.h" #include "wine/undocshell.h" #include "shellapi.h" /* IMAGELIST */ extern BOOL (WINAPI* COMDLG32_ImageList_Draw) (HIMAGELIST himl, int i, HDC hdcDest, int x, int y, UINT fStyle); /* ITEMIDLIST */ extern LPITEMIDLIST (WINAPI *COMDLG32_PIDL_ILClone) (LPCITEMIDLIST); extern LPITEMIDLIST (WINAPI *COMDLG32_PIDL_ILCombine)(LPCITEMIDLIST,LPCITEMIDLIST); extern LPITEMIDLIST (WINAPI *COMDLG32_PIDL_ILGetNext)(LPITEMIDLIST); extern BOOL (WINAPI *COMDLG32_PIDL_ILRemoveLastID)(LPCITEMIDLIST); extern BOOL (WINAPI *COMDLG32_PIDL_ILIsEqual)(LPCITEMIDLIST, LPCITEMIDLIST); /* SHELL */ extern BOOL (WINAPI *COMDLG32_SHGetPathFromIDListA) (LPCITEMIDLIST,LPSTR); extern HRESULT (WINAPI *COMDLG32_SHGetSpecialFolderLocation)(HWND,INT,LPITEMIDLIST *); extern DWORD (WINAPI *COMDLG32_SHGetDesktopFolder)(IShellFolder **); extern DWORD (WINAPI *COMDLG32_SHGetFileInfoA)(LPCSTR,DWORD,SHFILEINFOA*,UINT,UINT); extern LPVOID (WINAPI *COMDLG32_SHAlloc)(DWORD); extern DWORD (WINAPI *COMDLG32_SHFree)(LPVOID); /* PATH */ extern BOOL (WINAPI *COMDLG32_PathIsRootA)(LPCSTR x); extern LPCSTR (WINAPI *COMDLG32_PathFindFilenameA)(LPCSTR path); extern DWORD (WINAPI *COMDLG32_PathRemoveFileSpecA)(LPSTR fn); extern BOOL (WINAPI *COMDLG32_PathMatchSpecW)(LPCWSTR x, LPCWSTR y); extern LPSTR (WINAPI *COMDLG32_PathAddBackslashA)(LPSTR path); extern BOOL WINAPI GetFileDialog95A(LPOPENFILENAMEA ofn,UINT iDlgType); extern BOOL WINAPI GetFileDialog95W(LPOPENFILENAMEW ofn,UINT iDlgType); /* 16 bit api */ #include "pshpack1.h" typedef UINT16 (CALLBACK *LPOFNHOOKPROC16)(HWND16,UINT16,WPARAM16,LPARAM); typedef struct { DWORD lStructSize; HWND16 hwndOwner; HINSTANCE16 hInstance; SEGPTR lpstrFilter; SEGPTR lpstrCustomFilter; DWORD nMaxCustFilter; DWORD nFilterIndex; SEGPTR lpstrFile; DWORD nMaxFile; SEGPTR lpstrFileTitle; DWORD nMaxFileTitle; SEGPTR lpstrInitialDir; SEGPTR lpstrTitle; DWORD Flags; UINT16 nFileOffset; UINT16 nFileExtension; SEGPTR lpstrDefExt; LPARAM lCustData; LPOFNHOOKPROC16 lpfnHook; SEGPTR lpTemplateName; } OPENFILENAME16,*LPOPENFILENAME16; typedef UINT16 (CALLBACK *LPCCHOOKPROC16) (HWND16, UINT16, WPARAM16, LPARAM); typedef struct { DWORD lStructSize; HWND16 hwndOwner; HWND16 hInstance; COLORREF rgbResult; COLORREF *lpCustColors; DWORD Flags; LPARAM lCustData; LPCCHOOKPROC16 lpfnHook; SEGPTR lpTemplateName; } CHOOSECOLOR16; typedef CHOOSECOLOR16 *LPCHOOSECOLOR16; typedef UINT16 (CALLBACK *LPFRHOOKPROC16)(HWND16,UINT16,WPARAM16,LPARAM); typedef struct { DWORD lStructSize; /* size of this struct 0x20 */ HWND16 hwndOwner; /* handle to owner's window */ HINSTANCE16 hInstance; /* instance handle of.EXE that */ /* contains cust. dlg. template */ DWORD Flags; /* one or more of the FR_?? */ SEGPTR lpstrFindWhat; /* ptr. to search string */ SEGPTR lpstrReplaceWith; /* ptr. to replace string */ UINT16 wFindWhatLen; /* size of find buffer */ UINT16 wReplaceWithLen; /* size of replace buffer */ LPARAM lCustData; /* data passed to hook fn. */ LPFRHOOKPROC16 lpfnHook; SEGPTR lpTemplateName; /* custom template name */ } FINDREPLACE16, *LPFINDREPLACE16; typedef UINT16 (CALLBACK *LPCFHOOKPROC16)(HWND16,UINT16,WPARAM16,LPARAM); typedef struct { DWORD lStructSize; HWND16 hwndOwner; /* caller's window handle */ HDC16 hDC; /* printer DC/IC or NULL */ SEGPTR lpLogFont; /* ptr. to a LOGFONT struct */ short iPointSize; /* 10 * size in points of selected font */ DWORD Flags; /* enum. type flags */ COLORREF rgbColors; /* returned text color */ LPARAM lCustData; /* data passed to hook fn. */ LPCFHOOKPROC16 lpfnHook; SEGPTR lpTemplateName; /* custom template name */ HINSTANCE16 hInstance; /* instance handle of.EXE that */ /* contains cust. dlg. template */ SEGPTR lpszStyle; /* return the style field here */ /* must be LF_FACESIZE or bigger */ UINT16 nFontType; /* same value reported to the */ /* EnumFonts callback with the */ /* extra FONTTYPE_ bits added */ short nSizeMin; /* minimum pt size allowed & */ short nSizeMax; /* max pt size allowed if */ /* CF_LIMITSIZE is used */ } CHOOSEFONT16, *LPCHOOSEFONT16; typedef UINT16 (CALLBACK *LPPRINTHOOKPROC16) (HWND16, UINT16, WPARAM16, LPARAM); typedef UINT16 (CALLBACK *LPSETUPHOOKPROC16) (HWND16, UINT16, WPARAM16, LPARAM); typedef struct { DWORD lStructSize; HWND16 hwndOwner; HGLOBAL16 hDevMode; HGLOBAL16 hDevNames; HDC16 hDC; DWORD Flags; WORD nFromPage; WORD nToPage; WORD nMinPage; WORD nMaxPage; WORD nCopies; HINSTANCE16 hInstance; LPARAM lCustData; LPPRINTHOOKPROC16 lpfnPrintHook; LPSETUPHOOKPROC16 lpfnSetupHook; SEGPTR lpPrintTemplateName; SEGPTR lpSetupTemplateName; HGLOBAL16 hPrintTemplate; HGLOBAL16 hSetupTemplate; } PRINTDLG16, *LPPRINTDLG16; BOOL16 WINAPI ChooseColor16(LPCHOOSECOLOR16 lpChCol); HWND16 WINAPI FindText16( SEGPTR find); INT16 WINAPI GetFileTitle16(LPCSTR lpFile, LPSTR lpTitle, UINT16 cbBuf); BOOL16 WINAPI GetOpenFileName16(SEGPTR ofn); BOOL16 WINAPI GetSaveFileName16(SEGPTR ofn); BOOL16 WINAPI PrintDlg16( LPPRINTDLG16 print); HWND16 WINAPI ReplaceText16( SEGPTR find); BOOL16 WINAPI ChooseFont16(LPCHOOSEFONT16); #include "poppack.h" #endif /* _WINE_DLL_CDLG_H */ wine-20000526/dlls/commdlg/cdlg32.c0100644000175000001440000001570407105334140016250 0ustar julliardusers/* * Common Dialog Boxes interface (32 bit) * Find/Replace * * Copyright 1999 Bertho A. Stultiens */ #include "winbase.h" #include "wine/winbase16.h" #include "commdlg.h" #include "cderr.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(commdlg); #include "cdlg.h" HINSTANCE COMDLG32_hInstance = 0; HINSTANCE16 COMDLG32_hInstance16 = 0; static DWORD COMDLG32_TlsIndex; static int COMDLG32_Attach = 0; HINSTANCE COMCTL32_hInstance = 0; HINSTANCE SHELL32_hInstance = 0; HINSTANCE SHLWAPI_hInstance = 0; /* IMAGELIST */ BOOL (WINAPI* COMDLG32_ImageList_Draw) (HIMAGELIST himl, int i, HDC hdcDest, int x, int y, UINT fStyle); /* ITEMIDLIST */ LPITEMIDLIST (WINAPI *COMDLG32_PIDL_ILClone) (LPCITEMIDLIST); LPITEMIDLIST (WINAPI *COMDLG32_PIDL_ILCombine)(LPCITEMIDLIST,LPCITEMIDLIST); LPITEMIDLIST (WINAPI *COMDLG32_PIDL_ILGetNext)(LPITEMIDLIST); BOOL (WINAPI *COMDLG32_PIDL_ILRemoveLastID)(LPCITEMIDLIST); BOOL (WINAPI *COMDLG32_PIDL_ILIsEqual)(LPCITEMIDLIST, LPCITEMIDLIST); /* SHELL */ BOOL (WINAPI *COMDLG32_SHGetPathFromIDListA) (LPCITEMIDLIST,LPSTR); HRESULT (WINAPI *COMDLG32_SHGetSpecialFolderLocation)(HWND,INT,LPITEMIDLIST *); DWORD (WINAPI *COMDLG32_SHGetDesktopFolder)(IShellFolder **); DWORD (WINAPI *COMDLG32_SHGetFileInfoA)(LPCSTR,DWORD,SHFILEINFOA*,UINT,UINT); LPVOID (WINAPI *COMDLG32_SHAlloc)(DWORD); DWORD (WINAPI *COMDLG32_SHFree)(LPVOID); HRESULT (WINAPI *COMDLG32_StrRetToBufA)(LPSTRRET,LPITEMIDLIST,LPSTR,DWORD); HRESULT (WINAPI *COMDLG32_StrRetToBufW)(LPSTRRET,LPITEMIDLIST,LPWSTR,DWORD); /* PATH */ BOOL (WINAPI *COMDLG32_PathIsRootA)(LPCSTR x); LPCSTR (WINAPI *COMDLG32_PathFindFilenameA)(LPCSTR path); DWORD (WINAPI *COMDLG32_PathRemoveFileSpecA)(LPSTR fn); BOOL (WINAPI *COMDLG32_PathMatchSpecW)(LPCWSTR x, LPCWSTR y); LPSTR (WINAPI *COMDLG32_PathAddBackslashA)(LPSTR path); /*********************************************************************** * COMDLG32_DllEntryPoint (COMDLG32.entry) * * Initialization code for the COMDLG32 DLL * * RETURNS: * FALSE if sibling could not be loaded or instantiated twice, TRUE * otherwise. */ BOOL WINAPI COMDLG32_DllEntryPoint(HINSTANCE hInstance, DWORD Reason, LPVOID Reserved) { TRACE("(%08x, %08lx, %p)\n", hInstance, Reason, Reserved); switch(Reason) { case DLL_PROCESS_ATTACH: COMDLG32_Attach++; if(COMDLG32_hInstance) { ERR("comdlg32.dll instantiated twice in one address space!\n"); /* * We should return FALSE here, but that will break * most apps that use CreateProcess because we do * not yet support seperate address spaces. */ return TRUE; } COMDLG32_hInstance = hInstance; DisableThreadLibraryCalls(hInstance); if(!COMDLG32_hInstance16) { if(!(COMDLG32_hInstance16 = LoadLibrary16("commdlg.dll"))) { ERR("Could not load sibling commdlg.dll\n"); return FALSE; } } COMDLG32_TlsIndex = 0xffffffff; COMCTL32_hInstance = LoadLibraryA("COMCTL32.DLL"); SHELL32_hInstance = LoadLibraryA("SHELL32.DLL"); SHLWAPI_hInstance = LoadLibraryA("SHLWAPI.DLL"); if (!COMCTL32_hInstance || !SHELL32_hInstance || !SHLWAPI_hInstance) { ERR("loading of comctl32 or shell32 or shlwapi failed\n"); return FALSE; } /* IMAGELIST */ COMDLG32_ImageList_Draw=(void*)GetProcAddress(COMCTL32_hInstance,"ImageList_Draw"); /* ITEMISLIST */ COMDLG32_PIDL_ILIsEqual =(void*)GetProcAddress(SHELL32_hInstance, (LPCSTR)21L); COMDLG32_PIDL_ILCombine =(void*)GetProcAddress(SHELL32_hInstance, (LPCSTR)25L); COMDLG32_PIDL_ILGetNext =(void*)GetProcAddress(SHELL32_hInstance, (LPCSTR)153L); COMDLG32_PIDL_ILClone =(void*)GetProcAddress(SHELL32_hInstance, (LPCSTR)18L); COMDLG32_PIDL_ILRemoveLastID =(void*)GetProcAddress(SHELL32_hInstance, (LPCSTR)17L); /* SHELL */ COMDLG32_SHAlloc = (void*)GetProcAddress(SHELL32_hInstance, (LPCSTR)196L); COMDLG32_SHFree = (void*)GetProcAddress(SHELL32_hInstance, (LPCSTR)195L); COMDLG32_SHGetSpecialFolderLocation = (void*)GetProcAddress(SHELL32_hInstance,"SHGetSpecialFolderLocation"); COMDLG32_SHGetPathFromIDListA = (void*)GetProcAddress(SHELL32_hInstance,"SHGetPathFromIDListA"); COMDLG32_SHGetDesktopFolder = (void*)GetProcAddress(SHELL32_hInstance,"SHGetDesktopFolder"); COMDLG32_SHGetFileInfoA = (void*)GetProcAddress(SHELL32_hInstance,"SHGetFileInfoA"); /* ### WARINIG ### We can't do a GetProcAddress to link to StrRetToBuf[A|W] sine not all versions of the shlwapi are exporting these functions. When we are seperating the dlls then we have to dublicate code from shell32 into comdlg32. Till then just call these functions. These functions don't have any side effects so it won't break the use of any combination of native and buildin dll's (jsch) */ /* PATH */ COMDLG32_PathMatchSpecW = (void*)GetProcAddress(SHLWAPI_hInstance,"PathMatchSpecW"); COMDLG32_PathIsRootA = (void*)GetProcAddress(SHLWAPI_hInstance,"PathIsRootA"); COMDLG32_PathRemoveFileSpecA = (void*)GetProcAddress(SHLWAPI_hInstance,"PathRemoveFileSpecA"); COMDLG32_PathFindFilenameA = (void*)GetProcAddress(SHLWAPI_hInstance,"PathFindFileNameA"); COMDLG32_PathAddBackslashA = (void*)GetProcAddress(SHLWAPI_hInstance,"PathAddBackslashA"); break; case DLL_PROCESS_DETACH: if(!--COMDLG32_Attach) { if (COMDLG32_TlsIndex != 0xffffffff) TlsFree(COMDLG32_TlsIndex); COMDLG32_TlsIndex = 0xffffffff; COMDLG32_hInstance = 0; if(COMDLG32_hInstance16) FreeLibrary16(COMDLG32_hInstance16); } FreeLibrary(COMCTL32_hInstance); FreeLibrary(SHELL32_hInstance); FreeLibrary(SHLWAPI_hInstance); break; } return TRUE; } /*********************************************************************** * COMDLG32_AllocMem (internal) * Get memory for internal datastructure plus stringspace etc. * RETURNS * Pointer to a heap block: Succes * NULL: Failure */ LPVOID COMDLG32_AllocMem( int size /* [in] Block size to allocate */ ) { LPVOID ptr = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, size); if(!ptr) { COMDLG32_SetCommDlgExtendedError(CDERR_MEMALLOCFAILURE); return NULL; } return ptr; } /*********************************************************************** * COMDLG32_SetCommDlgExtendedError (internal) * * Used to set the thread's local error value if a comdlg32 function fails. */ void COMDLG32_SetCommDlgExtendedError(DWORD err) { TRACE("(%08lx)\n", err); if (COMDLG32_TlsIndex == 0xffffffff) COMDLG32_TlsIndex = TlsAlloc(); if (COMDLG32_TlsIndex != 0xffffffff) TlsSetValue(COMDLG32_TlsIndex, (void *)err); else FIXME("No Tls Space\n"); } /*********************************************************************** * CommDlgExtendedError (COMDLG32.5) * * Get the thread's local error value if a comdlg32 function fails. * RETURNS * Current error value which might not be valid * if a previous call succeeded. */ DWORD WINAPI CommDlgExtendedError(void) { if (COMDLG32_TlsIndex != 0xffffffff) return (DWORD)TlsGetValue(COMDLG32_TlsIndex); else { FIXME("No Tls Space\n"); return 0; } } wine-20000526/dlls/commdlg/cdlg_Ca.rc0100644000175000001440000002502707101102717016666 0ustar julliardusersLANGUAGE LANG_CATALAN, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Obrir" FONT 8, "Helv" { LTEXT "&Nom:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Directoris:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Tipus de fitxers:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Unitats:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "D'acord", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Anul·lació", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "A&juda", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "Només &lectura", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Anomenar i desar..." FONT 8, "Helv" { LTEXT "&Nom:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Directoris:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Desar fitxer en f&ormat:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Unitats:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "D'acord", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Anul·lació", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "A&juda", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Fer-ne còpia", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Impressió" FONT 8, "Helv" { LTEXT "Impressora:", 1088, 6, 6, 40, 9 LTEXT "Impressió del document", 1089, 60, 6, 150, 9 GROUPBOX "", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "&Sencer", 1056, 16, 45, 60, 12 RADIOBUTTON "&Part seleccionada", 1057, 16, 60, 60, 12 RADIOBUTTON "Pà&gines", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "D'acord", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Anul·lació", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Configuració", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "P&rimera:", 1090, 60, 80, 30, 9 LTEXT "Ú<ima:", 1091, 120, 80, 30, 9 LTEXT "&Qualitat:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "Imprimir en un &fitxer", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "S&eparar les còpies", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Configuració de la impressió" FONT 8, "Helv" { GROUPBOX "Impressora:", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "Impressora per &defecte", 1056, 16, 20, 80, 12 LTEXT "[none]", 1088, 35, 35, 120, 9 RADIOBUTTON "Impressora &especificada:", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "D'acord", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Anul·lació", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Opcions", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Orientació", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "&Vertical", 1058, 50, 100, 40, 12 RADIOBUTTON "&Horitzontal", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Paper", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "&Mida", 1089, 130, 95, 30, 9 LTEXT "A&limentació:", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG DISCARDABLE 13, 54, 264, 147 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Tipus de lletra" FONT 8, "Helv" { LTEXT "&Tipus de lletra:",1088 ,6,3,40,9 COMBOBOX 1136 ,6,13,94,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | CBS_AUTOHSCROLL | CBS_SORT | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Estil del tipus de lletra:",1089 ,108,3,44,9 COMBOBOX 1137,108,13,64,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Grandària:",1090,179,3,30,9 COMBOBOX 1138,179,13,32,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE | CBS_SORT DEFPUSHBUTTON "D'acord",IDOK,218,6,40,14,WS_GROUP PUSHBUTTON "Anul·lació",IDCANCEL,218,23,40,14,WS_GROUP PUSHBUTTON "A&plicar", 1026,218,40,40,14,WS_GROUP PUSHBUTTON "A&juda" , 1038,218,57,40,14,WS_GROUP GROUPBOX "Efectes",1072,6,72,84,34,WS_GROUP CHECKBOX "&Barrar-lo", 1040, 10,82,50,10, BS_AUTOCHECKBOX | WS_TABSTOP CHECKBOX "&Subratllar-lo", 1041, 10,94,50,10, BS_AUTOCHECKBOX LTEXT "&Color:", 1091 ,6,110,30,9 COMBOBOX 1139,6,120,84,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP GROUPBOX "Exemple",1073,98,72,160,49,WS_GROUP CTEXT "AaBbYyZz",1093,104,81,149,37,SS_NOPREFIX | WS_VISIBLE } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Color" FONT 8, "Helv" { LTEXT "Colors &básics:", 1088, 4, 4, 140, 10 LTEXT "Colors person&alitzats:", 1089, 4, 106, 140, 10 LTEXT "Color Sòl&id", 1090, 150, 151, 48, 10 LTEXT "&Roig:", 726 /*1094*/,249,126,24,10 EDITTEXT 706, 275,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Verd:",727/*1095*/,249,140,24,10 EDITTEXT 707, 275,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Bla&u:",728 /*1096*/,249,154,24,10 EDITTEXT 708, 275,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Tint:" ,723 /*1091*/,202,126,22,10 EDITTEXT 703, 226,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Sat.:" ,724 /*1092*/,202,140,22,10 EDITTEXT 704, 226,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Llum.:" ,725 /*1093*/,202,154,22,10 EDITTEXT 705, 226,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "D'acord", IDOK, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Anul·lació", IDCANCEL, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "A&juda", 1038,100,166, 44, 14 PUSHBUTTON "Afegir als &colors personalitzats", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Definir colors personalitzats >>", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&i",713,300,200,4,14 /* just a dummy: 'i' is like &i in "sol&id" */ } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Cerca" FONT 8, "Helv" { LTEXT "&Cercar:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "C&ercar mots sencers", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "&Distingir majúscules de minúscules", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Direcció", 1072, 107, 26, 68, 28 CONTROL "&Amunt", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "A&vall", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "&Continuació", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Anul·lació", IDCANCEL, 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "A&juda", 1038, 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Substitució" FONT 8, "Helv" { LTEXT "&Cercar:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Substituir per:", 1090, -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Cercar &mots sencers", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "&Distingir majúscules de minúscules", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "C&ontinucació", IDOK, 174, 4, 50, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "S&ubstitució", 1024, 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Substitució &automàtica", 1025, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Tancar", IDCANCEL, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "A&juda", 1038, 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } wine-20000526/dlls/commdlg/cdlg_Cs.rc0100644000175000001440000002040607101102717016704 0ustar julliardusersLANGUAGE LANG_CZECH, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Otevøení souboru" FONT 8, "Helv" { LTEXT "&jméno souboru:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Adresáøe:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Typ zobrazených souborù:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Diskové jednotky:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Otevøít", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Storno", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Nápovìda", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Pouze pro ètení", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Ulož pod jménem..." FONT 8, "Helv" { LTEXT "&Jméno souboru:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Adresáøe:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Typ zobrazených souborù:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Diskové jednotky:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Ulož pod jménem", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Storno", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Nápovìda", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Pouze pro ètení", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Tisk" FONT 8, "Helv" { LTEXT "Tiskárna:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Rozsah tisku", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "Vytiskni vš&e", 1056, 16, 45, 60, 12 RADIOBUTTON "Vytiskni &výbìr", 1057, 16, 60, 60, 12 RADIOBUTTON "Vytiskni &zadané stránky", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "Tiskni", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Storno", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Nastavit...", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "&Od:", 1090, 60, 80, 30, 9 LTEXT "&Do:", 1091, 120, 80, 30, 9 LTEXT "Kvalita &tisku:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "Tisk do so&uboru", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Kondenzované", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Nastavení zpùsobu tisku" FONT 8, "Helv" { GROUPBOX "Tiskárna", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "&Pøedvolená tiskárna", 1056, 16, 20, 80, 12 LTEXT "[none]", 1088, 35, 35, 120, 9 RADIOBUTTON "Specifická &tiskárna", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Ok", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Storno", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Další volby...", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Orientace", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "Na &výšku", 1058, 50, 100, 40, 12 RADIOBUTTON "Na šíø&ku", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Papír", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "&Formát", 1089, 130, 95, 30, 9 LTEXT "&Odkud", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Písmo" FONT 8, "Helv" { LTEXT "Písmo:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 DEFPUSHBUTTON "Ok", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Storno", 2, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Barvy" FONT 8, "Helv" { LTEXT "&Základní barvy:", 1088, 6, 6, 40, 9 LTEXT "&Barvy na zakázku:", 1089, 6, 126, 40, 9 LTEXT "Barva|Spoj&itá", 1090, 100, 146, 40, 9 LTEXT "&Odstín:", 1091, 150, 126, 40, 9 LTEXT "&Sytost:", 1092, 150, 146, 40, 9 LTEXT "&Jas:", 1093, 150, 166, 40, 9 LTEXT "Èe&rvená:", 1094, 150, 126, 40, 9 LTEXT "&Zelená:", 1095, 150, 146, 40, 9 LTEXT "&Modrá:", 1096, 150, 166, 40, 9 DEFPUSHBUTTON "Ok", IDOK, 6, 182, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "&Pøidat barvu", 1024, 120, 182, 100, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Vyøadit barvu", 1025, 6, 164, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Storno", IDCANCEL, 76, 182, 56, 14, WS_GROUP | WS_TABSTOP } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Hledání" FONT 8, "Helv" { LTEXT "&Vyhledat:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Pouze &celá slova", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "&Rozlišovat malá a velká písmena", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Smìr", 1072, 107, 26, 68, 28 CONTROL "N&ahoru", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "&Dolu", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "Vyhledat d&alší", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Zavøít", IDCANCEL, 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Nápovìda", 1038, 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Zámìna" FONT 8, "Helv" { LTEXT "&Vyhledat:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Zamìnit za:", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Pouze &celá slova", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "&Rozlišovat malá a velká písmena", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "Vyhledat d&alší", 1, 174, 4, 50, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Za&mìnit", 1024, 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Zamìnit ve vý&bìru", 1025, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Zavøít", 2, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Nápovìda", 1038, 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } wine-20000526/dlls/commdlg/cdlg_Da.rc0100644000175000001440000002450407101102717016666 0ustar julliardusersLANGUAGE LANG_DANISH, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Åbn" FONT 8, "Helv" { LTEXT "&Filnavn:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Kataloger:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Oversigt over filer af type:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Drev:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Å&bn", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuller", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hjælp", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Skrivebeskyttet", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Gem som ..." FONT 8, "Helv" { LTEXT "&Filnavn:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Kataloger:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Oversigt over filer af type:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Drev:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "&Gem som", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuller", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hjælp", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Skrivebeskyttet", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Udskriv" FONT 8, "Helv" { LTEXT "Printer:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Udskriv område", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "&Alt", 1056, 16, 45, 60, 12 RADIOBUTTON "&Markeret", 1057, 16, 60, 60, 12 RADIOBUTTON "&Sider", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "Udskriv", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuller", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Indstilling", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "&Fra:", 1090, 60, 80, 30, 9 LTEXT "&Til:", 1091, 120, 80, 30, 9 LTEXT "Udskrifts&kvalitet:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "Udskriv til fi&l", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Sammentrykket", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Udskriftsindstilling" FONT 8, "Helv" { GROUPBOX "Printer", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "&Standardprinter", 1056, 16, 20, 80, 12 LTEXT "[none]", 1088, 35, 35, 120, 9 RADIOBUTTON "Specifik &printer", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Ok", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuller", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Indstilling", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Orientering", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "Po&rtræt", 1058, 50, 100, 40, 12 RADIOBUTTON "&Landskab", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Papir", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "Størrelse", 1089, 130, 95, 30, 9 LTEXT "&Kilde", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG DISCARDABLE 13, 54, 264, 147 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Skrifttyper" FONT 8, "Helv" { LTEXT "Skrifttype&navn:", 1088, 6, 6, 40, 9 COMBOBOX 1136 ,6,13,94,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | CBS_AUTOHSCROLL | CBS_SORT | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Typografi:",1089 ,108,3,44,9 COMBOBOX 1137,108,13,64,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Størrelse:",1090,179,3,30,9 COMBOBOX 1138,179,13,32,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE | CBS_SORT DEFPUSHBUTTON "OK",IDOK,218,6,40,14,WS_GROUP PUSHBUTTON "Annuller",IDCANCEL,218,23,40,14,WS_GROUP PUSHBUTTON "&Anvend", 1026,218,40,40,14,WS_GROUP PUSHBUTTON "&Hjælp" , 1038,218,57,40,14,WS_GROUP GROUPBOX "Effekter",1072,6,72,84,34,WS_GROUP CHECKBOX "&Gennemstreget", 1040, 10,82,50,10, BS_AUTOCHECKBOX | WS_TABSTOP CHECKBOX "&Understreget", 1041, 10,94,50,10, BS_AUTOCHECKBOX LTEXT "&Farve:", 1091 ,6,110,30,9 COMBOBOX 1139,6,120,84,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP GROUPBOX "Eksempel",1073,98,72,160,49,WS_GROUP CTEXT "AaBbYyZz",1093,104,81,149,37,SS_NOPREFIX | WS_VISIBLE } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Farve" FONT 8, "Helv" { LTEXT "&Grundlæggende farver:", 1088, 4, 4, 140, 10 LTEXT "&Selvvalgte farver:", 1089, 4, 106, 140, 10 LTEXT "&Ensfarvet", 1090, 150, 151, 48, 10 LTEXT "&Rød:", 726 /*1094*/,249,126,24,10 EDITTEXT 706, 275,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Grøn:",727/*1095*/,249,140,24,10 EDITTEXT 707, 275,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Blå:",728 /*1096*/,249,154,24,10 EDITTEXT 708, 275,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Intensitet:" ,723 /*1091*/,202,126,22,10 EDITTEXT 703, 226,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Farvemætning:" ,724 /*1092*/,202,140,22,10 EDITTEXT 704, 226,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Lysstyrke:" ,725 /*1093*/,202,154,22,10 EDITTEXT 705, 226,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "Ok", IDOK, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuller", IDCANCEL, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Hjælp", 1038,100,166, 44, 14 PUSHBUTTON "&Tilføj til selvvalgte farver", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Definer selvvalgt farve >>", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&i",713,300,200,4,14 /* just a dummy: 'i' is like &i in "sol&id" */ } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Find" FONT 8, "Helv" { LTEXT "&Find hvad:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "&Kun hele ord", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Forskel på store/små &bogstaver", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Retning", 1072, 107, 26, 68, 28 CONTROL "&Op", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "&Ned", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "&Find næste", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuller", IDCANCEL, 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hjælp", 1038, 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Erstat" FONT 8, "Helv" { LTEXT "&Find hvad:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Erstat med:", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "&Kun hele ord", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_TABSTOP CHECKBOX "Forskel på store/små &bogstaver", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "&Find næste", IDOK, 174, 4, 50, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "&Erstat", 1024, 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Erstat &alle", 1025, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuller", IDCANCEL, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hjælp", 1038, 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } wine-20000526/dlls/commdlg/cdlg_De.rc0100644000175000001440000002452507101102717016675 0ustar julliardusersLANGUAGE LANG_GERMAN, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Öffnen" FONT 8, "Helv" { LTEXT "Datei&name:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Verzeichnisse:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Liste der Datei&typen:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Laufwerke:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Öffnen", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Abbrechen", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hilfe", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Schreibgeschützt", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Speichern als ..." FONT 8, "Helv" { LTEXT "Datei&name:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Verzeichnisse:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Liste der Datei&typen:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Laufwerke:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Speichern als", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Abbrechen", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hilfe", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Schreibgeschützt", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Drucken" FONT 8, "Helv" { LTEXT "Drucker:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Druckbereicht", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "&Alles", 1056, 16, 45, 60, 12 RADIOBUTTON "A&uswahl", 1057, 16, 60, 60, 12 RADIOBUTTON "&Seiten", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "Drucken", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Abbrechen", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Einrichten", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "&Von:", 1090, 60, 80, 30, 9 LTEXT "&Bis:", 1091, 120, 80, 30, 9 LTEXT "Druck&qualität:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "In &Datei drucken", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Verdichtet", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Druckereinrichtung" FONT 8, "Helv" { GROUPBOX "Drucker", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "&Standarddrucker", 1056, 16, 20, 80, 12 LTEXT "[keiner]", 1088, 35, 35, 120, 9 RADIOBUTTON "Bestimmter &Drucker", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Ok", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Abbrechen", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Einrichten", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Orientierung", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "&Hochformat", 1058, 50, 100, 40, 12 RADIOBUTTON "&Querformat", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Paper", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "&Größe", 1089, 130, 95, 30, 9 LTEXT "P&apierquelle", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG DISCARDABLE 13, 54, 264, 147 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Font" FONT 8, "Helv" { LTEXT "Schrift&art:",1088 ,6,3,40,9 COMBOBOX 1136 ,6,13,94,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | CBS_AUTOHSCROLL | CBS_SORT | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "Schrift&stil:",1089 ,108,3,44,9 COMBOBOX 1137,108,13,64,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "Schrift&größe:",1090,179,3,30,9 COMBOBOX 1138,179,13,32,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE | CBS_SORT DEFPUSHBUTTON "OK",IDOK,218,6,40,14,WS_GROUP PUSHBUTTON "Abbrechen",IDCANCEL,218,23,40,14,WS_GROUP PUSHBUTTON "&Zuweisen", 1026,218,40,40,14,WS_GROUP PUSHBUTTON "&Hilfe" , 1038,218,57,40,14,WS_GROUP GROUPBOX "Darstellung",1072,6,72,84,34,WS_GROUP CHECKBOX "&Durchgestrichen", 1040, 10,82,50,10, BS_AUTOCHECKBOX | WS_TABSTOP CHECKBOX "&Unterstrichen", 1041, 10,94,50,10, BS_AUTOCHECKBOX LTEXT "&Farbe:", 1091 ,6,110,30,9 COMBOBOX 1139,6,120,84,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP GROUPBOX "Muster",1073,98,72,160,49,WS_GROUP CTEXT "AaBbYyZz",1093,104,81,149,37,SS_NOPREFIX | WS_VISIBLE } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Farbe" FONT 8, "Helv" { LTEXT "Gr&undfarben:", 1088, 4, 4, 140, 10 LTEXT "Selbs&tdefinierte Farben:", 1089, 4, 106, 140, 10 LTEXT "Farbe | B&asis", 1090, 150, 151, 48, 10 LTEXT "&Rot:", 726 ,249,126,24,10 EDITTEXT 706, 275,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Grün:",727/*1095*/,249,140,24,10 EDITTEXT 707, 275,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Blau:",728 /*1096*/,249,154,24,10 EDITTEXT 708, 275,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Farbe:" ,723 /*1091*/,202,126,22,10 EDITTEXT 703, 226,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Sätt:" ,724 /*1092*/,202,140,22,10 EDITTEXT 704, 226,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "H&ell:" ,725 /*1093*/,202,154,22,10 EDITTEXT 705, 226,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "Ok", IDOK, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Abbrechen", IDCANCEL, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hilfe", 1038,100,166, 44, 14 PUSHBUTTON "Farbe hin&zufügen", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Farben &definieren >>", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&a",713,300,200,4,14 /* just a dummy: 'a' is like &a in "B&asis" */ } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Suchen" FONT 8, "Helv" { LTEXT "S&uchen nach:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Nur ganze &Worte", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Beachte Groß/Kleinschreibung", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Richtung", 1072, 107, 26, 68, 28 CONTROL "H&och", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "&Runter", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "&Nächsten finden", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Abbrechen", IDCANCEL, 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hilfe", 1038, 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Ersetzen" FONT 8, "Helv" { LTEXT "S&uchen nach:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Ersetzen &durch:", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Nur ganze &Worte", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Beachte Groß/Kleinschreibung", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "&Nächsten finden", IDOK, 174, 4, 50, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "&Ersetzen", 1024, 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Alle ersetzen", 1025, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Abbrechen", IDCANCEL, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hilfe", 1038, 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } wine-20000526/dlls/commdlg/cdlg_En.rc0100644000175000001440000004716707113574776016743 0ustar julliardusersLANGUAGE LANG_ENGLISH, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Open" FONT 8, "Helv" { LTEXT "File &Name:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Directories:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "List Files of &Type:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "Dri&ves:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Open", 1, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancel", 2, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Help", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Read Only", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Save As ..." FONT 8, "Helv" { LTEXT "File &Name:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Directories:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "List Files of &Type:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "Dri&ves:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Save As", 1, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancel", 2, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Help", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Read Only", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Print" FONT 8, "Helv" { LTEXT "Printer:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Print Range", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "&All", 1056, 16, 45, 60, 12 RADIOBUTTON "S&election", 1057, 16, 60, 60, 12 RADIOBUTTON "&Pages", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "Print", 1, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancel", 2, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Setup", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "&From:", 1090, 60, 80, 30, 9 LTEXT "&To:", 1091, 120, 80, 30, 9 LTEXT "Print &Quality:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "Print to Fi&le", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Condensed", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Print Setup" FONT 8, "Helv" { GROUPBOX "Printer", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "&Default Printer", 1056, 16, 20, 80, 12 LTEXT "[none]", 1088, 35, 35, 120, 9 RADIOBUTTON "Specific &Printer", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "OK", 1, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancel", 2, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Setup", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Orientation", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "Po&rtrait", 1058, 50, 100, 40, 12 RADIOBUTTON "&Landscape", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Paper", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "Si&ze", 1089, 130, 95, 30, 9 LTEXT "&Source", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG DISCARDABLE 13, 54, 264, 147 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Font" FONT 8, "Helv" { LTEXT "&Font:",1088 ,6,3,40,9 COMBOBOX 1136 ,6,13,94,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | CBS_AUTOHSCROLL | CBS_SORT | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "Font St&yle:",1089 ,108,3,44,9 COMBOBOX 1137,108,13,64,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Size:",1090,179,3,30,9 COMBOBOX 1138,179,13,32,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE | CBS_SORT DEFPUSHBUTTON "OK",IDOK,218,6,40,14, WS_GROUP | WS_TABSTOP | BS_DEFPUSHBUTTON PUSHBUTTON "Cancel",IDCANCEL,218,23,40,14,WS_GROUP | WS_TABSTOP PUSHBUTTON "&Apply", 1026,218,40,40,14,WS_GROUP | WS_TABSTOP PUSHBUTTON "&Help" , 1038,218,57,40,14,WS_GROUP | WS_TABSTOP GROUPBOX "Effects",1072,6,72,84,34,WS_GROUP CHECKBOX "Stri&keout", 1040, 10,82,50,10, BS_AUTOCHECKBOX | WS_TABSTOP CHECKBOX "&Underline", 1041, 10,94,50,10, BS_AUTOCHECKBOX LTEXT "&Color:", 1091 ,6,110,30,9 COMBOBOX 1139,6,120,84,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP GROUPBOX "Sample",1073,98,72,160,49,WS_GROUP CTEXT "AaBbYyZz",1093,104,81,149,37,SS_NOPREFIX | WS_VISIBLE } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Color" FONT 8, "Helv" { LTEXT "&Basic Colors:", 1088, 4, 4, 140, 10 LTEXT "&Custom Colors:", 1089, 4, 106, 140, 10 LTEXT "Color | Sol&id", 1090, 150, 151, 48, 10 LTEXT "&Red:", 726 /*1094*/,249,126,24,10 EDITTEXT 706, 275,124,21,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Green:",727/*1095*/,249,140,24,10 EDITTEXT 707, 275,138,21,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Blue:",728 /*1096*/,249,154,24,10 EDITTEXT 708, 275,152,21,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Hue:" ,723 /*1091*/,202,126,22,10 EDITTEXT 703, 226,124,21,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Sat:" ,724 /*1092*/,202,140,22,10 EDITTEXT 704, 226,138,21,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Lum:" ,725 /*1093*/,202,154,22,10 EDITTEXT 705, 226,152,21,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "OK", 1, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancel", 2, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Help", 1038,100,166, 44, 14 PUSHBUTTON "&Add to Custom Colors", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Define Custom Colors >>", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&i",713,300,200,4,14 /* just a dummy: 'i' is like &i in "sol&id" */ } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Find" FONT 8, "Helv" { LTEXT "Fi&nd What:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Match &Whole Word Only", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Match &Case", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Direction", 1072, 107, 26, 68, 28 CONTROL "&Up", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "&Down", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "&Find Next", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP | BS_DEFPUSHBUTTON PUSHBUTTON "Cancel", IDCANCEL , 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Help", pshHelp , 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Replace" FONT 8, "Helv" { LTEXT "Fi&nd What:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Re&place With:", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Match &Whole Word Only", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Match &Case", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "&Find Next", IDOK, 174, 4, 50, 14, WS_GROUP | WS_TABSTOP | BS_DEFPUSHBUTTON PUSHBUTTON "&Replace", psh1 , 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Replace &All", psh2 , 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancel", IDCANCEL , 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Help", pshHelp , 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } PRINT32 DIALOG LOADONCALL MOVEABLE DISCARDABLE 32, 32, 288, 186 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | DS_CONTEXTHELP | DS_3DLOOK CAPTION "Print" FONT 8, "Helv" { DEFPUSHBUTTON "OK", IDOK, 180,164, 48,14, WS_GROUP | BS_DEFPUSHBUTTON PUSHBUTTON "Cancel", IDCANCEL, 232,164, 48,14, WS_GROUP PUSHBUTTON "&Help", pshHelp, 50, 161, 48,14, WS_GROUP GROUPBOX "Printer", grp4, 8, 4, 272,84, WS_GROUP CONTROL "Print to fi&le", chx1, "Button",BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP,212,70,64,12 PUSHBUTTON "&Properties", psh2, 212, 17, 60,14, WS_GROUP LTEXT "&Name:", stc6, 16, 20, 36,8 COMBOBOX cmb4, 52, 18, 152,152,CBS_DROPDOWNLIST | CBS_SORT | WS_VSCROLL | WS_GROUP | WS_TABSTOP LTEXT "Status:", stc8, 16, 36, 36,10, SS_NOPREFIX LTEXT "Dummy State", stc12, 52, 36, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Type:", stc7, 16, 48, 36,10, SS_NOPREFIX LTEXT "Dummy Type", stc11, 52, 48, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Where:", stc10, 16, 60, 36,10, SS_NOPREFIX LTEXT "Dummy Location", stc14, 52, 60, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Comment:", stc9, 16, 72, 36,10, SS_NOPREFIX LTEXT "Dummy Remark", stc13, 52, 72, 152,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP GROUPBOX "Copies", grp2, 160, 92, 120,64, WS_GROUP LTEXT "Number of &copies:",stc5,168,108,68,8 ICON "", ico3, 162,124, 76,24, WS_GROUP | SS_CENTERIMAGE CONTROL "C&ollate", chx2,"Button",BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP,240,130,36,12 EDITTEXT edt3, 240,106, 32,12, WS_GROUP | ES_NUMBER GROUPBOX "Print range", grp1, 8,92, 144,64, WS_GROUP CONTROL "&All", rad1,"Button",BS_AUTORADIOBUTTON | WS_GROUP | WS_TABSTOP,16,106,64,12 CONTROL "Pa&ges", rad3,"Button",BS_AUTORADIOBUTTON,16,122,36,12 CONTROL "&Selection", rad2,"Button",BS_AUTORADIOBUTTON,16,138,64,12 EDITTEXT edt1, 74,122, 26,12, WS_GROUP | ES_NUMBER EDITTEXT edt2, 118,122, 26,12, WS_GROUP | ES_NUMBER RTEXT "&from:", stc2, 52,124, 20,8 RTEXT "&to:", stc3, 100,124, 16,8 } PRINT32_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 32, 32, 288, 178 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | DS_CONTEXTHELP | DS_3DLOOK CAPTION "Print Setup" FONT 8, "Helv" BEGIN DEFPUSHBUTTON "OK",IDOK,180,156,48,14,WS_GROUP PUSHBUTTON "Cancel",IDCANCEL,232,156,48,14 /* PUSHBUTTON "Network...", psh5, 284,156,48,14 */ GROUPBOX "Printer", grp4, 8, 4, 272,84, WS_GROUP PUSHBUTTON "&Properties", psh2, 212, 17, 60,14, WS_GROUP LTEXT "&Name:", stc6, 16, 20, 36,8 COMBOBOX cmb1, 52, 18, 152,152,CBS_DROPDOWNLIST | CBS_SORT | WS_VSCROLL | WS_GROUP | WS_TABSTOP LTEXT "Status:", stc8, 16, 36, 36,10, SS_NOPREFIX LTEXT "Dummy State", stc12, 52, 36, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Type:", stc7, 16, 48, 36,10, SS_NOPREFIX LTEXT "Dummy Type", stc11, 52, 48, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Where:", stc10, 16, 60, 36,10, SS_NOPREFIX LTEXT "Dummy Location", stc14, 52, 60, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Comment:", stc9, 16, 72, 36,10, SS_NOPREFIX LTEXT "Dummy Remark", stc13, 52, 72, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP GROUPBOX "Paper", grp2, 8, 92, 164,56, WS_GROUP LTEXT "Si&ze:", stc2, 16,108, 36, 8 COMBOBOX cmb2, 52,106, 112,112,CBS_DROPDOWNLIST | CBS_SORT | WS_VSCROLL | WS_GROUP | WS_TABSTOP LTEXT "&Source:", stc3, 16,128, 36, 8 COMBOBOX cmb3, 52,126, 112,112,CBS_DROPDOWNLIST | CBS_SORT | WS_VSCROLL | WS_GROUP | WS_TABSTOP GROUPBOX "Orientation", grp1, 180, 92, 100,56, WS_GROUP ICON "", ico1, 195,112, 18,20, WS_GROUP CONTROL "P&ortrait", rad1,"Button",BS_AUTORADIOBUTTON | WS_GROUP |WS_TABSTOP,224,106,52,12 CONTROL "L&andscape", rad2,"Button",BS_AUTORADIOBUTTON,224,126,52,12 END NEWFILEOPENORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 0, 0, 280, 164 STYLE DS_MODALFRAME | DS_CONTEXTHELP | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Open" FONT 8, "helv" { LTEXT "Look &in",IDC_LOOKINSTATIC,7,6,41,8, SS_NOTIFY COMBOBOX IDC_LOOKIN,50,3,138,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | WS_VSCROLL | WS_TABSTOP LTEXT "" , IDC_TOOLBARSTATIC, 188, 2, 82, 17, NOT WS_GROUP | NOT WS_VISIBLE LISTBOX IDC_SHELLSTATIC,4,20,272,85, LBS_SORT | LBS_NOINTEGRALHEIGHT | LBS_MULTICOLUMN | WS_HSCROLL | NOT WS_VISIBLE LTEXT "File &name:",IDC_FILENAMESTATIC,5,112,46,8, SS_NOTIFY EDITTEXT IDC_FILENAME,54,110,155,12,ES_AUTOHSCROLL LTEXT "Files of &type",IDC_FILETYPESTATIC,5,128,42,8, SS_NOTIFY COMBOBOX IDC_FILETYPE,54,126,155,53,CBS_DROPDOWN | WS_VSCROLL | WS_TABSTOP CONTROL "Open as &read-only",IDC_OPENREADONLY,"Button",BS_AUTOCHECKBOX | WS_TABSTOP,54,145,100,10 DEFPUSHBUTTON "&Open", IDOK,222,110,50,14 PUSHBUTTON "Cancel", IDCANCEL,222,128,50,14 PUSHBUTTON "&Help", pshHelp,222,145,50,14 } STRINGTABLE DISCARDABLE { IDS_ABOUTBOX "&About FolderPicker Test" IDS_DOCUMENTFOLDERS "Document Folders" IDS_PERSONAL "My Documents" IDS_FAVORITES "My Favorites" IDS_PATH "System Path" IDS_DESKTOP "Desktop" IDS_FONTS "Fonts" IDS_MYCOMPUTER "My Computer" } STRINGTABLE DISCARDABLE { IDS_SYSTEMFOLDERS "System Folders" IDS_LOCALHARDRIVES "Local Hard Drives" IDS_FILENOTFOUND "File not found" IDS_VERIFYFILE "Please verify if the correct file name was given" IDS_CREATEFILE "File does not exist\nDo you want to create file" } STRINGTABLE DISCARDABLE { IDS_UPFOLDER "Up One Level" IDS_NEWFOLDER "Create New Folder" IDS_LISTVIEW "List" IDS_REPORTVIEW "Details" } STRINGTABLE DISCARDABLE { PD32_PRINT_TITLE "Print" PD32_VALUE_UREADABLE "Unreadable Entry" PD32_INVALID_PAGE_RANGE "This value lies not within Page range\n\ Please enter a value between %d and %d" PD32_FROM_NOT_ABOVE_TO "The FROM entry cannot exceed TO:" PD32_MARGINS_OVERLAP "Margins overlap or fall outside \ Paper boundaries.\nPlease reenter margins" PD32_NR_OF_COPIES_EMPTY "The NumberOfCopies entry cannot \ be empty" PD32_TOO_LARGE_COPIES "This large amount of prints is not \ supported by your printer.\nPlease enter a value between 1 and %d" PD32_PRINT_ERROR "A printer error occurred" PD32_NO_DEFAULT_PRINTER "There is not default printer" PD32_CANT_FIND_PRINTER "Cannot find the printer" PD32_OUT_OF_MEMORY "Out of memory" PD32_GENERIC_ERROR "Some error occurred" PD32_DRIVER_UNKNOWN "Unknown printer driver" PD32_DEFAULT_PRINTER "Default Printer; " PD32_NR_OF_DOCUMENTS_IN_QUEUE "There are %d documents in queue" PD32_PRINT_ALL_X_PAGES "&All %d pages" PD32_MARGINS_IN_INCHES "Margins [inches]" PD32_MARGINS_IN_MILIMETERS "Margins [mm]" PD32_MILIMETERS "mm" PD32_PRINTER_STATUS_READY "Ready" PD32_PRINTER_STATUS_PAUSED "Paused; " PD32_PRINTER_STATUS_ERROR "Error; " PD32_PRINTER_STATUS_PENDING_DELETION "Pending deletion; " PD32_PRINTER_STATUS_PAPER_JAM "Paper jam; " PD32_PRINTER_STATUS_PAPER_OUT "Out of paper; " PD32_PRINTER_STATUS_MANUAL_FEED "Feed paper manual; " PD32_PRINTER_STATUS_PAPER_PROBLEM "Paper problem; " PD32_PRINTER_STATUS_OFFLINE "Printer offline; " PD32_PRINTER_STATUS_IO_ACTIVE "I/O Active; " PD32_PRINTER_STATUS_BUSY "Busy; " PD32_PRINTER_STATUS_PRINTING "Printing; " PD32_PRINTER_STATUS_OUTPUT_BIN_FULL "Output tray is full; " PD32_PRINTER_STATUS_NOT_AVAILABLE "Not available; " PD32_PRINTER_STATUS_WAITING "Waiting; " PD32_PRINTER_STATUS_PROCESSING "Processing; " PD32_PRINTER_STATUS_INITIALIZING "Initialising; " PD32_PRINTER_STATUS_WARMING_UP "Warming up; " PD32_PRINTER_STATUS_TONER_LOW "Toner low; " PD32_PRINTER_STATUS_NO_TONER "No toner; " PD32_PRINTER_STATUS_PAGE_PUNT "Page punt; " PD32_PRINTER_STATUS_USER_INTERVENTION "Interrupted by user; " PD32_PRINTER_STATUS_OUT_OF_MEMORY "Out of memory; " PD32_PRINTER_STATUS_DOOR_OPEN "The printer door is open; " PD32_PRINTER_STATUS_SERVER_UNKNOWN "Print server unknown; " PD32_PRINTER_STATUS_POWER_SAVE "Power safe mode; " } wine-20000526/dlls/commdlg/cdlg_Eo.rc0100644000175000001440000002021207101102717016675 0ustar julliardusersLANGUAGE LANG_ESPERANTO, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Malfermu dosieron" FONT 8, "Helv" { LTEXT "Dosier&nomo:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Dosier&ujo:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Dosier&speco:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "Disk&ilo:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Malfermu", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Nuligu", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Helpu", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "Nur &legebla", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Sekurigu dosieron" FONT 8, "Helv" { LTEXT "Dosier&nomo:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Dosier&ujo:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Dosier&speco:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "Disk&ilo:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Sekurigu", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Nuligu", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Helpu", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "Nur &legebla", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Presu" FONT 8, "Helv" { LTEXT "Presilo:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Etendiøon", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "æ&iujn", 1056, 16, 45, 60, 12 RADIOBUTTON "&elekton", 1057, 16, 60, 60, 12 RADIOBUTTON "&paøojn", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "Presu", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Nuligu", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Aranøu", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "de:", 1090, 60, 80, 30, 9 LTEXT "øis:", 1091, 120, 80, 30, 9 LTEXT "&Kvalito:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "Presu &dosieren", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Mallarøtipe", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Presada Aranøo" FONT 8, "Helv" { GROUPBOX "Presilo", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "&Implicita Presilo", 1056, 16, 20, 80, 12 LTEXT "[none]", 1088, 35, 35, 120, 9 RADIOBUTTON "&Specifa Presilo", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Enorde", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Nuligu", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Agordo", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Formato", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "&Vertikala", 1058, 50, 100, 40, 12 RADIOBUTTON "&Horizontala", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Papero", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "&Grando", 1089, 130, 95, 30, 9 LTEXT "&Fonto", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Tiparo" FONT 8, "Helv" { LTEXT "Tiparo:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 DEFPUSHBUTTON "Enorde", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Nuligu", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Koloro" FONT 8, "Helv" { LTEXT "&Normala koloraro:", 1088, 6, 6, 40, 9 LTEXT "&Persona koloraro:", 1089, 6, 126, 40, 9 LTEXT "Color|Sol&id", 1090, 100, 146, 40, 9 LTEXT "&Farbo:", 1091, 150, 126, 40, 9 LTEXT "&Saturo:", 1092, 150, 146, 40, 9 LTEXT "&Helo:", 1093, 150, 166, 40, 9 LTEXT "&Ruøo:", 1094, 150, 126, 40, 9 LTEXT "&Verda:", 1095, 150, 146, 40, 9 LTEXT "&Bluo:", 1096, 150, 166, 40, 9 DEFPUSHBUTTON "Enorde", IDOK, 6, 182, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "&Aldonu al persona koloraro", 1024, 120, 182, 100, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Forv&iþu personan koloraron", 1025, 6, 164, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Nuligu", IDCANCEL, 76, 182, 56, 14, WS_GROUP | WS_TABSTOP } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Seræu" FONT 8, "Helv" { LTEXT "&Seræu:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Nur tutan &vorton", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Atentu &Usklecon", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Direkto", 1072, 107, 26, 68, 28 CONTROL "&Retro", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "&Antaýen", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "&Pluseræu", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Nuligu", IDCANCEL, 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Helpu", 1038, 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Anstataýigu" FONT 8, "Helv" { LTEXT "Anstataýigu:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&per:", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Nur tutan &vorton", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Atentu &Usklecon", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "Plu&seræu", IDOK, 174, 4, 50, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "&Anstataýigu", 1024, 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Anstataýigu æ&iujn", 1025, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Nuligu", IDCANCEL, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Helpu", 1038, 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } wine-20000526/dlls/commdlg/cdlg_Es.rc0100644000175000001440000002501707101102717016711 0ustar julliardusersLANGUAGE LANG_SPANISH, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Abrir" FONT 8, "Helv" { LTEXT "Nombre de &archivo:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Directorios:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Mostrar archivos de tipo:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "U&nidades:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Abrir", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancelar", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "A&yuda", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Solo lectura", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "&Guardar como..." FONT 8, "Helv" { LTEXT "Nombre de &archivo:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Directorios:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Mostrar archivos de tipo:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "U&nidades:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "&Guardar como", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancelar", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "A&yuda", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Solo lectura", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Imprimir" FONT 8, "Helv" { LTEXT "Impresora:", 1088, 6, 6, 40, 9 LTEXT "Campo de impresión", 1089, 60, 6, 150, 9 GROUPBOX "", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "&Todo", 1056, 16, 45, 60, 12 RADIOBUTTON "Selecc&ión", 1057, 16, 60, 60, 12 RADIOBUTTON "&Paginas", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "Imprimir", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancelar", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Setup", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "&Desde:", 1090, 60, 80, 30, 9 LTEXT "&Hasta:", 1091, 120, 80, 30, 9 LTEXT "Calidad de impre&sión:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "Impri&mir en un archivo", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Condensado", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Configuración de impresión" FONT 8, "Helv" { GROUPBOX "Impresora:", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "Pre&determinada del sistema", 1056, 16, 20, 80, 12 LTEXT "[none]", 1088, 35, 35, 120, 9 RADIOBUTTON "Impresora &especmfica:", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Aceptar", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancelar", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Configurar", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Orientación", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "&Vertical", 1058, 50, 100, 40, 12 RADIOBUTTON "&Horizontal", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Papel", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "&Tamaño", 1089, 130, 95, 30, 9 LTEXT "O&rigen:", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG DISCARDABLE 13, 54, 264, 147 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Fuente" FONT 8, "Helv" { LTEXT "&Fuente:",1088 ,6,3,40,9 COMBOBOX 1136 ,6,13,94,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | CBS_AUTOHSCROLL | CBS_SORT | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "Est&ilo de fuente:",1089 ,108,3,44,9 COMBOBOX 1137,108,13,64,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Tamaño:",1090,179,3,30,9 COMBOBOX 1138,179,13,32,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE | CBS_SORT DEFPUSHBUTTON "Aceptar",IDOK,218,6,40,14,WS_GROUP PUSHBUTTON "Cancelar",IDCANCEL,218,23,40,14,WS_GROUP PUSHBUTTON "A&plicar", 1026,218,40,40,14,WS_GROUP PUSHBUTTON "A&yuda" , 1038,218,57,40,14,WS_GROUP GROUPBOX "&Efectos",1072,6,72,84,34,WS_GROUP CHECKBOX "&Rayado", 1040, 10,82,50,10, BS_AUTOCHECKBOX | WS_TABSTOP CHECKBOX "&Subrayado", 1041, 10,94,50,10, BS_AUTOCHECKBOX LTEXT "&Color:", 1091 ,6,110,30,9 COMBOBOX 1139,6,120,84,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP GROUPBOX "Ejemplo",1073,98,72,160,49,WS_GROUP CTEXT "AaBbYyZzÑñ",1093,104,81,149,37,SS_NOPREFIX | WS_VISIBLE } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Color" FONT 8, "Helv" { LTEXT "Colores &básicos:", 1088, 4, 4, 140, 10 LTEXT "Colores person&alizados:", 1089, 4, 106, 140, 10 LTEXT "Color|Só3l&ido", 1090, 150, 151, 48, 10 LTEXT "&Rojo:", 726 /*1094*/,249,126,24,10 EDITTEXT 706, 275,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Verde:",727/*1095*/,249,140,24,10 EDITTEXT 707, 275,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "A&zul:",728 /*1096*/,249,154,24,10 EDITTEXT 708, 275,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Tinte:" ,723 /*1091*/,202,126,22,10 EDITTEXT 703, 226,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Sat.:" ,724 /*1092*/,202,140,22,10 EDITTEXT 704, 226,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Lum.:" ,725 /*1093*/,202,154,22,10 EDITTEXT 705, 226,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "Aceptar", IDOK, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancelar", IDCANCEL, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "A&yuda", 1038,100,166, 44, 14 PUSHBUTTON "Agregar a los &colores personalizados", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Definir colores personalizados >>", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&i",713,300,200,4,14 /* just a dummy: 'i' is like &i in "sol&id" */ } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Buscar" FONT 8, "Helv" { LTEXT "Buscar:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "&Comparar palabra entera solamente", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "&Mayúsculas/minúsculas", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Dirección", 1072, 107, 26, 68, 28 CONTROL "A&rriba", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "&Abajo", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "Buscar &siguiente", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancelar", IDCANCEL, 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "A&yuda", 1038, 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "R&eemplazar" FONT 8, "Helv" { LTEXT "Buscar:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Re&emplazar por:", 1090, -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "&Comparar palabra entera solamente", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "&Mayúsculas/minúsculas", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "Reemplazar &siguiente", IDOK, 174, 4, 50, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "&Reemplazar", 1024, 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Reemplazar &todo", 1025, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancelar", IDCANCEL, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "A&yuda", 1038, 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } wine-20000526/dlls/commdlg/cdlg_Fi.rc0100644000175000001440000002431507101102717016700 0ustar julliardusersLANGUAGE LANG_FINNISH, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Avaa" FONT 8, "Helv" { LTEXT "Tiedosto&nimi:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Hakemistot:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Luettele tiedostot tyypeittäin:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Asemat:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Avaa", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Peruuta", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Ohje", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Vain luku", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Tallenna nimellä" FONT 8, "Helv" { LTEXT "Tiedosto&nimi:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Hakemistot:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Tallenna tiedosto &muodossa:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Asemat:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Tallenna", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Peruuta", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Ohje", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Vain luku", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Tulosta" FONT 8, "Helv" { LTEXT "Kirjoitin:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Tulostusalue", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "&Kaikki", 1056, 16, 45, 60, 12 RADIOBUTTON "&Valinta", 1057, 16, 60, 60, 12 RADIOBUTTON "&Sivut", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "Tulosta", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Peruuta", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Asetukset", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "&Mistä:", 1090, 60, 80, 30, 9 LTEXT "Mi&hin:", 1091, 120, 80, 30, 9 LTEXT "&Tulostustarkkuus:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "Tulosta t&iedostoon", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Tiivistetty", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Kirjoittimen asetukset" FONT 8, "Helv" { GROUPBOX "Kirjoitin", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "O&letuskirjoitin", 1056, 16, 20, 80, 12 LTEXT "[ei valittu]", 1088, 35, 35, 120, 9 RADIOBUTTON "&Erityinen kirjoitin", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "OK", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Peruuta", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Asetukset...", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Suunta", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "&Pysty", 1058, 50, 100, 40, 12 RADIOBUTTON "&Vaaka", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Paperi", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "&Koko:", 1089, 130, 95, 30, 9 LTEXT "Lä&hde:", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG DISCARDABLE 13, 54, 264, 147 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Fontit" FONT 8, "Helv" { LTEXT "&Fontti:",1088 ,6,3,40,9 COMBOBOX 1136 ,6,13,94,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | CBS_AUTOHSCROLL | CBS_SORT | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "Fonttit&yyli:",1089 ,108,3,44,9 COMBOBOX 1137,108,13,64,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Koko:",1090,179,3,30,9 COMBOBOX 1138,179,13,32,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE | CBS_SORT DEFPUSHBUTTON "OK",IDOK,218,6,40,14,WS_GROUP PUSHBUTTON "Peruuta",IDCANCEL,218,23,40,14,WS_GROUP PUSHBUTTON "&Sovella", 1026,218,40,40,14,WS_GROUP PUSHBUTTON "&Ohje" , 1038,218,57,40,14,WS_GROUP GROUPBOX "Efektit",1072,6,72,84,34,WS_GROUP CHECKBOX "Yli&viivattu", 1040, 10,82,50,10, BS_AUTOCHECKBOX | WS_TABSTOP CHECKBOX "A&lleviivattu", 1041, 10,94,50,10, BS_AUTOCHECKBOX LTEXT "V&äri:", 1091 ,6,110,30,9 COMBOBOX 1139,6,120,84,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP GROUPBOX "Näyte",1073,98,72,160,49,WS_GROUP CTEXT "AaBbYyZz",1093,104,81,149,37,SS_NOPREFIX | WS_VISIBLE } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Väri" FONT 8, "Helv" { LTEXT "Pe&rusvärit:", 1088, 4, 4, 140, 10 LTEXT "&Muokatut värit:", 1089, 4, 106, 140, 10 LTEXT "Väri|&Tasainen", 1090, 150, 151, 48, 10 LTEXT "&Pun:", 726 /*1094*/,249,126,24,10 EDITTEXT 706, 275,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Vihr:",727/*1095*/,249,140,24,10 EDITTEXT 707, 275,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Si&n:",728 /*1096*/,249,154,24,10 EDITTEXT 708, 275,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Sävy:" ,723 /*1091*/,202,126,22,10 EDITTEXT 703, 226,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Kyll:" ,724 /*1092*/,202,140,22,10 EDITTEXT 704, 226,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "K&irkk:" ,725 /*1093*/,202,154,22,10 EDITTEXT 705, 226,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "Ok", IDOK, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "S&ulje", IDCANCEL, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "O&hje", 1038,100,166, 44, 14 PUSHBUTTON "&Lisää väri", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "M&äärittele väri >>", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&i",713,300,200,4,14 /* just a dummy: 'i' is like &i in "sol&id" */ } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Etsi" FONT 8, "Helv" { LTEXT "&Etsittävä:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "&Koko sana", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Kirjaink&oko", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Suunta", 1072, 107, 26, 68, 28 CONTROL "&Ylös", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "&Alas", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "Etsi &seuraava", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Peruuta", IDCANCEL, 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "O&hje", 1038, 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Korvaa" FONT 8, "Helv" { LTEXT "&Etsittävä:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Ko&rvattava:", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "&Koko sana", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Kirjaink&oko", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "Etsi &seuraava", IDOK, 174, 4, 50, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Korv&aa", 1024, 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Korvaa ka&ikki", 1025, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "S&ulje", IDCANCEL, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "O&hje", 1038, 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } wine-20000526/dlls/commdlg/cdlg_Fr.rc0100644000175000001440000002460007101102717016706 0ustar julliardusersLANGUAGE LANG_FRENCH, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Ouvrir" FONT 8, "Helv" { LTEXT "&Nom de fichier:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Répertoires", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Liste des fichiers de &type:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Lecteurs:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "OK", 1, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuler", 2, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Aide", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "Lecture seule", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Enregistrer sous ..." FONT 8, "Helv" { LTEXT "&Nom de fichier:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Répertoires:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Liste des fichiers de &type:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Lecteurs:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "OK", 1, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuler", 2, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Aide", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "Lecture seule", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Imprimer" FONT 8, "Helv" { LTEXT "Imprimante:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Etendue", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "&Tout", 1056, 16, 45, 60, 12 RADIOBUTTON "&Sélection", 1057, 16, 60, 60, 12 RADIOBUTTON "&Pages", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "OK", 1, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuler", 2, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Configurer...", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "&De:", 1090, 60, 80, 30, 9 LTEXT "&A:", 1091, 120, 80, 30, 9 LTEXT "&Qualité d'impression:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "&Fichier d'impression", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Copies t&riées", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Configuration de l'impression" FONT 8, "Helv" { GROUPBOX "Imprimante", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "&Imprimante par défaut", 1056, 16, 20, 80, 12 LTEXT "[aucune]", 1088, 35, 35, 120, 9 RADIOBUTTON "Imprimante &spécifique", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "OK", 1, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuler", 2, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Options...", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Orientation", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "&Portrait", 1058, 50, 100, 40, 12 RADIOBUTTON "Paysag&e", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Papier", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "&Taille :", 1089, 130, 95, 30, 9 LTEXT "&Ali&mentation :", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG DISCARDABLE 13, 54, 264, 147 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Polices" FONT 8, "Helv" { LTEXT "&Police:",1088 ,6,3,40,9 COMBOBOX 1136 ,6,13,94,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | CBS_AUTOHSCROLL | CBS_SORT | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "St&yle de police:",1089 ,108,3,44,9 COMBOBOX 1137,108,13,64,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Taille:",1090,179,3,30,9 COMBOBOX 1138,179,13,32,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE | CBS_SORT DEFPUSHBUTTON "OK",IDOK,218,6,40,14,WS_GROUP PUSHBUTTON "Annuler",IDCANCEL,218,23,40,14,WS_GROUP PUSHBUTTON "A&ppliquer", 1026,218,40,40,14,WS_GROUP PUSHBUTTON "&Aide" , 1038,218,57,40,14,WS_GROUP GROUPBOX "Effets",1072,6,72,84,34,WS_GROUP CHECKBOX "&Barré", 1040, 10,82,50,10, BS_AUTOCHECKBOX | WS_TABSTOP CHECKBOX "&Souligné", 1041, 10,94,50,10, BS_AUTOCHECKBOX LTEXT "&Couleur:", 1091 ,6,110,30,9 COMBOBOX 1139,6,120,84,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP GROUPBOX "Exemple",1073,98,72,160,49,WS_GROUP CTEXT "AaBbYyZz",1093,104,81,149,37,SS_NOPREFIX | WS_VISIBLE } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Couleurs" FONT 8, "Helv" { LTEXT "Couleurs de &base:", 1088, 4, 4, 140, 10 LTEXT "&Couleurs personnalisées:", 1089, 4, 106, 140, 10 LTEXT "Couleur | &Uni", 1090, 150, 151, 48, 10 LTEXT "&Rouge:", 726 /*1094*/,249,126,24,10 EDITTEXT 706, 275,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Vert:",727/*1095*/,249,140,24,10 EDITTEXT 707, 275,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Bl&eu:",728 /*1096*/,249,154,24,10 EDITTEXT 708, 275,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Teinte:" ,723 /*1091*/,202,126,22,10 EDITTEXT 703, 226,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Sat.:" ,724 /*1092*/,202,140,22,10 EDITTEXT 704, 226,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Lum.:" ,725 /*1093*/,202,154,22,10 EDITTEXT 705, 226,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "Ok", 1, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuler", 2, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Aide", 1038,100,166, 44, 14 PUSHBUTTON "A&jouter couleur personnalisées", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Définir couleurs personnalisées >>", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&i",713,300,200,4,14 /* just a dummy: 'i' is like &i in "sol&id" */ } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Rechercher" FONT 8, "Helv" { LTEXT "&Rechercher:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "M&ot seulement", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Respect des &majuscules/minuscules", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Direction", 1072, 107, 26, 68, 28 CONTROL "&Haut", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "&Bas", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "&Poursuivre", 1, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuler", 2, 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Aide", 1038, 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Remplacer" FONT 8, "Helv" { LTEXT "&Rechercher:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "R&emplacer par:", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "M&ot seulement", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Respect des &majuscules/minuscules", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "&Poursuivre", 1, 174, 4, 50, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Rempla&cer", 1024, 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Remplacer &tout", 1025, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Fermer", 2, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Aide", 1038, 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } wine-20000526/dlls/commdlg/cdlg_Hu.rc0100644000175000001440000002513007101102717016712 0ustar julliardusersLANGUAGE LANG_HUNGARIAN, SUBLANG_DEFAULT OPEN_FILE DIALOG 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Megnyitás" FONT 8, "Helv" BEGIN LTEXT "File &neve:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Könyvtárak:", -1, 110, 6, 92, 9 CONTROL "", 1088, "STATIC", SS_NOPREFIX | WS_GROUP, 110, 18, 92, 9 LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "File &típusok:", 1089, 6, 104, 90, 9 CONTROL "", 1136, "COMBOBOX", CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP, 6, 114, 90, 36 LTEXT "&Meghajtók:", 1091, 110, 104, 92, 9 CONTROL "", 1137, "COMBOBOX", CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP, 110, 114, 92, 68 CONTROL "Megnyitás", IDOK, "BUTTON", BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP, 208, 6, 56, 14 CONTROL "Mégsem", IDCANCEL, "BUTTON", WS_GROUP | WS_TABSTOP, 208, 24, 56, 14 CONTROL "&Segítség", 1038, "BUTTON", WS_GROUP | WS_TABSTOP, 208, 46, 56, 14 CONTROL "&Csak olvasható", 1040, "BUTTON", BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP, 208, 68, 63, 12 END SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Mentés új néven ..." FONT 8, "Helv" { LTEXT "File &neve:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Könyvtárak:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "File &típusok:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Meghajtók:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Mentés új néven", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Mégsem", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Segítség", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Csak olvasható", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Nyomtatás" FONT 8, "Helv" { LTEXT "Nyomtató:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Nyomtatandó terület", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "&Mind", 1056, 16, 45, 60, 12 RADIOBUTTON "&Kiválasztott", 1057, 16, 60, 60, 12 RADIOBUTTON "&Lapok", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "Nyomtatás", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Mégsem", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Beállítás", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "-&tól:", 1090, 60, 80, 30, 9 LTEXT "-&ig:", 1091, 120, 80, 30, 9 LTEXT "Mi&nõség:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "&File-ba nyomtat", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Sûrû", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Nyomtató beállítása" FONT 8, "Helv" { GROUPBOX "Nyomtató", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "&Alapértelmezett nyomtató", 1056, 16, 20, 80, 12 LTEXT "[nincs]", 1088, 35, 35, 120, 9 RADIOBUTTON "&Adott nyomtató", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Ok", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Mégsem", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Beállítás", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Oldalfekvés", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "Á&lló", 1058, 50, 100, 40, 12 RADIOBUTTON "&Fekvõ", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Papír", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "&Mérete", 1089, 130, 95, 30, 9 LTEXT "Fo&rrása", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG DISCARDABLE 13, 54, 264, 147 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Font" FONT 8, "Helv" { LTEXT "&Font:",1088 ,6,3,40,9 COMBOBOX 1136 ,6,13,94,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | CBS_AUTOHSCROLL | CBS_SORT | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "Font &stílus:",1089 ,108,3,44,9 COMBOBOX 1137,108,13,64,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Méret:",1090,179,3,30,9 COMBOBOX 1138,179,13,32,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE | CBS_SORT DEFPUSHBUTTON "OK",IDOK,218,6,40,14,WS_GROUP PUSHBUTTON "Mégsem",IDCANCEL,218,23,40,14,WS_GROUP PUSHBUTTON "&Alkalmaz", 1026,218,40,40,14,WS_GROUP PUSHBUTTON "&Segítség" , 1038,218,57,40,14,WS_GROUP GROUPBOX "Effektusok",1072,6,72,84,34,WS_GROUP CHECKBOX "Á&thúzott", 1040, 10,82,50,10, BS_AUTOCHECKBOX | WS_TABSTOP CHECKBOX "&Aláhúzott", 1041, 10,94,50,10, BS_AUTOCHECKBOX LTEXT "&Szín:", 1091 ,6,110,30,9 COMBOBOX 1139,6,120,84,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP GROUPBOX "Minta",1073,98,72,160,49,WS_GROUP CTEXT "AaBbYyZzÁáÕõÉé",1093,104,81,149,37,SS_NOPREFIX | WS_VISIBLE } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Szín" FONT 8, "Helv" { LTEXT "&Alap színek:", 1088, 4, 4, 140, 10 LTEXT "&Egyedi színek:", 1089, 4, 106, 140, 10 LTEXT "Szín | &Tömör", 1090, 150, 151, 48, 10 LTEXT "&Vörös:", 726 /*1094*/,249,126,24,10 EDITTEXT 706, 275,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Zöld:",727/*1095*/,249,140,24,10 EDITTEXT 707, 275,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Kék:",728 /*1096*/,249,154,24,10 EDITTEXT 708, 275,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Hue:" ,723 /*1091*/,202,126,22,10 EDITTEXT 703, 226,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Sat:" ,724 /*1092*/,202,140,22,10 EDITTEXT 704, 226,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Lum:" ,725 /*1093*/,202,154,22,10 EDITTEXT 705, 226,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "Ok", IDOK, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Mégsem", IDCANCEL, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Segítség", 1038,100,166, 44, 14 PUSHBUTTON "&Egyedi színekhez adás", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "E&gyedi szín definiálás >>", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&t",713,300,200,4,14 /* just a dummy: 'i' is like &i in "sol&id" */ } FINDDLGORD DIALOG 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Keresés" FONT 8, "Helv" BEGIN LTEXT "&Mit keressen:", -1, 4, 8, 48, 8 EDITTEXT 1152, 51, 7, 124, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "Teljes &szavak keresése", 1040, "BUTTON", BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP, 4, 26, 100, 12 CONTROL "Kis/&nagybetû különb.", 1041, "BUTTON", BS_AUTOCHECKBOX | WS_TABSTOP, 4, 42, 92, 12 GROUPBOX "Irány", 1072, 97, 26, 78, 28 CONTROL "&Vissza", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 102, 38, 32, 12 CONTROL "&Elõre", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 CONTROL "&Következõ", 1, "BUTTON", WS_GROUP | WS_TABSTOP, 182, 5, 50, 14 CONTROL "Mégsem", 2, "BUTTON", WS_GROUP | WS_TABSTOP, 182, 23, 50, 14 PUSHBUTTON "&Segítség", 1038, 182, 45, 50, 14, WS_GROUP | WS_TABSTOP END REPLACEDLGORD DIALOG 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Cserélés" FONT 8, "Helv" BEGIN LTEXT "&Mit keressen:", -1, 4, 9, 48, 8 EDITTEXT 1152, 57, 7, 111, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Mire &cseréljem:", -1, 4, 26, 53, 8 EDITTEXT 1153, 57, 24, 111, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "Teljes &szavak keresése", 1040, "BUTTON", BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP, 5, 46, 104, 12 CONTROL "Kis/&nagybetû különb.", 1041, "BUTTON", BS_AUTOCHECKBOX | WS_TABSTOP, 5, 62, 99, 12 CONTROL "&Következõ", IDOK, "BUTTON", BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP, 174, 4, 53, 14 CONTROL "C&serél", 1024, "BUTTON", WS_GROUP | WS_TABSTOP, 174, 21, 53, 14 CONTROL "M&indent cserél", 1025, "BUTTON", WS_GROUP | WS_TABSTOP, 174, 38, 53, 14 CONTROL "Mégsem", IDCANCEL, "BUTTON", WS_GROUP | WS_TABSTOP, 174, 55, 53, 14 CONTROL "&Segítség", 1038, "BUTTON", WS_GROUP | WS_TABSTOP, 174, 75, 53, 14 END wine-20000526/dlls/commdlg/cdlg_It.rc0100644000175000001440000002435407101102717016721 0ustar julliardusersLANGUAGE LANG_ITALIAN, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Apri" FONT 8, "Helv" { LTEXT "&Nome file:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Percorso:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Files di &Tipo:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Unita':", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Apri", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annulla", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Aiuto", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "Solo &Lettura", 1040, 208, 68, 52, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Salva con nome ..." FONT 8, "Helv" { LTEXT "&Nome file:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Percorso:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Files di &Tipo:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Unita':", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Salva come", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annulla", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Help", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Read Only", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Stampa" FONT 8, "Helv" { LTEXT "Stampante:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Pagine da stampare", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "&Tutte", 1056, 16, 45, 60, 12 RADIOBUTTON "S&elezione", 1057, 16, 60, 60, 12 RADIOBUTTON "&Pagine", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "Stampa", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annulla", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Configura", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "&Da:", 1090, 60, 80, 30, 9 LTEXT "&A:", 1091, 120, 80, 30, 9 LTEXT "&Qualita' di Stampa:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "Stampa su Fi&le", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Condensato", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 274, 154 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Configurazione Stampante" FONT 8, "Helv" { GROUPBOX "Stampante", 1072, 6, 10, 180, 72, BS_GROUPBOX RADIOBUTTON "Stampante &Preferita", 1056, 16, 20, 78, 12 LTEXT "[none]", 1088, 35, 35, 120, 9 RADIOBUTTON "Stampante &Specifica", 1057, 16, 50, 78, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Ok", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annulla", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Installa", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Orientamento", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "&Verticale", 1058, 50, 100, 42, 12 RADIOBUTTON "&Orizzontale", 1059, 50, 115, 50, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Carta", 1074, 120, 85, 150, 50, BS_GROUPBOX LTEXT "&Dimensione", 1089, 130, 100, 30, 9 LTEXT "&Sorgente", 1090, 130, 115, 30, 9 COMBOBOX 1137, 168, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 168, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG DISCARDABLE 13, 54, 264, 147 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Font" FONT 8, "Helv" { LTEXT "&Font:",1088 ,6,3,40,9 COMBOBOX 1136 ,6,13,94,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | CBS_AUTOHSCROLL | CBS_SORT | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "St&ile:",1089 ,108,3,44,9 COMBOBOX 1137,108,13,64,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Dimensione:",1090,179,3,30,9 COMBOBOX 1138,179,13,32,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE | CBS_SORT DEFPUSHBUTTON "OK",IDOK,218,6,40,14,WS_GROUP PUSHBUTTON "Annulla",IDCANCEL,218,23,40,14,WS_GROUP PUSHBUTTON "A&pplica", 1026,218,40,40,14,WS_GROUP PUSHBUTTON "&Aiuto" , 1038,218,57,40,14,WS_GROUP GROUPBOX "Effetti",1072,6,72,84,34,WS_GROUP CHECKBOX "&Barrato", 1040, 10,82,50,10, BS_AUTOCHECKBOX | WS_TABSTOP CHECKBOX "&Sottolineato", 1041, 10,94,50,10, BS_AUTOCHECKBOX LTEXT "&Colore:", 1091 ,6,110,30,9 COMBOBOX 1139,6,120,84,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP GROUPBOX "Esempio",1073,98,72,160,49,WS_GROUP CTEXT "AaBbYyZz",1093,104,81,149,37,SS_NOPREFIX | WS_VISIBLE } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Colore" FONT 8, "Helv" { LTEXT "Colori di &Base:", 1088, 4, 4, 140, 10 LTEXT "Colori &Utente:", 1089, 4, 106, 140, 10 LTEXT "Colore | Sol&ido", 1090, 150, 151, 48, 10 LTEXT "&Rosso:", 726 /*1094*/,249,126,24,10 EDITTEXT 706, 275,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Verde:",727/*1095*/,249,140,24,10 EDITTEXT 707, 275,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Blu:",728 /*1096*/,249,154,24,10 EDITTEXT 708, 275,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Tinta:" ,723 /*1091*/,202,126,22,10 EDITTEXT 703, 226,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Sat:" ,724 /*1092*/,202,140,22,10 EDITTEXT 704, 226,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Lum:" ,725 /*1093*/,202,154,22,10 EDITTEXT 705, 226,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "Ok", IDOK, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annulla", IDCANCEL, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Aiuto", 1038,100,166, 44, 14 PUSHBUTTON "&Aggiungi ai Colori Utente", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Definisci Colori Utente >>", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&i",713,300,200,4,14 /* just a dummy: 'i' is like &i in "sol&id" */ } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Trova" FONT 8, "Helv" { LTEXT "Tro&va:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "&Parola Intera", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "&Maiuscole/Minuscole", 1041, 4, 42, 74, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Direzione", 1072, 107, 26, 68, 28 CONTROL "&Su", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 24, 12 CONTROL "&Giu'", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 142, 38, 28, 12 DEFPUSHBUTTON "&Trova Prossimo", IDOK, 180, 5, 54, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Annulla", IDCANCEL, 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Aiuto", 1038, 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Cambia" FONT 8, "Helv" { LTEXT "Tro&va:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Ca&mbia con:", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "&Parola Intera", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "&Maiuscole/Minuscole", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "&Trova Prossimo", IDOK, 174, 4, 50, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "&Cambia", 1024, 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Cambia &Tutto", 1025, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Annulla", IDCANCEL, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Aiuto", 1038, 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } wine-20000526/dlls/commdlg/cdlg_Ja.rc0100644000175000001440000004145207101102717016675 0ustar julliardusersLANGUAGE LANG_JAPANESE, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "ƒtƒ@ƒCƒ‹‚ðŠJ‚­" FONT 8, "System" { LTEXT "ƒtƒ@ƒCƒ‹–¼(&N):", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "ƒfƒBƒŒƒNƒgƒŠ(&D):", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "ƒtƒ@ƒCƒ‹‚ÌŽí—Þ(&T):", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "ƒhƒ‰ƒCƒu(&V):", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "OK", 1, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "·¬Ý¾Ù", 2, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "ÍÙÌß(&H)", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "ã‘‚«‹ÖŽ~(&R)", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "–¼‘O‚ð‚‚¯‚Ä•Û‘¶" FONT 8, "System" { LTEXT "ƒtƒ@ƒCƒ‹–¼(&N):", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "ƒfƒBƒŒƒNƒgƒŠ(&D):", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "ƒtƒ@ƒCƒ‹‚ÌŽí—Þ(&T):", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "ƒhƒ‰ƒCƒu(&V):", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "OK", 1, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "·¬Ý¾Ù", 2, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "ÍÙÌß(&H)", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "ã‘‚«‹ÖŽ~(&R)", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "ˆóü" FONT 8, "System" { LTEXT "Žg—p‚·‚éÌßØÝÀ:", 1088, 6, 6, 40, 9 LTEXT "’ÊíŽg‚¤ÌßØÝÀ", 1089, 60, 6, 150, 9 GROUPBOX "ˆóü”͈͂̑I‘ð", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "‘Sƒy[ƒW(&A)", 1056, 16, 45, 60, 12 RADIOBUTTON "‘I‘ð‚µ‚½•”•ª(&E)", 1057, 16, 60, 60, 12 RADIOBUTTON "ƒy[ƒWŽw’è(&P)", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "OK", 1, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "·¬Ý¾Ù", 2, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "ÌßØÝÀ‚ÌÝ’è(&S)", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "Íß°¼Þ‚©‚ç(&F):", 1090, 60, 80, 30, 9 LTEXT "Íß°¼Þ‚Ü‚Å(&T):", 1091, 120, 80, 30, 9 LTEXT "ˆóŽš•iŽ¿(&Q):", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "ƒtƒ@ƒCƒ‹‚Öo—Í(&L)", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Condensed", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "ƒvƒŠƒ“ƒ^‚ÌÝ’è" FONT 8, "System" { GROUPBOX "ƒvƒŠƒ“ƒ^‚Ì‘I‘ð", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "’ÊíŽg‚¤ƒvƒŠƒ“ƒ^(&D)", 1056, 16, 20, 80, 12 LTEXT "(’ÊíŽg‚¤ƒvƒŠƒ“ƒ^‚ªÝ’肳‚ê‚Ä‚¢‚Ü‚¹‚ñ)", 1088, 35, 35, 120, 9 RADIOBUTTON "‚»‚Ì‘¼‚̃vƒŠƒ“ƒ^(&P)", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "OK", 1, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "·¬Ý¾Ù", 2, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Setup", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "ˆóü‚ÌŒü‚«", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "c(&R)", 1058, 50, 100, 40, 12 RADIOBUTTON "‰¡(&L)", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "—pŽ†‚Ì‘I‘ð", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "—pŽ†»²½Þ(&Z)", 1089, 130, 95, 30, 9 LTEXT "‹‹Ž†•û–@(&S)", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG DISCARDABLE 13, 54, 264, 147 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "ƒtƒHƒ“ƒg‚ÌŽw’è" FONT 8, "System" { LTEXT "Ì«ÝÄ–¼(&F):",1088 ,6,3,40,9 COMBOBOX 1136 ,6,13,94,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | CBS_AUTOHSCROLL | CBS_SORT | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "½À²Ù(&Y):",1089 ,108,3,44,9 COMBOBOX 1137,108,13,64,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "»²½Þ(&S):",1090,179,3,30,9 COMBOBOX 1138,179,13,32,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE | CBS_SORT DEFPUSHBUTTON "OK",IDOK,218,6,40,14,WS_GROUP PUSHBUTTON "·¬Ý¾Ù",IDCANCEL,218,23,40,14,WS_GROUP PUSHBUTTON "•¶Žšü‚è(&A)", 1026,218,40,40,14,WS_GROUP PUSHBUTTON "ÍÙÌß(&H)" , 1038,218,57,40,14,WS_GROUP GROUPBOX "•¶Žšü‚è",1072,6,72,84,34,WS_GROUP CHECKBOX "Žæ‚èÁ‚µü(&K)", 1040, 10,82,50,10, BS_AUTOCHECKBOX | WS_TABSTOP CHECKBOX "‰ºü(&U)", 1041, 10,94,50,10, BS_AUTOCHECKBOX LTEXT "F(&C):", 1091 ,6,110,30,9 COMBOBOX 1139,6,120,84,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP GROUPBOX "ƒTƒ“ƒvƒ‹",1073,98,72,160,49,WS_GROUP CTEXT "AaBbYyZz",1093,104,81,149,37,SS_NOPREFIX | WS_VISIBLE } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "F‚ÌÝ’è" FONT 8, "System" { LTEXT "Šî–{F(&B):", 1088, 4, 4, 140, 10 LTEXT "쬂µ‚½F(&C):", 1089, 4, 106, 140, 10 LTEXT "F |", 1090, 150, 151, 48, 10 LTEXT "Ô(&R):", 726 /*1094*/,249,126,24,10 EDITTEXT 706, 275,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "—Î(&G):",727/*1095*/,249,140,24,10 EDITTEXT 707, 275,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Â(&B):",728 /*1096*/,249,154,24,10 EDITTEXT 708, 275,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "F‡‚¢(&U):" ,723 /*1091*/,202,126,22,10 EDITTEXT 703, 226,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "‘N‚â‚©‚³(&S):" ,724 /*1092*/,202,140,22,10 EDITTEXT 704, 226,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "–¾‚邳(&L):" ,725 /*1093*/,202,154,22,10 EDITTEXT 705, 226,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "OK", 1, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "·¬Ý¾Ù", 2, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "ÍÙÌß(&H)", 1038,100,166, 44, 14 PUSHBUTTON "’ljÁ(&A)", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "F‚Ìì¬(&D)...", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&i",713,300,200,4,14 /* just a dummy: 'i' is like &i in "sol&id" */ } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "•¶Žš—ñ‚ÌŒŸõ" FONT 8, "System" { LTEXT "ŒŸõ‚·‚镶Žš—ñ(&N):", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "’PŒê’PˆÊ‚ÅŒŸõ(&W)", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "‘啶Žš‚Ƭ•¶Žš‚ð‹æ•Ê‚·‚é(&C)", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "ŒŸõ‚·‚é•ûŒü", 1072, 107, 26, 68, 28 CONTROL "ã‚ÖŒü‚©‚Á‚Ä(&U)", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "‰º‚ÖŒü‚©‚Á‚Ä(&D)", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "ŽŸ‚ðŒŸõ(&F)", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "·¬Ý¾Ù", 2, IDCANCEL, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "ÍÙÌß(&H)", pshHelp, 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "•¶Žš—ñ‚Ì’uŠ·" FONT 8, "System" { LTEXT "’uŠ·‘O‚Ì•¶Žš—ñ(&N):", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "’uŠ·Œã‚Ì•¶Žš—ñ(&P):", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "’PŒê’PˆÊ‚ÅŒŸõ(&W)", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "‘啶Žš‚Ƭ•¶Žš‚ð‹æ•Ê‚·‚é(&C)", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "ŽŸ‚ðŒŸõ(&F)", IDOK, 174, 4, 50, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "’uŠ·‚µ‚ÄŽŸ‚É(&R)", psh1, 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "‚·‚ׂĂð’uŠ·(&A)", psh2, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "·¬Ý¾Ù", IDCANCEL, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "ÍÙÌß(&H)", pshHelp, 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } PRINT32 DIALOG LOADONCALL MOVEABLE DISCARDABLE 32, 32, 288, 186 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | DS_CONTEXTHELP | DS_3DLOOK CAPTION "ˆóü" FONT 8, "System" { DEFPUSHBUTTON "OK", IDOK, 180,164, 48,14, WS_GROUP | BS_DEFPUSHBUTTON PUSHBUTTON "·¬Ý¾Ù", IDCANCEL, 232,164, 48,14, WS_GROUP PUSHBUTTON "ÍÙÌß(&H)", pshHelp, 50, 161, 48,14, WS_GROUP GROUPBOX "ÌßØÝÀ", grp4, 8, 4, 272,84, WS_GROUP CONTROL "̧²Ù‚Öo—Í(&L)", chx1, "Button",BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP,212,70,64,12 PUSHBUTTON "ÌßÛÊßè(&P)", psh2, 212, 17, 60,14, WS_GROUP LTEXT "ÌßØÝÀ–¼(&N):", stc6, 16, 20, 36,8 COMBOBOX cmb4, 52, 18, 152,152,CBS_DROPDOWNLIST | CBS_SORT | WS_VSCROLL | WS_GROUP | WS_TABSTOP LTEXT "ó‘Ô:", stc8, 16, 36, 36,10, SS_NOPREFIX LTEXT "Dummy State", stc12, 52, 36, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Ží—Þ:", stc7, 16, 48, 36,10, SS_NOPREFIX LTEXT "Dummy Type", stc11, 52, 48, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "êŠ:", stc10, 16, 60, 36,10, SS_NOPREFIX LTEXT "Dummy Location", stc14, 52, 60, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "ºÒÝÄ:", stc9, 16, 72, 36,10, SS_NOPREFIX LTEXT "Dummy Remark", stc13, 52, 72, 152,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP GROUPBOX "ˆóü•””", grp2, 160, 92, 120,64, WS_GROUP LTEXT "•””(&C):",stc5,168,108,68,8 ICON "", ico3, 162,124, 76,24, WS_GROUP | SS_CENTERIMAGE CONTROL "•”’PˆÊ‚ňóü(&O)", chx2,"Button",BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP,240,130,36,12 EDITTEXT edt3, 240,106, 32,12, WS_GROUP | ES_NUMBER GROUPBOX "ˆóü”͈Í", grp1, 8,92, 144,64, WS_GROUP CONTROL "‚·‚ׂÄ(&A)", rad1,"Button",BS_AUTORADIOBUTTON | WS_GROUP | WS_TABSTOP,16,106,64,12 CONTROL "Íß°¼ÞŽw’è(&G)", rad3,"Button",BS_AUTORADIOBUTTON,16,122,36,12 CONTROL "‘I‘ð‚µ‚½•”•ª(&S)", rad2,"Button",BS_AUTORADIOBUTTON,16,138,64,12 EDITTEXT edt1, 74,122, 26,12, WS_GROUP | ES_NUMBER EDITTEXT edt2, 118,122, 26,12, WS_GROUP | ES_NUMBER RTEXT "Íß°¼Þ‚©‚ç(&F)", stc2, 52,124, 20,8 RTEXT "Íß°¼Þ‚Ü‚Å(&T)", stc3, 100,124, 16,8 } PRINT32_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 32, 32, 288, 178 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | DS_CONTEXTHELP | DS_3DLOOK CAPTION "ˆóü‚ÌÝ’è" FONT 8, "System" BEGIN DEFPUSHBUTTON "OK",IDOK,180,156,48,14,WS_GROUP PUSHBUTTON "Cancel",IDCANCEL,232,156,48,14 /* PUSHBUTTON "Network...", psh5, 284,156,48,14 */ GROUPBOX "ÌßØÝÀ", grp4, 8, 4, 272,84, WS_GROUP PUSHBUTTON "ÌßÛÊßè(&P)", psh2, 212, 17, 60,14, WS_GROUP LTEXT "ÌßØÝÀ–¼(&N):", stc6, 16, 20, 36,8 COMBOBOX cmb1, 52, 18, 152,152,CBS_DROPDOWNLIST | CBS_SORT | WS_VSCROLL | WS_GROUP | WS_TABSTOP LTEXT "ó‘Ô:", stc8, 16, 36, 36,10, SS_NOPREFIX LTEXT "Dummy State", stc12, 52, 36, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Ží—Þ:", stc7, 16, 48, 36,10, SS_NOPREFIX LTEXT "Dummy Type", stc11, 52, 48, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "êŠ:", stc10, 16, 60, 36,10, SS_NOPREFIX LTEXT "Dummy Location", stc14, 52, 60, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "ºÒÝÄ:", stc9, 16, 72, 36,10, SS_NOPREFIX LTEXT "Dummy Remark", stc13, 52, 72, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP GROUPBOX "—pŽ†", grp2, 8, 92, 164,56, WS_GROUP LTEXT "—pŽ†»²½Þ(&Z):", stc2, 16,108, 36, 8 COMBOBOX cmb2, 52,106, 112,112,CBS_DROPDOWNLIST | CBS_SORT | WS_VSCROLL | WS_GROUP | WS_TABSTOP LTEXT "&Source:", stc3, 16,128, 36, 8 COMBOBOX cmb3, 52,126, 112,112,CBS_DROPDOWNLIST | CBS_SORT | WS_VSCROLL | WS_GROUP | WS_TABSTOP GROUPBOX "ˆóü•ûŒü", grp1, 180, 92, 100,56, WS_GROUP ICON "", ico1, 195,112, 18,20, WS_GROUP CONTROL "c(&O)", rad1,"Button",BS_AUTORADIOBUTTON | WS_GROUP |WS_TABSTOP,224,106,52,12 CONTROL "‰¡(&A)", rad2,"Button",BS_AUTORADIOBUTTON,224,126,52,12 END NEWFILEOPENORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 0, 0, 280, 164 STYLE DS_MODALFRAME | DS_CONTEXTHELP | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "̧²Ù‚ðŠJ‚­" FONT 8, "System" { LTEXT "̧²Ù‚ÌêŠ(&I):",IDC_LOOKINSTATIC,5,6,52,8, SS_NOTIFY COMBOBOX IDC_LOOKIN,56,3,132,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | WS_VSCROLL | WS_TABSTOP LTEXT "" , IDC_TOOLBARSTATIC, 188, 2, 82, 17, NOT WS_GROUP | NOT WS_VISIBLE LISTBOX IDC_SHELLSTATIC,4,20,272,85, LBS_SORT | LBS_NOINTEGRALHEIGHT | LBS_MULTICOLUMN | WS_HSCROLL | NOT WS_VISIBLE LTEXT "̧²Ù–¼(&N):",IDC_FILENAMESTATIC,5,112,48,8, SS_NOTIFY EDITTEXT IDC_FILENAME,56,110,153,12,ES_AUTOHSCROLL LTEXT "̧²Ù‚ÌŽí—Þ(&T):",IDC_FILETYPESTATIC,5,128,52,8, SS_NOTIFY COMBOBOX IDC_FILETYPE,56,126,153,53,CBS_DROPDOWN | WS_VSCROLL | WS_TABSTOP CONTROL "“Ç‚ÝŽæ‚èê—p̧²Ù‚Æ‚µ‚ÄŠJ‚­(&R)",IDC_OPENREADONLY,"Button",BS_AUTOCHECKBOX | WS_TABSTOP,54,145,100,10 DEFPUSHBUTTON "ŠJ‚­(&O)", IDOK,222,110,50,14 PUSHBUTTON "·¬Ý¾Ù", IDCANCEL,222,128,50,14 PUSHBUTTON "ÍÙÌß(&H)", pshHelp,222,145,50,14 } STRINGTABLE DISCARDABLE { IDS_ABOUTBOX "&About FolderPicker Test" IDS_DOCUMENTFOLDERS "Document Folders" IDS_PERSONAL "My Documents" IDS_FAVORITES "‚¨‹C‚É“ü‚è" IDS_PATH "System Path" IDS_DESKTOP "ÃÞ½¸Ä¯Ìß" IDS_FONTS "Fonts" IDS_MYCOMPUTER "ϲ ºÝËß­°À" } STRINGTABLE DISCARDABLE { IDS_SYSTEMFOLDERS "System Folders" IDS_LOCALHARDRIVES "Local Hard Drives" IDS_FILENOTFOUND "̧²Ù‚ªŒ©‚‚©‚è‚Ü‚¹‚ñB" IDS_VERIFYFILE "̧²Ù–¼‚ðŠm”F‚µ‚Ä‚­‚¾‚³‚¢B" IDS_CREATEFILE "‚±‚Ì̧²Ù‚Í‘¶Ý‚µ‚Ü‚¹‚ñB\n쬂µ‚Ü‚·‚©?" } wine-20000526/dlls/commdlg/cdlg_Ko.rc0100644000175000001440000002205007101102717016705 0ustar julliardusersLANGUAGE LANG_KOREAN, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "¿­±â" FONT 8, "Helv" { LTEXT "ÆÄÀÏ À̸§(&N):", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "µð·ºÅ丮(&D):", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "ÆÄÀÏ Çü½Ä(&T):", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "µå¶óÀ̺ê(&V):", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "¿­±â", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Ãë¼Ò", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "µµ¿ò¸»(&H)", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "Àбâ Àü¿ë(&R)", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "´Ù¸¥ À̸§À¸·Î ÀúÀå ..." FONT 8, "Helv" { LTEXT "ÆÄÀÏ À̸§(&N):", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "µð·ºÅ丮(&D):", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "ÆÄÀÏ Çü½Ä(&T):", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "µå¶óÀ̺ê(&V):", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "ÀúÀå", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Ãë¼Ò", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "µµ¿ò¸»(&H)", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "Àбâ Àü¿ë(&R)", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Àμâ" FONT 8, "Helv" { LTEXT "Àμâ±â:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Àμ⠹üÀ§", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "¸ðµÎ(&A)", 1056, 16, 45, 60, 12 RADIOBUTTON "¼±ÅÃ(&E)", 1057, 16, 60, 60, 12 RADIOBUTTON "ÂÊ(&P)", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "Àμâ", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Ãë¼Ò", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "¼³Á¤(&S)", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "½ÃÀÛ(&F):", 1090, 60, 80, 30, 9 LTEXT "³¡(&T):", 1091, 120, 80, 30, 9 LTEXT "Àμâ Ç°Áú(&Q):", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "ÆÄÀÏ·Î Àμâ(&L)", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Condensed", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Àμ⠼³Á¤" FONT 8, "Helv" { GROUPBOX "Àμâ±â", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "±âº» Àμâ±â(&D)", 1056, 16, 20, 80, 12 LTEXT "[¾øÀ½]", 1088, 35, 35, 120, 9 RADIOBUTTON "ÁöÁ¤µÈ Àμâ±â(&P)", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "È®ÀÎ", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Ãë¼Ò", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "¼³Á¤(&S)", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "¹æÇâ", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "¼¼·Î(&R)", 1058, 50, 100, 40, 12 RADIOBUTTON "°¡·Î(&L)", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Á¾ÀÌ", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "Å©±â(&Z)", 1089, 130, 95, 30, 9 LTEXT "¹æ½Ä(&S)", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "±ÛÀÚü" FONT 8, "Helv" { LTEXT "±ÛÀÚü:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 DEFPUSHBUTTON "È®ÀÎ", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Ãë¼Ò", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "»ö" FONT 8, "Helv" { LTEXT "±âº»»ö(&B):", 1088, 4, 4, 140, 10 LTEXT "»ç¿ëÀÚ»ö(&C):", 1089, 4, 106, 140, 10 LTEXT "È¥»ö | ´Ü»ö(&i)", 1090, 150, 151, 48, 10 LTEXT "»¡°­(&R):", 726 /*1094*/,249,126,24,10 EDITTEXT 706, 275,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "ÃÊ·Ï(&G):",727/*1095*/,249,140,24,10 EDITTEXT 707, 275,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "ÆĶû(&B):",728 /*1096*/,249,154,24,10 EDITTEXT 708, 275,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "»ö»ó(&H):" ,723 /*1091*/,202,126,22,10 EDITTEXT 703, 226,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "äµµ(&S):" ,724 /*1092*/,202,140,22,10 EDITTEXT 704, 226,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "¸íµµ(&L):" ,725 /*1093*/,202,154,22,10 EDITTEXT 705, 226,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "È®ÀÎ", IDOK, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Ãë¼Ò", IDCANCEL, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "µµ¿ò¸»", 1038,100,166, 44, 14 PUSHBUTTON "»ç¿ëÀÚ»ö¿¡ Ãß°¡(&A)", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "»ç¿ëÀÚ»ö Á¤ÀÇ(&D) >>", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&i",713,300,200,4,14 /* just a dummy: 'i' is like &i in "sol&id" */ } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "ã±â" FONT 8, "Helv" { LTEXT "ãÀ» ¹®ÀÚ¿­(&N):", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "´Ü¾î¸¸(&W)", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "´ë¼Ò¹®ÀÚ ±¸º°(&C)", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "¹æÇâ", 1072, 107, 26, 68, 28 CONTROL "À§(&U)", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "¾Æ·¡(&D)", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "´ÙÀ½ ã±â(&F)", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Ãë¼Ò", IDCANCEL, 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "µµ¿ò¸»(&H)", 1038, 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "¹Ù²Ù±â" FONT 8, "Helv" { LTEXT "ãÀ» ¹®ÀÚ¿­(&N):", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "¹Ù²Ü ¹®ÀÚ¿­(&P):", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "´Ü¾î¸¸(&W)", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "´ë¼Ò¹®ÀÚ ±¸º°(&C)", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "´ÙÀ½ ã±â(&F)", IDOK, 174, 4, 50, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "¹Ù²Ù±â(&R)", 1024, 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "¸ðµÎ ¹Ù²Ù±â(&A)", 1025, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Ãë¼Ò", IDCANCEL, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "µµ¿ò¸»(&H)", 1038, 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } wine-20000526/dlls/commdlg/cdlg_Nl.rc0100644000175000001440000004011607101102717016710 0ustar julliardusersLANGUAGE LANG_DUTCH, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Bestand openen" FONT 8, "Helv" { LTEXT "Bestands&naam:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Zoeken in:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Bestands&typen:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "Dri&ves:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "&Openen", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuleren", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Help", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "Alleen &Lezen", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Opslaan als ..." FONT 8, "Helv" { LTEXT "Bestands&naam:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Zoeken in:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Bestands&typen:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "Dri&ves:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "&Opslaan als", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuleren", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Help", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "Alleen &Lezen", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Afdrukken" FONT 8, "Helv" { LTEXT "Printer:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Afdrukbereik", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "&Alles", 1056, 16, 45, 60, 12 RADIOBUTTON "Sele&ctie", 1057, 16, 60, 60, 12 RADIOBUTTON "&Pagina's", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "OK", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuleren", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Eigenschappen", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "&van:", 1090, 60, 80, 30, 9 LTEXT "&t/m:", 1091, 120, 80, 30, 9 LTEXT "Afdruk&kwaliteit:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "Naar &bestand", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Condensed", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Afdrukeigenschappen" FONT 8, "Helv" { GROUPBOX "Printer", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "&Default Printer", 1056, 16, 20, 80, 12 LTEXT "[geen]", 1088, 35, 35, 120, 9 RADIOBUTTON "Specifieke &Printer", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "OK", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuleren", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Setup", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Afdrukstand", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "&Staand", 1058, 50, 100, 40, 12 RADIOBUTTON "&Liggend", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Papier", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "&Formaat", 1089, 130, 95, 30, 9 LTEXT "&Bron", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG DISCARDABLE 13, 54, 264, 147 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Lettertype" FONT 8, "Helv" { LTEXT "&Lettertype:",1088 ,6,3,40,9 COMBOBOX 1136 ,6,13,94,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | CBS_AUTOHSCROLL | CBS_SORT | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "Teken&stijl:",1089 ,108,3,44,9 COMBOBOX 1137,108,13,64,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Grootte:",1090,179,3,30,9 COMBOBOX 1138,179,13,32,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE | CBS_SORT DEFPUSHBUTTON "OK",IDOK,218,6,40,14, WS_GROUP | WS_TABSTOP | BS_DEFPUSHBUTTON PUSHBUTTON "Annuleren",IDCANCEL,218,23,40,14,WS_GROUP | WS_TABSTOP PUSHBUTTON "&Toepassen", 1026,218,40,40,14,WS_GROUP | WS_TABSTOP PUSHBUTTON "&Help" , 1038,218,57,40,14,WS_GROUP | WS_TABSTOP GROUPBOX "Effecten",1072,6,72,84,34,WS_GROUP CHECKBOX "&Doorhalen", 1040, 10,82,50,10, BS_AUTOCHECKBOX | WS_TABSTOP CHECKBOX "&Onderstrepen", 1041, 10,94,50,10, BS_AUTOCHECKBOX LTEXT "&Kleur:", 1091 ,6,110,30,9 COMBOBOX 1139,6,120,84,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP GROUPBOX "Voorbeeld",1073,98,72,160,49,WS_GROUP CTEXT "AaBbYyZz",1093,104,81,149,37,SS_NOPREFIX | WS_VISIBLE } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Kleur" FONT 8, "Helv" { LTEXT "&Basiskleuren:", 1088, 4, 4, 140, 10 LTEXT "&Aangepaste kleuren:", 1089, 4, 106, 140, 10 LTEXT "Kleur | &Effen", 1090, 157, 151, 48, 10 LTEXT "&Rood:", 726 /*1094*/, 256,126,24,10 EDITTEXT 706, 275,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Groen:",727/*1095*/, 256,140,24,10 EDITTEXT 707, 275,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Blau&w:",728 /*1096*/, 256,154,24,10 EDITTEXT 708, 275,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Ti&nt:" ,723 /*1091*/, 196,126,22,10 EDITTEXT 703, 226,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Intensiteit:" ,724 /*1092*/, 196,140,22,10 EDITTEXT 704, 226,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Helderheid:" ,725 /*1093*/, 196,154,22,10 EDITTEXT 705, 226,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "OK", IDOK, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuleren", IDCANCEL, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Help", 1038,100,166, 44, 14 PUSHBUTTON "&Toevoegen aan Aangepaste kleuren", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Definieer Aangepaste kleuren >>", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&i",713,300,200,4,14 /* just a dummy: 'i' is like &i in "sol&id" */ } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Tekst zoeken" FONT 8, "Helv" { LTEXT "&Zoek naar:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Heel &woord", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Gelijke &hoofd-/kleine letters", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Zoekrichting", 1072, 107, 26, 68, 28 CONTROL "&Omhoog", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "Om&laag", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "&Volgende zoeken", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP | BS_DEFPUSHBUTTON PUSHBUTTON "Annuleren", IDCANCEL, 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Help", pshHelp , 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Tekst vervangen" FONT 8, "Helv" { LTEXT "&Zoek naar:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Vervang &door:", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Heel &woord", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Gelijke &hoofd-/kleine letters", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "Volgende zoeken", IDOK, 174, 4, 50, 14, WS_GROUP | WS_TABSTOP | BS_DEFPUSHBUTTON PUSHBUTTON "Ve&rvangen", psh1 , 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Alles vervangen", psh2 , 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Annuleren", IDCANCEL, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Help", pshHelp , 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } PRINT32 DIALOG LOADONCALL MOVEABLE DISCARDABLE 32, 32, 288, 186 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | DS_CONTEXTHELP | DS_3DLOOK CAPTION "Print32" FONT 8, "Helv" { DEFPUSHBUTTON "OK", IDOK, 180,164, 48,14, WS_GROUP | BS_DEFPUSHBUTTON PUSHBUTTON "Cancel", IDCANCEL, 232,164, 48,14, WS_GROUP PUSHBUTTON "&Help", pshHelp, 50, 161, 48,14, WS_GROUP GROUPBOX "Printer", grp4, 8, 4, 272,84, WS_GROUP CONTROL "Naar &bestand", chx1, "Button",BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP,212,70,64,12 PUSHBUTTON "&Eigenschappen", psh2, 212, 17, 60,14, WS_GROUP LTEXT "&Naam:", stc6, 16, 20, 36,8 COMBOBOX cmb4, 52, 18, 152,152,CBS_DROPDOWNLIST | CBS_SORT | WS_VSCROLL | WS_GROUP | WS_TABSTOP LTEXT "Status:", stc8, 16, 36, 36,10, SS_NOPREFIX LTEXT "Dummy State", stc12, 52, 36, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Type:", stc7, 16, 48, 36,10, SS_NOPREFIX LTEXT "Dummy Type", stc11, 52, 48, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Waar:", stc10, 16, 60, 36,10, SS_NOPREFIX LTEXT "Dummy Location", stc14, 52, 60, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Opmerking:", stc9, 16, 72, 36,10, SS_NOPREFIX LTEXT "Dummy Remark", stc13, 52, 72, 152,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP GROUPBOX "Aantal ", grp2, 160, 92, 120,64, WS_GROUP LTEXT "Aantal e&xemplaren:",stc5,168,108,68,8 ICON "", ico3, 162,124, 76,24, WS_GROUP | SS_CENTERIMAGE CONTROL "&Sorteren", chx2,"Button",BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP,240,130,36,12 EDITTEXT edt3, 240,106, 32,12, WS_GROUP | ES_NUMBER GROUPBOX "Afdrukbereik", grp1, 8,92, 144,64, WS_GROUP CONTROL "&Alle xx", rad1,"Button",BS_AUTORADIOBUTTON | WS_GROUP | WS_TABSTOP,16,106,64,12 CONTROL "&Pagina's", rad3,"Button",BS_AUTORADIOBUTTON,16,122,36,12 CONTROL "Sele&ctie", rad2,"Button",BS_AUTORADIOBUTTON,16,138,64,12 EDITTEXT edt1, 74,122, 26,12, WS_GROUP | ES_NUMBER EDITTEXT edt2, 118,122, 26,12, WS_GROUP | ES_NUMBER RTEXT "&van:", stc2, 52,124, 20,8 RTEXT "&t/m:", stc3, 100,124, 16,8 } STRINGTABLE DISCARDABLE { PD32_PRINT_TITLE "Print" PD32_VALUE_UREADABLE "Onleesbare ingave" PD32_INVALID_PAGE_RANGE "Deze waarde ligt niet binnen het bereik\n\ Voert u s.v.p. een waarde tussen %d en %d in." PD32_FROM_NOT_ABOVE_TO "De VAN ingave kan niet groter zijn \ dan de TO waarde" PD32_MARGINS_OVERLAP "De marges overlappen of vallen \ buiten het papier.\nVoer s.v.p. nieuwe marges in." PD32_NR_OF_COPIES_EMPTY "Het aantal invoerveld kan niet leeg \ zijn." PD32_TOO_LARGE_COPIES "Zoveel exemplaren kan de printer \ niet in een keer aan, het maximum is %d" PD32_PRINT_ERROR "Er ontstond een printer fout." PD32_NO_DEFAULT_PRINTER "Er is geen default printer" PD32_CANT_FIND_PRINTER "De printer werd niet gevonden" PD32_OUT_OF_MEMORY "Er was onvoldoende geheugen \ beschikbaar" PD32_GENERIC_ERROR "Er onstond een niet nader \ gespecifieerde fout" PD32_DRIVER_UNKNOWN "De printer driver is onbekend" PD32_DEFAULT_PRINTER "Default Printer, " PD32_NR_OF_DOCUMENTS_IN_QUEUE "Er staan %d documenten in de \ wachtrij" PD32_PRINT_ALL_X_PAGES "&Alle %d pagina's" PD32_MARGINS_IN_INCHES "Marges [inch]" PD32_MARGINS_IN_MILIMETERS "Marges [mm]" PD32_MILIMETERS "mm" PD32_PRINTER_STATUS_READY "Klaar" PD32_PRINTER_STATUS_PAUSED "Gepauseerd, " PD32_PRINTER_STATUS_ERROR "Fout, " PD32_PRINTER_STATUS_PENDING_DELETION "Bezig met verwijderen, " PD32_PRINTER_STATUS_PAPER_JAM "Paper jam, " PD32_PRINTER_STATUS_PAPER_OUT "Papier is op, " PD32_PRINTER_STATUS_MANUAL_FEED "Voer s.v.p. met de hand papier in, " PD32_PRINTER_STATUS_PAPER_PROBLEM "Papier probleem, " PD32_PRINTER_STATUS_OFFLINE "Printer offline, " PD32_PRINTER_STATUS_IO_ACTIVE "I/O Actief, " PD32_PRINTER_STATUS_BUSY "Druk bezig, " PD32_PRINTER_STATUS_PRINTING "Aan het printen, " PD32_PRINTER_STATUS_OUTPUT_BIN_FULL "De uitvoerlade is vol, " PD32_PRINTER_STATUS_NOT_AVAILABLE "Niet aanwezig, " PD32_PRINTER_STATUS_WAITING "Aan het wachten, " PD32_PRINTER_STATUS_PROCESSING "Aan het Verwerken, " PD32_PRINTER_STATUS_INITIALIZING "Aan het opstarten, " PD32_PRINTER_STATUS_WARMING_UP "Aan het opwarmen, " PD32_PRINTER_STATUS_TONER_LOW "Er is nog maar weinig toner, " PD32_PRINTER_STATUS_NO_TONER "Toner is op, " PD32_PRINTER_STATUS_PAGE_PUNT "Storing in papieruitvoer, " PD32_PRINTER_STATUS_USER_INTERVENTION "Onderbroken door een gebruiker, " PD32_PRINTER_STATUS_OUT_OF_MEMORY "Onvoldoende geheugen beschikbaar, " PD32_PRINTER_STATUS_DOOR_OPEN "De printer staat is open, " PD32_PRINTER_STATUS_SERVER_UNKNOWN "Print server onbekend; " PD32_PRINTER_STATUS_POWER_SAVE "Power safe mode; " } wine-20000526/dlls/commdlg/cdlg_No.rc0100644000175000001440000002023607101102717016714 0ustar julliardusersLANGUAGE LANG_NORWEGIAN, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Åpne" FONT 8, "Helv" { LTEXT "&Filnavn:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Kataloger:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Liste over filer av &type:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Kataloger:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Åpne", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Avbryt", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hjelp", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Skrivebeskyttet", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Lagre som ..." FONT 8, "Helv" { LTEXT "&Filnavn:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Kataloger:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Liste over filer av &type:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Kataloger:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Lagre som", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Avbryt", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hjelp", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Skrivebeskyttet", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Skriv" FONT 8, "Helv" { LTEXT "Skriver:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Skriv del", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "&Alle", 1056, 16, 45, 60, 12 RADIOBUTTON "&Markert", 1057, 16, 60, 60, 12 RADIOBUTTON "&Sider", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "Skriv", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Avbryt", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Oppsett", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "&Fra:", 1090, 60, 80, 30, 9 LTEXT "&Til:", 1091, 120, 80, 30, 9 LTEXT "&Utskriftskvalitet:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "&Skriv til fil", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Sammentrykket", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Skriveoppsett" FONT 8, "Helv" { GROUPBOX "Skriver", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "&Standardskriver", 1056, 16, 20, 80, 12 LTEXT "[ingen]", 1088, 35, 35, 120, 9 RADIOBUTTON "Spesifikk &skriver", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Ok", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Avbryt", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Oppsett", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Orientering", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "&Portrett", 1058, 50, 100, 40, 12 RADIOBUTTON "&Landskap", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Papir", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "&Størrelse", 1089, 130, 95, 30, 9 LTEXT "&Kilde", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Font" FONT 8, "Helv" { LTEXT "Font:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 DEFPUSHBUTTON "Ok", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Avbryt", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Farge" FONT 8, "Helv" { LTEXT "&Grunnleggende farger:", 1088, 6, 6, 40, 9 LTEXT "&Egendefinerte farger:", 1089, 6, 126, 40, 9 LTEXT "&Ensfarget", 1090, 100, 146, 40, 9 LTEXT "&Int:", 1091, 150, 126, 40, 9 LTEXT "&Met:", 1092, 150, 146, 40, 9 LTEXT "&Lum:", 1093, 150, 166, 40, 9 LTEXT "&Rød:", 1094, 150, 126, 40, 9 LTEXT "&Grønn:", 1095, 150, 146, 40, 9 LTEXT "&Blå:", 1096, 150, 166, 40, 9 DEFPUSHBUTTON "Ok", IDOK, 6, 182, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "&Legg til egendefinert farge", 1024, 120, 182, 100, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Fjern egendefinerte farger", 1025, 6, 164, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Avbryt", IDCANCEL, 76, 182, 56, 14, WS_GROUP | WS_TABSTOP } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Finn" FONT 8, "Helv" { LTEXT "&Finn hva:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "&Kun hele ord", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "&Skill på store/små bokstaver", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Retning", 1072, 107, 26, 68, 28 CONTROL "&Opp", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "&Ned", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "&Finn neste", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Avbryt", IDCANCEL, 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hjelp", 1038, 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Bytt" FONT 8, "Helv" { LTEXT "&Finn hva:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Bytt med:", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "&Kun hele ord", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "&Skill på store/små bokstaver", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP DEFPUSHBUTTON "&Finn neste", IDOK, 174, 4, 50, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "&Bytt", 1024, 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Bytt alt", 1025, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Avbryt", IDCANCEL, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hjelp", 1038, 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } wine-20000526/dlls/commdlg/cdlg_Pl.rc0100644000175000001440000003226607101102717016721 0ustar julliardusersLANGUAGE LANG_POLISH, SUBLANG_DEFAULT /* LTEXT "Wyswietl pliki &typu:", 1089, 6, 104, 90, 9 */ OPEN_FILE DIALOG 36, 24, 279, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Otwórz" FONT 8, "Helv" BEGIN LTEXT "&Nazwa pliku:", 1090, 6, 6, 76, 9, WS_CHILD | WS_VISIBLE | WS_GROUP EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Katalogi:", -1, 110, 6, 92, 9, WS_CHILD | WS_VISIBLE | WS_GROUP CONTROL "", 1088, "STATIC", SS_NOPREFIX | WS_GROUP, 110, 18, 92, 9 LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Wyœwietl pliki &typu:", 1089, 6, 104, 90, 9, WS_CHILD | WS_VISIBLE | WS_GROUP CONTROL "", 1136, "COMBOBOX", CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP, 6, 114, 90, 36 LTEXT "&Stacje dysków:", 1091, 110, 104, 92, 9, WS_CHILD | WS_VISIBLE | WS_GROUP CONTROL "", 1137, "COMBOBOX", CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP, 110, 114, 92, 68 CONTROL "Otwórz", IDOK, "BUTTON", BS_DEFPUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 212, 6, 56, 14 CONTROL "Anuluj", IDCANCEL, "BUTTON", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 212, 24, 56, 14 CONTROL "&Pomoc", 1038, "BUTTON", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 212, 46, 56, 14 CONTROL "Tylko do odczytu", 1040, "BUTTON", BS_AUTOCHECKBOX | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 208, 68, 69, 12 END /* PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 */ SAVE_FILE DIALOG 36, 24, 278, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Zapisz jako" FONT 8, "Helv" BEGIN LTEXT "&Nazwa pliku:", 1090, 6, 6, 76, 9, WS_CHILD | WS_VISIBLE | WS_GROUP EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Katalogi:", -1, 110, 6, 92, 9, WS_CHILD | WS_VISIBLE | WS_GROUP CONTROL "", 1088, "STATIC", SS_NOPREFIX | WS_GROUP, 110, 18, 92, 9 LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Pokazuj pliki &typu:", 1089, 6, 104, 90, 9, WS_CHILD | WS_VISIBLE | WS_GROUP CONTROL "", 1136, "COMBOBOX", CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP, 6, 114, 90, 36 LTEXT "&Stacje dysków:", 1091, 110, 104, 92, 9, WS_CHILD | WS_VISIBLE | WS_GROUP CONTROL "", 1137, "COMBOBOX", CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP, 110, 114, 92, 68 CONTROL "Ok", IDOK, "BUTTON", BS_DEFPUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 213, 6, 56, 14 CONTROL "Anuluj", IDCANCEL, "BUTTON", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 213, 24, 56, 14 CONTROL "&Pomoc", 1038, "BUTTON", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 213, 45, 56, 14 CONTROL "&Tylko do odczytu", 1040, "BUTTON", BS_AUTOCHECKBOX | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 208, 68, 68, 12 END /* DEFPUSHBUTTON "Ok", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP */ PRINT DIALOG 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Drukuj" FONT 8, "Helv" BEGIN LTEXT "&Drukarka:", 1088, 6, 6, 40, 9, WS_CHILD | WS_VISIBLE | WS_GROUP LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Drukuj", 1072, 6, 30, 160, 65, WS_CHILD | WS_VISIBLE | WS_TABSTOP RADIOBUTTON "&Wszystko", 1056, 16, 45, 60, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP RADIOBUTTON "W&ybór", 1057, 16, 60, 60, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP RADIOBUTTON "&Strony", 1058, 16, 75, 60, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP CONTROL "Drukuj", IDOK, "BUTTON", BS_DEFPUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 206, 6, 56, 14 CONTROL "Anuluj", IDCANCEL, "BUTTON", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 206, 24, 56, 14 CONTROL "&Ustawienia", 1024, "BUTTON", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 206, 46, 56, 14 LTEXT "&Od:", 1090, 60, 78, 30, 9, WS_CHILD | WS_VISIBLE | WS_GROUP LTEXT "&Do:", 1091, 120, 78, 30, 9, WS_CHILD | WS_VISIBLE | WS_GROUP LTEXT "Jakoœæ &wydruku:", 1092, 6, 100, 76, 9, WS_CHILD | WS_VISIBLE | WS_GROUP CONTROL "", 1136, "COMBOBOX", CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP, 71, 98, 92, 68 CONTROL "Drukuj do Pli&ku", 1040, "BUTTON", BS_AUTOCHECKBOX | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 14, 115, 95, 12 CONTROL "Sortuj kopie", 1041, "BUTTON", BS_AUTOCHECKBOX | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 182, 102, 59, 12 END /* PUSHBUTTON "Anuluj",IDCANCEL,218,23,40,14,WS_GROUP */ PRINT_SETUP DIALOG 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Print Setup" FONT 8, "Helv" BEGIN GROUPBOX "Drukarka", 1072, 6, 10, 180, 65, WS_CHILD | WS_VISIBLE | WS_TABSTOP RADIOBUTTON "&Drukarka domyœlna", 1056, 16, 20, 80, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP LTEXT "[none]", 1088, 35, 35, 120, 9 RADIOBUTTON "&Inna drukarka", 1057, 16, 50, 80, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP CONTROL "", 1136, "COMBOBOX", CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP, 35, 65, 149, 68 CONTROL "Ok", IDOK, "BUTTON", BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP, 206, 6, 56, 14 CONTROL "Anuluj", IDCANCEL, "BUTTON", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 206, 24, 56, 14 CONTROL "&Opcje", 1024, "BUTTON", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 206, 46, 56, 14 GROUPBOX "Orientacja", 1073, 6, 85, 100, 50, WS_CHILD | WS_VISIBLE | WS_TABSTOP RADIOBUTTON "W p&ionie", 1058, 50, 100, 40, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP RADIOBUTTON "W po&ziomie", 1059, 50, 115, 40, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Papier", 1074, 120, 85, 180, 50, WS_CHILD | WS_VISIBLE | WS_TABSTOP LTEXT "&Wielkoœæ", 1089, 130, 95, 30, 9, WS_CHILD | WS_VISIBLE | WS_GROUP LTEXT "&ród³o", 1090, 130, 110, 30, 9, WS_CHILD | WS_VISIBLE | WS_GROUP CONTROL "", 1137, "COMBOBOX", CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP, 155, 95, 92, 68 CONTROL "", 1138, "COMBOBOX", CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP, 155, 110, 92, 68 END /* CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 */ CHOOSE_FONT DIALOG 13, 54, 264, 147 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Font" FONT 8, "Helv" BEGIN LTEXT "&Czcionka:", 1088, 6,3,40,9, WS_CHILD | WS_VISIBLE | WS_GROUP CONTROL "", 1136, "COMBOBOX", CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | CBS_AUTOHSCROLL | CBS_SORT | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE, 6,13,94,54 LTEXT "St&yl:", 1089, 108,3,44,9, WS_CHILD | WS_VISIBLE | WS_GROUP CONTROL "", 1137, "COMBOBOX", CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE, 108,13,64,54 LTEXT "&Rozmiar:", 1090, 179,3,30,9, WS_CHILD | WS_VISIBLE | WS_GROUP CONTROL "", 1138, "COMBOBOX", CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE | CBS_SORT, 179,13,32,54 CONTROL "OK", IDOK, "BUTTON", WS_GROUP, 218,6,40,14 CONTROL "Anuluj", IDCANCEL, "BUTTON", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 218,23,40,14 CONTROL "&Zastosuj", 1026, "BUTTON", WS_GROUP, 218,40,40,14 CONTROL "&Pomoc", 1038, "BUTTON", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 218,57,40,14 CONTROL "Efekty specialne", 1072, "BUTTON", BS_GROUPBOX | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 6,72,84,34 CONTROL "Prz&ekreœlona", 1040, "BUTTON", BS_AUTOCHECKBOX | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 10, 82, 58, 10 CONTROL "P&odkreœlona", 1041, "BUTTON", BS_AUTOCHECKBOX | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 10,94,50,10 LTEXT "&Kolor:", 1091, 6,110,30,9, WS_CHILD | WS_VISIBLE | WS_GROUP CONTROL "", 1139, "COMBOBOX", CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP, 6,120,84,100 CONTROL "Przyk³ad", 1073, "BUTTON", BS_GROUPBOX | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 98,72,160,49 CONTROL "AaBbYyZz\xB3", 1093, "STATIC", SS_NOPREFIX | WS_VISIBLE, 104,81,149,37 END /* PUSHBUTTON "&Replace", 1024, 174, 21, 50, 14, WS_GROUP | WS_TABSTOP * PUSHBUTTON "Replace &All", 1025, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP * PUSHBUTTON "Cancel", 2, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP * PUSHBUTTON "&Help", 1038, 174, 75, 50, 14, WS_GROUP | WS_TABSTOP *} */ FINDDLGORD DIALOG 34, 24, 251, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "ZnajdŸ" FONT 8, "Helv" BEGIN LTEXT "&ZnajdŸ:", -1, 4, 8, 42, 8, WS_CHILD | WS_VISIBLE | WS_GROUP EDITTEXT 1152, 46, 7, 134, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "Uwzglêdnij tylko ca³e wyrazy", 1040, "BUTTON", BS_AUTOCHECKBOX | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 4, 26, 107, 12 CONTROL "&Uwzglêdniaj wielkoœæ liter", 1041, "BUTTON", BS_AUTOCHECKBOX | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 4, 42, 107, 12 GROUPBOX "Kierunek", 1072, 113, 26, 68, 28 CONTROL "W &g\xF3r\xEA", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 117, 38, 20, 12 CONTROL "W &d\xF3l", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 144, 38, 30, 12 CONTROL "&ZnajdŸ nastêpny", IDOK, "BUTTON", BS_DEFPUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 187, 5, 61, 14 CONTROL "Anuluj", IDCANCEL, "BUTTON", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 187, 23, 61, 14 CONTROL "&Pomoc", 1038, "BUTTON", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 187, 45, 61, 14 END REPLACEDLGORD DIALOG 36, 24, 245, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Zamieñ" FONT 8, "Helv" BEGIN LTEXT "&ZnajdŸ:", -1, 4, 9, 48, 8, WS_CHILD | WS_VISIBLE | WS_GROUP EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Zanieñ &na:", -1, 4, 26, 48, 8, WS_CHILD | WS_VISIBLE | WS_GROUP EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "Uwzglêdnij &tylko ca³e wyrazy", 1040, "BUTTON", BS_AUTOCHECKBOX | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 5, 46, 104, 12 CONTROL "&Uwzglêdnij wielkoœæ liter", 1041, "BUTTON", BS_AUTOCHECKBOX | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 5, 62, 96, 12 CONTROL "ZnajdŸ nastêpny", IDOK, "BUTTON", BS_DEFPUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 174, 4, 67, 14 CONTROL "&Zamieñ", 1024, "BUTTON", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 174, 21, 68, 14 CONTROL "Zamieñ &wszystkie", 1025, "BUTTON", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 174, 38, 68, 14 CONTROL "Anuluj", IDCANCEL, "BUTTON", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 174, 56, 68, 14 CONTROL "&Pomoc", 1038, "BUTTON", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 174, 75, 68, 14 END CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Color" FONT 8, "Helv" { LTEXT "&Podstawowe kolory:", 1088, 4, 4, 140, 10 LTEXT "Dowolne &kolory:", 1089, 4, 106, 140, 10 LTEXT "Kolor | Sol&id", 1090, 150, 151, 48, 10 LTEXT "&Czerwony:", 726 /*1094*/,249,126,24,10 EDITTEXT 706, 275,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Zielony:",727/*1095*/,249,140,24,10 EDITTEXT 707, 275,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Niebieski:",728 /*1096*/,249,154,24,10 EDITTEXT 708, 275,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Hue:" ,723 /*1091*/,202,126,22,10 EDITTEXT 703, 226,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Sat:" ,724 /*1092*/,202,140,22,10 EDITTEXT 704, 226,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Lum:" ,725 /*1093*/,202,154,22,10 EDITTEXT 705, 226,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "Ok", IDOK, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Anuluj", IDCANCEL, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Pomoc", 1038,100,166, 44, 14 PUSHBUTTON "&Dodaj do dowolnych", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Z&definiuj Kolor >>", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&i",713,300,200,4,14 /* just a dummy: 'i' is like &i in "sol&id" */ } wine-20000526/dlls/commdlg/cdlg_Pt.rc0100644000175000001440000004607507101102717016734 0ustar julliardusersLANGUAGE LANG_PORTUGUESE, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Abrir" FONT 8, "Helv" { LTEXT "Nome do &Arquivo:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Diretórios:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Listar Arquivos do &Tipo:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "Dri&ves:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Abrir", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancelar", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "A&juda", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Somente Leitura", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Salvar Como ..." FONT 8, "Helv" { LTEXT "Nome do &Arquivo:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Diretórios:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Listar Arquivos do &Tipo:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "Dri&ves:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Salvar &Como", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancelar", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Ajuda", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Somente Leitura", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Imprimir" FONT 8, "Helv" { LTEXT "Impressora:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Faixa de Impressão", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "&Tudo", 1056, 16, 45, 60, 12 RADIOBUTTON "S&eleção", 1057, 16, 60, 60, 12 RADIOBUTTON "&Páginas", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "Imprimir", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancelar", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Configurar", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "&De:", 1090, 60, 80, 30, 9 LTEXT "&Ate:", 1091, 120, 80, 30, 9 LTEXT "&Qualidade de Impressão:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "Imprimir para Arquivo", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "C&ondensado", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Configurações de Impressão" FONT 8, "Helv" { GROUPBOX "Impressora", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "&Impressora Padrão", 1056, 16, 20, 80, 12 LTEXT "[none]", 1088, 35, 35, 120, 9 RADIOBUTTON "Impressora &Específica", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Ok", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancelar", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Configurar", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Orientação", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "&Retrato", 1058, 50, 100, 40, 12 RADIOBUTTON "&Paisagem", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Papel", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "&Tamanho", 1089, 130, 95, 30, 9 LTEXT "&Fonte de Alimentação", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG DISCARDABLE 13, 54, 264, 147 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Fonte" FONT 8, "Helv" { LTEXT "&Fonte:",1088 ,6,3,40,9 COMBOBOX 1136 ,6,13,94,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | CBS_AUTOHSCROLL | CBS_SORT | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Estilo da Fonte:",1089 ,108,3,44,9 COMBOBOX 1137,108,13,64,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Tamanho:",1090,179,3,30,9 COMBOBOX 1138,179,13,32,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE | CBS_SORT DEFPUSHBUTTON "OK",IDOK,218,6,40,14,WS_GROUP PUSHBUTTON "Cancelar",IDCANCEL,218,23,40,14,WS_GROUP PUSHBUTTON "&Aplicar", 1026,218,40,40,14,WS_GROUP PUSHBUTTON "A&juda" , 1038,218,57,40,14,WS_GROUP GROUPBOX "Efeitos",1072,6,72,84,34,WS_GROUP CHECKBOX "&Riscado", 1040, 10,82,50,10, BS_AUTOCHECKBOX | WS_TABSTOP CHECKBOX "&Sublinhado", 1041, 10,94,50,10, BS_AUTOCHECKBOX LTEXT "&Cor:", 1091 ,6,110,30,9 COMBOBOX 1139,6,120,84,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP GROUPBOX "Amostra",1073,98,72,160,49,WS_GROUP CTEXT "AaBbYyZz",1093,104,81,149,37,SS_NOPREFIX | WS_VISIBLE } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Cor" FONT 8, "Helv" { LTEXT "Cores &Básicas:", 1088, 4, 4, 140, 10 LTEXT "&Cores do Usuário:", 1089, 4, 106, 140, 10 LTEXT "Colorido|Sólid&o", 1090, 150, 151, 48, 10 LTEXT "Ver&melho:", 726 /*1094*/,249,126,24,10 EDITTEXT 706, 275,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Verde:",727/*1095*/,249,140,24,10 EDITTEXT 707, 275,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "A&zul:",728 /*1096*/,249,154,24,10 EDITTEXT 708, 275,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Mat&iz:" ,723 /*1091*/,202,126,22,10 EDITTEXT 703, 226,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Sa&t:" ,724 /*1092*/,202,140,22,10 EDITTEXT 704, 226,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Lum:" ,725 /*1093*/,202,154,22,10 EDITTEXT 705, 226,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "Ok", IDOK, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancelar", IDCANCEL, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Aj&uda", 1038,100,166, 44, 14 PUSHBUTTON "&Adicionar Cor", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Definir Cores Personalizadas >>", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&o",713,300,200,4,14 /* just a dummy: 'o' is like &o in "solid&o" */ } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Procurar" FONT 8, "Helv" { LTEXT "&Procurar:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Palavra &Inteira", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "&Maiúsculas/minusculas", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Direção", 1072, 107, 26, 68, 28 CONTROL "A&cima", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "A&baixo", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "Procurar a Pró&xima", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancelar", IDCANCEL, 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "A&juda", 1038, 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Alterar" FONT 8, "Helv" { LTEXT "&Procurar:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Alterar Pa&ra:", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Palavra &inteira", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "&Maiúsculas/minúsculas", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "Procurar a Pró&xima", IDOK, 174, 4, 50, 14, WS_GROUP | WS_TABSTOP | BS_DEFPUSHBUTTON PUSHBUTTON "&Alterar", psh1, 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Alterar &Todas", psh2, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Cancelar", IDCANCEL, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "A&juda", pshHelp, 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } PRINT32 DIALOG LOADONCALL MOVEABLE DISCARDABLE 32, 32, 288, 186 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | DS_CONTEXTHELP | DS_3DLOOK CAPTION "Print32" FONT 8, "Helv" { DEFPUSHBUTTON "OK", IDOK, 180,164, 48,14, WS_GROUP | BS_DEFPUSHBUTTON PUSHBUTTON "Cancelar", IDCANCEL, 232,164, 48,14, WS_GROUP PUSHBUTTON "&Ajuda", pshHelp, 50, 161, 48,14, WS_GROUP GROUPBOX "Impressora", grp4, 8, 4, 272,84, WS_GROUP CONTROL "Imprimir em arqui&vo", chx1, "Button",BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP,212,70,64,12 PUSHBUTTON "Propri&edades", psh2, 212, 17, 60,14, WS_GROUP LTEXT "&Nome:", stc6, 16, 20, 36,8 COMBOBOX cmb4, 52, 18, 152,152,CBS_DROPDOWNLIST | CBS_SORT | WS_VSCROLL | WS_GROUP | WS_TABSTOP LTEXT "Status:", stc8, 16, 36, 36,10, SS_NOPREFIX LTEXT "Dummy State", stc12, 52, 36, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Tipo:", stc7, 16, 48, 36,10, SS_NOPREFIX LTEXT "Dummy Type", stc11, 52, 48, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Onde:", stc10, 16, 60, 36,10, SS_NOPREFIX LTEXT "Dummy Location", stc14, 52, 60, 224,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Comentário:", stc9, 16, 72, 36,10, SS_NOPREFIX LTEXT "Dummy Remark", stc13, 52, 72, 152,10, SS_NOPREFIX | SS_LEFTNOWORDWRAP GROUPBOX "Cópias", grp2, 160, 92, 120,64, WS_GROUP LTEXT "Número de &cópias:", stc5, 168,108, 68, 8 ICON "", ico3, 162,124, 76,24, WS_GROUP | SS_CENTERIMAGE CONTROL "&Agrupar", chx2,"Button",BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP,240,130,36,12 EDITTEXT edt3, 240,106, 32,12, WS_GROUP | ES_NUMBER GROUPBOX "Faixa de impressão", grp1, 8,92, 144,64, WS_GROUP CONTROL "&Todos", rad1,"Button",BS_AUTORADIOBUTTON | WS_GROUP | WS_TABSTOP,16,106,64,12 CONTROL "Pá&ginas", rad3,"Button",BS_AUTORADIOBUTTON,16,122,36,12 CONTROL "Seleção", rad2,"Button",BS_AUTORADIOBUTTON,16,138,64,12 EDITTEXT edt1, 74,122, 26,12, WS_GROUP | ES_NUMBER EDITTEXT edt2, 118,122, 26,12, WS_GROUP | ES_NUMBER RTEXT "&de:", stc2, 52,124, 20,8 RTEXT "&até:", stc3, 100,124, 16,8 } PRINT32_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 32, 32, 288, 178 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | DS_CONTEXTHELP | DS_3DLOOK CAPTION "Print32 Setup" FONT 8, "Helv" BEGIN DEFPUSHBUTTON "OK", IDOK,180,156,48,14,WS_GROUP PUSHBUTTON "Cancelar", IDCANCEL,232,156,48,14 /* PUSHBUTTON "Rede...", psh5, 284,156,48,14 */ GROUPBOX "Impressora", grp4, 8, 4, 272, 84, WS_GROUP PUSHBUTTON "&Propriedades", psh2, 212, 17, 60, 14, WS_GROUP LTEXT "&Nome:", stc6, 16, 20, 36, 8 COMBOBOX cmb1, 52, 18, 152, 152, CBS_DROPDOWNLIST | CBS_SORT | WS_VSCROLL | WS_GROUP | WS_TABSTOP LTEXT "Status:", stc8, 16, 36, 36, 10, SS_NOPREFIX LTEXT "Dummy State", stc12, 52, 36, 224, 10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Tipo:", stc7, 16, 48, 36, 10, SS_NOPREFIX LTEXT "Dummy Type", stc11, 52, 48, 224, 10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Onde:", stc10, 16, 60, 36, 10, SS_NOPREFIX LTEXT "Dummy Location", stc14, 52, 60, 224, 10, SS_NOPREFIX | SS_LEFTNOWORDWRAP LTEXT "Comentário", stc9, 16, 72, 36, 10, SS_NOPREFIX LTEXT "Dummy Remark", stc13, 52, 72, 224, 10, SS_NOPREFIX | SS_LEFTNOWORDWRAP GROUPBOX "Papel", grp2, 8, 92, 164, 56, WS_GROUP LTEXT "&Tamanho:", stc2, 16, 108, 36, 8 COMBOBOX cmb2, 52, 106, 112, 112, CBS_DROPDOWNLIST | CBS_SORT | WS_VSCROLL | WS_GROUP | WS_TABSTOP LTEXT "&Origem:", stc3, 16, 128, 36, 8 COMBOBOX cmb3, 52, 126, 112, 112, CBS_DROPDOWNLIST | CBS_SORT | WS_VSCROLL | WS_GROUP | WS_TABSTOP GROUPBOX "Orientação", grp1, 180, 92, 100, 56, WS_GROUP ICON "", ico1, 195, 112, 18, 20, WS_GROUP CONTROL "&Retrato", rad1, "Button", BS_AUTORADIOBUTTON | WS_GROUP | WS_TABSTOP, 224, 106, 52, 12 CONTROL "&Paisagem", rad2, "Button", BS_AUTORADIOBUTTON, 224, 126, 52, 12 END NEWFILEOPENORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 0, 0, 280, 164 STYLE DS_MODALFRAME | DS_CONTEXTHELP | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Open" FONT 8, "helv" { LTEXT "Olhar &em",IDC_LOOKINSTATIC,7,6,27,8, SS_NOTIFY COMBOBOX IDC_LOOKIN,36,3,138,300,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | WS_VSCROLL | WS_TABSTOP LTEXT "" , IDC_TOOLBARSTATIC, 172, 2, 102, 17, NOT WS_GROUP | NOT WS_VISIBLE LISTBOX IDC_SHELLSTATIC,4,20,272,85, LBS_SORT | LBS_NOINTEGRALHEIGHT | LBS_MULTICOLUMN | WS_HSCROLL | NOT WS_VISIBLE LTEXT "Nome do &arquivo:",IDC_FILENAMESTATIC,5,112,48,8, SS_NOTIFY EDITTEXT IDC_FILENAME,54,111,155,12,ES_AUTOHSCROLL LTEXT "Arquivos do &tipo",IDC_FILETYPESTATIC,5,131,48,8, SS_NOTIFY COMBOBOX IDC_FILETYPE,54,129,155,100,CBS_DROPDOWN | WS_VSCROLL | WS_TABSTOP CONTROL "Abrir como &somente-leitura",IDC_OPENREADONLY,"Button",BS_AUTOCHECKBOX | WS_TABSTOP,54,148,74,10 DEFPUSHBUTTON "&Abrir", IDOK,222,110,50,13 PUSHBUTTON "Cancel", IDCANCEL,222,128,50,14 PUSHBUTTON "&Help", pshHelp,222,145,50,14 } STRINGTABLE DISCARDABLE { IDS_ABOUTBOX "&Sobre FolderPicker Text" IDS_DOCUMENTFOLDERS "Pastas de Documentos" IDS_PERSONAL "Meus Documentos" IDS_FAVORITES "Favoritos" IDS_PATH "Caminho do Sistema" IDS_DESKTOP "Área de Trabalho" IDS_FONTS "Fonts" IDS_MYCOMPUTER "Meu Computador" } STRINGTABLE DISCARDABLE { IDS_SYSTEMFOLDERS "Pastas do Sistema" IDS_LOCALHARDRIVES "Discos Rígidos Locais" IDS_FILENOTFOUND "Arquivo não encontrado" IDS_VERIFYFILE "Por favor verifique se foi fornecido o nome correto do arquivo" IDS_CREATEFILE "Arquivo não existe\nVocê gostaria de cria-lo" } STRINGTABLE DISCARDABLE { PD32_PRINT_TITLE "Print" PD32_VALUE_UREADABLE "Entrada Ilegível" PD32_INVALID_PAGE_RANGE "Este valor não se encaixa na faixa de páginas\n\ Por favor entre um valor entre %d e %d" PD32_FROM_NOT_ABOVE_TO "A entrada DE não pode exceder ATÉ:" PD32_MARGINS_OVERLAP "As margens estão fora das medidas \ do papel.\nPor favor reentre as margens" PD32_NR_OF_COPIES_EMPTY "O número de cópias não pode ter valor vazio" PD32_TOO_LARGE_COPIES "Esta quantidade de impressão não é suportada \ pela sua impressora.\nPor favor entre um valor entre 1 e %d" PD32_PRINT_ERROR "Ocorreu um erro de impressão" PD32_NO_DEFAULT_PRINTER "Não existe uma impressora padrão" PD32_CANT_FIND_PRINTER "Nãp pude encontrar uma impressora" PD32_OUT_OF_MEMORY "Memória insulficiente" PD32_GENERIC_ERROR "Ocorreu algum erro" PD32_DRIVER_UNKNOWN "Driver de impressora desconhecido" PD32_DEFAULT_PRINTER "Impressora Padrão; " PD32_NR_OF_DOCUMENTS_IN_QUEUE "Existem %d documentos na fila" PD32_PRINT_ALL_X_PAGES "&Todas %d páginas" PD32_MARGINS_IN_INCHES "Margens [polegadas]" PD32_MARGINS_IN_MILIMETERS "Margens [mm]" PD32_MILIMETERS "mm" PD32_PRINTER_STATUS_READY "Pronto" PD32_PRINTER_STATUS_PAUSED "Pausado; " PD32_PRINTER_STATUS_ERROR "Erro; " PD32_PRINTER_STATUS_PENDING_DELETION "Exclusão pendente; " PD32_PRINTER_STATUS_PAPER_JAM "Papel atolado; " PD32_PRINTER_STATUS_PAPER_OUT "Sem papel; " PD32_PRINTER_STATUS_MANUAL_FEED "Carregue papel manualmente; " PD32_PRINTER_STATUS_PAPER_PROBLEM "Problemas com o papel; " PD32_PRINTER_STATUS_OFFLINE "Impressora desligada; " PD32_PRINTER_STATUS_IO_ACTIVE "E/S Ativo; " PD32_PRINTER_STATUS_BUSY "Ocupado; " PD32_PRINTER_STATUS_PRINTING "Imprimindo; " PD32_PRINTER_STATUS_OUTPUT_BIN_FULL "Fila de impressão está cheia; " PD32_PRINTER_STATUS_NOT_AVAILABLE "Não disponível; " PD32_PRINTER_STATUS_WAITING "Esperando; " PD32_PRINTER_STATUS_PROCESSING "Processando; " PD32_PRINTER_STATUS_INITIALIZING "Inicializando; " PD32_PRINTER_STATUS_WARMING_UP "Aquecendo; " PD32_PRINTER_STATUS_TONER_LOW "Pouco toner; " PD32_PRINTER_STATUS_NO_TONER "Sem toner; " PD32_PRINTER_STATUS_PAGE_PUNT "Page punt; " PD32_PRINTER_STATUS_USER_INTERVENTION "Interrompido pelo usuário; " PD32_PRINTER_STATUS_OUT_OF_MEMORY "Memória insulficiente; " PD32_PRINTER_STATUS_DOOR_OPEN "A impressora está aberta; " PD32_PRINTER_STATUS_SERVER_UNKNOWN "Servidor de impressão desconhecido; " PD32_PRINTER_STATUS_POWER_SAVE "Modo econômico; " } wine-20000526/dlls/commdlg/cdlg_Ru.rc0100644000175000001440000002474007101102717016732 0ustar julliardusersLANGUAGE LANG_RUSSIAN, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Îòêðûòü" FONT 8, "Ms Sans Serif" { LTEXT "&Èìÿ ôàéëà:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Êàòàëîãè:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Ïîêàçûâàòü ôàéëû &òèïà:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Äèñêè:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Îòêðûòü", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Îòìåíà", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Ñïðàâêà", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "Ò&îëüêî äëÿ ÷òåíèÿ", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Ñîõðàíèòü êàê ..." FONT 8, "Ms Sans Serif" { LTEXT "&Èìÿ ôàéëà:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Êàòàëîãè:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Ïîêàçûâàòü ôàéëû &òèïà:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Äèñêè:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Ñîõðàíèòü êàê", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Îòìåíà", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Ñïðàâêà", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Òîëüêî äëÿ ÷òåíèÿ", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Ïå÷àòü" FONT 8, "Ms Sans Serif" { LTEXT "Ïðèíòåð:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Ïå÷àòàòü", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "&Âñå", 1056, 16, 45, 60, 12 RADIOBUTTON "Â&ûäåëåííûé ôðàãìåíò", 1057, 16, 60, 60, 12 RADIOBUTTON "&Ñòðàíèöû", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "Ïå÷àòü", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Îòìåíà", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Ñâî&éñòâà", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "&ñ:", 1090, 60, 80, 30, 9 LTEXT "&ïî:", 1091, 120, 80, 30, 9 LTEXT "&Êà÷åñòâî ïå÷àòè:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "Ï&å÷àòü â ôàéë", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Condensed", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Íàñòðîéêà ïðèíòåðà" FONT 8, "Ms Sans Serif" { GROUPBOX "Ïðèíòåð", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "Ïðèíòåð ïî &óìîë÷àíèþ", 1056, 16, 20, 80, 12 LTEXT "[none]", 1088, 35, 35, 120, 9 RADIOBUTTON "&Äðóãîé ïðèíòåð", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "OK", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Îòìåíà", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Íàñòðîéêà", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Îðèåíòàöèÿ", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "&Êíèæíàÿ", 1058, 50, 100, 40, 12 RADIOBUTTON "&Àëüáîìíàÿ", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Áóìàãà", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "Ðà&çìåð", 1089, 130, 95, 30, 9 LTEXT "&Èñòî÷íèê", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG DISCARDABLE 13, 54, 264, 147 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Øðèôò" FONT 8, "Ms Sans Serif" { LTEXT "&Øðèôò:",1088 ,6,3,40,9 COMBOBOX 1136 ,6,13,94,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | CBS_AUTOHSCROLL | CBS_SORT | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Íà÷åðòàíèå:",1089 ,108,3,44,9 COMBOBOX 1137,108,13,64,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Ðàçìåð:",1090,179,3,30,9 COMBOBOX 1138,179,13,32,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE | CBS_SORT DEFPUSHBUTTON "OK",IDOK,218,6,40,14, WS_GROUP | WS_TABSTOP | BS_DEFPUSHBUTTON PUSHBUTTON "Îòìåíà",IDCANCEL,218,23,40,14,WS_GROUP | WS_TABSTOP PUSHBUTTON "&Ïðèìåíèòü", 1026,218,40,40,14,WS_GROUP | WS_TABSTOP PUSHBUTTON "&Ñïðàâêà" , 1038,218,57,40,14,WS_GROUP | WS_TABSTOP GROUPBOX "Àòðèáóòû",1072,6,72,84,34,WS_GROUP CHECKBOX "&Çà÷åðêíóòûé", 1040, 10,82,50,10, BS_AUTOCHECKBOX | WS_TABSTOP CHECKBOX "Ïîä&÷åðêíóòûé", 1041, 10,94,50,10, BS_AUTOCHECKBOX LTEXT "Ö&âåò:", 1091 ,6,110,30,9 COMBOBOX 1139,6,120,84,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP GROUPBOX "Îáðàçåö",1073,98,72,160,49,WS_GROUP CTEXT "AaBbYyZz",1093,104,81,149,37,SS_NOPREFIX | WS_VISIBLE } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Èçìåíåíèå ïàëèòðû" FONT 8, "Ms Sans Serif" { LTEXT "&Áàçîâàÿ ïàëèòðà:", 1088, 4, 4, 140, 10 LTEXT "Äî&ïîëíèòåëüíûå öâåòà:", 1089, 4, 106, 140, 10 LTEXT "Öâåò | Çà&ëèâêà", 1090, 150, 151, 48, 10 LTEXT "Êðàñ&íûé:", 726 /*1094*/,249,126,24,10 EDITTEXT 706, 275,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Çåëåíûé:",727/*1095*/,249,140,24,10 EDITTEXT 707, 275,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Ñ&èíèé:",728 /*1096*/,249,154,24,10 EDITTEXT 708, 275,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Î&òòåíîê:" ,723 /*1091*/,202,126,22,10 EDITTEXT 703, 226,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Êîíòðàñò:" ,724 /*1092*/,202,140,22,10 EDITTEXT 704, 226,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&ßðêîñòü:" ,725 /*1093*/,202,154,22,10 EDITTEXT 705, 226,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "OK", IDOK, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Îòìåíà", IDCANCEL, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Cïðàâêà", 1038,100,166, 44, 14 PUSHBUTTON "&Äîáàâèòü â íàáîð", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Îïðåäåëèòü öâåò >>", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&i",713,300,200,4,14 /* just a dummy: 'i' is like &i in "sol&id" */ } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Ïîèñê" FONT 8, "Ms Sans Serif" { LTEXT "&Îáðàçåö:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "&Òîëüêî ñëîâî öåëèêîì", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "C &ó÷åòîì ðåãèñòðà", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Íàïðàâëåíèå", 1072, 107, 26, 68, 28 CONTROL "&Ââåðõ", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "Â&íèç", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "&Íàéòè äàëåå", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP | BS_DEFPUSHBUTTON PUSHBUTTON "Îòìåíà", IDCANCEL , 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Ñïðàâêà", pshHelp , 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Çàìåíà" FONT 8, "Ms Sans Serif" { LTEXT "&Îáðàçåö:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Ç&àìåíèòü íà:", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "&Òîëüêî ñëîâî öåëèêîì", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Ñ &ó÷åòîì ðåãèñòðà", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "&Íàéòè äàëåå", IDOK, 174, 4, 50, 14, WS_GROUP | WS_TABSTOP | BS_DEFPUSHBUTTON PUSHBUTTON "&Çàìåíèòü", psh1 , 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Çàìåíèòü &âñå", psh2 , 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Îòìåíà", IDCANCEL , 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Ñïðàâêà", pshHelp , 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } wine-20000526/dlls/commdlg/cdlg_Sk.rc0100644000175000001440000002035007101102717016712 0ustar julliardusersLANGUAGE LANG_SLOVAK, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Otvorenie súboru" FONT 8, "Helv" { LTEXT "&Meno súboru:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Adresáre:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Typ zobrazených súborov:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Diskové jednotky:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Otvori", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Zruši", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Pomoc", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Len na èítanie", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Ulož pod menom..." FONT 8, "Helv" { LTEXT "&Meno súboru:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Adresáre:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Typ zobrazených súborov:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Diskové jednotky:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Ulož pod menom", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Zruši", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Pomoc", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Len na èítanie", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Tlaè" FONT 8, "Helv" { LTEXT "Tlaèiareò:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Rozsah tlaèe", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "Vytlaè &všetko", 1056, 16, 45, 60, 12 RADIOBUTTON "Vytlaè vý&ber", 1057, 16, 60, 60, 12 RADIOBUTTON "Vytlaè &zadané strany", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "Tlaè", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Zruši", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Nastavi...", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "&Od:", 1090, 60, 80, 30, 9 LTEXT "&Po:", 1091, 120, 80, 30, 9 LTEXT "&Kvalita tlaèe:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "Tlaè do &súboru", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Kondenzované", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Nastavenie spôsobu tlaèe" FONT 8, "Helv" { GROUPBOX "Tlaèiareò", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "&Predvolená tlaèiareò", 1056, 16, 20, 80, 12 LTEXT "[none]", 1088, 35, 35, 120, 9 RADIOBUTTON "Špecifická &tlaèiareò", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Ok", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Zruši", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Ïa&lšie vo¾by...", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Orientácia", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "Na &výšku", 1058, 50, 100, 40, 12 RADIOBUTTON "Na ší&rku", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Papier", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "&Formát", 1089, 130, 95, 30, 9 LTEXT "&Odkia¾", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Písmo" FONT 8, "Helv" { LTEXT "Písmo:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 DEFPUSHBUTTON "Ok", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Zruši", 2, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 200 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Farby" FONT 8, "Helv" { LTEXT "&Základné farby:", 1088, 6, 6, 40, 9 LTEXT "&Farby na zakázku:", 1089, 6, 126, 40, 9 LTEXT "Farba|Spoj&itá", 1090, 100, 146, 40, 9 LTEXT "&Odtieò:", 1091, 150, 126, 40, 9 LTEXT "&Sýtos:", 1092, 150, 146, 40, 9 LTEXT "&Jas:", 1093, 150, 166, 40, 9 LTEXT "Èe&rvená:", 1094, 150, 126, 40, 9 LTEXT "&Zelená:", 1095, 150, 146, 40, 9 LTEXT "&Modrá:", 1096, 150, 166, 40, 9 DEFPUSHBUTTON "Ok", IDOK, 6, 182, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "&Prida farbu", 1024, 120, 182, 100, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Vyradi farbu", 1025, 6, 164, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Zruši", IDCANCEL, 76, 182, 56, 14, WS_GROUP | WS_TABSTOP } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "H¾adanie" FONT 8, "Helv" { LTEXT "&Nájs:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Len &celé slová", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "&Rozlišova malé a ve¾ké písmená", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Smer", 1072, 107, 26, 68, 28 CONTROL "H&ore", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "&Dole", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "Nájs ï&alšie", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Zavrie", IDCANCEL, 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Pomoc", 1038, 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Zámena" FONT 8, "Helv" { LTEXT "&Nájs:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Zameni za:", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Len &celé slová", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "&Rozlišova malá a ve¾ké písmená", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "Nájs ï&alšie", 1, 174, 4, 50, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Za&meni", 1024, 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Zameni vo vý&bere", 1025, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Zavrie", 2, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Pomoc", 1038, 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } wine-20000526/dlls/commdlg/cdlg_Sv.rc0100644000175000001440000002442107101102717016730 0ustar julliardusersLANGUAGE LANG_SWEDISH, SUBLANG_DEFAULT OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Öppna" FONT 8, "Helv" { LTEXT "Fil&namn:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Kataloger:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Lista filer av &typen:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Enheter:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Öppna", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Avbryt", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hjälp", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Skrivskyddat", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Spara som ..." FONT 8, "Helv" { LTEXT "&Filnamn:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Kataloger:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Lista filer av &typen:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Enheter:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Spara som", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Avbryt", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hjälp", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "&Skrivskyddad", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Skriv ut" FONT 8, "Helv" { LTEXT "Skrivare:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Skriv ut del", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "&Allt", 1056, 16, 45, 60, 12 RADIOBUTTON "&Markerat", 1057, 16, 60, 60, 12 RADIOBUTTON "&Sidor", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "Skriv ut", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Avbryt", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Inställningar", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "&Från:", 1090, 60, 80, 30, 9 LTEXT "&Till:", 1091, 120, 80, 30, 9 LTEXT "Utskriftskvalitet:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "&Skriv till fil", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Sammantryckt", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Skrivar inställningar" FONT 8, "Helv" { GROUPBOX "Skrivare", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "&Standardskrivare", 1056, 16, 20, 80, 12 LTEXT "[ingen]", 1088, 35, 35, 120, 9 RADIOBUTTON "Specifierad &skrivare", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "Ok", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Avbryt", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Inställningar", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Orientering", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "&Porträtt", 1058, 50, 100, 40, 12 RADIOBUTTON "&Landskap", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Paper", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "&Storlek", 1089, 130, 95, 30, 9 LTEXT "&Källa", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG DISCARDABLE 13, 54, 264, 147 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Font" FONT 8, "Helv" { LTEXT "&Font:",1088 ,6,3,40,9 COMBOBOX 1136 ,6,13,94,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | CBS_AUTOHSCROLL | CBS_SORT | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "Font S&til:",1089 ,108,3,44,9 COMBOBOX 1137,108,13,64,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Storlek:",1090,179,3,30,9 COMBOBOX 1138,179,13,32,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE | CBS_SORT DEFPUSHBUTTON "OK",IDOK,218,6,40,14,WS_GROUP PUSHBUTTON "Avbryt",IDCANCEL,218,23,40,14,WS_GROUP PUSHBUTTON "&Använd", 1026,218,40,40,14,WS_GROUP PUSHBUTTON "&Hjälp" , 1038,218,57,40,14,WS_GROUP GROUPBOX "Effekter",1072,6,72,84,34,WS_GROUP CHECKBOX "&Genomstruken", 1040, 10,82,50,10, BS_AUTOCHECKBOX | WS_TABSTOP CHECKBOX "&Understruken", 1041, 10,94,50,10, BS_AUTOCHECKBOX LTEXT "&Färg:", 1091 ,6,110,30,9 COMBOBOX 1139,6,120,84,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP GROUPBOX "Test",1073,98,72,160,49,WS_GROUP CTEXT "AaBbYyZz",1093,104,81,149,37,SS_NOPREFIX | WS_VISIBLE } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Färg" FONT 8, "Helv" { LTEXT "&Grundläggande färger:", 1088, 4, 4, 140, 10 LTEXT "&Egendefinerade färger:", 1089, 4, 106, 140, 10 LTEXT "Enfärgat", 1090, 150, 151, 48, 10 LTEXT "&Röd:", 726 /*1094*/,249,126,24,10 EDITTEXT 706, 275,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Grön:",727/*1095*/,249,140,24,10 EDITTEXT 707, 275,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Blå:",728 /*1096*/,249,154,24,10 EDITTEXT 708, 275,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Int:" ,723 /*1091*/,202,126,22,10 EDITTEXT 703, 226,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Met:" ,724 /*1092*/,202,140,22,10 EDITTEXT 704, 226,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Lum:" ,725 /*1093*/,202,154,22,10 EDITTEXT 705, 226,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "Ok", IDOK, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Avbryt", IDCANCEL, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Hjälp", 1038,100,166, 44, 14 PUSHBUTTON "&Lägg till egendefinerad färg", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Defingnera egen färg >>", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&i",713,300,200,4,14 /* just a dummy: 'i' is like &i in "sol&id" */ } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Sök" FONT 8, "Helv" { LTEXT "&Sök efter:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "&Bara hela ord", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "&Skillnad på stora/små bokstäver", 1041, 4, 42, 100, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Riktning", 1072, 107, 26, 68, 28 CONTROL "&Upp", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "&Ner", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "&Sök efter nästa", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Avbryt", IDCANCEL, 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hjälp", 1038, 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Sök/ersätt" FONT 8, "Helv" { LTEXT "&Sök efter:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Ersätt med:", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "&Bara hela ord", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "&Skillnad på stora/små bokstäver", 1041, 5, 62, 104, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "&Sök efter nästa", IDOK, 174, 4, 50, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "&Ersätt", 1024, 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Ersätt &alla", 1025, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Avbryt", IDCANCEL, 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Hjälp", 1038, 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } wine-20000526/dlls/commdlg/cdlg_Wa.rc0100644000175000001440000002516007101102717016710 0ustar julliardusersLANGUAGE LANG_WALON, SUBLANG_DEFAULT /* * Si vos voloz aider avou li ratoûrnaedje des libes programes è walon, * vos poloz scrîre a l' adresse emile */ OPEN_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Drovî" FONT 8, "Helv" { LTEXT "&No do fitchî:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Ridants", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Djîveye des fitchîs del sôr&te:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Plakes:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "I Va", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Rinoncî", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Aide", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "Rén ki &lere", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } SAVE_FILE DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 275, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Schaper èt rlomer..." FONT 8, "Helv" { LTEXT "&No do fitchî:", 1090, 6, 6, 76, 9 EDITTEXT 1152, 6, 16, 90, 12, ES_AUTOHSCROLL | ES_OEMCONVERT | WS_BORDER | WS_TABSTOP LISTBOX 1120, 6, 32, 90, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "&Ridants:", -1, 110, 6, 92, 9 LTEXT "", 1088, 110, 18, 92, 9, SS_NOPREFIX | WS_GROUP LISTBOX 1121, 110, 32, 92, 68, LBS_STANDARD | LBS_OWNERDRAWFIXED | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_TABSTOP LTEXT "Djîveye des fitchîs del sôr&te:", 1089, 6, 104, 90, 9 COMBOBOX 1136, 6, 114, 90, 36, CBS_DROPDOWNLIST | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP LTEXT "&Plakes:", 1091, 110, 104, 92, 9 COMBOBOX 1137, 110, 114, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "I Va", IDOK, 208, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Rinoncî", IDCANCEL, 208, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Aide", 1038, 208, 46, 56, 14, WS_GROUP | WS_TABSTOP CHECKBOX "Rén ki &lere", 1040, 208, 68, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Rexhe" FONT 8, "Helv" { LTEXT "Sicrirece:", 1088, 6, 6, 40, 9 LTEXT "", 1089, 60, 6, 150, 9 GROUPBOX "Cwé rexhe", 1072, 6, 30, 160, 65, BS_GROUPBOX RADIOBUTTON "&Tot", 1056, 16, 45, 60, 12 RADIOBUTTON "Tch&wezî", 1057, 16, 60, 60, 12 RADIOBUTTON "&Pådjes", 1058, 16, 75, 60, 12 DEFPUSHBUTTON "I Va", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Rinoncî", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Apon&tiaedje", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP LTEXT "&Di:", 1090, 60, 80, 30, 9 LTEXT "&A:", 1091, 120, 80, 30, 9 LTEXT "&Cwalité po rexhe:", 1092, 6, 100, 76, 9 COMBOBOX 1136, 80, 100, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP CHECKBOX "Rexhe sol &fitchî", 1040, 20, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Streu scrijhas", 1041, 160, 100, 50, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP } PRINT_SETUP DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 264, 134 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Apontiaedje del rexhe" FONT 8, "Helv" { GROUPBOX "Sicrirece", 1072, 6, 10, 180, 65, BS_GROUPBOX RADIOBUTTON "Sicrirece tchwezi por &vos", 1056, 16, 20, 80, 12 LTEXT "[nole]", 1088, 35, 35, 120, 9 RADIOBUTTON "Sicrirece &specifike", 1057, 16, 50, 80, 12 COMBOBOX 1136, 35, 65, 149, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP DEFPUSHBUTTON "I Va", IDOK, 206, 6, 56, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Rinoncî", IDCANCEL, 206, 24, 56, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "A&pontiaaedje", 1024, 206, 46, 56, 14, WS_GROUP | WS_TABSTOP GROUPBOX "Orientation", 1073, 6, 85, 100, 50, BS_GROUPBOX RADIOBUTTON "D' &Astampé", 1058, 50, 100, 40, 12 RADIOBUTTON "Di &Coûtchî", 1059, 50, 115, 40, 12 ICON "LANDSCAP", 1097, 10, 95, 32, 32 ICON "PORTRAIT", 1098, 10, 95, 32, 32 GROUPBOX "Papî", 1074, 120, 85, 180, 50, BS_GROUPBOX LTEXT "&Grandeu", 1089, 130, 95, 30, 9 LTEXT "Ali&mentåcion", 1090, 130, 110, 30, 9 COMBOBOX 1137, 155, 95, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP COMBOBOX 1138, 155, 110, 92, 68, CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_AUTOHSCROLL | CBS_SORT | CBS_HASSTRINGS | WS_BORDER | WS_VSCROLL | WS_TABSTOP } CHOOSE_FONT DIALOG DISCARDABLE 13, 54, 264, 147 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Fontes" FONT 8, "Helv" { LTEXT "&Fonte:",1088 ,6,3,40,9 COMBOBOX 1136 ,6,13,94,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | CBS_AUTOHSCROLL | CBS_SORT | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "S&tîle del fonte:",1089 ,108,3,44,9 COMBOBOX 1137,108,13,64,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE LTEXT "&Grandeu:",1090,179,3,30,9 COMBOBOX 1138,179,13,32,54, CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_DISABLENOSCROLL | WS_VSCROLL | WS_TABSTOP | CBS_SIMPLE | CBS_SORT DEFPUSHBUTTON "I Va",IDOK,218,6,40,14,WS_GROUP PUSHBUTTON "Rinoncî",IDCANCEL,218,23,40,14,WS_GROUP PUSHBUTTON "&Mete èn Oûve", 1026,218,40,40,14,WS_GROUP PUSHBUTTON "&Aide" , 1038,218,57,40,14,WS_GROUP GROUPBOX "Efets",1072,6,72,84,34,WS_GROUP CHECKBOX "&Barré", 1040, 10,82,50,10, BS_AUTOCHECKBOX | WS_TABSTOP CHECKBOX "&Sorligné", 1041, 10,94,50,10, BS_AUTOCHECKBOX LTEXT "&Coleur:", 1091 ,6,110,30,9 COMBOBOX 1139,6,120,84,100,CBS_DROPDOWNLIST | CBS_OWNERDRAWFIXED | CBS_HASSTRINGS | CBS_AUTOHSCROLL | WS_BORDER | WS_VSCROLL | WS_TABSTOP GROUPBOX "Egzimpe",1073,98,72,160,49,WS_GROUP CTEXT "AaBbYyZzÅåÇçÛû",1093,104,81,149,37,SS_NOPREFIX | WS_VISIBLE } CHOOSE_COLOR DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 300, 200 STYLE WS_CLIPCHILDREN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Coleurs" FONT 8, "Helv" { LTEXT "&Maisse coleurs:", 1088, 4, 4, 140, 10 LTEXT "&Coleurs da vosse:", 1089, 4, 106, 140, 10 LTEXT "Coleur | &Uni", 1090, 150, 151, 48, 10 LTEXT "&Rodje:", 726 /*1094*/,249,126,24,10 EDITTEXT 706, 275,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Vert:",727/*1095*/,249,140,24,10 EDITTEXT 707, 275,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Bleu:",728 /*1096*/,249,154,24,10 EDITTEXT 708, 275,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Tinte:" ,723 /*1091*/,202,126,22,10 EDITTEXT 703, 226,124,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Sat.:" ,724 /*1092*/,202,140,22,10 EDITTEXT 704, 226,138,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "&Lum.:" ,725 /*1093*/,202,154,22,10 EDITTEXT 705, 226,152,18,12, WS_BORDER | WS_GROUP | WS_TABSTOP CONTROL "" ,720,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,14,140,86 CONTROL "" ,721,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP,4,116,140,28 CONTROL "" ,710,"STATIC",WS_BORDER|SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,4,118,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,702,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 278,4,8,116 CONTROL "" ,709,"STATIC",SS_SIMPLE|WS_TABSTOP|WS_GROUP, 152,124,40,26 DEFPUSHBUTTON "I Va", IDOK, 4, 166, 44, 14, BS_DEFPUSHBUTTON | WS_GROUP | WS_TABSTOP PUSHBUTTON "Rinoncî", IDCANCEL, 52, 166, 44, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Aide", 1038,100,166, 44, 14 PUSHBUTTON "Rad&jouter des coleur da vosse", 712/*1024*/, 152, 166, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Defini les coleurs da vosse >>", 719/*1025*/, 4, 150, 142, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&u",713,300,200,4,14 /* just a dummy: 'i' is like &i in "sol&id" */ } FINDDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 236, 62 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Cwerî" FONT 8, "Helv" { LTEXT "C&werî:", -1, 4, 8, 42, 8 EDITTEXT 1152, 47, 7, 128, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Mots &etîrs seulmint", 1040, 4, 26, 100, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Rispecter les &madjuscules/minuscules", 1041, 4, 42, 64, 12, BS_AUTOCHECKBOX | WS_TABSTOP GROUPBOX "Direccion", 1072, 107, 26, 68, 28 CONTROL "&Copete", 1056, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 111, 38, 20, 12 CONTROL "&Bas", 1057, "BUTTON", BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 138, 38, 30, 12 DEFPUSHBUTTON "&Shûvant", IDOK, 182, 5, 50, 14, WS_GROUP | WS_TABSTOP | BS_DEFPUSHBUTTON PUSHBUTTON "Rinoncî",IDCANCEL , 182, 23, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Aide", pshHelp , 182, 45, 50, 14, WS_GROUP | WS_TABSTOP } REPLACEDLGORD DIALOG LOADONCALL MOVEABLE DISCARDABLE 36, 24, 230, 94 STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU CAPTION "Mete el plaece" FONT 8, "Helv" { LTEXT "C&werî:", -1, 4, 9, 48, 8 EDITTEXT 1152, 54, 7, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP LTEXT "Mete el &place:", -1, 4, 26, 48, 8 EDITTEXT 1153, 54, 24, 114, 12, ES_AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP CHECKBOX "Mots &etîrs seulmint", 1040, 5, 46, 104, 12, BS_AUTOCHECKBOX | WS_GROUP | WS_TABSTOP CHECKBOX "Rispecter les &madjuscules/minuscules", 1041, 5, 62, 59, 12, BS_AUTOCHECKBOX | WS_TABSTOP DEFPUSHBUTTON "&Shûvant", IDOK, 174, 4, 50, 14, WS_GROUP | WS_TABSTOP | BS_DEFPUSHBUTTON PUSHBUTTON "&Rimplacer", psh1 , 174, 21, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Rimplacer &tot",psh2, 174, 38, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "Rinoncî",IDCANCEL , 174, 55, 50, 14, WS_GROUP | WS_TABSTOP PUSHBUTTON "&Aide", pshHelp , 174, 75, 50, 14, WS_GROUP | WS_TABSTOP } wine-20000526/dlls/commdlg/cdlg_xx.rc0100644000175000001440000003445707013364140017013 0ustar julliardusers/* * Language neutral resources for Common Dialogs */ #include "winver.h" LANGUAGE LANG_NEUTRAL, SUBLANG_NEUTRAL 1 VERSIONINFO FILEVERSION 4, 0, 0, 950 /* Maybe 4.1.0.980 for win98?? */ PRODUCTVERSION 4, 0, 0, 950 /* id. */ FILEFLAGSMASK VS_FFI_FILEFLAGSMASK FILEOS VOS_DOS_WINDOWS16 FILETYPE VFT_DLL { BLOCK "StringFileInfo" { BLOCK "040604B0" { VALUE "CompanyName", "Wine Developer Team\000" VALUE "FileDescription", "Common Dialog Boxes\000" VALUE "FileVersion", "0.01\000" VALUE "InternalName", "COMDLG32\000" VALUE "LegalCopyright", "Copyright \251 B. A. Stultiens 1998,1999\000" VALUE "OriginalFilename", "COMDLG32.DLL\000" VALUE "ProductName", "Wine\000" VALUE "ProductVersion", "1.00\000" } } /* Do we need this? It isn't a translation, but we have all languages at once... */ /* BLOCK "VarFileInfo" { VALUE "Translation", 1030, 1200 } */ } /* BINRES pd32_collate.ico */ PD32_COLLATE ICON DISCARDABLE LOADONCALL { '00 00 01 00 02 00 20 20 10 00 00 00 00 00 E8 02' '00 00 26 00 00 00 4C 18 10 00 00 00 00 00 48 05' '00 00 0E 03 00 00 28 00 00 00 20 00 00 00 40 00' '00 00 01 00 04 00 00 00 00 00 80 02 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 80 00 00 80 00 00 00 80 80 00 80 00' '00 00 80 00 80 00 80 80 00 00 C0 C0 C0 00 80 80' '80 00 00 00 FF 00 00 FF 00 00 00 FF FF 00 FF 00' '00 00 FF 00 FF 00 FF FF 00 00 FF FF FF 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF 28 00' '00 00 4C 00 00 00 30 00 00 00 01 00 04 00 00 00' '00 00 E0 04 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 80 00 00 80' '00 00 00 80 80 00 80 00 00 00 80 00 80 00 80 80' '00 00 C0 C0 C0 00 80 80 80 00 00 00 FF 00 00 FF' '00 00 00 FF FF 00 FF 00 00 00 FF 00 FF 00 FF FF' '00 00 FF FF FF 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 80 04 00 00' '00 00 00 0F F0 00 00 00 00 00 0F F0 00 00 00 00' '00 00 00 00 00 0F F0 00 00 00 00 00 0F F0 00 00' '00 00 00 00 80 04 00 00 00 00 00 0F FF F0 00 00' '00 0F FF F0 00 00 00 00 00 00 00 00 00 0F FF F0' '00 00 00 0F FF F0 00 00 00 00 00 00 80 04 00 00' '00 00 00 FF FF FF FF 00 00 00 00 F0 00 00 00 00' '00 00 00 00 00 FF FF FF FF 00 00 00 00 F0 00 00' '00 00 00 00 44 03 00 00 00 00 00 FF FF FF FF FF' '00 FF F0 FF 00 00 00 00 00 00 00 00 00 FF FF FF' 'FF FF 00 FF F0 FF 00 00 00 00 00 00 80 04 00 00' '00 00 0F FF FF FF FF FF FF 00 F0 FF 00 00 00 00' '00 00 00 00 0F FF FF FF FF FF FF 00 F0 FF 00 00' '00 00 00 00 04 00 00 00 00 00 0F FF FF FF FF FF' 'FF 0F F0 FF F0 00 00 00 00 00 00 00 0F FF FF FF' 'FF FF FF 0F F0 FF F0 00 00 00 00 00 62 01 00 00' '00 00 0F FF FF FF FF FF FF 0F F0 FF F0 00 00 00' '00 00 00 00 0F FF FF FF FF FF FF 0F F0 FF F0 00' '00 00 00 00 E2 00 00 00 00 00 FF FF FF FF FF FF' 'F0 FF F0 FF F0 00 00 00 00 00 00 00 FF FF FF FF' 'FF FF F0 FF F0 FF F0 00 00 00 00 00 00 A0 00 00' '00 00 FF FF FF FF FF FF F0 FF F0 FF FF 00 00 00' '00 00 00 00 FF FF FF FF FF FF F0 FF F0 FF FF 00' '00 00 00 00 FF FF 00 00 00 0F FF FF FF FF FF FF' '0F FF F0 FF FF 00 00 00 00 00 00 0F FF FF FF FF' 'FF FF 0F FF F0 FF FF 00 00 00 00 00 FF FF 00 00' '00 0F FF FF FF FF FF FF 0F FF F0 FF FF 00 00 00' '00 00 00 0F FF FF FF FF FF FF 0F FF F0 FF FF 00' '00 00 00 00 FF FF 00 00 00 0F FF FF FF FF FF FF' '0F FF F0 F0 0F F0 00 00 00 00 00 0F FF FF FF FF' 'FF FF 0F FF F0 F0 0F F0 00 00 00 00 FF FF 00 00' '00 FF FF FF FF FF FF F0 FF FF F0 0F F0 F0 00 00' '00 00 00 FF FF FF FF FF FF F0 FF FF F0 0F F0 F0' '00 00 00 00 FF FF 00 00 00 FF FF FF FF FF FF F0' 'FF FF F0 FF F0 FF 00 00 00 00 00 FF FF FF FF FF' 'FF F0 FF FF F0 FF F0 FF 00 00 00 00 FF FF 00 00' '00 FF FF FF FF FF 0F F0 FF FF F0 FF 00 0F 00 00' '00 00 00 FF FF FF FF FF 0F F0 FF FF F0 FF 00 0F' '00 00 00 00 FF FF 00 00 0F FF FF FF FF FF 0F 0F' '00 00 F0 FF FF 0F 00 00 00 00 0F FF FF FF FF FF' '0F 0F 00 00 F0 FF FF 0F 00 00 00 00 FF FF 00 00' '0F FF FF FF FF F0 FF 0F F0 FF F0 FF 00 FF F0 00' '00 00 0F FF FF FF FF F0 FF 0F F0 FF F0 FF 00 FF' 'F0 00 00 00 FF FF 00 00 00 0F FF FF F0 F0 F0 FF' 'FF 0F F0 FF F0 00 00 00 00 00 00 0F FF FF F0 F0' 'F0 FF FF 0F F0 FF F0 00 00 00 00 00 FF FF 00 00' '00 00 00 FF FF 00 F0 FF 0F F0 F0 F0 00 00 00 00' '00 00 00 00 00 FF FF 00 F0 FF 0F F0 F0 F0 00 00' '00 00 00 00 FF FF 00 00 00 00 00 00 FF FF 0F FF' '0F F0 F0 00 00 00 00 00 00 00 00 00 00 00 FF FF' '0F FF 0F F0 F0 00 00 00 00 00 00 00 FF FF 00 00' '00 00 00 00 00 0F 0F FF F0 0F F0 00 00 00 00 00' '00 00 00 00 00 00 00 0F 0F FF F0 0F F0 00 00 00' '00 00 00 00 FF FF 00 00 00 00 00 00 0F F0 FF FF' 'FF FF F0 00 00 00 00 00 00 00 00 00 00 00 0F F0' 'FF FF FF FF F0 00 00 00 00 00 00 00 FF FF 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 A0 FF C7 FF 9F FF FC 7F F9 FF F0' '00 00 FF C0 FC 0F FF FC 0F C0 FF F0 00 00 FF C0' '30 0F FF FC 03 00 FF F0 00 00 FF 80 00 0F FF F8' '00 00 FF F0 00 00 FF 80 00 07 FF F8 00 00 7F F0' '00 00 FF 00 00 03 FF F0 00 00 3F F0 00 00 FF 00' '00 03 FF F0 00 00 3F F0 00 00 FF 00 00 03 FF F0' '00 00 3F F0 00 00 FE 00 00 03 FF E0 00 00 3F F0' '00 00 FE 00 00 01 FF E0 00 00 1F F0 00 00 FC 00' '00 01 FF C0 00 00 1F F0 00 00 FC 00 00 00 FF C0' '00 00 0F F0 00 00 FC 00 00 00 FF C0 00 00 0F F0' '00 00 F8 00 00 00 FF 80 00 00 0F F0 00 00 F8 00' '00 00 7F 80 00 00 07 F0 00 00 F8 00 00 00 7F 80' '00 00 07 F0 00 00 F0 00 00 00 7F 00 00 00 07 F0' '00 00 F0 00 00 00 3F 00 00 00 03 F0 00 00 F8 00' '00 00 7F 80 00 00 07 F0 00 00 FF 00 00 07 FF F0' '00 00 7F F0 00 00 FF C0 00 1F FF FC 00 01 FF F0' '00 00 FF F0 00 3F FF FF 00 03 FF F0 00 00 FF F0' '00 3F FF FF 00 03 FF F0 00 00 FF F0 00 3F FF FF' '00 03 FF F0 00 00' } /* BINRES pd32_nocollate.ico */ PD32_NOCOLLATE ICON { '00 00 01 00 02 00 20 20 10 00 00 00 00 00 E8 02' '00 00 26 00 00 00 4C 18 10 00 00 00 00 00 48 05' '00 00 0E 03 00 00 28 00 00 00 20 00 00 00 40 00' '00 00 01 00 04 00 00 00 00 00 80 02 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 80 00 00 80 00 00 00 80 80 00 80 00' '00 00 80 00 80 00 80 80 00 00 C0 C0 C0 00 80 80' '80 00 00 00 FF 00 00 FF 00 00 00 FF FF 00 FF 00' '00 00 FF 00 FF 00 FF FF 00 00 FF FF FF 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF 28 00' '00 00 4C 00 00 00 30 00 00 00 01 00 04 00 00 00' '00 00 E0 04 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 80 00 00 80' '00 00 00 80 80 00 80 00 00 00 80 00 80 00 80 80' '00 00 C0 C0 C0 00 80 80 80 00 00 00 FF 00 00 FF' '00 00 00 FF FF 00 FF 00 00 00 FF 00 FF 00 FF FF' '00 00 FF FF FF 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 FA 02 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 AD 81 00 FF FF FF FF FF FF 00 00 00' '00 00 00 00 FF FF FF FF FF FF 00 00 00 00 00 00' '00 FF FF FF FF FF FF 00 00 00 00 00 13 00 00 FF' 'FF FF FF FF FF 00 00 00 00 00 00 00 FF FF FF FF' 'FF FF 00 00 00 00 00 00 00 FF FF FF FF FF FF 00' '00 00 00 00 32 04 00 FF FF FF FF FF FF 00 00 00' '00 00 00 00 FF FF FF FF FF FF 0F 00 00 00 00 00' '00 FF FF FF FF FF FF 0F 00 00 00 00 02 00 00 FF' 'FF FF FF FF FF 0F 00 00 00 00 00 00 FF FF FF FF' 'FF FF 0F 00 00 00 00 00 00 FF FF FF FF FF FF 0F' '00 00 00 00 56 01 00 FF FF FF FF FF FF 0F F0 00' '00 00 00 00 FF FF FF FF FF FF 0F F0 00 00 00 00' '00 FF FF FF FF FF FF 0F F0 00 00 00 4D 04 00 FF' 'FF FF FF FF FF 0F F0 00 00 00 00 00 FF FF FF FF' 'FF FF 0F F0 00 00 00 00 00 FF FF FF FF FF FF 0F' 'F0 00 00 00 02 00 00 FF FF FF FF FF FF 0F FF 00' '00 00 00 00 FF FF FF FF FF FF 0F FF 00 00 00 00' '00 FF FF FF FF FF FF 0F FF 00 00 00 62 01 00 FF' 'FF FF FF FF FF 0F FF 00 00 00 00 00 FF FF FF FF' 'FF FF 0F FF 00 00 00 00 00 FF FF FF FF FF FF 0F' 'FF 00 00 00 4D 04 00 FF FF FF FF FF FF 0F FF F0' '00 00 00 00 FF FF FF FF FF FF 0F FF F0 00 00 00' '00 FF FF FF FF FF FF 0F FF F0 00 00 02 00 00 FF' 'FF FF FF FF FF 0F FF F0 00 00 00 00 FF FF FF FF' 'FF FF 0F FF 00 00 00 00 00 FF FF FF FF FF FF 0F' 'FF F0 00 00 62 01 00 FF FF FF FF FF FF 0F F0 FF' '00 00 00 00 FF FF FF FF FF FF 0F 00 0F 00 00 00' '00 FF FF FF FF FF FF 0F 00 FF 00 00 00 00 00 FF' 'FF FF FF FF FF 0F F0 FF 00 00 00 00 FF FF FF FF' 'FF FF 00 0F FF 00 00 00 00 FF FF FF FF FF FF 00' 'FF 0F 00 00 02 00 00 FF FF FF FF F0 FF 0F FF 0F' 'F0 00 00 00 FF FF FF F0 00 0F 0F 00 0F F0 00 00' '00 FF FF FF FF 00 FF 0F F0 0F F0 00 62 01 00 FF' 'FF FF FF F0 FF 0F FF F0 FF 00 00 00 FF FF FF F0' 'FF FF 0F FF F0 F0 00 00 00 FF FF FF F0 FF 0F 0F' '0F 0F F0 00 00 00 00 FF FF FF FF F0 FF 0F FF 00' 'FF 00 00 00 FF FF FF FF 0F FF 0F FF F0 FF 00 00' '00 FF FF FF FF FF 0F 0F FF F0 FF 00 02 00 00 FF' 'FF FF FF F0 FF 0F FF FF 00 00 00 00 FF FF FF FF' 'F0 FF 0F F0 0F F0 00 00 00 FF FF FF FF F0 FF 0F' 'F0 0F F0 00 C4 00 00 FF FF FF FF F0 FF 0F FF F0' '00 00 00 00 FF FF FF F0 FF 0F 0F FF FF 00 00 00' '00 FF FF FF F0 FF 0F 0F FF FF 00 00 32 04 00 FF' 'FF FF FF 00 FF 0F FF 00 00 00 00 00 FF FF FF FF' '00 FF 0F FF 00 00 00 00 00 FF FF FF FF 00 FF 0F' 'FF 00 00 00 02 00 00 FF FF FF FF FF FF 0F 00 00' '00 00 00 00 FF FF FF FF FF FF 0F 00 00 00 00 00' '00 FF FF FF FF FF FF 0F 00 00 00 00 FF 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 0F F0 00 00 00' '00 00 00 00 00 00 00 00 0F F0 00 00 00 00 00 00' '00 00 00 00 00 0F F0 00 00 00 00 00 AD 81 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 FF 07 FF F3 FF FF FC FF FF FF 3F F0' '0F FF 80 01 FF E0 00 7F F8 00 1F F0 00 00 80 01' 'FF E0 00 3F F8 00 0F FF FF FF 80 00 FF E0 00 3F' 'F8 00 0F F0 00 00 80 00 FF E0 00 1F F8 00 07 FF' 'F0 FF 80 00 7F E0 00 1F F8 00 07 F0 00 00 80 00' '3F E0 00 0F F8 00 03 FF F0 00 80 00 3F E0 00 0F' 'F8 00 03 FF FF FF 80 00 1F E0 00 07 F8 00 01 F0' 'E2 00 80 00 1F E0 00 07 F8 00 01 FF F0 FF 80 00' '0F E0 00 03 F8 00 00 F0 FF FF 80 00 0F E0 00 03' 'F8 00 00 F0 00 00 80 00 07 E0 00 01 F8 00 00 7F' 'FF FF 80 00 07 E0 00 01 F8 00 00 70 00 00 80 00' '03 E0 00 00 F8 00 00 3F F0 FF 80 00 01 E0 00 00' 'F8 00 00 30 00 0F 80 00 01 E0 00 00 78 00 00 1F' 'FF 00 80 00 03 E0 00 00 78 00 00 1F FF FF 80 00' '0F E0 00 01 F8 00 00 70 FF FF 80 00 1F E0 00 03' 'F8 00 00 FF 0F FF 80 00 3F E0 00 0F F8 00 03 FF' 'FF FF 80 00 FF E0 00 3F F8 00 0F F0 00 00 FF C3' 'FF FF F0 FF FF FC 3F FF FF FF FF E7 FF FF F9 FF' 'FF FE 7F F0 00 00' } wine-20000526/dlls/commdlg/colordlg.c0100644000175000001440000012673207112356533017013 0ustar julliardusers/* * COMMDLG - Color Dialog * * Copyright 1994 Martin Ayotte * Copyright 1996 Albrecht Kleine */ #include #include #include #include #include "windef.h" #include "winbase.h" #include "wingdi.h" #include "wine/winbase16.h" #include "wine/winuser16.h" #include "ldt.h" #include "heap.h" #include "commdlg.h" #include "dialog.h" #include "dlgs.h" #include "module.h" #include "debugtools.h" #include "winproc.h" #include "cderr.h" DEFAULT_DEBUG_CHANNEL(commdlg); #include "cdlg.h" static LRESULT WINAPI ColorDlgProc( HWND hWnd, UINT wMsg, WPARAM wParam, LPARAM lParam ); #define CONV_POINTSTOPOINT( ps, p ) \ ((p)->x = (LONG)(ps)->x, (p)->y = (LONG)(ps)->y) static const COLORREF predefcolors[6][8]= { { 0x008080FFL, 0x0080FFFFL, 0x0080FF80L, 0x0080FF00L, 0x00FFFF80L, 0x00FF8000L, 0x00C080FFL, 0x00FF80FFL }, { 0x000000FFL, 0x0000FFFFL, 0x0000FF80L, 0x0040FF00L, 0x00FFFF00L, 0x00C08000L, 0x00C08080L, 0x00FF00FFL }, { 0x00404080L, 0x004080FFL, 0x0000FF00L, 0x00808000L, 0x00804000L, 0x00FF8080L, 0x00400080L, 0x008000FFL }, { 0x00000080L, 0x000080FFL, 0x00008000L, 0x00408000L, 0x00FF0000L, 0x00A00000L, 0x00800080L, 0x00FF0080L }, { 0x00000040L, 0x00004080L, 0x00004000L, 0x00404000L, 0x00800000L, 0x00400000L, 0x00400040L, 0x00800040L }, { 0x00000000L, 0x00008080L, 0x00408080L, 0x00808080L, 0x00808040L, 0x00C0C0C0L, 0x00400040L, 0x00FFFFFFL }, }; struct CCPRIVATE { LPCHOOSECOLORW lpcc; /* points to public known data structure */ LPCHOOSECOLOR16 lpcc16; /* save the 16 bits pointer */ int nextuserdef; /* next free place in user defined color array */ HDC hdcMem; /* color graph used for BitBlt() */ HBITMAP hbmMem; /* color graph bitmap */ RECT fullsize; /* original dialog window size */ UINT msetrgb; /* # of SETRGBSTRING message (today not used) */ RECT old3angle; /* last position of l-marker */ RECT oldcross; /* last position of color/satuation marker */ BOOL updating; /* to prevent recursive WM_COMMAND/EN_UPDATE procesing */ int h; int s; int l; /* for temporary storing of hue,sat,lum */ int capturedGraph; /* control mouse captured */ }; /*********************************************************************** * CC_HSLtoRGB [internal] */ static int CC_HSLtoRGB(char c, int hue, int sat, int lum) { int res = 0, maxrgb; /* hue */ switch(c) { case 'R': if (hue > 80) hue -= 80; else hue += 160; break; case 'G': if (hue > 160) hue -= 160; else hue += 80; break; case 'B': break; } /* l below 120 */ maxrgb = (256 * min(120,lum)) / 120; /* 0 .. 256 */ if (hue < 80) res = 0; else if (hue < 120) { res = (hue - 80) * maxrgb; /* 0...10240 */ res /= 40; /* 0...256 */ } else if (hue < 200) res = maxrgb; else { res= (240 - hue) * maxrgb; res /= 40; } res = res - maxrgb / 2; /* -128...128 */ /* saturation */ res = maxrgb / 2 + (sat * res) / 240; /* 0..256 */ /* lum above 120 */ if (lum > 120 && res < 256) res += ((lum - 120) * (256 - res)) / 120; return min(res, 255); } /*********************************************************************** * CC_RGBtoHSL [internal] */ static int CC_RGBtoHSL(char c, int r, int g, int b) { WORD maxi, mini, mmsum, mmdif, result = 0; int iresult = 0; maxi = max(r, b); maxi = max(maxi, g); mini = min(r, b); mini = min(mini, g); mmsum = maxi + mini; mmdif = maxi - mini; switch(c) { /* lum */ case 'L': mmsum *= 120; /* 0...61200=(255+255)*120 */ result = mmsum / 255; /* 0...240 */ break; /* saturation */ case 'S': if (!mmsum) result = 0; else if (!mini || maxi == 255) result = 240; else { result = mmdif * 240; /* 0...61200=255*240 */ result /= (mmsum > 255 ? mmsum = 510 - mmsum : mmsum); /* 0..255 */ } break; /* hue */ case 'H': if (!mmdif) result = 160; else { if (maxi == r) { iresult = 40 * (g - b); /* -10200 ... 10200 */ iresult /= (int) mmdif; /* -40 .. 40 */ if (iresult < 0) iresult += 240; /* 0..40 and 200..240 */ } else if (maxi == g) { iresult = 40 * (b - r); iresult /= (int) mmdif; iresult += 80; /* 40 .. 120 */ } else if (maxi == b) { iresult = 40 * (r - g); iresult /= (int) mmdif; iresult += 160; /* 120 .. 200 */ } result = iresult; } break; } return result; /* is this integer arithmetic precise enough ? */ } #define DISTANCE 4 /*********************************************************************** * CC_MouseCheckPredefColorArray [internal] * returns 1 if one of the predefined colors is clicked * the choosen color is returned in *cr */ static int CC_MouseCheckPredefColorArray( HWND hDlg, int dlgitem, int rows, int cols, LPARAM lParam, COLORREF *cr ) { HWND hwnd; POINT point; RECT rect; int dx, dy, x, y; CONV_POINTSTOPOINT(&(MAKEPOINTS(lParam)) , &point); ClientToScreen(hDlg, &point); hwnd = GetDlgItem(hDlg, dlgitem); GetWindowRect(hwnd, &rect); if (PtInRect(&rect, point)) { dx = (rect.right - rect.left) / cols; dy = (rect.bottom - rect.top) / rows; ScreenToClient(hwnd, &point); if (point.x % dx < ( dx - DISTANCE) && point.y % dy < ( dy - DISTANCE)) { x = point.x / dx; y = point.y / dy; *cr = predefcolors[y][x]; /* FIXME: Draw_a_Focus_Rect() */ return 1; } } return 0; } /*********************************************************************** * CC_MouseCheckUserColorArray [internal] * return 1 if the user clicked a color (returned in *cr) */ static int CC_MouseCheckUserColorArray( HWND hDlg, int dlgitem, int rows, int cols, LPARAM lParam, COLORREF *cr, COLORREF*crarr ) { HWND hwnd; POINT point; RECT rect; int dx, dy, x, y; CONV_POINTSTOPOINT(&(MAKEPOINTS(lParam)), &point); ClientToScreen(hDlg, &point); hwnd=GetDlgItem(hDlg, dlgitem); GetWindowRect(hwnd, &rect); if (PtInRect(&rect, point)) { dx = (rect.right - rect.left) / cols; dy = (rect.bottom - rect.top) / rows; ScreenToClient(hwnd, &point); if (point.x % dx < (dx - DISTANCE) && point.y % dy < (dy - DISTANCE)) { x = point.x / dx; y = point.y / dy; *cr = crarr[x+cols*y]; /* FIXME: Draw_a_Focus_Rect() */ return 1; } } return 0; } #define MAXVERT 240 #define MAXHORI 239 /* 240 ^...... ^^ 240 | . || SAT | . || LUM | . || +-----> 239 ---- HUE */ /*********************************************************************** * CC_MouseCheckColorGraph [internal] */ static int CC_MouseCheckColorGraph( HWND hDlg, int dlgitem, int *hori, int *vert, LPARAM lParam ) { HWND hwnd; POINT point; RECT rect; long x,y; CONV_POINTSTOPOINT(&(MAKEPOINTS(lParam)), &point); ClientToScreen(hDlg, &point); hwnd = GetDlgItem( hDlg, dlgitem ); GetWindowRect(hwnd, &rect); if (PtInRect(&rect, point)) { GetClientRect(hwnd, &rect); ScreenToClient(hwnd, &point); x = (long) point.x * MAXHORI; x /= rect.right; y = (long) (rect.bottom - point.y) * MAXVERT; y /= rect.bottom; if (hori) *hori = x; if (vert) *vert = y; return 1; } else return 0; } /*********************************************************************** * CC_MouseCheckResultWindow [internal] * test if double click one of the result colors */ static int CC_MouseCheckResultWindow( HWND hDlg, LPARAM lParam ) { HWND hwnd; POINT point; RECT rect; CONV_POINTSTOPOINT(&(MAKEPOINTS(lParam)), &point); ClientToScreen(hDlg, &point); hwnd = GetDlgItem(hDlg, 0x2c5); GetWindowRect(hwnd, &rect); if (PtInRect(&rect, point)) { PostMessageA(hDlg, WM_COMMAND, 0x2c9, 0); return 1; } return 0; } /*********************************************************************** * CC_CheckDigitsInEdit [internal] */ static int CC_CheckDigitsInEdit( HWND hwnd, int maxval ) { int i, k, m, result, value; long editpos; char buffer[30]; GetWindowTextA(hwnd, buffer, sizeof(buffer)); m = strlen(buffer); result = 0; for (i = 0 ; i < m ; i++) if (buffer[i] < '0' || buffer[i] > '9') { for (k = i + 1; k <= m; k++) /* delete bad character */ { buffer[i] = buffer[k]; m--; } buffer[m] = 0; result = 1; } value = atoi(buffer); if (value > maxval) /* build a new string */ { sprintf(buffer, "%d", maxval); result = 2; } if (result) { editpos = SendMessageA(hwnd, EM_GETSEL, 0, 0); SetWindowTextA(hwnd, buffer ); SendMessageA(hwnd, EM_SETSEL, 0, editpos); } return value; } /*********************************************************************** * CC_PaintSelectedColor [internal] */ static void CC_PaintSelectedColor( HWND hDlg, COLORREF cr ) { RECT rect; HDC hdc; HBRUSH hBrush; HWND hwnd = GetDlgItem(hDlg, 0x2c5); if (IsWindowVisible( GetDlgItem(hDlg, 0x2c6) )) /* if full size */ { hdc = GetDC(hwnd); GetClientRect(hwnd, &rect) ; hBrush = CreateSolidBrush(cr); if (hBrush) { hBrush = SelectObject(hdc, hBrush) ; Rectangle(hdc, rect.left, rect.top, rect.right/2, rect.bottom); DeleteObject ( SelectObject(hdc, hBrush) ) ; hBrush = CreateSolidBrush( GetNearestColor(hdc, cr) ); if (hBrush) { hBrush = SelectObject(hdc, hBrush) ; Rectangle(hdc, rect.right/2-1, rect.top, rect.right, rect.bottom); DeleteObject(SelectObject(hdc, hBrush)) ; } } ReleaseDC(hwnd, hdc); } } /*********************************************************************** * CC_PaintTriangle [internal] */ static void CC_PaintTriangle( HWND hDlg, int y) { HDC hDC; long temp; int w = GetDialogBaseUnits(); POINT points[3]; int height; int oben; RECT rect; HWND hwnd = GetDlgItem(hDlg, 0x2be); struct CCPRIVATE *lpp = (struct CCPRIVATE *)GetWindowLongA( hDlg, DWL_USER); if (IsWindowVisible( GetDlgItem(hDlg, 0x2c6))) /* if full size */ { GetClientRect(hwnd, &rect); height = rect.bottom; hDC = GetDC(hDlg); points[0].y = rect.top; points[0].x = rect.right; /* | /| */ ClientToScreen(hwnd, points); /* | / | */ ScreenToClient(hDlg, points); /* |< | */ oben = points[0].y; /* | \ | */ /* | \| */ temp = (long)height * (long)y; points[0].y = oben + height - temp / (long)MAXVERT; points[1].y = points[0].y + w; points[2].y = points[0].y - w; points[2].x = points[1].x = points[0].x + w; FillRect(hDC, &lpp->old3angle, GetClassLongA( hwnd, GCL_HBRBACKGROUND)); lpp->old3angle.left = points[0].x; lpp->old3angle.right = points[1].x + 1; lpp->old3angle.top = points[2].y - 1; lpp->old3angle.bottom= points[1].y + 1; Polygon(hDC, points, 3); ReleaseDC(hDlg, hDC); } } /*********************************************************************** * CC_PaintCross [internal] */ static void CC_PaintCross( HWND hDlg, int x, int y) { HDC hDC; int w = GetDialogBaseUnits(); HWND hwnd = GetDlgItem(hDlg, 0x2c6); struct CCPRIVATE * lpp = (struct CCPRIVATE *)GetWindowLongA( hDlg, DWL_USER ); RECT rect; POINT point, p; HPEN hPen; if (IsWindowVisible( GetDlgItem(hDlg, 0x2c6) )) /* if full size */ { GetClientRect(hwnd, &rect); hDC = GetDC(hwnd); SelectClipRgn( hDC, CreateRectRgnIndirect(&rect)); hPen = CreatePen(PS_SOLID, 2, 0); hPen = SelectObject(hDC, hPen); point.x = ((long)rect.right * (long)x) / (long)MAXHORI; point.y = rect.bottom - ((long)rect.bottom * (long)y) / (long)MAXVERT; if ( lpp->oldcross.left != lpp->oldcross.right ) BitBlt(hDC, lpp->oldcross.left, lpp->oldcross.top, lpp->oldcross.right - lpp->oldcross.left, lpp->oldcross.bottom - lpp->oldcross.top, lpp->hdcMem, lpp->oldcross.left, lpp->oldcross.top, SRCCOPY); lpp->oldcross.left = point.x - w - 1; lpp->oldcross.right = point.x + w + 1; lpp->oldcross.top = point.y - w - 1; lpp->oldcross.bottom = point.y + w + 1; MoveToEx(hDC, point.x - w, point.y, &p); LineTo(hDC, point.x + w, point.y); MoveToEx(hDC, point.x, point.y - w, &p); LineTo(hDC, point.x, point.y + w); DeleteObject( SelectObject(hDC, hPen)) ; ReleaseDC(hwnd, hDC); } } #define XSTEPS 48 #define YSTEPS 24 /*********************************************************************** * CC_PrepareColorGraph [internal] */ static void CC_PrepareColorGraph( HWND hDlg ) { int sdif, hdif, xdif, ydif, r, g, b, hue, sat; HWND hwnd = GetDlgItem(hDlg, 0x2c6); struct CCPRIVATE * lpp = (struct CCPRIVATE *)GetWindowLongA(hDlg, DWL_USER); HBRUSH hbrush; HDC hdc ; RECT rect, client; HCURSOR hcursor = SetCursor( LoadCursorA(0, IDC_WAITA) ); GetClientRect(hwnd, &client); hdc = GetDC(hwnd); lpp->hdcMem = CreateCompatibleDC(hdc); lpp->hbmMem = CreateCompatibleBitmap(hdc, client.right, client.bottom); SelectObject(lpp->hdcMem, lpp->hbmMem); xdif = client.right / XSTEPS; ydif = client.bottom / YSTEPS+1; hdif = 239 / XSTEPS; sdif = 240 / YSTEPS; for (rect.left = hue = 0; hue < 239 + hdif; hue += hdif) { rect.right = rect.left + xdif; rect.bottom = client.bottom; for(sat = 0; sat < 240 + sdif; sat += sdif) { rect.top = rect.bottom - ydif; r = CC_HSLtoRGB('R', hue, sat, 120); g = CC_HSLtoRGB('G', hue, sat, 120); b = CC_HSLtoRGB('B', hue, sat, 120); hbrush = CreateSolidBrush( RGB(r, g, b)); FillRect(lpp->hdcMem, &rect, hbrush); DeleteObject(hbrush); rect.bottom = rect.top; } rect.left = rect.right; } ReleaseDC(hwnd, hdc); SetCursor(hcursor); } /*********************************************************************** * CC_PaintColorGraph [internal] */ static void CC_PaintColorGraph( HWND hDlg ) { HWND hwnd = GetDlgItem( hDlg, 0x2c6 ); struct CCPRIVATE * lpp = (struct CCPRIVATE *)GetWindowLongA(hDlg, DWL_USER); HDC hDC; RECT rect; if (IsWindowVisible(hwnd)) /* if full size */ { if (!lpp->hdcMem) CC_PrepareColorGraph(hDlg); /* should not be necessary */ hDC = GetDC(hwnd); GetClientRect(hwnd, &rect); if (lpp->hdcMem) BitBlt(hDC, 0, 0, rect.right, rect.bottom, lpp->hdcMem, 0, 0, SRCCOPY); else WARN("choose color: hdcMem is not defined\n"); ReleaseDC(hwnd, hDC); } } /*********************************************************************** * CC_PaintLumBar [internal] */ static void CC_PaintLumBar( HWND hDlg, int hue, int sat ) { HWND hwnd = GetDlgItem(hDlg, 0x2be); RECT rect, client; int lum, ldif, ydif, r, g, b; HBRUSH hbrush; HDC hDC; if (IsWindowVisible(hwnd)) { hDC = GetDC(hwnd); GetClientRect(hwnd, &client); rect = client; ldif = 240 / YSTEPS; ydif = client.bottom / YSTEPS+1; for (lum = 0; lum < 240 + ldif; lum += ldif) { rect.top = max(0, rect.bottom - ydif); r = CC_HSLtoRGB('R', hue, sat, lum); g = CC_HSLtoRGB('G', hue, sat, lum); b = CC_HSLtoRGB('B', hue, sat, lum); hbrush = CreateSolidBrush( RGB(r, g, b) ); FillRect(hDC, &rect, hbrush); DeleteObject(hbrush); rect.bottom = rect.top; } GetClientRect(hwnd, &rect); FrameRect(hDC, &rect, GetStockObject(BLACK_BRUSH) ); ReleaseDC(hwnd, hDC); } } /*********************************************************************** * CC_EditSetRGB [internal] */ static void CC_EditSetRGB( HWND hDlg, COLORREF cr ) { char buffer[10]; struct CCPRIVATE * lpp = (struct CCPRIVATE *)GetWindowLongA(hDlg, DWL_USER); int r = GetRValue(cr); int g = GetGValue(cr); int b = GetBValue(cr); if (IsWindowVisible( GetDlgItem(hDlg, 0x2c6) )) /* if full size */ { lpp->updating = TRUE; sprintf(buffer, "%d", r); SetWindowTextA( GetDlgItem(hDlg, 0x2c2), buffer); sprintf(buffer, "%d", g); SetWindowTextA( GetDlgItem(hDlg, 0x2c3), buffer); sprintf( buffer, "%d", b ); SetWindowTextA( GetDlgItem(hDlg, 0x2c4),buffer); lpp->updating = FALSE; } } /*********************************************************************** * CC_EditSetHSL [internal] */ static void CC_EditSetHSL( HWND hDlg, int h, int s, int l ) { char buffer[10]; struct CCPRIVATE * lpp = (struct CCPRIVATE *)GetWindowLongA(hDlg, DWL_USER); lpp->updating = TRUE; if (IsWindowVisible( GetDlgItem(hDlg, 0x2c6) )) /* if full size */ { lpp->updating = TRUE; sprintf(buffer, "%d", h); SetWindowTextA( GetDlgItem(hDlg, 0x2bf), buffer); sprintf(buffer, "%d", s); SetWindowTextA( GetDlgItem(hDlg, 0x2c0), buffer); sprintf(buffer, "%d", l); SetWindowTextA( GetDlgItem(hDlg, 0x2c1), buffer); lpp->updating = FALSE; } CC_PaintLumBar(hDlg, h, s); } /*********************************************************************** * CC_SwitchToFullSize [internal] */ static void CC_SwitchToFullSize( HWND hDlg, COLORREF result, LPRECT lprect ) { int i; struct CCPRIVATE * lpp = (struct CCPRIVATE *)GetWindowLongA(hDlg, DWL_USER); EnableWindow( GetDlgItem(hDlg, 0x2cf), FALSE); CC_PrepareColorGraph(hDlg); for (i = 0x2bf; i < 0x2c5; i++) ShowWindow( GetDlgItem(hDlg, i), SW_SHOW); for (i = 0x2d3; i < 0x2d9; i++) ShowWindow( GetDlgItem(hDlg, i), SW_SHOW); ShowWindow( GetDlgItem(hDlg, 0x2c9), SW_SHOW); ShowWindow( GetDlgItem(hDlg, 0x2c8), SW_SHOW); ShowWindow( GetDlgItem(hDlg, 1090), SW_SHOW); if (lprect) SetWindowPos(hDlg, 0, 0, 0, lprect->right-lprect->left, lprect->bottom-lprect->top, SWP_NOMOVE|SWP_NOZORDER); ShowWindow( GetDlgItem(hDlg, 0x2be), SW_SHOW); ShowWindow( GetDlgItem(hDlg, 0x2c5), SW_SHOW); CC_EditSetRGB(hDlg, result); CC_EditSetHSL(hDlg, lpp->h, lpp->s, lpp->l); ShowWindow( GetDlgItem( hDlg, 0x2c6), SW_SHOW); UpdateWindow( GetDlgItem(hDlg, 0x2c6) ); } /*********************************************************************** * CC_PaintPredefColorArray [internal] * Paints the default standard 48 colors */ static void CC_PaintPredefColorArray( HWND hDlg, int rows, int cols) { HWND hwnd = GetDlgItem(hDlg, 0x2d0); RECT rect; HDC hdc; HBRUSH hBrush; int dx, dy, i, j, k; GetClientRect(hwnd, &rect); dx = rect.right / cols; dy = rect.bottom / rows; k = rect.left; hdc = GetDC(hwnd); GetClientRect(hwnd, &rect); FillRect(hdc, &rect, GetClassLongA(hwnd, GCL_HBRBACKGROUND)); for ( j = 0; j < rows; j++ ) { for ( i = 0; i < cols; i++ ) { hBrush = CreateSolidBrush(predefcolors[j][i]); if (hBrush) { hBrush = SelectObject(hdc, hBrush); Rectangle(hdc, rect.left, rect.top, rect.left + dx - DISTANCE, rect.top + dy - DISTANCE); rect.left = rect.left + dx; DeleteObject(SelectObject(hdc, hBrush)) ; } } rect.top = rect.top + dy; rect.left = k; } ReleaseDC(hwnd, hdc); /* FIXME: draw_a_focus_rect */ } /*********************************************************************** * CC_PaintUserColorArray [internal] * Paint the 16 user-selected colors */ static void CC_PaintUserColorArray( HWND hDlg, int rows, int cols, COLORREF* lpcr ) { HWND hwnd = GetDlgItem(hDlg, 0x2d1); RECT rect; HDC hdc; HBRUSH hBrush; int dx, dy, i, j, k; GetClientRect(hwnd, &rect); dx = rect.right / cols; dy = rect.bottom / rows; k = rect.left; hdc = GetDC(hwnd); if (hdc) { FillRect(hdc, &rect, GetClassLongA(hwnd, GCL_HBRBACKGROUND) ); for (j = 0; j < rows; j++) { for (i = 0; i < cols; i++) { hBrush = CreateSolidBrush(lpcr[i+j*cols]); if (hBrush) { hBrush = SelectObject(hdc, hBrush) ; Rectangle(hdc, rect.left, rect.top, rect.left + dx - DISTANCE, rect.top + dy - DISTANCE); rect.left = rect.left + dx; DeleteObject( SelectObject(hdc, hBrush) ) ; } } rect.top = rect.top + dy; rect.left = k; } ReleaseDC(hwnd, hdc); } /* FIXME: draw_a_focus_rect */ } /*********************************************************************** * CC_HookCallChk [internal] */ static BOOL CC_HookCallChk( LPCHOOSECOLORW lpcc ) { if (lpcc) if(lpcc->Flags & CC_ENABLEHOOK) if (lpcc->lpfnHook) return TRUE; return FALSE; } /*********************************************************************** * CC_WMInitDialog [internal] */ static LONG CC_WMInitDialog( HWND hDlg, WPARAM wParam, LPARAM lParam, BOOL b16 ) { int i, res; int r, g, b; HWND hwnd; RECT rect; POINT point; struct CCPRIVATE * lpp; TRACE("WM_INITDIALOG lParam=%08lX\n", lParam); lpp = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(struct CCPRIVATE) ); if (b16) { CHOOSECOLORW *ch32; CHOOSECOLOR16 *ch16 = (CHOOSECOLOR16 *) lParam; ch32 = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CHOOSECOLORW) ); lpp->lpcc = ch32; lpp->lpcc16 = ch16; if (lpp->lpcc16->lStructSize != sizeof(CHOOSECOLOR16) ) { EndDialog (hDlg, 0) ; return FALSE; } ch32->lStructSize = sizeof(CHOOSECOLORW); ch32->hwndOwner = ch16->hwndOwner; ch32->hInstance = ch16->hInstance; ch32->lpCustColors = PTR_SEG_TO_LIN(ch16->lpCustColors); ch32->lpfnHook = (LPCCHOOKPROC) ch16->lpfnHook; /* only used as flag */ ch32->Flags = ch16->Flags; } else lpp->lpcc = (LPCHOOSECOLORW) lParam; if (lpp->lpcc->lStructSize != sizeof(CHOOSECOLORW) ) { EndDialog (hDlg, 0) ; return FALSE; } SetWindowLongA(hDlg, DWL_USER, (LONG)lpp); if (!(lpp->lpcc->Flags & CC_SHOWHELP)) ShowWindow( GetDlgItem(hDlg,0x40e), SW_HIDE); lpp->msetrgb = RegisterWindowMessageA(SETRGBSTRING); #if 0 cpos = MAKELONG(5,7); /* init */ if (lpp->lpcc->Flags & CC_RGBINIT) { for (i = 0; i < 6; i++) for (j = 0; j < 8; j++) if (predefcolors[i][j] == lpp->lpcc->rgbResult) { cpos = MAKELONG(i,j); goto found; } } found: /* FIXME: Draw_a_focus_rect & set_init_values */ #endif GetWindowRect(hDlg, &lpp->fullsize); if (lpp->lpcc->Flags & CC_FULLOPEN || lpp->lpcc->Flags & CC_PREVENTFULLOPEN) { hwnd = GetDlgItem(hDlg, 0x2cf); EnableWindow(hwnd, FALSE); } if (!(lpp->lpcc->Flags & CC_FULLOPEN ) || lpp->lpcc->Flags & CC_PREVENTFULLOPEN) { rect = lpp->fullsize; res = rect.bottom - rect.top; hwnd = GetDlgItem(hDlg, 0x2c6); /* cut at left border */ point.x = point.y = 0; ClientToScreen(hwnd, &point); ScreenToClient(hDlg,&point); GetClientRect(hDlg, &rect); point.x += GetSystemMetrics(SM_CXDLGFRAME); SetWindowPos(hDlg, 0, 0, 0, point.x, res, SWP_NOMOVE|SWP_NOZORDER); for (i = 0x2bf; i < 0x2c5; i++) ShowWindow( GetDlgItem(hDlg, i), SW_HIDE); for (i = 0x2d3; i < 0x2d9; i++) ShowWindow( GetDlgItem(hDlg, i), SW_HIDE); ShowWindow( GetDlgItem(hDlg, 0x2c9), SW_HIDE); ShowWindow( GetDlgItem(hDlg, 0x2c8), SW_HIDE); ShowWindow( GetDlgItem(hDlg, 0x2c6), SW_HIDE); ShowWindow( GetDlgItem(hDlg, 0x2c5), SW_HIDE); ShowWindow( GetDlgItem(hDlg, 1090 ), SW_HIDE); } else CC_SwitchToFullSize(hDlg, lpp->lpcc->rgbResult, NULL); res=TRUE; for (i = 0x2bf; i < 0x2c5; i++) SendMessageA( GetDlgItem(hDlg, i), EM_LIMITTEXT, 3, 0); /* max 3 digits: xyz */ if (CC_HookCallChk(lpp->lpcc)) { if (b16) res = CallWindowProc16( (WNDPROC16)lpp->lpcc16->lpfnHook, hDlg, WM_INITDIALOG, wParam, lParam); else res = CallWindowProcA( (WNDPROC)lpp->lpcc->lpfnHook, hDlg, WM_INITDIALOG, wParam, lParam); } /* Set the initial values of the color chooser dialog */ r = GetRValue(lpp->lpcc->rgbResult); g = GetGValue(lpp->lpcc->rgbResult); b = GetBValue(lpp->lpcc->rgbResult); CC_PaintSelectedColor(hDlg, lpp->lpcc->rgbResult); lpp->h = CC_RGBtoHSL('H', r, g, b); lpp->s = CC_RGBtoHSL('S', r, g, b); lpp->l = CC_RGBtoHSL('L', r, g, b); /* Doing it the long way becaus CC_EditSetRGB/HSL doesn'nt seem to work */ SetDlgItemInt(hDlg, 703, lpp->h, TRUE); SetDlgItemInt(hDlg, 704, lpp->s, TRUE); SetDlgItemInt(hDlg, 705, lpp->l, TRUE); SetDlgItemInt(hDlg, 706, r, TRUE); SetDlgItemInt(hDlg, 707, g, TRUE); SetDlgItemInt(hDlg, 708, b, TRUE); CC_PaintCross(hDlg, lpp->h, lpp->s); CC_PaintTriangle(hDlg, lpp->l); return res; } /*********************************************************************** * CC_WMCommand [internal] */ static LRESULT CC_WMCommand( HWND hDlg, WPARAM wParam, LPARAM lParam, WORD notifyCode, HWND hwndCtl ) { int r, g, b, i, xx; UINT cokmsg; HDC hdc; COLORREF *cr; struct CCPRIVATE * lpp = (struct CCPRIVATE *)GetWindowLongA(hDlg, DWL_USER); TRACE("CC_WMCommand wParam=%x lParam=%lx\n", wParam, lParam); switch (wParam) { case 0x2c2: /* edit notify RGB */ case 0x2c3: case 0x2c4: if (notifyCode == EN_UPDATE && !lpp->updating) { i = CC_CheckDigitsInEdit(hwndCtl, 255); r = GetRValue(lpp->lpcc->rgbResult); g = GetGValue(lpp->lpcc->rgbResult); b= GetBValue(lpp->lpcc->rgbResult); xx = 0; switch (wParam) { case 0x2c2: if ((xx = (i != r))) r = i; break; case 0x2c3: if ((xx = (i != g))) g = i; break; case 0x2c4: if ((xx = (i != b))) b = i; break; } if (xx) /* something has changed */ { lpp->lpcc->rgbResult = RGB(r, g, b); CC_PaintSelectedColor(hDlg, lpp->lpcc->rgbResult); lpp->h = CC_RGBtoHSL('H', r, g, b); lpp->s = CC_RGBtoHSL('S', r, g, b); lpp->l = CC_RGBtoHSL('L', r, g, b); CC_EditSetHSL(hDlg, lpp->h, lpp->s, lpp->l); CC_PaintCross(hDlg, lpp->h, lpp->s); CC_PaintTriangle(hDlg, lpp->l); } } break; case 0x2bf: /* edit notify HSL */ case 0x2c0: case 0x2c1: if (notifyCode == EN_UPDATE && !lpp->updating) { i = CC_CheckDigitsInEdit(hwndCtl , wParam == 0x2bf ? 239:240); xx = 0; switch (wParam) { case 0x2bf: if ((xx = ( i != lpp->h))) lpp->h = i; break; case 0x2c0: if ((xx = ( i != lpp->s))) lpp->s = i; break; case 0x2c1: if ((xx = ( i != lpp->l))) lpp->l = i; break; } if (xx) /* something has changed */ { r = CC_HSLtoRGB('R', lpp->h, lpp->s, lpp->l); g = CC_HSLtoRGB('G', lpp->h, lpp->s, lpp->l); b = CC_HSLtoRGB('B', lpp->h, lpp->s, lpp->l); lpp->lpcc->rgbResult = RGB(r, g, b); CC_PaintSelectedColor(hDlg, lpp->lpcc->rgbResult); CC_EditSetRGB(hDlg, lpp->lpcc->rgbResult); CC_PaintCross(hDlg, lpp->h, lpp->s); CC_PaintTriangle(hDlg, lpp->l); } } break; case 0x2cf: CC_SwitchToFullSize(hDlg, lpp->lpcc->rgbResult, &lpp->fullsize); SetFocus( GetDlgItem(hDlg, 0x2bf)); break; case 0x2c8: /* add colors ... column by column */ cr = lpp->lpcc->lpCustColors; cr[(lpp->nextuserdef % 2) * 8 + lpp->nextuserdef / 2] = lpp->lpcc->rgbResult; if (++lpp->nextuserdef == 16) lpp->nextuserdef = 0; CC_PaintUserColorArray(hDlg, 2, 8, lpp->lpcc->lpCustColors); break; case 0x2c9: /* resulting color */ hdc = GetDC(hDlg); lpp->lpcc->rgbResult = GetNearestColor(hdc, lpp->lpcc->rgbResult); ReleaseDC(hDlg, hdc); CC_EditSetRGB(hDlg, lpp->lpcc->rgbResult); CC_PaintSelectedColor(hDlg, lpp->lpcc->rgbResult); r = GetRValue(lpp->lpcc->rgbResult); g = GetGValue(lpp->lpcc->rgbResult); b = GetBValue(lpp->lpcc->rgbResult); lpp->h = CC_RGBtoHSL('H', r, g, b); lpp->s = CC_RGBtoHSL('S', r, g, b); lpp->l = CC_RGBtoHSL('L', r, g, b); CC_EditSetHSL(hDlg, lpp->h, lpp->s, lpp->l); CC_PaintCross(hDlg, lpp->h, lpp->s); CC_PaintTriangle(hDlg, lpp->l); break; case 0x40e: /* Help! */ /* The Beatles, 1965 ;-) */ i = RegisterWindowMessageA(HELPMSGSTRING); if (lpp->lpcc16) { if (lpp->lpcc->hwndOwner) SendMessage16(lpp->lpcc->hwndOwner, i, 0, (LPARAM)lpp->lpcc16); if ( CC_HookCallChk(lpp->lpcc)) CallWindowProc16( (WNDPROC16) lpp->lpcc16->lpfnHook, hDlg, WM_COMMAND, psh15, (LPARAM)lpp->lpcc16); } else { if (lpp->lpcc->hwndOwner) SendMessageA(lpp->lpcc->hwndOwner, i, 0, (LPARAM)lpp->lpcc); if ( CC_HookCallChk(lpp->lpcc)) CallWindowProcA( (WNDPROC) lpp->lpcc->lpfnHook, hDlg, WM_COMMAND, psh15, (LPARAM)lpp->lpcc); } break; case IDOK : cokmsg = RegisterWindowMessageA(COLOROKSTRING); if (lpp->lpcc16) { if (lpp->lpcc->hwndOwner) if (SendMessage16(lpp->lpcc->hwndOwner, cokmsg, 0, (LPARAM)lpp->lpcc16)) break; /* do NOT close */ } else { if (lpp->lpcc->hwndOwner) if (SendMessageA(lpp->lpcc->hwndOwner, cokmsg, 0, (LPARAM)lpp->lpcc)) break; /* do NOT close */ } if (lpp->lpcc16) { BYTE *ptr = PTR_SEG_TO_LIN(lpp->lpcc16->lpCustColors); memcpy(ptr, lpp->lpcc->lpCustColors, sizeof(COLORREF)*16); lpp->lpcc16->rgbResult = lpp->lpcc->rgbResult; } EndDialog(hDlg, 1) ; return TRUE ; case IDCANCEL : EndDialog(hDlg, 0) ; return TRUE ; } return FALSE; } /*********************************************************************** * CC_WMPaint [internal] */ static LRESULT CC_WMPaint( HWND hDlg, WPARAM wParam, LPARAM lParam ) { HDC hdc; PAINTSTRUCT ps; struct CCPRIVATE * lpp = (struct CCPRIVATE *)GetWindowLongA(hDlg, DWL_USER); hdc = BeginPaint(hDlg, &ps); EndPaint(hDlg, &ps); /* we have to paint dialog children except text and buttons */ CC_PaintPredefColorArray(hDlg, 6, 8); CC_PaintUserColorArray(hDlg, 2, 8, lpp->lpcc->lpCustColors); CC_PaintLumBar(hDlg, lpp->h, lpp->s); CC_PaintCross(hDlg, lpp->h, lpp->s); CC_PaintTriangle(hDlg, lpp->l); CC_PaintSelectedColor(hDlg, lpp->lpcc->rgbResult); CC_PaintColorGraph(hDlg); /* special necessary for Wine */ ValidateRect( GetDlgItem(hDlg, 0x2d0), NULL); ValidateRect( GetDlgItem(hDlg, 0x2d1), NULL); ValidateRect( GetDlgItem(hDlg, 0x2be), NULL); ValidateRect( GetDlgItem(hDlg, 0x2c5), NULL); ValidateRect( GetDlgItem(hDlg, 0x2c6), NULL); /* hope we can remove it later -->FIXME */ return TRUE; } /*********************************************************************** * CC_WMLButtonUp [internal] */ static LRESULT CC_WMLButtonUp( HWND hDlg, WPARAM wParam, LPARAM lParam ) { struct CCPRIVATE * lpp = (struct CCPRIVATE *)GetWindowLongA(hDlg, DWL_USER); if (lpp->capturedGraph) { lpp->capturedGraph = 0; ReleaseCapture(); CC_PaintCross(hDlg, lpp->h, lpp->s); return 1; } return 0; } /*********************************************************************** * CC_WMMouseMove [internal] */ static LRESULT CC_WMMouseMove( HWND hDlg, LPARAM lParam ) { struct CCPRIVATE * lpp = (struct CCPRIVATE *)GetWindowLongA(hDlg, DWL_USER); int r, g, b; if (lpp->capturedGraph) { int *ptrh = NULL, *ptrs = &lpp->l; if (lpp->capturedGraph == 0x2c6) { ptrh = &lpp->h; ptrs = &lpp->s; } if (CC_MouseCheckColorGraph( hDlg, lpp->capturedGraph, ptrh, ptrs, lParam)) { r = CC_HSLtoRGB('R', lpp->h, lpp->s, lpp->l); g = CC_HSLtoRGB('G', lpp->h, lpp->s, lpp->l); b = CC_HSLtoRGB('B', lpp->h, lpp->s, lpp->l); lpp->lpcc->rgbResult = RGB(r, g, b); CC_EditSetRGB(hDlg, lpp->lpcc->rgbResult); CC_EditSetHSL(hDlg,lpp->h, lpp->s, lpp->l); CC_PaintCross(hDlg, lpp->h, lpp->s); CC_PaintTriangle(hDlg, lpp->l); CC_PaintSelectedColor(hDlg, lpp->lpcc->rgbResult); } else { ReleaseCapture(); lpp->capturedGraph = 0; } return 1; } return 0; } /*********************************************************************** * CC_WMLButtonDown [internal] */ static LRESULT CC_WMLButtonDown( HWND hDlg, WPARAM wParam, LPARAM lParam ) { struct CCPRIVATE * lpp = (struct CCPRIVATE *)GetWindowLongA(hDlg, DWL_USER); int r, g, b, i; i = 0; if (CC_MouseCheckPredefColorArray(hDlg, 0x2d0, 6, 8, lParam, &lpp->lpcc->rgbResult)) i = 1; else if (CC_MouseCheckUserColorArray(hDlg, 0x2d1, 2, 8, lParam,&lpp->lpcc->rgbResult, lpp->lpcc->lpCustColors)) i = 1; else if (CC_MouseCheckColorGraph(hDlg, 0x2c6, &lpp->h, &lpp->s, lParam)) { i = 2; lpp->capturedGraph = 0x2c6; } else if (CC_MouseCheckColorGraph(hDlg, 0x2be, NULL, &lpp->l, lParam)) { i = 2; lpp->capturedGraph = 0x2be; } if ( i == 2 ) { SetCapture(hDlg); r = CC_HSLtoRGB('R', lpp->h, lpp->s, lpp->l); g = CC_HSLtoRGB('G', lpp->h, lpp->s, lpp->l); b = CC_HSLtoRGB('B', lpp->h, lpp->s, lpp->l); lpp->lpcc->rgbResult = RGB(r, g, b); } if ( i == 1 ) { r = GetRValue(lpp->lpcc->rgbResult); g = GetGValue(lpp->lpcc->rgbResult); b = GetBValue(lpp->lpcc->rgbResult); lpp->h = CC_RGBtoHSL('H', r, g, b); lpp->s = CC_RGBtoHSL('S', r, g, b); lpp->l = CC_RGBtoHSL('L', r, g, b); } if (i) { CC_EditSetRGB(hDlg, lpp->lpcc->rgbResult); CC_EditSetHSL(hDlg,lpp->h, lpp->s, lpp->l); CC_PaintCross(hDlg, lpp->h, lpp->s); CC_PaintTriangle(hDlg, lpp->l); CC_PaintSelectedColor(hDlg, lpp->lpcc->rgbResult); return TRUE; } return FALSE; } /*********************************************************************** * ColorDlgProc32 [internal] * */ static LRESULT WINAPI ColorDlgProc( HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam ) { int res; struct CCPRIVATE * lpp = (struct CCPRIVATE *)GetWindowLongA(hDlg, DWL_USER); if (message != WM_INITDIALOG) { if (!lpp) return FALSE; res = 0; if (CC_HookCallChk(lpp->lpcc)) res = CallWindowProcA( (WNDPROC)lpp->lpcc->lpfnHook, hDlg, message, wParam, lParam); if ( res ) return res; } /* FIXME: SetRGB message if (message && message == msetrgb) return HandleSetRGB(hDlg, lParam); */ switch (message) { case WM_INITDIALOG: return CC_WMInitDialog(hDlg, wParam, lParam, FALSE); case WM_NCDESTROY: DeleteDC(lpp->hdcMem); DeleteObject(lpp->hbmMem); HeapFree(GetProcessHeap(), 0, lpp); SetWindowLongA(hDlg, DWL_USER, 0L); /* we don't need it anymore */ break; case WM_COMMAND: if (CC_WMCommand( hDlg, wParam, lParam, HIWORD(wParam), (HWND) lParam)) return TRUE; break; case WM_PAINT: if ( CC_WMPaint(hDlg, wParam, lParam)) return TRUE; break; case WM_LBUTTONDBLCLK: if (CC_MouseCheckResultWindow(hDlg, lParam)) return TRUE; break; case WM_MOUSEMOVE: if (CC_WMMouseMove(hDlg, lParam)) return TRUE; break; case WM_LBUTTONUP: /* FIXME: ClipCursor off (if in color graph)*/ if (CC_WMLButtonUp(hDlg, wParam, lParam)) return TRUE; break; case WM_LBUTTONDOWN:/* FIXME: ClipCursor on (if in color graph)*/ if (CC_WMLButtonDown(hDlg, wParam, lParam)) return TRUE; break; } return FALSE ; } /*********************************************************************** * ColorDlgProc16 (COMMDLG.8) */ LRESULT WINAPI ColorDlgProc16( HWND16 hDlg, UINT16 message, WPARAM16 wParam, LONG lParam ) { int res; struct CCPRIVATE * lpp = (struct CCPRIVATE *)GetWindowLongA(hDlg, DWL_USER); if (message != WM_INITDIALOG) { if (!lpp) return FALSE; res=0; if (CC_HookCallChk(lpp->lpcc)) res = CallWindowProc16( (WNDPROC16)lpp->lpcc16->lpfnHook, hDlg, message, wParam, lParam); if (res) return res; } /* FIXME: SetRGB message if (message && message == msetrgb) return HandleSetRGB(hDlg, lParam); */ switch (message) { case WM_INITDIALOG: return CC_WMInitDialog(hDlg, wParam, lParam, TRUE); case WM_NCDESTROY: DeleteDC(lpp->hdcMem); DeleteObject(lpp->hbmMem); HeapFree(GetProcessHeap(), 0, lpp->lpcc); HeapFree(GetProcessHeap(), 0, lpp); SetWindowLongA(hDlg, DWL_USER, 0L); /* we don't need it anymore */ break; case WM_COMMAND: if (CC_WMCommand(hDlg, wParam, lParam, HIWORD(lParam), (HWND)LOWORD(lParam))) return TRUE; break; case WM_PAINT: if (CC_WMPaint(hDlg, wParam, lParam)) return TRUE; break; case WM_LBUTTONDBLCLK: if (CC_MouseCheckResultWindow(hDlg,lParam)) return TRUE; break; case WM_MOUSEMOVE: if (CC_WMMouseMove(hDlg, lParam)) return TRUE; break; case WM_LBUTTONUP: /* FIXME: ClipCursor off (if in color graph)*/ if (CC_WMLButtonUp(hDlg, wParam, lParam)) return TRUE; break; case WM_LBUTTONDOWN:/* FIXME: ClipCursor on (if in color graph)*/ if (CC_WMLButtonDown(hDlg, wParam, lParam)) return TRUE; break; } return FALSE ; } /*********************************************************************** * ChooseColor16 (COMMDLG.5) */ BOOL16 WINAPI ChooseColor16( LPCHOOSECOLOR16 lpChCol ) { HINSTANCE16 hInst; HANDLE16 hDlgTmpl16 = 0, hResource16 = 0; HGLOBAL16 hGlobal16 = 0; BOOL16 bRet = FALSE; LPCVOID template; FARPROC16 ptr; TRACE("ChooseColor\n"); if (!lpChCol) return FALSE; if (lpChCol->Flags & CC_ENABLETEMPLATEHANDLE) hDlgTmpl16 = lpChCol->hInstance; else if (lpChCol->Flags & CC_ENABLETEMPLATE) { HANDLE16 hResInfo; if (!(hResInfo = FindResource16(lpChCol->hInstance, lpChCol->lpTemplateName, RT_DIALOG16))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl16 = LoadResource16(lpChCol->hInstance, hResInfo))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } hResource16 = hDlgTmpl16; } else { HANDLE hResInfo, hDlgTmpl32; LPCVOID template32; DWORD size; if (!(hResInfo = FindResourceA(COMMDLG_hInstance32, "CHOOSE_COLOR", RT_DIALOGA))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl32 = LoadResource(COMMDLG_hInstance32, hResInfo)) || !(template32 = LockResource(hDlgTmpl32))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } size = SizeofResource(GetModuleHandleA("COMDLG32"), hResInfo); hGlobal16 = GlobalAlloc16(0, size); if (!hGlobal16) { COMDLG32_SetCommDlgExtendedError(CDERR_MEMALLOCFAILURE); ERR("alloc failure for %ld bytes\n", size); return FALSE; } template = GlobalLock16(hGlobal16); if (!template) { COMDLG32_SetCommDlgExtendedError(CDERR_MEMLOCKFAILURE); ERR("global lock failure for %x handle\n", hDlgTmpl16); GlobalFree16(hGlobal16); return FALSE; } ConvertDialog32To16((LPVOID)template32, size, (LPVOID)template); hDlgTmpl16 = hGlobal16; } ptr = GetProcAddress16(GetModuleHandle16("COMMDLG"), (SEGPTR) 8); hInst = GetWindowLongA(lpChCol->hwndOwner, GWL_HINSTANCE); bRet = DialogBoxIndirectParam16(hInst, hDlgTmpl16, lpChCol->hwndOwner, (DLGPROC16) ptr, (DWORD)lpChCol); if (hResource16) FreeResource16(hDlgTmpl16); if (hGlobal16) { GlobalUnlock16(hGlobal16); GlobalFree16(hGlobal16); } return bRet; } /*********************************************************************** * ChooseColorW (COMDLG32.2) */ BOOL WINAPI ChooseColorW( LPCHOOSECOLORW lpChCol ) { HANDLE hDlgTmpl = 0; BOOL bRet = FALSE; LPCVOID template; TRACE("ChooseColor\n"); if (!lpChCol) return FALSE; if (lpChCol->Flags & CC_ENABLETEMPLATEHANDLE) { if (!(template = LockResource(lpChCol->hInstance))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } } else if (lpChCol->Flags & CC_ENABLETEMPLATE) { HANDLE hResInfo; if (!(hResInfo = FindResourceW(lpChCol->hInstance, lpChCol->lpTemplateName, RT_DIALOGW))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource(lpChCol->hInstance, hResInfo)) || !(template = LockResource(hDlgTmpl))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } } else { HANDLE hResInfo, hDlgTmpl; if (!(hResInfo = FindResourceA(COMMDLG_hInstance32, "CHOOSE_COLOR", RT_DIALOGA))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource(COMMDLG_hInstance32, hResInfo )) || !(template = LockResource(hDlgTmpl))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } } bRet = DialogBoxIndirectParamW(COMMDLG_hInstance32, template, lpChCol->hwndOwner, (DLGPROC)ColorDlgProc, (DWORD)lpChCol); return bRet; } /*********************************************************************** * ChooseColorA (COMDLG32.1) */ BOOL WINAPI ChooseColorA( LPCHOOSECOLORA lpChCol ) { BOOL ret; LPCHOOSECOLORW lpcc = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CHOOSECOLORW)); lpcc->lStructSize = sizeof(*lpcc); lpcc->hwndOwner = lpChCol->hwndOwner; lpcc->hInstance = lpChCol->hInstance; lpcc->rgbResult = lpChCol->rgbResult; lpcc->lpCustColors = lpChCol->lpCustColors; lpcc->Flags = lpChCol->Flags; lpcc->lCustData = lpChCol->lCustData; lpcc->lpfnHook = (LPCCHOOKPROC) lpChCol->lpfnHook; if ((lpcc->Flags & CC_ENABLETEMPLATE) && (lpChCol->lpTemplateName)) lpcc->lpTemplateName = HEAP_strdupAtoW(GetProcessHeap(), 0, lpChCol->lpTemplateName); ret = ChooseColorW(lpcc); if (ret) lpChCol->rgbResult = lpcc->rgbResult; if (lpcc->lpTemplateName) HeapFree(GetProcessHeap(), 0, (LPSTR)lpcc->lpTemplateName); HeapFree(GetProcessHeap(), 0, lpcc); return ret; } wine-20000526/dlls/commdlg/comdlg32.spec0100644000175000001440000000211507113574776017330 0ustar julliardusersname comdlg32 type win32 init COMDLG32_DllEntryPoint rsrc comdlg32 import winspool.drv import shell32.dll import comctl32.dll import winspool.drv 0 stub ArrowBtnWndProc 1 stdcall ChooseColorA(ptr) ChooseColorA 2 stdcall ChooseColorW(ptr) ChooseColorW 3 stdcall ChooseFontA(ptr) ChooseFontA 4 stdcall ChooseFontW(ptr) ChooseFontW 5 stdcall CommDlgExtendedError() CommDlgExtendedError 6 stdcall FindTextA(ptr) FindTextA 7 stdcall FindTextW(ptr) FindTextW 8 stdcall GetFileTitleA(ptr ptr long) GetFileTitleA 9 stdcall GetFileTitleW(ptr ptr long) GetFileTitleW 10 stdcall GetOpenFileNameA(ptr) GetOpenFileNameA 11 stdcall GetOpenFileNameW(ptr) GetOpenFileNameW 12 stdcall GetSaveFileNameA(ptr) GetSaveFileNameA 13 stdcall GetSaveFileNameW(ptr) GetSaveFileNameW 14 stub LoadAlterBitmap 15 stdcall PageSetupDlgA(ptr) PageSetupDlgA 16 stdcall PageSetupDlgW(ptr) PageSetupDlgW 17 stdcall PrintDlgA(ptr) PrintDlgA 18 stdcall PrintDlgW(ptr) PrintDlgW 19 stdcall ReplaceTextA(ptr) ReplaceTextA 20 stdcall ReplaceTextW(ptr) ReplaceTextW 21 stub WantArrows 22 stub dwLBSubclass 23 stub dwOKSubclass wine-20000526/dlls/commdlg/commdlg.spec0100644000175000001440000000302707001075505017321 0ustar julliardusersname commdlg type win16 1 pascal16 GetOpenFileName(segptr) GetOpenFileName16 2 pascal16 GetSaveFileName(segptr) GetSaveFileName16 5 pascal16 ChooseColor(ptr) ChooseColor16 6 pascal FileOpenDlgProc(word word word long) FileOpenDlgProc16 7 pascal FileSaveDlgProc(word word word long) FileSaveDlgProc16 8 pascal ColorDlgProc(word word word long) ColorDlgProc16 #9 pascal LOADALTERBITMAP exported, shared data 11 pascal16 FindText(segptr) FindText16 12 pascal16 ReplaceText(segptr) ReplaceText16 13 pascal FindTextDlgProc(word word word long) FindTextDlgProc16 14 pascal ReplaceTextDlgProc(word word word long) ReplaceTextDlgProc16 15 pascal16 ChooseFont(ptr) ChooseFont16 16 pascal16 FormatCharDlgProc(word word word long) FormatCharDlgProc16 18 pascal16 FontStyleEnumProc(ptr ptr word long) FontStyleEnumProc16 19 pascal16 FontFamilyEnumProc(ptr ptr word long) FontFamilyEnumProc16 20 pascal16 PrintDlg(ptr) PrintDlg16 21 pascal PrintDlgProc(word word word long) PrintDlgProc16 22 pascal PrintSetupDlgProc(word word word long) PrintSetupDlgProc16 #23 pascal EDITINTEGERONLY exported, shared data #25 pascal WANTARROWS exported, shared data 26 pascal CommDlgExtendedError() CommDlgExtendedError 27 pascal16 GetFileTitle(str ptr word) GetFileTitle16 #28 pascal WEP exported, shared data #29 pascal DWLBSUBCLASS exported, shared data #30 pascal DWUPARROWHACK exported, shared data #31 pascal DWOKSUBCLASS exported, shared data 32 pascal DllEntryPoint(long word word word long word) COMMDLG_DllEntryPoint wine-20000526/dlls/commdlg/filedlg.c0100644000175000001440000013240607113574776016623 0ustar julliardusers/* * COMMDLG - File Dialogs * * Copyright 1994 Martin Ayotte * Copyright 1996 Albrecht Kleine */ #include #include #include #include #include "windef.h" #include "winbase.h" #include "wingdi.h" #include "wine/winbase16.h" #include "wine/winuser16.h" #include "ldt.h" #include "heap.h" #include "commdlg.h" #include "dialog.h" #include "dlgs.h" #include "module.h" #include "drive.h" #include "debugtools.h" #include "winproc.h" #include "cderr.h" #include "tweak.h" DEFAULT_DEBUG_CHANNEL(commdlg); #include "cdlg.h" static HICON16 hFolder = 0; static HICON16 hFolder2 = 0; static HICON16 hFloppy = 0; static HICON16 hHDisk = 0; static HICON16 hCDRom = 0; static HICON16 hNet = 0; static int fldrHeight = 0; static int fldrWidth = 0; static const char defaultfilter[]=" \0\0"; #define OFN_PROP "FILEDLG_OFN_LPARAM" /*********************************************************************** * * Windows 3.1 OpenFileName/SaveFileName dialog * */ LRESULT WINAPI FileOpenDlgProc16(HWND16 hWnd, UINT16 wMsg, WPARAM16 wParam, LPARAM lParam); LRESULT WINAPI FileSaveDlgProc16(HWND16 hWnd, UINT16 wMsg, WPARAM16 wParam, LPARAM lParam); /*********************************************************************** * FileDlg_Init [internal] */ static BOOL FileDlg_Init(void) { static BOOL initialized = 0; CURSORICONINFO *fldrInfo; if (!initialized) { if (!hFolder) hFolder = LoadIcon16(0, MAKEINTRESOURCE16(OIC_FOLDER)); if (!hFolder2) hFolder2 = LoadIcon16(0, MAKEINTRESOURCE16(OIC_FOLDER2)); if (!hFloppy) hFloppy = LoadIcon16(0, MAKEINTRESOURCE16(OIC_FLOPPY)); if (!hHDisk) hHDisk = LoadIcon16(0, MAKEINTRESOURCE16(OIC_HDISK)); if (!hCDRom) hCDRom = LoadIcon16(0, MAKEINTRESOURCE16(OIC_CDROM)); if (!hNet) hNet = LoadIcon16(0, MAKEINTRESOURCE16(OIC_NETWORK)); if (hFolder == 0 || hFolder2 == 0 || hFloppy == 0 || hHDisk == 0 || hCDRom == 0 || hNet == 0) { ERR("Error loading icons !\n"); return FALSE; } fldrInfo = (CURSORICONINFO *) GlobalLock16( hFolder2 ); if (!fldrInfo) { ERR("Error measuring icons !\n"); return FALSE; } fldrHeight = fldrInfo -> nHeight; fldrWidth = fldrInfo -> nWidth; GlobalUnlock16( hFolder2 ); initialized = TRUE; } return TRUE; } /*********************************************************************** * FileOpenDlgProc [internal] * * FIXME: Convert to real 32-bit message processing */ static LRESULT WINAPI FileOpenDlgProc(HWND hDlg, UINT msg, WPARAM wParam, LPARAM lParam) { UINT16 msg16; MSGPARAM16 mp16; mp16.lParam = lParam; if (WINPROC_MapMsg32ATo16( hDlg, msg, wParam, &msg16, &mp16.wParam, &mp16.lParam ) == -1) return 0; mp16.lResult = FileOpenDlgProc16( (HWND16)hDlg, msg16, mp16.wParam, mp16.lParam ); WINPROC_UnmapMsg32ATo16( hDlg, msg, wParam, lParam, &mp16 ); return mp16.lResult; } /*********************************************************************** * FileSaveDlgProc [internal] * * FIXME: Convert to real 32-bit message processing */ static LRESULT WINAPI FileSaveDlgProc(HWND hDlg, UINT msg, WPARAM wParam, LPARAM lParam) { UINT16 msg16; MSGPARAM16 mp16; mp16.lParam = lParam; if (WINPROC_MapMsg32ATo16( hDlg, msg, wParam, &msg16, &mp16.wParam, &mp16.lParam ) == -1) return 0; mp16.lResult = FileSaveDlgProc16( (HWND16)hDlg, msg16, mp16.wParam, mp16.lParam ); WINPROC_UnmapMsg32ATo16( hDlg, msg, wParam, lParam, &mp16 ); return mp16.lResult; } /*********************************************************************** * GetOpenFileName16 (COMMDLG.1) * * Creates a dialog box for the user to select a file to open. * * RETURNS * TRUE on success: user selected a valid file * FALSE on cancel, error, close or filename-does-not-fit-in-buffer. * * BUGS * unknown, there are some FIXME's left. */ BOOL16 WINAPI GetOpenFileName16( SEGPTR ofn /* addess of structure with data*/ ) { HINSTANCE hInst; HANDLE hDlgTmpl = 0, hResInfo; BOOL bRet = FALSE, win32Format = FALSE; HWND hwndDialog; LPOPENFILENAME16 lpofn = (LPOPENFILENAME16)PTR_SEG_TO_LIN(ofn); LPCVOID template; char defaultopen[]="Open File"; char *str=0,*str1=0; if (!lpofn || !FileDlg_Init()) return FALSE; if (lpofn->Flags & OFN_WINE) { if (lpofn->Flags & OFN_ENABLETEMPLATEHANDLE) { if (!(template = LockResource( MapHModuleSL(lpofn->hInstance )))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } } else if (lpofn->Flags & OFN_ENABLETEMPLATE) { if (!(hResInfo = FindResourceA(MapHModuleSL(lpofn->hInstance), PTR_SEG_TO_LIN(lpofn->lpTemplateName), RT_DIALOGA))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource( MapHModuleSL(lpofn->hInstance), hResInfo )) || !(template = LockResource( hDlgTmpl ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } } else { if (!(hResInfo = FindResourceA(COMMDLG_hInstance32, "OPEN_FILE", RT_DIALOGA))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource(COMMDLG_hInstance32, hResInfo )) || !(template = LockResource( hDlgTmpl ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } } win32Format = TRUE; } else { if (lpofn->Flags & OFN_ENABLETEMPLATEHANDLE) { if (!(template = LockResource16( lpofn->hInstance ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } } else if (lpofn->Flags & OFN_ENABLETEMPLATE) { if (!(hResInfo = FindResource16(lpofn->hInstance, lpofn->lpTemplateName, RT_DIALOG16))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource16( lpofn->hInstance, hResInfo )) || !(template = LockResource16( hDlgTmpl ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } } else { if (!(hResInfo = FindResourceA(COMMDLG_hInstance32, "OPEN_FILE", RT_DIALOGA))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource(COMMDLG_hInstance32, hResInfo )) || !(template = LockResource( hDlgTmpl ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } win32Format = TRUE; } } hInst = GetWindowLongA( lpofn->hwndOwner, GWL_HINSTANCE ); if (!(lpofn->lpstrFilter)) { str = SEGPTR_ALLOC(sizeof(defaultfilter)); TRACE("Alloc %p default for Filetype in GetOpenFileName\n",str); memcpy(str,defaultfilter,sizeof(defaultfilter)); lpofn->lpstrFilter=SEGPTR_GET(str); } if (!(lpofn->lpstrTitle)) { str1 = SEGPTR_ALLOC(strlen(defaultopen)+1); TRACE("Alloc %p default for Title in GetOpenFileName\n",str1); strcpy(str1,defaultopen); lpofn->lpstrTitle=SEGPTR_GET(str1); } /* FIXME: doesn't handle win32 format correctly yet */ hwndDialog = DIALOG_CreateIndirect( hInst, template, win32Format, lpofn->hwndOwner, (DLGPROC16)FileOpenDlgProc, ofn, WIN_PROC_32A ); if (hwndDialog) bRet = DIALOG_DoDialogBox( hwndDialog, lpofn->hwndOwner ); if (str1) { TRACE("Freeing %p default for Title in GetOpenFileName\n",str1); SEGPTR_FREE(str1); lpofn->lpstrTitle=0; } if (str) { TRACE("Freeing %p default for Filetype in GetOpenFileName\n",str); SEGPTR_FREE(str); lpofn->lpstrFilter=0; } if (hDlgTmpl) { if (lpofn->Flags & OFN_WINE) FreeResource( hDlgTmpl ); else FreeResource16( hDlgTmpl ); } TRACE("return lpstrFile='%s' !\n", (LPSTR)PTR_SEG_TO_LIN(lpofn->lpstrFile)); return bRet; } /*********************************************************************** * GetSaveFileName (COMMDLG.2) * * Creates a dialog box for the user to select a file to save. * * RETURNS * TRUE on succes: user enters a valid file * FALSE on cancel, error, close or filename-does-not-fit-in-buffer. * * BUGS * unknown. There are some FIXME's left. */ BOOL16 WINAPI GetSaveFileName16( SEGPTR ofn /* addess of structure with data*/ ) { HINSTANCE hInst; HANDLE hDlgTmpl = 0; BOOL bRet = FALSE, win32Format = FALSE; LPOPENFILENAME16 lpofn = (LPOPENFILENAME16)PTR_SEG_TO_LIN(ofn); LPCVOID template; HWND hwndDialog; char defaultsave[]="Save as"; char *str =0,*str1=0; if (!lpofn || !FileDlg_Init()) return FALSE; if (lpofn->Flags & OFN_WINE) { if (lpofn->Flags & OFN_ENABLETEMPLATEHANDLE) { if (!(template = LockResource( MapHModuleSL(lpofn->hInstance )))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } } else if (lpofn->Flags & OFN_ENABLETEMPLATE) { HANDLE hResInfo; if (!(hResInfo = FindResourceA(MapHModuleSL(lpofn->hInstance), PTR_SEG_TO_LIN(lpofn->lpTemplateName), RT_DIALOGA))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource(MapHModuleSL(lpofn->hInstance), hResInfo)) || !(template = LockResource(hDlgTmpl))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } win32Format= TRUE; } else { HANDLE hResInfo; if (!(hResInfo = FindResourceA(COMMDLG_hInstance32, "SAVE_FILE", RT_DIALOGA))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource(COMMDLG_hInstance32, hResInfo )) || !(template = LockResource( hDlgTmpl ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } win32Format = TRUE; } } else { if (lpofn->Flags & OFN_ENABLETEMPLATEHANDLE) { if (!(template = LockResource16( lpofn->hInstance ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } } else if (lpofn->Flags & OFN_ENABLETEMPLATE) { HANDLE16 hResInfo; if (!(hResInfo = FindResource16(lpofn->hInstance, lpofn->lpTemplateName, RT_DIALOG16))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource16( lpofn->hInstance, hResInfo )) || !(template = LockResource16( hDlgTmpl ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } } else { HANDLE hResInfo; if (!(hResInfo = FindResourceA(COMMDLG_hInstance32, "SAVE_FILE", RT_DIALOGA))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource(COMMDLG_hInstance32, hResInfo )) || !(template = LockResource( hDlgTmpl ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } win32Format = TRUE; } } hInst = GetWindowLongA( lpofn->hwndOwner, GWL_HINSTANCE ); if (!(lpofn->lpstrFilter)) { str = SEGPTR_ALLOC(sizeof(defaultfilter)); TRACE("Alloc default for Filetype in GetSaveFileName\n"); memcpy(str,defaultfilter,sizeof(defaultfilter)); lpofn->lpstrFilter=SEGPTR_GET(str); } if (!(lpofn->lpstrTitle)) { str1 = SEGPTR_ALLOC(sizeof(defaultsave)+1); TRACE("Alloc default for Title in GetSaveFileName\n"); strcpy(str1,defaultsave); lpofn->lpstrTitle=SEGPTR_GET(str1); } hwndDialog = DIALOG_CreateIndirect( hInst, template, win32Format, lpofn->hwndOwner, (DLGPROC16)FileSaveDlgProc, ofn, WIN_PROC_32A ); if (hwndDialog) bRet = DIALOG_DoDialogBox( hwndDialog, lpofn->hwndOwner ); if (str1) { TRACE("Freeing %p default for Title in GetSaveFileName\n",str1); SEGPTR_FREE(str1); lpofn->lpstrTitle=0; } if (str) { TRACE("Freeing %p default for Filetype in GetSaveFileName\n",str); SEGPTR_FREE(str); lpofn->lpstrFilter=0; } if (hDlgTmpl) { if (lpofn->Flags & OFN_WINE) FreeResource( hDlgTmpl ); else FreeResource16( hDlgTmpl ); } TRACE("return lpstrFile='%s' !\n", (LPSTR)PTR_SEG_TO_LIN(lpofn->lpstrFile)); return bRet; } /*********************************************************************** * FILEDLG_StripEditControl [internal] * Strip pathnames off the contents of the edit control. */ static void FILEDLG_StripEditControl(HWND16 hwnd) { char temp[512], *cp; GetDlgItemTextA( hwnd, edt1, temp, sizeof(temp) ); cp = strrchr(temp, '\\'); if (cp != NULL) { strcpy(temp, cp+1); } cp = strrchr(temp, ':'); if (cp != NULL) { strcpy(temp, cp+1); } /* FIXME: shouldn't we do something with the result here? ;-) */ } /*********************************************************************** * FILEDLG_ScanDir [internal] */ static BOOL FILEDLG_ScanDir(HWND16 hWnd, LPSTR newPath) { char buffer[512]; char* str = buffer; int drive; HWND hlb; lstrcpynA(buffer, newPath, sizeof(buffer)); if (str[0] && (str[1] == ':')) { drive = toupper(str[0]) - 'A'; str += 2; if (!DRIVE_SetCurrentDrive(drive)) return FALSE; } else { drive = DRIVE_GetCurrentDrive(); } if (str[0] && !DRIVE_Chdir(drive, str)) { return FALSE; } GetDlgItemTextA(hWnd, edt1, buffer, sizeof(buffer)); if ((hlb = GetDlgItem(hWnd, lst1)) != 0) { char* scptr; /* ptr on semi-colon */ char* filter = buffer; TRACE("Using filter %s\n", filter); SendMessageA(hlb, LB_RESETCONTENT, 0, 0); while (filter) { scptr = strchr(filter, ';'); if (scptr) *scptr = 0; TRACE("Using file spec %s\n", filter); if (SendMessageA(hlb, LB_DIR, 0, (LPARAM)filter) == LB_ERR) return FALSE; if (scptr) *scptr = ';'; filter = (scptr) ? (scptr + 1) : 0; } } strcpy(buffer, "*.*"); return DlgDirListA(hWnd, buffer, lst2, stc1, DDL_EXCLUSIVE | DDL_DIRECTORY); } /*********************************************************************** * FILEDLG_GetFileType [internal] */ static LPSTR FILEDLG_GetFileType(LPSTR cfptr, LPSTR fptr, WORD index) { int n, i; i = 0; if (cfptr) for ( ;(n = strlen(cfptr)) != 0; i++) { cfptr += n + 1; if (i == index) return cfptr; cfptr += strlen(cfptr) + 1; } if (fptr) for ( ;(n = strlen(fptr)) != 0; i++) { fptr += n + 1; if (i == index) return fptr; fptr += strlen(fptr) + 1; } return "*.*"; /* FIXME */ } /*********************************************************************** * FILEDLG_WMDrawItem [internal] */ static LONG FILEDLG_WMDrawItem(HWND16 hWnd, WPARAM16 wParam, LPARAM lParam,int savedlg) { LPDRAWITEMSTRUCT16 lpdis = (LPDRAWITEMSTRUCT16)PTR_SEG_TO_LIN(lParam); char *str; HICON16 hIcon; COLORREF oldText = 0, oldBk = 0; if (lpdis->CtlType == ODT_LISTBOX && lpdis->CtlID == lst1) { if (!(str = SEGPTR_ALLOC(512))) return FALSE; SendMessage16(lpdis->hwndItem, LB_GETTEXT16, lpdis->itemID, (LPARAM)SEGPTR_GET(str)); if ((lpdis->itemState & ODS_SELECTED) && !savedlg) { oldBk = SetBkColor( lpdis->hDC, GetSysColor( COLOR_HIGHLIGHT ) ); oldText = SetTextColor( lpdis->hDC, GetSysColor(COLOR_HIGHLIGHTTEXT)); } if (savedlg) SetTextColor(lpdis->hDC,GetSysColor(COLOR_GRAYTEXT) ); ExtTextOut16(lpdis->hDC, lpdis->rcItem.left + 1, lpdis->rcItem.top + 1, ETO_OPAQUE | ETO_CLIPPED, &(lpdis->rcItem), str, strlen(str), NULL); if (lpdis->itemState & ODS_SELECTED) DrawFocusRect16( lpdis->hDC, &(lpdis->rcItem) ); if ((lpdis->itemState & ODS_SELECTED) && !savedlg) { SetBkColor( lpdis->hDC, oldBk ); SetTextColor( lpdis->hDC, oldText ); } SEGPTR_FREE(str); return TRUE; } if (lpdis->CtlType == ODT_LISTBOX && lpdis->CtlID == lst2) { if (!(str = SEGPTR_ALLOC(512))) return FALSE; SendMessage16(lpdis->hwndItem, LB_GETTEXT16, lpdis->itemID, (LPARAM)SEGPTR_GET(str)); if (lpdis->itemState & ODS_SELECTED) { oldBk = SetBkColor( lpdis->hDC, GetSysColor( COLOR_HIGHLIGHT ) ); oldText = SetTextColor( lpdis->hDC, GetSysColor(COLOR_HIGHLIGHTTEXT)); } ExtTextOut16(lpdis->hDC, lpdis->rcItem.left + fldrWidth, lpdis->rcItem.top + 1, ETO_OPAQUE | ETO_CLIPPED, &(lpdis->rcItem), str, strlen(str), NULL); if (lpdis->itemState & ODS_SELECTED) DrawFocusRect16( lpdis->hDC, &(lpdis->rcItem) ); if (lpdis->itemState & ODS_SELECTED) { SetBkColor( lpdis->hDC, oldBk ); SetTextColor( lpdis->hDC, oldText ); } DrawIcon(lpdis->hDC, lpdis->rcItem.left, lpdis->rcItem.top, hFolder); SEGPTR_FREE(str); return TRUE; } if (lpdis->CtlType == ODT_COMBOBOX && lpdis->CtlID == cmb2) { if (!(str = SEGPTR_ALLOC(512))) return FALSE; SendMessage16(lpdis->hwndItem, CB_GETLBTEXT16, lpdis->itemID, (LPARAM)SEGPTR_GET(str)); switch(DRIVE_GetType( str[2] - 'a' )) { case TYPE_FLOPPY: hIcon = hFloppy; break; case TYPE_CDROM: hIcon = hCDRom; break; case TYPE_NETWORK: hIcon = hNet; break; case TYPE_HD: default: hIcon = hHDisk; break; } if (lpdis->itemState & ODS_SELECTED) { oldBk = SetBkColor( lpdis->hDC, GetSysColor( COLOR_HIGHLIGHT ) ); oldText = SetTextColor( lpdis->hDC, GetSysColor(COLOR_HIGHLIGHTTEXT)); } ExtTextOut16(lpdis->hDC, lpdis->rcItem.left + fldrWidth, lpdis->rcItem.top + 1, ETO_OPAQUE | ETO_CLIPPED, &(lpdis->rcItem), str, strlen(str), NULL); if (lpdis->itemState & ODS_SELECTED) { SetBkColor( lpdis->hDC, oldBk ); SetTextColor( lpdis->hDC, oldText ); } DrawIcon(lpdis->hDC, lpdis->rcItem.left, lpdis->rcItem.top, hIcon); SEGPTR_FREE(str); return TRUE; } return FALSE; } /*********************************************************************** * FILEDLG_WMMeasureItem [internal] */ static LONG FILEDLG_WMMeasureItem(HWND16 hWnd, WPARAM16 wParam, LPARAM lParam) { LPMEASUREITEMSTRUCT16 lpmeasure; lpmeasure = (LPMEASUREITEMSTRUCT16)PTR_SEG_TO_LIN(lParam); lpmeasure->itemHeight = fldrHeight; return TRUE; } /*********************************************************************** * FILEDLG_HookCallChk [internal] */ static int FILEDLG_HookCallChk(LPOPENFILENAME16 lpofn) { if (lpofn) if (lpofn->Flags & OFN_ENABLEHOOK) if (lpofn->lpfnHook) return 1; return 0; } /*********************************************************************** * FILEDLG_CallWindowProc [internal] * * Adapt the structures back for win32 calls so the callee can read lpCustData */ static BOOL FILEDLG_CallWindowProc(LPOPENFILENAME16 lpofn,HWND hwnd, UINT wMsg,WPARAM wParam,LPARAM lParam ) { BOOL needstruct; BOOL result = FALSE; WINDOWPROCTYPE ProcType; /* Type of Hook Function to be called. */ /* TRUE if lParam points to the OPENFILENAME16 Structure */ needstruct = (PTR_SEG_TO_LIN(lParam) == lpofn); ProcType = (lpofn->Flags & OFN_WINE) ? (lpofn->Flags & OFN_UNICODE) /* 32-Bit call to GetOpenFileName */ ? WIN_PROC_32W : WIN_PROC_32A : WIN_PROC_16; /* 16-Bit call to GetOpenFileName */ if (!(lpofn->Flags & OFN_WINE)) /* Call to 16-Bit Hooking function... No Problem at all. */ return (BOOL)CallWindowProc16( (WNDPROC16)lpofn->lpfnHook,hwnd,(UINT16)wMsg,(WPARAM16)wParam,lParam ); /* |OFN_WINE32 */ if (needstruct) { /* Parameter lParam points to lpofn... Convert Structure Data... */ if (lpofn->Flags & OFN_UNICODE) { OPENFILENAMEW ofnw; /* FIXME: probably needs more converted */ ofnw.lCustData = lpofn->lCustData; return (BOOL)CallWindowProcW( (WNDPROC)lpofn->lpfnHook,hwnd,wMsg,wParam,(LPARAM)&ofnw ); } else /* ! |OFN_UNICODE */ { OPENFILENAMEA ofna; /* FIXME: probably needs more converted */ ofna.lCustData = lpofn->lCustData; return (BOOL)CallWindowProcA( (WNDPROC)lpofn->lpfnHook,hwnd,wMsg,wParam,(LPARAM)&ofna ); } } else /* ! needstruct */ { HWINDOWPROC hWindowProc=NULL; if (WINPROC_SetProc(&hWindowProc, (WNDPROC16)lpofn->lpfnHook, ProcType, WIN_PROC_WINDOW)) { /* Call Window Procedure converting 16-Bit Type Parameters to 32-Bit Type Parameters */ result = CallWindowProc16( (WNDPROC16)hWindowProc, hwnd, wMsg, wParam, lParam ); result = LOWORD(result); WINPROC_FreeProc( hWindowProc, WIN_PROC_WINDOW ); } return result; } } /*********************************************************************** * FILEDLG_WMInitDialog [internal] */ static LONG FILEDLG_WMInitDialog(HWND16 hWnd, WPARAM16 wParam, LPARAM lParam) { int i, n; LPOPENFILENAME16 lpofn; char tmpstr[512]; LPSTR pstr, old_pstr; SetPropA(hWnd,OFN_PROP,lParam); lpofn = (LPOPENFILENAME16)PTR_SEG_TO_LIN(lParam); if (lpofn->lpstrTitle) SetWindowText16( hWnd, lpofn->lpstrTitle ); /* read custom filter information */ if (lpofn->lpstrCustomFilter) { pstr = (LPSTR)PTR_SEG_TO_LIN(lpofn->lpstrCustomFilter); n = 0; TRACE("lpstrCustomFilter = %p\n", pstr); while(*pstr) { old_pstr = pstr; i = SendDlgItemMessage16(hWnd, cmb1, CB_ADDSTRING16, 0, (LPARAM)lpofn->lpstrCustomFilter + n ); n += strlen(pstr) + 1; pstr += strlen(pstr) + 1; TRACE("add str='%s' " "associated to '%s'\n", old_pstr, pstr); SendDlgItemMessage16(hWnd, cmb1, CB_SETITEMDATA16, i, (LPARAM)pstr); n += strlen(pstr) + 1; pstr += strlen(pstr) + 1; } } /* read filter information */ if (lpofn->lpstrFilter) { pstr = (LPSTR)PTR_SEG_TO_LIN(lpofn->lpstrFilter); n = 0; while(*pstr) { old_pstr = pstr; i = SendDlgItemMessage16(hWnd, cmb1, CB_ADDSTRING16, 0, (LPARAM)lpofn->lpstrFilter + n ); n += strlen(pstr) + 1; pstr += strlen(pstr) + 1; TRACE("add str='%s' " "associated to '%s'\n", old_pstr, pstr); SendDlgItemMessage16(hWnd, cmb1, CB_SETITEMDATA16, i, (LPARAM)pstr); n += strlen(pstr) + 1; pstr += strlen(pstr) + 1; } } /* set default filter */ if (lpofn->nFilterIndex == 0 && lpofn->lpstrCustomFilter == (SEGPTR)NULL) lpofn->nFilterIndex = 1; SendDlgItemMessage16(hWnd, cmb1, CB_SETCURSEL16, lpofn->nFilterIndex - 1, 0); lstrcpynA(tmpstr, FILEDLG_GetFileType(PTR_SEG_TO_LIN(lpofn->lpstrCustomFilter), PTR_SEG_TO_LIN(lpofn->lpstrFilter), lpofn->nFilterIndex - 1),512); TRACE("nFilterIndex = %ld, SetText of edt1 to '%s'\n", lpofn->nFilterIndex, tmpstr); SetDlgItemTextA( hWnd, edt1, tmpstr ); /* get drive list */ *tmpstr = 0; DlgDirListComboBoxA(hWnd, tmpstr, cmb2, 0, DDL_DRIVES | DDL_EXCLUSIVE); /* read initial directory */ if (PTR_SEG_TO_LIN(lpofn->lpstrInitialDir) != NULL) { int len; lstrcpynA(tmpstr, PTR_SEG_TO_LIN(lpofn->lpstrInitialDir), 511); len=strlen(tmpstr); if (len > 0 && tmpstr[len-1] != '\\' && tmpstr[len-1] != ':') { tmpstr[len]='\\'; tmpstr[len+1]='\0'; } } else *tmpstr = 0; if (!FILEDLG_ScanDir(hWnd, tmpstr)) { *tmpstr = 0; if (!FILEDLG_ScanDir(hWnd, tmpstr)) WARN("Couldn't read initial directory %s!\n",tmpstr); } /* select current drive in combo 2, omit missing drives */ for(i=0, n=-1; i<=DRIVE_GetCurrentDrive(); i++) if (DRIVE_IsValid(i)) n++; SendDlgItemMessage16(hWnd, cmb2, CB_SETCURSEL16, n, 0); if (!(lpofn->Flags & OFN_SHOWHELP)) ShowWindow(GetDlgItem(hWnd, pshHelp), SW_HIDE); if (lpofn->Flags & OFN_HIDEREADONLY) ShowWindow(GetDlgItem(hWnd, chx1), SW_HIDE); if (FILEDLG_HookCallChk(lpofn)) return (BOOL16)FILEDLG_CallWindowProc(lpofn,hWnd,WM_INITDIALOG,wParam,lParam ); else return TRUE; } /*********************************************************************** * FILEDLG_WMCommand [internal] */ BOOL in_update=FALSE; static LRESULT FILEDLG_WMCommand(HWND16 hWnd, WPARAM16 wParam, LPARAM lParam) { LONG lRet; LPOPENFILENAME16 lpofn; OPENFILENAME16 ofn2; char tmpstr[512], tmpstr2[512]; LPSTR pstr, pstr2; UINT16 control,notification; /* Notifications are packaged differently in Win32 */ control = wParam; notification = HIWORD(lParam); lpofn = (LPOPENFILENAME16)PTR_SEG_TO_LIN(GetPropA(hWnd,OFN_PROP)); switch (control) { case lst1: /* file list */ FILEDLG_StripEditControl(hWnd); if (notification == LBN_DBLCLK) goto almost_ok; lRet = SendDlgItemMessage16(hWnd, lst1, LB_GETCURSEL16, 0, 0); if (lRet == LB_ERR) return TRUE; if ((pstr = SEGPTR_ALLOC(512))) { SendDlgItemMessage16(hWnd, lst1, LB_GETTEXT16, lRet, (LPARAM)SEGPTR_GET(pstr)); SetDlgItemTextA( hWnd, edt1, pstr ); SEGPTR_FREE(pstr); } if (FILEDLG_HookCallChk(lpofn)) FILEDLG_CallWindowProc(lpofn,hWnd, RegisterWindowMessageA( LBSELCHSTRING ), control, MAKELONG(lRet,CD_LBSELCHANGE)); /* FIXME: for OFN_ALLOWMULTISELECT we need CD_LBSELSUB, CD_SELADD, CD_LBSELNOITEMS */ return TRUE; case lst2: /* directory list */ FILEDLG_StripEditControl(hWnd); if (notification == LBN_DBLCLK) { lRet = SendDlgItemMessage16(hWnd, lst2, LB_GETCURSEL16, 0, 0); if (lRet == LB_ERR) return TRUE; pstr = SEGPTR_ALLOC(512); SendDlgItemMessage16(hWnd, lst2, LB_GETTEXT16, lRet, (LPARAM)SEGPTR_GET(pstr)); strcpy( tmpstr, pstr ); SEGPTR_FREE(pstr); if (tmpstr[0] == '[') { tmpstr[strlen(tmpstr) - 1] = 0; strcpy(tmpstr,tmpstr+1); } strcat(tmpstr, "\\"); goto reset_scan; } return TRUE; case cmb1: /* file type drop list */ if (notification == CBN_SELCHANGE) { *tmpstr = 0; goto reset_scan; } return TRUE; case chx1: return TRUE; case pshHelp: return TRUE; case cmb2: /* disk drop list */ FILEDLG_StripEditControl(hWnd); lRet = SendDlgItemMessage16(hWnd, cmb2, CB_GETCURSEL16, 0, 0L); if (lRet == LB_ERR) return 0; pstr = SEGPTR_ALLOC(512); SendDlgItemMessage16(hWnd, cmb2, CB_GETLBTEXT16, lRet, (LPARAM)SEGPTR_GET(pstr)); sprintf(tmpstr, "%c:", pstr[2]); SEGPTR_FREE(pstr); if (notification != CBN_SELCHANGE) return TRUE; reset_scan: lRet = SendDlgItemMessage16(hWnd, cmb1, CB_GETCURSEL16, 0, 0); if (lRet == LB_ERR) return TRUE; pstr = (LPSTR)SendDlgItemMessage16(hWnd, cmb1, CB_GETITEMDATA16, lRet, 0); TRACE("Selected filter : %s\n", pstr); SetDlgItemTextA( hWnd, edt1, pstr ); FILEDLG_ScanDir(hWnd, tmpstr); in_update=TRUE; case IDOK: almost_ok: ofn2=*lpofn; /* for later restoring */ GetDlgItemTextA( hWnd, edt1, tmpstr, sizeof(tmpstr) ); pstr = strrchr(tmpstr, '\\'); if (pstr == NULL) pstr = strrchr(tmpstr, ':'); if (strchr(tmpstr,'*') != NULL || strchr(tmpstr,'?') != NULL) { /* edit control contains wildcards */ if (pstr != NULL) { lstrcpynA(tmpstr2, pstr+1, 512); *(pstr+1) = 0; } else { strcpy(tmpstr2, tmpstr); *tmpstr=0; } TRACE("tmpstr=%s, tmpstr2=%s\n", tmpstr, tmpstr2); SetDlgItemTextA( hWnd, edt1, tmpstr2 ); FILEDLG_ScanDir(hWnd, tmpstr); return TRUE; } /* no wildcards, we might have a directory or a filename */ /* try appending a wildcard and reading the directory */ pstr2 = tmpstr + strlen(tmpstr); if (pstr == NULL || *(pstr+1) != 0) strcat(tmpstr, "\\"); lRet = SendDlgItemMessage16(hWnd, cmb1, CB_GETCURSEL16, 0, 0); if (lRet == LB_ERR) return TRUE; lpofn->nFilterIndex = lRet + 1; TRACE("lpofn->nFilterIndex=%ld\n", lpofn->nFilterIndex); lstrcpynA(tmpstr2, FILEDLG_GetFileType(PTR_SEG_TO_LIN(lpofn->lpstrCustomFilter), PTR_SEG_TO_LIN(lpofn->lpstrFilter), lRet), sizeof(tmpstr2)); SetDlgItemTextA( hWnd, edt1, tmpstr2 ); if (!in_update) /* if ScanDir succeeds, we have changed the directory */ if (FILEDLG_ScanDir(hWnd, tmpstr)) return TRUE; /* if not, this must be a filename */ *pstr2 = 0; if (pstr != NULL) { /* strip off the pathname */ *pstr = 0; SetDlgItemTextA( hWnd, edt1, pstr + 1 ); lstrcpynA(tmpstr2, pstr+1, sizeof(tmpstr2) ); /* Should we MessageBox() if this fails? */ if (!FILEDLG_ScanDir(hWnd, tmpstr)) return TRUE; strcpy(tmpstr, tmpstr2); } else SetDlgItemTextA( hWnd, edt1, tmpstr ); #if 0 ShowWindow16(hWnd, SW_HIDE); /* this should not be necessary ?! (%%%) */ #endif { int lenstr2; int drive = DRIVE_GetCurrentDrive(); tmpstr2[0] = 'A'+ drive; tmpstr2[1] = ':'; tmpstr2[2] = '\\'; lstrcpynA(tmpstr2 + 3, DRIVE_GetDosCwd(drive), 507); lenstr2=strlen(tmpstr2); if (lenstr2 > 3) tmpstr2[lenstr2++]='\\'; lstrcpynA(tmpstr2+lenstr2, tmpstr, 512-lenstr2); if (lpofn->lpstrFile) lstrcpynA(PTR_SEG_TO_LIN(lpofn->lpstrFile), tmpstr2,lpofn->nMaxFile); } lpofn->nFileOffset = strrchr(tmpstr2,'\\') - tmpstr2 +1; lpofn->nFileExtension = 0; while(tmpstr2[lpofn->nFileExtension] != '.' && tmpstr2[lpofn->nFileExtension] != '\0') lpofn->nFileExtension++; if (tmpstr2[lpofn->nFileExtension] == '\0') lpofn->nFileExtension = 0; else lpofn->nFileExtension++; if(in_update) { if (FILEDLG_HookCallChk(lpofn)) FILEDLG_CallWindowProc(lpofn,hWnd, RegisterWindowMessageA( LBSELCHSTRING ), control, MAKELONG(lRet,CD_LBSELCHANGE)); in_update = FALSE; return TRUE; } if (PTR_SEG_TO_LIN(lpofn->lpstrFileTitle) != NULL) { lRet = SendDlgItemMessage16(hWnd, lst1, LB_GETCURSEL16, 0, 0); SendDlgItemMessage16(hWnd, lst1, LB_GETTEXT16, lRet, lpofn->lpstrFileTitle ); } if (FILEDLG_HookCallChk(lpofn)) { lRet= (BOOL16)FILEDLG_CallWindowProc(lpofn, hWnd, RegisterWindowMessageA( FILEOKSTRING ), 0, lParam ); if (lRet) { *lpofn=ofn2; /* restore old state */ #if 0 ShowWindow16(hWnd, SW_SHOW); /* only if above (%%%) SW_HIDE used */ #endif break; } } if ((lpofn->Flags & OFN_ALLOWMULTISELECT) && (lpofn->Flags & OFN_EXPLORER)) { if (lpofn->lpstrFile) { LPSTR str = (LPSTR)PTR_SEG_TO_LIN(lpofn->lpstrFile); LPSTR ptr = strrchr(str, '\\'); str[strlen(str) + 1] = '\0'; *ptr = 0; } } EndDialog(hWnd, TRUE); return TRUE; case IDCANCEL: EndDialog(hWnd, FALSE); return TRUE; } return FALSE; } /*********************************************************************** * FileOpenDlgProc16 (COMMDLG.6) */ LRESULT WINAPI FileOpenDlgProc16(HWND16 hWnd, UINT16 wMsg, WPARAM16 wParam, LPARAM lParam) { LPOPENFILENAME16 lpofn =(LPOPENFILENAME16)PTR_SEG_TO_LIN(GetPropA(hWnd,OFN_PROP)); if (wMsg!=WM_INITDIALOG) if (FILEDLG_HookCallChk(lpofn)) { LRESULT lRet=(BOOL16)FILEDLG_CallWindowProc(lpofn,hWnd,wMsg,wParam,lParam); if (lRet) return lRet; /* else continue message processing */ } switch (wMsg) { case WM_INITDIALOG: return FILEDLG_WMInitDialog(hWnd, wParam, lParam); case WM_MEASUREITEM: return FILEDLG_WMMeasureItem(hWnd, wParam, lParam); case WM_DRAWITEM: return FILEDLG_WMDrawItem(hWnd, wParam, lParam, FALSE); case WM_COMMAND: return FILEDLG_WMCommand(hWnd, wParam, lParam); #if 0 case WM_CTLCOLOR: SetBkColor((HDC16)wParam, 0x00C0C0C0); switch (HIWORD(lParam)) { case CTLCOLOR_BTN: SetTextColor((HDC16)wParam, 0x00000000); return hGRAYBrush; case CTLCOLOR_STATIC: SetTextColor((HDC16)wParam, 0x00000000); return hGRAYBrush; } break; #endif } return FALSE; } /*********************************************************************** * FileSaveDlgProc16 (COMMDLG.7) */ LRESULT WINAPI FileSaveDlgProc16(HWND16 hWnd, UINT16 wMsg, WPARAM16 wParam, LPARAM lParam) { LPOPENFILENAME16 lpofn =(LPOPENFILENAME16)PTR_SEG_TO_LIN(GetPropA(hWnd,OFN_PROP)); if (wMsg!=WM_INITDIALOG) if (FILEDLG_HookCallChk(lpofn)) { LRESULT lRet=(BOOL16)FILEDLG_CallWindowProc(lpofn,hWnd,wMsg,wParam,lParam); if (lRet) return lRet; /* else continue message processing */ } switch (wMsg) { case WM_INITDIALOG: return FILEDLG_WMInitDialog(hWnd, wParam, lParam); case WM_MEASUREITEM: return FILEDLG_WMMeasureItem(hWnd, wParam, lParam); case WM_DRAWITEM: return FILEDLG_WMDrawItem(hWnd, wParam, lParam, TRUE); case WM_COMMAND: return FILEDLG_WMCommand(hWnd, wParam, lParam); } /* case WM_CTLCOLOR: SetBkColor((HDC16)wParam, 0x00C0C0C0); switch (HIWORD(lParam)) { case CTLCOLOR_BTN: SetTextColor((HDC16)wParam, 0x00000000); return hGRAYBrush; case CTLCOLOR_STATIC: SetTextColor((HDC16)wParam, 0x00000000); return hGRAYBrush; } return FALSE; */ return FALSE; } static BOOL Commdlg_GetFileNameA( BOOL16 (CALLBACK *dofunction)(SEGPTR x), LPOPENFILENAMEA ofn ) { BOOL16 ret; LPOPENFILENAME16 ofn16 = SEGPTR_ALLOC(sizeof(OPENFILENAME16)); memset(ofn16,'\0',sizeof(*ofn16)); ofn16->lStructSize = sizeof(*ofn16); ofn16->hwndOwner = ofn->hwndOwner; ofn16->hInstance = MapHModuleLS(ofn->hInstance); if (ofn->lpstrFilter) { LPSTR s,x; /* filter is a list... title\0ext\0......\0\0 */ s = (LPSTR)ofn->lpstrFilter; while (*s) s = s+strlen(s)+1; s++; x = (LPSTR)SEGPTR_ALLOC(s-ofn->lpstrFilter); memcpy(x,ofn->lpstrFilter,s-ofn->lpstrFilter); ofn16->lpstrFilter = SEGPTR_GET(x); } if (ofn->lpstrCustomFilter) { LPSTR s,x; /* filter is a list... title\0ext\0......\0\0 */ s = (LPSTR)ofn->lpstrCustomFilter; while (*s) s = s+strlen(s)+1; s++; x = SEGPTR_ALLOC(s-ofn->lpstrCustomFilter); memcpy(x,ofn->lpstrCustomFilter,s-ofn->lpstrCustomFilter); ofn16->lpstrCustomFilter = SEGPTR_GET(x); } ofn16->nMaxCustFilter = ofn->nMaxCustFilter; ofn16->nFilterIndex = ofn->nFilterIndex; if (ofn->nMaxFile) ofn16->lpstrFile = SEGPTR_GET(SEGPTR_ALLOC(ofn->nMaxFile)); ofn16->nMaxFile = ofn->nMaxFile; ofn16->nMaxFileTitle = ofn->nMaxFileTitle; if (ofn16->nMaxFileTitle) ofn16->lpstrFileTitle = SEGPTR_GET(SEGPTR_ALLOC(ofn->nMaxFileTitle)); if (ofn->lpstrInitialDir) ofn16->lpstrInitialDir = SEGPTR_GET(SEGPTR_STRDUP(ofn->lpstrInitialDir)); if (ofn->lpstrTitle) ofn16->lpstrTitle = SEGPTR_GET(SEGPTR_STRDUP(ofn->lpstrTitle)); ofn16->Flags = ofn->Flags|OFN_WINE; ofn16->nFileOffset = ofn->nFileOffset; ofn16->nFileExtension = ofn->nFileExtension; if (ofn->lpstrDefExt) ofn16->lpstrDefExt = SEGPTR_GET(SEGPTR_STRDUP(ofn->lpstrDefExt)); ofn16->lCustData = ofn->lCustData; ofn16->lpfnHook = (LPOFNHOOKPROC16)ofn->lpfnHook; if (ofn->lpTemplateName) ofn16->lpTemplateName = SEGPTR_GET(SEGPTR_STRDUP(ofn->lpTemplateName)); ret = dofunction(SEGPTR_GET(ofn16)); ofn->nFileOffset = ofn16->nFileOffset; ofn->nFileExtension = ofn16->nFileExtension; if (ofn16->lpstrFilter) SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrFilter)); if (ofn16->lpTemplateName) SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpTemplateName)); if (ofn16->lpstrDefExt) SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrDefExt)); if (ofn16->lpstrTitle) SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrTitle)); if (ofn16->lpstrInitialDir) SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrInitialDir)); if (ofn16->lpstrCustomFilter) SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrCustomFilter)); if (ofn16->lpstrFile) { LPCSTR src = PTR_SEG_TO_LIN(ofn16->lpstrFile); LPSTR dst = ofn->lpstrFile; if ((ofn->Flags & OFN_ALLOWMULTISELECT) && (ofn->Flags & OFN_EXPLORER)) { /* FIXME(EPP): I tried to use: * memcpy(ofn->lpstrFile, PTR_SEG_TO_LIN(ofn16->lpstrFile, ofn->nMaxFile) * but it did crash with winamp 2.21, so copy string by string */ int len; do { strcpy(dst, src); len = strlen(dst) + 1; /* strlen(dst) == strlen(src) */ dst += len; src += len; } while (len > 1); } else { strcpy(dst, src); } SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrFile)); } if (ofn16->lpstrFileTitle) { if (ofn->lpstrFileTitle) strcpy(ofn->lpstrFileTitle, PTR_SEG_TO_LIN(ofn16->lpstrFileTitle)); SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrFileTitle)); } SEGPTR_FREE(ofn16); return ret; } static BOOL Commdlg_GetFileNameW( BOOL16 (CALLBACK *dofunction)(SEGPTR x), LPOPENFILENAMEW ofn ) { BOOL16 ret; LPOPENFILENAME16 ofn16 = SEGPTR_ALLOC(sizeof(OPENFILENAME16)); memset(ofn16,'\0',sizeof(*ofn16)); ofn16->lStructSize = sizeof(*ofn16); ofn16->hwndOwner = ofn->hwndOwner; ofn16->hInstance = MapHModuleLS(ofn->hInstance); if (ofn->lpstrFilter) { LPWSTR s; LPSTR x,y; int n; /* filter is a list... title\0ext\0......\0\0 */ s = (LPWSTR)ofn->lpstrFilter; while (*s) s = s+lstrlenW(s)+1; s++; n = s - ofn->lpstrFilter; /* already divides by 2. ptr magic */ x = y = (LPSTR)SEGPTR_ALLOC(n); s = (LPWSTR)ofn->lpstrFilter; while (*s) { lstrcpyWtoA(x,s); x+=lstrlenA(x)+1; s+=lstrlenW(s)+1; } *x=0; ofn16->lpstrFilter = SEGPTR_GET(y); } if (ofn->lpstrCustomFilter) { LPWSTR s; LPSTR x,y; int n; /* filter is a list... title\0ext\0......\0\0 */ s = (LPWSTR)ofn->lpstrCustomFilter; while (*s) s = s+lstrlenW(s)+1; s++; n = s - ofn->lpstrCustomFilter; x = y = (LPSTR)SEGPTR_ALLOC(n); s = (LPWSTR)ofn->lpstrCustomFilter; while (*s) { lstrcpyWtoA(x,s); x+=lstrlenA(x)+1; s+=lstrlenW(s)+1; } *x=0; ofn16->lpstrCustomFilter = SEGPTR_GET(y); } ofn16->nMaxCustFilter = ofn->nMaxCustFilter; ofn16->nFilterIndex = ofn->nFilterIndex; if (ofn->nMaxFile) ofn16->lpstrFile = SEGPTR_GET(SEGPTR_ALLOC(ofn->nMaxFile)); ofn16->nMaxFile = ofn->nMaxFile; ofn16->nMaxFileTitle = ofn->nMaxFileTitle; if (ofn->nMaxFileTitle) ofn16->lpstrFileTitle = SEGPTR_GET(SEGPTR_ALLOC(ofn->nMaxFileTitle)); if (ofn->lpstrInitialDir) ofn16->lpstrInitialDir = SEGPTR_GET(SEGPTR_STRDUP_WtoA(ofn->lpstrInitialDir)); if (ofn->lpstrTitle) ofn16->lpstrTitle = SEGPTR_GET(SEGPTR_STRDUP_WtoA(ofn->lpstrTitle)); ofn16->Flags = ofn->Flags|OFN_WINE|OFN_UNICODE; ofn16->nFileOffset = ofn->nFileOffset; ofn16->nFileExtension = ofn->nFileExtension; if (ofn->lpstrDefExt) ofn16->lpstrDefExt = SEGPTR_GET(SEGPTR_STRDUP_WtoA(ofn->lpstrDefExt)); ofn16->lCustData = ofn->lCustData; ofn16->lpfnHook = (LPOFNHOOKPROC16)ofn->lpfnHook; if (ofn->lpTemplateName) ofn16->lpTemplateName = SEGPTR_GET(SEGPTR_STRDUP_WtoA(ofn->lpTemplateName)); ret = dofunction(SEGPTR_GET(ofn16)); ofn->nFileOffset = ofn16->nFileOffset; ofn->nFileExtension = ofn16->nFileExtension; if (ofn16->lpstrFilter) SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrFilter)); if (ofn16->lpTemplateName) SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpTemplateName)); if (ofn16->lpstrDefExt) SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrDefExt)); if (ofn16->lpstrTitle) SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrTitle)); if (ofn16->lpstrInitialDir) SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrInitialDir)); if (ofn16->lpstrCustomFilter) SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrCustomFilter)); if (ofn16->lpstrFile) { LPCSTR src = PTR_SEG_TO_LIN(ofn16->lpstrFile); LPWSTR dst = ofn->lpstrFile; if ((ofn->Flags & OFN_ALLOWMULTISELECT) && (ofn->Flags & OFN_EXPLORER)) { int len; do { lstrcpyAtoW(dst, src); dst += lstrlenW(dst) + 1; src += (len = strlen(src) + 1); } while (len > 1); } else { lstrcpyAtoW(ofn->lpstrFile,PTR_SEG_TO_LIN(ofn16->lpstrFile)); } SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrFile)); } if (ofn16->lpstrFileTitle) { if (ofn->lpstrFileTitle) lstrcpyAtoW(ofn->lpstrFileTitle, PTR_SEG_TO_LIN(ofn16->lpstrFileTitle)); SEGPTR_FREE(PTR_SEG_TO_LIN(ofn16->lpstrFileTitle)); } SEGPTR_FREE(ofn16); return ret; } /*********************************************************************** * GetOpenFileNameA (COMDLG32.10) * * Creates a dialog box for the user to select a file to open. * * RETURNS * TRUE on succes: user enters a valid file * FALSE on cancel, error, close or filename-does-not-fit-in-buffer. * */ BOOL WINAPI GetOpenFileNameA( LPOPENFILENAMEA ofn) /* address of init structure */ { BOOL newlook; /* some flags don't allow to match the TWEAK_WineLook */ if (ofn->Flags & (OFN_ALLOWMULTISELECT|OFN_ENABLEHOOK|OFN_ENABLETEMPLATE)) { newlook = (ofn->Flags & OFN_EXPLORER) ? TRUE : FALSE; } else { /* no special flags set, we can match the TWEAK_WineLook */ newlook = (TWEAK_WineLook>WIN31_LOOK) ? TRUE : FALSE; } if (newlook) { return GetFileDialog95A(ofn, OPEN_DIALOG); } else { BOOL16 (CALLBACK * dofunction)(SEGPTR ofn16) = GetOpenFileName16; return Commdlg_GetFileNameA(dofunction,ofn); } } /*********************************************************************** * GetOpenFileNameW (COMDLG32.11) * * Creates a dialog box for the user to select a file to open. * * RETURNS * TRUE on succes: user enters a valid file * FALSE on cancel, error, close or filename-does-not-fit-in-buffer. * */ BOOL WINAPI GetOpenFileNameW( LPOPENFILENAMEW ofn) /* address of init structure */ { BOOL newlook; /* some flags don't allow to match the TWEAK_WineLook */ if (ofn->Flags & (OFN_ALLOWMULTISELECT|OFN_ENABLEHOOK|OFN_ENABLETEMPLATE)) { newlook = (ofn->Flags & OFN_EXPLORER) ? TRUE : FALSE; } else { /* no special flags set, we can match the TWEAK_WineLook */ newlook = (TWEAK_WineLook>WIN31_LOOK) ? TRUE : FALSE; } if (newlook) { return GetFileDialog95W(ofn, OPEN_DIALOG); } else { BOOL16 (CALLBACK * dofunction)(SEGPTR ofn16) = GetOpenFileName16; return Commdlg_GetFileNameW(dofunction,ofn); } } /*********************************************************************** * GetSaveFileNameA (COMDLG32.12) * * Creates a dialog box for the user to select a file to save. * * RETURNS * TRUE on succes: user enters a valid file * FALSE on cancel, error, close or filename-does-not-fit-in-buffer. * */ BOOL WINAPI GetSaveFileNameA( LPOPENFILENAMEA ofn) /* address of init structure */ { BOOL newlook; /* some flags don't allow to match the TWEAK_WineLook */ if (ofn->Flags & (OFN_ALLOWMULTISELECT|OFN_ENABLEHOOK|OFN_ENABLETEMPLATE)) { newlook = (ofn->Flags & OFN_EXPLORER) ? TRUE : FALSE; } else { /* no special flags set, we can match the TWEAK_WineLook */ newlook = (TWEAK_WineLook>WIN31_LOOK) ? TRUE : FALSE; } if (newlook) { return GetFileDialog95A(ofn, SAVE_DIALOG); } else { BOOL16 (CALLBACK * dofunction)(SEGPTR ofn16) = GetSaveFileName16; return Commdlg_GetFileNameA(dofunction,ofn); } } /*********************************************************************** * GetSaveFileNameW (COMDLG32.13) * * Creates a dialog box for the user to select a file to save. * * RETURNS * TRUE on succes: user enters a valid file * FALSE on cancel, error, close or filename-does-not-fit-in-buffer. * */ BOOL WINAPI GetSaveFileNameW( LPOPENFILENAMEW ofn) /* address of init structure */ { BOOL newlook; /* some flags don't allow to match the TWEAK_WineLook */ if (ofn->Flags & (OFN_ALLOWMULTISELECT|OFN_ENABLEHOOK|OFN_ENABLETEMPLATE)) { newlook = (ofn->Flags & OFN_EXPLORER) ? TRUE : FALSE; } else { /* no special flags set, we can match the TWEAK_WineLook */ newlook = (TWEAK_WineLook>WIN31_LOOK) ? TRUE : FALSE; } if (newlook) { return GetFileDialog95W(ofn, SAVE_DIALOG); } else { BOOL16 (CALLBACK * dofunction)(SEGPTR ofn16) = GetSaveFileName16; return Commdlg_GetFileNameW(dofunction,ofn); } } wine-20000526/dlls/commdlg/filedlg95.c0100644000175000001440000022122107100657667016770 0ustar julliardusers/* * COMMDLG - File Open Dialogs Win95 look and feel * */ #include #include #include #include #include "winbase.h" #include "ldt.h" #include "heap.h" #include "commdlg.h" #include "dlgs.h" #include "cdlg.h" #include "debugtools.h" #include "cderr.h" #include "tweak.h" #include "winnls.h" #include "shellapi.h" #include "tchar.h" #include "filedlgbrowser.h" #include "wine/obj_contextmenu.h" DEFAULT_DEBUG_CHANNEL(commdlg); /*********************************************************************** * Data structure and global variables */ typedef struct SFolder { int m_iImageIndex; /* Index of picture in image list */ HIMAGELIST hImgList; int m_iIndent; /* Indentation index */ LPITEMIDLIST pidlItem; /* absolute pidl of the item */ } SFOLDER,*LPSFOLDER; typedef struct tagLookInInfo { int iMaxIndentation; UINT uSelectedItem; } LookInInfos; /*********************************************************************** * Defines and global variables */ /* Draw item constant */ #define ICONWIDTH 18 #define YTEXTOFFSET 2 #define XTEXTOFFSET 3 /* AddItem flags*/ #define LISTEND -1 /* SearchItem methods */ #define SEARCH_PIDL 1 #define SEARCH_EXP 2 #define ITEM_NOTFOUND -1 /* Undefined windows message sent by CreateViewObject*/ #define WM_GETISHELLBROWSER WM_USER+7 /* NOTE * Those macros exist in windowsx.h. However, you can't really use them since * they rely on the UNICODE defines and can't be use inside Wine itself. */ /* Combo box macros */ #define CBAddString(hwnd,str) \ SendMessageA(hwnd,CB_ADDSTRING,0,(LPARAM)str); #define CBInsertString(hwnd,str,pos) \ SendMessageA(hwnd,CB_INSERTSTRING,(WPARAM)pos,(LPARAM)str); #define CBDeleteString(hwnd,pos) \ SendMessageA(hwnd,CB_DELETESTRING,(WPARAM)pos,0); #define CBSetItemDataPtr(hwnd,iItemId,dataPtr) \ SendMessageA(hwnd,CB_SETITEMDATA,(WPARAM)iItemId,(LPARAM)dataPtr); #define CBGetItemDataPtr(hwnd,iItemId) \ SendMessageA(hwnd,CB_GETITEMDATA,(WPARAM)iItemId,0) #define CBGetLBText(hwnd,iItemId,str) \ SendMessageA(hwnd,CB_GETLBTEXT,(WPARAM)iItemId,(LPARAM)str); #define CBGetCurSel(hwnd) \ SendMessageA(hwnd,CB_GETCURSEL,0,0); #define CBSetCurSel(hwnd,pos) \ SendMessageA(hwnd,CB_SETCURSEL,(WPARAM)pos,0); #define CBGetCount(hwnd) \ SendMessageA(hwnd,CB_GETCOUNT,0,0); #define CBShowDropDown(hwnd,show) \ SendMessageA(hwnd,CB_SHOWDROPDOWN,(WPARAM)show,0); #define CBSetItemHeight(hwnd,index,height) \ SendMessageA(hwnd,CB_SETITEMHEIGHT,(WPARAM)index,(LPARAM)height); const char *FileOpenDlgInfosStr = "FileOpenDlgInfos"; /* windows property description string */ const char *LookInInfosStr = "LookInInfos"; /* LOOKIN combo box property */ static const char defaultFilter[] = "*.*"; /*********************************************************************** * Prototypes */ /* Internal functions used by the dialog */ static LRESULT FILEDLG95_OnWMInitDialog(HWND hwnd, WPARAM wParam, LPARAM lParam); static LRESULT FILEDLG95_OnWMCommand(HWND hwnd, WPARAM wParam, LPARAM lParam); static LRESULT FILEDLG95_OnWMGetIShellBrowser(HWND hwnd); BOOL FILEDLG95_OnOpen(HWND hwnd); static LRESULT FILEDLG95_InitUI(HWND hwnd); static void FILEDLG95_Clean(HWND hwnd); /* Functions used by the shell object */ static LRESULT FILEDLG95_SHELL_Init(HWND hwnd); static BOOL FILEDLG95_SHELL_UpFolder(HWND hwnd); static BOOL FILEDLG95_SHELL_ExecuteCommand(HWND hwnd, LPCSTR lpVerb); static void FILEDLG95_SHELL_Clean(HWND hwnd); /* Functions used by the filetype combo box */ static HRESULT FILEDLG95_FILETYPE_Init(HWND hwnd); static BOOL FILEDLG95_FILETYPE_OnCommand(HWND hwnd, WORD wNotifyCode); static int FILEDLG95_FILETYPE_SearchExt(HWND hwnd,LPSTR lpstrExt); static void FILEDLG95_FILETYPE_Clean(HWND hwnd); /* Functions used by the Look In combo box */ static HRESULT FILEDLG95_LOOKIN_Init(HWND hwndCombo); static LRESULT FILEDLG95_LOOKIN_DrawItem(LPDRAWITEMSTRUCT pDIStruct); static BOOL FILEDLG95_LOOKIN_OnCommand(HWND hwnd, WORD wNotifyCode); static int FILEDLG95_LOOKIN_AddItem(HWND hwnd,LPITEMIDLIST pidl, int iInsertId); static int FILEDLG95_LOOKIN_SearchItem(HWND hwnd,WPARAM searchArg,int iSearchMethod); static int FILEDLG95_LOOKIN_InsertItemAfterParent(HWND hwnd,LPITEMIDLIST pidl); static int FILEDLG95_LOOKIN_RemoveMostExpandedItem(HWND hwnd); int FILEDLG95_LOOKIN_SelectItem(HWND hwnd,LPITEMIDLIST pidl); static void FILEDLG95_LOOKIN_Clean(HWND hwnd); /* Miscellaneous tool functions */ HRESULT GetName(LPSHELLFOLDER lpsf, LPITEMIDLIST pidl,DWORD dwFlags,LPSTR lpstrFileName); HRESULT GetFileName(HWND hwnd, LPITEMIDLIST pidl, LPSTR lpstrFileName); IShellFolder* GetShellFolderFromPidl(LPITEMIDLIST pidlAbs); LPITEMIDLIST GetParentPidl(LPITEMIDLIST pidl); LPITEMIDLIST GetPidlFromName(IShellFolder *psf,LPCSTR lpcstrFileName); /* Shell memory allocation */ static void *MemAlloc(UINT size); static void MemFree(void *mem); BOOL WINAPI GetFileName95(FileOpenDlgInfos *fodInfos); HRESULT WINAPI FileOpenDlgProc95(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam); HRESULT SendCustomDlgNotificationMessage(HWND hwndParentDlg, UINT uCode); HRESULT FILEDLG95_HandleCustomDialogMessages(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam); BOOL FILEDLG95_OnOpenMultipleFiles(HWND hwnd, LPSTR lpstrFileList, UINT nFileCount, UINT sizeUsed); /*********************************************************************** * GetFileName95 * * Creates an Open common dialog box that lets the user select * the drive, directory, and the name of a file or set of files to open. * * IN : The FileOpenDlgInfos structure associated with the dialog * OUT : TRUE on success * FALSE on cancel, error, close or filename-does-not-fit-in-buffer. */ BOOL WINAPI GetFileName95(FileOpenDlgInfos *fodInfos) { LRESULT lRes; LPCVOID template; HRSRC hRes; HANDLE hDlgTmpl = 0; /* Create the dialog from a template */ if(!(hRes = FindResourceA(COMMDLG_hInstance32,MAKEINTRESOURCEA(NEWFILEOPENORD),RT_DIALOGA))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource(COMMDLG_hInstance32, hRes )) || !(template = LockResource( hDlgTmpl ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } lRes = DialogBoxIndirectParamA(COMMDLG_hInstance32, (LPDLGTEMPLATEA) template, fodInfos->ofnInfos->hwndOwner, (DLGPROC) FileOpenDlgProc95, (LPARAM) fodInfos); /* Unable to create the dialog*/ if( lRes == -1) return FALSE; return lRes; } /*********************************************************************** * GetFileDialog95A * * Copy the OPENFILENAMEA structure in a FileOpenDlgInfos structure. * Call GetFileName95 with this structure and clean the memory. * * IN : The OPENFILENAMEA initialisation structure passed to * GetOpenFileNameA win api function (see filedlg.c) */ BOOL WINAPI GetFileDialog95A(LPOPENFILENAMEA ofn,UINT iDlgType) { BOOL ret; FileOpenDlgInfos *fodInfos; HINSTANCE hInstance; LPCSTR lpstrFilter = NULL; LPSTR lpstrCustomFilter = NULL; LPCSTR lpstrInitialDir = NULL; DWORD dwFlags = 0; /* Initialise FileOpenDlgInfos structure*/ fodInfos = (FileOpenDlgInfos*)MemAlloc(sizeof(FileOpenDlgInfos)); /* Pass in the original ofn */ fodInfos->ofnInfos = ofn; /* Save original hInstance value */ hInstance = ofn->hInstance; fodInfos->ofnInfos->hInstance = MapHModuleLS(ofn->hInstance); if (ofn->lpstrFilter) { LPSTR s,x; lpstrFilter = ofn->lpstrFilter; /* filter is a list... title\0ext\0......\0\0 */ s = (LPSTR)ofn->lpstrFilter; while (*s) s = s+strlen(s)+1; s++; x = (LPSTR)MemAlloc(s-ofn->lpstrFilter); memcpy(x,ofn->lpstrFilter,s-ofn->lpstrFilter); fodInfos->ofnInfos->lpstrFilter = (LPSTR)x; } if (ofn->lpstrCustomFilter) { LPSTR s,x; lpstrCustomFilter = ofn->lpstrCustomFilter; /* filter is a list... title\0ext\0......\0\0 */ s = (LPSTR)ofn->lpstrCustomFilter; while (*s) s = s+strlen(s)+1; s++; x = MemAlloc(s-ofn->lpstrCustomFilter); memcpy(x,ofn->lpstrCustomFilter,s-ofn->lpstrCustomFilter); fodInfos->ofnInfos->lpstrCustomFilter = (LPSTR)x; } dwFlags = ofn->Flags; fodInfos->ofnInfos->Flags = ofn->Flags|OFN_WINE; /* Replace the NULL lpstrInitialDir by the current folder */ lpstrInitialDir = ofn->lpstrInitialDir; if(!lpstrInitialDir) { fodInfos->ofnInfos->lpstrInitialDir = MemAlloc(MAX_PATH); GetCurrentDirectoryA(MAX_PATH,(LPSTR)fodInfos->ofnInfos->lpstrInitialDir); } /* Initialise the dialog property */ fodInfos->DlgInfos.dwDlgProp = 0; fodInfos->DlgInfos.hwndCustomDlg = (HWND)NULL; switch(iDlgType) { case OPEN_DIALOG : ret = GetFileName95(fodInfos); break; case SAVE_DIALOG : fodInfos->DlgInfos.dwDlgProp |= FODPROP_SAVEDLG; ret = GetFileName95(fodInfos); break; default : ret = 0; } if (lpstrInitialDir) { MemFree((LPVOID)(fodInfos->ofnInfos->lpstrInitialDir)); fodInfos->ofnInfos->lpstrInitialDir = lpstrInitialDir; } if (lpstrFilter) { MemFree((LPVOID)(fodInfos->ofnInfos->lpstrFilter)); fodInfos->ofnInfos->lpstrFilter = lpstrFilter; } if (lpstrCustomFilter) { MemFree((LPVOID)(fodInfos->ofnInfos->lpstrCustomFilter)); fodInfos->ofnInfos->lpstrCustomFilter = lpstrCustomFilter; } ofn->Flags = dwFlags; ofn->hInstance = hInstance; MemFree((LPVOID)(fodInfos)); return ret; } /*********************************************************************** * GetFileDialog95W * * Copy the OPENFILENAMEW structure in a FileOpenDlgInfos structure. * Call GetFileName95 with this structure and clean the memory. * * IN : The OPENFILENAMEW initialisation structure passed to * GetOpenFileNameW win api function (see filedlg.c) * * FIXME: * some more strings are needing to be convertet AtoW */ BOOL WINAPI GetFileDialog95W(LPOPENFILENAMEW ofn,UINT iDlgType) { BOOL ret; FileOpenDlgInfos *fodInfos; HINSTANCE hInstance; LPCSTR lpstrFilter = NULL; LPSTR lpstrCustomFilter = NULL; LPWSTR lpstrFile = NULL; DWORD dwFlags; /* Initialise FileOpenDlgInfos structure*/ fodInfos = (FileOpenDlgInfos*)MemAlloc(sizeof(FileOpenDlgInfos)); /* Pass in the original ofn */ fodInfos->ofnInfos = (LPOPENFILENAMEA) ofn; /* Save hInstance */ hInstance = fodInfos->ofnInfos->hInstance; fodInfos->ofnInfos->hInstance = MapHModuleLS(ofn->hInstance); /* Save lpstrFilter */ if (ofn->lpstrFilter) { LPWSTR s; LPSTR x,y; int n; lpstrFilter = fodInfos->ofnInfos->lpstrFilter; /* filter is a list... title\0ext\0......\0\0 */ s = (LPWSTR)ofn->lpstrFilter; while (*s) s = s+lstrlenW(s)+1; s++; n = s - ofn->lpstrFilter; /* already divides by 2. ptr magic */ x = y = (LPSTR)MemAlloc(n); s = (LPWSTR)ofn->lpstrFilter; while (*s) { lstrcpyWtoA(x,s); x+=lstrlenA(x)+1; s+=lstrlenW(s)+1; } *x=0; fodInfos->ofnInfos->lpstrFilter = (LPSTR)y; } /* Save lpstrCustomFilter */ if (ofn->lpstrCustomFilter) { LPWSTR s; LPSTR x,y; int n; lpstrCustomFilter = fodInfos->ofnInfos->lpstrCustomFilter; /* filter is a list... title\0ext\0......\0\0 */ s = (LPWSTR)ofn->lpstrCustomFilter; while (*s) s = s+lstrlenW(s)+1; s++; n = s - ofn->lpstrCustomFilter; x = y = (LPSTR)MemAlloc(n); s = (LPWSTR)ofn->lpstrCustomFilter; while (*s) { lstrcpyWtoA(x,s); x+=lstrlenA(x)+1; s+=lstrlenW(s)+1; } *x=0; fodInfos->ofnInfos->lpstrCustomFilter = (LPSTR)y; } /* Save Flags */ dwFlags = fodInfos->ofnInfos->Flags; fodInfos->ofnInfos->Flags = ofn->Flags|OFN_WINE|OFN_UNICODE; /* Initialise the dialog property */ fodInfos->DlgInfos.dwDlgProp = 0; /* allocate ansi filename buffer */ lpstrFile = ofn->lpstrFile; ofn->lpstrFile = MemAlloc(ofn->nMaxFile); switch(iDlgType) { case OPEN_DIALOG : ret = GetFileName95(fodInfos); break; case SAVE_DIALOG : fodInfos->DlgInfos.dwDlgProp |= FODPROP_SAVEDLG; ret = GetFileName95(fodInfos); break; default : ret = 0; } /* Cleaning */ /* Restore Flags */ fodInfos->ofnInfos->Flags = dwFlags; /* Restore lpstrFilter */ if (fodInfos->ofnInfos->lpstrFilter) { MemFree((LPVOID)(fodInfos->ofnInfos->lpstrFilter)); fodInfos->ofnInfos->lpstrFilter = lpstrFilter; } if (fodInfos->ofnInfos->lpstrCustomFilter) { MemFree((LPVOID)(fodInfos->ofnInfos->lpstrCustomFilter)); fodInfos->ofnInfos->lpstrCustomFilter = lpstrCustomFilter; } /* Restore hInstance */ fodInfos->ofnInfos->hInstance = hInstance; MemFree((LPVOID)(fodInfos)); /* filename */ lstrcpynAtoW(lpstrFile, (LPCSTR)ofn->lpstrFile, ofn->nMaxFile); MemFree(ofn->lpstrFile); ofn->lpstrFile = lpstrFile; return ret; } void ArrangeCtrlPositions( HWND hwndChildDlg, HWND hwndParentDlg) { HWND hwndChild,hwndStc32; RECT rectParent, rectChild, rectCtrl, rectStc32, rectTemp; POINT ptMoveCtl; POINT ptParentClient; ptMoveCtl.x = ptMoveCtl.y = 0; hwndStc32=GetDlgItem(hwndChildDlg,stc32); GetClientRect(hwndParentDlg,&rectParent); GetClientRect(hwndChildDlg,&rectChild); if(hwndStc32) { GetWindowRect(hwndStc32,&rectStc32); MapWindowPoints(0, hwndChildDlg,(LPPOINT)&rectStc32,2); CopyRect(&rectTemp,&rectStc32); SetRect(&rectStc32,rectStc32.left,rectStc32.top,rectStc32.left + (rectParent.right-rectParent.left),rectStc32.top+(rectParent.bottom-rectParent.top)); SetWindowPos(hwndStc32,0,rectStc32.left,rectStc32.top,rectStc32.right-rectStc32.left,rectStc32.bottom-rectStc32.top,SWP_NOMOVE|SWP_NOZORDER | SWP_NOACTIVATE); if(rectStc32.right < rectTemp.right) { ptParentClient.x = max((rectParent.right-rectParent.left),(rectChild.right-rectChild.left)); ptMoveCtl.x = 0; } else { ptMoveCtl.x = (rectStc32.right - rectTemp.right); ptParentClient.x = max((rectParent.right-rectParent.left),((rectChild.right-rectChild.left)+rectStc32.right-rectTemp.right)); } if(rectStc32.bottom < rectTemp.bottom) { ptParentClient.y = max((rectParent.bottom-rectParent.top),(rectChild.bottom-rectChild.top)); ptMoveCtl.y = 0; } else { ptMoveCtl.y = (rectStc32.bottom - rectTemp.bottom); ptParentClient.y = max((rectParent.bottom-rectParent.top),((rectChild.bottom-rectChild.top)+rectStc32.bottom-rectTemp.bottom)); } } else { if( (GetWindow(hwndChildDlg,GW_CHILD)) == (HWND) NULL) return; SetRectEmpty(&rectTemp); ptParentClient.x = max((rectParent.right-rectParent.left),(rectChild.right-rectChild.left)); ptParentClient.y = (rectParent.bottom-rectParent.top) + (rectChild.bottom-rectChild.top); ptMoveCtl.y = rectParent.bottom-rectParent.top; ptMoveCtl.x=0; } SetRect(&rectParent,rectParent.left,rectParent.top,rectParent.left+ptParentClient.x,rectParent.top+ptParentClient.y); AdjustWindowRectEx( &rectParent,GetWindowLongA(hwndParentDlg,GWL_STYLE),FALSE,GetWindowLongA(hwndParentDlg,GWL_EXSTYLE)); SetWindowPos(hwndChildDlg, 0, 0,0, ptParentClient.x,ptParentClient.y, SWP_NOZORDER ); SetWindowPos(hwndParentDlg, 0, rectParent.left,rectParent.top, (rectParent.right- rectParent.left), (rectParent.bottom-rectParent.top),SWP_NOMOVE | SWP_NOZORDER); hwndChild = GetWindow(hwndChildDlg,GW_CHILD); if(hwndStc32) { GetWindowRect(hwndStc32,&rectStc32); MapWindowPoints( 0, hwndChildDlg,(LPPOINT)&rectStc32,2); } else SetRect(&rectStc32,0,0,0,0); if (hwndChild ) { do { if(hwndChild != hwndStc32) { if (GetWindowLongA( hwndChild, GWL_STYLE ) & WS_MAXIMIZE) continue; GetWindowRect(hwndChild,&rectCtrl); MapWindowPoints( 0, hwndParentDlg,(LPPOINT)&rectCtrl,2); /* Check the initial position of the controls relative to the initial position and size of stc32 (before it is expanded). */ if (rectCtrl.left >= rectTemp.right && rectCtrl.top >= rectTemp.bottom) { rectCtrl.left += ptMoveCtl.x; rectCtrl.top += ptMoveCtl.y; } else if (rectCtrl.left >= rectTemp.right) rectCtrl.left += ptMoveCtl.x; else if (rectCtrl.top >= rectTemp.bottom) rectCtrl.top += ptMoveCtl.y; SetWindowPos( hwndChild, 0, rectCtrl.left, rectCtrl.top, rectCtrl.right-rectCtrl.left,rectCtrl.bottom-rectCtrl.top, SWP_NOSIZE | SWP_NOZORDER ); } } while ((hwndChild=GetWindow( hwndChild, GW_HWNDNEXT )) != (HWND)NULL); } hwndChild = GetWindow(hwndParentDlg,GW_CHILD); if(hwndStc32) { GetWindowRect(hwndStc32,&rectStc32); MapWindowPoints( 0, hwndChildDlg,(LPPOINT)&rectStc32,2); ptMoveCtl.x = rectStc32.left - 0; ptMoveCtl.y = rectStc32.top - 0; if (hwndChild ) { do { if(hwndChild != hwndChildDlg) { if (GetWindowLongA( hwndChild, GWL_STYLE ) & WS_MAXIMIZE) continue; GetWindowRect(hwndChild,&rectCtrl); MapWindowPoints( 0, hwndParentDlg,(LPPOINT)&rectCtrl,2); rectCtrl.left += ptMoveCtl.x; rectCtrl.top += ptMoveCtl.y; SetWindowPos( hwndChild, 0, rectCtrl.left, rectCtrl.top, rectCtrl.right-rectCtrl.left,rectCtrl.bottom-rectCtrl.top, SWP_NOSIZE |SWP_NOZORDER ); } } while ((hwndChild=GetWindow( hwndChild, GW_HWNDNEXT )) != (HWND)NULL); } } } HRESULT WINAPI FileOpenDlgProcUserTemplate(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(GetParent(hwnd),FileOpenDlgInfosStr); switch(uMsg) { case WM_INITDIALOG: { fodInfos = (FileOpenDlgInfos *)lParam; lParam = (LPARAM) fodInfos->ofnInfos; ArrangeCtrlPositions(hwnd,GetParent(hwnd)); if(fodInfos && (fodInfos->ofnInfos->Flags & OFN_ENABLEHOOK) && fodInfos->ofnInfos->lpfnHook) return CallWindowProcA((WNDPROC)fodInfos->ofnInfos->lpfnHook,hwnd,uMsg,wParam,lParam); return 0; } } if(fodInfos && (fodInfos->ofnInfos->Flags & OFN_ENABLEHOOK) && fodInfos->ofnInfos->lpfnHook ) return CallWindowProcA((WNDPROC)fodInfos->ofnInfos->lpfnHook,hwnd,uMsg,wParam,lParam); return DefWindowProcA(hwnd,uMsg,wParam,lParam); } HWND CreateTemplateDialog(FileOpenDlgInfos *fodInfos,HWND hwnd) { LPCVOID template; HRSRC hRes; HANDLE hDlgTmpl = 0; HWND hChildDlg = 0; if (fodInfos->ofnInfos->Flags & OFN_ENABLETEMPLATE || fodInfos->ofnInfos->Flags & OFN_ENABLETEMPLATEHANDLE) { if (fodInfos->ofnInfos->Flags & OFN_ENABLETEMPLATEHANDLE) { if( !(template = LockResource( fodInfos->ofnInfos->hInstance))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return (HWND)NULL; } } else { if (!(hRes = FindResourceA(MapHModuleSL(fodInfos->ofnInfos->hInstance), (fodInfos->ofnInfos->lpTemplateName), RT_DIALOGA))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return (HWND)NULL; } if (!(hDlgTmpl = LoadResource( MapHModuleSL(fodInfos->ofnInfos->hInstance), hRes )) || !(template = LockResource( hDlgTmpl ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return (HWND)NULL; } } hChildDlg= CreateDialogIndirectParamA(fodInfos->ofnInfos->hInstance,template,hwnd,(DLGPROC)FileOpenDlgProcUserTemplate,(LPARAM)fodInfos); if(hChildDlg) { ShowWindow(hChildDlg,SW_SHOW); return hChildDlg; } } else if(fodInfos->ofnInfos->Flags & OFN_ENABLEHOOK && fodInfos->ofnInfos->lpfnHook) { RECT rectHwnd; DLGTEMPLATE tmplate; GetClientRect(hwnd,&rectHwnd); tmplate.style = WS_CHILD | WS_CLIPSIBLINGS; tmplate.dwExtendedStyle = 0; tmplate.cdit = 0; tmplate.x = 0; tmplate.y = 0; tmplate.cx = rectHwnd.right-rectHwnd.left; tmplate.cy = rectHwnd.bottom-rectHwnd.top; return CreateDialogIndirectParamA(fodInfos->ofnInfos->hInstance,&tmplate,hwnd,(DLGPROC)FileOpenDlgProcUserTemplate,(LPARAM)fodInfos); } return (HWND)NULL; } /*********************************************************************** * SendCustomDlgNotificationMessage * * Send CustomDialogNotification (CDN_FIRST -- CDN_LAST) message to the custom template dialog */ HRESULT SendCustomDlgNotificationMessage(HWND hwndParentDlg, UINT uCode) { FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwndParentDlg,FileOpenDlgInfosStr); if(!fodInfos) return 0; if(fodInfos->DlgInfos.hwndCustomDlg) { OFNOTIFYA ofnNotify; ofnNotify.hdr.hwndFrom=hwndParentDlg; ofnNotify.hdr.idFrom=0; ofnNotify.hdr.code = uCode; ofnNotify.lpOFN = fodInfos->ofnInfos; return SendMessageA(fodInfos->DlgInfos.hwndCustomDlg,WM_NOTIFY,0,(LPARAM)&ofnNotify); } return TRUE; } /*********************************************************************** * FILEDLG95_HandleCustomDialogMessages * * Handle Custom Dialog Messages (CDM_FIRST -- CDM_LAST) messages */ HRESULT FILEDLG95_HandleCustomDialogMessages(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { LPSTR lpstrFileSpec; int reqSize; char lpstrPath[MAX_PATH]; FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwnd,FileOpenDlgInfosStr); if(!fodInfos) return -1; switch(uMsg) { case CDM_GETFILEPATH: GetDlgItemTextA(hwnd,IDC_FILENAME,lpstrPath, sizeof(lpstrPath)); lpstrFileSpec = (LPSTR)COMDLG32_PathFindFilenameA(lpstrPath); if (lpstrFileSpec==lpstrPath) { char lpstrCurrentDir[MAX_PATH]; /* Prepend the current path */ COMDLG32_SHGetPathFromIDListA(fodInfos->ShellInfos.pidlAbsCurrent,lpstrCurrentDir); if ((LPSTR)lParam!=NULL) wsnprintfA((LPSTR)lParam,(int)wParam,"%s\\%s",lpstrCurrentDir,lpstrPath); reqSize=strlen(lpstrCurrentDir)+1+strlen(lpstrPath)+1; } else { lstrcpynA((LPSTR)lParam,(LPSTR)lpstrPath,(int)wParam); reqSize=strlen(lpstrPath); } /* return the required buffer size */ return reqSize; case CDM_GETFOLDERPATH: COMDLG32_SHGetPathFromIDListA(fodInfos->ShellInfos.pidlAbsCurrent,lpstrPath); if ((LPSTR)lParam!=NULL) lstrcpynA((LPSTR)lParam,lpstrPath,(int)wParam); return strlen(lpstrPath); case CDM_GETSPEC: reqSize=GetDlgItemTextA(hwnd,IDC_FILENAME,lpstrPath, sizeof(lpstrPath)); lpstrFileSpec = (LPSTR)COMDLG32_PathFindFilenameA(lpstrPath); if ((LPSTR)lParam!=NULL) lstrcpynA((LPSTR)lParam, lpstrFileSpec, (int)wParam); return strlen(lpstrFileSpec); case CDM_SETCONTROLTEXT: if ( 0 != lParam ) SetDlgItemTextA( hwnd, (UINT) wParam, (LPSTR) lParam ); return TRUE; case CDM_HIDECONTROL: case CDM_SETDEFEXT: FIXME("CDM_HIDECONTROL,CDM_SETCONTROLTEXT,CDM_SETDEFEXT not implemented\n"); return -1; } return TRUE; } /*********************************************************************** * FileOpenDlgProc95 * * File open dialog procedure */ HRESULT WINAPI FileOpenDlgProc95(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { switch(uMsg) { case WM_INITDIALOG : /* Adds the FileOpenDlgInfos in the property list of the dialog so it will be easily accessible through a GetPropA(...) */ SetPropA(hwnd, FileOpenDlgInfosStr, (HANDLE) lParam); FILEDLG95_OnWMInitDialog(hwnd, wParam, lParam); ((FileOpenDlgInfos *)lParam)->DlgInfos.hwndCustomDlg = CreateTemplateDialog((FileOpenDlgInfos *)lParam,hwnd); SendCustomDlgNotificationMessage(hwnd,CDN_INITDONE); return 0; case WM_COMMAND: return FILEDLG95_OnWMCommand(hwnd, wParam, lParam); case WM_DRAWITEM: { switch(((LPDRAWITEMSTRUCT)lParam)->CtlID) { case IDC_LOOKIN: FILEDLG95_LOOKIN_DrawItem((LPDRAWITEMSTRUCT) lParam); return TRUE; } } return FALSE; case WM_GETISHELLBROWSER: return FILEDLG95_OnWMGetIShellBrowser(hwnd); case WM_DESTROY: RemovePropA(hwnd, FileOpenDlgInfosStr); return FALSE; case WM_NOTIFY: { LPNMHDR lpnmh = (LPNMHDR)lParam; UINT stringId = -1; /* set up the button tooltips strings */ if(TTN_GETDISPINFOA == lpnmh->code ) { LPNMTTDISPINFOA lpdi = (LPNMTTDISPINFOA)lParam; switch(lpnmh->idFrom ) { /* Up folder button */ case FCIDM_TB_UPFOLDER: stringId = IDS_UPFOLDER; break; /* New folder button */ case FCIDM_TB_NEWFOLDER: stringId = IDS_NEWFOLDER; break; /* List option button */ case FCIDM_TB_SMALLICON: stringId = IDS_LISTVIEW; break; /* Details option button */ case FCIDM_TB_REPORTVIEW: stringId = IDS_REPORTVIEW; break; } lpdi->hinst = COMMDLG_hInstance32; lpdi->lpszText = (LPSTR) stringId; } return FALSE; } default : if(uMsg >= CDM_FIRST && uMsg <= CDM_LAST) return FILEDLG95_HandleCustomDialogMessages(hwnd, uMsg, wParam, lParam); return FALSE; } } /*********************************************************************** * FILEDLG95_OnWMInitDialog * * WM_INITDIALOG message handler */ static LRESULT FILEDLG95_OnWMInitDialog(HWND hwnd, WPARAM wParam, LPARAM lParam) { LPITEMIDLIST pidlItemId; FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) lParam; TRACE("\n"); /* Initialise shell objects */ FILEDLG95_SHELL_Init(hwnd); /* Initialise dialog UI */ FILEDLG95_InitUI(hwnd); /* Initialize the Look In combo box*/ FILEDLG95_LOOKIN_Init(fodInfos->DlgInfos.hwndLookInCB); /* Initialize the filter combo box */ FILEDLG95_FILETYPE_Init(hwnd); /* Get the initial directory pidl */ if(!(pidlItemId = GetPidlFromName(fodInfos->Shell.FOIShellFolder,fodInfos->ofnInfos->lpstrInitialDir))) { char path[MAX_PATH]; GetCurrentDirectoryA(MAX_PATH,path); pidlItemId = GetPidlFromName(fodInfos->Shell.FOIShellFolder, path); } /* Browse to the initial directory */ IShellBrowser_BrowseObject(fodInfos->Shell.FOIShellBrowser,pidlItemId,SBSP_RELATIVE); /* Free pidlItem memory */ COMDLG32_SHFree(pidlItemId); return TRUE; } /*********************************************************************** * FILEDLG95_Clean * * Regroups all the cleaning functions of the filedlg */ void FILEDLG95_Clean(HWND hwnd) { FILEDLG95_FILETYPE_Clean(hwnd); FILEDLG95_LOOKIN_Clean(hwnd); FILEDLG95_SHELL_Clean(hwnd); } /*********************************************************************** * FILEDLG95_OnWMCommand * * WM_COMMAND message handler */ static LRESULT FILEDLG95_OnWMCommand(HWND hwnd, WPARAM wParam, LPARAM lParam) { WORD wNotifyCode = HIWORD(wParam); /* notification code */ WORD wID = LOWORD(wParam); /* item, control, or accelerator identifier */ FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwnd,FileOpenDlgInfosStr); switch(wID) { /* OK button */ case IDOK: if(FILEDLG95_OnOpen(hwnd)) SendCustomDlgNotificationMessage(hwnd,CDN_FILEOK); break; /* Cancel button */ case IDCANCEL: FILEDLG95_Clean(hwnd); EndDialog(hwnd, FALSE); break; /* Filetype combo box */ case IDC_FILETYPE: FILEDLG95_FILETYPE_OnCommand(hwnd,wNotifyCode); break; /* LookIn combo box */ case IDC_LOOKIN: FILEDLG95_LOOKIN_OnCommand(hwnd,wNotifyCode); break; /* --- toolbar --- */ /* Up folder button */ case FCIDM_TB_UPFOLDER: FILEDLG95_SHELL_UpFolder(hwnd); break; /* New folder button */ case FCIDM_TB_NEWFOLDER: FILEDLG95_SHELL_ExecuteCommand(hwnd,CMDSTR_NEWFOLDER); break; /* List option button */ case FCIDM_TB_SMALLICON: FILEDLG95_SHELL_ExecuteCommand(hwnd,CMDSTR_VIEWLIST); break; /* Details option button */ case FCIDM_TB_REPORTVIEW: FILEDLG95_SHELL_ExecuteCommand(hwnd,CMDSTR_VIEWDETAILS); break; case IDC_FILENAME: break; } /* Do not use the listview selection anymore */ fodInfos->DlgInfos.dwDlgProp &= ~FODPROP_USEVIEW; return 0; } /*********************************************************************** * FILEDLG95_OnWMGetIShellBrowser * * WM_GETISHELLBROWSER message handler */ static LRESULT FILEDLG95_OnWMGetIShellBrowser(HWND hwnd) { FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwnd,FileOpenDlgInfosStr); TRACE("\n"); SetWindowLongA(hwnd,DWL_MSGRESULT,(LONG)fodInfos->Shell.FOIShellBrowser); return TRUE; } /*********************************************************************** * FILEDLG95_InitUI * */ static LRESULT FILEDLG95_InitUI(HWND hwnd) { TBBUTTON tbb[] = {{VIEW_PARENTFOLDER, FCIDM_TB_UPFOLDER, TBSTATE_ENABLED, TBSTYLE_BUTTON, {0, 0}, 0, 0 }, {0, 0, TBSTATE_ENABLED, TBSTYLE_SEP, {0, 0}, 0, 0 }, {VIEW_NEWFOLDER, FCIDM_TB_NEWFOLDER, TBSTATE_ENABLED, TBSTYLE_BUTTON, {0, 0}, 0, 0 }, {0, 0, TBSTATE_ENABLED, TBSTYLE_SEP, {0, 0}, 0, 0 }, {VIEW_LIST, FCIDM_TB_SMALLICON, TBSTATE_ENABLED, TBSTYLE_BUTTON, {0, 0}, 0, 0 }, {VIEW_DETAILS, FCIDM_TB_REPORTVIEW, TBSTATE_ENABLED, TBSTYLE_BUTTON, {0, 0}, 0, 0 }, }; TBADDBITMAP tba = { HINST_COMMCTRL, IDB_VIEW_SMALL_COLOR }; RECT rectTB; FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwnd,FileOpenDlgInfosStr); TRACE("%p\n", fodInfos); /* Get the hwnd of the controls */ fodInfos->DlgInfos.hwndFileName = GetDlgItem(hwnd,IDC_FILENAME); fodInfos->DlgInfos.hwndFileTypeCB = GetDlgItem(hwnd,IDC_FILETYPE); fodInfos->DlgInfos.hwndLookInCB = GetDlgItem(hwnd,IDC_LOOKIN); /* construct the toolbar */ GetWindowRect(GetDlgItem(hwnd,IDC_TOOLBARSTATIC),&rectTB); MapWindowPoints( 0, hwnd,(LPPOINT)&rectTB,2); fodInfos->DlgInfos.hwndTB = CreateWindowExA(0, TOOLBARCLASSNAMEA, (LPSTR) NULL, WS_CHILD | WS_GROUP | TBSTYLE_TOOLTIPS | CCS_NODIVIDER | CCS_NORESIZE, 0, 0, 150, 26, hwnd, (HMENU) IDC_TOOLBAR, COMMDLG_hInstance32, NULL); SetWindowPos(fodInfos->DlgInfos.hwndTB, 0, rectTB.left,rectTB.top, rectTB.right-rectTB.left, rectTB.bottom-rectTB.top, SWP_SHOWWINDOW | SWP_NOACTIVATE | SWP_NOZORDER ); SendMessageA(fodInfos->DlgInfos.hwndTB, TB_BUTTONSTRUCTSIZE, (WPARAM) sizeof(TBBUTTON), 0); /* fixme: use TB_LOADIMAGES when implemented */ /* SendMessageA(fodInfos->DlgInfos.hwndTB, TB_LOADIMAGES, (WPARAM) IDB_VIEW_SMALL_COLOR, HINST_COMMCTRL);*/ SendMessageA(fodInfos->DlgInfos.hwndTB, TB_ADDBITMAP, (WPARAM) 12, (LPARAM) &tba); SendMessageA(fodInfos->DlgInfos.hwndTB, TB_ADDBUTTONSA, (WPARAM) 6,(LPARAM) &tbb); SendMessageA(fodInfos->DlgInfos.hwndTB, TB_AUTOSIZE, 0, 0); /* Set the window text with the text specified in the OPENFILENAME structure */ if(fodInfos->ofnInfos->lpstrTitle) { SetWindowTextA(hwnd,fodInfos->ofnInfos->lpstrTitle); } else if (fodInfos->DlgInfos.dwDlgProp & FODPROP_SAVEDLG) { SetWindowTextA(hwnd,"Save"); } /* Initialise the file name edit control */ if(fodInfos->ofnInfos->lpstrFile) { SetDlgItemTextA(hwnd,IDC_FILENAME,fodInfos->ofnInfos->lpstrFile); } /* Must the open as read only check box be checked ?*/ if(fodInfos->ofnInfos->Flags & OFN_READONLY) { SendDlgItemMessageA(hwnd,IDC_OPENREADONLY,BM_SETCHECK,(WPARAM)TRUE,0); } /* Must the open as read only check box be hid ?*/ if(fodInfos->ofnInfos->Flags & OFN_HIDEREADONLY) { ShowWindow(GetDlgItem(hwnd,IDC_OPENREADONLY),SW_HIDE); } /* Must the help button be hid ?*/ if (!(fodInfos->ofnInfos->Flags & OFN_SHOWHELP)) { ShowWindow(GetDlgItem(hwnd, pshHelp), SW_HIDE); } /* Resize the height, if open as read only checkbox ad help button are hidden */ if ( (fodInfos->ofnInfos->Flags & OFN_HIDEREADONLY) && (!(fodInfos->ofnInfos->Flags & OFN_SHOWHELP)) ) { RECT rectDlg, rectHelp, rectCancel; GetWindowRect(hwnd, &rectDlg); GetWindowRect(GetDlgItem(hwnd, pshHelp), &rectHelp); GetWindowRect(GetDlgItem(hwnd, IDCANCEL), &rectCancel); /* subtract the height of the help button plus the space between the help button and the cancel button to the height of the dialog */ SetWindowPos(hwnd, 0, 0, 0, rectDlg.right-rectDlg.left, (rectDlg.bottom-rectDlg.top) - (rectHelp.bottom - rectCancel.bottom), SWP_NOACTIVATE|SWP_NOMOVE|SWP_NOZORDER); } /* change Open to Save */ if (fodInfos->DlgInfos.dwDlgProp & FODPROP_SAVEDLG) { SetDlgItemTextA(hwnd,IDOK,"Save"); } return 0; } /*********************************************************************** * FILEDLG95_OnOpenMultipleFiles * * Handles the opening of multiple files. * */ BOOL FILEDLG95_OnOpenMultipleFiles(HWND hwnd, LPSTR lpstrFileList, UINT nFileCount, UINT sizeUsed) { CHAR lpstrPathSpec[MAX_PATH] = ""; CHAR lpstrTempFileList[MAX_PATH] = ""; LPSTR lpstrFile; UINT sizePath; UINT nCount; FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwnd,FileOpenDlgInfosStr); TRACE("\n"); lpstrFile = fodInfos->ofnInfos->lpstrFile; COMDLG32_SHGetPathFromIDListA( fodInfos->ShellInfos.pidlAbsCurrent, lpstrPathSpec ); sizePath = lstrlenA( lpstrPathSpec ); memset( lpstrFile, 0x0, fodInfos->ofnInfos->nMaxFile * sizeof(CHAR) ); if ( fodInfos->ofnInfos->Flags & OFN_FILEMUSTEXIST || !(fodInfos->ofnInfos->Flags & OFN_EXPLORER )) { LPSTR lpstrTemp = lpstrFileList; for ( nCount = 0; nCount < nFileCount; nCount++ ) { WIN32_FIND_DATAA findData; CHAR lpstrFindFile[MAX_PATH]; memset( lpstrFindFile, 0x0, MAX_PATH * sizeof(CHAR) ); lstrcpyA( lpstrFindFile, lpstrPathSpec ); lstrcatA( lpstrFindFile, "\\" ); lstrcatA( lpstrFindFile, lpstrTemp ); if ( FindFirstFileA( lpstrFindFile, &findData ) == INVALID_HANDLE_VALUE ) { CHAR lpstrNotFound[100]; CHAR lpstrMsg[100]; CHAR tmp[400]; LoadStringA(COMMDLG_hInstance32, IDS_FILENOTFOUND, lpstrNotFound, 100); LoadStringA(COMMDLG_hInstance32, IDS_VERIFYFILE, lpstrMsg, 100); strcpy(tmp, lpstrFindFile); strcat(tmp, "\n"); strcat(tmp, lpstrNotFound); strcat(tmp, "\n"); strcat(tmp, lpstrMsg); MessageBoxA(hwnd, tmp, fodInfos->ofnInfos->lpstrTitle, MB_OK | MB_ICONEXCLAMATION); return FALSE; } if (!(fodInfos->ofnInfos->Flags & OFN_EXPLORER )) { lstrcatA( lpstrTempFileList, findData.cAlternateFileName); if ( nCount + 1 < nFileCount) lstrcatA( lpstrTempFileList, " "); } lpstrTemp += strlen(lpstrFileList) + 1; } } if ( fodInfos->ofnInfos->Flags & OFN_EXPLORER ) { lstrcpyA( lpstrFile, lpstrPathSpec); memcpy( lpstrFile + sizePath + 1, lpstrFileList, sizeof(CHAR) * sizeUsed ); } else { memcpy( lpstrFile, lpstrTempFileList, sizeof(CHAR) * strlen(lpstrTempFileList)); } fodInfos->ofnInfos->nFileOffset = sizePath + 1; fodInfos->ofnInfos->nFileExtension = 0; /* clean and exit */ FILEDLG95_Clean(hwnd); return EndDialog(hwnd,TRUE); } /*********************************************************************** * FILEDLG95_OnOpen * * Ok button WM_COMMAND message handler * * If the function succeeds, the return value is nonzero. */ BOOL FILEDLG95_OnOpen(HWND hwnd) { CHAR lpstrSpecifiedByUser[MAX_PATH]; CHAR lpstrFileList[MAX_PATH]; LPSTR lpstrFile; UINT nStrCharCount = 0; UINT nFileCount = 0; UINT nFileIndex = 0; UINT sizeUsed = 0; UINT nStrLen = 0; FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwnd,FileOpenDlgInfosStr); lpstrSpecifiedByUser[0]=0; TRACE("\n"); lpstrFile = fodInfos->ofnInfos->lpstrFile; GetDlgItemTextA(hwnd, IDC_FILENAME, lpstrSpecifiedByUser, MAX_PATH); nStrLen = strlen(lpstrSpecifiedByUser); while ( nStrCharCount <= nStrLen ) { if ( lpstrSpecifiedByUser[nStrCharCount]=='"' ) { nStrCharCount++; while ((lpstrSpecifiedByUser[nStrCharCount]!='"') && (nStrCharCount <= nStrLen)) { lpstrFileList[nFileIndex++] = lpstrSpecifiedByUser[nStrCharCount]; nStrCharCount++; sizeUsed++; } lpstrFileList[nFileIndex++] = '\0'; sizeUsed++; nFileCount++; } nStrCharCount++; } if(nFileCount > 0) return FILEDLG95_OnOpenMultipleFiles(hwnd, lpstrFileList, nFileCount, sizeUsed); if (nStrLen) { LPSHELLFOLDER psfDesktop; LPITEMIDLIST browsePidl; LPSTR lpstrFileSpec; LPSTR lpstrTemp; char lpstrPathSpec[MAX_PATH]; char lpstrCurrentDir[MAX_PATH]; char lpstrPathAndFile[MAX_PATH]; lpstrPathSpec[0] = '\0'; lpstrCurrentDir[0] = '\0'; lpstrPathAndFile[0] = '\0'; /* Separate the file spec from the path spec e.g.: lpstrSpecifiedByUser lpstrPathSpec lpstrFileSpec C:\TEXT1\TEXT2 C:\TEXT1 TEXT2 */ if (nFileCount == 0) { lpstrFileSpec = (LPSTR)COMDLG32_PathFindFilenameA(lpstrSpecifiedByUser); strcpy(lpstrPathSpec,lpstrSpecifiedByUser); COMDLG32_PathRemoveFileSpecA(lpstrPathSpec); } /* Get the index of the selected item in the filetype combo box */ fodInfos->ofnInfos->nFilterIndex = (DWORD) CBGetCurSel(fodInfos->DlgInfos.hwndFileTypeCB); /* nFilterIndex is 1 based while combo GetCurSel return zero based index */ fodInfos->ofnInfos->nFilterIndex++; /* Get the current directory name */ COMDLG32_SHGetPathFromIDListA(fodInfos->ShellInfos.pidlAbsCurrent, lpstrCurrentDir); /* Create an absolute path name */ if(lpstrSpecifiedByUser[1] != ':') { switch(lpstrSpecifiedByUser[0]) { /* Add drive spec \TEXT => C:\TEXT */ case '\\': { int lenPathSpec=strlen(lpstrPathSpec); int iCopy = (lenPathSpec!=0?2:3); memmove(lpstrPathSpec+iCopy,lpstrPathSpec,lenPathSpec); strncpy(lpstrPathSpec,lpstrCurrentDir,iCopy); } break; /* Go to parent ..\TEXT */ case '.': { int iSize; char lpstrTmp2[MAX_PATH]; LPSTR lpstrTmp = strrchr(lpstrCurrentDir,'\\'); iSize = lpstrTmp - lpstrCurrentDir; strncpy(lpstrTmp2,lpstrCurrentDir,iSize + 1); if(strlen(lpstrSpecifiedByUser) <= 3) *lpstrFileSpec='\0'; if(strcmp(lpstrPathSpec,"..")) strcat(lpstrTmp2,&lpstrPathSpec[3]); strcpy(lpstrPathSpec,lpstrTmp2); } break; default: { char lpstrTmp[MAX_PATH]; if(strcmp(&lpstrCurrentDir[strlen(lpstrCurrentDir)-1],"\\")) strcat(lpstrCurrentDir,"\\"); strcpy(lpstrTmp,lpstrCurrentDir); strcat(lpstrTmp,lpstrPathSpec); strcpy(lpstrPathSpec,lpstrTmp); } } /* end switch */ } if(strlen(lpstrPathSpec)) { /* Browse to the right directory */ COMDLG32_SHGetDesktopFolder(&psfDesktop); if((browsePidl = GetPidlFromName(psfDesktop,lpstrPathSpec))) { /* Browse to directory */ IShellBrowser_BrowseObject(fodInfos->Shell.FOIShellBrowser, browsePidl, SBSP_ABSOLUTE); COMDLG32_SHFree(browsePidl); } else { /* Path does not exist */ if(fodInfos->ofnInfos->Flags & OFN_PATHMUSTEXIST) { MessageBoxA(hwnd, "Path does not exist", fodInfos->ofnInfos->lpstrTitle, MB_OK | MB_ICONEXCLAMATION); return FALSE; } } strcat(lpstrPathAndFile,lpstrPathSpec); IShellFolder_Release(psfDesktop); } else { strcat(lpstrPathAndFile,lpstrCurrentDir); } /* Create the path and file string */ COMDLG32_PathAddBackslashA(lpstrPathAndFile); strcat(lpstrPathAndFile,lpstrFileSpec); /* Update the edit field */ SetDlgItemTextA(hwnd,IDC_FILENAME,lpstrFileSpec); SendDlgItemMessageA(hwnd,IDC_FILENAME,EM_SETSEL,0,-1); /* Don't go further if we dont have a file spec */ if(!strlen(lpstrFileSpec) || !strcmp(lpstrFileSpec,lpstrPathSpec)) return FALSE; /* Time to check lpstrFileSpec */ /* search => contains * or ? */ /* browse => contains a directory name */ /* file => contains a file name */ /* Check if this is a search */ if(strchr(lpstrFileSpec,'*') || strchr(lpstrFileSpec,'?')) { int iPos; /* Set the current filter with the current selection */ if(fodInfos->ShellInfos.lpstrCurrentFilter) MemFree((LPVOID)fodInfos->ShellInfos.lpstrCurrentFilter); fodInfos->ShellInfos.lpstrCurrentFilter = MemAlloc((strlen(lpstrFileSpec)+1)*2); lstrcpyAtoW(fodInfos->ShellInfos.lpstrCurrentFilter, (LPSTR)strlwr((LPSTR)lpstrFileSpec)); IShellView_Refresh(fodInfos->Shell.FOIShellView); if(-1 < (iPos = FILEDLG95_FILETYPE_SearchExt(fodInfos->DlgInfos.hwndFileTypeCB, lpstrFileSpec))) CBSetCurSel(fodInfos->DlgInfos.hwndFileTypeCB,iPos); return FALSE; } /* browse if the user specified a directory */ browsePidl = GetPidlFromName(fodInfos->Shell.FOIShellFolder, lpstrFileSpec); if (!browsePidl) /* not a directory check the specified file exists */ { int iExt; char lpstrFileSpecTemp[MAX_PATH]; LPSTR lpstrExt; LPSTR lpOrg; LPSTR lpBuf; iExt = CBGetCurSel(fodInfos->DlgInfos.hwndFileTypeCB); lpOrg = (LPSTR) CBGetItemDataPtr(fodInfos->DlgInfos.hwndFileTypeCB, iExt); if ((int)lpOrg == -1) lpOrg = NULL; /* we get -1 if the filetype LB is empty */ lpstrExt = lpOrg; /* add user specified extentions to the file one by one and check if the file exists */ while(lpOrg) { int i; if ((lpstrExt = strchr(lpOrg, ';'))) { i = lpstrExt - lpOrg; } else i = strlen(lpOrg); lpBuf = MemAlloc(i+1); strncpy(lpBuf, lpOrg, i); lpBuf[i] = 0; strcpy(lpstrFileSpecTemp, lpstrFileSpec); if (lpstrFileSpecTemp[strlen(lpstrFileSpecTemp)-1] == '.') { if (strchr(lpBuf, '.')) strcat(lpstrFileSpecTemp, (strchr(lpBuf, '.')) + 1); } else strcat(lpstrFileSpecTemp, strchr(lpBuf, '.')); browsePidl = GetPidlFromName(fodInfos->Shell.FOIShellFolder, lpstrFileSpecTemp); MemFree((void *)lpBuf); if (browsePidl) { strcpy(lpstrFileSpec,lpstrFileSpecTemp); break; } if (lpstrExt) lpOrg = lpstrExt+1; else lpOrg = NULL; } } if (browsePidl) { ULONG ulAttr = SFGAO_FOLDER | SFGAO_HASSUBFOLDER; int nMsgBoxRet; char lpstrFileExist[MAX_PATH + 50]; IShellFolder_GetAttributesOf(fodInfos->Shell.FOIShellFolder, 1, &browsePidl, &ulAttr); /* Browse to directory if it is a folder */ if (ulAttr & SFGAO_FOLDER) { if(FAILED(IShellBrowser_BrowseObject(fodInfos->Shell.FOIShellBrowser, browsePidl, SBSP_RELATIVE))) { if(fodInfos->ofnInfos->Flags & OFN_PATHMUSTEXIST) { MessageBoxA(hwnd, "Path does not exist", fodInfos->ofnInfos->lpstrTitle, MB_OK | MB_ICONEXCLAMATION); COMDLG32_SHFree(browsePidl); return FALSE; } } COMDLG32_SHFree(browsePidl); return FALSE; } /* The file does exist, so ask the user if we should overwrite it */ if((fodInfos->DlgInfos.dwDlgProp & FODPROP_SAVEDLG) && (fodInfos->ofnInfos->Flags & OFN_OVERWRITEPROMPT)) { strcpy(lpstrFileExist, lpstrFileSpec); strcat(lpstrFileExist, " already exists.\nDo you want to replace it?"); nMsgBoxRet = MessageBoxA(hwnd, lpstrFileExist, fodInfos->ofnInfos->lpstrTitle, MB_YESNO | MB_ICONEXCLAMATION); if (nMsgBoxRet == IDNO) { COMDLG32_SHFree(browsePidl); return FALSE; } } COMDLG32_SHFree(browsePidl); } else { /* File does not exist in current directory */ /* The selected file does not exist */ /* Tell the user the selected does not exist */ if(fodInfos->ofnInfos->Flags & OFN_FILEMUSTEXIST) { char lpstrNotFound[100]; char lpstrMsg[100]; char tmp[400]; LoadStringA(COMMDLG_hInstance32, IDS_FILENOTFOUND, lpstrNotFound, 100); LoadStringA(COMMDLG_hInstance32, IDS_VERIFYFILE, lpstrMsg, 100); strcpy(tmp,fodInfos->ofnInfos->lpstrFile); strcat(tmp,"\n"); strcat(tmp,lpstrNotFound); strcat(tmp,"\n"); strcat(tmp,lpstrMsg); MessageBoxA(hwnd, tmp, fodInfos->ofnInfos->lpstrTitle, MB_OK | MB_ICONEXCLAMATION); return FALSE; } /* Ask the user if he wants to create the file*/ if(fodInfos->ofnInfos->Flags & OFN_CREATEPROMPT) { char tmp[100]; LoadStringA(COMMDLG_hInstance32,IDS_CREATEFILE,tmp,100); if(IDYES == MessageBoxA(hwnd,tmp,fodInfos->ofnInfos->lpstrTitle, MB_YESNO | MB_ICONQUESTION)) { /* Create the file, clean and exit */ FILEDLG95_Clean(hwnd); return EndDialog(hwnd,TRUE); } return FALSE; } } /* Open the selected file */ /* Check file extension */ if(!strrchr(lpstrPathAndFile,'.')) { /* if the file has no extension, append the selected extension of the filetype combo box */ int iExt; LPSTR lpstrExt; iExt = CBGetCurSel(fodInfos->DlgInfos.hwndFileTypeCB); lpstrTemp = (LPSTR) CBGetItemDataPtr(fodInfos->DlgInfos.hwndFileTypeCB,iExt); if((LPSTR)-1 != lpstrTemp) { if((lpstrExt = strchr(lpstrTemp,';'))) { int i = lpstrExt - lpstrTemp; lpstrExt = MemAlloc(i); strncpy(lpstrExt,&lpstrTemp[1],i-1); } else { lpstrExt = MemAlloc(strlen(lpstrTemp)); strcpy(lpstrExt,&lpstrTemp[1]); } if(!strcmp(&lpstrExt[1],"*") && fodInfos->ofnInfos->lpstrDefExt) { MemFree(lpstrExt); lpstrExt = MemAlloc(strlen(fodInfos->ofnInfos->lpstrDefExt)+2); strcat(lpstrExt,"."); strcat(lpstrExt,(LPSTR) fodInfos->ofnInfos->lpstrDefExt); } strcat(lpstrPathAndFile,lpstrExt); MemFree( lpstrExt ); } } /* Check that size size of the file does not exceed buffer size */ if(strlen(lpstrPathAndFile) > fodInfos->ofnInfos->nMaxFile) { /* set error FNERR_BUFFERTOSMALL */ FILEDLG95_Clean(hwnd); return EndDialog(hwnd,FALSE); } strcpy(fodInfos->ofnInfos->lpstrFile,lpstrPathAndFile); /* Set the lpstrFileTitle of the OPENFILENAME structure */ if(fodInfos->ofnInfos->lpstrFileTitle) strncpy(fodInfos->ofnInfos->lpstrFileTitle, lpstrFileSpec, fodInfos->ofnInfos->nMaxFileTitle); /* Check if the file is to be opened as read only */ if(BST_CHECKED == SendDlgItemMessageA(hwnd, IDC_OPENREADONLY, BM_GETSTATE,0,0)) SetFileAttributesA(fodInfos->ofnInfos->lpstrFile, FILE_ATTRIBUTE_READONLY); /* nFileExtension and nFileOffset of OPENFILENAME structure */ lpstrTemp = strrchr(fodInfos->ofnInfos->lpstrFile,'\\'); fodInfos->ofnInfos->nFileOffset = lpstrTemp - fodInfos->ofnInfos->lpstrFile + 1; lpstrTemp = strrchr(fodInfos->ofnInfos->lpstrFile,'.'); fodInfos->ofnInfos->nFileExtension = lpstrTemp - fodInfos->ofnInfos->lpstrFile + 1; /* clean and exit */ FILEDLG95_Clean(hwnd); return EndDialog(hwnd,TRUE); } return FALSE; } /*********************************************************************** * FILEDLG95_SHELL_Init * * Initialisation of the shell objects */ static HRESULT FILEDLG95_SHELL_Init(HWND hwnd) { FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwnd,FileOpenDlgInfosStr); TRACE("\n"); /* * Initialisation of the FileOpenDialogInfos structure */ /* Shell */ fodInfos->Shell.FOIShellView = NULL; if(FAILED(COMDLG32_SHGetDesktopFolder(&fodInfos->Shell.FOIShellFolder))) return E_FAIL; /*ShellInfos */ fodInfos->ShellInfos.hwndOwner = hwnd; fodInfos->ShellInfos.folderSettings.fFlags = 0; /* Disable multi-select if flag not set */ if (!(fodInfos->ofnInfos->Flags & OFN_ALLOWMULTISELECT)) { fodInfos->ShellInfos.folderSettings.fFlags |= FWF_SINGLESEL; } fodInfos->ShellInfos.folderSettings.fFlags |= FWF_AUTOARRANGE | FWF_ALIGNLEFT; fodInfos->ShellInfos.folderSettings.ViewMode = FVM_LIST; GetWindowRect(GetDlgItem(hwnd,IDC_SHELLSTATIC),&fodInfos->ShellInfos.rectView); ScreenToClient(hwnd,(LPPOINT)&fodInfos->ShellInfos.rectView.left); ScreenToClient(hwnd,(LPPOINT)&fodInfos->ShellInfos.rectView.right); /* Construct the IShellBrowser interface */ fodInfos->Shell.FOIShellBrowser = IShellBrowserImpl_Construct(hwnd); return NOERROR; } /*********************************************************************** * FILEDLG95_SHELL_ExecuteCommand * * Change the folder option and refresh the view * If the function succeeds, the return value is nonzero. */ static BOOL FILEDLG95_SHELL_ExecuteCommand(HWND hwnd, LPCSTR lpVerb) { FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwnd,FileOpenDlgInfosStr); IContextMenu * pcm; TRACE("(0x%08x,%p)\n", hwnd, lpVerb); if(SUCCEEDED(IShellView_GetItemObject(fodInfos->Shell.FOIShellView, SVGIO_BACKGROUND, &IID_IContextMenu, (LPVOID*)&pcm))) { CMINVOKECOMMANDINFO ci; ZeroMemory(&ci, sizeof(CMINVOKECOMMANDINFO)); ci.cbSize = sizeof(CMINVOKECOMMANDINFO); ci.lpVerb = lpVerb; ci.hwnd = hwnd; IContextMenu_InvokeCommand(pcm, &ci); IContextMenu_Release(pcm); } return FALSE; } /*********************************************************************** * FILEDLG95_SHELL_UpFolder * * Browse to the specified object * If the function succeeds, the return value is nonzero. */ static BOOL FILEDLG95_SHELL_UpFolder(HWND hwnd) { FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwnd,FileOpenDlgInfosStr); TRACE("\n"); if(SUCCEEDED(IShellBrowser_BrowseObject(fodInfos->Shell.FOIShellBrowser, NULL, SBSP_PARENT))) { return TRUE; } return FALSE; } /*********************************************************************** * FILEDLG95_SHELL_Clean * * Cleans the memory used by shell objects */ static void FILEDLG95_SHELL_Clean(HWND hwnd) { FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwnd,FileOpenDlgInfosStr); TRACE("\n"); /* clean Shell interfaces */ IShellView_DestroyViewWindow(fodInfos->Shell.FOIShellView); IShellView_Release(fodInfos->Shell.FOIShellView); IShellFolder_Release(fodInfos->Shell.FOIShellFolder); IShellBrowser_Release(fodInfos->Shell.FOIShellBrowser); } /*********************************************************************** * FILEDLG95_FILETYPE_Init * * Initialisation of the file type combo box */ static HRESULT FILEDLG95_FILETYPE_Init(HWND hwnd) { FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwnd,FileOpenDlgInfosStr); TRACE("\n"); if(fodInfos->ofnInfos->lpstrFilter) { int iStrIndex = 0; int iPos = 0; LPSTR lpstrFilter; LPSTR lpstrTmp; for(;;) { /* filter is a list... title\0ext\0......\0\0 * Set the combo item text to the title and the item data * to the ext */ char *lpstrExt = NULL; LPSTR lpstrExtTmp = NULL; /* Get the title */ lpstrTmp = (&((LPBYTE)fodInfos->ofnInfos->lpstrFilter)[iStrIndex]); if(!strlen(lpstrTmp)) break; iStrIndex += strlen(lpstrTmp) +1; /* Get the extension */ lpstrExtTmp = (&((LPBYTE)fodInfos->ofnInfos->lpstrFilter)[iStrIndex]); if(!lpstrExtTmp) break; lpstrExt = (LPSTR) MemAlloc(strlen(lpstrExtTmp)+1); if(!lpstrExt) break; strcpy(lpstrExt,lpstrExtTmp); iStrIndex += strlen(lpstrExt) +1; /* Add the item at the end of the combo */ CBAddString(fodInfos->DlgInfos.hwndFileTypeCB,lpstrTmp); CBSetItemDataPtr(fodInfos->DlgInfos.hwndFileTypeCB,iPos++,lpstrExt); } /* Set the current filter to the one specified * in the initialisation structure */ /* set default filter index */ if(fodInfos->ofnInfos->nFilterIndex == 0 && fodInfos->ofnInfos->lpstrCustomFilter == NULL) fodInfos->ofnInfos->nFilterIndex = 1; /* First, check to make sure our index isn't out of bounds. */ if ( fodInfos->ofnInfos->nFilterIndex > iPos ) fodInfos->ofnInfos->nFilterIndex = iPos; /* Get the current index selection. */ CBSetCurSel(fodInfos->DlgInfos.hwndFileTypeCB, fodInfos->ofnInfos->nFilterIndex-1); /* Get the corresponding text string from the combo box. */ lpstrFilter = (LPSTR) CBGetItemDataPtr(fodInfos->DlgInfos.hwndFileTypeCB, fodInfos->ofnInfos->nFilterIndex-1); if(lpstrFilter) { fodInfos->ShellInfos.lpstrCurrentFilter = MemAlloc((strlen(lpstrFilter)+1)*2); lstrcpyAtoW(fodInfos->ShellInfos.lpstrCurrentFilter,strlwr(lpstrFilter)); } } return NOERROR; } /*********************************************************************** * FILEDLG95_FILETYPE_OnCommand * * WM_COMMAND of the file type combo box * If the function succeeds, the return value is nonzero. */ static BOOL FILEDLG95_FILETYPE_OnCommand(HWND hwnd, WORD wNotifyCode) { FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwnd,FileOpenDlgInfosStr); switch(wNotifyCode) { case CBN_SELENDOK: { LPSTR lpstrFilter; /* Get the current item of the filetype combo box */ int iItem = CBGetCurSel(fodInfos->DlgInfos.hwndFileTypeCB); /* set the current filter index - indexed from 1 */ fodInfos->ofnInfos->nFilterIndex = iItem + 1; /* Set the current filter with the current selection */ if(fodInfos->ShellInfos.lpstrCurrentFilter) MemFree((LPVOID)fodInfos->ShellInfos.lpstrCurrentFilter); lpstrFilter = (LPSTR) CBGetItemDataPtr(fodInfos->DlgInfos.hwndFileTypeCB, iItem); if((int)lpstrFilter != CB_ERR) { fodInfos->ShellInfos.lpstrCurrentFilter = MemAlloc((strlen(lpstrFilter)+1)*2); lstrcpyAtoW(fodInfos->ShellInfos.lpstrCurrentFilter,(LPSTR)strlwr((LPSTR)lpstrFilter)); SendCustomDlgNotificationMessage(hwnd,CDN_TYPECHANGE); } /* Refresh the actual view to display the included items*/ IShellView_Refresh(fodInfos->Shell.FOIShellView); } } return FALSE; } /*********************************************************************** * FILEDLG95_FILETYPE_SearchExt * * Search for pidl in the lookin combo box * returns the index of the found item */ static int FILEDLG95_FILETYPE_SearchExt(HWND hwnd,LPSTR lpstrExt) { int i = 0; int iCount = CBGetCount(hwnd); TRACE("\n"); for(;iDlgInfos.hwndFileTypeCB); TRACE("\n"); /* Delete each string of the combo and their associated data */ for(iPos = iCount-1;iPos>=0;iPos--) { MemFree((LPVOID)(CBGetItemDataPtr(fodInfos->DlgInfos.hwndFileTypeCB,iPos))); CBDeleteString(fodInfos->DlgInfos.hwndFileTypeCB,iPos); } /* Current filter */ if(fodInfos->ShellInfos.lpstrCurrentFilter) MemFree((LPVOID)fodInfos->ShellInfos.lpstrCurrentFilter); } /*********************************************************************** * FILEDLG95_LOOKIN_Init * * Initialisation of the look in combo box */ static HRESULT FILEDLG95_LOOKIN_Init(HWND hwndCombo) { IShellFolder *psfRoot, *psfDrives; IEnumIDList *lpeRoot, *lpeDrives; LPITEMIDLIST pidlDrives, pidlTmp, pidlTmp1, pidlAbsTmp; LookInInfos *liInfos = MemAlloc(sizeof(LookInInfos)); TRACE("\n"); liInfos->iMaxIndentation = 0; SetPropA(hwndCombo, LookInInfosStr, (HANDLE) liInfos); CBSetItemHeight(hwndCombo,0,GetSystemMetrics(SM_CYSMICON)); /* Initialise data of Desktop folder */ COMDLG32_SHGetSpecialFolderLocation(0,CSIDL_DESKTOP,&pidlTmp); FILEDLG95_LOOKIN_AddItem(hwndCombo, pidlTmp,LISTEND); COMDLG32_SHFree(pidlTmp); COMDLG32_SHGetSpecialFolderLocation(0,CSIDL_DRIVES,&pidlDrives); COMDLG32_SHGetDesktopFolder(&psfRoot); if (psfRoot) { /* enumerate the contents of the desktop */ if(SUCCEEDED(IShellFolder_EnumObjects(psfRoot, hwndCombo, SHCONTF_FOLDERS, &lpeRoot))) { while (S_OK == IEnumIDList_Next(lpeRoot, 1, &pidlTmp, NULL)) { FILEDLG95_LOOKIN_AddItem(hwndCombo, pidlTmp,LISTEND); /* special handling for CSIDL_DRIVES */ if (COMDLG32_PIDL_ILIsEqual(pidlTmp, pidlDrives)) { if(SUCCEEDED(IShellFolder_BindToObject(psfRoot, pidlTmp, NULL, &IID_IShellFolder, (LPVOID*)&psfDrives))) { /* enumerate the drives */ if(SUCCEEDED(IShellFolder_EnumObjects(psfDrives, hwndCombo,SHCONTF_FOLDERS, &lpeDrives))) { while (S_OK == IEnumIDList_Next(lpeDrives, 1, &pidlTmp1, NULL)) { pidlAbsTmp = COMDLG32_PIDL_ILCombine(pidlTmp, pidlTmp1); FILEDLG95_LOOKIN_AddItem(hwndCombo, pidlAbsTmp,LISTEND); COMDLG32_SHFree(pidlAbsTmp); COMDLG32_SHFree(pidlTmp1); } IEnumIDList_Release(lpeDrives); } IShellFolder_Release(psfDrives); } } COMDLG32_SHFree(pidlTmp); } IEnumIDList_Release(lpeRoot); } } IShellFolder_Release(psfRoot); COMDLG32_SHFree(pidlDrives); return NOERROR; } /*********************************************************************** * FILEDLG95_LOOKIN_DrawItem * * WM_DRAWITEM message handler */ static LRESULT FILEDLG95_LOOKIN_DrawItem(LPDRAWITEMSTRUCT pDIStruct) { COLORREF crWin = GetSysColor(COLOR_WINDOW); COLORREF crHighLight = GetSysColor(COLOR_HIGHLIGHT); COLORREF crText = GetSysColor(COLOR_WINDOWTEXT); RECT rectText; RECT rectIcon; SHFILEINFOA sfi; HIMAGELIST ilItemImage; int iIndentation; LPSFOLDER tmpFolder; LookInInfos *liInfos = (LookInInfos *)GetPropA(pDIStruct->hwndItem,LookInInfosStr); TRACE("\n"); if(pDIStruct->itemID == -1) return 0; if(!(tmpFolder = (LPSFOLDER) CBGetItemDataPtr(pDIStruct->hwndItem, pDIStruct->itemID))) return 0; if(pDIStruct->itemID == liInfos->uSelectedItem) { ilItemImage = (HIMAGELIST) COMDLG32_SHGetFileInfoA ((LPCSTR) tmpFolder->pidlItem, 0, &sfi, sizeof (SHFILEINFOA), SHGFI_PIDL | SHGFI_SMALLICON | SHGFI_OPENICON | SHGFI_SYSICONINDEX | SHGFI_DISPLAYNAME ); } else { ilItemImage = (HIMAGELIST) COMDLG32_SHGetFileInfoA ((LPCSTR) tmpFolder->pidlItem, 0, &sfi, sizeof (SHFILEINFOA), SHGFI_PIDL | SHGFI_SMALLICON | SHGFI_SYSICONINDEX | SHGFI_DISPLAYNAME); } /* Is this item selected ?*/ if(pDIStruct->itemState & ODS_SELECTED) { SetTextColor(pDIStruct->hDC,(0x00FFFFFF & ~(crText))); SetBkColor(pDIStruct->hDC,crHighLight); FillRect(pDIStruct->hDC,&pDIStruct->rcItem,(HBRUSH)crHighLight); } else { SetTextColor(pDIStruct->hDC,crText); SetBkColor(pDIStruct->hDC,crWin); FillRect(pDIStruct->hDC,&pDIStruct->rcItem,(HBRUSH)crWin); } /* Do not indent item if drawing in the edit of the combo*/ if(pDIStruct->itemState & ODS_COMBOBOXEDIT) { iIndentation = 0; ilItemImage = (HIMAGELIST) COMDLG32_SHGetFileInfoA ((LPCSTR) tmpFolder->pidlItem, 0, &sfi, sizeof (SHFILEINFOA), SHGFI_PIDL | SHGFI_SMALLICON | SHGFI_OPENICON | SHGFI_SYSICONINDEX | SHGFI_DISPLAYNAME ); } else { iIndentation = tmpFolder->m_iIndent; } /* Draw text and icon */ /* Initialise the icon display area */ rectIcon.left = pDIStruct->rcItem.left + ICONWIDTH/2 * iIndentation; rectIcon.top = pDIStruct->rcItem.top; rectIcon.right = rectIcon.left + ICONWIDTH; rectIcon.bottom = pDIStruct->rcItem.bottom; /* Initialise the text display area */ rectText.left = rectIcon.right; rectText.top = pDIStruct->rcItem.top + YTEXTOFFSET; rectText.right = pDIStruct->rcItem.right + XTEXTOFFSET; rectText.bottom = pDIStruct->rcItem.bottom; /* Draw the icon from the image list */ COMDLG32_ImageList_Draw(ilItemImage, sfi.iIcon, pDIStruct->hDC, rectIcon.left, rectIcon.top, ILD_TRANSPARENT ); /* Draw the associated text */ if(sfi.szDisplayName) TextOutA(pDIStruct->hDC,rectText.left,rectText.top,sfi.szDisplayName,strlen(sfi.szDisplayName)); return NOERROR; } /*********************************************************************** * FILEDLG95_LOOKIN_OnCommand * * LookIn combo box WM_COMMAND message handler * If the function succeeds, the return value is nonzero. */ static BOOL FILEDLG95_LOOKIN_OnCommand(HWND hwnd, WORD wNotifyCode) { FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwnd,FileOpenDlgInfosStr); TRACE("%p\n", fodInfos); switch(wNotifyCode) { case CBN_SELENDOK: { LPSFOLDER tmpFolder; int iItem; iItem = CBGetCurSel(fodInfos->DlgInfos.hwndLookInCB); if(!(tmpFolder = (LPSFOLDER) CBGetItemDataPtr(fodInfos->DlgInfos.hwndLookInCB, iItem))) return FALSE; if(SUCCEEDED(IShellBrowser_BrowseObject(fodInfos->Shell.FOIShellBrowser, tmpFolder->pidlItem, SBSP_ABSOLUTE))) { return TRUE; } break; } } return FALSE; } /*********************************************************************** * FILEDLG95_LOOKIN_AddItem * * Adds an absolute pidl item to the lookin combo box * returns the index of the inserted item */ static int FILEDLG95_LOOKIN_AddItem(HWND hwnd,LPITEMIDLIST pidl, int iInsertId) { LPITEMIDLIST pidlNext; SHFILEINFOA sfi; SFOLDER *tmpFolder; LookInInfos *liInfos; TRACE("\n"); if(!pidl) return -1; if(!(liInfos = (LookInInfos *)GetPropA(hwnd,LookInInfosStr))) return -1; tmpFolder = MemAlloc(sizeof(SFOLDER)); tmpFolder->m_iIndent = 0; /* Calculate the indentation of the item in the lookin*/ pidlNext = pidl; while( (pidlNext=COMDLG32_PIDL_ILGetNext(pidlNext)) ) { tmpFolder->m_iIndent++; } tmpFolder->pidlItem = COMDLG32_PIDL_ILClone(pidl); if(tmpFolder->m_iIndent > liInfos->iMaxIndentation) liInfos->iMaxIndentation = tmpFolder->m_iIndent; COMDLG32_SHGetFileInfoA((LPSTR)pidl, 0, &sfi, sizeof(sfi), SHGFI_DISPLAYNAME | SHGFI_SYSICONINDEX | SHGFI_PIDL | SHGFI_SMALLICON | SHGFI_ATTRIBUTES); if((sfi.dwAttributes & SFGAO_FILESYSANCESTOR) || (sfi.dwAttributes & SFGAO_FILESYSTEM)) { int iItemID; /* Add the item at the end of the list */ if(iInsertId < 0) { iItemID = CBAddString(hwnd,sfi.szDisplayName); } /* Insert the item at the iInsertId position*/ else { iItemID = CBInsertString(hwnd,sfi.szDisplayName,iInsertId); } CBSetItemDataPtr(hwnd,iItemID,tmpFolder); return iItemID; } MemFree( tmpFolder ); return -1; } /*********************************************************************** * FILEDLG95_LOOKIN_InsertItemAfterParent * * Insert an item below its parent */ static int FILEDLG95_LOOKIN_InsertItemAfterParent(HWND hwnd,LPITEMIDLIST pidl) { LPITEMIDLIST pidlParent = GetParentPidl(pidl); int iParentPos; TRACE("\n"); iParentPos = FILEDLG95_LOOKIN_SearchItem(hwnd,(WPARAM)pidlParent,SEARCH_PIDL); if(iParentPos < 0) { iParentPos = FILEDLG95_LOOKIN_InsertItemAfterParent(hwnd,pidlParent); } /* Free pidlParent memory */ COMDLG32_SHFree((LPVOID)pidlParent); return FILEDLG95_LOOKIN_AddItem(hwnd,pidl,iParentPos + 1); } /*********************************************************************** * FILEDLG95_LOOKIN_SelectItem * * Adds an absolute pidl item to the lookin combo box * returns the index of the inserted item */ int FILEDLG95_LOOKIN_SelectItem(HWND hwnd,LPITEMIDLIST pidl) { int iItemPos; LookInInfos *liInfos; TRACE("\n"); iItemPos = FILEDLG95_LOOKIN_SearchItem(hwnd,(WPARAM)pidl,SEARCH_PIDL); liInfos = (LookInInfos *)GetPropA(hwnd,LookInInfosStr); if(iItemPos < 0) { while(FILEDLG95_LOOKIN_RemoveMostExpandedItem(hwnd) > -1); iItemPos = FILEDLG95_LOOKIN_InsertItemAfterParent(hwnd,pidl); } else { SFOLDER *tmpFolder = (LPSFOLDER) CBGetItemDataPtr(hwnd,iItemPos); while(liInfos->iMaxIndentation > tmpFolder->m_iIndent) { int iRemovedItem; if(-1 == (iRemovedItem = FILEDLG95_LOOKIN_RemoveMostExpandedItem(hwnd))) break; if(iRemovedItem < iItemPos) iItemPos--; } } CBSetCurSel(hwnd,iItemPos); liInfos->uSelectedItem = iItemPos; return 0; } /*********************************************************************** * FILEDLG95_LOOKIN_RemoveMostExpandedItem * * Remove the item with an expansion level over iExpansionLevel */ static int FILEDLG95_LOOKIN_RemoveMostExpandedItem(HWND hwnd) { int iItemPos; LookInInfos *liInfos = (LookInInfos *)GetPropA(hwnd,LookInInfosStr); TRACE("\n"); if(liInfos->iMaxIndentation <= 2) return -1; if((iItemPos = FILEDLG95_LOOKIN_SearchItem(hwnd,(WPARAM)liInfos->iMaxIndentation,SEARCH_EXP)) >=0) { SFOLDER *tmpFolder; tmpFolder = (LPSFOLDER) CBGetItemDataPtr(hwnd,iItemPos); CBDeleteString(hwnd,iItemPos); liInfos->iMaxIndentation--; return iItemPos; } return -1; } /*********************************************************************** * FILEDLG95_LOOKIN_SearchItem * * Search for pidl in the lookin combo box * returns the index of the found item */ static int FILEDLG95_LOOKIN_SearchItem(HWND hwnd,WPARAM searchArg,int iSearchMethod) { int i = 0; int iCount = CBGetCount(hwnd); TRACE("\n"); for(;ipidlItem)) return i; if(iSearchMethod == SEARCH_EXP && tmpFolder->m_iIndent == (int)searchArg) return i; } return -1; } /*********************************************************************** * FILEDLG95_LOOKIN_Clean * * Clean the memory used by the lookin combo box */ static void FILEDLG95_LOOKIN_Clean(HWND hwnd) { FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwnd,FileOpenDlgInfosStr); int iPos; int iCount = CBGetCount(fodInfos->DlgInfos.hwndLookInCB); TRACE("\n"); /* Delete each string of the combo and their associated data */ for(iPos = iCount-1;iPos>=0;iPos--) { MemFree((LPVOID)(CBGetItemDataPtr(fodInfos->DlgInfos.hwndLookInCB,iPos))); CBDeleteString(fodInfos->DlgInfos.hwndLookInCB,iPos); } /* LookInInfos structure */ RemovePropA(fodInfos->DlgInfos.hwndLookInCB,LookInInfosStr); } /* * TOOLS */ /* copied from shell32 to avoid linking to it */ static HRESULT COMDLG32_StrRetToStrNA (LPVOID dest, DWORD len, LPSTRRET src, LPITEMIDLIST pidl) { switch (src->uType) { case STRRET_WSTR: WideCharToMultiByte(CP_ACP, 0, src->u.pOleStr, -1, (LPSTR)dest, len, NULL, NULL); COMDLG32_SHFree(src->u.pOleStr); break; case STRRET_CSTRA: lstrcpynA((LPSTR)dest, src->u.cStr, len); break; case STRRET_OFFSETA: lstrcpynA((LPSTR)dest, ((LPCSTR)&pidl->mkid)+src->u.uOffset, len); break; default: FIXME("unknown type!\n"); if (len) { *(LPSTR)dest = '\0'; } return(FALSE); } return S_OK; } /*********************************************************************** * GetName * * Get the pidl's display name (relative to folder) and * put it in lpstrFileName. * * Return NOERROR on success, * E_FAIL otherwise */ HRESULT GetName(LPSHELLFOLDER lpsf, LPITEMIDLIST pidl,DWORD dwFlags,LPSTR lpstrFileName) { STRRET str; HRESULT hRes; TRACE("%p %p\n", lpsf, pidl); if(!lpsf) { HRESULT hRes; COMDLG32_SHGetDesktopFolder(&lpsf); hRes = GetName(lpsf,pidl,dwFlags,lpstrFileName); IShellFolder_Release(lpsf); return hRes; } /* Get the display name of the pidl relative to the folder */ if (SUCCEEDED(hRes = IShellFolder_GetDisplayNameOf(lpsf, pidl, dwFlags, &str))) { return COMDLG32_StrRetToStrNA(lpstrFileName, MAX_PATH, &str, pidl); } return E_FAIL; } /*********************************************************************** * GetShellFolderFromPidl * * pidlRel is the item pidl relative * Return the IShellFolder of the absolute pidl */ IShellFolder *GetShellFolderFromPidl(LPITEMIDLIST pidlAbs) { IShellFolder *psf = NULL,*psfParent; TRACE("%p\n", pidlAbs); if(SUCCEEDED(COMDLG32_SHGetDesktopFolder(&psfParent))) { psf = psfParent; if(pidlAbs && pidlAbs->mkid.cb) { if(SUCCEEDED(IShellFolder_BindToObject(psfParent, pidlAbs, NULL, &IID_IShellFolder, (LPVOID*)&psf))) { IShellFolder_Release(psfParent); return psf; } } /* return the desktop */ return psfParent; } return NULL; } /*********************************************************************** * GetParentPidl * * Return the LPITEMIDLIST to the parent of the pidl in the list */ LPITEMIDLIST GetParentPidl(LPITEMIDLIST pidl) { LPITEMIDLIST pidlParent; TRACE("%p\n", pidl); pidlParent = COMDLG32_PIDL_ILClone(pidl); COMDLG32_PIDL_ILRemoveLastID(pidlParent); return pidlParent; } /*********************************************************************** * GetPidlFromName * * returns the pidl of the file name relative to folder * NULL if an error occured */ LPITEMIDLIST GetPidlFromName(IShellFolder *psf,LPCSTR lpcstrFileName) { LPITEMIDLIST pidl; ULONG ulEaten; wchar_t lpwstrDirName[MAX_PATH]; TRACE("sf=%p file=%s\n", psf, lpcstrFileName); if(!lpcstrFileName) return NULL; MultiByteToWideChar(CP_ACP, MB_PRECOMPOSED, lpcstrFileName, -1, (LPWSTR)lpwstrDirName, MAX_PATH); IShellFolder_ParseDisplayName(psf, 0, NULL, (LPWSTR)lpwstrDirName, &ulEaten, &pidl, NULL); return pidl; } /*********************************************************************** * GetFileExtension * */ BOOL GetFileExtension(IShellFolder *psf,LPITEMIDLIST pidl,LPSTR lpstrFileExtension) { char FileName[MAX_PATH]; int result; char *pdest; int ch = '.'; if(SUCCEEDED(GetName(psf,pidl,SHGDN_NORMAL,FileName))) { if(!(pdest = strrchr( FileName, ch ))) return FALSE; result = pdest - FileName + 1; strcpy(lpstrFileExtension,&FileName[result]); return TRUE; } return FALSE; } /* * Memory allocation methods */ static void *MemAlloc(UINT size) { return HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,size); } static void MemFree(void *mem) { if(mem) { HeapFree(GetProcessHeap(),0,mem); } } wine-20000526/dlls/commdlg/filedlgbrowser.c0100644000175000001440000007664607100657667020241 0ustar julliardusers/* * Implementation of IShellBrowser for the File Open common dialog * * */ #include #include "unknwn.h" #include "filedlgbrowser.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "heap.h" #include "wine/obj_dataobject.h" #include "debugtools.h" #include "cdlg.h" #include "wine/undocshell.h" DEFAULT_DEBUG_CHANNEL(commdlg) #define SETDefFormatEtc(fe,cf,med) \ { \ (fe).cfFormat = cf;\ (fe).dwAspect = DVASPECT_CONTENT; \ (fe).ptd =NULL;\ (fe).tymed = med;\ (fe).lindex = -1;\ }; /************************************************************************** * Structure */ static ICOM_VTABLE(IShellBrowser) IShellBrowserImpl_Vtbl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE /* IUnknown */ IShellBrowserImpl_QueryInterface, IShellBrowserImpl_AddRef, IShellBrowserImpl_Release, /* IOleWindow */ IShellBrowserImpl_GetWindow, IShellBrowserImpl_ContextSensitiveHelp, /* IShellBrowser */ IShellBrowserImpl_InsertMenusSB, IShellBrowserImpl_SetMenuSB, IShellBrowserImpl_RemoveMenusSB, IShellBrowserImpl_SetStatusTextSB, IShellBrowserImpl_EnableModelessSB, IShellBrowserImpl_TranslateAcceleratorSB, IShellBrowserImpl_BrowseObject, IShellBrowserImpl_GetViewStateStream, IShellBrowserImpl_GetControlWindow, IShellBrowserImpl_SendControlMsg, IShellBrowserImpl_QueryActiveShellView, IShellBrowserImpl_OnViewWindowActive, IShellBrowserImpl_SetToolbarItems }; static ICOM_VTABLE(ICommDlgBrowser) IShellBrowserImpl_ICommDlgBrowser_Vtbl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE /* IUnknown */ IShellBrowserImpl_ICommDlgBrowser_QueryInterface, IShellBrowserImpl_ICommDlgBrowser_AddRef, IShellBrowserImpl_ICommDlgBrowser_Release, /* ICommDlgBrowser */ IShellBrowserImpl_ICommDlgBrowser_OnDefaultCommand, IShellBrowserImpl_ICommDlgBrowser_OnStateChange, IShellBrowserImpl_ICommDlgBrowser_IncludeObject }; /************************************************************************** * Local Prototypes */ HRESULT IShellBrowserImpl_ICommDlgBrowser_OnSelChange(ICommDlgBrowser *iface, IShellView *ppshv); #if 0 LPITEMIDLIST GetSelectedPidl(IShellView *ppshv); #endif /************************************************************************** * External Prototypes */ extern const char *FileOpenDlgInfosStr; extern HRESULT GetName(LPSHELLFOLDER lpsf, LPITEMIDLIST pidl,DWORD dwFlags,LPSTR lpstrFileName); extern HRESULT GetFileName(HWND hwnd, LPITEMIDLIST pidl, LPSTR lpstrFileName); extern IShellFolder* GetShellFolderFromPidl(LPITEMIDLIST pidlAbs); extern LPITEMIDLIST GetParentPidl(LPITEMIDLIST pidl); extern LPITEMIDLIST GetPidlFromName(IShellFolder *psf,LPCSTR lpcstrFileName); extern BOOL FILEDLG95_SHELL_FillIncludedItemList(HWND hwnd, LPITEMIDLIST pidlCurrentFolder, LPSTR lpstrMask); extern int FILEDLG95_LOOKIN_SelectItem(HWND hwnd,LPITEMIDLIST pidl); extern BOOL FILEDLG95_OnOpen(HWND hwnd); extern HRESULT SendCustomDlgNotificationMessage(HWND hwndParentDlg, UINT uCode); /************************************************************************** * IShellBrowserImpl_Construct */ IShellBrowser * IShellBrowserImpl_Construct(HWND hwndOwner) { IShellBrowserImpl *sb; FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwndOwner,FileOpenDlgInfosStr); sb=(IShellBrowserImpl*)COMDLG32_SHAlloc(sizeof(IShellBrowserImpl)); /* Initialisation of the member variables */ sb->ref=1; sb->hwndOwner = hwndOwner; /* Initialisation of the vTables */ sb->lpVtbl = &IShellBrowserImpl_Vtbl; sb->lpVtbl2 = &IShellBrowserImpl_ICommDlgBrowser_Vtbl; COMDLG32_SHGetSpecialFolderLocation(hwndOwner, CSIDL_DESKTOP, &fodInfos->ShellInfos.pidlAbsCurrent); TRACE("%p\n", sb); return (IShellBrowser *) sb; } /************************************************************************** * * * The INTERFACE of the IShellBrowser object * */ /* * IUnknown */ /*************************************************************************** * IShellBrowserImpl_QueryInterface */ HRESULT WINAPI IShellBrowserImpl_QueryInterface(IShellBrowser *iface, REFIID riid, LPVOID *ppvObj) { ICOM_THIS(IShellBrowserImpl, iface); TRACE("(%p)\n", This); *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown)) /*IUnknown*/ { *ppvObj = This; } else if(IsEqualIID(riid, &IID_IOleWindow)) /*IOleWindow*/ { *ppvObj = (IOleWindow*)This; } else if(IsEqualIID(riid, &IID_IShellBrowser)) /*IShellBrowser*/ { *ppvObj = (IShellBrowser*)This; } else if(IsEqualIID(riid, &IID_ICommDlgBrowser)) /*ICommDlgBrowser*/ { *ppvObj = (ICommDlgBrowser*) &(This->lpVtbl2); } if(*ppvObj) { IUnknown_AddRef( (IShellBrowser*) *ppvObj); return S_OK; } return E_NOINTERFACE; } /************************************************************************** * IShellBrowser::AddRef */ ULONG WINAPI IShellBrowserImpl_AddRef(IShellBrowser * iface) { ICOM_THIS(IShellBrowserImpl, iface); TRACE("(%p)\n", This); return ++(This->ref); } /************************************************************************** * IShellBrowserImpl_Release */ ULONG WINAPI IShellBrowserImpl_Release(IShellBrowser * iface) { ICOM_THIS(IShellBrowserImpl, iface); TRACE("(%p)\n", This); if (!--(This->ref)) { COMDLG32_SHFree(This); return 0; } return This->ref; } /* * IOleWindow */ /************************************************************************** * IShellBrowserImpl_GetWindow (IOleWindow) * * Inherited from IOleWindow::GetWindow * * See Windows documentation for more details * * Note : We will never be window less in the File Open dialog * */ HRESULT WINAPI IShellBrowserImpl_GetWindow(IShellBrowser * iface, HWND * phwnd) { ICOM_THIS(IShellBrowserImpl, iface); TRACE("(%p)\n", This); if(!This->hwndOwner) return E_FAIL; *phwnd = This->hwndOwner; return (*phwnd) ? S_OK : E_UNEXPECTED; } /************************************************************************** * IShellBrowserImpl_ContextSensitiveHelp */ HRESULT WINAPI IShellBrowserImpl_ContextSensitiveHelp(IShellBrowser * iface, BOOL fEnterMode) { ICOM_THIS(IShellBrowserImpl, iface); TRACE("(%p)\n", This); /* Feature not implemented */ return E_NOTIMPL; } /* * IShellBrowser */ /************************************************************************** * IShellBrowserImpl_BrowseObject * * See Windows documentation on IShellBrowser::BrowseObject for more details * * This function will override user specified flags and will always * use SBSP_DEFBROWSER and SBSP_DEFMODE. */ HRESULT WINAPI IShellBrowserImpl_BrowseObject(IShellBrowser *iface, LPCITEMIDLIST pidl, UINT wFlags) { HRESULT hRes; IShellFolder *psfTmp; IShellView *psvTmp; FileOpenDlgInfos *fodInfos; LPITEMIDLIST pidlTmp; ICOM_THIS(IShellBrowserImpl, iface); TRACE("(%p)\n", This); fodInfos = (FileOpenDlgInfos *) GetPropA(This->hwndOwner,FileOpenDlgInfosStr); /* Format the pidl according to its parameter's category */ if(wFlags & SBSP_RELATIVE) { /* SBSP_RELATIVE A relative pidl (relative from the current folder) */ hRes = IShellFolder_BindToObject(fodInfos->Shell.FOIShellFolder, pidl, NULL, &IID_IShellFolder, (LPVOID *)&psfTmp); if(FAILED(hRes)) { return hRes; } /* create an absolute pidl */ pidlTmp = COMDLG32_PIDL_ILCombine(fodInfos->ShellInfos.pidlAbsCurrent, (LPITEMIDLIST)pidl); } else if(wFlags & SBSP_PARENT) { /* Browse the parent folder (ignores the pidl) */ pidlTmp = GetParentPidl(fodInfos->ShellInfos.pidlAbsCurrent); psfTmp = GetShellFolderFromPidl(pidlTmp); } else { /* An absolute pidl (relative from the desktop) */ pidlTmp = COMDLG32_PIDL_ILClone((LPITEMIDLIST)pidl); psfTmp = GetShellFolderFromPidl(pidlTmp); } /* Retrieve the IShellFolder interface of the pidl specified folder */ if(!psfTmp) return E_FAIL; /* If the pidl to browse to is equal to the actual pidl ... do nothing and pretend you did it*/ if(COMDLG32_PIDL_ILIsEqual(pidlTmp,fodInfos->ShellInfos.pidlAbsCurrent)) { IShellFolder_Release(psfTmp); COMDLG32_SHFree(pidlTmp); return NOERROR; } /* Release the current fodInfos->Shell.FOIShellFolder and update its value */ IShellFolder_Release(fodInfos->Shell.FOIShellFolder); fodInfos->Shell.FOIShellFolder = psfTmp; /* Create the associated view */ if(SUCCEEDED(hRes = IShellFolder_CreateViewObject(psfTmp, fodInfos->ShellInfos.hwndOwner, &IID_IShellView, (LPVOID *)&psvTmp))) { HWND hwndView; HWND hDlgWnd; /* Get the foldersettings from the old view */ if(fodInfos->Shell.FOIShellView) { IShellView_GetCurrentInfo(fodInfos->Shell.FOIShellView, &fodInfos->ShellInfos.folderSettings); } /* Create the window */ if(SUCCEEDED(hRes = IShellView_CreateViewWindow(psvTmp, NULL, &fodInfos->ShellInfos.folderSettings, fodInfos->Shell.FOIShellBrowser, &fodInfos->ShellInfos.rectView, &hwndView))) { /* Fit the created view in the appropriate RECT */ MoveWindow(hwndView, fodInfos->ShellInfos.rectView.left, fodInfos->ShellInfos.rectView.top, fodInfos->ShellInfos.rectView.right-fodInfos->ShellInfos.rectView.left, fodInfos->ShellInfos.rectView.bottom-fodInfos->ShellInfos.rectView.top, FALSE); /* Select the new folder in the Look In combo box of the Open file dialog */ FILEDLG95_LOOKIN_SelectItem(fodInfos->DlgInfos.hwndLookInCB,pidlTmp); /* Release old pidlAbsCurrent memory and update its value */ COMDLG32_SHFree((LPVOID)fodInfos->ShellInfos.pidlAbsCurrent); fodInfos->ShellInfos.pidlAbsCurrent = pidlTmp; /* Release the current fodInfos->Shell.FOIShellView and update its value */ if(fodInfos->Shell.FOIShellView) { IShellView_DestroyViewWindow(fodInfos->Shell.FOIShellView); IShellView_Release(fodInfos->Shell.FOIShellView); } #if 0 ShowWindow(fodInfos->ShellInfos.hwndView,SW_HIDE); #endif fodInfos->Shell.FOIShellView = psvTmp; fodInfos->ShellInfos.hwndView = hwndView; /* changes the tab order of the ListView to reflect the window's File Dialog */ hDlgWnd = GetDlgItem(GetParent(hwndView), IDC_LOOKIN); SetWindowPos(hwndView, hDlgWnd, 0,0,0,0, SWP_NOMOVE | SWP_NOSIZE); return NOERROR; } } FILEDLG95_LOOKIN_SelectItem(fodInfos->DlgInfos.hwndLookInCB,fodInfos->ShellInfos.pidlAbsCurrent); return hRes; } /************************************************************************** * IShellBrowserImpl_EnableModelessSB */ HRESULT WINAPI IShellBrowserImpl_EnableModelessSB(IShellBrowser *iface, BOOL fEnable) { ICOM_THIS(IShellBrowserImpl, iface); TRACE("(%p)\n", This); /* Feature not implemented */ return E_NOTIMPL; } /************************************************************************** * IShellBrowserImpl_GetControlWindow */ HRESULT WINAPI IShellBrowserImpl_GetControlWindow(IShellBrowser *iface, UINT id, HWND *lphwnd) { ICOM_THIS(IShellBrowserImpl, iface); TRACE("(%p)\n", This); /* Feature not implemented */ return E_NOTIMPL; } /************************************************************************** * IShellBrowserImpl_GetViewStateStream */ HRESULT WINAPI IShellBrowserImpl_GetViewStateStream(IShellBrowser *iface, DWORD grfMode, LPSTREAM *ppStrm) { ICOM_THIS(IShellBrowserImpl, iface); TRACE("(%p)\n", This); /* Feature not implemented */ return E_NOTIMPL; } /************************************************************************** * IShellBrowserImpl_InsertMenusSB */ HRESULT WINAPI IShellBrowserImpl_InsertMenusSB(IShellBrowser *iface, HMENU hmenuShared, LPOLEMENUGROUPWIDTHS lpMenuWidths) { ICOM_THIS(IShellBrowserImpl, iface); TRACE("(%p)\n", This); /* Feature not implemented */ return E_NOTIMPL; } /************************************************************************** * IShellBrowserImpl_OnViewWindowActive */ HRESULT WINAPI IShellBrowserImpl_OnViewWindowActive(IShellBrowser *iface, IShellView *ppshv) { ICOM_THIS(IShellBrowserImpl, iface); TRACE("(%p)\n", This); /* Feature not implemented */ return E_NOTIMPL; } /************************************************************************** * IShellBrowserImpl_QueryActiveShellView */ HRESULT WINAPI IShellBrowserImpl_QueryActiveShellView(IShellBrowser *iface, IShellView **ppshv) { ICOM_THIS(IShellBrowserImpl, iface); FileOpenDlgInfos *fodInfos; TRACE("(%p)\n", This); fodInfos = (FileOpenDlgInfos *) GetPropA(This->hwndOwner,FileOpenDlgInfosStr); if(!(*ppshv = fodInfos->Shell.FOIShellView)) { return E_FAIL; } IShellView_AddRef(fodInfos->Shell.FOIShellView); return NOERROR; } /************************************************************************** * IShellBrowserImpl_RemoveMenusSB */ HRESULT WINAPI IShellBrowserImpl_RemoveMenusSB(IShellBrowser *iface, HMENU hmenuShared) { ICOM_THIS(IShellBrowserImpl, iface); TRACE("(%p)\n", This); /* Feature not implemented */ return E_NOTIMPL; } /************************************************************************** * IShellBrowserImpl_SendControlMsg */ HRESULT WINAPI IShellBrowserImpl_SendControlMsg(IShellBrowser *iface, UINT id, UINT uMsg, WPARAM wParam, LPARAM lParam, LRESULT *pret) { ICOM_THIS(IShellBrowserImpl, iface); LRESULT lres; TRACE("(%p)->(0x%08x 0x%08x 0x%08x 0x%08lx %p)\n", This, id, uMsg, wParam, lParam, pret); switch (id) { case FCW_TOOLBAR: lres = SendDlgItemMessageA( This->hwndOwner, IDC_TOOLBAR, uMsg, wParam, lParam); break; default: FIXME("ctrl id: %x\n", id); return E_NOTIMPL; } if (pret) *pret = lres; return S_OK; } /************************************************************************** * IShellBrowserImpl_SetMenuSB */ HRESULT WINAPI IShellBrowserImpl_SetMenuSB(IShellBrowser *iface, HMENU hmenuShared, HOLEMENU holemenuReserved, HWND hwndActiveObject) { ICOM_THIS(IShellBrowserImpl, iface); TRACE("(%p)\n", This); /* Feature not implemented */ return E_NOTIMPL; } /************************************************************************** * IShellBrowserImpl_SetStatusTextSB */ HRESULT WINAPI IShellBrowserImpl_SetStatusTextSB(IShellBrowser *iface, LPCOLESTR lpszStatusText) { ICOM_THIS(IShellBrowserImpl, iface); TRACE("(%p)\n", This); /* Feature not implemented */ return E_NOTIMPL; } /************************************************************************** * IShellBrowserImpl_SetToolbarItems */ HRESULT WINAPI IShellBrowserImpl_SetToolbarItems(IShellBrowser *iface, LPTBBUTTON lpButtons, UINT nButtons, UINT uFlags) { ICOM_THIS(IShellBrowserImpl, iface); TRACE("(%p)\n", This); /* Feature not implemented */ return E_NOTIMPL; } /************************************************************************** * IShellBrowserImpl_TranslateAcceleratorSB */ HRESULT WINAPI IShellBrowserImpl_TranslateAcceleratorSB(IShellBrowser *iface, LPMSG lpmsg, WORD wID) { ICOM_THIS(IShellBrowserImpl, iface); TRACE("(%p)\n", This); /* Feature not implemented */ return E_NOTIMPL; } /* * ICommDlgBrowser */ /*************************************************************************** * IShellBrowserImpl_ICommDlgBrowser_QueryInterface */ HRESULT WINAPI IShellBrowserImpl_ICommDlgBrowser_QueryInterface(ICommDlgBrowser *iface, REFIID riid, LPVOID *ppvObj) { _ICOM_THIS_FromICommDlgBrowser(IShellBrowser,iface); TRACE("(%p)\n", This); return IShellBrowserImpl_QueryInterface(This,riid,ppvObj); } /************************************************************************** * IShellBrowserImpl_ICommDlgBrowser_AddRef */ ULONG WINAPI IShellBrowserImpl_ICommDlgBrowser_AddRef(ICommDlgBrowser * iface) { _ICOM_THIS_FromICommDlgBrowser(IShellBrowser,iface); TRACE("(%p)\n", This); return IShellBrowserImpl_AddRef(This); } /************************************************************************** * IShellBrowserImpl_ICommDlgBrowser_Release */ ULONG WINAPI IShellBrowserImpl_ICommDlgBrowser_Release(ICommDlgBrowser * iface) { _ICOM_THIS_FromICommDlgBrowser(IShellBrowser,iface); TRACE("(%p)\n", This); return IShellBrowserImpl_Release(This); } /************************************************************************** * IShellBrowserImpl_ICommDlgBrowser_OnDefaultCommand * * Called when a user double-clicks in the view or presses the ENTER key */ HRESULT WINAPI IShellBrowserImpl_ICommDlgBrowser_OnDefaultCommand(ICommDlgBrowser *iface, IShellView *ppshv) { LPITEMIDLIST pidl; FileOpenDlgInfos *fodInfos; _ICOM_THIS_FromICommDlgBrowser(IShellBrowserImpl,iface); TRACE("(%p)\n", This); fodInfos = (FileOpenDlgInfos *) GetPropA(This->hwndOwner,FileOpenDlgInfosStr); /* If the selected object is not a folder, send a IDOK command to parent window */ if((pidl = GetSelectedPidl(ppshv))) { HRESULT hRes; ULONG ulAttr = SFGAO_FOLDER | SFGAO_HASSUBFOLDER; IShellFolder_GetAttributesOf(fodInfos->Shell.FOIShellFolder, 1, &pidl, &ulAttr); if (ulAttr) hRes = IShellBrowser_BrowseObject((IShellBrowser *)This,pidl,SBSP_RELATIVE); /* Tell the dialog that the user selected a file */ else { hRes = PostMessageA(This->hwndOwner, WM_COMMAND, IDOK, 0L); } /* Free memory used by pidl */ COMDLG32_SHFree((LPVOID)pidl); return hRes; } return E_FAIL; } /************************************************************************** * IShellBrowserImpl_ICommDlgBrowser_OnStateChange */ HRESULT WINAPI IShellBrowserImpl_ICommDlgBrowser_OnStateChange(ICommDlgBrowser *iface, IShellView *ppshv, ULONG uChange) { _ICOM_THIS_FromICommDlgBrowser(IShellBrowserImpl,iface); TRACE("(%p)\n", This); switch (uChange) { case CDBOSC_SETFOCUS: break; case CDBOSC_KILLFOCUS: { FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(This->hwndOwner,FileOpenDlgInfosStr); if(fodInfos->DlgInfos.dwDlgProp & FODPROP_SAVEDLG) SetDlgItemTextA(fodInfos->ShellInfos.hwndOwner,IDOK,"&Save"); } break; case CDBOSC_SELCHANGE: return IShellBrowserImpl_ICommDlgBrowser_OnSelChange(iface,ppshv); case CDBOSC_RENAME: break; } return NOERROR; } /* copied from shell32 to avoid linking to it */ static HRESULT COMDLG32_StrRetToStrNW (LPVOID dest, DWORD len, LPSTRRET src, LPITEMIDLIST pidl) { TRACE("dest=0x%p len=0x%lx strret=0x%p pidl=%p stub\n",dest,len,src,pidl); switch (src->uType) { case STRRET_WSTR: lstrcpynW((LPWSTR)dest, src->u.pOleStr, len); COMDLG32_SHFree(src->u.pOleStr); break; case STRRET_CSTRA: lstrcpynAtoW((LPWSTR)dest, src->u.cStr, len); break; case STRRET_OFFSETA: if (pidl) { lstrcpynAtoW((LPWSTR)dest, ((LPCSTR)&pidl->mkid)+src->u.uOffset, len); } break; default: FIXME("unknown type!\n"); if (len) { *(LPSTR)dest = '\0'; } return(FALSE); } return S_OK; } /************************************************************************** * IShellBrowserImpl_ICommDlgBrowser_IncludeObject */ HRESULT WINAPI IShellBrowserImpl_ICommDlgBrowser_IncludeObject(ICommDlgBrowser *iface, IShellView * ppshv, LPCITEMIDLIST pidl) { FileOpenDlgInfos *fodInfos; ULONG ulAttr; STRRET str; WCHAR szPathW[MAX_PATH]; _ICOM_THIS_FromICommDlgBrowser(IShellBrowserImpl,iface); TRACE("(%p)\n", This); fodInfos = (FileOpenDlgInfos *) GetPropA(This->hwndOwner,FileOpenDlgInfosStr); ulAttr = SFGAO_HIDDEN | SFGAO_FOLDER | SFGAO_FILESYSTEM | SFGAO_FILESYSANCESTOR | SFGAO_LINK; IShellFolder_GetAttributesOf(fodInfos->Shell.FOIShellFolder, 1, &pidl, &ulAttr); if( (ulAttr & SFGAO_HIDDEN) /* hidden */ | !(ulAttr & (SFGAO_FILESYSTEM | SFGAO_FILESYSANCESTOR))) /* special folder */ return S_FALSE; /* always include directorys and links */ if(ulAttr & (SFGAO_FOLDER | SFGAO_LINK)) return S_OK; /* Check if there is a mask to apply if not */ if(!fodInfos->ShellInfos.lpstrCurrentFilter || !lstrlenW(fodInfos->ShellInfos.lpstrCurrentFilter)) return S_OK; if (SUCCEEDED(IShellFolder_GetDisplayNameOf(fodInfos->Shell.FOIShellFolder, pidl, SHGDN_FORPARSING, &str))) { if (SUCCEEDED(COMDLG32_StrRetToStrNW(szPathW, MAX_PATH, &str, pidl))) { if (COMDLG32_PathMatchSpecW(szPathW, fodInfos->ShellInfos.lpstrCurrentFilter)) return S_OK; } } return S_FALSE; } /************************************************************************** * IShellBrowserImpl_ICommDlgBrowser_OnSelChange */ HRESULT IShellBrowserImpl_ICommDlgBrowser_OnSelChange(ICommDlgBrowser *iface, IShellView *ppshv) { FileOpenDlgInfos *fodInfos; UINT nFileSelected; UINT nFileToOpen; UINT nFiles = 0; char lpstrFileList[MAX_PATH]; char lpstrTemp[MAX_PATH]; LPSTR lpstrCurrFile = lpstrFileList; _ICOM_THIS_FromICommDlgBrowser(IShellBrowserImpl,iface); fodInfos = (FileOpenDlgInfos *) GetPropA(This->hwndOwner,FileOpenDlgInfosStr); TRACE("(%p)\n", This); nFileSelected = GetNumSelected( fodInfos->Shell.FOIShellView ); /* Count how many files we have */ for ( nFileToOpen = 0; nFileToOpen < nFileSelected; nFileToOpen++ ) { LPITEMIDLIST pidlSelection; ULONG uAttr = SFGAO_FOLDER | SFGAO_HASSUBFOLDER; /* get the file selected */ EnumSelectedPidls( fodInfos->Shell.FOIShellView, nFileToOpen, &pidlSelection ); IShellFolder_GetAttributesOf( fodInfos->Shell.FOIShellFolder, 1, &pidlSelection, &uAttr ); if (!uAttr) nFiles++; COMDLG32_SHFree( (LPVOID) pidlSelection ); } /* Generate the string for the edit control */ ZeroMemory(lpstrFileList, MAX_PATH); if (nFiles) { for ( nFileToOpen = 0; nFileToOpen < nFileSelected; nFileToOpen++ ) { LPITEMIDLIST pidlSelection; ULONG uAttr = SFGAO_FOLDER | SFGAO_HASSUBFOLDER; memset( lpstrTemp, 0x0, MAX_PATH * sizeof(char) ); /* get the file selected */ EnumSelectedPidls( fodInfos->Shell.FOIShellView, nFileToOpen, &pidlSelection ); GetName( fodInfos->Shell.FOIShellFolder, pidlSelection, SHGDN_NORMAL, lpstrTemp ); IShellFolder_GetAttributesOf( fodInfos->Shell.FOIShellFolder, 1, &pidlSelection, &uAttr ); if ( uAttr & SFGAO_FOLDER ) /* Ignore folders */ continue; if (nFiles > 1) /* Quote files if we have more than one */ { *lpstrCurrFile++ = '\"'; lstrcpyA( lpstrCurrFile, lpstrTemp ); lpstrCurrFile += lstrlenA( lpstrTemp ); lstrcpyA( lpstrCurrFile, "\" " ); lpstrCurrFile += 2; } else { lstrcpyA( lpstrCurrFile, lpstrTemp ); } COMDLG32_SHFree( (LPVOID) pidlSelection ); } SetWindowTextA(fodInfos->DlgInfos.hwndFileName,lpstrFileList); if(fodInfos->DlgInfos.dwDlgProp & FODPROP_SAVEDLG) SetDlgItemTextA(fodInfos->ShellInfos.hwndOwner,IDOK,"&Save"); else SetDlgItemTextA(fodInfos->ShellInfos.hwndOwner,IDOK,"&Open"); fodInfos->DlgInfos.dwDlgProp |= FODPROP_USEVIEW; SendCustomDlgNotificationMessage(This->hwndOwner, CDN_SELCHANGE); return S_OK; } if(fodInfos->DlgInfos.dwDlgProp & FODPROP_SAVEDLG) SetDlgItemTextA(fodInfos->ShellInfos.hwndOwner,IDOK,"&Save"); fodInfos->DlgInfos.dwDlgProp &= ~FODPROP_USEVIEW; return nFileSelected ? S_OK : E_FAIL; } /*********************************************************************** * GetSelectedPidl * * Return the pidl of the first selected item in the view */ LPITEMIDLIST GetSelectedPidl(IShellView *ppshv) { IDataObject *doSelected; LPITEMIDLIST pidlSelected = NULL; TRACE("sv=%p\n", ppshv); /* Get an IDataObject from the view */ if(SUCCEEDED(IShellView_GetItemObject(ppshv, SVGIO_SELECTION, &IID_IDataObject, (LPVOID *)&doSelected))) { STGMEDIUM medium; FORMATETC formatetc; /* Set the FORMATETC structure*/ SETDefFormatEtc(formatetc, RegisterClipboardFormatA(CFSTR_SHELLIDLIST), TYMED_HGLOBAL); /* Get the pidl from IDataObject */ if(SUCCEEDED(IDataObject_GetData(doSelected,&formatetc,&medium))) { LPIDA cida = GlobalLock(medium.u.hGlobal); TRACE("cida=%p\n", cida); pidlSelected = COMDLG32_PIDL_ILClone((LPITEMIDLIST)(&((LPBYTE)cida)[cida->aoffset[1]])); if(medium.pUnkForRelease) IUnknown_Release(medium.pUnkForRelease); else { GlobalUnlock(medium.u.hGlobal); GlobalFree(medium.u.hGlobal); } } IDataObject_Release(doSelected); return pidlSelected; } return NULL; } /*********************************************************************** * EnumSelectedPidls * * Return the pidl(s) of the selected item(s) in the view. * */ BOOL EnumSelectedPidls( IShellView *ppshv, /*[in]*/ UINT nPidlIndex, /*[in]*/ LPITEMIDLIST *pidlSelected /*[out]*/ ) { IDataObject *doSelected; BOOL retVal = TRUE; /* Get an IDataObject from the view */ if(SUCCEEDED(IShellView_GetItemObject(ppshv, SVGIO_SELECTION, &IID_IDataObject, (LPVOID *)&doSelected))) { STGMEDIUM medium; FORMATETC formatetc; /* Set the FORMATETC structure*/ SETDefFormatEtc(formatetc, RegisterClipboardFormatA(CFSTR_SHELLIDLIST), TYMED_HGLOBAL); /* Get the pidls from IDataObject */ if(SUCCEEDED(IDataObject_GetData(doSelected,&formatetc,&medium))) { LPIDA cida = GlobalLock(medium.u.hGlobal); if(nPidlIndex < cida->cidl) { *pidlSelected = COMDLG32_PIDL_ILClone((LPITEMIDLIST)(&((LPBYTE)cida)[cida->aoffset[nPidlIndex + 1]])); } else { retVal = FALSE; } if(medium.pUnkForRelease) { IUnknown_Release(medium.pUnkForRelease); } else { GlobalUnlock(medium.u.hGlobal); GlobalFree(medium.u.hGlobal); } } IDataObject_Release(doSelected); return retVal; } return FALSE; } /*********************************************************************** * GetNumSelected * * Return the number of selected items in the view. * */ UINT GetNumSelected( IShellView *ppshv ) { IDataObject *doSelected; UINT retVal = 0; /* Get an IDataObject from the view */ if(SUCCEEDED(IShellView_GetItemObject(ppshv, SVGIO_SELECTION, &IID_IDataObject, (LPVOID *)&doSelected))) { STGMEDIUM medium; FORMATETC formatetc; /* Set the FORMATETC structure*/ SETDefFormatEtc(formatetc, RegisterClipboardFormatA(CFSTR_SHELLIDLIST), TYMED_HGLOBAL); /* Get the pidls from IDataObject */ if(SUCCEEDED(IDataObject_GetData(doSelected,&formatetc,&medium))) { LPIDA cida = GlobalLock(medium.u.hGlobal); retVal = cida->cidl; if(medium.pUnkForRelease) { IUnknown_Release(medium.pUnkForRelease); } else { GlobalUnlock(medium.u.hGlobal); GlobalFree(medium.u.hGlobal); } } IDataObject_Release(doSelected); return retVal; } return 0; } wine-20000526/dlls/commdlg/filedlgbrowser.h0100644000175000001440000001754507054034114020217 0ustar julliardusers/* * Implementation of IShellBrowser for the File Open common dialog * * */ #ifndef SHBROWSER_H #define SHBROWSER_H TRUE #include "shlobj.h" #include "winbase.h" #include "objbase.h" #include "commdlg.h" /*********************************************************************** * Defines and global variables */ #define _ICOM_THIS_FromICommDlgBrowser(Class,name) Class* This = (Class*) (((char*)name)-sizeof(void *)) /* dialog internal property */ #define FODPROP_SAVEDLG 0x0001 /* File dialog is a Save file dialog */ #define FODPROP_USEVIEW 0x0002 /* Indicates the user selection must be taken from the IShellView */ /*********************************************************************** * Data structure */ typedef struct { ICOM_VTABLE(IShellBrowser)* lpVtbl; /* IShellBrowser VTable */ ICOM_VTABLE(ICommDlgBrowser)* lpVtbl2; /* ICommDlgBrowser VTable */ DWORD ref; /* Reference counter */ HWND hwndOwner; /* Owner dialog of the interface */ } IShellBrowserImpl; typedef struct { LPOPENFILENAMEA ofnInfos; struct { IShellBrowser *FOIShellBrowser; IShellFolder *FOIShellFolder; IShellView *FOIShellView; } Shell; struct { HWND hwndOwner; HWND hwndView; RECT rectView; FOLDERSETTINGS folderSettings; LPITEMIDLIST pidlAbsCurrent; LPWSTR lpstrCurrentFilter; } ShellInfos; struct { HWND hwndFileTypeCB; HWND hwndLookInCB; HWND hwndFileName; HWND hwndTB; HWND hwndCustomDlg; DWORD dwDlgProp; } DlgInfos; } FileOpenDlgInfos; /*********************************************************************** * Control ID's */ #define IDS_ABOUTBOX 101 #define IDS_DOCUMENTFOLDERS 102 #define IDS_PERSONAL 103 #define IDS_FAVORITES 104 #define IDS_PATH 105 #define IDS_DESKTOP 106 #define IDS_FONTS 108 #define IDS_MYCOMPUTER 110 #define IDS_SYSTEMFOLDERS 112 #define IDS_LOCALHARDRIVES 113 #define IDS_FILENOTFOUND 114 #define IDS_VERIFYFILE 115 #define IDS_CREATEFILE 116 #define IDS_CREATEFOLDER_DENIED 117 #define IDS_FILEOPEN_CAPTION 118 /* File Dialog Tooltips string IDs */ #define IDS_UPFOLDER 150 #define IDS_NEWFOLDER 151 #define IDS_LISTVIEW 152 #define IDS_REPORTVIEW 153 #define IDC_OPENREADONLY chx1 #define IDC_TOOLBARSTATIC stc1 #define IDC_FILETYPESTATIC stc2 #define IDC_FILENAMESTATIC stc3 #define IDC_LOOKINSTATIC stc4 #define IDC_SHELLSTATIC lst1 #define IDC_FILETYPE cmb1 #define IDC_LOOKIN cmb2 #define IDC_FILENAME edt1 #define IDC_TOOLBAR ctl1 /*********************************************************************** * Prototypes for the methods of the IShellBrowserImpl class */ /* Constructor */ IShellBrowser * IShellBrowserImpl_Construct(HWND hwndOwner); /* IUnknown */ HRESULT WINAPI IShellBrowserImpl_QueryInterface(IShellBrowser *iface, REFIID riid, LPVOID *ppvObj); ULONG WINAPI IShellBrowserImpl_AddRef(IShellBrowser * iface); ULONG WINAPI IShellBrowserImpl_Release(IShellBrowser * iface); /* IOleWindow */ HRESULT WINAPI IShellBrowserImpl_GetWindow(IShellBrowser * iface, HWND * phwnd); HRESULT WINAPI IShellBrowserImpl_ContextSensitiveHelp(IShellBrowser * iface, BOOL fEnterMode); /* IShellBrowser */ HRESULT WINAPI IShellBrowserImpl_BrowseObject(IShellBrowser *iface, LPCITEMIDLIST pidl, UINT wFlags); HRESULT WINAPI IShellBrowserImpl_EnableModelessSB(IShellBrowser *iface, BOOL fEnable); HRESULT WINAPI IShellBrowserImpl_GetControlWindow(IShellBrowser *iface, UINT id, HWND *lphwnd); HRESULT WINAPI IShellBrowserImpl_GetViewStateStream(IShellBrowser *iface, DWORD grfMode, LPSTREAM *ppStrm); HRESULT WINAPI IShellBrowserImpl_InsertMenusSB(IShellBrowser *iface, HMENU hmenuShared, LPOLEMENUGROUPWIDTHS lpMenuWidths); HRESULT WINAPI IShellBrowserImpl_OnViewWindowActive(IShellBrowser *iface, IShellView *ppshv); HRESULT WINAPI IShellBrowserImpl_QueryActiveShellView(IShellBrowser *iface, IShellView **ppshv); HRESULT WINAPI IShellBrowserImpl_RemoveMenusSB(IShellBrowser *iface, HMENU hmenuShared); HRESULT WINAPI IShellBrowserImpl_SendControlMsg(IShellBrowser *iface, UINT id, UINT uMsg, WPARAM wParam, LPARAM lParam, LRESULT *pret); HRESULT WINAPI IShellBrowserImpl_SetMenuSB(IShellBrowser *iface, HMENU hmenuShared, HOLEMENU holemenuReserved, HWND hwndActiveObject); HRESULT WINAPI IShellBrowserImpl_SetStatusTextSB(IShellBrowser *iface, LPCOLESTR lpszStatusText); HRESULT WINAPI IShellBrowserImpl_SetToolbarItems(IShellBrowser *iface, LPTBBUTTON lpButtons, UINT nButtons, UINT uFlags); HRESULT WINAPI IShellBrowserImpl_TranslateAcceleratorSB(IShellBrowser *iface, LPMSG lpmsg, WORD wID); /* ICommDlgBrowser */ HRESULT WINAPI IShellBrowserImpl_ICommDlgBrowser_QueryInterface(ICommDlgBrowser *iface, REFIID riid, LPVOID *ppvObj); ULONG WINAPI IShellBrowserImpl_ICommDlgBrowser_AddRef(ICommDlgBrowser * iface); ULONG WINAPI IShellBrowserImpl_ICommDlgBrowser_Release(ICommDlgBrowser * iface); HRESULT WINAPI IShellBrowserImpl_ICommDlgBrowser_OnDefaultCommand(ICommDlgBrowser *iface, IShellView *ppshv); HRESULT WINAPI IShellBrowserImpl_ICommDlgBrowser_OnStateChange(ICommDlgBrowser *iface, IShellView *ppshv, ULONG uChange); HRESULT WINAPI IShellBrowserImpl_ICommDlgBrowser_IncludeObject(ICommDlgBrowser *iface, IShellView * ppshv, LPCITEMIDLIST pidl); LPITEMIDLIST GetSelectedPidl(IShellView *ppshv); BOOL EnumSelectedPidls(IShellView *ppshv, UINT nPidlIndex, LPITEMIDLIST *pidlSelected); UINT GetNumSelected(IShellView *ppshv); #endif /*SHBROWSER_H*/ wine-20000526/dlls/commdlg/filetitle.c0100644000175000001440000000344307054034114017151 0ustar julliardusers/* * COMMDLG - File Dialogs * * Copyright 1994 Martin Ayotte * Copyright 1996 Albrecht Kleine */ #include #include "wine/winestring.h" #include "winbase.h" #include "commdlg.h" #include "debugtools.h" #include "heap.h" /* Has to go */ DEFAULT_DEBUG_CHANNEL(commdlg) #include "cdlg.h" /*********************************************************************** * GetFileTitleA (COMDLG32.8) * */ short WINAPI GetFileTitleA(LPCSTR lpFile, LPSTR lpTitle, UINT cbBuf) { int i, len; TRACE("(%p %p %d); \n", lpFile, lpTitle, cbBuf); if(lpFile == NULL || lpTitle == NULL) return -1; len = strlen(lpFile); if (len == 0) return -1; if(strpbrk(lpFile, "*[]")) return -1; len--; if(lpFile[len] == '/' || lpFile[len] == '\\' || lpFile[len] == ':') return -1; for(i = len; i >= 0; i--) { if (lpFile[i] == '/' || lpFile[i] == '\\' || lpFile[i] == ':') { i++; break; } } if(i == -1) i++; TRACE("---> '%s' \n", &lpFile[i]); len = strlen(lpFile+i)+1; if(cbBuf < len) return len; strncpy(lpTitle, &lpFile[i], len); return 0; } /*********************************************************************** * GetFileTitleW (COMDLG32.9) * */ short WINAPI GetFileTitleW(LPCWSTR lpFile, LPWSTR lpTitle, UINT cbBuf) { LPSTR file = HEAP_strdupWtoA(GetProcessHeap(), 0, lpFile); /* Has to go */ LPSTR title = HeapAlloc(GetProcessHeap(), 0, cbBuf); short ret; ret = GetFileTitleA(file, title, cbBuf); lstrcpynAtoW(lpTitle, title, cbBuf); HeapFree(GetProcessHeap(), 0, file); HeapFree(GetProcessHeap(), 0, title); return ret; } /*********************************************************************** * GetFileTitle16 (COMMDLG.27) */ short WINAPI GetFileTitle16(LPCSTR lpFile, LPSTR lpTitle, UINT16 cbBuf) { return GetFileTitleA(lpFile, lpTitle, cbBuf); } wine-20000526/dlls/commdlg/finddlg.c0100644000175000001440000003446107113574777016627 0ustar julliardusers/* * COMMDLG - Find & Replace Text Dialogs * * Copyright 1994 Martin Ayotte * Copyright 1996 Albrecht Kleine */ #include #include #include #include "winbase.h" #include "wine/winbase16.h" #include "ldt.h" #include "commdlg.h" #include "dialog.h" #include "dlgs.h" #include "module.h" #include "debugtools.h" #include "winproc.h" #include "cderr.h" DEFAULT_DEBUG_CHANNEL(commdlg) #include "cdlg.h" LRESULT WINAPI FindTextDlgProc16(HWND16 hWnd, UINT16 wMsg, WPARAM16 wParam, LPARAM lParam); LRESULT WINAPI ReplaceTextDlgProc16(HWND16 hWnd, UINT16 wMsg, WPARAM16 wParam, LPARAM lParam); /*********************************************************************** * FindTextDlgProc [internal] * * FIXME: Convert to real 32-bit message processing */ static LRESULT WINAPI FindTextDlgProc(HWND hDlg, UINT msg, WPARAM wParam, LPARAM lParam) { UINT16 msg16; MSGPARAM16 mp16; mp16.lParam = lParam; if (WINPROC_MapMsg32ATo16( hDlg, msg, wParam, &msg16, &mp16.wParam, &mp16.lParam ) == -1) return 0; mp16.lResult = FindTextDlgProc16( (HWND16)hDlg, msg16, mp16.wParam, mp16.lParam ); WINPROC_UnmapMsg32ATo16( hDlg, msg, wParam, lParam, &mp16 ); return mp16.lResult; } /*********************************************************************** * ReplaceTextDlgProc [internal] * * FIXME: Convert to real 32-bit message processing */ static LRESULT WINAPI ReplaceTextDlgProc(HWND hDlg, UINT msg, WPARAM wParam, LPARAM lParam) { UINT16 msg16; MSGPARAM16 mp16; mp16.lParam = lParam; if (WINPROC_MapMsg32ATo16( hDlg, msg, wParam, &msg16, &mp16.wParam, &mp16.lParam ) == -1) return 0; mp16.lResult = ReplaceTextDlgProc16( (HWND16)hDlg, msg16, mp16.wParam, mp16.lParam ); WINPROC_UnmapMsg32ATo16( hDlg, msg, wParam, lParam, &mp16 ); return mp16.lResult; } /*********************************************************************** * FindText16 (COMMDLG.11) */ HWND16 WINAPI FindText16( SEGPTR find ) { HANDLE16 hInst; LPCVOID ptr; HANDLE hResInfo, hDlgTmpl; LPFINDREPLACE16 lpFind = (LPFINDREPLACE16)PTR_SEG_TO_LIN(find); /* * FIXME : Should respond to FR_ENABLETEMPLATE and FR_ENABLEHOOK here * For now, only the standard dialog works. */ if (lpFind->Flags & (FR_ENABLETEMPLATE | FR_ENABLETEMPLATEHANDLE | FR_ENABLEHOOK)) FIXME(": unimplemented flag (ignored)\n"); if (!(hResInfo = FindResourceA(COMMDLG_hInstance32, MAKEINTRESOURCEA(FINDDLGORD), RT_DIALOGA))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource(COMMDLG_hInstance32, hResInfo )) || !(ptr = LockResource( hDlgTmpl ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } hInst = GetWindowLongA( lpFind->hwndOwner , GWL_HINSTANCE); return DIALOG_CreateIndirect( hInst, ptr, TRUE, lpFind->hwndOwner, (DLGPROC16)FindTextDlgProc, find, WIN_PROC_32A ); } /*********************************************************************** * ReplaceText16 (COMMDLG.12) */ HWND16 WINAPI ReplaceText16( SEGPTR find ) { HANDLE16 hInst; LPCVOID ptr; HANDLE hResInfo, hDlgTmpl; LPFINDREPLACE16 lpFind = (LPFINDREPLACE16)PTR_SEG_TO_LIN(find); /* * FIXME : We should do error checking on the lpFind structure here * and make CommDlgExtendedError() return the error condition. */ if (lpFind->Flags & (FR_ENABLETEMPLATE | FR_ENABLETEMPLATEHANDLE | FR_ENABLEHOOK)) FIXME(": unimplemented flag (ignored)\n"); if (!(hResInfo = FindResourceA(COMMDLG_hInstance32, MAKEINTRESOURCEA(REPLACEDLGORD), RT_DIALOGA))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource(COMMDLG_hInstance32, hResInfo )) || !(ptr = LockResource( hDlgTmpl ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } hInst = GetWindowLongA( lpFind->hwndOwner , GWL_HINSTANCE); return DIALOG_CreateIndirect( hInst, ptr, TRUE, lpFind->hwndOwner, (DLGPROC16)ReplaceTextDlgProc, find, WIN_PROC_32A ); } /*********************************************************************** * FINDDLG_WMInitDialog [internal] */ static LRESULT FINDDLG_WMInitDialog(HWND hWnd, LPARAM lParam, LPDWORD lpFlags, LPSTR lpstrFindWhat, BOOL fUnicode) { SetWindowLongA(hWnd, DWL_USER, lParam); *lpFlags &= ~(FR_FINDNEXT | FR_REPLACE | FR_REPLACEALL | FR_DIALOGTERM); /* * FIXME : If the initial FindWhat string is empty, we should disable the * FindNext (IDOK) button. Only after typing some text, the button should be * enabled. */ if (fUnicode) SetDlgItemTextW(hWnd, edt1, (LPWSTR)lpstrFindWhat); else SetDlgItemTextA(hWnd, edt1, lpstrFindWhat); CheckRadioButton(hWnd, rad1, rad2, (*lpFlags & FR_DOWN) ? rad2 : rad1); if (*lpFlags & (FR_HIDEUPDOWN | FR_NOUPDOWN)) { EnableWindow(GetDlgItem(hWnd, rad1), FALSE); EnableWindow(GetDlgItem(hWnd, rad2), FALSE); } if (*lpFlags & FR_HIDEUPDOWN) { ShowWindow(GetDlgItem(hWnd, rad1), SW_HIDE); ShowWindow(GetDlgItem(hWnd, rad2), SW_HIDE); ShowWindow(GetDlgItem(hWnd, grp1), SW_HIDE); } CheckDlgButton(hWnd, chx1, (*lpFlags & FR_WHOLEWORD) ? 1 : 0); if (*lpFlags & (FR_HIDEWHOLEWORD | FR_NOWHOLEWORD)) EnableWindow(GetDlgItem(hWnd, chx1), FALSE); if (*lpFlags & FR_HIDEWHOLEWORD) ShowWindow(GetDlgItem(hWnd, chx1), SW_HIDE); CheckDlgButton(hWnd, chx2, (*lpFlags & FR_MATCHCASE) ? 1 : 0); if (*lpFlags & (FR_HIDEMATCHCASE | FR_NOMATCHCASE)) EnableWindow(GetDlgItem(hWnd, chx2), FALSE); if (*lpFlags & FR_HIDEMATCHCASE) ShowWindow(GetDlgItem(hWnd, chx2), SW_HIDE); if (!(*lpFlags & FR_SHOWHELP)) { EnableWindow(GetDlgItem(hWnd, pshHelp), FALSE); ShowWindow(GetDlgItem(hWnd, pshHelp), SW_HIDE); } ShowWindow(hWnd, SW_SHOWNORMAL); return TRUE; } /*********************************************************************** * FINDDLG_WMCommand [internal] */ static LRESULT FINDDLG_WMCommand(HWND hWnd, WPARAM wParam, HWND hwndOwner, LPDWORD lpFlags, LPSTR lpstrFindWhat, WORD wFindWhatLen, BOOL fUnicode) { int uFindReplaceMessage = RegisterWindowMessageA( FINDMSGSTRING ); int uHelpMessage = RegisterWindowMessageA( HELPMSGSTRING ); switch (wParam) { case IDOK: if (fUnicode) GetDlgItemTextW(hWnd, edt1, (LPWSTR)lpstrFindWhat, wFindWhatLen/2); else GetDlgItemTextA(hWnd, edt1, lpstrFindWhat, wFindWhatLen); if (IsDlgButtonChecked(hWnd, rad2)) *lpFlags |= FR_DOWN; else *lpFlags &= ~FR_DOWN; if (IsDlgButtonChecked(hWnd, chx1)) *lpFlags |= FR_WHOLEWORD; else *lpFlags &= ~FR_WHOLEWORD; if (IsDlgButtonChecked(hWnd, chx2)) *lpFlags |= FR_MATCHCASE; else *lpFlags &= ~FR_MATCHCASE; *lpFlags &= ~(FR_REPLACE | FR_REPLACEALL | FR_DIALOGTERM); *lpFlags |= FR_FINDNEXT; SendMessageA(hwndOwner, uFindReplaceMessage, 0, GetWindowLongA(hWnd, DWL_USER) ); return TRUE; case IDCANCEL: *lpFlags &= ~(FR_FINDNEXT | FR_REPLACE | FR_REPLACEALL); *lpFlags |= FR_DIALOGTERM; SendMessageA(hwndOwner, uFindReplaceMessage, 0, GetWindowLongA(hWnd, DWL_USER) ); DestroyWindow(hWnd); return TRUE; case pshHelp: /* FIXME : should lpfr structure be passed as an argument ??? */ SendMessageA(hwndOwner, uHelpMessage, 0, 0); return TRUE; } return FALSE; } /*********************************************************************** * FindTextDlgProc16 (COMMDLG.13) */ LRESULT WINAPI FindTextDlgProc16(HWND16 hWnd, UINT16 wMsg, WPARAM16 wParam, LPARAM lParam) { LPFINDREPLACE16 lpfr; switch (wMsg) { case WM_INITDIALOG: lpfr=(LPFINDREPLACE16)PTR_SEG_TO_LIN(lParam); return FINDDLG_WMInitDialog(hWnd, lParam, &(lpfr->Flags), PTR_SEG_TO_LIN(lpfr->lpstrFindWhat), FALSE); case WM_COMMAND: lpfr=(LPFINDREPLACE16)PTR_SEG_TO_LIN(GetWindowLongA(hWnd, DWL_USER)); return FINDDLG_WMCommand(hWnd, wParam, lpfr->hwndOwner, &lpfr->Flags, PTR_SEG_TO_LIN(lpfr->lpstrFindWhat), lpfr->wFindWhatLen, FALSE); } return FALSE; } /*********************************************************************** * REPLACEDLG_WMInitDialog [internal] */ static LRESULT REPLACEDLG_WMInitDialog(HWND hWnd, LPARAM lParam, LPDWORD lpFlags, LPSTR lpstrFindWhat, LPSTR lpstrReplaceWith, BOOL fUnicode) { SetWindowLongA(hWnd, DWL_USER, lParam); *lpFlags &= ~(FR_FINDNEXT | FR_REPLACE | FR_REPLACEALL | FR_DIALOGTERM); /* * FIXME : If the initial FindWhat string is empty, we should disable the FinNext / * Replace / ReplaceAll buttons. Only after typing some text, the buttons should be * enabled. */ if (fUnicode) { SetDlgItemTextW(hWnd, edt1, (LPWSTR)lpstrFindWhat); SetDlgItemTextW(hWnd, edt2, (LPWSTR)lpstrReplaceWith); } else { SetDlgItemTextA(hWnd, edt1, lpstrFindWhat); SetDlgItemTextA(hWnd, edt2, lpstrReplaceWith); } CheckDlgButton(hWnd, chx1, (*lpFlags & FR_WHOLEWORD) ? 1 : 0); if (*lpFlags & (FR_HIDEWHOLEWORD | FR_NOWHOLEWORD)) EnableWindow(GetDlgItem(hWnd, chx1), FALSE); if (*lpFlags & FR_HIDEWHOLEWORD) ShowWindow(GetDlgItem(hWnd, chx1), SW_HIDE); CheckDlgButton(hWnd, chx2, (*lpFlags & FR_MATCHCASE) ? 1 : 0); if (*lpFlags & (FR_HIDEMATCHCASE | FR_NOMATCHCASE)) EnableWindow(GetDlgItem(hWnd, chx2), FALSE); if (*lpFlags & FR_HIDEMATCHCASE) ShowWindow(GetDlgItem(hWnd, chx2), SW_HIDE); if (!(*lpFlags & FR_SHOWHELP)) { EnableWindow(GetDlgItem(hWnd, pshHelp), FALSE); ShowWindow(GetDlgItem(hWnd, pshHelp), SW_HIDE); } ShowWindow(hWnd, SW_SHOWNORMAL); return TRUE; } /*********************************************************************** * REPLACEDLG_WMCommand [internal] */ static LRESULT REPLACEDLG_WMCommand(HWND hWnd, WPARAM16 wParam, HWND hwndOwner, LPDWORD lpFlags, LPSTR lpstrFindWhat, WORD wFindWhatLen, LPSTR lpstrReplaceWith, WORD wReplaceWithLen, BOOL fUnicode) { int uFindReplaceMessage = RegisterWindowMessageA( FINDMSGSTRING ); int uHelpMessage = RegisterWindowMessageA( HELPMSGSTRING ); switch (wParam) { case IDOK: if (fUnicode) { GetDlgItemTextW(hWnd, edt1, (LPWSTR)lpstrFindWhat, wFindWhatLen/2); GetDlgItemTextW(hWnd, edt2, (LPWSTR)lpstrReplaceWith, wReplaceWithLen/2); } else { GetDlgItemTextA(hWnd, edt1, lpstrFindWhat, wFindWhatLen); GetDlgItemTextA(hWnd, edt2, lpstrReplaceWith, wReplaceWithLen); } if (IsDlgButtonChecked(hWnd, chx1)) *lpFlags |= FR_WHOLEWORD; else *lpFlags &= ~FR_WHOLEWORD; if (IsDlgButtonChecked(hWnd, chx2)) *lpFlags |= FR_MATCHCASE; else *lpFlags &= ~FR_MATCHCASE; *lpFlags &= ~(FR_REPLACE | FR_REPLACEALL | FR_DIALOGTERM); *lpFlags |= FR_FINDNEXT; SendMessageA(hwndOwner, uFindReplaceMessage, 0, GetWindowLongA(hWnd, DWL_USER) ); return TRUE; case IDCANCEL: *lpFlags &= ~(FR_FINDNEXT | FR_REPLACE | FR_REPLACEALL); *lpFlags |= FR_DIALOGTERM; SendMessageA(hwndOwner, uFindReplaceMessage, 0, GetWindowLongA(hWnd, DWL_USER) ); DestroyWindow(hWnd); return TRUE; case psh1: if (fUnicode) { GetDlgItemTextW(hWnd, edt1, (LPWSTR)lpstrFindWhat, wFindWhatLen/2); GetDlgItemTextW(hWnd, edt2, (LPWSTR)lpstrReplaceWith, wReplaceWithLen/2); } else { GetDlgItemTextA(hWnd, edt1, lpstrFindWhat, wFindWhatLen); GetDlgItemTextA(hWnd, edt2, lpstrReplaceWith, wReplaceWithLen); } if (IsDlgButtonChecked(hWnd, chx1)) *lpFlags |= FR_WHOLEWORD; else *lpFlags &= ~FR_WHOLEWORD; if (IsDlgButtonChecked(hWnd, chx2)) *lpFlags |= FR_MATCHCASE; else *lpFlags &= ~FR_MATCHCASE; *lpFlags &= ~(FR_FINDNEXT | FR_REPLACEALL | FR_DIALOGTERM); *lpFlags |= FR_REPLACE; SendMessageA(hwndOwner, uFindReplaceMessage, 0, GetWindowLongA(hWnd, DWL_USER) ); return TRUE; case psh2: if (fUnicode) { GetDlgItemTextW(hWnd, edt1, (LPWSTR)lpstrFindWhat, wFindWhatLen/2); GetDlgItemTextW(hWnd, edt2, (LPWSTR)lpstrReplaceWith, wReplaceWithLen/2); } else { GetDlgItemTextA(hWnd, edt1, lpstrFindWhat, wFindWhatLen); GetDlgItemTextA(hWnd, edt2, lpstrReplaceWith, wReplaceWithLen); } if (IsDlgButtonChecked(hWnd, chx1)) *lpFlags |= FR_WHOLEWORD; else *lpFlags &= ~FR_WHOLEWORD; if (IsDlgButtonChecked(hWnd, chx2)) *lpFlags |= FR_MATCHCASE; else *lpFlags &= ~FR_MATCHCASE; *lpFlags &= ~(FR_FINDNEXT | FR_REPLACE | FR_DIALOGTERM); *lpFlags |= FR_REPLACEALL; SendMessageA(hwndOwner, uFindReplaceMessage, 0, GetWindowLongA(hWnd, DWL_USER) ); return TRUE; case pshHelp: /* FIXME : should lpfr structure be passed as an argument ??? */ SendMessageA(hwndOwner, uHelpMessage, 0, 0); return TRUE; } return FALSE; } /*********************************************************************** * ReplaceTextDlgProc16 (COMMDLG.14) */ LRESULT WINAPI ReplaceTextDlgProc16(HWND16 hWnd, UINT16 wMsg, WPARAM16 wParam, LPARAM lParam) { LPFINDREPLACE16 lpfr; switch (wMsg) { case WM_INITDIALOG: lpfr=(LPFINDREPLACE16)PTR_SEG_TO_LIN(lParam); return REPLACEDLG_WMInitDialog(hWnd, lParam, &lpfr->Flags, PTR_SEG_TO_LIN(lpfr->lpstrFindWhat), PTR_SEG_TO_LIN(lpfr->lpstrReplaceWith), FALSE); case WM_COMMAND: lpfr=(LPFINDREPLACE16)PTR_SEG_TO_LIN(GetWindowLongA(hWnd, DWL_USER)); return REPLACEDLG_WMCommand(hWnd, wParam, lpfr->hwndOwner, &lpfr->Flags, PTR_SEG_TO_LIN(lpfr->lpstrFindWhat), lpfr->wFindWhatLen, PTR_SEG_TO_LIN(lpfr->lpstrReplaceWith), lpfr->wReplaceWithLen, FALSE); } return FALSE; } wine-20000526/dlls/commdlg/finddlg32.c0100644000175000001440000004264507102374552016762 0ustar julliardusers/* * Common Dialog Boxes interface (32 bit) * Find/Replace * * Copyright 1998,1999 Bertho A. Stultiens */ #include "winbase.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "commdlg.h" #include "cderr.h" #include "dlgs.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(commdlg) #include "cdlg.h" /*-----------------------------------------------------------------------*/ static UINT FindReplaceMessage; static UINT HelpMessage; #define FR_MASK (FR_DOWN | FR_MATCHCASE | FR_WHOLEWORD | FR_REPLACEALL | FR_REPLACE | FR_FINDNEXT | FR_DIALOGTERM) /* CRITICAL_SECTION COMDLG32_CritSect; */ /* Notes: * MS uses a critical section at a few locations. However, I fail to * see the reason for this. Their comdlg32.dll has a few race conditions * but _not_ at those places that are protected with the mutex (there are * globals that seem to hold info for the wndproc). * * FindText[AW]/ReplaceText[AW] * The find/replace calls are passed a structure that is _not_ used * internally. There is a local copy that holds the running info to * be able to combine xxxA and xxxW calls. The passed pointer is * returned upon sendmessage. Apps wont break this way when they rely * on the original pointer. This will work as long as the sizes of * FINDREPLACEA == FINDREPLACEW. The local copy will also prevent * the app to see the wine-specific extra flags to distinguish between * A/W and Find/Replace. */ /*********************************************************************** * COMDLG32_FR_GetFlags [internal] * Returns the button state that needs to be reported to the caller. * RETURNS * Current state of check and radio buttons */ static DWORD COMDLG32_FR_GetFlags(HWND hDlgWnd) { DWORD flags = 0; if(IsDlgButtonChecked(hDlgWnd, rad2) == BST_CHECKED) flags |= FR_DOWN; if(IsDlgButtonChecked(hDlgWnd, chx1) == BST_CHECKED) flags |= FR_WHOLEWORD; if(IsDlgButtonChecked(hDlgWnd, chx2) == BST_CHECKED) flags |= FR_MATCHCASE; return flags; } /*********************************************************************** * COMDLG32_FR_HandleWMCommand [internal] * Handle WM_COMMAND messages... */ static void COMDLG32_FR_HandleWMCommand(HWND hDlgWnd, COMDLG32_FR_Data *pData, int Id, int NotifyCode) { DWORD flag; pData->user_fr.fra->Flags &= ~FR_MASK; /* Clear return flags */ if(pData->fr.Flags & FR_WINE_REPLACE) /* Replace always goes down... */ pData->user_fr.fra->Flags |= FR_DOWN; if(NotifyCode == BN_CLICKED) { switch(Id) { case IDOK: /* Find Next */ if(GetDlgItemTextA(hDlgWnd, edt1, pData->fr.lpstrFindWhat, pData->fr.wFindWhatLen) > 0) { pData->user_fr.fra->Flags |= COMDLG32_FR_GetFlags(hDlgWnd) | FR_FINDNEXT; if(pData->fr.Flags & FR_WINE_UNICODE) { lstrcpyAtoW(pData->user_fr.frw->lpstrFindWhat, pData->fr.lpstrFindWhat); } else { lstrcpyA(pData->user_fr.fra->lpstrFindWhat, pData->fr.lpstrFindWhat); } SendMessageA(pData->fr.hwndOwner, FindReplaceMessage, 0, (LPARAM)pData->user_fr.fra); } break; case IDCANCEL: pData->user_fr.fra->Flags |= COMDLG32_FR_GetFlags(hDlgWnd) | FR_DIALOGTERM; SendMessageA(pData->fr.hwndOwner, FindReplaceMessage, 0, (LPARAM)pData->user_fr.fra); DestroyWindow(hDlgWnd); break; case psh2: /* Replace All */ flag = FR_REPLACEALL; goto Replace; case psh1: /* Replace */ flag = FR_REPLACE; Replace: if((pData->fr.Flags & FR_WINE_REPLACE) && GetDlgItemTextA(hDlgWnd, edt1, pData->fr.lpstrFindWhat, pData->fr.wFindWhatLen) > 0) { pData->fr.lpstrReplaceWith[0] = 0; /* In case the next GetDlgItemText Fails */ GetDlgItemTextA(hDlgWnd, edt2, pData->fr.lpstrReplaceWith, pData->fr.wReplaceWithLen); pData->user_fr.fra->Flags |= COMDLG32_FR_GetFlags(hDlgWnd) | flag; if(pData->fr.Flags & FR_WINE_UNICODE) { lstrcpyAtoW(pData->user_fr.frw->lpstrFindWhat, pData->fr.lpstrFindWhat); lstrcpyAtoW(pData->user_fr.frw->lpstrReplaceWith, pData->fr.lpstrReplaceWith); } else { lstrcpyA(pData->user_fr.fra->lpstrFindWhat, pData->fr.lpstrFindWhat); lstrcpyA(pData->user_fr.fra->lpstrReplaceWith, pData->fr.lpstrReplaceWith); } SendMessageA(pData->fr.hwndOwner, FindReplaceMessage, 0, (LPARAM)pData->user_fr.fra); } break; case pshHelp: pData->user_fr.fra->Flags |= COMDLG32_FR_GetFlags(hDlgWnd); SendMessageA(pData->fr.hwndOwner, HelpMessage, (WPARAM)hDlgWnd, (LPARAM)pData->user_fr.fra); break; } } else if(NotifyCode == EN_CHANGE && Id == edt1) { BOOL enable = SendDlgItemMessageA(hDlgWnd, edt1, WM_GETTEXTLENGTH, 0, 0) > 0; EnableWindow(GetDlgItem(hDlgWnd, IDOK), enable); if(pData->fr.Flags & FR_WINE_REPLACE) { EnableWindow(GetDlgItem(hDlgWnd, psh1), enable); EnableWindow(GetDlgItem(hDlgWnd, psh2), enable); } } } /*********************************************************************** * COMDLG32_FindReplaceDlgProc [internal] * [Find/Replace]Text32[A/W] window procedure. */ static BOOL CALLBACK COMDLG32_FindReplaceDlgProc(HWND hDlgWnd, UINT iMsg, WPARAM wParam, LPARAM lParam) { COMDLG32_FR_Data *pdata = (COMDLG32_FR_Data *)GetPropA(hDlgWnd, (LPSTR)COMDLG32_Atom); BOOL retval = TRUE;; if(iMsg == WM_INITDIALOG) { pdata = (COMDLG32_FR_Data *)lParam; if(!SetPropA(hDlgWnd, (LPSTR)COMDLG32_Atom, (HANDLE)pdata)) { ERR("Could not Set prop; invent a gracefull exit?...\n"); DestroyWindow(hDlgWnd); return FALSE; } SendDlgItemMessageA(hDlgWnd, edt1, EM_SETLIMITTEXT, (WPARAM)pdata->fr.wFindWhatLen, 0); SendDlgItemMessageA(hDlgWnd, edt1, WM_SETTEXT, 0, (LPARAM)pdata->fr.lpstrFindWhat); if(pdata->fr.Flags & FR_WINE_REPLACE) { SendDlgItemMessageA(hDlgWnd, edt2, EM_SETLIMITTEXT, (WPARAM)pdata->fr.wReplaceWithLen, 0); SendDlgItemMessageA(hDlgWnd, edt2, WM_SETTEXT, 0, (LPARAM)pdata->fr.lpstrReplaceWith); } if(!(pdata->fr.Flags & FR_SHOWHELP)) ShowWindow(GetDlgItem(hDlgWnd, pshHelp), SW_HIDE); if(pdata->fr.Flags & FR_HIDEUPDOWN) { ShowWindow(GetDlgItem(hDlgWnd, rad1), SW_HIDE); ShowWindow(GetDlgItem(hDlgWnd, rad2), SW_HIDE); ShowWindow(GetDlgItem(hDlgWnd, grp1), SW_HIDE); } else if(pdata->fr.Flags & FR_NOUPDOWN) { EnableWindow(GetDlgItem(hDlgWnd, rad1), FALSE); EnableWindow(GetDlgItem(hDlgWnd, rad2), FALSE); EnableWindow(GetDlgItem(hDlgWnd, grp1), FALSE); } else { SendDlgItemMessageA(hDlgWnd, rad1, BM_SETCHECK, pdata->fr.Flags & FR_DOWN ? 0 : BST_CHECKED, 0); SendDlgItemMessageA(hDlgWnd, rad2, BM_SETCHECK, pdata->fr.Flags & FR_DOWN ? BST_CHECKED : 0, 0); } if(pdata->fr.Flags & FR_HIDEMATCHCASE) ShowWindow(GetDlgItem(hDlgWnd, chx2), SW_HIDE); else if(pdata->fr.Flags & FR_NOMATCHCASE) EnableWindow(GetDlgItem(hDlgWnd, chx2), FALSE); else SendDlgItemMessageA(hDlgWnd, chx2, BM_SETCHECK, pdata->fr.Flags & FR_MATCHCASE ? BST_CHECKED : 0, 0); if(pdata->fr.Flags & FR_HIDEWHOLEWORD) ShowWindow(GetDlgItem(hDlgWnd, chx1), SW_HIDE); else if(pdata->fr.Flags & FR_NOWHOLEWORD) EnableWindow(GetDlgItem(hDlgWnd, chx1), FALSE); else SendDlgItemMessageA(hDlgWnd, chx1, BM_SETCHECK, pdata->fr.Flags & FR_WHOLEWORD ? BST_CHECKED : 0, 0); /* We did the init here, now call the hook if requested */ /* We do not do ShowWindow if hook exists and is FALSE */ /* per MSDN Article Q96135 */ if((pdata->fr.Flags & FR_ENABLEHOOK) && ! pdata->fr.lpfnHook(hDlgWnd, iMsg, wParam, pdata->fr.lCustData)) return TRUE; ShowWindow(hDlgWnd, SW_SHOWNORMAL); UpdateWindow(hDlgWnd); return TRUE; } if(pdata && (pdata->fr.Flags & FR_ENABLEHOOK)) { retval = pdata->fr.lpfnHook(hDlgWnd, iMsg, wParam, lParam); } else retval = FALSE; if(pdata && !retval) { retval = TRUE; switch(iMsg) { case WM_COMMAND: COMDLG32_FR_HandleWMCommand(hDlgWnd, pdata, LOWORD(wParam), HIWORD(wParam)); break; case WM_CLOSE: COMDLG32_FR_HandleWMCommand(hDlgWnd, pdata, IDCANCEL, BN_CLICKED); break; case WM_HELP: /* Heeeeelp! */ FIXME("Got WM_HELP. Who is gonna supply it?\n"); break; case WM_CONTEXTMENU: /* Heeeeelp! */ FIXME("Got WM_CONTEXTMENU. Who is gonna supply it?\n"); break; /* FIXME: Handle F1 help */ default: retval = FALSE; /* We did not handle the message */ } } /* WM_DESTROY is a special case. * We need to ensure that the allocated memory is freed just before * the dialog is killed. We also need to remove the added prop. */ if(iMsg == WM_DESTROY) { RemovePropA(hDlgWnd, (LPSTR)COMDLG32_Atom); HeapFree(GetProcessHeap(), 0, pdata); } return retval; } /*********************************************************************** * COMDLG32_FR_CheckPartial [internal] * Check various fault conditions in the supplied parameters that * cause an extended error to be reported. * RETURNS * TRUE: Succes * FALSE: Failure */ static BOOL COMDLG32_FR_CheckPartial( LPFINDREPLACEA pfr, /* [in] Find structure */ BOOL Replace /* [in] True if called as replace */ ) { if(!pfr) { COMDLG32_SetCommDlgExtendedError(CDERR_GENERALCODES); return FALSE; } if(pfr->lStructSize != sizeof(FINDREPLACEA)) { COMDLG32_SetCommDlgExtendedError(CDERR_STRUCTSIZE); return FALSE; } if(!IsWindow(pfr->hwndOwner)) { COMDLG32_SetCommDlgExtendedError(CDERR_DIALOGFAILURE); return FALSE; } if((pfr->wFindWhatLen < 1 || !pfr->lpstrFindWhat) ||(Replace && (pfr->wReplaceWithLen < 1 || !pfr->lpstrReplaceWith))) { COMDLG32_SetCommDlgExtendedError(FRERR_BUFFERLENGTHZERO); return FALSE; } if((FindReplaceMessage = RegisterWindowMessageA(FINDMSGSTRING)) == 0) { COMDLG32_SetCommDlgExtendedError(CDERR_REGISTERMSGFAIL); return FALSE; } if((HelpMessage = RegisterWindowMessageA(HELPMSGSTRING)) == 0) { COMDLG32_SetCommDlgExtendedError(CDERR_REGISTERMSGFAIL); return FALSE; } if((pfr->Flags & FR_ENABLEHOOK) && !pfr->lpfnHook) { COMDLG32_SetCommDlgExtendedError(CDERR_NOHOOK); return FALSE; } if((pfr->Flags & (FR_ENABLETEMPLATE | FR_ENABLETEMPLATEHANDLE)) && !pfr->hInstance) { COMDLG32_SetCommDlgExtendedError(CDERR_NOHINSTANCE); return FALSE; } if((pfr->Flags & FR_ENABLETEMPLATE) && !pfr->lpTemplateName) { COMDLG32_SetCommDlgExtendedError(CDERR_NOTEMPLATE); return FALSE; } return TRUE; } /*********************************************************************** * COMDLG32_FR_DoFindReplace [internal] * Actual load and creation of the Find/Replace dialog. * RETURNS * Window handle to created dialog:Succes * NULL:Failure */ static HWND COMDLG32_FR_DoFindReplace( COMDLG32_FR_Data *pdata /* [in] Internal data structure */ ) { HWND hdlgwnd = 0; HGLOBAL loadrc; DWORD error; LPDLGTEMPLATEW rcs; TRACE("hInst=%08x, Flags=%08lx\n", pdata->fr.hInstance, pdata->fr.Flags); if(!(pdata->fr.Flags & FR_ENABLETEMPLATEHANDLE)) { HMODULE hmod = COMDLG32_hInstance; HRSRC htemplate; if(pdata->fr.Flags & FR_ENABLETEMPLATE) { hmod = (HMODULE)pdata->fr.hInstance; if(pdata->fr.Flags & FR_WINE_UNICODE) { htemplate = FindResourceW(hmod, (LPWSTR)pdata->fr.lpTemplateName, (LPWSTR)RT_DIALOGA); } else { htemplate = FindResourceA(hmod, pdata->fr.lpTemplateName, (LPCSTR)RT_DIALOGA); } } else { int rcid = pdata->fr.Flags & FR_WINE_REPLACE ? REPLACEDLGORD : FINDDLGORD; htemplate = FindResourceA(hmod, MAKEINTRESOURCEA(rcid), (LPCSTR)RT_DIALOGA); } if(!htemplate) { error = CDERR_FINDRESFAILURE; goto cleanup; } loadrc = LoadResource(hmod, htemplate); } else { loadrc = (HGLOBAL)pdata->fr.hInstance; } if(!loadrc) { error = CDERR_LOADRESFAILURE; goto cleanup; } if((rcs = (LPDLGTEMPLATEW)LockResource(loadrc)) == NULL) { error = CDERR_LOCKRESFAILURE; goto cleanup; } hdlgwnd = CreateDialogIndirectParamA(COMDLG32_hInstance, rcs, pdata->fr.hwndOwner, (DLGPROC)COMDLG32_FindReplaceDlgProc, (LPARAM)pdata); if(!hdlgwnd) { error = CDERR_DIALOGFAILURE; cleanup: COMDLG32_SetCommDlgExtendedError(error); HeapFree(GetProcessHeap(), 0, pdata); } return hdlgwnd; } /*********************************************************************** * FindTextA [COMDLG32.6] * RETURNS * Window handle to created dialog: Succes * NULL: Failure */ HWND WINAPI FindTextA( LPFINDREPLACEA pfr /* [in] Find/replace structure*/ ) { COMDLG32_FR_Data *pdata; TRACE("LPFINDREPLACE=%p\n", pfr); if(!COMDLG32_FR_CheckPartial(pfr, FALSE)) return 0; if((pdata = (COMDLG32_FR_Data *)COMDLG32_AllocMem(sizeof(COMDLG32_FR_Data))) == NULL) return 0; /* Error has been set */ pdata->user_fr.fra = pfr; pdata->fr = *pfr; return COMDLG32_FR_DoFindReplace(pdata); } /*********************************************************************** * ReplaceTextA [COMDLG32.19] * RETURNS * Window handle to created dialog: Succes * NULL: Failure */ HWND WINAPI ReplaceTextA( LPFINDREPLACEA pfr /* [in] Find/replace structure*/ ) { COMDLG32_FR_Data *pdata; TRACE("LPFINDREPLACE=%p\n", pfr); if(!COMDLG32_FR_CheckPartial(pfr, TRUE)) return 0; if((pdata = (COMDLG32_FR_Data *)COMDLG32_AllocMem(sizeof(COMDLG32_FR_Data))) == NULL) return 0; /* Error has been set */ pdata->user_fr.fra = pfr; pdata->fr = *pfr; pdata->fr.Flags |= FR_WINE_REPLACE; return COMDLG32_FR_DoFindReplace(pdata); } /*********************************************************************** * FindTextW [COMDLG32.7] * RETURNS * Window handle to created dialog: Succes * NULL: Failure */ HWND WINAPI FindTextW( LPFINDREPLACEW pfr /* [in] Find/replace structure*/ ) { COMDLG32_FR_Data *pdata; TRACE("LPFINDREPLACE=%p\n", pfr); if(!COMDLG32_FR_CheckPartial((LPFINDREPLACEA)pfr, FALSE)) return 0; if((pdata = (COMDLG32_FR_Data *)COMDLG32_AllocMem(sizeof(COMDLG32_FR_Data) + pfr->wFindWhatLen)) == NULL) return 0; /* Error has been set */ pdata->user_fr.frw = pfr; pdata->fr = *(LPFINDREPLACEA)pfr; /* FINDREPLACEx have same size */ pdata->fr.Flags |= FR_WINE_UNICODE; pdata->fr.lpstrFindWhat = (LPSTR)(((LPFINDREPLACEA)(pdata+1))+1); /* Set string pointer */ lstrcpynWtoA(pdata->fr.lpstrFindWhat, pfr->lpstrFindWhat, pfr->wFindWhatLen); return COMDLG32_FR_DoFindReplace(pdata); } /*********************************************************************** * ReplaceTextW [COMDLG32.20] * RETURNS * Window handle to created dialog: Succes * NULL: Failure */ HWND WINAPI ReplaceTextW( LPFINDREPLACEW pfr /* [in] Find/replace structure*/ ) { COMDLG32_FR_Data *pdata; TRACE("LPFINDREPLACE=%p\n", pfr); if(!COMDLG32_FR_CheckPartial((LPFINDREPLACEA)pfr, FALSE)) return 0; if((pdata = (COMDLG32_FR_Data *)COMDLG32_AllocMem(sizeof(COMDLG32_FR_Data) + pfr->wFindWhatLen + pfr->wReplaceWithLen)) == NULL) return 0; /* Error has been set */ pdata->user_fr.frw = pfr; pdata->fr = *(LPFINDREPLACEA)pfr; /* FINDREPLACEx have same size */ pdata->fr.Flags |= FR_WINE_REPLACE | FR_WINE_UNICODE; pdata->fr.lpstrFindWhat = (LPSTR)(((LPFINDREPLACEA)(pdata+1))+1); /* Set string pointers */ pdata->fr.lpstrReplaceWith = (LPSTR)(((LPFINDREPLACEA)(pdata+1))+1) + pfr->wFindWhatLen; lstrcpynWtoA(pdata->fr.lpstrFindWhat, pfr->lpstrFindWhat, pfr->wFindWhatLen); lstrcpynWtoA(pdata->fr.lpstrReplaceWith, pfr->lpstrReplaceWith, pfr->wReplaceWithLen); return COMDLG32_FR_DoFindReplace(pdata); } wine-20000526/dlls/commdlg/fontdlg.c0100644000175000001440000010205007113574777016643 0ustar julliardusers/* * COMMDLG - Font Dialog * * Copyright 1994 Martin Ayotte * Copyright 1996 Albrecht Kleine */ #include #include #include #include #include "windef.h" #include "winbase.h" #include "wingdi.h" #include "wine/winbase16.h" #include "wine/winuser16.h" #include "ldt.h" #include "heap.h" #include "commdlg.h" #include "dialog.h" #include "dlgs.h" #include "module.h" #include "debugtools.h" #include "font.h" #include "winproc.h" #include "cderr.h" DEFAULT_DEBUG_CHANNEL(commdlg); #include "cdlg.h" static HBITMAP16 hBitmapTT = 0; LRESULT WINAPI FormatCharDlgProcA(HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam); LRESULT WINAPI FormatCharDlgProcW(HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam); static void CFn_CHOOSEFONT16to32A(LPCHOOSEFONT16 chf16, LPCHOOSEFONTA chf32a) { chf32a->lStructSize=sizeof(CHOOSEFONTA); chf32a->hwndOwner=chf16->hwndOwner; chf32a->hDC=chf16->hDC; chf32a->iPointSize=chf16->iPointSize; chf32a->Flags=chf16->Flags; chf32a->rgbColors=chf16->rgbColors; chf32a->lCustData=chf16->lCustData; chf32a->lpfnHook=NULL; chf32a->lpTemplateName=PTR_SEG_TO_LIN(chf16->lpTemplateName); chf32a->hInstance=chf16->hInstance; chf32a->lpszStyle=PTR_SEG_TO_LIN(chf16->lpszStyle); chf32a->nFontType=chf16->nFontType; chf32a->nSizeMax=chf16->nSizeMax; chf32a->nSizeMin=chf16->nSizeMin; FONT_LogFont16To32A(PTR_SEG_TO_LIN(chf16->lpLogFont), chf32a->lpLogFont); } /*********************************************************************** * ChooseFont16 (COMMDLG.15) */ BOOL16 WINAPI ChooseFont16(LPCHOOSEFONT16 lpChFont) { HINSTANCE16 hInst; HANDLE16 hDlgTmpl = 0; BOOL16 bRet = FALSE, win32Format = FALSE; LPCVOID template; HWND hwndDialog; CHOOSEFONTA cf32a; LOGFONTA lf32a; SEGPTR lpTemplateName; cf32a.lpLogFont=&lf32a; CFn_CHOOSEFONT16to32A(lpChFont, &cf32a); TRACE("ChooseFont\n"); if (!lpChFont) return FALSE; if (lpChFont->Flags & CF_ENABLETEMPLATEHANDLE) { if (!(template = LockResource16( lpChFont->hInstance ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } } else if (lpChFont->Flags & CF_ENABLETEMPLATE) { HANDLE16 hResInfo; if (!(hResInfo = FindResource16( lpChFont->hInstance, lpChFont->lpTemplateName, RT_DIALOG16))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource16( lpChFont->hInstance, hResInfo )) || !(template = LockResource16( hDlgTmpl ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } } else { HANDLE hResInfo; if (!(hResInfo = FindResourceA(COMMDLG_hInstance32, "CHOOSE_FONT", RT_DIALOGA))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource(COMMDLG_hInstance32, hResInfo )) || !(template = LockResource( hDlgTmpl ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } win32Format = TRUE; } hInst = GetWindowLongA( lpChFont->hwndOwner, GWL_HINSTANCE ); /* lpTemplateName is not used in the dialog */ lpTemplateName=lpChFont->lpTemplateName; lpChFont->lpTemplateName=(SEGPTR)&cf32a; hwndDialog = DIALOG_CreateIndirect( hInst, template, win32Format, lpChFont->hwndOwner, (DLGPROC16)FormatCharDlgProcA, (DWORD)lpChFont, WIN_PROC_32A ); if (hwndDialog) bRet = DIALOG_DoDialogBox(hwndDialog, lpChFont->hwndOwner); if (hDlgTmpl) FreeResource16( hDlgTmpl ); lpChFont->lpTemplateName=lpTemplateName; FONT_LogFont32ATo16(cf32a.lpLogFont, (LPLOGFONT16)(PTR_SEG_TO_LIN(lpChFont->lpLogFont))); return bRet; } /*********************************************************************** * ChooseFontA (COMDLG32.3) */ BOOL WINAPI ChooseFontA(LPCHOOSEFONTA lpChFont) { BOOL bRet=FALSE; HWND hwndDialog; HINSTANCE hInst=GetWindowLongA( lpChFont->hwndOwner, GWL_HINSTANCE ); LPCVOID template; HANDLE hResInfo, hDlgTmpl; if (!(hResInfo = FindResourceA(COMMDLG_hInstance32, "CHOOSE_FONT", RT_DIALOGA))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource(COMMDLG_hInstance32, hResInfo )) || !(template = LockResource( hDlgTmpl ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } if (lpChFont->Flags & (CF_SELECTSCRIPT | CF_NOVERTFONTS | CF_ENABLETEMPLATE | CF_ENABLETEMPLATEHANDLE)) FIXME(": unimplemented flag (ignored)\n"); hwndDialog = DIALOG_CreateIndirect(hInst, template, TRUE, lpChFont->hwndOwner, (DLGPROC16)FormatCharDlgProcA, (LPARAM)lpChFont, WIN_PROC_32A ); if (hwndDialog) bRet = DIALOG_DoDialogBox(hwndDialog, lpChFont->hwndOwner); return bRet; } /*********************************************************************** * ChooseFontW (COMDLG32.4) */ BOOL WINAPI ChooseFontW(LPCHOOSEFONTW lpChFont) { BOOL bRet=FALSE; HWND hwndDialog; HINSTANCE hInst=GetWindowLongA( lpChFont->hwndOwner, GWL_HINSTANCE ); CHOOSEFONTA cf32a; LOGFONTA lf32a; LPCVOID template; HANDLE hResInfo, hDlgTmpl; if (!(hResInfo = FindResourceA(COMMDLG_hInstance32, "CHOOSE_FONT", RT_DIALOGA))) { COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); return FALSE; } if (!(hDlgTmpl = LoadResource(COMMDLG_hInstance32, hResInfo )) || !(template = LockResource( hDlgTmpl ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } if (lpChFont->Flags & (CF_SELECTSCRIPT | CF_NOVERTFONTS | CF_ENABLETEMPLATE | CF_ENABLETEMPLATEHANDLE)) FIXME(": unimplemented flag (ignored)\n"); memcpy(&cf32a, lpChFont, sizeof(cf32a)); memcpy(&lf32a, lpChFont->lpLogFont, sizeof(LOGFONTA)); lstrcpynWtoA(lf32a.lfFaceName, lpChFont->lpLogFont->lfFaceName, LF_FACESIZE); cf32a.lpLogFont=&lf32a; cf32a.lpszStyle=HEAP_strdupWtoA(GetProcessHeap(), 0, lpChFont->lpszStyle); lpChFont->lpTemplateName=(LPWSTR)&cf32a; hwndDialog=DIALOG_CreateIndirect(hInst, template, TRUE, lpChFont->hwndOwner, (DLGPROC16)FormatCharDlgProcW, (LPARAM)lpChFont, WIN_PROC_32W ); if (hwndDialog)bRet=DIALOG_DoDialogBox(hwndDialog, lpChFont->hwndOwner); HeapFree(GetProcessHeap(), 0, cf32a.lpszStyle); lpChFont->lpTemplateName=(LPWSTR)cf32a.lpTemplateName; memcpy(lpChFont->lpLogFont, &lf32a, sizeof(CHOOSEFONTA)); lstrcpynAtoW(lpChFont->lpLogFont->lfFaceName, lf32a.lfFaceName, LF_FACESIZE); return bRet; } #define TEXT_EXTRAS 4 #define TEXT_COLORS 16 static const COLORREF textcolors[TEXT_COLORS]= { 0x00000000L,0x00000080L,0x00008000L,0x00008080L, 0x00800000L,0x00800080L,0x00808000L,0x00808080L, 0x00c0c0c0L,0x000000ffL,0x0000ff00L,0x0000ffffL, 0x00ff0000L,0x00ff00ffL,0x00ffff00L,0x00FFFFFFL }; /*********************************************************************** * CFn_HookCallChk [internal] */ static BOOL CFn_HookCallChk(LPCHOOSEFONT16 lpcf) { if (lpcf) if(lpcf->Flags & CF_ENABLEHOOK) if (lpcf->lpfnHook) return TRUE; return FALSE; } /*********************************************************************** * CFn_HookCallChk32 [internal] */ static BOOL CFn_HookCallChk32(LPCHOOSEFONTA lpcf) { if (lpcf) if(lpcf->Flags & CF_ENABLEHOOK) if (lpcf->lpfnHook) return TRUE; return FALSE; } /************************************************************************* * AddFontFamily [internal] */ static INT AddFontFamily(LPLOGFONTA lplf, UINT nFontType, LPCHOOSEFONTA lpcf, HWND hwnd) { int i; WORD w; TRACE("font=%s (nFontType=%d)\n", lplf->lfFaceName,nFontType); if (lpcf->Flags & CF_FIXEDPITCHONLY) if (!(lplf->lfPitchAndFamily & FIXED_PITCH)) return 1; if (lpcf->Flags & CF_ANSIONLY) if (lplf->lfCharSet != ANSI_CHARSET) return 1; if (lpcf->Flags & CF_TTONLY) if (!(nFontType & TRUETYPE_FONTTYPE)) return 1; i=SendMessageA(hwnd, CB_ADDSTRING, 0, (LPARAM)lplf->lfFaceName); if (i!=CB_ERR) { w=(lplf->lfCharSet << 8) | lplf->lfPitchAndFamily; SendMessageA(hwnd, CB_SETITEMDATA, i, MAKELONG(nFontType,w)); return 1 ; /* store some important font information */ } else return 0; } typedef struct { HWND hWnd1; HWND hWnd2; LPCHOOSEFONTA lpcf32a; } CFn_ENUMSTRUCT, *LPCFn_ENUMSTRUCT; /************************************************************************* * FontFamilyEnumProc32 [internal] */ static INT WINAPI FontFamilyEnumProc(LPENUMLOGFONTA lpEnumLogFont, LPNEWTEXTMETRICA metrics, UINT nFontType, LPARAM lParam) { LPCFn_ENUMSTRUCT e; e=(LPCFn_ENUMSTRUCT)lParam; return AddFontFamily(&lpEnumLogFont->elfLogFont, nFontType, e->lpcf32a, e->hWnd1); } /*********************************************************************** * FontFamilyEnumProc16 (COMMDLG.19) */ INT16 WINAPI FontFamilyEnumProc16( SEGPTR logfont, SEGPTR metrics, UINT16 nFontType, LPARAM lParam ) { HWND16 hwnd=LOWORD(lParam); HWND16 hDlg=GetParent16(hwnd); LPCHOOSEFONT16 lpcf=(LPCHOOSEFONT16)GetWindowLongA(hDlg, DWL_USER); LOGFONT16 *lplf = (LOGFONT16 *)PTR_SEG_TO_LIN( logfont ); LOGFONTA lf32a; FONT_LogFont16To32A(lplf, &lf32a); return AddFontFamily(&lf32a, nFontType, (LPCHOOSEFONTA)lpcf->lpTemplateName, hwnd); } /************************************************************************* * SetFontStylesToCombo2 [internal] * * Fill font style information into combobox (without using font.c directly) */ static int SetFontStylesToCombo2(HWND hwnd, HDC hdc, LPLOGFONTA lplf) { #define FSTYLES 4 struct FONTSTYLE { int italic; int weight; char stname[20]; }; static struct FONTSTYLE fontstyles[FSTYLES]={ { 0,FW_NORMAL,"Regular"},{0,FW_BOLD,"Bold"}, { 1,FW_NORMAL,"Italic"}, {1,FW_BOLD,"Bold Italic"}}; HFONT16 hf; TEXTMETRIC16 tm; int i,j; for (i=0;ilfItalic=fontstyles[i].italic; lplf->lfWeight=fontstyles[i].weight; hf=CreateFontIndirectA(lplf); hf=SelectObject(hdc,hf); GetTextMetrics16(hdc,&tm); hf=SelectObject(hdc,hf); DeleteObject(hf); if (tm.tmWeight==fontstyles[i].weight && tm.tmItalic==fontstyles[i].italic) /* font successful created ? */ { char *str = SEGPTR_STRDUP(fontstyles[i].stname); j=SendMessage16(hwnd,CB_ADDSTRING16,0,(LPARAM)SEGPTR_GET(str) ); SEGPTR_FREE(str); if (j==CB_ERR) return 1; j=SendMessage16(hwnd, CB_SETITEMDATA16, j, MAKELONG(fontstyles[i].weight,fontstyles[i].italic)); if (j==CB_ERR) return 1; } } return 0; } /************************************************************************* * AddFontSizeToCombo3 [internal] */ static int AddFontSizeToCombo3(HWND hwnd, UINT h, LPCHOOSEFONTA lpcf) { int j; char buffer[20]; if ( (!(lpcf->Flags & CF_LIMITSIZE)) || ((lpcf->Flags & CF_LIMITSIZE) && (h >= lpcf->nSizeMin) && (h <= lpcf->nSizeMax))) { sprintf(buffer, "%2d", h); j=SendMessageA(hwnd, CB_FINDSTRINGEXACT, -1, (LPARAM)buffer); if (j==CB_ERR) { j=SendMessageA(hwnd, CB_ADDSTRING, 0, (LPARAM)buffer); if (j!=CB_ERR) j = SendMessageA(hwnd, CB_SETITEMDATA, j, h); if (j==CB_ERR) return 1; } } return 0; } /************************************************************************* * SetFontSizesToCombo3 [internal] */ static int SetFontSizesToCombo3(HWND hwnd, LPCHOOSEFONTA lpcf) { static const int sizes[]={8,9,10,11,12,14,16,18,20,22,24,26,28,36,48,72,0}; int i; for (i=0; sizes[i]; i++) if (AddFontSizeToCombo3(hwnd, sizes[i], lpcf)) return 1; return 0; } /*********************************************************************** * AddFontStyle [internal] */ static INT AddFontStyle(LPLOGFONTA lplf, UINT nFontType, LPCHOOSEFONTA lpcf, HWND hcmb2, HWND hcmb3, HWND hDlg) { int i; TRACE("(nFontType=%d)\n",nFontType); TRACE(" %s h=%ld w=%ld e=%ld o=%ld wg=%ld i=%d u=%d s=%d" " ch=%d op=%d cp=%d q=%d pf=%xh\n", lplf->lfFaceName,lplf->lfHeight,lplf->lfWidth, lplf->lfEscapement,lplf->lfOrientation, lplf->lfWeight,lplf->lfItalic,lplf->lfUnderline, lplf->lfStrikeOut,lplf->lfCharSet, lplf->lfOutPrecision, lplf->lfClipPrecision,lplf->lfQuality, lplf->lfPitchAndFamily); if (nFontType & RASTER_FONTTYPE) { if (AddFontSizeToCombo3(hcmb3, lplf->lfHeight, lpcf)) return 0; } else if (SetFontSizesToCombo3(hcmb3, lpcf)) return 0; if (!SendMessageA(hcmb2, CB_GETCOUNT, 0, 0)) { HDC hdc= (lpcf->Flags & CF_PRINTERFONTS && lpcf->hDC) ? lpcf->hDC : GetDC(hDlg); i=SetFontStylesToCombo2(hcmb2,hdc,lplf); if (!(lpcf->Flags & CF_PRINTERFONTS && lpcf->hDC)) ReleaseDC(hDlg,hdc); if (i) return 0; } return 1 ; } /*********************************************************************** * FontStyleEnumProc16 (COMMDLG.18) */ INT16 WINAPI FontStyleEnumProc16( SEGPTR logfont, SEGPTR metrics, UINT16 nFontType, LPARAM lParam ) { HWND16 hcmb2=LOWORD(lParam); HWND16 hcmb3=HIWORD(lParam); HWND16 hDlg=GetParent16(hcmb3); LPCHOOSEFONT16 lpcf=(LPCHOOSEFONT16)GetWindowLongA(hDlg, DWL_USER); LOGFONT16 *lplf = (LOGFONT16 *)PTR_SEG_TO_LIN(logfont); LOGFONTA lf32a; FONT_LogFont16To32A(lplf, &lf32a); return AddFontStyle(&lf32a, nFontType, (LPCHOOSEFONTA)lpcf->lpTemplateName, hcmb2, hcmb3, hDlg); } /*********************************************************************** * FontStyleEnumProc32 [internal] */ static INT WINAPI FontStyleEnumProc( LPENUMLOGFONTA lpFont, LPNEWTEXTMETRICA metrics, UINT nFontType, LPARAM lParam ) { LPCFn_ENUMSTRUCT s=(LPCFn_ENUMSTRUCT)lParam; HWND hcmb2=s->hWnd1; HWND hcmb3=s->hWnd2; HWND hDlg=GetParent(hcmb3); return AddFontStyle(&lpFont->elfLogFont, nFontType, s->lpcf32a, hcmb2, hcmb3, hDlg); } /*********************************************************************** * CFn_WMInitDialog [internal] */ static LRESULT CFn_WMInitDialog(HWND hDlg, WPARAM wParam, LPARAM lParam, LPCHOOSEFONTA lpcf) { HDC hdc; int i,j,res,init=0; long l; LPLOGFONTA lpxx; HCURSOR hcursor=SetCursor(LoadCursorA(0,IDC_WAITA)); SetWindowLongA(hDlg, DWL_USER, lParam); lpxx=lpcf->lpLogFont; TRACE("WM_INITDIALOG lParam=%08lX\n", lParam); if (lpcf->lStructSize != sizeof(CHOOSEFONTA)) { ERR("structure size failure !!!\n"); EndDialog (hDlg, 0); return FALSE; } if (!hBitmapTT) hBitmapTT = LoadBitmapA(0, MAKEINTRESOURCEA(OBM_TRTYPE)); /* This font will be deleted by WM_COMMAND */ SendDlgItemMessageA(hDlg,stc6,WM_SETFONT, CreateFontA(0, 0, 1, 1, 400, 0, 0, 0, 0, 0, 0, 0, 0, NULL),FALSE); if (!(lpcf->Flags & CF_SHOWHELP) || !IsWindow(lpcf->hwndOwner)) ShowWindow(GetDlgItem(hDlg,pshHelp),SW_HIDE); if (!(lpcf->Flags & CF_APPLY)) ShowWindow(GetDlgItem(hDlg,psh3),SW_HIDE); if (lpcf->Flags & CF_EFFECTS) { for (res=1,i=0;res && irgbColors) SendDlgItemMessageA(hDlg,cmb4, CB_SETCURSEL,j,0); } } else { ShowWindow(GetDlgItem(hDlg,cmb4),SW_HIDE); ShowWindow(GetDlgItem(hDlg,chx1),SW_HIDE); ShowWindow(GetDlgItem(hDlg,chx2),SW_HIDE); ShowWindow(GetDlgItem(hDlg,grp1),SW_HIDE); ShowWindow(GetDlgItem(hDlg,stc4),SW_HIDE); } hdc= (lpcf->Flags & CF_PRINTERFONTS && lpcf->hDC) ? lpcf->hDC : GetDC(hDlg); if (hdc) { CFn_ENUMSTRUCT s; s.hWnd1=GetDlgItem(hDlg,cmb1); s.lpcf32a=lpcf; if (!EnumFontFamiliesA(hdc, NULL, FontFamilyEnumProc, (LPARAM)&s)) TRACE("EnumFontFamilies returns 0\n"); if (lpcf->Flags & CF_INITTOLOGFONTSTRUCT) { /* look for fitting font name in combobox1 */ j=SendDlgItemMessageA(hDlg,cmb1,CB_FINDSTRING,-1,(LONG)lpxx->lfFaceName); if (j!=CB_ERR) { SendDlgItemMessageA(hDlg, cmb1, CB_SETCURSEL, j, 0); SendMessageA(hDlg, WM_COMMAND, MAKEWPARAM(cmb1, CBN_SELCHANGE), GetDlgItem(hDlg,cmb1)); init=1; /* look for fitting font style in combobox2 */ l=MAKELONG(lpxx->lfWeight > FW_MEDIUM ? FW_BOLD:FW_NORMAL,lpxx->lfItalic !=0); for (i=0;ilfHeight==(int)SendDlgItemMessageA(hDlg,cmb3, CB_GETITEMDATA,i,0)) SendDlgItemMessageA(hDlg,cmb3,CB_SETCURSEL,i,0); } } } if (!init) { SendDlgItemMessageA(hDlg,cmb1,CB_SETCURSEL,0,0); SendMessageA(hDlg, WM_COMMAND, MAKEWPARAM(cmb1, CBN_SELCHANGE), GetDlgItem(hDlg,cmb1)); } if (lpcf->Flags & CF_USESTYLE && lpcf->lpszStyle) { j=SendDlgItemMessageA(hDlg,cmb2,CB_FINDSTRING,-1,(LONG)lpcf->lpszStyle); if (j!=CB_ERR) { j=SendDlgItemMessageA(hDlg,cmb2,CB_SETCURSEL,j,0); SendMessageA(hDlg,WM_COMMAND,cmb2, MAKELONG(GetDlgItem(hDlg,cmb2),CBN_SELCHANGE)); } } } else { WARN("HDC failure !!!\n"); EndDialog (hDlg, 0); return FALSE; } if (!(lpcf->Flags & CF_PRINTERFONTS && lpcf->hDC)) ReleaseDC(hDlg,hdc); SetCursor(hcursor); return TRUE; } /*********************************************************************** * CFn_WMMeasureItem [internal] */ static LRESULT CFn_WMMeasureItem(HWND hDlg, WPARAM wParam, LPARAM lParam) { BITMAP bm; LPMEASUREITEMSTRUCT lpmi=(LPMEASUREITEMSTRUCT)lParam; if (!hBitmapTT) hBitmapTT = LoadBitmapA(0, MAKEINTRESOURCEA(OBM_TRTYPE)); GetObjectA( hBitmapTT, sizeof(bm), &bm ); lpmi->itemHeight=bm.bmHeight; /* FIXME: use MAX of bm.bmHeight and tm.tmHeight .*/ return 0; } /*********************************************************************** * CFn_WMDrawItem [internal] */ static LRESULT CFn_WMDrawItem(HWND hDlg, WPARAM wParam, LPARAM lParam) { HBRUSH hBrush; char buffer[40]; BITMAP bm; COLORREF cr, oldText=0, oldBk=0; RECT rect; #if 0 HDC hMemDC; int nFontType; HBITMAP hBitmap; /* for later TT usage */ #endif LPDRAWITEMSTRUCT lpdi = (LPDRAWITEMSTRUCT)lParam; if (lpdi->itemID == 0xFFFF) /* got no items */ DrawFocusRect(lpdi->hDC, &lpdi->rcItem); else { if (lpdi->CtlType == ODT_COMBOBOX) { if (lpdi->itemState ==ODS_SELECTED) { hBrush=GetSysColorBrush(COLOR_HIGHLIGHT); oldText=SetTextColor(lpdi->hDC, GetSysColor(COLOR_HIGHLIGHTTEXT)); oldBk=SetBkColor(lpdi->hDC, GetSysColor(COLOR_HIGHLIGHT)); } else { hBrush = SelectObject(lpdi->hDC, GetStockObject(LTGRAY_BRUSH)); SelectObject(lpdi->hDC, hBrush); } FillRect(lpdi->hDC, &lpdi->rcItem, hBrush); } else return TRUE; /* this should never happen */ rect=lpdi->rcItem; switch (lpdi->CtlID) { case cmb1: /* TRACE(commdlg,"WM_Drawitem cmb1\n"); */ SendMessageA(lpdi->hwndItem, CB_GETLBTEXT, lpdi->itemID, (LPARAM)buffer); GetObjectA( hBitmapTT, sizeof(bm), &bm ); TextOutA(lpdi->hDC, lpdi->rcItem.left + bm.bmWidth + 10, lpdi->rcItem.top, buffer, lstrlenA(buffer)); #if 0 nFontType = SendMessageA(lpdi->hwndItem, CB_GETITEMDATA, lpdi->itemID,0L); /* FIXME: draw bitmap if truetype usage */ if (nFontType&TRUETYPE_FONTTYPE) { hMemDC = CreateCompatibleDC(lpdi->hDC); hBitmap = SelectObject(hMemDC, hBitmapTT); BitBlt(lpdi->hDC, lpdi->rcItem.left, lpdi->rcItem.top, bm.bmWidth, bm.bmHeight, hMemDC, 0, 0, SRCCOPY); SelectObject(hMemDC, hBitmap); DeleteDC(hMemDC); } #endif break; case cmb2: case cmb3: /* TRACE(commdlg,"WM_DRAWITEN cmb2,cmb3\n"); */ SendMessageA(lpdi->hwndItem, CB_GETLBTEXT, lpdi->itemID, (LPARAM)buffer); TextOutA(lpdi->hDC, lpdi->rcItem.left, lpdi->rcItem.top, buffer, lstrlenA(buffer)); break; case cmb4: /* TRACE(commdlg,"WM_DRAWITEM cmb4 (=COLOR)\n"); */ SendMessageA(lpdi->hwndItem, CB_GETLBTEXT, lpdi->itemID, (LPARAM)buffer); TextOutA(lpdi->hDC, lpdi->rcItem.left + 25+5, lpdi->rcItem.top, buffer, lstrlenA(buffer)); cr = SendMessageA(lpdi->hwndItem, CB_GETITEMDATA, lpdi->itemID,0L); hBrush = CreateSolidBrush(cr); if (hBrush) { hBrush = SelectObject (lpdi->hDC, hBrush) ; rect.right=rect.left+25; rect.top++; rect.left+=5; rect.bottom--; Rectangle( lpdi->hDC, rect.left, rect.top, rect.right, rect.bottom ); DeleteObject( SelectObject (lpdi->hDC, hBrush)) ; } rect=lpdi->rcItem; rect.left+=25+5; break; default: return TRUE; /* this should never happen */ } if (lpdi->itemState == ODS_SELECTED) { SetTextColor(lpdi->hDC, oldText); SetBkColor(lpdi->hDC, oldBk); } } return TRUE; } /*********************************************************************** * CFn_WMCtlColor [internal] */ static LRESULT CFn_WMCtlColorStatic(HWND hDlg, WPARAM wParam, LPARAM lParam, LPCHOOSEFONTA lpcf) { if (lpcf->Flags & CF_EFFECTS) if (GetDlgCtrlID(lParam)==stc6) { SetTextColor((HDC)wParam, lpcf->rgbColors); return GetStockObject(WHITE_BRUSH); } return 0; } /*********************************************************************** * CFn_WMCommand [internal] */ static LRESULT CFn_WMCommand(HWND hDlg, WPARAM wParam, LPARAM lParam, LPCHOOSEFONTA lpcf) { HFONT hFont; int i,j; long l; HDC hdc; LPLOGFONTA lpxx=lpcf->lpLogFont; TRACE("WM_COMMAND wParam=%08lX lParam=%08lX\n", (LONG)wParam, lParam); switch (LOWORD(wParam)) { case cmb1:if (HIWORD(wParam)==CBN_SELCHANGE) { hdc=(lpcf->Flags & CF_PRINTERFONTS && lpcf->hDC) ? lpcf->hDC : GetDC(hDlg); if (hdc) { SendDlgItemMessageA(hDlg, cmb2, CB_RESETCONTENT16, 0, 0); SendDlgItemMessageA(hDlg, cmb3, CB_RESETCONTENT16, 0, 0); i=SendDlgItemMessageA(hDlg, cmb1, CB_GETCURSEL16, 0, 0); if (i!=CB_ERR) { HCURSOR hcursor=SetCursor(LoadCursorA(0,IDC_WAITA)); CFn_ENUMSTRUCT s; char str[256]; SendDlgItemMessageA(hDlg, cmb1, CB_GETLBTEXT, i, (LPARAM)str); TRACE("WM_COMMAND/cmb1 =>%s\n",str); s.hWnd1=GetDlgItem(hDlg, cmb2); s.hWnd2=GetDlgItem(hDlg, cmb3); s.lpcf32a=lpcf; EnumFontFamiliesA(hdc, str, FontStyleEnumProc, (LPARAM)&s); SetCursor(hcursor); } if (!(lpcf->Flags & CF_PRINTERFONTS && lpcf->hDC)) ReleaseDC(hDlg,hdc); } else { WARN("HDC failure !!!\n"); EndDialog (hDlg, 0); return TRUE; } } case chx1: case chx2: case cmb2: case cmb3:if (HIWORD(wParam)==CBN_SELCHANGE || HIWORD(wParam)== BN_CLICKED ) { char str[256]; TRACE("WM_COMMAND/cmb2,3 =%08lX\n", lParam); i=SendDlgItemMessageA(hDlg,cmb1,CB_GETCURSEL,0,0); if (i==CB_ERR) i=GetDlgItemTextA( hDlg, cmb1, str, 256 ); else { SendDlgItemMessageA(hDlg,cmb1,CB_GETLBTEXT,i, (LPARAM)str); l=SendDlgItemMessageA(hDlg,cmb1,CB_GETITEMDATA,i,0); j=HIWORD(l); lpcf->nFontType = LOWORD(l); /* FIXME: lpcf->nFontType |= .... SIMULATED_FONTTYPE and so */ /* same value reported to the EnumFonts call back with the extra FONTTYPE_... bits added */ lpxx->lfPitchAndFamily=j&0xff; lpxx->lfCharSet=j>>8; } strcpy(lpxx->lfFaceName,str); i=SendDlgItemMessageA(hDlg, cmb2, CB_GETCURSEL, 0, 0); if (i!=CB_ERR) { l=SendDlgItemMessageA(hDlg, cmb2, CB_GETITEMDATA, i, 0); if (0!=(lpxx->lfItalic=HIWORD(l))) lpcf->nFontType |= ITALIC_FONTTYPE; if ((lpxx->lfWeight=LOWORD(l)) > FW_MEDIUM) lpcf->nFontType |= BOLD_FONTTYPE; } i=SendDlgItemMessageA(hDlg, cmb3, CB_GETCURSEL, 0, 0); if (i!=CB_ERR) lpxx->lfHeight=-LOWORD(SendDlgItemMessageA(hDlg, cmb3, CB_GETITEMDATA, i, 0)); else lpxx->lfHeight=0; lpxx->lfStrikeOut=IsDlgButtonChecked(hDlg,chx1); lpxx->lfUnderline=IsDlgButtonChecked(hDlg,chx2); lpxx->lfWidth=lpxx->lfOrientation=lpxx->lfEscapement=0; lpxx->lfOutPrecision=OUT_DEFAULT_PRECIS; lpxx->lfClipPrecision=CLIP_DEFAULT_PRECIS; lpxx->lfQuality=DEFAULT_QUALITY; lpcf->iPointSize= -10*lpxx->lfHeight; hFont=CreateFontIndirectA(lpxx); if (hFont) { HFONT oldFont=SendDlgItemMessageA(hDlg, stc6, WM_GETFONT, 0, 0); SendDlgItemMessageA(hDlg,stc6,WM_SETFONT,hFont,TRUE); DeleteObject(oldFont); } } break; case cmb4:i=SendDlgItemMessageA(hDlg, cmb4, CB_GETCURSEL, 0, 0); if (i!=CB_ERR) { lpcf->rgbColors=textcolors[i]; InvalidateRect( GetDlgItem(hDlg,stc6), NULL, 0 ); } break; case psh15:i=RegisterWindowMessageA( HELPMSGSTRING ); if (lpcf->hwndOwner) SendMessageA(lpcf->hwndOwner, i, 0, (LPARAM)GetWindowLongA(hDlg, DWL_USER)); /* if (CFn_HookCallChk(lpcf)) CallWindowProc16(lpcf->lpfnHook,hDlg,WM_COMMAND,psh15,(LPARAM)lpcf);*/ break; case IDOK:if ( (!(lpcf->Flags & CF_LIMITSIZE)) || ( (lpcf->Flags & CF_LIMITSIZE) && (-lpxx->lfHeight >= lpcf->nSizeMin) && (-lpxx->lfHeight <= lpcf->nSizeMax))) EndDialog(hDlg, TRUE); else { char buffer[80]; sprintf(buffer,"Select a font size between %d and %d points.", lpcf->nSizeMin,lpcf->nSizeMax); MessageBoxA(hDlg, buffer, NULL, MB_OK); } return(TRUE); case IDCANCEL:EndDialog(hDlg, FALSE); return(TRUE); } return(FALSE); } static LRESULT CFn_WMDestroy(HWND hwnd, WPARAM wParam, LPARAM lParam) { DeleteObject(SendDlgItemMessageA(hwnd, stc6, WM_GETFONT, 0, 0)); return TRUE; } /*********************************************************************** * FormatCharDlgProc16 (COMMDLG.16) FIXME: 1. some strings are "hardcoded", but it's better load from sysres 2. some CF_.. flags are not supported 3. some TType extensions */ LRESULT WINAPI FormatCharDlgProc16(HWND16 hDlg, UINT16 message, WPARAM16 wParam, LPARAM lParam) { LPCHOOSEFONT16 lpcf; LPCHOOSEFONTA lpcf32a; UINT uMsg32; WPARAM wParam32; LRESULT res=0; if (message!=WM_INITDIALOG) { lpcf=(LPCHOOSEFONT16)GetWindowLongA(hDlg, DWL_USER); if (!lpcf) return FALSE; if (CFn_HookCallChk(lpcf)) res=CallWindowProc16((WNDPROC16)lpcf->lpfnHook,hDlg,message,wParam,lParam); if (res) return res; } else { lpcf=(LPCHOOSEFONT16)lParam; lpcf32a=(LPCHOOSEFONTA)lpcf->lpTemplateName; if (!CFn_WMInitDialog(hDlg, wParam, lParam, lpcf32a)) { TRACE("CFn_WMInitDialog returned FALSE\n"); return FALSE; } if (CFn_HookCallChk(lpcf)) return CallWindowProc16((WNDPROC16)lpcf->lpfnHook,hDlg,WM_INITDIALOG,wParam,lParam); } WINPROC_MapMsg16To32A(message, wParam, &uMsg32, &wParam32, &lParam); lpcf32a=(LPCHOOSEFONTA)lpcf->lpTemplateName; switch (uMsg32) { case WM_MEASUREITEM: res=CFn_WMMeasureItem(hDlg, wParam32, lParam); break; case WM_DRAWITEM: res=CFn_WMDrawItem(hDlg, wParam32, lParam); break; case WM_CTLCOLORSTATIC: res=CFn_WMCtlColorStatic(hDlg, wParam32, lParam, lpcf32a); break; case WM_COMMAND: res=CFn_WMCommand(hDlg, wParam32, lParam, lpcf32a); break; case WM_DESTROY: res=CFn_WMDestroy(hDlg, wParam32, lParam); break; case WM_CHOOSEFONT_GETLOGFONT: TRACE("WM_CHOOSEFONT_GETLOGFONT lParam=%08lX\n", lParam); FIXME("current logfont back to caller\n"); break; } WINPROC_UnmapMsg16To32A(hDlg,uMsg32, wParam32, lParam, res); return res; } /*********************************************************************** * FormatCharDlgProcA [internal] */ LRESULT WINAPI FormatCharDlgProcA(HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam) { LPCHOOSEFONTA lpcf; LRESULT res=FALSE; if (uMsg!=WM_INITDIALOG) { lpcf=(LPCHOOSEFONTA)GetWindowLongA(hDlg, DWL_USER); if (!lpcf) return FALSE; if (CFn_HookCallChk32(lpcf)) res=CallWindowProcA((WNDPROC)lpcf->lpfnHook, hDlg, uMsg, wParam, lParam); if (res) return res; } else { lpcf=(LPCHOOSEFONTA)lParam; if (!CFn_WMInitDialog(hDlg, wParam, lParam, lpcf)) { TRACE("CFn_WMInitDialog returned FALSE\n"); return FALSE; } if (CFn_HookCallChk32(lpcf)) return CallWindowProcA((WNDPROC)lpcf->lpfnHook,hDlg,WM_INITDIALOG,wParam,lParam); } switch (uMsg) { case WM_MEASUREITEM: return CFn_WMMeasureItem(hDlg, wParam, lParam); case WM_DRAWITEM: return CFn_WMDrawItem(hDlg, wParam, lParam); case WM_CTLCOLORSTATIC: return CFn_WMCtlColorStatic(hDlg, wParam, lParam, lpcf); case WM_COMMAND: return CFn_WMCommand(hDlg, wParam, lParam, lpcf); case WM_DESTROY: return CFn_WMDestroy(hDlg, wParam, lParam); case WM_CHOOSEFONT_GETLOGFONT: TRACE("WM_CHOOSEFONT_GETLOGFONT lParam=%08lX\n", lParam); FIXME("current logfont back to caller\n"); break; } return res; } /*********************************************************************** * FormatCharDlgProcW [internal] */ LRESULT WINAPI FormatCharDlgProcW(HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam) { LPCHOOSEFONTW lpcf32w; LPCHOOSEFONTA lpcf32a; LRESULT res=FALSE; if (uMsg!=WM_INITDIALOG) { lpcf32w=(LPCHOOSEFONTW)GetWindowLongA(hDlg, DWL_USER); if (!lpcf32w) return FALSE; if (CFn_HookCallChk32((LPCHOOSEFONTA)lpcf32w)) res=CallWindowProcW((WNDPROC)lpcf32w->lpfnHook, hDlg, uMsg, wParam, lParam); if (res) return res; } else { lpcf32w=(LPCHOOSEFONTW)lParam; lpcf32a=(LPCHOOSEFONTA)lpcf32w->lpTemplateName; if (!CFn_WMInitDialog(hDlg, wParam, lParam, lpcf32a)) { TRACE("CFn_WMInitDialog returned FALSE\n"); return FALSE; } if (CFn_HookCallChk32((LPCHOOSEFONTA)lpcf32w)) return CallWindowProcW((WNDPROC)lpcf32w->lpfnHook,hDlg,WM_INITDIALOG,wParam,lParam); } lpcf32a=(LPCHOOSEFONTA)lpcf32w->lpTemplateName; switch (uMsg) { case WM_MEASUREITEM: return CFn_WMMeasureItem(hDlg, wParam, lParam); case WM_DRAWITEM: return CFn_WMDrawItem(hDlg, wParam, lParam); case WM_CTLCOLORSTATIC: return CFn_WMCtlColorStatic(hDlg, wParam, lParam, lpcf32a); case WM_COMMAND: return CFn_WMCommand(hDlg, wParam, lParam, lpcf32a); case WM_DESTROY: return CFn_WMDestroy(hDlg, wParam, lParam); case WM_CHOOSEFONT_GETLOGFONT: TRACE("WM_CHOOSEFONT_GETLOGFONT lParam=%08lX\n", lParam); FIXME("current logfont back to caller\n"); break; } return res; } wine-20000526/dlls/commdlg/generic.c0100644000175000001440000000350606730500267016613 0ustar julliardusers/* * COMMDLG/COMDLG32 functions * * Copyright 1994 Martin Ayotte * Copyright 1996 Albrecht Kleine * Copyright 1998,1999 Bertho Stultiens * Copyright 1999 Klaas van Gend */ #include "winbase.h" #include "commdlg.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(commdlg) #include "cdlg.h" HINSTANCE16 COMMDLG_hInstance = 0; HINSTANCE COMMDLG_hInstance32 = 0; static int COMMDLG_Attach = 0; /*********************************************************************** * COMMDLG_DllEntryPoint [COMMDLG.entry] * * Initialization code for the COMMDLG DLL * * RETURNS: */ BOOL WINAPI COMMDLG_DllEntryPoint(DWORD Reason, HINSTANCE16 hInst, WORD ds, WORD HeapSize, DWORD res1, WORD res2) { TRACE("(%08lx, %04x, %04x, %04x, %08lx, %04x)\n", Reason, hInst, ds, HeapSize, res1, res2); switch(Reason) { case DLL_PROCESS_ATTACH: COMMDLG_Attach++; if(COMMDLG_hInstance) { ERR("commdlg.dll instantiated twice!\n"); /* * We should return FALSE here, but that will break * most apps that use CreateProcess because we do * not yet support seperate address-spaces. */ return TRUE; } COMMDLG_hInstance = hInst; if(!COMMDLG_hInstance32) { if(!(COMMDLG_hInstance32 = LoadLibraryA("comdlg32.dll"))) { ERR("Could not load sibling comdlg32.dll\n"); return FALSE; } } break; case DLL_PROCESS_DETACH: if(!--COMMDLG_Attach) { COMMDLG_hInstance = 0; if(COMMDLG_hInstance32) FreeLibrary(COMMDLG_hInstance32); } break; } return TRUE; } /*********************************************************************** * CommDlgExtendedError16 [COMMDLG.26] * * Get the last error value if a commdlg function fails. * RETURNS * Current error value which might not be valid * if a previous call succeeded. */ DWORD WINAPI CommDlgExtendedError16(void) { return CommDlgExtendedError(); } wine-20000526/dlls/commdlg/printdlg.c0100644000175000001440000011267707113574777017051 0ustar julliardusers/* * COMMDLG - Print Dialog * * Copyright 1994 Martin Ayotte * Copyright 1996 Albrecht Kleine * Copyright 1999 Klaas van Gend * Copyright 2000 Huw D M Davies */ #include #include #include #include #include "windef.h" #include "winbase.h" #include "wingdi.h" #include "wine/wingdi16.h" #include "winuser.h" #include "wine/winuser16.h" #include "ldt.h" #include "commdlg.h" #include "dlgs.h" #include "module.h" #include "debugtools.h" #include "winproc.h" #include "cderr.h" #include "winspool.h" #include "winerror.h" DEFAULT_DEBUG_CHANNEL(commdlg); #include "cdlg.h" /* This PRINTDLGA internal structure stores * pointers to several throughout useful structures. * */ typedef struct { LPDEVMODEA lpDevMode; LPPRINTDLGA lpPrintDlg; LPPRINTER_INFO_2A lpPrinterInfo; UINT HelpMessageID; HICON hCollateIcon; /* PrintDlg only */ HICON hNoCollateIcon; /* PrintDlg only */ HICON hPortraitIcon; /* PrintSetupDlg only */ HICON hLandscapeIcon; /* PrintSetupDlg only */ } PRINT_PTRA; /* Debugiging info */ static struct pd_flags { DWORD flag; LPSTR name; } pd_flags[] = { {PD_SELECTION, "PD_SELECTION "}, {PD_PAGENUMS, "PD_PAGENUMS "}, {PD_NOSELECTION, "PD_NOSELECTION "}, {PD_NOPAGENUMS, "PD_NOPAGENUMS "}, {PD_COLLATE, "PD_COLLATE "}, {PD_PRINTTOFILE, "PD_PRINTTOFILE "}, {PD_PRINTSETUP, "PD_PRINTSETUP "}, {PD_NOWARNING, "PD_NOWARNING "}, {PD_RETURNDC, "PD_RETURNDC "}, {PD_RETURNIC, "PD_RETURNIC "}, {PD_RETURNDEFAULT, "PD_RETURNDEFAULT "}, {PD_SHOWHELP, "PD_SHOWHELP "}, {PD_ENABLEPRINTHOOK, "PD_ENABLEPRINTHOOK "}, {PD_ENABLESETUPHOOK, "PD_ENABLESETUPHOOK "}, {PD_ENABLEPRINTTEMPLATE, "PD_ENABLEPRINTTEMPLATE "}, {PD_ENABLESETUPTEMPLATE, "PD_ENABLESETUPTEMPLATE "}, {PD_ENABLEPRINTTEMPLATEHANDLE, "PD_ENABLEPRINTTEMPLATEHANDLE "}, {PD_ENABLESETUPTEMPLATEHANDLE, "PD_ENABLESETUPTEMPLATEHANDLE "}, {PD_USEDEVMODECOPIES, "PD_USEDEVMODECOPIES[ANDCOLLATE] "}, {PD_DISABLEPRINTTOFILE, "PD_DISABLEPRINTTOFILE "}, {PD_HIDEPRINTTOFILE, "PD_HIDEPRINTTOFILE "}, {PD_NONETWORKBUTTON, "PD_NONETWORKBUTTON "}, {-1, NULL} }; /*********************************************************************** * PRINTDLG_GetDefaultPrinterName * * Returns the default printer name in buf. * Even under WinNT/2000 default printer is retrieved via GetProfileString - * these entries are mapped somewhere in the registry rather than win.ini. * * Returns TRUE on success else FALSE */ static BOOL PRINTDLG_GetDefaultPrinterName(LPSTR buf, DWORD len) { char *ptr; if(!GetProfileStringA("windows", "device", "", buf, len)) return FALSE; if((ptr = strchr(buf, ',')) == NULL) return FALSE; *ptr = '\0'; return TRUE; } /*********************************************************************** * PRINTDLG_OpenDefaultPrinter * * Returns a winspool printer handle to the default printer in *hprn * Caller must call ClosePrinter on the handle * * Returns TRUE on success else FALSE */ static BOOL PRINTDLG_OpenDefaultPrinter(HANDLE *hprn) { char buf[260]; if(!PRINTDLG_GetDefaultPrinterName(buf, sizeof(buf))) return FALSE; return OpenPrinterA(buf, hprn, NULL); } /*********************************************************************** * PRINTDLG_SetUpPrinterListCombo * * Initializes printer list combox. * hDlg: HWND of dialog * id: Control id of combo * name: Name of printer to select * * Initializes combo with list of available printers. Selects printer 'name' * If name is NULL or does not exist select the default printer. * * Returns number of printers added to list. */ static INT PRINTDLG_SetUpPrinterListCombo(HWND hDlg, UINT id, LPCSTR name) { DWORD needed, num; INT i; LPPRINTER_INFO_2A pi; EnumPrintersA(PRINTER_ENUM_LOCAL, NULL, 2, NULL, 0, &needed, &num); pi = HeapAlloc(GetProcessHeap(), 0, needed); EnumPrintersA(PRINTER_ENUM_LOCAL, NULL, 2, (LPBYTE)pi, needed, &needed, &num); for(i = 0; i < num; i++) { SendDlgItemMessageA(hDlg, id, CB_ADDSTRING, 0, (LPARAM)pi[i].pPrinterName ); } HeapFree(GetProcessHeap(), 0, pi); if(!name || (i = SendDlgItemMessageA(hDlg, id, CB_FINDSTRINGEXACT, -1, (LPARAM)name)) == CB_ERR) { char buf[260]; TRACE("Can't find '%s' in printer list so trying to find default\n", name); if(!PRINTDLG_GetDefaultPrinterName(buf, sizeof(buf))) return num; i = SendDlgItemMessageA(hDlg, id, CB_FINDSTRINGEXACT, -1, (LPARAM)buf); if(i == CB_ERR) TRACE("Can't find default printer in printer list\n"); } SendDlgItemMessageA(hDlg, id, CB_SETCURSEL, i, 0); return num; } /*********************************************************************** * PRINTDLG_CreateDevNames [internal] * * * creates a DevNames structure. * * (NB. when we handle unicode the offsets will be in wchars). */ static BOOL PRINTDLG_CreateDevNames(HGLOBAL *hmem, char* DeviceDriverName, char* DeviceName, char* OutputPort) { long size; char* pDevNamesSpace; char* pTempPtr; LPDEVNAMES lpDevNames; char buf[260]; size = strlen(DeviceDriverName) + 1 + strlen(DeviceName) + 1 + strlen(OutputPort) + 1 + sizeof(DEVNAMES); if(*hmem) *hmem = GlobalReAlloc(*hmem, size, GMEM_MOVEABLE); else *hmem = GlobalAlloc(GMEM_MOVEABLE, size); if (*hmem == 0) return FALSE; pDevNamesSpace = GlobalLock(*hmem); lpDevNames = (LPDEVNAMES) pDevNamesSpace; pTempPtr = pDevNamesSpace + sizeof(DEVNAMES); strcpy(pTempPtr, DeviceDriverName); lpDevNames->wDriverOffset = pTempPtr - pDevNamesSpace; pTempPtr += strlen(DeviceDriverName) + 1; strcpy(pTempPtr, DeviceName); lpDevNames->wDeviceOffset = pTempPtr - pDevNamesSpace; pTempPtr += strlen(DeviceName) + 1; strcpy(pTempPtr, OutputPort); lpDevNames->wOutputOffset = pTempPtr - pDevNamesSpace; PRINTDLG_GetDefaultPrinterName(buf, sizeof(buf)); lpDevNames->wDefault = (strcmp(buf, DeviceName) == 0) ? 1 : 0; GlobalUnlock(*hmem); return TRUE; } /*********************************************************************** * PRINTDLG_UpdatePrintDlg [internal] * * * updates the PrintDlg structure for returnvalues. * * RETURNS * FALSE if user is not allowed to close (i.e. wrong nTo or nFrom values) * TRUE if succesful. */ static BOOL PRINTDLG_UpdatePrintDlg(HWND hDlg, PRINT_PTRA* PrintStructures) { LPPRINTDLGA lppd = PrintStructures->lpPrintDlg; PDEVMODEA lpdm = PrintStructures->lpDevMode; LPPRINTER_INFO_2A pi = PrintStructures->lpPrinterInfo; if(!lpdm) return FALSE; if(!(lppd->Flags & PD_PRINTSETUP)) { /* check whether nFromPage and nToPage are within range defined by * nMinPage and nMaxPage */ if (IsDlgButtonChecked(hDlg, rad3) == BST_CHECKED) { /* Pages */ WORD nToPage; WORD nFromPage; nFromPage = GetDlgItemInt(hDlg, edt1, NULL, FALSE); nToPage = GetDlgItemInt(hDlg, edt2, NULL, FALSE); if (nFromPage < lppd->nMinPage || nFromPage > lppd->nMaxPage || nToPage < lppd->nMinPage || nToPage > lppd->nMaxPage) { char resourcestr[256]; char resultstr[256]; LoadStringA(COMDLG32_hInstance, PD32_INVALID_PAGE_RANGE, resourcestr, 255); sprintf(resultstr,resourcestr, lppd->nMinPage, lppd->nMaxPage); LoadStringA(COMDLG32_hInstance, PD32_PRINT_TITLE, resourcestr, 255); MessageBoxA(hDlg, resultstr, resourcestr, MB_OK | MB_ICONWARNING); return FALSE; } lppd->nFromPage = nFromPage; lppd->nToPage = nToPage; } if (IsDlgButtonChecked(hDlg, chx1) == BST_CHECKED) {/* Print to file */ lppd->Flags |= PD_PRINTTOFILE; pi->pPortName = "FILE:"; } if (IsDlgButtonChecked(hDlg, chx2) == BST_CHECKED) { /* Collate */ FIXME("Collate lppd not yet implemented as output\n"); } /* set PD_Collate and nCopies */ if (lppd->Flags & PD_USEDEVMODECOPIESANDCOLLATE) { /* The application doesn't support multiple copies or collate... */ lppd->Flags &= ~PD_COLLATE; lppd->nCopies = 1; /* if the printer driver supports it... store info there * otherwise no collate & multiple copies ! */ if (lpdm->dmFields & DM_COLLATE) lpdm->dmCollate = (IsDlgButtonChecked(hDlg, chx2) == BST_CHECKED); if (lpdm->dmFields & DM_COPIES) lpdm->dmCopies = GetDlgItemInt(hDlg, edt3, NULL, FALSE); } else { if (IsDlgButtonChecked(hDlg, chx2) == BST_CHECKED) lppd->Flags |= PD_COLLATE; else lppd->Flags &= ~PD_COLLATE; lppd->nCopies = GetDlgItemInt(hDlg, edt3, NULL, FALSE); } } return TRUE; } /************************************************************************ * PRINTDLG_SetUpPaperComboBox * * Initialize either the papersize or inputslot combos of the Printer Setup * dialog. We store the associated word (eg DMPAPER_A4) as the item data. * We also try to re-select the old selection. */ static BOOL PRINTDLG_SetUpPaperComboBox(HWND hDlg, int nIDComboBox, char* PrinterName, char* PortName, LPDEVMODEA dm) { int i; DWORD NrOfEntries; char* Names; WORD* Words; DWORD Sel; WORD oldWord = 0; int NamesSize; int fwCapability_Names; int fwCapability_Words; TRACE(" Printer: %s, ComboID: %d\n",PrinterName,nIDComboBox); /* query the dialog box for the current selected value */ Sel = SendDlgItemMessageA(hDlg, nIDComboBox, CB_GETCURSEL, 0, 0); if(Sel != CB_ERR) { oldWord = SendDlgItemMessageA(hDlg, nIDComboBox, CB_GETITEMDATA, Sel, 0); } if (nIDComboBox == cmb2) { NamesSize = 64; fwCapability_Names = DC_PAPERNAMES; fwCapability_Words = DC_PAPERS; } else { nIDComboBox = cmb3; NamesSize = 24; fwCapability_Names = DC_BINNAMES; fwCapability_Words = DC_BINS; } /* for some printer drivers, DeviceCapabilities calls a VXD to obtain the * paper settings. As Wine doesn't allow VXDs, this results in a crash. */ WARN(" if your printer driver uses VXDs, expect a crash now!\n"); NrOfEntries = DeviceCapabilitiesA(PrinterName, PortName, fwCapability_Names, NULL, dm); if (NrOfEntries == 0) WARN("no Name Entries found!\n"); if(DeviceCapabilitiesA(PrinterName, PortName, fwCapability_Words, NULL, dm) != NrOfEntries) { ERR("Number of caps is different\n"); NrOfEntries = 0; } Names = HeapAlloc(GetProcessHeap(),0, NrOfEntries*NamesSize); Words = HeapAlloc(GetProcessHeap(),0, NrOfEntries*sizeof(WORD)); NrOfEntries = DeviceCapabilitiesA(PrinterName, PortName, fwCapability_Names, Names, dm); NrOfEntries = DeviceCapabilitiesA(PrinterName, PortName, fwCapability_Words, (LPSTR)Words, dm); /* reset any current content in the combobox */ SendDlgItemMessageA(hDlg, nIDComboBox, CB_RESETCONTENT, 0, 0); /* store new content */ for (i = 0; i < NrOfEntries; i++) { DWORD pos = SendDlgItemMessageA(hDlg, nIDComboBox, CB_ADDSTRING, 0, (LPARAM)(&Names[i*NamesSize]) ); SendDlgItemMessageA(hDlg, nIDComboBox, CB_SETITEMDATA, pos, Words[i]); } /* Look for old selection - can't do this is previous loop since item order will change as more items are added */ Sel = 0; for (i = 0; i < NrOfEntries; i++) { if(SendDlgItemMessageA(hDlg, nIDComboBox, CB_GETITEMDATA, i, 0) == oldWord) { Sel = i; break; } } SendDlgItemMessageA(hDlg, nIDComboBox, CB_SETCURSEL, Sel, 0); HeapFree(GetProcessHeap(),0,Words); HeapFree(GetProcessHeap(),0,Names); return TRUE; } /*********************************************************************** * PRINTDLG_UpdatePrinterInfoTexts [internal] */ static void PRINTDLG_UpdatePrinterInfoTexts(HWND hDlg, LPPRINTER_INFO_2A pi) { char StatusMsg[256]; char ResourceString[256]; int i; /* Status Message */ StatusMsg[0]='\0'; /* add all status messages */ for (i = 0; i < 25; i++) { if (pi->Status & (1<pDriverName); if (pi->pLocation != NULL && pi->pLocation[0] != '\0') SendDlgItemMessageA(hDlg, stc14, WM_SETTEXT, 0,(LPARAM)pi->pLocation); else SendDlgItemMessageA(hDlg, stc14, WM_SETTEXT, 0,(LPARAM)pi->pPortName); SendDlgItemMessageA(hDlg, stc13, WM_SETTEXT, 0, (LPARAM)pi->pComment); return; } /******************************************************************* * * PRINTDLG_ChangePrinter * */ static BOOL PRINTDLG_ChangePrinter(HWND hDlg, char *name, PRINT_PTRA *PrintStructures) { LPPRINTDLGA lppd = PrintStructures->lpPrintDlg; LPDEVMODEA lpdm = NULL; LONG dmSize; DWORD needed; HANDLE hprn; if(PrintStructures->lpPrinterInfo) HeapFree(GetProcessHeap(),0, PrintStructures->lpPrinterInfo); if(!OpenPrinterA(name, &hprn, NULL)) { ERR("Can't open printer %s\n", name); return FALSE; } GetPrinterA(hprn, 2, NULL, 0, &needed); PrintStructures->lpPrinterInfo = HeapAlloc(GetProcessHeap(),0,needed); GetPrinterA(hprn, 2, (LPBYTE)PrintStructures->lpPrinterInfo, needed, &needed); ClosePrinter(hprn); PRINTDLG_UpdatePrinterInfoTexts(hDlg, PrintStructures->lpPrinterInfo); if(PrintStructures->lpDevMode) { HeapFree(GetProcessHeap(), 0, PrintStructures->lpDevMode); PrintStructures->lpDevMode = NULL; } dmSize = DocumentPropertiesA(0, 0, name, NULL, NULL, 0); if(dmSize == -1) { ERR("DocumentProperties fails on %s\n", debugstr_a(name)); return FALSE; } PrintStructures->lpDevMode = HeapAlloc(GetProcessHeap(), 0, dmSize); dmSize = DocumentPropertiesA(0, 0, name, PrintStructures->lpDevMode, NULL, DM_OUT_BUFFER); if(lppd->hDevMode && (lpdm = GlobalLock(lppd->hDevMode)) && !strcmp(lpdm->dmDeviceName, PrintStructures->lpDevMode->dmDeviceName)) { /* Supplied devicemode matches current printer so try to use it */ DocumentPropertiesA(0, 0, name, PrintStructures->lpDevMode, lpdm, DM_OUT_BUFFER | DM_IN_BUFFER); } if(lpdm) GlobalUnlock(lppd->hDevMode); lpdm = PrintStructures->lpDevMode; /* use this as a shortcut */ if(!(lppd->Flags & PD_PRINTSETUP)) { /* Print range (All/Range/Selection) */ SetDlgItemInt(hDlg, edt1, lppd->nFromPage, FALSE); SetDlgItemInt(hDlg, edt2, lppd->nToPage, FALSE); CheckRadioButton(hDlg, rad1, rad3, rad1); /* default */ if (lppd->Flags & PD_NOSELECTION) EnableWindow(GetDlgItem(hDlg, rad2), FALSE); else if (lppd->Flags & PD_SELECTION) CheckRadioButton(hDlg, rad1, rad3, rad2); if (lppd->Flags & PD_NOPAGENUMS) { EnableWindow(GetDlgItem(hDlg, rad3), FALSE); EnableWindow(GetDlgItem(hDlg, stc2),FALSE); EnableWindow(GetDlgItem(hDlg, edt1), FALSE); EnableWindow(GetDlgItem(hDlg, stc3),FALSE); EnableWindow(GetDlgItem(hDlg, edt2), FALSE); } else { if (lppd->Flags & PD_PAGENUMS) CheckRadioButton(hDlg, rad1, rad3, rad3); } /* "All xxx pages"... */ { char resourcestr[64]; char result[64]; LoadStringA(COMDLG32_hInstance, PD32_PRINT_ALL_X_PAGES, resourcestr, 49); sprintf(result,resourcestr,lppd->nMaxPage - lppd->nMinPage + 1); SendDlgItemMessageA(hDlg, rad1, WM_SETTEXT, 0, (LPARAM) result); } /* Collate pages * * FIXME: The ico3 is not displayed for some reason. I don't know why. */ if (lppd->Flags & PD_COLLATE) { SendDlgItemMessageA(hDlg, ico3, STM_SETIMAGE, (WPARAM) IMAGE_ICON, (LPARAM)PrintStructures->hCollateIcon); CheckDlgButton(hDlg, chx2, 1); } else { SendDlgItemMessageA(hDlg, ico3, STM_SETIMAGE, (WPARAM) IMAGE_ICON, (LPARAM)PrintStructures->hNoCollateIcon); CheckDlgButton(hDlg, chx2, 0); } if (lppd->Flags & PD_USEDEVMODECOPIESANDCOLLATE) { /* if printer doesn't support it: no Collate */ if (!(lpdm->dmFields & DM_COLLATE)) { EnableWindow(GetDlgItem(hDlg, chx2), FALSE); EnableWindow(GetDlgItem(hDlg, ico3), FALSE); } } /* nCopies */ if (lppd->hDevMode == 0) SetDlgItemInt(hDlg, edt3, lppd->nCopies, FALSE); else SetDlgItemInt(hDlg, edt3, lpdm->dmCopies, FALSE); if (lppd->Flags & PD_USEDEVMODECOPIESANDCOLLATE) { /* if printer doesn't support it: no nCopies */ if (!(lpdm->dmFields & DM_COPIES)) { EnableWindow(GetDlgItem(hDlg, edt3), FALSE); EnableWindow(GetDlgItem(hDlg, stc5), FALSE); } } /* print to file */ CheckDlgButton(hDlg, chx1, (lppd->Flags & PD_PRINTTOFILE) ? 1 : 0); if (lppd->Flags & PD_DISABLEPRINTTOFILE) EnableWindow(GetDlgItem(hDlg, chx1), FALSE); if (lppd->Flags & PD_HIDEPRINTTOFILE) ShowWindow(GetDlgItem(hDlg, chx1), SW_HIDE); } else { /* PD_PRINTSETUP */ PRINTDLG_SetUpPaperComboBox(hDlg, cmb2, PrintStructures->lpPrinterInfo->pPrinterName, PrintStructures->lpPrinterInfo->pPortName, lpdm); PRINTDLG_SetUpPaperComboBox(hDlg, cmb3, PrintStructures->lpPrinterInfo->pPrinterName, PrintStructures->lpPrinterInfo->pPortName, lpdm); CheckRadioButton(hDlg, rad1, rad2, (lpdm->u1.s1.dmOrientation == DMORIENT_PORTRAIT) ? rad1: rad2); } /* help button */ if ((lppd->Flags & PD_SHOWHELP)==0) { /* hide if PD_SHOWHELP not specified */ ShowWindow(GetDlgItem(hDlg, pshHelp), SW_HIDE); } return TRUE; } /*********************************************************************** * PRINTDLG_WMInitDialog [internal] */ static LRESULT PRINTDLG_WMInitDialog(HWND hDlg, WPARAM wParam, PRINT_PTRA* PrintStructures) { LPPRINTDLGA lppd = PrintStructures->lpPrintDlg; DEVNAMES *pdn; DEVMODEA *pdm; char *name = NULL; UINT comboID = (lppd->Flags & PD_PRINTSETUP) ? cmb1 : cmb4; /* load Collate ICONs */ PrintStructures->hCollateIcon = LoadIconA(COMDLG32_hInstance, "PD32_COLLATE"); PrintStructures->hNoCollateIcon = LoadIconA(COMDLG32_hInstance, "PD32_NOCOLLATE"); if(PrintStructures->hCollateIcon == 0 || PrintStructures->hNoCollateIcon == 0) { ERR("no icon in resourcefile\n"); COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); EndDialog(hDlg, FALSE); } /* load Paper Orientation ICON */ /* FIXME: not implemented yet */ /* * if lppd->Flags PD_SHOWHELP is specified, a HELPMESGSTRING message * must be registered and the Help button must be shown. */ if (lppd->Flags & PD_SHOWHELP) { if((PrintStructures->HelpMessageID = RegisterWindowMessageA(HELPMSGSTRING)) == 0) { COMDLG32_SetCommDlgExtendedError(CDERR_REGISTERMSGFAIL); return FALSE; } } else PrintStructures->HelpMessageID = 0; /* FIXME: I allow more freedom than either Win95 or WinNT, * which do not agree to what errors should be thrown or not * in case nToPage or nFromPage is out-of-range. */ if (lppd->nMaxPage < lppd->nMinPage) lppd->nMaxPage = lppd->nMinPage; if (lppd->nMinPage == lppd->nMaxPage) lppd->Flags |= PD_NOPAGENUMS; if (lppd->nToPage < lppd->nMinPage) lppd->nToPage = lppd->nMinPage; if (lppd->nToPage > lppd->nMaxPage) lppd->nToPage = lppd->nMaxPage; if (lppd->nFromPage < lppd->nMinPage) lppd->nFromPage = lppd->nMinPage; if (lppd->nFromPage > lppd->nMaxPage) lppd->nFromPage = lppd->nMaxPage; /* Fill Combobox */ pdn = GlobalLock(lppd->hDevNames); pdm = GlobalLock(lppd->hDevMode); if(pdn) name = (char*)pdn + pdn->wDeviceOffset; else if(pdm) name = pdm->dmDeviceName; PRINTDLG_SetUpPrinterListCombo(hDlg, comboID, name); if(pdm) GlobalUnlock(lppd->hDevMode); if(pdn) GlobalUnlock(lppd->hDevNames); /* Now find selected printer and update rest of dlg */ name = HeapAlloc(GetProcessHeap(),0,256); GetDlgItemTextA(hDlg, comboID, name, 255); PRINTDLG_ChangePrinter(hDlg, name, PrintStructures); HeapFree(GetProcessHeap(),0,name); return TRUE; } /*********************************************************************** * PRINTDLG_WMCommand [internal] */ static LRESULT PRINTDLG_WMCommand(HWND hDlg, WPARAM wParam, LPARAM lParam, PRINT_PTRA* PrintStructures) { LPPRINTDLGA lppd = PrintStructures->lpPrintDlg; UINT PrinterComboID = (lppd->Flags & PD_PRINTSETUP) ? cmb1 : cmb4; LPDEVMODEA lpdm = PrintStructures->lpDevMode; switch (LOWORD(wParam)) { case IDOK: TRACE(" OK button was hit\n"); if (PRINTDLG_UpdatePrintDlg(hDlg, PrintStructures)!=TRUE) return(FALSE); EndDialog(hDlg, TRUE); return(TRUE); case IDCANCEL: TRACE(" CANCEL button was hit\n"); EndDialog(hDlg, FALSE); return(FALSE); case pshHelp: TRACE(" HELP button was hit\n"); SendMessageA(lppd->hwndOwner, PrintStructures->HelpMessageID, (WPARAM) hDlg, (LPARAM) lppd); break; case chx2: /* collate pages checkbox */ if (IsDlgButtonChecked(hDlg, chx2) == BST_CHECKED) SendDlgItemMessageA(hDlg, ico3, STM_SETIMAGE, (WPARAM) IMAGE_ICON, (LPARAM)PrintStructures->hCollateIcon); else SendDlgItemMessageA(hDlg, ico3, STM_SETIMAGE, (WPARAM) IMAGE_ICON, (LPARAM)PrintStructures->hNoCollateIcon); break; case edt1: /* from page nr editbox */ case edt2: /* to page nr editbox */ if (HIWORD(wParam)==EN_CHANGE) { WORD nToPage; WORD nFromPage; nFromPage = GetDlgItemInt(hDlg, edt1, NULL, FALSE); nToPage = GetDlgItemInt(hDlg, edt2, NULL, FALSE); if (nFromPage != lppd->nFromPage || nToPage != lppd->nToPage) CheckRadioButton(hDlg, rad1, rad3, rad3); } break; case psh2: /* Properties button */ { HANDLE hPrinter; char PrinterName[256]; GetDlgItemTextA(hDlg, PrinterComboID, PrinterName, 255); if (!OpenPrinterA(PrinterName, &hPrinter, NULL)) { WARN(" Call to OpenPrinter did not succeed!\n"); break; } DocumentPropertiesA(hDlg, hPrinter, PrinterName, PrintStructures->lpDevMode, PrintStructures->lpDevMode, DM_IN_BUFFER | DM_OUT_BUFFER | DM_IN_PROMPT); ClosePrinter(hPrinter); break; } case cmb1: case cmb4: /* Printer combobox */ if (HIWORD(wParam)==CBN_SELCHANGE) { char PrinterName[256]; GetDlgItemTextA(hDlg, LOWORD(wParam), PrinterName, 255); PRINTDLG_ChangePrinter(hDlg, PrinterName, PrintStructures); } break; case cmb2: /* Papersize */ { DWORD Sel = SendDlgItemMessageA(hDlg, cmb2, CB_GETCURSEL, 0, 0); if(Sel != CB_ERR) lpdm->u1.s1.dmPaperSize = SendDlgItemMessageA(hDlg, cmb2, CB_GETITEMDATA, Sel, 0); } break; case cmb3: /* Bin */ { DWORD Sel = SendDlgItemMessageA(hDlg, cmb3, CB_GETCURSEL, 0, 0); if(Sel != CB_ERR) lpdm->dmDefaultSource = SendDlgItemMessageA(hDlg, cmb3, CB_GETITEMDATA, Sel, 0); } break; } return FALSE; } /*********************************************************************** * PrintDlgProcA [internal] */ BOOL WINAPI PrintDlgProcA(HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam) { PRINT_PTRA* PrintStructures; LRESULT res=FALSE; if (uMsg!=WM_INITDIALOG) { PrintStructures = (PRINT_PTRA*) GetWindowLongA(hDlg, DWL_USER); if (!PrintStructures) return FALSE; } else { PrintStructures = (PRINT_PTRA*) lParam; SetWindowLongA(hDlg, DWL_USER, lParam); res = PRINTDLG_WMInitDialog(hDlg, wParam, PrintStructures); if(PrintStructures->lpPrintDlg->Flags & PD_ENABLEPRINTHOOK) { res = PrintStructures->lpPrintDlg->lpfnPrintHook(hDlg, uMsg, wParam, (LPARAM)PrintStructures->lpPrintDlg); } return res; } if(PrintStructures->lpPrintDlg->Flags & PD_ENABLEPRINTHOOK) { res = PrintStructures->lpPrintDlg->lpfnPrintHook(hDlg, uMsg, wParam, lParam); if(res) return res; } switch (uMsg) { case WM_COMMAND: return PRINTDLG_WMCommand(hDlg, wParam, lParam, PrintStructures); case WM_DESTROY: DestroyIcon(PrintStructures->hCollateIcon); DestroyIcon(PrintStructures->hNoCollateIcon); /* FIXME: don't forget to delete the paper orientation icons here! */ return FALSE; } return res; } /************************************************************ * * PRINTDLG_GetDlgTemplate * */ static HGLOBAL PRINTDLG_GetDlgTemplate(PRINTDLGA *lppd) { HGLOBAL hDlgTmpl, hResInfo; if (lppd->Flags & PD_PRINTSETUP) { if(lppd->Flags & PD_ENABLESETUPTEMPLATEHANDLE) { hDlgTmpl = lppd->hSetupTemplate; } else if(lppd->Flags & PD_ENABLESETUPTEMPLATE) { hResInfo = FindResourceA(lppd->hInstance, lppd->lpSetupTemplateName, RT_DIALOGA); hDlgTmpl = LoadResource(lppd->hInstance, hResInfo); } else { hResInfo = FindResourceA(COMDLG32_hInstance, "PRINT32_SETUP", RT_DIALOGA); hDlgTmpl = LoadResource(COMDLG32_hInstance, hResInfo); } } else { if(lppd->Flags & PD_ENABLEPRINTTEMPLATEHANDLE) { hDlgTmpl = lppd->hPrintTemplate; } else if(lppd->Flags & PD_ENABLEPRINTTEMPLATE) { hResInfo = FindResourceA(lppd->hInstance, lppd->lpPrintTemplateName, RT_DIALOGA); hDlgTmpl = LoadResource(lppd->hInstance, hResInfo); } else { hResInfo = FindResourceA(COMDLG32_hInstance, "PRINT32", RT_DIALOGA); hDlgTmpl = LoadResource(COMDLG32_hInstance, hResInfo); } } return hDlgTmpl; } /*********************************************************************** * * PRINTDLG_CreateDC * */ static BOOL PRINTDLG_CreateDC(LPPRINTDLGA lppd) { DEVNAMES *pdn = GlobalLock(lppd->hDevNames); DEVMODEA *pdm = GlobalLock(lppd->hDevMode); if(lppd->Flags & PD_RETURNDC) { lppd->hDC = CreateDCA((char*)pdn + pdn->wDriverOffset, (char*)pdn + pdn->wDeviceOffset, (char*)pdn + pdn->wOutputOffset, pdm ); } else if(lppd->Flags & PD_RETURNIC) { lppd->hDC = CreateICA((char*)pdn + pdn->wDriverOffset, (char*)pdn + pdn->wDeviceOffset, (char*)pdn + pdn->wOutputOffset, pdm ); } GlobalUnlock(lppd->hDevNames); GlobalUnlock(lppd->hDevMode); return lppd->hDC ? TRUE : FALSE; } /*********************************************************************** * PrintDlgA (COMDLG32.17) * * Displays the the PRINT dialog box, which enables the user to specify * specific properties of the print job. * * RETURNS * nonzero if the user pressed the OK button * zero if the user cancelled the window or an error occurred * * BUGS * PrintDlg: * * The Collate Icons do not display, even though they are in the code. * * The Properties Button(s) should call DocumentPropertiesA(). * PrintSetupDlg: * * The Paper Orientation Icons are not implemented yet. * * The Properties Button(s) should call DocumentPropertiesA(). * * Settings are not yet taken from a provided DevMode or * default printer settings. */ BOOL WINAPI PrintDlgA( LPPRINTDLGA lppd /* ptr to PRINTDLG32 struct */ ) { BOOL bRet = FALSE; LPVOID ptr; HINSTANCE hInst = GetWindowLongA( lppd->hwndOwner, GWL_HINSTANCE ); if(TRACE_ON(commdlg)) { char flagstr[1000] = ""; struct pd_flags *pflag = pd_flags; for( ; pflag->name; pflag++) { if(lppd->Flags & pflag->flag) strcat(flagstr, pflag->name); } TRACE("(%p): hwndOwner = %08x, hDevMode = %08x, hDevNames = %08x\n" "pp. %d-%d, min p %d, max p %d, copies %d, hinst %08x\n" "flags %08lx (%s)\n", lppd, lppd->hwndOwner, lppd->hDevMode, lppd->hDevNames, lppd->nFromPage, lppd->nToPage, lppd->nMinPage, lppd->nMaxPage, lppd->nCopies, lppd->hInstance, lppd->Flags, flagstr); } if(lppd->lStructSize != sizeof(PRINTDLGA)) { WARN("structure size failure !!!\n"); COMDLG32_SetCommDlgExtendedError(CDERR_STRUCTSIZE); return FALSE; } if(lppd->Flags & PD_RETURNDEFAULT) { PRINTER_INFO_2A *pbuf; HANDLE hprn; DWORD needed; if(lppd->hDevMode || lppd->hDevNames) { WARN("hDevMode or hDevNames non-zero for PD_RETURNDEFAULT\n"); COMDLG32_SetCommDlgExtendedError(PDERR_RETDEFFAILURE); return FALSE; } if(!PRINTDLG_OpenDefaultPrinter(&hprn)) { WARN("Can't find default printer\n"); COMDLG32_SetCommDlgExtendedError(PDERR_NODEFAULTPRN); return FALSE; } GetPrinterA(hprn, 2, NULL, 0, &needed); pbuf = HeapAlloc(GetProcessHeap(), 0, needed); GetPrinterA(hprn, 2, (LPBYTE)pbuf, needed, &needed); ClosePrinter(hprn); PRINTDLG_CreateDevNames(&(lppd->hDevNames), "winspool", pbuf->pDevMode->dmDeviceName, pbuf->pPortName); lppd->hDevMode = GlobalAlloc(GMEM_MOVEABLE, pbuf->pDevMode->dmSize + pbuf->pDevMode->dmDriverExtra); ptr = GlobalLock(lppd->hDevMode); memcpy(ptr, pbuf->pDevMode, pbuf->pDevMode->dmSize + pbuf->pDevMode->dmDriverExtra); GlobalUnlock(lppd->hDevMode); HeapFree(GetProcessHeap(), 0, pbuf); bRet = TRUE; } else { HGLOBAL hDlgTmpl; PRINT_PTRA *PrintStructures; /* load Dialog resources, * depending on Flags indicates Print32 or Print32_setup dialog */ hDlgTmpl = PRINTDLG_GetDlgTemplate(lppd); if (!(hDlgTmpl) || !(ptr = LockResource( hDlgTmpl ))) { COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); return FALSE; } PrintStructures = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(PRINT_PTRA)); PrintStructures->lpPrintDlg = lppd; /* and create & process the dialog */ bRet = DialogBoxIndirectParamA(hInst, ptr, lppd->hwndOwner, PrintDlgProcA, (LPARAM)PrintStructures); if(bRet) { DEVMODEA *lpdm = PrintStructures->lpDevMode, *lpdmReturn; PRINTER_INFO_2A *pi = PrintStructures->lpPrinterInfo; if (lppd->hDevMode == 0) { TRACE(" No hDevMode yet... Need to create my own\n"); lppd->hDevMode = GlobalAlloc(GMEM_MOVEABLE, lpdm->dmSize + lpdm->dmDriverExtra); } else { WORD locks; if((locks = (GlobalFlags(lppd->hDevMode) & GMEM_LOCKCOUNT))) { WARN("hDevMode has %d locks on it. Unlocking it now\n", locks); while(locks--) { GlobalUnlock(lppd->hDevMode); TRACE("Now got %d locks\n", locks); } } lppd->hDevMode = GlobalReAlloc(lppd->hDevMode, lpdm->dmSize + lpdm->dmDriverExtra, GMEM_MOVEABLE); } lpdmReturn = GlobalLock(lppd->hDevMode); memcpy(lpdmReturn, lpdm, lpdm->dmSize + lpdm->dmDriverExtra); if (lppd->hDevNames != 0) { WORD locks; if((locks = (GlobalFlags(lppd->hDevNames) & GMEM_LOCKCOUNT))) { WARN("hDevNames has %d locks on it. Unlocking it now\n", locks); while(locks--) GlobalUnlock(lppd->hDevNames); } } PRINTDLG_CreateDevNames(&(lppd->hDevNames), "winspool", lpdmReturn->dmDeviceName, pi->pPortName); GlobalUnlock(lppd->hDevMode); } HeapFree(GetProcessHeap(), 0, PrintStructures->lpDevMode); HeapFree(GetProcessHeap(), 0, PrintStructures->lpPrinterInfo); HeapFree(GetProcessHeap(), 0, PrintStructures); } if(bRet && (lppd->Flags & PD_RETURNDC || lppd->Flags & PD_RETURNIC)) bRet = PRINTDLG_CreateDC(lppd); TRACE("exit! (%d)\n", bRet); return bRet; } /*********************************************************************** * PrintDlgW (COMDLG32.18) */ BOOL WINAPI PrintDlgW( LPPRINTDLGW printdlg ) { FIXME("A really empty stub\n" ); return FALSE; } /*********************************************************************** * * PageSetupDlg */ /*********************************************************************** * PageSetupDlgA (COMDLG32.15) */ BOOL WINAPI PageSetupDlgA(LPPAGESETUPDLGA setupdlg) { FIXME("(%p), stub!\n",setupdlg); return FALSE; } /*********************************************************************** * PageSetupDlgW (COMDLG32.16) */ BOOL WINAPI PageSetupDlgW(LPPAGESETUPDLGW setupdlg) { FIXME("(%p), stub!\n",setupdlg); return FALSE; } /********************************************************************** * * 16 bit commdlg */ /*********************************************************************** * PrintDlgProc16 (COMMDLG.21) */ LRESULT WINAPI PrintDlgProc16(HWND16 hWnd, UINT16 wMsg, WPARAM16 wParam, LPARAM lParam) { switch (wMsg) { case WM_INITDIALOG: TRACE("WM_INITDIALOG lParam=%08lX\n", lParam); ShowWindow16(hWnd, SW_SHOWNORMAL); return (TRUE); case WM_COMMAND: switch (wParam) { case IDOK: EndDialog(hWnd, TRUE); return(TRUE); case IDCANCEL: EndDialog(hWnd, FALSE); return(TRUE); } return(FALSE); } return FALSE; } /*********************************************************************** * PrintSetupDlgProc16 (COMMDLG.22) */ LRESULT WINAPI PrintSetupDlgProc16(HWND16 hWnd, UINT16 wMsg, WPARAM16 wParam, LPARAM lParam) { switch (wMsg) { case WM_INITDIALOG: TRACE("WM_INITDIALOG lParam=%08lX\n", lParam); ShowWindow16(hWnd, SW_SHOWNORMAL); return (TRUE); case WM_COMMAND: switch (wParam) { case IDOK: EndDialog(hWnd, TRUE); return(TRUE); case IDCANCEL: EndDialog(hWnd, FALSE); return(TRUE); } return(FALSE); } return FALSE; } /*********************************************************************** * PrintDlg16 (COMMDLG.20) * * Displays the the PRINT dialog box, which enables the user to specify * specific properties of the print job. * * RETURNS * nonzero if the user pressed the OK button * zero if the user cancelled the window or an error occurred * * BUGS * * calls up to the 32-bit versions of the Dialogs, which look different * * Customizing is *not* implemented. */ BOOL16 WINAPI PrintDlg16( LPPRINTDLG16 lpPrint ) { PRINTDLGA Print32; BOOL16 ret; char *ptr, *ptr16; DWORD size; memset(&Print32, 0, sizeof(Print32)); Print32.lStructSize = sizeof(Print32); Print32.hwndOwner = lpPrint->hwndOwner; if(lpPrint->hDevMode) { size = GlobalSize16(lpPrint->hDevMode); Print32.hDevMode = GlobalAlloc(GMEM_MOVEABLE, size); ptr = GlobalLock(Print32.hDevMode); ptr16 = GlobalLock16(lpPrint->hDevMode); memcpy(ptr, ptr16, size); GlobalFree16(lpPrint->hDevMode); GlobalUnlock(Print32.hDevMode); } else Print32.hDevMode = 0; if(lpPrint->hDevNames) { size = GlobalSize16(lpPrint->hDevNames); Print32.hDevNames = GlobalAlloc(GMEM_MOVEABLE, size); ptr = GlobalLock(Print32.hDevNames); ptr16 = GlobalLock16(lpPrint->hDevNames); memcpy(ptr, ptr16, size); GlobalFree16(lpPrint->hDevNames); GlobalUnlock(Print32.hDevNames); } else Print32.hDevNames = 0; Print32.Flags = lpPrint->Flags; Print32.nFromPage = lpPrint->nFromPage; Print32.nToPage = lpPrint->nToPage; Print32.nMinPage = lpPrint->nMinPage; Print32.nMaxPage = lpPrint->nMaxPage; Print32.nCopies = lpPrint->nCopies; Print32.hInstance = lpPrint->hInstance; Print32.lCustData = lpPrint->lCustData; if(lpPrint->lpfnPrintHook) { FIXME("Need to allocate thunk\n"); /* Print32.lpfnPrintHook = lpPrint->lpfnPrintHook;*/ } if(lpPrint->lpfnSetupHook) { FIXME("Need to allocate thunk\n"); /* Print32.lpfnSetupHook = lpPrint->lpfnSetupHook;*/ } Print32.lpPrintTemplateName = PTR_SEG_TO_LIN(lpPrint->lpPrintTemplateName); Print32.lpSetupTemplateName = PTR_SEG_TO_LIN(lpPrint->lpSetupTemplateName); Print32.hPrintTemplate = lpPrint->hPrintTemplate; Print32.hSetupTemplate = lpPrint->hSetupTemplate; ret = PrintDlgA(&Print32); if(Print32.hDevMode) { size = GlobalSize(Print32.hDevMode); lpPrint->hDevMode = GlobalAlloc16(GMEM_MOVEABLE, size); ptr16 = GlobalLock16(lpPrint->hDevMode); ptr = GlobalLock(Print32.hDevMode); memcpy(ptr16, ptr, size); GlobalFree(Print32.hDevMode); GlobalUnlock16(lpPrint->hDevMode); } else lpPrint->hDevMode = 0; if(Print32.hDevNames) { size = GlobalSize(Print32.hDevNames); lpPrint->hDevNames = GlobalAlloc16(GMEM_MOVEABLE, size); ptr16 = GlobalLock16(lpPrint->hDevNames); ptr = GlobalLock(Print32.hDevNames); memcpy(ptr16, ptr, size); GlobalFree(Print32.hDevNames); GlobalUnlock16(lpPrint->hDevNames); } else lpPrint->hDevNames = 0; lpPrint->hDC = Print32.hDC; lpPrint->Flags = Print32.Flags; lpPrint->nFromPage = Print32.nFromPage; lpPrint->nToPage = Print32.nToPage; lpPrint->nCopies = Print32.nCopies; return ret; } wine-20000526/dlls/commdlg/rsrc.rc0100644000175000001440000000206407103361647016332 0ustar julliardusers/* * Top level resource file for Common Dialogs * */ #include "windef.h" #include "winuser.h" #include "winnls.h" #include "cdlg.h" #include "winspool.h" #include "filedlgbrowser.h" /* * Everything that does not depend on language, * like textless bitmaps etc, go into the * neutral language. This will prevent them from * being duplicated for each language. */ #include "cdlg_xx.rc" /* * Everything specific to any language goes * in one of the specific files. * Note that you can and may override resources * which also have a neutral version. This is to * get localized bitmaps for example. */ #include "cdlg_Ca.rc" #include "cdlg_Cs.rc" #include "cdlg_Da.rc" #include "cdlg_De.rc" #include "cdlg_En.rc" #include "cdlg_Eo.rc" #include "cdlg_Es.rc" #include "cdlg_Fi.rc" #include "cdlg_Fr.rc" #include "cdlg_Hu.rc" #include "cdlg_It.rc" #include "cdlg_Ko.rc" #include "cdlg_Nl.rc" #include "cdlg_No.rc" #include "cdlg_Pl.rc" #include "cdlg_Pt.rc" #include "cdlg_Ru.rc" #include "cdlg_Sk.rc" #include "cdlg_Sv.rc" #include "cdlg_Wa.rc" #include "cdlg_Ja.rc" wine-20000526/dlls/crtdll/0040755000175000001440000000000007113604170014666 5ustar julliarduserswine-20000526/dlls/crtdll/.cvsignore0100644000175000001440000000004007042674746016676 0ustar julliardusersMakefile *.spec.c *.spec.glue.s wine-20000526/dlls/crtdll/Makefile.in0100644000175000001440000000041506753350337016744 0ustar julliardusersDEFS = @DLLFLAGS@ -D__WINE__ TOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = crtdll SPEC_SRCS = crtdll.spec C_SRCS = \ crtdll_main.c \ mbstring.c \ wcstring.c all: $(MODULE).o @MAKE_RULES@ ### Dependencies: wine-20000526/dlls/crtdll/crtdll.spec0100644000175000001440000003317107070204206017026 0ustar julliardusers# C RunTime DLL. All functions use cdecl! name crtdll type win32 init CRTDLL_Init @ cdecl ??2@YAPAXI@Z(long) CRTDLL_new @ cdecl ??3@YAXPAX@Z(long) CRTDLL_delete @ cdecl ?_set_new_handler@@YAP6AHI@ZP6AHI@Z@Z(ptr) CRTDLL_set_new_handler @ stub _CIacos @ stub _CIasin @ stub _CIatan @ stub _CIatan2 @ stub _CIcos @ stub _CIcosh @ stub _CIexp @ stub _CIfmod @ stub _CIlog @ stub _CIlog10 @ cdecl _CIpow() CRTDLL__CIpow @ stub _CIsin @ stub _CIsinh @ stub _CIsqrt @ stub _CItan @ stub _CItanh @ stub _HUGE_dll @ stub _XcptFilter @ cdecl __GetMainArgs(ptr ptr ptr long) CRTDLL__GetMainArgs @ extern __argc_dll CRTDLL_argc_dll @ extern __argv_dll CRTDLL_argv_dll @ cdecl __dllonexit() CRTDLL___dllonexit @ stub __doserrno @ stub __fpecode @ stub __isascii @ stub __iscsym @ stub __iscsymf @ stub __mb_cur_max_dll @ stub __pxcptinfoptrs @ cdecl __threadhandle() GetCurrentThread @ cdecl __threadid() GetCurrentThreadId @ stub __toascii @ cdecl _abnormal_termination() CRTDLL__abnormal_termination @ cdecl _access(str long) CRTDLL__access @ extern _acmdln_dll CRTDLL_acmdln_dll @ stub _aexit_rtn_dll @ stub _amsg_exit @ stub _assert @ extern _basemajor_dll CRTDLL_basemajor_dll @ extern _baseminor_dll CRTDLL_baseminor_dll @ extern _baseversion_dll CRTDLL_baseversion_dll @ stub _beep @ stub _beginthread @ stub _c_exit @ stub _cabs @ cdecl _cexit(long) CRTDLL__cexit @ stub _cgets @ cdecl _chdir(str) CRTDLL__chdir @ cdecl _chdrive(long) CRTDLL__chdrive @ stub _chgsign @ stub _chmod @ stub _chsize @ stub _clearfp @ cdecl _close(long) CRTDLL__close @ stub _commit @ extern _commode_dll CRTDLL_commode_dll @ stub _control87 @ stub _controlfp @ stub _copysign @ stub _cprintf @ stub _cpumode_dll @ stub _cputs @ stub _creat @ stub _cscanf @ stub _ctype @ stub _cwait @ stub _daylight_dll @ stub _dup @ stub _dup2 @ stub _ecvt @ stub _endthread @ extern _environ_dll CRTDLL_environ_dll @ stub _eof @ cdecl _errno() CRTDLL__errno @ cdecl _except_handler2(ptr ptr ptr ptr) CRTDLL__except_handler2 @ stub _execl @ stub _execle @ stub _execlp @ stub _execlpe @ stub _execv @ stub _execve @ stub _execvp @ stub _execvpe @ stub _exit @ stub _expand @ stub _fcloseall @ stub _fcvt @ cdecl _fdopen(long ptr) CRTDLL__fdopen @ stub _fgetchar @ stub _fgetwchar @ stub _filbuf @ stub _fileinfo_dll @ stub _filelength @ stub _fileno @ stub _findclose @ cdecl _findfirst(str ptr) CRTDLL__findfirst @ cdecl _findnext(long ptr) CRTDLL__findnext @ stub _finite @ stub _flsbuf @ stub _flushall @ extern _fmode_dll CRTDLL_fmode_dll @ stub _fpclass @ stub _fpieee_flt @ cdecl _fpreset() CRTDLL__fpreset @ stub _fputchar @ stub _fputwchar @ cdecl _fsopen(str str long) CRTDLL__fsopen @ cdecl _fstat(long ptr) CRTDLL__fstat @ stub _ftime @ cdecl _ftol() CRTDLL__ftol @ cdecl _fullpath(ptr str long) CRTDLL__fullpath @ stub _futime @ stub _gcvt @ stub _get_osfhandle @ stub _getch @ stub _getche @ cdecl _getcwd(ptr long) CRTDLL__getcwd @ cdecl _getdcwd(long ptr long) CRTDLL__getdcwd @ stub _getdiskfree @ stub _getdllprocaddr @ cdecl _getdrive() CRTDLL__getdrive @ stub _getdrives @ stub _getpid @ stub _getsystime @ stub _getw @ cdecl _global_unwind2(ptr) CRTDLL__global_unwind2 @ stub _heapchk @ stub _heapmin @ stub _heapset @ stub _heapwalk @ cdecl _hypot(double double) hypot @ cdecl _initterm(ptr ptr) CRTDLL__initterm @ extern _iob CRTDLL_iob @ cdecl _isatty(long) CRTDLL__isatty @ cdecl _isctype(long long) CRTDLL__isctype @ stub _ismbbalnum @ stub _ismbbalpha @ stub _ismbbgraph @ stub _ismbbkalnum @ stub _ismbbkana @ stub _ismbbkpunct @ stub _ismbblead @ stub _ismbbprint @ stub _ismbbpunct @ stub _ismbbtrail @ stub _ismbcalpha @ stub _ismbcdigit @ stub _ismbchira @ stub _ismbckata @ stub _ismbcl0 @ stub _ismbcl1 @ stub _ismbcl2 @ stub _ismbclegal @ stub _ismbclower @ stub _ismbcprint @ stub _ismbcspace @ stub _ismbcsymbol @ stub _ismbcupper @ stub _ismbslead @ stub _ismbstrail @ stub _isnan @ cdecl _itoa(long ptr long) CRTDLL__itoa @ stub _itow @ cdecl _j0(double) j0 @ cdecl _j1(double) j1 @ cdecl _jn(long double) jn @ stub _kbhit @ stub _lfind @ stub _loaddll @ cdecl _local_unwind2(ptr long) CRTDLL__local_unwind2 @ stub _locking @ stub _logb @ cdecl _lrotl (long long) CRTDLL__lrotl @ stub _lrotr @ stub _lsearch @ cdecl _lseek(long long long) CRTDLL__lseek @ cdecl _ltoa(long str long) CRTDLL__ltoa @ stub _ltow @ cdecl _makepath (ptr str str str str) CRTDLL__makepath @ stub _matherr @ stub _mbbtombc @ stub _mbbtype @ stub _mbccpy @ stub _mbcjistojms @ stub _mbcjmstojis @ stub _mbclen @ stub _mbctohira @ stub _mbctokata @ stub _mbctolower @ stub _mbctombb @ stub _mbctoupper @ stub _mbctype @ stub _mbsbtype @ cdecl _mbscat(str str) strcat @ stub _mbschr @ stub _mbscmp @ cdecl _mbscpy(ptr str) strcpy @ stub _mbscspn @ stub _mbsdec @ cdecl _mbsdup(str) CRTDLL__strdup @ cdecl _mbsicmp(str str) CRTDLL__mbsicmp @ cdecl _mbsinc(str) CRTDLL__mbsinc @ cdecl _mbslen(str) CRTDLL__mbslen @ stub _mbslwr @ stub _mbsnbcat @ stub _mbsnbcmp @ stub _mbsnbcnt @ stub _mbsnbcpy @ stub _mbsnbicmp @ stub _mbsnbset @ stub _mbsncat @ stub _mbsnccnt @ stub _mbsncmp @ stub _mbsncpy @ stub _mbsnextc @ stub _mbsnicmp @ stub _mbsninc @ stub _mbsnset @ stub _mbspbrk @ cdecl _mbsrchr(str long) CRTDLL__mbsrchr @ stub _mbsrev @ stub _mbsset @ stub _mbsspn @ stub _mbsspnp @ stub _mbsstr @ stub _mbstok @ stub _mbstrlen @ stub _mbsupr @ stub _memccpy @ cdecl _memicmp(str str long) CRTDLL__memicmp @ cdecl _mkdir(str) CRTDLL__mkdir @ stub _mktemp @ stub _msize @ stub _nextafter @ stub _onexit @ cdecl _open(str long) CRTDLL__open @ cdecl _open_osfhandle(long long) CRTDLL__open_osfhandle @ extern _osmajor_dll CRTDLL_osmajor_dll @ extern _osminor_dll CRTDLL_osminor_dll @ extern _osmode_dll CRTDLL_osmode_dll @ extern _osver_dll CRTDLL_osver_dll @ extern _osversion_dll CRTDLL_osversion_dll @ stub _pclose @ stub _pctype_dll @ stub _pgmptr_dll @ stub _pipe @ stub _popen @ stub _purecall @ stub _putch @ stub _putenv @ stub _putw @ stub _pwctype_dll @ cdecl _read(long ptr long) CRTDLL__read @ stub _rmdir @ stub _rmtmp @ cdecl _rotl (long long) CRTDLL__rotl @ stub _rotr @ stub _scalb @ stub _searchenv @ stub _seterrormode @ cdecl _setjmp (ptr) CRTDLL__setjmp @ cdecl _setmode(long long) CRTDLL__setmode @ stub _setsystime @ cdecl _sleep(long) CRTDLL__sleep @ stub _snprintf @ stub _snwprintf @ stub _sopen @ stub _spawnl @ stub _spawnle @ stub _spawnlp @ stub _spawnlpe @ stub _spawnv @ stub _spawnve @ stub _spawnvp @ stub _spawnvpe @ cdecl _splitpath (str ptr ptr ptr ptr) CRTDLL__splitpath @ cdecl _stat (str ptr) CRTDLL__stat @ stub _statusfp @ cdecl _strcmpi(str str) CRTDLL__strcmpi @ cdecl _strdate(str) CRTDLL__strdate @ stub _strdec @ cdecl _strdup(str) CRTDLL__strdup @ stub _strerror @ cdecl _stricmp(str str) CRTDLL__strcmpi @ stub _stricoll @ stub _strinc @ cdecl _strlwr(str) CRTDLL__strlwr @ stub _strncnt @ stub _strnextc @ cdecl _strnicmp(str str long) CRTDLL__strnicmp @ stub _strninc @ stub _strnset @ stub _strrev @ stub _strset @ stub _strspnp @ cdecl _strtime(str) CRTDLL__strtime @ cdecl _strupr(str) CRTDLL__strupr @ stub _swab @ stub _sys_errlist @ stub _sys_nerr_dll @ stub _tell @ cdecl _tempnam(str ptr) CRTDLL__tempnam @ stub _timezone_dll @ stub _tolower @ stub _toupper @ stub _tzname @ stub _tzset @ cdecl _ultoa(long ptr long) CRTDLL__ultoa @ stub _ultow @ stub _umask @ stub _ungetch @ cdecl _unlink(str) CRTDLL__unlink @ stub _unloaddll @ stub _utime @ stub _vsnprintf @ stub _vsnwprintf @ cdecl _wcsdup(wstr) CRTDLL__wcsdup @ cdecl _wcsicmp(wstr wstr) CRTDLL__wcsicmp @ cdecl _wcsicoll(wstr wstr) CRTDLL__wcsicoll @ cdecl _wcslwr(wstr) CRTDLL__wcslwr @ cdecl _wcsnicmp(wstr wstr long) CRTDLL__wcsnicmp @ cdecl _wcsnset(wstr long long) CRTDLL__wcsnset @ cdecl _wcsrev(wstr) CRTDLL__wcsrev @ cdecl _wcsset(wstr long) CRTDLL__wcsset @ cdecl _wcsupr(wstr) CRTDLL__wcsupr @ extern _winmajor_dll CRTDLL_winmajor_dll @ extern _winminor_dll CRTDLL_winminor_dll @ extern _winver_dll CRTDLL_winver_dll @ cdecl _write(long ptr long) CRTDLL__write @ stub _wtoi @ stub _wtol @ cdecl _y0(double) y0 @ cdecl _y1(double) y1 @ cdecl _yn(long double) yn @ stub abort @ cdecl abs(long) abs @ cdecl acos(double) acos @ cdecl asctime(ptr) asctime @ cdecl asin(double) asin @ cdecl atan(double) atan @ cdecl atan2(double double) atan2 @ cdecl atexit(ptr) CRTDLL_atexit @ cdecl atof(str) atof @ cdecl atoi(str) atoi @ cdecl atol(str) atol @ cdecl bsearch(ptr ptr long long ptr) bsearch @ cdecl calloc(long long) CRTDLL_calloc @ cdecl ceil(double) ceil @ stub clearerr @ cdecl clock() CRTDLL_clock @ cdecl cos(double) cos @ cdecl cosh(double) cosh @ cdecl ctime(ptr) ctime @ stub difftime @ cdecl div(long long) div @ cdecl exit(long) CRTDLL_exit @ cdecl exp(double) exp @ cdecl fabs(double) fabs @ cdecl fclose(ptr) CRTDLL_fclose @ cdecl feof(ptr) CRTDLL_feof @ stub ferror @ cdecl fflush(ptr) CRTDLL_fflush @ cdecl fgetc(ptr) CRTDLL_fgetc @ stub fgetpos @ cdecl fgets(ptr long ptr) CRTDLL_fgets @ stub fgetwc @ cdecl floor(double) floor @ cdecl fmod(double double) fmod @ cdecl fopen(str str) CRTDLL_fopen @ varargs fprintf(ptr str) CRTDLL_fprintf @ cdecl fputc(long ptr) CRTDLL_fputc @ cdecl fputs(str ptr) CRTDLL_fputs @ stub fputwc @ cdecl fread(ptr long long ptr) CRTDLL_fread @ cdecl free(ptr) CRTDLL_free @ cdecl freopen(str str ptr) CRTDLL_freopen @ cdecl frexp(double ptr) frexp @ varargs fscanf(ptr str) CRTDLL_fscanf @ cdecl fseek(ptr long long) CRTDLL_fseek @ cdecl fsetpos(ptr ptr) CRTDLL_fsetpos @ cdecl ftell(ptr) CRTDLL_ftell @ stub fwprintf @ cdecl fwrite(ptr long long ptr) CRTDLL_fwrite @ stub fwscanf @ cdecl getc(ptr) CRTDLL_getc @ stub getchar @ cdecl getenv (str) CRTDLL_getenv @ cdecl gets(ptr) CRTDLL_gets @ cdecl gmtime(ptr) gmtime @ stub is_wctype @ cdecl isalnum(long) isalnum @ cdecl isalpha(long) isalpha @ cdecl iscntrl(long) iscntrl @ cdecl isdigit(long) isdigit @ cdecl isgraph(long) isgraph @ stub isleadbyte @ cdecl islower(long) islower @ cdecl isprint(long) isprint @ cdecl ispunct(long) ispunct @ cdecl isspace(long) isspace @ cdecl isupper(long) isupper @ cdecl iswalnum(long) CRTDLL_iswalnum @ cdecl iswalpha(long) CRTDLL_iswalpha @ stub iswascii @ cdecl iswcntrl(long) CRTDLL_iswcntrl @ cdecl iswctype(long long) CRTDLL_iswctype @ cdecl iswdigit(long) CRTDLL_iswdigit @ cdecl iswgraph(long) CRTDLL_iswgraph @ cdecl iswlower(long) CRTDLL_iswlower @ cdecl iswprint(long) CRTDLL_iswprint @ cdecl iswpunct(long) CRTDLL_iswpunct @ cdecl iswspace(long) CRTDLL_iswspace @ cdecl iswupper(long) CRTDLL_iswupper @ cdecl iswxdigit(long) CRTDLL_iswxdigit @ cdecl isxdigit(long) isxdigit @ cdecl labs(long) labs @ cdecl ldexp(double long) ldexp @ cdecl ldiv(long long) ldiv @ stub localeconv @ cdecl localtime(ptr) localtime @ cdecl log(double) log @ cdecl log10(double) log10 @ cdecl longjmp(ptr long) CRTDLL_longjmp @ cdecl malloc(ptr) CRTDLL_malloc @ cdecl mblen(str long) mblen @ cdecl mbstowcs(ptr str long) CRTDLL_mbstowcs @ cdecl mbtowc(ptr ptr long) CRTDLL_mbtowc @ cdecl memchr(ptr long long) memchr @ cdecl memcmp(ptr ptr long) memcmp @ cdecl memcpy(ptr ptr long) memcpy @ cdecl memmove(ptr ptr long) memmove @ cdecl memset(ptr long long) memset @ cdecl mktime(ptr) mktime @ cdecl modf(double ptr) modf @ stub perror @ cdecl pow(double double) pow @ varargs printf() printf @ cdecl putc(long ptr) CRTDLL_putc @ cdecl putchar(long) CRTDLL_putchar @ cdecl puts(str) CRTDLL_puts @ cdecl qsort(ptr long long ptr) qsort @ stub raise @ cdecl rand() CRTDLL_rand @ cdecl realloc(ptr long) CRTDLL_realloc @ cdecl remove(str) CRTDLL_remove @ cdecl rename(str str) CRTDLL_rename @ stub rewind @ stub scanf @ cdecl setbuf(ptr ptr) CRTDLL_setbuf @ cdecl setlocale(long ptr) CRTDLL_setlocale @ stub setvbuf @ cdecl signal(long ptr) CRTDLL_signal @ cdecl sin(double) sin @ cdecl sinh(double) sinh @ varargs sprintf() sprintf @ cdecl sqrt(double) sqrt @ cdecl srand(long) CRTDLL_srand @ varargs sscanf() sscanf @ cdecl strcat(str str) strcat @ cdecl strchr(str long) strchr @ cdecl strcmp(str str) strcmp @ cdecl strcoll(str str) strcoll @ cdecl strcpy(ptr str) strcpy @ cdecl strcspn(str str) strcspn @ cdecl strerror(long) strerror @ cdecl strftime(ptr long str ptr) strftime @ cdecl strlen(str) strlen @ cdecl strncat(str str long) strncat @ cdecl strncmp(str str long) strncmp @ cdecl strncpy(ptr str long) strncpy @ cdecl strpbrk(str str) strpbrk @ cdecl strrchr(str long) strrchr @ cdecl strspn(str str) strspn @ cdecl strstr(str str) strstr @ cdecl strtod(str ptr) strtod @ cdecl strtok(str str) strtok @ cdecl strtol(str ptr long) strtol @ cdecl strtoul(str ptr long) strtoul @ cdecl strxfrm(ptr str long) strxfrm @ varargs swprintf(wstr wstr) wsprintfW @ stub swscanf @ cdecl system(str) CRTDLL_system @ cdecl tan(double) tan @ cdecl tanh(double) tanh @ cdecl time(ptr) CRTDLL_time @ stub tmpfile @ cdecl tmpnam(str) CRTDLL_tmpnam @ cdecl tolower(long) tolower @ cdecl toupper(long) toupper @ cdecl towlower(long) towlower @ cdecl towupper(long) towupper @ stub ungetc @ stub ungetwc @ cdecl vfprintf(ptr str ptr) CRTDLL_vfprintf @ stub vfwprintf @ stub vprintf @ cdecl vsprintf(ptr str ptr) CRTDLL_vsprintf @ cdecl vswprintf(ptr wstr ptr) CRTDLL_vswprintf @ stub vwprintf @ cdecl wcscat(wstr wstr) CRTDLL_wcscat @ cdecl wcschr(wstr long) CRTDLL_wcschr @ cdecl wcscmp(wstr wstr) CRTDLL_wcscmp @ cdecl wcscoll(wstr wstr) CRTDLL_wcscoll @ cdecl wcscpy(ptr wstr) CRTDLL_wcscpy @ cdecl wcscspn(wstr wstr) CRTDLL_wcscspn @ stub wcsftime @ cdecl wcslen(wstr) CRTDLL_wcslen @ cdecl wcsncat(wstr wstr long) CRTDLL_wcsncat @ cdecl wcsncmp(wstr wstr long) CRTDLL_wcsncmp @ cdecl wcsncpy(ptr wstr long) CRTDLL_wcsncpy @ cdecl wcspbrk(wstr wstr) CRTDLL_wcspbrk @ cdecl wcsrchr(wstr long) CRTDLL_wcsrchr @ cdecl wcsspn(wstr wstr) CRTDLL_wcsspn @ cdecl wcsstr(wstr wstr) CRTDLL_wcsstr @ stub wcstod @ cdecl wcstok(wstr wstr) CRTDLL_wcstok @ cdecl wcstol(wstr ptr long) CRTDLL_wcstol @ cdecl wcstombs(ptr ptr long) CRTDLL_wcstombs @ stub wcstoul @ stub wcsxfrm @ cdecl wctomb(ptr long) CRTDLL_wctomb @ stub wprintf @ stub wscanf wine-20000526/dlls/crtdll/crtdll_main.c0100644000175000001440000013706607076371444017351 0ustar julliardusers/* * The C RunTime DLL * * Implements C run-time functionality as known from UNIX. * * Copyright 1996,1998 Marcus Meissner * Copyright 1996 Jukka Iivonen * Copyright 1997,2000 Uwe Bonnes */ /* Unresolved issues Uwe Bonnes 970904: - Handling of Binary/Text Files is crude. If in doubt, use fromdos or recode - Arguments in crtdll.spec for functions with double argument - system-call calls another wine process, but without debugging arguments and uses the first wine executable in the path - tested with ftp://ftp.remcomp.com/pub/remcomp/lcc-win32.zip, a C-Compiler for Win32, based on lcc, from Jacob Navia AJ 990101: - needs a proper stdio emulation based on Win32 file handles - should set CRTDLL errno from GetLastError() in every function UB 000416: - probably not thread safe */ /* NOTE: This file also implements the wcs* functions. They _ARE_ in * the newer Linux libcs, but use 4 byte wide characters, so are unusable, * since we need 2 byte wide characters. - Marcus Meissner, 981031 */ #include "config.h" #include #include #include #include #include #include #include #include #include #include #include #include #include #include "winbase.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "winerror.h" #include "ntddk.h" #include "debugtools.h" #include "module.h" #include "heap.h" #include "crtdll.h" #include "drive.h" #include "file.h" #include "options.h" #include "winnls.h" DEFAULT_DEBUG_CHANNEL(crtdll); /* windows.h RAND_MAX is smaller than normal RAND_MAX */ #define CRTDLL_RAND_MAX 0x7fff static DOS_FULL_NAME CRTDLL_tmpname; UINT CRTDLL_argc_dll; /* CRTDLL.23 */ LPSTR *CRTDLL_argv_dll; /* CRTDLL.24 */ LPSTR CRTDLL_acmdln_dll; /* CRTDLL.38 */ UINT CRTDLL_basemajor_dll; /* CRTDLL.42 */ UINT CRTDLL_baseminor_dll; /* CRTDLL.43 */ UINT CRTDLL_baseversion_dll; /* CRTDLL.44 */ UINT CRTDLL_commode_dll; /* CRTDLL.59 */ LPSTR CRTDLL_environ_dll; /* CRTDLL.75 */ UINT CRTDLL_fmode_dll; /* CRTDLL.104 */ UINT CRTDLL_osmajor_dll; /* CRTDLL.241 */ UINT CRTDLL_osminor_dll; /* CRTDLL.242 */ UINT CRTDLL_osmode_dll; /* CRTDLL.243 */ UINT CRTDLL_osver_dll; /* CRTDLL.244 */ UINT CRTDLL_osversion_dll; /* CRTDLL.245 */ UINT CRTDLL_winmajor_dll; /* CRTDLL.329 */ UINT CRTDLL_winminor_dll; /* CRTDLL.330 */ UINT CRTDLL_winver_dll; /* CRTDLL.331 */ /* FIXME: structure layout is obviously not correct */ typedef struct { HANDLE handle; int pad[7]; } CRTDLL_FILE; CRTDLL_FILE CRTDLL_iob[3]; static CRTDLL_FILE * const CRTDLL_stdin = &CRTDLL_iob[0]; static CRTDLL_FILE * const CRTDLL_stdout = &CRTDLL_iob[1]; static CRTDLL_FILE * const CRTDLL_stderr = &CRTDLL_iob[2]; typedef VOID (*new_handler_type)(VOID); static new_handler_type new_handler; #if defined(__GNUC__) && defined(__i386__) #define USING_REAL_FPU #define DO_FPU(x,y) __asm__ __volatile__( x " %0;fwait" : "=m" (y) : ) #define POP_FPU(x) DO_FPU("fstpl",x) #endif CRTDLL_FILE * __cdecl CRTDLL__fdopen(INT handle, LPCSTR mode); /********************************************************************* * CRTDLL_MainInit (CRTDLL.init) */ BOOL WINAPI CRTDLL_Init(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved) { TRACE("(0x%08x,%ld,%p)\n",hinstDLL,fdwReason,lpvReserved); if (fdwReason == DLL_PROCESS_ATTACH) { CRTDLL__fdopen(0,"r"); CRTDLL__fdopen(1,"w"); CRTDLL__fdopen(2,"w"); } return TRUE; } /********************************************************************* * _GetMainArgs (CRTDLL.022) */ LPSTR * __cdecl CRTDLL__GetMainArgs(LPDWORD argc,LPSTR **argv, LPSTR *environ,DWORD flag) { char *cmdline; char **xargv; int xargc,end,last_arg,afterlastspace; DWORD version; TRACE("(%p,%p,%p,%ld).\n", argc,argv,environ,flag ); if (CRTDLL_acmdln_dll != NULL) HeapFree(GetProcessHeap(), 0, CRTDLL_acmdln_dll); CRTDLL_acmdln_dll = cmdline = HEAP_strdupA( GetProcessHeap(), 0, GetCommandLineA() ); TRACE("got '%s'\n", cmdline); version = GetVersion(); CRTDLL_osver_dll = version >> 16; CRTDLL_winminor_dll = version & 0xFF; CRTDLL_winmajor_dll = (version>>8) & 0xFF; CRTDLL_baseversion_dll = version >> 16; CRTDLL_winver_dll = ((version >> 8) & 0xFF) + ((version & 0xFF) << 8); CRTDLL_baseminor_dll = (version >> 16) & 0xFF; CRTDLL_basemajor_dll = (version >> 24) & 0xFF; CRTDLL_osversion_dll = version & 0xFFFF; CRTDLL_osminor_dll = version & 0xFF; CRTDLL_osmajor_dll = (version>>8) & 0xFF; /* missing threading init */ end=0;last_arg=0;xargv=NULL;xargc=0;afterlastspace=0; while (1) { if ((cmdline[end]==' ') || (cmdline[end]=='\0')) { if (cmdline[end]=='\0') last_arg=1; else cmdline[end]='\0'; /* alloc xargc + NULL entry */ xargv=(char**)HeapReAlloc( GetProcessHeap(), 0, xargv, sizeof(char*)*(xargc+1)); if (strlen(cmdline+afterlastspace)) { xargv[xargc] = HEAP_strdupA( GetProcessHeap(), 0, cmdline+afterlastspace); xargc++; if (!last_arg) /* need to seek to the next arg ? */ { end++; while (cmdline[end]==' ') end++; } afterlastspace=end; } else { xargv[xargc] = NULL; /* the last entry is NULL */ break; } } else end++; } CRTDLL_argc_dll = xargc; *argc = xargc; CRTDLL_argv_dll = xargv; *argv = xargv; TRACE("found %d arguments\n", CRTDLL_argc_dll); CRTDLL_environ_dll = *environ = GetEnvironmentStringsA(); return environ; } typedef void (*_INITTERMFUN)(); /* fixme: move to header */ struct find_t { unsigned attrib; time_t time_create; /* -1 when not avaiable */ time_t time_access; /* -1 when not avaiable */ time_t time_write; unsigned long size; /* fixme: 64 bit ??*/ char name[260]; }; /********************************************************************* * _findfirst (CRTDLL.099) * * BUGS * Unimplemented */ DWORD __cdecl CRTDLL__findfirst(LPCSTR fname, struct find_t * x2) { FIXME(":(%s,%p): stub\n",fname,x2); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /********************************************************************* * _findnext (CRTDLL.100) * * BUGS * Unimplemented */ INT __cdecl CRTDLL__findnext(DWORD hand, struct find_t * x2) { FIXME(":(%ld,%p): stub\n",hand,x2); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /********************************************************************* * _fstat (CRTDLL.111) * * BUGS * Unimplemented */ int __cdecl CRTDLL__fstat(int file, struct stat* buf) { FIXME(":(%d,%p): stub\n",file,buf); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /********************************************************************* * _initterm (CRTDLL.135) */ DWORD __cdecl CRTDLL__initterm(_INITTERMFUN *start,_INITTERMFUN *end) { _INITTERMFUN *current; TRACE("(%p,%p)\n",start,end); current=start; while (currenthandle) file->handle = GetStdHandle( STD_INPUT_HANDLE ); break; case 1: file = CRTDLL_stdout; if (!file->handle) file->handle = GetStdHandle( STD_OUTPUT_HANDLE ); break; case 2: file=CRTDLL_stderr; if (!file->handle) file->handle = GetStdHandle( STD_ERROR_HANDLE ); break; default: file = HeapAlloc( GetProcessHeap(), 0, sizeof(*file) ); file->handle = handle; break; } TRACE("open handle %d mode %s got file %p\n", handle, mode, file); return file; } /******************************************************************* * _global_unwind2 (CRTDLL.129) */ void __cdecl CRTDLL__global_unwind2( PEXCEPTION_FRAME frame ) { RtlUnwind( frame, 0, NULL, 0 ); } /******************************************************************* * _local_unwind2 (CRTDLL.173) */ void __cdecl CRTDLL__local_unwind2( PEXCEPTION_FRAME endframe, DWORD nr ) { TRACE("(%p,%ld)\n",endframe,nr); } /******************************************************************* * _setjmp (CRTDLL.264) */ INT __cdecl CRTDLL__setjmp(LPDWORD *jmpbuf) { FIXME(":(%p): stub\n",jmpbuf); return 0; } /********************************************************************* * fopen (CRTDLL.372) */ CRTDLL_FILE * __cdecl CRTDLL_fopen(LPCSTR path, LPCSTR mode) { CRTDLL_FILE *file = NULL; HFILE handle; #if 0 DOS_FULL_NAME full_name; if (!DOSFS_GetFullName( path, FALSE, &full_name )) { WARN("file %s bad name\n",path); return 0; } file=fopen(full_name.long_name ,mode); #endif DWORD access = 0, creation = 0; if ((strchr(mode,'r')&&strchr(mode,'a'))|| (strchr(mode,'r')&&strchr(mode,'w'))|| (strchr(mode,'w')&&strchr(mode,'a'))) return NULL; if (mode[0] == 'r') { access = GENERIC_READ; creation = OPEN_EXISTING; if (mode[1] == '+') access |= GENERIC_WRITE; } else if (mode[0] == 'w') { access = GENERIC_WRITE; creation = CREATE_ALWAYS; if (mode[1] == '+') access |= GENERIC_READ; } else if (mode[0] == 'a') { /* FIXME: there is no O_APPEND in CreateFile, should emulate it */ access = GENERIC_WRITE; creation = OPEN_ALWAYS; if (mode[1] == '+') access |= GENERIC_READ; } /* FIXME: should handle text/binary mode */ if ((handle = CreateFileA( path, access, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, creation, FILE_ATTRIBUTE_NORMAL, -1 )) != INVALID_HANDLE_VALUE) { file = HeapAlloc( GetProcessHeap(), 0, sizeof(*file) ); file->handle = handle; } TRACE("file %s mode %s got handle %d file %p\n", path,mode,handle,file); return file; } /********************************************************************* * fread (CRTDLL.377) */ DWORD __cdecl CRTDLL_fread(LPVOID ptr, INT size, INT nmemb, CRTDLL_FILE *file) { #if 0 int i=0; void *temp=ptr; /* If we would honour CR/LF <-> LF translation, we could do it like this. We should keep track of all files opened, and probably files with \ known binary extensions must be unchanged */ while ( (i < (nmemb*size)) && (ret==1)) { ret=fread(temp,1,1,file); TRACE("got %c 0x%02x ret %d\n", (isalpha(*(unsigned char*)temp))? *(unsigned char*)temp: ' ',*(unsigned char*)temp, ret); if (*(unsigned char*)temp != 0xd) { /* skip CR */ temp++; i++; } else TRACE("skipping ^M\n"); } TRACE("0x%08x items of size %d from file %p to %p\n", nmemb,size,file,ptr,); if(i!=nmemb) WARN(" failed!\n"); return i; #else DWORD ret; TRACE("0x%08x items of size %d from file %p to %p\n", nmemb,size,file,ptr); if (!ReadFile( file->handle, ptr, size * nmemb, &ret, NULL )) WARN(" failed!\n"); return ret / size; #endif } /********************************************************************* * freopen (CRTDLL.379) * * BUGS * Unimplemented */ DWORD __cdecl CRTDLL_freopen(LPCSTR path, LPCSTR mode, LPVOID stream) { FIXME(":(%s,%s,%p): stub\n", path, mode, stream); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /********************************************************************* * fscanf (CRTDLL.381) */ INT __cdecl CRTDLL_fscanf( CRTDLL_FILE *stream, LPSTR format, ... ) { #if 0 va_list valist; INT res; va_start( valist, format ); #ifdef HAVE_VFSCANF res = vfscanf( xlat_file_ptr(stream), format, valist ); #endif va_end( valist ); return res; #endif FIXME("broken\n"); return 0; } /********************************************************************* * _lseek (CRTDLL.179) */ LONG __cdecl CRTDLL__lseek( INT fd, LONG offset, INT whence) { TRACE("fd %d to 0x%08lx pos %s\n", fd,offset,(whence==SEEK_SET)?"SEEK_SET": (whence==SEEK_CUR)?"SEEK_CUR": (whence==SEEK_END)?"SEEK_END":"UNKNOWN"); return SetFilePointer( fd, offset, NULL, whence ); } /********************************************************************* * fseek (CRTDLL.382) */ LONG __cdecl CRTDLL_fseek( CRTDLL_FILE *file, LONG offset, INT whence) { TRACE("file %p to 0x%08lx pos %s\n", file,offset,(whence==SEEK_SET)?"SEEK_SET": (whence==SEEK_CUR)?"SEEK_CUR": (whence==SEEK_END)?"SEEK_END":"UNKNOWN"); if (SetFilePointer( file->handle, offset, NULL, whence ) != 0xffffffff) return 0; WARN(" failed!\n"); return -1; } /********************************************************************* * fsetpos (CRTDLL.383) */ INT __cdecl CRTDLL_fsetpos( CRTDLL_FILE *file, INT *pos ) { TRACE("file %p pos %d\n", file, *pos ); return CRTDLL_fseek(file, *pos, SEEK_SET); } /********************************************************************* * ftell (CRTDLL.384) */ LONG __cdecl CRTDLL_ftell( CRTDLL_FILE *file ) { return SetFilePointer( file->handle, 0, NULL, SEEK_CUR ); } /********************************************************************* * fwrite (CRTDLL.386) */ DWORD __cdecl CRTDLL_fwrite( LPVOID ptr, INT size, INT nmemb, CRTDLL_FILE *file ) { DWORD ret; TRACE("0x%08x items of size %d to file %p(%d) from %p\n", nmemb,size,file,file-(CRTDLL_FILE*)CRTDLL_iob,ptr); if (!WriteFile( file->handle, ptr, size * nmemb, &ret, NULL )) WARN(" failed!\n"); return ret / size; } /********************************************************************* * setbuf (CRTDLL.452) */ INT __cdecl CRTDLL_setbuf(CRTDLL_FILE *file, LPSTR buf) { TRACE("(file %p buf %p)\n", file, buf); /* this doesn't work:"void value not ignored as it ought to be" return setbuf(file,buf); */ /* FIXME: no buffering for now */ return 0; } /********************************************************************* * _open_osfhandle (CRTDLL.240) */ HFILE __cdecl CRTDLL__open_osfhandle(LONG osfhandle, INT flags) { HFILE handle; switch (osfhandle) { case STD_INPUT_HANDLE : case 0 : handle=0; break; case STD_OUTPUT_HANDLE: case 1: handle=1; break; case STD_ERROR_HANDLE: case 2: handle=2; break; default: return (-1); } TRACE("(handle %08lx,flags %d) return %d\n", osfhandle,flags,handle); return handle; } /********************************************************************* * srand (CRTDLL.460) */ void __cdecl CRTDLL_srand(DWORD seed) { /* FIXME: should of course be thread? process? local */ srand(seed); } /********************************************************************* * vfprintf (CRTDLL.373) */ INT __cdecl CRTDLL_vfprintf( CRTDLL_FILE *file, LPSTR format, va_list args ) { char buffer[2048]; /* FIXME... */ vsprintf( buffer, format, args ); return CRTDLL_fwrite( buffer, 1, strlen(buffer), file ); } /********************************************************************* * fprintf (CRTDLL.373) */ INT __cdecl CRTDLL_fprintf( CRTDLL_FILE *file, LPSTR format, ... ) { va_list valist; INT res; va_start( valist, format ); res = CRTDLL_vfprintf( file, format, valist ); va_end( valist ); return res; } /********************************************************************* * time (CRTDLL.488) */ time_t __cdecl CRTDLL_time(time_t *timeptr) { time_t curtime = time(NULL); if (timeptr) *timeptr = curtime; return curtime; } /********************************************************************* * clock (CRTDLL.350) */ clock_t __cdecl CRTDLL_clock(void) { struct tms alltimes; clock_t res; times(&alltimes); res = alltimes.tms_utime + alltimes.tms_stime+ alltimes.tms_cutime + alltimes.tms_cstime; /* Fixme: We need some symbolic representation for (Hostsystem_)CLOCKS_PER_SEC and (Emulated_system_)CLOCKS_PER_SEC 10 holds only for Windows/Linux_i86) */ return 10*res; } /********************************************************************* * _isatty (CRTDLL.137) */ BOOL __cdecl CRTDLL__isatty(DWORD x) { TRACE("(%ld)\n",x); return TRUE; } /********************************************************************* * _read (CRTDLL.256) * */ INT __cdecl CRTDLL__read(INT fd, LPVOID buf, UINT count) { TRACE("0x%08x bytes fd %d to %p\n", count,fd,buf); if (!fd) fd = GetStdHandle( STD_INPUT_HANDLE ); return _lread( fd, buf, count ); } /********************************************************************* * _write (CRTDLL.332) */ INT __cdecl CRTDLL__write(INT fd,LPCVOID buf,UINT count) { INT len=0; if (fd == -1) len = -1; else if (fd<=2) len = (UINT)write(fd,buf,(LONG)count); else len = _lwrite(fd,buf,count); TRACE("%d/%d byte to dfh %d from %p,\n", len,count,fd,buf); return len; } /********************************************************************* * _cexit (CRTDLL.49) * * FIXME: What the heck is the difference between * FIXME _c_exit (CRTDLL.47) * FIXME _cexit (CRTDLL.49) * FIXME _exit (CRTDLL.87) * FIXME exit (CRTDLL.359) * * atexit-processing comes to mind -- MW. * */ void __cdecl CRTDLL__cexit(INT ret) { TRACE("(%d)\n",ret); ExitProcess(ret); } /********************************************************************* * exit (CRTDLL.359) */ void __cdecl CRTDLL_exit(DWORD ret) { TRACE("(%ld)\n",ret); ExitProcess(ret); } /********************************************************************* * _abnormal_termination (CRTDLL.36) */ INT __cdecl CRTDLL__abnormal_termination(void) { TRACE("(void)\n"); return 0; } /********************************************************************* * _access (CRTDLL.37) */ INT __cdecl CRTDLL__access(LPCSTR filename, INT mode) { DWORD attr = GetFileAttributesA(filename); if (attr == -1) { if (GetLastError() == ERROR_INVALID_ACCESS) errno = EACCES; else errno = ENOENT; return -1; } if ((attr & FILE_ATTRIBUTE_READONLY) && (mode & W_OK)) { errno = EACCES; return -1; } else return 0; } /********************************************************************* * fflush (CRTDLL.365) */ INT __cdecl CRTDLL_fflush( CRTDLL_FILE *file ) { return FlushFileBuffers( file->handle ) ? 0 : -1; } /********************************************************************* * rand (CRTDLL.446) */ INT __cdecl CRTDLL_rand() { return (rand() & CRTDLL_RAND_MAX); } /********************************************************************* * putchar (CRTDLL.442) */ void __cdecl CRTDLL_putchar( INT x ) { putchar(x); } /********************************************************************* * fputc (CRTDLL.374) */ INT __cdecl CRTDLL_fputc( INT c, CRTDLL_FILE *file ) { char ch = (char)c; DWORD res; TRACE("%c to file %p\n",c,file); if (!WriteFile( file->handle, &ch, 1, &res, NULL )) return -1; return c; } /********************************************************************* * fputs (CRTDLL.375) */ INT __cdecl CRTDLL_fputs( LPCSTR s, CRTDLL_FILE *file ) { DWORD res; TRACE("%s to file %p\n",s,file); if (!WriteFile( file->handle, s, strlen(s), &res, NULL )) return -1; return res; } /********************************************************************* * puts (CRTDLL.443) */ INT __cdecl CRTDLL_puts(LPCSTR s) { TRACE("%s \n",s); return puts(s); } /********************************************************************* * putc (CRTDLL.441) */ INT __cdecl CRTDLL_putc( INT c, CRTDLL_FILE *file ) { return CRTDLL_fputc( c, file ); } /********************************************************************* * fgetc (CRTDLL.366) */ INT __cdecl CRTDLL_fgetc( CRTDLL_FILE *file ) { DWORD res; char ch; if (!ReadFile( file->handle, &ch, 1, &res, NULL )) return -1; if (res != 1) return -1; return ch; } /********************************************************************* * getc (CRTDLL.388) */ INT __cdecl CRTDLL_getc( CRTDLL_FILE *file ) { return CRTDLL_fgetc( file ); } /********************************************************************* * fgets (CRTDLL.368) */ CHAR* __cdecl CRTDLL_fgets( LPSTR s, INT size, CRTDLL_FILE *file ) { int cc; LPSTR buf_start = s; /* BAD, for the whole WINE process blocks... just done this way to test * windows95's ftp.exe. */ for(cc = CRTDLL_fgetc(file); cc != EOF && cc != '\n'; cc = CRTDLL_fgetc(file)) if (cc != '\r') { if (--size <= 0) break; *s++ = (char)cc; } if ((cc == EOF) &&(s == buf_start)) /* If nothing read, return 0*/ return 0; if (cc == '\n') if (--size > 0) *s++ = '\n'; *s = '\0'; TRACE("got '%s'\n", buf_start); return buf_start; } /********************************************************************* * gets (CRTDLL.391) */ LPSTR __cdecl CRTDLL_gets(LPSTR buf) { int cc; LPSTR buf_start = buf; /* BAD, for the whole WINE process blocks... just done this way to test * windows95's ftp.exe. */ for(cc = fgetc(stdin); cc != EOF && cc != '\n'; cc = fgetc(stdin)) if(cc != '\r') *buf++ = (char)cc; *buf = '\0'; TRACE("got '%s'\n", buf_start); return buf_start; } /********************************************************************* * _rotl (CRTDLL.259) */ UINT __cdecl CRTDLL__rotl(UINT x,INT shift) { unsigned int ret = (x >> shift)|( x >>((sizeof(x))-shift)); TRACE("got 0x%08x rot %d ret 0x%08x\n", x,shift,ret); return ret; } /********************************************************************* * _lrotl (CRTDLL.176) */ DWORD __cdecl CRTDLL__lrotl(DWORD x,INT shift) { unsigned long ret = (x >> shift)|( x >>((sizeof(x))-shift)); TRACE("got 0x%08lx rot %d ret 0x%08lx\n", x,shift,ret); return ret; } /********************************************************************* * _mbsicmp (CRTDLL.204) */ int __cdecl CRTDLL__mbsicmp(unsigned char *x,unsigned char *y) { do { if (!*x) return !!*y; if (!*y) return !!*x; /* FIXME: MBCS handling... */ if (*x!=*y) return 1; x++; y++; } while (1); } /********************************************************************* * vsprintf (CRTDLL.500) */ INT __cdecl CRTDLL_vsprintf( LPSTR buffer, LPCSTR spec, va_list args ) { return wvsprintfA( buffer, spec, args ); } /********************************************************************* * vswprintf (CRTDLL.501) */ INT __cdecl CRTDLL_vswprintf( LPWSTR buffer, LPCWSTR spec, va_list args ) { return wvsprintfW( buffer, spec, args ); } /********************************************************************* * _strcmpi (CRTDLL.282) (CRTDLL.287) */ INT __cdecl CRTDLL__strcmpi( LPCSTR s1, LPCSTR s2 ) { return lstrcmpiA( s1, s2 ); } /********************************************************************* * _strnicmp (CRTDLL.293) */ INT __cdecl CRTDLL__strnicmp( LPCSTR s1, LPCSTR s2, INT n ) { return lstrncmpiA( s1, s2, n ); } /********************************************************************* * _strlwr (CRTDLL.293) * * convert a string in place to lowercase */ LPSTR __cdecl CRTDLL__strlwr(LPSTR x) { unsigned char *y =x; TRACE("CRTDLL_strlwr got %s\n", x); while (*y) { if ((*y > 0x40) && (*y< 0x5b)) *y = *y + 0x20; y++; } TRACE(" returned %s\n", x); return x; } /********************************************************************* * system (CRTDLL.485) */ INT __cdecl CRTDLL_system(LPSTR x) { #define SYSBUF_LENGTH 1500 char buffer[SYSBUF_LENGTH]; unsigned char *y = x; unsigned char *bp; int i; sprintf( buffer, "%s \"", argv0 ); bp = buffer + strlen(buffer); i = strlen(buffer) + strlen(x) +2; /* Calculate needed buffer size to prevent overflow. */ while (*y) { if (*y =='\\') i++; y++; } /* If buffer too short, exit. */ if (i > SYSBUF_LENGTH) { TRACE("_system buffer to small\n"); return 127; } y =x; while (*y) { *bp = *y; bp++; y++; if (*(y-1) =='\\') *bp++ = '\\'; } /* Remove spaces from end of string. */ while (*(y-1) == ' ') { bp--;y--; } *bp++ = '"'; *bp = 0; TRACE("_system got '%s', executing '%s'\n",x,buffer); return system(buffer); } /********************************************************************* * _strupr (CRTDLL.300) */ LPSTR __cdecl CRTDLL__strupr(LPSTR x) { LPSTR y=x; while (*y) { *y=toupper(*y); y++; } return x; } /********************************************************************* * longjmp (CRTDLL.426) */ VOID __cdecl CRTDLL_longjmp(jmp_buf env, int val) { FIXME("CRTDLL_longjmp semistup, expect crash\n"); longjmp(env, val); } /********************************************************************* * malloc (CRTDLL.427) */ VOID* __cdecl CRTDLL_malloc(DWORD size) { return HeapAlloc(GetProcessHeap(),0,size); } /********************************************************************* * new (CRTDLL.001) */ VOID* __cdecl CRTDLL_new(DWORD size) { VOID* result; if(!(result = HeapAlloc(GetProcessHeap(),0,size)) && new_handler) (*new_handler)(); return result; } /********************************************************************* * set_new_handler(CRTDLL.003) */ new_handler_type __cdecl CRTDLL_set_new_handler(new_handler_type func) { new_handler_type old_handler = new_handler; new_handler = func; return old_handler; } /********************************************************************* * calloc (CRTDLL.350) */ VOID* __cdecl CRTDLL_calloc(DWORD size, DWORD count) { return HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, size * count ); } /********************************************************************* * realloc (CRTDLL.447) */ VOID* __cdecl CRTDLL_realloc( VOID *ptr, DWORD size ) { return HeapReAlloc( GetProcessHeap(), 0, ptr, size ); } /********************************************************************* * free (CRTDLL.427) */ VOID __cdecl CRTDLL_free(LPVOID ptr) { HeapFree(GetProcessHeap(),0,ptr); } /********************************************************************* * delete (CRTDLL.002) */ VOID __cdecl CRTDLL_delete(VOID* ptr) { HeapFree(GetProcessHeap(),0,ptr); } /********************************************************************* * _strdup (CRTDLL.285) */ LPSTR __cdecl CRTDLL__strdup(LPCSTR ptr) { return HEAP_strdupA(GetProcessHeap(),0,ptr); } /********************************************************************* * fclose (CRTDLL.362) */ INT __cdecl CRTDLL_fclose( CRTDLL_FILE *file ) { TRACE("%p\n", file ); if (!CloseHandle( file->handle )) return -1; HeapFree( GetProcessHeap(), 0, file ); return 0; } /********************************************************************* * _unlink (CRTDLL.315) */ INT __cdecl CRTDLL__unlink(LPCSTR pathname) { return DeleteFileA( pathname ) ? 0 : -1; } /********************************************************************* * rename (CRTDLL.449) */ INT __cdecl CRTDLL_rename(LPCSTR oldpath,LPCSTR newpath) { BOOL ok = MoveFileExA( oldpath, newpath, MOVEFILE_REPLACE_EXISTING ); return ok ? 0 : -1; } /********************************************************************* * _stat (CRTDLL.280) */ struct win_stat { UINT16 win_st_dev; UINT16 win_st_ino; UINT16 win_st_mode; INT16 win_st_nlink; INT16 win_st_uid; INT16 win_st_gid; UINT win_st_rdev; INT win_st_size; INT win_st_atime; INT win_st_mtime; INT win_st_ctime; }; int __cdecl CRTDLL__stat(const char * filename, struct win_stat * buf) { int ret=0; DOS_FULL_NAME full_name; struct stat mystat; if (!DOSFS_GetFullName( filename, TRUE, &full_name )) { WARN("CRTDLL__stat filename %s bad name\n",filename); return -1; } ret=stat(full_name.long_name,&mystat); TRACE("CRTDLL__stat %s\n", filename); if(ret) WARN(" Failed!\n"); /* FIXME: should check what Windows returns */ buf->win_st_dev = mystat.st_dev; buf->win_st_ino = mystat.st_ino; buf->win_st_mode = mystat.st_mode; buf->win_st_nlink = mystat.st_nlink; buf->win_st_uid = mystat.st_uid; buf->win_st_gid = mystat.st_gid; buf->win_st_rdev = mystat.st_rdev; buf->win_st_size = mystat.st_size; buf->win_st_atime = mystat.st_atime; buf->win_st_mtime = mystat.st_mtime; buf->win_st_ctime = mystat.st_ctime; return ret; } /********************************************************************* * _open (CRTDLL.239) */ HFILE __cdecl CRTDLL__open(LPCSTR path,INT flags) { DWORD access = 0, creation = 0; HFILE ret; /* FIXME: the flags in lcc's header differ from the ones in Linux, e.g. Linux: define O_APPEND 02000 (= 0x400) lcc: define _O_APPEND 0x0008 so here a scheme to translate them Probably lcc is wrong here, but at least a hack to get is going */ switch(flags & 3) { case O_RDONLY: access |= GENERIC_READ; break; case O_WRONLY: access |= GENERIC_WRITE; break; case O_RDWR: access |= GENERIC_WRITE | GENERIC_READ; break; } if (flags & 0x0100) /* O_CREAT */ { if (flags & 0x0400) /* O_EXCL */ creation = CREATE_NEW; else if (flags & 0x0200) /* O_TRUNC */ creation = CREATE_ALWAYS; else creation = OPEN_ALWAYS; } else /* no O_CREAT */ { if (flags & 0x0200) /* O_TRUNC */ creation = TRUNCATE_EXISTING; else creation = OPEN_EXISTING; } if (flags & 0x0008) /* O_APPEND */ FIXME("O_APPEND not supported\n" ); if (!(flags & 0x8000 /* O_BINARY */ ) || (flags & 0x4000 /* O_TEXT */)) FIXME(":text mode not supported\n"); if (flags & 0xf0f4) TRACE("CRTDLL_open file unsupported flags 0x%04x\n",flags); /* End Fixme */ ret = CreateFileA( path, access, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, creation, FILE_ATTRIBUTE_NORMAL, -1 ); TRACE("CRTDLL_open file %s mode 0x%04x got handle %d\n", path,flags,ret); return ret; } /********************************************************************* * _close (CRTDLL.57) */ INT __cdecl CRTDLL__close(HFILE fd) { int ret=_lclose(fd); TRACE("(%d)\n",fd); if(ret) WARN(" Failed!\n"); return ret; } /********************************************************************* * feof (CRTDLL.363) * FIXME: Care for large files * FIXME: Check errors */ INT __cdecl CRTDLL_feof( CRTDLL_FILE *file ) { DWORD curpos=SetFilePointer( file->handle, 0, NULL, SEEK_CUR ); DWORD endpos=SetFilePointer( file->handle, 0, NULL, FILE_END ); if (curpos==endpos) return TRUE; else SetFilePointer( file->handle, curpos,0,FILE_BEGIN); return FALSE; } /********************************************************************* * setlocale (CRTDLL.453) */ LPSTR __cdecl CRTDLL_setlocale(INT category,LPCSTR locale) { LPSTR categorystr; switch (category) { case CRTDLL_LC_ALL: categorystr="LC_ALL";break; case CRTDLL_LC_COLLATE: categorystr="LC_COLLATE";break; case CRTDLL_LC_CTYPE: categorystr="LC_CTYPE";break; case CRTDLL_LC_MONETARY: categorystr="LC_MONETARY";break; case CRTDLL_LC_NUMERIC: categorystr="LC_NUMERIC";break; case CRTDLL_LC_TIME: categorystr="LC_TIME";break; default: categorystr = "UNKNOWN?";break; } FIXME("(%s,%s),stub!\n",categorystr,locale); return "C"; } /********************************************************************* * _setmode (CRTDLL.265) * FIXME: At present we ignore the request to translate CR/LF to LF. * * We allways translate when we read with fgets, we never do with fread * */ INT __cdecl CRTDLL__setmode( INT fh,INT mode) { /* FIXME */ #define O_TEXT 0x4000 #define O_BINARY 0x8000 FIXME("on fhandle %d mode %s, STUB.\n", fh,(mode=O_TEXT)?"O_TEXT": (mode=O_BINARY)?"O_BINARY":"UNKNOWN"); return -1; } /********************************************************************* * _fpreset (CRTDLL.107) */ VOID __cdecl CRTDLL__fpreset(void) { FIXME(" STUB.\n"); } /********************************************************************* * atexit (CRTDLL.345) */ INT __cdecl CRTDLL_atexit(LPVOID x) { FIXME("(%p), STUB.\n",x); return 0; /* successful */ } /********************************************************************* * _isctype (CRTDLL.138) */ BOOL __cdecl CRTDLL__isctype(CHAR x,CHAR type) { if ((type & CRTDLL_SPACE) && isspace(x)) return TRUE; if ((type & CRTDLL_PUNCT) && ispunct(x)) return TRUE; if ((type & CRTDLL_LOWER) && islower(x)) return TRUE; if ((type & CRTDLL_UPPER) && isupper(x)) return TRUE; if ((type & CRTDLL_ALPHA) && isalpha(x)) return TRUE; if ((type & CRTDLL_DIGIT) && isdigit(x)) return TRUE; if ((type & CRTDLL_CONTROL) && iscntrl(x)) return TRUE; /* check CRTDLL_LEADBYTE */ return FALSE; } /********************************************************************* * _chdrive (CRTDLL.52) * * newdir [I] drive to change to, A=1 * */ BOOL __cdecl CRTDLL__chdrive(INT newdrive) { /* FIXME: generates errnos */ return DRIVE_SetCurrentDrive(newdrive-1); } /********************************************************************* * _chdir (CRTDLL.51) */ INT __cdecl CRTDLL__chdir(LPCSTR newdir) { if (!SetCurrentDirectoryA(newdir)) return 1; return 0; } /********************************************************************* * _fullpath (CRTDLL.114) */ LPSTR __cdecl CRTDLL__fullpath(LPSTR buf, LPCSTR name, INT size) { DOS_FULL_NAME full_name; if (!buf) { size = 256; if(!(buf = CRTDLL_malloc(size))) return NULL; } if (!DOSFS_GetFullName( name, FALSE, &full_name )) return NULL; lstrcpynA(buf,full_name.short_name,size); TRACE("CRTDLL_fullpath got %s\n",buf); return buf; } /********************************************************************* * _splitpath (CRTDLL.279) */ VOID __cdecl CRTDLL__splitpath(LPCSTR path, LPSTR drive, LPSTR directory, LPSTR filename, LPSTR extension ) { /* drive includes : directory includes leading and trailing (forward and backward slashes) filename without dot and slashes extension with leading dot */ char * drivechar,*dirchar,*namechar; TRACE("CRTDLL__splitpath got %s\n",path); drivechar = strchr(path,':'); dirchar = strrchr(path,'/'); namechar = strrchr(path,'\\'); dirchar = max(dirchar,namechar); if (dirchar) namechar = strrchr(dirchar,'.'); else namechar = strrchr(path,'.'); if (drive) { *drive = 0x00; if (drivechar) { strncat(drive,path,drivechar-path+1); path = drivechar+1; } } if (directory) { *directory = 0x00; if (dirchar) { strncat(directory,path,dirchar-path+1); path = dirchar+1; } } if (filename) { *filename = 0x00; if (namechar) { strncat(filename,path,namechar-path); if (extension) { *extension = 0x00; strcat(extension,namechar); } } } TRACE("CRTDLL__splitpath found %s %s %s %s\n",drive,directory,filename,extension); } /********************************************************************* * _makepath (CRTDLL.182) */ VOID __cdecl CRTDLL__makepath(LPSTR path, LPCSTR drive, LPCSTR directory, LPCSTR filename, LPCSTR extension ) { char ch; TRACE("CRTDLL__makepath got %s %s %s %s\n", drive, directory, filename, extension); if ( !path ) return; path[0] = 0; if ( drive ) if ( drive[0] ) { sprintf(path, "%c:", drive[0]); } if ( directory ) if ( directory[0] ) { strcat(path, directory); ch = path[strlen(path)-1]; if (ch != '/' && ch != '\\') strcat(path,"\\"); } if ( filename ) if ( filename[0] ) { strcat(path, filename); if ( extension ) { if ( extension[0] ) { if ( extension[0] != '.' ) { strcat(path,"."); } strcat(path,extension); } } } TRACE("CRTDLL__makepath returns %s\n",path); } /********************************************************************* * _getcwd (CRTDLL.120) */ CHAR* __cdecl CRTDLL__getcwd(LPSTR buf, INT size) { char test[1]; int len; len = size; if (!buf) { if (size < 0) /* allocate as big as nescessary */ len =GetCurrentDirectoryA(1,test) + 1; if(!(buf = CRTDLL_malloc(len))) { /* set error to OutOfRange */ return( NULL ); } } size = len; if(!(len =GetCurrentDirectoryA(len,buf))) { return NULL; } if (len > size) { /* set error to ERANGE */ TRACE("CRTDLL_getcwd buffer to small\n"); return NULL; } return buf; } /********************************************************************* * _getdcwd (CRTDLL.121) */ CHAR* __cdecl CRTDLL__getdcwd(INT drive,LPSTR buf, INT size) { char test[1]; int len; FIXME("(\"%c:\",%s,%d)\n",drive+'A',buf,size); len = size; if (!buf) { if (size < 0) /* allocate as big as nescessary */ len =GetCurrentDirectoryA(1,test) + 1; if(!(buf = CRTDLL_malloc(len))) { /* set error to OutOfRange */ return( NULL ); } } size = len; if(!(len =GetCurrentDirectoryA(len,buf))) { return NULL; } if (len > size) { /* set error to ERANGE */ TRACE("buffer to small\n"); return NULL; } return buf; } /********************************************************************* * _getdrive (CRTDLL.124) * * Return current drive, 1 for A, 2 for B */ INT __cdecl CRTDLL__getdrive(VOID) { return DRIVE_GetCurrentDrive() + 1; } /********************************************************************* * _mkdir (CRTDLL.234) */ INT __cdecl CRTDLL__mkdir(LPCSTR newdir) { if (!CreateDirectoryA(newdir,NULL)) return -1; return 0; } /********************************************************************* * remove (CRTDLL.448) */ INT __cdecl CRTDLL_remove(LPCSTR file) { if (!DeleteFileA(file)) return -1; return 0; } /********************************************************************* * _errno (CRTDLL.52) * Yes, this is a function. */ LPINT __cdecl CRTDLL__errno() { static int crtdllerrno; /* FIXME: we should set the error at the failing function call time */ crtdllerrno = LastErrorToErrno(GetLastError()); return &crtdllerrno; } /********************************************************************* * _tempnam (CRTDLL.305) * */ LPSTR __cdecl CRTDLL__tempnam(LPCSTR dir, LPCSTR prefix) { char *ret; DOS_FULL_NAME tempname; if ((ret = tempnam(dir,prefix))==NULL) { WARN("Unable to get unique filename\n"); return NULL; } if (!DOSFS_GetFullName(ret,FALSE,&tempname)) { TRACE("Wrong path?\n"); return NULL; } free(ret); if ((ret = CRTDLL_malloc(strlen(tempname.short_name)+1)) == NULL) { WARN("CRTDL_malloc for shortname failed\n"); return NULL; } if ((ret = strcpy(ret,tempname.short_name)) == NULL) { WARN("Malloc for shortname failed\n"); return NULL; } TRACE("dir %s prefix %s got %s\n", dir,prefix,ret); return ret; } /********************************************************************* * tmpnam (CRTDLL.490) * * lcclnk from lcc-win32 relies on a terminating dot in the name returned * */ LPSTR __cdecl CRTDLL_tmpnam(LPSTR s) { char *ret; if ((ret =tmpnam(s))== NULL) { WARN("Unable to get unique filename\n"); return NULL; } if (!DOSFS_GetFullName(ret,FALSE,&CRTDLL_tmpname)) { TRACE("Wrong path?\n"); return NULL; } strcat(CRTDLL_tmpname.short_name,"."); TRACE("for buf %p got %s\n", s,CRTDLL_tmpname.short_name); TRACE("long got %s\n", CRTDLL_tmpname.long_name); if ( s != NULL) return strcpy(s,CRTDLL_tmpname.short_name); else return CRTDLL_tmpname.short_name; } /********************************************************************* * _itoa (CRTDLL.165) */ LPSTR __cdecl CRTDLL__itoa(INT x,LPSTR buf,INT buflen) { wsnprintfA(buf,buflen,"%d",x); return buf; } /********************************************************************* * _ltoa (CRTDLL.180) */ LPSTR __cdecl CRTDLL__ltoa(long x,LPSTR buf,INT radix) { switch(radix) { case 2: FIXME("binary format not implemented !\n"); break; case 8: wsnprintfA(buf,0x80,"%o",x); break; case 10: wsnprintfA(buf,0x80,"%d",x); break; case 16: wsnprintfA(buf,0x80,"%x",x); break; default: FIXME("radix %d not implemented !\n", radix); } return buf; } /********************************************************************* * _ultoa (CRTDLL.311) */ LPSTR __cdecl CRTDLL__ultoa(long x,LPSTR buf,INT radix) { switch(radix) { case 2: FIXME("binary format not implemented !\n"); break; case 8: wsnprintfA(buf,0x80,"%lo",x); break; case 10: wsnprintfA(buf,0x80,"%ld",x); break; case 16: wsnprintfA(buf,0x80,"%lx",x); break; default: FIXME("radix %d not implemented !\n", radix); } return buf; } typedef VOID (*sig_handler_type)(VOID); /********************************************************************* * signal (CRTDLL.455) */ void * __cdecl CRTDLL_signal(int sig, sig_handler_type ptr) { FIXME("(%d %p):stub.\n", sig, ptr); return (void*)-1; } /********************************************************************* * _ftol (CRTDLL.113) */ #ifdef USING_REAL_FPU LONG __cdecl CRTDLL__ftol(void) { /* don't just do DO_FPU("fistp",retval), because the rounding * mode must also be set to "round towards zero"... */ double fl; POP_FPU(fl); return (LONG)fl; } #else LONG __cdecl CRTDLL__ftol(double fl) { FIXME("should be register function\n"); return (LONG)fl; } #endif /********************************************************************* * _CIpow (CRTDLL.14) */ #ifdef USING_REAL_FPU LONG __cdecl CRTDLL__CIpow(void) { double x,y; POP_FPU(y); POP_FPU(x); return pow(x,y); } #else LONG __cdecl CRTDLL__CIpow(double x,double y) { FIXME("should be register function\n"); return pow(x,y); } #endif /********************************************************************* * _sleep (CRTDLL.267) */ VOID __cdecl CRTDLL__sleep(unsigned long timeout) { TRACE("CRTDLL__sleep for %ld milliseconds\n",timeout); Sleep((timeout)?timeout:1); } /********************************************************************* * getenv (CRTDLL.437) */ LPSTR __cdecl CRTDLL_getenv(const char *name) { LPSTR environ = GetEnvironmentStringsA(); LPSTR pp,pos = NULL; unsigned int length; for (pp = environ; (*pp); pp = pp + strlen(pp) +1) { pos =strchr(pp,'='); if (pos) length = pos -pp; else length = strlen(pp); if (!strncmp(pp,name,length)) break; } if ((pp)&& (pos)) { pp = pos+1; TRACE("got %s\n",pp); } FreeEnvironmentStringsA( environ ); return pp; } /********************************************************************* * _mbsrchr (CRTDLL.223) */ LPSTR __cdecl CRTDLL__mbsrchr(LPSTR s,CHAR x) { /* FIXME: handle multibyte strings */ return strrchr(s,x); } /********************************************************************* * _memicmp (CRTDLL.233)(NTDLL.868) * A stringcompare, without \0 check * RETURNS * -1:if first string is alphabetically before second string * 1:if second '' '' '' '' first '' * 0:if both are equal. */ INT __cdecl CRTDLL__memicmp( LPCSTR s1, /* [in] first string */ LPCSTR s2, /* [in] second string */ DWORD len /* [in] length to compare */ ) { int i; for (i=0;itolower(s2[i])) return 1; } return 0; } /********************************************************************* * __dllonexit (CRTDLL.25) */ VOID __cdecl CRTDLL___dllonexit () { FIXME("stub\n"); } /********************************************************************* * wcstol (CRTDLL.520) * Like strtol, but for wide character strings. */ INT __cdecl CRTDLL_wcstol(LPWSTR s,LPWSTR *end,INT base) { LPSTR sA = HEAP_strdupWtoA(GetProcessHeap(),0,s),endA; INT ret = strtol(sA,&endA,base); HeapFree(GetProcessHeap(),0,sA); if (end) *end = s+(endA-sA); /* pointer magic checked. */ return ret; } /********************************************************************* * _strdate (CRTDLL.283) */ LPSTR __cdecl CRTDLL__strdate (LPSTR date) { FIXME("%p stub\n", date); return 0; } /********************************************************************* * _strtime (CRTDLL.299) */ LPSTR __cdecl CRTDLL__strtime (LPSTR date) { FIXME("%p stub\n", date); return 0; } /********************************************************************* * _except_handler2 (CRTDLL.78) */ INT __cdecl CRTDLL__except_handler2 ( PEXCEPTION_RECORD rec, PEXCEPTION_FRAME frame, PCONTEXT context, PEXCEPTION_FRAME *dispatcher) { FIXME ("exception %lx flags=%lx at %p handler=%p %p %p stub\n", rec->ExceptionCode, rec->ExceptionFlags, rec->ExceptionAddress, frame->Handler, context, dispatcher); return ExceptionContinueSearch; } wine-20000526/dlls/crtdll/mbstring.c0100644000175000001440000000316406753350337016674 0ustar julliardusers/* * CRTDLL multi-byte string functions * * Copyright 1999 Alexandre Julliard */ #include "config.h" #include #include #include #include #ifdef HAVE_WCTYPE_H #include #endif #include "windef.h" #include "crtdll.h" /********************************************************************* * CRTDLL__mbsinc (CRTDLL.205) */ LPSTR __cdecl CRTDLL__mbsinc( LPCSTR str ) { int len = mblen( str, MB_LEN_MAX ); if (len < 1) len = 1; return (LPSTR)(str + len); } /********************************************************************* * CRTDLL__mbslen (CRTDLL.206) */ INT __cdecl CRTDLL__mbslen( LPCSTR str ) { INT len, total = 0; while ((len = mblen( str, MB_LEN_MAX )) > 0) { str += len; total++; } return total; } /********************************************************************* * CRTDLL_mbstowcs (CRTDLL.429) */ INT __cdecl CRTDLL_mbstowcs( LPWSTR dst, LPCSTR src, INT n ) { wchar_t *buffer, *p; int ret; if (!(buffer = CRTDLL_malloc( n * sizeof(wchar_t) ))) return -1; ret = mbstowcs( buffer, src, n ); if (ret < n) n = ret + 1; /* nb of chars to copy (including terminating null) */ p = buffer; while (n-- > 0) *dst++ = (WCHAR)*p++; CRTDLL_free( buffer ); return ret; } /********************************************************************* * CRTDLL_mbtowc (CRTDLL.430) */ INT __cdecl CRTDLL_mbtowc( WCHAR *dst, LPCSTR str, INT n ) { wchar_t res; int ret = mbtowc( &res, str, n ); if (dst) *dst = (WCHAR)res; return ret; } wine-20000526/dlls/crtdll/wcstring.c0100644000175000001440000003235707066755706016724 0ustar julliardusers/* * CRTDLL wide-char functions * * Copyright 1999 Alexandre Julliard * * TODO: * These functions are really necessary only if sizeof(WCHAR) != sizeof(wchar_t), * otherwise we could use the libc functions directly. */ #include "config.h" #include #include #include #ifdef HAVE_WCTYPE_H #include #endif #include "windef.h" #include "crtdll.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(crtdll); /********************************************************************* * CRTDLL__wcsdup (CRTDLL.320) */ LPWSTR __cdecl CRTDLL__wcsdup( LPCWSTR str ) { LPWSTR ret = NULL; if (str) { int size = (CRTDLL_wcslen(str) + 1) * sizeof(WCHAR); ret = CRTDLL_malloc( size ); if (ret) memcpy( ret, str, size ); } return ret; } /********************************************************************* * CRTDLL__wcsicmp (CRTDLL.321) */ INT __cdecl CRTDLL__wcsicmp( LPCWSTR str1, LPCWSTR str2 ) { while (*str1 && (CRTDLL_towupper(*str1) == CRTDLL_towupper(*str2))) { str1++; str2++; } return CRTDLL_towupper(*str1) - CRTDLL_towupper(*str2); } /********************************************************************* * CRTDLL__wcsicoll (CRTDLL.322) */ INT __cdecl CRTDLL__wcsicoll( LPCWSTR str1, LPCWSTR str2 ) { /* FIXME: handle collates */ return CRTDLL__wcsicmp( str1, str2 ); } /********************************************************************* * CRTDLL__wcslwr (CRTDLL.323) */ LPWSTR __cdecl CRTDLL__wcslwr( LPWSTR str ) { LPWSTR ret = str; for ( ; *str; str++) *str = CRTDLL_towlower(*str); return ret; } /********************************************************************* * CRTDLL__wcsnicmp (CRTDLL.324) */ INT __cdecl CRTDLL__wcsnicmp( LPCWSTR str1, LPCWSTR str2, INT n ) { if (!n) return 0; while ((--n > 0) && *str1 && (CRTDLL_towupper(*str1) == CRTDLL_towupper(*str2))) { str1++; str2++; } return CRTDLL_towupper(*str1) - CRTDLL_towupper(*str2); } /********************************************************************* * CRTDLL__wcsnset (CRTDLL.325) */ LPWSTR __cdecl CRTDLL__wcsnset( LPWSTR str, WCHAR c, INT n ) { LPWSTR ret = str; while ((n-- > 0) && *str) *str++ = c; return ret; } /********************************************************************* * CRTDLL__wcsrev (CRTDLL.326) */ LPWSTR __cdecl CRTDLL__wcsrev( LPWSTR str ) { LPWSTR ret = str; LPWSTR end = str + CRTDLL_wcslen(str) - 1; while (end > str) { WCHAR t = *end; *end-- = *str; *str++ = t; } return ret; } /********************************************************************* * CRTDLL__wcsset (CRTDLL.327) */ LPWSTR __cdecl CRTDLL__wcsset( LPWSTR str, WCHAR c ) { LPWSTR ret = str; while (*str) *str++ = c; return ret; } /********************************************************************* * CRTDLL__wcsupr (CRTDLL.328) */ LPWSTR __cdecl CRTDLL__wcsupr( LPWSTR str ) { LPWSTR ret = str; for ( ; *str; str++) *str = CRTDLL_towupper(*str); return ret; } /********************************************************************* * CRTDLL_towlower (CRTDLL.493) */ WCHAR __cdecl CRTDLL_towlower( WCHAR ch ) { #ifdef HAVE_WCTYPE_H ch = (WCHAR)towlower( (wchar_t)ch ); #else if (!HIBYTE(ch)) ch = (WCHAR)tolower( LOBYTE(ch) ); /* FIXME */ #endif return ch; } /********************************************************************* * CRTDLL_towupper (CRTDLL.494) */ WCHAR __cdecl CRTDLL_towupper( WCHAR ch ) { #ifdef HAVE_WCTYPE_H ch = (WCHAR)towupper( (wchar_t)ch ); #else if (!HIBYTE(ch)) ch = (WCHAR)toupper( LOBYTE(ch) ); /* FIXME */ #endif return ch; } /*********************************************************************** * CRTDLL_wcscat (CRTDLL.503) */ LPWSTR __cdecl CRTDLL_wcscat( LPWSTR dst, LPCWSTR src ) { LPWSTR p = dst; while (*p) p++; while ((*p++ = *src++)); return dst; } /********************************************************************* * CRTDLL_wcschr (CRTDLL.504) */ LPWSTR __cdecl CRTDLL_wcschr( LPCWSTR str, WCHAR ch ) { while (*str) { if (*str == ch) return (LPWSTR)str; str++; } return NULL; } /********************************************************************* * CRTDLL_wcscmp (CRTDLL.505) */ INT __cdecl CRTDLL_wcscmp( LPCWSTR str1, LPCWSTR str2 ) { while (*str1 && (*str1 == *str2)) { str1++; str2++; } return (INT)(*str1 - *str2); } /********************************************************************* * CRTDLL_wcscoll (CRTDLL.506) */ DWORD __cdecl CRTDLL_wcscoll( LPCWSTR str1, LPCWSTR str2 ) { /* FIXME: handle collates */ return CRTDLL_wcscmp( str1, str2 ); } /*********************************************************************** * CRTDLL_wcscpy (CRTDLL.507) */ LPWSTR __cdecl CRTDLL_wcscpy( LPWSTR dst, LPCWSTR src ) { LPWSTR p = dst; while ((*p++ = *src++)); return dst; } /********************************************************************* * CRTDLL_wcscspn (CRTDLL.508) */ INT __cdecl CRTDLL_wcscspn( LPCWSTR str, LPCWSTR reject ) { LPCWSTR start = str; while (*str) { LPCWSTR p = reject; while (*p && (*p != *str)) p++; if (*p) break; str++; } return str - start; } /*********************************************************************** * CRTDLL_wcslen (CRTDLL.510) */ INT __cdecl CRTDLL_wcslen( LPCWSTR str ) { LPCWSTR s = str; while (*s) s++; return s - str; } /********************************************************************* * CRTDLL_wcsncat (CRTDLL.511) */ LPWSTR __cdecl CRTDLL_wcsncat( LPWSTR s1, LPCWSTR s2, INT n ) { LPWSTR ret = s1; while (*s1) s1++; while (n-- > 0) if (!(*s1++ = *s2++)) return ret; *s1 = 0; return ret; } /********************************************************************* * CRTDLL_wcsncmp (CRTDLL.512) */ INT __cdecl CRTDLL_wcsncmp( LPCWSTR str1, LPCWSTR str2, INT n ) { if (!n) return 0; while ((--n > 0) && *str1 && (*str1 == *str2)) { str1++; str2++; } return (INT)(*str1 - *str2); } /********************************************************************* * CRTDLL_wcsncpy (CRTDLL.513) */ LPWSTR __cdecl CRTDLL_wcsncpy( LPWSTR s1, LPCWSTR s2, INT n ) { LPWSTR ret = s1; while (n-- > 0) if (!(*s1++ = *s2++)) break; while (n-- > 0) *s1++ = 0; return ret; } /********************************************************************* * CRTDLL_wcspbrk (CRTDLL.514) */ LPWSTR __cdecl CRTDLL_wcspbrk( LPCWSTR str, LPCWSTR accept ) { LPCWSTR p; while (*str) { for (p = accept; *p; p++) if (*p == *str) return (LPWSTR)str; str++; } return NULL; } /********************************************************************* * CRTDLL_wcsrchr (CRTDLL.515) */ LPWSTR __cdecl CRTDLL_wcsrchr( LPWSTR str, WCHAR ch ) { LPWSTR last = NULL; while (*str) { if (*str == ch) last = str; str++; } return last; } /********************************************************************* * CRTDLL_wcsspn (CRTDLL.516) */ INT __cdecl CRTDLL_wcsspn( LPCWSTR str, LPCWSTR accept ) { LPCWSTR start = str; while (*str) { LPCWSTR p = accept; while (*p && (*p != *str)) p++; if (!*p) break; str++; } return str - start; } /********************************************************************* * CRTDLL_wcsstr (CRTDLL.517) */ LPWSTR __cdecl CRTDLL_wcsstr( LPCWSTR str, LPCWSTR sub ) { while (*str) { LPCWSTR p1 = str, p2 = sub; while (*p1 && *p2 && *p1 == *p2) { p1++; p2++; } if (!*p2) return (LPWSTR)str; str++; } return NULL; } /********************************************************************* * CRTDLL_wcstok (CRTDLL.519) */ LPWSTR __cdecl CRTDLL_wcstok( LPWSTR str, LPCWSTR delim ) { static LPWSTR next = NULL; LPWSTR ret; if (!str) if (!(str = next)) return NULL; while (*str && CRTDLL_wcschr( delim, *str )) str++; if (!*str) return NULL; ret = str++; while (*str && !CRTDLL_wcschr( delim, *str )) str++; if (*str) *str++ = 0; next = str; return ret; } /********************************************************************* * CRTDLL_wcstombs (CRTDLL.521) * * FIXME: the reason I do not use wcstombs is that it seems to fail * for any latin-1 valid character. Not good. */ INT __cdecl CRTDLL_wcstombs( LPSTR dst, LPCWSTR src, INT n ) { int copied=0; while ((n>0) && *src) { int ret; /* FIXME: could potentially overflow if we ever have MB of 2 bytes*/ ret = wctomb(dst,(wchar_t)*src); if (ret<0) { /* FIXME: sadly, some versions of glibc do not like latin characters * as UNICODE chars for some reason (like german umlauts). Just * copy those anyway. MM 991106 */ *dst=*src; ret = 1; } dst += ret; n -= ret; copied += ret; src++; } return copied; } /********************************************************************* * CRTDLL_wctomb (CRTDLL.524) */ INT __cdecl CRTDLL_wctomb( LPSTR dst, WCHAR ch ) { return wctomb( dst, (wchar_t)ch ); } /********************************************************************* * CRTDLL_iswalnum (CRTDLL.405) */ INT __cdecl CRTDLL_iswalnum( WCHAR wc ) { #ifdef HAVE_WCTYPE_H #undef iswalnum return iswalnum(wc); #else return isalnum( LOBYTE(wc) ); /* FIXME */ #endif } /********************************************************************* * CRTDLL_iswalpha (CRTDLL.406) */ INT __cdecl CRTDLL_iswalpha( WCHAR wc ) { #ifdef HAVE_WCTYPE_H #undef iswalpha return iswalpha(wc); #else return isalpha( LOBYTE(wc) ); /* FIXME */ #endif } /********************************************************************* * CRTDLL_iswcntrl (CRTDLL.408) */ INT __cdecl CRTDLL_iswcntrl( WCHAR wc ) { #ifdef HAVE_WCTYPE_H #undef iswcntrl return iswcntrl(wc); #else return iscntrl( LOBYTE(wc) ); /* FIXME */ #endif } /********************************************************************* * CRTDLL_iswdigit (CRTDLL.410) */ INT __cdecl CRTDLL_iswdigit( WCHAR wc ) { #ifdef HAVE_WCTYPE_H #undef iswdigit return iswdigit(wc); #else return isdigit( LOBYTE(wc) ); /* FIXME */ #endif } /********************************************************************* * CRTDLL_iswgraph (CRTDLL.411) */ INT __cdecl CRTDLL_iswgraph( WCHAR wc ) { #ifdef HAVE_WCTYPE_H #undef iswgraph return iswgraph(wc); #else return isgraph( LOBYTE(wc) ); /* FIXME */ #endif } /********************************************************************* * CRTDLL_iswlower (CRTDLL.412) */ INT __cdecl CRTDLL_iswlower( WCHAR wc ) { #ifdef HAVE_WCTYPE_H #undef iswlower return iswlower(wc); #else return islower( LOBYTE(wc) ); /* FIXME */ #endif } /********************************************************************* * CRTDLL_iswprint (CRTDLL.413) */ INT __cdecl CRTDLL_iswprint( WCHAR wc ) { #ifdef HAVE_WCTYPE_H #undef iswprint return iswprint(wc); #else return isprint( LOBYTE(wc) ); /* FIXME */ #endif } /********************************************************************* * CRTDLL_iswpunct (CRTDLL.414) */ INT __cdecl CRTDLL_iswpunct( WCHAR wc ) { #ifdef HAVE_WCTYPE_H #undef iswpunct return iswpunct(wc); #else return ispunct( LOBYTE(wc) ); /* FIXME */ #endif } /********************************************************************* * CRTDLL_iswspace (CRTDLL.415) */ INT __cdecl CRTDLL_iswspace( WCHAR wc ) { #ifdef HAVE_WCTYPE_H #undef iswspace return iswspace(wc); #else return isspace( LOBYTE(wc) ); /* FIXME */ #endif } /********************************************************************* * CRTDLL_iswupper (CRTDLL.416) */ INT __cdecl CRTDLL_iswupper( WCHAR wc ) { #ifdef HAVE_WCTYPE_H #undef iswupper return iswupper(wc); #else return isupper( LOBYTE(wc) ); /* FIXME */ #endif } /********************************************************************* * CRTDLL_iswxdigit (CRTDLL.417) */ INT __cdecl CRTDLL_iswxdigit( WCHAR wc ) { #ifdef HAVE_WCTYPE_H #undef iswxdigit return iswxdigit(wc); #else return isxdigit( LOBYTE(wc) ); /* FIXME */ #endif } /********************************************************************* * CRTDLL_iswctype (CRTDLL.409) */ INT __cdecl CRTDLL_iswctype( WCHAR wc, WCHAR wct ) { INT res = 0; if (wct & 0x0001) res |= CRTDLL_iswupper(wc); if (wct & 0x0002) res |= CRTDLL_iswlower(wc); if (wct & 0x0004) res |= CRTDLL_iswdigit(wc); if (wct & 0x0008) res |= CRTDLL_iswspace(wc); if (wct & 0x0010) res |= CRTDLL_iswpunct(wc); if (wct & 0x0020) res |= CRTDLL_iswcntrl(wc); if (wct & 0x0080) res |= CRTDLL_iswxdigit(wc); if (wct & 0x0100) res |= CRTDLL_iswalpha(wc); if (wct & 0x0040) FIXME(": iswctype(%04hx,_BLANK|...) requested\n",wc); if (wct & 0x8000) FIXME(": iswctype(%04hx,_LEADBYTE|...) requested\n",wc); return res; } wine-20000526/dlls/dciman32/0040755000175000001440000000000007113604170015002 5ustar julliarduserswine-20000526/dlls/dciman32/.cvsignore0100644000175000001440000000006307045213572017004 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libdciman32.so.1.0 wine-20000526/dlls/dciman32/Makefile.in0100644000175000001440000000027207060307300017041 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = dciman32 SOVERSION = 1.0 SPEC_SRCS = dciman32.spec @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/dciman32/dciman32.spec0100644000175000001440000000112107033475133017254 0ustar julliardusersname dciman32 type win32 @ stub DCIBeginAccess @ stub DCICloseProvider @ stub DCICreateOffscreen @ stub DCICreateOverlay @ stub DCICreatePrimary @ stub DCIDestroy @ stub DCIDraw @ stub DCIEndAccess @ stub DCIEnum @ stub DCIOpenProvider @ stub DCISetClipList @ stub DCISetDestination @ stub DCISetSrcDestClip @ stub DllEntryPoint @ stub GetDCRegionData @ stub GetWindowRegionData @ stub WinWatchClose @ stub WinWatchDidStatusChange @ stub WinWatchGetClipList @ stub WinWatchNotify @ stub WinWatchOpen @ stub dcithk_ThunkData32 wine-20000526/dlls/ddraw/0040755000175000001440000000000007113604172014505 5ustar julliarduserswine-20000526/dlls/ddraw/d3ddevice/0040755000175000001440000000000007113604172016337 5ustar julliarduserswine-20000526/dlls/ddraw/d3ddevice/main.c0100644000175000001440000004510407075622771017444 0ustar julliardusers/* Direct3D Device (c) 1998 Lionel ULMER This files contains all the common stuff for D3D devices. */ #include #include "config.h" #include "windef.h" #include "winerror.h" #include "wine/obj_base.h" #include "heap.h" #include "ddraw.h" #include "d3d.h" #include "debugtools.h" #include "d3d_private.h" DEFAULT_DEBUG_CHANNEL(ddraw) /******************************************************************************* * IDirect3DDevice2 */ HRESULT WINAPI IDirect3DDevice2Impl_QueryInterface( LPDIRECT3DDEVICE2 iface, REFIID riid, LPVOID* ppvObj ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%s,%p): stub\n", This, debugstr_guid(riid),ppvObj); return S_OK; } ULONG WINAPI IDirect3DDevice2Impl_AddRef(LPDIRECT3DDEVICE2 iface) { ICOM_THIS(IDirect3DDevice2Impl,iface); TRACE("(%p)->()incrementing from %lu.\n", This, This->ref ); return ++(This->ref); } ULONG WINAPI IDirect3DDevice2Impl_Release(LPDIRECT3DDEVICE2 iface) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } /*** IDirect3DDevice2 methods ***/ HRESULT WINAPI IDirect3DDevice2Impl_GetCaps( LPDIRECT3DDEVICE2 iface, LPD3DDEVICEDESC lpdescsoft, LPD3DDEVICEDESC lpdeschard ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%p,%p), stub!\n", This, lpdescsoft, lpdeschard); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_SwapTextureHandles( LPDIRECT3DDEVICE2 iface,LPDIRECT3DTEXTURE2 lptex1,LPDIRECT3DTEXTURE2 lptex2 ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lptex1, lptex2); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_GetStats( LPDIRECT3DDEVICE2 iface, LPD3DSTATS lpstats) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%p): stub\n", This, lpstats); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_AddViewport( LPDIRECT3DDEVICE2 iface, LPDIRECT3DVIEWPORT2 lpvp ) { ICOM_THIS(IDirect3DDevice2Impl,iface); IDirect3DViewport2Impl* ilpvp=(IDirect3DViewport2Impl*)lpvp; FIXME("(%p)->(%p): stub\n", This, ilpvp); /* Adds this viewport to the viewport list */ ilpvp->next = This->viewport_list; This->viewport_list = ilpvp; return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_DeleteViewport( LPDIRECT3DDEVICE2 iface, LPDIRECT3DVIEWPORT2 lpvp) { ICOM_THIS(IDirect3DDevice2Impl,iface); IDirect3DViewport2Impl* ilpvp=(IDirect3DViewport2Impl*)lpvp; IDirect3DViewport2Impl *cur, *prev; FIXME("(%p)->(%p): stub\n", This, lpvp); /* Finds this viewport in the list */ prev = NULL; cur = This->viewport_list; while ((cur != NULL) && (cur != ilpvp)) { prev = cur; cur = cur->next; } if (cur == NULL) return DDERR_INVALIDOBJECT; /* And remove it */ if (prev == NULL) This->viewport_list = cur->next; else prev->next = cur->next; return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_NextViewport( LPDIRECT3DDEVICE2 iface, LPDIRECT3DVIEWPORT2 lpvp, LPDIRECT3DVIEWPORT2* lplpvp, DWORD dwFlags ) { ICOM_THIS(IDirect3DDevice2Impl,iface); IDirect3DViewport2Impl* ilpvp=(IDirect3DViewport2Impl*)lpvp; IDirect3DViewport2Impl** ilplpvp=(IDirect3DViewport2Impl**)lplpvp; FIXME("(%p)->(%p,%p,%08lx): stub\n", This, lpvp, lpvp, dwFlags); switch (dwFlags) { case D3DNEXT_NEXT: *ilplpvp = ilpvp->next; break; case D3DNEXT_HEAD: *ilplpvp = This->viewport_list; break; case D3DNEXT_TAIL: ilpvp = This->viewport_list; while (ilpvp->next != NULL) ilpvp = ilpvp->next; *ilplpvp = ilpvp; break; default: return DDERR_INVALIDPARAMS; } return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_EnumTextureFormats( LPDIRECT3DDEVICE2 iface, LPD3DENUMTEXTUREFORMATSCALLBACK cb, LPVOID context ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%p,%p), stub!\n", This, cb, context); return DD_OK; /* no texture formats in stub implementation */ } HRESULT WINAPI IDirect3DDevice2Impl_BeginScene(LPDIRECT3DDEVICE2 iface) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(), stub!\n", This); /* Here, we should get the DDraw surface and 'copy it' to the OpenGL surface.... */ return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_EndScene(LPDIRECT3DDEVICE2 iface) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(): stub\n", This); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_GetDirect3D( LPDIRECT3DDEVICE2 iface, LPDIRECT3D2 *lpd3d2 ) { ICOM_THIS(IDirect3DDevice2Impl,iface); TRACE("(%p)->(%p): stub\n", This, lpd3d2); *lpd3d2 = (LPDIRECT3D2)This->d3d; return DD_OK; } /*** DrawPrimitive API ***/ HRESULT WINAPI IDirect3DDevice2Impl_SetCurrentViewport( LPDIRECT3DDEVICE2 iface, LPDIRECT3DVIEWPORT2 lpvp ) { ICOM_THIS(IDirect3DDevice2Impl,iface); IDirect3DViewport2Impl* ilpvp=(IDirect3DViewport2Impl*)lpvp; FIXME("(%p)->(%p): stub\n", This, ilpvp); /* Should check if the viewport was added or not */ /* Set this viewport as the current viewport */ This->current_viewport = ilpvp; /* Activate this viewport */ ilpvp->device.active_device2 = This; ilpvp->activate(ilpvp); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_GetCurrentViewport( LPDIRECT3DDEVICE2 iface, LPDIRECT3DVIEWPORT2 *lplpvp ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%p): stub\n", This, lplpvp); /* Returns the current viewport */ *lplpvp = (LPDIRECT3DVIEWPORT2)This->current_viewport; return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_SetRenderTarget( LPDIRECT3DDEVICE2 iface, LPDIRECTDRAWSURFACE lpdds, DWORD dwFlags ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%p,%08lx): stub\n", This, lpdds, dwFlags); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_GetRenderTarget( LPDIRECT3DDEVICE2 iface, LPDIRECTDRAWSURFACE *lplpdds ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%p): stub\n", This, lplpdds); /* Returns the current rendering target (the surface on wich we render) */ *lplpdds = (LPDIRECTDRAWSURFACE)This->surface; return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_Begin( LPDIRECT3DDEVICE2 iface, D3DPRIMITIVETYPE d3dp, D3DVERTEXTYPE d3dv, DWORD dwFlags ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%d,%d,%08lx): stub\n", This, d3dp, d3dv, dwFlags); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_BeginIndexed( LPDIRECT3DDEVICE2 iface, D3DPRIMITIVETYPE d3dp, D3DVERTEXTYPE d3dv, LPVOID lpvert, DWORD numvert, DWORD dwFlags ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%d,%d,%p,%ld,%08lx): stub\n", This, d3dp, d3dv, lpvert, numvert, dwFlags); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_Vertex( LPDIRECT3DDEVICE2 iface,LPVOID lpvert ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%p): stub\n", This, lpvert); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_Index(LPDIRECT3DDEVICE2 iface, WORD index) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%d): stub\n", This, index); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_End(LPDIRECT3DDEVICE2 iface,DWORD dwFlags) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%08lx): stub\n", This, dwFlags); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_GetRenderState( LPDIRECT3DDEVICE2 iface, D3DRENDERSTATETYPE d3drs, LPDWORD lprstate ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%d,%p): stub\n", This, d3drs, lprstate); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_SetRenderState( LPDIRECT3DDEVICE2 iface, D3DRENDERSTATETYPE dwRenderStateType, DWORD dwRenderState ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%d,%ld)\n", This, dwRenderStateType, dwRenderState); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_GetLightState( LPDIRECT3DDEVICE2 iface, D3DLIGHTSTATETYPE d3dls, LPDWORD lplstate ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%d,%p): stub\n", This, d3dls, lplstate); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_SetLightState( LPDIRECT3DDEVICE2 iface, D3DLIGHTSTATETYPE dwLightStateType, DWORD dwLightState ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%d,%08lx): stub\n", This, dwLightStateType, dwLightState); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_SetTransform( LPDIRECT3DDEVICE2 iface, D3DTRANSFORMSTATETYPE d3dts, LPD3DMATRIX lpmatrix ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%d,%p),stub!\n",This,d3dts,lpmatrix); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_GetTransform( LPDIRECT3DDEVICE2 iface, D3DTRANSFORMSTATETYPE d3dts, LPD3DMATRIX lpmatrix ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%d,%p): stub\n", This, d3dts, lpmatrix); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_MultiplyTransform( LPDIRECT3DDEVICE2 iface, D3DTRANSFORMSTATETYPE d3dts, LPD3DMATRIX lpmatrix ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%d,%p): stub\n", This, d3dts, lpmatrix); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_DrawPrimitive( LPDIRECT3DDEVICE2 iface, D3DPRIMITIVETYPE d3dp, D3DVERTEXTYPE d3dv, LPVOID lpvertex, DWORD vertcount, DWORD dwFlags ) { ICOM_THIS(IDirect3DDevice2Impl,iface); TRACE("(%p)->(%d,%d,%p,%ld,%08lx): stub\n", This, d3dp, d3dv, lpvertex, vertcount, dwFlags); return D3D_OK; } HRESULT WINAPI IDirect3DDevice2Impl_DrawIndexedPrimitive( LPDIRECT3DDEVICE2 iface, D3DPRIMITIVETYPE d3dp, D3DVERTEXTYPE d3dv, LPVOID lpvertex, DWORD vertcount, LPWORD lpindexes, DWORD indexcount, DWORD dwFlags ) { ICOM_THIS(IDirect3DDevice2Impl,iface); TRACE("(%p)->(%d,%d,%p,%ld,%p,%ld,%08lx): stub\n", This, d3dp, d3dv, lpvertex, vertcount, lpindexes, indexcount, dwFlags); return D3D_OK; } HRESULT WINAPI IDirect3DDevice2Impl_SetClipStatus( LPDIRECT3DDEVICE2 iface, LPD3DCLIPSTATUS lpcs ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%p): stub\n", This, lpcs); return DD_OK; } HRESULT WINAPI IDirect3DDevice2Impl_GetClipStatus( LPDIRECT3DDEVICE2 iface, LPD3DCLIPSTATUS lpcs ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%p): stub\n", This, lpcs); return DD_OK; } /******************************************************************************* * Direct3DDevice */ HRESULT WINAPI IDirect3DDeviceImpl_QueryInterface( LPDIRECT3DDEVICE iface, REFIID riid, LPVOID* ppvObj ) { ICOM_THIS(IDirect3DDeviceImpl,iface); FIXME("(%p)->(%s,%p): stub\n", This, debugstr_guid(riid),ppvObj); return S_OK; } ULONG WINAPI IDirect3DDeviceImpl_AddRef(LPDIRECT3DDEVICE iface) { ICOM_THIS(IDirect3DDeviceImpl,iface); TRACE("(%p)->()incrementing from %lu.\n", This, This->ref ); return ++(This->ref); } ULONG WINAPI IDirect3DDeviceImpl_Release(LPDIRECT3DDEVICE iface) { ICOM_THIS(IDirect3DDeviceImpl,iface); FIXME("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } HRESULT WINAPI IDirect3DDeviceImpl_Initialize( LPDIRECT3DDEVICE iface, LPDIRECT3D lpd3d, LPGUID lpGUID, LPD3DDEVICEDESC lpd3ddvdesc ) { ICOM_THIS(IDirect3DDeviceImpl,iface); TRACE("(%p)->(%p,%p,%p): stub\n", This, lpd3d,lpGUID, lpd3ddvdesc); return DDERR_ALREADYINITIALIZED; } HRESULT WINAPI IDirect3DDeviceImpl_GetCaps( LPDIRECT3DDEVICE iface, LPD3DDEVICEDESC lpD3DHWDevDesc, LPD3DDEVICEDESC lpD3DSWDevDesc ) { ICOM_THIS(IDirect3DDeviceImpl,iface); TRACE("(%p)->(%p,%p): stub\n", This, lpD3DHWDevDesc, lpD3DSWDevDesc); return DD_OK; } HRESULT WINAPI IDirect3DDeviceImpl_SwapTextureHandles( LPDIRECT3DDEVICE iface, LPDIRECT3DTEXTURE lpD3DTex1, LPDIRECT3DTEXTURE lpD3DTex2 ) { ICOM_THIS(IDirect3DDeviceImpl,iface); TRACE("(%p)->(%p,%p): stub\n", This, lpD3DTex1, lpD3DTex2); return DD_OK; } HRESULT WINAPI IDirect3DDeviceImpl_CreateExecuteBuffer( LPDIRECT3DDEVICE iface, LPD3DEXECUTEBUFFERDESC lpDesc, LPDIRECT3DEXECUTEBUFFER *lplpDirect3DExecuteBuffer, IUnknown *pUnkOuter ) { ICOM_THIS(IDirect3DDeviceImpl,iface); FIXME("(%p)->(%p,%p,%p): stub\n", This, lpDesc, lplpDirect3DExecuteBuffer, pUnkOuter); return DD_OK; } HRESULT WINAPI IDirect3DDeviceImpl_GetStats( LPDIRECT3DDEVICE iface, LPD3DSTATS lpD3DStats ) { ICOM_THIS(IDirect3DDeviceImpl,iface); TRACE("(%p)->(%p): stub\n", This, lpD3DStats); return DD_OK; } HRESULT WINAPI IDirect3DDeviceImpl_Execute( LPDIRECT3DDEVICE iface, LPDIRECT3DEXECUTEBUFFER lpDirect3DExecuteBuffer, LPDIRECT3DVIEWPORT lpDirect3DViewport, DWORD dwFlags ) { ICOM_THIS(IDirect3DDeviceImpl,iface); TRACE("(%p)->(%p,%p,%08ld): stub\n", This, lpDirect3DExecuteBuffer, lpDirect3DViewport, dwFlags); /* Put this as the default context */ /* Execute... */ ((IDirect3DExecuteBufferImpl*)lpDirect3DExecuteBuffer)->execute(lpDirect3DExecuteBuffer, iface, lpDirect3DViewport); return DD_OK; } HRESULT WINAPI IDirect3DDeviceImpl_AddViewport( LPDIRECT3DDEVICE iface, LPDIRECT3DVIEWPORT lpvp ) { ICOM_THIS(IDirect3DDeviceImpl,iface); IDirect3DViewport2Impl* ilpvp=(IDirect3DViewport2Impl*)lpvp; FIXME("(%p)->(%p): stub\n", This, ilpvp); /* Adds this viewport to the viewport list */ ilpvp->next = This->viewport_list; This->viewport_list = ilpvp; return DD_OK; } HRESULT WINAPI IDirect3DDeviceImpl_DeleteViewport( LPDIRECT3DDEVICE iface, LPDIRECT3DVIEWPORT lpvp ) { ICOM_THIS(IDirect3DDeviceImpl,iface); IDirect3DViewport2Impl* ilpvp=(IDirect3DViewport2Impl*)lpvp; IDirect3DViewport2Impl *cur, *prev; FIXME("(%p)->(%p): stub\n", This, lpvp); /* Finds this viewport in the list */ prev = NULL; cur = This->viewport_list; while ((cur != NULL) && (cur != ilpvp)) { prev = cur; cur = cur->next; } if (cur == NULL) return DDERR_INVALIDOBJECT; /* And remove it */ if (prev == NULL) This->viewport_list = cur->next; else prev->next = cur->next; return DD_OK; } HRESULT WINAPI IDirect3DDeviceImpl_NextViewport( LPDIRECT3DDEVICE iface, LPDIRECT3DVIEWPORT lpvp, LPDIRECT3DVIEWPORT* lplpvp, DWORD dwFlags ) { ICOM_THIS(IDirect3DDeviceImpl,iface); IDirect3DViewport2Impl* ilpvp=(IDirect3DViewport2Impl*)lpvp; IDirect3DViewport2Impl** ilplpvp=(IDirect3DViewport2Impl**)lplpvp; FIXME("(%p)->(%p,%p,%08lx): stub\n", This, ilpvp, ilplpvp, dwFlags); switch (dwFlags) { case D3DNEXT_NEXT: *ilplpvp = ilpvp->next; break; case D3DNEXT_HEAD: *ilplpvp = This->viewport_list; break; case D3DNEXT_TAIL: ilpvp = This->viewport_list; while (ilpvp->next != NULL) ilpvp = ilpvp->next; *ilplpvp = ilpvp; break; default: return DDERR_INVALIDPARAMS; } return DD_OK; } HRESULT WINAPI IDirect3DDeviceImpl_Pick( LPDIRECT3DDEVICE iface, LPDIRECT3DEXECUTEBUFFER lpDirect3DExecuteBuffer, LPDIRECT3DVIEWPORT lpDirect3DViewport, DWORD dwFlags, LPD3DRECT lpRect ) { ICOM_THIS(IDirect3DDeviceImpl,iface); TRACE("(%p)->(%p,%p,%08lx,%p): stub\n", This, lpDirect3DExecuteBuffer, lpDirect3DViewport, dwFlags, lpRect); return DD_OK; } HRESULT WINAPI IDirect3DDeviceImpl_GetPickRecords( LPDIRECT3DDEVICE iface, LPDWORD lpCount, LPD3DPICKRECORD lpD3DPickRec ) { ICOM_THIS(IDirect3DDeviceImpl,iface); TRACE("(%p)->(%p,%p): stub\n", This, lpCount, lpD3DPickRec); return DD_OK; } HRESULT WINAPI IDirect3DDeviceImpl_EnumTextureFormats( LPDIRECT3DDEVICE iface,LPD3DENUMTEXTUREFORMATSCALLBACK lpd3dEnumTextureProc, LPVOID lpArg ) { ICOM_THIS(IDirect3DDeviceImpl,iface); TRACE("(%p)->(%p,%p): stub\n", This, lpd3dEnumTextureProc, lpArg); return D3D_OK; } HRESULT WINAPI IDirect3DDeviceImpl_CreateMatrix( LPDIRECT3DDEVICE iface, LPD3DMATRIXHANDLE lpD3DMatHandle ) { ICOM_THIS(IDirect3DDeviceImpl,iface); TRACE("(%p)->(%p)\n", This, lpD3DMatHandle); *lpD3DMatHandle = (D3DMATRIXHANDLE) HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(D3DMATRIX)); return DD_OK; } HRESULT WINAPI IDirect3DDeviceImpl_SetMatrix( LPDIRECT3DDEVICE iface, D3DMATRIXHANDLE d3dMatHandle, const LPD3DMATRIX lpD3DMatrix) { ICOM_THIS(IDirect3DDeviceImpl,iface); TRACE("(%p)->(%08lx,%p)\n", This, d3dMatHandle, lpD3DMatrix); dump_mat(lpD3DMatrix); *((D3DMATRIX *) d3dMatHandle) = *lpD3DMatrix; return DD_OK; } HRESULT WINAPI IDirect3DDeviceImpl_GetMatrix( LPDIRECT3DDEVICE iface,D3DMATRIXHANDLE D3DMatHandle,LPD3DMATRIX lpD3DMatrix ) { ICOM_THIS(IDirect3DDeviceImpl,iface); TRACE("(%p)->(%08lx,%p)\n", This, D3DMatHandle, lpD3DMatrix); *lpD3DMatrix = *((D3DMATRIX *) D3DMatHandle); return DD_OK; } HRESULT WINAPI IDirect3DDeviceImpl_DeleteMatrix( LPDIRECT3DDEVICE iface, D3DMATRIXHANDLE d3dMatHandle ) { ICOM_THIS(IDirect3DDeviceImpl,iface); TRACE("(%p)->(%08lx)\n", This, d3dMatHandle); HeapFree(GetProcessHeap(),0, (void *) d3dMatHandle); return DD_OK; } HRESULT WINAPI IDirect3DDeviceImpl_BeginScene(LPDIRECT3DDEVICE iface) { ICOM_THIS(IDirect3DDeviceImpl,iface); FIXME("(%p)->(): stub\n", This); return DD_OK; } /* This is for the moment copy-pasted from IDirect3DDevice2... Will make a common function ... */ HRESULT WINAPI IDirect3DDeviceImpl_EndScene(LPDIRECT3DDEVICE iface) { ICOM_THIS(IDirect3DDeviceImpl,iface); FIXME("(%p)->(): stub\n", This); return DD_OK; } HRESULT WINAPI IDirect3DDeviceImpl_GetDirect3D( LPDIRECT3DDEVICE iface, LPDIRECT3D *lpDirect3D ) { ICOM_THIS(IDirect3DDeviceImpl,iface); TRACE("(%p)->(%p): stub\n", This, lpDirect3D); return DD_OK; } /******************************************************************************* * Direct3DDevice VTable */ static ICOM_VTABLE(IDirect3DDevice) WINE_UNUSED d3d_d3ddevice_vtbl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirect3DDeviceImpl_QueryInterface, IDirect3DDeviceImpl_AddRef, IDirect3DDeviceImpl_Release, IDirect3DDeviceImpl_Initialize, IDirect3DDeviceImpl_GetCaps, IDirect3DDeviceImpl_SwapTextureHandles, IDirect3DDeviceImpl_CreateExecuteBuffer, IDirect3DDeviceImpl_GetStats, IDirect3DDeviceImpl_Execute, IDirect3DDeviceImpl_AddViewport, IDirect3DDeviceImpl_DeleteViewport, IDirect3DDeviceImpl_NextViewport, IDirect3DDeviceImpl_Pick, IDirect3DDeviceImpl_GetPickRecords, IDirect3DDeviceImpl_EnumTextureFormats, IDirect3DDeviceImpl_CreateMatrix, IDirect3DDeviceImpl_SetMatrix, IDirect3DDeviceImpl_GetMatrix, IDirect3DDeviceImpl_DeleteMatrix, IDirect3DDeviceImpl_BeginScene, IDirect3DDeviceImpl_EndScene, IDirect3DDeviceImpl_GetDirect3D, }; wine-20000526/dlls/ddraw/d3ddevice/mesa.c0100644000175000001440000010224207074355355017442 0ustar julliardusers/* Direct3D Device (c) 1998 Lionel ULMER This files contains the MESA implementation of all the D3D devices that Wine supports. */ #include #include "config.h" #include "windef.h" #include "winerror.h" #include "wine/obj_base.h" #include "heap.h" #include "ddraw.h" #include "d3d.h" #include "debugtools.h" #include "mesa_private.h" DEFAULT_DEBUG_CHANNEL(ddraw) ICOM_VTABLE(IDirect3DDevice2) OpenGL_vtable; ICOM_VTABLE(IDirect3DDevice) OpenGL_vtable_dx3; /* Define this variable if you have an unpatched Mesa 3.0 (patches are available on Mesa's home page) or version 3.1b. Version 3.1b2 should correct this bug */ #undef HAVE_BUGGY_MESAGL #define D3DDPRIVATE(x) mesa_d3dd_private *odev=((mesa_d3dd_private*)x->private) #define DDPRIVATE(x) x11_dd_private *ddpriv=((x11_dd_private*)(x)->private) /******************************************************************************* * OpenGL static functions */ static void set_context(IDirect3DDevice2Impl* This) { D3DDPRIVATE(This); DDPRIVATE(This->surface->s.ddraw); #ifdef USE_OSMESA OSMesaMakeCurrent(d3ddpriv->ctx, odev->buffer, GL_UNSIGNED_BYTE, This->surface->s.surface_desc.dwWidth, This->surface->s.surface_desc.dwHeight); #else if (glXMakeCurrent(display,ddpriv->drawable, odev->ctx) == False) { ERR("Error in setting current context (context %p drawable %ld)!\n", odev->ctx, ddpriv->drawable); } #endif } static void fill_opengl_primcaps(D3DPRIMCAPS *pc) { pc->dwSize = sizeof(*pc); pc->dwMiscCaps = D3DPMISCCAPS_CONFORMANT | D3DPMISCCAPS_CULLCCW | D3DPMISCCAPS_CULLCW | D3DPMISCCAPS_LINEPATTERNREP | D3DPMISCCAPS_MASKZ; pc->dwRasterCaps = D3DPRASTERCAPS_DITHER | D3DPRASTERCAPS_FOGRANGE | D3DPRASTERCAPS_FOGTABLE | D3DPRASTERCAPS_FOGVERTEX | D3DPRASTERCAPS_STIPPLE | D3DPRASTERCAPS_ZBIAS | D3DPRASTERCAPS_ZTEST; pc->dwZCmpCaps = 0xFFFFFFFF; /* All Z test can be done */ pc->dwSrcBlendCaps = 0xFFFFFFFF; /* FIXME: need REAL values */ pc->dwDestBlendCaps = 0xFFFFFFFF; /* FIXME: need REAL values */ pc->dwAlphaCmpCaps = 0xFFFFFFFF; /* FIXME: need REAL values */ pc->dwShadeCaps = 0xFFFFFFFF; /* FIXME: need REAL values */ pc->dwTextureCaps = D3DPTEXTURECAPS_ALPHA | D3DPTEXTURECAPS_BORDER | D3DPTEXTURECAPS_PERSPECTIVE | D3DPTEXTURECAPS_POW2 | D3DPTEXTURECAPS_TRANSPARENCY; pc->dwTextureFilterCaps = D3DPTFILTERCAPS_LINEAR | D3DPTFILTERCAPS_LINEARMIPLINEAR | D3DPTFILTERCAPS_LINEARMIPNEAREST | D3DPTFILTERCAPS_MIPLINEAR | D3DPTFILTERCAPS_MIPNEAREST | D3DPTFILTERCAPS_NEAREST; pc->dwTextureBlendCaps = 0xFFFFFFFF; /* FIXME: need REAL values */ pc->dwTextureAddressCaps = D3DPTADDRESSCAPS_BORDER | D3DPTADDRESSCAPS_CLAMP | D3DPTADDRESSCAPS_WRAP; pc->dwStippleWidth = 32; pc->dwStippleHeight = 32; } static void fill_opengl_caps(D3DDEVICEDESC *d1, D3DDEVICEDESC *d2) { /* GLint maxlight; */ d1->dwSize = sizeof(*d1); d1->dwFlags = D3DDD_DEVCAPS | D3DDD_BCLIPPING | D3DDD_COLORMODEL | D3DDD_DEVICERENDERBITDEPTH | D3DDD_DEVICEZBUFFERBITDEPTH | D3DDD_LIGHTINGCAPS | D3DDD_LINECAPS | D3DDD_MAXBUFFERSIZE | D3DDD_MAXVERTEXCOUNT | D3DDD_TRANSFORMCAPS | D3DDD_TRICAPS; d1->dcmColorModel = D3DCOLOR_RGB; d1->dwDevCaps = D3DDEVCAPS_CANRENDERAFTERFLIP | D3DDEVCAPS_DRAWPRIMTLVERTEX | D3DDEVCAPS_EXECUTESYSTEMMEMORY | D3DDEVCAPS_EXECUTEVIDEOMEMORY | D3DDEVCAPS_FLOATTLVERTEX | D3DDEVCAPS_TEXTURENONLOCALVIDMEM | D3DDEVCAPS_TEXTURESYSTEMMEMORY | D3DDEVCAPS_TEXTUREVIDEOMEMORY | D3DDEVCAPS_TLVERTEXSYSTEMMEMORY | D3DDEVCAPS_TLVERTEXVIDEOMEMORY; d1->dtcTransformCaps.dwSize = sizeof(D3DTRANSFORMCAPS); d1->dtcTransformCaps.dwCaps = D3DTRANSFORMCAPS_CLIP; d1->bClipping = TRUE; d1->dlcLightingCaps.dwSize = sizeof(D3DLIGHTINGCAPS); d1->dlcLightingCaps.dwCaps = D3DLIGHTCAPS_DIRECTIONAL | D3DLIGHTCAPS_PARALLELPOINT | D3DLIGHTCAPS_POINT | D3DLIGHTCAPS_SPOT; d1->dlcLightingCaps.dwLightingModel = D3DLIGHTINGMODEL_RGB; d1->dlcLightingCaps.dwNumLights = 16; /* glGetIntegerv(GL_MAX_LIGHTS, &maxlight); d1->dlcLightingCaps.dwNumLights = maxlight; */ fill_opengl_primcaps(&(d1->dpcLineCaps)); fill_opengl_primcaps(&(d1->dpcTriCaps)); d1->dwDeviceRenderBitDepth = DDBD_16; d1->dwDeviceZBufferBitDepth = DDBD_16; d1->dwMaxBufferSize = 0; d1->dwMaxVertexCount = 65536; d1->dwMinTextureWidth = 1; d1->dwMinTextureHeight = 1; d1->dwMaxTextureWidth = 256; /* This is for Mesa on top of Glide (in the future :-) ) */ d1->dwMaxTextureHeight = 256; /* This is for Mesa on top of Glide (in the future :-) ) */ d1->dwMinStippleWidth = 1; d1->dwMinStippleHeight = 1; d1->dwMaxStippleWidth = 32; d1->dwMaxStippleHeight = 32; d2->dwSize = sizeof(*d2); d2->dwFlags = 0; } int d3d_OpenGL(LPD3DENUMDEVICESCALLBACK cb, LPVOID context) { D3DDEVICEDESC d1,d2; TRACE(" Enumerating OpenGL D3D device.\n"); fill_opengl_caps(&d1, &d2); return cb((void*)&IID_D3DDEVICE2_OpenGL,"WINE Direct3D using OpenGL","direct3d",&d1,&d2,context); } int is_OpenGL( REFCLSID rguid, IDirectDrawSurfaceImpl* surface, IDirect3DDevice2Impl** device, IDirect3D2Impl* d3d ) { mesa_d3dd_private *odev = NULL; if (/* Default device */ (rguid == NULL) || /* HAL Device */ (!memcmp(&IID_IDirect3DHALDevice,rguid,sizeof(IID_IDirect3DHALDevice))) || /* OpenGL Device */ (!memcmp(&IID_D3DDEVICE2_OpenGL,rguid,sizeof(IID_D3DDEVICE2_OpenGL)))) { const float id_mat[16] = { 1.0, 0.0, 0.0, 0.0, 0.0, 1.0, 0.0, 0.0, 0.0, 0.0, 1.0, 0.0, 0.0, 0.0, 0.0, 1.0 }; #ifndef USE_OSMESA int attributeList[]={ GLX_RGBA, GLX_DEPTH_SIZE, 16, GLX_DOUBLEBUFFER, None }; XVisualInfo *xvis; #endif *device = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirect3DDevice2Impl)); (*device)->private = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(mesa_d3dd_private)); odev = (mesa_d3dd_private*)(*device)->private; (*device)->ref = 1; ICOM_VTBL(*device) = &OpenGL_vtable; (*device)->d3d = d3d; (*device)->surface = surface; (*device)->viewport_list = NULL; (*device)->current_viewport = NULL; (*device)->set_context = set_context; TRACE("Creating OpenGL device for surface %p\n", surface); /* Create the OpenGL context */ #ifdef USE_OSMESA odev->ctx = OSMesaCreateContext(OSMESA_RGBA, NULL); odev->buffer = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY, surface->s.surface_desc.dwWidth * surface->s.surface_desc.dwHeight * 4); #else /* First get the correct visual */ /* if (surface->s.backbuffer == NULL) attributeList[3] = None; */ ENTER_GL(); xvis = glXChooseVisual(display, DefaultScreen(display), attributeList); if (xvis == NULL) ERR("No visual found !\n"); else TRACE("Visual found\n"); /* Create the context */ odev->ctx = glXCreateContext(display, xvis, NULL, GL_TRUE); if (odev->ctx == NULL) ERR("Error in context creation !\n"); else TRACE("Context created (%p)\n", odev->ctx); #if 0 /* not functional currently */ /* Now override the surface's Flip method (if in double buffering) */ surface->s.d3d_device = (void *) odev; { int i; struct _surface_chain *chain = surface->s.chain; for (i=0;inrofsurfaces;i++) if (chain->surfaces[i]->s.surface_desc.ddsCaps.dwCaps & DDSCAPS_FLIP) chain->surfaces[i]->s.d3d_device = (void *) odev; } #endif #endif odev->rs.src = GL_ONE; odev->rs.dst = GL_ZERO; odev->rs.mag = GL_NEAREST; odev->rs.min = GL_NEAREST; odev->vt = 0; memcpy(odev->world_mat, id_mat, 16 * sizeof(float)); memcpy(odev->view_mat , id_mat, 16 * sizeof(float)); memcpy(odev->proj_mat , id_mat, 16 * sizeof(float)); /* Initialisation */ TRACE("Setting current context\n"); (*device)->set_context(*device); TRACE("Current context set\n"); glClearColor(0.0, 0.0, 0.0, 0.0); glColor3f(1.0, 1.0, 1.0); LEAVE_GL(); TRACE("OpenGL device created \n"); return 1; } FIXME("bad IID %s\n",debugstr_guid(rguid)); /* This is not the OpenGL UID */ return 0; } /******************************************************************************* * MESA IDirect3DDevice2 */ static ULONG WINAPI MESA_IDirect3DDevice2Impl_Release(LPDIRECT3DDEVICE2 iface) { ICOM_THIS(IDirect3DDevice2Impl,iface); D3DDPRIVATE(This); FIXME("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { #ifdef USE_OSMESA OSMesaDestroyContext(odev->ctx); #else ENTER_GL(); glXDestroyContext(display, odev->ctx); LEAVE_GL(); #endif This->private = NULL; HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } /*** IDirect3DDevice2 methods ***/ static HRESULT WINAPI MESA_IDirect3DDevice2Impl_GetCaps( LPDIRECT3DDEVICE2 iface, LPD3DDEVICEDESC lpdescsoft, LPD3DDEVICEDESC lpdeschard ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lpdescsoft, lpdeschard); fill_opengl_caps(lpdescsoft, lpdeschard); return DD_OK; } static HRESULT enum_texture_format_OpenGL(LPD3DENUMTEXTUREFORMATSCALLBACK cb, LPVOID context) { DDSURFACEDESC sdesc; LPDDPIXELFORMAT pformat; /* Do the texture enumeration */ sdesc.dwSize = sizeof(DDSURFACEDESC); sdesc.dwFlags = DDSD_PIXELFORMAT | DDSD_CAPS; sdesc.ddsCaps.dwCaps = DDSCAPS_TEXTURE; pformat = &(sdesc.ddpfPixelFormat); pformat->dwSize = sizeof(DDPIXELFORMAT); pformat->dwFourCC = 0; TRACE("Enumerating GL_RGBA unpacked (32)\n"); pformat->dwFlags = DDPF_RGB | DDPF_ALPHAPIXELS; pformat->u.dwRGBBitCount = 32; pformat->u1.dwRBitMask = 0xFF000000; pformat->u2.dwGBitMask = 0x00FF0000; pformat->u3.dwBBitMask = 0x0000FF00; pformat->u4.dwRGBAlphaBitMask = 0x000000FF; if (cb(&sdesc, context) == 0) return DD_OK; TRACE("Enumerating GL_RGB unpacked (24)\n"); pformat->dwFlags = DDPF_RGB; pformat->u.dwRGBBitCount = 24; pformat->u1.dwRBitMask = 0x00FF0000; pformat->u2.dwGBitMask = 0x0000FF00; pformat->u3.dwBBitMask = 0x000000FF; pformat->u4.dwRGBAlphaBitMask = 0x00000000; if (cb(&sdesc, context) == 0) return DD_OK; #ifndef HAVE_BUGGY_MESAGL /* The packed texture format are buggy in Mesa. The bug was reported and corrected, so that future version will work great. */ TRACE("Enumerating GL_RGB packed GL_UNSIGNED_SHORT_5_6_5 (16)\n"); pformat->dwFlags = DDPF_RGB; pformat->u.dwRGBBitCount = 16; pformat->u1.dwRBitMask = 0x0000F800; pformat->u2.dwGBitMask = 0x000007E0; pformat->u3.dwBBitMask = 0x0000001F; pformat->u4.dwRGBAlphaBitMask = 0x00000000; if (cb(&sdesc, context) == 0) return DD_OK; TRACE("Enumerating GL_RGBA packed GL_UNSIGNED_SHORT_5_5_5_1 (16)\n"); pformat->dwFlags = DDPF_RGB | DDPF_ALPHAPIXELS; pformat->u.dwRGBBitCount = 16; pformat->u1.dwRBitMask = 0x0000F800; pformat->u2.dwGBitMask = 0x000007C0; pformat->u3.dwBBitMask = 0x0000003E; pformat->u4.dwRGBAlphaBitMask = 0x00000001; if (cb(&sdesc, context) == 0) return DD_OK; TRACE("Enumerating GL_RGBA packed GL_UNSIGNED_SHORT_4_4_4_4 (16)\n"); pformat->dwFlags = DDPF_RGB | DDPF_ALPHAPIXELS; pformat->u.dwRGBBitCount = 16; pformat->u1.dwRBitMask = 0x0000F000; pformat->u2.dwGBitMask = 0x00000F00; pformat->u3.dwBBitMask = 0x000000F0; pformat->u4.dwRGBAlphaBitMask = 0x0000000F; if (cb(&sdesc, context) == 0) return DD_OK; TRACE("Enumerating GL_RGB packed GL_UNSIGNED_BYTE_3_3_2 (8)\n"); pformat->dwFlags = DDPF_RGB; pformat->u.dwRGBBitCount = 8; pformat->u1.dwRBitMask = 0x0000F800; pformat->u2.dwGBitMask = 0x000007C0; pformat->u3.dwBBitMask = 0x0000003E; pformat->u4.dwRGBAlphaBitMask = 0x00000001; if (cb(&sdesc, context) == 0) return DD_OK; #endif #if defined(HAVE_GL_COLOR_TABLE) && defined(HAVE_GL_PALETTED_TEXTURE) TRACE("Enumerating Paletted (8)\n"); pformat->dwFlags = DDPF_PALETTEINDEXED8; pformat->u.dwRGBBitCount = 8; pformat->u1.dwRBitMask = 0x00000000; pformat->u2.dwGBitMask = 0x00000000; pformat->u3.dwBBitMask = 0x00000000; pformat->u4.dwRGBAlphaBitMask = 0x00000000; if (cb(&sdesc, context) == 0) return DD_OK; #endif TRACE("End of enumeration\n"); return DD_OK; } static HRESULT WINAPI MESA_IDirect3DDevice2Impl_EnumTextureFormats( LPDIRECT3DDEVICE2 iface, LPD3DENUMTEXTUREFORMATSCALLBACK cb, LPVOID context ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%p,%p): stub\n", This, cb, context); return enum_texture_format_OpenGL(cb, context); } static HRESULT WINAPI MESA_IDirect3DDevice2Impl_BeginScene( LPDIRECT3DDEVICE2 iface ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(): stub\n", This); /* Here, we should get the DDraw surface and 'copy it' to the OpenGL surface.... */ return DD_OK; } HRESULT WINAPI MESA_IDirect3DDevice2Impl_EndScene(LPDIRECT3DDEVICE2 iface) { ICOM_THIS(IDirect3DDevice2Impl,iface); #ifdef USE_OSMESA D3DPRIVATE(This); LPDIRECTDRAWSURFACE3 surf = (LPDIRECTDRAWSURFACE3) This->surface; DDSURFACEDESC sdesc; int x,y; unsigned char *src; unsigned short *dest; #endif FIXME("(%p)->(): stub\n", This); #ifdef USE_OSMESA /* Here we copy back the OpenGL scene to the the DDraw surface */ /* First, lock the surface */ IDirectDrawSurface3_Lock(surf,NULL,&sdesc,DDLOCK_WRITEONLY,0); /* The copy the OpenGL buffer to this surface */ /* NOTE : this is only for debugging purpose. I KNOW it is really unoptimal. I am currently working on a set of patches for Mesa to have OSMesa support 16 bpp surfaces => we will able to render directly onto the surface, no need to do a bpp conversion */ dest = (unsigned short *) sdesc.y.lpSurface; src = ((unsigned char *) odev->buffer) + 4 * (sdesc.dwWidth * (sdesc.dwHeight - 1)); for (y = 0; y < sdesc.dwHeight; y++) { unsigned char *lsrc = src; for (x = 0; x < sdesc.dwWidth ; x++) { unsigned char r = *lsrc++; unsigned char g = *lsrc++; unsigned char b = *lsrc++; lsrc++; /* Alpha */ *dest = ((r >> 3) << 11) | ((g >> 2) << 5) | (b >> 3); dest++; } src -= 4 * sdesc.dwWidth; } /* Unlock the surface */ IDirectDrawSurface3_Unlock(surf,sdesc.y.lpSurface); #else /* No need to do anything here... */ #endif return DD_OK; } static HRESULT WINAPI MESA_IDirect3DDevice2Impl_SetRenderState( LPDIRECT3DDEVICE2 iface, D3DRENDERSTATETYPE dwRenderStateType, DWORD dwRenderState ) { ICOM_THIS(IDirect3DDevice2Impl,iface); D3DDPRIVATE(This); TRACE("(%p)->(%d,%ld)\n", This, dwRenderStateType, dwRenderState); /* Call the render state functions */ set_render_state(dwRenderStateType, dwRenderState, &(odev->rs)); return DD_OK; } static HRESULT WINAPI MESA_IDirect3DDevice2Impl_SetLightState( LPDIRECT3DDEVICE2 iface, D3DLIGHTSTATETYPE dwLightStateType, DWORD dwLightState ) { ICOM_THIS(IDirect3DDevice2Impl,iface); FIXME("(%p)->(%d,%08lx): stub\n", This, dwLightStateType, dwLightState); switch (dwLightStateType) { case D3DLIGHTSTATE_MATERIAL: { /* 1 */ IDirect3DMaterial2Impl* mat = (IDirect3DMaterial2Impl*) dwLightState; if (mat != NULL) { ENTER_GL(); mat->activate(mat); LEAVE_GL(); } else { TRACE("Zoups !!!\n"); } } break; case D3DLIGHTSTATE_AMBIENT: { /* 2 */ float light[4]; light[0] = ((dwLightState >> 16) & 0xFF) / 255.0; light[1] = ((dwLightState >> 8) & 0xFF) / 255.0; light[2] = ((dwLightState >> 0) & 0xFF) / 255.0; light[3] = 1.0; ENTER_GL(); glLightModelfv(GL_LIGHT_MODEL_AMBIENT, (float *) light); LEAVE_GL(); } break; #define UNSUP(x) case D3DLIGHTSTATE_##x: FIXME("unsupported D3DLIGHTSTATE_" #x "!\n");break; UNSUP(COLORMODEL); UNSUP(FOGMODE); UNSUP(FOGSTART); UNSUP(FOGEND); UNSUP(FOGDENSITY); #undef UNSUP default: TRACE("Unexpected Light State Type\n"); return DDERR_INVALIDPARAMS; } return DD_OK; } static HRESULT WINAPI MESA_IDirect3DDevice2Impl_SetTransform( LPDIRECT3DDEVICE2 iface, D3DTRANSFORMSTATETYPE d3dts, LPD3DMATRIX lpmatrix ) { ICOM_THIS(IDirect3DDevice2Impl,iface); D3DDPRIVATE(This); FIXME("(%p)->(%d,%p): stub\n", This, d3dts, lpmatrix); ENTER_GL(); /* Using a trial and failure approach, I found that the order of Direct3D transformations that works best is : ScreenCoord = ProjectionMat * ViewMat * WorldMat * ObjectCoord As OpenGL uses only two matrices, I combined PROJECTION and VIEW into OpenGL's GL_PROJECTION matrix and the WORLD into GL_MODELVIEW. If anyone has a good explanation of the three different matrices in the SDK online documentation, feel free to point it to me. For example, which matrices transform lights ? In OpenGL only the PROJECTION matrix transform the lights, not the MODELVIEW. Using the matrix names, I supposed that PROJECTION and VIEW (all 'camera' related names) do transform lights, but WORLD do not. It may be wrong though... */ /* After reading through both OpenGL and Direct3D documentations, I thought that D3D matrices were written in 'line major mode' transposed from OpenGL's 'column major mode'. But I found out that a simple memcpy works fine to transfer one matrix format to the other (it did not work when transposing).... So : 1) are the documentations wrong 2) does the matrix work even if they are not read correctly 3) is Mesa's implementation of OpenGL not compliant regarding Matrix loading using glLoadMatrix ? Anyway, I always use 'conv_mat' to transfer the matrices from one format to the other so that if I ever find out that I need to transpose them, I will able to do it quickly, only by changing the macro conv_mat. */ switch (d3dts) { case D3DTRANSFORMSTATE_WORLD: { conv_mat(lpmatrix, odev->world_mat); glMatrixMode(GL_MODELVIEW); glLoadMatrixf((float *) &(odev->world_mat)); } break; case D3DTRANSFORMSTATE_VIEW: { conv_mat(lpmatrix, odev->view_mat); glMatrixMode(GL_PROJECTION); glLoadMatrixf((float *) &(odev->proj_mat)); glMultMatrixf((float *) &(odev->view_mat)); } break; case D3DTRANSFORMSTATE_PROJECTION: { conv_mat(lpmatrix, odev->proj_mat); glMatrixMode(GL_PROJECTION); glLoadMatrixf((float *) &(odev->proj_mat)); glMultMatrixf((float *) &(odev->view_mat)); } break; default: break; } LEAVE_GL(); return DD_OK; } #define DRAW_PRIMITIVE(MAXVERT,INDEX) \ /* Puts GL in the correct lighting mode */ \ if (odev->vt != d3dv) { \ if (odev->vt == D3DVT_TLVERTEX) { \ /* Need to put the correct transformation again */ \ glMatrixMode(GL_MODELVIEW); \ glLoadMatrixf((float *) &(odev->world_mat)); \ glMatrixMode(GL_PROJECTION); \ glLoadMatrixf((float *) &(odev->proj_mat)); \ glMultMatrixf((float *) &(odev->view_mat)); \ } \ \ switch (d3dv) { \ case D3DVT_VERTEX: \ TRACE("Standard Vertex\n"); \ glEnable(GL_LIGHTING); \ break; \ \ case D3DVT_LVERTEX: \ TRACE("Lighted Vertex\n"); \ glDisable(GL_LIGHTING); \ break; \ \ case D3DVT_TLVERTEX: { \ GLdouble height, width, minZ, maxZ; \ \ TRACE("Transformed - Lighted Vertex\n"); \ /* First, disable lighting */ \ glDisable(GL_LIGHTING); \ \ /* Then do not put any transformation matrixes */ \ glMatrixMode(GL_MODELVIEW); \ glLoadIdentity(); \ glMatrixMode(GL_PROJECTION); \ glLoadIdentity(); \ \ if (This->current_viewport == NULL) { \ ERR("No current viewport !\n"); \ /* Using standard values */ \ height = 640.0; \ width = 480.0; \ minZ = -10.0; \ maxZ = 10.0; \ } else { \ if (This->current_viewport->use_vp2) { \ height = (GLdouble) This->current_viewport->viewport.vp2.dwHeight;\ width = (GLdouble) This->current_viewport->viewport.vp2.dwWidth;\ minZ = (GLdouble) This->current_viewport->viewport.vp2.dvMinZ;\ maxZ = (GLdouble) This->current_viewport->viewport.vp2.dvMaxZ;\ } else { \ height = (GLdouble) This->current_viewport->viewport.vp1.dwHeight;\ width = (GLdouble) This->current_viewport->viewport.vp1.dwWidth;\ minZ = (GLdouble) This->current_viewport->viewport.vp1.dvMinZ;\ maxZ = (GLdouble) This->current_viewport->viewport.vp1.dvMaxZ;\ } \ } \ \ glOrtho(0.0, width, height, 0.0, -minZ, -maxZ); \ } break; \ \ default: \ ERR("Unhandled vertex type\n"); \ break; \ } \ \ odev->vt = d3dv; \ } \ \ switch (d3dp) { \ case D3DPT_POINTLIST: \ TRACE("Start POINTS\n"); \ glBegin(GL_POINTS); \ break; \ \ case D3DPT_LINELIST: \ TRACE("Start LINES\n"); \ glBegin(GL_LINES); \ break; \ \ case D3DPT_LINESTRIP: \ TRACE("Start LINE_STRIP\n"); \ glBegin(GL_LINE_STRIP); \ break; \ \ case D3DPT_TRIANGLELIST: \ TRACE("Start TRIANGLES\n"); \ glBegin(GL_TRIANGLES); \ break; \ \ case D3DPT_TRIANGLESTRIP: \ TRACE("Start TRIANGLE_STRIP\n"); \ glBegin(GL_TRIANGLE_STRIP); \ break; \ \ case D3DPT_TRIANGLEFAN: \ TRACE("Start TRIANGLE_FAN\n"); \ glBegin(GL_TRIANGLE_FAN); \ break; \ \ default: \ TRACE("Unhandled primitive\n"); \ break; \ } \ \ /* Draw the primitives */ \ for (vx_index = 0; vx_index < MAXVERT; vx_index++) { \ switch (d3dv) { \ case D3DVT_VERTEX: { \ D3DVERTEX *vx = ((D3DVERTEX *) lpvertex) + INDEX; \ \ glNormal3f(vx->nx.nx, vx->ny.ny, vx->nz.nz); \ glVertex3f(vx->x.x, vx->y.y, vx->z.z); \ TRACE(" V: %f %f %f\n", vx->x.x, vx->y.y, vx->z.z); \ } break; \ \ case D3DVT_LVERTEX: { \ D3DLVERTEX *vx = ((D3DLVERTEX *) lpvertex) + INDEX; \ DWORD col = vx->c.color; \ \ glColor3f(((col >> 16) & 0xFF) / 255.0, \ ((col >> 8) & 0xFF) / 255.0, \ ((col >> 0) & 0xFF) / 255.0); \ glVertex3f(vx->x.x, vx->y.y, vx->z.z); \ TRACE(" LV: %f %f %f (%02lx %02lx %02lx)\n", \ vx->x.x, vx->y.y, vx->z.z, \ ((col >> 16) & 0xFF), ((col >> 8) & 0xFF), ((col >> 0) & 0xFF));\ } break; \ \ case D3DVT_TLVERTEX: { \ D3DTLVERTEX *vx = ((D3DTLVERTEX *) lpvertex) + INDEX; \ DWORD col = vx->c.color; \ \ glColor3f(((col >> 16) & 0xFF) / 255.0, \ ((col >> 8) & 0xFF) / 255.0, \ ((col >> 0) & 0xFF) / 255.0); \ glTexCoord2f(vx->u.tu, vx->v.tv); \ if (vx->r.rhw < 0.01) \ glVertex3f(vx->x.sx, \ vx->y.sy, \ vx->z.sz); \ else \ glVertex4f(vx->x.sx / vx->r.rhw, \ vx->y.sy / vx->r.rhw, \ vx->z.sz / vx->r.rhw, \ 1.0 / vx->r.rhw); \ TRACE(" TLV: %f %f %f (%02lx %02lx %02lx) (%f %f) (%f)\n", \ vx->x.sx, vx->y.sy, vx->z.sz, \ ((col >> 16) & 0xFF), ((col >> 8) & 0xFF), ((col >> 0) & 0xFF),\ vx->u.tu, vx->v.tv, vx->r.rhw); \ } break; \ \ default: \ FIXME("Unhandled vertex type\n"); \ break; \ } \ } \ \ glEnd(); \ TRACE("End\n"); static HRESULT WINAPI MESA_IDirect3DDevice2Impl_DrawPrimitive( LPDIRECT3DDEVICE2 iface, D3DPRIMITIVETYPE d3dp, D3DVERTEXTYPE d3dv, LPVOID lpvertex, DWORD vertcount, DWORD dwFlags ) { ICOM_THIS(IDirect3DDevice2Impl,iface); D3DDPRIVATE(This); int vx_index; TRACE("(%p)->(%d,%d,%p,%ld,%08lx): stub\n", This, d3dp, d3dv, lpvertex, vertcount, dwFlags); ENTER_GL(); DRAW_PRIMITIVE(vertcount, vx_index); LEAVE_GL(); return D3D_OK; } static HRESULT WINAPI MESA_IDirect3DDevice2Impl_DrawIndexedPrimitive( LPDIRECT3DDEVICE2 iface, D3DPRIMITIVETYPE d3dp, D3DVERTEXTYPE d3dv, LPVOID lpvertex, DWORD vertcount, LPWORD lpindexes, DWORD indexcount, DWORD dwFlags ) { ICOM_THIS(IDirect3DDevice2Impl,iface); D3DDPRIVATE(This); int vx_index; TRACE("(%p)->(%d,%d,%p,%ld,%p,%ld,%08lx): stub\n", This, d3dp, d3dv, lpvertex, vertcount, lpindexes, indexcount, dwFlags); ENTER_GL(); DRAW_PRIMITIVE(indexcount, lpindexes[vx_index]); LEAVE_GL(); return D3D_OK; } static HRESULT WINAPI MESA_IDirect3DDeviceImpl_CreateExecuteBuffer( LPDIRECT3DDEVICE iface, LPD3DEXECUTEBUFFERDESC lpDesc, LPDIRECT3DEXECUTEBUFFER *lplpDirect3DExecuteBuffer, IUnknown *pUnkOuter ) { ICOM_THIS(IDirect3DDeviceImpl,iface); TRACE("(%p)->(%p,%p,%p)\n", This, lpDesc, lplpDirect3DExecuteBuffer, pUnkOuter); *lplpDirect3DExecuteBuffer = d3dexecutebuffer_create(This, lpDesc); return DD_OK; } /******************************************************************************* * OpenGL-specific IDirect3DDevice2 */ /******************************************************************************* * OpenGL-specific VTable */ ICOM_VTABLE(IDirect3DDevice2) OpenGL_vtable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirect3DDevice2Impl_QueryInterface, IDirect3DDevice2Impl_AddRef, MESA_IDirect3DDevice2Impl_Release, /*** IDirect3DDevice2 methods ***/ MESA_IDirect3DDevice2Impl_GetCaps, IDirect3DDevice2Impl_SwapTextureHandles, IDirect3DDevice2Impl_GetStats, IDirect3DDevice2Impl_AddViewport, IDirect3DDevice2Impl_DeleteViewport, IDirect3DDevice2Impl_NextViewport, MESA_IDirect3DDevice2Impl_EnumTextureFormats, MESA_IDirect3DDevice2Impl_BeginScene, MESA_IDirect3DDevice2Impl_EndScene, IDirect3DDevice2Impl_GetDirect3D, /*** DrawPrimitive API ***/ IDirect3DDevice2Impl_SetCurrentViewport, IDirect3DDevice2Impl_GetCurrentViewport, IDirect3DDevice2Impl_SetRenderTarget, IDirect3DDevice2Impl_GetRenderTarget, IDirect3DDevice2Impl_Begin, IDirect3DDevice2Impl_BeginIndexed, IDirect3DDevice2Impl_Vertex, IDirect3DDevice2Impl_Index, IDirect3DDevice2Impl_End, IDirect3DDevice2Impl_GetRenderState, MESA_IDirect3DDevice2Impl_SetRenderState, IDirect3DDevice2Impl_GetLightState, MESA_IDirect3DDevice2Impl_SetLightState, MESA_IDirect3DDevice2Impl_SetTransform, IDirect3DDevice2Impl_GetTransform, IDirect3DDevice2Impl_MultiplyTransform, MESA_IDirect3DDevice2Impl_DrawPrimitive, MESA_IDirect3DDevice2Impl_DrawIndexedPrimitive, IDirect3DDevice2Impl_SetClipStatus, IDirect3DDevice2Impl_GetClipStatus, }; /******************************************************************************* * Direct3DDevice */ int d3d_OpenGL_dx3(LPD3DENUMDEVICESCALLBACK cb, LPVOID context) { D3DDEVICEDESC d1,d2; TRACE(" Enumerating OpenGL D3D device.\n"); fill_opengl_caps(&d1, &d2); return cb((void*)&IID_D3DDEVICE_OpenGL,"WINE Direct3D using OpenGL","direct3d",&d1,&d2,context); } float id_mat[16] = { 1.0, 0.0, 0.0, 0.0, 0.0, 1.0, 0.0, 0.0, 0.0, 0.0, 1.0, 0.0, 0.0, 0.0, 0.0, 1.0 }; int is_OpenGL_dx3(REFCLSID rguid, IDirectDrawSurfaceImpl* surface, IDirect3DDeviceImpl** device) { if (!memcmp(&IID_D3DDEVICE_OpenGL,rguid,sizeof(IID_D3DDEVICE_OpenGL))) { mesa_d3dd_private *odev; #ifndef USE_OSMESA int attributeList[]={ GLX_RGBA, GLX_DEPTH_SIZE, 16, GLX_DOUBLEBUFFER, None }; XVisualInfo *xvis; #endif *device = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirect3DDeviceImpl)); (*device)->private = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(mesa_d3dd_private)); odev = (mesa_d3dd_private*)(*device)->private; (*device)->ref = 1; ICOM_VTBL(*device) = &OpenGL_vtable_dx3; (*device)->d3d = NULL; (*device)->surface = surface; (*device)->viewport_list = NULL; (*device)->current_viewport = NULL; (*device)->set_context = (void*)set_context; TRACE("OpenGL device created \n"); /* Create the OpenGL context */ #ifdef USE_OSMESA odev->ctx = OSMesaCreateContext(OSMESA_RGBA, NULL); odev->buffer = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY, surface->s.surface_desc.dwWidth * surface->s.surface_desc.dwHeight * 4); #else /* First get the correct visual */ /* if (surface->s.backbuffer == NULL) attributeList[3] = None; */ ENTER_GL(); xvis = glXChooseVisual(display, DefaultScreen(display), attributeList); if (xvis == NULL) ERR("No visual found !\n"); else TRACE("Visual found\n"); /* Create the context */ odev->ctx = glXCreateContext(display, xvis, NULL, GL_TRUE); TRACE("Context created\n"); #if 0 /* non working currently */ /* Now override the surface's Flip method (if in double buffering) */ surface->s.d3d_device = (void *) odev; { int i; struct _surface_chain *chain = surface->s.chain; for (i=0;inrofsurfaces;i++) if (chain->surfaces[i]->s.surface_desc.ddsCaps.dwCaps & DDSCAPS_FLIP) chain->surfaces[i]->s.d3d_device = (void *) odev; } #endif #endif odev->rs.src = GL_ONE; odev->rs.dst = GL_ZERO; odev->rs.mag = GL_NEAREST; odev->rs.min = GL_NEAREST; odev->world_mat = (LPD3DMATRIX) &id_mat; odev->view_mat = (LPD3DMATRIX) &id_mat; odev->proj_mat = (LPD3DMATRIX) &id_mat; /* Initialisation */ (*device)->set_context(*device); glClearColor(0.0, 0.0, 0.0, 0.0); glColor3f(1.0, 1.0, 1.0); return 1; } /* This is not the OpenGL UID */ return DD_OK; } static ULONG WINAPI MESA_IDirect3DDeviceImpl_Release(LPDIRECT3DDEVICE iface) { ICOM_THIS(IDirect3DDeviceImpl,iface); FIXME("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { D3DDPRIVATE(This); #ifdef USE_OSMESA OSMesaDestroyContext(odev->ctx); #else ENTER_GL(); glXDestroyContext(display, odev->ctx); LEAVE_GL(); #endif This->private = NULL; HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } static HRESULT WINAPI MESA_IDirect3DDeviceImpl_EnumTextureFormats( LPDIRECT3DDEVICE iface,LPD3DENUMTEXTUREFORMATSCALLBACK lpd3dEnumTextureProc, LPVOID lpArg) { ICOM_THIS(IDirect3DDeviceImpl,iface); TRACE("(%p)->(%p,%p): stub\n", This, lpd3dEnumTextureProc, lpArg); return enum_texture_format_OpenGL(lpd3dEnumTextureProc, lpArg); } static HRESULT WINAPI MESA_IDirect3DDeviceImpl_BeginScene(LPDIRECT3DDEVICE iface) { ICOM_THIS(IDirect3DDeviceImpl,iface); /* OpenGL_IDirect3DDevice *odev = (OpenGL_IDirect3DDevice *) This; */ FIXME("(%p)->(): stub\n", This); /* We get the pointer to the surface (should be done on flip) */ /* odev->zb->pbuf = This->surface->s.surface_desc.y.lpSurface; */ return DD_OK; } /* This is for the moment copy-pasted from IDirect3DDevice2... Will make a common function ... */ static HRESULT WINAPI MESA_IDirect3DDeviceImpl_EndScene(LPDIRECT3DDEVICE iface) { ICOM_THIS(IDirect3DDeviceImpl,iface); #ifdef USE_OSMESA D3DDPRIVATE(This); LPDIRECTDRAWSURFACE3 surf = (LPDIRECTDRAWSURFACE3) This->surface; DDSURFACEDESC sdesc; int x,y; unsigned char *src; unsigned short *dest; #endif FIXME("(%p)->(): stub\n", This); #ifdef USE_OSMESA /* Here we copy back the OpenGL scene to the the DDraw surface */ /* First, lock the surface */ IDirectDrawSurface3_Lock(surf,NULL,&sdesc,DDLOCK_WRITEONLY,0); /* The copy the OpenGL buffer to this surface */ /* NOTE : this is only for debugging purpose. I KNOW it is really unoptimal. I am currently working on a set of patches for Mesa to have OSMesa support 16 bpp surfaces => we will able to render directly onto the surface, no need to do a bpp conversion */ dest = (unsigned short *) sdesc.y.lpSurface; src = ((unsigned char *) odev->buffer) + 4 * (sdesc.dwWidth * (sdesc.dwHeight - 1)); for (y = 0; y < sdesc.dwHeight; y++) { unsigned char *lsrc = src; for (x = 0; x < sdesc.dwWidth ; x++) { unsigned char r = *lsrc++; unsigned char g = *lsrc++; unsigned char b = *lsrc++; lsrc++; /* Alpha */ *dest = ((r >> 3) << 11) | ((g >> 2) << 5) | (b >> 3); dest++; } src -= 4 * sdesc.dwWidth; } /* Unlock the surface */ IDirectDrawSurface3_Unlock(surf,sdesc.y.lpSurface); #else /* No need to do anything here... */ #endif return DD_OK; } /******************************************************************************* * Direct3DDevice VTable */ ICOM_VTABLE(IDirect3DDevice) OpenGL_vtable_dx3 = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirect3DDeviceImpl_QueryInterface, IDirect3DDeviceImpl_AddRef, MESA_IDirect3DDeviceImpl_Release, IDirect3DDeviceImpl_Initialize, IDirect3DDeviceImpl_GetCaps, IDirect3DDeviceImpl_SwapTextureHandles, MESA_IDirect3DDeviceImpl_CreateExecuteBuffer, IDirect3DDeviceImpl_GetStats, IDirect3DDeviceImpl_Execute, IDirect3DDeviceImpl_AddViewport, IDirect3DDeviceImpl_DeleteViewport, IDirect3DDeviceImpl_NextViewport, IDirect3DDeviceImpl_Pick, IDirect3DDeviceImpl_GetPickRecords, MESA_IDirect3DDeviceImpl_EnumTextureFormats, IDirect3DDeviceImpl_CreateMatrix, IDirect3DDeviceImpl_SetMatrix, IDirect3DDeviceImpl_GetMatrix, IDirect3DDeviceImpl_DeleteMatrix, MESA_IDirect3DDeviceImpl_BeginScene, MESA_IDirect3DDeviceImpl_EndScene, IDirect3DDeviceImpl_GetDirect3D, }; wine-20000526/dlls/ddraw/.cvsignore0100644000175000001440000000005307074112033016474 0ustar julliardusersMakefile *.spec.c *.spec.s libddraw.so.1.0 wine-20000526/dlls/ddraw/Makefile.in0100644000175000001440000000153607103311756016556 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = ddraw SOVERSION = 1.0 IMPORTS = x11drv SPEC_SRCS = ddraw.spec MESA_SRCS = \ d3dcommon.c \ d3ddevice/mesa.c \ d3dexecutebuffer.c \ d3dlight.c \ d3dmaterial.c \ d3dtexture.c \ d3dviewport.c \ direct3d/mesa.c \ mesa.c DGA_SRCS = \ ddraw/dga.c \ dpalette/dga.c \ dsurface/dga.c \ dga.c DGA2_SRCS= \ dga2.c \ dsurface/dga2.c \ ddraw/dga2.c XFILES = \ @DGA_SRCS@ \ @MESA_SRCS@ \ @DGA2_SRCS@ \ ddraw/x11.c \ dpalette/x11.c \ dsurface/x11.c \ x11.c C_SRCS = \ @XFILES@ \ convert.c \ d3ddevice/main.c \ dclipper/main.c \ ddraw/main.c \ direct3d/main.c \ dpalette/main.c \ dsurface/main.c \ helper.c \ main.c EXTRASUBDIRS = \ d3ddevice \ dclipper \ ddraw \ direct3d \ dpalette \ dsurface @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/ddraw/convert.c0100644000175000001440000001373407107661101016334 0ustar julliardusers#include "ddraw_private.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ddraw); /* ************************************* 16 / 15 bpp to palettized 8 bpp ************************************* */ static void pixel_convert_16_to_8(void *src, void *dst, DWORD width, DWORD height, LONG pitch, IDirectDrawPaletteImpl* palette) { unsigned char *c_src = (unsigned char *) src; unsigned short *c_dst = (unsigned short *) dst; int y; if (palette != NULL) { const unsigned int * pal = (unsigned int *) palette->screen_palents; for (y = height; y--; ) { #if defined(__i386__) && defined(__GNUC__) /* gcc generates slightly inefficient code for the the copy/lookup, * it generates one excess memory access (to pal) per pixel. Since * we know that pal is not modified by the memory write we can * put it into a register and reduce the number of memory accesses * from 4 to 3 pp. There are two xor eax,eax to avoid pipeline * stalls. (This is not guaranteed to be the fastest method.) */ __asm__ __volatile__( "xor %%eax,%%eax\n" "1:\n" " lodsb\n" " movw (%%edx,%%eax,4),%%ax\n" " stosw\n" " xor %%eax,%%eax\n" " loop 1b\n" : "=S" (c_src), "=D" (c_dst) : "S" (c_src), "D" (c_dst) , "c" (width), "d" (pal) : "eax", "cc", "memory" ); c_src+=(pitch-width); #else unsigned char * srclineend = c_src+width; while (c_src < srclineend) *c_dst++ = pal[*c_src++]; c_src+=(pitch-width); #endif } } else { WARN("No palette set...\n"); memset(dst, 0, width * height * 2); } } static void palette_convert_16_to_8( LPPALETTEENTRY palent, void *screen_palette, DWORD start, DWORD count ) { int i; unsigned int *pal = (unsigned int *) screen_palette; for (i = 0; i < count; i++) pal[start + i] = (((((unsigned short) palent[i].peRed) & 0xF8) << 8) | ((((unsigned short) palent[i].peBlue) & 0xF8) >> 3) | ((((unsigned short) palent[i].peGreen) & 0xFC) << 3)); } static void palette_convert_15_to_8( LPPALETTEENTRY palent, void *screen_palette, DWORD start, DWORD count ) { int i; unsigned int *pal = (unsigned int *) screen_palette; for (i = 0; i < count; i++) pal[start + i] = (((((unsigned short) palent[i].peRed) & 0xF8) << 7) | ((((unsigned short) palent[i].peBlue) & 0xF8) >> 3) | ((((unsigned short) palent[i].peGreen) & 0xF8) << 2)); } /* ************************************* 24 to palettized 8 bpp ************************************* */ static void pixel_convert_24_to_8( void *src, void *dst, DWORD width, DWORD height, LONG pitch, IDirectDrawPaletteImpl* palette ) { unsigned char *c_src = (unsigned char *) src; unsigned char *c_dst = (unsigned char *) dst; int y; if (palette != NULL) { const unsigned int *pal = (unsigned int *) palette->screen_palents; for (y = height; y--; ) { unsigned char * srclineend = c_src+width; while (c_src < srclineend ) { register long pixel = pal[*c_src++]; *c_dst++ = pixel; *c_dst++ = pixel>>8; *c_dst++ = pixel>>16; } c_src+=(pitch-width); } } else { WARN("No palette set...\n"); memset(dst, 0, width * height * 4); } } /* ************************************* 32 bpp to palettized 8 bpp ************************************* */ static void pixel_convert_32_to_8( void *src, void *dst, DWORD width, DWORD height, LONG pitch, IDirectDrawPaletteImpl* palette ) { unsigned char *c_src = (unsigned char *) src; unsigned int *c_dst = (unsigned int *) dst; int y; if (palette != NULL) { const unsigned int *pal = (unsigned int *) palette->screen_palents; for (y = height; y--; ) { #if defined(__i386__) && defined(__GNUC__) /* See comment in pixel_convert_16_to_8 */ __asm__ __volatile__( "xor %%eax,%%eax\n" "1:\n" " lodsb\n" " movl (%%edx,%%eax,4),%%eax\n" " stosl\n" " xor %%eax,%%eax\n" " loop 1b\n" : "=S" (c_src), "=D" (c_dst) : "S" (c_src), "D" (c_dst) , "c" (width), "d" (pal) : "eax", "cc", "memory" ); c_src+=(pitch-width); #else unsigned char * srclineend = c_src+width; while (c_src < srclineend ) *c_dst++ = pal[*c_src++]; c_src+=(pitch-width); #endif } } else { WARN("No palette set...\n"); memset(dst, 0, width * height * 4); } } static void palette_convert_24_to_8( LPPALETTEENTRY palent, void *screen_palette, DWORD start, DWORD count ) { int i; unsigned int *pal = (unsigned int *) screen_palette; for (i = 0; i < count; i++) pal[start + i] = ((((unsigned int) palent[i].peRed) << 16) | (((unsigned int) palent[i].peGreen) << 8) | ((unsigned int) palent[i].peBlue)); } /* ************************************* 32 bpp to 16 bpp ************************************* */ static void pixel_convert_32_to_16( void *src, void *dst, DWORD width, DWORD height, LONG pitch, IDirectDrawPaletteImpl* palette ) { unsigned short *c_src = (unsigned short *) src; unsigned int *c_dst = (unsigned int *) dst; int y; for (y = height; y--; ) { unsigned short * srclineend = c_src+width; while (c_src < srclineend ) { *c_dst++ = (((*c_src & 0xF800) << 8) | ((*c_src & 0x07E0) << 5) | ((*c_src & 0x001F) << 3)); c_src++; } c_src+=((pitch/2)-width); } } Convert ModeEmulations[5] = { { { 32, 24, 0x00FF0000, 0x0000FF00, 0x000000FF }, { 8, 8, 0x00, 0x00, 0x00 }, { pixel_convert_32_to_8, palette_convert_24_to_8 } }, { { 32, 24, 0x00FF0000, 0x0000FF00, 0x000000FF }, { 16, 16, 0xF800, 0x07E0, 0x001F }, { pixel_convert_32_to_16, NULL } }, { { 24, 24, 0xFF0000, 0x00FF00, 0x0000FF }, { 8, 8, 0x00, 0x00, 0x00 }, { pixel_convert_24_to_8, palette_convert_24_to_8 } }, { { 16, 16, 0xF800, 0x07E0, 0x001F }, { 8, 8, 0x00, 0x00, 0x00 }, { pixel_convert_16_to_8, palette_convert_16_to_8 } }, { { 16, 15, 0x7C00, 0x03E0, 0x001F }, { 8, 8, 0x00, 0x00, 0x00 }, { pixel_convert_16_to_8, palette_convert_15_to_8 } }, }; wine-20000526/dlls/ddraw/d3d_private.h0100644000175000001440000005016607107127721017072 0ustar julliardusers/* Direct3D private include file (c) 1998 Lionel ULMER This files contains all the structure that are not exported through d3d.h and all common macros. */ #ifndef __GRAPHICS_WINE_D3D_PRIVATE_H #define __GRAPHICS_WINE_D3D_PRIVATE_H /* THIS FILE MUST NOT CONTAIN X11 or MESA DEFINES */ #include "d3d.h" /***************************************************************************** * Predeclare the interface implementation structures */ typedef struct IDirect3DImpl IDirect3DImpl; typedef struct IDirect3D2Impl IDirect3D2Impl; typedef struct IDirect3D3Impl IDirect3D3Impl; typedef struct IDirect3DLightImpl IDirect3DLightImpl; typedef struct IDirect3DMaterial2Impl IDirect3DMaterial2Impl; typedef struct IDirect3DTexture2Impl IDirect3DTexture2Impl; typedef struct IDirect3DViewport2Impl IDirect3DViewport2Impl; typedef struct IDirect3DExecuteBufferImpl IDirect3DExecuteBufferImpl; typedef struct IDirect3DDeviceImpl IDirect3DDeviceImpl; typedef struct IDirect3DDevice2Impl IDirect3DDevice2Impl; #include "ddraw_private.h" extern ICOM_VTABLE(IDirect3D) mesa_d3dvt; extern ICOM_VTABLE(IDirect3D2) mesa_d3d2vt; extern ICOM_VTABLE(IDirect3D3) mesa_d3d3vt; /***************************************************************************** * IDirect3D implementation structure */ struct IDirect3DImpl { /* IUnknown fields */ ICOM_VFIELD(IDirect3D); DWORD ref; /* IDirect3D fields */ IDirectDrawImpl* ddraw; LPVOID private; }; /***************************************************************************** * IDirect3D2 implementation structure */ struct IDirect3D2Impl { /* IUnknown fields */ ICOM_VFIELD(IDirect3D2); DWORD ref; /* IDirect3D2 fields */ IDirectDrawImpl* ddraw; LPVOID private; }; struct IDirect3D3Impl { /* IUnknown fields */ ICOM_VFIELD(IDirect3D3); DWORD ref; /* IDirect3D2 fields */ IDirectDrawImpl* ddraw; LPVOID private; /* IDirect3D3 fields */ }; extern HRESULT WINAPI IDirect3DImpl_QueryInterface( LPDIRECT3D iface,REFIID refiid,LPVOID *obj ); extern ULONG WINAPI IDirect3DImpl_AddRef(LPDIRECT3D iface); extern ULONG WINAPI IDirect3DImpl_Release(LPDIRECT3D iface) ; extern HRESULT WINAPI IDirect3DImpl_Initialize(LPDIRECT3D iface,REFIID refiid); extern HRESULT WINAPI IDirect3DImpl_EnumDevices( LPDIRECT3D iface, LPD3DENUMDEVICESCALLBACK cb, LPVOID context ); extern HRESULT WINAPI IDirect3DImpl_CreateLight( LPDIRECT3D iface, LPDIRECT3DLIGHT *lplight, IUnknown *lpunk ); extern HRESULT WINAPI IDirect3DImpl_CreateMaterial( LPDIRECT3D iface, LPDIRECT3DMATERIAL *lpmaterial, IUnknown *lpunk ); extern HRESULT WINAPI IDirect3DImpl_CreateViewport( LPDIRECT3D iface, LPDIRECT3DVIEWPORT *lpviewport, IUnknown *lpunk ); extern HRESULT WINAPI IDirect3DImpl_FindDevice( LPDIRECT3D iface, LPD3DFINDDEVICESEARCH lpfinddevsrc, LPD3DFINDDEVICERESULT lpfinddevrst) ; extern HRESULT WINAPI IDirect3D2Impl_QueryInterface(LPDIRECT3D2 iface,REFIID refiid,LPVOID *obj); extern ULONG WINAPI IDirect3D2Impl_AddRef(LPDIRECT3D2 iface); extern ULONG WINAPI IDirect3D2Impl_Release(LPDIRECT3D2 iface); extern HRESULT WINAPI IDirect3D2Impl_EnumDevices( LPDIRECT3D2 iface,LPD3DENUMDEVICESCALLBACK cb, LPVOID context ); extern HRESULT WINAPI IDirect3D2Impl_CreateLight( LPDIRECT3D2 iface, LPDIRECT3DLIGHT *lplight, IUnknown *lpunk ); extern HRESULT WINAPI IDirect3D2Impl_CreateMaterial( LPDIRECT3D2 iface, LPDIRECT3DMATERIAL2 *lpmaterial, IUnknown *lpunk ); extern HRESULT WINAPI IDirect3D2Impl_CreateViewport( LPDIRECT3D2 iface, LPDIRECT3DVIEWPORT2 *lpviewport, IUnknown *lpunk ); extern HRESULT WINAPI IDirect3D2Impl_FindDevice( LPDIRECT3D2 iface, LPD3DFINDDEVICESEARCH lpfinddevsrc, LPD3DFINDDEVICERESULT lpfinddevrst); extern HRESULT WINAPI IDirect3D2Impl_CreateDevice( LPDIRECT3D2 iface, REFCLSID rguid, LPDIRECTDRAWSURFACE surface, LPDIRECT3DDEVICE2 *device); /***************************************************************************** * IDirect3DLight implementation structure */ struct IDirect3DLightImpl { /* IUnknown fields */ ICOM_VFIELD(IDirect3DLight); DWORD ref; /* IDirect3DLight fields */ union { IDirect3DImpl* d3d1; IDirect3D2Impl* d3d2; } d3d; int type; D3DLIGHT2 light; /* Chained list used for adding / removing from viewports */ IDirect3DLightImpl *next, *prev; /* Activation function */ void (*activate)(IDirect3DLightImpl*); int is_active; LPVOID private; }; /***************************************************************************** * IDirect3DMaterial2 implementation structure */ struct IDirect3DMaterial2Impl { /* IUnknown fields */ ICOM_VFIELD(IDirect3DMaterial2); DWORD ref; /* IDirect3DMaterial2 fields */ union { IDirect3DImpl* d3d1; IDirect3D2Impl* d3d2; } d3d; union { IDirect3DDeviceImpl* active_device1; IDirect3DDevice2Impl* active_device2; } device; int use_d3d2; D3DMATERIAL mat; void (*activate)(IDirect3DMaterial2Impl* this); LPVOID private; }; /***************************************************************************** * IDirect3DTexture2 implementation structure */ struct IDirect3DTexture2Impl { /* IUnknown fields */ ICOM_VFIELD(IDirect3DTexture2); DWORD ref; /* IDirect3DTexture2 fields */ void* D3Ddevice; /* (void *) to use the same pointer * for both Direct3D and Direct3D2 */ IDirectDrawSurface4Impl* surface; LPVOID private; }; extern HRESULT WINAPI IDirect3DTexture2Impl_QueryInterface( LPDIRECT3DTEXTURE2 iface, REFIID riid, LPVOID* ppvObj ); extern ULONG WINAPI IDirect3DTexture2Impl_AddRef(LPDIRECT3DTEXTURE2 iface); extern ULONG WINAPI IDirect3DTexture2Impl_Release(LPDIRECT3DTEXTURE2 iface); extern HRESULT WINAPI IDirect3DTextureImpl_GetHandle(LPDIRECT3DTEXTURE iface, LPDIRECT3DDEVICE lpD3DDevice, LPD3DTEXTUREHANDLE lpHandle) ; extern HRESULT WINAPI IDirect3DTextureImpl_Initialize(LPDIRECT3DTEXTURE iface, LPDIRECT3DDEVICE lpD3DDevice, LPDIRECTDRAWSURFACE lpSurface) ; extern HRESULT WINAPI IDirect3DTextureImpl_Unload(LPDIRECT3DTEXTURE iface); extern HRESULT WINAPI IDirect3DTexture2Impl_GetHandle( LPDIRECT3DTEXTURE2 iface, LPDIRECT3DDEVICE2 lpD3DDevice2, LPD3DTEXTUREHANDLE lpHandle ); extern HRESULT WINAPI IDirect3DTexture2Impl_PaletteChanged( LPDIRECT3DTEXTURE2 iface, DWORD dwStart, DWORD dwCount ); extern HRESULT WINAPI IDirect3DTexture2Impl_Load( LPDIRECT3DTEXTURE2 iface, LPDIRECT3DTEXTURE2 lpD3DTexture2 ); /***************************************************************************** * IDirect3DViewport2 implementation structure */ struct IDirect3DViewport2Impl { /* IUnknown fields */ ICOM_VFIELD(IDirect3DViewport2); DWORD ref; /* IDirect3DViewport2 fields */ union { IDirect3DImpl* d3d1; IDirect3D2Impl* d3d2; } d3d; /* If this viewport is active for one device, put the device here */ union { IDirect3DDeviceImpl* active_device1; IDirect3DDevice2Impl* active_device2; } device; int use_d3d2; union { D3DVIEWPORT vp1; D3DVIEWPORT2 vp2; } viewport; int use_vp2; /* Activation function */ void (*activate)(IDirect3DViewport2Impl*); /* Field used to chain viewports together */ IDirect3DViewport2Impl* next; /* Lights list */ IDirect3DLightImpl* lights; LPVOID private; }; extern HRESULT WINAPI IDirect3DViewport2Impl_QueryInterface( LPDIRECT3DVIEWPORT2 iface, REFIID riid, LPVOID* ppvObj ); extern ULONG WINAPI IDirect3DViewport2Impl_AddRef(LPDIRECT3DVIEWPORT2 iface) ; extern ULONG WINAPI IDirect3DViewport2Impl_Release(LPDIRECT3DVIEWPORT2 iface) ; extern HRESULT WINAPI IDirect3DViewport2Impl_Initialize( LPDIRECT3DVIEWPORT2 iface, LPDIRECT3D d3d ); extern HRESULT WINAPI IDirect3DViewport2Impl_GetViewport( LPDIRECT3DVIEWPORT2 iface, LPD3DVIEWPORT lpvp ); extern HRESULT WINAPI IDirect3DViewport2Impl_SetViewport( LPDIRECT3DVIEWPORT2 iface,LPD3DVIEWPORT lpvp ); extern HRESULT WINAPI IDirect3DViewport2Impl_TransformVertices( LPDIRECT3DVIEWPORT2 iface,DWORD dwVertexCount,LPD3DTRANSFORMDATA lpData, DWORD dwFlags,LPDWORD lpOffScreen ); extern HRESULT WINAPI IDirect3DViewport2Impl_LightElements( LPDIRECT3DVIEWPORT2 iface,DWORD dwElementCount,LPD3DLIGHTDATA lpData ); extern HRESULT WINAPI IDirect3DViewport2Impl_SetBackground( LPDIRECT3DVIEWPORT2 iface, D3DMATERIALHANDLE hMat ); extern HRESULT WINAPI IDirect3DViewport2Impl_GetBackground( LPDIRECT3DVIEWPORT2 iface,LPD3DMATERIALHANDLE lphMat,LPBOOL lpValid ); extern HRESULT WINAPI IDirect3DViewport2Impl_SetBackgroundDepth( LPDIRECT3DVIEWPORT2 iface,LPDIRECTDRAWSURFACE lpDDSurface ); extern HRESULT WINAPI IDirect3DViewport2Impl_GetBackgroundDepth( LPDIRECT3DVIEWPORT2 iface,LPDIRECTDRAWSURFACE* lplpDDSurface,LPBOOL lpValid ); extern HRESULT WINAPI IDirect3DViewport2Impl_Clear( LPDIRECT3DVIEWPORT2 iface, DWORD dwCount, LPD3DRECT lpRects, DWORD dwFlags ); extern HRESULT WINAPI IDirect3DViewport2Impl_AddLight( LPDIRECT3DVIEWPORT2 iface,LPDIRECT3DLIGHT lpLight ); extern HRESULT WINAPI IDirect3DViewport2Impl_DeleteLight( LPDIRECT3DVIEWPORT2 iface,LPDIRECT3DLIGHT lpLight ); extern HRESULT WINAPI IDirect3DViewport2Impl_NextLight( LPDIRECT3DVIEWPORT2 iface, LPDIRECT3DLIGHT lpLight, LPDIRECT3DLIGHT* lplpLight, DWORD dwFlags ); extern HRESULT WINAPI IDirect3DViewport2Impl_GetViewport2( LPDIRECT3DVIEWPORT2 iface, LPD3DVIEWPORT2 lpViewport2 ); extern HRESULT WINAPI IDirect3DViewport2Impl_SetViewport2( LPDIRECT3DVIEWPORT2 iface, LPD3DVIEWPORT2 lpViewport2 ); /***************************************************************************** * IDirect3DExecuteBuffer implementation structure */ struct IDirect3DExecuteBufferImpl { /* IUnknown fields */ ICOM_VFIELD(IDirect3DExecuteBuffer); DWORD ref; /* IDirect3DExecuteBuffer fields */ IDirect3DDeviceImpl* d3ddev; D3DEXECUTEBUFFERDESC desc; D3DEXECUTEDATA data; /* This buffer will store the transformed vertices */ void* vertex_data; D3DVERTEXTYPE vertex_type; /* This flags is set to TRUE if we allocated ourselves the data buffer */ BOOL need_free; void (*execute)(IDirect3DExecuteBuffer* this, IDirect3DDevice* dev, IDirect3DViewport2* vp); LPVOID private; }; extern LPDIRECT3DEXECUTEBUFFER d3dexecutebuffer_create(IDirect3DDeviceImpl* d3ddev, LPD3DEXECUTEBUFFERDESC lpDesc); /***************************************************************************** * IDirect3DDevice implementation structure */ struct IDirect3DDeviceImpl { /* IUnknown fields */ ICOM_VFIELD(IDirect3DDevice); DWORD ref; /* IDirect3DDevice fields */ IDirect3DImpl* d3d; IDirectDrawSurfaceImpl* surface; IDirect3DViewport2Impl* viewport_list; IDirect3DViewport2Impl* current_viewport; void (*set_context)(IDirect3DDeviceImpl*); LPVOID private; }; /***************************************************************************** * IDirect3DDevice2 implementation structure */ struct IDirect3DDevice2Impl { /* IUnknown fields */ ICOM_VFIELD(IDirect3DDevice2); DWORD ref; /* IDirect3DDevice fields */ IDirect3D2Impl* d3d; IDirectDrawSurfaceImpl* surface; IDirect3DViewport2Impl* viewport_list; IDirect3DViewport2Impl* current_viewport; void (*set_context)(IDirect3DDevice2Impl*); LPVOID private; }; extern HRESULT WINAPI IDirect3DDevice2Impl_QueryInterface( LPDIRECT3DDEVICE2 iface, REFIID riid, LPVOID* ppvObj ); extern ULONG WINAPI IDirect3DDevice2Impl_AddRef(LPDIRECT3DDEVICE2 iface); extern ULONG WINAPI IDirect3DDevice2Impl_Release(LPDIRECT3DDEVICE2 iface) ; extern HRESULT WINAPI IDirect3DDevice2Impl_GetCaps( LPDIRECT3DDEVICE2 iface, LPD3DDEVICEDESC lpdescsoft, LPD3DDEVICEDESC lpdeschard ); extern HRESULT WINAPI IDirect3DDevice2Impl_SwapTextureHandles( LPDIRECT3DDEVICE2 iface,LPDIRECT3DTEXTURE2 lptex1,LPDIRECT3DTEXTURE2 lptex2 ); extern HRESULT WINAPI IDirect3DDevice2Impl_GetStats( LPDIRECT3DDEVICE2 iface, LPD3DSTATS lpstats) ; extern HRESULT WINAPI IDirect3DDevice2Impl_AddViewport( LPDIRECT3DDEVICE2 iface, LPDIRECT3DVIEWPORT2 lpvp ); extern HRESULT WINAPI IDirect3DDevice2Impl_DeleteViewport( LPDIRECT3DDEVICE2 iface, LPDIRECT3DVIEWPORT2 lpvp) ; extern HRESULT WINAPI IDirect3DDevice2Impl_NextViewport( LPDIRECT3DDEVICE2 iface, LPDIRECT3DVIEWPORT2 lpvp, LPDIRECT3DVIEWPORT2* lplpvp, DWORD dwFlags ); extern HRESULT WINAPI IDirect3DDevice2Impl_EnumTextureFormats( LPDIRECT3DDEVICE2 iface, LPD3DENUMTEXTUREFORMATSCALLBACK cb, LPVOID context ); extern HRESULT WINAPI IDirect3DDevice2Impl_BeginScene(LPDIRECT3DDEVICE2 iface); extern HRESULT WINAPI IDirect3DDevice2Impl_EndScene(LPDIRECT3DDEVICE2 iface); extern HRESULT WINAPI IDirect3DDevice2Impl_GetDirect3D( LPDIRECT3DDEVICE2 iface, LPDIRECT3D2 *lpd3d2 ); extern HRESULT WINAPI IDirect3DDevice2Impl_SetCurrentViewport( LPDIRECT3DDEVICE2 iface, LPDIRECT3DVIEWPORT2 lpvp ); extern HRESULT WINAPI IDirect3DDevice2Impl_GetCurrentViewport( LPDIRECT3DDEVICE2 iface, LPDIRECT3DVIEWPORT2 *lplpvp ); extern HRESULT WINAPI IDirect3DDevice2Impl_SetRenderTarget( LPDIRECT3DDEVICE2 iface, LPDIRECTDRAWSURFACE lpdds, DWORD dwFlags ); extern HRESULT WINAPI IDirect3DDevice2Impl_GetRenderTarget( LPDIRECT3DDEVICE2 iface, LPDIRECTDRAWSURFACE *lplpdds ); extern HRESULT WINAPI IDirect3DDevice2Impl_Begin( LPDIRECT3DDEVICE2 iface, D3DPRIMITIVETYPE d3dp, D3DVERTEXTYPE d3dv, DWORD dwFlags ); extern HRESULT WINAPI IDirect3DDevice2Impl_BeginIndexed( LPDIRECT3DDEVICE2 iface, D3DPRIMITIVETYPE d3dp, D3DVERTEXTYPE d3dv, LPVOID lpvert, DWORD numvert, DWORD dwFlags ); extern HRESULT WINAPI IDirect3DDevice2Impl_Vertex( LPDIRECT3DDEVICE2 iface,LPVOID lpvert ); extern HRESULT WINAPI IDirect3DDevice2Impl_Index(LPDIRECT3DDEVICE2 iface, WORD index); extern HRESULT WINAPI IDirect3DDevice2Impl_End(LPDIRECT3DDEVICE2 iface,DWORD dwFlags); extern HRESULT WINAPI IDirect3DDevice2Impl_GetRenderState( LPDIRECT3DDEVICE2 iface, D3DRENDERSTATETYPE d3drs, LPDWORD lprstate ); extern HRESULT WINAPI IDirect3DDevice2Impl_SetRenderState( LPDIRECT3DDEVICE2 iface, D3DRENDERSTATETYPE dwRenderStateType, DWORD dwRenderState ); extern HRESULT WINAPI IDirect3DDevice2Impl_GetLightState( LPDIRECT3DDEVICE2 iface, D3DLIGHTSTATETYPE d3dls, LPDWORD lplstate ); extern HRESULT WINAPI IDirect3DDevice2Impl_SetLightState( LPDIRECT3DDEVICE2 iface, D3DLIGHTSTATETYPE dwLightStateType, DWORD dwLightState ); extern HRESULT WINAPI IDirect3DDevice2Impl_SetTransform( LPDIRECT3DDEVICE2 iface, D3DTRANSFORMSTATETYPE d3dts, LPD3DMATRIX lpmatrix ); extern HRESULT WINAPI IDirect3DDevice2Impl_GetTransform( LPDIRECT3DDEVICE2 iface, D3DTRANSFORMSTATETYPE d3dts, LPD3DMATRIX lpmatrix ); extern HRESULT WINAPI IDirect3DDevice2Impl_MultiplyTransform( LPDIRECT3DDEVICE2 iface, D3DTRANSFORMSTATETYPE d3dts, LPD3DMATRIX lpmatrix ); extern HRESULT WINAPI IDirect3DDevice2Impl_DrawPrimitive( LPDIRECT3DDEVICE2 iface, D3DPRIMITIVETYPE d3dp, D3DVERTEXTYPE d3dv, LPVOID lpvertex, DWORD vertcount, DWORD dwFlags ); extern HRESULT WINAPI IDirect3DDevice2Impl_DrawIndexedPrimitive( LPDIRECT3DDEVICE2 iface, D3DPRIMITIVETYPE d3dp, D3DVERTEXTYPE d3dv, LPVOID lpvertex, DWORD vertcount, LPWORD lpindexes, DWORD indexcount, DWORD dwFlags ); extern HRESULT WINAPI IDirect3DDevice2Impl_SetClipStatus( LPDIRECT3DDEVICE2 iface, LPD3DCLIPSTATUS lpcs ); extern HRESULT WINAPI IDirect3DDevice2Impl_GetClipStatus( LPDIRECT3DDEVICE2 iface, LPD3DCLIPSTATUS lpcs ); extern HRESULT WINAPI IDirect3DDeviceImpl_QueryInterface( LPDIRECT3DDEVICE iface, REFIID riid, LPVOID* ppvObj ); extern ULONG WINAPI IDirect3DDeviceImpl_AddRef(LPDIRECT3DDEVICE iface); extern ULONG WINAPI IDirect3DDeviceImpl_Release(LPDIRECT3DDEVICE iface); extern HRESULT WINAPI IDirect3DDeviceImpl_Initialize( LPDIRECT3DDEVICE iface, LPDIRECT3D lpd3d, LPGUID lpGUID, LPD3DDEVICEDESC lpd3ddvdesc ); extern HRESULT WINAPI IDirect3DDeviceImpl_GetCaps( LPDIRECT3DDEVICE iface, LPD3DDEVICEDESC lpD3DHWDevDesc, LPD3DDEVICEDESC lpD3DSWDevDesc ); extern HRESULT WINAPI IDirect3DDeviceImpl_SwapTextureHandles( LPDIRECT3DDEVICE iface, LPDIRECT3DTEXTURE lpD3DTex1, LPDIRECT3DTEXTURE lpD3DTex2 ); extern HRESULT WINAPI IDirect3DDeviceImpl_CreateExecuteBuffer( LPDIRECT3DDEVICE iface, LPD3DEXECUTEBUFFERDESC lpDesc, LPDIRECT3DEXECUTEBUFFER *lplpDirect3DExecuteBuffer, IUnknown *pUnkOuter ); extern HRESULT WINAPI IDirect3DDeviceImpl_GetStats( LPDIRECT3DDEVICE iface, LPD3DSTATS lpD3DStats ); extern HRESULT WINAPI IDirect3DDeviceImpl_Execute( LPDIRECT3DDEVICE iface, LPDIRECT3DEXECUTEBUFFER lpDirect3DExecuteBuffer, LPDIRECT3DVIEWPORT lpDirect3DViewport, DWORD dwFlags ); extern HRESULT WINAPI IDirect3DDeviceImpl_AddViewport( LPDIRECT3DDEVICE iface, LPDIRECT3DVIEWPORT lpvp ); extern HRESULT WINAPI IDirect3DDeviceImpl_DeleteViewport( LPDIRECT3DDEVICE iface, LPDIRECT3DVIEWPORT lpvp ); extern HRESULT WINAPI IDirect3DDeviceImpl_NextViewport( LPDIRECT3DDEVICE iface, LPDIRECT3DVIEWPORT lpvp, LPDIRECT3DVIEWPORT* lplpvp, DWORD dwFlags ); extern HRESULT WINAPI IDirect3DDeviceImpl_Pick( LPDIRECT3DDEVICE iface, LPDIRECT3DEXECUTEBUFFER lpDirect3DExecuteBuffer, LPDIRECT3DVIEWPORT lpDirect3DViewport, DWORD dwFlags, LPD3DRECT lpRect ); extern HRESULT WINAPI IDirect3DDeviceImpl_GetPickRecords( LPDIRECT3DDEVICE iface, LPDWORD lpCount, LPD3DPICKRECORD lpD3DPickRec ); extern HRESULT WINAPI IDirect3DDeviceImpl_EnumTextureFormats( LPDIRECT3DDEVICE iface,LPD3DENUMTEXTUREFORMATSCALLBACK lpd3dEnumTextureProc, LPVOID lpArg ); extern HRESULT WINAPI IDirect3DDeviceImpl_CreateMatrix( LPDIRECT3DDEVICE iface, LPD3DMATRIXHANDLE lpD3DMatHandle ) ; extern HRESULT WINAPI IDirect3DDeviceImpl_SetMatrix( LPDIRECT3DDEVICE iface, D3DMATRIXHANDLE d3dMatHandle, const LPD3DMATRIX lpD3DMatrix) ; extern HRESULT WINAPI IDirect3DDeviceImpl_GetMatrix( LPDIRECT3DDEVICE iface,D3DMATRIXHANDLE D3DMatHandle,LPD3DMATRIX lpD3DMatrix ); extern HRESULT WINAPI IDirect3DDeviceImpl_DeleteMatrix( LPDIRECT3DDEVICE iface, D3DMATRIXHANDLE d3dMatHandle ); extern HRESULT WINAPI IDirect3DDeviceImpl_BeginScene(LPDIRECT3DDEVICE iface) ; extern HRESULT WINAPI IDirect3DDeviceImpl_EndScene(LPDIRECT3DDEVICE iface) ; extern HRESULT WINAPI IDirect3DDeviceImpl_GetDirect3D( LPDIRECT3DDEVICE iface, LPDIRECT3D *lpDirect3D ); /* All non-static functions 'exported' by various sub-objects */ extern LPDIRECT3DTEXTURE2 d3dtexture2_create(IDirectDrawSurface4Impl* surf); extern LPDIRECT3DTEXTURE d3dtexture_create(IDirectDrawSurface4Impl* surf); extern LPDIRECT3DLIGHT d3dlight_create_dx3(IDirect3DImpl* d3d1); extern LPDIRECT3DLIGHT d3dlight_create(IDirect3D2Impl* d3d2); extern LPDIRECT3DEXECUTEBUFFER d3dexecutebuffer_create(IDirect3DDeviceImpl* d3ddev, LPD3DEXECUTEBUFFERDESC lpDesc); extern LPDIRECT3DMATERIAL d3dmaterial_create(IDirect3DImpl* d3d1); extern LPDIRECT3DMATERIAL2 d3dmaterial2_create(IDirect3D2Impl* d3d2); extern LPDIRECT3DVIEWPORT d3dviewport_create(IDirect3DImpl* d3d1); extern LPDIRECT3DVIEWPORT2 d3dviewport2_create(IDirect3D2Impl* d3d2); extern int is_OpenGL_dx3(REFCLSID rguid, IDirectDrawSurfaceImpl* surface, IDirect3DDeviceImpl** device); extern int d3d_OpenGL_dx3(LPD3DENUMDEVICESCALLBACK cb, LPVOID context) ; extern int d3d_OpenGL(LPD3DENUMDEVICESCALLBACK cb, LPVOID context) ; extern int is_OpenGL(REFCLSID rguid, IDirectDrawSurfaceImpl* surface, IDirect3DDevice2Impl** device, IDirect3D2Impl* d3d); extern void _dump_renderstate(D3DRENDERSTATETYPE type, DWORD value); #define dump_mat(mat) \ TRACE("%f %f %f %f\n", (mat)->_11, (mat)->_12, (mat)->_13, (mat)->_14); \ TRACE("%f %f %f %f\n", (mat)->_21, (mat)->_22, (mat)->_23, (mat)->_24); \ TRACE("%f %f %f %f\n", (mat)->_31, (mat)->_32, (mat)->_33, (mat)->_34); \ TRACE("%f %f %f %f\n", (mat)->_41, (mat)->_42, (mat)->_43, (mat)->_44); #endif /* __GRAPHICS_WINE_D3D_PRIVATE_H */ wine-20000526/dlls/ddraw/d3dcommon.c0100644000175000001440000000661507074112033016535 0ustar julliardusers/* Direct3D Common functions (c) 1998 Lionel ULMER This file contains all common miscellaneous code that spans different 'objects' */ #include "windef.h" #include "wine/obj_base.h" #include "ddraw.h" #include "d3d.h" #include "debugtools.h" #include "d3d_private.h" DEFAULT_DEBUG_CHANNEL(ddraw) void _dump_renderstate(D3DRENDERSTATETYPE type, DWORD value) { char *states[] = { NULL, "D3DRENDERSTATE_TEXTUREHANDLE", "D3DRENDERSTATE_ANTIALIAS", "D3DRENDERSTATE_TEXTUREADDRESS", "D3DRENDERSTATE_TEXTUREPERSPECTIVE", "D3DRENDERSTATE_WRAPU", "D3DRENDERSTATE_WRAPV", "D3DRENDERSTATE_ZENABLE", "D3DRENDERSTATE_FILLMODE", "D3DRENDERSTATE_SHADEMODE", "D3DRENDERSTATE_LINEPATTERN", "D3DRENDERSTATE_MONOENABLE", "D3DRENDERSTATE_ROP2", "D3DRENDERSTATE_PLANEMASK", "D3DRENDERSTATE_ZWRITEENABLE", "D3DRENDERSTATE_ALPHATESTENABLE", "D3DRENDERSTATE_LASTPIXEL", "D3DRENDERSTATE_TEXTUREMAG", "D3DRENDERSTATE_TEXTUREMIN", "D3DRENDERSTATE_SRCBLEND", "D3DRENDERSTATE_DESTBLEND", "D3DRENDERSTATE_TEXTUREMAPBLEND", "D3DRENDERSTATE_CULLMODE", "D3DRENDERSTATE_ZFUNC", "D3DRENDERSTATE_ALPHAREF", "D3DRENDERSTATE_ALPHAFUNC", "D3DRENDERSTATE_DITHERENABLE", "D3DRENDERSTATE_ALPHABLENDENABLE", "D3DRENDERSTATE_FOGENABLE", "D3DRENDERSTATE_SPECULARENABLE", "D3DRENDERSTATE_ZVISIBLE", "D3DRENDERSTATE_SUBPIXEL", "D3DRENDERSTATE_SUBPIXELX", "D3DRENDERSTATE_STIPPLEDALPHA", "D3DRENDERSTATE_FOGCOLOR", "D3DRENDERSTATE_FOGTABLEMODE", "D3DRENDERSTATE_FOGTABLESTART", "D3DRENDERSTATE_FOGTABLEEND", "D3DRENDERSTATE_FOGTABLEDENSITY", "D3DRENDERSTATE_STIPPLEENABLE", "D3DRENDERSTATE_EDGEANTIALIAS", "D3DRENDERSTATE_COLORKEYENABLE", "ERR", "D3DRENDERSTATE_BORDERCOLOR", "D3DRENDERSTATE_TEXTUREADDRESSU", "D3DRENDERSTATE_TEXTUREADDRESSV", "D3DRENDERSTATE_MIPMAPLODBIAS", "D3DRENDERSTATE_ZBIAS", "D3DRENDERSTATE_RANGEFOGENABLE", "D3DRENDERSTATE_ANISOTROPY", "D3DRENDERSTATE_FLUSHBATCH", "ERR", "ERR", "ERR", "ERR", "ERR", "ERR", "ERR", "ERR", "ERR", "ERR", "ERR", "ERR", "ERR", "D3DRENDERSTATE_STIPPLEPATTERN00", "D3DRENDERSTATE_STIPPLEPATTERN01", "D3DRENDERSTATE_STIPPLEPATTERN02", "D3DRENDERSTATE_STIPPLEPATTERN03", "D3DRENDERSTATE_STIPPLEPATTERN04", "D3DRENDERSTATE_STIPPLEPATTERN05", "D3DRENDERSTATE_STIPPLEPATTERN06", "D3DRENDERSTATE_STIPPLEPATTERN07", "D3DRENDERSTATE_STIPPLEPATTERN08", "D3DRENDERSTATE_STIPPLEPATTERN09", "D3DRENDERSTATE_STIPPLEPATTERN10", "D3DRENDERSTATE_STIPPLEPATTERN11", "D3DRENDERSTATE_STIPPLEPATTERN12", "D3DRENDERSTATE_STIPPLEPATTERN13", "D3DRENDERSTATE_STIPPLEPATTERN14", "D3DRENDERSTATE_STIPPLEPATTERN15", "D3DRENDERSTATE_STIPPLEPATTERN16", "D3DRENDERSTATE_STIPPLEPATTERN17", "D3DRENDERSTATE_STIPPLEPATTERN18", "D3DRENDERSTATE_STIPPLEPATTERN19", "D3DRENDERSTATE_STIPPLEPATTERN20", "D3DRENDERSTATE_STIPPLEPATTERN21", "D3DRENDERSTATE_STIPPLEPATTERN22", "D3DRENDERSTATE_STIPPLEPATTERN23", "D3DRENDERSTATE_STIPPLEPATTERN24", "D3DRENDERSTATE_STIPPLEPATTERN25", "D3DRENDERSTATE_STIPPLEPATTERN26", "D3DRENDERSTATE_STIPPLEPATTERN27", "D3DRENDERSTATE_STIPPLEPATTERN28", "D3DRENDERSTATE_STIPPLEPATTERN29", "D3DRENDERSTATE_STIPPLEPATTERN30", "D3DRENDERSTATE_STIPPLEPATTERN31" }; DPRINTF(" %s = 0x%08lx\n", states[type], value); } wine-20000526/dlls/ddraw/d3dexecutebuffer.c0100644000175000001440000005666707074112033020115 0ustar julliardusers/* Direct3D ExecuteBuffer (c) 1998 Lionel ULMER This files contains the implementation of Direct3DExecuteBuffer. */ #include #include "config.h" #include "windef.h" #include "winerror.h" #include "wine/obj_base.h" #include "heap.h" #include "ddraw.h" #include "d3d.h" #include "debugtools.h" #include "mesa_private.h" #define D3DDPRIVATE(x) mesa_d3dd_private *odev=((mesa_d3dd_private*)(x)->private) DEFAULT_DEBUG_CHANNEL(ddraw) /* Structure to store the 'semi transformed' vertices */ typedef struct { D3DVALUE x; D3DVALUE y; D3DVALUE z; D3DVALUE w; D3DVALUE nx; D3DVALUE ny; D3DVALUE nz; D3DVALUE u; D3DVALUE v; } OGL_Vertex; typedef struct { D3DVALUE x; D3DVALUE y; D3DVALUE z; D3DVALUE w; D3DCOLOR c; D3DCOLOR sc; D3DVALUE u; D3DVALUE v; } OGL_LVertex; static ICOM_VTABLE(IDirect3DExecuteBuffer) executebuffer_vtable; /******************************************************************************* * ExecuteBuffer static functions */ void _dump_d3dstatus(LPD3DSTATUS lpStatus) { } void _dump_executedata(LPD3DEXECUTEDATA lpData) { DPRINTF("dwSize : %ld\n", lpData->dwSize); DPRINTF("Vertex Offset : %ld Count : %ld\n", lpData->dwVertexOffset, lpData->dwVertexCount); DPRINTF("Instruction Offset : %ld Length : %ld\n", lpData->dwInstructionOffset, lpData->dwInstructionLength); DPRINTF("HVertex Offset : %ld\n", lpData->dwHVertexOffset); _dump_d3dstatus(&(lpData->dsStatus)); } #define DO_VERTEX(index) \ { \ glTexCoord2f(vx[index].u, \ vx[index].v); \ glNormal3f(vx[index].nx, \ vx[index].ny, \ vx[index].nz); \ glVertex4f(vx[index].x, \ vx[index].y, \ vx[index].z, \ vx[index].w); \ \ TRACE(" V: %f %f %f %f (%f %f %f) (%f %f)\n", \ vx[index].x, vx[index].y, vx[index].z, vx[index].w, \ vx[index].nx, vx[index].ny, vx[index].nz, \ vx[index].u, vx[index].v); \ } #define DO_LVERTEX(index) \ { \ DWORD col = l_vx[index].c; \ \ glColor3f(((col >> 16) & 0xFF) / 255.0, \ ((col >> 8) & 0xFF) / 255.0, \ ((col >> 0) & 0xFF) / 255.0); \ glTexCoord2f(l_vx[index].u, \ l_vx[index].v); \ glVertex4f(l_vx[index].x, \ l_vx[index].y, \ l_vx[index].z, \ l_vx[index].w); \ \ TRACE(" LV: %f %f %f %f (%02lx %02lx %02lx) (%f %f)\n", \ l_vx[index].x, l_vx[index].y, l_vx[index].z, l_vx[index].w, \ ((col >> 16) & 0xFF), ((col >> 8) & 0xFF), ((col >> 0) & 0xFF), \ l_vx[index].u, l_vx[index].v); \ } #define DO_TLVERTEX(index) \ { \ D3DTLVERTEX *vx = &(tl_vx[index]); \ DWORD col = vx->c.color; \ \ glColor3f(((col >> 16) & 0xFF) / 255.0, \ ((col >> 8) & 0xFF) / 255.0, \ ((col >> 0) & 0xFF) / 255.0); \ glTexCoord2f(vx->u.tu, vx->v.tv); \ if (vx->r.rhw < 0.01) \ glVertex3f(vx->x.sx, \ vx->y.sy, \ vx->z.sz); \ else \ glVertex4f(vx->x.sx / vx->r.rhw, \ vx->y.sy / vx->r.rhw, \ vx->z.sz / vx->r.rhw, \ 1.0 / vx->r.rhw); \ TRACE(" TLV: %f %f %f (%02lx %02lx %02lx) (%f %f) (%f)\n", \ vx->x.sx, vx->y.sy, vx->z.sz, \ ((col >> 16) & 0xFF), ((col >> 8) & 0xFF), ((col >> 0) & 0xFF), \ vx->u.tu, vx->v.tv, vx->r.rhw); \ } #define TRIANGLE_LOOP(macro) \ { \ glBegin(GL_TRIANGLES); { \ for (i = 0; i < count; i++) { \ LPD3DTRIANGLE ci = (LPD3DTRIANGLE) instr; \ \ TRACE(" v1: %d v2: %d v3: %d\n", \ ci->v1.v1, ci->v2.v2, ci->v3.v3); \ TRACE(" Flags : "); \ if (TRACE_ON(ddraw)) { \ /* Wireframe */ \ if (ci->wFlags & D3DTRIFLAG_EDGEENABLE1) \ DPRINTF("EDGEENABLE1 "); \ if (ci->wFlags & D3DTRIFLAG_EDGEENABLE2) \ DPRINTF("EDGEENABLE2 "); \ if (ci->wFlags & D3DTRIFLAG_EDGEENABLE1) \ DPRINTF("EDGEENABLE3 "); \ \ /* Strips / Fans */ \ if (ci->wFlags == D3DTRIFLAG_EVEN) \ DPRINTF("EVEN "); \ if (ci->wFlags == D3DTRIFLAG_ODD) \ DPRINTF("ODD "); \ if (ci->wFlags == D3DTRIFLAG_START) \ DPRINTF("START "); \ if ((ci->wFlags > 0) && (ci->wFlags < 30)) \ DPRINTF("STARTFLAT(%d) ", ci->wFlags); \ DPRINTF("\n"); \ } \ \ /* Draw the triangle */ \ macro(ci->v1.v1); \ macro(ci->v2.v2); \ macro(ci->v3.v3); \ \ instr += size; \ } \ } glEnd(); \ } static void execute(LPDIRECT3DEXECUTEBUFFER lpBuff, LPDIRECT3DDEVICE dev, LPDIRECT3DVIEWPORT vp) { IDirect3DExecuteBufferImpl* ilpBuff=(IDirect3DExecuteBufferImpl*)lpBuff; IDirect3DViewport2Impl* ivp=(IDirect3DViewport2Impl*)vp; /* DWORD bs = ilpBuff->desc.dwBufferSize; */ DWORD vs = ilpBuff->data.dwVertexOffset; /* DWORD vc = ilpBuff->data.dwVertexCount; */ DWORD is = ilpBuff->data.dwInstructionOffset; /* DWORD il = ilpBuff->data.dwInstructionLength; */ void *instr = ilpBuff->desc.lpData + is; D3DDPRIVATE((IDirect3DDeviceImpl*)dev); TRACE("ExecuteData : \n"); if (TRACE_ON(ddraw)) _dump_executedata(&(ilpBuff->data)); ENTER_GL(); while (1) { LPD3DINSTRUCTION current = (LPD3DINSTRUCTION) instr; BYTE size; WORD count; count = current->wCount; size = current->bSize; instr += sizeof(D3DINSTRUCTION); switch (current->bOpcode) { case D3DOP_POINT: { TRACE("POINT-s (%d)\n", count); instr += count * size; } break; case D3DOP_LINE: { TRACE("LINE-s (%d)\n", count); instr += count * size; } break; case D3DOP_TRIANGLE: { int i; float z_inv_matrix[16] = { 1.0, 0.0, 0.0, 0.0, 0.0, 1.0, 0.0, 0.0, 0.0, 0.0, -1.0, 0.0, 0.0, 0.0, 1.0, 1.0 }; OGL_Vertex *vx = (OGL_Vertex *) ilpBuff->vertex_data; OGL_LVertex *l_vx = (OGL_LVertex *) ilpBuff->vertex_data; D3DTLVERTEX *tl_vx = (D3DTLVERTEX *) ilpBuff->vertex_data; TRACE("TRIANGLE (%d)\n", count); switch (ilpBuff->vertex_type) { case D3DVT_VERTEX: /* This time, there is lighting */ glEnable(GL_LIGHTING); /* Use given matrixes */ glMatrixMode(GL_MODELVIEW); glLoadIdentity(); /* The model transformation was done during the transformation phase */ glMatrixMode(GL_PROJECTION); TRACE(" Projection Matrix : (%p)\n", odev->proj_mat); dump_mat(odev->proj_mat); TRACE(" View Matrix : (%p)\n", odev->view_mat); dump_mat(odev->view_mat); glLoadMatrixf((float *) z_inv_matrix); glMultMatrixf((float *) odev->proj_mat); glMultMatrixf((float *) odev->view_mat); break; case D3DVT_LVERTEX: /* No lighting */ glDisable(GL_LIGHTING); /* Use given matrixes */ glMatrixMode(GL_MODELVIEW); glLoadIdentity(); /* The model transformation was done during the transformation phase */ glMatrixMode(GL_PROJECTION); TRACE(" Projection Matrix : (%p)\n", odev->proj_mat); dump_mat(odev->proj_mat); TRACE(" View Matrix : (%p)\n", odev->view_mat); dump_mat(odev->view_mat); glLoadMatrixf((float *) z_inv_matrix); glMultMatrixf((float *) odev->proj_mat); glMultMatrixf((float *) odev->view_mat); break; case D3DVT_TLVERTEX: { GLdouble height, width, minZ, maxZ; /* First, disable lighting */ glDisable(GL_LIGHTING); /* Then do not put any transformation matrixes */ glMatrixMode(GL_MODELVIEW); glLoadIdentity(); glMatrixMode(GL_PROJECTION); glLoadIdentity(); if (ivp == NULL) { ERR("No current viewport !\n"); /* Using standard values */ height = 640.0; width = 480.0; minZ = -10.0; maxZ = 10.0; } else { height = (GLdouble) ivp->viewport.vp1.dwHeight; width = (GLdouble) ivp->viewport.vp1.dwWidth; minZ = (GLdouble) ivp->viewport.vp1.dvMinZ; maxZ = (GLdouble) ivp->viewport.vp1.dvMaxZ; if (minZ == maxZ) { /* I do not know why, but many Dx 3.0 games have minZ = maxZ = 0.0 */ minZ = 0.0; maxZ = 1.0; } } glOrtho(0.0, width, height, 0.0, -minZ, -maxZ); } break; default: ERR("Unhandled vertex type !\n"); break; } switch (ilpBuff->vertex_type) { case D3DVT_VERTEX: TRIANGLE_LOOP(DO_VERTEX); break; case D3DVT_LVERTEX: TRIANGLE_LOOP(DO_LVERTEX); break; case D3DVT_TLVERTEX: TRIANGLE_LOOP(DO_TLVERTEX); break; default: ERR("Unhandled vertex type !\n"); } } break; case D3DOP_MATRIXLOAD: { TRACE("MATRIXLOAD-s (%d)\n", count); instr += count * size; } break; case D3DOP_MATRIXMULTIPLY: { int i; TRACE("MATRIXMULTIPLY (%d)\n", count); for (i = 0; i < count; i++) { LPD3DMATRIXMULTIPLY ci = (LPD3DMATRIXMULTIPLY) instr; LPD3DMATRIX a = (LPD3DMATRIX) ci->hDestMatrix; LPD3DMATRIX b = (LPD3DMATRIX) ci->hSrcMatrix1; LPD3DMATRIX c = (LPD3DMATRIX) ci->hSrcMatrix2; TRACE(" Dest : %08lx Src1 : %08lx Src2 : %08lx\n", ci->hDestMatrix, ci->hSrcMatrix1, ci->hSrcMatrix2); /* Do the multiplication.. As I am VERY lazy, I let OpenGL do the multiplication for me */ glMatrixMode(GL_PROJECTION); /* Save the current matrix */ glPushMatrix(); /* Load Matrix one and do the multiplication */ glLoadMatrixf((float *) c); glMultMatrixf((float *) b); glGetFloatv(GL_PROJECTION_MATRIX, (float *) a); /* Restore the current matrix */ glPopMatrix(); instr += size; } } break; case D3DOP_STATETRANSFORM: { int i; TRACE("STATETRANSFORM (%d)\n", count); for (i = 0; i < count; i++) { LPD3DSTATE ci = (LPD3DSTATE) instr; /* Handle the state transform */ switch (ci->t.dtstTransformStateType) { case D3DTRANSFORMSTATE_WORLD: { TRACE(" WORLD (%p)\n", (D3DMATRIX*) ci->v.dwArg[0]); odev->world_mat = (D3DMATRIX*) ci->v.dwArg[0]; } break; case D3DTRANSFORMSTATE_VIEW: { TRACE(" VIEW (%p)\n", (D3DMATRIX*) ci->v.dwArg[0]); odev->view_mat = (D3DMATRIX*) ci->v.dwArg[0]; } break; case D3DTRANSFORMSTATE_PROJECTION: { TRACE(" PROJECTION (%p)\n", (D3DMATRIX*) ci->v.dwArg[0]); odev->proj_mat = (D3DMATRIX*) ci->v.dwArg[0]; } break; default: ERR(" Unhandled state transformation !! (%d)\n", (int) ci->t.dtstTransformStateType); break; } instr += size; } } break; case D3DOP_STATELIGHT: { int i; TRACE("STATELIGHT (%d)\n", count); for (i = 0; i < count; i++) { LPD3DSTATE ci = (LPD3DSTATE) instr; /* Handle the state transform */ switch (ci->t.dlstLightStateType) { case D3DLIGHTSTATE_MATERIAL: { IDirect3DMaterial2Impl* mat = (IDirect3DMaterial2Impl*) ci->v.dwArg[0]; TRACE(" MATERIAL\n"); if (mat != NULL) { mat->activate(mat); } else { TRACE(" bad Material Handle\n"); } } break ; case D3DLIGHTSTATE_AMBIENT: { float light[4]; DWORD dwLightState = ci->v.dwArg[0]; TRACE(" AMBIENT\n"); light[0] = ((dwLightState >> 16) & 0xFF) / 255.0; light[1] = ((dwLightState >> 8) & 0xFF) / 255.0; light[2] = ((dwLightState >> 0) & 0xFF) / 255.0; light[3] = 1.0; glLightModelfv(GL_LIGHT_MODEL_AMBIENT, (float *) light); TRACE(" R:%02lx G:%02lx B:%02lx A:%02lx\n", ((dwLightState >> 16) & 0xFF), ((dwLightState >> 8) & 0xFF), ((dwLightState >> 0) & 0xFF), ((dwLightState >> 24) & 0xFF)); } break ; case D3DLIGHTSTATE_COLORMODEL: { TRACE(" COLORMODEL\n"); } break ; case D3DLIGHTSTATE_FOGMODE: { TRACE(" FOGMODE\n"); } break ; case D3DLIGHTSTATE_FOGSTART: { TRACE(" FOGSTART\n"); } break ; case D3DLIGHTSTATE_FOGEND: { TRACE(" FOGEND\n"); } break ; case D3DLIGHTSTATE_FOGDENSITY: { TRACE(" FOGDENSITY\n"); } break ; default: ERR(" Unhandled light state !! (%d)\n", (int) ci->t.dlstLightStateType); break; } instr += size; } } break; case D3DOP_STATERENDER: { int i; TRACE("STATERENDER (%d)\n", count); for (i = 0; i < count; i++) { LPD3DSTATE ci = (LPD3DSTATE) instr; /* Handle the state transform */ set_render_state(ci->t.drstRenderStateType, ci->v.dwArg[0], &(odev->rs)); instr += size; } } break; case D3DOP_PROCESSVERTICES: { int i; TRACE("PROCESSVERTICES (%d)\n", count); for (i = 0; i < count; i++) { LPD3DPROCESSVERTICES ci = (LPD3DPROCESSVERTICES) instr; TRACE(" Start : %d Dest : %d Count : %ld\n", ci->wStart, ci->wDest, ci->dwCount); TRACE(" Flags : "); if (TRACE_ON(ddraw)) { if (ci->dwFlags & D3DPROCESSVERTICES_COPY) DPRINTF("COPY "); if (ci->dwFlags & D3DPROCESSVERTICES_NOCOLOR) DPRINTF("NOCOLOR "); if (ci->dwFlags == D3DPROCESSVERTICES_OPMASK) DPRINTF("OPMASK "); if (ci->dwFlags & D3DPROCESSVERTICES_TRANSFORM) DPRINTF("TRANSFORM "); if (ci->dwFlags == D3DPROCESSVERTICES_TRANSFORMLIGHT) DPRINTF("TRANSFORMLIGHT "); if (ci->dwFlags & D3DPROCESSVERTICES_UPDATEEXTENTS) DPRINTF("UPDATEEXTENTS "); DPRINTF("\n"); } /* This is where doing Direct3D on top on OpenGL is quite difficult. This method transforms a set of vertices using the CURRENT state (lighting, projection, ...) but does not rasterize them. They will oinly be put on screen later (with the POINT / LINE and TRIANGLE op-codes). The problem is that you can have a triangle with each point having been transformed using another state... In this implementation, I will emulate only ONE thing : each vertex can have its own "WORLD" transformation (this is used in the TWIST.EXE demo of the 5.2 SDK). I suppose that all vertices of the execute buffer use the same state. If I find applications that change other states, I will try to do a more 'fine-tuned' state emulation (but I may become quite tricky if it changes a light position in the middle of a triangle). In this case, a 'direct' approach (i.e. without using OpenGL, but writing our own 3D rasterizer) would be easier. */ /* The current method (with the hypothesis that only the WORLD matrix will change between two points) is like this : - I transform 'manually' all the vertices with the current WORLD matrix and store them in the vertex buffer - during the rasterization phase, the WORLD matrix will be set to the Identity matrix */ /* Enough for the moment */ if (ci->dwFlags == D3DPROCESSVERTICES_TRANSFORMLIGHT) { int nb; D3DVERTEX *src = ((LPD3DVERTEX) (ilpBuff->desc.lpData + vs)) + ci->wStart; OGL_Vertex *dst = ((OGL_Vertex *) (ilpBuff->vertex_data)) + ci->wDest; D3DMATRIX *mat = odev->world_mat; TRACE(" World Matrix : (%p)\n", mat); dump_mat(mat); ilpBuff->vertex_type = D3DVT_VERTEX; for (nb = 0; nb < ci->dwCount; nb++) { /* For the moment, no normal transformation... */ dst->nx = src->nx.nx; dst->ny = src->ny.ny; dst->nz = src->nz.nz; dst->u = src->u.tu; dst->v = src->v.tv; /* Now, the matrix multiplication */ dst->x = (src->x.x * mat->_11) + (src->y.y * mat->_21) + (src->z.z * mat->_31) + (1.0 * mat->_41); dst->y = (src->x.x * mat->_12) + (src->y.y * mat->_22) + (src->z.z * mat->_32) + (1.0 * mat->_42); dst->z = (src->x.x * mat->_13) + (src->y.y * mat->_23) + (src->z.z * mat->_33) + (1.0 * mat->_43); dst->w = (src->x.x * mat->_14) + (src->y.y * mat->_24) + (src->z.z * mat->_34) + (1.0 * mat->_44); src++; dst++; } } else if (ci->dwFlags == D3DPROCESSVERTICES_TRANSFORM) { int nb; D3DLVERTEX *src = ((LPD3DLVERTEX) (ilpBuff->desc.lpData + vs)) + ci->wStart; OGL_LVertex *dst = ((OGL_LVertex *) (ilpBuff->vertex_data)) + ci->wDest; D3DMATRIX *mat = odev->world_mat; TRACE(" World Matrix : (%p)\n", mat); dump_mat(mat); ilpBuff->vertex_type = D3DVT_LVERTEX; for (nb = 0; nb < ci->dwCount; nb++) { dst->c = src->c.color; dst->sc = src->s.specular; dst->u = src->u.tu; dst->v = src->v.tv; /* Now, the matrix multiplication */ dst->x = (src->x.x * mat->_11) + (src->y.y * mat->_21) + (src->z.z * mat->_31) + (1.0 * mat->_41); dst->y = (src->x.x * mat->_12) + (src->y.y * mat->_22) + (src->z.z * mat->_32) + (1.0 * mat->_42); dst->z = (src->x.x * mat->_13) + (src->y.y * mat->_23) + (src->z.z * mat->_33) + (1.0 * mat->_43); dst->w = (src->x.x * mat->_14) + (src->y.y * mat->_24) + (src->z.z * mat->_34) + (1.0 * mat->_44); src++; dst++; } } else if (ci->dwFlags == D3DPROCESSVERTICES_COPY) { D3DTLVERTEX *src = ((LPD3DTLVERTEX) (ilpBuff->desc.lpData + vs)) + ci->wStart; D3DTLVERTEX *dst = ((LPD3DTLVERTEX) (ilpBuff->vertex_data)) + ci->wDest; ilpBuff->vertex_type = D3DVT_TLVERTEX; memcpy(dst, src, ci->dwCount * sizeof(D3DTLVERTEX)); } else { ERR("Unhandled vertex processing !\n"); } instr += size; } } break; case D3DOP_TEXTURELOAD: { TRACE("TEXTURELOAD-s (%d)\n", count); instr += count * size; } break; case D3DOP_EXIT: { TRACE("EXIT (%d)\n", count); /* We did this instruction */ instr += size; /* Exit this loop */ goto end_of_buffer; } break; case D3DOP_BRANCHFORWARD: { int i; TRACE("BRANCHFORWARD (%d)\n", count); for (i = 0; i < count; i++) { LPD3DBRANCH ci = (LPD3DBRANCH) instr; if ((ilpBuff->data.dsStatus.dwStatus & ci->dwMask) == ci->dwValue) { if (!ci->bNegate) { TRACE(" Should branch to %ld\n", ci->dwOffset); } } else { if (ci->bNegate) { TRACE(" Should branch to %ld\n", ci->dwOffset); } } instr += size; } } break; case D3DOP_SPAN: { TRACE("SPAN-s (%d)\n", count); instr += count * size; } break; case D3DOP_SETSTATUS: { int i; TRACE("SETSTATUS (%d)\n", count); for (i = 0; i < count; i++) { LPD3DSTATUS ci = (LPD3DSTATUS) instr; ilpBuff->data.dsStatus = *ci; instr += size; } } break; default: ERR("Unhandled OpCode !!!\n"); /* Try to save ... */ instr += count * size; break; } } end_of_buffer: LEAVE_GL(); } /******************************************************************************* * ExecuteBuffer Creation functions */ LPDIRECT3DEXECUTEBUFFER d3dexecutebuffer_create(IDirect3DDeviceImpl* d3ddev, LPD3DEXECUTEBUFFERDESC lpDesc) { IDirect3DExecuteBufferImpl* eb; eb = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirect3DExecuteBufferImpl)); eb->ref = 1; ICOM_VTBL(eb) = &executebuffer_vtable; eb->d3ddev = d3ddev; /* Initializes memory */ eb->desc = *lpDesc; /* No buffer given */ if (!(eb->desc.dwFlags & D3DDEB_LPDATA)) eb->desc.lpData = NULL; /* No buffer size given */ if (!(lpDesc->dwFlags & D3DDEB_BUFSIZE)) eb->desc.dwBufferSize = 0; /* Create buffer if asked */ if ((eb->desc.lpData == NULL) && (eb->desc.dwBufferSize > 0)) { eb->need_free = TRUE; eb->desc.lpData = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,eb->desc.dwBufferSize); } else { eb->need_free = FALSE; } /* No vertices for the moment */ eb->vertex_data = NULL; eb->desc.dwFlags |= D3DDEB_LPDATA; eb->execute = execute; return (LPDIRECT3DEXECUTEBUFFER)eb; } /******************************************************************************* * IDirect3ExecuteBuffer methods */ static HRESULT WINAPI IDirect3DExecuteBufferImpl_QueryInterface(LPDIRECT3DEXECUTEBUFFER iface, REFIID riid, LPVOID* ppvObj) { ICOM_THIS(IDirect3DExecuteBufferImpl,iface); FIXME("(%p)->(%s,%p): stub\n", This, debugstr_guid(riid),ppvObj); return S_OK; } static ULONG WINAPI IDirect3DExecuteBufferImpl_AddRef(LPDIRECT3DEXECUTEBUFFER iface) { ICOM_THIS(IDirect3DExecuteBufferImpl,iface); TRACE("(%p)->()incrementing from %lu.\n", This, This->ref ); return ++(This->ref); } static ULONG WINAPI IDirect3DExecuteBufferImpl_Release(LPDIRECT3DEXECUTEBUFFER iface) { ICOM_THIS(IDirect3DExecuteBufferImpl,iface); FIXME("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { if ((This->desc.lpData != NULL) && This->need_free) HeapFree(GetProcessHeap(),0,This->desc.lpData); if (This->vertex_data != NULL) HeapFree(GetProcessHeap(),0,This->vertex_data); HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } static HRESULT WINAPI IDirect3DExecuteBufferImpl_Initialize(LPDIRECT3DEXECUTEBUFFER iface, LPDIRECT3DDEVICE lpDirect3DDevice, LPD3DEXECUTEBUFFERDESC lpDesc) { ICOM_THIS(IDirect3DExecuteBufferImpl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lpDirect3DDevice, lpDesc); return DD_OK; } static HRESULT WINAPI IDirect3DExecuteBufferImpl_Lock(LPDIRECT3DEXECUTEBUFFER iface, LPD3DEXECUTEBUFFERDESC lpDesc) { ICOM_THIS(IDirect3DExecuteBufferImpl,iface); TRACE("(%p)->(%p)\n", This, lpDesc); /* Copies the buffer description */ *lpDesc = This->desc; return DD_OK; } static HRESULT WINAPI IDirect3DExecuteBufferImpl_Unlock(LPDIRECT3DEXECUTEBUFFER iface) { ICOM_THIS(IDirect3DExecuteBufferImpl,iface); TRACE("(%p)->()\n", This); return DD_OK; } static HRESULT WINAPI IDirect3DExecuteBufferImpl_SetExecuteData(LPDIRECT3DEXECUTEBUFFER iface, LPD3DEXECUTEDATA lpData) { ICOM_THIS(IDirect3DExecuteBufferImpl,iface); DWORD nbvert; TRACE("(%p)->(%p)\n", This, lpData); This->data = *lpData; /* Get the number of vertices in the execute buffer */ nbvert = This->data.dwVertexCount; /* Prepares the transformed vertex buffer */ if (This->vertex_data != NULL) HeapFree(GetProcessHeap(), 0, This->vertex_data); This->vertex_data = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,nbvert * sizeof(OGL_Vertex)); if (TRACE_ON(ddraw)) { _dump_executedata(lpData); } return DD_OK; } static HRESULT WINAPI IDirect3DExecuteBufferImpl_GetExecuteData(LPDIRECT3DEXECUTEBUFFER iface, LPD3DEXECUTEDATA lpData) { ICOM_THIS(IDirect3DExecuteBufferImpl,iface); TRACE("(%p)->(%p): stub\n", This, lpData); *lpData = This->data; return DD_OK; } static HRESULT WINAPI IDirect3DExecuteBufferImpl_Validate(LPDIRECT3DEXECUTEBUFFER iface, LPDWORD lpdwOffset, LPD3DVALIDATECALLBACK lpFunc, LPVOID lpUserArg, DWORD dwReserved) { ICOM_THIS(IDirect3DExecuteBufferImpl,iface); TRACE("(%p)->(%p,%p,%p,%lu)\n", This, lpdwOffset, lpFunc, lpUserArg, dwReserved); return DD_OK; } static HRESULT WINAPI IDirect3DExecuteBufferImpl_Optimize(LPDIRECT3DEXECUTEBUFFER iface, DWORD dwReserved) { ICOM_THIS(IDirect3DExecuteBufferImpl,iface); TRACE("(%p)->(%lu)\n", This, dwReserved); return DD_OK; } /******************************************************************************* * IDirect3DLight VTable */ static ICOM_VTABLE(IDirect3DExecuteBuffer) executebuffer_vtable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE /*** IUnknown methods ***/ IDirect3DExecuteBufferImpl_QueryInterface, IDirect3DExecuteBufferImpl_AddRef, IDirect3DExecuteBufferImpl_Release, /*** IDirect3DExecuteBuffer methods ***/ IDirect3DExecuteBufferImpl_Initialize, IDirect3DExecuteBufferImpl_Lock, IDirect3DExecuteBufferImpl_Unlock, IDirect3DExecuteBufferImpl_SetExecuteData, IDirect3DExecuteBufferImpl_GetExecuteData, IDirect3DExecuteBufferImpl_Validate, IDirect3DExecuteBufferImpl_Optimize }; wine-20000526/dlls/ddraw/d3dlight.c0100644000175000001440000001330107074112033016342 0ustar julliardusers/* Direct3D Light (c) 1998 Lionel ULMER This files contains the implementation of Direct3DLight. */ #include "config.h" #include "windef.h" #include "winerror.h" #include "wine/obj_base.h" #include "heap.h" #include "ddraw.h" #include "d3d.h" #include "debugtools.h" #include "mesa_private.h" DEFAULT_DEBUG_CHANNEL(ddraw) #define D3DLPRIVATE(x) mesa_d3dl_private*dlpriv=((mesa_d3dl_private*)x->private) static ICOM_VTABLE(IDirect3DLight) light_vtable; enum { D3D_1, D3D_2 }; /******************************************************************************* * Light static functions */ static const float zero_value[] = { 0.0, 0.0, 0.0, 0.0 }; static void update(IDirect3DLightImpl* This) { D3DLPRIVATE(This); switch (This->light.dltType) { case D3DLIGHT_POINT: /* 1 */ TRACE("Activating POINT\n"); break; case D3DLIGHT_SPOT: /* 2 */ TRACE("Activating SPOT\n"); break; case D3DLIGHT_DIRECTIONAL: { /* 3 */ float direction[4]; TRACE("Activating DIRECTIONAL\n"); TRACE(" direction : %f %f %f\n", This->light.dvDirection.x.x, This->light.dvDirection.y.y, This->light.dvDirection.z.z); _dump_colorvalue(" color ", This->light.dcvColor); glLightfv(dlpriv->light_num, GL_AMBIENT, (float *) zero_value); glLightfv(dlpriv->light_num, GL_DIFFUSE, (float *) &(This->light.dcvColor)); direction[0] = -This->light.dvDirection.x.x; direction[1] = -This->light.dvDirection.y.y; direction[2] = -This->light.dvDirection.z.z; direction[3] = 0.0; /* This is a directional light */ glLightfv(dlpriv->light_num, GL_POSITION, (float *) direction); } break; case D3DLIGHT_PARALLELPOINT: /* 4 */ TRACE("Activating PARRALLEL-POINT\n"); break; default: TRACE("Not a known Light Type: %d\n",This->light.dltType); break; } } static void activate(IDirect3DLightImpl* This) { D3DLPRIVATE(This); ENTER_GL(); update(This); /* If was not active, activate it */ if (This->is_active == 0) { glEnable(dlpriv->light_num); This->is_active = 1; } LEAVE_GL(); return ; } /******************************************************************************* * Light Creation functions */ LPDIRECT3DLIGHT d3dlight_create(IDirect3D2Impl* d3d2) { IDirect3DLightImpl* light; light = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirect3DLightImpl)); light->ref = 1; ICOM_VTBL(light) = &light_vtable; light->d3d.d3d2 = d3d2; light->type = D3D_2; light->next = NULL; light->prev = NULL; light->activate = activate; light->is_active = 0; return (LPDIRECT3DLIGHT)light; } LPDIRECT3DLIGHT d3dlight_create_dx3(IDirect3DImpl* d3d1) { IDirect3DLightImpl* light; light = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirect3DLightImpl)); light->ref = 1; ICOM_VTBL(light) = &light_vtable; light->d3d.d3d1 = d3d1; light->type = D3D_1; light->next = NULL; light->prev = NULL; light->activate = activate; light->is_active = 0; return (LPDIRECT3DLIGHT)light; } /******************************************************************************* * IDirect3DLight methods */ static HRESULT WINAPI IDirect3DLightImpl_QueryInterface(LPDIRECT3DLIGHT iface, REFIID riid, LPVOID* ppvObj) { ICOM_THIS(IDirect3DLightImpl,iface); FIXME("(%p)->(%s,%p): stub\n", This, debugstr_guid(riid),ppvObj); return S_OK; } static ULONG WINAPI IDirect3DLightImpl_AddRef(LPDIRECT3DLIGHT iface) { ICOM_THIS(IDirect3DLightImpl,iface); TRACE("(%p)->()incrementing from %lu.\n", This, This->ref ); return ++(This->ref); } static ULONG WINAPI IDirect3DLightImpl_Release(LPDIRECT3DLIGHT iface) { ICOM_THIS(IDirect3DLightImpl,iface); FIXME("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } /*** IDirect3DLight methods ***/ static void dump_light(LPD3DLIGHT light) { DPRINTF(" dwSize : %ld\n", light->dwSize); } static HRESULT WINAPI IDirect3DLightImpl_GetLight(LPDIRECT3DLIGHT iface, LPD3DLIGHT lpLight) { ICOM_THIS(IDirect3DLightImpl,iface); TRACE("(%p)->(%p)\n", This, lpLight); if (TRACE_ON(ddraw)) dump_light(lpLight); /* Copies the light structure */ switch (This->type) { case D3D_1: *((LPD3DLIGHT)lpLight) = *((LPD3DLIGHT) &(This->light)); break; case D3D_2: *((LPD3DLIGHT2)lpLight) = *((LPD3DLIGHT2) &(This->light)); break; } return DD_OK; } static HRESULT WINAPI IDirect3DLightImpl_SetLight(LPDIRECT3DLIGHT iface, LPD3DLIGHT lpLight) { ICOM_THIS(IDirect3DLightImpl,iface); TRACE("(%p)->(%p)\n", This, lpLight); if (TRACE_ON(ddraw)) dump_light(lpLight); /* Stores the light */ switch (This->type) { case D3D_1: *((LPD3DLIGHT) &(This->light)) = *((LPD3DLIGHT)lpLight); break; case D3D_2: *((LPD3DLIGHT2) &(This->light)) = *((LPD3DLIGHT2)lpLight); break; } ENTER_GL(); if (This->is_active) update(This); LEAVE_GL(); return DD_OK; } static HRESULT WINAPI IDirect3DLightImpl_Initialize(LPDIRECT3DLIGHT iface, LPDIRECT3D lpDirect3D) { ICOM_THIS(IDirect3DLightImpl,iface); TRACE("(%p)->(%p)\n", This, lpDirect3D); return DDERR_ALREADYINITIALIZED; } /******************************************************************************* * IDirect3DLight VTable */ static ICOM_VTABLE(IDirect3DLight) light_vtable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE /*** IUnknown methods ***/ IDirect3DLightImpl_QueryInterface, IDirect3DLightImpl_AddRef, IDirect3DLightImpl_Release, /*** IDirect3DLight methods ***/ IDirect3DLightImpl_Initialize, IDirect3DLightImpl_SetLight, IDirect3DLightImpl_GetLight }; wine-20000526/dlls/ddraw/d3dmaterial.c0100644000175000001440000001461107074112033017036 0ustar julliardusers/* Direct3D Material (c) 1998 Lionel ULMER This files contains the implementation of Direct3DMaterial2. */ #include "config.h" #include "windef.h" #include "winerror.h" #include "wine/obj_base.h" #include "heap.h" #include "ddraw.h" #include "d3d.h" #include "debugtools.h" #include "mesa_private.h" DEFAULT_DEBUG_CHANNEL(ddraw) static ICOM_VTABLE(IDirect3DMaterial2) material2_vtable; static ICOM_VTABLE(IDirect3DMaterial) material_vtable; /******************************************************************************* * Matrial2 static functions */ static void activate(IDirect3DMaterial2Impl* This) { TRACE("Activating material %p\n", This); ENTER_GL(); /* First, set the rendering context */ if (This->use_d3d2) This->device.active_device2->set_context(This->device.active_device2); else This->device.active_device1->set_context(This->device.active_device1); /* Set the current Material */ _dump_colorvalue("Diffuse", This->mat.a.diffuse); glMaterialfv(GL_FRONT, GL_DIFFUSE, (float *) &(This->mat.a.diffuse)); _dump_colorvalue("Ambient", This->mat.b.ambient); glMaterialfv(GL_FRONT, GL_AMBIENT, (float *) &(This->mat.b.ambient)); _dump_colorvalue("Specular", This->mat.c.specular); glMaterialfv(GL_FRONT, GL_SPECULAR, (float *) &(This->mat.c.specular)); _dump_colorvalue("Emissive", This->mat.d.emissive); glMaterialfv(GL_FRONT, GL_EMISSION, (float *) &(This->mat.d.emissive)); TRACE("Size : %ld\n", This->mat.dwSize); TRACE("Power : %f\n", This->mat.e.power); TRACE("Texture handle : %08lx\n", (DWORD)This->mat.hTexture); LEAVE_GL(); return ; } /******************************************************************************* * Matrial2 Creation functions */ LPDIRECT3DMATERIAL2 d3dmaterial2_create(IDirect3D2Impl* d3d2) { IDirect3DMaterial2Impl* mat; mat = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirect3DMaterial2Impl)); mat->ref = 1; ICOM_VTBL(mat) = &material2_vtable; mat->use_d3d2 = 1; mat->d3d.d3d2 = d3d2; mat->activate = activate; return (LPDIRECT3DMATERIAL2)mat; } LPDIRECT3DMATERIAL d3dmaterial_create(IDirect3DImpl* d3d1) { IDirect3DMaterial2Impl* mat; mat = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirect3DMaterial2Impl)); mat->ref = 1; ICOM_VTBL(mat) = (ICOM_VTABLE(IDirect3DMaterial2)*)&material_vtable; mat->use_d3d2 = 0; mat->d3d.d3d1 = d3d1; mat->activate = activate; return (LPDIRECT3DMATERIAL) mat; } /******************************************************************************* * IDirect3DMaterial2 methods */ static HRESULT WINAPI IDirect3DMaterial2Impl_QueryInterface(LPDIRECT3DMATERIAL2 iface, REFIID riid, LPVOID* ppvObj) { ICOM_THIS(IDirect3DMaterial2Impl,iface); FIXME("(%p)->(%s,%p): stub\n", This, debugstr_guid(riid),ppvObj); return S_OK; } static ULONG WINAPI IDirect3DMaterial2Impl_AddRef(LPDIRECT3DMATERIAL2 iface) { ICOM_THIS(IDirect3DMaterial2Impl,iface); TRACE("(%p)->()incrementing from %lu.\n", This, This->ref ); return ++(This->ref); } static ULONG WINAPI IDirect3DMaterial2Impl_Release(LPDIRECT3DMATERIAL2 iface) { ICOM_THIS(IDirect3DMaterial2Impl,iface); FIXME("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } /*** IDirect3DMaterial2 methods ***/ static void dump_material(LPD3DMATERIAL mat) { DPRINTF(" dwSize : %ld\n", mat->dwSize); } static HRESULT WINAPI IDirect3DMaterial2Impl_GetMaterial(LPDIRECT3DMATERIAL2 iface, LPD3DMATERIAL lpMat) { ICOM_THIS(IDirect3DMaterial2Impl,iface); TRACE("(%p)->(%p)\n", This, lpMat); if (TRACE_ON(ddraw)) dump_material(lpMat); /* Copies the material structure */ *lpMat = This->mat; return DD_OK; } static HRESULT WINAPI IDirect3DMaterial2Impl_SetMaterial(LPDIRECT3DMATERIAL2 iface, LPD3DMATERIAL lpMat) { ICOM_THIS(IDirect3DMaterial2Impl,iface); TRACE("(%p)->(%p)\n", This, lpMat); if (TRACE_ON(ddraw)) dump_material(lpMat); /* Stores the material */ This->mat = *lpMat; return DD_OK; } static HRESULT WINAPI IDirect3DMaterial2Impl_GetHandle(LPDIRECT3DMATERIAL2 iface, LPDIRECT3DDEVICE2 lpD3DDevice2, LPD3DMATERIALHANDLE lpMatHandle) { ICOM_THIS(IDirect3DMaterial2Impl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lpD3DDevice2, lpMatHandle); if (This->use_d3d2) This->device.active_device2 = (IDirect3DDevice2Impl*)lpD3DDevice2; else This->device.active_device1 = (IDirect3DDeviceImpl*)lpD3DDevice2; *lpMatHandle = (DWORD) This; /* lpD3DDevice2->store_material(This); */ return DD_OK; } static HRESULT WINAPI IDirect3DMaterialImpl_Reserve(LPDIRECT3DMATERIAL iface) { ICOM_THIS(IDirect3DMaterial2Impl,iface); FIXME("(%p)->(): stub\n", This); return DDERR_INVALIDPARAMS; } static HRESULT WINAPI IDirect3DMaterialImpl_Unreserve(LPDIRECT3DMATERIAL iface) { ICOM_THIS(IDirect3DMaterial2Impl,iface); FIXME("(%p)->(): stub\n", This); return DDERR_INVALIDPARAMS; } static HRESULT WINAPI IDirect3DMaterialImpl_Initialize(LPDIRECT3DMATERIAL iface, LPDIRECT3D lpDirect3D) { ICOM_THIS(IDirect3DMaterial2Impl,iface); TRACE("(%p)->(%p)\n", This, lpDirect3D); return DDERR_ALREADYINITIALIZED; } /******************************************************************************* * IDirect3DMaterial VTable */ static ICOM_VTABLE(IDirect3DMaterial) material_vtable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE /*** IUnknown methods ***/ IDirect3DMaterial2Impl_QueryInterface, IDirect3DMaterial2Impl_AddRef, IDirect3DMaterial2Impl_Release, /*** IDirect3DMaterial methods ***/ IDirect3DMaterialImpl_Initialize, IDirect3DMaterial2Impl_SetMaterial, IDirect3DMaterial2Impl_GetMaterial, IDirect3DMaterial2Impl_GetHandle, IDirect3DMaterialImpl_Reserve, IDirect3DMaterialImpl_Unreserve }; /******************************************************************************* * IDirect3DMaterial2 VTable */ static ICOM_VTABLE(IDirect3DMaterial2) material2_vtable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE /*** IUnknown methods ***/ IDirect3DMaterial2Impl_QueryInterface, IDirect3DMaterial2Impl_AddRef, IDirect3DMaterial2Impl_Release, /*** IDirect3DMaterial methods ***/ IDirect3DMaterial2Impl_SetMaterial, IDirect3DMaterial2Impl_GetMaterial, IDirect3DMaterial2Impl_GetHandle }; wine-20000526/dlls/ddraw/d3dtexture.c0100644000175000001440000004222507074112033016742 0ustar julliardusers/* Direct3D Texture (c) 1998 Lionel ULMER This files contains the implementation of interface Direct3DTexture2. */ #include #include "config.h" #include "windef.h" #include "winerror.h" #include "wine/obj_base.h" #include "heap.h" #include "ddraw.h" #include "d3d.h" #include "debugtools.h" #include "mesa_private.h" #define D3DDPRIVATE(x) mesa_d3dd_private*odev=(mesa_d3dd_private*)(x)->private #define D3DTPRIVATE(x) mesa_d3dt_private*dtpriv=(mesa_d3dt_private*)(x)->private DEFAULT_DEBUG_CHANNEL(ddraw) /* Define this if you want to save to a file all the textures used by a game (can be funny to see how they managed to cram all the pictures in texture memory) */ #undef TEXTURE_SNOOP #ifdef TEXTURE_SNOOP #include #define SNOOP_PALETTED() \ { \ FILE *f; \ char buf[32]; \ int x, y; \ \ sprintf(buf, "%ld.pnm", dtpriv->tex_name); \ f = fopen(buf, "wb"); \ fprintf(f, "P6\n%ld %ld\n255\n", src_d->dwWidth, src_d->dwHeight); \ for (y = 0; y < src_d->dwHeight; y++) { \ for (x = 0; x < src_d->dwWidth; x++) { \ unsigned char c = ((unsigned char *) src_d->y.lpSurface)[y * src_d->dwWidth + x]; \ fputc(table[c][0], f); \ fputc(table[c][1], f); \ fputc(table[c][2], f); \ } \ } \ fclose(f); \ } #define SNOOP_5650() \ { \ FILE *f; \ char buf[32]; \ int x, y; \ \ sprintf(buf, "%ld.pnm", dtpriv->tex_name); \ f = fopen(buf, "wb"); \ fprintf(f, "P6\n%ld %ld\n255\n", src_d->dwWidth, src_d->dwHeight); \ for (y = 0; y < src_d->dwHeight; y++) { \ for (x = 0; x < src_d->dwWidth; x++) { \ unsigned short c = ((unsigned short *) src_d->y.lpSurface)[y * src_d->dwWidth + x]; \ fputc((c & 0xF800) >> 8, f); \ fputc((c & 0x07E0) >> 3, f); \ fputc((c & 0x001F) << 3, f); \ } \ } \ fclose(f); \ } #define SNOOP_5551() \ { \ FILE *f; \ char buf[32]; \ int x, y; \ \ sprintf(buf, "%ld.pnm", dtpriv->tex_name); \ f = fopen(buf, "wb"); \ fprintf(f, "P6\n%ld %ld\n255\n", src_d->dwWidth, src_d->dwHeight); \ for (y = 0; y < src_d->dwHeight; y++) { \ for (x = 0; x < src_d->dwWidth; x++) { \ unsigned short c = ((unsigned short *) src_d->y.lpSurface)[y * src_d->dwWidth + x]; \ fputc((c & 0xF800) >> 8, f); \ fputc((c & 0x07C0) >> 3, f); \ fputc((c & 0x003E) << 2, f); \ } \ } \ fclose(f); \ } #else #define SNOOP_PALETTED() #define SNOOP_5650() #define SNOOP_5551() #endif static ICOM_VTABLE(IDirect3DTexture2) texture2_vtable; static ICOM_VTABLE(IDirect3DTexture) texture_vtable; /******************************************************************************* * Texture2 Creation functions */ LPDIRECT3DTEXTURE2 d3dtexture2_create(IDirectDrawSurface4Impl* surf) { IDirect3DTexture2Impl* tex; tex = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirect3DTexture2Impl)); tex->ref = 1; ICOM_VTBL(tex) = &texture2_vtable; tex->surface = surf; return (LPDIRECT3DTEXTURE2)tex; } /******************************************************************************* * Texture Creation functions */ LPDIRECT3DTEXTURE d3dtexture_create(IDirectDrawSurface4Impl* surf) { IDirect3DTexture2Impl* tex; tex = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirect3DTexture2Impl)); tex->ref = 1; ICOM_VTBL(tex) = (ICOM_VTABLE(IDirect3DTexture2)*)&texture_vtable; tex->surface = surf; return (LPDIRECT3DTEXTURE)tex; } /******************************************************************************* * IDirectSurface callback methods */ HRESULT WINAPI SetColorKey_cb(IDirect3DTexture2Impl *texture, DWORD dwFlags, LPDDCOLORKEY ckey ) { DDSURFACEDESC *tex_d; D3DTPRIVATE(texture); int bpp; GLuint current_texture; TRACE("(%p) : colorkey callback\n", texture); /* Get the texture description */ tex_d = &(texture->surface->s.surface_desc); bpp = (tex_d->ddpfPixelFormat.dwFlags & DDPF_PALETTEINDEXED8 ? 1 /* 8 bit of palette index */: tex_d->ddpfPixelFormat.u.dwRGBBitCount / 8 /* RGB bits for each colors */ ); /* Now, save the current texture */ ENTER_GL(); glGetIntegerv(GL_TEXTURE_BINDING_2D, ¤t_texture); /* If the GetHandle was not done yet, it's an error */ if (dtpriv->tex_name == 0) { ERR("Unloaded texture !\n"); LEAVE_GL(); return DD_OK; } glBindTexture(GL_TEXTURE_2D, dtpriv->tex_name); if (tex_d->ddpfPixelFormat.dwFlags & DDPF_PALETTEINDEXED8) { FIXME("Todo Paletted\n"); } else if (tex_d->ddpfPixelFormat.dwFlags & DDPF_RGB) { if (tex_d->ddpfPixelFormat.u.dwRGBBitCount == 8) { FIXME("Todo 3_3_2_0\n"); } else if (tex_d->ddpfPixelFormat.u.dwRGBBitCount == 16) { if (tex_d->ddpfPixelFormat.u4.dwRGBAlphaBitMask == 0x00000000) { /* Now transform the 5_6_5 into a 5_5_5_1 surface to support color keying */ unsigned short *dest = (unsigned short *) HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, tex_d->dwWidth * tex_d->dwHeight * bpp); unsigned short *src = (unsigned short *) tex_d->u1.lpSurface; int x, y; for (y = 0; y < tex_d->dwHeight; y++) { for (x = 0; x < tex_d->dwWidth; x++) { unsigned short cpixel = src[x + y * tex_d->dwWidth]; if ((dwFlags & DDCKEY_SRCBLT) && (cpixel >= ckey->dwColorSpaceLowValue) && (cpixel <= ckey->dwColorSpaceHighValue)) /* No alpha bit => this pixel is transparent */ dest[x + y * tex_d->dwWidth] = (cpixel & ~0x003F) | ((cpixel & 0x001F) << 1) | 0x0000; else /* Alpha bit is set => this pixel will be seen */ dest[x + y * tex_d->dwWidth] = (cpixel & ~0x003F) | ((cpixel & 0x001F) << 1) | 0x0001; } } glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, tex_d->dwWidth, tex_d->dwHeight, 0, GL_RGBA, GL_UNSIGNED_SHORT_5_5_5_1, dest); /* Frees the temporary surface */ HeapFree(GetProcessHeap(),0,dest); } else if (tex_d->ddpfPixelFormat.u4.dwRGBAlphaBitMask == 0x00000001) { FIXME("Todo 5_5_5_1\n"); } else if (tex_d->ddpfPixelFormat.u4.dwRGBAlphaBitMask == 0x0000000F) { FIXME("Todo 4_4_4_4\n"); } else { ERR("Unhandled texture format (bad Aplha channel for a 16 bit texture)\n"); } } else if (tex_d->ddpfPixelFormat.u.dwRGBBitCount == 24) { FIXME("Todo 8_8_8_0\n"); } else if (tex_d->ddpfPixelFormat.u.dwRGBBitCount == 32) { FIXME("Todo 8_8_8_8\n"); } else { ERR("Unhandled texture format (bad RGB count)\n"); } } else { ERR("Unhandled texture format (neither RGB nor INDEX)\n"); } LEAVE_GL(); return DD_OK; } /******************************************************************************* * IDirect3DTexture2 methods */ HRESULT WINAPI IDirect3DTexture2Impl_QueryInterface(LPDIRECT3DTEXTURE2 iface, REFIID riid, LPVOID* ppvObj) { ICOM_THIS(IDirect3DTexture2Impl,iface); FIXME("(%p)->(%s,%p): stub\n", This, debugstr_guid(riid),ppvObj); return S_OK; } ULONG WINAPI IDirect3DTexture2Impl_AddRef(LPDIRECT3DTEXTURE2 iface) { ICOM_THIS(IDirect3DTexture2Impl,iface); TRACE("(%p)->()incrementing from %lu.\n", This, This->ref ); return ++(This->ref); } ULONG WINAPI IDirect3DTexture2Impl_Release(LPDIRECT3DTEXTURE2 iface) { ICOM_THIS(IDirect3DTexture2Impl,iface); D3DTPRIVATE(This); FIXME("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { /* Delete texture from OpenGL */ ENTER_GL(); glDeleteTextures(1, &(dtpriv->tex_name)); LEAVE_GL(); /* Release surface */ IDirectDrawSurface4_Release((IDirectDrawSurface4*)This->surface); HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } /*** IDirect3DTexture methods ***/ HRESULT WINAPI IDirect3DTextureImpl_GetHandle(LPDIRECT3DTEXTURE iface, LPDIRECT3DDEVICE lpD3DDevice, LPD3DTEXTUREHANDLE lpHandle) { ICOM_THIS(IDirect3DTexture2Impl,iface); D3DTPRIVATE(This); IDirect3DDeviceImpl* ilpD3DDevice=(IDirect3DDeviceImpl*)lpD3DDevice; FIXME("(%p)->(%p,%p): stub\n", This, ilpD3DDevice, lpHandle); *lpHandle = (D3DTEXTUREHANDLE) This; /* Now, bind a new texture */ ENTER_GL(); ilpD3DDevice->set_context(ilpD3DDevice); This->D3Ddevice = (void *) ilpD3DDevice; if (dtpriv->tex_name == 0) glGenTextures(1, &(dtpriv->tex_name)); LEAVE_GL(); TRACE("OpenGL texture handle is : %d\n", dtpriv->tex_name); return D3D_OK; } HRESULT WINAPI IDirect3DTextureImpl_Initialize(LPDIRECT3DTEXTURE iface, LPDIRECT3DDEVICE lpD3DDevice, LPDIRECTDRAWSURFACE lpSurface) { ICOM_THIS(IDirect3DTexture2Impl,iface); TRACE("(%p)->(%p,%p)\n", This, lpD3DDevice, lpSurface); return DDERR_ALREADYINITIALIZED; } HRESULT WINAPI IDirect3DTextureImpl_Unload(LPDIRECT3DTEXTURE iface) { ICOM_THIS(IDirect3DTexture2Impl,iface); FIXME("(%p)->(): stub\n", This); return D3D_OK; } /*** IDirect3DTexture2 methods ***/ HRESULT WINAPI IDirect3DTexture2Impl_GetHandle(LPDIRECT3DTEXTURE2 iface, LPDIRECT3DDEVICE2 lpD3DDevice2, LPD3DTEXTUREHANDLE lpHandle) { ICOM_THIS(IDirect3DTexture2Impl,iface); D3DTPRIVATE(This); IDirect3DDevice2Impl* ilpD3DDevice2=(IDirect3DDevice2Impl*)lpD3DDevice2; TRACE("(%p)->(%p,%p)\n", This, ilpD3DDevice2, lpHandle); /* For 32 bits OSes, handles = pointers */ *lpHandle = (D3DTEXTUREHANDLE) This; /* Now, bind a new texture */ ENTER_GL(); ilpD3DDevice2->set_context(ilpD3DDevice2); This->D3Ddevice = (void *) ilpD3DDevice2; if (dtpriv->tex_name == 0) glGenTextures(1, &(dtpriv->tex_name)); LEAVE_GL(); TRACE("OpenGL texture handle is : %d\n", dtpriv->tex_name); return D3D_OK; } /* Common methods */ HRESULT WINAPI IDirect3DTexture2Impl_PaletteChanged( LPDIRECT3DTEXTURE2 iface, DWORD dwStart, DWORD dwCount ) { ICOM_THIS(IDirect3DTexture2Impl,iface); FIXME("(%p)->(%8ld,%8ld): stub\n", This, dwStart, dwCount); return D3D_OK; } /* NOTE : if you experience crashes in this function, you must have a buggy version of Mesa. See the file d3dtexture.c for a cure */ HRESULT WINAPI IDirect3DTexture2Impl_Load( LPDIRECT3DTEXTURE2 iface, LPDIRECT3DTEXTURE2 lpD3DTexture2 ) { ICOM_THIS(IDirect3DTexture2Impl,iface); D3DTPRIVATE(This); IDirect3DTexture2Impl* ilpD3DTexture2=(IDirect3DTexture2Impl*)lpD3DTexture2; DDSURFACEDESC *src_d, *dst_d; TRACE("(%p)->(%p)\n", This, ilpD3DTexture2); TRACE("Copied surface %p to surface %p\n", ilpD3DTexture2->surface, This->surface); /* Suppress the ALLOCONLOAD flag */ This->surface->s.surface_desc.ddsCaps.dwCaps &= ~DDSCAPS_ALLOCONLOAD; /* Copy one surface on the other */ dst_d = &(This->surface->s.surface_desc); src_d = &(ilpD3DTexture2->surface->s.surface_desc); /* Install the callbacks to the destination surface */ This->surface->s.texture = This; This->surface->s.SetColorKey_cb = SetColorKey_cb; if ((src_d->dwWidth != dst_d->dwWidth) || (src_d->dwHeight != dst_d->dwHeight)) { /* Should also check for same pixel format, lPitch, ... */ ERR("Error in surface sizes\n"); return D3DERR_TEXTURE_LOAD_FAILED; } else { /* LPDIRECT3DDEVICE2 d3dd = (LPDIRECT3DDEVICE2) This->D3Ddevice; */ /* I should put a macro for the calculus of bpp */ int bpp = (src_d->ddpfPixelFormat.dwFlags & DDPF_PALETTEINDEXED8 ? 1 /* 8 bit of palette index */: src_d->ddpfPixelFormat.u.dwRGBBitCount / 8 /* RGB bits for each colors */ ); GLuint current_texture; /* Copy the main memry texture into the surface that corresponds to the OpenGL texture object. */ memcpy(dst_d->u1.lpSurface, src_d->u1.lpSurface, src_d->dwWidth * src_d->dwHeight * bpp); ENTER_GL(); /* Now, load the texture */ /* d3dd->set_context(d3dd); We need to set the context somehow.... */ glGetIntegerv(GL_TEXTURE_BINDING_2D, ¤t_texture); /* If the GetHandle was not done, get the texture name here */ if (dtpriv->tex_name == 0) glGenTextures(1, &(dtpriv->tex_name)); glBindTexture(GL_TEXTURE_2D, dtpriv->tex_name); if (src_d->ddpfPixelFormat.dwFlags & DDPF_PALETTEINDEXED8) { /* **************** Paletted Texture **************** */ IDirectDrawPaletteImpl* pal = This->surface->s.palette; BYTE table[256][4]; int i; if (pal == NULL) { ERR("Palettized texture Loading with a NULL palette !\n"); LEAVE_GL(); return D3DERR_TEXTURE_LOAD_FAILED; } /* Get the surface's palette */ for (i = 0; i < 256; i++) { table[i][0] = pal->palents[i].peRed; table[i][1] = pal->palents[i].peGreen; table[i][2] = pal->palents[i].peBlue; if ((This->surface->s.surface_desc.dwFlags & DDSD_CKSRCBLT) && (i >= This->surface->s.surface_desc.ddckCKSrcBlt.dwColorSpaceLowValue) && (i <= This->surface->s.surface_desc.ddckCKSrcBlt.dwColorSpaceHighValue)) table[i][3] = 0x00; else table[i][3] = 0xFF; } /* Texture snooping */ SNOOP_PALETTED(); #if defined(HAVE_GL_COLOR_TABLE) && defined(HAVE_GL_PALETTED_TEXTURE) /* use Paletted Texture Extension */ glColorTableEXT(GL_TEXTURE_2D, /* target */ GL_RGBA, /* internal format */ 256, /* table size */ GL_RGBA, /* table format */ GL_UNSIGNED_BYTE, /* table type */ table); /* the color table */ glTexImage2D(GL_TEXTURE_2D, /* target */ 0, /* level */ GL_COLOR_INDEX8_EXT, /* internal format */ src_d->dwWidth, src_d->dwHeight, /* width, height */ 0, /* border */ GL_COLOR_INDEX, /* texture format */ GL_UNSIGNED_BYTE, /* texture type */ src_d->u1.lpSurface); /* the texture */ #endif } else if (src_d->ddpfPixelFormat.dwFlags & DDPF_RGB) { /* ************ RGB Textures ************ */ if (src_d->ddpfPixelFormat.u.dwRGBBitCount == 8) { /* ********************** GL_UNSIGNED_BYTE_3_3_2 ********************** */ glTexImage2D(GL_TEXTURE_2D, 0, GL_RGB, src_d->dwWidth, src_d->dwHeight, 0, GL_RGB, GL_UNSIGNED_BYTE_3_3_2, src_d->u1.lpSurface); } else if (src_d->ddpfPixelFormat.u.dwRGBBitCount == 16) { if (src_d->ddpfPixelFormat.u4.dwRGBAlphaBitMask == 0x00000000) { /* Texture snooping */ SNOOP_5650(); glTexImage2D(GL_TEXTURE_2D, 0, GL_RGB, src_d->dwWidth, src_d->dwHeight, 0, GL_RGB, GL_UNSIGNED_SHORT_5_6_5, src_d->u1.lpSurface); } else if (src_d->ddpfPixelFormat.u4.dwRGBAlphaBitMask == 0x00000001) { /* Texture snooping */ SNOOP_5551(); glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, src_d->dwWidth, src_d->dwHeight, 0, GL_RGBA, GL_UNSIGNED_SHORT_5_5_5_1, src_d->u1.lpSurface); } else if (src_d->ddpfPixelFormat.u4.dwRGBAlphaBitMask == 0x0000000F) { glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, src_d->dwWidth, src_d->dwHeight, 0, GL_RGBA, GL_UNSIGNED_SHORT_4_4_4_4, src_d->u1.lpSurface); } else { ERR("Unhandled texture format (bad Aplha channel for a 16 bit texture)\n"); } } else if (src_d->ddpfPixelFormat.u.dwRGBBitCount == 24) { glTexImage2D(GL_TEXTURE_2D, 0, GL_RGB, src_d->dwWidth, src_d->dwHeight, 0, GL_RGB, GL_UNSIGNED_BYTE, src_d->u1.lpSurface); } else if (src_d->ddpfPixelFormat.u.dwRGBBitCount == 32) { glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, src_d->dwWidth, src_d->dwHeight, 0, GL_RGBA, GL_UNSIGNED_BYTE, src_d->u1.lpSurface); } else { ERR("Unhandled texture format (bad RGB count)\n"); } } else { ERR("Unhandled texture format (neither RGB nor INDEX)\n"); } glBindTexture(GL_TEXTURE_2D, current_texture); LEAVE_GL(); } return D3D_OK; } /******************************************************************************* * IDirect3DTexture2 VTable */ ICOM_VTABLE(IDirect3DTexture2) mesa_texture2_vtable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE /*** IUnknown methods ***/ IDirect3DTexture2Impl_QueryInterface, IDirect3DTexture2Impl_AddRef, IDirect3DTexture2Impl_Release, /*** IDirect3DTexture methods ***/ IDirect3DTexture2Impl_GetHandle, IDirect3DTexture2Impl_PaletteChanged, IDirect3DTexture2Impl_Load }; /******************************************************************************* * IDirect3DTexture VTable */ ICOM_VTABLE(IDirect3DTexture) mesa_texture_vtable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE /*** IUnknown methods ***/ IDirect3DTexture2Impl_QueryInterface, IDirect3DTexture2Impl_AddRef, IDirect3DTexture2Impl_Release, /*** IDirect3DTexture methods ***/ IDirect3DTextureImpl_Initialize, IDirect3DTextureImpl_GetHandle, IDirect3DTexture2Impl_PaletteChanged, IDirect3DTexture2Impl_Load, IDirect3DTextureImpl_Unload }; wine-20000526/dlls/ddraw/d3dviewport.c0100644000175000001440000002476107107063407017135 0ustar julliardusers/* Direct3D Viewport (c) 1998 Lionel ULMER This files contains the implementation of Direct3DViewport2. */ #include "config.h" #include "windef.h" #include "winerror.h" #include "wine/obj_base.h" #include "heap.h" #include "ddraw.h" #include "d3d.h" #include "debugtools.h" #include "x11drv.h" #include "d3d_private.h" #include "mesa_private.h" DEFAULT_DEBUG_CHANNEL(ddraw) #ifdef HAVE_OPENGL #define D3DVPRIVATE(x) mesa_d3dv_private*dvpriv=((mesa_d3dv_private*)x->private) #define D3DLPRIVATE(x) mesa_d3dl_private*dlpriv=((mesa_d3dl_private*)x->private) static ICOM_VTABLE(IDirect3DViewport2) viewport2_vtable; /******************************************************************************* * Viewport1/2 static functions */ static void activate(IDirect3DViewport2Impl* This) { IDirect3DLightImpl* l; /* Activate all the lights associated with this context */ l = This->lights; while (l != NULL) { l->activate(l); l = l->next; } } /******************************************************************************* * Viewport1/2 Creation functions */ LPDIRECT3DVIEWPORT2 d3dviewport2_create(IDirect3D2Impl* d3d2) { IDirect3DViewport2Impl* vp; vp = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirect3DViewport2Impl)); vp->private = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(mesa_d3dv_private)); vp->ref = 1; ICOM_VTBL(vp) = &viewport2_vtable; vp->d3d.d3d2 = d3d2; vp->use_d3d2 = 1; vp->device.active_device2 = NULL; vp->activate = activate; vp->lights = NULL; ((mesa_d3dv_private *) vp->private)->nextlight = GL_LIGHT0; return (LPDIRECT3DVIEWPORT2)vp; } LPDIRECT3DVIEWPORT d3dviewport_create(IDirect3DImpl* d3d1) { IDirect3DViewport2Impl* vp; vp = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirect3DViewport2Impl)); vp->private = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(mesa_d3dv_private)); vp->ref = 1; ICOM_VTBL(vp) = &viewport2_vtable; vp->d3d.d3d1 = d3d1; vp->use_d3d2 = 0; vp->device.active_device1 = NULL; vp->activate = activate; vp->lights = NULL; ((mesa_d3dv_private *) vp->private)->nextlight = GL_LIGHT0; return (LPDIRECT3DVIEWPORT) vp; } /******************************************************************************* * IDirect3DViewport2 methods */ HRESULT WINAPI IDirect3DViewport2Impl_QueryInterface(LPDIRECT3DVIEWPORT2 iface, REFIID riid, LPVOID* ppvObj) { ICOM_THIS(IDirect3DViewport2Impl,iface); FIXME("(%p)->(%s,%p): stub\n", This, debugstr_guid(riid),ppvObj); return S_OK; } ULONG WINAPI IDirect3DViewport2Impl_AddRef(LPDIRECT3DVIEWPORT2 iface) { ICOM_THIS(IDirect3DViewport2Impl,iface); TRACE("(%p)->()incrementing from %lu.\n", This, This->ref ); return ++(This->ref); } ULONG WINAPI IDirect3DViewport2Impl_Release(LPDIRECT3DVIEWPORT2 iface) { ICOM_THIS(IDirect3DViewport2Impl,iface); FIXME("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } /*** IDirect3DViewport methods ***/ HRESULT WINAPI IDirect3DViewport2Impl_Initialize(LPDIRECT3DVIEWPORT2 iface, LPDIRECT3D d3d) { ICOM_THIS(IDirect3DViewport2Impl,iface); FIXME("(%p)->(%p): stub\n", This, d3d); return DD_OK; } HRESULT WINAPI IDirect3DViewport2Impl_GetViewport(LPDIRECT3DVIEWPORT2 iface, LPD3DVIEWPORT lpvp) { ICOM_THIS(IDirect3DViewport2Impl,iface); FIXME("(%p)->(%p): stub\n", This, lpvp); if (This->use_vp2 != 0) return DDERR_INVALIDPARAMS; *lpvp = This->viewport.vp1; return DD_OK; } HRESULT WINAPI IDirect3DViewport2Impl_SetViewport(LPDIRECT3DVIEWPORT2 iface, LPD3DVIEWPORT lpvp) { ICOM_THIS(IDirect3DViewport2Impl,iface); FIXME("(%p)->(%p): stub\n", This, lpvp); This->use_vp2 = 0; This->viewport.vp1 = *lpvp; TRACE("dwSize = %ld dwX = %ld dwY = %ld\n", lpvp->dwSize, lpvp->dwX, lpvp->dwY); TRACE("dwWidth = %ld dwHeight = %ld\n", lpvp->dwWidth, lpvp->dwHeight); TRACE("dvScaleX = %f dvScaleY = %f\n", lpvp->dvScaleX, lpvp->dvScaleY); TRACE("dvMaxX = %f dvMaxY = %f\n", lpvp->dvMaxX, lpvp->dvMaxY); TRACE("dvMinZ = %f dvMaxZ = %f\n", lpvp->dvMinZ, lpvp->dvMaxZ); return DD_OK; } HRESULT WINAPI IDirect3DViewport2Impl_TransformVertices(LPDIRECT3DVIEWPORT2 iface, DWORD dwVertexCount, LPD3DTRANSFORMDATA lpData, DWORD dwFlags, LPDWORD lpOffScreen) { ICOM_THIS(IDirect3DViewport2Impl,iface); FIXME("(%p)->(%8ld,%p,%08lx,%p): stub\n", This, dwVertexCount, lpData, dwFlags, lpOffScreen); return DD_OK; } HRESULT WINAPI IDirect3DViewport2Impl_LightElements(LPDIRECT3DVIEWPORT2 iface, DWORD dwElementCount, LPD3DLIGHTDATA lpData) { ICOM_THIS(IDirect3DViewport2Impl,iface); FIXME("(%p)->(%8ld,%p): stub\n", This, dwElementCount, lpData); return DD_OK; } HRESULT WINAPI IDirect3DViewport2Impl_SetBackground(LPDIRECT3DVIEWPORT2 iface, D3DMATERIALHANDLE hMat) { ICOM_THIS(IDirect3DViewport2Impl,iface); FIXME("(%p)->(%08lx): stub\n", This, (DWORD) hMat); return DD_OK; } HRESULT WINAPI IDirect3DViewport2Impl_GetBackground(LPDIRECT3DVIEWPORT2 iface, LPD3DMATERIALHANDLE lphMat, LPBOOL lpValid) { ICOM_THIS(IDirect3DViewport2Impl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lphMat, lpValid); return DD_OK; } HRESULT WINAPI IDirect3DViewport2Impl_SetBackgroundDepth(LPDIRECT3DVIEWPORT2 iface, LPDIRECTDRAWSURFACE lpDDSurface) { ICOM_THIS(IDirect3DViewport2Impl,iface); FIXME("(%p)->(%p): stub\n", This, lpDDSurface); return DD_OK; } HRESULT WINAPI IDirect3DViewport2Impl_GetBackgroundDepth(LPDIRECT3DVIEWPORT2 iface, LPDIRECTDRAWSURFACE* lplpDDSurface, LPBOOL lpValid) { ICOM_THIS(IDirect3DViewport2Impl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lplpDDSurface, lpValid); return DD_OK; } HRESULT WINAPI IDirect3DViewport2Impl_Clear(LPDIRECT3DVIEWPORT2 iface, DWORD dwCount, LPD3DRECT lpRects, DWORD dwFlags) { ICOM_THIS(IDirect3DViewport2Impl,iface); GLboolean ztest; FIXME("(%p)->(%8ld,%p,%08lx): stub\n", This, dwCount, lpRects, dwFlags); /* For the moment, ignore the rectangles */ if (This->device.active_device1 != NULL) { /* Get the rendering context */ if (This->use_d3d2) This->device.active_device2->set_context(This->device.active_device2); else This->device.active_device1->set_context(This->device.active_device1); } /* Clears the screen */ ENTER_GL(); glGetBooleanv(GL_DEPTH_TEST, &ztest); glDepthMask(GL_TRUE); /* Enables Z writing to be sure to delete also the Z buffer */ glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT); glDepthMask(ztest); LEAVE_GL(); return DD_OK; } HRESULT WINAPI IDirect3DViewport2Impl_AddLight(LPDIRECT3DVIEWPORT2 iface, LPDIRECT3DLIGHT lpLight) { ICOM_THIS(IDirect3DViewport2Impl,iface); IDirect3DLightImpl* ilpLight=(IDirect3DLightImpl*)lpLight; FIXME("(%p)->(%p): stub\n", This, ilpLight); /* Add the light in the 'linked' chain */ ilpLight->next = This->lights; This->lights = ilpLight; /* If active, activate the light */ if (This->device.active_device1 != NULL) { D3DVPRIVATE(This); D3DLPRIVATE(ilpLight); /* Get the rendering context */ if (This->use_d3d2) This->device.active_device2->set_context(This->device.active_device2); else This->device.active_device1->set_context(This->device.active_device1); /* Activate the light */ dlpriv->light_num = dvpriv->nextlight++; ilpLight->activate(ilpLight); } return DD_OK; } HRESULT WINAPI IDirect3DViewport2Impl_DeleteLight(LPDIRECT3DVIEWPORT2 iface, LPDIRECT3DLIGHT lpLight) { ICOM_THIS(IDirect3DViewport2Impl,iface); FIXME("(%p)->(%p): stub\n", This, lpLight); return DD_OK; } HRESULT WINAPI IDirect3DViewport2Impl_NextLight(LPDIRECT3DVIEWPORT2 iface, LPDIRECT3DLIGHT lpLight, LPDIRECT3DLIGHT* lplpLight, DWORD dwFlags) { ICOM_THIS(IDirect3DViewport2Impl,iface); FIXME("(%p)->(%p,%p,%08lx): stub\n", This, lpLight, lplpLight, dwFlags); return DD_OK; } /*** IDirect3DViewport2 methods ***/ HRESULT WINAPI IDirect3DViewport2Impl_GetViewport2(LPDIRECT3DVIEWPORT2 iface, LPD3DVIEWPORT2 lpViewport2) { ICOM_THIS(IDirect3DViewport2Impl,iface); TRACE("(%p)->(%p)\n", This, lpViewport2); if (This->use_vp2 != 1) return DDERR_INVALIDPARAMS; *lpViewport2 = This->viewport.vp2; return DD_OK; } HRESULT WINAPI IDirect3DViewport2Impl_SetViewport2(LPDIRECT3DVIEWPORT2 iface, LPD3DVIEWPORT2 lpViewport2) { ICOM_THIS(IDirect3DViewport2Impl,iface); TRACE("(%p)->(%p)\n", This, lpViewport2); TRACE("dwSize = %ld dwX = %ld dwY = %ld\n", lpViewport2->dwSize, lpViewport2->dwX, lpViewport2->dwY); TRACE("dwWidth = %ld dwHeight = %ld\n", lpViewport2->dwWidth, lpViewport2->dwHeight); TRACE("dvClipX = %f dvClipY = %f\n", lpViewport2->dvClipX, lpViewport2->dvClipY); TRACE("dvClipWidth = %f dvClipHeight = %f\n", lpViewport2->dvClipWidth, lpViewport2->dvClipHeight); TRACE("dvMinZ = %f dvMaxZ = %f\n", lpViewport2->dvMinZ, lpViewport2->dvMaxZ); This->viewport.vp2 = *lpViewport2; This->use_vp2 = 1; return DD_OK; } /******************************************************************************* * IDirect3DViewport1/2 VTable */ static ICOM_VTABLE(IDirect3DViewport2) viewport2_vtable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE /*** IUnknown methods ***/ IDirect3DViewport2Impl_QueryInterface, IDirect3DViewport2Impl_AddRef, IDirect3DViewport2Impl_Release, /*** IDirect3DViewport methods ***/ IDirect3DViewport2Impl_Initialize, IDirect3DViewport2Impl_GetViewport, IDirect3DViewport2Impl_SetViewport, IDirect3DViewport2Impl_TransformVertices, IDirect3DViewport2Impl_LightElements, IDirect3DViewport2Impl_SetBackground, IDirect3DViewport2Impl_GetBackground, IDirect3DViewport2Impl_SetBackgroundDepth, IDirect3DViewport2Impl_GetBackgroundDepth, IDirect3DViewport2Impl_Clear, IDirect3DViewport2Impl_AddLight, IDirect3DViewport2Impl_DeleteLight, IDirect3DViewport2Impl_NextLight, /*** IDirect3DViewport2 methods ***/ IDirect3DViewport2Impl_GetViewport2, IDirect3DViewport2Impl_SetViewport2 }; #else /* HAVE_OPENGL */ LPDIRECT3DVIEWPORT d3dviewport_create(IDirect3DImpl* d3d1) { ERR("Should not be called...\n"); return NULL; } LPDIRECT3DVIEWPORT2 d3dviewport2_create(IDirect3D2Impl* d3d2) { ERR("Should not be called...\n"); return NULL; } #endif /* HAVE_OPENGL */ wine-20000526/dlls/ddraw/ddraw.spec0100644000175000001440000000212407107127721016461 0ustar julliardusersname ddraw type win32 import kernel32.dll import user32.dll import ole32.dll import x11drv.dll @ stub DDHAL32_VidMemAlloc @ stub DDHAL32_VidMemFree @ stub DDInternalLock @ stub DDInternalUnlock @ stub DSoundHelp @ stdcall DirectDrawCreate(ptr ptr ptr) DirectDrawCreate @ stdcall DirectDrawCreateClipper(long ptr ptr) DirectDrawCreateClipper @ stdcall DirectDrawCreateEx(ptr ptr ptr ptr) DirectDrawCreateEx @ stdcall DirectDrawEnumerateA(ptr ptr) DirectDrawEnumerateA @ stdcall DirectDrawEnumerateW(ptr ptr) DirectDrawEnumerateW @ stdcall DirectDrawEnumerateExA(ptr ptr long) DirectDrawEnumerateExA @ stdcall DirectDrawEnumerateExW(ptr ptr long) DirectDrawEnumerateExW @ stdcall DllCanUnloadNow() DDRAW_DllCanUnloadNow @ stdcall DllGetClassObject(ptr ptr ptr) DDRAW_DllGetClassObject @ stub GetNextMipMap @ stub GetSurfaceFromDC @ stub HeapVidMemAllocAligned @ stub InternalLock @ stub InternalUnlock @ stub LateAllocateSurfaceMem @ stub VidMemAlloc @ stub VidMemAmountFree @ stub VidMemFini @ stub VidMemFree @ stub VidMemInit @ stub VidMemLargestFree @ stub thk1632_ThunkData32 @ stub thk3216_ThunkData32 wine-20000526/dlls/ddraw/ddraw_private.h0100644000175000001440000004312707075622771017531 0ustar julliardusers#ifndef __WINE_DLLS_DDRAW_DDRAW_PRIVATE_H #define __WINE_DLLS_DDRAW_DDRAW_PRIVATE_H /* MAY NOT CONTAIN X11 or DGA specific includes/defines/structs! */ #include "wtypes.h" #include "winbase.h" #include "wingdi.h" #include "winuser.h" #include "ddraw.h" static const char WINE_UNUSED *ddProp = "WINE_DDRAW_Property"; /**************************************************************************** * This is the main DirectDraw driver interface. It is supposed to be called * only from the base functions and only used by those. It should neither be * be called nor used within the interfaces. */ typedef struct ddraw_driver { LPGUID guid; /*under which we are referenced and enumerated*/ CHAR type[20]; /* type, usually "display" */ CHAR name[40]; /* name, like "WINE Foobar DirectDraw Driver" */ int preference; /* how good we are. dga might get 100, xlib 50*/ HRESULT (*createDDRAW)(LPDIRECTDRAW*); /* also check if arg is NULL */ } ddraw_driver; extern void ddraw_register_driver(ddraw_driver*); /***************************************************************************** * The implementation structures. They must not contain driver specific stuff. * * For private data the "LPVOID private" pointer should be used. */ typedef struct IDirectDrawImpl IDirectDrawImpl; typedef struct IDirectDraw2Impl IDirectDraw2Impl; typedef struct IDirectDraw3Impl IDirectDraw3Impl; typedef struct IDirectDraw4Impl IDirectDraw4Impl; typedef struct IDirectDrawPaletteImpl IDirectDrawPaletteImpl; typedef struct IDirectDrawClipperImpl IDirectDrawClipperImpl; typedef struct IDirectDrawSurfaceImpl IDirectDrawSurfaceImpl; typedef struct IDirectDrawSurface2Impl IDirectDrawSurface2Impl; typedef struct IDirectDrawSurface4Impl IDirectDrawSurface4Impl; extern struct ICOM_VTABLE(IDirectDrawClipper) ddclipvt; extern struct ICOM_VTABLE(IDirectDrawPalette) ddraw_ddpalvt; /***************************************************************************** * IDirectDraw implementation structure */ struct _common_directdrawdata { DDPIXELFORMAT directdraw_pixelformat; DDPIXELFORMAT screen_pixelformat; int pixmap_depth; void (*pixel_convert)(void *src, void *dst, DWORD width, DWORD height, LONG pitch, IDirectDrawPaletteImpl *palette); void (*palette_convert)(LPPALETTEENTRY palent, void *screen_palette, DWORD start, DWORD count); DWORD height,width; /* set by SetDisplayMode */ HWND mainWindow; /* set by SetCooperativeLevel */ /* This is for the fake mainWindow */ ATOM winclass; HWND window; PAINTSTRUCT ps; int paintable; }; /***************************************************************************** * IDirectDraw implementation structure * * Note: All the IDirectDraw*Impl structures _MUST_ have IDENTICAL layout, * since we reuse functions across interface versions. */ struct IDirectDrawImpl { /* IUnknown fields */ ICOM_VFIELD(IDirectDraw); DWORD ref; /* IDirectDraw fields */ struct _common_directdrawdata d; LPVOID private; }; extern HRESULT WINAPI IDirectDrawImpl_SetDisplayMode( LPDIRECTDRAW iface,DWORD width,DWORD height,DWORD depth ); /* * IDirectDraw2 implementation structure */ struct IDirectDraw2Impl { /* IUnknown fields */ ICOM_VFIELD(IDirectDraw2); DWORD ref; /* IDirectDraw2 fields */ struct _common_directdrawdata d; LPVOID private; }; extern HRESULT WINAPI IDirectDraw2Impl_DuplicateSurface( LPDIRECTDRAW2 iface,LPDIRECTDRAWSURFACE src,LPDIRECTDRAWSURFACE *dst ); extern HRESULT WINAPI IDirectDraw2Impl_SetCooperativeLevel( LPDIRECTDRAW2 iface,HWND hwnd,DWORD cooplevel ); extern HRESULT WINAPI IDirectDraw2Impl_GetCaps( LPDIRECTDRAW2 iface,LPDDCAPS caps1,LPDDCAPS caps2 ) ; extern HRESULT WINAPI IDirectDraw2Impl_CreateClipper( LPDIRECTDRAW2 iface,DWORD x,LPDIRECTDRAWCLIPPER *lpddclip,LPUNKNOWN lpunk ); extern HRESULT WINAPI common_IDirectDraw2Impl_CreatePalette( IDirectDraw2Impl* This,DWORD dwFlags,LPPALETTEENTRY palent, IDirectDrawPaletteImpl **lpddpal,LPUNKNOWN lpunk,int *psize ); extern HRESULT WINAPI IDirectDraw2Impl_CreatePalette( LPDIRECTDRAW2 iface,DWORD dwFlags,LPPALETTEENTRY palent,LPDIRECTDRAWPALETTE *lpddpal,LPUNKNOWN lpunk ); extern HRESULT WINAPI IDirectDraw2Impl_RestoreDisplayMode(LPDIRECTDRAW2 iface); extern HRESULT WINAPI IDirectDraw2Impl_WaitForVerticalBlank( LPDIRECTDRAW2 iface,DWORD x,HANDLE h ); extern ULONG WINAPI IDirectDraw2Impl_AddRef(LPDIRECTDRAW2 iface); extern ULONG WINAPI IDirectDraw2Impl_Release(LPDIRECTDRAW2 iface); extern HRESULT WINAPI IDirectDraw2Impl_QueryInterface( LPDIRECTDRAW2 iface,REFIID refiid,LPVOID *obj ); extern HRESULT WINAPI IDirectDraw2Impl_GetVerticalBlankStatus( LPDIRECTDRAW2 iface,BOOL *status ); extern HRESULT WINAPI IDirectDraw2Impl_EnumDisplayModes( LPDIRECTDRAW2 iface,DWORD dwFlags,LPDDSURFACEDESC lpddsfd,LPVOID context,LPDDENUMMODESCALLBACK modescb ); extern HRESULT WINAPI IDirectDraw2Impl_GetDisplayMode( LPDIRECTDRAW2 iface,LPDDSURFACEDESC lpddsfd ); extern HRESULT WINAPI IDirectDraw2Impl_FlipToGDISurface(LPDIRECTDRAW2 iface); extern HRESULT WINAPI IDirectDraw2Impl_GetMonitorFrequency( LPDIRECTDRAW2 iface,LPDWORD freq ); extern HRESULT WINAPI IDirectDraw2Impl_GetFourCCCodes( LPDIRECTDRAW2 iface,LPDWORD x,LPDWORD y ); extern HRESULT WINAPI IDirectDraw2Impl_EnumSurfaces( LPDIRECTDRAW2 iface,DWORD x,LPDDSURFACEDESC ddsfd,LPVOID context, LPDDENUMSURFACESCALLBACK ddsfcb ); extern HRESULT WINAPI IDirectDraw2Impl_Compact( LPDIRECTDRAW2 iface ); extern HRESULT WINAPI IDirectDraw2Impl_GetGDISurface( LPDIRECTDRAW2 iface, LPDIRECTDRAWSURFACE *lplpGDIDDSSurface ); extern HRESULT WINAPI IDirectDraw2Impl_GetScanLine( LPDIRECTDRAW2 iface, LPDWORD lpdwScanLine ); extern HRESULT WINAPI IDirectDraw2Impl_Initialize(LPDIRECTDRAW2 iface, GUID *lpGUID); extern HRESULT WINAPI IDirectDraw2Impl_SetDisplayMode( LPDIRECTDRAW2 iface,DWORD width,DWORD height,DWORD depth, DWORD dwRefreshRate, DWORD dwFlags ); extern HRESULT WINAPI IDirectDraw2Impl_GetAvailableVidMem( LPDIRECTDRAW2 iface,LPDDSCAPS ddscaps,LPDWORD total,LPDWORD free ); extern HRESULT common_off_screen_CreateSurface( IDirectDraw2Impl* This,IDirectDrawSurfaceImpl* lpdsf ); /* * IDirectDraw4 implementation structure */ struct IDirectDraw4Impl { /* IUnknown fields */ ICOM_VFIELD(IDirectDraw4); DWORD ref; /* IDirectDraw4 fields */ struct _common_directdrawdata d; LPVOID private; }; extern HRESULT WINAPI IDirectDraw4Impl_GetSurfaceFromDC( LPDIRECTDRAW4 iface, HDC hdc, LPDIRECTDRAWSURFACE *lpDDS ); extern HRESULT WINAPI IDirectDraw4Impl_RestoreAllSurfaces(LPDIRECTDRAW4 iface); extern HRESULT WINAPI IDirectDraw4Impl_TestCooperativeLevel(LPDIRECTDRAW4 iface); extern HRESULT WINAPI IDirectDraw4Impl_GetDeviceIdentifier(LPDIRECTDRAW4 iface, LPDDDEVICEIDENTIFIER lpdddi, DWORD dwFlags ); /***************************************************************************** * IDirectDrawPalette implementation structure */ struct IDirectDrawPaletteImpl { /* IUnknown fields */ ICOM_VFIELD(IDirectDrawPalette); DWORD ref; /* IDirectDrawPalette fields */ IDirectDrawImpl* ddraw; /* direct draw, no referencecount */ PALETTEENTRY palents[256]; /* This is to store the palette in 'screen format' */ int screen_palents[256]; LPVOID private; }; extern HRESULT WINAPI IDirectDrawPaletteImpl_GetEntries(LPDIRECTDRAWPALETTE,DWORD,DWORD,DWORD,LPPALETTEENTRY); extern HRESULT WINAPI IDirectDrawPaletteImpl_SetEntries(LPDIRECTDRAWPALETTE,DWORD,DWORD,DWORD,LPPALETTEENTRY); extern ULONG WINAPI IDirectDrawPaletteImpl_Release(LPDIRECTDRAWPALETTE); extern ULONG WINAPI IDirectDrawPaletteImpl_AddRef(LPDIRECTDRAWPALETTE); extern HRESULT WINAPI IDirectDrawPaletteImpl_Initialize(LPDIRECTDRAWPALETTE,LPDIRECTDRAW,DWORD,LPPALETTEENTRY); extern HRESULT WINAPI IDirectDrawPaletteImpl_GetCaps(LPDIRECTDRAWPALETTE,LPDWORD); extern HRESULT WINAPI IDirectDrawPaletteImpl_QueryInterface(LPDIRECTDRAWPALETTE,REFIID,LPVOID *); extern HRESULT WINAPI common_IDirectDraw2Impl_CreatePalette( IDirectDraw2Impl* This,DWORD dwFlags,LPPALETTEENTRY palent, IDirectDrawPaletteImpl **lpddpal,LPUNKNOWN lpunk,int *psize ); /***************************************************************************** * IDirectDrawClipper implementation structure */ struct IDirectDrawClipperImpl { /* IUnknown fields */ ICOM_VFIELD(IDirectDrawClipper); DWORD ref; /* IDirectDrawClipper fields */ HWND hWnd; }; /***************************************************************************** * IDirectDrawSurface implementation structure */ struct IDirect3DTexture2Impl; struct _common_directdrawsurface { IDirectDrawPaletteImpl* palette; IDirectDraw2Impl* ddraw; struct _surface_chain *chain; DDSURFACEDESC surface_desc; /* For Get / Release DC methods */ HBITMAP DIBsection; void *bitmap_data; HDC hdc; HGDIOBJ holdbitmap; LPDIRECTDRAWCLIPPER lpClipper; /* Callback for loaded textures */ struct IDirect3DTexture2Impl* texture; HRESULT WINAPI (*SetColorKey_cb)(struct IDirect3DTexture2Impl *texture, DWORD dwFlags, LPDDCOLORKEY ckey ) ; }; extern IDirectDrawSurface4Impl* _common_find_flipto(IDirectDrawSurface4Impl* This,IDirectDrawSurface4Impl* flipto); struct IDirectDrawSurfaceImpl { /* IUnknown fields */ ICOM_VFIELD(IDirectDrawSurface); DWORD ref; /* IDirectDrawSurface fields */ struct _common_directdrawsurface s; LPVOID private; }; /***************************************************************************** * IDirectDrawSurface2 implementation structure */ struct IDirectDrawSurface2Impl { /* IUnknown fields */ ICOM_VFIELD(IDirectDrawSurface2); DWORD ref; /* IDirectDrawSurface2 fields */ struct _common_directdrawsurface s; LPVOID private; }; /***************************************************************************** * IDirectDrawSurface3 implementation structure */ struct IDirectDrawSurface3Impl { /* IUnknown fields */ ICOM_VFIELD(IDirectDrawSurface3); DWORD ref; /* IDirectDrawSurface3 fields */ struct _common_directdrawsurface s; LPVOID private; }; /***************************************************************************** * IDirectDrawSurface4 implementation structure */ struct IDirectDrawSurface4Impl { /* IUnknown fields */ ICOM_VFIELD(IDirectDrawSurface4); DWORD ref; /* IDirectDrawSurface4 fields */ struct _common_directdrawsurface s; LPVOID private; } ; struct _surface_chain { IDirectDrawSurface4Impl **surfaces; int nrofsurfaces; }; extern HRESULT common_off_screen_CreateSurface(IDirectDraw2Impl* This,IDirectDrawSurfaceImpl* lpdsf); extern HRESULT WINAPI IDirectDrawSurface4Impl_Lock(LPDIRECTDRAWSURFACE4 iface,LPRECT lprect,LPDDSURFACEDESC lpddsd,DWORD flags, HANDLE hnd); extern HRESULT WINAPI IDirectDrawSurface4Impl_Unlock( LPDIRECTDRAWSURFACE4 iface,LPVOID surface); extern HRESULT WINAPI IDirectDrawSurface4Impl_Blt(LPDIRECTDRAWSURFACE4 iface,LPRECT rdst,LPDIRECTDRAWSURFACE4 src,LPRECT rsrc,DWORD dwFlags,LPDDBLTFX lpbltfx); extern HRESULT WINAPI IDirectDrawSurface4Impl_BltFast(LPDIRECTDRAWSURFACE4 iface,DWORD dstx,DWORD dsty,LPDIRECTDRAWSURFACE4 src,LPRECT rsrc,DWORD trans); extern HRESULT WINAPI IDirectDrawSurface4Impl_BltBatch(LPDIRECTDRAWSURFACE4 iface,LPDDBLTBATCH ddbltbatch,DWORD x,DWORD y); extern HRESULT WINAPI IDirectDrawSurface4Impl_GetCaps(LPDIRECTDRAWSURFACE4 iface,LPDDSCAPS caps); extern HRESULT WINAPI IDirectDrawSurface4Impl_GetSurfaceDesc(LPDIRECTDRAWSURFACE4 iface,LPDDSURFACEDESC ddsd); extern ULONG WINAPI IDirectDrawSurface4Impl_AddRef(LPDIRECTDRAWSURFACE4 iface); extern HRESULT WINAPI IDirectDrawSurface4Impl_GetAttachedSurface(LPDIRECTDRAWSURFACE4 iface,LPDDSCAPS lpddsd,LPDIRECTDRAWSURFACE4 *lpdsf); extern HRESULT WINAPI IDirectDrawSurface4Impl_Initialize(LPDIRECTDRAWSURFACE4 iface,LPDIRECTDRAW ddraw,LPDDSURFACEDESC lpdsfd); extern HRESULT WINAPI IDirectDrawSurface4Impl_GetPixelFormat(LPDIRECTDRAWSURFACE4 iface,LPDDPIXELFORMAT pf); extern HRESULT WINAPI IDirectDrawSurface4Impl_GetBltStatus(LPDIRECTDRAWSURFACE4 iface,DWORD dwFlags); extern HRESULT WINAPI IDirectDrawSurface4Impl_GetOverlayPosition(LPDIRECTDRAWSURFACE4 iface,LPLONG x1,LPLONG x2); extern HRESULT WINAPI IDirectDrawSurface4Impl_SetClipper(LPDIRECTDRAWSURFACE4 iface,LPDIRECTDRAWCLIPPER lpClipper); extern HRESULT WINAPI IDirectDrawSurface4Impl_AddAttachedSurface(LPDIRECTDRAWSURFACE4 iface,LPDIRECTDRAWSURFACE4 surf); extern HRESULT WINAPI IDirectDrawSurface4Impl_GetDC(LPDIRECTDRAWSURFACE4 iface,HDC* lphdc); extern HRESULT WINAPI IDirectDrawSurface4Impl_ReleaseDC(LPDIRECTDRAWSURFACE4 iface,HDC hdc); extern HRESULT WINAPI IDirectDrawSurface4Impl_QueryInterface(LPDIRECTDRAWSURFACE4 iface,REFIID refiid,LPVOID *obj); extern HRESULT WINAPI IDirectDrawSurface4Impl_IsLost(LPDIRECTDRAWSURFACE4 iface); extern HRESULT WINAPI IDirectDrawSurface4Impl_EnumAttachedSurfaces(LPDIRECTDRAWSURFACE4 iface,LPVOID context,LPDDENUMSURFACESCALLBACK esfcb); extern HRESULT WINAPI IDirectDrawSurface4Impl_Restore(LPDIRECTDRAWSURFACE4 iface); extern HRESULT WINAPI IDirectDrawSurface4Impl_SetColorKey(LPDIRECTDRAWSURFACE4 iface, DWORD dwFlags, LPDDCOLORKEY ckey); extern HRESULT WINAPI IDirectDrawSurface4Impl_AddOverlayDirtyRect(LPDIRECTDRAWSURFACE4 iface,LPRECT lpRect); extern HRESULT WINAPI IDirectDrawSurface4Impl_DeleteAttachedSurface(LPDIRECTDRAWSURFACE4 iface,DWORD dwFlags,LPDIRECTDRAWSURFACE4 lpDDSAttachedSurface); extern HRESULT WINAPI IDirectDrawSurface4Impl_EnumOverlayZOrders(LPDIRECTDRAWSURFACE4 iface,DWORD dwFlags,LPVOID lpContext,LPDDENUMSURFACESCALLBACK lpfnCallback); extern HRESULT WINAPI IDirectDrawSurface4Impl_GetClipper(LPDIRECTDRAWSURFACE4 iface,LPDIRECTDRAWCLIPPER* lplpDDClipper); extern HRESULT WINAPI IDirectDrawSurface4Impl_GetColorKey(LPDIRECTDRAWSURFACE4 iface,DWORD dwFlags,LPDDCOLORKEY lpDDColorKey); extern HRESULT WINAPI IDirectDrawSurface4Impl_GetFlipStatus(LPDIRECTDRAWSURFACE4 iface,DWORD dwFlags); extern HRESULT WINAPI IDirectDrawSurface4Impl_GetPalette(LPDIRECTDRAWSURFACE4 iface,LPDIRECTDRAWPALETTE* lplpDDPalette); extern HRESULT WINAPI IDirectDrawSurface4Impl_SetOverlayPosition(LPDIRECTDRAWSURFACE4 iface,LONG lX,LONG lY); extern HRESULT WINAPI IDirectDrawSurface4Impl_UpdateOverlay(LPDIRECTDRAWSURFACE4 iface,LPRECT lpSrcRect,LPDIRECTDRAWSURFACE4 lpDDDestSurface,LPRECT lpDestRect,DWORD dwFlags,LPDDOVERLAYFX lpDDOverlayFx); extern HRESULT WINAPI IDirectDrawSurface4Impl_UpdateOverlayDisplay(LPDIRECTDRAWSURFACE4 iface,DWORD dwFlags); extern HRESULT WINAPI IDirectDrawSurface4Impl_UpdateOverlayZOrder(LPDIRECTDRAWSURFACE4 iface,DWORD dwFlags,LPDIRECTDRAWSURFACE4 lpDDSReference); extern HRESULT WINAPI IDirectDrawSurface4Impl_GetDDInterface(LPDIRECTDRAWSURFACE4 iface,LPVOID* lplpDD); extern HRESULT WINAPI IDirectDrawSurface4Impl_PageLock(LPDIRECTDRAWSURFACE4 iface,DWORD dwFlags); extern HRESULT WINAPI IDirectDrawSurface4Impl_PageUnlock(LPDIRECTDRAWSURFACE4 iface,DWORD dwFlags); extern HRESULT WINAPI IDirectDrawSurface4Impl_SetSurfaceDesc(LPDIRECTDRAWSURFACE4 iface,LPDDSURFACEDESC lpDDSD,DWORD dwFlags); extern HRESULT WINAPI IDirectDrawSurface4Impl_SetPrivateData(LPDIRECTDRAWSURFACE4 iface,REFGUID guidTag,LPVOID lpData,DWORD cbSize,DWORD dwFlags); extern HRESULT WINAPI IDirectDrawSurface4Impl_GetPrivateData(LPDIRECTDRAWSURFACE4 iface,REFGUID guidTag,LPVOID lpBuffer,LPDWORD lpcbBufferSize); extern HRESULT WINAPI IDirectDrawSurface4Impl_FreePrivateData(LPDIRECTDRAWSURFACE4 iface,REFGUID guidTag); extern HRESULT WINAPI IDirectDrawSurface4Impl_GetUniquenessValue(LPDIRECTDRAWSURFACE4 iface,LPDWORD lpValue); extern HRESULT WINAPI IDirectDrawSurface4Impl_ChangeUniquenessValue(LPDIRECTDRAWSURFACE4 iface); extern void _common_IDirectDrawImpl_SetDisplayMode(IDirectDrawImpl* This); /* Get DDSCAPS of surface (shortcutmacro) */ #define SDDSCAPS(iface) ((iface)->s.surface_desc.ddsCaps.dwCaps) /* Get the number of bytes per pixel for a given surface */ #define PFGET_BPP(pf) (pf.dwFlags&DDPF_PALETTEINDEXED8?1:(pf.u.dwRGBBitCount/8)) #define GET_BPP(desc) PFGET_BPP(desc.ddpfPixelFormat) extern int _common_depth_to_pixelformat(DWORD depth, DDPIXELFORMAT *pixelformat,DDPIXELFORMAT *screen_pixelformat, int *pix_depth); typedef struct { unsigned short bpp,depth; unsigned int rmask,gmask,bmask; } ConvertMode; typedef struct { void (*pixel_convert)(void *src, void *dst, DWORD width, DWORD height, LONG pitch, IDirectDrawPaletteImpl* palette); void (*palette_convert)(LPPALETTEENTRY palent, void *screen_palette, DWORD start, DWORD count); } ConvertFuncs; typedef struct { ConvertMode screen, dest; ConvertFuncs funcs; } Convert; extern Convert ModeEmulations[5]; extern int _common_depth_to_pixelformat( DWORD depth,DDPIXELFORMAT *pixelformat, DDPIXELFORMAT *screen_pixelformat, int *pix_depth ); extern HRESULT create_direct3d(LPVOID *obj,IDirectDraw2Impl*); extern HRESULT create_direct3d2(LPVOID *obj,IDirectDraw2Impl*); /****************************************************************************** * Debugging / Flags output functions */ extern void _dump_DDBLTFX(DWORD flagmask); extern void _dump_DDBLTFAST(DWORD flagmask); extern void _dump_DDBLT(DWORD flagmask); extern void _dump_DDSCAPS(void *in); extern void _dump_pixelformat_flag(DWORD flagmask); extern void _dump_paletteformat(DWORD dwFlags); extern void _dump_pixelformat(void *in); extern void _dump_colorkeyflag(DWORD ck); extern void _dump_surface_desc(DDSURFACEDESC *lpddsd); extern void _dump_cooperativelevel(DWORD cooplevel); extern void _dump_surface_desc(DDSURFACEDESC *lpddsd); extern void _dump_DDCOLORKEY(void *in); #endif /* __WINE_DLLS_DDRAW_DDRAW_PRIVATE_H */ wine-20000526/dlls/ddraw/dga.c0100644000175000001440000001317407107627177015424 0ustar julliardusers/* DirectDraw using DGA * * Copyright 1997-2000 Marcus Meissner * Copyright 1998-2000 Lionel Ulmer (most of Direct3D stuff) */ /* XF86DGA: * When DirectVideo mode is enabled you can no longer use 'normal' X * applications nor can you switch to a virtual console. Also, enabling * only works, if you have switched to the screen where the application * is running. * Some ways to debug this stuff are: * - A terminal connected to the serial port. Can be bought used for cheap. * (This is the method I am using.) * - Another machine connected over some kind of network. */ #include "config.h" #include "winerror.h" #include #include #ifdef HAVE_SYS_SIGNAL_H # include #endif #include #include #include #include "gdi.h" #include "heap.h" #include "dc.h" #include "win.h" #include "wine/exception.h" #include "ddraw.h" #include "d3d.h" #include "debugtools.h" #include "spy.h" #include "message.h" #include "options.h" #include "monitor.h" #include "dga_private.h" #define RESTORE__SIGNALS DEFAULT_DEBUG_CHANNEL(ddraw); #ifdef HAVE_LIBXXF86VM XF86VidModeModeInfo *orig_mode = NULL; #endif static inline BOOL get_option( const char *name, BOOL def ) { return PROFILE_GetWineIniBool( "x11drv", name, def ); } static BYTE DDRAW_DGA_Available(void) { int fd, evbase, evret, majver, minver; static BYTE return_value = 0xFF; /* This prevents from probing X times for DGA */ if (return_value != 0xFF) return return_value; if (!get_option( "UseDGA", 1 )) { TRACE("UseDGA disabled.\n"); return_value = 0; return 0; } /* First, query the extenstion and its version */ if (!TSXF86DGAQueryExtension(display,&evbase,&evret)) { TRACE("DGA extension not detected.\n"); return_value = 0; return 0; } if (!TSXF86DGAQueryVersion(display,&majver,&minver)) { TRACE("DGA version not detected.\n"); return_value = 0; return 0; } /* You don't have to be root to use DGA extensions. Simply having access * to /dev/mem will do the trick * This can be achieved by adding the user to the "kmem" group on * Debian 2.x systems, don't know about * others. --stephenc */ if ((fd = open("/dev/mem", O_RDWR)) != -1) close(fd); if (fd != -1) return_value = 1; else { TRACE("You have no access to /dev/mem\n"); return_value = 0; } return return_value; } HRESULT DGA_Create( LPDIRECTDRAW *lplpDD ) { IDirectDrawImpl* ddraw; dga_dd_private* dgpriv; int memsize,banksize,major,minor,flags; char *addr; int depth; int dga_version; int width, height; /* Get DGA availability / version */ dga_version = DDRAW_DGA_Available(); if (dga_version == 0) return DDERR_GENERIC; /* If we were just testing ... return OK */ if (lplpDD == NULL) return DD_OK; ddraw = (IDirectDrawImpl*)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirectDrawImpl)); *lplpDD = (LPDIRECTDRAW)ddraw; ddraw->ref = 1; ICOM_VTBL(ddraw) = &dga_ddvt; ddraw->private = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(dga_dd_private)); dgpriv = (dga_dd_private*)ddraw->private; TSXF86DGAQueryVersion(display,&major,&minor); TRACE("XF86DGA is version %d.%d\n",major,minor); TSXF86DGAQueryDirectVideo(display,DefaultScreen(display),&flags); if (!(flags & XF86DGADirectPresent)) MESSAGE("direct video is NOT PRESENT.\n"); TSXF86DGAGetVideo(display,DefaultScreen(display),&addr,&width,&banksize,&memsize); dgpriv->fb_width = width; TSXF86DGAGetViewPortSize(display,DefaultScreen(display),&width,&height); TSXF86DGASetViewPort(display,DefaultScreen(display),0,0); dgpriv->fb_height = height; TRACE("video framebuffer: begin %p, width %d,banksize %d,memsize %d\n", addr,width,banksize,memsize ); TRACE("viewport height: %d\n",height); /* Get the screen dimensions as seen by Wine. * In that case, it may be better to ignore the -desktop mode and * return the real screen size => print a warning */ ddraw->d.height = MONITOR_GetHeight(&MONITOR_PrimaryMonitor); ddraw->d.width = MONITOR_GetWidth(&MONITOR_PrimaryMonitor); if ((ddraw->d.height != height) || (ddraw->d.width != width)) WARN("You seem to be running in -desktop mode. This may prove dangerous in DGA mode...\n"); dgpriv->fb_addr = addr; dgpriv->fb_memsize = memsize; dgpriv->vpmask = 0; /* Register frame buffer with the kernel, it is a potential DIB section */ VirtualAlloc(dgpriv->fb_addr, dgpriv->fb_memsize, MEM_RESERVE|MEM_SYSTEM, PAGE_READWRITE); /* The cast is because DGA2's install colormap does not return a value whereas DGA1 version does */ dgpriv->InstallColormap = (void (*)(Display *, int, Colormap)) TSXF86DGAInstallColormap; /* just assume the default depth is the DGA depth too */ depth = DefaultDepthOfScreen(X11DRV_GetXScreen()); _common_depth_to_pixelformat(depth, &(ddraw->d.directdraw_pixelformat), &(ddraw->d.screen_pixelformat), NULL); #ifdef RESTORE_SIGNALS SIGNAL_Init(); #endif return DD_OK; } /* Where do these GUIDs come from? mkuuid. * They exist solely to distinguish between the targets Wine support, * and should be different than any other GUIDs in existence. */ static GUID DGA_DirectDraw_GUID = { /* e2dcb020-dc60-11d1-8407-9714f5d50802 */ 0xe2dcb020, 0xdc60, 0x11d1, {0x84, 0x07, 0x97, 0x14, 0xf5, 0xd5, 0x08, 0x02} }; ddraw_driver dga_driver = { &DGA_DirectDraw_GUID, "display", "WINE XF86DGA DirectDraw Driver", 100, DGA_Create }; DECL_GLOBAL_CONSTRUCTOR(DGA_register) { ddraw_register_driver(&dga_driver); } wine-20000526/dlls/ddraw/dga2.c0100644000175000001440000001146307107627177015505 0ustar julliardusers/* DirectDraw using DGA2 * * Based (well, plagiarized :-) ) on Marcus' dga.c */ #include "config.h" #include "winerror.h" #include #include #ifdef HAVE_SYS_SIGNAL_H # include #endif #include #include #include #include "gdi.h" #include "heap.h" #include "dc.h" #include "win.h" #include "wine/exception.h" #include "ddraw.h" #include "d3d.h" #include "debugtools.h" #include "spy.h" #include "message.h" #include "options.h" #include "monitor.h" #include "dga2_private.h" DEFAULT_DEBUG_CHANNEL(ddraw); static inline BOOL get_option( const char *name, BOOL def ) { return PROFILE_GetWineIniBool( "x11drv", name, def ); } static BYTE DDRAW_DGA2_Available(void) { int evbase, evret, majver, minver; static BYTE return_value = 0xFF; /* This prevents from probing X times for DGA */ if (return_value != 0xFF) return return_value; if (!get_option( "UseDGA", 1 )) { TRACE("UseDGA disabled.\n"); return_value = 0; return 0; } /* First, query the extenstion and its version */ if (!TSXF86DGAQueryExtension(display,&evbase,&evret)) { TRACE("DGA extension not detected.\n"); return_value = 0; return 0; } if (!TSXF86DGAQueryVersion(display,&majver,&minver)) { TRACE("DGA version not detected.\n"); return_value = 0; return 0; } if (majver >= 2) { /* We have DGA 2.0 available ! */ if (TSXDGAOpenFramebuffer(display, DefaultScreen(display))) { TSXDGACloseFramebuffer(display, DefaultScreen(display)); return_value = 2; } else return_value = 0; return return_value; } return 0; } HRESULT DGA2_Create( LPDIRECTDRAW *lplpDD ) { IDirectDrawImpl* ddraw; dga2_dd_private* dgpriv; int major,minor; int dga_version; XDGAMode *modes; int i, num_modes; int mode_to_use = 0; /* Get DGA availability / version */ dga_version = DDRAW_DGA2_Available(); if (dga_version == 0) return DDERR_GENERIC; /* If we were just testing ... return OK */ if (lplpDD == NULL) return DD_OK; ddraw = (IDirectDrawImpl*)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirectDrawImpl)); *lplpDD = (LPDIRECTDRAW)ddraw; ddraw->ref = 1; ICOM_VTBL(ddraw) = &dga2_ddvt; ddraw->private = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(dga2_dd_private)); dgpriv = (dga2_dd_private*)ddraw->private; TSXDGAQueryVersion(display,&major,&minor); TRACE("XDGA is version %d.%d\n",major,minor); TRACE("Opening the frame buffer.\n"); if (!TSXDGAOpenFramebuffer(display, DefaultScreen(display))) { ERR("Error opening the frame buffer !!!\n"); return DDERR_GENERIC; } /* List all available modes */ modes = TSXDGAQueryModes(display, DefaultScreen(display), &num_modes); dgpriv->modes = modes; dgpriv->num_modes = num_modes; TRACE("Available modes :\n"); for (i = 0; i < num_modes; i++) { if (TRACE_ON(ddraw)) { DPRINTF(" %d) - %s (FB: %dx%d / VP: %dx%d) - depth %d -", modes[i].num, modes[i].name, modes[i].imageWidth, modes[i].imageHeight, modes[i].viewportWidth, modes[i].viewportHeight, modes[i].depth ); #define XX(x) if (modes[i].flags & x) DPRINTF(" "#x" "); XX(XDGAConcurrentAccess); XX(XDGASolidFillRect); XX(XDGABlitRect); XX(XDGABlitTransRect); XX(XDGAPixmap); #undef XX DPRINTF("\n"); } if ((MONITOR_GetHeight(&MONITOR_PrimaryMonitor) == modes[i].viewportHeight) && (MONITOR_GetWidth(&MONITOR_PrimaryMonitor) == modes[i].viewportWidth) && (MONITOR_GetDepth(&MONITOR_PrimaryMonitor) == modes[i].depth) ) { mode_to_use = modes[i].num; } } if (mode_to_use == 0) { ERR("Could not find mode !\n"); mode_to_use = 1; } else { DPRINTF("Using mode number %d\n", mode_to_use); } dgpriv->DGA.InstallColormap = TSXDGAInstallColormap; /* Initialize the frame buffer */ _DGA2_Initialize_FrameBuffer(ddraw, mode_to_use); /* Register frame buffer with the kernel, it is as a potential DIB section */ VirtualAlloc(dgpriv->DGA.fb_addr, dgpriv->DGA.fb_memsize, MEM_RESERVE|MEM_SYSTEM, PAGE_READWRITE); /* Set the input handling for relative mouse movements */ X11DRV_EVENT_SetInputMethod(X11DRV_INPUT_RELATIVE); return DD_OK; } /* Where do these GUIDs come from? mkuuid. * They exist solely to distinguish between the targets Wine support, * and should be different than any other GUIDs in existence. */ static GUID DGA2_DirectDraw_GUID = { /* e2dcb020-dc60-11d1-8407-9714f5d50803 */ 0xe2dcb020, 0xdc60, 0x11d1, {0x84, 0x07, 0x97, 0x14, 0xf5, 0xd5, 0x08, 0x03} }; ddraw_driver dga2_driver = { &DGA2_DirectDraw_GUID, "display", "WINE XF86DGA2 DirectDraw Driver", 150, DGA2_Create }; DECL_GLOBAL_CONSTRUCTOR(DGA2_register) { ddraw_register_driver(&dga2_driver); } wine-20000526/dlls/ddraw/dga2_private.h0100644000175000001440000000132507103311756017225 0ustar julliardusers#ifndef __WINE_DDRAW_DGA2_PRIVATE_H #define __WINE_DDRAW_DGA2_PRIVATE_H #include "ddraw_private.h" #include "x11_private.h" #include "dga_private.h" #include "ts_xf86dga.h" #include "ts_xf86dga2.h" extern ICOM_VTABLE(IDirectDrawSurface4) dga2_dds4vt; extern ICOM_VTABLE(IDirectDraw) dga2_ddvt; typedef struct dga2_dd_private { /* Reuse of the DGA code */ dga_dd_private DGA; XDGADevice *dev; XDGAMode *modes; int num_modes; } dga2_dd_private; typedef x11_dp_private dga2_dp_private; /* reuse X11 palette stuff */ typedef dga_ds_private dga2_ds_private; /* reuse of DGA1 surface stuff */ extern void _DGA2_Initialize_FrameBuffer(IDirectDrawImpl *This, int mode); #endif /* __WINE_DDRAW_DGA2_PRIVATE_H */ wine-20000526/dlls/ddraw/dga_private.h0100644000175000001440000000401607112356453017146 0ustar julliardusers#ifndef __WINE_DDRAW_DGA_PRIVATE_H #define __WINE_DDRAW_DGA_PRIVATE_H #include "ddraw_private.h" #include "x11_private.h" #include "ts_xf86dga.h" #ifdef HAVE_LIBXXF86VM # include "ts_xf86vmode.h" extern XF86VidModeModeInfo *orig_mode; #endif /* defined(HAVE_LIBXXF86VM) */ extern ICOM_VTABLE(IDirectDrawSurface4) dga_dds4vt; extern ICOM_VTABLE(IDirectDraw) dga_ddvt; extern ICOM_VTABLE(IDirectDrawPalette) dga_ddpalvt; typedef struct dga_dd_private { DWORD fb_height; /* height of the viewport */ DWORD fb_width; /* width of the viewport */ caddr_t fb_addr; /* start address of the framebuffer */ DWORD fb_memsize; /* total memory on the card */ DWORD vpmask; /* viewports in use flag bitmap */ void (*InstallColormap)(Display *, int, Colormap) ; } dga_dd_private; typedef x11_dp_private dga_dp_private; /* reuse X11 palette stuff */ typedef struct dga_ds_private { DWORD fb_height; int *oldDIBmap; } dga_ds_private; /* For usage in DGA2 */ extern ULONG WINAPI DGA_IDirectDrawSurface4Impl_Release(LPDIRECTDRAWSURFACE4 iface) ; extern HRESULT WINAPI DGA_IDirectDrawSurface4Impl_SetPalette(LPDIRECTDRAWSURFACE4 iface,LPDIRECTDRAWPALETTE pal) ; extern HRESULT WINAPI DGA_IDirectDrawSurface4Impl_Unlock(LPDIRECTDRAWSURFACE4 iface,LPVOID surface) ; extern HRESULT WINAPI DGA_IDirectDrawSurface4Impl_GetDC(LPDIRECTDRAWSURFACE4 iface,HDC* lphdc); extern HRESULT WINAPI DGA_IDirectDraw2Impl_CreateSurface_with_VT(LPDIRECTDRAW2 iface,LPDDSURFACEDESC lpddsd, LPDIRECTDRAWSURFACE *lpdsf,IUnknown *lpunk, void *vtable) ; extern HRESULT WINAPI DGA_IDirectDraw2Impl_QueryInterface(LPDIRECTDRAW2 iface,REFIID refiid,LPVOID *obj) ; extern HRESULT WINAPI DGA_IDirectDraw2Impl_GetCaps(LPDIRECTDRAW2 iface,LPDDCAPS caps1,LPDDCAPS caps2) ; extern HRESULT WINAPI DGA_IDirectDraw2Impl_GetDisplayMode(LPDIRECTDRAW2 iface,LPDDSURFACEDESC lpddsfd) ; extern HRESULT WINAPI DGA_IDirectDraw2Impl_GetAvailableVidMem(LPDIRECTDRAW2 iface,LPDDSCAPS ddscaps,LPDWORD total,LPDWORD free) ; #endif /* __WINE_DDRAW_DGA_PRIVATE_H */ wine-20000526/dlls/ddraw/helper.c0100644000175000001440000002023507074112033016123 0ustar julliardusers /* DirectDraw Base Functions * * Copyright 1997-1999 Marcus Meissner * Copyright 1998 Lionel Ulmer (most of Direct3D stuff) */ #include "config.h" #include #include #include #include #include #include #include "winerror.h" #include "gdi.h" #include "heap.h" #include "dc.h" #include "win.h" #include "wine/exception.h" #include "ddraw.h" #include "d3d.h" #include "debugtools.h" #include "spy.h" #include "message.h" #include "options.h" #include "monitor.h" DEFAULT_DEBUG_CHANNEL(ddraw); /****************************************************************************** * debug output functions */ void _dump_DDBLTFX(DWORD flagmask) { int i; const struct { DWORD mask; char *name; } flags[] = { #define FE(x) { x, #x}, FE(DDBLTFX_ARITHSTRETCHY) FE(DDBLTFX_MIRRORLEFTRIGHT) FE(DDBLTFX_MIRRORUPDOWN) FE(DDBLTFX_NOTEARING) FE(DDBLTFX_ROTATE180) FE(DDBLTFX_ROTATE270) FE(DDBLTFX_ROTATE90) FE(DDBLTFX_ZBUFFERRANGE) FE(DDBLTFX_ZBUFFERBASEDEST) #undef FE }; for (i=0;idwFlags); if (pf->dwFlags & DDPF_FOURCC) DPRINTF(", dwFourCC : %ld", pf->dwFourCC); if (pf->dwFlags & DDPF_RGB) { char *cmd; DPRINTF(", RGB bits: %ld, ", pf->u.dwRGBBitCount); switch (pf->u.dwRGBBitCount) { case 4: cmd = "%1lx"; break; case 8: cmd = "%02lx"; break; case 16: cmd = "%04lx"; break; case 24: cmd = "%06lx"; break; case 32: cmd = "%08lx"; break; default: ERR("Unexpected bit depth !\n"); cmd = "%d"; break; } DPRINTF(" R "); DPRINTF(cmd, pf->u1.dwRBitMask); DPRINTF(" G "); DPRINTF(cmd, pf->u2.dwGBitMask); DPRINTF(" B "); DPRINTF(cmd, pf->u3.dwBBitMask); if (pf->dwFlags & DDPF_ALPHAPIXELS) DPRINTF(" A "); DPRINTF(cmd, pf->u4.dwRGBAlphaBitMask); if (pf->dwFlags & DDPF_ZPIXELS) DPRINTF(" Z "); DPRINTF(cmd, pf->u4.dwRGBZBitMask); } if (pf->dwFlags & DDPF_ZBUFFER) DPRINTF(", Z bits : %ld", pf->u.dwZBufferBitDepth); if (pf->dwFlags & DDPF_ALPHA) DPRINTF(", Alpha bits : %ld", pf->u.dwAlphaBitDepth); DPRINTF(")"); } void _dump_colorkeyflag(DWORD ck) { int i; const struct { DWORD mask; char *name; } flags[] = { #define FE(x) { x, #x}, FE(DDCKEY_COLORSPACE) FE(DDCKEY_DESTBLT) FE(DDCKEY_DESTOVERLAY) FE(DDCKEY_SRCBLT) FE(DDCKEY_SRCOVERLAY) #undef FE }; for (i=0;idwColorSpaceLowValue, ddck->dwColorSpaceHighValue); } void _dump_surface_desc(DDSURFACEDESC *lpddsd) { int i; struct { DWORD mask; char *name; void (*func)(void *); void *elt; } flags[16], *fe = flags; #define FE(x,f,e) do { fe->mask = x; fe->name = #x; fe->func = f; fe->elt = (void *) &(lpddsd->e); fe++; } while(0) FE(DDSD_CAPS, _dump_DDSCAPS, ddsCaps); FE(DDSD_HEIGHT, _dump_DWORD, dwHeight); FE(DDSD_WIDTH, _dump_DWORD, dwWidth); FE(DDSD_PITCH, _dump_DWORD, lPitch); FE(DDSD_BACKBUFFERCOUNT, _dump_DWORD, dwBackBufferCount); FE(DDSD_ZBUFFERBITDEPTH, _dump_DWORD, u.dwZBufferBitDepth); FE(DDSD_ALPHABITDEPTH, _dump_DWORD, dwAlphaBitDepth); FE(DDSD_PIXELFORMAT, _dump_pixelformat, ddpfPixelFormat); FE(DDSD_CKDESTOVERLAY, _dump_DDCOLORKEY, ddckCKDestOverlay); FE(DDSD_CKDESTBLT, _dump_DDCOLORKEY, ddckCKDestBlt); FE(DDSD_CKSRCOVERLAY, _dump_DDCOLORKEY, ddckCKSrcOverlay); FE(DDSD_CKSRCBLT, _dump_DDCOLORKEY, ddckCKSrcBlt); FE(DDSD_MIPMAPCOUNT, _dump_DWORD, u.dwMipMapCount); FE(DDSD_REFRESHRATE, _dump_DWORD, u.dwRefreshRate); FE(DDSD_LINEARSIZE, _dump_DWORD, u1.dwLinearSize); FE(DDSD_LPSURFACE, _dump_PTR, u1.lpSurface); #undef FE for (i=0;idwFlags) { DPRINTF(" - %s : ",flags[i].name); flags[i].func(flags[i].elt); DPRINTF("\n"); } } void _dump_cooperativelevel(DWORD cooplevel) { int i; const struct { int mask; char *name; } flags[] = { #define FE(x) { x, #x}, FE(DDSCL_FULLSCREEN) FE(DDSCL_ALLOWREBOOT) FE(DDSCL_NOWINDOWCHANGES) FE(DDSCL_NORMAL) FE(DDSCL_ALLOWMODEX) FE(DDSCL_EXCLUSIVE) FE(DDSCL_SETFOCUSWINDOW) FE(DDSCL_SETDEVICEWINDOW) FE(DDSCL_CREATEDEVICEWINDOW) #undef FE }; if (TRACE_ON(ddraw)) { DPRINTF(" - "); for (i=0;i #include #include #include #include #include #include "winerror.h" #include "heap.h" #include "dc.h" #include "win.h" #include "wine/exception.h" #include "ddraw.h" #include "d3d.h" #include "debugtools.h" #include "message.h" #include "monitor.h" /* This for all the enumeration and creation of D3D-related objects */ #include "ddraw_private.h" #define MAX_DDRAW_DRIVERS 3 static ddraw_driver * ddraw_drivers[MAX_DDRAW_DRIVERS]; static int nrof_ddraw_drivers = 0; DEFAULT_DEBUG_CHANNEL(ddraw); /* register a direct draw driver. We better not use malloc for we are in * the ELF startup initialisation at this point. */ void ddraw_register_driver(ddraw_driver *driver) { ddraw_drivers[nrof_ddraw_drivers++] = driver; /* increase MAX_DDRAW_DRIVERS if the line below triggers */ assert(nrof_ddraw_drivers <= MAX_DDRAW_DRIVERS); } /**********************************************************************/ typedef struct { LPVOID lpCallback; LPVOID lpContext; } DirectDrawEnumerateProcData; /*********************************************************************** * DirectDrawEnumerateExA (DDRAW.*) */ HRESULT WINAPI DirectDrawEnumerateExA( LPDDENUMCALLBACKEXA lpCallback, LPVOID lpContext, DWORD dwFlags) { int i; TRACE("(%p,%p, %08lx)\n", lpCallback, lpContext, dwFlags); if (TRACE_ON(ddraw)) { DPRINTF(" Flags : "); if (dwFlags & DDENUM_ATTACHEDSECONDARYDEVICES) DPRINTF("DDENUM_ATTACHEDSECONDARYDEVICES "); if (dwFlags & DDENUM_DETACHEDSECONDARYDEVICES) DPRINTF("DDENUM_DETACHEDSECONDARYDEVICES "); if (dwFlags & DDENUM_NONDISPLAYDEVICES) DPRINTF("DDENUM_NONDISPLAYDEVICES "); DPRINTF("\n"); } /* Invoke callback for what flags we do support */ for (i=0;icreateDDRAW(NULL)) /* !0 is failing */ continue; TRACE("Enumerating %s/%s interface\n",ddraw_drivers[i]->name,ddraw_drivers[i]->type); if (!lpCallback( ddraw_drivers[i]->guid, (LPSTR)ddraw_drivers[i]->name, (LPSTR)ddraw_drivers[i]->type, lpContext, 0 /* FIXME: flags not supported here */ )) return DD_OK; } if (nrof_ddraw_drivers) { TRACE("Enumerating the default interface\n"); if (!lpCallback(NULL,"WINE (default)", "display", lpContext, 0)) return DD_OK; } /* Unsupported flags */ if (dwFlags & DDENUM_NONDISPLAYDEVICES) { FIXME("no non-display devices supported.\n"); } /* Hmm. Leave this out. if (dwFlags & DDENUM_ATTACHEDSECONDARYDEVICES) { FIXME("no attached secondary devices supported.\n"); } */ if (dwFlags & DDENUM_DETACHEDSECONDARYDEVICES) { FIXME("no detached secondary devices supported.\n"); } return DD_OK; } /*********************************************************************** * DirectDrawEnumerateExW (DDRAW.*) */ static BOOL CALLBACK DirectDrawEnumerateExProcW( GUID *lpGUID, LPSTR lpDriverDescription, LPSTR lpDriverName, LPVOID lpContext, HMONITOR hm) { DirectDrawEnumerateProcData *pEPD = (DirectDrawEnumerateProcData*)lpContext; LPWSTR lpDriverDescriptionW = HEAP_strdupAtoW(GetProcessHeap(), 0, lpDriverDescription); LPWSTR lpDriverNameW = HEAP_strdupAtoW(GetProcessHeap(), 0, lpDriverName); BOOL bResult = (*(LPDDENUMCALLBACKEXW *) pEPD->lpCallback)( lpGUID, lpDriverDescriptionW, lpDriverNameW, pEPD->lpContext, hm); HeapFree(GetProcessHeap(), 0, lpDriverDescriptionW); HeapFree(GetProcessHeap(), 0, lpDriverNameW); return bResult; } /**********************************************************************/ HRESULT WINAPI DirectDrawEnumerateExW( LPDDENUMCALLBACKEXW lpCallback, LPVOID lpContext, DWORD dwFlags) { DirectDrawEnumerateProcData epd; epd.lpCallback = (LPVOID) lpCallback; epd.lpContext = lpContext; return DirectDrawEnumerateExA(DirectDrawEnumerateExProcW, (LPVOID) &epd, 0); } /*********************************************************************** * DirectDrawEnumerateA (DDRAW.*) */ static BOOL CALLBACK DirectDrawEnumerateProcA( GUID *lpGUID, LPSTR lpDriverDescription, LPSTR lpDriverName, LPVOID lpContext, HMONITOR hm) { DirectDrawEnumerateProcData *pEPD = (DirectDrawEnumerateProcData*)lpContext; return ((LPDDENUMCALLBACKA) pEPD->lpCallback)( lpGUID, lpDriverDescription, lpDriverName, pEPD->lpContext); } /**********************************************************************/ HRESULT WINAPI DirectDrawEnumerateA( LPDDENUMCALLBACKA lpCallback, LPVOID lpContext) { DirectDrawEnumerateProcData epd; epd.lpCallback = (LPVOID) lpCallback; epd.lpContext = lpContext; return DirectDrawEnumerateExA(DirectDrawEnumerateProcA, (LPVOID) &epd, 0); } /*********************************************************************** * DirectDrawEnumerateW (DDRAW.*) */ static BOOL WINAPI DirectDrawEnumerateProcW( GUID *lpGUID, LPWSTR lpDriverDescription, LPWSTR lpDriverName, LPVOID lpContext, HMONITOR hm) { DirectDrawEnumerateProcData *pEPD = (DirectDrawEnumerateProcData*)lpContext; return ((LPDDENUMCALLBACKW) pEPD->lpCallback)( lpGUID, lpDriverDescription, lpDriverName, pEPD->lpContext); } /**********************************************************************/ HRESULT WINAPI DirectDrawEnumerateW( LPDDENUMCALLBACKW lpCallback, LPVOID lpContext) { DirectDrawEnumerateProcData epd; epd.lpCallback = (LPVOID) lpCallback; epd.lpContext = lpContext; return DirectDrawEnumerateExW(DirectDrawEnumerateProcW, (LPVOID) &epd, 0); } /****************************************************************************** * DirectDraw Window Procedure */ static LRESULT WINAPI DDWndProc(HWND hwnd,UINT msg,WPARAM wParam,LPARAM lParam) { LRESULT ret; IDirectDrawImpl* ddraw = NULL; DWORD lastError; /* FIXME(ddraw,"(0x%04x,%s,0x%08lx,0x%08lx),stub!\n",(int)hwnd,SPY_GetMsgName(msg),(long)wParam,(long)lParam); */ SetLastError( ERROR_SUCCESS ); ddraw = (IDirectDrawImpl*)GetPropA( hwnd, ddProp ); if( (!ddraw) && ( ( lastError = GetLastError() ) != ERROR_SUCCESS )) ERR("Unable to retrieve this ptr from window. Error %08lx\n",lastError); if( ddraw ) { /* Perform any special direct draw functions */ if (msg==WM_PAINT) ddraw->d.paintable = 1; /* Now let the application deal with the rest of this */ if( ddraw->d.mainWindow ) { /* Don't think that we actually need to call this but... * might as well be on the safe side of things... */ /* I changed hwnd to ddraw->d.mainWindow as I did not see why * it should be the procedures of our fake window that gets called * instead of those of the window provided by the application. * And with this patch, mouse clicks work with Monkey Island III * - Lionel */ ret = DefWindowProcA( ddraw->d.mainWindow, msg, wParam, lParam ); if( !ret ) { WND *tmpWnd =WIN_FindWndPtr(ddraw->d.mainWindow); /* We didn't handle the message - give it to the application */ if (ddraw && ddraw->d.mainWindow && tmpWnd) ret = CallWindowProcA(tmpWnd->winproc, ddraw->d.mainWindow, msg, wParam, lParam ); WIN_ReleaseWndPtr(tmpWnd); } return ret; } /* else FALLTHROUGH */ } /* else FALLTHROUGH */ return DefWindowProcA(hwnd,msg,wParam,lParam); } /*********************************************************************** * DirectDrawCreate */ HRESULT WINAPI DirectDrawCreate( LPGUID lpGUID, LPDIRECTDRAW *lplpDD, LPUNKNOWN pUnkOuter ) { IDirectDrawImpl** ilplpDD=(IDirectDrawImpl**)lplpDD; WNDCLASSA wc; HRESULT ret = 0; int i,drvindex=0; GUID zeroGUID; struct ddraw_driver *ddd = NULL; if (!HIWORD(lpGUID)) lpGUID = NULL; TRACE("(%s,%p,%p)\n",debugstr_guid(lpGUID),ilplpDD,pUnkOuter); memset(&zeroGUID,0,sizeof(zeroGUID)); while (1) { ddd = NULL; if ( ( !lpGUID ) || ( IsEqualGUID( &zeroGUID, lpGUID ) ) || ( IsEqualGUID( &IID_IDirectDraw, lpGUID ) ) || ( IsEqualGUID( &IID_IDirectDraw2, lpGUID ) ) || ( IsEqualGUID( &IID_IDirectDraw4, lpGUID ) ) || ( IsEqualGUID( &IID_IDirectDraw7, lpGUID ) ) ) { /* choose an interface out of the list */ for (i=0;ipreferencepreference)) { drvindex = i; ddd = xddd; } } } else { for (i=0;iguid,lpGUID)) { drvindex = i; ddd = ddraw_drivers[i]; break; } } } if (!ddd) { if (!nrof_ddraw_drivers) { ERR("DirectDrawCreate(%s,%p,%p): no DirectDraw drivers compiled in.\n",debugstr_guid(lpGUID),lplpDD,pUnkOuter); return DDERR_NODIRECTDRAWHW; } ERR("DirectDrawCreate(%s,%p,%p): did not recognize requested GUID.\n",debugstr_guid(lpGUID),lplpDD,pUnkOuter); return DDERR_INVALIDDIRECTDRAWGUID; } TRACE("using \"%s\" driver, calling %p\n",ddd->name,ddd->createDDRAW); ret = ddd->createDDRAW(lplpDD); if (!ret) break; ddraw_drivers[drvindex] = NULL; /* mark this one as unusable */ } wc.style = CS_GLOBALCLASS; wc.lpfnWndProc = DDWndProc; wc.cbClsExtra = 0; wc.cbWndExtra = 0; /* We can be a child of the desktop since we're really important */ wc.hInstance= 0; wc.hIcon = 0; wc.hCursor = (HCURSOR)IDC_ARROWA; wc.hbrBackground = NULL_BRUSH; wc.lpszMenuName = 0; wc.lpszClassName = "WINE_DirectDraw"; (*ilplpDD)->d.winclass = RegisterClassA(&wc); return ret; } /*********************************************************************** * DirectDrawCreateEx */ HRESULT WINAPI DirectDrawCreateEx( LPGUID lpGUID, LPVOID* lplpDD, REFIID iid, LPUNKNOWN pUnkOuter ) { FIXME(":semi stub\n"); /* I don't know about what functionality is unique to Ex */ return DirectDrawCreate(lpGUID,(LPDIRECTDRAW*)lplpDD,pUnkOuter); } /******************************************************************************* * DirectDraw ClassFactory * * Heavily inspired (well, can you say completely copied :-) ) from DirectSound * */ typedef struct { /* IUnknown fields */ ICOM_VFIELD(IClassFactory); DWORD ref; } IClassFactoryImpl; static HRESULT WINAPI DDCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) { ICOM_THIS(IClassFactoryImpl,iface); FIXME("(%p)->(%s,%p),stub!\n",This,debugstr_guid(riid),ppobj); return E_NOINTERFACE; } static ULONG WINAPI DDCF_AddRef(LPCLASSFACTORY iface) { ICOM_THIS(IClassFactoryImpl,iface); return ++(This->ref); } static ULONG WINAPI DDCF_Release(LPCLASSFACTORY iface) { ICOM_THIS(IClassFactoryImpl,iface); /* static class, won't be freed */ return --(This->ref); } static HRESULT WINAPI DDCF_CreateInstance( LPCLASSFACTORY iface,LPUNKNOWN pOuter,REFIID riid,LPVOID *ppobj ) { ICOM_THIS(IClassFactoryImpl,iface); TRACE("(%p)->(%p,%s,%p)\n",This,pOuter,debugstr_guid(riid),ppobj); if ( ( IsEqualGUID( &IID_IDirectDraw, riid ) ) || ( IsEqualGUID( &IID_IDirectDraw2, riid ) ) || ( IsEqualGUID( &IID_IDirectDraw4, riid ) ) ) { /* FIXME: reuse already created DirectDraw if present? */ return DirectDrawCreate((LPGUID) riid,(LPDIRECTDRAW*)ppobj,pOuter); } return CLASS_E_CLASSNOTAVAILABLE; } static HRESULT WINAPI DDCF_LockServer(LPCLASSFACTORY iface,BOOL dolock) { ICOM_THIS(IClassFactoryImpl,iface); FIXME("(%p)->(%d),stub!\n",This,dolock); return S_OK; } static ICOM_VTABLE(IClassFactory) DDCF_Vtbl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DDCF_QueryInterface, DDCF_AddRef, DDCF_Release, DDCF_CreateInstance, DDCF_LockServer }; static IClassFactoryImpl DDRAW_CF = {&DDCF_Vtbl, 1 }; /******************************************************************************* * DllGetClassObject [DDRAW.13] * Retrieves class object from a DLL object * * NOTES * Docs say returns STDAPI * * PARAMS * rclsid [I] CLSID for the class object * riid [I] Reference to identifier of interface for class object * ppv [O] Address of variable to receive interface pointer for riid * * RETURNS * Success: S_OK * Failure: CLASS_E_CLASSNOTAVAILABLE, E_OUTOFMEMORY, E_INVALIDARG, * E_UNEXPECTED */ DWORD WINAPI DDRAW_DllGetClassObject(REFCLSID rclsid,REFIID riid,LPVOID *ppv) { TRACE("(%p,%p,%p)\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv); if ( IsEqualGUID( &IID_IClassFactory, riid ) ) { *ppv = (LPVOID)&DDRAW_CF; IClassFactory_AddRef((IClassFactory*)*ppv); return S_OK; } FIXME("(%p,%p,%p): no interface found.\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv); return CLASS_E_CLASSNOTAVAILABLE; } /******************************************************************************* * DllCanUnloadNow [DDRAW.12] Determines whether the DLL is in use. * * RETURNS * Success: S_OK * Failure: S_FALSE */ DWORD WINAPI DDRAW_DllCanUnloadNow(void) { FIXME("(void): stub\n"); return S_FALSE; } wine-20000526/dlls/ddraw/mesa.c0100644000175000001440000001321707074112033015573 0ustar julliardusers/* Direct3D Common functions (c) 1998 Lionel ULMER This file contains all MESA common code */ #include "windef.h" #include "wine/obj_base.h" #include "ddraw.h" #include "d3d.h" #include "debugtools.h" #include "mesa_private.h" DEFAULT_DEBUG_CHANNEL(ddraw) #define D3DTPRIVATE(x) mesa_d3dt_private *dtpriv = (mesa_d3dt_private*)(x)->private void set_render_state(D3DRENDERSTATETYPE dwRenderStateType, DWORD dwRenderState, RenderState *rs) { if (TRACE_ON(ddraw)) _dump_renderstate(dwRenderStateType, dwRenderState); /* First, all the stipple patterns */ if ((dwRenderStateType >= D3DRENDERSTATE_STIPPLEPATTERN00) && (dwRenderStateType <= D3DRENDERSTATE_STIPPLEPATTERN31)) { ERR("Unhandled dwRenderStateType stipple %d!\n",dwRenderStateType); } else { ENTER_GL(); /* All others state variables */ switch (dwRenderStateType) { case D3DRENDERSTATE_TEXTUREHANDLE: { /* 1 */ IDirect3DTexture2Impl* tex = (IDirect3DTexture2Impl*) dwRenderState; D3DTPRIVATE(tex); if (tex == NULL) { glBindTexture(GL_TEXTURE_2D, 0); glDisable(GL_TEXTURE_2D); } else { TRACE("setting OpenGL texture handle : %d\n", dtpriv->tex_name); glEnable(GL_TEXTURE_2D); /* Default parameters */ glBindTexture(GL_TEXTURE_2D, dtpriv->tex_name); /* To prevent state change, we could test here what are the parameters stored in the texture */ glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, rs->mag); glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, rs->min); } } break; case D3DRENDERSTATE_TEXTUREPERSPECTIVE: /* 4 */ if (dwRenderState) glHint(GL_PERSPECTIVE_CORRECTION_HINT, GL_NICEST); else glHint(GL_PERSPECTIVE_CORRECTION_HINT, GL_FASTEST); break; case D3DRENDERSTATE_ZENABLE: /* 7 */ if (dwRenderState) glEnable(GL_DEPTH_TEST); else glDisable(GL_DEPTH_TEST); break; case D3DRENDERSTATE_FILLMODE: /* 8 */ switch ((D3DFILLMODE) dwRenderState) { case D3DFILL_SOLID: break; default: ERR("Unhandled fill mode !\n"); } break; case D3DRENDERSTATE_SHADEMODE: /* 9 */ switch ((D3DSHADEMODE) dwRenderState) { case D3DSHADE_FLAT: glShadeModel(GL_FLAT); break; case D3DSHADE_GOURAUD: glShadeModel(GL_SMOOTH); break; default: ERR("Unhandled shade mode !\n"); } break; case D3DRENDERSTATE_ZWRITEENABLE: /* 14 */ if (dwRenderState) glDepthMask(GL_TRUE); else glDepthMask(GL_FALSE); break; case D3DRENDERSTATE_TEXTUREMAG: /* 17 */ switch ((D3DTEXTUREFILTER) dwRenderState) { case D3DFILTER_NEAREST: rs->mag = GL_NEAREST; break; case D3DFILTER_LINEAR: rs->mag = GL_LINEAR; break; default: ERR("Unhandled texture mag !\n"); } break; case D3DRENDERSTATE_TEXTUREMIN: /* 18 */ switch ((D3DTEXTUREFILTER) dwRenderState) { case D3DFILTER_NEAREST: rs->min = GL_NEAREST; break; case D3DFILTER_LINEAR: rs->mag = GL_LINEAR; break; default: ERR("Unhandled texture min !\n"); } break; case D3DRENDERSTATE_SRCBLEND: /* 19 */ switch ((D3DBLEND) dwRenderState) { case D3DBLEND_SRCALPHA: rs->src = GL_SRC_ALPHA; break; default: ERR("Unhandled blend mode !\n"); } glBlendFunc(rs->src, rs->dst); break; case D3DRENDERSTATE_DESTBLEND: /* 20 */ switch ((D3DBLEND) dwRenderState) { case D3DBLEND_INVSRCALPHA: rs->dst = GL_ONE_MINUS_SRC_ALPHA; break; default: ERR("Unhandled blend mode !\n"); } glBlendFunc(rs->src, rs->dst); break; case D3DRENDERSTATE_TEXTUREMAPBLEND: /* 21 */ switch ((D3DTEXTUREBLEND) dwRenderState) { case D3DTBLEND_MODULATE: case D3DTBLEND_MODULATEALPHA: glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE); break; default: ERR("Unhandled texture environment !\n"); } break; case D3DRENDERSTATE_CULLMODE: /* 22 */ switch ((D3DCULL) dwRenderState) { case D3DCULL_NONE: glDisable(GL_CULL_FACE); break; case D3DCULL_CW: glEnable(GL_CULL_FACE); glFrontFace(GL_CW); break; case D3DCULL_CCW: glEnable(GL_CULL_FACE); glFrontFace(GL_CCW); break; default: ERR("Unhandled cull mode !\n"); } break; case D3DRENDERSTATE_ZFUNC: /* 23 */ switch ((D3DCMPFUNC) dwRenderState) { case D3DCMP_NEVER: glDepthFunc(GL_NEVER); break; case D3DCMP_LESS: glDepthFunc(GL_LESS); break; case D3DCMP_EQUAL: glDepthFunc(GL_EQUAL); break; case D3DCMP_LESSEQUAL: glDepthFunc(GL_LEQUAL); break; case D3DCMP_GREATER: glDepthFunc(GL_GREATER); break; case D3DCMP_NOTEQUAL: glDepthFunc(GL_NOTEQUAL); break; case D3DCMP_GREATEREQUAL: glDepthFunc(GL_GEQUAL); break; case D3DCMP_ALWAYS: glDepthFunc(GL_ALWAYS); break; default: ERR("Unexpected value\n"); } break; case D3DRENDERSTATE_DITHERENABLE: /* 26 */ if (dwRenderState) glEnable(GL_DITHER); else glDisable(GL_DITHER); break; case D3DRENDERSTATE_ALPHABLENDENABLE: /* 27 */ if (dwRenderState) glEnable(GL_BLEND); else glDisable(GL_BLEND); break; case D3DRENDERSTATE_COLORKEYENABLE: /* 41 */ if (dwRenderState) glEnable(GL_BLEND); else glDisable(GL_BLEND); break; case D3DRENDERSTATE_FLUSHBATCH: /* 50 */ break; default: ERR("Unhandled dwRenderStateType %d!\n",dwRenderStateType); break; } LEAVE_GL(); } } wine-20000526/dlls/ddraw/mesa_private.h0100644000175000001440000001160507107127721017340 0ustar julliardusers/* MESA private include file (c) 1998 Lionel ULMER This files contains all the structure that are not exported through d3d.h and all common macros. */ #ifndef __GRAPHICS_WINE_MESA_PRIVATE_H #define __GRAPHICS_WINE_MESA_PRIVATE_H #include "d3d_private.h" #include "wine_gl.h" #include "x11drv.h" #undef USE_OSMESA #include "x11_private.h" /***************************************************************************** * IDirect3DLight MESA private structure */ typedef struct mesa_d3dl_private { GLenum light_num; } mesa_d3dl_private; /***************************************************************************** * IDirect3DTexture2 MESA private structure */ typedef struct mesa_d3dt_private { GLuint tex_name; } mesa_d3dt_private; /***************************************************************************** * IDirect3DViewport2 implementation structure */ typedef struct mesa_d3dv_private { GLenum nextlight; } mesa_d3dv_private; /* Matrix copy WITH transposition */ #define conv_mat2(mat,gl_mat) \ { \ TRACE("%f %f %f %f\n", (mat)->_11, (mat)->_12, (mat)->_13, (mat)->_14); \ TRACE("%f %f %f %f\n", (mat)->_21, (mat)->_22, (mat)->_23, (mat)->_24); \ TRACE("%f %f %f %f\n", (mat)->_31, (mat)->_32, (mat)->_33, (mat)->_34); \ TRACE("%f %f %f %f\n", (mat)->_41, (mat)->_42, (mat)->_43, (mat)->_44); \ (gl_mat)[ 0] = (mat)->_11; \ (gl_mat)[ 1] = (mat)->_21; \ (gl_mat)[ 2] = (mat)->_31; \ (gl_mat)[ 3] = (mat)->_41; \ (gl_mat)[ 4] = (mat)->_12; \ (gl_mat)[ 5] = (mat)->_22; \ (gl_mat)[ 6] = (mat)->_32; \ (gl_mat)[ 7] = (mat)->_42; \ (gl_mat)[ 8] = (mat)->_13; \ (gl_mat)[ 9] = (mat)->_23; \ (gl_mat)[10] = (mat)->_33; \ (gl_mat)[11] = (mat)->_43; \ (gl_mat)[12] = (mat)->_14; \ (gl_mat)[13] = (mat)->_24; \ (gl_mat)[14] = (mat)->_34; \ (gl_mat)[15] = (mat)->_44; \ }; /* Matrix copy WITHOUT transposition */ #define conv_mat(mat,gl_mat) \ { \ TRACE("%f %f %f %f\n", (mat)->_11, (mat)->_12, (mat)->_13, (mat)->_14); \ TRACE("%f %f %f %f\n", (mat)->_21, (mat)->_22, (mat)->_23, (mat)->_24); \ TRACE("%f %f %f %f\n", (mat)->_31, (mat)->_32, (mat)->_33, (mat)->_34); \ TRACE("%f %f %f %f\n", (mat)->_41, (mat)->_42, (mat)->_43, (mat)->_44); \ memcpy(gl_mat, (mat), 16 * sizeof(float)); \ }; typedef struct render_state { /* This is used for the device mode */ GLenum src, dst; /* This is used for textures */ GLenum mag, min; } RenderState; typedef struct mesa_d3dd_private { #ifdef USE_OSMESA OSMesaContext ctx; unsigned char *buffer; #else GLXContext ctx; #endif /* The current render state */ RenderState rs; /* The last type of vertex drawn */ D3DVERTEXTYPE vt; D3DMATRIX *world_mat; D3DMATRIX *view_mat; D3DMATRIX *proj_mat; } mesa_d3dd_private; #define _dump_colorvalue(s,v) \ TRACE(" " s " : %f %f %f %f\n", \ (v).r.r, (v).g.g, (v).b.b, (v).a.a); /* Common functions defined in d3dcommon.c */ void set_render_state(D3DRENDERSTATETYPE dwRenderStateType, DWORD dwRenderState, RenderState *rs) ; /* All non-static functions 'exported' by various sub-objects */ extern LPDIRECT3DTEXTURE2 d3dtexture2_create(IDirectDrawSurface4Impl* surf); extern LPDIRECT3DTEXTURE d3dtexture_create(IDirectDrawSurface4Impl* surf); extern LPDIRECT3DLIGHT d3dlight_create_dx3(IDirect3DImpl* d3d1); extern LPDIRECT3DLIGHT d3dlight_create(IDirect3D2Impl* d3d2); extern LPDIRECT3DEXECUTEBUFFER d3dexecutebuffer_create(IDirect3DDeviceImpl* d3ddev, LPD3DEXECUTEBUFFERDESC lpDesc); extern LPDIRECT3DMATERIAL d3dmaterial_create(IDirect3DImpl* d3d1); extern LPDIRECT3DMATERIAL2 d3dmaterial2_create(IDirect3D2Impl* d3d2); extern LPDIRECT3DVIEWPORT d3dviewport_create(IDirect3DImpl* d3d1); extern LPDIRECT3DVIEWPORT2 d3dviewport2_create(IDirect3D2Impl* d3d2); extern int is_OpenGL_dx3(REFCLSID rguid, IDirectDrawSurfaceImpl* surface, IDirect3DDeviceImpl** device); extern int d3d_OpenGL_dx3(LPD3DENUMDEVICESCALLBACK cb, LPVOID context) ; extern int d3d_OpenGL(LPD3DENUMDEVICESCALLBACK cb, LPVOID context) ; extern int is_OpenGL(REFCLSID rguid, IDirectDrawSurfaceImpl* surface, IDirect3DDevice2Impl** device, IDirect3D2Impl* d3d); extern LPDIRECT3DTEXTURE2 mesa_d3dtexture2_create(IDirectDrawSurface4Impl*); extern LPDIRECT3DTEXTURE mesa_d3dtexture_create(IDirectDrawSurface4Impl*); static const GUID WINE_UNUSED IID_D3DDEVICE2_OpenGL = { 0x39a0da38, 0x7e57, 0x11d2, { 0x8b,0x7c,0x0e,0x4e,0xd8,0x3c,0x2b,0x3c } }; static const GUID WINE_UNUSED IID_D3DDEVICE_OpenGL = { 0x31416d44, 0x86ae, 0x11d2, { 0x82,0x2d,0xa8,0xd5,0x31,0x87,0xca,0xfa } }; extern ICOM_VTABLE(IDirect3D) mesa_d3dvt; extern ICOM_VTABLE(IDirect3D2) mesa_d3d2vt; extern ICOM_VTABLE(IDirect3D3) mesa_d3d3vt; #endif /* __GRAPHICS_WINE_MESA_PRIVATE_H */ wine-20000526/dlls/ddraw/x11.c0100644000175000001440000000511607103364051015260 0ustar julliardusers/* DirectDraw using DGA or Xlib(XSHM) * * Copyright 1997-1999 Marcus Meissner * Copyright 1998 Lionel Ulmer (most of Direct3D stuff) */ #include "config.h" #include #include #include #include #include #include "winerror.h" #include "options.h" #include "monitor.h" #include "debugtools.h" #include "ddraw.h" DEFAULT_DEBUG_CHANNEL(ddraw); #include "x11_private.h" #ifdef HAVE_LIBXXSHM int XShmErrorFlag = 0; #endif static inline BOOL get_option( const char *name, BOOL def ) { return PROFILE_GetWineIniBool( "x11drv", name, def ); } static BOOL DDRAW_XSHM_Available(void) { #ifdef HAVE_LIBXXSHM if (get_option( "UseXShm", 1 )) { if (TSXShmQueryExtension(display)) { int major,minor; Bool shpix; if (TSXShmQueryVersion(display, &major, &minor, &shpix)) return TRUE; } } #endif return FALSE; } static HRESULT X11_Create( LPDIRECTDRAW *lplpDD ) { IDirectDrawImpl* ddraw; int depth; x11_dd_private *x11priv; if (lplpDD == NULL) /* Testing ... this driver works all the time */ return DD_OK; *lplpDD = (LPDIRECTDRAW)HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirectDrawImpl) ); ddraw = (IDirectDrawImpl*)*lplpDD; ICOM_VTBL(ddraw)= &xlib_ddvt; ddraw->ref = 1; ddraw->private = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(x11_dd_private) ); x11priv = (x11_dd_private*)ddraw->private; /* At DirectDraw creation, the depth is the default depth */ depth = DefaultDepthOfScreen(X11DRV_GetXScreen()); _common_depth_to_pixelformat(depth, &(ddraw->d.directdraw_pixelformat), &(ddraw->d.screen_pixelformat), &(ddraw->d.pixmap_depth)); ddraw->d.height = MONITOR_GetHeight(&MONITOR_PrimaryMonitor); ddraw->d.width = MONITOR_GetWidth(&MONITOR_PrimaryMonitor); #ifdef HAVE_LIBXXSHM /* Test if XShm is available. */ if ((x11priv->xshm_active = DDRAW_XSHM_Available())) { x11priv->xshm_compl = 0; TRACE("Using XShm extension.\n"); } #endif return DD_OK; } /* Where do these GUIDs come from? mkuuid. * They exist solely to distinguish between the targets Wine support, * and should be different than any other GUIDs in existence. */ static GUID X11_DirectDraw_GUID = { /* 1574a740-dc61-11d1-8407-f7875a7d1879 */ 0x1574a740, 0xdc61, 0x11d1, {0x84, 0x07, 0xf7, 0x87, 0x5a, 0x7d, 0x18, 0x79} }; ddraw_driver x11_driver = { &X11_DirectDraw_GUID, "display", "WINE X11 DirectDraw Driver", 50, X11_Create }; DECL_GLOBAL_CONSTRUCTOR(X11_register) { ddraw_register_driver(&x11_driver); } wine-20000526/dlls/ddraw/x11_private.h0100644000175000001440000000301707110631572017020 0ustar julliardusers#ifndef __WINE_DDRAW_X11_PRIVATE_H #define __WINE_DDRAW_X11_PRIVATE_H /* This file contains all X11 private and specific definitions. * It may also be used by all ports that reuse X11 stuff (like XF86 DGA) */ #include "ts_xlib.h" #include "ts_xutil.h" #ifdef HAVE_LIBXXSHM # include # ifdef HAVE_SYS_IPC_H # include # endif # ifdef HAVE_SYS_SHM_H # include # endif # include "ts_xshm.h" #endif /* defined(HAVE_LIBXXSHM) */ #include "x11drv.h" #include "ddraw_private.h" #include "wine_gl.h" extern ICOM_VTABLE(IDirectDraw) xlib_ddvt; extern ICOM_VTABLE(IDirectDraw2) xlib_dd2vt; extern ICOM_VTABLE(IDirectDraw4) xlib_dd4vt; extern ICOM_VTABLE(IDirectDrawPalette) xlib_ddpalvt; extern ICOM_VTABLE(IDirectDrawSurface4) xlib_dds4vt; typedef struct x11_dd_private { #ifdef HAVE_LIBXXSHM int xshm_active, xshm_compl; #endif /* defined(HAVE_LIBXXSHM) */ Window drawable; } x11_dd_private; typedef struct x11_dp_private { BOOL installed; /* is colormap installed */ Colormap cm; /* the X11 Colormap associated */ } x11_dp_private; extern HRESULT WINAPI Xlib_IDirectDrawPaletteImpl_SetEntries(LPDIRECTDRAWPALETTE,DWORD,DWORD,DWORD,LPPALETTEENTRY); extern ULONG WINAPI Xlib_IDirectDrawPaletteImpl_Release(LPDIRECTDRAWPALETTE iface); typedef struct x11_ds_private { XImage *image; #ifdef HAVE_LIBXXSHM XShmSegmentInfo shminfo; #endif int *oldDIBmap; } x11_ds_private; #ifdef HAVE_LIBXXSHM extern int XShmErrorFlag; #endif #endif /* __WINE_DDRAW_X11_PRIVATE_H */ wine-20000526/dlls/ddraw/dclipper/0040755000175000001440000000000007113604172016307 5ustar julliarduserswine-20000526/dlls/ddraw/dclipper/main.c0100644000175000001440000000752707074112033017403 0ustar julliardusers/* DirectDrawClipper implementation * * Copyright 2000 Marcus Meissner */ #include "config.h" #include "winerror.h" #include #include #include #include #include #include #include "debugtools.h" #include "ddraw_private.h" DEFAULT_DEBUG_CHANNEL(ddraw); /****************************************************************************** * DirectDrawCreateClipper (DDRAW.7) */ HRESULT WINAPI DirectDrawCreateClipper( DWORD dwFlags, LPDIRECTDRAWCLIPPER *lplpDDClipper, LPUNKNOWN pUnkOuter ) { IDirectDrawClipperImpl** ilplpDDClipper=(IDirectDrawClipperImpl**)lplpDDClipper; TRACE("(%08lx,%p,%p)\n", dwFlags, ilplpDDClipper, pUnkOuter); *ilplpDDClipper = (IDirectDrawClipperImpl*)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirectDrawClipperImpl)); ICOM_VTBL(*ilplpDDClipper) = &ddclipvt; (*ilplpDDClipper)->ref = 1; (*ilplpDDClipper)->hWnd = 0; return DD_OK; } /****************************************************************************** * IDirectDrawClipper */ static HRESULT WINAPI IDirectDrawClipperImpl_SetHwnd( LPDIRECTDRAWCLIPPER iface, DWORD dwFlags, HWND hWnd ) { ICOM_THIS(IDirectDrawClipperImpl,iface); TRACE("(%p)->SetHwnd(0x%08lx,0x%08lx)\n",This,dwFlags,(DWORD)hWnd); if( dwFlags ) { FIXME("dwFlags = 0x%08lx, not supported.\n",dwFlags); return DDERR_INVALIDPARAMS; } This->hWnd = hWnd; return DD_OK; } static ULONG WINAPI IDirectDrawClipperImpl_Release(LPDIRECTDRAWCLIPPER iface) { ICOM_THIS(IDirectDrawClipperImpl,iface); TRACE("(%p)->() decrementing from %lu.\n", This, This->ref ); This->ref--; if (This->ref) return This->ref; HeapFree(GetProcessHeap(),0,This); return S_OK; } static HRESULT WINAPI IDirectDrawClipperImpl_GetClipList( LPDIRECTDRAWCLIPPER iface,LPRECT rects,LPRGNDATA lprgn,LPDWORD hmm ) { ICOM_THIS(IDirectDrawClipperImpl,iface); FIXME("(%p,%p,%p,%p),stub!\n",This,rects,lprgn,hmm); if (hmm) *hmm=0; return DD_OK; } static HRESULT WINAPI IDirectDrawClipperImpl_SetClipList( LPDIRECTDRAWCLIPPER iface,LPRGNDATA lprgn,DWORD hmm ) { ICOM_THIS(IDirectDrawClipperImpl,iface); FIXME("(%p,%p,%ld),stub!\n",This,lprgn,hmm); return DD_OK; } static HRESULT WINAPI IDirectDrawClipperImpl_QueryInterface( LPDIRECTDRAWCLIPPER iface, REFIID riid, LPVOID* ppvObj ) { ICOM_THIS(IDirectDrawClipperImpl,iface); FIXME("(%p)->(%p,%p),stub!\n",This,riid,ppvObj); return OLE_E_ENUM_NOMORE; } static ULONG WINAPI IDirectDrawClipperImpl_AddRef( LPDIRECTDRAWCLIPPER iface ) { ICOM_THIS(IDirectDrawClipperImpl,iface); TRACE("(%p)->() incrementing from %lu.\n", This, This->ref ); return ++(This->ref); } static HRESULT WINAPI IDirectDrawClipperImpl_GetHWnd( LPDIRECTDRAWCLIPPER iface, HWND* hWndPtr ) { ICOM_THIS(IDirectDrawClipperImpl,iface); FIXME("(%p)->(%p),stub!\n",This,hWndPtr); *hWndPtr = This->hWnd; return DD_OK; } static HRESULT WINAPI IDirectDrawClipperImpl_Initialize( LPDIRECTDRAWCLIPPER iface, LPDIRECTDRAW lpDD, DWORD dwFlags ) { ICOM_THIS(IDirectDrawClipperImpl,iface); FIXME("(%p)->(%p,0x%08lx),stub!\n",This,lpDD,dwFlags); return DD_OK; } static HRESULT WINAPI IDirectDrawClipperImpl_IsClipListChanged( LPDIRECTDRAWCLIPPER iface, BOOL* lpbChanged ) { ICOM_THIS(IDirectDrawClipperImpl,iface); FIXME("(%p)->(%p),stub!\n",This,lpbChanged); return DD_OK; } ICOM_VTABLE(IDirectDrawClipper) ddclipvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectDrawClipperImpl_QueryInterface, IDirectDrawClipperImpl_AddRef, IDirectDrawClipperImpl_Release, IDirectDrawClipperImpl_GetClipList, IDirectDrawClipperImpl_GetHWnd, IDirectDrawClipperImpl_Initialize, IDirectDrawClipperImpl_IsClipListChanged, IDirectDrawClipperImpl_SetClipList, IDirectDrawClipperImpl_SetHwnd }; wine-20000526/dlls/ddraw/ddraw/0040755000175000001440000000000007113604172015606 5ustar julliarduserswine-20000526/dlls/ddraw/ddraw/dga.c0100644000175000001440000005771307112401444016513 0ustar julliardusers/* DirectDraw IDirectDraw XF86DGA interface * * Copyright 1997-2000 Marcus Meissner * Copyright 1998-2000 Lionel Ulmer (most of Direct3D stuff) */ /* XF86DGA: * When DirectVideo mode is enabled you can no longer use 'normal' X * applications nor can you switch to a virtual console. Also, enabling * only works, if you have switched to the screen where the application * is running. * Some ways to debug this stuff are: * - A terminal connected to the serial port. Can be bought used for cheap. * (This is the method I am using.) * - Another machine connected over some kind of network. */ /* * This file contains the XF86 DGA specific interface functions. * We are 'allowed' to call X11 specific IDirectDraw functions. */ #include "config.h" #include #include #include #include #include #include #include "winerror.h" #include "wine/exception.h" #include "ddraw.h" #include "d3d.h" #include "debugtools.h" #include "message.h" #include "options.h" #include "monitor.h" #define RESTORE_SIGNALS DEFAULT_DEBUG_CHANNEL(ddraw); #include "dga_private.h" struct ICOM_VTABLE(IDirectDraw) dga_ddvt; struct ICOM_VTABLE(IDirectDraw2) dga_dd2vt; struct ICOM_VTABLE(IDirectDraw4) dga_dd4vt; #ifdef HAVE_LIBXXF86VM static XF86VidModeModeInfo *orig_mode = NULL; #endif #define DDPRIVATE(x) dga_dd_private *ddpriv = ((dga_dd_private*)(x)->private) #define DPPRIVATE(x) dga_dp_private *dppriv = ((dga_dp_private*)(x)->private) /******************************************************************************* * IDirectDraw */ /* This function is used both by DGA and DGA2 drivers, thus the virtual function table is not set here, but in the calling function */ HRESULT WINAPI DGA_IDirectDraw2Impl_CreateSurface_with_VT( LPDIRECTDRAW2 iface,LPDDSURFACEDESC lpddsd,LPDIRECTDRAWSURFACE *lpdsf, IUnknown *lpunk, void *vtable ) { ICOM_THIS(IDirectDraw2Impl,iface); IDirectDrawSurfaceImpl* dsurf; DDPRIVATE(This); dga_ds_private *dspriv; int i, fbheight = ddpriv->fb_height; TRACE("(%p)->(%p,%p,%p)\n",This,lpddsd,lpdsf,lpunk); if (TRACE_ON(ddraw)) _dump_surface_desc(lpddsd); *lpdsf = (LPDIRECTDRAWSURFACE)HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirectDrawSurfaceImpl) ); dsurf = *(IDirectDrawSurfaceImpl**)lpdsf; dsurf->private = (dga_ds_private*)HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(dga_ds_private) ); ICOM_VTBL(dsurf) = (ICOM_VTABLE(IDirectDrawSurface)*)vtable; dspriv = (dga_ds_private*)dsurf->private; IDirectDraw2_AddRef(iface); dsurf->ref = 1; dsurf->s.ddraw = This; dsurf->s.palette = NULL; dspriv->fb_height = -1; /* This is to have non-on screen surfaces freed */ dsurf->s.lpClipper = NULL; /* Copy the surface description */ dsurf->s.surface_desc = *lpddsd; if (!(lpddsd->dwFlags & DDSD_WIDTH)) dsurf->s.surface_desc.dwWidth = This->d.width; if (!(lpddsd->dwFlags & DDSD_HEIGHT)) dsurf->s.surface_desc.dwHeight = This->d.height; dsurf->s.surface_desc.dwFlags |= DDSD_WIDTH|DDSD_HEIGHT; /* Check if this a 'primary surface' or not */ if ((lpddsd->dwFlags & DDSD_CAPS) && (lpddsd->ddsCaps.dwCaps & DDSCAPS_PRIMARYSURFACE)) { /* This is THE primary surface => there is DGA-specific code */ /* Find a viewport */ for (i=0;i<32;i++) if (!(ddpriv->vpmask & (1<vpmask|=(1<lPitch = dsurf->s.surface_desc.lPitch = ddpriv->fb_width*PFGET_BPP(This->d.directdraw_pixelformat); dsurf->s.surface_desc.u1.lpSurface = ddpriv->fb_addr + i*fbheight*lpddsd->lPitch; dspriv->fb_height = i*fbheight; /* Add flags if there were not present */ dsurf->s.surface_desc.dwFlags |= DDSD_WIDTH|DDSD_HEIGHT|DDSD_PITCH|DDSD_LPSURFACE|DDSD_PIXELFORMAT; dsurf->s.surface_desc.dwWidth = This->d.width; dsurf->s.surface_desc.dwHeight = This->d.height; TRACE("primary surface: dwWidth=%ld, dwHeight=%ld, lPitch=%ld\n",This->d.width,This->d.height,lpddsd->lPitch); /* We put our surface always in video memory */ SDDSCAPS(dsurf) |= DDSCAPS_VISIBLE|DDSCAPS_VIDEOMEMORY; dsurf->s.surface_desc.ddpfPixelFormat = This->d.directdraw_pixelformat; dsurf->s.chain = NULL; if (lpddsd->dwFlags & DDSD_BACKBUFFERCOUNT) { IDirectDrawSurface4Impl* back; dga_ds_private *bspriv; int bbc; for (bbc=lpddsd->dwBackBufferCount;bbc--;) { int i; back = (IDirectDrawSurface4Impl*)HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirectDrawSurface4Impl) ); IDirectDraw2_AddRef(iface); back->ref = 1; ICOM_VTBL(back) = (ICOM_VTABLE(IDirectDrawSurface4)*)vtable; back->private = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(dga_ds_private) ); bspriv = (dga_ds_private*)back->private; for (i=0;i<32;i++) if (!(ddpriv->vpmask & (1<vpmask|=(1<fb_height = i*fbheight; /* Copy the surface description from the front buffer */ back->s.surface_desc = dsurf->s.surface_desc; /* Change the parameters that are not the same */ back->s.surface_desc.u1.lpSurface = ddpriv->fb_addr + i*fbheight*lpddsd->lPitch; back->s.ddraw = This; /* Add relevant info to front and back buffers */ /* FIXME: backbuffer/frontbuffer handling broken here, but * will be fixed up in _Flip(). */ SDDSCAPS(dsurf) |= DDSCAPS_FRONTBUFFER; SDDSCAPS(back) |= DDSCAPS_FLIP|DDSCAPS_BACKBUFFER|DDSCAPS_VIDEOMEMORY; back->s.surface_desc.dwFlags &= ~DDSD_BACKBUFFERCOUNT; SDDSCAPS(back) &= ~(DDSCAPS_VISIBLE|DDSCAPS_PRIMARYSURFACE); IDirectDrawSurface4_AddAttachedSurface((LPDIRECTDRAWSURFACE4)(*lpdsf),(LPDIRECTDRAWSURFACE4)back); } } } else { /* There is no DGA-specific code here... * Go to the common surface creation function */ return common_off_screen_CreateSurface(This, dsurf); } return DD_OK; } static HRESULT WINAPI DGA_IDirectDraw2Impl_CreateSurface( LPDIRECTDRAW2 iface,LPDDSURFACEDESC lpddsd,LPDIRECTDRAWSURFACE *lpdsf, IUnknown *lpunk ) { HRESULT ret; ret = DGA_IDirectDraw2Impl_CreateSurface_with_VT(iface, lpddsd, lpdsf, lpunk, &dga_dds4vt); return ret; } static HRESULT WINAPI DGA_IDirectDrawImpl_SetDisplayMode( LPDIRECTDRAW iface,DWORD width,DWORD height,DWORD depth ) { ICOM_THIS(IDirectDrawImpl,iface); DDPRIVATE(This); int i,mode_count; TRACE("(%p)->(%ld,%ld,%ld)\n", This, width, height, depth); /* We hope getting the asked for depth */ if (_common_depth_to_pixelformat(depth, &(This->d.directdraw_pixelformat), &(This->d.screen_pixelformat), NULL) != -1) { /* I.e. no visual found or emulated */ ERR("(w=%ld,h=%ld,d=%ld), unsupported depth!\n",width,height,depth); return DDERR_UNSUPPORTEDMODE; } if (This->d.width < width) { ERR("SetDisplayMode(w=%ld,h=%ld,d=%ld), width %ld exceeds framebuffer width %ld\n",width,height,depth,width,This->d.width); return DDERR_UNSUPPORTEDMODE; } This->d.width = width; This->d.height = height; /* adjust fb_height, so we don't overlap */ if (ddpriv->fb_height < height) ddpriv->fb_height = height; _common_IDirectDrawImpl_SetDisplayMode(This); #ifdef HAVE_LIBXXF86VM { XF86VidModeModeInfo **all_modes, *vidmode = NULL; XF86VidModeModeLine mod_tmp; /* int dotclock_tmp; */ /* save original video mode and set fullscreen if available*/ orig_mode = (XF86VidModeModeInfo *)malloc(sizeof(XF86VidModeModeInfo)); TSXF86VidModeGetModeLine(display, DefaultScreen(display), &orig_mode->dotclock, &mod_tmp); orig_mode->hdisplay = mod_tmp.hdisplay; orig_mode->hsyncstart = mod_tmp.hsyncstart; orig_mode->hsyncend = mod_tmp.hsyncend; orig_mode->htotal = mod_tmp.htotal; orig_mode->vdisplay = mod_tmp.vdisplay; orig_mode->vsyncstart = mod_tmp.vsyncstart; orig_mode->vsyncend = mod_tmp.vsyncend; orig_mode->vtotal = mod_tmp.vtotal; orig_mode->flags = mod_tmp.flags; orig_mode->private = mod_tmp.private; TSXF86VidModeGetAllModeLines(display,DefaultScreen(display),&mode_count,&all_modes); for (i=0;ihdisplay == width && all_modes[i]->vdisplay == height ) { vidmode = (XF86VidModeModeInfo *)malloc(sizeof(XF86VidModeModeInfo)); *vidmode = *(all_modes[i]); break; } else TSXFree(all_modes[i]->private); } for (i++;iprivate); TSXFree(all_modes); if (!vidmode) WARN("Fullscreen mode not available!\n"); if (vidmode) { TRACE("SwitchToMode(%dx%d)\n",vidmode->hdisplay,vidmode->vdisplay); TSXF86VidModeSwitchToMode(display, DefaultScreen(display), vidmode); #if 0 /* This messes up my screen (XF86_Mach64, 3.3.2.3a) for some reason, and should now be unnecessary */ TSXF86VidModeSetViewPort(display, DefaultScreen(display), 0, 0); #endif } } #endif /* FIXME: this function OVERWRITES several signal handlers. * can we save them? and restore them later? In a way that * it works for the library too? */ TSXF86DGADirectVideo(display,DefaultScreen(display),XF86DGADirectGraphics); TSXF86DGASetViewPort(display,DefaultScreen(display),0,0); #ifdef RESTORE_SIGNALS SIGNAL_Init(); #endif return DD_OK; } HRESULT WINAPI DGA_IDirectDraw2Impl_GetCaps( LPDIRECTDRAW2 iface,LPDDCAPS caps1,LPDDCAPS caps2 ) { ICOM_THIS(IDirectDraw2Impl,iface); DDPRIVATE(This); TRACE("(%p)->GetCaps(%p,%p)\n",This,caps1,caps2); if (!caps1 && !caps2) return DDERR_INVALIDPARAMS; if (caps1) { caps1->dwVidMemTotal = ddpriv->fb_memsize; caps1->dwCaps = 0xffffffff&~(DDCAPS_BANKSWITCHED); /* we can do anything */ caps1->ddsCaps.dwCaps = 0xffffffff; /* we can do anything */ } if (caps2) { caps2->dwVidMemTotal = ddpriv->fb_memsize; caps2->dwCaps = 0xffffffff&~(DDCAPS_BANKSWITCHED); /* we can do anything */ caps2->ddsCaps.dwCaps = 0xffffffff; /* we can do anything */ } return DD_OK; } #if 0 /* Not used as of now.... */ static void fill_caps(LPDDCAPS caps) { /* This function tries to fill the capabilities of Wine's DDraw * implementation. Needs to be fixed, though.. */ if (caps == NULL) return; caps->dwSize = sizeof(*caps); caps->dwCaps = DDCAPS_ALPHA | DDCAPS_BLT | DDCAPS_BLTSTRETCH | DDCAPS_BLTCOLORFILL | DDCAPS_BLTDEPTHFILL | DDCAPS_CANBLTSYSMEM | DDCAPS_COLORKEY | DDCAPS_PALETTE /*| DDCAPS_NOHARDWARE*/; caps->dwCaps2 = DDCAPS2_CERTIFIED | DDCAPS2_NOPAGELOCKREQUIRED | DDCAPS2_WIDESURFACES; caps->dwCKeyCaps = 0xFFFFFFFF; /* Should put real caps here one day... */ caps->dwFXCaps = 0; caps->dwFXAlphaCaps = 0; caps->dwPalCaps = DDPCAPS_8BIT | DDPCAPS_ALLOW256; caps->dwSVCaps = 0; caps->dwZBufferBitDepths = DDBD_16; /* I put here 8 Mo so that D3D applications will believe they have enough * memory to put textures in video memory. * BTW, is this only frame buffer memory or also texture memory (for Voodoo * boards for example) ? */ caps->dwVidMemTotal = 8192 * 1024; caps->dwVidMemFree = 8192 * 1024; /* These are all the supported capabilities of the surfaces */ caps->ddsCaps.dwCaps = DDSCAPS_ALPHA | DDSCAPS_BACKBUFFER | DDSCAPS_COMPLEX | DDSCAPS_FLIP | DDSCAPS_FRONTBUFFER | DDSCAPS_LOCALVIDMEM | DDSCAPS_NONLOCALVIDMEM | DDSCAPS_OFFSCREENPLAIN | /*DDSCAPS_OVERLAY |*/ DDSCAPS_PALETTE | DDSCAPS_PRIMARYSURFACE | DDSCAPS_SYSTEMMEMORY | DDSCAPS_VIDEOMEMORY | DDSCAPS_VISIBLE; #ifdef HAVE_OPENGL caps->dwCaps |= DDCAPS_3D | DDCAPS_ZBLTS; caps->dwCaps2 |= DDCAPS2_NO2DDURING3DSCENE; caps->ddsCaps.dwCaps |= DDSCAPS_3DDEVICE | DDSCAPS_MIPMAP | DDSCAPS_TEXTURE | DDSCAPS_ZBUFFER; #endif } #endif static HRESULT WINAPI DGA_IDirectDraw2Impl_CreatePalette( LPDIRECTDRAW2 iface,DWORD dwFlags,LPPALETTEENTRY palent,LPDIRECTDRAWPALETTE *lpddpal,LPUNKNOWN lpunk ) { ICOM_THIS(IDirectDraw2Impl,iface); IDirectDrawPaletteImpl* ddpal; dga_dp_private *dppriv; HRESULT res; int xsize = 0,i; TRACE("(%p)->(%08lx,%p,%p,%p)\n",This,dwFlags,palent,lpddpal,lpunk); res = common_IDirectDraw2Impl_CreatePalette(This,dwFlags,palent,(IDirectDrawPaletteImpl**)lpddpal,lpunk,&xsize); if (res != 0) return res; ddpal = *(IDirectDrawPaletteImpl**)lpddpal; ddpal->private = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(dga_dp_private) ); dppriv = (dga_dp_private*)ddpal->private; ICOM_VTBL(ddpal)= &dga_ddpalvt; if (This->d.directdraw_pixelformat.u.dwRGBBitCount<=8) { dppriv->cm = TSXCreateColormap(display,DefaultRootWindow(display),DefaultVisualOfScreen(X11DRV_GetXScreen()),AllocAll); } else { ERR("why are we doing CreatePalette in hi/truecolor?\n"); dppriv->cm = 0; } if (dppriv->cm && xsize) { for (i=0;ipalents[i].peRed<<8; xc.blue = ddpal->palents[i].peBlue<<8; xc.green = ddpal->palents[i].peGreen<<8; xc.flags = DoRed|DoBlue|DoGreen; xc.pixel = i; TSXStoreColor(display,dppriv->cm,&xc); } } return DD_OK; } static HRESULT WINAPI DGA_IDirectDraw2Impl_RestoreDisplayMode(LPDIRECTDRAW2 iface) { ICOM_THIS(IDirectDraw2Impl,iface); TRACE("(%p)->()\n",This); Sleep(1000); TSXF86DGADirectVideo(display,DefaultScreen(display),0); #ifdef RESTORE_SIGNALS SIGNAL_Init(); #endif return DD_OK; } static ULONG WINAPI DGA_IDirectDraw2Impl_Release(LPDIRECTDRAW2 iface) { ICOM_THIS(IDirectDraw2Impl,iface); DDPRIVATE(This); TRACE("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { VirtualFree(ddpriv->fb_addr, 0, MEM_RELEASE); TSXF86DGADirectVideo(display,DefaultScreen(display),0); if (This->d.window && GetPropA(This->d.window,ddProp)) DestroyWindow(This->d.window); #ifdef HAVE_LIBXXF86VM if (orig_mode) { TSXF86VidModeSwitchToMode( display, DefaultScreen(display), orig_mode ); if (orig_mode->privsize) TSXFree(orig_mode->private); free(orig_mode); orig_mode = NULL; } #endif #ifdef RESTORE_SIGNALS SIGNAL_Init(); #endif HeapFree(GetProcessHeap(),0,This); return S_OK; } return This->ref; } HRESULT WINAPI DGA_IDirectDraw2Impl_QueryInterface( LPDIRECTDRAW2 iface,REFIID refiid,LPVOID *obj ) { ICOM_THIS(IDirectDraw2Impl,iface); TRACE("(%p)->(%s,%p)\n",This,debugstr_guid(refiid),obj); if ( IsEqualGUID( &IID_IUnknown, refiid ) ) { *obj = This; IDirectDraw2_AddRef(iface); TRACE(" Creating IUnknown interface (%p)\n", *obj); return S_OK; } if ( IsEqualGUID( &IID_IDirectDraw, refiid ) ) { ICOM_VTBL(This) = (ICOM_VTABLE(IDirectDraw2)*)&dga_ddvt; IDirectDraw2_AddRef(iface); *obj = This; TRACE(" Creating IDirectDraw interface (%p)\n", *obj); return S_OK; } if ( IsEqualGUID( &IID_IDirectDraw2, refiid ) ) { ICOM_VTBL(This) = (ICOM_VTABLE(IDirectDraw2)*)&dga_dd2vt; IDirectDraw2_AddRef(iface); *obj = This; TRACE(" Creating IDirectDraw2 interface (%p)\n", *obj); return S_OK; } if ( IsEqualGUID( &IID_IDirectDraw4, refiid ) ) { ICOM_VTBL(This) = (ICOM_VTABLE(IDirectDraw2)*)&dga_dd4vt; IDirectDraw2_AddRef(iface); *obj = This; TRACE(" Creating IDirectDraw4 interface (%p)\n", *obj); return S_OK; } FIXME("(%p):interface for IID %s _NOT_ found!\n",This,debugstr_guid(refiid)); return OLE_E_ENUM_NOMORE; } static HRESULT WINAPI DGA_IDirectDraw2Impl_EnumDisplayModes( LPDIRECTDRAW2 iface,DWORD dwFlags,LPDDSURFACEDESC lpddsfd,LPVOID context,LPDDENUMMODESCALLBACK modescb ) { ICOM_THIS(IDirectDraw2Impl,iface); DDSURFACEDESC ddsfd; static struct { int w,h; } modes[5] = { /* some usual modes */ {512,384}, {640,400}, {640,480}, {800,600}, {1024,768}, }; static int depths[4] = {8,16,24,32}; int i,j; TRACE("(%p)->(0x%08lx,%p,%p,%p)\n",This,dwFlags,lpddsfd,context,modescb); ddsfd.dwSize = sizeof(ddsfd); ddsfd.dwFlags = DDSD_HEIGHT|DDSD_WIDTH|DDSD_BACKBUFFERCOUNT|DDSD_PIXELFORMAT|DDSD_CAPS; if (dwFlags & DDEDM_REFRESHRATES) { ddsfd.dwFlags |= DDSD_REFRESHRATE; ddsfd.u.dwRefreshRate = 60; } ddsfd.ddsCaps.dwCaps = 0; ddsfd.dwBackBufferCount = 1; for (i=0;i 8 */ if (depths[i]==8) { ddsfd.ddpfPixelFormat.u1.dwRBitMask = 0; ddsfd.ddpfPixelFormat.u2.dwGBitMask = 0; ddsfd.ddpfPixelFormat.u3.dwBBitMask = 0; ddsfd.ddpfPixelFormat.u4.dwRGBAlphaBitMask= 0; ddsfd.ddsCaps.dwCaps=DDSCAPS_PALETTE; ddsfd.ddpfPixelFormat.dwFlags|=DDPF_PALETTEINDEXED8; } else { ddsfd.ddpfPixelFormat.u4.dwRGBAlphaBitMask= 0; /* FIXME: We should query those from X itself */ switch (depths[i]) { case 16: ddsfd.ddpfPixelFormat.u1.dwRBitMask = 0xF800; ddsfd.ddpfPixelFormat.u2.dwGBitMask = 0x07E0; ddsfd.ddpfPixelFormat.u3.dwBBitMask= 0x001F; break; case 24: ddsfd.ddpfPixelFormat.u1.dwRBitMask = 0x00FF0000; ddsfd.ddpfPixelFormat.u2.dwGBitMask = 0x0000FF00; ddsfd.ddpfPixelFormat.u3.dwBBitMask= 0x000000FF; break; case 32: ddsfd.ddpfPixelFormat.u1.dwRBitMask = 0x00FF0000; ddsfd.ddpfPixelFormat.u2.dwGBitMask = 0x0000FF00; ddsfd.ddpfPixelFormat.u3.dwBBitMask= 0x000000FF; break; } } ddsfd.dwWidth = MONITOR_GetWidth(&MONITOR_PrimaryMonitor); ddsfd.dwHeight = MONITOR_GetHeight(&MONITOR_PrimaryMonitor); TRACE(" enumerating (%ldx%ldx%d)\n",ddsfd.dwWidth,ddsfd.dwHeight,depths[i]); if (!modescb(&ddsfd,context)) return DD_OK; for (j=0;j(%p)\n",This,lpddsfd); lpddsfd->dwFlags = DDSD_HEIGHT|DDSD_WIDTH|DDSD_PITCH|DDSD_BACKBUFFERCOUNT|DDSD_PIXELFORMAT|DDSD_CAPS; lpddsfd->dwHeight = This->d.height; lpddsfd->dwWidth = This->d.width; lpddsfd->lPitch = ddpriv->fb_width*PFGET_BPP(This->d.directdraw_pixelformat); lpddsfd->dwBackBufferCount = 2; lpddsfd->u.dwRefreshRate = 60; lpddsfd->ddsCaps.dwCaps = DDSCAPS_PALETTE; lpddsfd->ddpfPixelFormat = This->d.directdraw_pixelformat; if (TRACE_ON(ddraw)) _dump_surface_desc(lpddsfd); return DD_OK; } /* Note: Hack so we can reuse the old functions without compiler warnings */ #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(dga_ddvt.fn##fun)) #else # define XCAST(fun) (void *) #endif struct ICOM_VTABLE(IDirectDraw) dga_ddvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE XCAST(QueryInterface)DGA_IDirectDraw2Impl_QueryInterface, XCAST(AddRef)IDirectDraw2Impl_AddRef, XCAST(Release)DGA_IDirectDraw2Impl_Release, XCAST(Compact)IDirectDraw2Impl_Compact, XCAST(CreateClipper)IDirectDraw2Impl_CreateClipper, XCAST(CreatePalette)DGA_IDirectDraw2Impl_CreatePalette, XCAST(CreateSurface)DGA_IDirectDraw2Impl_CreateSurface, XCAST(DuplicateSurface)IDirectDraw2Impl_DuplicateSurface, XCAST(EnumDisplayModes)DGA_IDirectDraw2Impl_EnumDisplayModes, XCAST(EnumSurfaces)IDirectDraw2Impl_EnumSurfaces, XCAST(FlipToGDISurface)IDirectDraw2Impl_FlipToGDISurface, XCAST(GetCaps)DGA_IDirectDraw2Impl_GetCaps, XCAST(GetDisplayMode)DGA_IDirectDraw2Impl_GetDisplayMode, XCAST(GetFourCCCodes)IDirectDraw2Impl_GetFourCCCodes, XCAST(GetGDISurface)IDirectDraw2Impl_GetGDISurface, XCAST(GetMonitorFrequency)IDirectDraw2Impl_GetMonitorFrequency, XCAST(GetScanLine)IDirectDraw2Impl_GetScanLine, XCAST(GetVerticalBlankStatus)IDirectDraw2Impl_GetVerticalBlankStatus, XCAST(Initialize)IDirectDraw2Impl_Initialize, XCAST(RestoreDisplayMode)DGA_IDirectDraw2Impl_RestoreDisplayMode, XCAST(SetCooperativeLevel)IDirectDraw2Impl_SetCooperativeLevel, DGA_IDirectDrawImpl_SetDisplayMode, XCAST(WaitForVerticalBlank)IDirectDraw2Impl_WaitForVerticalBlank, }; #undef XCAST /***************************************************************************** * IDirectDraw2 * */ static HRESULT WINAPI DGA_IDirectDraw2Impl_SetDisplayMode( LPDIRECTDRAW2 iface,DWORD width,DWORD height,DWORD depth,DWORD dwRefreshRate, DWORD dwFlags ) { FIXME( "Ignored parameters (0x%08lx,0x%08lx)\n", dwRefreshRate, dwFlags ); return DGA_IDirectDrawImpl_SetDisplayMode((LPDIRECTDRAW)iface,width,height,depth); } HRESULT WINAPI DGA_IDirectDraw2Impl_GetAvailableVidMem( LPDIRECTDRAW2 iface,LPDDSCAPS ddscaps,LPDWORD total,LPDWORD free ) { ICOM_THIS(IDirectDraw2Impl,iface); DDPRIVATE(This); TRACE("(%p)->(%p,%p,%p)\n",This,ddscaps,total,free); if (total) *total = ddpriv->fb_memsize * 1024; if (free) *free = ddpriv->fb_memsize * 1024; return DD_OK; } ICOM_VTABLE(IDirectDraw2) dga_dd2vt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DGA_IDirectDraw2Impl_QueryInterface, IDirectDraw2Impl_AddRef, DGA_IDirectDraw2Impl_Release, IDirectDraw2Impl_Compact, IDirectDraw2Impl_CreateClipper, DGA_IDirectDraw2Impl_CreatePalette, DGA_IDirectDraw2Impl_CreateSurface, IDirectDraw2Impl_DuplicateSurface, DGA_IDirectDraw2Impl_EnumDisplayModes, IDirectDraw2Impl_EnumSurfaces, IDirectDraw2Impl_FlipToGDISurface, DGA_IDirectDraw2Impl_GetCaps, DGA_IDirectDraw2Impl_GetDisplayMode, IDirectDraw2Impl_GetFourCCCodes, IDirectDraw2Impl_GetGDISurface, IDirectDraw2Impl_GetMonitorFrequency, IDirectDraw2Impl_GetScanLine, IDirectDraw2Impl_GetVerticalBlankStatus, IDirectDraw2Impl_Initialize, DGA_IDirectDraw2Impl_RestoreDisplayMode, IDirectDraw2Impl_SetCooperativeLevel, DGA_IDirectDraw2Impl_SetDisplayMode, IDirectDraw2Impl_WaitForVerticalBlank, DGA_IDirectDraw2Impl_GetAvailableVidMem }; #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(dga_dd4vt.fn##fun)) #else # define XCAST(fun) (void*) #endif ICOM_VTABLE(IDirectDraw4) dga_dd4vt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE XCAST(QueryInterface)DGA_IDirectDraw2Impl_QueryInterface, XCAST(AddRef)IDirectDraw2Impl_AddRef, XCAST(Release)DGA_IDirectDraw2Impl_Release, XCAST(Compact)IDirectDraw2Impl_Compact, XCAST(CreateClipper)IDirectDraw2Impl_CreateClipper, XCAST(CreatePalette)DGA_IDirectDraw2Impl_CreatePalette, XCAST(CreateSurface)DGA_IDirectDraw2Impl_CreateSurface, XCAST(DuplicateSurface)IDirectDraw2Impl_DuplicateSurface, XCAST(EnumDisplayModes)DGA_IDirectDraw2Impl_EnumDisplayModes, XCAST(EnumSurfaces)IDirectDraw2Impl_EnumSurfaces, XCAST(FlipToGDISurface)IDirectDraw2Impl_FlipToGDISurface, XCAST(GetCaps)DGA_IDirectDraw2Impl_GetCaps, XCAST(GetDisplayMode)DGA_IDirectDraw2Impl_GetDisplayMode, XCAST(GetFourCCCodes)IDirectDraw2Impl_GetFourCCCodes, XCAST(GetGDISurface)IDirectDraw2Impl_GetGDISurface, XCAST(GetMonitorFrequency)IDirectDraw2Impl_GetMonitorFrequency, XCAST(GetScanLine)IDirectDraw2Impl_GetScanLine, XCAST(GetVerticalBlankStatus)IDirectDraw2Impl_GetVerticalBlankStatus, XCAST(Initialize)IDirectDraw2Impl_Initialize, XCAST(RestoreDisplayMode)DGA_IDirectDraw2Impl_RestoreDisplayMode, XCAST(SetCooperativeLevel)IDirectDraw2Impl_SetCooperativeLevel, XCAST(SetDisplayMode)DGA_IDirectDrawImpl_SetDisplayMode, XCAST(WaitForVerticalBlank)IDirectDraw2Impl_WaitForVerticalBlank, XCAST(GetAvailableVidMem)DGA_IDirectDraw2Impl_GetAvailableVidMem, IDirectDraw4Impl_GetSurfaceFromDC, IDirectDraw4Impl_RestoreAllSurfaces, IDirectDraw4Impl_TestCooperativeLevel, IDirectDraw4Impl_GetDeviceIdentifier }; #undef XCAST wine-20000526/dlls/ddraw/ddraw/dga2.c0100644000175000001440000003556707112356453016611 0ustar julliardusers/* DirectDraw IDirectDraw XF86DGA interface * * DGA2's specific IDirectDraw functions... */ #include "config.h" #include #include #include #include #include #include #include "winerror.h" #include "wine/exception.h" #include "ddraw.h" #include "d3d.h" #include "debugtools.h" #include "message.h" #include "options.h" #include "monitor.h" DEFAULT_DEBUG_CHANNEL(ddraw); #include "dga2_private.h" struct ICOM_VTABLE(IDirectDraw) dga2_ddvt; struct ICOM_VTABLE(IDirectDraw2) dga2_dd2vt; struct ICOM_VTABLE(IDirectDraw4) dga2_dd4vt; #define DDPRIVATE(x) dga2_dd_private *ddpriv = ((dga2_dd_private*)(x)->private) #define DPPRIVATE(x) dga2_dp_private *dppriv = ((dga2_dp_private*)(x)->private) /******************************************************************************* * IDirectDraw */ static HRESULT WINAPI DGA2_IDirectDraw2Impl_CreateSurface( LPDIRECTDRAW2 iface,LPDDSURFACEDESC lpddsd,LPDIRECTDRAWSURFACE *lpdsf, IUnknown *lpunk ) { HRESULT ret; ret = DGA_IDirectDraw2Impl_CreateSurface_with_VT(iface, lpddsd, lpdsf, lpunk, &dga2_dds4vt); return ret; } static HRESULT WINAPI DGA2_IDirectDraw2Impl_SetCooperativeLevel( LPDIRECTDRAW2 iface,HWND hwnd,DWORD cooplevel ) { /* ICOM_THIS(IDirectDraw2Impl,iface); */ HRESULT ret; int evbase, erbase; ret = IDirectDraw2Impl_SetCooperativeLevel(iface, hwnd, cooplevel); if (ret != DD_OK) return ret; TSXDGAQueryExtension(display, &evbase, &erbase); /* Now, start handling of DGA events giving the handle to the DDraw window as the window for which the event will be reported */ TSXDGASelectInput(display, DefaultScreen(display), KeyPressMask|KeyReleaseMask|ButtonPressMask|ButtonReleaseMask|PointerMotionMask ); X11DRV_EVENT_SetDGAStatus(hwnd, evbase); return DD_OK; } void _DGA2_Initialize_FrameBuffer(IDirectDrawImpl *This, int mode) { DDPIXELFORMAT *pf = &(This->d.directdraw_pixelformat); DDPRIVATE(This); /* Now, get the device / mode description */ ddpriv->dev = TSXDGASetMode(display, DefaultScreen(display), mode); ddpriv->DGA.fb_width = ddpriv->dev->mode.imageWidth; TSXDGASetViewport(display,DefaultScreen(display),0,0, XDGAFlipImmediate); ddpriv->DGA.fb_height = ddpriv->dev->mode.viewportHeight; TRACE("video framebuffer: begin %p, width %d, memsize %d\n", ddpriv->dev->data, ddpriv->dev->mode.imageWidth, (ddpriv->dev->mode.imageWidth * ddpriv->dev->mode.imageHeight * (ddpriv->dev->mode.bitsPerPixel / 8)) ); TRACE("viewport height: %d\n", ddpriv->dev->mode.viewportHeight); /* Get the screen dimensions as seen by Wine. * In that case, it may be better to ignore the -desktop mode and return the * real screen size => print a warning */ This->d.height = MONITOR_GetHeight(&MONITOR_PrimaryMonitor); This->d.width = MONITOR_GetWidth(&MONITOR_PrimaryMonitor); ddpriv->DGA.fb_addr = ddpriv->dev->data; ddpriv->DGA.fb_memsize = (ddpriv->dev->mode.imageWidth * ddpriv->dev->mode.imageHeight * (ddpriv->dev->mode.bitsPerPixel / 8)); ddpriv->DGA.vpmask = 0; /* Fill the screen pixelformat */ pf->dwSize = sizeof(DDPIXELFORMAT); pf->dwFourCC = 0; pf->u.dwRGBBitCount = ddpriv->dev->mode.bitsPerPixel; if (ddpriv->dev->mode.depth == 8) { pf->dwFlags = DDPF_PALETTEINDEXED8|DDPF_RGB; pf->u1.dwRBitMask = 0; pf->u2.dwGBitMask = 0; pf->u3.dwBBitMask = 0; } else { pf->dwFlags = DDPF_RGB; pf->u1.dwRBitMask = ddpriv->dev->mode.redMask; pf->u2.dwGBitMask = ddpriv->dev->mode.greenMask; pf->u3.dwBBitMask = ddpriv->dev->mode.blueMask; } pf->u4.dwRGBAlphaBitMask= 0; This->d.screen_pixelformat = *pf; } static HRESULT WINAPI DGA2_IDirectDrawImpl_SetDisplayMode( LPDIRECTDRAW iface,DWORD width,DWORD height,DWORD depth ) { ICOM_THIS(IDirectDrawImpl,iface); DDPRIVATE(This); int i; XDGAMode *modes = ddpriv->modes; int mode_to_use = -1; TRACE("(%p)->(%ld,%ld,%ld)\n", This, width, height, depth); /* Search in the list a display mode that corresponds to what is requested */ for (i = 0; i < ddpriv->num_modes; i++) { if ((height == modes[i].viewportHeight) && (width == modes[i].viewportWidth) && (depth == modes[i].depth) ) mode_to_use = modes[i].num; } if (mode_to_use < 0) { ERR("Could not find matching mode !!!\n"); return DDERR_UNSUPPORTEDMODE; } else { TRACE("Using mode number %d\n", mode_to_use); VirtualFree(ddpriv->DGA.fb_addr, 0, MEM_RELEASE); TSXDGACloseFramebuffer(display, DefaultScreen(display)); if (!TSXDGAOpenFramebuffer(display, DefaultScreen(display))) { ERR("Error opening the frame buffer !!!\n"); return DDERR_GENERIC; } /* Initialize the frame buffer */ _DGA2_Initialize_FrameBuffer(This, mode_to_use); VirtualAlloc(ddpriv->DGA.fb_addr, ddpriv->DGA.fb_memsize, MEM_RESERVE|MEM_SYSTEM, PAGE_READWRITE); /* Re-get (if necessary) the DGA events */ TSXDGASelectInput(display, DefaultScreen(display), KeyPressMask|KeyReleaseMask|ButtonPressMask|ButtonReleaseMask|PointerMotionMask ); } return DD_OK; } static HRESULT WINAPI DGA2_IDirectDraw2Impl_CreatePalette( LPDIRECTDRAW2 iface,DWORD dwFlags,LPPALETTEENTRY palent,LPDIRECTDRAWPALETTE *lpddpal,LPUNKNOWN lpunk ) { ICOM_THIS(IDirectDraw2Impl,iface); IDirectDrawPaletteImpl* ddpal; dga_dp_private *dppriv; HRESULT res; int xsize = 0,i; DDPRIVATE(This); TRACE("(%p)->(%08lx,%p,%p,%p)\n",This,dwFlags,palent,lpddpal,lpunk); res = common_IDirectDraw2Impl_CreatePalette(This,dwFlags,palent,(IDirectDrawPaletteImpl**)lpddpal,lpunk,&xsize); if (res != 0) return res; ddpal = *(IDirectDrawPaletteImpl**)lpddpal; ddpal->private = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(dga_dp_private) ); dppriv = (dga_dp_private*)ddpal->private; ICOM_VTBL(ddpal)= &dga_ddpalvt; if (This->d.directdraw_pixelformat.u.dwRGBBitCount<=8) { dppriv->cm = TSXDGACreateColormap(display,DefaultScreen(display), ddpriv->dev, AllocAll); } else { ERR("why are we doing CreatePalette in hi/truecolor?\n"); dppriv->cm = 0; } if (dppriv->cm && xsize) { for (i=0;ipalents[i].peRed<<8; xc.blue = ddpal->palents[i].peBlue<<8; xc.green = ddpal->palents[i].peGreen<<8; xc.flags = DoRed|DoBlue|DoGreen; xc.pixel = i; TSXStoreColor(display,dppriv->cm,&xc); } } return DD_OK; } static HRESULT WINAPI DGA2_IDirectDraw2Impl_RestoreDisplayMode(LPDIRECTDRAW2 iface) { ICOM_THIS(IDirectDraw2Impl,iface); TRACE("(%p)->()\n",This); Sleep(1000); XDGACloseFramebuffer(display,DefaultScreen(display)); XDGASetMode(display,DefaultScreen(display), 0); return DD_OK; } static ULONG WINAPI DGA2_IDirectDraw2Impl_Release(LPDIRECTDRAW2 iface) { ICOM_THIS(IDirectDraw2Impl,iface); DDPRIVATE(This); TRACE("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { TRACE("Closing access to the FrameBuffer\n"); VirtualFree(ddpriv->DGA.fb_addr, 0, MEM_RELEASE); TSXDGACloseFramebuffer(display, DefaultScreen(display)); TRACE("Going back to normal X mode of operation\n"); TSXDGASetMode(display, DefaultScreen(display), 0); /* Set the input handling back to absolute */ X11DRV_EVENT_SetInputMethod(X11DRV_INPUT_ABSOLUTE); /* Remove the handling of DGA2 events */ X11DRV_EVENT_SetDGAStatus(0, -1); /* Free the modes list */ TSXFree(ddpriv->modes); HeapFree(GetProcessHeap(),0,This); return S_OK; } return This->ref; } static HRESULT WINAPI DGA2_IDirectDraw2Impl_EnumDisplayModes( LPDIRECTDRAW2 iface,DWORD dwFlags,LPDDSURFACEDESC lpddsfd,LPVOID context,LPDDENUMMODESCALLBACK modescb ) { ICOM_THIS(IDirectDraw2Impl,iface); DDSURFACEDESC ddsfd; DDPRIVATE(This); int i; XDGAMode *modes = ddpriv->modes; TRACE("(%p)->(0x%08lx,%p,%p,%p)\n",This,dwFlags,lpddsfd,context,modescb); ddsfd.dwSize = sizeof(ddsfd); ddsfd.dwFlags = DDSD_HEIGHT|DDSD_WIDTH|DDSD_BACKBUFFERCOUNT|DDSD_PIXELFORMAT|DDSD_CAPS; if (dwFlags & DDEDM_REFRESHRATES) { ddsfd.dwFlags |= DDSD_REFRESHRATE; ddsfd.u.dwRefreshRate = 60; } ddsfd.ddsCaps.dwCaps = 0; ddsfd.dwBackBufferCount = 1; ddsfd.dwFlags |= DDSD_PITCH; for (i = 0; i < ddpriv->num_modes; i++) { if (TRACE_ON(ddraw)) { DPRINTF(" Enumerating mode %d : %s (FB: %dx%d / VP: %dx%d) - depth %d -", modes[i].num, modes[i].name, modes[i].imageWidth, modes[i].imageHeight, modes[i].viewportWidth, modes[i].viewportHeight, modes[i].depth); if (modes[i].flags & XDGAConcurrentAccess) DPRINTF(" XDGAConcurrentAccess "); if (modes[i].flags & XDGASolidFillRect) DPRINTF(" XDGASolidFillRect "); if (modes[i].flags & XDGABlitRect) DPRINTF(" XDGABlitRect "); if (modes[i].flags & XDGABlitTransRect) DPRINTF(" XDGABlitTransRect "); if (modes[i].flags & XDGAPixmap) DPRINTF(" XDGAPixmap "); DPRINTF("\n"); } /* Fill the pixel format */ ddsfd.ddpfPixelFormat.dwSize = sizeof(DDPIXELFORMAT); ddsfd.ddpfPixelFormat.dwFourCC = 0; ddsfd.ddpfPixelFormat.u4.dwRGBAlphaBitMask= 0; ddsfd.ddpfPixelFormat.u.dwRGBBitCount = modes[i].bitsPerPixel; if (modes[i].depth == 8) { ddsfd.ddpfPixelFormat.dwFlags = DDPF_RGB|DDPF_PALETTEINDEXED8; ddsfd.ddpfPixelFormat.u1.dwRBitMask = 0; ddsfd.ddpfPixelFormat.u2.dwGBitMask = 0; ddsfd.ddpfPixelFormat.u3.dwBBitMask = 0; ddsfd.ddsCaps.dwCaps = DDSCAPS_PALETTE; } else { ddsfd.ddpfPixelFormat.dwFlags = DDPF_RGB; ddsfd.ddpfPixelFormat.u1.dwRBitMask = modes[i].redMask; ddsfd.ddpfPixelFormat.u2.dwGBitMask = modes[i].greenMask; ddsfd.ddpfPixelFormat.u3.dwBBitMask = modes[i].blueMask; } ddsfd.dwWidth = modes[i].viewportWidth; ddsfd.dwHeight = modes[i].viewportHeight; ddsfd.lPitch = modes[i].imageWidth; /* Send mode to the application */ if (!modescb(&ddsfd,context)) return DD_OK; } return DD_OK; } /* Note: Hack so we can reuse the old functions without compiler warnings */ #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(dga2_ddvt.fn##fun)) #else # define XCAST(fun) (void *) #endif struct ICOM_VTABLE(IDirectDraw) dga2_ddvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE XCAST(QueryInterface)DGA_IDirectDraw2Impl_QueryInterface, XCAST(AddRef)IDirectDraw2Impl_AddRef, XCAST(Release)DGA2_IDirectDraw2Impl_Release, XCAST(Compact)IDirectDraw2Impl_Compact, XCAST(CreateClipper)IDirectDraw2Impl_CreateClipper, XCAST(CreatePalette)DGA2_IDirectDraw2Impl_CreatePalette, XCAST(CreateSurface)DGA2_IDirectDraw2Impl_CreateSurface, XCAST(DuplicateSurface)IDirectDraw2Impl_DuplicateSurface, XCAST(EnumDisplayModes)DGA2_IDirectDraw2Impl_EnumDisplayModes, XCAST(EnumSurfaces)IDirectDraw2Impl_EnumSurfaces, XCAST(FlipToGDISurface)IDirectDraw2Impl_FlipToGDISurface, XCAST(GetCaps)DGA_IDirectDraw2Impl_GetCaps, XCAST(GetDisplayMode)DGA_IDirectDraw2Impl_GetDisplayMode, XCAST(GetFourCCCodes)IDirectDraw2Impl_GetFourCCCodes, XCAST(GetGDISurface)IDirectDraw2Impl_GetGDISurface, XCAST(GetMonitorFrequency)IDirectDraw2Impl_GetMonitorFrequency, XCAST(GetScanLine)IDirectDraw2Impl_GetScanLine, XCAST(GetVerticalBlankStatus)IDirectDraw2Impl_GetVerticalBlankStatus, XCAST(Initialize)IDirectDraw2Impl_Initialize, XCAST(RestoreDisplayMode)DGA2_IDirectDraw2Impl_RestoreDisplayMode, XCAST(SetCooperativeLevel)DGA2_IDirectDraw2Impl_SetCooperativeLevel, DGA2_IDirectDrawImpl_SetDisplayMode, XCAST(WaitForVerticalBlank)IDirectDraw2Impl_WaitForVerticalBlank, }; #undef XCAST /***************************************************************************** * IDirectDraw2 * */ static HRESULT WINAPI DGA2_IDirectDraw2Impl_SetDisplayMode( LPDIRECTDRAW2 iface,DWORD width,DWORD height,DWORD depth,DWORD dwRefreshRate, DWORD dwFlags ) { FIXME( "Ignored parameters (0x%08lx,0x%08lx)\n", dwRefreshRate, dwFlags ); return DGA2_IDirectDrawImpl_SetDisplayMode((LPDIRECTDRAW)iface,width,height,depth); } ICOM_VTABLE(IDirectDraw2) dga2_dd2vt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DGA_IDirectDraw2Impl_QueryInterface, IDirectDraw2Impl_AddRef, DGA2_IDirectDraw2Impl_Release, IDirectDraw2Impl_Compact, IDirectDraw2Impl_CreateClipper, DGA2_IDirectDraw2Impl_CreatePalette, DGA2_IDirectDraw2Impl_CreateSurface, IDirectDraw2Impl_DuplicateSurface, DGA2_IDirectDraw2Impl_EnumDisplayModes, IDirectDraw2Impl_EnumSurfaces, IDirectDraw2Impl_FlipToGDISurface, DGA_IDirectDraw2Impl_GetCaps, DGA_IDirectDraw2Impl_GetDisplayMode, IDirectDraw2Impl_GetFourCCCodes, IDirectDraw2Impl_GetGDISurface, IDirectDraw2Impl_GetMonitorFrequency, IDirectDraw2Impl_GetScanLine, IDirectDraw2Impl_GetVerticalBlankStatus, IDirectDraw2Impl_Initialize, DGA2_IDirectDraw2Impl_RestoreDisplayMode, DGA2_IDirectDraw2Impl_SetCooperativeLevel, DGA2_IDirectDraw2Impl_SetDisplayMode, IDirectDraw2Impl_WaitForVerticalBlank, DGA_IDirectDraw2Impl_GetAvailableVidMem }; #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(dga2_dd4vt.fn##fun)) #else # define XCAST(fun) (void*) #endif ICOM_VTABLE(IDirectDraw4) dga2_dd4vt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE XCAST(QueryInterface)DGA_IDirectDraw2Impl_QueryInterface, XCAST(AddRef)IDirectDraw2Impl_AddRef, XCAST(Release)DGA2_IDirectDraw2Impl_Release, XCAST(Compact)IDirectDraw2Impl_Compact, XCAST(CreateClipper)IDirectDraw2Impl_CreateClipper, XCAST(CreatePalette)DGA2_IDirectDraw2Impl_CreatePalette, XCAST(CreateSurface)DGA2_IDirectDraw2Impl_CreateSurface, XCAST(DuplicateSurface)IDirectDraw2Impl_DuplicateSurface, XCAST(EnumDisplayModes)DGA2_IDirectDraw2Impl_EnumDisplayModes, XCAST(EnumSurfaces)IDirectDraw2Impl_EnumSurfaces, XCAST(FlipToGDISurface)IDirectDraw2Impl_FlipToGDISurface, XCAST(GetCaps)DGA_IDirectDraw2Impl_GetCaps, XCAST(GetDisplayMode)DGA_IDirectDraw2Impl_GetDisplayMode, XCAST(GetFourCCCodes)IDirectDraw2Impl_GetFourCCCodes, XCAST(GetGDISurface)IDirectDraw2Impl_GetGDISurface, XCAST(GetMonitorFrequency)IDirectDraw2Impl_GetMonitorFrequency, XCAST(GetScanLine)IDirectDraw2Impl_GetScanLine, XCAST(GetVerticalBlankStatus)IDirectDraw2Impl_GetVerticalBlankStatus, XCAST(Initialize)IDirectDraw2Impl_Initialize, XCAST(RestoreDisplayMode)DGA2_IDirectDraw2Impl_RestoreDisplayMode, XCAST(SetCooperativeLevel)DGA2_IDirectDraw2Impl_SetCooperativeLevel, XCAST(SetDisplayMode)DGA2_IDirectDrawImpl_SetDisplayMode, XCAST(WaitForVerticalBlank)IDirectDraw2Impl_WaitForVerticalBlank, XCAST(GetAvailableVidMem)DGA_IDirectDraw2Impl_GetAvailableVidMem, IDirectDraw4Impl_GetSurfaceFromDC, IDirectDraw4Impl_RestoreAllSurfaces, IDirectDraw4Impl_TestCooperativeLevel, IDirectDraw4Impl_GetDeviceIdentifier }; #undef XCAST wine-20000526/dlls/ddraw/ddraw/main.c0100644000175000001440000004272707112572175016715 0ustar julliardusers/* DirectDraw IDirectDraw interface (generic) * * Copyright 1997-2000 Marcus Meissner * Copyright 1998-2000 Lionel Ulmer (most of Direct3D stuff) */ /* * This file contains all the interface functions that are shared between * all interfaces. Or better, it is a "common stub" library for the IDirectDraw* * objects */ #include "config.h" #include #include #include #include #include #include "winerror.h" #include "ddraw.h" #include "d3d.h" #include "debugtools.h" #include "message.h" #include "options.h" #include "monitor.h" DEFAULT_DEBUG_CHANNEL(ddraw); #include "ddraw_private.h" HRESULT WINAPI IDirectDraw2Impl_DuplicateSurface( LPDIRECTDRAW2 iface,LPDIRECTDRAWSURFACE src,LPDIRECTDRAWSURFACE *dst ) { ICOM_THIS(IDirectDraw2Impl,iface); FIXME("(%p)->(%p,%p) simply copies\n",This,src,dst); *dst = src; /* FIXME */ return DD_OK; } HRESULT WINAPI IDirectDraw2Impl_SetCooperativeLevel( LPDIRECTDRAW2 iface,HWND hwnd,DWORD cooplevel ) { ICOM_THIS(IDirectDraw2Impl,iface); FIXME("(%p)->(%08lx,%08lx)\n",This,(DWORD)hwnd,cooplevel); _dump_cooperativelevel(cooplevel); This->d.mainWindow = hwnd; return DD_OK; } /* * Small helper to either use the cooperative window or create a new * one (for mouse and keyboard input) and drawing in the Xlib implementation. * * Note this just uses USER calls, so it is safe in here. */ void _common_IDirectDrawImpl_SetDisplayMode(IDirectDrawImpl* This) { RECT rect; /* Do destroy only our window */ if (This->d.window && GetPropA(This->d.window,ddProp)) { DestroyWindow(This->d.window); This->d.window = 0; } /* Sanity check cooperative window before assigning it to drawing. */ if (IsWindow(This->d.mainWindow) && IsWindowVisible(This->d.mainWindow) ) { GetWindowRect(This->d.mainWindow,&rect); if ((((rect.right-rect.left) >= This->d.width) && ((rect.bottom-rect.top) >= This->d.height)) ) { This->d.window = This->d.mainWindow; /* FIXME: resizing is not windows compatible behaviour, need test */ /* SetWindowPos(This->d.mainWindow,HWND_TOPMOST,0,0,This->d.width,This->d.height,SWP_NOMOVE|SWP_NOACTIVATE|SWP_NOOWNERZORDER); */ This->d.paintable = 1; /* don't wait for WM_PAINT */ } } /* ... failed, create new one. */ if (!This->d.window) { This->d.window = CreateWindowExA( 0, "WINE_DirectDraw", "WINE_DirectDraw", WS_POPUP, 0,0, This->d.width, This->d.height, 0, 0, 0, NULL ); /*Store THIS with the window. We'll use it in the window procedure*/ SetPropA(This->d.window,ddProp,(LONG)This); ShowWindow(This->d.window,TRUE); UpdateWindow(This->d.window); } SetFocus(This->d.window); } HRESULT WINAPI IDirectDrawImpl_SetDisplayMode( LPDIRECTDRAW iface,DWORD width,DWORD height,DWORD depth ) { ICOM_THIS(IDirectDrawImpl,iface); FIXME("(%p)->SetDisplayMode(%ld,%ld,%ld), needs to be implemented for your display adapter!\n",This,width,height,depth); This->d.width = width; This->d.height = height; _common_IDirectDrawImpl_SetDisplayMode(This); return DD_OK; } static void fill_caps(LPDDCAPS caps) { /* This function tries to fill the capabilities of Wines DDraw * implementation. Needs to be fixed, though.. */ if (caps == NULL) return; caps->dwSize = sizeof(*caps); caps->dwCaps = DDCAPS_ALPHA | DDCAPS_BLT | DDCAPS_BLTSTRETCH | DDCAPS_BLTCOLORFILL | DDCAPS_BLTDEPTHFILL | DDCAPS_CANBLTSYSMEM | DDCAPS_COLORKEY | DDCAPS_PALETTE /*| DDCAPS_NOHARDWARE*/; caps->dwCaps2 = DDCAPS2_CERTIFIED | DDCAPS2_NOPAGELOCKREQUIRED | DDCAPS2_WIDESURFACES; caps->dwCKeyCaps = 0xFFFFFFFF; /* Should put real caps here one day... */ caps->dwFXCaps = 0; caps->dwFXAlphaCaps = 0; caps->dwPalCaps = DDPCAPS_8BIT | DDPCAPS_ALLOW256; caps->dwSVCaps = 0; caps->dwZBufferBitDepths = DDBD_16; /* I put here 8 Mo so that D3D applications will believe they have enough * memory to put textures in video memory. BTW, is this only frame buffer * memory or also texture memory (for Voodoo boards for example) ? */ caps->dwVidMemTotal = 8192 * 1024; caps->dwVidMemFree = 8192 * 1024; /* These are all the supported capabilities of the surfaces */ caps->ddsCaps.dwCaps = DDSCAPS_ALPHA | DDSCAPS_BACKBUFFER | DDSCAPS_COMPLEX | DDSCAPS_FLIP | DDSCAPS_FRONTBUFFER | DDSCAPS_LOCALVIDMEM | DDSCAPS_NONLOCALVIDMEM | DDSCAPS_OFFSCREENPLAIN | /*DDSCAPS_OVERLAY |*/ DDSCAPS_PALETTE | DDSCAPS_PRIMARYSURFACE | DDSCAPS_SYSTEMMEMORY | DDSCAPS_VIDEOMEMORY | DDSCAPS_VISIBLE; } HRESULT WINAPI IDirectDraw2Impl_GetCaps( LPDIRECTDRAW2 iface,LPDDCAPS caps1,LPDDCAPS caps2 ) { ICOM_THIS(IDirectDraw2Impl,iface); TRACE("(%p)->GetCaps(%p,%p)\n",This,caps1,caps2); /* Put the same caps for the two capabilities */ fill_caps(caps1); fill_caps(caps2); return DD_OK; } HRESULT WINAPI IDirectDraw2Impl_CreateClipper( LPDIRECTDRAW2 iface,DWORD x,LPDIRECTDRAWCLIPPER *lpddclip,LPUNKNOWN lpunk ) { ICOM_THIS(IDirectDraw2Impl,iface); IDirectDrawClipperImpl** ilpddclip=(IDirectDrawClipperImpl**)lpddclip; FIXME("(%p)->(%08lx,%p,%p),stub!\n", This,x,ilpddclip,lpunk); *ilpddclip = (IDirectDrawClipperImpl*)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirectDrawClipperImpl)); (*ilpddclip)->ref = 1; ICOM_VTBL(*ilpddclip) = &ddclipvt; return DD_OK; } HRESULT WINAPI common_IDirectDraw2Impl_CreatePalette( IDirectDraw2Impl* This,DWORD dwFlags,LPPALETTEENTRY palent, IDirectDrawPaletteImpl **lpddpal,LPUNKNOWN lpunk,int *psize ) { int size = 0; if (TRACE_ON(ddraw)) _dump_paletteformat(dwFlags); *lpddpal = (IDirectDrawPaletteImpl*)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirectDrawPaletteImpl)); if (*lpddpal == NULL) return E_OUTOFMEMORY; (*lpddpal)->ref = 1; (*lpddpal)->ddraw = (IDirectDrawImpl*)This; if (dwFlags & DDPCAPS_1BIT) size = 2; else if (dwFlags & DDPCAPS_2BIT) size = 4; else if (dwFlags & DDPCAPS_4BIT) size = 16; else if (dwFlags & DDPCAPS_8BIT) size = 256; else ERR("unhandled palette format\n"); *psize = size; if (This->d.palette_convert == NULL) { /* No depth conversion - create 8<->8 identity map */ int ent; for (ent=0; ent<256; ent++) (*lpddpal)->screen_palents[ent] = ent; } if (palent) { /* Now, if we are in depth conversion mode, create the screen palette */ if (This->d.palette_convert != NULL) This->d.palette_convert(palent,(*lpddpal)->screen_palents,0,size); memcpy((*lpddpal)->palents, palent, size * sizeof(PALETTEENTRY)); } else if (This->d.palette_convert != NULL) { /* In that case, put all 0xFF */ memset((*lpddpal)->screen_palents, 0xFF, 256 * sizeof(int)); } return DD_OK; } HRESULT WINAPI IDirectDraw2Impl_CreatePalette( LPDIRECTDRAW2 iface,DWORD dwFlags,LPPALETTEENTRY palent,LPDIRECTDRAWPALETTE *lpddpal,LPUNKNOWN lpunk ) { ICOM_THIS(IDirectDraw2Impl,iface); IDirectDrawPaletteImpl** ilpddpal=(IDirectDrawPaletteImpl**)lpddpal; int xsize; HRESULT res; TRACE("(%p)->(%08lx,%p,%p,%p)\n",This,dwFlags,palent,ilpddpal,lpunk); res = common_IDirectDraw2Impl_CreatePalette(This,dwFlags,palent,ilpddpal,lpunk,&xsize); if (res != 0) return res; ICOM_VTBL(*ilpddpal) = &ddraw_ddpalvt; return DD_OK; } HRESULT WINAPI IDirectDraw2Impl_RestoreDisplayMode(LPDIRECTDRAW2 iface) { ICOM_THIS(IDirectDraw2Impl,iface); TRACE("(%p)->RestoreDisplayMode()\n", This); Sleep(1000); return DD_OK; } HRESULT WINAPI IDirectDraw2Impl_WaitForVerticalBlank( LPDIRECTDRAW2 iface,DWORD x,HANDLE h ) { ICOM_THIS(IDirectDraw2Impl,iface); FIXME("(%p)->(flags=0x%08lx,handle=0x%08x)\n",This,x,h); return DD_OK; } ULONG WINAPI IDirectDraw2Impl_AddRef(LPDIRECTDRAW2 iface) { ICOM_THIS(IDirectDraw2Impl,iface); TRACE("(%p)->() incrementing from %lu.\n", This, This->ref ); return ++(This->ref); } ULONG WINAPI IDirectDraw2Impl_Release(LPDIRECTDRAW2 iface) { ICOM_THIS(IDirectDraw2Impl,iface); TRACE("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { if (This->d.window && GetPropA(This->d.window,ddProp)) DestroyWindow(This->d.window); HeapFree(GetProcessHeap(),0,This); return S_OK; } return This->ref; } HRESULT WINAPI IDirectDraw2Impl_QueryInterface( LPDIRECTDRAW2 iface,REFIID refiid,LPVOID *obj ) { ICOM_THIS(IDirectDraw2Impl,iface); if ( IsEqualGUID( &IID_IUnknown, refiid ) ) { *obj = This; IDirectDraw2_AddRef(iface); TRACE(" Creating IUnknown interface (%p)\n", *obj); return S_OK; } ERR("(%p)->(%s,%p), must be implemented by display interface!\n",This,debugstr_guid(refiid),obj); return OLE_E_ENUM_NOMORE; } HRESULT WINAPI IDirectDraw2Impl_GetVerticalBlankStatus( LPDIRECTDRAW2 iface,BOOL *status ) { ICOM_THIS(IDirectDraw2Impl,iface); TRACE("(%p)->(%p)\n",This,status); *status = TRUE; return DD_OK; } HRESULT WINAPI IDirectDraw2Impl_EnumDisplayModes( LPDIRECTDRAW2 iface,DWORD dwFlags,LPDDSURFACEDESC lpddsfd,LPVOID context, LPDDENUMMODESCALLBACK modescb ) { ICOM_THIS(IDirectDraw2Impl,iface); DDSURFACEDESC ddsfd; static struct { int w,h; } modes[5] = { /* some of the usual modes */ {512,384}, {640,400}, {640,480}, {800,600}, {1024,768}, }; static int depths[4] = {8,16,24,32}; int i,j; TRACE("(%p)->(0x%08lx,%p,%p,%p)\n",This,dwFlags,lpddsfd,context,modescb); ddsfd.dwSize = sizeof(ddsfd); ddsfd.dwFlags = DDSD_HEIGHT|DDSD_WIDTH|DDSD_BACKBUFFERCOUNT|DDSD_PIXELFORMAT|DDSD_CAPS; if (dwFlags & DDEDM_REFRESHRATES) { ddsfd.dwFlags |= DDSD_REFRESHRATE; ddsfd.u.dwRefreshRate = 60; } ddsfd.ddsCaps.dwCaps = 0; ddsfd.dwBackBufferCount = 1; for (i=0;i 8 */ if (depths[i]==8) { ddsfd.ddpfPixelFormat.u1.dwRBitMask = 0; ddsfd.ddpfPixelFormat.u2.dwGBitMask = 0; ddsfd.ddpfPixelFormat.u3.dwBBitMask = 0; ddsfd.ddpfPixelFormat.u4.dwRGBAlphaBitMask= 0; ddsfd.ddsCaps.dwCaps=DDSCAPS_PALETTE; ddsfd.ddpfPixelFormat.dwFlags|=DDPF_PALETTEINDEXED8; } else { ddsfd.ddpfPixelFormat.u4.dwRGBAlphaBitMask= 0; /* FIXME: We should query those from X itself */ switch (depths[i]) { case 16: ddsfd.ddpfPixelFormat.u1.dwRBitMask = 0xF800; ddsfd.ddpfPixelFormat.u2.dwGBitMask = 0x07E0; ddsfd.ddpfPixelFormat.u3.dwBBitMask= 0x001F; break; case 24: ddsfd.ddpfPixelFormat.u1.dwRBitMask = 0x00FF0000; ddsfd.ddpfPixelFormat.u2.dwGBitMask = 0x0000FF00; ddsfd.ddpfPixelFormat.u3.dwBBitMask= 0x000000FF; break; case 32: ddsfd.ddpfPixelFormat.u1.dwRBitMask = 0x00FF0000; ddsfd.ddpfPixelFormat.u2.dwGBitMask = 0x0000FF00; ddsfd.ddpfPixelFormat.u3.dwBBitMask= 0x000000FF; break; } } ddsfd.dwWidth = MONITOR_GetWidth(&MONITOR_PrimaryMonitor); ddsfd.dwHeight = MONITOR_GetHeight(&MONITOR_PrimaryMonitor); TRACE(" enumerating (%ldx%ldx%d)\n",ddsfd.dwWidth,ddsfd.dwHeight,depths[i]); if (!modescb(&ddsfd,context)) return DD_OK; for (j=0;jGetDisplayMode(%p)\n",This,lpddsfd); lpddsfd->dwFlags = DDSD_HEIGHT|DDSD_WIDTH|DDSD_PITCH|DDSD_BACKBUFFERCOUNT|DDSD_PIXELFORMAT|DDSD_CAPS; lpddsfd->dwHeight = This->d.height; lpddsfd->dwWidth = This->d.width; lpddsfd->lPitch =lpddsfd->dwWidth*PFGET_BPP(This->d.directdraw_pixelformat); lpddsfd->dwBackBufferCount = 2; lpddsfd->u.dwRefreshRate = 60; lpddsfd->ddsCaps.dwCaps = DDSCAPS_PALETTE; lpddsfd->ddpfPixelFormat = This->d.directdraw_pixelformat; if (TRACE_ON(ddraw)) _dump_surface_desc(lpddsfd); return DD_OK; } HRESULT WINAPI IDirectDraw2Impl_FlipToGDISurface(LPDIRECTDRAW2 iface) { ICOM_THIS(IDirectDraw2Impl,iface); FIXME("(%p)->()\n",This); return DD_OK; } HRESULT WINAPI IDirectDraw2Impl_GetMonitorFrequency( LPDIRECTDRAW2 iface,LPDWORD freq ) { ICOM_THIS(IDirectDraw2Impl,iface); FIXME("(%p)->(%p) returns 60 Hz always\n",This,freq); *freq = 60*100; /* 60 Hz */ return DD_OK; } HRESULT WINAPI IDirectDraw2Impl_GetFourCCCodes( LPDIRECTDRAW2 iface,LPDWORD x,LPDWORD y ) { ICOM_THIS(IDirectDraw2Impl,iface); FIXME("(%p,%p,%p), stub\n",This,x,y); return DD_OK; } HRESULT WINAPI IDirectDraw2Impl_EnumSurfaces( LPDIRECTDRAW2 iface,DWORD x,LPDDSURFACEDESC ddsfd,LPVOID context, LPDDENUMSURFACESCALLBACK ddsfcb ) { ICOM_THIS(IDirectDraw2Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p,%p),stub!\n",This,x,ddsfd,context,ddsfcb); return DD_OK; } HRESULT WINAPI IDirectDraw2Impl_Compact( LPDIRECTDRAW2 iface ) { ICOM_THIS(IDirectDraw2Impl,iface); FIXME("(%p)->()\n", This ); return DD_OK; } HRESULT WINAPI IDirectDraw2Impl_GetGDISurface( LPDIRECTDRAW2 iface, LPDIRECTDRAWSURFACE *lplpGDIDDSSurface ) { ICOM_THIS(IDirectDraw2Impl,iface); FIXME("(%p)->(%p)\n", This, lplpGDIDDSSurface); return DD_OK; } HRESULT WINAPI IDirectDraw2Impl_GetScanLine( LPDIRECTDRAW2 iface, LPDWORD lpdwScanLine ) { ICOM_THIS(IDirectDraw2Impl,iface); FIXME("(%p)->(%p)\n", This, lpdwScanLine); if (lpdwScanLine) *lpdwScanLine = 0; return DD_OK; } HRESULT WINAPI IDirectDraw2Impl_Initialize(LPDIRECTDRAW2 iface, GUID *lpGUID) { ICOM_THIS(IDirectDraw2Impl,iface); FIXME("(%p)->(%p)\n", This, lpGUID); return DD_OK; } /***************************************************************************** * IDirectDraw2 * * We only need to list the changed/new functions. */ HRESULT WINAPI IDirectDraw2Impl_SetDisplayMode( LPDIRECTDRAW2 iface,DWORD width,DWORD height,DWORD depth, DWORD dwRefreshRate, DWORD dwFlags ) { FIXME("Ignoring parameters (0x%08lx,0x%08lx)\n", dwRefreshRate, dwFlags ); return IDirectDrawImpl_SetDisplayMode((LPDIRECTDRAW)iface,width,height,depth); } HRESULT WINAPI IDirectDraw2Impl_GetAvailableVidMem( LPDIRECTDRAW2 iface,LPDDSCAPS ddscaps,LPDWORD total,LPDWORD free ) { ICOM_THIS(IDirectDraw2Impl,iface); TRACE("(%p)->(%p,%p,%p)\n", This,ddscaps,total,free); /* We have 16 MB videomemory */ if (total) *total= 16*1024*1024; if (free) *free = 16*1024*1024; return DD_OK; } /***************************************************************************** * IDirectDraw4 * */ HRESULT WINAPI IDirectDraw4Impl_GetSurfaceFromDC( LPDIRECTDRAW4 iface, HDC hdc, LPDIRECTDRAWSURFACE *lpDDS ) { ICOM_THIS(IDirectDraw4Impl,iface); FIXME("(%p)->(%08ld,%p)\n", This, (DWORD) hdc, lpDDS); return DD_OK; } HRESULT WINAPI IDirectDraw4Impl_RestoreAllSurfaces(LPDIRECTDRAW4 iface) { ICOM_THIS(IDirectDraw4Impl,iface); FIXME("(%p)->()\n", This); return DD_OK; } HRESULT WINAPI IDirectDraw4Impl_TestCooperativeLevel(LPDIRECTDRAW4 iface) { ICOM_THIS(IDirectDraw4Impl,iface); FIXME("(%p)->()\n", This); return DD_OK; } HRESULT WINAPI IDirectDraw4Impl_GetDeviceIdentifier( LPDIRECTDRAW4 iface,LPDDDEVICEIDENTIFIER lpdddi,DWORD dwFlags ) { ICOM_THIS(IDirectDraw4Impl,iface); FIXME("(%p)->(%p,%08lx)\n", This, lpdddi, dwFlags); /* just guessing values */ strcpy(lpdddi->szDriver,"directdraw"); strcpy(lpdddi->szDescription,"WINE DirectDraw"); lpdddi->liDriverVersion.s.HighPart = 7; lpdddi->liDriverVersion.s.LowPart = 0; /* Do I smell PCI ids here ? -MM */ lpdddi->dwVendorId = 0; lpdddi->dwDeviceId = 0; lpdddi->dwSubSysId = 0; lpdddi->dwRevision = 1; memset(&(lpdddi->guidDeviceIdentifier),0,sizeof(lpdddi->guidDeviceIdentifier)); return DD_OK; } HRESULT common_off_screen_CreateSurface( IDirectDraw2Impl* This,IDirectDrawSurfaceImpl* lpdsf ) { int bpp; /* The surface was already allocated when entering in this function */ TRACE("using system memory for a surface (%p) \n", lpdsf); if (lpdsf->s.surface_desc.dwFlags & DDSD_ZBUFFERBITDEPTH) { /* This is a Z Buffer */ TRACE("Creating Z-Buffer of %ld bit depth\n", lpdsf->s.surface_desc.u.dwZBufferBitDepth); bpp = lpdsf->s.surface_desc.u.dwZBufferBitDepth / 8; } else { /* This is a standard image */ if (!(lpdsf->s.surface_desc.dwFlags & DDSD_PIXELFORMAT)) { /* No pixel format => use DirectDraw's format */ lpdsf->s.surface_desc.ddpfPixelFormat = This->d.directdraw_pixelformat; lpdsf->s.surface_desc.dwFlags |= DDSD_PIXELFORMAT; } bpp = GET_BPP(lpdsf->s.surface_desc); } if (lpdsf->s.surface_desc.dwFlags & DDSD_LPSURFACE) ERR("Creates a surface that is already allocated : assuming this is an application bug !\n"); lpdsf->s.surface_desc.dwFlags |= DDSD_PITCH|DDSD_LPSURFACE; lpdsf->s.surface_desc.u1.lpSurface =(LPBYTE)VirtualAlloc( NULL, lpdsf->s.surface_desc.dwWidth * lpdsf->s.surface_desc.dwHeight * bpp, MEM_RESERVE | MEM_COMMIT, PAGE_READWRITE ); lpdsf->s.surface_desc.lPitch = lpdsf->s.surface_desc.dwWidth * bpp; return DD_OK; } wine-20000526/dlls/ddraw/ddraw/x11.c0100644000175000001440000007663307112401444016373 0ustar julliardusers/* DirectDraw IDirectDraw Xlib interface * * Copyright 1997-2000 Marcus Meissner * Copyright 1998-2000 Lionel Ulmer (most of Direct3D stuff) */ /* * This file contains the Xlib specific interface functions. */ #include "config.h" #include #include #include #include #include #include #include "winerror.h" #include "ddraw.h" #include "d3d.h" #include "win.h" #include "debugtools.h" #include "message.h" #include "options.h" #include "monitor.h" DEFAULT_DEBUG_CHANNEL(ddraw); #include "x11_private.h" #define DDPRIVATE(x) x11_dd_private *ddpriv = ((x11_dd_private*)(x)->private) #define DPPRIVATE(x) x11_dp_private *dppriv = ((x11_dp_private*)(x)->private) #define DSPRIVATE(x) x11_ds_private *dspriv = ((x11_ds_private*)(x)->private) static inline BOOL get_option( const char *name, BOOL def ) { return PROFILE_GetWineIniBool( "x11drv", name, def ); } int _common_depth_to_pixelformat( DWORD depth, DDPIXELFORMAT *pixelformat,DDPIXELFORMAT *screen_pixelformat, int *pix_depth ) { XVisualInfo *vi; XPixmapFormatValues *pf; XVisualInfo vt; int nvisuals, npixmap, i; int match = 0; int index = -2; vi = TSXGetVisualInfo(display, VisualNoMask, &vt, &nvisuals); pf = TSXListPixmapFormats(display, &npixmap); for (i = 0; i < npixmap; i++) { if (pf[i].depth == depth) { int j; for (j = 0; j < nvisuals; j++) { if (vi[j].depth == pf[i].depth) { pixelformat->dwSize = sizeof(*pixelformat); if (depth == 8) { pixelformat->dwFlags = DDPF_PALETTEINDEXED8|DDPF_RGB; pixelformat->u1.dwRBitMask = 0; pixelformat->u2.dwGBitMask = 0; pixelformat->u3.dwBBitMask = 0; } else { pixelformat->dwFlags = DDPF_RGB; pixelformat->u1.dwRBitMask = vi[j].red_mask; pixelformat->u2.dwGBitMask = vi[j].green_mask; pixelformat->u3.dwBBitMask = vi[j].blue_mask; } pixelformat->dwFourCC = 0; pixelformat->u.dwRGBBitCount = pf[i].bits_per_pixel; pixelformat->u4.dwRGBAlphaBitMask= 0; *screen_pixelformat = *pixelformat; if (pix_depth) *pix_depth = vi[j].depth; match = 1; index = -1; goto clean_up_and_exit; } } WARN("No visual corresponding to pixmap format !\n"); } } if (match == 0) { /* We try now to find an emulated mode */ int c; for (c = 0; c < sizeof(ModeEmulations) / sizeof(Convert); c++) { if (ModeEmulations[c].dest.depth == depth) { /* Found an emulation function, now tries to find a matching visual / pixel format pair */ for (i = 0; i < npixmap; i++) { if ((pf[i].depth == ModeEmulations[c].screen.depth) && (pf[i].bits_per_pixel == ModeEmulations[c].screen.bpp)) { int j; for (j = 0; j < nvisuals; j++) { if (vi[j].depth == pf[i].depth) { screen_pixelformat->dwSize = sizeof(*screen_pixelformat); screen_pixelformat->dwFlags = DDPF_RGB; screen_pixelformat->dwFourCC = 0; screen_pixelformat->u.dwRGBBitCount = pf[i].bits_per_pixel; screen_pixelformat->u1.dwRBitMask = vi[j].red_mask; screen_pixelformat->u2.dwGBitMask = vi[j].green_mask; screen_pixelformat->u3.dwBBitMask = vi[j].blue_mask; screen_pixelformat->u4.dwRGBAlphaBitMask= 0; pixelformat->dwSize = sizeof(*pixelformat); pixelformat->dwFourCC = 0; if (depth == 8) { pixelformat->dwFlags = DDPF_RGB|DDPF_PALETTEINDEXED8; pixelformat->u.dwRGBBitCount = 8; pixelformat->u1.dwRBitMask = 0; pixelformat->u2.dwGBitMask = 0; pixelformat->u3.dwBBitMask = 0; } else { pixelformat->dwFlags = DDPF_RGB; pixelformat->u.dwRGBBitCount = ModeEmulations[c].dest.bpp; pixelformat->u1.dwRBitMask = ModeEmulations[c].dest.rmask; pixelformat->u2.dwGBitMask = ModeEmulations[c].dest.gmask; pixelformat->u3.dwBBitMask = ModeEmulations[c].dest.bmask; } pixelformat->u4.dwRGBAlphaBitMask= 0; if (pix_depth) *pix_depth = vi[j].depth; match = 2; index = c; goto clean_up_and_exit; } ERR("No visual corresponding to pixmap format !\n"); } } } } } } clean_up_and_exit: TSXFree(vi); TSXFree(pf); return index; } /******************************************************************************* * IDirectDraw */ #ifdef HAVE_LIBXXSHM /* Error handlers for Image creation */ static int XShmErrorHandler(Display *dpy, XErrorEvent *event) { XShmErrorFlag = 1; return 0; } static XImage *create_xshmimage( IDirectDraw2Impl* This, IDirectDrawSurface4Impl* lpdsf ) { DSPRIVATE(lpdsf); DDPRIVATE(This); XImage *img; int (*WineXHandler)(Display *, XErrorEvent *); img = TSXShmCreateImage(display, DefaultVisualOfScreen(X11DRV_GetXScreen()), This->d.pixmap_depth, ZPixmap, NULL, &(dspriv->shminfo), lpdsf->s.surface_desc.dwWidth, lpdsf->s.surface_desc.dwHeight ); if (img == NULL) { FIXME("Couldn't create XShm image (due to X11 remote display or failure).\nReverting to standard X images !\n"); ddpriv->xshm_active = 0; return NULL; } dspriv->shminfo.shmid = shmget( IPC_PRIVATE, img->bytes_per_line * img->height, IPC_CREAT|0777 ); if (dspriv->shminfo.shmid < 0) { FIXME("Couldn't create shared memory segment (due to X11 remote display or failure).\nReverting to standard X images !\n"); ddpriv->xshm_active = 0; TSXDestroyImage(img); return NULL; } dspriv->shminfo.shmaddr=img->data=(char*)shmat(dspriv->shminfo.shmid,0,0); if (img->data == (char *) -1) { FIXME("Couldn't attach shared memory segment (due to X11 remote display or failure).\nReverting to standard X images !\n"); ddpriv->xshm_active = 0; TSXDestroyImage(img); shmctl(dspriv->shminfo.shmid, IPC_RMID, 0); return NULL; } dspriv->shminfo.readOnly = False; /* This is where things start to get trickier.... * First, we flush the current X connections to be sure to catch all * non-XShm related errors */ TSXSync(display, False); /* Then we enter in the non-thread safe part of the tests */ EnterCriticalSection( &X11DRV_CritSection ); /* Reset the error flag, sets our new error handler and try to attach * the surface */ XShmErrorFlag = 0; WineXHandler = XSetErrorHandler(XShmErrorHandler); XShmAttach(display, &(dspriv->shminfo)); XSync(display, False); /* Check the error flag */ if (XShmErrorFlag) { /* An error occured */ XFlush(display); XShmErrorFlag = 0; XDestroyImage(img); shmdt(dspriv->shminfo.shmaddr); shmctl(dspriv->shminfo.shmid, IPC_RMID, 0); XSetErrorHandler(WineXHandler); FIXME("Couldn't attach shared memory segment to X server (due to X11 remote display or failure).\nReverting to standard X images !\n"); ddpriv->xshm_active = 0; /* Leave the critical section */ LeaveCriticalSection( &X11DRV_CritSection ); return NULL; } /* Here, to be REALLY sure, I should do a XShmPutImage to check if * this works, but it may be a bit overkill.... */ XSetErrorHandler(WineXHandler); LeaveCriticalSection( &X11DRV_CritSection ); shmctl(dspriv->shminfo.shmid, IPC_RMID, 0); if (This->d.pixel_convert != NULL) { int bpp = PFGET_BPP(This->d.directdraw_pixelformat); lpdsf->s.surface_desc.u1.lpSurface = VirtualAlloc( NULL, lpdsf->s.surface_desc.dwWidth * lpdsf->s.surface_desc.dwHeight * bpp, MEM_RESERVE | MEM_COMMIT, PAGE_READWRITE ); } else { lpdsf->s.surface_desc.u1.lpSurface = img->data; VirtualAlloc(img->data, img->bytes_per_line * img->height, MEM_RESERVE|MEM_SYSTEM, PAGE_READWRITE); } return img; } #endif /* HAVE_LIBXXSHM */ static XImage *create_ximage(IDirectDraw2Impl* This, IDirectDrawSurface4Impl* lpdsf) { XImage *img = NULL; DDPRIVATE(This); void *img_data; int bpp = PFGET_BPP(This->d.directdraw_pixelformat); #ifdef HAVE_LIBXXSHM if (ddpriv->xshm_active) img = create_xshmimage(This, lpdsf); if (img == NULL) { #endif /* Allocate surface memory */ lpdsf->s.surface_desc.u1.lpSurface = VirtualAlloc( NULL, lpdsf->s.surface_desc.dwWidth * lpdsf->s.surface_desc.dwHeight * bpp, MEM_RESERVE | MEM_COMMIT, PAGE_READWRITE ); if (This->d.pixel_convert != NULL) img_data = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, lpdsf->s.surface_desc.dwWidth * lpdsf->s.surface_desc.dwHeight * bpp ); else img_data = lpdsf->s.surface_desc.u1.lpSurface; /* In this case, create an XImage */ img = TSXCreateImage(display, DefaultVisualOfScreen(X11DRV_GetXScreen()), This->d.pixmap_depth, ZPixmap, 0, img_data, lpdsf->s.surface_desc.dwWidth, lpdsf->s.surface_desc.dwHeight, 32, lpdsf->s.surface_desc.dwWidth*bpp ); #ifdef HAVE_LIBXXSHM } #endif /* assert(bpp*lpdsf->s.surface_desc.dwWidth == img->bytes_per_line); */ if (This->d.pixel_convert != NULL) lpdsf->s.surface_desc.lPitch = bpp*lpdsf->s.surface_desc.dwWidth; else lpdsf->s.surface_desc.lPitch = img->bytes_per_line; return img; } static HRESULT WINAPI Xlib_IDirectDraw2Impl_CreateSurface( LPDIRECTDRAW2 iface,LPDDSURFACEDESC lpddsd,LPDIRECTDRAWSURFACE *lpdsf, IUnknown *lpunk ) { ICOM_THIS(IDirectDraw2Impl,iface); IDirectDrawSurfaceImpl* dsurf; x11_ds_private *dspriv; TRACE("(%p)->CreateSurface(%p,%p,%p)\n", This,lpddsd,lpdsf,lpunk); if (TRACE_ON(ddraw)) _dump_surface_desc(lpddsd); *lpdsf = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirectDrawSurfaceImpl) ); dsurf = (IDirectDrawSurfaceImpl*)*lpdsf; dsurf->ref = 2; dsurf->private = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(x11_ds_private) ); ICOM_VTBL(dsurf) = (ICOM_VTABLE(IDirectDrawSurface)*)&xlib_dds4vt; dspriv = (x11_ds_private*)dsurf->private; dsurf->s.ddraw = This; IDirectDraw2_AddRef(iface); dsurf->s.palette = NULL; dsurf->s.lpClipper = NULL; dspriv->image = NULL; /* This is for off-screen buffers */ /* Copy the surface description */ dsurf->s.surface_desc = *lpddsd; if (!(lpddsd->dwFlags & DDSD_WIDTH)) dsurf->s.surface_desc.dwWidth = This->d.width; if (!(lpddsd->dwFlags & DDSD_HEIGHT)) dsurf->s.surface_desc.dwHeight = This->d.height; dsurf->s.surface_desc.dwFlags |= DDSD_WIDTH|DDSD_HEIGHT; /* Check if this a 'primary surface' or not */ if ((lpddsd->dwFlags & DDSD_CAPS) && (lpddsd->ddsCaps.dwCaps & DDSCAPS_PRIMARYSURFACE) ) { XImage *img; TRACE("using standard XImage for a primary surface (%p)\n", dsurf); /* Create the XImage */ img = create_ximage(This,(IDirectDrawSurface4Impl*)dsurf); if (img == NULL) return DDERR_OUTOFMEMORY; dspriv->image = img; /* Add flags if there were not present */ dsurf->s.surface_desc.dwFlags |= DDSD_WIDTH|DDSD_HEIGHT|DDSD_PITCH|DDSD_LPSURFACE|DDSD_PIXELFORMAT; dsurf->s.surface_desc.dwWidth = This->d.width; dsurf->s.surface_desc.dwHeight = This->d.height; dsurf->s.surface_desc.ddsCaps.dwCaps |= DDSCAPS_VISIBLE|DDSCAPS_VIDEOMEMORY; dsurf->s.surface_desc.ddpfPixelFormat = This->d.directdraw_pixelformat; /* Check for backbuffers */ if (lpddsd->dwFlags & DDSD_BACKBUFFERCOUNT) { IDirectDrawSurface4Impl* back; XImage *img; int i; for (i=lpddsd->dwBackBufferCount;i--;) { x11_ds_private *bspriv; back = (IDirectDrawSurface4Impl*)HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirectDrawSurface4Impl) ); TRACE("allocated back-buffer (%p)\n", back); IDirectDraw2_AddRef(iface); back->s.ddraw = This; back->ref = 2; ICOM_VTBL(back)=(ICOM_VTABLE(IDirectDrawSurface4)*)&xlib_dds4vt; /* Copy the surface description from the front buffer */ back->s.surface_desc = dsurf->s.surface_desc; back->s.surface_desc.u1.lpSurface = NULL; back->private = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(x11_ds_private) ); bspriv = (x11_ds_private*)back->private; /* Create the XImage. */ img = create_ximage(This, back); if (img == NULL) return DDERR_OUTOFMEMORY; TRACE("bspriv = %p\n",bspriv); bspriv->image = img; /* Add relevant info to front and back buffers */ /* FIXME: backbuffer/frontbuffer handling broken here, but * will be fixed up in _Flip(). */ SDDSCAPS(dsurf) |= DDSCAPS_FRONTBUFFER; SDDSCAPS(back) |= DDSCAPS_BACKBUFFER|DDSCAPS_VIDEOMEMORY|DDSCAPS_FLIP; back->s.surface_desc.dwFlags &= ~DDSD_BACKBUFFERCOUNT; SDDSCAPS(back) &= ~(DDSCAPS_VISIBLE|DDSCAPS_PRIMARYSURFACE); TRACE("attaching surface %p to %p\n",back,*lpdsf); IDirectDrawSurface4_AddAttachedSurface((LPDIRECTDRAWSURFACE4)(*lpdsf),(LPDIRECTDRAWSURFACE4)back); } } } else { /* There is no Xlib-specific code here... * Go to the common surface creation function */ return common_off_screen_CreateSurface(This,dsurf); } return DD_OK; } /* * The Xlib Implementation tries to use the passed hwnd as drawing window, * even when the approbiate bitmasks are not specified. */ static HRESULT WINAPI Xlib_IDirectDraw2Impl_SetCooperativeLevel( LPDIRECTDRAW2 iface,HWND hwnd,DWORD cooplevel ) { ICOM_THIS(IDirectDraw2Impl,iface); DDPRIVATE(This); FIXME("(%p)->(%08lx,%08lx)\n",This,(DWORD)hwnd,cooplevel); if (TRACE_ON(ddraw)) _dump_cooperativelevel(cooplevel); This->d.mainWindow = hwnd; /* This will be overwritten in the case of Full Screen mode. Windowed games could work with that :-) */ if (hwnd) { WND *tmpWnd = WIN_FindWndPtr(hwnd); ddpriv->drawable = X11DRV_WND_GetXWindow(tmpWnd); WIN_ReleaseWndPtr(tmpWnd); if( !ddpriv->drawable ) { ddpriv->drawable = ((X11DRV_WND_DATA *) WIN_GetDesktop()->pDriverData)->window; WIN_ReleaseDesktop(); } TRACE("Setting drawable to %ld\n", ddpriv->drawable); } return DD_OK; } static HRESULT WINAPI Xlib_IDirectDrawImpl_SetDisplayMode( LPDIRECTDRAW iface,DWORD width,DWORD height,DWORD depth ) { ICOM_THIS(IDirectDrawImpl,iface); DDPRIVATE(This); char buf[200]; WND *tmpWnd; int c; TRACE("(%p)->SetDisplayMode(%ld,%ld,%ld)\n", This, width, height, depth); switch ((c = _common_depth_to_pixelformat(depth, &(This->d.directdraw_pixelformat), &(This->d.screen_pixelformat), &(This->d.pixmap_depth)))) { case -2: sprintf(buf,"SetDisplayMode(w=%ld,h=%ld,d=%ld), unsupported depth!",width,height,depth); MessageBoxA(0,buf,"WINE DirectDraw",MB_OK|MB_ICONSTOP); return DDERR_UNSUPPORTEDMODE; case -1: /* No convertion */ This->d.pixel_convert = NULL; This->d.palette_convert = NULL; break; default: DPRINTF("DirectDraw warning: running in depth-convertion mode. Should run using a %ld depth for optimal performances.\n", depth); /* Set the depth convertion routines */ This->d.pixel_convert = ModeEmulations[c].funcs.pixel_convert; This->d.palette_convert = ModeEmulations[c].funcs.palette_convert; } This->d.width = width; This->d.height = height; _common_IDirectDrawImpl_SetDisplayMode(This); tmpWnd = WIN_FindWndPtr(This->d.window); This->d.paintable = 1; ddpriv->drawable = ((X11DRV_WND_DATA *) tmpWnd->pDriverData)->window; WIN_ReleaseWndPtr(tmpWnd); /* We don't have a context for this window. Host off the desktop */ if( !ddpriv->drawable ) { ddpriv->drawable = ((X11DRV_WND_DATA *) WIN_GetDesktop()->pDriverData)->window; WIN_ReleaseDesktop(); } TRACE("Setting drawable to %ld\n", ddpriv->drawable); if (get_option( "DXGrab", 0 )) { /* Confine cursor movement (risky, but the user asked for it) */ TSXGrabPointer(display, ddpriv->drawable, True, 0, GrabModeAsync, GrabModeAsync, ddpriv->drawable, None, CurrentTime); } return DD_OK; } static void fill_caps(LPDDCAPS caps) { /* This function tries to fill the capabilities of Wine's DDraw implementation. Need to be fixed, though.. */ if (caps == NULL) return; caps->dwSize = sizeof(*caps); caps->dwCaps = DDCAPS_ALPHA | DDCAPS_BLT | DDCAPS_BLTSTRETCH | DDCAPS_BLTCOLORFILL | DDCAPS_BLTDEPTHFILL | DDCAPS_CANBLTSYSMEM | DDCAPS_COLORKEY | DDCAPS_PALETTE /*| DDCAPS_NOHARDWARE*/; caps->dwCaps2 = DDCAPS2_CERTIFIED | DDCAPS2_NOPAGELOCKREQUIRED | DDCAPS2_WIDESURFACES; caps->dwCKeyCaps = 0xFFFFFFFF; /* Should put real caps here one day... */ caps->dwFXCaps = 0; caps->dwFXAlphaCaps = 0; caps->dwPalCaps = DDPCAPS_8BIT | DDPCAPS_ALLOW256; caps->dwSVCaps = 0; caps->dwZBufferBitDepths = DDBD_16; /* I put here 8 Mo so that D3D applications will believe they have enough memory to put textures in video memory. BTW, is this only frame buffer memory or also texture memory (for Voodoo boards for example) ? */ caps->dwVidMemTotal = 8192 * 1024; caps->dwVidMemFree = 8192 * 1024; /* These are all the supported capabilities of the surfaces */ caps->ddsCaps.dwCaps = DDSCAPS_ALPHA | DDSCAPS_BACKBUFFER | DDSCAPS_COMPLEX | DDSCAPS_FLIP | DDSCAPS_FRONTBUFFER | DDSCAPS_LOCALVIDMEM | DDSCAPS_NONLOCALVIDMEM | DDSCAPS_OFFSCREENPLAIN | /*DDSCAPS_OVERLAY |*/ DDSCAPS_PALETTE | DDSCAPS_PRIMARYSURFACE | DDSCAPS_SYSTEMMEMORY | DDSCAPS_VIDEOMEMORY | DDSCAPS_VISIBLE; #ifdef HAVE_OPENGL caps->dwCaps |= DDCAPS_3D | DDCAPS_ZBLTS; caps->dwCaps2 |= DDCAPS2_NO2DDURING3DSCENE; caps->ddsCaps.dwCaps |= DDSCAPS_3DDEVICE | DDSCAPS_MIPMAP | DDSCAPS_TEXTURE | DDSCAPS_ZBUFFER; #endif } static HRESULT WINAPI Xlib_IDirectDraw2Impl_GetCaps( LPDIRECTDRAW2 iface,LPDDCAPS caps1,LPDDCAPS caps2 ) { ICOM_THIS(IDirectDraw2Impl,iface); TRACE("(%p)->GetCaps(%p,%p)\n",This,caps1,caps2); /* Put the same caps for the two capabilities */ fill_caps(caps1); fill_caps(caps2); return DD_OK; } static HRESULT WINAPI Xlib_IDirectDraw2Impl_CreatePalette( LPDIRECTDRAW2 iface,DWORD dwFlags,LPPALETTEENTRY palent, LPDIRECTDRAWPALETTE *lpddpal,LPUNKNOWN lpunk ) { ICOM_THIS(IDirectDraw2Impl,iface); IDirectDrawPaletteImpl** ilpddpal=(IDirectDrawPaletteImpl**)lpddpal; int xsize; HRESULT res; TRACE("(%p)->(%08lx,%p,%p,%p)\n",This,dwFlags,palent,ilpddpal,lpunk); res = common_IDirectDraw2Impl_CreatePalette(This,dwFlags,palent,ilpddpal,lpunk,&xsize); if (res != 0) return res; (*ilpddpal)->private = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(x11_dp_private) ); ICOM_VTBL(*ilpddpal) = &xlib_ddpalvt; return DD_OK; } static ULONG WINAPI Xlib_IDirectDraw2Impl_Release(LPDIRECTDRAW2 iface) { ICOM_THIS(IDirectDraw2Impl,iface); TRACE("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { if (This->d.window && GetPropA(This->d.window,ddProp)) DestroyWindow(This->d.window); HeapFree(GetProcessHeap(),0,This); return S_OK; } /* FIXME: destroy window ... */ return This->ref; } static HRESULT WINAPI Xlib_IDirectDraw2Impl_QueryInterface( LPDIRECTDRAW2 iface,REFIID refiid,LPVOID *obj ) { ICOM_THIS(IDirectDraw2Impl,iface); TRACE("(%p)->(%s,%p)\n",This,debugstr_guid(refiid),obj); if ( IsEqualGUID( &IID_IUnknown, refiid ) ) { *obj = This; IDirectDraw2_AddRef(iface); TRACE(" Creating IUnknown interface (%p)\n", *obj); return S_OK; } if ( IsEqualGUID( &IID_IDirectDraw, refiid ) ) { ICOM_VTBL(This) = (ICOM_VTABLE(IDirectDraw2)*)&xlib_ddvt; IDirectDraw2_AddRef(iface); *obj = This; TRACE(" Creating IDirectDraw interface (%p)\n", *obj); return S_OK; } if ( IsEqualGUID( &IID_IDirectDraw2, refiid ) ) { ICOM_VTBL(This) = (ICOM_VTABLE(IDirectDraw2)*)&xlib_dd2vt; IDirectDraw2_AddRef(iface); *obj = This; TRACE(" Creating IDirectDraw2 interface (%p)\n", *obj); return S_OK; } if ( IsEqualGUID( &IID_IDirectDraw4, refiid ) ) { ICOM_VTBL(This) = (ICOM_VTABLE(IDirectDraw2)*)&xlib_dd4vt; IDirectDraw2_AddRef(iface); *obj = This; TRACE(" Creating IDirectDraw4 interface (%p)\n", *obj); return S_OK; } #ifdef HAVE_OPENGL if ( IsEqualGUID( &IID_IDirect3D, refiid ) ) return create_direct3d(obj,This); if ( IsEqualGUID( &IID_IDirect3D2, refiid ) ) return create_direct3d2(obj,This); if ( IsEqualGUID( &IID_IDirect3D3, refiid ) ) return create_direct3d3(obj,This); #endif FIXME("(%p):interface for IID %s _NOT_ found!\n",This,debugstr_guid(refiid)); return OLE_E_ENUM_NOMORE; } static HRESULT WINAPI Xlib_IDirectDraw2Impl_EnumDisplayModes( LPDIRECTDRAW2 iface,DWORD dwFlags,LPDDSURFACEDESC lpddsfd,LPVOID context,LPDDENUMMODESCALLBACK modescb ) { ICOM_THIS(IDirectDraw2Impl,iface); XVisualInfo *vi; XPixmapFormatValues *pf; XVisualInfo vt; int xbpp = 1, nvisuals, npixmap, i, emu; int has_mode[] = { 0, 0, 0, 0 }; int has_depth[] = { 8, 15, 16, 24 }; DDSURFACEDESC ddsfd; static struct { int w,h; } modes[] = { /* some of the usual modes */ {512,384}, {640,400}, {640,480}, {800,600}, {1024,768}, {1280,1024} }; DWORD maxWidth, maxHeight; TRACE("(%p)->(0x%08lx,%p,%p,%p)\n",This,dwFlags,lpddsfd,context,modescb); ddsfd.dwSize = sizeof(ddsfd); ddsfd.dwFlags = DDSD_HEIGHT|DDSD_WIDTH|DDSD_PIXELFORMAT|DDSD_CAPS|DDSD_PITCH; if (dwFlags & DDEDM_REFRESHRATES) { ddsfd.dwFlags |= DDSD_REFRESHRATE; ddsfd.u.dwRefreshRate = 60; } maxWidth = MONITOR_GetWidth(&MONITOR_PrimaryMonitor); maxHeight = MONITOR_GetHeight(&MONITOR_PrimaryMonitor); vi = TSXGetVisualInfo(display, VisualNoMask, &vt, &nvisuals); pf = TSXListPixmapFormats(display, &npixmap); i = 0; emu = 0; while ((i < npixmap) || (emu != 4)) { int mode_index = 0; int send_mode = 0; int j; if (i < npixmap) { for (j = 0; j < 4; j++) { if (has_depth[j] == pf[i].depth) { mode_index = j; break; } } if (j == 4) { i++; continue; } if (has_mode[mode_index] == 0) { if (mode_index == 0) { send_mode = 1; ddsfd.ddsCaps.dwCaps = DDSCAPS_PALETTE; ddsfd.ddpfPixelFormat.dwSize = sizeof(ddsfd.ddpfPixelFormat); ddsfd.ddpfPixelFormat.dwFlags = DDPF_RGB|DDPF_PALETTEINDEXED8; ddsfd.ddpfPixelFormat.dwFourCC = 0; ddsfd.ddpfPixelFormat.u.dwRGBBitCount = 8; ddsfd.ddpfPixelFormat.u1.dwRBitMask = 0; ddsfd.ddpfPixelFormat.u2.dwGBitMask = 0; ddsfd.ddpfPixelFormat.u3.dwBBitMask = 0; ddsfd.ddpfPixelFormat.u4.dwRGBAlphaBitMask= 0; xbpp = 1; has_mode[mode_index] = 1; } else { /* All the 'true color' depths (15, 16 and 24) First, find the corresponding visual to extract the bit masks */ for (j = 0; j < nvisuals; j++) { if (vi[j].depth == pf[i].depth) { ddsfd.ddsCaps.dwCaps = 0; ddsfd.ddpfPixelFormat.dwSize = sizeof(ddsfd.ddpfPixelFormat); ddsfd.ddpfPixelFormat.dwFlags = DDPF_RGB; ddsfd.ddpfPixelFormat.dwFourCC = 0; ddsfd.ddpfPixelFormat.u.dwRGBBitCount = pf[i].bits_per_pixel; ddsfd.ddpfPixelFormat.u1.dwRBitMask = vi[j].red_mask; ddsfd.ddpfPixelFormat.u2.dwGBitMask = vi[j].green_mask; ddsfd.ddpfPixelFormat.u3.dwBBitMask = vi[j].blue_mask; ddsfd.ddpfPixelFormat.u4.dwRGBAlphaBitMask= 0; xbpp = pf[i].bits_per_pixel/8; send_mode = 1; has_mode[mode_index] = 1; break; } } if (j == nvisuals) WARN("Did not find visual corresponding the the pixmap format !\n"); } } i++; } else { /* Now to emulated modes */ if (has_mode[emu] == 0) { int c; int l; int depth = has_depth[emu]; for (c = 0; (c < sizeof(ModeEmulations) / sizeof(Convert)) && (send_mode == 0); c++) { if (ModeEmulations[c].dest.depth == depth) { /* Found an emulation function, now tries to find a matching visual / pixel format pair */ for (l = 0; (l < npixmap) && (send_mode == 0); l++) { if ((pf[l].depth == ModeEmulations[c].screen.depth) && (pf[l].bits_per_pixel == ModeEmulations[c].screen.bpp)) { int j; for (j = 0; (j < nvisuals) && (send_mode == 0); j++) { if ((vi[j].depth == pf[l].depth) && (vi[j].red_mask == ModeEmulations[c].screen.rmask) && (vi[j].green_mask == ModeEmulations[c].screen.gmask) && (vi[j].blue_mask == ModeEmulations[c].screen.bmask)) { ddsfd.ddpfPixelFormat.dwSize = sizeof(ddsfd.ddpfPixelFormat); ddsfd.ddpfPixelFormat.dwFourCC = 0; if (depth == 8) { ddsfd.ddpfPixelFormat.dwFlags = DDPF_RGB|DDPF_PALETTEINDEXED8; ddsfd.ddpfPixelFormat.u.dwRGBBitCount = 8; ddsfd.ddpfPixelFormat.u1.dwRBitMask = 0; ddsfd.ddpfPixelFormat.u2.dwGBitMask = 0; ddsfd.ddpfPixelFormat.u3.dwBBitMask = 0; } else { ddsfd.ddpfPixelFormat.dwFlags = DDPF_RGB; ddsfd.ddpfPixelFormat.u.dwRGBBitCount = ModeEmulations[c].dest.bpp; ddsfd.ddpfPixelFormat.u1.dwRBitMask = ModeEmulations[c].dest.rmask; ddsfd.ddpfPixelFormat.u2.dwGBitMask = ModeEmulations[c].dest.gmask; ddsfd.ddpfPixelFormat.u3.dwBBitMask = ModeEmulations[c].dest.bmask; } ddsfd.ddpfPixelFormat.u4.dwRGBAlphaBitMask= 0; send_mode = 1; } if (send_mode == 0) WARN("No visual corresponding to pixmap format !\n"); } } } } } } emu++; } if (send_mode) { int mode; if (TRACE_ON(ddraw)) { TRACE("Enumerating with pixel format : \n"); _dump_pixelformat(&(ddsfd.ddpfPixelFormat)); DPRINTF("\n"); } for (mode = 0; mode < sizeof(modes)/sizeof(modes[0]); mode++) { /* Do not enumerate modes we cannot handle anyway */ if ((modes[mode].w > maxWidth) || (modes[mode].h > maxHeight)) break; ddsfd.dwWidth = modes[mode].w; ddsfd.dwHeight= modes[mode].h; ddsfd.lPitch = ddsfd.dwWidth * xbpp; /* Now, send the mode description to the application */ TRACE(" - mode %4ld - %4ld\n", ddsfd.dwWidth, ddsfd.dwHeight); if (!modescb(&ddsfd, context)) goto exit_enum; } if (!(dwFlags & DDEDM_STANDARDVGAMODES)) { /* modeX is not standard VGA */ ddsfd.dwWidth = 320; ddsfd.dwHeight = 200; ddsfd.lPitch = 320 * xbpp; if (!modescb(&ddsfd, context)) goto exit_enum; } } } exit_enum: TSXFree(vi); TSXFree(pf); return DD_OK; } static HRESULT WINAPI Xlib_IDirectDraw2Impl_GetDisplayMode( LPDIRECTDRAW2 iface,LPDDSURFACEDESC lpddsfd ) { ICOM_THIS(IDirectDraw2Impl,iface); TRACE("(%p)->GetDisplayMode(%p)\n",This,lpddsfd); lpddsfd->dwFlags = DDSD_HEIGHT|DDSD_WIDTH|DDSD_PITCH|DDSD_BACKBUFFERCOUNT|DDSD_PIXELFORMAT|DDSD_CAPS; lpddsfd->dwHeight = This->d.height; lpddsfd->dwWidth = This->d.width; lpddsfd->lPitch = lpddsfd->dwWidth * PFGET_BPP(This->d.directdraw_pixelformat); lpddsfd->dwBackBufferCount = 2; lpddsfd->u.dwRefreshRate = 60; lpddsfd->ddsCaps.dwCaps = DDSCAPS_PALETTE; lpddsfd->ddpfPixelFormat = This->d.directdraw_pixelformat; if (TRACE_ON(ddraw)) _dump_surface_desc(lpddsfd); return DD_OK; } /* Note: Hack so we can reuse the old functions without compiler warnings */ #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(xlib_ddvt.fn##fun)) #else # define XCAST(fun) (void *) #endif ICOM_VTABLE(IDirectDraw) xlib_ddvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE XCAST(QueryInterface)Xlib_IDirectDraw2Impl_QueryInterface, XCAST(AddRef)IDirectDraw2Impl_AddRef, XCAST(Release)Xlib_IDirectDraw2Impl_Release, XCAST(Compact)IDirectDraw2Impl_Compact, XCAST(CreateClipper)IDirectDraw2Impl_CreateClipper, XCAST(CreatePalette)Xlib_IDirectDraw2Impl_CreatePalette, XCAST(CreateSurface)Xlib_IDirectDraw2Impl_CreateSurface, XCAST(DuplicateSurface)IDirectDraw2Impl_DuplicateSurface, XCAST(EnumDisplayModes)Xlib_IDirectDraw2Impl_EnumDisplayModes, XCAST(EnumSurfaces)IDirectDraw2Impl_EnumSurfaces, XCAST(FlipToGDISurface)IDirectDraw2Impl_FlipToGDISurface, XCAST(GetCaps)Xlib_IDirectDraw2Impl_GetCaps, XCAST(GetDisplayMode)Xlib_IDirectDraw2Impl_GetDisplayMode, XCAST(GetFourCCCodes)IDirectDraw2Impl_GetFourCCCodes, XCAST(GetGDISurface)IDirectDraw2Impl_GetGDISurface, XCAST(GetMonitorFrequency)IDirectDraw2Impl_GetMonitorFrequency, XCAST(GetScanLine)IDirectDraw2Impl_GetScanLine, XCAST(GetVerticalBlankStatus)IDirectDraw2Impl_GetVerticalBlankStatus, XCAST(Initialize)IDirectDraw2Impl_Initialize, XCAST(RestoreDisplayMode)IDirectDraw2Impl_RestoreDisplayMode, XCAST(SetCooperativeLevel)Xlib_IDirectDraw2Impl_SetCooperativeLevel, Xlib_IDirectDrawImpl_SetDisplayMode, XCAST(WaitForVerticalBlank)IDirectDraw2Impl_WaitForVerticalBlank, }; #undef XCAST /***************************************************************************** * IDirectDraw2 * */ static HRESULT WINAPI Xlib_IDirectDraw2Impl_SetDisplayMode( LPDIRECTDRAW2 iface,DWORD width,DWORD height,DWORD depth,DWORD dwRefreshRate,DWORD dwFlags ) { FIXME( "Ignored parameters (0x%08lx,0x%08lx)\n", dwRefreshRate, dwFlags ); return Xlib_IDirectDrawImpl_SetDisplayMode((LPDIRECTDRAW)iface,width,height,depth); } static HRESULT WINAPI Xlib_IDirectDraw2Impl_GetAvailableVidMem( LPDIRECTDRAW2 iface,LPDDSCAPS ddscaps,LPDWORD total,LPDWORD free ) { ICOM_THIS(IDirectDraw2Impl,iface); TRACE("(%p)->(%p,%p,%p)\n",This,ddscaps,total,free); if (total) *total = 16* 1024 * 1024; if (free) *free = 16* 1024 * 1024; return DD_OK; } ICOM_VTABLE(IDirectDraw2) xlib_dd2vt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE Xlib_IDirectDraw2Impl_QueryInterface, IDirectDraw2Impl_AddRef, Xlib_IDirectDraw2Impl_Release, IDirectDraw2Impl_Compact, IDirectDraw2Impl_CreateClipper, Xlib_IDirectDraw2Impl_CreatePalette, Xlib_IDirectDraw2Impl_CreateSurface, IDirectDraw2Impl_DuplicateSurface, Xlib_IDirectDraw2Impl_EnumDisplayModes, IDirectDraw2Impl_EnumSurfaces, IDirectDraw2Impl_FlipToGDISurface, Xlib_IDirectDraw2Impl_GetCaps, Xlib_IDirectDraw2Impl_GetDisplayMode, IDirectDraw2Impl_GetFourCCCodes, IDirectDraw2Impl_GetGDISurface, IDirectDraw2Impl_GetMonitorFrequency, IDirectDraw2Impl_GetScanLine, IDirectDraw2Impl_GetVerticalBlankStatus, IDirectDraw2Impl_Initialize, IDirectDraw2Impl_RestoreDisplayMode, Xlib_IDirectDraw2Impl_SetCooperativeLevel, Xlib_IDirectDraw2Impl_SetDisplayMode, IDirectDraw2Impl_WaitForVerticalBlank, Xlib_IDirectDraw2Impl_GetAvailableVidMem }; #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(xlib_dd4vt.fn##fun)) #else # define XCAST(fun) (void*) #endif ICOM_VTABLE(IDirectDraw4) xlib_dd4vt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE XCAST(QueryInterface)Xlib_IDirectDraw2Impl_QueryInterface, XCAST(AddRef)IDirectDraw2Impl_AddRef, XCAST(Release)Xlib_IDirectDraw2Impl_Release, XCAST(Compact)IDirectDraw2Impl_Compact, XCAST(CreateClipper)IDirectDraw2Impl_CreateClipper, XCAST(CreatePalette)Xlib_IDirectDraw2Impl_CreatePalette, XCAST(CreateSurface)Xlib_IDirectDraw2Impl_CreateSurface, XCAST(DuplicateSurface)IDirectDraw2Impl_DuplicateSurface, XCAST(EnumDisplayModes)Xlib_IDirectDraw2Impl_EnumDisplayModes, XCAST(EnumSurfaces)IDirectDraw2Impl_EnumSurfaces, XCAST(FlipToGDISurface)IDirectDraw2Impl_FlipToGDISurface, XCAST(GetCaps)Xlib_IDirectDraw2Impl_GetCaps, XCAST(GetDisplayMode)Xlib_IDirectDraw2Impl_GetDisplayMode, XCAST(GetFourCCCodes)IDirectDraw2Impl_GetFourCCCodes, XCAST(GetGDISurface)IDirectDraw2Impl_GetGDISurface, XCAST(GetMonitorFrequency)IDirectDraw2Impl_GetMonitorFrequency, XCAST(GetScanLine)IDirectDraw2Impl_GetScanLine, XCAST(GetVerticalBlankStatus)IDirectDraw2Impl_GetVerticalBlankStatus, XCAST(Initialize)IDirectDraw2Impl_Initialize, XCAST(RestoreDisplayMode)IDirectDraw2Impl_RestoreDisplayMode, XCAST(SetCooperativeLevel)Xlib_IDirectDraw2Impl_SetCooperativeLevel, XCAST(SetDisplayMode)Xlib_IDirectDrawImpl_SetDisplayMode, XCAST(WaitForVerticalBlank)IDirectDraw2Impl_WaitForVerticalBlank, XCAST(GetAvailableVidMem)Xlib_IDirectDraw2Impl_GetAvailableVidMem, IDirectDraw4Impl_GetSurfaceFromDC, IDirectDraw4Impl_RestoreAllSurfaces, IDirectDraw4Impl_TestCooperativeLevel, IDirectDraw4Impl_GetDeviceIdentifier }; #undef XCAST wine-20000526/dlls/ddraw/direct3d/0040755000175000001440000000000007113604172016206 5ustar julliarduserswine-20000526/dlls/ddraw/direct3d/main.c0100644000175000001440000001724007075622771017313 0ustar julliardusers#include "config.h" #include #include #include #include #include #include "winerror.h" #include "ddraw.h" #include "d3d.h" #include "message.h" #include "options.h" #include "monitor.h" #include "debugtools.h" #include "d3d_private.h" DEFAULT_DEBUG_CHANNEL(ddraw); static ICOM_VTABLE(IDirect3D) d3dvt; static ICOM_VTABLE(IDirect3D2) d3d2vt; /******************************************************************************* * IDirect3D */ HRESULT WINAPI IDirect3DImpl_QueryInterface( LPDIRECT3D iface,REFIID refiid,LPVOID *obj ) { ICOM_THIS(IDirect3DImpl,iface); /* FIXME: Not sure if this is correct */ TRACE("(%p)->(%s,%p)\n",This,debugstr_guid(refiid),obj); if (( IsEqualGUID( &IID_IDirectDraw, refiid ) ) || ( IsEqualGUID (&IID_IDirectDraw2, refiid ) ) || ( IsEqualGUID( &IID_IDirectDraw4, refiid ) ) ) { *obj = This->ddraw; IDirect3D_AddRef(iface); TRACE(" Creating IDirectDrawX interface (%p)\n", *obj); return S_OK; } if (( IsEqualGUID( &IID_IDirect3D, refiid ) ) || ( IsEqualGUID( &IID_IUnknown, refiid ) ) ) { *obj = This; IDirect3D_AddRef(iface); TRACE(" Creating IDirect3D interface (%p)\n", *obj); return S_OK; } if ( IsEqualGUID( &IID_IDirect3D2, refiid ) ) { IDirect3D2Impl* d3d; d3d = HeapAlloc(GetProcessHeap(),0,sizeof(*d3d)); d3d->ref = 1; d3d->ddraw = This->ddraw; IDirect3D_AddRef(iface); ICOM_VTBL(d3d) = &d3d2vt; *obj = d3d; TRACE(" Creating IDirect3D2 interface (%p)\n", *obj); return S_OK; } FIXME("(%p):interface for IID %s NOT found!\n",This,debugstr_guid(refiid)); return OLE_E_ENUM_NOMORE; } ULONG WINAPI IDirect3DImpl_AddRef(LPDIRECT3D iface) { ICOM_THIS(IDirect3DImpl,iface); TRACE("(%p)->() incrementing from %lu.\n", This, This->ref ); return ++(This->ref); } ULONG WINAPI IDirect3DImpl_Release(LPDIRECT3D iface) { ICOM_THIS(IDirect3DImpl,iface); TRACE("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { IDirectDraw2_Release((IDirectDraw2*)This->ddraw); HeapFree(GetProcessHeap(),0,This); return S_OK; } return This->ref; } HRESULT WINAPI IDirect3DImpl_Initialize(LPDIRECT3D iface,REFIID refiid) { ICOM_THIS(IDirect3DImpl,iface); /* FIXME: Not sure if this is correct */ FIXME("(%p)->(%s):stub.\n",This,debugstr_guid(refiid)); return DDERR_ALREADYINITIALIZED; } HRESULT WINAPI IDirect3DImpl_EnumDevices( LPDIRECT3D iface, LPD3DENUMDEVICESCALLBACK cb, LPVOID context ) { ICOM_THIS(IDirect3DImpl,iface); FIXME("(%p)->(%p,%p),stub!\n",This,cb,context); return DD_OK; } HRESULT WINAPI IDirect3DImpl_CreateLight( LPDIRECT3D iface, LPDIRECT3DLIGHT *lplight, IUnknown *lpunk ) { ICOM_THIS(IDirect3DImpl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lplight, lpunk); return E_FAIL; } HRESULT WINAPI IDirect3DImpl_CreateMaterial( LPDIRECT3D iface, LPDIRECT3DMATERIAL *lpmaterial, IUnknown *lpunk ) { ICOM_THIS(IDirect3DImpl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lpmaterial, lpunk); return E_FAIL; } HRESULT WINAPI IDirect3DImpl_CreateViewport( LPDIRECT3D iface, LPDIRECT3DVIEWPORT *lpviewport, IUnknown *lpunk ) { ICOM_THIS(IDirect3DImpl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lpviewport, lpunk); return E_FAIL; } HRESULT WINAPI IDirect3DImpl_FindDevice( LPDIRECT3D iface, LPD3DFINDDEVICESEARCH lpfinddevsrc, LPD3DFINDDEVICERESULT lpfinddevrst) { ICOM_THIS(IDirect3DImpl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lpfinddevsrc, lpfinddevrst); return DD_OK; } /* This is for checking the correctness of the prototypes/functions. * Do not remove. */ static ICOM_VTABLE(IDirect3D) WINE_UNUSED d3dvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirect3DImpl_QueryInterface, IDirect3DImpl_AddRef, IDirect3DImpl_Release, IDirect3DImpl_Initialize, IDirect3DImpl_EnumDevices, IDirect3DImpl_CreateLight, IDirect3DImpl_CreateMaterial, IDirect3DImpl_CreateViewport, IDirect3DImpl_FindDevice }; /******************************************************************************* * IDirect3D2 */ HRESULT WINAPI IDirect3D2Impl_QueryInterface( LPDIRECT3D2 iface,REFIID refiid,LPVOID *obj) { ICOM_THIS(IDirect3D2Impl,iface); /* FIXME: Not sure if this is correct */ TRACE("(%p)->(%s,%p)\n",This,debugstr_guid(refiid),obj); if ( ( IsEqualGUID( &IID_IDirectDraw, refiid ) ) || ( IsEqualGUID( &IID_IDirectDraw2, refiid ) ) || ( IsEqualGUID( &IID_IDirectDraw4, refiid ) ) ) { *obj = This->ddraw; IDirect3D2_AddRef(iface); TRACE(" Creating IDirectDrawX interface (%p)\n", *obj); return S_OK; } if ( ( IsEqualGUID( &IID_IDirect3D2, refiid ) ) || ( IsEqualGUID( &IID_IUnknown, refiid ) ) ) { *obj = This; IDirect3D2_AddRef(iface); TRACE(" Creating IDirect3D2 interface (%p)\n", *obj); return S_OK; } if ( IsEqualGUID( &IID_IDirect3D, refiid ) ) { IDirect3DImpl* d3d; d3d = HeapAlloc(GetProcessHeap(),0,sizeof(*d3d)); d3d->ref = 1; d3d->ddraw = This->ddraw; IDirect3D2_AddRef(iface); ICOM_VTBL(d3d) = &d3dvt; *obj = d3d; TRACE(" Creating IDirect3D interface (%p)\n", *obj); return S_OK; } FIXME("(%p):interface for IID %s NOT found!\n",This,debugstr_guid(refiid)); return OLE_E_ENUM_NOMORE; } ULONG WINAPI IDirect3D2Impl_AddRef(LPDIRECT3D2 iface) { ICOM_THIS(IDirect3D2Impl,iface); TRACE("(%p)->() incrementing from %lu.\n", This, This->ref ); return ++(This->ref); } ULONG WINAPI IDirect3D2Impl_Release(LPDIRECT3D2 iface) { ICOM_THIS(IDirect3D2Impl,iface); TRACE("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { IDirectDraw2_Release((IDirectDraw2*)This->ddraw); HeapFree(GetProcessHeap(),0,This); return S_OK; } return This->ref; } HRESULT WINAPI IDirect3D2Impl_EnumDevices( LPDIRECT3D2 iface,LPD3DENUMDEVICESCALLBACK cb, LPVOID context ) { ICOM_THIS(IDirect3D2Impl,iface); FIXME("(%p)->(%p,%p),stub!\n",This,cb,context); return DD_OK; } HRESULT WINAPI IDirect3D2Impl_CreateLight( LPDIRECT3D2 iface, LPDIRECT3DLIGHT *lplight, IUnknown *lpunk ) { ICOM_THIS(IDirect3D2Impl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lplight, lpunk); return E_FAIL; } HRESULT WINAPI IDirect3D2Impl_CreateMaterial( LPDIRECT3D2 iface, LPDIRECT3DMATERIAL2 *lpmaterial, IUnknown *lpunk ) { ICOM_THIS(IDirect3D2Impl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lpmaterial, lpunk); return E_FAIL; } HRESULT WINAPI IDirect3D2Impl_CreateViewport( LPDIRECT3D2 iface, LPDIRECT3DVIEWPORT2 *lpviewport, IUnknown *lpunk ) { ICOM_THIS(IDirect3D2Impl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lpviewport, lpunk); return E_FAIL; } HRESULT WINAPI IDirect3D2Impl_FindDevice( LPDIRECT3D2 iface, LPD3DFINDDEVICESEARCH lpfinddevsrc, LPD3DFINDDEVICERESULT lpfinddevrst) { ICOM_THIS(IDirect3D2Impl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lpfinddevsrc, lpfinddevrst); return DD_OK; } HRESULT WINAPI IDirect3D2Impl_CreateDevice( LPDIRECT3D2 iface, REFCLSID rguid, LPDIRECTDRAWSURFACE surface, LPDIRECT3DDEVICE2 *device) { ICOM_THIS(IDirect3D2Impl,iface); FIXME("(%p)->(%s,%p,%p): stub\n",This,debugstr_guid(rguid),surface,device); return DDERR_INVALIDPARAMS; } /* This is for checking the correctness of the prototypes/functions. * Do not remove. */ static ICOM_VTABLE(IDirect3D2) WINE_UNUSED d3d2vt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirect3D2Impl_QueryInterface, IDirect3D2Impl_AddRef, IDirect3D2Impl_Release, IDirect3D2Impl_EnumDevices, IDirect3D2Impl_CreateLight, IDirect3D2Impl_CreateMaterial, IDirect3D2Impl_CreateViewport, IDirect3D2Impl_FindDevice, IDirect3D2Impl_CreateDevice }; wine-20000526/dlls/ddraw/direct3d/mesa.c0100644000175000001440000002470107107127721017303 0ustar julliardusers#include "config.h" #include #include #include #include #include #include "winerror.h" #include "ddraw.h" #include "d3d.h" #include "message.h" #include "options.h" #include "monitor.h" #include "debugtools.h" #include "mesa_private.h" DEFAULT_DEBUG_CHANNEL(ddraw); /******************************************************************************* * IDirect3D */ static HRESULT WINAPI MESA_IDirect3DImpl_QueryInterface( LPDIRECT3D iface,REFIID refiid,LPVOID *obj ) { ICOM_THIS(IDirect3DImpl,iface); /* FIXME: Not sure if this is correct */ TRACE("(%p)->(%s,%p)\n",This,debugstr_guid(refiid),obj); if (( IsEqualGUID( &IID_IDirectDraw, refiid ) ) || ( IsEqualGUID (&IID_IDirectDraw2, refiid ) ) || ( IsEqualGUID( &IID_IDirectDraw4, refiid ) ) ) { *obj = This->ddraw; IDirect3D_AddRef(iface); TRACE(" Creating IDirectDrawX interface (%p)\n", *obj); return S_OK; } if (( IsEqualGUID( &IID_IDirect3D, refiid ) ) || ( IsEqualGUID( &IID_IUnknown, refiid ) ) ) { *obj = This; IDirect3D_AddRef(iface); TRACE(" Creating IDirect3D interface (%p)\n", *obj); return S_OK; } if ( IsEqualGUID( &IID_IDirect3D2, refiid ) ) { IDirect3D2Impl* d3d; d3d = HeapAlloc(GetProcessHeap(),0,sizeof(*d3d)); d3d->ref = 1; d3d->ddraw = This->ddraw; IDirect3D_AddRef(iface); ICOM_VTBL(d3d) = &mesa_d3d2vt; *obj = d3d; TRACE(" Creating IDirect3D2 interface (%p)\n", *obj); return S_OK; } FIXME("(%p):interface for IID %s NOT found!\n",This,debugstr_guid(refiid)); return OLE_E_ENUM_NOMORE; } static ULONG WINAPI MESA_IDirect3DImpl_Release(LPDIRECT3D iface) { ICOM_THIS(IDirect3DImpl,iface); TRACE("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { IDirectDraw2_Release((IDirectDraw2*)This->ddraw); HeapFree(GetProcessHeap(),0,This); return S_OK; } return This->ref; } static HRESULT WINAPI MESA_IDirect3DImpl_EnumDevices( LPDIRECT3D iface, LPD3DENUMDEVICESCALLBACK cb, LPVOID context ) { ICOM_THIS(IDirect3DImpl,iface); FIXME("(%p)->(%p,%p),stub!\n",This,cb,context); /* Call functions defined in d3ddevices.c */ if (!d3d_OpenGL_dx3(cb, context)) return D3D_OK; return D3D_OK; } static HRESULT WINAPI MESA_IDirect3DImpl_CreateLight( LPDIRECT3D iface, LPDIRECT3DLIGHT *lplight, IUnknown *lpunk ) { ICOM_THIS(IDirect3DImpl,iface); TRACE("(%p)->(%p,%p): stub\n", This, lplight, lpunk); /* Call the creation function that is located in d3dlight.c */ *lplight = d3dlight_create_dx3(This); return D3D_OK; } static HRESULT WINAPI MESA_IDirect3DImpl_CreateMaterial( LPDIRECT3D iface, LPDIRECT3DMATERIAL *lpmaterial, IUnknown *lpunk ) { ICOM_THIS(IDirect3DImpl,iface); TRACE("(%p)->(%p,%p): stub\n", This, lpmaterial, lpunk); /* Call the creation function that is located in d3dviewport.c */ *lpmaterial = d3dmaterial_create(This); return D3D_OK; } static HRESULT WINAPI MESA_IDirect3DImpl_CreateViewport( LPDIRECT3D iface, LPDIRECT3DVIEWPORT *lpviewport, IUnknown *lpunk ) { ICOM_THIS(IDirect3DImpl,iface); TRACE("(%p)->(%p,%p): stub\n", This, lpviewport, lpunk); /* Call the creation function that is located in d3dviewport.c */ *lpviewport = d3dviewport_create(This); return D3D_OK; } static HRESULT WINAPI MESA_IDirect3DImpl_FindDevice( LPDIRECT3D iface, LPD3DFINDDEVICESEARCH lpfinddevsrc, LPD3DFINDDEVICERESULT lpfinddevrst) { ICOM_THIS(IDirect3DImpl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lpfinddevsrc, lpfinddevrst); return D3D_OK; } ICOM_VTABLE(IDirect3D) mesa_d3dvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE MESA_IDirect3DImpl_QueryInterface, IDirect3DImpl_AddRef, MESA_IDirect3DImpl_Release, IDirect3DImpl_Initialize, MESA_IDirect3DImpl_EnumDevices, MESA_IDirect3DImpl_CreateLight, MESA_IDirect3DImpl_CreateMaterial, MESA_IDirect3DImpl_CreateViewport, MESA_IDirect3DImpl_FindDevice }; /******************************************************************************* * IDirect3D2 */ static HRESULT WINAPI MESA_IDirect3D2Impl_QueryInterface( LPDIRECT3D2 iface,REFIID refiid,LPVOID *obj) { ICOM_THIS(IDirect3D2Impl,iface); /* FIXME: Not sure if this is correct */ TRACE("(%p)->(%s,%p)\n",This,debugstr_guid(refiid),obj); if ( ( IsEqualGUID( &IID_IDirectDraw, refiid ) ) || ( IsEqualGUID( &IID_IDirectDraw2, refiid ) ) || ( IsEqualGUID( &IID_IDirectDraw4, refiid ) ) ) { *obj = This->ddraw; IDirect3D2_AddRef(iface); TRACE(" Creating IDirectDrawX interface (%p)\n", *obj); return S_OK; } if ( ( IsEqualGUID( &IID_IDirect3D2, refiid ) ) || ( IsEqualGUID( &IID_IUnknown, refiid ) ) ) { *obj = This; IDirect3D2_AddRef(iface); TRACE(" Creating IDirect3D2 interface (%p)\n", *obj); return S_OK; } if ( IsEqualGUID( &IID_IDirect3D, refiid ) ) { IDirect3DImpl* d3d; d3d = HeapAlloc(GetProcessHeap(),0,sizeof(*d3d)); d3d->ref = 1; d3d->ddraw = This->ddraw; IDirect3D2_AddRef(iface); ICOM_VTBL(d3d) = &mesa_d3dvt; *obj = d3d; TRACE(" Creating IDirect3D interface (%p)\n", *obj); return S_OK; } FIXME("(%p):interface for IID %s NOT found!\n",This,debugstr_guid(refiid)); return OLE_E_ENUM_NOMORE; } static ULONG WINAPI MESA_IDirect3D2Impl_Release(LPDIRECT3D2 iface) { ICOM_THIS(IDirect3D2Impl,iface); TRACE("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { IDirectDraw2_Release((IDirectDraw2*)This->ddraw); HeapFree(GetProcessHeap(),0,This); return S_OK; } return This->ref; } static HRESULT WINAPI MESA_IDirect3D2Impl_EnumDevices( LPDIRECT3D2 iface,LPD3DENUMDEVICESCALLBACK cb, LPVOID context ) { ICOM_THIS(IDirect3D2Impl,iface); FIXME("(%p)->(%p,%p),stub!\n",This,cb,context); /* Call functions defined in d3ddevices.c */ if (!d3d_OpenGL(cb, context)) return D3D_OK; return D3D_OK; } static HRESULT WINAPI MESA_IDirect3D2Impl_CreateLight( LPDIRECT3D2 iface, LPDIRECT3DLIGHT *lplight, IUnknown *lpunk ) { ICOM_THIS(IDirect3D2Impl,iface); TRACE("(%p)->(%p,%p): stub\n", This, lplight, lpunk); /* Call the creation function that is located in d3dlight.c */ *lplight = d3dlight_create(This); return D3D_OK; } static HRESULT WINAPI MESA_IDirect3D2Impl_CreateMaterial( LPDIRECT3D2 iface, LPDIRECT3DMATERIAL2 *lpmaterial, IUnknown *lpunk ) { ICOM_THIS(IDirect3D2Impl,iface); TRACE("(%p)->(%p,%p): stub\n", This, lpmaterial, lpunk); /* Call the creation function that is located in d3dviewport.c */ *lpmaterial = d3dmaterial2_create(This); return D3D_OK; } static HRESULT WINAPI MESA_IDirect3D2Impl_CreateViewport( LPDIRECT3D2 iface, LPDIRECT3DVIEWPORT2 *lpviewport, IUnknown *lpunk ) { ICOM_THIS(IDirect3D2Impl,iface); TRACE("(%p)->(%p,%p): stub\n", This, lpviewport, lpunk); /* Call the creation function that is located in d3dviewport.c */ *lpviewport = d3dviewport2_create(This); return D3D_OK; } static HRESULT WINAPI MESA_IDirect3D2Impl_FindDevice( LPDIRECT3D2 iface, LPD3DFINDDEVICESEARCH lpfinddevsrc, LPD3DFINDDEVICERESULT lpfinddevrst) { ICOM_THIS(IDirect3D2Impl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lpfinddevsrc, lpfinddevrst); return D3D_OK; } static HRESULT WINAPI MESA_IDirect3D2Impl_CreateDevice( LPDIRECT3D2 iface, REFCLSID rguid, LPDIRECTDRAWSURFACE surface, LPDIRECT3DDEVICE2 *device) { ICOM_THIS(IDirect3D2Impl,iface); FIXME("(%p)->(%s,%p,%p): stub\n",This,debugstr_guid(rguid),surface,device); if (is_OpenGL(rguid, (IDirectDrawSurfaceImpl*)surface, (IDirect3DDevice2Impl**)device, This)) { IDirect3D2_AddRef(iface); return D3D_OK; } return DDERR_INVALIDPARAMS; } ICOM_VTABLE(IDirect3D2) mesa_d3d2vt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE MESA_IDirect3D2Impl_QueryInterface, IDirect3D2Impl_AddRef, MESA_IDirect3D2Impl_Release, MESA_IDirect3D2Impl_EnumDevices, MESA_IDirect3D2Impl_CreateLight, MESA_IDirect3D2Impl_CreateMaterial, MESA_IDirect3D2Impl_CreateViewport, MESA_IDirect3D2Impl_FindDevice, MESA_IDirect3D2Impl_CreateDevice }; static HRESULT WINAPI MESA_IDirect3D3Impl_CreateVertexBuffer( LPDIRECT3D3 iface, LPD3DVERTEXBUFFERDESC lpD3DVertBufDesc, LPDIRECT3DVERTEXBUFFER* lplpD3DVertBuf, DWORD dwFlags, LPUNKNOWN lpUnk) { FIXME(":stub\n"); return D3D_OK; } static HRESULT WINAPI MESA_IDirect3D3Impl_EnumZBufferFormats( LPDIRECT3D3 iface, REFCLSID riidDevice, LPD3DENUMPIXELFORMATSCALLBACK lpEnumCallback, LPVOID lpContext) { FIXME(":stub\n"); return DDERR_NOZBUFFERHW; /* Pretend we don't have valid HW */ } static HRESULT WINAPI MESA_IDirect3D3Impl_EvictManagedTextures( LPDIRECT3D3 iface) { FIXME(":stub\n"); return D3D_OK; } ICOM_VTABLE(IDirect3D3) mesa_d3d3vt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE MESA_IDirect3D2Impl_QueryInterface, IDirect3D2Impl_AddRef, MESA_IDirect3D2Impl_Release, MESA_IDirect3D2Impl_EnumDevices, MESA_IDirect3D2Impl_CreateLight, MESA_IDirect3D2Impl_CreateMaterial, MESA_IDirect3D2Impl_CreateViewport, MESA_IDirect3D2Impl_FindDevice, MESA_IDirect3D2Impl_CreateDevice, MESA_IDirect3D3Impl_CreateVertexBuffer, MESA_IDirect3D3Impl_EnumZBufferFormats, MESA_IDirect3D3Impl_EvictManagedTextures }; HRESULT create_direct3d(LPVOID *obj,IDirectDraw2Impl* ddraw) { IDirect3DImpl* d3d; d3d = HeapAlloc(GetProcessHeap(),0,sizeof(*d3d)); d3d->ref = 1; d3d->ddraw = ddraw; d3d->private = NULL; /* unused for now */ IDirectDraw_AddRef((LPDIRECTDRAW)ddraw); ICOM_VTBL(d3d) = &mesa_d3dvt; *obj = (LPUNKNOWN)d3d; TRACE(" Created IDirect3D interface (%p)\n", *obj); return S_OK; } HRESULT create_direct3d2(LPVOID *obj,IDirectDraw2Impl* ddraw) { IDirect3D2Impl* d3d; d3d = HeapAlloc(GetProcessHeap(),0,sizeof(*d3d)); d3d->ref = 1; d3d->ddraw = ddraw; d3d->private = NULL; /* unused for now */ IDirectDraw_AddRef((LPDIRECTDRAW)ddraw); ICOM_VTBL(d3d) = &mesa_d3d2vt; *obj = (LPUNKNOWN)d3d; TRACE(" Creating IDirect3D2 interface (%p)\n", *obj); return S_OK; } HRESULT create_direct3d3(LPVOID *obj,IDirectDraw2Impl* ddraw) { IDirect3D3Impl* d3d; d3d = HeapAlloc(GetProcessHeap(),0,sizeof(*d3d)); d3d->ref = 1; d3d->ddraw = ddraw; d3d->private = NULL; /* unused for now */ IDirectDraw_AddRef((LPDIRECTDRAW)ddraw); ICOM_VTBL(d3d) = &mesa_d3d3vt; *obj = (LPUNKNOWN)d3d; TRACE(" Creating IDirect3D3 interface (%p)\n", *obj); return S_OK; } wine-20000526/dlls/ddraw/dpalette/0040755000175000001440000000000007113604172016307 5ustar julliarduserswine-20000526/dlls/ddraw/dpalette/dga.c0100644000175000001440000000400507103311756017204 0ustar julliardusers/* DirectDrawPalette XF86DGA implementation * * Copyright 1997-2000 Marcus Meissner * Copyright 1998 Lionel Ulmer (most of Direct3D stuff) */ #include "config.h" #include "winerror.h" #include #include #include #include #include "debugtools.h" #include "dga_private.h" DEFAULT_DEBUG_CHANNEL(ddraw); #define DPPRIVATE(x) dga_dp_private *dppriv = ((dga_dp_private*)(x)->private) #define DDPRIVATE(x) dga_dd_private *ddpriv = ((dga_dd_private*)(x)->private) HRESULT WINAPI DGA_IDirectDrawPaletteImpl_SetEntries( LPDIRECTDRAWPALETTE iface,DWORD x,DWORD start,DWORD count,LPPALETTEENTRY palent ) { ICOM_THIS(IDirectDrawPaletteImpl,iface); DPPRIVATE(This); DDPRIVATE(This->ddraw); XColor xc; Colormap cm; int i; TRACE("(%p)->SetEntries(%08lx,%ld,%ld,%p)\n",This,x,start,count,palent); if (!dppriv->cm) /* should not happen */ { FIXME("app tried to set colormap in non-palettized mode\n"); return DDERR_GENERIC; } /* FIXME: free colorcells instead of freeing whole map */ cm = dppriv->cm; dppriv->cm = TSXCopyColormapAndFree(display,dppriv->cm); TSXFreeColormap(display,cm); for (i=0;icm,&xc); This->palents[start+i].peRed = palent[i].peRed; This->palents[start+i].peBlue = palent[i].peBlue; This->palents[start+i].peGreen = palent[i].peGreen; This->palents[start+i].peFlags = palent[i].peFlags; } ddpriv->InstallColormap(display,DefaultScreen(display),dppriv->cm); return DD_OK; } ICOM_VTABLE(IDirectDrawPalette) dga_ddpalvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectDrawPaletteImpl_QueryInterface, IDirectDrawPaletteImpl_AddRef, Xlib_IDirectDrawPaletteImpl_Release, IDirectDrawPaletteImpl_GetCaps, IDirectDrawPaletteImpl_GetEntries, IDirectDrawPaletteImpl_Initialize, DGA_IDirectDrawPaletteImpl_SetEntries }; wine-20000526/dlls/ddraw/dpalette/main.c0100644000175000001440000000644707074112034017404 0ustar julliardusers/* DirectDraw - IDirectPalette base interface * * Copyright 1997-2000 Marcus Meissner */ #include "config.h" #include "winerror.h" #include #include #include #include #include "ddraw_private.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ddraw); /****************************************************************************** * IDirectDrawPalette */ HRESULT WINAPI IDirectDrawPaletteImpl_GetEntries( LPDIRECTDRAWPALETTE iface,DWORD x,DWORD start,DWORD count,LPPALETTEENTRY palent ) { ICOM_THIS(IDirectDrawPaletteImpl,iface); int i; TRACE("(%p)->GetEntries(%08lx,%ld,%ld,%p)\n",This,x,start,count,palent); for (i=0;ipalents[start+i].peRed; palent[i].peBlue = This->palents[start+i].peBlue; palent[i].peGreen = This->palents[start+i].peGreen; palent[i].peFlags = This->palents[start+i].peFlags; } return DD_OK; } HRESULT WINAPI IDirectDrawPaletteImpl_SetEntries( LPDIRECTDRAWPALETTE iface,DWORD x,DWORD start,DWORD count,LPPALETTEENTRY palent ) { ICOM_THIS(IDirectDrawPaletteImpl,iface); int i; TRACE("(%p)->SetEntries(%08lx,%ld,%ld,%p)\n", This,x,start,count,palent); for (i=0;ipalents[start+i].peRed = palent[i].peRed; This->palents[start+i].peBlue = palent[i].peBlue; This->palents[start+i].peGreen = palent[i].peGreen; This->palents[start+i].peFlags = palent[i].peFlags; } /* Now, if we are in 'depth conversion mode', update the screen palette */ /* FIXME: we need to update the image or we won't get palette fading. */ if (This->ddraw->d.palette_convert != NULL) This->ddraw->d.palette_convert(palent,This->screen_palents,start,count); return DD_OK; } ULONG WINAPI IDirectDrawPaletteImpl_Release(LPDIRECTDRAWPALETTE iface) { ICOM_THIS(IDirectDrawPaletteImpl,iface); TRACE("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { HeapFree(GetProcessHeap(),0,This); return S_OK; } return This->ref; } ULONG WINAPI IDirectDrawPaletteImpl_AddRef(LPDIRECTDRAWPALETTE iface) { ICOM_THIS(IDirectDrawPaletteImpl,iface); TRACE("(%p)->() incrementing from %lu.\n", This, This->ref ); return ++(This->ref); } HRESULT WINAPI IDirectDrawPaletteImpl_Initialize( LPDIRECTDRAWPALETTE iface,LPDIRECTDRAW ddraw,DWORD x,LPPALETTEENTRY palent ) { ICOM_THIS(IDirectDrawPaletteImpl,iface); TRACE("(%p)->(%p,%ld,%p)\n", This, ddraw, x, palent); return DDERR_ALREADYINITIALIZED; } HRESULT WINAPI IDirectDrawPaletteImpl_GetCaps( LPDIRECTDRAWPALETTE iface, LPDWORD lpdwCaps ) { ICOM_THIS(IDirectDrawPaletteImpl,iface); FIXME("(%p)->(%p) stub.\n", This, lpdwCaps ); return DD_OK; } HRESULT WINAPI IDirectDrawPaletteImpl_QueryInterface( LPDIRECTDRAWPALETTE iface,REFIID refiid,LPVOID *obj ) { ICOM_THIS(IDirectDrawPaletteImpl,iface); FIXME("(%p)->(%s,%p) stub.\n",This,debugstr_guid(refiid),obj); return S_OK; } ICOM_VTABLE(IDirectDrawPalette) ddraw_ddpalvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectDrawPaletteImpl_QueryInterface, IDirectDrawPaletteImpl_AddRef, IDirectDrawPaletteImpl_Release, IDirectDrawPaletteImpl_GetCaps, IDirectDrawPaletteImpl_GetEntries, IDirectDrawPaletteImpl_Initialize, IDirectDrawPaletteImpl_SetEntries }; wine-20000526/dlls/ddraw/dpalette/x11.c0100644000175000001440000000444407074112034017064 0ustar julliardusers/* DirectDraw IDirectDrawPalette X11 implementation * * Copyright 1997-2000 Marcus Meissner */ #include "config.h" #include "winerror.h" #include #include #include #include #include "debugtools.h" #include "x11_private.h" DEFAULT_DEBUG_CHANNEL(ddraw); #define DPPRIVATE(x) x11_dp_private *dppriv = ((x11_dp_private*)x->private) /****************************************************************************** * IDirectDrawPalette */ HRESULT WINAPI Xlib_IDirectDrawPaletteImpl_SetEntries( LPDIRECTDRAWPALETTE iface,DWORD x,DWORD start,DWORD count,LPPALETTEENTRY palent ) { ICOM_THIS(IDirectDrawPaletteImpl,iface); XColor xc; int i; DPPRIVATE(This); TRACE("(%p)->SetEntries(%08lx,%ld,%ld,%p)\n",This,x,start,count,palent); for (i=0;icm) TSXStoreColor(display,dppriv->cm,&xc); This->palents[start+i].peRed = palent[i].peRed; This->palents[start+i].peBlue = palent[i].peBlue; This->palents[start+i].peGreen = palent[i].peGreen; This->palents[start+i].peFlags = palent[i].peFlags; } /* Now, if we are in 'depth conversion mode', update the screen palette */ /* FIXME: we need to update the image or we won't get palette fading. */ if (This->ddraw->d.palette_convert != NULL) { This->ddraw->d.palette_convert(palent,This->screen_palents,start,count); } return DD_OK; } ULONG WINAPI Xlib_IDirectDrawPaletteImpl_Release(LPDIRECTDRAWPALETTE iface) { ICOM_THIS(IDirectDrawPaletteImpl,iface); DPPRIVATE(This); TRACE("(%p)->() decrementing from %lu.\n", This, This->ref ); if (!--(This->ref)) { if (dppriv->cm) { TSXFreeColormap(display,dppriv->cm); dppriv->cm = 0; } HeapFree(GetProcessHeap(),0,This); return S_OK; } return This->ref; } ICOM_VTABLE(IDirectDrawPalette) xlib_ddpalvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectDrawPaletteImpl_QueryInterface, IDirectDrawPaletteImpl_AddRef, Xlib_IDirectDrawPaletteImpl_Release, IDirectDrawPaletteImpl_GetCaps, IDirectDrawPaletteImpl_GetEntries, IDirectDrawPaletteImpl_Initialize, Xlib_IDirectDrawPaletteImpl_SetEntries }; wine-20000526/dlls/ddraw/dsurface/0040755000175000001440000000000007113604173016302 5ustar julliarduserswine-20000526/dlls/ddraw/dsurface/dga.c0100644000175000001440000001747107110631572017210 0ustar julliardusers/* DirectDrawSurface XF86DGA implementation * * Copyright 1997-2000 Marcus Meissner * Copyright 1998-2000 Lionel Ulmer (most of Direct3D stuff) */ #include "config.h" #include "winerror.h" #include #include #include #include #include #include #include "debugtools.h" #include "dga_private.h" #include "bitmap.h" DEFAULT_DEBUG_CHANNEL(ddraw); #define DDPRIVATE(x) dga_dd_private *ddpriv = ((dga_dd_private*)(x)->private) #define DPPRIVATE(x) dga_dp_private *dppriv = ((dga_dp_private*)(x)->private) #define DSPRIVATE(x) dga_ds_private *dspriv = ((dga_ds_private*)(x)->private) static BYTE DGA_TouchSurface(LPDIRECTDRAWSURFACE4 iface) { ICOM_THIS(IDirectDrawSurface4Impl,iface); /* if the DIB section is in GdiMod state, we must * touch the surface to get any updates from the DIB */ return *(BYTE*)(This->s.surface_desc.u1.lpSurface); } /****************************************************************************** * IDirectDrawSurface methods * * Since DDS3 and DDS2 are supersets of DDS, we implement DDS3 and let * DDS and DDS2 use those functions. (Function calls did not change (except * using different DirectDrawSurfaceX version), just added flags and functions) */ HRESULT WINAPI DGA_IDirectDrawSurface4Impl_Flip( LPDIRECTDRAWSURFACE4 iface,LPDIRECTDRAWSURFACE4 flipto,DWORD dwFlags ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); DSPRIVATE(This); dga_ds_private *fspriv; IDirectDrawSurface4Impl* iflipto=(IDirectDrawSurface4Impl*)flipto; DWORD xheight; LPBYTE surf; TRACE("(%p)->Flip(%p,%08lx)\n",This,iflipto,dwFlags); DGA_TouchSurface(iface); iflipto = _common_find_flipto(This,iflipto); /* and flip! */ fspriv = (dga_ds_private*)iflipto->private; TSXF86DGASetViewPort(display,DefaultScreen(display),0,fspriv->fb_height); if (iflipto->s.palette) { DPPRIVATE(iflipto); if (dppriv->cm) TSXF86DGAInstallColormap(display,DefaultScreen(display),dppriv->cm); } while (!TSXF86DGAViewPortChanged(display,DefaultScreen(display),2)) { /* EMPTY */ } /* We need to switch the lowlevel surfaces, for DGA this is: */ /* The height within the framebuffer */ xheight = dspriv->fb_height; dspriv->fb_height = fspriv->fb_height; fspriv->fb_height = xheight; /* And the assciated surface pointer */ surf = This->s.surface_desc.u1.lpSurface; This->s.surface_desc.u1.lpSurface = iflipto->s.surface_desc.u1.lpSurface; iflipto->s.surface_desc.u1.lpSurface= surf; return DD_OK; } HRESULT WINAPI DGA_IDirectDrawSurface4Impl_SetPalette( LPDIRECTDRAWSURFACE4 iface,LPDIRECTDRAWPALETTE pal ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); DDPRIVATE(This->s.ddraw); IDirectDrawPaletteImpl* ipal=(IDirectDrawPaletteImpl*)pal; TRACE("(%p)->(%p)\n",This,ipal); /* According to spec, we are only supposed to * AddRef if this is not the same palette. */ if( This->s.palette != ipal ) { dga_dp_private *fppriv; if( ipal != NULL ) IDirectDrawPalette_AddRef( (IDirectDrawPalette*)ipal ); if( This->s.palette != NULL ) IDirectDrawPalette_Release( (IDirectDrawPalette*)This->s.palette ); This->s.palette = ipal; fppriv = (dga_dp_private*)This->s.palette->private; ddpriv->InstallColormap(display,DefaultScreen(display),fppriv->cm); if (This->s.hdc != 0) { /* hack: set the DIBsection color map */ BITMAPOBJ *bmp = (BITMAPOBJ *) GDI_GetObjPtr(This->s.DIBsection, BITMAP_MAGIC); X11DRV_DIBSECTION *dib = (X11DRV_DIBSECTION *)bmp->dib; dib->colorMap = This->s.palette ? This->s.palette->screen_palents : NULL; GDI_HEAP_UNLOCK(This->s.DIBsection); } } return DD_OK; } ULONG WINAPI DGA_IDirectDrawSurface4Impl_Release(LPDIRECTDRAWSURFACE4 iface) { ICOM_THIS(IDirectDrawSurface4Impl,iface); DDPRIVATE(This->s.ddraw); DSPRIVATE(This); TRACE("(%p)->() decrementing from %lu.\n", This, This->ref ); if (--(This->ref)) return This->ref; IDirectDraw2_Release((IDirectDraw2*)This->s.ddraw); /* clear out of surface list */ if (ddpriv->fb_height == -1) VirtualFree(This->s.surface_desc.u1.lpSurface, 0, MEM_RELEASE); else ddpriv->vpmask &= ~(1<<(dspriv->fb_height/ddpriv->fb_height)); /* Free the DIBSection (if any) */ if (This->s.hdc != 0) { /* hack: restore the original DIBsection color map */ BITMAPOBJ *bmp = (BITMAPOBJ *) GDI_GetObjPtr(This->s.DIBsection, BITMAP_MAGIC); X11DRV_DIBSECTION *dib = (X11DRV_DIBSECTION *)bmp->dib; dib->colorMap = dspriv->oldDIBmap; GDI_HEAP_UNLOCK(This->s.DIBsection); SelectObject(This->s.hdc, This->s.holdbitmap); DeleteDC(This->s.hdc); DeleteObject(This->s.DIBsection); } /* Free the clipper if attached to this surface */ if( This->s.lpClipper ) IDirectDrawClipper_Release(This->s.lpClipper); HeapFree(GetProcessHeap(),0,This); return S_OK; } HRESULT WINAPI DGA_IDirectDrawSurface4Impl_Unlock( LPDIRECTDRAWSURFACE4 iface,LPVOID surface ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); TRACE("(%p)->Unlock(%p)\n",This,surface); /* in case this was called from ReleaseDC */ DGA_TouchSurface(iface); return DD_OK; } HRESULT WINAPI DGA_IDirectDrawSurface4Impl_GetDC(LPDIRECTDRAWSURFACE4 iface,HDC* lphdc) { ICOM_THIS(IDirectDrawSurface4Impl,iface); DSPRIVATE(This); int was_ok = This->s.hdc != 0; HRESULT result = IDirectDrawSurface4Impl_GetDC(iface,lphdc); if (This->s.hdc && !was_ok) { /* hack: take over the DIBsection color map */ BITMAPOBJ *bmp = (BITMAPOBJ *) GDI_GetObjPtr(This->s.DIBsection, BITMAP_MAGIC); X11DRV_DIBSECTION *dib = (X11DRV_DIBSECTION *)bmp->dib; dspriv->oldDIBmap = dib->colorMap; dib->colorMap = This->s.palette ? This->s.palette->screen_palents : NULL; GDI_HEAP_UNLOCK(This->s.DIBsection); } return result; } ICOM_VTABLE(IDirectDrawSurface4) dga_dds4vt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectDrawSurface4Impl_QueryInterface, IDirectDrawSurface4Impl_AddRef, DGA_IDirectDrawSurface4Impl_Release, IDirectDrawSurface4Impl_AddAttachedSurface, IDirectDrawSurface4Impl_AddOverlayDirtyRect, IDirectDrawSurface4Impl_Blt, IDirectDrawSurface4Impl_BltBatch, IDirectDrawSurface4Impl_BltFast, IDirectDrawSurface4Impl_DeleteAttachedSurface, IDirectDrawSurface4Impl_EnumAttachedSurfaces, IDirectDrawSurface4Impl_EnumOverlayZOrders, DGA_IDirectDrawSurface4Impl_Flip, IDirectDrawSurface4Impl_GetAttachedSurface, IDirectDrawSurface4Impl_GetBltStatus, IDirectDrawSurface4Impl_GetCaps, IDirectDrawSurface4Impl_GetClipper, IDirectDrawSurface4Impl_GetColorKey, DGA_IDirectDrawSurface4Impl_GetDC, IDirectDrawSurface4Impl_GetFlipStatus, IDirectDrawSurface4Impl_GetOverlayPosition, IDirectDrawSurface4Impl_GetPalette, IDirectDrawSurface4Impl_GetPixelFormat, IDirectDrawSurface4Impl_GetSurfaceDesc, IDirectDrawSurface4Impl_Initialize, IDirectDrawSurface4Impl_IsLost, IDirectDrawSurface4Impl_Lock, IDirectDrawSurface4Impl_ReleaseDC, IDirectDrawSurface4Impl_Restore, IDirectDrawSurface4Impl_SetClipper, IDirectDrawSurface4Impl_SetColorKey, IDirectDrawSurface4Impl_SetOverlayPosition, DGA_IDirectDrawSurface4Impl_SetPalette, DGA_IDirectDrawSurface4Impl_Unlock, IDirectDrawSurface4Impl_UpdateOverlay, IDirectDrawSurface4Impl_UpdateOverlayDisplay, IDirectDrawSurface4Impl_UpdateOverlayZOrder, IDirectDrawSurface4Impl_GetDDInterface, IDirectDrawSurface4Impl_PageLock, IDirectDrawSurface4Impl_PageUnlock, IDirectDrawSurface4Impl_SetSurfaceDesc, IDirectDrawSurface4Impl_SetPrivateData, IDirectDrawSurface4Impl_GetPrivateData, IDirectDrawSurface4Impl_FreePrivateData, IDirectDrawSurface4Impl_GetUniquenessValue, IDirectDrawSurface4Impl_ChangeUniquenessValue }; wine-20000526/dlls/ddraw/dsurface/dga2.c0100644000175000001440000001017707110631572017266 0ustar julliardusers/* DirectDrawSurface XF86DGA implementation * * DGA2's specific DirectDrawSurface routines */ #include "config.h" #include "winerror.h" #include #include #include #include #include #include #include "debugtools.h" #include "dga2_private.h" DEFAULT_DEBUG_CHANNEL(ddraw); #define DDPRIVATE(x) dga2_dd_private *ddpriv = ((dga2_dd_private*)(x)->private) #define DPPRIVATE(x) dga2_dp_private *dppriv = ((dga2_dp_private*)(x)->private) #define DSPRIVATE(x) dga2_ds_private *dspriv = ((dga2_ds_private*)(x)->private) static BYTE DGA2_TouchSurface(LPDIRECTDRAWSURFACE4 iface) { ICOM_THIS(IDirectDrawSurface4Impl,iface); /* if the DIB section is in GdiMod state, we must * touch the surface to get any updates from the DIB */ return *(BYTE*)(This->s.surface_desc.u1.lpSurface); } HRESULT WINAPI DGA2_IDirectDrawSurface4Impl_Flip( LPDIRECTDRAWSURFACE4 iface,LPDIRECTDRAWSURFACE4 flipto,DWORD dwFlags ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); IDirectDrawSurface4Impl* iflipto=(IDirectDrawSurface4Impl*)flipto; DWORD xheight; DSPRIVATE(This); dga_ds_private *fspriv; LPBYTE surf; TRACE("(%p)->Flip(%p,%08lx)\n",This,iflipto,dwFlags); DGA2_TouchSurface(iface); iflipto = _common_find_flipto(This,iflipto); /* and flip! */ fspriv = (dga_ds_private*)iflipto->private; TSXDGASetViewport(display,DefaultScreen(display),0,fspriv->fb_height, XDGAFlipRetrace); TSXDGASync(display,DefaultScreen(display)); TSXFlush(display); if (iflipto->s.palette) { DPPRIVATE(iflipto->s.palette); if (dppriv->cm) TSXDGAInstallColormap(display,DefaultScreen(display),dppriv->cm); } /* We need to switch the lowlevel surfaces, for DGA this is: */ /* The height within the framebuffer */ xheight = dspriv->fb_height; dspriv->fb_height = fspriv->fb_height; fspriv->fb_height = xheight; /* And the assciated surface pointer */ surf = This->s.surface_desc.u1.lpSurface; This->s.surface_desc.u1.lpSurface = iflipto->s.surface_desc.u1.lpSurface; iflipto->s.surface_desc.u1.lpSurface = surf; return DD_OK; } ICOM_VTABLE(IDirectDrawSurface4) dga2_dds4vt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectDrawSurface4Impl_QueryInterface, IDirectDrawSurface4Impl_AddRef, DGA_IDirectDrawSurface4Impl_Release, IDirectDrawSurface4Impl_AddAttachedSurface, IDirectDrawSurface4Impl_AddOverlayDirtyRect, IDirectDrawSurface4Impl_Blt, IDirectDrawSurface4Impl_BltBatch, IDirectDrawSurface4Impl_BltFast, IDirectDrawSurface4Impl_DeleteAttachedSurface, IDirectDrawSurface4Impl_EnumAttachedSurfaces, IDirectDrawSurface4Impl_EnumOverlayZOrders, DGA2_IDirectDrawSurface4Impl_Flip, IDirectDrawSurface4Impl_GetAttachedSurface, IDirectDrawSurface4Impl_GetBltStatus, IDirectDrawSurface4Impl_GetCaps, IDirectDrawSurface4Impl_GetClipper, IDirectDrawSurface4Impl_GetColorKey, DGA_IDirectDrawSurface4Impl_GetDC, IDirectDrawSurface4Impl_GetFlipStatus, IDirectDrawSurface4Impl_GetOverlayPosition, IDirectDrawSurface4Impl_GetPalette, IDirectDrawSurface4Impl_GetPixelFormat, IDirectDrawSurface4Impl_GetSurfaceDesc, IDirectDrawSurface4Impl_Initialize, IDirectDrawSurface4Impl_IsLost, IDirectDrawSurface4Impl_Lock, IDirectDrawSurface4Impl_ReleaseDC, IDirectDrawSurface4Impl_Restore, IDirectDrawSurface4Impl_SetClipper, IDirectDrawSurface4Impl_SetColorKey, IDirectDrawSurface4Impl_SetOverlayPosition, DGA_IDirectDrawSurface4Impl_SetPalette, DGA_IDirectDrawSurface4Impl_Unlock, IDirectDrawSurface4Impl_UpdateOverlay, IDirectDrawSurface4Impl_UpdateOverlayDisplay, IDirectDrawSurface4Impl_UpdateOverlayZOrder, IDirectDrawSurface4Impl_GetDDInterface, IDirectDrawSurface4Impl_PageLock, IDirectDrawSurface4Impl_PageUnlock, IDirectDrawSurface4Impl_SetSurfaceDesc, IDirectDrawSurface4Impl_SetPrivateData, IDirectDrawSurface4Impl_GetPrivateData, IDirectDrawSurface4Impl_FreePrivateData, IDirectDrawSurface4Impl_GetUniquenessValue, IDirectDrawSurface4Impl_ChangeUniquenessValue }; wine-20000526/dlls/ddraw/dsurface/main.c0100644000175000001440000010206407107627177017406 0ustar julliardusers/* DirectDrawSurface base implementation * * Copyright 1997-2000 Marcus Meissner * Copyright 1998-2000 Lionel Ulmer (most of Direct3D stuff) */ #include "config.h" #include "winerror.h" #include #include #include #include #include #include #include "debugtools.h" #include "bitmap.h" #include "ddraw_private.h" DEFAULT_DEBUG_CHANNEL(ddraw); /****************************************************************************** * IDirectDrawSurface methods * * Since DDS3 and DDS2 are supersets of DDS, we implement DDS3 and let * DDS and DDS2 use those functions. (Function calls did not change (except * using different DirectDrawSurfaceX version), just added flags and functions) */ HRESULT WINAPI IDirectDrawSurface4Impl_Lock( LPDIRECTDRAWSURFACE4 iface,LPRECT lprect,LPDDSURFACEDESC lpddsd,DWORD flags, HANDLE hnd ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); TRACE("(%p)->Lock(%p,%p,%08lx,%08lx)\n", This,lprect,lpddsd,flags,(DWORD)hnd); /* DO NOT AddRef the surface! Lock/Unlock must not come in matched pairs * -Marcus Meissner 20000509 */ if (flags & ~(DDLOCK_WAIT|DDLOCK_READONLY|DDLOCK_WRITEONLY)) WARN("(%p)->Lock(%p,%p,%08lx,%08lx)\n", This,lprect,lpddsd,flags,(DWORD)hnd); /* First, copy the Surface description */ *lpddsd = This->s.surface_desc; TRACE("locked surface: height=%ld, width=%ld, pitch=%ld\n", lpddsd->dwHeight,lpddsd->dwWidth,lpddsd->lPitch); /* If asked only for a part, change the surface pointer */ if (lprect) { TRACE(" lprect: %dx%d-%dx%d\n", lprect->top,lprect->left,lprect->bottom,lprect->right ); if ((lprect->top < 0) || (lprect->left < 0) || (lprect->bottom < 0) || (lprect->right < 0)) { ERR(" Negative values in LPRECT !!!\n"); return DDERR_INVALIDPARAMS; } lpddsd->u1.lpSurface = (LPVOID) ((char *) This->s.surface_desc.u1.lpSurface + (lprect->top*This->s.surface_desc.lPitch) + lprect->left*GET_BPP(This->s.surface_desc)); } else { assert(This->s.surface_desc.u1.lpSurface); } return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_Unlock( LPDIRECTDRAWSURFACE4 iface,LPVOID surface ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); /* DO NOT Release the surface! Lock/Unlock MUST NOT come in matched pairs * Marcus Meissner 20000509 */ TRACE("(%p)->Unlock(%p)\n",This,surface); return DD_OK; } IDirectDrawSurface4Impl* _common_find_flipto( IDirectDrawSurface4Impl* This,IDirectDrawSurface4Impl* flipto ) { int i,j,flipable=0; struct _surface_chain *chain = This->s.chain; /* if there was no override flipto, look for current backbuffer */ if (!flipto) { /* walk the flip chain looking for backbuffer */ for (i=0;inrofsurfaces;i++) { if (SDDSCAPS(chain->surfaces[i]) & DDSCAPS_FLIP) flipable++; if (SDDSCAPS(chain->surfaces[i]) & DDSCAPS_BACKBUFFER) flipto = chain->surfaces[i]; } /* sanity checks ... */ if (!flipto) { if (flipable>1) { for (i=0;inrofsurfaces;i++) if (SDDSCAPS(chain->surfaces[i]) & DDSCAPS_FRONTBUFFER) break; if (i==chain->nrofsurfaces) { /* we do not have a frontbuffer either */ for (i=0;inrofsurfaces;i++) if (SDDSCAPS(chain->surfaces[i]) & DDSCAPS_FLIP) { SDDSCAPS(chain->surfaces[i])|=DDSCAPS_FRONTBUFFER; break; } for (j=i+1;jnrofsurfaces+1;j++) { int k = j % chain->nrofsurfaces; if (SDDSCAPS(chain->surfaces[k]) & DDSCAPS_FLIP) { SDDSCAPS(chain->surfaces[k])|=DDSCAPS_BACKBUFFER; flipto = chain->surfaces[k]; break; } } } } if (!flipto) flipto = This; } TRACE("flipping to %p\n",flipto); } return flipto; } static HRESULT _Blt_ColorFill( LPBYTE buf, int width, int height, int bpp, LONG lPitch, DWORD color ) { int x, y; LPBYTE first; /* Do first row */ #define COLORFILL_ROW(type) { \ type *d = (type *) buf; \ for (x = 0; x < width; x++) \ d[x] = (type) color; \ break; \ } switch(bpp) { case 1: COLORFILL_ROW(BYTE) case 2: COLORFILL_ROW(WORD) case 4: COLORFILL_ROW(DWORD) default: FIXME("Color fill not implemented for bpp %d!\n", bpp*8); return DDERR_UNSUPPORTED; } #undef COLORFILL_ROW /* Now copy first row */ first = buf; for (y = 1; y < height; y++) { buf += lPitch; memcpy(buf, first, width * bpp); } return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_Blt( LPDIRECTDRAWSURFACE4 iface,LPRECT rdst,LPDIRECTDRAWSURFACE4 src,LPRECT rsrc, DWORD dwFlags,LPDDBLTFX lpbltfx ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); RECT xdst,xsrc; DDSURFACEDESC ddesc,sdesc; HRESULT ret = DD_OK; int bpp, srcheight, srcwidth, dstheight, dstwidth, width; int x, y; LPBYTE dbuf, sbuf; TRACE("(%p)->(%p,%p,%p,%08lx,%p)\n", This,rdst,src,rsrc,dwFlags,lpbltfx); if (src) IDirectDrawSurface4_Lock(src, NULL, &sdesc, 0, 0); IDirectDrawSurface4_Lock(iface,NULL,&ddesc,0,0); if (TRACE_ON(ddraw)) { if (rdst) TRACE("\tdestrect :%dx%d-%dx%d\n",rdst->left,rdst->top,rdst->right,rdst->bottom); if (rsrc) TRACE("\tsrcrect :%dx%d-%dx%d\n",rsrc->left,rsrc->top,rsrc->right,rsrc->bottom); TRACE("\tflags: "); _dump_DDBLT(dwFlags); if (dwFlags & DDBLT_DDFX) { TRACE("\tblitfx: "); _dump_DDBLTFX(lpbltfx->dwDDFX); } } if (rdst) { if ((rdst->top < 0) || (rdst->left < 0) || (rdst->bottom < 0) || (rdst->right < 0)) { ERR(" Negative values in LPRECT !!!\n"); goto release; } memcpy(&xdst,rdst,sizeof(xdst)); } else { xdst.top = 0; xdst.bottom = ddesc.dwHeight; xdst.left = 0; xdst.right = ddesc.dwWidth; } if (rsrc) { if ((rsrc->top < 0) || (rsrc->left < 0) || (rsrc->bottom < 0) || (rsrc->right < 0)) { ERR(" Negative values in LPRECT !!!\n"); goto release; } memcpy(&xsrc,rsrc,sizeof(xsrc)); } else { if (src) { xsrc.top = 0; xsrc.bottom = sdesc.dwHeight; xsrc.left = 0; xsrc.right = sdesc.dwWidth; } else { memset(&xsrc,0,sizeof(xsrc)); } } if (src) assert(xsrc.bottom <= sdesc.dwHeight); assert(xdst.bottom <= ddesc.dwHeight); bpp = GET_BPP(ddesc); srcheight = xsrc.bottom - xsrc.top; srcwidth = xsrc.right - xsrc.left; dstheight = xdst.bottom - xdst.top; dstwidth = xdst.right - xdst.left; width = (xdst.right - xdst.left) * bpp; assert(width <= ddesc.lPitch); dbuf = (BYTE*)ddesc.u1.lpSurface+(xdst.top*ddesc.lPitch)+(xdst.left*bpp); dwFlags &= ~(DDBLT_WAIT|DDBLT_ASYNC);/* FIXME: can't handle right now */ /* First, all the 'source-less' blits */ if (dwFlags & DDBLT_COLORFILL) { ret = _Blt_ColorFill(dbuf, dstwidth, dstheight, bpp, ddesc.lPitch, lpbltfx->u4.dwFillColor); dwFlags &= ~DDBLT_COLORFILL; } if (dwFlags & DDBLT_DEPTHFILL) FIXME("DDBLT_DEPTHFILL needs to be implemented!\n"); if (dwFlags & DDBLT_ROP) { /* Catch some degenerate cases here */ switch(lpbltfx->dwROP) { case BLACKNESS: ret = _Blt_ColorFill(dbuf,dstwidth,dstheight,bpp,ddesc.lPitch,0); break; case 0xAA0029: /* No-op */ break; case WHITENESS: ret = _Blt_ColorFill(dbuf,dstwidth,dstheight,bpp,ddesc.lPitch,~0); break; default: FIXME("Unsupported raster op: %08lx Pattern: %p\n", lpbltfx->dwROP, lpbltfx->u4.lpDDSPattern); goto error; } dwFlags &= ~DDBLT_ROP; } if (dwFlags & DDBLT_DDROPS) { FIXME("\tDdraw Raster Ops: %08lx Pattern: %p\n", lpbltfx->dwDDROP, lpbltfx->u4.lpDDSPattern); } /* Now the 'with source' blits */ if (src) { LPBYTE sbase; int sx, xinc, sy, yinc; sbase = (BYTE*)sdesc.u1.lpSurface+(xsrc.top*sdesc.lPitch)+xsrc.left*bpp; xinc = (srcwidth << 16) / dstwidth; yinc = (srcheight << 16) / dstheight; if (!dwFlags) { assert(ddesc.lPitch >= width); assert(sdesc.lPitch >= width); /* No effects, we can cheat here */ if (dstwidth == srcwidth) { if (dstheight == srcheight) { /* No stretching in either direction. This needs to be as * fast as possible */ sbuf = sbase; for (y = 0; y < dstheight; y++) { memcpy(dbuf, sbuf, width); sbuf += sdesc.lPitch; dbuf += ddesc.lPitch; } } else { /* Stretching in Y direction only */ for (y = sy = 0; y < dstheight; y++, sy += yinc) { sbuf = sbase + (sy >> 16) * sdesc.lPitch; memcpy(dbuf, sbuf, width); dbuf += ddesc.lPitch; } } } else { /* Stretching in X direction */ int last_sy = -1; for (y = sy = 0; y < dstheight; y++, sy += yinc) { sbuf = sbase + (sy >> 16) * sdesc.lPitch; assert((sy>>16) < srcheight); if ((sy >> 16) == (last_sy >> 16)) { /* this sourcerow is the same as last sourcerow - * copy already stretched row */ memcpy(dbuf, dbuf - ddesc.lPitch, width); } else { #define STRETCH_ROW(type) { \ type *s = (type *) sbuf, *d = (type *) dbuf; \ for (x = sx = 0; x < dstwidth; x++, sx += xinc) \ d[x] = s[sx >> 16]; \ break; } switch(bpp) { case 1: STRETCH_ROW(BYTE) case 2: STRETCH_ROW(WORD) case 4: STRETCH_ROW(DWORD) case 3: { LPBYTE s,d = dbuf; for (x = sx = 0; x < dstwidth; x++, sx+= xinc) { DWORD pixel; s = sbuf+3*(sx>>16); pixel = (s[0]<<16)|(s[1]<<8)|s[2]; d[0] = (pixel>>16)&0xff; d[1] = (pixel>> 8)&0xff; d[2] = (pixel )&0xff; d+=3; } break; } default: FIXME("Stretched blit not implemented for bpp %d!\n", bpp*8); ret = DDERR_UNSUPPORTED; goto error; } #undef STRETCH_ROW } dbuf += ddesc.lPitch; last_sy = sy; } } } else if (dwFlags & (DDBLT_KEYSRC | DDBLT_KEYDEST)) { DWORD keylow, keyhigh; if (dwFlags & DDBLT_KEYSRC) { keylow = sdesc.ddckCKSrcBlt.dwColorSpaceLowValue; keyhigh = sdesc.ddckCKSrcBlt.dwColorSpaceHighValue; } else { /* I'm not sure if this is correct */ FIXME("DDBLT_KEYDEST not fully supported yet.\n"); keylow = ddesc.ddckCKDestBlt.dwColorSpaceLowValue; keyhigh = ddesc.ddckCKDestBlt.dwColorSpaceHighValue; } for (y = sy = 0; y < dstheight; y++, sy += yinc) { sbuf = sbase + (sy >> 16) * sdesc.lPitch; #define COPYROW_COLORKEY(type) { \ type *s = (type *) sbuf, *d = (type *) dbuf, tmp; \ for (x = sx = 0; x < dstwidth; x++, sx += xinc) { \ tmp = s[sx >> 16]; \ if (tmp < keylow || tmp > keyhigh) d[x] = tmp; \ } \ break; } switch (bpp) { case 1: COPYROW_COLORKEY(BYTE) case 2: COPYROW_COLORKEY(WORD) case 4: COPYROW_COLORKEY(DWORD) default: FIXME("%s color-keyed blit not implemented for bpp %d!\n", (dwFlags & DDBLT_KEYSRC) ? "Source" : "Destination", bpp*8); ret = DDERR_UNSUPPORTED; goto error; } dbuf += ddesc.lPitch; } #undef COPYROW_COLORKEY dwFlags &= ~(DDBLT_KEYSRC | DDBLT_KEYDEST); } } error: if (dwFlags && FIXME_ON(ddraw)) { FIXME("\tUnsupported flags: "); _dump_DDBLT(dwFlags); } release: IDirectDrawSurface4_Unlock(iface,ddesc.u1.lpSurface); if (src) IDirectDrawSurface4_Unlock(src,sdesc.u1.lpSurface); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_BltFast( LPDIRECTDRAWSURFACE4 iface,DWORD dstx,DWORD dsty,LPDIRECTDRAWSURFACE4 src, LPRECT rsrc,DWORD trans ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); int bpp, w, h, x, y; DDSURFACEDESC ddesc,sdesc; HRESULT ret = DD_OK; LPBYTE sbuf, dbuf; RECT rsrc2; if (TRACE_ON(ddraw)) { FIXME("(%p)->(%ld,%ld,%p,%p,%08lx)\n", This,dstx,dsty,src,rsrc,trans ); FIXME(" trans:"); if (FIXME_ON(ddraw)) _dump_DDBLTFAST(trans); if (rsrc) FIXME("\tsrcrect: %dx%d-%dx%d\n",rsrc->left,rsrc->top,rsrc->right,rsrc->bottom); else FIXME(" srcrect: NULL\n"); } /* We need to lock the surfaces, or we won't get refreshes when done. */ IDirectDrawSurface4_Lock(src, NULL,&sdesc,DDLOCK_READONLY, 0); IDirectDrawSurface4_Lock(iface,NULL,&ddesc,DDLOCK_WRITEONLY,0); if (!rsrc) { WARN("rsrc is NULL!\n"); rsrc = &rsrc2; rsrc->left = rsrc->top = 0; rsrc->right = sdesc.dwWidth; rsrc->bottom = sdesc.dwHeight; } bpp = GET_BPP(This->s.surface_desc); sbuf = (BYTE *)sdesc.u1.lpSurface+(rsrc->top*sdesc.lPitch)+rsrc->left*bpp; dbuf = (BYTE *)ddesc.u1.lpSurface+(dsty*ddesc.lPitch)+dstx* bpp; h=rsrc->bottom-rsrc->top; if (h>ddesc.dwHeight-dsty) h=ddesc.dwHeight-dsty; if (h>sdesc.dwHeight-rsrc->top) h=sdesc.dwHeight-rsrc->top; if (h<0) h=0; w=rsrc->right-rsrc->left; if (w>ddesc.dwWidth-dstx) w=ddesc.dwWidth-dstx; if (w>sdesc.dwWidth-rsrc->left) w=sdesc.dwWidth-rsrc->left; if (w<0) w=0; if (trans & (DDBLTFAST_SRCCOLORKEY | DDBLTFAST_DESTCOLORKEY)) { DWORD keylow, keyhigh; if (trans & DDBLTFAST_SRCCOLORKEY) { keylow = sdesc.ddckCKSrcBlt.dwColorSpaceLowValue; keyhigh = sdesc.ddckCKSrcBlt.dwColorSpaceHighValue; } else { /* I'm not sure if this is correct */ FIXME("DDBLTFAST_DESTCOLORKEY not fully supported yet.\n"); keylow = ddesc.ddckCKDestBlt.dwColorSpaceLowValue; keyhigh = ddesc.ddckCKDestBlt.dwColorSpaceHighValue; } #define COPYBOX_COLORKEY(type) { \ type *d = (type *)dbuf, *s = (type *)sbuf, tmp; \ s = (type *) ((BYTE *) sdesc.u1.lpSurface + (rsrc->top * sdesc.lPitch) + rsrc->left * bpp); \ d = (type *) ((BYTE *) ddesc.u1.lpSurface + (dsty * ddesc.lPitch) + dstx * bpp); \ for (y = 0; y < h; y++) { \ for (x = 0; x < w; x++) { \ tmp = s[x]; \ if (tmp < keylow || tmp > keyhigh) d[x] = tmp; \ } \ (LPBYTE)s += sdesc.lPitch; \ (LPBYTE)d += ddesc.lPitch; \ } \ break; \ } switch (bpp) { case 1: COPYBOX_COLORKEY(BYTE) case 2: COPYBOX_COLORKEY(WORD) case 4: COPYBOX_COLORKEY(DWORD) default: FIXME("Source color key blitting not supported for bpp %d\n",bpp*8); ret = DDERR_UNSUPPORTED; goto error; } #undef COPYBOX_COLORKEY } else { int width = w * bpp; for (y = 0; y < h; y++) { memcpy(dbuf, sbuf, width); sbuf += sdesc.lPitch; dbuf += ddesc.lPitch; } } error: IDirectDrawSurface4_Unlock(iface,ddesc.u1.lpSurface); IDirectDrawSurface4_Unlock(src,sdesc.u1.lpSurface); return ret; } HRESULT WINAPI IDirectDrawSurface4Impl_BltBatch( LPDIRECTDRAWSURFACE4 iface,LPDDBLTBATCH ddbltbatch,DWORD x,DWORD y ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->BltBatch(%p,%08lx,%08lx),stub!\n",This,ddbltbatch,x,y); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_GetCaps( LPDIRECTDRAWSURFACE4 iface,LPDDSCAPS caps ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); TRACE("(%p)->GetCaps(%p)\n",This,caps); caps->dwCaps = DDSCAPS_PALETTE; /* probably more */ return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_GetSurfaceDesc( LPDIRECTDRAWSURFACE4 iface,LPDDSURFACEDESC ddsd ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); TRACE("(%p)->GetSurfaceDesc(%p)\n", This,ddsd); /* Simply copy the surface description stored in the object */ *ddsd = This->s.surface_desc; if (TRACE_ON(ddraw)) { _dump_surface_desc(ddsd); } return DD_OK; } ULONG WINAPI IDirectDrawSurface4Impl_AddRef(LPDIRECTDRAWSURFACE4 iface) { ICOM_THIS(IDirectDrawSurface4Impl,iface); TRACE("(%p)->() incrementing from %lu.\n", This, This->ref ); return ++(This->ref); } HRESULT WINAPI IDirectDrawSurface4Impl_GetAttachedSurface( LPDIRECTDRAWSURFACE4 iface,LPDDSCAPS lpddsd,LPDIRECTDRAWSURFACE4 *lpdsf ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); int i,found = 0,xstart; struct _surface_chain *chain; TRACE("(%p)->GetAttachedSurface(%p,%p)\n", This, lpddsd, lpdsf); if (TRACE_ON(ddraw)) { TRACE(" caps ");_dump_DDSCAPS((void *) &(lpddsd->dwCaps)); DPRINTF("\n"); } chain = This->s.chain; if (!chain) return DDERR_NOTFOUND; for (i=0;inrofsurfaces;i++) if (chain->surfaces[i] == This) break; xstart = i; for (i=0;inrofsurfaces;i++) { if ((SDDSCAPS(chain->surfaces[(xstart+i)%chain->nrofsurfaces])&lpddsd->dwCaps) == lpddsd->dwCaps) { #if 0 if (found) /* may not find the same caps twice, (doc) */ return DDERR_INVALIDPARAMS;/*FIXME: correct? */ #endif found = (i+1)+xstart; } } if (!found) return DDERR_NOTFOUND; *lpdsf = (LPDIRECTDRAWSURFACE4)chain->surfaces[found-1-xstart]; /* FIXME: AddRef? */ TRACE("found %p\n",*lpdsf); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_Initialize( LPDIRECTDRAWSURFACE4 iface,LPDIRECTDRAW ddraw,LPDDSURFACEDESC lpdsfd ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); TRACE("(%p)->(%p, %p)\n",This,ddraw,lpdsfd); return DDERR_ALREADYINITIALIZED; } HRESULT WINAPI IDirectDrawSurface4Impl_GetPixelFormat( LPDIRECTDRAWSURFACE4 iface,LPDDPIXELFORMAT pf ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); TRACE("(%p)->(%p)\n",This,pf); *pf = This->s.surface_desc.ddpfPixelFormat; if (TRACE_ON(ddraw)) { _dump_pixelformat(pf); DPRINTF("\n"); } return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_GetBltStatus(LPDIRECTDRAWSURFACE4 iface,DWORD dwFlags) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(0x%08lx),stub!\n",This,dwFlags); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_GetOverlayPosition( LPDIRECTDRAWSURFACE4 iface,LPLONG x1,LPLONG x2 ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(%p,%p),stub!\n",This,x1,x2); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_SetClipper( LPDIRECTDRAWSURFACE4 iface,LPDIRECTDRAWCLIPPER lpClipper ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); TRACE("(%p)->(%p)!\n",This,lpClipper); if (This->s.lpClipper) IDirectDrawClipper_Release( This->s.lpClipper ); This->s.lpClipper = lpClipper; if (lpClipper) IDirectDrawClipper_AddRef( lpClipper ); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_AddAttachedSurface( LPDIRECTDRAWSURFACE4 iface,LPDIRECTDRAWSURFACE4 surf ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); IDirectDrawSurface4Impl*isurf = (IDirectDrawSurface4Impl*)surf; int i; struct _surface_chain *chain; FIXME("(%p)->(%p)\n",This,surf); chain = This->s.chain; /* IDirectDrawSurface4_AddRef(surf); */ if (chain) { for (i=0;inrofsurfaces;i++) if (chain->surfaces[i] == isurf) FIXME("attaching already attached surface %p to %p!\n",iface,isurf); } else { chain = HeapAlloc(GetProcessHeap(),0,sizeof(*chain)); chain->nrofsurfaces = 1; chain->surfaces = HeapAlloc(GetProcessHeap(),0,sizeof(chain->surfaces[0])); chain->surfaces[0] = This; This->s.chain = chain; } if (chain->surfaces) chain->surfaces = HeapReAlloc( GetProcessHeap(), 0, chain->surfaces, sizeof(chain->surfaces[0])*(chain->nrofsurfaces+1) ); else chain->surfaces = HeapAlloc(GetProcessHeap(),0,sizeof(chain->surfaces[0])); isurf->s.chain = chain; chain->surfaces[chain->nrofsurfaces++] = isurf; return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_GetDC(LPDIRECTDRAWSURFACE4 iface,HDC* lphdc) { ICOM_THIS(IDirectDrawSurface4Impl,iface); DDSURFACEDESC desc; BITMAPINFO *b_info; UINT usage; HDC ddc; TRACE("(%p)->GetDC(%p)\n",This,lphdc); /* Creates a DIB Section of the same size / format as the surface */ IDirectDrawSurface4_Lock(iface,NULL,&desc,0,0); if (This->s.hdc == 0) { switch (desc.ddpfPixelFormat.u.dwRGBBitCount) { case 16: case 32: #if 0 /* This should be filled if Wine's DIBSection did understand BI_BITFIELDS */ b_info = (BITMAPINFO *) HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(BITMAPINFOHEADER) + 3 * sizeof(DWORD)); break; #endif case 24: b_info = (BITMAPINFO *) HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(BITMAPINFOHEADER)); break; default: b_info = (BITMAPINFO *)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(BITMAPINFOHEADER) + sizeof(RGBQUAD) * (2 << desc.ddpfPixelFormat.u.dwRGBBitCount)); break; } b_info->bmiHeader.biSize = sizeof(BITMAPINFOHEADER); b_info->bmiHeader.biWidth = desc.dwWidth; b_info->bmiHeader.biHeight = -desc.dwHeight; b_info->bmiHeader.biPlanes = 1; b_info->bmiHeader.biBitCount = desc.ddpfPixelFormat.u.dwRGBBitCount; #if 0 if ((desc.ddpfPixelFormat.u.dwRGBBitCount != 16) && (desc.ddpfPixelFormat.u.dwRGBBitCount != 32)) #endif b_info->bmiHeader.biCompression = BI_RGB; #if 0 else b_info->bmiHeader.biCompression = BI_BITFIELDS; #endif b_info->bmiHeader.biSizeImage = (desc.ddpfPixelFormat.u.dwRGBBitCount / 8) * desc.dwWidth * desc.dwHeight; b_info->bmiHeader.biXPelsPerMeter = 0; b_info->bmiHeader.biYPelsPerMeter = 0; b_info->bmiHeader.biClrUsed = 0; b_info->bmiHeader.biClrImportant = 0; switch (desc.ddpfPixelFormat.u.dwRGBBitCount) { case 16: case 32: #if 0 { DWORD *masks = (DWORD *) &(b_info->bmiColors); usage = 0; masks[0] = desc.ddpfPixelFormat.u1.dwRBitMask; masks[1] = desc.ddpfPixelFormat.u2.dwGBitMask; masks[2] = desc.ddpfPixelFormat.u3.dwBBitMask; } break; #endif case 24: /* Nothing to do */ usage = DIB_RGB_COLORS; break; default: { int i; /* Fill the palette */ usage = DIB_RGB_COLORS; if (This->s.palette == NULL) { ERR("Bad palette !!!\n"); } else { RGBQUAD *rgb = (RGBQUAD *) &(b_info->bmiColors); PALETTEENTRY *pent = (PALETTEENTRY *)&(This->s.palette->palents); for (i=0;i<(1<s.DIBsection = ddc ? DIB_CreateDIBSection(ddc, b_info, usage, &(This->s.bitmap_data), 0, (DWORD)desc.u1.lpSurface, desc.lPitch ) : 0; if (!This->s.DIBsection) { ERR("CreateDIBSection failed!\n"); if (ddc) DeleteDC(ddc); HeapFree(GetProcessHeap(), 0, b_info); return E_FAIL; } TRACE("DIBSection at : %p\n", This->s.bitmap_data); /* b_info is not useful anymore */ HeapFree(GetProcessHeap(), 0, b_info); /* Create the DC */ This->s.hdc = CreateCompatibleDC(ddc); This->s.holdbitmap = SelectObject(This->s.hdc, This->s.DIBsection); if (ddc) DeleteDC(ddc); } if (This->s.bitmap_data != desc.u1.lpSurface) { FIXME("DIBSection not created for frame buffer, reverting to old code\n"); /* Copy our surface in the DIB section */ if ((GET_BPP(desc) * desc.dwWidth) == desc.lPitch) memcpy(This->s.bitmap_data,desc.u1.lpSurface,desc.lPitch*desc.dwHeight); else /* TODO */ FIXME("This case has to be done :/\n"); } if (lphdc) { TRACE("HDC : %08lx\n", (DWORD) This->s.hdc); *lphdc = This->s.hdc; } return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_ReleaseDC(LPDIRECTDRAWSURFACE4 iface,HDC hdc) { ICOM_THIS(IDirectDrawSurface4Impl,iface); TRACE("(%p)->(0x%08lx)\n",This,(long)hdc); if (This->s.bitmap_data != This->s.surface_desc.u1.lpSurface) { TRACE( "Copying DIBSection at : %p\n", This->s.bitmap_data); /* Copy the DIB section to our surface */ if ((GET_BPP(This->s.surface_desc) * This->s.surface_desc.dwWidth) == This->s.surface_desc.lPitch) { memcpy(This->s.surface_desc.u1.lpSurface, This->s.bitmap_data, This->s.surface_desc.lPitch * This->s.surface_desc.dwHeight); } else { /* TODO */ FIXME("This case has to be done :/\n"); } } /* Unlock the surface */ IDirectDrawSurface4_Unlock(iface,This->s.surface_desc.u1.lpSurface); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_QueryInterface( LPDIRECTDRAWSURFACE4 iface,REFIID refiid,LPVOID *obj ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); TRACE("(%p)->(%s,%p)\n",This,debugstr_guid(refiid),obj); /* All DirectDrawSurface versions (1, 2, 3 and 4) use * the same interface. And IUnknown does that too of course. */ if ( IsEqualGUID( &IID_IDirectDrawSurface4, refiid ) || IsEqualGUID( &IID_IDirectDrawSurface3, refiid ) || IsEqualGUID( &IID_IDirectDrawSurface2, refiid ) || IsEqualGUID( &IID_IDirectDrawSurface, refiid ) || IsEqualGUID( &IID_IUnknown, refiid ) ) { *obj = This; IDirectDrawSurface4_AddRef(iface); TRACE(" Creating IDirectDrawSurface interface (%p)\n", *obj); return S_OK; } FIXME("(%p):interface for IID %s NOT found!\n",This,debugstr_guid(refiid)); return OLE_E_ENUM_NOMORE; } HRESULT WINAPI IDirectDrawSurface4Impl_IsLost(LPDIRECTDRAWSURFACE4 iface) { ICOM_THIS(IDirectDrawSurface4Impl,iface); TRACE("(%p)->(), stub!\n",This); return DD_OK; /* hmm */ } HRESULT WINAPI IDirectDrawSurface4Impl_EnumAttachedSurfaces( LPDIRECTDRAWSURFACE4 iface,LPVOID context,LPDDENUMSURFACESCALLBACK esfcb ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); int i; struct _surface_chain *chain = This->s.chain; TRACE("(%p)->(%p,%p)\n",This,context,esfcb); for (i=0;inrofsurfaces;i++) { TRACE( "Enumerating attached surface (%p)\n", chain->surfaces[i]); if (esfcb((LPDIRECTDRAWSURFACE) chain->surfaces[i], &(chain->surfaces[i]->s.surface_desc), context) == DDENUMRET_CANCEL) return DD_OK; /* FIXME: return value correct? */ } return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_Restore(LPDIRECTDRAWSURFACE4 iface) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(),stub!\n",This); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_SetColorKey( LPDIRECTDRAWSURFACE4 iface, DWORD dwFlags, LPDDCOLORKEY ckey ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); TRACE("(%p)->(0x%08lx,%p)\n",This,dwFlags,ckey); if (TRACE_ON(ddraw)) { _dump_colorkeyflag(dwFlags); DPRINTF(" : "); _dump_DDCOLORKEY((void *) ckey); DPRINTF("\n"); } /* If this surface was loaded as a texture, call also the texture * SetColorKey callback. FIXME: hack approach :( */ if (This->s.texture) This->s.SetColorKey_cb(This->s.texture, dwFlags, ckey); if( dwFlags & DDCKEY_SRCBLT ) { dwFlags &= ~DDCKEY_SRCBLT; This->s.surface_desc.dwFlags |= DDSD_CKSRCBLT; memcpy( &(This->s.surface_desc.ddckCKSrcBlt), ckey, sizeof( *ckey ) ); } if( dwFlags & DDCKEY_DESTBLT ) { dwFlags &= ~DDCKEY_DESTBLT; This->s.surface_desc.dwFlags |= DDSD_CKDESTBLT; memcpy( &(This->s.surface_desc.ddckCKDestBlt), ckey, sizeof( *ckey ) ); } if( dwFlags & DDCKEY_SRCOVERLAY ) { dwFlags &= ~DDCKEY_SRCOVERLAY; This->s.surface_desc.dwFlags |= DDSD_CKSRCOVERLAY; memcpy( &(This->s.surface_desc.ddckCKSrcOverlay), ckey, sizeof( *ckey ) ); } if( dwFlags & DDCKEY_DESTOVERLAY ) { dwFlags &= ~DDCKEY_DESTOVERLAY; This->s.surface_desc.dwFlags |= DDSD_CKDESTOVERLAY; memcpy( &(This->s.surface_desc.ddckCKDestOverlay), ckey, sizeof( *ckey ) ); } if( dwFlags ) FIXME("unhandled dwFlags: 0x%08lx\n", dwFlags ); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_AddOverlayDirtyRect( LPDIRECTDRAWSURFACE4 iface, LPRECT lpRect ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(%p),stub!\n",This,lpRect); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_DeleteAttachedSurface( LPDIRECTDRAWSURFACE4 iface, DWORD dwFlags, LPDIRECTDRAWSURFACE4 lpDDSAttachedSurface ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); int i; struct _surface_chain *chain; TRACE("(%p)->(0x%08lx,%p)\n",This,dwFlags,lpDDSAttachedSurface); chain = This->s.chain; for (i=0;inrofsurfaces;i++) { if ((IDirectDrawSurface4Impl*)lpDDSAttachedSurface==chain->surfaces[i]){ IDirectDrawSurface4_Release(lpDDSAttachedSurface); chain->surfaces[i]->s.chain = NULL; memcpy( chain->surfaces+i, chain->surfaces+(i+1), (chain->nrofsurfaces-i-1)*sizeof(chain->surfaces[i]) ); chain->surfaces = HeapReAlloc( GetProcessHeap(), 0, chain->surfaces, sizeof(chain->surfaces[i])*(chain->nrofsurfaces-1) ); chain->nrofsurfaces--; return DD_OK; } } return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_EnumOverlayZOrders( LPDIRECTDRAWSURFACE4 iface, DWORD dwFlags, LPVOID lpContext, LPDDENUMSURFACESCALLBACK lpfnCallback ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p),stub!\n", This,dwFlags, lpContext, lpfnCallback ); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_GetClipper( LPDIRECTDRAWSURFACE4 iface, LPDIRECTDRAWCLIPPER* lplpDDClipper ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(%p),stub!\n", This, lplpDDClipper); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_GetColorKey( LPDIRECTDRAWSURFACE4 iface, DWORD dwFlags, LPDDCOLORKEY lpDDColorKey ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); TRACE("(%p)->(0x%08lx,%p)\n", This, dwFlags, lpDDColorKey); if( dwFlags & DDCKEY_SRCBLT ) { dwFlags &= ~DDCKEY_SRCBLT; memcpy( lpDDColorKey, &(This->s.surface_desc.ddckCKSrcBlt), sizeof( *lpDDColorKey ) ); } if( dwFlags & DDCKEY_DESTBLT ) { dwFlags &= ~DDCKEY_DESTBLT; memcpy( lpDDColorKey, &(This->s.surface_desc.ddckCKDestBlt), sizeof( *lpDDColorKey ) ); } if( dwFlags & DDCKEY_SRCOVERLAY ) { dwFlags &= ~DDCKEY_SRCOVERLAY; memcpy( lpDDColorKey, &(This->s.surface_desc.ddckCKSrcOverlay), sizeof( *lpDDColorKey ) ); } if( dwFlags & DDCKEY_DESTOVERLAY ) { dwFlags &= ~DDCKEY_DESTOVERLAY; memcpy( lpDDColorKey, &(This->s.surface_desc.ddckCKDestOverlay), sizeof( *lpDDColorKey ) ); } if( dwFlags ) FIXME("unhandled dwFlags: 0x%08lx\n", dwFlags ); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_GetFlipStatus( LPDIRECTDRAWSURFACE4 iface, DWORD dwFlags ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(0x%08lx),stub!\n", This, dwFlags); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_GetPalette( LPDIRECTDRAWSURFACE4 iface, LPDIRECTDRAWPALETTE* lplpDDPalette ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); TRACE("(%p)->(%p),stub!\n", This, lplpDDPalette); if (!This->s.palette) return DDERR_NOPALETTEATTACHED; IDirectDrawPalette_AddRef( (IDirectDrawPalette*) This->s.palette ); *lplpDDPalette = (IDirectDrawPalette*) This->s.palette; return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_SetOverlayPosition( LPDIRECTDRAWSURFACE4 iface, LONG lX, LONG lY ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(%ld,%ld),stub!\n", This, lX, lY); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_UpdateOverlay( LPDIRECTDRAWSURFACE4 iface, LPRECT lpSrcRect, LPDIRECTDRAWSURFACE4 lpDDDestSurface, LPRECT lpDestRect, DWORD dwFlags, LPDDOVERLAYFX lpDDOverlayFx ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(%p,%p,%p,0x%08lx,%p),stub!\n", This, lpSrcRect, lpDDDestSurface, lpDestRect, dwFlags, lpDDOverlayFx ); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_UpdateOverlayDisplay( LPDIRECTDRAWSURFACE4 iface, DWORD dwFlags ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(0x%08lx),stub!\n", This, dwFlags); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_UpdateOverlayZOrder( LPDIRECTDRAWSURFACE4 iface,DWORD dwFlags,LPDIRECTDRAWSURFACE4 lpDDSReference ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(0x%08lx,%p),stub!\n", This, dwFlags, lpDDSReference); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_GetDDInterface( LPDIRECTDRAWSURFACE4 iface, LPVOID* lplpDD ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(%p),stub!\n", This, lplpDD); /* Not sure about that... */ *lplpDD = (void *) This->s.ddraw; return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_PageLock( LPDIRECTDRAWSURFACE4 iface, DWORD dwFlags ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(0x%08lx),stub!\n", This, dwFlags); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_PageUnlock( LPDIRECTDRAWSURFACE4 iface, DWORD dwFlags ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(0x%08lx),stub!\n", This, dwFlags); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_SetSurfaceDesc( LPDIRECTDRAWSURFACE4 iface, LPDDSURFACEDESC lpDDSD, DWORD dwFlags ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(%p,0x%08lx),stub!\n", This, lpDDSD, dwFlags); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_SetPrivateData( LPDIRECTDRAWSURFACE4 iface, REFGUID guidTag, LPVOID lpData, DWORD cbSize, DWORD dwFlags ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(%p,%p,%ld,%08lx\n", This, guidTag, lpData, cbSize, dwFlags); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_GetPrivateData( LPDIRECTDRAWSURFACE4 iface, REFGUID guidTag, LPVOID lpBuffer, LPDWORD lpcbBufferSize ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(%p,%p,%p)\n", This, guidTag, lpBuffer, lpcbBufferSize); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_FreePrivateData( LPDIRECTDRAWSURFACE4 iface, REFGUID guidTag ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(%p)\n", This, guidTag); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_GetUniquenessValue( LPDIRECTDRAWSURFACE4 iface, LPDWORD lpValue ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)->(%p)\n", This, lpValue); return DD_OK; } HRESULT WINAPI IDirectDrawSurface4Impl_ChangeUniquenessValue( LPDIRECTDRAWSURFACE4 iface ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); FIXME("(%p)\n", This); return DD_OK; } wine-20000526/dlls/ddraw/dsurface/x11.c0100644000175000001440000003544007110631572017062 0ustar julliardusers/* DirectDrawSurface Xlib implementation * * Copyright 1997-2000 Marcus Meissner * Copyright 1998-2000 Lionel Ulmer (most of Direct3D stuff) */ #include "config.h" #include "winerror.h" #include #include #include #include #include #include #include "options.h" #include "debugtools.h" #include "x11_private.h" #include "bitmap.h" #ifdef HAVE_OPENGL /* for d3d texture stuff */ # include "mesa_private.h" #endif DEFAULT_DEBUG_CHANNEL(ddraw); #define VISIBLE(x) (SDDSCAPS(x) & (DDSCAPS_VISIBLE|DDSCAPS_PRIMARYSURFACE)) #define DDPRIVATE(x) x11_dd_private *ddpriv = ((x11_dd_private*)(x)->private) #define DPPRIVATE(x) x11_dp_private *dppriv = ((x11_dp_private*)(x)->private) #define DSPRIVATE(x) x11_ds_private *dspriv = ((x11_ds_private*)(x)->private) static BYTE Xlib_TouchData(LPVOID data) { /* this is a function so it doesn't get optimized out */ return *(BYTE*)data; } /****************************************************************************** * IDirectDrawSurface methods * * Since DDS3 and DDS2 are supersets of DDS, we implement DDS3 and let * DDS and DDS2 use those functions. (Function calls did not change (except * using different DirectDrawSurfaceX version), just added flags and functions) */ HRESULT WINAPI Xlib_IDirectDrawSurface4Impl_QueryInterface( LPDIRECTDRAWSURFACE4 iface,REFIID refiid,LPVOID *obj ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); TRACE("(%p)->(%s,%p)\n",This,debugstr_guid(refiid),obj); /* All DirectDrawSurface versions (1, 2, 3 and 4) use * the same interface. And IUnknown does that too of course. */ if ( IsEqualGUID( &IID_IDirectDrawSurface4, refiid ) || IsEqualGUID( &IID_IDirectDrawSurface3, refiid ) || IsEqualGUID( &IID_IDirectDrawSurface2, refiid ) || IsEqualGUID( &IID_IDirectDrawSurface, refiid ) || IsEqualGUID( &IID_IUnknown, refiid ) ) { *obj = This; IDirectDrawSurface4_AddRef(iface); TRACE(" Creating IDirectDrawSurface interface (%p)\n", *obj); return S_OK; } #ifdef HAVE_OPENGL if ( IsEqualGUID( &IID_IDirect3DTexture2, refiid ) ) { /* Texture interface */ *obj = d3dtexture2_create(This); IDirectDrawSurface4_AddRef(iface); TRACE(" Creating IDirect3DTexture2 interface (%p)\n", *obj); return S_OK; } if ( IsEqualGUID( &IID_IDirect3DTexture, refiid ) ) { /* Texture interface */ *obj = d3dtexture_create(This); IDirectDrawSurface4_AddRef(iface); TRACE(" Creating IDirect3DTexture interface (%p)\n", *obj); return S_OK; } #endif /* HAVE_OPENGL */ FIXME("(%p):interface for IID %s NOT found!\n",This,debugstr_guid(refiid)); return OLE_E_ENUM_NOMORE; } HRESULT WINAPI Xlib_IDirectDrawSurface4Impl_Lock( LPDIRECTDRAWSURFACE4 iface,LPRECT lprect,LPDDSURFACEDESC lpddsd,DWORD flags, HANDLE hnd ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); DSPRIVATE(This); DDPRIVATE(This->s.ddraw); /* DO NOT AddRef the surface! Lock/Unlock are NOT guaranteed to come in * matched pairs! - Marcus Meissner 20000509 */ TRACE("(%p)->Lock(%p,%p,%08lx,%08lx)\n",This,lprect,lpddsd,flags,(DWORD)hnd); if (flags & ~(DDLOCK_WAIT|DDLOCK_READONLY|DDLOCK_WRITEONLY)) WARN("(%p)->Lock(%p,%p,%08lx,%08lx)\n", This,lprect,lpddsd,flags,(DWORD)hnd); /* First, copy the Surface description */ *lpddsd = This->s.surface_desc; TRACE("locked surface: height=%ld, width=%ld, pitch=%ld\n", lpddsd->dwHeight,lpddsd->dwWidth,lpddsd->lPitch); /* If asked only for a part, change the surface pointer */ if (lprect) { TRACE(" lprect: %dx%d-%dx%d\n", lprect->top,lprect->left,lprect->bottom,lprect->right ); if ((lprect->top < 0) || (lprect->left < 0) || (lprect->bottom < 0) || (lprect->right < 0)) { ERR(" Negative values in LPRECT !!!\n"); IDirectDrawSurface4_Release(iface); return DDERR_INVALIDPARAMS; } lpddsd->u1.lpSurface=(LPVOID)((char*)This->s.surface_desc.u1.lpSurface+ (lprect->top*This->s.surface_desc.lPitch) + lprect->left*GET_BPP(This->s.surface_desc)); } else assert(This->s.surface_desc.u1.lpSurface); /* wait for any previous operations to complete */ #ifdef HAVE_LIBXXSHM if (dspriv->image && VISIBLE(This) && ddpriv->xshm_active) { /* int compl = InterlockedExchange( &(ddpriv->xshm_compl), 0 ); if (compl) X11DRV_EVENT_WaitShmCompletion( compl ); */ X11DRV_EVENT_WaitShmCompletions( ddpriv->drawable ); } #endif return DD_OK; } static void Xlib_copy_surface_on_screen(IDirectDrawSurface4Impl* This) { DSPRIVATE(This); DDPRIVATE(This->s.ddraw); if (This->s.ddraw->d.pixel_convert != NULL) This->s.ddraw->d.pixel_convert(This->s.surface_desc.u1.lpSurface, dspriv->image->data, This->s.surface_desc.dwWidth, This->s.surface_desc.dwHeight, This->s.surface_desc.lPitch, This->s.palette); /* if the DIB section is in GdiMod state, we must * touch the surface to get any updates from the DIB */ Xlib_TouchData(dspriv->image->data); #ifdef HAVE_LIBXXSHM if (ddpriv->xshm_active) { /* X11DRV_EVENT_WaitReplaceShmCompletion( &(ddpriv->xshm_compl), This->s.ddraw->d.drawable ); */ /* let WaitShmCompletions track 'em for now */ /* (you may want to track it again whenever you implement DX7's partial * surface locking, where threads have concurrent access) */ X11DRV_EVENT_PrepareShmCompletion( ddpriv->drawable ); TSXShmPutImage(display, ddpriv->drawable, DefaultGCOfScreen(X11DRV_GetXScreen()), dspriv->image, 0, 0, 0, 0, dspriv->image->width, dspriv->image->height, True ); /* make sure the image is transferred ASAP */ TSXFlush(display); } else #endif TSXPutImage( display, ddpriv->drawable, DefaultGCOfScreen(X11DRV_GetXScreen()), dspriv->image, 0, 0, 0, 0, dspriv->image->width, dspriv->image->height ); } HRESULT WINAPI Xlib_IDirectDrawSurface4Impl_Unlock( LPDIRECTDRAWSURFACE4 iface,LPVOID surface ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); DDPRIVATE(This->s.ddraw); DSPRIVATE(This); TRACE("(%p)->Unlock(%p)\n",This,surface); /*if (!This->s.ddraw->d.paintable) return DD_OK; */ /* Only redraw the screen when unlocking the buffer that is on screen */ if (dspriv->image && VISIBLE(This)) { Xlib_copy_surface_on_screen(This); if (This->s.palette) { DPPRIVATE(This->s.palette); if(dppriv->cm) TSXSetWindowColormap(display,ddpriv->drawable,dppriv->cm); } } /* DO NOT Release the surface! Lock/Unlock are NOT guaranteed to come in * matched pairs! - Marcus Meissner 20000509 */ return DD_OK; } HRESULT WINAPI Xlib_IDirectDrawSurface4Impl_Flip( LPDIRECTDRAWSURFACE4 iface,LPDIRECTDRAWSURFACE4 flipto,DWORD dwFlags ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); XImage *image; DDPRIVATE(This->s.ddraw); DSPRIVATE(This); x11_ds_private *fspriv; LPBYTE surf; IDirectDrawSurface4Impl* iflipto=(IDirectDrawSurface4Impl*)flipto; TRACE("(%p)->Flip(%p,%08lx)\n",This,iflipto,dwFlags); if (!This->s.ddraw->d.paintable) return DD_OK; iflipto = _common_find_flipto(This,iflipto); fspriv = (x11_ds_private*)iflipto->private; /* We need to switch the lowlevel surfaces, for xlib this is: */ /* The surface pointer */ surf = This->s.surface_desc.u1.lpSurface; This->s.surface_desc.u1.lpSurface = iflipto->s.surface_desc.u1.lpSurface; iflipto->s.surface_desc.u1.lpSurface = surf; /* the associated ximage */ image = dspriv->image; dspriv->image = fspriv->image; fspriv->image = image; #ifdef HAVE_LIBXXSHM if (ddpriv->xshm_active) { /* int compl = InterlockedExchange( &(ddpriv->xshm_compl), 0 ); if (compl) X11DRV_EVENT_WaitShmCompletion( compl ); */ X11DRV_EVENT_WaitShmCompletions( ddpriv->drawable ); } #endif Xlib_copy_surface_on_screen(This); if (iflipto->s.palette) { DPPRIVATE(iflipto->s.palette); if (dppriv->cm) TSXSetWindowColormap(display,ddpriv->drawable,dppriv->cm); } return DD_OK; } /* The IDirectDrawSurface4::SetPalette method attaches the specified * DirectDrawPalette object to a surface. The surface uses this palette for all * subsequent operations. The palette change takes place immediately. */ HRESULT WINAPI Xlib_IDirectDrawSurface4Impl_SetPalette( LPDIRECTDRAWSURFACE4 iface,LPDIRECTDRAWPALETTE pal ) { ICOM_THIS(IDirectDrawSurface4Impl,iface); DDPRIVATE(This->s.ddraw); IDirectDrawPaletteImpl* ipal=(IDirectDrawPaletteImpl*)pal; x11_dp_private *dppriv; int i; TRACE("(%p)->(%p)\n",This,ipal); if (ipal == NULL) { if( This->s.palette != NULL ) IDirectDrawPalette_Release((IDirectDrawPalette*)This->s.palette); This->s.palette = ipal; return DD_OK; } dppriv = (x11_dp_private*)ipal->private; if (!dppriv->cm && (This->s.ddraw->d.screen_pixelformat.u.dwRGBBitCount<=8) ) { dppriv->cm = TSXCreateColormap( display, ddpriv->drawable, DefaultVisualOfScreen(X11DRV_GetXScreen()), AllocAll ); if (!Options.managed) TSXInstallColormap(display,dppriv->cm); for (i=0;i<256;i++) { XColor xc; xc.red = ipal->palents[i].peRed<<8; xc.blue = ipal->palents[i].peBlue<<8; xc.green = ipal->palents[i].peGreen<<8; xc.flags = DoRed|DoBlue|DoGreen; xc.pixel = i; TSXStoreColor(display,dppriv->cm,&xc); } TSXInstallColormap(display,dppriv->cm); } /* According to spec, we are only supposed to * AddRef if this is not the same palette. */ if ( This->s.palette != ipal ) { if( ipal != NULL ) IDirectDrawPalette_AddRef( (IDirectDrawPalette*)ipal ); if( This->s.palette != NULL ) IDirectDrawPalette_Release( (IDirectDrawPalette*)This->s.palette ); This->s.palette = ipal; /* Perform the refresh */ TSXSetWindowColormap(display,ddpriv->drawable,dppriv->cm); if (This->s.hdc != 0) { /* hack: set the DIBsection color map */ BITMAPOBJ *bmp = (BITMAPOBJ *) GDI_GetObjPtr(This->s.DIBsection, BITMAP_MAGIC); X11DRV_DIBSECTION *dib = (X11DRV_DIBSECTION *)bmp->dib; dib->colorMap = This->s.palette ? This->s.palette->screen_palents : NULL; GDI_HEAP_UNLOCK(This->s.DIBsection); } } return DD_OK; } ULONG WINAPI Xlib_IDirectDrawSurface4Impl_Release(LPDIRECTDRAWSURFACE4 iface) { ICOM_THIS(IDirectDrawSurface4Impl,iface); DSPRIVATE(This); DDPRIVATE(This->s.ddraw); TRACE( "(%p)->() decrementing from %lu.\n", This, This->ref ); if (--(This->ref)) return This->ref; IDirectDraw2_Release((IDirectDraw2*)This->s.ddraw); if (dspriv->image != NULL) { if (This->s.ddraw->d.pixel_convert != NULL) { /* In pixel conversion mode, there are 2 buffers to release. */ VirtualFree(This->s.surface_desc.u1.lpSurface, 0, MEM_RELEASE); #ifdef HAVE_LIBXXSHM if (ddpriv->xshm_active) { TSXShmDetach(display, &(dspriv->shminfo)); TSXDestroyImage(dspriv->image); shmdt(dspriv->shminfo.shmaddr); } else #endif { HeapFree(GetProcessHeap(),0,dspriv->image->data); dspriv->image->data = NULL; TSXDestroyImage(dspriv->image); } } else { dspriv->image->data = NULL; #ifdef HAVE_LIBXXSHM if (ddpriv->xshm_active) { VirtualFree(dspriv->image->data, 0, MEM_RELEASE); TSXShmDetach(display, &(dspriv->shminfo)); TSXDestroyImage(dspriv->image); shmdt(dspriv->shminfo.shmaddr); } else #endif { VirtualFree(This->s.surface_desc.u1.lpSurface, 0, MEM_RELEASE); TSXDestroyImage(dspriv->image); } } dspriv->image = 0; } else VirtualFree(This->s.surface_desc.u1.lpSurface, 0, MEM_RELEASE); if (This->s.palette) IDirectDrawPalette_Release((IDirectDrawPalette*)This->s.palette); /* Free the DIBSection (if any) */ if (This->s.hdc != 0) { /* hack: restore the original DIBsection color map */ BITMAPOBJ *bmp = (BITMAPOBJ *) GDI_GetObjPtr(This->s.DIBsection, BITMAP_MAGIC); X11DRV_DIBSECTION *dib = (X11DRV_DIBSECTION *)bmp->dib; dib->colorMap = dspriv->oldDIBmap; GDI_HEAP_UNLOCK(This->s.DIBsection); SelectObject(This->s.hdc, This->s.holdbitmap); DeleteDC(This->s.hdc); DeleteObject(This->s.DIBsection); } /* Free the clipper if present */ if(This->s.lpClipper) IDirectDrawClipper_Release(This->s.lpClipper); HeapFree(GetProcessHeap(),0,This->private); HeapFree(GetProcessHeap(),0,This); return S_OK; } HRESULT WINAPI Xlib_IDirectDrawSurface4Impl_GetDC(LPDIRECTDRAWSURFACE4 iface,HDC* lphdc) { ICOM_THIS(IDirectDrawSurface4Impl,iface); DSPRIVATE(This); int was_ok = This->s.hdc != 0; HRESULT result = IDirectDrawSurface4Impl_GetDC(iface,lphdc); if (This->s.hdc && !was_ok) { /* hack: take over the DIBsection color map */ BITMAPOBJ *bmp = (BITMAPOBJ *) GDI_GetObjPtr(This->s.DIBsection, BITMAP_MAGIC); X11DRV_DIBSECTION *dib = (X11DRV_DIBSECTION *)bmp->dib; dspriv->oldDIBmap = dib->colorMap; dib->colorMap = This->s.palette ? This->s.palette->screen_palents : NULL; GDI_HEAP_UNLOCK(This->s.DIBsection); } return result; } ICOM_VTABLE(IDirectDrawSurface4) xlib_dds4vt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE Xlib_IDirectDrawSurface4Impl_QueryInterface, IDirectDrawSurface4Impl_AddRef, Xlib_IDirectDrawSurface4Impl_Release, IDirectDrawSurface4Impl_AddAttachedSurface, IDirectDrawSurface4Impl_AddOverlayDirtyRect, IDirectDrawSurface4Impl_Blt, IDirectDrawSurface4Impl_BltBatch, IDirectDrawSurface4Impl_BltFast, IDirectDrawSurface4Impl_DeleteAttachedSurface, IDirectDrawSurface4Impl_EnumAttachedSurfaces, IDirectDrawSurface4Impl_EnumOverlayZOrders, Xlib_IDirectDrawSurface4Impl_Flip, IDirectDrawSurface4Impl_GetAttachedSurface, IDirectDrawSurface4Impl_GetBltStatus, IDirectDrawSurface4Impl_GetCaps, IDirectDrawSurface4Impl_GetClipper, IDirectDrawSurface4Impl_GetColorKey, Xlib_IDirectDrawSurface4Impl_GetDC, IDirectDrawSurface4Impl_GetFlipStatus, IDirectDrawSurface4Impl_GetOverlayPosition, IDirectDrawSurface4Impl_GetPalette, IDirectDrawSurface4Impl_GetPixelFormat, IDirectDrawSurface4Impl_GetSurfaceDesc, IDirectDrawSurface4Impl_Initialize, IDirectDrawSurface4Impl_IsLost, Xlib_IDirectDrawSurface4Impl_Lock, IDirectDrawSurface4Impl_ReleaseDC, IDirectDrawSurface4Impl_Restore, IDirectDrawSurface4Impl_SetClipper, IDirectDrawSurface4Impl_SetColorKey, IDirectDrawSurface4Impl_SetOverlayPosition, Xlib_IDirectDrawSurface4Impl_SetPalette, Xlib_IDirectDrawSurface4Impl_Unlock, IDirectDrawSurface4Impl_UpdateOverlay, IDirectDrawSurface4Impl_UpdateOverlayDisplay, IDirectDrawSurface4Impl_UpdateOverlayZOrder, IDirectDrawSurface4Impl_GetDDInterface, IDirectDrawSurface4Impl_PageLock, IDirectDrawSurface4Impl_PageUnlock, IDirectDrawSurface4Impl_SetSurfaceDesc, IDirectDrawSurface4Impl_SetPrivateData, IDirectDrawSurface4Impl_GetPrivateData, IDirectDrawSurface4Impl_FreePrivateData, IDirectDrawSurface4Impl_GetUniquenessValue, IDirectDrawSurface4Impl_ChangeUniquenessValue }; wine-20000526/dlls/dinput/0040755000175000001440000000000007113604173014710 5ustar julliarduserswine-20000526/dlls/dinput/.cvsignore0100644000175000001440000000005007064462042016702 0ustar julliardusersMakefile dinput.spec.c libdinput.so.1.0 wine-20000526/dlls/dinput/Makefile.in0100644000175000001440000000032207064462042016751 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = dinput SOVERSION = 1.0 SPEC_SRCS = dinput.spec C_SRCS = \ dinput_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/dinput/dinput.spec0100644000175000001440000000053407101106212017052 0ustar julliardusersname dinput type win32 @ stdcall DirectInputCreateA(long long ptr ptr) DirectInputCreateA @ stub DirectInputCreateW @ stdcall DllCanUnloadNow() DINPUT_DllCanUnloadNow @ stdcall DllGetClassObject(ptr ptr ptr) DINPUT_DllGetClassObject @ stdcall DllRegisterServer() DINPUT_DllRegisterServer @ stdcall DllUnregisterServer() DINPUT_DllUnregisterServer wine-20000526/dlls/dinput/dinput_main.c0100644000175000001440000020315207102366753017372 0ustar julliardusers/* DirectInput * * Copyright 1998 Marcus Meissner * Copyright 1998,1999 Lionel Ulmer * */ /* Status: * * - Tomb Raider 2 Demo: * Playable using keyboard only. * - WingCommander Prophecy Demo: * Doesn't get Input Focus. * * - Fallout : works great in X and DGA mode * * FIXME: The keyboard handling needs to (and will) be merged into keyboard.c * (The current implementation is currently only a proof of concept and * an utter mess.) */ #include "config.h" #include #include #include #include #include #ifdef HAVE_SYS_SIGNAL_H # include #endif #include #include #include #include #ifdef HAVE_SYS_ERRNO_H # include #endif #ifdef HAVE_LINUX_JOYSTICK_H # include # define JOYDEV "/dev/js0" #endif #include "wine/obj_base.h" #include "debugtools.h" #include "dinput.h" #include "display.h" #include "input.h" #include "user.h" #include "message.h" #include "mouse.h" #include "sysmetrics.h" #include "winbase.h" #include "winerror.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" DEFAULT_DEBUG_CHANNEL(dinput); /* Wine mouse driver object instances */ #define WINE_MOUSE_X_AXIS_INSTANCE 0x0001 #define WINE_MOUSE_Y_AXIS_INSTANCE 0x0002 #define WINE_MOUSE_L_BUTTON_INSTANCE 0x0004 #define WINE_MOUSE_R_BUTTON_INSTANCE 0x0008 #define WINE_MOUSE_M_BUTTON_INSTANCE 0x0010 /* Wine joystick driver object instances */ #define WINE_JOYSTICK_AXIS_BASE 0 #define WINE_JOYSTICK_BUTTON_BASE 8 extern BYTE InputKeyStateTable[256]; extern int min_keycode, max_keycode; extern WORD keyc2vkey[256]; /* Routines to do DataFormat / WineFormat conversions */ typedef struct { int size; int offset_in; int offset_out; int value; } DataTransform; typedef struct { int size; int internal_format_size; DataTransform *dt; } DataFormat; /* ------------------------------- */ /* Wine mouse internal data format */ /* ------------------------------- */ /* Constants used to access the offset array */ #define WINE_MOUSE_X_POSITION 0 #define WINE_MOUSE_Y_POSITION 1 #define WINE_MOUSE_L_POSITION 2 #define WINE_MOUSE_R_POSITION 3 #define WINE_MOUSE_M_POSITION 4 typedef struct { LONG lX; LONG lY; BYTE rgbButtons[4]; } Wine_InternalMouseData; #define WINE_INTERNALMOUSE_NUM_OBJS 5 static DIOBJECTDATAFORMAT Wine_InternalMouseObjectFormat[WINE_INTERNALMOUSE_NUM_OBJS] = { { &GUID_XAxis, FIELD_OFFSET(Wine_InternalMouseData, lX), DIDFT_MAKEINSTANCE(WINE_MOUSE_X_AXIS_INSTANCE) | DIDFT_RELAXIS, 0 }, { &GUID_YAxis, FIELD_OFFSET(Wine_InternalMouseData, lY), DIDFT_MAKEINSTANCE(WINE_MOUSE_Y_AXIS_INSTANCE) | DIDFT_RELAXIS, 0 }, { &GUID_Button, (FIELD_OFFSET(Wine_InternalMouseData, rgbButtons)) + 0, DIDFT_MAKEINSTANCE(WINE_MOUSE_L_BUTTON_INSTANCE) | DIDFT_PSHBUTTON, 0 }, { &GUID_Button, (FIELD_OFFSET(Wine_InternalMouseData, rgbButtons)) + 1, DIDFT_MAKEINSTANCE(WINE_MOUSE_R_BUTTON_INSTANCE) | DIDFT_PSHBUTTON, 0 }, { &GUID_Button, (FIELD_OFFSET(Wine_InternalMouseData, rgbButtons)) + 2, DIDFT_MAKEINSTANCE(WINE_MOUSE_M_BUTTON_INSTANCE) | DIDFT_PSHBUTTON, 0 } }; static DIDATAFORMAT Wine_InternalMouseFormat = { 0, /* dwSize - unused */ 0, /* dwObjsize - unused */ 0, /* dwFlags - unused */ sizeof(Wine_InternalMouseData), WINE_INTERNALMOUSE_NUM_OBJS, /* dwNumObjs */ Wine_InternalMouseObjectFormat }; static ICOM_VTABLE(IDirectInputA) ddiavt; static ICOM_VTABLE(IDirectInputDevice2A) SysKeyboardAvt; static ICOM_VTABLE(IDirectInputDevice2A) SysMouseAvt; typedef struct IDirectInputAImpl IDirectInputAImpl; typedef struct IDirectInputDevice2AImpl IDirectInputDevice2AImpl; typedef struct SysKeyboardAImpl SysKeyboardAImpl; typedef struct SysMouseAImpl SysMouseAImpl; struct IDirectInputDevice2AImpl { ICOM_VFIELD(IDirectInputDevice2A); DWORD ref; GUID guid; }; struct SysKeyboardAImpl { /* IDirectInputDevice2AImpl */ ICOM_VFIELD(IDirectInputDevice2A); DWORD ref; GUID guid; /* SysKeyboardAImpl */ BYTE keystate[256]; KEYBOARD_CONFIG initial_config; int acquired; }; #ifdef HAVE_LINUX_22_JOYSTICK_API typedef struct JoystickAImpl JoystickAImpl; static ICOM_VTABLE(IDirectInputDevice2A) JoystickAvt; struct JoystickAImpl { /* IDirectInputDevice2AImpl */ ICOM_VFIELD(IDirectInputDevice2A); DWORD ref; GUID guid; /* joystick private */ int joyfd; LPDIDATAFORMAT df; HANDLE hEvent; LONG lMin,lMax,deadzone; LPDIDEVICEOBJECTDATA data_queue; int queue_pos, queue_len; DIJOYSTATE js; }; #endif typedef enum { WARP_NEEDED, /* Warping is needed */ WARP_STARTED, /* Warping has been done, waiting for the warp event */ WARP_DONE /* Warping has been done */ } WARP_STATUS; struct SysMouseAImpl { /* IDirectInputDevice2AImpl */ ICOM_VFIELD(IDirectInputDevice2A); DWORD ref; GUID guid; /* The current data format and the conversion between internal and external data formats */ LPDIDATAFORMAT df; DataFormat *wine_df; int offset_array[5]; /* SysMouseAImpl */ BYTE absolute; /* Previous position for relative moves */ LONG prevX, prevY; LPMOUSE_EVENT_PROC prev_handler; HWND win; DWORD win_centerX, win_centerY; LPDIDEVICEOBJECTDATA data_queue; int queue_pos, queue_len; WARP_STATUS need_warp; int acquired; HANDLE hEvent; CRITICAL_SECTION crit; /* This is for mouse reporting. */ Wine_InternalMouseData m_state; }; static int evsequence=0; /* UIDs for Wine "drivers". When enumerating each device supporting DInput, they have two UIDs : - the 'windows' UID - a vendor UID */ #ifdef HAVE_LINUX_22_JOYSTICK_API static GUID DInput_Wine_Joystick_GUID = { /* 9e573ed9-7734-11d2-8d4a-23903fb6bdf7 */ 0x9e573ed9, 0x7734, 0x11d2, {0x8d, 0x4a, 0x23, 0x90, 0x3f, 0xb6, 0xbd, 0xf7} }; #endif static GUID DInput_Wine_Mouse_GUID = { /* 9e573ed8-7734-11d2-8d4a-23903fb6bdf7 */ 0x9e573ed8, 0x7734, 0x11d2, {0x8d, 0x4a, 0x23, 0x90, 0x3f, 0xb6, 0xbd, 0xf7} }; static GUID DInput_Wine_Keyboard_GUID = { /* 0ab8648a-7735-11d2-8c73-71df54a96441 */ 0x0ab8648a, 0x7735, 0x11d2, {0x8c, 0x73, 0x71, 0xdf, 0x54, 0xa9, 0x64, 0x41} }; /* FIXME: This is ugly and not thread safe :/ */ static IDirectInputDevice2A* current_lock = NULL; /****************************************************************************** * Various debugging tools */ static void _dump_cooperativelevel(DWORD dwFlags) { int i; const struct { DWORD mask; char *name; } flags[] = { #define FE(x) { x, #x}, FE(DISCL_BACKGROUND) FE(DISCL_EXCLUSIVE) FE(DISCL_FOREGROUND) FE(DISCL_NONEXCLUSIVE) #undef FE }; for (i=0;i> 8); } static void _dump_DIPROPHEADER(DIPROPHEADER *diph) { DPRINTF(" - dwObj = 0x%08lx\n", diph->dwObj); DPRINTF(" - dwHow = %s\n", ((diph->dwHow == DIPH_DEVICE) ? "DIPH_DEVICE" : ((diph->dwHow == DIPH_BYOFFSET) ? "DIPH_BYOFFSET" : ((diph->dwHow == DIPH_BYID)) ? "DIPH_BYID" : "unknown"))); } static void _dump_OBJECTINSTANCEA(DIDEVICEOBJECTINSTANCEA *ddoi) { if (TRACE_ON(dinput)) { DPRINTF(" - enumerating : 0x%08lx - %2ld - 0x%08lx - %s\n", ddoi->guidType.Data1, ddoi->dwOfs, ddoi->dwType, ddoi->tszName); } } struct IDirectInputAImpl { ICOM_VFIELD(IDirectInputA); DWORD ref; }; /* Conversion between internal data buffer and external data buffer */ static void fill_DataFormat(void *out, void *in, DataFormat *df) { int i; char *in_c = (char *) in; char *out_c = (char *) out; if (df->dt == NULL) { /* This means that the app uses Wine's internal data format */ memcpy(out, in, df->internal_format_size); } else { for (i = 0; i < df->size; i++) { if (df->dt[i].offset_in >= 0) { switch (df->dt[i].size) { case 1: TRACE("Copying (c) to %d from %d (value %d)\n", df->dt[i].offset_out, df->dt[i].offset_in, *((char *) (in_c + df->dt[i].offset_in))); *((char *) (out_c + df->dt[i].offset_out)) = *((char *) (in_c + df->dt[i].offset_in)); break; case 2: TRACE("Copying (s) to %d from %d (value %d)\n", df->dt[i].offset_out, df->dt[i].offset_in, *((short *) (in_c + df->dt[i].offset_in))); *((short *) (out_c + df->dt[i].offset_out)) = *((short *) (in_c + df->dt[i].offset_in)); break; case 4: TRACE("Copying (i) to %d from %d (value %d)\n", df->dt[i].offset_out, df->dt[i].offset_in, *((int *) (in_c + df->dt[i].offset_in))); *((int *) (out_c + df->dt[i].offset_out)) = *((int *) (in_c + df->dt[i].offset_in)); break; default: memcpy((out_c + df->dt[i].offset_out), (in_c + df->dt[i].offset_in), df->dt[i].size); } } else { switch (df->dt[i].size) { case 1: TRACE("Copying (c) to %d default value %d\n", df->dt[i].offset_out, df->dt[i].value); *((char *) (out_c + df->dt[i].offset_out)) = (char) df->dt[i].value; break; case 2: TRACE("Copying (s) to %d default value %d\n", df->dt[i].offset_out, df->dt[i].value); *((short *) (out_c + df->dt[i].offset_out)) = (short) df->dt[i].value; break; case 4: TRACE("Copying (i) to %d default value %d\n", df->dt[i].offset_out, df->dt[i].value); *((int *) (out_c + df->dt[i].offset_out)) = (int) df->dt[i].value; break; default: memset((out_c + df->dt[i].offset_out), df->dt[i].size, 0); } } } } } static DataFormat *create_DataFormat(DIDATAFORMAT *wine_format, DIDATAFORMAT *asked_format, int *offset) { DataFormat *ret; DataTransform *dt; int i, j; int same = 1; int *done; int index = 0; ret = (DataFormat *) HeapAlloc(GetProcessHeap(), 0, sizeof(DataFormat)); done = (int *) HeapAlloc(GetProcessHeap(), 0, sizeof(int) * asked_format->dwNumObjs); memset(done, 0, sizeof(int) * asked_format->dwNumObjs); dt = (DataTransform *) HeapAlloc(GetProcessHeap(), 0, asked_format->dwNumObjs * sizeof(DataTransform)); TRACE("Creating DataTransorm : \n"); for (i = 0; i < wine_format->dwNumObjs; i++) { offset[i] = -1; for (j = 0; j < asked_format->dwNumObjs; j++) { if (done[j] == 1) continue; if (((asked_format->rgodf[j].pguid == NULL) || (IsEqualGUID(wine_format->rgodf[i].pguid, asked_format->rgodf[j].pguid))) && (wine_format->rgodf[i].dwType & asked_format->rgodf[j].dwType)) { done[j] = 1; TRACE("Matching : \n"); TRACE(" - Asked (%d) : %s - Ofs = %3ld - (Type = 0x%02x | Instance = %04x)\n", j, debugstr_guid(asked_format->rgodf[j].pguid), asked_format->rgodf[j].dwOfs, DIDFT_GETTYPE(asked_format->rgodf[j].dwType), DIDFT_GETINSTANCE(asked_format->rgodf[j].dwType)); TRACE(" - Wine (%d) : %s - Ofs = %3ld - (Type = 0x%02x | Instance = %04x)\n", j, debugstr_guid(wine_format->rgodf[i].pguid), wine_format->rgodf[i].dwOfs, DIDFT_GETTYPE(wine_format->rgodf[i].dwType), DIDFT_GETINSTANCE(wine_format->rgodf[i].dwType)); if (wine_format->rgodf[i].dwType & DIDFT_BUTTON) dt[index].size = sizeof(BYTE); else dt[index].size = sizeof(DWORD); dt[index].offset_in = wine_format ->rgodf[i].dwOfs; dt[index].offset_out = asked_format->rgodf[j].dwOfs; dt[index].value = 0; index++; if (wine_format->rgodf[i].dwOfs != asked_format->rgodf[j].dwOfs) same = 0; offset[i] = asked_format->rgodf[j].dwOfs; break; } } if (j == asked_format->dwNumObjs) same = 0; } TRACE("Setting to default value :\n"); for (j = 0; j < asked_format->dwNumObjs; j++) { if (done[j] == 0) { TRACE(" - Asked (%d) : %s - Ofs = %3ld - (Type = 0x%02x | Instance = %04x)\n", j, debugstr_guid(asked_format->rgodf[j].pguid), asked_format->rgodf[j].dwOfs, DIDFT_GETTYPE(asked_format->rgodf[j].dwType), DIDFT_GETINSTANCE(asked_format->rgodf[j].dwType)); if (asked_format->rgodf[j].dwType & DIDFT_BUTTON) dt[index].size = sizeof(BYTE); else dt[index].size = sizeof(DWORD); dt[index].offset_in = -1; dt[index].offset_out = asked_format->rgodf[j].dwOfs; dt[index].value = 0; index++; same = 0; } } ret->internal_format_size = wine_format->dwDataSize; ret->size = index; if (same) { ret->dt = NULL; HeapFree(GetProcessHeap(), 0, dt); } else { ret->dt = dt; } HeapFree(GetProcessHeap(), 0, done); return ret; } /****************************************************************************** * DirectInputCreateA */ HRESULT WINAPI DirectInputCreateA(HINSTANCE hinst, DWORD dwVersion, LPDIRECTINPUTA *ppDI, LPUNKNOWN punkOuter) { IDirectInputAImpl* This; TRACE("(0x%08lx,%04lx,%p,%p)\n", (DWORD)hinst,dwVersion,ppDI,punkOuter ); This = (IDirectInputAImpl*)HeapAlloc(GetProcessHeap(),0,sizeof(IDirectInputAImpl)); This->ref = 1; ICOM_VTBL(This) = &ddiavt; *ppDI=(IDirectInputA*)This; return 0; } /****************************************************************************** * IDirectInputA_EnumDevices */ static HRESULT WINAPI IDirectInputAImpl_EnumDevices( LPDIRECTINPUTA iface, DWORD dwDevType, LPDIENUMDEVICESCALLBACKA lpCallback, LPVOID pvRef, DWORD dwFlags ) { ICOM_THIS(IDirectInputAImpl,iface); DIDEVICEINSTANCEA devInstance; int ret; TRACE("(this=%p,0x%04lx,%p,%p,%04lx)\n", This, dwDevType, lpCallback, pvRef, dwFlags); devInstance.dwSize = sizeof(DIDEVICEINSTANCEA); if ((dwDevType == 0) || (dwDevType == DIDEVTYPE_KEYBOARD)) { /* Return keyboard */ devInstance.guidInstance = GUID_SysKeyboard;/* DInput's GUID */ devInstance.guidProduct = DInput_Wine_Keyboard_GUID; /* Vendor's GUID */ devInstance.dwDevType = DIDEVTYPE_KEYBOARD | (DIDEVTYPEKEYBOARD_UNKNOWN << 8); strcpy(devInstance.tszInstanceName, "Keyboard"); strcpy(devInstance.tszProductName, "Wine Keyboard"); ret = lpCallback(&devInstance, pvRef); TRACE("Keyboard registered\n"); if (ret == DIENUM_STOP) return 0; } if ((dwDevType == 0) || (dwDevType == DIDEVTYPE_MOUSE)) { /* Return mouse */ devInstance.guidInstance = GUID_SysMouse;/* DInput's GUID */ devInstance.guidProduct = DInput_Wine_Mouse_GUID; /* Vendor's GUID */ devInstance.dwDevType = DIDEVTYPE_MOUSE | (DIDEVTYPEMOUSE_UNKNOWN << 8); strcpy(devInstance.tszInstanceName, "Mouse"); strcpy(devInstance.tszProductName, "Wine Mouse"); ret = lpCallback(&devInstance, pvRef); TRACE("Mouse registered\n"); if (ret == DIENUM_STOP) return 0; } if ((dwDevType == 0) || (dwDevType == DIDEVTYPE_JOYSTICK)) { /* check whether we have a joystick */ #ifdef HAVE_LINUX_22_JOYSTICK_API if ( (access(JOYDEV,O_RDONLY)!=-1) || (errno!=ENODEV && errno!=ENOENT) ) { /* Return joystick */ devInstance.guidInstance = GUID_Joystick; devInstance.guidProduct = DInput_Wine_Joystick_GUID; /* we only support traditional joysticks for now */ devInstance.dwDevType = DIDEVTYPE_JOYSTICK | DIDEVTYPEJOYSTICK_TRADITIONAL; strcpy(devInstance.tszInstanceName, "Joystick"); /* ioctl JSIOCGNAME(len) */ strcpy(devInstance.tszProductName, "Wine Joystick"); ret = lpCallback(&devInstance,pvRef); TRACE("Joystick registered\n"); if (ret == DIENUM_STOP) return 0; } #endif } return 0; } static ULONG WINAPI IDirectInputAImpl_AddRef(LPDIRECTINPUTA iface) { ICOM_THIS(IDirectInputAImpl,iface); return ++(This->ref); } static ULONG WINAPI IDirectInputAImpl_Release(LPDIRECTINPUTA iface) { ICOM_THIS(IDirectInputAImpl,iface); if (!(--This->ref)) { HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } static HRESULT WINAPI IDirectInputAImpl_CreateDevice( LPDIRECTINPUTA iface,REFGUID rguid,LPDIRECTINPUTDEVICEA* pdev, LPUNKNOWN punk ) { ICOM_THIS(IDirectInputAImpl,iface); TRACE("(this=%p,%s,%p,%p)\n",This,debugstr_guid(rguid),pdev,punk); if ((IsEqualGUID(&GUID_SysKeyboard,rguid)) || /* Generic Keyboard */ (IsEqualGUID(&DInput_Wine_Keyboard_GUID,rguid))) { /* Wine Keyboard */ SysKeyboardAImpl* newDevice; newDevice = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(SysKeyboardAImpl)); newDevice->ref = 1; ICOM_VTBL(newDevice) = &SysKeyboardAvt; memcpy(&(newDevice->guid),rguid,sizeof(*rguid)); memset(newDevice->keystate,0,256); *pdev=(IDirectInputDeviceA*)newDevice; TRACE("Creating a Keyboard device (%p)\n", newDevice); return DI_OK; } if ((IsEqualGUID(&GUID_SysMouse,rguid)) || /* Generic Mouse */ (IsEqualGUID(&DInput_Wine_Mouse_GUID,rguid))) { /* Wine Mouse */ SysMouseAImpl* newDevice; int offset_array[5] = { FIELD_OFFSET(Wine_InternalMouseData, lX), FIELD_OFFSET(Wine_InternalMouseData, lY), FIELD_OFFSET(Wine_InternalMouseData, rgbButtons) + 0, FIELD_OFFSET(Wine_InternalMouseData, rgbButtons) + 1, FIELD_OFFSET(Wine_InternalMouseData, rgbButtons) + 2 }; newDevice = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(SysMouseAImpl)); newDevice->ref = 1; ICOM_VTBL(newDevice) = &SysMouseAvt; InitializeCriticalSection(&(newDevice->crit)); MakeCriticalSectionGlobal(&(newDevice->crit)); memcpy(&(newDevice->guid),rguid,sizeof(*rguid)); *pdev=(IDirectInputDeviceA*)newDevice; /* Per default, Wine uses its internal data format */ newDevice->df = &Wine_InternalMouseFormat; memcpy(newDevice->offset_array, offset_array, 5 * sizeof(int)); newDevice->wine_df = (DataFormat *) HeapAlloc(GetProcessHeap(), 0, sizeof(DataFormat)); newDevice->wine_df->size = 0; newDevice->wine_df->internal_format_size = Wine_InternalMouseFormat.dwDataSize; newDevice->wine_df->dt = NULL; TRACE("Creating a Mouse device (%p)\n", newDevice); return DI_OK; } #ifdef HAVE_LINUX_22_JOYSTICK_API if ((IsEqualGUID(&GUID_Joystick,rguid)) || (IsEqualGUID(&DInput_Wine_Joystick_GUID,rguid))) { JoystickAImpl* newDevice; newDevice = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(JoystickAImpl)); newDevice->ref = 1; ICOM_VTBL(newDevice) = &JoystickAvt; newDevice->joyfd = -1; newDevice->lMin = -32768; newDevice->lMax = +32767; memcpy(&(newDevice->guid),rguid,sizeof(*rguid)); *pdev=(IDirectInputDeviceA*)newDevice; TRACE("Creating a Joystick device (%p)\n", newDevice); return DI_OK; } #endif return E_FAIL; } static HRESULT WINAPI IDirectInputAImpl_QueryInterface( LPDIRECTINPUTA iface,REFIID riid,LPVOID *ppobj ) { ICOM_THIS(IDirectInputAImpl,iface); TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(riid),ppobj); if (IsEqualGUID(&IID_IUnknown,riid)) { IDirectInputA_AddRef(iface); *ppobj = This; return 0; } if (IsEqualGUID(&IID_IDirectInputA,riid)) { IDirectInputA_AddRef(iface); *ppobj = This; return 0; } TRACE("Unsupported interface !\n"); return E_FAIL; } static HRESULT WINAPI IDirectInputAImpl_Initialize( LPDIRECTINPUTA iface,HINSTANCE hinst,DWORD x ) { return DIERR_ALREADYINITIALIZED; } static HRESULT WINAPI IDirectInputAImpl_GetDeviceStatus(LPDIRECTINPUTA iface, REFGUID rguid) { ICOM_THIS(IDirectInputAImpl,iface); FIXME("(%p)->(%s): stub\n",This,debugstr_guid(rguid)); return DI_OK; } static HRESULT WINAPI IDirectInputAImpl_RunControlPanel(LPDIRECTINPUTA iface, HWND hwndOwner, DWORD dwFlags) { ICOM_THIS(IDirectInputAImpl,iface); FIXME("(%p)->(%08lx,%08lx): stub\n",This, (DWORD) hwndOwner, dwFlags); return DI_OK; } static ICOM_VTABLE(IDirectInputA) ddiavt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectInputAImpl_QueryInterface, IDirectInputAImpl_AddRef, IDirectInputAImpl_Release, IDirectInputAImpl_CreateDevice, IDirectInputAImpl_EnumDevices, IDirectInputAImpl_GetDeviceStatus, IDirectInputAImpl_RunControlPanel, IDirectInputAImpl_Initialize }; /****************************************************************************** * IDirectInputDeviceA */ static HRESULT WINAPI IDirectInputDevice2AImpl_SetDataFormat( LPDIRECTINPUTDEVICE2A iface,LPCDIDATAFORMAT df ) { /* int i; TRACE(dinput,"(this=%p,%p)\n",This,df); TRACE(dinput,"df.dwSize=%ld\n",df->dwSize); TRACE(dinput,"(df.dwObjsize=%ld)\n",df->dwObjSize); TRACE(dinput,"(df.dwFlags=0x%08lx)\n",df->dwFlags); TRACE(dinput,"(df.dwDataSize=%ld)\n",df->dwDataSize); TRACE(dinput,"(df.dwNumObjs=%ld)\n",df->dwNumObjs); for (i=0;idwNumObjs;i++) { TRACE(dinput,"df.rgodf[%d].guid %s\n",i,debugstr_guid(df->rgodf[i].pguid)); TRACE(dinput,"df.rgodf[%d].dwOfs %ld\n",i,df->rgodf[i].dwOfs); TRACE(dinput,"dwType 0x%02lx,dwInstance %ld\n",DIDFT_GETTYPE(df->rgodf[i].dwType),DIDFT_GETINSTANCE(df->rgodf[i].dwType)); TRACE(dinput,"df.rgodf[%d].dwFlags 0x%08lx\n",i,df->rgodf[i].dwFlags); } */ return 0; } static HRESULT WINAPI IDirectInputDevice2AImpl_SetCooperativeLevel( LPDIRECTINPUTDEVICE2A iface,HWND hwnd,DWORD dwflags ) { ICOM_THIS(IDirectInputDevice2AImpl,iface); TRACE("(this=%p,0x%08lx,0x%08lx)\n",This,(DWORD)hwnd,dwflags); if (TRACE_ON(dinput)) _dump_cooperativelevel(dwflags); return 0; } static HRESULT WINAPI IDirectInputDevice2AImpl_SetEventNotification( LPDIRECTINPUTDEVICE2A iface,HANDLE hnd ) { ICOM_THIS(IDirectInputDevice2AImpl,iface); FIXME("(this=%p,0x%08lx): stub\n",This,(DWORD)hnd); return 0; } static ULONG WINAPI IDirectInputDevice2AImpl_Release(LPDIRECTINPUTDEVICE2A iface) { ICOM_THIS(IDirectInputDevice2AImpl,iface); This->ref--; if (This->ref) return This->ref; HeapFree(GetProcessHeap(),0,This); return 0; } static HRESULT WINAPI SysKeyboardAImpl_SetProperty( LPDIRECTINPUTDEVICE2A iface,REFGUID rguid,LPCDIPROPHEADER ph ) { ICOM_THIS(SysKeyboardAImpl,iface); TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(rguid),ph); TRACE("(size=%ld,headersize=%ld,obj=%ld,how=%ld\n", ph->dwSize,ph->dwHeaderSize,ph->dwObj,ph->dwHow); if (!HIWORD(rguid)) { switch ((DWORD)rguid) { case (DWORD) DIPROP_BUFFERSIZE: { LPCDIPROPDWORD pd = (LPCDIPROPDWORD)ph; TRACE("(buffersize=%ld)\n",pd->dwData); break; } default: WARN("Unknown type %ld\n",(DWORD)rguid); break; } } return 0; } static HRESULT WINAPI SysKeyboardAImpl_GetDeviceState( LPDIRECTINPUTDEVICE2A iface,DWORD len,LPVOID ptr ) { return USER_Driver->pGetDIState(len, ptr)?DI_OK:E_FAIL; } static HRESULT WINAPI SysKeyboardAImpl_GetDeviceData( LPDIRECTINPUTDEVICE2A iface,DWORD dodsize,LPDIDEVICEOBJECTDATA dod, LPDWORD entries,DWORD flags ) { ICOM_THIS(SysKeyboardAImpl,iface); HRESULT ret; int i; TRACE("(this=%p,%ld,%p,%p(%ld)),0x%08lx)\n", This,dodsize,dod,entries,entries?*entries:0,flags); ret=USER_Driver->pGetDIData( This->keystate, dodsize, dod, entries, flags)?DI_OK:E_FAIL; for (i=0;i<*entries;i++) { dod[i].dwTimeStamp = GetTickCount(); dod[i].dwSequence = evsequence++; } return ret; } static HRESULT WINAPI SysKeyboardAImpl_Acquire(LPDIRECTINPUTDEVICE2A iface) { ICOM_THIS(SysKeyboardAImpl,iface); TRACE("(this=%p)\n",This); if (This->acquired == 0) { KEYBOARD_CONFIG no_auto; /* Save the original config */ USER_Driver->pGetKeyboardConfig(&(This->initial_config)); /* Now, remove auto-repeat */ no_auto.auto_repeat = FALSE; USER_Driver->pSetKeyboardConfig(&no_auto, WINE_KEYBOARD_CONFIG_AUTO_REPEAT); This->acquired = 1; } return DI_OK; } static HRESULT WINAPI SysKeyboardAImpl_Unacquire(LPDIRECTINPUTDEVICE2A iface) { ICOM_THIS(SysKeyboardAImpl,iface); TRACE("(this=%p)\n",This); if (This->acquired == 1) { /* Restore the original configuration */ USER_Driver->pSetKeyboardConfig(&(This->initial_config), 0xFFFFFFFF); This->acquired = 0; } else { ERR("Unacquiring a not-acquired device !!!\n"); } return DI_OK; } /****************************************************************************** * GetCapabilities : get the device capablitites */ static HRESULT WINAPI SysKeyboardAImpl_GetCapabilities( LPDIRECTINPUTDEVICE2A iface, LPDIDEVCAPS lpDIDevCaps) { ICOM_THIS(SysMouseAImpl,iface); TRACE("(this=%p,%p)\n",This,lpDIDevCaps); if (lpDIDevCaps->dwSize == sizeof(DIDEVCAPS)) { lpDIDevCaps->dwFlags = DIDC_ATTACHED; lpDIDevCaps->dwDevType = DIDEVTYPE_KEYBOARD; lpDIDevCaps->dwAxes = 0; lpDIDevCaps->dwButtons = 0; lpDIDevCaps->dwPOVs = 0; lpDIDevCaps->dwFFSamplePeriod = 0; lpDIDevCaps->dwFFMinTimeResolution = 0; lpDIDevCaps->dwFirmwareRevision = 100; lpDIDevCaps->dwHardwareRevision = 100; lpDIDevCaps->dwFFDriverVersion = 0; } else { /* DirectX 3.0 */ FIXME("DirectX 3.0 not supported....\n"); } return DI_OK; } static HRESULT WINAPI IDirectInputDevice2AImpl_QueryInterface( LPDIRECTINPUTDEVICE2A iface,REFIID riid,LPVOID *ppobj ) { ICOM_THIS(IDirectInputDevice2AImpl,iface); TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(riid),ppobj); if (IsEqualGUID(&IID_IUnknown,riid)) { IDirectInputDevice2_AddRef(iface); *ppobj = This; return 0; } if (IsEqualGUID(&IID_IDirectInputDeviceA,riid)) { IDirectInputDevice2_AddRef(iface); *ppobj = This; return 0; } if (IsEqualGUID(&IID_IDirectInputDevice2A,riid)) { IDirectInputDevice2_AddRef(iface); *ppobj = This; return 0; } TRACE("Unsupported interface !\n"); return E_FAIL; } static ULONG WINAPI IDirectInputDevice2AImpl_AddRef( LPDIRECTINPUTDEVICE2A iface) { ICOM_THIS(IDirectInputDevice2AImpl,iface); return ++This->ref; } static HRESULT WINAPI IDirectInputDevice2AImpl_EnumObjects( LPDIRECTINPUTDEVICE2A iface, LPDIENUMDEVICEOBJECTSCALLBACKA lpCallback, LPVOID lpvRef, DWORD dwFlags) { FIXME("(this=%p,%p,%p,%08lx): stub!\n", iface, lpCallback, lpvRef, dwFlags); if (TRACE_ON(dinput)) { DPRINTF(" - flags = "); _dump_EnumObjects_flags(dwFlags); DPRINTF("\n"); } return DI_OK; } static HRESULT WINAPI IDirectInputDevice2AImpl_GetProperty( LPDIRECTINPUTDEVICE2A iface, REFGUID rguid, LPDIPROPHEADER pdiph) { FIXME("(this=%p,%s,%p): stub!\n", iface, debugstr_guid(rguid), pdiph); if (TRACE_ON(dinput)) _dump_DIPROPHEADER(pdiph); return DI_OK; } static HRESULT WINAPI IDirectInputDevice2AImpl_GetObjectInfo( LPDIRECTINPUTDEVICE2A iface, LPDIDEVICEOBJECTINSTANCEA pdidoi, DWORD dwObj, DWORD dwHow) { FIXME("(this=%p,%p,%ld,0x%08lx): stub!\n", iface, pdidoi, dwObj, dwHow); return DI_OK; } static HRESULT WINAPI IDirectInputDevice2AImpl_GetDeviceInfo( LPDIRECTINPUTDEVICE2A iface, LPDIDEVICEINSTANCEA pdidi) { FIXME("(this=%p,%p): stub!\n", iface, pdidi); return DI_OK; } static HRESULT WINAPI IDirectInputDevice2AImpl_RunControlPanel( LPDIRECTINPUTDEVICE2A iface, HWND hwndOwner, DWORD dwFlags) { FIXME("(this=%p,0x%08x,0x%08lx): stub!\n", iface, hwndOwner, dwFlags); return DI_OK; } static HRESULT WINAPI IDirectInputDevice2AImpl_Initialize( LPDIRECTINPUTDEVICE2A iface, HINSTANCE hinst, DWORD dwVersion, REFGUID rguid) { FIXME("(this=%p,%d,%ld,%s): stub!\n", iface, hinst, dwVersion, debugstr_guid(rguid)); return DI_OK; } /****************************************************************************** * IDirectInputDevice2A */ static HRESULT WINAPI IDirectInputDevice2AImpl_CreateEffect( LPDIRECTINPUTDEVICE2A iface, REFGUID rguid, LPCDIEFFECT lpeff, LPDIRECTINPUTEFFECT *ppdef, LPUNKNOWN pUnkOuter) { FIXME("(this=%p,%s,%p,%p,%p): stub!\n", iface, debugstr_guid(rguid), lpeff, ppdef, pUnkOuter); return DI_OK; } static HRESULT WINAPI IDirectInputDevice2AImpl_EnumEffects( LPDIRECTINPUTDEVICE2A iface, LPDIENUMEFFECTSCALLBACKA lpCallback, LPVOID lpvRef, DWORD dwFlags) { FIXME("(this=%p,%p,%p,0x%08lx): stub!\n", iface, lpCallback, lpvRef, dwFlags); if (lpCallback) lpCallback(NULL, lpvRef); return DI_OK; } static HRESULT WINAPI IDirectInputDevice2AImpl_GetEffectInfo( LPDIRECTINPUTDEVICE2A iface, LPDIEFFECTINFOA lpdei, REFGUID rguid) { FIXME("(this=%p,%p,%s): stub!\n", iface, lpdei, debugstr_guid(rguid)); return DI_OK; } static HRESULT WINAPI IDirectInputDevice2AImpl_GetForceFeedbackState( LPDIRECTINPUTDEVICE2A iface, LPDWORD pdwOut) { FIXME("(this=%p,%p): stub!\n", iface, pdwOut); return DI_OK; } static HRESULT WINAPI IDirectInputDevice2AImpl_SendForceFeedbackCommand( LPDIRECTINPUTDEVICE2A iface, DWORD dwFlags) { FIXME("(this=%p,0x%08lx): stub!\n", iface, dwFlags); return DI_OK; } static HRESULT WINAPI IDirectInputDevice2AImpl_EnumCreatedEffectObjects( LPDIRECTINPUTDEVICE2A iface, LPDIENUMCREATEDEFFECTOBJECTSCALLBACK lpCallback, LPVOID lpvRef, DWORD dwFlags) { FIXME("(this=%p,%p,%p,0x%08lx): stub!\n", iface, lpCallback, lpvRef, dwFlags); if (lpCallback) lpCallback(NULL, lpvRef); return DI_OK; } static HRESULT WINAPI IDirectInputDevice2AImpl_Escape( LPDIRECTINPUTDEVICE2A iface, LPDIEFFESCAPE lpDIEEsc) { FIXME("(this=%p,%p): stub!\n", iface, lpDIEEsc); return DI_OK; } static HRESULT WINAPI IDirectInputDevice2AImpl_Poll( LPDIRECTINPUTDEVICE2A iface) { FIXME("(this=%p): stub!\n", iface); return DI_OK; } static HRESULT WINAPI IDirectInputDevice2AImpl_SendDeviceData( LPDIRECTINPUTDEVICE2A iface, DWORD cbObjectData, LPDIDEVICEOBJECTDATA rgdod, LPDWORD pdwInOut, DWORD dwFlags) { FIXME("(this=%p,0x%08lx,%p,%p,0x%08lx): stub!\n", iface, cbObjectData, rgdod, pdwInOut, dwFlags); return DI_OK; } /****************************************************************************** * SysMouseA (DInput Mouse support) */ /****************************************************************************** * Release : release the mouse buffer. */ static ULONG WINAPI SysMouseAImpl_Release(LPDIRECTINPUTDEVICE2A iface) { ICOM_THIS(SysMouseAImpl,iface); This->ref--; if (This->ref) return This->ref; /* Free the data queue */ if (This->data_queue != NULL) HeapFree(GetProcessHeap(),0,This->data_queue); /* Install the previous event handler (in case of releasing an aquired mouse device) */ if (This->prev_handler != NULL) MOUSE_Enable(This->prev_handler); DeleteCriticalSection(&(This->crit)); /* Free the DataFormat */ if (This->df != &(Wine_InternalMouseFormat)) { HeapFree(GetProcessHeap(), 0, This->df->rgodf); HeapFree(GetProcessHeap(), 0, This->df); } HeapFree(GetProcessHeap(),0,This); return 0; } /****************************************************************************** * SetCooperativeLevel : store the window in which we will do our * grabbing. */ static HRESULT WINAPI SysMouseAImpl_SetCooperativeLevel( LPDIRECTINPUTDEVICE2A iface,HWND hwnd,DWORD dwflags ) { ICOM_THIS(SysMouseAImpl,iface); TRACE("(this=%p,0x%08lx,0x%08lx)\n",This,(DWORD)hwnd,dwflags); if (TRACE_ON(dinput)) _dump_cooperativelevel(dwflags); /* Store the window which asks for the mouse */ This->win = hwnd; return 0; } /****************************************************************************** * SetDataFormat : the application can choose the format of the data * the device driver sends back with GetDeviceState. * * For the moment, only the "standard" configuration (c_dfDIMouse) is supported * in absolute and relative mode. */ static HRESULT WINAPI SysMouseAImpl_SetDataFormat( LPDIRECTINPUTDEVICE2A iface,LPCDIDATAFORMAT df ) { ICOM_THIS(SysMouseAImpl,iface); int i; TRACE("(this=%p,%p)\n",This,df); TRACE("(df.dwSize=%ld)\n",df->dwSize); TRACE("(df.dwObjsize=%ld)\n",df->dwObjSize); TRACE("(df.dwFlags=0x%08lx)\n",df->dwFlags); TRACE("(df.dwDataSize=%ld)\n",df->dwDataSize); TRACE("(df.dwNumObjs=%ld)\n",df->dwNumObjs); for (i=0;idwNumObjs;i++) { TRACE("df.rgodf[%d].guid %s (%p)\n",i, debugstr_guid(df->rgodf[i].pguid), df->rgodf[i].pguid); TRACE("df.rgodf[%d].dwOfs %ld\n",i,df->rgodf[i].dwOfs); TRACE("dwType 0x%02x,dwInstance %d\n",DIDFT_GETTYPE(df->rgodf[i].dwType),DIDFT_GETINSTANCE(df->rgodf[i].dwType)); TRACE("df.rgodf[%d].dwFlags 0x%08lx\n",i,df->rgodf[i].dwFlags); } /* Check if the mouse is in absolute or relative mode */ if (df->dwFlags == DIDF_ABSAXIS) This->absolute = 1; else if (df->dwFlags == DIDF_RELAXIS) This->absolute = 0; else ERR("Neither absolute nor relative flag set."); /* Store the new data format */ This->df = HeapAlloc(GetProcessHeap(),0,df->dwSize); memcpy(This->df, df, df->dwSize); This->df->rgodf = HeapAlloc(GetProcessHeap(),0,df->dwNumObjs*df->dwObjSize); memcpy(This->df->rgodf,df->rgodf,df->dwNumObjs*df->dwObjSize); /* Prepare all the data-conversion filters */ This->wine_df = create_DataFormat(&(Wine_InternalMouseFormat), df, This->offset_array); return 0; } #define GEN_EVENT(offset,data,xtime,seq) \ { \ /* If queue_len > 0, queuing is requested -> TRACE the event queued */ \ if (This->queue_len > 0) { \ TRACE(" queueing %d at offset %d (queue pos %d / size %d)\n", \ (int) (data), (int) (offset), \ (int) (This->queue_pos), (int) (This->queue_len)); \ \ if ((offset >= 0) && (This->queue_pos < This->queue_len)) { \ This->data_queue[This->queue_pos].dwOfs = offset; \ This->data_queue[This->queue_pos].dwData = data; \ This->data_queue[This->queue_pos].dwTimeStamp = xtime; \ This->data_queue[This->queue_pos].dwSequence = seq; \ This->queue_pos++; \ } \ } \ } /* Our private mouse event handler */ static void WINAPI dinput_mouse_event( DWORD dwFlags, DWORD dx, DWORD dy, DWORD cButtons, DWORD dwExtraInfo ) { long posX = -1, posY = -1; DWORD keyState, xtime, extra; SysMouseAImpl* This = (SysMouseAImpl*) current_lock; EnterCriticalSection(&(This->crit)); /* Mouse moved -> send event if asked */ if (This->hEvent) SetEvent(This->hEvent); if ( !IsBadReadPtr( (LPVOID)dwExtraInfo, sizeof(WINE_MOUSEEVENT) ) && ((WINE_MOUSEEVENT *)dwExtraInfo)->magic == WINE_MOUSEEVENT_MAGIC ) { WINE_MOUSEEVENT *wme = (WINE_MOUSEEVENT *)dwExtraInfo; keyState = wme->keyState; xtime = wme->time; extra = (DWORD)wme->hWnd; if (dwFlags & MOUSEEVENTF_MOVE) { if (dwFlags & MOUSEEVENTF_ABSOLUTE) { posX = (dx * GetSystemMetrics(SM_CXSCREEN)) >> 16; posY = (dy * GetSystemMetrics(SM_CYSCREEN)) >> 16; if (This->absolute) { if (posX != This->prevX) GEN_EVENT(This->offset_array[WINE_MOUSE_X_POSITION], posX, xtime, 0); if (posY != This->prevY) GEN_EVENT(This->offset_array[WINE_MOUSE_Y_POSITION], posY, xtime, 0); } else { /* Now, warp handling */ if ((This->need_warp == WARP_STARTED) && (posX == This->win_centerX) && (posX == This->win_centerX)) { /* Warp has been done... */ This->need_warp = WARP_DONE; LeaveCriticalSection(&(This->crit)); return; } /* Relative mouse input with absolute mouse event : the real fun starts here... */ if ((This->need_warp == WARP_NEEDED) || (This->need_warp == WARP_STARTED)) { if (posX != This->prevX) GEN_EVENT(This->offset_array[WINE_MOUSE_X_POSITION], posX - This->prevX, xtime, evsequence++); if (posY != This->prevY) GEN_EVENT(This->offset_array[WINE_MOUSE_Y_POSITION], posY - This->prevY, xtime, evsequence++); } else { /* This is the first time the event handler has been called after a GetData of GetState. */ if (posX != This->win_centerX) { GEN_EVENT(This->offset_array[WINE_MOUSE_X_POSITION], posX - This->win_centerX, xtime, evsequence++); This->need_warp = WARP_NEEDED; } if (posY != This->win_centerY) { GEN_EVENT(This->offset_array[WINE_MOUSE_Y_POSITION], posY - This->win_centerY, xtime, evsequence++); This->need_warp = WARP_NEEDED; } } } This->prevX = posX; This->prevY = posY; if (This->absolute) { This->m_state.lX = posX; This->m_state.lY = posY; } else { This->m_state.lX = posX - This->win_centerX; This->m_state.lY = posY - This->win_centerY; } } else { /* Mouse reporting is in relative mode */ posX = (long) dx; posY = (long) dy; if (This->absolute) { long aposX, aposY; aposX = This->m_state.lX + posX; if (aposX < 0) aposX = 0; if (aposX >= GetSystemMetrics(SM_CXSCREEN)) aposX = GetSystemMetrics(SM_CXSCREEN); aposY = This->m_state.lY + posY; if (aposY < 0) aposY = 0; if (aposY >= GetSystemMetrics(SM_CYSCREEN)) aposY = GetSystemMetrics(SM_CYSCREEN); if (posX != 0) GEN_EVENT(This->offset_array[WINE_MOUSE_X_POSITION], aposX, xtime, evsequence++); if (posY != 0) GEN_EVENT(This->offset_array[WINE_MOUSE_Y_POSITION], aposY, xtime, evsequence++); This->m_state.lX = aposX; This->m_state.lY = aposY; } else { if (posX != 0) GEN_EVENT(This->offset_array[WINE_MOUSE_X_POSITION], posX, xtime, evsequence++); if (posY != 0) GEN_EVENT(This->offset_array[WINE_MOUSE_Y_POSITION], posY, xtime, evsequence++); This->m_state.lX = posX; This->m_state.lY = posY; } } } } else { ERR("Mouse event not supported...\n"); LeaveCriticalSection(&(This->crit)); return ; } if (TRACE_ON(dinput)) { if (dwFlags & MOUSEEVENTF_MOVE) TRACE(" %ld %ld (%s)", posX, posY, (dwFlags & MOUSEEVENTF_ABSOLUTE ? "abs" : "rel")); if ( dwFlags & MOUSEEVENTF_LEFTDOWN ) DPRINTF(" LD "); if ( dwFlags & MOUSEEVENTF_LEFTUP ) DPRINTF(" LU "); if ( dwFlags & MOUSEEVENTF_RIGHTDOWN ) DPRINTF(" RD "); if ( dwFlags & MOUSEEVENTF_RIGHTUP ) DPRINTF(" RU "); if ( dwFlags & MOUSEEVENTF_MIDDLEDOWN ) DPRINTF(" MD "); if ( dwFlags & MOUSEEVENTF_MIDDLEUP ) DPRINTF(" MU "); if (!(This->absolute)) DPRINTF(" W=%d ", This->need_warp); DPRINTF("\n"); } if ( dwFlags & MOUSEEVENTF_LEFTDOWN ) { GEN_EVENT(This->offset_array[WINE_MOUSE_L_POSITION], 0xFF, xtime, evsequence++); This->m_state.rgbButtons[0] = 0xFF; } if ( dwFlags & MOUSEEVENTF_LEFTUP ) { GEN_EVENT(This->offset_array[WINE_MOUSE_L_POSITION], 0x00, xtime, evsequence++); This->m_state.rgbButtons[0] = 0x00; } if ( dwFlags & MOUSEEVENTF_RIGHTDOWN ) { GEN_EVENT(This->offset_array[WINE_MOUSE_R_POSITION], 0xFF, xtime, evsequence++); This->m_state.rgbButtons[1] = 0xFF; } if ( dwFlags & MOUSEEVENTF_RIGHTUP ) { GEN_EVENT(This->offset_array[WINE_MOUSE_R_POSITION], 0x00, xtime, evsequence++); This->m_state.rgbButtons[1] = 0x00; } if ( dwFlags & MOUSEEVENTF_MIDDLEDOWN ) { GEN_EVENT(This->offset_array[WINE_MOUSE_M_POSITION], 0xFF, xtime, evsequence++); This->m_state.rgbButtons[2] = 0xFF; } if ( dwFlags & MOUSEEVENTF_MIDDLEUP ) { GEN_EVENT(This->offset_array[WINE_MOUSE_M_POSITION], 0x00, xtime, evsequence++); This->m_state.rgbButtons[2] = 0x00; } TRACE("(X: %ld - Y: %ld L: %02x M: %02x R: %02x)\n", This->m_state.lX, This->m_state.lY, This->m_state.rgbButtons[0], This->m_state.rgbButtons[2], This->m_state.rgbButtons[1]); LeaveCriticalSection(&(This->crit)); } /****************************************************************************** * Acquire : gets exclusive control of the mouse */ static HRESULT WINAPI SysMouseAImpl_Acquire(LPDIRECTINPUTDEVICE2A iface) { ICOM_THIS(SysMouseAImpl,iface); RECT rect; TRACE("(this=%p)\n",This); if (This->acquired == 0) { POINT point; /* This stores the current mouse handler. */ This->prev_handler = mouse_event; /* Store (in a global variable) the current lock */ current_lock = (IDirectInputDevice2A*)This; /* Init the mouse state */ if (This->absolute) { This->m_state.lX = PosX; This->m_state.lY = PosY; This->prevX = PosX; This->prevY = PosY; } else { This->m_state.lX = 0; This->m_state.lY = 0; } This->m_state.rgbButtons[0] = (MouseButtonsStates[0] ? 0xFF : 0x00); This->m_state.rgbButtons[1] = (MouseButtonsStates[1] ? 0xFF : 0x00); This->m_state.rgbButtons[2] = (MouseButtonsStates[2] ? 0xFF : 0x00); /* Install our own mouse event handler */ MOUSE_Enable(dinput_mouse_event); /* Get the window dimension and find the center */ GetWindowRect(This->win, &rect); This->win_centerX = (rect.right - rect.left) / 2; This->win_centerY = (rect.bottom - rect.top ) / 2; /* Warp the mouse to the center of the window */ if (This->absolute == 0) { TRACE("Warping mouse to %ld - %ld\n", This->win_centerX, This->win_centerY); point.x = This->win_centerX; point.y = This->win_centerY; MapWindowPoints(This->win, HWND_DESKTOP, &point, 1); DISPLAY_MoveCursor(point.x, point.y); This->need_warp = WARP_STARTED; } This->acquired = 1; } return 0; } /****************************************************************************** * Unacquire : frees the mouse */ static HRESULT WINAPI SysMouseAImpl_Unacquire(LPDIRECTINPUTDEVICE2A iface) { ICOM_THIS(SysMouseAImpl,iface); TRACE("(this=%p)\n",This); /* Reinstall previous mouse event handler */ MOUSE_Enable(This->prev_handler); This->prev_handler = NULL; /* No more locks */ current_lock = NULL; /* Unacquire device */ This->acquired = 0; return 0; } /****************************************************************************** * GetDeviceState : returns the "state" of the mouse. * * For the moment, only the "standard" return structure (DIMOUSESTATE) is * supported. */ static HRESULT WINAPI SysMouseAImpl_GetDeviceState( LPDIRECTINPUTDEVICE2A iface,DWORD len,LPVOID ptr ) { ICOM_THIS(SysMouseAImpl,iface); EnterCriticalSection(&(This->crit)); TRACE("(this=%p,0x%08lx,%p): \n",This,len,ptr); /* Copy the current mouse state */ fill_DataFormat(ptr, &(This->m_state), This->wine_df); /* Initialize the buffer when in relative mode */ if (This->absolute == 0) { This->m_state.lX = 0; This->m_state.lY = 0; } /* Check if we need to do a mouse warping */ if (This->need_warp == WARP_NEEDED) { POINT point; TRACE("Warping mouse to %ld - %ld\n", This->win_centerX, This->win_centerY); point.x = This->win_centerX; point.y = This->win_centerY; MapWindowPoints(This->win, HWND_DESKTOP, &point, 1); DISPLAY_MoveCursor(point.x, point.y); This->need_warp = WARP_STARTED; } LeaveCriticalSection(&(This->crit)); TRACE("(X: %ld - Y: %ld L: %02x M: %02x R: %02x)\n", This->m_state.lX, This->m_state.lY, This->m_state.rgbButtons[0], This->m_state.rgbButtons[2], This->m_state.rgbButtons[1]); return 0; } /****************************************************************************** * GetDeviceState : gets buffered input data. */ static HRESULT WINAPI SysMouseAImpl_GetDeviceData(LPDIRECTINPUTDEVICE2A iface, DWORD dodsize, LPDIDEVICEOBJECTDATA dod, LPDWORD entries, DWORD flags ) { ICOM_THIS(SysMouseAImpl,iface); EnterCriticalSection(&(This->crit)); TRACE("(%p)->(dods=%ld,entries=%ld,fl=0x%08lx)\n",This,dodsize,*entries,flags); if (flags & DIGDD_PEEK) FIXME("DIGDD_PEEK\n"); if (dod == NULL) { *entries = This->queue_pos; This->queue_pos = 0; } else { /* Check for buffer overflow */ if (This->queue_pos > *entries) { WARN("Buffer overflow not handled properly yet...\n"); This->queue_pos = *entries; } if (dodsize != sizeof(DIDEVICEOBJECTDATA)) { ERR("Wrong structure size !\n"); LeaveCriticalSection(&(This->crit)); return DIERR_INVALIDPARAM; } if (This->queue_pos) TRACE("Application retrieving %d event(s).\n", This->queue_pos); /* Copy the buffered data into the application queue */ memcpy(dod, This->data_queue, This->queue_pos * dodsize); *entries = This->queue_pos; /* Reset the event queue */ This->queue_pos = 0; } LeaveCriticalSection(&(This->crit)); /* Check if we need to do a mouse warping */ if (This->need_warp == WARP_NEEDED) { POINT point; TRACE("Warping mouse to %ld - %ld\n", This->win_centerX, This->win_centerY); point.x = This->win_centerX; point.y = This->win_centerY; MapWindowPoints(This->win, HWND_DESKTOP, &point, 1); DISPLAY_MoveCursor(point.x, point.y); This->need_warp = WARP_STARTED; } return 0; } /****************************************************************************** * SetProperty : change input device properties */ static HRESULT WINAPI SysMouseAImpl_SetProperty(LPDIRECTINPUTDEVICE2A iface, REFGUID rguid, LPCDIPROPHEADER ph) { ICOM_THIS(SysMouseAImpl,iface); TRACE("(this=%p,%s,%p)\n",This,debugstr_guid(rguid),ph); if (!HIWORD(rguid)) { switch ((DWORD)rguid) { case (DWORD) DIPROP_BUFFERSIZE: { LPCDIPROPDWORD pd = (LPCDIPROPDWORD)ph; TRACE("buffersize = %ld\n",pd->dwData); This->data_queue = (LPDIDEVICEOBJECTDATA)HeapAlloc(GetProcessHeap(),0, pd->dwData * sizeof(DIDEVICEOBJECTDATA)); This->queue_pos = 0; This->queue_len = pd->dwData; break; } default: FIXME("Unknown type %ld (%s)\n",(DWORD)rguid,debugstr_guid(rguid)); break; } } return 0; } /****************************************************************************** * GetProperty : get input device properties */ static HRESULT WINAPI SysMouseAImpl_GetProperty(LPDIRECTINPUTDEVICE2A iface, REFGUID rguid, LPDIPROPHEADER pdiph) { ICOM_THIS(SysMouseAImpl,iface); TRACE("(this=%p,%s,%p): stub!\n", iface, debugstr_guid(rguid), pdiph); if (TRACE_ON(dinput)) _dump_DIPROPHEADER(pdiph); if (!HIWORD(rguid)) { switch ((DWORD)rguid) { case (DWORD) DIPROP_BUFFERSIZE: { LPDIPROPDWORD pd = (LPDIPROPDWORD)pdiph; TRACE(" return buffersize = %d\n",This->queue_len); pd->dwData = This->queue_len; break; } case (DWORD) DIPROP_RANGE: { LPDIPROPRANGE pr = (LPDIPROPRANGE) pdiph; if ((pdiph->dwHow == DIPH_BYID) && ((pdiph->dwObj == (DIDFT_MAKEINSTANCE(WINE_MOUSE_X_AXIS_INSTANCE) | DIDFT_RELAXIS)) || (pdiph->dwObj == (DIDFT_MAKEINSTANCE(WINE_MOUSE_Y_AXIS_INSTANCE) | DIDFT_RELAXIS)))) { /* Querying the range of either the X or the Y axis. As I do not know the range, do as if the range where unrestricted...*/ pr->lMin = DIPROPRANGE_NOMIN; pr->lMax = DIPROPRANGE_NOMAX; } break; } default: FIXME("Unknown type %ld (%s)\n",(DWORD)rguid,debugstr_guid(rguid)); break; } } return DI_OK; } /****************************************************************************** * SetEventNotification : specifies event to be sent on state change */ static HRESULT WINAPI SysMouseAImpl_SetEventNotification(LPDIRECTINPUTDEVICE2A iface, HANDLE hnd) { ICOM_THIS(SysMouseAImpl,iface); TRACE("(this=%p,0x%08lx)\n",This,(DWORD)hnd); This->hEvent = hnd; return DI_OK; } /****************************************************************************** * GetCapabilities : get the device capablitites */ static HRESULT WINAPI SysMouseAImpl_GetCapabilities( LPDIRECTINPUTDEVICE2A iface, LPDIDEVCAPS lpDIDevCaps) { ICOM_THIS(SysMouseAImpl,iface); TRACE("(this=%p,%p)\n",This,lpDIDevCaps); if (lpDIDevCaps->dwSize == sizeof(DIDEVCAPS)) { lpDIDevCaps->dwFlags = DIDC_ATTACHED; lpDIDevCaps->dwDevType = DIDEVTYPE_MOUSE; lpDIDevCaps->dwAxes = 2; lpDIDevCaps->dwButtons = 3; lpDIDevCaps->dwPOVs = 0; lpDIDevCaps->dwFFSamplePeriod = 0; lpDIDevCaps->dwFFMinTimeResolution = 0; lpDIDevCaps->dwFirmwareRevision = 100; lpDIDevCaps->dwHardwareRevision = 100; lpDIDevCaps->dwFFDriverVersion = 0; } else { /* DirectX 3.0 */ FIXME("DirectX 3.0 not supported....\n"); } return DI_OK; } /****************************************************************************** * EnumObjects : enumerate the different buttons and axis... */ static HRESULT WINAPI SysMouseAImpl_EnumObjects( LPDIRECTINPUTDEVICE2A iface, LPDIENUMDEVICEOBJECTSCALLBACKA lpCallback, LPVOID lpvRef, DWORD dwFlags) { ICOM_THIS(SysMouseAImpl,iface); DIDEVICEOBJECTINSTANCEA ddoi; TRACE("(this=%p,%p,%p,%08lx)\n", This, lpCallback, lpvRef, dwFlags); if (TRACE_ON(dinput)) { DPRINTF(" - flags = "); _dump_EnumObjects_flags(dwFlags); DPRINTF("\n"); } /* Only the fields till dwFFMaxForce are relevant */ ddoi.dwSize = FIELD_OFFSET(DIDEVICEOBJECTINSTANCEA, dwFFMaxForce); /* In a mouse, we have : two relative axis and three buttons */ if ((dwFlags == DIDFT_ALL) || (dwFlags & DIDFT_AXIS)) { /* X axis */ ddoi.guidType = GUID_XAxis; ddoi.dwOfs = This->offset_array[WINE_MOUSE_X_POSITION]; ddoi.dwType = DIDFT_MAKEINSTANCE(WINE_MOUSE_X_AXIS_INSTANCE) | DIDFT_RELAXIS; strcpy(ddoi.tszName, "X-Axis"); _dump_OBJECTINSTANCEA(&ddoi); if (lpCallback(&ddoi, lpvRef) != DIENUM_CONTINUE) return DI_OK; /* Y axis */ ddoi.guidType = GUID_YAxis; ddoi.dwOfs = This->offset_array[WINE_MOUSE_Y_POSITION]; ddoi.dwType = DIDFT_MAKEINSTANCE(WINE_MOUSE_Y_AXIS_INSTANCE) | DIDFT_RELAXIS; strcpy(ddoi.tszName, "Y-Axis"); _dump_OBJECTINSTANCEA(&ddoi); if (lpCallback(&ddoi, lpvRef) != DIENUM_CONTINUE) return DI_OK; } if ((dwFlags == DIDFT_ALL) || (dwFlags & DIDFT_BUTTON)) { ddoi.guidType = GUID_Button; /* Left button */ ddoi.dwOfs = This->offset_array[WINE_MOUSE_L_POSITION]; ddoi.dwType = DIDFT_MAKEINSTANCE(WINE_MOUSE_L_BUTTON_INSTANCE) | DIDFT_PSHBUTTON; strcpy(ddoi.tszName, "Left-Button"); _dump_OBJECTINSTANCEA(&ddoi); if (lpCallback(&ddoi, lpvRef) != DIENUM_CONTINUE) return DI_OK; /* Right button */ ddoi.dwOfs = This->offset_array[WINE_MOUSE_R_POSITION]; ddoi.dwType = DIDFT_MAKEINSTANCE(WINE_MOUSE_R_BUTTON_INSTANCE) | DIDFT_PSHBUTTON; strcpy(ddoi.tszName, "Right-Button"); _dump_OBJECTINSTANCEA(&ddoi); if (lpCallback(&ddoi, lpvRef) != DIENUM_CONTINUE) return DI_OK; /* Middle button */ ddoi.dwOfs = This->offset_array[WINE_MOUSE_M_POSITION]; ddoi.dwType = DIDFT_MAKEINSTANCE(WINE_MOUSE_M_BUTTON_INSTANCE) | DIDFT_PSHBUTTON; strcpy(ddoi.tszName, "Middle-Button"); _dump_OBJECTINSTANCEA(&ddoi); if (lpCallback(&ddoi, lpvRef) != DIENUM_CONTINUE) return DI_OK; } return DI_OK; } #ifdef HAVE_LINUX_22_JOYSTICK_API /****************************************************************************** * Joystick */ static ULONG WINAPI JoystickAImpl_Release(LPDIRECTINPUTDEVICE2A iface) { ICOM_THIS(JoystickAImpl,iface); This->ref--; if (This->ref) return This->ref; /* Free the data queue */ if (This->data_queue != NULL) HeapFree(GetProcessHeap(),0,This->data_queue); /* Free the DataFormat */ HeapFree(GetProcessHeap(), 0, This->df); HeapFree(GetProcessHeap(),0,This); return 0; } /****************************************************************************** * SetDataFormat : the application can choose the format of the data * the device driver sends back with GetDeviceState. */ static HRESULT WINAPI JoystickAImpl_SetDataFormat( LPDIRECTINPUTDEVICE2A iface,LPCDIDATAFORMAT df ) { ICOM_THIS(JoystickAImpl,iface); int i; TRACE("(this=%p,%p)\n",This,df); TRACE("(df.dwSize=%ld)\n",df->dwSize); TRACE("(df.dwObjsize=%ld)\n",df->dwObjSize); TRACE("(df.dwFlags=0x%08lx)\n",df->dwFlags); TRACE("(df.dwDataSize=%ld)\n",df->dwDataSize); TRACE("(df.dwNumObjs=%ld)\n",df->dwNumObjs); for (i=0;idwNumObjs;i++) { TRACE("df.rgodf[%d].guid %s (%p)\n",i,debugstr_guid(df->rgodf[i].pguid), df->rgodf[i].pguid); TRACE("df.rgodf[%d].dwOfs %ld\n",i,df->rgodf[i].dwOfs); TRACE("dwType 0x%02x,dwInstance %d\n",DIDFT_GETTYPE(df->rgodf[i].dwType),DIDFT_GETINSTANCE(df->rgodf[i].dwType)); TRACE("df.rgodf[%d].dwFlags 0x%08lx\n",i,df->rgodf[i].dwFlags); } /* Store the new data format */ This->df = HeapAlloc(GetProcessHeap(),0,df->dwSize); memcpy(This->df, df, df->dwSize); This->df->rgodf = HeapAlloc(GetProcessHeap(),0,df->dwNumObjs*df->dwObjSize); memcpy(This->df->rgodf,df->rgodf,df->dwNumObjs*df->dwObjSize); return 0; } /****************************************************************************** * Acquire : gets exclusive control of the joystick */ static HRESULT WINAPI JoystickAImpl_Acquire(LPDIRECTINPUTDEVICE2A iface) { ICOM_THIS(JoystickAImpl,iface); TRACE("(this=%p)\n",This); if (This->joyfd!=-1) return 0; This->joyfd=open(JOYDEV,O_RDONLY); if (This->joyfd==-1) return DIERR_NOTFOUND; return 0; } /****************************************************************************** * Unacquire : frees the joystick */ static HRESULT WINAPI JoystickAImpl_Unacquire(LPDIRECTINPUTDEVICE2A iface) { ICOM_THIS(JoystickAImpl,iface); TRACE("(this=%p)\n",This); if (This->joyfd!=-1) { close(This->joyfd); This->joyfd = -1; } return 0; } #define map_axis(val) ((val+32768)*(This->lMax-This->lMin)/65536+This->lMin) static void joy_polldev(JoystickAImpl *This) { struct timeval tv; fd_set readfds; struct js_event jse; if (This->joyfd==-1) return; while (1) { memset(&tv,0,sizeof(tv)); FD_ZERO(&readfds);FD_SET(This->joyfd,&readfds); if (1>select(This->joyfd+1,&readfds,NULL,NULL,&tv)) return; /* we have one event, so we can read */ if (sizeof(jse)!=read(This->joyfd,&jse,sizeof(jse))) { return; } TRACE("js_event: type 0x%x, number %d, value %d\n",jse.type,jse.number,jse.value); if (jse.type & JS_EVENT_BUTTON) { GEN_EVENT(DIJOFS_BUTTON(jse.number),jse.value?0x80:0x00,jse.time,evsequence++); This->js.rgbButtons[jse.number] = jse.value?0x80:0x00; } if (jse.type & JS_EVENT_AXIS) { switch (jse.number) { case 0: GEN_EVENT(jse.number*4,jse.value,jse.time,evsequence++); This->js.lX = map_axis(jse.value); break; case 1: GEN_EVENT(jse.number*4,jse.value,jse.time,evsequence++); This->js.lY = map_axis(jse.value); break; case 2: GEN_EVENT(jse.number*4,jse.value,jse.time,evsequence++); This->js.lZ = map_axis(jse.value); break; default: FIXME("more then 3 axes (%d) not handled!\n",jse.number); break; } } } } /****************************************************************************** * GetDeviceState : returns the "state" of the joystick. * */ static HRESULT WINAPI JoystickAImpl_GetDeviceState( LPDIRECTINPUTDEVICE2A iface,DWORD len,LPVOID ptr ) { ICOM_THIS(JoystickAImpl,iface); joy_polldev(This); TRACE("(this=%p,0x%08lx,%p)\n",This,len,ptr); if (len != sizeof(DIJOYSTATE)) { FIXME("len %ld is not sizeof(DIJOYSTATE), unsupported format.\n",len); } memcpy(ptr,&(This->js),len); This->queue_pos = 0; return 0; } /****************************************************************************** * GetDeviceState : gets buffered input data. */ static HRESULT WINAPI JoystickAImpl_GetDeviceData(LPDIRECTINPUTDEVICE2A iface, DWORD dodsize, LPDIDEVICEOBJECTDATA dod, LPDWORD entries, DWORD flags ) { ICOM_THIS(JoystickAImpl,iface); FIXME("(%p)->(dods=%ld,entries=%ld,fl=0x%08lx),STUB!\n",This,dodsize,*entries,flags); joy_polldev(This); if (flags & DIGDD_PEEK) FIXME("DIGDD_PEEK\n"); if (dod == NULL) { } else { } return 0; } /****************************************************************************** * SetProperty : change input device properties */ static HRESULT WINAPI JoystickAImpl_SetProperty(LPDIRECTINPUTDEVICE2A iface, REFGUID rguid, LPCDIPROPHEADER ph) { ICOM_THIS(JoystickAImpl,iface); FIXME("(this=%p,%s,%p)\n",This,debugstr_guid(rguid),ph); FIXME("ph.dwSize = %ld, ph.dwHeaderSize =%ld, ph.dwObj = %ld, ph.dwHow= %ld\n",ph->dwSize, ph->dwHeaderSize,ph->dwObj,ph->dwHow); if (!HIWORD(rguid)) { switch ((DWORD)rguid) { case (DWORD) DIPROP_BUFFERSIZE: { LPCDIPROPDWORD pd = (LPCDIPROPDWORD)ph; FIXME("buffersize = %ld\n",pd->dwData); break; } case (DWORD)DIPROP_RANGE: { LPCDIPROPRANGE pr = (LPCDIPROPRANGE)ph; FIXME("proprange(%ld,%ld)\n",pr->lMin,pr->lMax); This->lMin = pr->lMin; This->lMax = pr->lMax; break; } case (DWORD)DIPROP_DEADZONE: { LPCDIPROPDWORD pd = (LPCDIPROPDWORD)ph; FIXME("deadzone(%ld)\n",pd->dwData); This->deadzone = pd->dwData; break; } default: FIXME("Unknown type %ld (%s)\n",(DWORD)rguid,debugstr_guid(rguid)); break; } } return 0; } /****************************************************************************** * SetEventNotification : specifies event to be sent on state change */ static HRESULT WINAPI JoystickAImpl_SetEventNotification( LPDIRECTINPUTDEVICE2A iface, HANDLE hnd ) { ICOM_THIS(JoystickAImpl,iface); TRACE("(this=%p,0x%08lx)\n",This,(DWORD)hnd); This->hEvent = hnd; return DI_OK; } static HRESULT WINAPI JoystickAImpl_GetCapabilities( LPDIRECTINPUTDEVICE2A iface, LPDIDEVCAPS lpDIDevCaps) { ICOM_THIS(JoystickAImpl,iface); BYTE axes,buttons; int xfd = This->joyfd; TRACE("%p->(%p)\n",iface,lpDIDevCaps); if (xfd==-1) xfd = open(JOYDEV,O_RDONLY); lpDIDevCaps->dwFlags = DIDC_ATTACHED; lpDIDevCaps->dwDevType = DIDEVTYPE_JOYSTICK; #ifdef JSIOCGAXES if (-1==ioctl(xfd,JSIOCGAXES,&axes)) axes = 2; lpDIDevCaps->dwAxes = axes; #endif #ifdef JSIOCGBUTTONS if (-1==ioctl(xfd,JSIOCGAXES,&buttons)) buttons = 2; lpDIDevCaps->dwButtons = buttons; #endif if (xfd!=This->joyfd) close(xfd); return DI_OK; } static HRESULT WINAPI JoystickAImpl_Poll(LPDIRECTINPUTDEVICE2A iface) { ICOM_THIS(JoystickAImpl,iface); TRACE("(),stub!\n"); joy_polldev(This); return DI_OK; } /****************************************************************************** * EnumObjects : enumerate the different buttons and axis... */ static HRESULT WINAPI JoystickAImpl_EnumObjects( LPDIRECTINPUTDEVICE2A iface, LPDIENUMDEVICEOBJECTSCALLBACKA lpCallback, LPVOID lpvRef, DWORD dwFlags) { ICOM_THIS(JoystickAImpl,iface); DIDEVICEOBJECTINSTANCEA ddoi; int xfd = This->joyfd; TRACE("(this=%p,%p,%p,%08lx)\n", This, lpCallback, lpvRef, dwFlags); if (TRACE_ON(dinput)) { DPRINTF(" - flags = "); _dump_EnumObjects_flags(dwFlags); DPRINTF("\n"); } /* Only the fields till dwFFMaxForce are relevant */ ddoi.dwSize = FIELD_OFFSET(DIDEVICEOBJECTINSTANCEA, dwFFMaxForce); /* For the joystick, do as is done in the GetCapabilities function */ if ((dwFlags == DIDFT_ALL) || (dwFlags & DIDFT_AXIS)) { BYTE axes, i; #ifdef JSIOCGAXES if (-1==ioctl(xfd,JSIOCGAXES,&axes)) axes = 2; #endif for (i = 0; i < axes; i++) { switch (i) { case 0: ddoi.guidType = GUID_XAxis; ddoi.dwOfs = DIJOFS_X; break; case 1: ddoi.guidType = GUID_YAxis; ddoi.dwOfs = DIJOFS_Y; break; case 2: ddoi.guidType = GUID_ZAxis; ddoi.dwOfs = DIJOFS_Z; break; default: ddoi.guidType = GUID_Unknown; ddoi.dwOfs = DIJOFS_Z + (i - 2) * sizeof(LONG); } ddoi.dwType = DIDFT_MAKEINSTANCE((0x0001 << i) << WINE_JOYSTICK_AXIS_BASE) | DIDFT_ABSAXIS; sprintf(ddoi.tszName, "%d-Axis", i); _dump_OBJECTINSTANCEA(&ddoi); if (lpCallback(&ddoi, lpvRef) != DIENUM_CONTINUE) return DI_OK; } } if ((dwFlags == DIDFT_ALL) || (dwFlags & DIDFT_BUTTON)) { BYTE buttons, i; #ifdef JSIOCGBUTTONS if (-1==ioctl(xfd,JSIOCGAXES,&buttons)) buttons = 2; #endif /* The DInput SDK says that GUID_Button is only for mouse buttons but well... */ ddoi.guidType = GUID_Button; for (i = 0; i < buttons; i++) { ddoi.dwOfs = DIJOFS_BUTTON(i); ddoi.dwType = DIDFT_MAKEINSTANCE((0x0001 << i) << WINE_JOYSTICK_BUTTON_BASE) | DIDFT_PSHBUTTON; sprintf(ddoi.tszName, "%d-Button", i); _dump_OBJECTINSTANCEA(&ddoi); if (lpCallback(&ddoi, lpvRef) != DIENUM_CONTINUE) return DI_OK; } } if (xfd!=This->joyfd) close(xfd); return DI_OK; } /****************************************************************************** * GetProperty : get input device properties */ static HRESULT WINAPI JoystickAImpl_GetProperty(LPDIRECTINPUTDEVICE2A iface, REFGUID rguid, LPDIPROPHEADER pdiph) { ICOM_THIS(JoystickAImpl,iface); TRACE("(this=%p,%s,%p): stub!\n", iface, debugstr_guid(rguid), pdiph); if (TRACE_ON(dinput)) _dump_DIPROPHEADER(pdiph); if (!HIWORD(rguid)) { switch ((DWORD)rguid) { case (DWORD) DIPROP_BUFFERSIZE: { LPDIPROPDWORD pd = (LPDIPROPDWORD)pdiph; TRACE(" return buffersize = %d\n",This->queue_len); pd->dwData = This->queue_len; break; } case (DWORD) DIPROP_RANGE: { LPDIPROPRANGE pr = (LPDIPROPRANGE) pdiph; if ((pdiph->dwHow == DIPH_BYID) && (pdiph->dwObj & DIDFT_ABSAXIS)) { /* The app is querying the current range of the axis : return the lMin and lMax values */ pr->lMin = This->lMin; pr->lMax = This->lMax; } break; } default: FIXME("Unknown type %ld (%s)\n",(DWORD)rguid,debugstr_guid(rguid)); break; } } return DI_OK; } #endif /****************************************************************************/ /****************************************************************************/ static ICOM_VTABLE(IDirectInputDevice2A) SysKeyboardAvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectInputDevice2AImpl_QueryInterface, IDirectInputDevice2AImpl_AddRef, IDirectInputDevice2AImpl_Release, SysKeyboardAImpl_GetCapabilities, IDirectInputDevice2AImpl_EnumObjects, IDirectInputDevice2AImpl_GetProperty, SysKeyboardAImpl_SetProperty, SysKeyboardAImpl_Acquire, SysKeyboardAImpl_Unacquire, SysKeyboardAImpl_GetDeviceState, SysKeyboardAImpl_GetDeviceData, IDirectInputDevice2AImpl_SetDataFormat, IDirectInputDevice2AImpl_SetEventNotification, IDirectInputDevice2AImpl_SetCooperativeLevel, IDirectInputDevice2AImpl_GetObjectInfo, IDirectInputDevice2AImpl_GetDeviceInfo, IDirectInputDevice2AImpl_RunControlPanel, IDirectInputDevice2AImpl_Initialize, IDirectInputDevice2AImpl_CreateEffect, IDirectInputDevice2AImpl_EnumEffects, IDirectInputDevice2AImpl_GetEffectInfo, IDirectInputDevice2AImpl_GetForceFeedbackState, IDirectInputDevice2AImpl_SendForceFeedbackCommand, IDirectInputDevice2AImpl_EnumCreatedEffectObjects, IDirectInputDevice2AImpl_Escape, IDirectInputDevice2AImpl_Poll, IDirectInputDevice2AImpl_SendDeviceData, }; static ICOM_VTABLE(IDirectInputDevice2A) SysMouseAvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectInputDevice2AImpl_QueryInterface, IDirectInputDevice2AImpl_AddRef, SysMouseAImpl_Release, SysMouseAImpl_GetCapabilities, SysMouseAImpl_EnumObjects, SysMouseAImpl_GetProperty, SysMouseAImpl_SetProperty, SysMouseAImpl_Acquire, SysMouseAImpl_Unacquire, SysMouseAImpl_GetDeviceState, SysMouseAImpl_GetDeviceData, SysMouseAImpl_SetDataFormat, SysMouseAImpl_SetEventNotification, SysMouseAImpl_SetCooperativeLevel, IDirectInputDevice2AImpl_GetObjectInfo, IDirectInputDevice2AImpl_GetDeviceInfo, IDirectInputDevice2AImpl_RunControlPanel, IDirectInputDevice2AImpl_Initialize, IDirectInputDevice2AImpl_CreateEffect, IDirectInputDevice2AImpl_EnumEffects, IDirectInputDevice2AImpl_GetEffectInfo, IDirectInputDevice2AImpl_GetForceFeedbackState, IDirectInputDevice2AImpl_SendForceFeedbackCommand, IDirectInputDevice2AImpl_EnumCreatedEffectObjects, IDirectInputDevice2AImpl_Escape, IDirectInputDevice2AImpl_Poll, IDirectInputDevice2AImpl_SendDeviceData, }; #ifdef HAVE_LINUX_22_JOYSTICK_API static ICOM_VTABLE(IDirectInputDevice2A) JoystickAvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectInputDevice2AImpl_QueryInterface, IDirectInputDevice2AImpl_AddRef, JoystickAImpl_Release, JoystickAImpl_GetCapabilities, JoystickAImpl_EnumObjects, JoystickAImpl_GetProperty, JoystickAImpl_SetProperty, JoystickAImpl_Acquire, JoystickAImpl_Unacquire, JoystickAImpl_GetDeviceState, JoystickAImpl_GetDeviceData, JoystickAImpl_SetDataFormat, JoystickAImpl_SetEventNotification, IDirectInputDevice2AImpl_SetCooperativeLevel, IDirectInputDevice2AImpl_GetObjectInfo, IDirectInputDevice2AImpl_GetDeviceInfo, IDirectInputDevice2AImpl_RunControlPanel, IDirectInputDevice2AImpl_Initialize, IDirectInputDevice2AImpl_CreateEffect, IDirectInputDevice2AImpl_EnumEffects, IDirectInputDevice2AImpl_GetEffectInfo, IDirectInputDevice2AImpl_GetForceFeedbackState, IDirectInputDevice2AImpl_SendForceFeedbackCommand, IDirectInputDevice2AImpl_EnumCreatedEffectObjects, IDirectInputDevice2AImpl_Escape, JoystickAImpl_Poll, IDirectInputDevice2AImpl_SendDeviceData, }; #endif /*********************************************************************** * DllCanUnloadNow (DINPUT.@) */ HRESULT WINAPI DINPUT_DllCanUnloadNow(void) { FIXME("(void): stub\n"); return S_FALSE; } /*********************************************************************** * DllGetClassObject (DINPUT.@) */ HRESULT WINAPI DINPUT_DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID *ppv) { FIXME("(%p, %p, %p): stub\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv); return CLASS_E_CLASSNOTAVAILABLE; } /*********************************************************************** * DllRegisterServer (DINPUT.@) */ HRESULT WINAPI DINPUT_DllRegisterServer(void) { FIXME("(void): stub\n"); return S_OK; } /*********************************************************************** * DllUnregisterServer (DINPUT.@) */ HRESULT WINAPI DINPUT_DllUnregisterServer(void) { FIXME("(void): stub\n"); return S_OK; } wine-20000526/dlls/display/0040755000175000001440000000000007113604173015052 5ustar julliarduserswine-20000526/dlls/display/.cvsignore0100644000175000001440000000004707042674746017066 0ustar julliardusersMakefile disp.s *.spec.c *.spec.glue.s wine-20000526/dlls/display/Makefile.in0100644000175000001440000000045007060307300017104 0ustar julliardusersDEFS = @DLLFLAGS@ -D__WINE__ TOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = display WRCEXTRA = -s -w16 -pdisplay SPEC_SRCS = display.spec C_SRCS = \ display_main.c RC_SRCS = \ disp.rc all: $(MODULE).o @MAKE_RULES@ ### Dependencies: wine-20000526/dlls/display/disp.rc0100644000175000001440000000231707103361647016344 0ustar julliardusers/* * resource file for DISPLAY driver dll * */ 1 OEMBIN { 0x11, /* vertical thumb height (in pixels) */ 0x11, /* horizontal thumb width (in pixels) */ 0x02, /* icon width (in pixels) */ 0x02, /* icon height (in pixels) */ 0x01, /* cursor width (in pixels) */ 0x01, /* cursor height (in pixels) */ 0x00, /* reserved */ 0x01, /* vertical-line width */ 0x01, /* horizontal-line width */ /* default system color values */ 0x00c0c0c0L, /* scrollbar */ 0x00c0c0c0L, /* desktop */ 0x00800000L, /* active caption */ 0x00ffffffL, /* inactive caption */ 0x00ffffffL, /* menu */ 0x00ffffffL, /* window */ 0x00000000L, /* window frame */ 0x00000000L, /* menu text */ 0x00000000L, /* window text */ 0x00ffffffL, /* caption text */ 0x00c0c0c0L, /* active border */ 0x00c0c0c0L, /* inactive border */ 0x00ffffffL, /* app workspace */ 0x00800000L, /* hilite bk */ 0x00ffffffL, /* hilite text */ 0x00c0c0c0L, /* btn face */ 0x00808080L, /* btn shadow */ 0x00c0c0c0L, /* gray text */ 0x00000000L, /* btn text */ 0x00000000L /* inactive caption text */ } /* this is an icon */ DUMMY1 1 { 0x0 } wine-20000526/dlls/display/display.spec0100644000175000001440000000252407036006217017372 0ustar julliardusersname display type win16 rsrc display 1 stub BitBlt 2 stub ColorInfo 3 stub Control 4 stub Disable 5 stub Enable 6 stub EnumFonts 7 stub EnumObj 8 stub Output 9 stub Pixel 10 stub RealizeObject 11 stub StrBlt 12 stub ScanLR 13 stub DeviceMode 14 stub ExtTextOut 15 stub GetCharWidth 16 stub DeviceBitmap 17 stub FastBorder 18 stub SetAttribute 19 stub DeviceBitmapBits 20 stub CreateBitmap 21 stub DIBScreenBlt # ATI driver exports 22 stub SetPalette 23 stub GetPalette 24 stub SetPaletteTranslate 25 stub GetPaletteTranslate 26 stub UpdateColors 27 stub StretchBlt 28 stub StrechDIBits 29 stub SelectBitmap 30 stub BitmapBits 31 stub ReEnable # these conflict with ordinals 19-21, thus relocated to 39-41 ! 39 stub DIBBlt 40 stub CreateDIBitmap 41 stub DIBToDevice # ATI driver end 90 stub Do_Polylines 91 stub Do_Scanlines 92 stub SaveScreenBitmap 101 pascal16 Inquire(ptr) DISPLAY_Inquire 102 pascal16 SetCursor(ptr) DISPLAY_SetCursor 103 pascal16 MoveCursor(word word) DISPLAY_MoveCursor 104 pascal16 CheckCursor() DISPLAY_CheckCursor 400 stub PExtTextOut 401 stub PStrBlt 402 stub RExtTextOut 403 stub RStrBlt 450 pascal GetDriverResourceID(word str) DISPLAY_GetDriverResourceID 500 pascal16 UserRepaintDisable(word) UserRepaintDisable16 501 stub ORDINAL_ONLY1 502 stub ORDINAL_ONLY2 600 stub InkReady 601 stub GetLPDevice wine-20000526/dlls/display/display_main.c0100644000175000001440000000361707065466037017706 0ustar julliardusers/* * DISPLAY driver * * Copyright 1998 Ulrich Weigand * */ #include "debugtools.h" #include "display.h" #include "mouse.h" #include "windef.h" #include "user.h" #include "wine/winuser16.h" DEFAULT_DEBUG_CHANNEL(cursor); /*********************************************************************** * DISPLAY_Inquire (DISPLAY.101) */ WORD WINAPI DISPLAY_Inquire(LPCURSORINFO lpCursorInfo) { lpCursorInfo->wXMickeys = 1; lpCursorInfo->wYMickeys = 1; return sizeof(CURSORINFO); } /*********************************************************************** * DISPLAY_SetCursor (DISPLAY.102) */ VOID WINAPI DISPLAY_SetCursor( struct tagCURSORICONINFO *lpCursor ) { USER_Driver->pSetCursor(lpCursor); } /*********************************************************************** * DISPLAY_MoveCursor (DISPLAY.103) */ VOID WINAPI DISPLAY_MoveCursor( WORD wAbsX, WORD wAbsY ) { USER_Driver->pMoveCursor(wAbsX, wAbsY); } /*********************************************************************** * DISPLAY_CheckCursor (DISPLAY.104) */ VOID WINAPI DISPLAY_CheckCursor( void ) { TRACE("stub\n" ); } /*********************************************************************** * DISPLAY_GetDriverResourceID (DISPLAY.450) * * Used by USER to check if driver contains better version of a builtin * resource than USER (yes, our DISPLAY does !). * wQueriedResID is the ID USER asks about. * lpsResName does often contain "OEMBIN". */ DWORD WINAPI DISPLAY_GetDriverResourceID( WORD wQueriedResID, LPSTR lpsResName ) { if (wQueriedResID == 3) return (DWORD)1; return (DWORD)wQueriedResID; } /*********************************************************************** * UserRepaintDisable (DISPLAY.500) */ VOID WINAPI UserRepaintDisable16( BOOL16 disable ) { USER_Driver->pUserRepaintDisable( disable ); } wine-20000526/dlls/dplayx/0040755000175000001440000000000007113604174014707 5ustar julliarduserswine-20000526/dlls/dplayx/.cvsignore0100644000175000001440000000006107045213572016703 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libdplayx.so.1.0 wine-20000526/dlls/dplayx/Makefile.in0100644000175000001440000000057007062775631016765 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = dplayx SOVERSION = 1.0 ALTNAMES = dplay IMPORTS = ole32 SPEC_SRCS = dplay.spec dplayx.spec C_SRCS = dplay.c \ dplobby.c \ dpclassfactory.c \ dplayx_main.c \ dplayx_global.c \ name_server.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/dplayx/dpclassfactory.c0100644000175000001440000000645107102570405020074 0ustar julliardusers #include "wine/obj_base.h" #include "winerror.h" #include "debugtools.h" #include "dpinit.h" DEFAULT_DEBUG_CHANNEL(dplay) /******************************************************************************* * DirectPlayLobby ClassFactory */ typedef struct { /* IUnknown fields */ ICOM_VFIELD(IClassFactory); DWORD ref; } IClassFactoryImpl; static HRESULT WINAPI DP_and_DPL_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) { ICOM_THIS(IClassFactoryImpl,iface); FIXME("(%p)->(%s,%p),stub!\n",This,debugstr_guid(riid),ppobj); return E_NOINTERFACE; } static ULONG WINAPI DP_and_DPL_AddRef(LPCLASSFACTORY iface) { ICOM_THIS(IClassFactoryImpl,iface); return ++(This->ref); } static ULONG WINAPI DP_and_DPL_Release(LPCLASSFACTORY iface) { ICOM_THIS(IClassFactoryImpl,iface); /* static class (reference starts @ 1), won't ever be freed */ return --(This->ref); } /* Not the most efficient implementation, but it's simple */ static HRESULT WINAPI DP_and_DPL_CreateInstance( LPCLASSFACTORY iface,LPUNKNOWN pOuter,REFIID riid,LPVOID *ppobj ) { ICOM_THIS(IClassFactoryImpl,iface); TRACE("(%p)->(%p,%s,%p)\n",This,pOuter,debugstr_guid(riid),ppobj); /* FIXME: reuse already created DP/DPL object if present? */ if ( directPlayLobby_QueryInterface( riid, ppobj ) == S_OK ) { return S_OK; } else if ( directPlay_QueryInterface( riid, ppobj ) == S_OK ) { return S_OK; } return E_NOINTERFACE; } static HRESULT WINAPI DP_and_DPL_LockServer(LPCLASSFACTORY iface,BOOL dolock) { ICOM_THIS(IClassFactoryImpl,iface); FIXME("(%p)->(%d),stub!\n",This,dolock); return S_OK; } static ICOM_VTABLE(IClassFactory) DP_and_DPL_Vtbl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DP_and_DPL_QueryInterface, DP_and_DPL_AddRef, DP_and_DPL_Release, DP_and_DPL_CreateInstance, DP_and_DPL_LockServer }; static IClassFactoryImpl DP_and_DPL_CF = {&DP_and_DPL_Vtbl, 1 }; /******************************************************************************* * DPLAYX_DllGetClassObject [DPLAYX.?] * Retrieves DP or DPL class object from a DLL object * * NOTES * Docs say returns STDAPI * * PARAMS * rclsid [I] CLSID for the class object * riid [I] Reference to identifier of interface for class object * ppv [O] Address of variable to receive interface pointer for riid * * RETURNS * Success: S_OK * Failure: CLASS_E_CLASSNOTAVAILABLE, E_OUTOFMEMORY, E_INVALIDARG, * E_UNEXPECTED */ DWORD WINAPI DPLAYX_DllGetClassObject(REFCLSID rclsid,REFIID riid,LPVOID *ppv) { TRACE("(%p,%p,%p)\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv); if ( IsEqualCLSID( riid, &IID_IClassFactory ) ) { *ppv = (LPVOID)&DP_and_DPL_CF; IClassFactory_AddRef( (IClassFactory*)*ppv ); return S_OK; } ERR("(%p,%p,%p): no interface found.\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv); return CLASS_E_CLASSNOTAVAILABLE; } /*********************************************************************** * DllCanUnloadNow (DPLAYX.@) */ HRESULT WINAPI DPLAYX_DllCanUnloadNow(void) { FIXME("(void): stub\n"); return S_FALSE; } wine-20000526/dlls/dplayx/dpinit.h0100644000175000001440000000032106774167125016354 0ustar julliardusers #ifndef __WINE_DPINIT_H #define __WINE_DPINIT_H extern HRESULT directPlay_QueryInterface( REFIID riid, LPVOID* ppvObj ); extern HRESULT directPlayLobby_QueryInterface( REFIID riid, LPVOID* ppvObj ); #endif wine-20000526/dlls/dplayx/dplay.c0100644000175000001440000023451607113575026016177 0ustar julliardusers/* Direct Play 2,3,4 Implementation * * Copyright 1998,1999,2000 - Peter Hunnisett * * * */ #include #include "winerror.h" #include "winbase.h" #include "winnt.h" #include "winreg.h" #include "dplay.h" #include "heap.h" #include "debugtools.h" #include "dpinit.h" #include "dplayx_global.h" #include "name_server.h" /* FIXME: This stuff shouldn't really be here. It indicates a poor architectural coupling */ #include "dplobby.h" extern HRESULT DPL_CreateCompoundAddress ( LPCDPCOMPOUNDADDRESSELEMENT lpElements, DWORD dwElementCount, LPVOID lpAddress, LPDWORD lpdwAddressSize, BOOL bAnsiInterface ); DEFAULT_DEBUG_CHANNEL(dplay) /***************************************************************************** * Predeclare the interface implementation structures */ typedef struct IDirectPlay2Impl IDirectPlay2AImpl; typedef struct IDirectPlay2Impl IDirectPlay2Impl; typedef struct IDirectPlay3Impl IDirectPlay3AImpl; typedef struct IDirectPlay3Impl IDirectPlay3Impl; typedef struct IDirectPlay4Impl IDirectPlay4AImpl; typedef struct IDirectPlay4Impl IDirectPlay4Impl; /***************************************************************************** * IDirectPlay implementation structure * * The philosophy behind this extra pointer derefernce is that I wanted to * have the same structure for all types of objects without having to do * alot of casting. I also only wanted to implement an interface in the * object it was "released" with IUnknown interface being implemented in the 1 version. * Of course, with these new interfaces comes the data required to keep the state required * by these interfaces. So, basically, the pointers contain the data associated with * a release. If you use the data associated with release 3 in a release 2 object, you'll * get a run time trap, as that won't have any data. * */ typedef struct tagDirectPlayIUnknownData { DWORD ref; CRITICAL_SECTION DP_lock; } DirectPlayIUnknownData; typedef struct _enumSessionAsyncCallbackData { LPDPENUMSESSIONSCALLBACK2 cb; LPVOID lpContext; DWORD dwTimeout; } EnumSessionAsyncCallbackData; /* Contains all dp1 and dp2 data members */ typedef struct tagDirectPlay2Data { BOOL bConnectionOpen; HANDLE hEnumSessionThread; EnumSessionAsyncCallbackData enumSessionAsyncCallbackData; LPVOID lpNameServerData; /* DPlay interface doesn't know type */ } DirectPlay2Data; typedef struct tagDirectPlay3Data { BOOL bConnectionInitialized; } DirectPlay3Data; typedef struct tagDirectPlay4Data { BOOL dummy; } DirectPlay4Data; #define DP_IMPL_FIELDS \ DirectPlayIUnknownData* unk; \ DirectPlay2Data* dp2; \ DirectPlay3Data* dp3; \ DirectPlay4Data* dp4; struct IDirectPlay2Impl { ICOM_VFIELD(IDirectPlay2); DP_IMPL_FIELDS }; struct IDirectPlay3Impl { ICOM_VFIELD(IDirectPlay3); DP_IMPL_FIELDS }; struct IDirectPlay4Impl { ICOM_VFIELD(IDirectPlay4); DP_IMPL_FIELDS }; /* Forward declarations of virtual tables */ static ICOM_VTABLE(IDirectPlay2) directPlay2AVT; static ICOM_VTABLE(IDirectPlay3) directPlay3AVT; static ICOM_VTABLE(IDirectPlay4) directPlay4AVT; static ICOM_VTABLE(IDirectPlay2) directPlay2WVT; static ICOM_VTABLE(IDirectPlay3) directPlay3WVT; static ICOM_VTABLE(IDirectPlay4) directPlay4WVT; BOOL DP_CreateIUnknown( LPVOID lpDP ) { ICOM_THIS(IDirectPlay2AImpl,lpDP); This->unk = (DirectPlayIUnknownData*)HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( *(This->unk) ) ); if ( This->unk == NULL ) { return FALSE; } InitializeCriticalSection( &This->unk->DP_lock ); IDirectPlay_AddRef( (LPDIRECTPLAY2A)lpDP ); return TRUE; } BOOL DP_DestroyIUnknown( LPVOID lpDP ) { ICOM_THIS(IDirectPlay2AImpl,lpDP); DeleteCriticalSection( &This->unk->DP_lock ); HeapFree( GetProcessHeap(), 0, This->unk ); return TRUE; } BOOL DP_CreateDirectPlay2( LPVOID lpDP ) { ICOM_THIS(IDirectPlay2AImpl,lpDP); This->dp2 = (DirectPlay2Data*)HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( *(This->dp2) ) ); if ( This->dp2 == NULL ) { return FALSE; } This->dp2->bConnectionOpen = FALSE; This->dp2->hEnumSessionThread = INVALID_HANDLE_VALUE; This->dp2->enumSessionAsyncCallbackData.cb = NULL; This->dp2->enumSessionAsyncCallbackData.lpContext = NULL; This->dp2->enumSessionAsyncCallbackData.dwTimeout = INFINITE; if( !NS_InitializeSessionCache( &This->dp2->lpNameServerData ) ) { return FALSE; } return TRUE; } BOOL DP_DestroyDirectPlay2( LPVOID lpDP ) { ICOM_THIS(IDirectPlay2AImpl,lpDP); if( This->dp2->hEnumSessionThread != INVALID_HANDLE_VALUE ) { TerminateThread( This->dp2->hEnumSessionThread, 0 ); CloseHandle( This->dp2->hEnumSessionThread ); } NS_DeleteSessionCache( This->dp2->lpNameServerData ); /* Delete the contents */ HeapFree( GetProcessHeap(), 0, This->dp2 ); return TRUE; } BOOL DP_CreateDirectPlay3( LPVOID lpDP ) { ICOM_THIS(IDirectPlay3AImpl,lpDP); This->dp3 = (DirectPlay3Data*)HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( *(This->dp3) ) ); if ( This->dp3 == NULL ) { return FALSE; } This->dp3->bConnectionInitialized = FALSE; return TRUE; } BOOL DP_DestroyDirectPlay3( LPVOID lpDP ) { ICOM_THIS(IDirectPlay3AImpl,lpDP); /* Delete the contents */ HeapFree( GetProcessHeap(), 0, This->dp3 ); return TRUE; } BOOL DP_CreateDirectPlay4( LPVOID lpDP ) { ICOM_THIS(IDirectPlay4AImpl,lpDP); This->dp4 = (DirectPlay4Data*)HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( *(This->dp4) ) ); if ( This->dp4 == NULL ) { return FALSE; } return TRUE; } BOOL DP_DestroyDirectPlay4( LPVOID lpDP ) { ICOM_THIS(IDirectPlay3AImpl,lpDP); /* Delete the contents */ HeapFree( GetProcessHeap(), 0, This->dp4 ); return TRUE; } /* Get a new interface. To be used by QueryInterface. */ extern HRESULT directPlay_QueryInterface ( REFIID riid, LPVOID* ppvObj ) { if( IsEqualGUID( &IID_IDirectPlay2, riid ) ) { *ppvObj = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( IDirectPlay2Impl ) ); if( *ppvObj == NULL ) { return DPERR_OUTOFMEMORY; } /* new scope for variable declaration */ { ICOM_THIS(IDirectPlay2Impl,*ppvObj); ICOM_VTBL(This) = &directPlay2WVT; if ( DP_CreateIUnknown( (LPVOID)This ) && DP_CreateDirectPlay2( (LPVOID)This ) ) { return S_OK; } } goto error; } else if( IsEqualGUID( &IID_IDirectPlay2A, riid ) ) { *ppvObj = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( IDirectPlay2AImpl ) ); if( *ppvObj == NULL ) { return DPERR_OUTOFMEMORY; } /* new scope for variable declaration */ { ICOM_THIS(IDirectPlay2AImpl,*ppvObj); ICOM_VTBL(This) = &directPlay2AVT; if ( DP_CreateIUnknown( (LPVOID)This ) && DP_CreateDirectPlay2( (LPVOID)This ) ) { return S_OK; } } goto error; } else if( IsEqualGUID( &IID_IDirectPlay3, riid ) ) { *ppvObj = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( IDirectPlay3Impl ) ); if( *ppvObj == NULL ) { return DPERR_OUTOFMEMORY; } /* new scope for variable declaration */ { ICOM_THIS(IDirectPlay3Impl,*ppvObj); ICOM_VTBL(This) = &directPlay3WVT; if ( DP_CreateIUnknown( (LPVOID)This ) && DP_CreateDirectPlay2( (LPVOID)This ) && DP_CreateDirectPlay3( (LPVOID)This ) ) { return S_OK; } } goto error; } else if( IsEqualGUID( &IID_IDirectPlay3A, riid ) ) { *ppvObj = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( IDirectPlay3AImpl ) ); if( *ppvObj == NULL ) { return DPERR_OUTOFMEMORY; } /* new scope for variable declaration */ { ICOM_THIS(IDirectPlay3AImpl,*ppvObj); ICOM_VTBL(This) = &directPlay3AVT; if ( DP_CreateIUnknown( (LPVOID)This ) && DP_CreateDirectPlay2( (LPVOID)This ) && DP_CreateDirectPlay3( (LPVOID)This ) ) { return S_OK; } } goto error; } else if( IsEqualGUID( &IID_IDirectPlay4, riid ) ) { *ppvObj = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( IDirectPlay4Impl ) ); if( *ppvObj == NULL ) { return DPERR_OUTOFMEMORY; } /* new scope for variable declaration */ { ICOM_THIS(IDirectPlay4Impl,*ppvObj); ICOM_VTBL(This) = &directPlay4WVT; if ( DP_CreateIUnknown( (LPVOID)This ) && DP_CreateDirectPlay2( (LPVOID)This ) && DP_CreateDirectPlay3( (LPVOID)This ) && DP_CreateDirectPlay4( (LPVOID)This ) ) { return S_OK; } } goto error; } else if( IsEqualGUID( &IID_IDirectPlay4A, riid ) ) { *ppvObj = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( IDirectPlay4AImpl ) ); if( *ppvObj == NULL ) { return DPERR_OUTOFMEMORY; } /* new scope for variable declaration */ { ICOM_THIS(IDirectPlay4AImpl,*ppvObj); ICOM_VTBL(This) = &directPlay4AVT; if ( DP_CreateIUnknown( (LPVOID)This ) && DP_CreateDirectPlay2( (LPVOID)This ) && DP_CreateDirectPlay3( (LPVOID)This ) && DP_CreateDirectPlay4( (LPVOID)This ) ) { return S_OK; } } goto error; } /* Unsupported interface */ *ppvObj = NULL; return E_NOINTERFACE; error: DP_DestroyDirectPlay4( *ppvObj ); DP_DestroyDirectPlay3( *ppvObj ); DP_DestroyDirectPlay2( *ppvObj ); DP_DestroyIUnknown( *ppvObj ); HeapFree( GetProcessHeap(), 0, *ppvObj ); *ppvObj = NULL; return DPERR_NOMEMORY; } /* Direct Play methods */ static HRESULT WINAPI DirectPlay2W_QueryInterface ( LPDIRECTPLAY2 iface, REFIID riid, LPVOID* ppvObj ) { ICOM_THIS(IDirectPlay2Impl,iface); TRACE("(%p)->(%p,%p)\n", This, riid, ppvObj ); if( IsEqualGUID( &IID_IUnknown, riid ) || IsEqualGUID( &IID_IDirectPlay2, riid ) ) { IDirectPlayX_AddRef( iface ); *ppvObj = This; return S_OK; } return directPlay_QueryInterface( riid, ppvObj ); } static HRESULT WINAPI DirectPlay2A_QueryInterface ( LPDIRECTPLAY2A iface, REFIID riid, LPVOID* ppvObj ) { ICOM_THIS(IDirectPlay2Impl,iface); TRACE("(%p)->(%p,%p)\n", This, riid, ppvObj ); if( IsEqualGUID( &IID_IUnknown, riid ) || IsEqualGUID( &IID_IDirectPlay2A, riid ) ) { IDirectPlayX_AddRef( iface ); *ppvObj = This; return S_OK; } return directPlay_QueryInterface( riid, ppvObj ); } static HRESULT WINAPI DirectPlay3WImpl_QueryInterface ( LPDIRECTPLAY3 iface, REFIID riid, LPVOID* ppvObj ) { ICOM_THIS(IDirectPlay3Impl,iface); TRACE("(%p)->(%p,%p)\n", This, riid, ppvObj ); if( IsEqualGUID( &IID_IUnknown, riid ) || IsEqualGUID( &IID_IDirectPlay3, riid ) ) { IDirectPlayX_AddRef( iface ); *ppvObj = This; return S_OK; } return directPlay_QueryInterface( riid, ppvObj ); } static HRESULT WINAPI DirectPlay3AImpl_QueryInterface ( LPDIRECTPLAY3A iface, REFIID riid, LPVOID* ppvObj ) { ICOM_THIS(IDirectPlay3Impl,iface); TRACE("(%p)->(%p,%p)\n", This, riid, ppvObj ); if( IsEqualGUID( &IID_IUnknown, riid ) || IsEqualGUID( &IID_IDirectPlay3A, riid ) ) { IDirectPlayX_AddRef( iface ); *ppvObj = This; return S_OK; } return directPlay_QueryInterface( riid, ppvObj ); } static HRESULT WINAPI DirectPlay4WImpl_QueryInterface ( LPDIRECTPLAY4 iface, REFIID riid, LPVOID* ppvObj ) { ICOM_THIS(IDirectPlay4Impl,iface); TRACE("(%p)->(%p,%p)\n", This, riid, ppvObj ); if( IsEqualGUID( &IID_IUnknown, riid ) || IsEqualGUID( &IID_IDirectPlay4, riid ) ) { IDirectPlayX_AddRef( iface ); *ppvObj = This; return S_OK; } return directPlay_QueryInterface( riid, ppvObj ); } static HRESULT WINAPI DirectPlay4AImpl_QueryInterface ( LPDIRECTPLAY4A iface, REFIID riid, LPVOID* ppvObj ) { ICOM_THIS(IDirectPlay4Impl,iface); TRACE("(%p)->(%p,%p)\n", This, riid, ppvObj ); if( IsEqualGUID( &IID_IUnknown, riid ) || IsEqualGUID( &IID_IDirectPlay4A, riid ) ) { IDirectPlayX_AddRef( iface ); *ppvObj = This; return S_OK; } return directPlay_QueryInterface( riid, ppvObj ); } /* Shared between all dplay types */ static ULONG WINAPI DirectPlay2AImpl_AddRef ( LPDIRECTPLAY3 iface ) { ULONG refCount; ICOM_THIS(IDirectPlay3Impl,iface); EnterCriticalSection( &This->unk->DP_lock ); { refCount = ++(This->unk->ref); } LeaveCriticalSection( &This->unk->DP_lock ); TRACE("ref count incremented to %lu for %p\n", refCount, This ); return refCount; } static ULONG WINAPI DirectPlay2AImpl_Release ( LPDIRECTPLAY3 iface ) { ULONG refCount; ICOM_THIS(IDirectPlay3Impl,iface); EnterCriticalSection( &This->unk->DP_lock ); { refCount = --(This->unk->ref); } LeaveCriticalSection( &This->unk->DP_lock ); TRACE("ref count decremented to %lu for %p\n", refCount, This ); /* Deallocate if this is the last reference to the object */ if( refCount == 0 ) { DP_DestroyDirectPlay4( This ); DP_DestroyDirectPlay3( This ); DP_DestroyDirectPlay2( This ); DP_DestroyIUnknown( This ); HeapFree( GetProcessHeap(), 0, This ); } return refCount; } static HRESULT WINAPI DirectPlay2AImpl_AddPlayerToGroup ( LPDIRECTPLAY2A iface, DPID idGroup, DPID idPlayer ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx): stub\n", This, idGroup, idPlayer ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_AddPlayerToGroup ( LPDIRECTPLAY2 iface, DPID idGroup, DPID idPlayer ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx): stub\n", This, idGroup, idPlayer ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_Close ( LPDIRECTPLAY2A iface ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(): stub\n", This ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_Close ( LPDIRECTPLAY2 iface ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(): stub\n", This ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_CreateGroup ( LPDIRECTPLAY2A iface, LPDPID lpidGroup, LPDPNAME lpGroupName, LPVOID lpData, DWORD dwDataSize, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,%p,%p,0x%08lx,0x%08lx): stub\n", This, lpidGroup, lpGroupName, lpData, dwDataSize, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_CreateGroup ( LPDIRECTPLAY2 iface, LPDPID lpidGroup, LPDPNAME lpGroupName, LPVOID lpData, DWORD dwDataSize, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,%p,%p,0x%08lx,0x%08lx): stub\n", This, lpidGroup, lpGroupName, lpData, dwDataSize, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_CreatePlayer ( LPDIRECTPLAY2A iface, LPDPID lpidPlayer, LPDPNAME lpPlayerName, HANDLE hEvent, LPVOID lpData, DWORD dwDataSize, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,%p,%d,%p,0x%08lx,0x%08lx): stub\n", This, lpidPlayer, lpPlayerName, hEvent, lpData, dwDataSize, dwFlags ); /* FIXME: Should send DPMSG_CREATEPLAYERORGROUP message to everyone, local and remote, that belongs to this session */ return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_CreatePlayer ( LPDIRECTPLAY2 iface, LPDPID lpidPlayer, LPDPNAME lpPlayerName, HANDLE hEvent, LPVOID lpData, DWORD dwDataSize, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,%p,%d,%p,0x%08lx,0x%08lx): stub\n", This, lpidPlayer, lpPlayerName, hEvent, lpData, dwDataSize, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_DeletePlayerFromGroup ( LPDIRECTPLAY2A iface, DPID idGroup, DPID idPlayer ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx): stub\n", This, idGroup, idPlayer ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_DeletePlayerFromGroup ( LPDIRECTPLAY2 iface, DPID idGroup, DPID idPlayer ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx): stub\n", This, idGroup, idPlayer ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_DestroyGroup ( LPDIRECTPLAY2A iface, DPID idGroup ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx): stub\n", This, idGroup ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_DestroyGroup ( LPDIRECTPLAY2 iface, DPID idGroup ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx): stub\n", This, idGroup ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_DestroyPlayer ( LPDIRECTPLAY2A iface, DPID idPlayer ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx): stub\n", This, idPlayer ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_DestroyPlayer ( LPDIRECTPLAY2 iface, DPID idPlayer ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx): stub\n", This, idPlayer ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_EnumGroupPlayers ( LPDIRECTPLAY2A iface, DPID idGroup, LPGUID lpguidInstance, LPDPENUMPLAYERSCALLBACK2 lpEnumPlayersCallback2, LPVOID lpContext, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p,%p,0x%08lx): stub\n", This, idGroup, lpguidInstance, lpEnumPlayersCallback2, lpContext, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_EnumGroupPlayers ( LPDIRECTPLAY2 iface, DPID idGroup, LPGUID lpguidInstance, LPDPENUMPLAYERSCALLBACK2 lpEnumPlayersCallback2, LPVOID lpContext, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p,%p,0x%08lx): stub\n", This, idGroup, lpguidInstance, lpEnumPlayersCallback2, lpContext, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_EnumGroups ( LPDIRECTPLAY2A iface, LPGUID lpguidInstance, LPDPENUMPLAYERSCALLBACK2 lpEnumPlayersCallback2, LPVOID lpContext, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,%p,%p,0x%08lx): stub\n", This, lpguidInstance, lpEnumPlayersCallback2, lpContext, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_EnumGroups ( LPDIRECTPLAY2 iface, LPGUID lpguidInstance, LPDPENUMPLAYERSCALLBACK2 lpEnumPlayersCallback2, LPVOID lpContext, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,%p,%p,0x%08lx): stub\n", This, lpguidInstance, lpEnumPlayersCallback2, lpContext, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_EnumPlayers ( LPDIRECTPLAY2A iface, LPGUID lpguidInstance, LPDPENUMPLAYERSCALLBACK2 lpEnumPlayersCallback2, LPVOID lpContext, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,%p,%p,0x%08lx): stub\n", This, lpguidInstance, lpEnumPlayersCallback2, lpContext, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_EnumPlayers ( LPDIRECTPLAY2 iface, LPGUID lpguidInstance, LPDPENUMPLAYERSCALLBACK2 lpEnumPlayersCallback2, LPVOID lpContext, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,%p,%p,0x%08lx): stub\n", This, lpguidInstance, lpEnumPlayersCallback2, lpContext, dwFlags ); return DP_OK; } /* This function should call the registered callback function that the user passed into EnumSessions for each entry available. */ static void DP_InvokeEnumSessionCallbacksA( LPDPENUMSESSIONSCALLBACK2 lpEnumSessionsCallback2, LPVOID lpNSInfo, DWORD dwTimeout, LPVOID lpContext ) { LPDPSESSIONDESC2 lpSessionDesc; FIXME( ": not checking for conditions\n" ); NS_ResetSessionEnumeration( lpNSInfo ); /* Enumerate all sessions */ while( (lpSessionDesc = NS_WalkSessions( lpNSInfo ) ) != NULL ) { TRACE( "EnumSessionsCallback2 invoked\n" ); if( !lpEnumSessionsCallback2( lpSessionDesc, &dwTimeout, 0, lpContext ) ) { return; } } } static DWORD CALLBACK DP_EnumSessionsSpwanThreadA( LPVOID lpContext ) { ICOM_THIS(IDirectPlay2Impl,lpContext); DWORD dwTimeout = This->dp2->enumSessionAsyncCallbackData.dwTimeout; TRACE( "(%p)->(0x%08lx)\n", This, dwTimeout ); /* FIXME: Don't think this is exactly right. It'll do for now */ for( ;; ) { /* 2: Send the broadcast for session enumeration */ NS_SendSessionRequestBroadcast( This->dp2->lpNameServerData ); SleepEx( dwTimeout, FALSE ); DP_InvokeEnumSessionCallbacksA( This->dp2->enumSessionAsyncCallbackData.cb, This->dp2->lpNameServerData, dwTimeout, This->dp2->enumSessionAsyncCallbackData.lpContext ); /* All sessions have been enumerated. Invoke the callback function once more indicating a timeout has occured. This is the way that the application can indicate that it wishes to continue with the enumeration */ if( !(This->dp2->enumSessionAsyncCallbackData.cb)( NULL, &dwTimeout, DPESC_TIMEDOUT, lpContext ) ) { /* The application doesn't want us to continue - end this thread */ return 0; } } return 1; } static HRESULT WINAPI DirectPlay2AImpl_EnumSessions ( LPDIRECTPLAY2A iface, LPDPSESSIONDESC2 lpsd, DWORD dwTimeout, LPDPENUMSESSIONSCALLBACK2 lpEnumSessionsCallback2, LPVOID lpContext, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); TRACE("(%p)->(%p,0x%08lx,%p,%p,0x%08lx)\n", This, lpsd, dwTimeout, lpEnumSessionsCallback2, lpContext, dwFlags ); if( dwTimeout == 0 ) { /* Should actually be getting the dwTimeout value through IDirectPlay_GetCaps( This, ...) */ FIXME( ": should provide a dependent dwTimeout\n" ); dwTimeout = 5 * 1000; /* 5 seconds */ } if( dwFlags & DPENUMSESSIONS_STOPASYNC ) { /* Does a thread exist? If so we were doing an async enum session */ if( This->dp2->hEnumSessionThread != INVALID_HANDLE_VALUE ) { /* FIXME: This needs to be send an event to the thread to clean itself up nicely */ TerminateThread( This->dp2->hEnumSessionThread, 0 ); CloseHandle( This->dp2->hEnumSessionThread ); This->dp2->hEnumSessionThread = INVALID_HANDLE_VALUE; This->dp2->enumSessionAsyncCallbackData.cb = NULL; This->dp2->enumSessionAsyncCallbackData.lpContext = NULL; This->dp2->enumSessionAsyncCallbackData.dwTimeout = INFINITE; return DP_OK; } /* Indicate some sort of error... */ WARN( "STOPASYNC attempted when no async running\n" ); return DP_OK; } /* FIXME: Interface locking sucks in this method */ if( ( dwFlags & DPENUMSESSIONS_ASYNC ) ) { DWORD dwThreadId; /* Enumerate everything presently in the local session cache */ DP_InvokeEnumSessionCallbacksA( lpEnumSessionsCallback2, This->dp2->lpNameServerData, dwTimeout, lpContext ); /* See if we've already created a thread to service this interface */ if( This->dp2->hEnumSessionThread == INVALID_HANDLE_VALUE ) { /* FIXME: Should be adding a reference here - another thread now knows how to call this interface */ This->dp2->enumSessionAsyncCallbackData.cb = lpEnumSessionsCallback2; This->dp2->enumSessionAsyncCallbackData.lpContext = lpContext; This->dp2->enumSessionAsyncCallbackData.dwTimeout = dwTimeout; TRACE( ": creating EnumSessions thread\n" ); This->dp2->hEnumSessionThread = CreateThread( NULL, 0, DP_EnumSessionsSpwanThreadA, This, 0, &dwThreadId ); } } else { /* Send the broadcast for session enumeration */ NS_SendSessionRequestBroadcast( This->dp2->lpNameServerData ); SleepEx( dwTimeout, FALSE ); DP_InvokeEnumSessionCallbacksA( lpEnumSessionsCallback2, This->dp2->lpNameServerData, dwTimeout, lpContext ); } return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_EnumSessions ( LPDIRECTPLAY2 iface, LPDPSESSIONDESC2 lpsd, DWORD dwTimeout, LPDPENUMSESSIONSCALLBACK2 lpEnumSessionsCallback2, LPVOID lpContext, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,0x%08lx,%p,%p,0x%08lx): stub\n", This, lpsd, dwTimeout, lpEnumSessionsCallback2, lpContext, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_GetCaps ( LPDIRECTPLAY2A iface, LPDPCAPS lpDPCaps, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,0x%08lx): stub\n", This, lpDPCaps, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_GetCaps ( LPDIRECTPLAY2 iface, LPDPCAPS lpDPCaps, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,0x%08lx): stub\n", This, lpDPCaps, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_GetGroupData ( LPDIRECTPLAY2 iface, DPID idGroup, LPVOID lpData, LPDWORD lpdwDataSize, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p,0x%08lx): stub\n", This, idGroup, lpData, lpdwDataSize, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_GetGroupData ( LPDIRECTPLAY2 iface, DPID idGroup, LPVOID lpData, LPDWORD lpdwDataSize, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p,0x%08lx): stub\n", This, idGroup, lpData, lpdwDataSize, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_GetGroupName ( LPDIRECTPLAY2A iface, DPID idGroup, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p): stub\n", This, idGroup, lpData, lpdwDataSize ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_GetGroupName ( LPDIRECTPLAY2 iface, DPID idGroup, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p): stub\n", This, idGroup, lpData, lpdwDataSize ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_GetMessageCount ( LPDIRECTPLAY2A iface, DPID idPlayer, LPDWORD lpdwCount ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p): stub\n", This, idPlayer, lpdwCount ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_GetMessageCount ( LPDIRECTPLAY2 iface, DPID idPlayer, LPDWORD lpdwCount ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p): stub\n", This, idPlayer, lpdwCount ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_GetPlayerAddress ( LPDIRECTPLAY2A iface, DPID idPlayer, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p): stub\n", This, idPlayer, lpData, lpdwDataSize ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_GetPlayerAddress ( LPDIRECTPLAY2 iface, DPID idPlayer, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p): stub\n", This, idPlayer, lpData, lpdwDataSize ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_GetPlayerCaps ( LPDIRECTPLAY2A iface, DPID idPlayer, LPDPCAPS lpPlayerCaps, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,0x%08lx): stub\n", This, idPlayer, lpPlayerCaps, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_GetPlayerCaps ( LPDIRECTPLAY2 iface, DPID idPlayer, LPDPCAPS lpPlayerCaps, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,0x%08lx): stub\n", This, idPlayer, lpPlayerCaps, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_GetPlayerData ( LPDIRECTPLAY2A iface, DPID idPlayer, LPVOID lpData, LPDWORD lpdwDataSize, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p,0x%08lx): stub\n", This, idPlayer, lpData, lpdwDataSize, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_GetPlayerData ( LPDIRECTPLAY2 iface, DPID idPlayer, LPVOID lpData, LPDWORD lpdwDataSize, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p,0x%08lx): stub\n", This, idPlayer, lpData, lpdwDataSize, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_GetPlayerName ( LPDIRECTPLAY2 iface, DPID idPlayer, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p): stub\n", This, idPlayer, lpData, lpdwDataSize ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_GetPlayerName ( LPDIRECTPLAY2 iface, DPID idPlayer, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p): stub\n", This, idPlayer, lpData, lpdwDataSize ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_GetSessionDesc ( LPDIRECTPLAY2A iface, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lpData, lpdwDataSize ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_GetSessionDesc ( LPDIRECTPLAY2 iface, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,%p): stub\n", This, lpData, lpdwDataSize ); return DP_OK; } /* Intended only for COM compatibility. Always returns an error. */ static HRESULT WINAPI DirectPlay2AImpl_Initialize ( LPDIRECTPLAY2A iface, LPGUID lpGUID ) { ICOM_THIS(IDirectPlay2Impl,iface); TRACE("(%p)->(%p): stub\n", This, lpGUID ); return DPERR_ALREADYINITIALIZED; } /* Intended only for COM compatibility. Always returns an error. */ static HRESULT WINAPI DirectPlay2WImpl_Initialize ( LPDIRECTPLAY2 iface, LPGUID lpGUID ) { ICOM_THIS(IDirectPlay2Impl,iface); TRACE("(%p)->(%p): stub\n", This, lpGUID ); return DPERR_ALREADYINITIALIZED; } static HRESULT WINAPI DirectPlay2AImpl_Open ( LPDIRECTPLAY2A iface, LPDPSESSIONDESC2 lpsd, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,0x%08lx): stub\n", This, lpsd, dwFlags ); if( This->dp2->bConnectionOpen ) { TRACE( ": rejecting already open connection.\n" ); return DPERR_ALREADYINITIALIZED; } /* When we open we need to stop any EnumSession activity */ IDirectPlayX_EnumSessions( iface, NULL, 0, NULL, NULL, DPENUMSESSIONS_STOPASYNC ); if( dwFlags & DPOPEN_CREATE ) { dwFlags &= ~DPOPEN_CREATE; /* Rightoo - this computer is the host and the local computer needs to be the name server so that others can join this session */ NS_SetLocalComputerAsNameServer( lpsd ); } if( dwFlags ) { ERR( ": ignored dwFlags 0x%08lx\n", dwFlags ); } return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_Open ( LPDIRECTPLAY2 iface, LPDPSESSIONDESC2 lpsd, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,0x%08lx): stub\n", This, lpsd, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_Receive ( LPDIRECTPLAY2A iface, LPDPID lpidFrom, LPDPID lpidTo, DWORD dwFlags, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,%p,0x%08lx,%p,%p): stub\n", This, lpidFrom, lpidTo, dwFlags, lpData, lpdwDataSize ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_Receive ( LPDIRECTPLAY2 iface, LPDPID lpidFrom, LPDPID lpidTo, DWORD dwFlags, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,%p,0x%08lx,%p,%p): stub\n", This, lpidFrom, lpidTo, dwFlags, lpData, lpdwDataSize ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_Send ( LPDIRECTPLAY2A iface, DPID idFrom, DPID idTo, DWORD dwFlags, LPVOID lpData, DWORD dwDataSize ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx,0x%08lx,%p,0x%08lx): stub\n", This, idFrom, idTo, dwFlags, lpData, dwDataSize ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_Send ( LPDIRECTPLAY2 iface, DPID idFrom, DPID idTo, DWORD dwFlags, LPVOID lpData, DWORD dwDataSize ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx,0x%08lx,%p,0x%08lx): stub\n", This, idFrom, idTo, dwFlags, lpData, dwDataSize ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_SetGroupData ( LPDIRECTPLAY2A iface, DPID idGroup, LPVOID lpData, DWORD dwDataSize, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,0x%08lx,0x%08lx): stub\n", This, idGroup, lpData, dwDataSize, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_SetGroupData ( LPDIRECTPLAY2 iface, DPID idGroup, LPVOID lpData, DWORD dwDataSize, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,0x%08lx,0x%08lx): stub\n", This, idGroup, lpData, dwDataSize, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_SetGroupName ( LPDIRECTPLAY2A iface, DPID idGroup, LPDPNAME lpGroupName, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,0x%08lx): stub\n", This, idGroup, lpGroupName, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_SetGroupName ( LPDIRECTPLAY2 iface, DPID idGroup, LPDPNAME lpGroupName, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,0x%08lx): stub\n", This, idGroup, lpGroupName, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_SetPlayerData ( LPDIRECTPLAY2A iface, DPID idPlayer, LPVOID lpData, DWORD dwDataSize, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,0x%08lx,0x%08lx): stub\n", This, idPlayer, lpData, dwDataSize, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_SetPlayerData ( LPDIRECTPLAY2 iface, DPID idPlayer, LPVOID lpData, DWORD dwDataSize, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,0x%08lx,0x%08lx): stub\n", This, idPlayer, lpData, dwDataSize, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_SetPlayerName ( LPDIRECTPLAY2A iface, DPID idPlayer, LPDPNAME lpPlayerName, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,0x%08lx): stub\n", This, idPlayer, lpPlayerName, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_SetPlayerName ( LPDIRECTPLAY2 iface, DPID idPlayer, LPDPNAME lpPlayerName, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(0x%08lx,%p,0x%08lx): stub\n", This, idPlayer, lpPlayerName, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2AImpl_SetSessionDesc ( LPDIRECTPLAY2A iface, LPDPSESSIONDESC2 lpSessDesc, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,0x%08lx): stub\n", This, lpSessDesc, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay2WImpl_SetSessionDesc ( LPDIRECTPLAY2 iface, LPDPSESSIONDESC2 lpSessDesc, DWORD dwFlags ) { ICOM_THIS(IDirectPlay2Impl,iface); FIXME("(%p)->(%p,0x%08lx): stub\n", This, lpSessDesc, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay3AImpl_AddGroupToGroup ( LPDIRECTPLAY3A iface, DPID idParentGroup, DPID idGroup ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx): stub\n", This, idParentGroup, idGroup ); return DP_OK; } static HRESULT WINAPI DirectPlay3WImpl_AddGroupToGroup ( LPDIRECTPLAY3 iface, DPID idParentGroup, DPID idGroup ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx): stub\n", This, idParentGroup, idGroup ); return DP_OK; } static HRESULT WINAPI DirectPlay3AImpl_CreateGroupInGroup ( LPDIRECTPLAY3A iface, DPID idParentGroup, LPDPID lpidGroup, LPDPNAME lpGroupName, LPVOID lpData, DWORD dwDataSize, DWORD dwFlags ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p,%p,0x%08lx,0x%08lx): stub\n", This, idParentGroup, lpidGroup, lpGroupName, lpData, dwDataSize, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay3WImpl_CreateGroupInGroup ( LPDIRECTPLAY3 iface, DPID idParentGroup, LPDPID lpidGroup, LPDPNAME lpGroupName, LPVOID lpData, DWORD dwDataSize, DWORD dwFlags ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p,%p,0x%08lx,0x%08lx): stub\n", This, idParentGroup, lpidGroup, lpGroupName, lpData, dwDataSize, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay3AImpl_DeleteGroupFromGroup ( LPDIRECTPLAY3A iface, DPID idParentGroup, DPID idGroup ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx): stub\n", This, idParentGroup, idGroup ); return DP_OK; } static HRESULT WINAPI DirectPlay3WImpl_DeleteGroupFromGroup ( LPDIRECTPLAY3 iface, DPID idParentGroup, DPID idGroup ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx): stub\n", This, idParentGroup, idGroup ); return DP_OK; } static HRESULT WINAPI DirectPlay3AImpl_EnumConnections ( LPDIRECTPLAY3A iface, LPCGUID lpguidApplication, LPDPENUMCONNECTIONSCALLBACK lpEnumCallback, LPVOID lpContext, DWORD dwFlags ) { ICOM_THIS(IDirectPlay3Impl,iface); TRACE("(%p)->(%p,%p,%p,0x%08lx)\n", This, lpguidApplication, lpEnumCallback, lpContext, dwFlags ); /* A default dwFlags (0) is backwards compatible -- DPCONNECTION_DIRECTPLAY */ if( dwFlags == 0 ) { dwFlags = DPCONNECTION_DIRECTPLAY; } if( ! ( ( dwFlags & DPCONNECTION_DIRECTPLAY ) || ( dwFlags & DPCONNECTION_DIRECTPLAYLOBBY ) ) ) { return DPERR_INVALIDFLAGS; } if( !lpEnumCallback || !*lpEnumCallback ) { return DPERR_INVALIDPARAMS; } /* Enumerate DirectPlay service providers */ if( dwFlags & DPCONNECTION_DIRECTPLAY ) { HKEY hkResult; LPCSTR searchSubKey = "SOFTWARE\\Microsoft\\DirectPlay\\Service Providers"; LPSTR guidDataSubKey = "Guid"; char subKeyName[51]; DWORD dwIndex, sizeOfSubKeyName=50; FILETIME filetime; /* Need to loop over the service providers in the registry */ if( RegOpenKeyExA( HKEY_LOCAL_MACHINE, searchSubKey, 0, KEY_READ, &hkResult ) != ERROR_SUCCESS ) { /* Hmmm. Does this mean that there are no service providers? */ ERR(": no service providers?\n"); return DP_OK; } /* Traverse all the service providers we have available */ for( dwIndex=0; RegEnumKeyExA( hkResult, dwIndex, subKeyName, &sizeOfSubKeyName, NULL, NULL, NULL, &filetime ) != ERROR_NO_MORE_ITEMS; ++dwIndex, sizeOfSubKeyName=51 ) { HKEY hkServiceProvider; GUID serviceProviderGUID; DWORD returnTypeGUID, sizeOfReturnBuffer = 50; char returnBuffer[51]; LPWSTR lpWGUIDString; DPNAME dpName; HRESULT hr; DPCOMPOUNDADDRESSELEMENT dpCompoundAddress; LPVOID lpAddressBuffer = NULL; DWORD dwAddressBufferSize = 0; TRACE(" this time through: %s\n", subKeyName ); /* Get a handle for this particular service provider */ if( RegOpenKeyExA( hkResult, subKeyName, 0, KEY_READ, &hkServiceProvider ) != ERROR_SUCCESS ) { ERR(": what the heck is going on?\n" ); continue; } if( RegQueryValueExA( hkServiceProvider, guidDataSubKey, NULL, &returnTypeGUID, returnBuffer, &sizeOfReturnBuffer ) != ERROR_SUCCESS ) { ERR(": missing GUID registry data members\n" ); continue; } /* FIXME: Check return types to ensure we're interpreting data right */ lpWGUIDString = HEAP_strdupAtoW( GetProcessHeap(), 0, returnBuffer ); CLSIDFromString( (LPCOLESTR)lpWGUIDString, &serviceProviderGUID ); HeapFree( GetProcessHeap(), 0, lpWGUIDString ); /* FIXME: Have I got a memory leak on the serviceProviderGUID? */ /* Fill in the DPNAME struct for the service provider */ dpName.dwSize = sizeof( dpName ); dpName.dwFlags = 0; dpName.psn.lpszShortNameA = subKeyName; dpName.pln.lpszLongNameA = NULL; /* Create the compound address for the service provider. NOTE: This is a gruesome architectural scar right now. DP uses DPL and DPL uses DP nast stuff. This may be why the native dll just gets around this little bit by allocating an 80 byte buffer which isn't even a filled with a valid compound address. Oh well. Creating a proper compound address is the way to go anyways despite this method taking slightly more heap space and realtime :) */ dpCompoundAddress.guidDataType = DPAID_ServiceProvider; dpCompoundAddress.dwDataSize = sizeof( GUID ); dpCompoundAddress.lpData = &serviceProviderGUID; if( ( hr = DPL_CreateCompoundAddress( &dpCompoundAddress, 1, lpAddressBuffer, &dwAddressBufferSize, TRUE ) ) != DPERR_BUFFERTOOSMALL ) { ERR( "can't get buffer size: %s\n", DPLAYX_HresultToString( hr ) ); return hr; } /* Now allocate the buffer */ lpAddressBuffer = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, dwAddressBufferSize ); if( ( hr = DPL_CreateCompoundAddress( &dpCompoundAddress, 1, lpAddressBuffer, &dwAddressBufferSize, TRUE ) ) != DP_OK ) { ERR( "can't create address: %s\n", DPLAYX_HresultToString( hr ) ); return hr; } /* The enumeration will return FALSE if we are not to continue */ if( !lpEnumCallback( &serviceProviderGUID, lpAddressBuffer, dwAddressBufferSize, &dpName, DPCONNECTION_DIRECTPLAY, lpContext ) ) { WARN("lpEnumCallback returning FALSE\n" ); return DP_OK; } } } /* Enumerate DirectPlayLobby service providers */ if( dwFlags & DPCONNECTION_DIRECTPLAYLOBBY ) { HKEY hkResult; LPCSTR searchSubKey = "SOFTWARE\\Microsoft\\DirectPlay\\Lobby Providers"; LPSTR guidDataSubKey = "Guid"; char subKeyName[51]; DWORD dwIndex, sizeOfSubKeyName=50; FILETIME filetime; /* Need to loop over the service providers in the registry */ if( RegOpenKeyExA( HKEY_LOCAL_MACHINE, searchSubKey, 0, KEY_READ, &hkResult ) != ERROR_SUCCESS ) { /* Hmmm. Does this mean that there are no service providers? */ ERR(": no service providers?\n"); return DP_OK; } /* Traverse all the service providers we have available */ for( dwIndex=0; RegEnumKeyExA( hkResult, dwIndex, subKeyName, &sizeOfSubKeyName, NULL, NULL, NULL, &filetime ) != ERROR_NO_MORE_ITEMS; ++dwIndex, sizeOfSubKeyName=51 ) { HKEY hkServiceProvider; GUID serviceProviderGUID; DWORD returnTypeGUID, sizeOfReturnBuffer = 50; char returnBuffer[51]; LPWSTR lpWGUIDString; DPNAME dpName; HRESULT hr; DPCOMPOUNDADDRESSELEMENT dpCompoundAddress; LPVOID lpAddressBuffer = NULL; DWORD dwAddressBufferSize = 0; TRACE(" this time through: %s\n", subKeyName ); /* Get a handle for this particular service provider */ if( RegOpenKeyExA( hkResult, subKeyName, 0, KEY_READ, &hkServiceProvider ) != ERROR_SUCCESS ) { ERR(": what the heck is going on?\n" ); continue; } if( RegQueryValueExA( hkServiceProvider, guidDataSubKey, NULL, &returnTypeGUID, returnBuffer, &sizeOfReturnBuffer ) != ERROR_SUCCESS ) { ERR(": missing GUID registry data members\n" ); continue; } /* FIXME: Check return types to ensure we're interpreting data right */ lpWGUIDString = HEAP_strdupAtoW( GetProcessHeap(), 0, returnBuffer ); CLSIDFromString( (LPCOLESTR)lpWGUIDString, &serviceProviderGUID ); HeapFree( GetProcessHeap(), 0, lpWGUIDString ); /* FIXME: Have I got a memory leak on the serviceProviderGUID? */ /* Fill in the DPNAME struct for the service provider */ dpName.dwSize = sizeof( dpName ); dpName.dwFlags = 0; dpName.psn.lpszShortNameA = subKeyName; dpName.pln.lpszLongNameA = NULL; /* Create the compound address for the service provider. NOTE: This is a gruesome architectural scar right now. DP uses DPL and DPL uses DP nast stuff. This may be why the native dll just gets around this little bit by allocating an 80 byte buffer which isn't even a filled with a valid compound address. Oh well. Creating a proper compound address is the way to go anyways despite this method taking slightly more heap space and realtime :) */ dpCompoundAddress.guidDataType = DPAID_ServiceProvider; dpCompoundAddress.dwDataSize = sizeof( GUID ); dpCompoundAddress.lpData = &serviceProviderGUID; if( ( hr = DPL_CreateCompoundAddress( &dpCompoundAddress, 1, lpAddressBuffer, &dwAddressBufferSize, TRUE ) ) != DPERR_BUFFERTOOSMALL ) { ERR( "can't get buffer size: %s\n", DPLAYX_HresultToString( hr ) ); return hr; } /* Now allocate the buffer */ lpAddressBuffer = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, dwAddressBufferSize ); if( ( hr = DPL_CreateCompoundAddress( &dpCompoundAddress, 1, lpAddressBuffer, &dwAddressBufferSize, TRUE ) ) != DP_OK ) { ERR( "can't create address: %s\n", DPLAYX_HresultToString( hr ) ); return hr; } /* The enumeration will return FALSE if we are not to continue */ if( !lpEnumCallback( &serviceProviderGUID, lpAddressBuffer, dwAddressBufferSize, &dpName, DPCONNECTION_DIRECTPLAY, lpContext ) ) { WARN("lpEnumCallback returning FALSE\n" ); return DP_OK; } } } return DP_OK; } static HRESULT WINAPI DirectPlay3WImpl_EnumConnections ( LPDIRECTPLAY3 iface, LPCGUID lpguidApplication, LPDPENUMCONNECTIONSCALLBACK lpEnumCallback, LPVOID lpContext, DWORD dwFlags ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(%p,%p,%p,0x%08lx): stub\n", This, lpguidApplication, lpEnumCallback, lpContext, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay3AImpl_EnumGroupsInGroup ( LPDIRECTPLAY3A iface, DPID idGroup, LPGUID lpguidInstance, LPDPENUMPLAYERSCALLBACK2 lpEnumCallback, LPVOID lpContext, DWORD dwFlags ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p,%p,0x%08lx): stub\n", This, idGroup, lpguidInstance, lpEnumCallback, lpContext, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay3WImpl_EnumGroupsInGroup ( LPDIRECTPLAY3 iface, DPID idGroup, LPGUID lpguidInstance, LPDPENUMPLAYERSCALLBACK2 lpEnumCallback, LPVOID lpContext, DWORD dwFlags ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,%p,%p,%p,0x%08lx): stub\n", This, idGroup, lpguidInstance, lpEnumCallback, lpContext, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay3AImpl_GetGroupConnectionSettings ( LPDIRECTPLAY3A iface, DWORD dwFlags, DPID idGroup, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx,%p,%p): stub\n", This, dwFlags, idGroup, lpData, lpdwDataSize ); return DP_OK; } static HRESULT WINAPI DirectPlay3WImpl_GetGroupConnectionSettings ( LPDIRECTPLAY3 iface, DWORD dwFlags, DPID idGroup, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx,%p,%p): stub\n", This, dwFlags, idGroup, lpData, lpdwDataSize ); return DP_OK; } static HRESULT WINAPI DirectPlay3AImpl_InitializeConnection ( LPDIRECTPLAY3A iface, LPVOID lpConnection, DWORD dwFlags ) { HMODULE hServiceProvider; /*DWORD dwReturnValue; */ typedef DWORD (WINAPI *SP_SPInit)(LPVOID, LPVOID, LPVOID ); /* FIXME: How many arguments? */ SP_SPInit SPInit; ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(%p,0x%08lx): stub\n", This, lpConnection, dwFlags ); if( dwFlags != 0 ) { return DPERR_INVALIDFLAGS; } if( This->dp3->bConnectionInitialized == TRUE ) { return DPERR_ALREADYINITIALIZED; } /* Parse lpConnection as a compound address for the service provider */ /* Take service provider GUID and find the path to it */ /* FIXME: Hard coded to only load the tcp/ip service provider for now... */ hServiceProvider = LoadLibraryA( "dpwsockx.dll" ); if( hServiceProvider == 0 ) { ERR( "Unable to load service provider\n" ); return DPERR_UNAVAILABLE; } /* Initialize the service provider by calling SPInit */ SPInit = (SP_SPInit)GetProcAddress( hServiceProvider, "SPInit" ); if( SPInit == NULL ) { ERR( "Service provider doesn't provide SPInit interface?\n" ); } #if 0 /* NOTE: This will crash until I know what parameters/interface this has */ /* FIXME: Take a guess that we just pass the compound address to the SP */ /* Hmmm...how to say which parameters need to be gotten from the SP. They must come from the compound address, but how do we communicate what's required? */ dwReturnValue = (*SPInit)( lpConnection, NULL, NULL ); #endif /* This interface is now initialized */ This->dp3->bConnectionInitialized = TRUE; return DP_OK; } static HRESULT WINAPI DirectPlay3WImpl_InitializeConnection ( LPDIRECTPLAY3 iface, LPVOID lpConnection, DWORD dwFlags ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(%p,0x%08lx): stub\n", This, lpConnection, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay3AImpl_SecureOpen ( LPDIRECTPLAY3A iface, LPCDPSESSIONDESC2 lpsd, DWORD dwFlags, LPCDPSECURITYDESC lpSecurity, LPCDPCREDENTIALS lpCredentials ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(%p,0x%08lx,%p,%p): stub\n", This, lpsd, dwFlags, lpSecurity, lpCredentials ); if( This->dp2->bConnectionOpen ) { TRACE( ": rejecting already open connection.\n" ); return DPERR_ALREADYINITIALIZED; } /* When we open we need to stop any EnumSession activity */ IDirectPlayX_EnumSessions( iface, NULL, 0, NULL, NULL, DPENUMSESSIONS_STOPASYNC ); if( dwFlags & DPOPEN_CREATE ) { dwFlags &= ~DPOPEN_CREATE; /* Rightoo - this computer is the host and the local computer needs to be the name server so that others can join this session */ NS_SetLocalComputerAsNameServer( lpsd ); } if( dwFlags ) { ERR( ": ignored dwFlags 0x%08lx\n", dwFlags ); } return DP_OK; } static HRESULT WINAPI DirectPlay3WImpl_SecureOpen ( LPDIRECTPLAY3 iface, LPCDPSESSIONDESC2 lpsd, DWORD dwFlags, LPCDPSECURITYDESC lpSecurity, LPCDPCREDENTIALS lpCredentials ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(%p,0x%08lx,%p,%p): stub\n", This, lpsd, dwFlags, lpSecurity, lpCredentials ); return DP_OK; } static HRESULT WINAPI DirectPlay3AImpl_SendChatMessage ( LPDIRECTPLAY3A iface, DPID idFrom, DPID idTo, DWORD dwFlags, LPDPCHAT lpChatMessage ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx,0x%08lx,%p): stub\n", This, idFrom, idTo, dwFlags, lpChatMessage ); return DP_OK; } static HRESULT WINAPI DirectPlay3WImpl_SendChatMessage ( LPDIRECTPLAY3 iface, DPID idFrom, DPID idTo, DWORD dwFlags, LPDPCHAT lpChatMessage ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx,0x%08lx,%p): stub\n", This, idFrom, idTo, dwFlags, lpChatMessage ); return DP_OK; } static HRESULT WINAPI DirectPlay3AImpl_SetGroupConnectionSettings ( LPDIRECTPLAY3A iface, DWORD dwFlags, DPID idGroup, LPDPLCONNECTION lpConnection ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx,%p): stub\n", This, dwFlags, idGroup, lpConnection ); return DP_OK; } static HRESULT WINAPI DirectPlay3WImpl_SetGroupConnectionSettings ( LPDIRECTPLAY3 iface, DWORD dwFlags, DPID idGroup, LPDPLCONNECTION lpConnection ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx,%p): stub\n", This, dwFlags, idGroup, lpConnection ); return DP_OK; } static HRESULT WINAPI DirectPlay3AImpl_StartSession ( LPDIRECTPLAY3A iface, DWORD dwFlags, DPID idGroup ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx): stub\n", This, dwFlags, idGroup ); return DP_OK; } static HRESULT WINAPI DirectPlay3WImpl_StartSession ( LPDIRECTPLAY3 iface, DWORD dwFlags, DPID idGroup ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx): stub\n", This, dwFlags, idGroup ); return DP_OK; } static HRESULT WINAPI DirectPlay3AImpl_GetGroupFlags ( LPDIRECTPLAY3A iface, DPID idGroup, LPDWORD lpdwFlags ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,%p): stub\n", This, idGroup, lpdwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay3WImpl_GetGroupFlags ( LPDIRECTPLAY3 iface, DPID idGroup, LPDWORD lpdwFlags ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,%p): stub\n", This, idGroup, lpdwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay3AImpl_GetGroupParent ( LPDIRECTPLAY3A iface, DPID idGroup, LPDPID lpidGroup ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,%p): stub\n", This, idGroup, lpidGroup ); return DP_OK; } static HRESULT WINAPI DirectPlay3WImpl_GetGroupParent ( LPDIRECTPLAY3 iface, DPID idGroup, LPDPID lpidGroup ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,%p): stub\n", This, idGroup, lpidGroup ); return DP_OK; } static HRESULT WINAPI DirectPlay3AImpl_GetPlayerAccount ( LPDIRECTPLAY3A iface, DPID idPlayer, DWORD dwFlags, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx,%p,%p): stub\n", This, idPlayer, dwFlags, lpData, lpdwDataSize ); return DP_OK; } static HRESULT WINAPI DirectPlay3WImpl_GetPlayerAccount ( LPDIRECTPLAY3 iface, DPID idPlayer, DWORD dwFlags, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx,%p,%p): stub\n", This, idPlayer, dwFlags, lpData, lpdwDataSize ); return DP_OK; } static HRESULT WINAPI DirectPlay3AImpl_GetPlayerFlags ( LPDIRECTPLAY3A iface, DPID idPlayer, LPDWORD lpdwFlags ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,%p): stub\n", This, idPlayer, lpdwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay3WImpl_GetPlayerFlags ( LPDIRECTPLAY3 iface, DPID idPlayer, LPDWORD lpdwFlags ) { ICOM_THIS(IDirectPlay3Impl,iface); FIXME("(%p)->(0x%08lx,%p): stub\n", This, idPlayer, lpdwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay4AImpl_GetGroupOwner ( LPDIRECTPLAY4A iface, DPID idGroup, LPDPID lpidGroupOwner ) { ICOM_THIS(IDirectPlay4Impl,iface); FIXME("(%p)->(0x%08lx,%p): stub\n", This, idGroup, lpidGroupOwner ); return DP_OK; } static HRESULT WINAPI DirectPlay4WImpl_GetGroupOwner ( LPDIRECTPLAY4 iface, DPID idGroup, LPDPID lpidGroupOwner ) { ICOM_THIS(IDirectPlay4Impl,iface); FIXME("(%p)->(0x%08lx,%p): stub\n", This, idGroup, lpidGroupOwner ); return DP_OK; } static HRESULT WINAPI DirectPlay4AImpl_SetGroupOwner ( LPDIRECTPLAY4A iface, DPID idGroup , DPID idGroupOwner ) { ICOM_THIS(IDirectPlay4Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx): stub\n", This, idGroup, idGroupOwner ); return DP_OK; } static HRESULT WINAPI DirectPlay4WImpl_SetGroupOwner ( LPDIRECTPLAY4 iface, DPID idGroup , DPID idGroupOwner ) { ICOM_THIS(IDirectPlay4Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx): stub\n", This, idGroup, idGroupOwner ); return DP_OK; } static HRESULT WINAPI DirectPlay4AImpl_SendEx ( LPDIRECTPLAY4A iface, DPID idFrom, DPID idTo, DWORD dwFlags, LPVOID lpData, DWORD dwDataSize, DWORD dwPriority, DWORD dwTimeout, LPVOID lpContext, LPDWORD lpdwMsgID ) { ICOM_THIS(IDirectPlay4Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx,0x%08lx,%p,0x%08lx,0x%08lx,0x%08lx,%p,%p): stub\n", This, idFrom, idTo, dwFlags, lpData, dwDataSize, dwPriority, dwTimeout, lpContext, lpdwMsgID ); return DP_OK; } static HRESULT WINAPI DirectPlay4WImpl_SendEx ( LPDIRECTPLAY4 iface, DPID idFrom, DPID idTo, DWORD dwFlags, LPVOID lpData, DWORD dwDataSize, DWORD dwPriority, DWORD dwTimeout, LPVOID lpContext, LPDWORD lpdwMsgID ) { ICOM_THIS(IDirectPlay4Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx,0x%08lx,%p,0x%08lx,0x%08lx,0x%08lx,%p,%p): stub\n", This, idFrom, idTo, dwFlags, lpData, dwDataSize, dwPriority, dwTimeout, lpContext, lpdwMsgID ); return DP_OK; } static HRESULT WINAPI DirectPlay4AImpl_GetMessageQueue ( LPDIRECTPLAY4A iface, DPID idFrom, DPID idTo, DWORD dwFlags, LPDWORD lpdwNumMsgs, LPDWORD lpdwNumBytes ) { ICOM_THIS(IDirectPlay4Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx,0x%08lx,%p,%p): stub\n", This, idFrom, idTo, dwFlags, lpdwNumMsgs, lpdwNumBytes ); return DP_OK; } static HRESULT WINAPI DirectPlay4WImpl_GetMessageQueue ( LPDIRECTPLAY4 iface, DPID idFrom, DPID idTo, DWORD dwFlags, LPDWORD lpdwNumMsgs, LPDWORD lpdwNumBytes ) { ICOM_THIS(IDirectPlay4Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx,0x%08lx,%p,%p): stub\n", This, idFrom, idTo, dwFlags, lpdwNumMsgs, lpdwNumBytes ); return DP_OK; } static HRESULT WINAPI DirectPlay4AImpl_CancelMessage ( LPDIRECTPLAY4A iface, DWORD dwMsgID, DWORD dwFlags ) { ICOM_THIS(IDirectPlay4Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx): stub\n", This, dwMsgID, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay4WImpl_CancelMessage ( LPDIRECTPLAY4 iface, DWORD dwMsgID, DWORD dwFlags ) { ICOM_THIS(IDirectPlay4Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx): stub\n", This, dwMsgID, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay4AImpl_CancelPriority ( LPDIRECTPLAY4A iface, DWORD dwMinPriority, DWORD dwMaxPriority, DWORD dwFlags ) { ICOM_THIS(IDirectPlay4Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx,0x%08lx): stub\n", This, dwMinPriority, dwMaxPriority, dwFlags ); return DP_OK; } static HRESULT WINAPI DirectPlay4WImpl_CancelPriority ( LPDIRECTPLAY4 iface, DWORD dwMinPriority, DWORD dwMaxPriority, DWORD dwFlags ) { ICOM_THIS(IDirectPlay4Impl,iface); FIXME("(%p)->(0x%08lx,0x%08lx,0x%08lx): stub\n", This, dwMinPriority, dwMaxPriority, dwFlags ); return DP_OK; } /* Note: Hack so we can reuse the old functions without compiler warnings */ #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(directPlay2WVT.fn##fun)) #else # define XCAST(fun) (void*) #endif static ICOM_VTABLE(IDirectPlay2) directPlay2WVT = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DirectPlay2W_QueryInterface, XCAST(AddRef)DirectPlay2AImpl_AddRef, XCAST(Release)DirectPlay2AImpl_Release, DirectPlay2WImpl_AddPlayerToGroup, DirectPlay2WImpl_Close, DirectPlay2WImpl_CreateGroup, DirectPlay2WImpl_CreatePlayer, DirectPlay2WImpl_DeletePlayerFromGroup, DirectPlay2WImpl_DestroyGroup, DirectPlay2WImpl_DestroyPlayer, DirectPlay2WImpl_EnumGroupPlayers, DirectPlay2WImpl_EnumGroups, DirectPlay2WImpl_EnumPlayers, DirectPlay2WImpl_EnumSessions, DirectPlay2WImpl_GetCaps, DirectPlay2WImpl_GetGroupData, DirectPlay2WImpl_GetGroupName, DirectPlay2WImpl_GetMessageCount, DirectPlay2WImpl_GetPlayerAddress, DirectPlay2WImpl_GetPlayerCaps, DirectPlay2WImpl_GetPlayerData, DirectPlay2WImpl_GetPlayerName, DirectPlay2WImpl_GetSessionDesc, DirectPlay2WImpl_Initialize, DirectPlay2WImpl_Open, DirectPlay2WImpl_Receive, DirectPlay2WImpl_Send, DirectPlay2WImpl_SetGroupData, DirectPlay2WImpl_SetGroupName, DirectPlay2WImpl_SetPlayerData, DirectPlay2WImpl_SetPlayerName, DirectPlay2WImpl_SetSessionDesc }; #undef XCAST /* Note: Hack so we can reuse the old functions without compiler warnings */ #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(directPlay2AVT.fn##fun)) #else # define XCAST(fun) (void*) #endif static ICOM_VTABLE(IDirectPlay2) directPlay2AVT = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DirectPlay2A_QueryInterface, XCAST(AddRef)DirectPlay2AImpl_AddRef, XCAST(Release)DirectPlay2AImpl_Release, DirectPlay2AImpl_AddPlayerToGroup, DirectPlay2AImpl_Close, DirectPlay2AImpl_CreateGroup, DirectPlay2AImpl_CreatePlayer, DirectPlay2AImpl_DeletePlayerFromGroup, DirectPlay2AImpl_DestroyGroup, DirectPlay2AImpl_DestroyPlayer, DirectPlay2AImpl_EnumGroupPlayers, DirectPlay2AImpl_EnumGroups, DirectPlay2AImpl_EnumPlayers, DirectPlay2AImpl_EnumSessions, DirectPlay2AImpl_GetCaps, DirectPlay2AImpl_GetGroupData, DirectPlay2AImpl_GetGroupName, DirectPlay2AImpl_GetMessageCount, DirectPlay2AImpl_GetPlayerAddress, DirectPlay2AImpl_GetPlayerCaps, DirectPlay2AImpl_GetPlayerData, DirectPlay2AImpl_GetPlayerName, DirectPlay2AImpl_GetSessionDesc, DirectPlay2AImpl_Initialize, DirectPlay2AImpl_Open, DirectPlay2AImpl_Receive, DirectPlay2AImpl_Send, DirectPlay2AImpl_SetGroupData, DirectPlay2AImpl_SetGroupName, DirectPlay2AImpl_SetPlayerData, DirectPlay2AImpl_SetPlayerName, DirectPlay2AImpl_SetSessionDesc }; #undef XCAST /* Note: Hack so we can reuse the old functions without compiler warnings */ #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(directPlay3AVT.fn##fun)) #else # define XCAST(fun) (void*) #endif static ICOM_VTABLE(IDirectPlay3) directPlay3AVT = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DirectPlay3AImpl_QueryInterface, XCAST(AddRef)DirectPlay2AImpl_AddRef, XCAST(Release)DirectPlay2AImpl_Release, XCAST(AddPlayerToGroup)DirectPlay2AImpl_AddPlayerToGroup, XCAST(Close)DirectPlay2AImpl_Close, XCAST(CreateGroup)DirectPlay2AImpl_CreateGroup, XCAST(CreatePlayer)DirectPlay2AImpl_CreatePlayer, XCAST(DeletePlayerFromGroup)DirectPlay2AImpl_DeletePlayerFromGroup, XCAST(DestroyGroup)DirectPlay2AImpl_DestroyGroup, XCAST(DestroyPlayer)DirectPlay2AImpl_DestroyPlayer, XCAST(EnumGroupPlayers)DirectPlay2AImpl_EnumGroupPlayers, XCAST(EnumGroups)DirectPlay2AImpl_EnumGroups, XCAST(EnumPlayers)DirectPlay2AImpl_EnumPlayers, XCAST(EnumSessions)DirectPlay2AImpl_EnumSessions, XCAST(GetCaps)DirectPlay2AImpl_GetCaps, XCAST(GetGroupData)DirectPlay2AImpl_GetGroupData, XCAST(GetGroupName)DirectPlay2AImpl_GetGroupName, XCAST(GetMessageCount)DirectPlay2AImpl_GetMessageCount, XCAST(GetPlayerAddress)DirectPlay2AImpl_GetPlayerAddress, XCAST(GetPlayerCaps)DirectPlay2AImpl_GetPlayerCaps, XCAST(GetPlayerData)DirectPlay2AImpl_GetPlayerData, XCAST(GetPlayerName)DirectPlay2AImpl_GetPlayerName, XCAST(GetSessionDesc)DirectPlay2AImpl_GetSessionDesc, XCAST(Initialize)DirectPlay2AImpl_Initialize, XCAST(Open)DirectPlay2AImpl_Open, XCAST(Receive)DirectPlay2AImpl_Receive, XCAST(Send)DirectPlay2AImpl_Send, XCAST(SetGroupData)DirectPlay2AImpl_SetGroupData, XCAST(SetGroupName)DirectPlay2AImpl_SetGroupName, XCAST(SetPlayerData)DirectPlay2AImpl_SetPlayerData, XCAST(SetPlayerName)DirectPlay2AImpl_SetPlayerName, XCAST(SetSessionDesc)DirectPlay2AImpl_SetSessionDesc, DirectPlay3AImpl_AddGroupToGroup, DirectPlay3AImpl_CreateGroupInGroup, DirectPlay3AImpl_DeleteGroupFromGroup, DirectPlay3AImpl_EnumConnections, DirectPlay3AImpl_EnumGroupsInGroup, DirectPlay3AImpl_GetGroupConnectionSettings, DirectPlay3AImpl_InitializeConnection, DirectPlay3AImpl_SecureOpen, DirectPlay3AImpl_SendChatMessage, DirectPlay3AImpl_SetGroupConnectionSettings, DirectPlay3AImpl_StartSession, DirectPlay3AImpl_GetGroupFlags, DirectPlay3AImpl_GetGroupParent, DirectPlay3AImpl_GetPlayerAccount, DirectPlay3AImpl_GetPlayerFlags }; #undef XCAST /* Note: Hack so we can reuse the old functions without compiler warnings */ #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(directPlay3WVT.fn##fun)) #else # define XCAST(fun) (void*) #endif static ICOM_VTABLE(IDirectPlay3) directPlay3WVT = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DirectPlay3WImpl_QueryInterface, XCAST(AddRef)DirectPlay2AImpl_AddRef, XCAST(Release)DirectPlay2AImpl_Release, XCAST(AddPlayerToGroup)DirectPlay2WImpl_AddPlayerToGroup, XCAST(Close)DirectPlay2WImpl_Close, XCAST(CreateGroup)DirectPlay2WImpl_CreateGroup, XCAST(CreatePlayer)DirectPlay2WImpl_CreatePlayer, XCAST(DeletePlayerFromGroup)DirectPlay2WImpl_DeletePlayerFromGroup, XCAST(DestroyGroup)DirectPlay2WImpl_DestroyGroup, XCAST(DestroyPlayer)DirectPlay2WImpl_DestroyPlayer, XCAST(EnumGroupPlayers)DirectPlay2WImpl_EnumGroupPlayers, XCAST(EnumGroups)DirectPlay2WImpl_EnumGroups, XCAST(EnumPlayers)DirectPlay2WImpl_EnumPlayers, XCAST(EnumSessions)DirectPlay2WImpl_EnumSessions, XCAST(GetCaps)DirectPlay2WImpl_GetCaps, XCAST(GetGroupData)DirectPlay2WImpl_GetGroupData, XCAST(GetGroupName)DirectPlay2WImpl_GetGroupName, XCAST(GetMessageCount)DirectPlay2WImpl_GetMessageCount, XCAST(GetPlayerAddress)DirectPlay2WImpl_GetPlayerAddress, XCAST(GetPlayerCaps)DirectPlay2WImpl_GetPlayerCaps, XCAST(GetPlayerData)DirectPlay2WImpl_GetPlayerData, XCAST(GetPlayerName)DirectPlay2WImpl_GetPlayerName, XCAST(GetSessionDesc)DirectPlay2WImpl_GetSessionDesc, XCAST(Initialize)DirectPlay2WImpl_Initialize, XCAST(Open)DirectPlay2WImpl_Open, XCAST(Receive)DirectPlay2WImpl_Receive, XCAST(Send)DirectPlay2WImpl_Send, XCAST(SetGroupData)DirectPlay2WImpl_SetGroupData, XCAST(SetGroupName)DirectPlay2WImpl_SetGroupName, XCAST(SetPlayerData)DirectPlay2WImpl_SetPlayerData, XCAST(SetPlayerName)DirectPlay2WImpl_SetPlayerName, XCAST(SetSessionDesc)DirectPlay2WImpl_SetSessionDesc, DirectPlay3WImpl_AddGroupToGroup, DirectPlay3WImpl_CreateGroupInGroup, DirectPlay3WImpl_DeleteGroupFromGroup, DirectPlay3WImpl_EnumConnections, DirectPlay3WImpl_EnumGroupsInGroup, DirectPlay3WImpl_GetGroupConnectionSettings, DirectPlay3WImpl_InitializeConnection, DirectPlay3WImpl_SecureOpen, DirectPlay3WImpl_SendChatMessage, DirectPlay3WImpl_SetGroupConnectionSettings, DirectPlay3WImpl_StartSession, DirectPlay3WImpl_GetGroupFlags, DirectPlay3WImpl_GetGroupParent, DirectPlay3WImpl_GetPlayerAccount, DirectPlay3WImpl_GetPlayerFlags }; #undef XCAST /* Note: Hack so we can reuse the old functions without compiler warnings */ #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(directPlay4WVT.fn##fun)) #else # define XCAST(fun) (void*) #endif static ICOM_VTABLE(IDirectPlay4) directPlay4WVT = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DirectPlay4WImpl_QueryInterface, XCAST(AddRef)DirectPlay2AImpl_AddRef, XCAST(Release)DirectPlay2AImpl_Release, XCAST(AddPlayerToGroup)DirectPlay2WImpl_AddPlayerToGroup, XCAST(Close)DirectPlay2WImpl_Close, XCAST(CreateGroup)DirectPlay2WImpl_CreateGroup, XCAST(CreatePlayer)DirectPlay2WImpl_CreatePlayer, XCAST(DeletePlayerFromGroup)DirectPlay2WImpl_DeletePlayerFromGroup, XCAST(DestroyGroup)DirectPlay2WImpl_DestroyGroup, XCAST(DestroyPlayer)DirectPlay2WImpl_DestroyPlayer, XCAST(EnumGroupPlayers)DirectPlay2WImpl_EnumGroupPlayers, XCAST(EnumGroups)DirectPlay2WImpl_EnumGroups, XCAST(EnumPlayers)DirectPlay2WImpl_EnumPlayers, XCAST(EnumSessions)DirectPlay2WImpl_EnumSessions, XCAST(GetCaps)DirectPlay2WImpl_GetCaps, XCAST(GetGroupData)DirectPlay2WImpl_GetGroupData, XCAST(GetGroupName)DirectPlay2WImpl_GetGroupName, XCAST(GetMessageCount)DirectPlay2WImpl_GetMessageCount, XCAST(GetPlayerAddress)DirectPlay2WImpl_GetPlayerAddress, XCAST(GetPlayerCaps)DirectPlay2WImpl_GetPlayerCaps, XCAST(GetPlayerData)DirectPlay2WImpl_GetPlayerData, XCAST(GetPlayerName)DirectPlay2WImpl_GetPlayerName, XCAST(GetSessionDesc)DirectPlay2WImpl_GetSessionDesc, XCAST(Initialize)DirectPlay2WImpl_Initialize, XCAST(Open)DirectPlay2WImpl_Open, XCAST(Receive)DirectPlay2WImpl_Receive, XCAST(Send)DirectPlay2WImpl_Send, XCAST(SetGroupData)DirectPlay2WImpl_SetGroupData, XCAST(SetGroupName)DirectPlay2WImpl_SetGroupName, XCAST(SetPlayerData)DirectPlay2WImpl_SetPlayerData, XCAST(SetPlayerName)DirectPlay2WImpl_SetPlayerName, XCAST(SetSessionDesc)DirectPlay2WImpl_SetSessionDesc, XCAST(AddGroupToGroup)DirectPlay3WImpl_AddGroupToGroup, XCAST(CreateGroupInGroup)DirectPlay3WImpl_CreateGroupInGroup, XCAST(DeleteGroupFromGroup)DirectPlay3WImpl_DeleteGroupFromGroup, XCAST(EnumConnections)DirectPlay3WImpl_EnumConnections, XCAST(EnumGroupsInGroup)DirectPlay3WImpl_EnumGroupsInGroup, XCAST(GetGroupConnectionSettings)DirectPlay3WImpl_GetGroupConnectionSettings, XCAST(InitializeConnection)DirectPlay3WImpl_InitializeConnection, XCAST(SecureOpen)DirectPlay3WImpl_SecureOpen, XCAST(SendChatMessage)DirectPlay3WImpl_SendChatMessage, XCAST(SetGroupConnectionSettings)DirectPlay3WImpl_SetGroupConnectionSettings, XCAST(StartSession)DirectPlay3WImpl_StartSession, XCAST(GetGroupFlags)DirectPlay3WImpl_GetGroupFlags, XCAST(GetGroupParent)DirectPlay3WImpl_GetGroupParent, XCAST(GetPlayerAccount)DirectPlay3WImpl_GetPlayerAccount, XCAST(GetPlayerFlags)DirectPlay3WImpl_GetPlayerFlags, DirectPlay4WImpl_GetGroupOwner, DirectPlay4WImpl_SetGroupOwner, DirectPlay4WImpl_SendEx, DirectPlay4WImpl_GetMessageQueue, DirectPlay4WImpl_CancelMessage, DirectPlay4WImpl_CancelPriority }; #undef XCAST /* Note: Hack so we can reuse the old functions without compiler warnings */ #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(directPlay4AVT.fn##fun)) #else # define XCAST(fun) (void*) #endif static ICOM_VTABLE(IDirectPlay4) directPlay4AVT = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DirectPlay4AImpl_QueryInterface, XCAST(AddRef)DirectPlay2AImpl_AddRef, XCAST(Release)DirectPlay2AImpl_Release, XCAST(AddPlayerToGroup)DirectPlay2AImpl_AddPlayerToGroup, XCAST(Close)DirectPlay2AImpl_Close, XCAST(CreateGroup)DirectPlay2AImpl_CreateGroup, XCAST(CreatePlayer)DirectPlay2AImpl_CreatePlayer, XCAST(DeletePlayerFromGroup)DirectPlay2AImpl_DeletePlayerFromGroup, XCAST(DestroyGroup)DirectPlay2AImpl_DestroyGroup, XCAST(DestroyPlayer)DirectPlay2AImpl_DestroyPlayer, XCAST(EnumGroupPlayers)DirectPlay2AImpl_EnumGroupPlayers, XCAST(EnumGroups)DirectPlay2AImpl_EnumGroups, XCAST(EnumPlayers)DirectPlay2AImpl_EnumPlayers, XCAST(EnumSessions)DirectPlay2AImpl_EnumSessions, XCAST(GetCaps)DirectPlay2AImpl_GetCaps, XCAST(GetGroupData)DirectPlay2AImpl_GetGroupData, XCAST(GetGroupName)DirectPlay2AImpl_GetGroupName, XCAST(GetMessageCount)DirectPlay2AImpl_GetMessageCount, XCAST(GetPlayerAddress)DirectPlay2AImpl_GetPlayerAddress, XCAST(GetPlayerCaps)DirectPlay2AImpl_GetPlayerCaps, XCAST(GetPlayerData)DirectPlay2AImpl_GetPlayerData, XCAST(GetPlayerName)DirectPlay2AImpl_GetPlayerName, XCAST(GetSessionDesc)DirectPlay2AImpl_GetSessionDesc, XCAST(Initialize)DirectPlay2AImpl_Initialize, XCAST(Open)DirectPlay2AImpl_Open, XCAST(Receive)DirectPlay2AImpl_Receive, XCAST(Send)DirectPlay2AImpl_Send, XCAST(SetGroupData)DirectPlay2AImpl_SetGroupData, XCAST(SetGroupName)DirectPlay2AImpl_SetGroupName, XCAST(SetPlayerData)DirectPlay2AImpl_SetPlayerData, XCAST(SetPlayerName)DirectPlay2AImpl_SetPlayerName, XCAST(SetSessionDesc)DirectPlay2AImpl_SetSessionDesc, XCAST(AddGroupToGroup)DirectPlay3AImpl_AddGroupToGroup, XCAST(CreateGroupInGroup)DirectPlay3AImpl_CreateGroupInGroup, XCAST(DeleteGroupFromGroup)DirectPlay3AImpl_DeleteGroupFromGroup, XCAST(EnumConnections)DirectPlay3AImpl_EnumConnections, XCAST(EnumGroupsInGroup)DirectPlay3AImpl_EnumGroupsInGroup, XCAST(GetGroupConnectionSettings)DirectPlay3AImpl_GetGroupConnectionSettings, XCAST(InitializeConnection)DirectPlay3AImpl_InitializeConnection, XCAST(SecureOpen)DirectPlay3AImpl_SecureOpen, XCAST(SendChatMessage)DirectPlay3AImpl_SendChatMessage, XCAST(SetGroupConnectionSettings)DirectPlay3AImpl_SetGroupConnectionSettings, XCAST(StartSession)DirectPlay3AImpl_StartSession, XCAST(GetGroupFlags)DirectPlay3AImpl_GetGroupFlags, XCAST(GetGroupParent)DirectPlay3AImpl_GetGroupParent, XCAST(GetPlayerAccount)DirectPlay3AImpl_GetPlayerAccount, XCAST(GetPlayerFlags)DirectPlay3AImpl_GetPlayerFlags, DirectPlay4AImpl_GetGroupOwner, DirectPlay4AImpl_SetGroupOwner, DirectPlay4AImpl_SendEx, DirectPlay4AImpl_GetMessageQueue, DirectPlay4AImpl_CancelMessage, DirectPlay4AImpl_CancelPriority }; #undef XCAST /*************************************************************************** * DirectPlayEnumerateA (DPLAYX.2) * * The pointer to the structure lpContext will be filled with the * appropriate data for each service offered by the OS. These services are * not necessarily available on this particular machine but are defined * as simple service providers under the "Service Providers" registry key. * This structure is then passed to lpEnumCallback for each of the different * services. * * This API is useful only for applications written using DirectX3 or * worse. It is superceeded by IDirectPlay3::EnumConnections which also * gives information on the actual connections. * * defn of a service provider: * A dynamic-link library used by DirectPlay to communicate over a network. * The service provider contains all the network-specific code required * to send and receive messages. Online services and network operators can * supply service providers to use specialized hardware, protocols, communications * media, and network resources. * * TODO: Allocate string buffer space from the heap (length from reg) * Pass real device driver numbers... * Get the GUID properly... */ HRESULT WINAPI DirectPlayEnumerateA( LPDPENUMDPCALLBACKA lpEnumCallback, LPVOID lpContext ) { HKEY hkResult; LPCSTR searchSubKey = "SOFTWARE\\Microsoft\\DirectPlay\\Service Providers"; DWORD dwIndex; DWORD sizeOfSubKeyName=50; char subKeyName[51]; FILETIME filetime; TRACE(": lpEnumCallback=%p lpContext=%p\n", lpEnumCallback, lpContext ); if( !lpEnumCallback || !*lpEnumCallback ) { return DPERR_INVALIDPARAMS; } /* Need to loop over the service providers in the registry */ if( RegOpenKeyExA( HKEY_LOCAL_MACHINE, searchSubKey, 0, KEY_READ, &hkResult ) != ERROR_SUCCESS ) { /* Hmmm. Does this mean that there are no service providers? */ ERR(": no service providers?\n"); return DP_OK; } /* Traverse all the service providers we have available */ for( dwIndex=0; RegEnumKeyExA( hkResult, dwIndex, subKeyName, &sizeOfSubKeyName, NULL, NULL, NULL, &filetime ) != ERROR_NO_MORE_ITEMS; ++dwIndex, sizeOfSubKeyName=50 ) { LPSTR majVerDataSubKey = "dwReserved1"; LPSTR minVerDataSubKey = "dwReserved2"; LPSTR guidDataSubKey = "Guid"; HKEY hkServiceProvider; GUID serviceProviderGUID; DWORD returnTypeGUID, returnTypeReserved, sizeOfReturnBuffer = 50; char returnBuffer[51]; DWORD majVersionNum , minVersionNum = 0; LPWSTR lpWGUIDString; TRACE(" this time through: %s\n", subKeyName ); /* Get a handle for this particular service provider */ if( RegOpenKeyExA( hkResult, subKeyName, 0, KEY_READ, &hkServiceProvider ) != ERROR_SUCCESS ) { ERR(": what the heck is going on?\n" ); continue; } /* Get the GUID, Device major number and device minor number * from the registry. */ if( RegQueryValueExA( hkServiceProvider, guidDataSubKey, NULL, &returnTypeGUID, returnBuffer, &sizeOfReturnBuffer ) != ERROR_SUCCESS ) { ERR(": missing GUID registry data members\n" ); continue; } /* FIXME: Check return types to ensure we're interpreting data right */ lpWGUIDString = HEAP_strdupAtoW( GetProcessHeap(), 0, returnBuffer ); CLSIDFromString( (LPCOLESTR)lpWGUIDString, &serviceProviderGUID ); HeapFree( GetProcessHeap(), 0, lpWGUIDString ); /* FIXME: Need to know which of dwReserved1 and dwReserved2 are maj and min */ sizeOfReturnBuffer = 50; if( RegQueryValueExA( hkServiceProvider, majVerDataSubKey, NULL, &returnTypeReserved, returnBuffer, &sizeOfReturnBuffer ) != ERROR_SUCCESS ) { ERR(": missing dwReserved1 registry data members\n") ; continue; } majVersionNum = GET_DWORD( returnBuffer ); sizeOfReturnBuffer = 50; if( RegQueryValueExA( hkServiceProvider, minVerDataSubKey, NULL, &returnTypeReserved, returnBuffer, &sizeOfReturnBuffer ) != ERROR_SUCCESS ) { ERR(": missing dwReserved2 registry data members\n") ; continue; } minVersionNum = GET_DWORD( returnBuffer ); /* The enumeration will return FALSE if we are not to continue */ if( !lpEnumCallback( &serviceProviderGUID , subKeyName, majVersionNum, minVersionNum, lpContext ) ) { WARN("lpEnumCallback returning FALSE\n" ); break; } } return DP_OK; } /*************************************************************************** * DirectPlayEnumerateW (DPLAYX.3) * */ HRESULT WINAPI DirectPlayEnumerateW( LPDPENUMDPCALLBACKW lpEnumCallback, LPVOID lpContext ) { FIXME(":stub\n"); return DPERR_OUTOFMEMORY; } /*************************************************************************** * DirectPlayCreate (DPLAYX.1) (DPLAY.1) * */ HRESULT WINAPI DirectPlayCreate ( LPGUID lpGUID, LPDIRECTPLAY2 *lplpDP, IUnknown *pUnk) { TRACE( "lpGUID=%s lplpDP=%p pUnk=%p\n", debugstr_guid(lpGUID), lplpDP, pUnk ); if( pUnk != NULL ) { return CLASS_E_NOAGGREGATION; } /* Create an IDirectPlay object. We don't support that so we'll cheat and give them an IDirectPlay2A object and hope that doesn't cause problems */ if( directPlay_QueryInterface( &IID_IDirectPlay2A, (LPVOID*)lplpDP ) != DP_OK ) { return DPERR_UNAVAILABLE; } if( IsEqualGUID( &GUID_NULL, lpGUID ) ) { /* The GUID_NULL means don't bind a service provider. Just return the interface */ return DP_OK; } /* Bind the desired service provider */ if( ( IsEqualGUID( lpGUID, &DPSPGUID_MODEM ) ) || ( IsEqualGUID( lpGUID, &DPSPGUID_SERIAL ) ) || ( IsEqualGUID( lpGUID, &DPSPGUID_TCPIP ) ) || ( IsEqualGUID( lpGUID, &DPSPGUID_IPX ) ) ) { FIXME( "Service provider binding not supported yet\n" ); IDirectPlayX_Release( *lplpDP ); *lplpDP = NULL; return DPERR_INVALIDPARAMS; } ERR( "unknown Service Provider %s\n", debugstr_guid(lpGUID) ); IDirectPlayX_Release( *lplpDP ); *lplpDP = NULL; return DPERR_INVALIDPARAMS; } wine-20000526/dlls/dplayx/dplay.spec0100644000175000001440000000030707033475133016673 0ustar julliardusers# First DirectPlay dll. Replaced by dplayx.dll. name dplay type win32 import dplayx.dll @ forward DirectPlayCreate DPLAYX.DirectPlayCreate @ forward DirectPlayEnumerate DPLAYX.DirectPlayEnumerate wine-20000526/dlls/dplayx/dplayx.spec0100644000175000001440000000115407101106212017045 0ustar julliardusersname dplayx type win32 init DPLAYX_LibMain import ole32.dll 1 stdcall DirectPlayCreate(ptr ptr ptr) DirectPlayCreate 2 stdcall DirectPlayEnumerateA(ptr ptr) DirectPlayEnumerateA 3 stdcall DirectPlayEnumerateW(ptr ptr) DirectPlayEnumerateW 4 stdcall DirectPlayLobbyCreateA(ptr ptr ptr ptr long) DirectPlayLobbyCreateA 5 stdcall DirectPlayLobbyCreateW(ptr ptr ptr ptr long) DirectPlayLobbyCreateW 6 stub gdwDPlaySPRefCount 9 stdcall DirectPlayEnumerate(ptr ptr) DirectPlayEnumerateA 10 stdcall DllCanUnloadNow() DPLAYX_DllCanUnloadNow 11 stdcall DllGetClassObject(ptr ptr ptr) DPLAYX_DllGetClassObject wine-20000526/dlls/dplayx/dplayx_global.c0100644000175000001440000006275307113575026017711 0ustar julliardusers/* dplayx.dll global data implementation. * * Copyright 1999,2000 - Peter Hunnisett * * * */ /* NOTE: Methods that begin with DPLAYX_ are used for dealing with * dplayx.dll data which is accessible from all processes. */ #include #include "debugtools.h" #include "winbase.h" #include "winerror.h" #include "heap.h" /* Really shouldn't be using those HEAP_strdupA interfaces should I? */ #include "dplayx_global.h" DEFAULT_DEBUG_CHANNEL(dplay); /* FIXME: Need to do all that fun other dll referencing type of stuff */ /* FIXME: Need to allocate a giant static area */ /* Static data for all processes */ static LPSTR lpszDplayxSemaName = "WINE_DPLAYX_SM"; static HANDLE hDplayxSema; #define DPLAYX_AquireSemaphore() TRACE( "Waiting for DPLAYX sema\n" ); \ WaitForSingleObject( hDplayxSema, INFINITE ); TRACE( "Through wait\n" ) #define DPLAYX_ReleaseSemaphore() ReleaseSemaphore( hDplayxSema, 1, NULL ); \ TRACE( "DPLAYX Sema released\n" ); /* FIXME: Is this correct? */ /* HACK for simple global data right now */ enum { numSupportedLobbies = 32, numSupportedSessions = 32 }; typedef struct tagDirectPlayLobbyData { /* Just a DPLCONNECTION struct */ DWORD dwConnFlags; DPSESSIONDESC2 sessionDesc; DPNAME playerName; GUID guidSP; LPVOID lpAddress; DWORD dwAddressSize; /* Information for dplobby interfaces */ DWORD dwAppID; HANDLE hReceiveEvent; DWORD dwAppLaunchedFromID; } DirectPlayLobbyData, *lpDirectPlayLobbyData; static DirectPlayLobbyData lobbyData[ numSupportedLobbies ]; /* Hack for now */ static DPSESSIONDESC2 sessionData[ numSupportedSessions ]; /* Function prototypes */ BOOL DPLAYX_IsAppIdLobbied( DWORD dwAppId, lpDirectPlayLobbyData* dplData ); void DPLAYX_InitializeLobbyDataEntry( lpDirectPlayLobbyData lpData ); BOOL DPLAYX_CopyIntoSessionDesc2A( LPDPSESSIONDESC2 lpSessionDest, LPCDPSESSIONDESC2 lpSessionSrc ); /*************************************************************************** * Called to initialize the global data. This will only be used on the * loading of the dll ***************************************************************************/ void DPLAYX_ConstructData(void) { UINT i; TRACE( "DPLAYX dll loaded - construct called\n" ); /* Create a semahopre to block access to DPLAYX global data structs It starts unblocked, and allows up to 65000 users blocked on it. Seems reasonable for the time being */ hDplayxSema = CreateSemaphoreA( NULL, 1, 65000, lpszDplayxSemaName ); if( !hDplayxSema ) { /* Really don't have any choice but to continue... */ ERR( "Semaphore creation error 0x%08lx\n", GetLastError() ); } /* Set all lobbies to be "empty" */ for( i=0; i < numSupportedLobbies; i++ ) { DPLAYX_InitializeLobbyDataEntry( &lobbyData[ i ] ); } /* Set all sessions to be "empty" */ for( i=0; i < numSupportedSessions; i++ ) { sessionData[i].dwSize = 0; } } /*************************************************************************** * Called to destroy all global data. This will only be used on the * unloading of the dll ***************************************************************************/ void DPLAYX_DestructData(void) { TRACE( "DPLAYX dll unloaded - destruct called\n" ); /* delete the semaphore */ CloseHandle( hDplayxSema ); } void DPLAYX_InitializeLobbyDataEntry( lpDirectPlayLobbyData lpData ) { ZeroMemory( lpData, sizeof( *lpData ) ); /* Set the handle to a better invalid value */ lpData->hReceiveEvent = INVALID_HANDLE_VALUE; } /* NOTE: This must be called with the semaphore aquired. * TRUE/FALSE with a pointer to it's data returned. Pointer data is * is only valid if TRUE is returned. */ BOOL DPLAYX_IsAppIdLobbied( DWORD dwAppID, lpDirectPlayLobbyData* lplpDplData ) { INT i; *lplpDplData = NULL; if( dwAppID == 0 ) { dwAppID = GetCurrentProcessId(); TRACE( "Translated dwAppID == 0 into 0x%08lx\n", dwAppID ); } for( i=0; i < numSupportedLobbies; i++ ) { if( lobbyData[ i ].dwAppID == dwAppID ) { /* This process is lobbied */ *lplpDplData = &lobbyData[ i ]; return TRUE; } } return FALSE; } /* Reserve a spot for the new appliction. TRUE means success and FALSE failure. */ BOOL DPLAYX_CreateLobbyApplication( DWORD dwAppID, HANDLE hReceiveEvent ) { UINT i; /* 0 is the marker for unused application data slots */ if( dwAppID == 0 ) { return FALSE; } DPLAYX_AquireSemaphore(); /* Find an empty space in the list and insert the data */ for( i=0; i < numSupportedLobbies; i++ ) { if( lobbyData[ i ].dwAppID == 0 ) { /* This process is now lobbied */ lobbyData[ i ].dwAppID = dwAppID; lobbyData[ i ].hReceiveEvent = hReceiveEvent; lobbyData[ i ].dwAppLaunchedFromID = GetCurrentProcessId(); DPLAYX_ReleaseSemaphore(); return TRUE; } } DPLAYX_ReleaseSemaphore(); return FALSE; } /* I'm not sure when I'm going to need this, but here it is */ BOOL DPLAYX_DestroyLobbyApplication( DWORD dwAppID ) { UINT i; DPLAYX_AquireSemaphore(); /* Find an empty space in the list and insert the data */ for( i=0; i < numSupportedLobbies; i++ ) { if( lobbyData[ i ].dwAppID == dwAppID ) { /* Mark this entry unused */ DPLAYX_InitializeLobbyDataEntry( &lobbyData[ i ] ); DPLAYX_ReleaseSemaphore(); return TRUE; } } DPLAYX_ReleaseSemaphore(); ERR( "Unable to find global entry for application\n" ); return FALSE; } HRESULT DPLAYX_GetConnectionSettingsA ( DWORD dwAppID, LPVOID lpData, LPDWORD lpdwDataSize ) { lpDirectPlayLobbyData lpDplData; LPDPLCONNECTION lpDplConnection; /* Verify buffer size */ if ( ( lpData == NULL ) || ( *lpdwDataSize < sizeof( DPLCONNECTION ) ) ) { *lpdwDataSize = sizeof( DPLCONNECTION ); return DPERR_BUFFERTOOSMALL; } DPLAYX_AquireSemaphore(); if ( ! DPLAYX_IsAppIdLobbied( dwAppID, &lpDplData ) ) { DPLAYX_ReleaseSemaphore(); TRACE( "Application 0x%08lx is not lobbied\n", dwAppID ); return DPERR_NOTLOBBIED; } /* Copy the information */ lpDplConnection = (LPDPLCONNECTION)lpData; /* Copy everything we've got into here */ /* Need to actually store the stuff here. Check if we've already allocated each field first. */ lpDplConnection->dwSize = sizeof( DPLCONNECTION ); lpDplConnection->dwFlags = lpDplData->dwConnFlags; /* Copy LPDPSESSIONDESC2 struct */ lpDplConnection->lpSessionDesc = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( lpDplData->sessionDesc ) ); memcpy( lpDplConnection->lpSessionDesc, &lpDplData->sessionDesc, sizeof( lpDplData->sessionDesc ) ); if( lpDplData->sessionDesc.sess.lpszSessionNameA ) { lpDplConnection->lpSessionDesc->sess.lpszSessionNameA = HEAP_strdupA( GetProcessHeap(), HEAP_ZERO_MEMORY, lpDplData->sessionDesc.sess.lpszSessionNameA ); } if( lpDplData->sessionDesc.pass.lpszPasswordA ) { lpDplConnection->lpSessionDesc->pass.lpszPasswordA = HEAP_strdupA( GetProcessHeap(), HEAP_ZERO_MEMORY, lpDplData->sessionDesc.pass.lpszPasswordA ); } lpDplConnection->lpSessionDesc->dwReserved1 = lpDplData->sessionDesc.dwReserved1; lpDplConnection->lpSessionDesc->dwReserved2 = lpDplData->sessionDesc.dwReserved2; /* Copy DPNAME struct - seems to be optional - check for existance first */ lpDplConnection->lpPlayerName = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( lpDplData->playerName ) ); memcpy( lpDplConnection->lpPlayerName, &(lpDplData->playerName), sizeof( lpDplData->playerName ) ); if( lpDplData->playerName.psn.lpszShortNameA ) { lpDplConnection->lpPlayerName->psn.lpszShortNameA = HEAP_strdupA( GetProcessHeap(), HEAP_ZERO_MEMORY, lpDplData->playerName.psn.lpszShortNameA ); } if( lpDplData->playerName.pln.lpszLongNameA ) { lpDplConnection->lpPlayerName->pln.lpszLongNameA = HEAP_strdupA( GetProcessHeap(), HEAP_ZERO_MEMORY, lpDplData->playerName.pln.lpszLongNameA ); } memcpy( &lpDplConnection->guidSP, &lpDplData->guidSP, sizeof( lpDplData->guidSP ) ); lpDplConnection->lpAddress = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, lpDplData->dwAddressSize ); memcpy( lpDplConnection->lpAddress, lpDplData->lpAddress, lpDplData->dwAddressSize ); lpDplConnection->dwAddressSize = lpDplData->dwAddressSize; /* FIXME: Send a message - or only the first time? */ DPLAYX_ReleaseSemaphore(); return DP_OK; } HRESULT DPLAYX_GetConnectionSettingsW ( DWORD dwAppID, LPVOID lpData, LPDWORD lpdwDataSize ) { lpDirectPlayLobbyData lpDplData; LPDPLCONNECTION lpDplConnection; /* Verify buffer size */ if ( ( lpData == NULL ) || ( *lpdwDataSize < sizeof( DPLCONNECTION ) ) ) { *lpdwDataSize = sizeof( DPLCONNECTION ); return DPERR_BUFFERTOOSMALL; } DPLAYX_AquireSemaphore(); if ( ! DPLAYX_IsAppIdLobbied( dwAppID, &lpDplData ) ) { DPLAYX_ReleaseSemaphore(); return DPERR_NOTLOBBIED; } /* Copy the information */ lpDplConnection = (LPDPLCONNECTION)lpData; /* Copy everything we've got into here */ /* Need to actually store the stuff here. Check if we've already allocated each field first. */ lpDplConnection->dwSize = sizeof( DPLCONNECTION ); lpDplConnection->dwFlags = lpDplData->dwConnFlags; /* Copy LPDPSESSIONDESC2 struct */ lpDplConnection->lpSessionDesc = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( lpDplData->sessionDesc ) ); memcpy( lpDplConnection->lpSessionDesc, &lpDplData->sessionDesc, sizeof( lpDplData->sessionDesc ) ); if( lpDplData->sessionDesc.sess.lpszSessionName ) { lpDplConnection->lpSessionDesc->sess.lpszSessionName = HEAP_strdupW( GetProcessHeap(), HEAP_ZERO_MEMORY, lpDplData->sessionDesc.sess.lpszSessionName ); } if( lpDplData->sessionDesc.pass.lpszPassword ) { lpDplConnection->lpSessionDesc->pass.lpszPassword = HEAP_strdupW( GetProcessHeap(), HEAP_ZERO_MEMORY, lpDplData->sessionDesc.pass.lpszPassword ); } lpDplConnection->lpSessionDesc->dwReserved1 = lpDplData->sessionDesc.dwReserved1; lpDplConnection->lpSessionDesc->dwReserved2 = lpDplData->sessionDesc.dwReserved2; /* Copy DPNAME struct - seems to be optional - check for existance first */ lpDplConnection->lpPlayerName = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( lpDplData->playerName ) ); memcpy( lpDplConnection->lpPlayerName, &(lpDplData->playerName), sizeof( lpDplData->playerName ) ); if( lpDplData->playerName.psn.lpszShortName ) { lpDplConnection->lpPlayerName->psn.lpszShortName = HEAP_strdupW( GetProcessHeap(), HEAP_ZERO_MEMORY, lpDplData->playerName.psn.lpszShortName ); } if( lpDplData->playerName.pln.lpszLongName ) { lpDplConnection->lpPlayerName->pln.lpszLongName = HEAP_strdupW( GetProcessHeap(), HEAP_ZERO_MEMORY, lpDplData->playerName.pln.lpszLongName ); } memcpy( &lpDplConnection->guidSP, &lpDplData->guidSP, sizeof( lpDplData->guidSP ) ); lpDplConnection->lpAddress = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, lpDplData->dwAddressSize ); memcpy( lpDplConnection->lpAddress, lpDplData->lpAddress, lpDplData->dwAddressSize ); lpDplConnection->dwAddressSize = lpDplData->dwAddressSize; /* FIXME: Send a message - or only the first time? */ DPLAYX_ReleaseSemaphore(); return DP_OK; } HRESULT DPLAYX_SetConnectionSettingsA ( DWORD dwFlags, DWORD dwAppID, LPDPLCONNECTION lpConn ) { lpDirectPlayLobbyData lpDplData; /* Paramater check */ if( dwFlags || !lpConn ) { ERR("invalid parameters.\n"); return DPERR_INVALIDPARAMS; } /* Store information */ if( lpConn->dwSize != sizeof(DPLCONNECTION) ) { ERR(": old/new DPLCONNECTION type? Size=%08lx vs. expected=%ul bytes\n", lpConn->dwSize, sizeof( DPLCONNECTION ) ); return DPERR_INVALIDPARAMS; } if( dwAppID == 0 ) { dwAppID = GetCurrentProcessId(); } DPLAYX_AquireSemaphore(); if ( ! DPLAYX_IsAppIdLobbied( dwAppID, &lpDplData ) ) { /* FIXME: Create a new entry for this dwAppID? */ DPLAYX_ReleaseSemaphore(); return DPERR_GENERIC; } /* Store information */ if( lpConn->dwSize != sizeof(DPLCONNECTION) ) { DPLAYX_ReleaseSemaphore(); ERR(": old/new DPLCONNECTION type? Size=%lu vs. expected=%u bytes\n", lpConn->dwSize, sizeof( DPLCONNECTION ) ); return DPERR_INVALIDPARAMS; } /* Need to investigate the lpConn->lpSessionDesc to figure out * what type of session we need to join/create. */ if( (!lpConn->lpSessionDesc ) || ( lpConn->lpSessionDesc->dwSize != sizeof( DPSESSIONDESC2 ) ) ) { DPLAYX_ReleaseSemaphore(); ERR("DPSESSIONDESC passed in? Size=%lu vs. expected=%u bytes\n", lpConn->lpSessionDesc->dwSize, sizeof( DPSESSIONDESC2 ) ); return DPERR_INVALIDPARAMS; } /* FIXME: How do I store this stuff so that it can be read by all processes? Static area? What about strings? Ewww...large global shared */ /* Need to actually store the stuff here. Check if we've already allocated each field first. */ lpDplData->dwConnFlags = lpConn->dwFlags; /* Copy LPDPSESSIONDESC2 struct - this is required */ memcpy( &lpDplData->sessionDesc, lpConn->lpSessionDesc, sizeof( *(lpConn->lpSessionDesc) ) ); /* FIXME: Can this just be shorted? Does it handle the NULL case correctly? */ if( lpConn->lpSessionDesc->sess.lpszSessionNameA ) lpDplData->sessionDesc.sess.lpszSessionNameA = HEAP_strdupA( GetProcessHeap(), HEAP_ZERO_MEMORY, lpConn->lpSessionDesc->sess.lpszSessionNameA ); else lpDplData->sessionDesc.sess.lpszSessionNameA = NULL; if( lpConn->lpSessionDesc->pass.lpszPasswordA ) lpDplData->sessionDesc.pass.lpszPasswordA = HEAP_strdupA( GetProcessHeap(), HEAP_ZERO_MEMORY, lpConn->lpSessionDesc->pass.lpszPasswordA ); else lpDplData->sessionDesc.pass.lpszPasswordA = NULL; lpDplData->sessionDesc.dwReserved1 = lpConn->lpSessionDesc->dwReserved1; lpDplData->sessionDesc.dwReserved2 = lpConn->lpSessionDesc->dwReserved2; /* Copy DPNAME struct - seems to be optional - check for existance first */ if( lpConn->lpPlayerName ) { memcpy( &lpDplData->playerName, lpConn->lpPlayerName, sizeof( *lpConn->lpPlayerName ) ); if( lpConn->lpPlayerName->psn.lpszShortNameA ) lpDplData->playerName.psn.lpszShortNameA = HEAP_strdupA( GetProcessHeap(), HEAP_ZERO_MEMORY, lpConn->lpPlayerName->psn.lpszShortNameA ); if( lpConn->lpPlayerName->pln.lpszLongNameA ) lpDplData->playerName.pln.lpszLongNameA = HEAP_strdupA( GetProcessHeap(), HEAP_ZERO_MEMORY, lpConn->lpPlayerName->pln.lpszLongNameA ); } memcpy( &lpDplData->guidSP, &lpConn->guidSP, sizeof( lpConn->guidSP ) ); lpDplData->lpAddress = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, lpConn->dwAddressSize ); memcpy( lpDplData->lpAddress, lpConn->lpAddress, lpConn->dwAddressSize ); lpDplData->dwAddressSize = lpConn->dwAddressSize; /* FIXME: Send a message - I think */ DPLAYX_ReleaseSemaphore(); return DP_OK; } HRESULT DPLAYX_SetConnectionSettingsW ( DWORD dwFlags, DWORD dwAppID, LPDPLCONNECTION lpConn ) { lpDirectPlayLobbyData lpDplData; /* Paramater check */ if( dwFlags || !lpConn ) { ERR("invalid parameters.\n"); return DPERR_INVALIDPARAMS; } /* Store information */ if( lpConn->dwSize != sizeof(DPLCONNECTION) ) { ERR(": old/new DPLCONNECTION type? Size=%lu vs. expected=%u bytes\n", lpConn->dwSize, sizeof( DPLCONNECTION ) ); return DPERR_INVALIDPARAMS; } if( dwAppID == 0 ) { dwAppID = GetCurrentProcessId(); } DPLAYX_AquireSemaphore(); if ( ! DPLAYX_IsAppIdLobbied( dwAppID, &lpDplData ) ) { DPLAYX_ReleaseSemaphore(); return DPERR_NOTLOBBIED; } /* Need to investigate the lpConn->lpSessionDesc to figure out * what type of session we need to join/create. */ if( (!lpConn->lpSessionDesc ) || ( lpConn->lpSessionDesc->dwSize != sizeof( DPSESSIONDESC2 ) ) ) { DPLAYX_ReleaseSemaphore(); ERR("DPSESSIONDESC passed in? Size=%lu vs. expected=%u bytes\n", lpConn->lpSessionDesc->dwSize, sizeof( DPSESSIONDESC2 ) ); return DPERR_INVALIDPARAMS; } /* FIXME: How do I store this stuff so that it can be read by all processes? Static area? What about strings? Ewww...large global shared */ /* Need to actually store the stuff here. Check if we've already allocated each field first. */ lpDplData->dwConnFlags = lpConn->dwFlags; /* Copy LPDPSESSIONDESC2 struct - this is required */ memcpy( &lpDplData->sessionDesc, lpConn->lpSessionDesc, sizeof( *(lpConn->lpSessionDesc) ) ); /* FIXME: Can this just be shorted? Does it handle the NULL case correctly? */ if( lpConn->lpSessionDesc->sess.lpszSessionName ) lpDplData->sessionDesc.sess.lpszSessionName = HEAP_strdupW( GetProcessHeap(), HEAP_ZERO_MEMORY, lpConn->lpSessionDesc->sess.lpszSessionName ); else lpDplData->sessionDesc.sess.lpszSessionName = NULL; if( lpConn->lpSessionDesc->pass.lpszPassword ) lpDplData->sessionDesc.pass.lpszPassword = HEAP_strdupW( GetProcessHeap(), HEAP_ZERO_MEMORY, lpConn->lpSessionDesc->pass.lpszPassword ); else lpDplData->sessionDesc.pass.lpszPassword = NULL; lpDplData->sessionDesc.dwReserved1 = lpConn->lpSessionDesc->dwReserved1; lpDplData->sessionDesc.dwReserved2 = lpConn->lpSessionDesc->dwReserved2; /* Copy DPNAME struct - seems to be optional - check for existance first */ if( lpConn->lpPlayerName ) { memcpy( &lpDplData->playerName, lpConn->lpPlayerName, sizeof( *lpConn->lpPlayerName ) ); if( lpConn->lpPlayerName->psn.lpszShortName ) lpDplData->playerName.psn.lpszShortName = HEAP_strdupW( GetProcessHeap(), HEAP_ZERO_MEMORY, lpConn->lpPlayerName->psn.lpszShortName ); if( lpConn->lpPlayerName->pln.lpszLongName ) lpDplData->playerName.pln.lpszLongName = HEAP_strdupW( GetProcessHeap(), HEAP_ZERO_MEMORY, lpConn->lpPlayerName->pln.lpszLongName ); } memcpy( &lpDplData->guidSP, &lpConn->guidSP, sizeof( lpConn->guidSP ) ); lpDplData->lpAddress = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, lpConn->dwAddressSize ); memcpy( lpDplData->lpAddress, lpConn->lpAddress, lpConn->dwAddressSize ); lpDplData->dwAddressSize = lpConn->dwAddressSize; /* FIXME: Send a message - I think */ DPLAYX_ReleaseSemaphore(); return DP_OK; } LPDPSESSIONDESC2 DPLAYX_CopyAndAllocateSessionDesc2A( LPCDPSESSIONDESC2 lpSessionSrc ) { LPDPSESSIONDESC2 lpSessionDest = (LPDPSESSIONDESC2) HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( *lpSessionSrc ) ); DPLAYX_CopyIntoSessionDesc2A( lpSessionDest, lpSessionSrc ); return lpSessionDest; } /* Copy an ANSI session desc structure to the given buffer */ BOOL DPLAYX_CopyIntoSessionDesc2A( LPDPSESSIONDESC2 lpSessionDest, LPCDPSESSIONDESC2 lpSessionSrc ) { memcpy( lpSessionDest, lpSessionSrc, sizeof( *lpSessionSrc ) ); if( lpSessionSrc->sess.lpszSessionNameA ) { lpSessionDest->sess.lpszSessionNameA = HEAP_strdupA( GetProcessHeap(), HEAP_ZERO_MEMORY, lpSessionSrc->sess.lpszSessionNameA ); } if( lpSessionSrc->pass.lpszPasswordA ) { lpSessionDest->pass.lpszPasswordA = HEAP_strdupA( GetProcessHeap(), HEAP_ZERO_MEMORY, lpSessionSrc->pass.lpszPasswordA ); } return TRUE; } /* Start the index at 0. index will be updated to equal that which should be passed back into this function for the next element */ LPDPSESSIONDESC2 DPLAYX_CopyAndAllocateLocalSession( UINT* index ) { for( ; (*index) < numSupportedSessions; (*index)++ ) { if( sessionData[(*index)].dwSize != 0 ) { return DPLAYX_CopyAndAllocateSessionDesc2A( &sessionData[(*index)++] ); } } /* No more sessions */ return NULL; } /* Start the index at 0. index will be updated to equal that which should be passed back into this function for the next element */ BOOL DPLAYX_CopyLocalSession( UINT* index, LPDPSESSIONDESC2 lpsd ) { for( ; (*index) < numSupportedSessions; (*index)++ ) { if( sessionData[(*index)].dwSize != 0 ) { return DPLAYX_CopyIntoSessionDesc2A( lpsd, &sessionData[(*index)++] ); } } /* No more sessions */ return FALSE; } void DPLAYX_SetLocalSession( LPCDPSESSIONDESC2 lpsd ) { UINT i; FIXME( ": stub\n" ); /* FIXME: Is this an error if it exists already? */ /* Crude/wrong implementation for now. Just always add to first empty spot */ for( i=0; i < numSupportedSessions; i++ ) { /* Is this one empty? */ if( sessionData[i].dwSize == 0 ) { DPLAYX_CopyIntoSessionDesc2A( &sessionData[i], lpsd ); break; } } } /* NOTE: This is potentially not thread safe. You are not guaranteed to end up with the correct string printed in the case where the HRESULT is not known. You'll just get the last hr passed in printed. This can change over time if this method is used alot :) */ LPCSTR DPLAYX_HresultToString(HRESULT hr) { static char szTempStr[12]; switch (hr) { case DP_OK: return "DP_OK"; case DPERR_ALREADYINITIALIZED: return "DPERR_ALREADYINITIALIZED"; case DPERR_ACCESSDENIED: return "DPERR_ACCESSDENIED"; case DPERR_ACTIVEPLAYERS: return "DPERR_ACTIVEPLAYERS"; case DPERR_BUFFERTOOSMALL: return "DPERR_BUFFERTOOSMALL"; case DPERR_CANTADDPLAYER: return "DPERR_CANTADDPLAYER"; case DPERR_CANTCREATEGROUP: return "DPERR_CANTCREATEGROUP"; case DPERR_CANTCREATEPLAYER: return "DPERR_CANTCREATEPLAYER"; case DPERR_CANTCREATESESSION: return "DPERR_CANTCREATESESSION"; case DPERR_CAPSNOTAVAILABLEYET: return "DPERR_CAPSNOTAVAILABLEYET"; case DPERR_EXCEPTION: return "DPERR_EXCEPTION"; case DPERR_GENERIC: return "DPERR_GENERIC"; case DPERR_INVALIDFLAGS: return "DPERR_INVALIDFLAGS"; case DPERR_INVALIDOBJECT: return "DPERR_INVALIDOBJECT"; case DPERR_INVALIDPARAMS: return "DPERR_INVALIDPARAMS"; case DPERR_INVALIDPLAYER: return "DPERR_INVALIDPLAYER"; case DPERR_INVALIDGROUP: return "DPERR_INVALIDGROUP"; case DPERR_NOCAPS: return "DPERR_NOCAPS"; case DPERR_NOCONNECTION: return "DPERR_NOCONNECTION"; case DPERR_OUTOFMEMORY: return "DPERR_OUTOFMEMORY"; case DPERR_NOMESSAGES: return "DPERR_NOMESSAGES"; case DPERR_NONAMESERVERFOUND: return "DPERR_NONAMESERVERFOUND"; case DPERR_NOPLAYERS: return "DPERR_NOPLAYERS"; case DPERR_NOSESSIONS: return "DPERR_NOSESSIONS"; /* This one isn't defined yet in WINE sources. I don't know the value case DPERR_PENDING: return "DPERR_PENDING"; */ case DPERR_SENDTOOBIG: return "DPERR_SENDTOOBIG"; case DPERR_TIMEOUT: return "DPERR_TIMEOUT"; case DPERR_UNAVAILABLE: return "DPERR_UNAVAILABLE"; case DPERR_UNSUPPORTED: return "DPERR_UNSUPPORTED"; case DPERR_BUSY: return "DPERR_BUSY"; case DPERR_USERCANCEL: return "DPERR_USERCANCEL"; case DPERR_NOINTERFACE: return "DPERR_NOINTERFACE"; case DPERR_CANNOTCREATESERVER: return "DPERR_CANNOTCREATESERVER"; case DPERR_PLAYERLOST: return "DPERR_PLAYERLOST"; case DPERR_SESSIONLOST: return "DPERR_SESSIONLOST"; case DPERR_UNINITIALIZED: return "DPERR_UNINITIALIZED"; case DPERR_NONEWPLAYERS: return "DPERR_NONEWPLAYERS"; case DPERR_INVALIDPASSWORD: return "DPERR_INVALIDPASSWORD"; case DPERR_CONNECTING: return "DPERR_CONNECTING"; case DPERR_CONNECTIONLOST: return "DPERR_CONNECTIONLOST"; case DPERR_UNKNOWNMESSAGE: return "DPERR_UNKNOWNMESSAGE"; case DPERR_CANCELFAILED: return "DPERR_CANCELFAILED"; case DPERR_INVALIDPRIORITY: return "DPERR_INVALIDPRIORITY"; case DPERR_NOTHANDLED: return "DPERR_NOTHANDLED"; case DPERR_CANCELLED: return "DPERR_CANCELLED"; case DPERR_ABORTED: return "DPERR_ABORTED"; case DPERR_BUFFERTOOLARGE: return "DPERR_BUFFERTOOLARGE"; case DPERR_CANTCREATEPROCESS: return "DPERR_CANTCREATEPROCESS"; case DPERR_APPNOTSTARTED: return "DPERR_APPNOTSTARTED"; case DPERR_INVALIDINTERFACE: return "DPERR_INVALIDINTERFACE"; case DPERR_NOSERVICEPROVIDER: return "DPERR_NOSERVICEPROVIDER"; case DPERR_UNKNOWNAPPLICATION: return "DPERR_UNKNOWNAPPLICATION"; case DPERR_NOTLOBBIED: return "DPERR_NOTLOBBIED"; case DPERR_SERVICEPROVIDERLOADED: return "DPERR_SERVICEPROVIDERLOADED"; case DPERR_ALREADYREGISTERED: return "DPERR_ALREADYREGISTERED"; case DPERR_NOTREGISTERED: return "DPERR_NOTREGISTERED"; case DPERR_AUTHENTICATIONFAILED: return "DPERR_AUTHENTICATIONFAILED"; case DPERR_CANTLOADSSPI: return "DPERR_CANTLOADSSPI"; case DPERR_ENCRYPTIONFAILED: return "DPERR_ENCRYPTIONFAILED"; case DPERR_SIGNFAILED: return "DPERR_SIGNFAILED"; case DPERR_CANTLOADSECURITYPACKAGE: return "DPERR_CANTLOADSECURITYPACKAGE"; case DPERR_ENCRYPTIONNOTSUPPORTED: return "DPERR_ENCRYPTIONNOTSUPPORTED"; case DPERR_CANTLOADCAPI: return "DPERR_CANTLOADCAPI"; case DPERR_NOTLOGGEDIN: return "DPERR_NOTLOGGEDIN"; case DPERR_LOGONDENIED: return "DPERR_LOGONDENIED"; default: /* For errors not in the list, return HRESULT as a string This part is not thread safe */ WARN( "Unknown error 0x%08lx\n", hr ); sprintf( szTempStr, "0x%08lx", hr ); return szTempStr; } } wine-20000526/dlls/dplayx/dplayx_global.h0100644000175000001440000000175507113575026017711 0ustar julliardusers #ifndef __WINE_DPLAYX_GLOBAL #define __WINE_DPLAYX_GLOBAL #include "dplay.h" void DPLAYX_ConstructData(void); void DPLAYX_DestructData(void); HRESULT DPLAYX_GetConnectionSettingsA ( DWORD dwAppID, LPVOID lpData, LPDWORD lpdwDataSize ); HRESULT DPLAYX_GetConnectionSettingsW ( DWORD dwAppID, LPVOID lpData, LPDWORD lpdwDataSize ); HRESULT DPLAYX_SetConnectionSettingsA ( DWORD dwFlags, DWORD dwAppID, LPDPLCONNECTION lpConn ); HRESULT DPLAYX_SetConnectionSettingsW ( DWORD dwFlags, DWORD dwAppID, LPDPLCONNECTION lpConn ); BOOL DPLAYX_CreateLobbyApplication( DWORD dwAppID, HANDLE hReceiveEvent ); BOOL DPLAYX_DestroyLobbyApplication( DWORD dwAppID ); LPDPSESSIONDESC2 DPLAYX_CopyAndAllocateLocalSession( UINT* index ); BOOL DPLAYX_CopyLocalSession( UINT* index, LPDPSESSIONDESC2 lpsd ); void DPLAYX_SetLocalSession( LPCDPSESSIONDESC2 lpsd ); /* Convert a DP or DPL HRESULT code into a string for human consumption */ LPCSTR DPLAYX_HresultToString( HRESULT hr ); #endif /* __WINE_DPLAYX_GLOBAL */ wine-20000526/dlls/dplayx/dplayx_main.c0100644000175000001440000000206507010166237017357 0ustar julliardusers/* * DPLAYX.DLL LibMain * * Copyright 1999 - Peter Hunnisett * * contact */ #include "winbase.h" #include "debugtools.h" #include "dplayx_global.h" DEFAULT_DEBUG_CHANNEL(dplay) static DWORD DPLAYX_dwProcessesAttached = 0; BOOL WINAPI DPLAYX_LibMain( HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved ) { switch ( fdwReason ) { case DLL_PROCESS_ATTACH: { if ( DPLAYX_dwProcessesAttached == 0 ) { /* First instance perform construction of global processor data */ DPLAYX_ConstructData(); } DPLAYX_dwProcessesAttached++; break; } case DLL_PROCESS_DETACH: { DPLAYX_dwProcessesAttached--; if ( DPLAYX_dwProcessesAttached == 0 ) { /* Last instance perform destruction of global processor data */ DPLAYX_DestructData(); } break; } case DLL_THREAD_ATTACH: /* Do nothing */ case DLL_THREAD_DETACH: /* Do nothing */ break; default: break; } return TRUE; } wine-20000526/dlls/dplayx/dplobby.c0100644000175000001440000016520207062775631016523 0ustar julliardusers/* Direct Play Lobby 2 & 3 Implementation * * Copyright 1998,1999,2000 - Peter Hunnisett * * * */ #include #include "winerror.h" #include "winnt.h" #include "winreg.h" #include "heap.h" #include "debugtools.h" #include "dplobby.h" #include "dpinit.h" #include "dplayx_global.h" DEFAULT_DEBUG_CHANNEL(dplay) /* Forward declarations for this module helper methods */ HRESULT DPL_CreateCompoundAddress ( LPCDPCOMPOUNDADDRESSELEMENT lpElements, DWORD dwElementCount, LPVOID lpAddress, LPDWORD lpdwAddressSize, BOOL bAnsiInterface ); HRESULT DPL_CreateAddress( REFGUID guidSP, REFGUID guidDataType, LPCVOID lpData, DWORD dwDataSize, LPVOID lpAddress, LPDWORD lpdwAddressSize, BOOL bAnsiInterface ); static HRESULT DPL_EnumAddress( LPDPENUMADDRESSCALLBACK lpEnumAddressCallback, LPCVOID lpAddress, DWORD dwAddressSize, LPVOID lpContext ); /***************************************************************************** * Predeclare the interface implementation structures */ typedef struct IDirectPlayLobbyImpl IDirectPlayLobbyAImpl; typedef struct IDirectPlayLobbyImpl IDirectPlayLobbyWImpl; typedef struct IDirectPlayLobby2Impl IDirectPlayLobby2AImpl; typedef struct IDirectPlayLobby2Impl IDirectPlayLobby2WImpl; typedef struct IDirectPlayLobby3Impl IDirectPlayLobby3AImpl; typedef struct IDirectPlayLobby3Impl IDirectPlayLobby3WImpl; /***************************************************************************** * IDirectPlayLobby {1,2,3} implementation structure * * The philosophy behind this extra pointer derefernce is that I wanted to * have the same structure for all types of objects without having to do * alot of casting. I also only wanted to implement an interface in the * object it was "released" with IUnknown interface being implemented in the 1 version. * Of course, with these new interfaces comes the data required to keep the state required * by these interfaces. So, basically, the pointers contain the data associated with * a release. If you use the data associated with release 3 in a release 2 object, you'll * get a run time trap, as that won't have any data. * */ typedef struct tagDirectPlayLobbyIUnknownData { DWORD ref; CRITICAL_SECTION DPL_lock; } DirectPlayLobbyIUnknownData; typedef struct tagDirectPlayLobbyData { HKEY hkCallbackKeyHack; } DirectPlayLobbyData; typedef struct tagDirectPlayLobby2Data { BOOL dummy; } DirectPlayLobby2Data; typedef struct tagDirectPlayLobby3Data { BOOL dummy; } DirectPlayLobby3Data; #define DPL_IMPL_FIELDS \ DirectPlayLobbyIUnknownData* unk; \ DirectPlayLobbyData* dpl; \ DirectPlayLobby2Data* dpl2; \ DirectPlayLobby3Data* dpl3; struct IDirectPlayLobbyImpl { ICOM_VFIELD(IDirectPlayLobby); DPL_IMPL_FIELDS }; struct IDirectPlayLobby2Impl { ICOM_VFIELD(IDirectPlayLobby2); DPL_IMPL_FIELDS }; struct IDirectPlayLobby3Impl { ICOM_VFIELD(IDirectPlayLobby3); DPL_IMPL_FIELDS }; /* Forward declarations of virtual tables */ static ICOM_VTABLE(IDirectPlayLobby) directPlayLobbyWVT; static ICOM_VTABLE(IDirectPlayLobby2) directPlayLobby2WVT; static ICOM_VTABLE(IDirectPlayLobby3) directPlayLobby3WVT; static ICOM_VTABLE(IDirectPlayLobby) directPlayLobbyAVT; static ICOM_VTABLE(IDirectPlayLobby2) directPlayLobby2AVT; static ICOM_VTABLE(IDirectPlayLobby3) directPlayLobby3AVT; /* The COM interface for upversioning an interface * We've been given a GUID (riid) and we need to replace the present * interface with that of the requested interface. * * Snip from some Microsoft document: * There are four requirements for implementations of QueryInterface (In these * cases, "must succeed" means "must succeed barring catastrophic failure."): * * * The set of interfaces accessible on an object through * IUnknown::QueryInterface must be static, not dynamic. This means that * if a call to QueryInterface for a pointer to a specified interface * succeeds the first time, it must succeed again, and if it fails the * first time, it must fail on all subsequent queries. * * It must be symmetric ~W if a client holds a pointer to an interface on * an object, and queries for that interface, the call must succeed. * * It must be reflexive ~W if a client holding a pointer to one interface * queries successfully for another, a query through the obtained pointer * for the first interface must succeed. * * It must be transitive ~W if a client holding a pointer to one interface * queries successfully for a second, and through that pointer queries * successfully for a third interface, a query for the first interface * through the pointer for the third interface must succeed. * * As you can see, this interface doesn't qualify but will most likely * be good enough for the time being. */ BOOL DPL_CreateIUnknown( LPVOID lpDPL ) { ICOM_THIS(IDirectPlayLobbyAImpl,lpDPL); This->unk = (DirectPlayLobbyIUnknownData*)HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( *(This->unk) ) ); if ( This->unk == NULL ) { return FALSE; } InitializeCriticalSection( &This->unk->DPL_lock ); IDirectPlayLobby_AddRef( (LPDIRECTPLAYLOBBYA)lpDPL ); return TRUE; } BOOL DPL_DestroyIUnknown( LPVOID lpDPL ) { ICOM_THIS(IDirectPlayLobbyAImpl,lpDPL); DeleteCriticalSection( &This->unk->DPL_lock ); HeapFree( GetProcessHeap(), 0, This->unk ); return TRUE; } BOOL DPL_CreateLobby1( LPVOID lpDPL ) { ICOM_THIS(IDirectPlayLobbyAImpl,lpDPL); This->dpl = (DirectPlayLobbyData*)HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( *(This->dpl) ) ); if ( This->dpl == NULL ) { return FALSE; } return TRUE; } BOOL DPL_DestroyLobby1( LPVOID lpDPL ) { ICOM_THIS(IDirectPlayLobbyAImpl,lpDPL); /* Delete the contents */ HeapFree( GetProcessHeap(), 0, This->dpl ); return TRUE; } BOOL DPL_CreateLobby2( LPVOID lpDPL ) { ICOM_THIS(IDirectPlayLobby2AImpl,lpDPL); This->dpl2 = (DirectPlayLobby2Data*)HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( *(This->dpl2) ) ); if ( This->dpl2 == NULL ) { return FALSE; } return TRUE; } BOOL DPL_DestroyLobby2( LPVOID lpDPL ) { ICOM_THIS(IDirectPlayLobby2AImpl,lpDPL); HeapFree( GetProcessHeap(), 0, This->dpl2 ); return TRUE; } BOOL DPL_CreateLobby3( LPVOID lpDPL ) { ICOM_THIS(IDirectPlayLobby3AImpl,lpDPL); This->dpl3 = (DirectPlayLobby3Data*)HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( *(This->dpl3) ) ); if ( This->dpl3 == NULL ) { return FALSE; } return TRUE; } BOOL DPL_DestroyLobby3( LPVOID lpDPL ) { ICOM_THIS(IDirectPlayLobby3AImpl,lpDPL); HeapFree( GetProcessHeap(), 0, This->dpl3 ); return TRUE; } /* Helper function for DirectPlayLobby QueryInterface */ extern HRESULT directPlayLobby_QueryInterface ( REFIID riid, LPVOID* ppvObj ) { if( IsEqualGUID( &IID_IDirectPlayLobby, riid ) ) { *ppvObj = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( IDirectPlayLobbyWImpl ) ); if( *ppvObj == NULL ) { return E_OUTOFMEMORY; } /* new scope for variable declaration */ { ICOM_THIS(IDirectPlayLobbyWImpl,*ppvObj); ICOM_VTBL(This) = &directPlayLobbyWVT; if ( DPL_CreateIUnknown( (LPVOID)This ) && DPL_CreateLobby1( (LPVOID)This ) ) { return S_OK; } } goto error; } else if( IsEqualGUID( &IID_IDirectPlayLobbyA, riid ) ) { *ppvObj = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( IDirectPlayLobbyAImpl ) ); if( *ppvObj == NULL ) { return E_OUTOFMEMORY; } { ICOM_THIS(IDirectPlayLobbyAImpl,*ppvObj); ICOM_VTBL(This) = &directPlayLobbyAVT; if ( DPL_CreateIUnknown( (LPVOID)This ) && DPL_CreateLobby1( (LPVOID)This ) ) { return S_OK; } } goto error; } else if( IsEqualGUID( &IID_IDirectPlayLobby2, riid ) ) { *ppvObj = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( IDirectPlayLobby2WImpl ) ); if( *ppvObj == NULL ) { return E_OUTOFMEMORY; } { ICOM_THIS(IDirectPlayLobby2WImpl,*ppvObj); ICOM_VTBL(This) = &directPlayLobby2WVT; if ( DPL_CreateIUnknown( (LPVOID)This ) && DPL_CreateLobby1( (LPVOID)This ) && DPL_CreateLobby2( (LPVOID)This ) ) { return S_OK; } } goto error; } else if( IsEqualGUID( &IID_IDirectPlayLobby2A, riid ) ) { *ppvObj = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( IDirectPlayLobby2AImpl ) ); if( *ppvObj == NULL ) { return E_OUTOFMEMORY; } { ICOM_THIS(IDirectPlayLobby2AImpl,*ppvObj); ICOM_VTBL(This) = &directPlayLobby2AVT; if ( DPL_CreateIUnknown( (LPVOID)This ) && DPL_CreateLobby1( (LPVOID)This ) && DPL_CreateLobby2( (LPVOID)This ) ) { return S_OK; } } goto error; } else if( IsEqualGUID( &IID_IDirectPlayLobby3, riid ) ) { *ppvObj = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( IDirectPlayLobby3WImpl ) ); if( *ppvObj == NULL ) { return E_OUTOFMEMORY; } { ICOM_THIS(IDirectPlayLobby3WImpl,*ppvObj); ICOM_VTBL(This) = &directPlayLobby3WVT; if ( DPL_CreateIUnknown( *ppvObj ) && DPL_CreateLobby1( *ppvObj ) && DPL_CreateLobby2( *ppvObj ) && DPL_CreateLobby3( *ppvObj ) ) { return S_OK; } } goto error; } else if( IsEqualGUID( &IID_IDirectPlayLobby3A, riid ) ) { *ppvObj = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( IDirectPlayLobby3AImpl ) ); if( *ppvObj == NULL ) { return E_OUTOFMEMORY; } { ICOM_THIS(IDirectPlayLobby3AImpl,*ppvObj); ICOM_VTBL(This) = &directPlayLobby3AVT; if ( DPL_CreateIUnknown( *ppvObj ) && DPL_CreateLobby1( *ppvObj ) && DPL_CreateLobby2( *ppvObj ) && DPL_CreateLobby3( *ppvObj ) ) { return S_OK; } } goto error; } /* Unsupported interface */ *ppvObj = NULL; return E_NOINTERFACE; error: DPL_DestroyLobby3( *ppvObj ); DPL_DestroyLobby2( *ppvObj ); DPL_DestroyLobby1( *ppvObj ); DPL_DestroyIUnknown( *ppvObj ); HeapFree( GetProcessHeap(), 0, *ppvObj ); *ppvObj = NULL; return DPERR_NOMEMORY; } static HRESULT WINAPI IDirectPlayLobbyAImpl_QueryInterface ( LPDIRECTPLAYLOBBYA iface, REFIID riid, LPVOID* ppvObj ) { ICOM_THIS(IDirectPlayLobbyAImpl,iface); TRACE("(%p)->(%p,%p)\n", This, riid, ppvObj ); if( IsEqualGUID( &IID_IUnknown, riid ) || IsEqualGUID( &IID_IDirectPlayLobbyA, riid ) ) { IDirectPlayLobby_AddRef( iface ); *ppvObj = This; return S_OK; } return directPlayLobby_QueryInterface( riid, ppvObj ); } static HRESULT WINAPI IDirectPlayLobbyW_QueryInterface ( LPDIRECTPLAYLOBBY iface, REFIID riid, LPVOID* ppvObj ) { ICOM_THIS(IDirectPlayLobbyWImpl,iface); TRACE("(%p)->(%p,%p)\n", This, riid, ppvObj ); if( IsEqualGUID( &IID_IUnknown, riid ) || IsEqualGUID( &IID_IDirectPlayLobby, riid ) ) { IDirectPlayLobby_AddRef( iface ); *ppvObj = This; return S_OK; } return directPlayLobby_QueryInterface( riid, ppvObj ); } static HRESULT WINAPI IDirectPlayLobby2AImpl_QueryInterface ( LPDIRECTPLAYLOBBY2A iface, REFIID riid, LPVOID* ppvObj ) { ICOM_THIS(IDirectPlayLobby2AImpl,iface); TRACE("(%p)->(%p,%p)\n", This, riid, ppvObj ); /* Compare riids. We know this object is a direct play lobby 2A object. If we are asking about the same type of interface we're fine. */ if( IsEqualGUID( &IID_IUnknown, riid ) || IsEqualGUID( &IID_IDirectPlayLobby2A, riid ) ) { IDirectPlayLobby_AddRef( iface ); *ppvObj = This; return S_OK; } return directPlayLobby_QueryInterface( riid, ppvObj ); } static HRESULT WINAPI IDirectPlayLobby2WImpl_QueryInterface ( LPDIRECTPLAYLOBBY2 iface, REFIID riid, LPVOID* ppvObj ) { ICOM_THIS(IDirectPlayLobby2WImpl,iface); /* Compare riids. We know this object is a direct play lobby 2 object. If we are asking about the same type of interface we're fine. */ if( IsEqualGUID( &IID_IUnknown, riid ) || IsEqualGUID( &IID_IDirectPlayLobby2, riid ) ) { IDirectPlayLobby_AddRef( iface ); *ppvObj = This; return S_OK; } return directPlayLobby_QueryInterface( riid, ppvObj ); } static HRESULT WINAPI IDirectPlayLobby3AImpl_QueryInterface ( LPDIRECTPLAYLOBBY3A iface, REFIID riid, LPVOID* ppvObj ) { ICOM_THIS(IDirectPlayLobby3AImpl,iface); /* Compare riids. We know this object is a direct play lobby 3 object. If we are asking about the same type of interface we're fine. */ if( IsEqualGUID( &IID_IUnknown, riid ) || IsEqualGUID( &IID_IDirectPlayLobby3A, riid ) ) { IDirectPlayLobby_AddRef( iface ); *ppvObj = This; return S_OK; } return directPlayLobby_QueryInterface( riid, ppvObj ); } static HRESULT WINAPI IDirectPlayLobby3WImpl_QueryInterface ( LPDIRECTPLAYLOBBY3 iface, REFIID riid, LPVOID* ppvObj ) { ICOM_THIS(IDirectPlayLobby3WImpl,iface); /* Compare riids. We know this object is a direct play lobby 3 object. If we are asking about the same type of interface we're fine. */ if( IsEqualGUID( &IID_IUnknown, riid ) || IsEqualGUID( &IID_IDirectPlayLobby3, riid ) ) { IDirectPlayLobby_AddRef( iface ); *ppvObj = This; return S_OK; } return directPlayLobby_QueryInterface( riid, ppvObj ); } /* * Simple procedure. Just increment the reference count to this * structure and return the new reference count. */ static ULONG WINAPI IDirectPlayLobbyImpl_AddRef ( LPDIRECTPLAYLOBBY iface ) { ULONG refCount; ICOM_THIS(IDirectPlayLobbyWImpl,iface); EnterCriticalSection( &This->unk->DPL_lock ); { refCount = ++(This->unk->ref); } LeaveCriticalSection( &This->unk->DPL_lock ); TRACE("ref count incremented to %lu for %p\n", refCount, This ); return refCount; } /* * Simple COM procedure. Decrease the reference count to this object. * If the object no longer has any reference counts, free up the associated * memory. */ static ULONG WINAPI IDirectPlayLobbyAImpl_Release ( LPDIRECTPLAYLOBBYA iface ) { ULONG refCount; ICOM_THIS(IDirectPlayLobbyAImpl,iface); EnterCriticalSection( &This->unk->DPL_lock ); { refCount = --(This->unk->ref); } LeaveCriticalSection( &This->unk->DPL_lock ); TRACE("ref count decremeneted to %lu for %p\n", refCount, This ); /* Deallocate if this is the last reference to the object */ if( refCount ) { DPL_DestroyLobby3( This ); DPL_DestroyLobby2( This ); DPL_DestroyLobby1( This ); DPL_DestroyIUnknown( This ); HeapFree( GetProcessHeap(), 0, This ); } return refCount; } /******************************************************************** * * Connects an application to the session specified by the DPLCONNECTION * structure currently stored with the DirectPlayLobby object. * * Returns a IDirectPlay interface. * */ static HRESULT WINAPI IDirectPlayLobbyAImpl_Connect ( LPDIRECTPLAYLOBBYA iface, DWORD dwFlags, LPDIRECTPLAY2A* lplpDP, IUnknown* pUnk) { ICOM_THIS(IDirectPlayLobbyAImpl,iface); LPDIRECTPLAY2A lpDirectPlay2A; /* LPDIRECTPLAY3A lpDirectPlay3A; */ /* LPDIRECTPLAYLOBBY2A lpDirectPlayLobby2A; */ HRESULT rc; FIXME("(%p)->(0x%08lx,%p,%p): stub\n", This, dwFlags, lplpDP, pUnk ); if( dwFlags || pUnk ) { return DPERR_INVALIDPARAMS; } /* Create the DirectPlay interface */ if( ( rc = directPlay_QueryInterface( &IID_IDirectPlay2A, (LPVOID*)lplpDP ) ) != DP_OK ) { ERR("error creating Direct Play 2A interface. Return Code = 0x%lx.\n", rc ); return rc; } lpDirectPlay2A = *lplpDP; /* - Need to call IDirectPlay::EnumConnections with the service provider to get that good information * - Need to call CreateAddress to create the lpConnection param for IDirectPlay::InitializeConnection * - Call IDirectPlay::InitializeConnection * - Call IDirectPlay::Open */ #if 0 IDirectPlayLobby_EnumAddress( iface, RunApplicationA_Callback, lpConn->lpAddress, lpConn->dwAddressSize, NULL ); #endif return DP_OK; } static HRESULT WINAPI IDirectPlayLobbyWImpl_Connect ( LPDIRECTPLAYLOBBY iface, DWORD dwFlags, LPDIRECTPLAY2* lplpDP, IUnknown* pUnk) { ICOM_THIS(IDirectPlayLobbyWImpl,iface); LPDIRECTPLAY2* directPlay2W; HRESULT createRC; FIXME("(%p)->(0x%08lx,%p,%p): stub\n", This, dwFlags, lplpDP, pUnk ); if( dwFlags || pUnk ) { return DPERR_INVALIDPARAMS; } /* Create the DirectPlay interface */ if( ( createRC = directPlay_QueryInterface( &IID_IDirectPlay2, (LPVOID*)lplpDP ) ) != DP_OK ) { ERR("error creating Direct Play 2W interface. Return Code = 0x%lx.\n", createRC ); return createRC; } /* This should invoke IDirectPlay3::InitializeConnection IDirectPlay3::Open */ directPlay2W = lplpDP; return DP_OK; } /******************************************************************** * * Creates a DirectPlay Address, given a service provider-specific network * address. * Returns an address contains the globally unique identifier * (GUID) of the service provider and data that the service provider can * interpret as a network address. * * NOTE: It appears that this method is supposed to be really really stupid * with no error checking on the contents. */ static HRESULT WINAPI IDirectPlayLobbyAImpl_CreateAddress ( LPDIRECTPLAYLOBBYA iface, REFGUID guidSP, REFGUID guidDataType, LPCVOID lpData, DWORD dwDataSize, LPVOID lpAddress, LPDWORD lpdwAddressSize ) { return DPL_CreateAddress( guidSP, guidDataType, lpData, dwDataSize, lpAddress, lpdwAddressSize, TRUE ); } static HRESULT WINAPI IDirectPlayLobbyWImpl_CreateAddress ( LPDIRECTPLAYLOBBY iface, REFGUID guidSP, REFGUID guidDataType, LPCVOID lpData, DWORD dwDataSize, LPVOID lpAddress, LPDWORD lpdwAddressSize ) { return DPL_CreateAddress( guidSP, guidDataType, lpData, dwDataSize, lpAddress, lpdwAddressSize, FALSE ); } HRESULT DPL_CreateAddress( REFGUID guidSP, REFGUID guidDataType, LPCVOID lpData, DWORD dwDataSize, LPVOID lpAddress, LPDWORD lpdwAddressSize, BOOL bAnsiInterface ) { const DWORD dwNumAddElements = 2; /* Service Provide & address data type */ DPCOMPOUNDADDRESSELEMENT addressElements[ 2 /* dwNumAddElements */ ]; TRACE( "(%p)->(%p,%p,0x%08lx,%p,%p,%d)\n", guidSP, guidDataType, lpData, dwDataSize, lpAddress, lpdwAddressSize, bAnsiInterface ); addressElements[ 0 ].guidDataType = DPAID_ServiceProvider; addressElements[ 0 ].dwDataSize = sizeof( GUID ); addressElements[ 0 ].lpData = (LPVOID)guidSP; addressElements[ 1 ].guidDataType = *guidDataType; addressElements[ 1 ].dwDataSize = dwDataSize; addressElements[ 1 ].lpData = (LPVOID)lpData; /* Call CreateCompoundAddress to cut down on code. NOTE: We can do this because we don't support DPL 1 interfaces! */ return DPL_CreateCompoundAddress( addressElements, dwNumAddElements, lpAddress, lpdwAddressSize, bAnsiInterface ); } /******************************************************************** * * Parses out chunks from the DirectPlay Address buffer by calling the * given callback function, with lpContext, for each of the chunks. * */ static HRESULT WINAPI IDirectPlayLobbyAImpl_EnumAddress ( LPDIRECTPLAYLOBBYA iface, LPDPENUMADDRESSCALLBACK lpEnumAddressCallback, LPCVOID lpAddress, DWORD dwAddressSize, LPVOID lpContext ) { ICOM_THIS(IDirectPlayLobbyAImpl,iface); TRACE("(%p)->(%p,%p,0x%08lx,%p)\n", This, lpEnumAddressCallback, lpAddress, dwAddressSize, lpContext ); return DPL_EnumAddress( lpEnumAddressCallback, lpAddress, dwAddressSize, lpContext ); } static HRESULT WINAPI IDirectPlayLobbyWImpl_EnumAddress ( LPDIRECTPLAYLOBBY iface, LPDPENUMADDRESSCALLBACK lpEnumAddressCallback, LPCVOID lpAddress, DWORD dwAddressSize, LPVOID lpContext ) { ICOM_THIS(IDirectPlayLobbyWImpl,iface); TRACE("(%p)->(%p,%p,0x%08lx,%p)\n", This, lpEnumAddressCallback, lpAddress, dwAddressSize, lpContext ); return DPL_EnumAddress( lpEnumAddressCallback, lpAddress, dwAddressSize, lpContext ); } static HRESULT DPL_EnumAddress( LPDPENUMADDRESSCALLBACK lpEnumAddressCallback, LPCVOID lpAddress, DWORD dwAddressSize, LPVOID lpContext ) { DWORD dwTotalSizeEnumerated = 0; /* FIXME: First chunk is always the total size chunk - Should we report it? */ while ( dwTotalSizeEnumerated < dwAddressSize ) { LPDPADDRESS lpElements = (LPDPADDRESS)lpAddress; DWORD dwSizeThisEnumeration; /* Invoke the enum method. If false is returned, stop enumeration */ if ( !lpEnumAddressCallback( &lpElements->guidDataType, lpElements->dwDataSize, lpElements + sizeof( DPADDRESS ), lpContext ) ) { break; } dwSizeThisEnumeration = sizeof( DPADDRESS ) + lpElements->dwDataSize; lpAddress = (char *) lpAddress + dwSizeThisEnumeration; dwTotalSizeEnumerated += dwSizeThisEnumeration; } return DP_OK; } /******************************************************************** * * Enumerates all the address types that a given service provider needs to * build the DirectPlay Address. * */ static HRESULT WINAPI IDirectPlayLobbyAImpl_EnumAddressTypes ( LPDIRECTPLAYLOBBYA iface, LPDPLENUMADDRESSTYPESCALLBACK lpEnumAddressTypeCallback, REFGUID guidSP, LPVOID lpContext, DWORD dwFlags ) { ICOM_THIS(IDirectPlayLobbyAImpl,iface); HKEY hkResult; LPCSTR searchSubKey = "SOFTWARE\\Microsoft\\DirectPlay\\Service Providers"; DWORD dwIndex, sizeOfSubKeyName=50; char subKeyName[51]; FILETIME filetime; TRACE(" (%p)->(%p,%p,%p,0x%08lx)\n", This, lpEnumAddressTypeCallback, guidSP, lpContext, dwFlags ); if( dwFlags != 0 ) { return DPERR_INVALIDPARAMS; } if( !lpEnumAddressTypeCallback || !*lpEnumAddressTypeCallback ) { return DPERR_INVALIDPARAMS; } if( guidSP == NULL ) { return DPERR_INVALIDOBJECT; } /* Need to loop over the service providers in the registry */ if( RegOpenKeyExA( HKEY_LOCAL_MACHINE, searchSubKey, 0, KEY_READ, &hkResult ) != ERROR_SUCCESS ) { /* Hmmm. Does this mean that there are no service providers? */ ERR(": no service providers?\n"); return DP_OK; } /* Traverse all the service providers we have available */ for( dwIndex=0; RegEnumKeyExA( hkResult, dwIndex, subKeyName, &sizeOfSubKeyName, NULL, NULL, NULL, &filetime ) != ERROR_NO_MORE_ITEMS; ++dwIndex, sizeOfSubKeyName=50 ) { HKEY hkServiceProvider, hkServiceProviderAt; GUID serviceProviderGUID; DWORD returnTypeGUID, sizeOfReturnBuffer = 50; char atSubKey[51]; char returnBuffer[51]; LPWSTR lpWGUIDString; DWORD dwAtIndex; LPSTR atKey = "Address Types"; LPSTR guidDataSubKey = "Guid"; FILETIME filetime; TRACE(" this time through: %s\n", subKeyName ); /* Get a handle for this particular service provider */ if( RegOpenKeyExA( hkResult, subKeyName, 0, KEY_READ, &hkServiceProvider ) != ERROR_SUCCESS ) { ERR(": what the heck is going on?\n" ); continue; } if( RegQueryValueExA( hkServiceProvider, guidDataSubKey, NULL, &returnTypeGUID, returnBuffer, &sizeOfReturnBuffer ) != ERROR_SUCCESS ) { ERR(": missing GUID registry data members\n" ); continue; } /* FIXME: Check return types to ensure we're interpreting data right */ lpWGUIDString = HEAP_strdupAtoW( GetProcessHeap(), 0, returnBuffer ); CLSIDFromString( (LPCOLESTR)lpWGUIDString, &serviceProviderGUID ); HeapFree( GetProcessHeap(), 0, lpWGUIDString ); /* FIXME: Have I got a memory leak on the serviceProviderGUID? */ /* Determine if this is the Service Provider that the user asked for */ if( !IsEqualGUID( &serviceProviderGUID, guidSP ) ) { continue; } /* Get a handle for this particular service provider */ if( RegOpenKeyExA( hkServiceProvider, atKey, 0, KEY_READ, &hkServiceProviderAt ) != ERROR_SUCCESS ) { TRACE(": No Address Types registry data sub key/members\n" ); break; } /* Traverse all the address type we have available */ for( dwAtIndex=0; RegEnumKeyExA( hkServiceProviderAt, dwAtIndex, atSubKey, &sizeOfSubKeyName, NULL, NULL, NULL, &filetime ) != ERROR_NO_MORE_ITEMS; ++dwAtIndex, sizeOfSubKeyName=50 ) { TRACE( "Found Address Type GUID %s\n", atSubKey ); /* FIXME: Check return types to ensure we're interpreting data right */ lpWGUIDString = HEAP_strdupAtoW( GetProcessHeap(), 0, atSubKey ); CLSIDFromString( (LPCOLESTR)lpWGUIDString, &serviceProviderGUID ); HeapFree( GetProcessHeap(), 0, lpWGUIDString ); /* FIXME: Have I got a memory leak on the serviceProviderGUID? */ /* The enumeration will return FALSE if we are not to continue */ if( !lpEnumAddressTypeCallback( &serviceProviderGUID, lpContext, 0 ) ) { WARN("lpEnumCallback returning FALSE\n" ); break; /* FIXME: This most likely has to break from the procedure...*/ } } /* We only enumerate address types for 1 GUID. We've found it, so quit looking */ break; } return DP_OK; } static HRESULT WINAPI IDirectPlayLobbyWImpl_EnumAddressTypes ( LPDIRECTPLAYLOBBY iface, LPDPLENUMADDRESSTYPESCALLBACK lpEnumAddressTypeCallback, REFGUID guidSP, LPVOID lpContext, DWORD dwFlags ) { FIXME(":stub\n"); return DPERR_OUTOFMEMORY; } /******************************************************************** * * Enumerates what applications are registered with DirectPlay by * invoking the callback function with lpContext. * */ static HRESULT WINAPI IDirectPlayLobbyWImpl_EnumLocalApplications ( LPDIRECTPLAYLOBBY iface, LPDPLENUMLOCALAPPLICATIONSCALLBACK lpEnumLocalAppCallback, LPVOID lpContext, DWORD dwFlags ) { ICOM_THIS(IDirectPlayLobbyWImpl,iface); FIXME("(%p)->(%p,%p,0x%08lx):stub\n", This, lpEnumLocalAppCallback, lpContext, dwFlags ); return DPERR_OUTOFMEMORY; } static HRESULT WINAPI IDirectPlayLobbyAImpl_EnumLocalApplications ( LPDIRECTPLAYLOBBYA iface, LPDPLENUMLOCALAPPLICATIONSCALLBACK lpEnumLocalAppCallback, LPVOID lpContext, DWORD dwFlags ) { ICOM_THIS(IDirectPlayLobbyAImpl,iface); HKEY hkResult; LPCSTR searchSubKey = "SOFTWARE\\Microsoft\\DirectPlay\\Applications"; LPSTR guidDataSubKey = "Guid"; DWORD dwIndex, sizeOfSubKeyName=50; char subKeyName[51]; FILETIME filetime; TRACE("(%p)->(%p,%p,0x%08lx)\n", This, lpEnumLocalAppCallback, lpContext, dwFlags ); if( dwFlags != 0 ) { return DPERR_INVALIDPARAMS; } if( !lpEnumLocalAppCallback || !*lpEnumLocalAppCallback ) { return DPERR_INVALIDPARAMS; } /* Need to loop over the service providers in the registry */ if( RegOpenKeyExA( HKEY_LOCAL_MACHINE, searchSubKey, 0, KEY_READ, &hkResult ) != ERROR_SUCCESS ) { /* Hmmm. Does this mean that there are no service providers? */ ERR(": no service providers?\n"); return DP_OK; } /* Traverse all registered applications */ for( dwIndex=0; RegEnumKeyExA( hkResult, dwIndex, subKeyName, &sizeOfSubKeyName, NULL, NULL, NULL, &filetime ) != ERROR_NO_MORE_ITEMS; ++dwIndex, sizeOfSubKeyName=50 ) { HKEY hkServiceProvider; GUID serviceProviderGUID; DWORD returnTypeGUID, sizeOfReturnBuffer = 50; char returnBuffer[51]; LPWSTR lpWGUIDString; DPLAPPINFO dplAppInfo; TRACE(" this time through: %s\n", subKeyName ); /* Get a handle for this particular service provider */ if( RegOpenKeyExA( hkResult, subKeyName, 0, KEY_READ, &hkServiceProvider ) != ERROR_SUCCESS ) { ERR(": what the heck is going on?\n" ); continue; } if( RegQueryValueExA( hkServiceProvider, guidDataSubKey, NULL, &returnTypeGUID, returnBuffer, &sizeOfReturnBuffer ) != ERROR_SUCCESS ) { ERR(": missing GUID registry data members\n" ); continue; } /* FIXME: Check return types to ensure we're interpreting data right */ lpWGUIDString = HEAP_strdupAtoW( GetProcessHeap(), 0, returnBuffer ); CLSIDFromString( (LPCOLESTR)lpWGUIDString, &serviceProviderGUID ); HeapFree( GetProcessHeap(), 0, lpWGUIDString ); /* FIXME: Have I got a memory leak on the serviceProviderGUID? */ dplAppInfo.dwSize = sizeof( dplAppInfo ); dplAppInfo.guidApplication = serviceProviderGUID; dplAppInfo.appName.lpszAppNameA = subKeyName; EnterCriticalSection( &This->unk->DPL_lock ); memcpy( &This->dpl->hkCallbackKeyHack, &hkServiceProvider, sizeof( hkServiceProvider ) ); if( !lpEnumLocalAppCallback( &dplAppInfo, lpContext, dwFlags ) ) { LeaveCriticalSection( &This->unk->DPL_lock ); break; } LeaveCriticalSection( &This->unk->DPL_lock ); } return DP_OK; } /******************************************************************** * * Retrieves the DPLCONNECTION structure that contains all the information * needed to start and connect an application. This was generated using * either the RunApplication or SetConnectionSettings methods. * * NOTES: If lpData is NULL then just return lpdwDataSize. This allows * the data structure to be allocated by our caller which can then * call this procedure/method again with a valid data pointer. */ static HRESULT WINAPI IDirectPlayLobbyAImpl_GetConnectionSettings ( LPDIRECTPLAYLOBBYA iface, DWORD dwAppID, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlayLobbyAImpl,iface); HRESULT hr; TRACE("(%p)->(0x%08lx,%p,%p)\n", This, dwAppID, lpData, lpdwDataSize ); EnterCriticalSection( &This->unk->DPL_lock ); hr = DPLAYX_GetConnectionSettingsA( dwAppID, lpData, lpdwDataSize ); LeaveCriticalSection( &This->unk->DPL_lock ); return hr; } static HRESULT WINAPI IDirectPlayLobbyWImpl_GetConnectionSettings ( LPDIRECTPLAYLOBBY iface, DWORD dwAppID, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlayLobbyWImpl,iface); HRESULT hr; TRACE("(%p)->(0x%08lx,%p,%p)\n", This, dwAppID, lpData, lpdwDataSize ); EnterCriticalSection( &This->unk->DPL_lock ); hr = DPLAYX_GetConnectionSettingsW( dwAppID, lpData, lpdwDataSize ); LeaveCriticalSection( &This->unk->DPL_lock ); return hr; } /******************************************************************** * * Retrieves the message sent between a lobby client and a DirectPlay * application. All messages are queued until received. * */ static HRESULT WINAPI IDirectPlayLobbyAImpl_ReceiveLobbyMessage ( LPDIRECTPLAYLOBBYA iface, DWORD dwFlags, DWORD dwAppID, LPDWORD lpdwMessageFlags, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlayLobbyAImpl,iface); FIXME(":stub %p %08lx %08lx %p %p %p\n", This, dwFlags, dwAppID, lpdwMessageFlags, lpData, lpdwDataSize ); return DPERR_OUTOFMEMORY; } static HRESULT WINAPI IDirectPlayLobbyWImpl_ReceiveLobbyMessage ( LPDIRECTPLAYLOBBY iface, DWORD dwFlags, DWORD dwAppID, LPDWORD lpdwMessageFlags, LPVOID lpData, LPDWORD lpdwDataSize ) { ICOM_THIS(IDirectPlayLobbyWImpl,iface); FIXME(":stub %p %08lx %08lx %p %p %p\n", This, dwFlags, dwAppID, lpdwMessageFlags, lpData, lpdwDataSize ); return DPERR_OUTOFMEMORY; } typedef struct tagRunApplicationEnumStruct { IDirectPlayLobbyAImpl* This; GUID appGUID; LPSTR lpszPath; LPSTR lpszFileName; LPSTR lpszCommandLine; LPSTR lpszCurrentDirectory; } RunApplicationEnumStruct, *lpRunApplicationEnumStruct; /* To be called by RunApplication to find how to invoke the function */ static BOOL CALLBACK RunApplicationA_EnumLocalApplications ( LPCDPLAPPINFO lpAppInfo, LPVOID lpContext, DWORD dwFlags ) { lpRunApplicationEnumStruct lpData = (lpRunApplicationEnumStruct)lpContext; if( IsEqualGUID( &lpAppInfo->guidApplication, &lpData->appGUID ) ) { char returnBuffer[200]; DWORD returnType, sizeOfReturnBuffer; LPSTR clSubKey = "CommandLine"; LPSTR cdSubKey = "CurrentDirectory"; LPSTR fileSubKey = "File"; LPSTR pathSubKey = "Path"; /* FIXME: Lazy man hack - dplay struct has the present reg key saved */ sizeOfReturnBuffer = 200; /* Get all the appropriate data from the registry */ if( RegQueryValueExA( lpData->This->dpl->hkCallbackKeyHack, clSubKey, NULL, &returnType, returnBuffer, &sizeOfReturnBuffer ) != ERROR_SUCCESS ) { ERR( ": missing CommandLine registry data member\n" ); } else { lpData->lpszCommandLine = HEAP_strdupA( GetProcessHeap(), HEAP_ZERO_MEMORY, returnBuffer ); } sizeOfReturnBuffer = 200; if( RegQueryValueExA( lpData->This->dpl->hkCallbackKeyHack, cdSubKey, NULL, &returnType, returnBuffer, &sizeOfReturnBuffer ) != ERROR_SUCCESS ) { ERR( ": missing CurrentDirectory registry data member\n" ); } else { lpData->lpszCurrentDirectory = HEAP_strdupA( GetProcessHeap(), HEAP_ZERO_MEMORY, returnBuffer ); } sizeOfReturnBuffer = 200; if( RegQueryValueExA( lpData->This->dpl->hkCallbackKeyHack, fileSubKey, NULL, &returnType, returnBuffer, &sizeOfReturnBuffer ) != ERROR_SUCCESS ) { ERR( ": missing File registry data member\n" ); } else { lpData->lpszFileName = HEAP_strdupA( GetProcessHeap(), HEAP_ZERO_MEMORY, returnBuffer ); } sizeOfReturnBuffer = 200; if( RegQueryValueExA( lpData->This->dpl->hkCallbackKeyHack, pathSubKey, NULL, &returnType, returnBuffer, &sizeOfReturnBuffer ) != ERROR_SUCCESS ) { ERR( ": missing Path registry data member\n" ); } else { lpData->lpszPath = HEAP_strdupA( GetProcessHeap(), HEAP_ZERO_MEMORY, returnBuffer ); } return FALSE; /* No need to keep going as we found what we wanted */ } return TRUE; /* Keep enumerating, haven't found the application yet */ } /******************************************************************** * * Starts an application and passes to it all the information to * connect to a session. * */ static HRESULT WINAPI IDirectPlayLobbyAImpl_RunApplication ( LPDIRECTPLAYLOBBYA iface, DWORD dwFlags, LPDWORD lpdwAppID, LPDPLCONNECTION lpConn, HANDLE hReceiveEvent ) { ICOM_THIS(IDirectPlayLobbyAImpl,iface); HRESULT hr; RunApplicationEnumStruct enumData; char temp[200]; STARTUPINFOA startupInfo; PROCESS_INFORMATION newProcessInfo; LPSTR appName; TRACE( "(%p)->(0x%08lx,%p,%p,%x)\n", This, dwFlags, lpdwAppID, lpConn, hReceiveEvent ); if( dwFlags != 0 ) { return DPERR_INVALIDPARAMS; } EnterCriticalSection( &This->unk->DPL_lock ); ZeroMemory( &enumData, sizeof( enumData ) ); enumData.This = This; enumData.appGUID = lpConn->lpSessionDesc->guidApplication; /* Our callback function will fill up the enumData structure with all the information required to start a new process */ IDirectPlayLobby_EnumLocalApplications( iface, RunApplicationA_EnumLocalApplications, (LPVOID)(&enumData), 0 ); /* First the application name */ strcpy( temp, enumData.lpszPath ); strcat( temp, "\\" ); strcat( temp, enumData.lpszFileName ); HeapFree( GetProcessHeap(), 0, enumData.lpszPath ); HeapFree( GetProcessHeap(), 0, enumData.lpszFileName ); appName = HEAP_strdupA( GetProcessHeap(), HEAP_ZERO_MEMORY, temp ); /* Now the command line */ strcat( temp, " " ); strcat( temp, enumData.lpszCommandLine ); HeapFree( GetProcessHeap(), 0, enumData.lpszCommandLine ); enumData.lpszCommandLine = HEAP_strdupA( GetProcessHeap(), HEAP_ZERO_MEMORY, temp ); ZeroMemory( &startupInfo, sizeof( startupInfo ) ); startupInfo.cb = sizeof( startupInfo ); /* FIXME: Should any fields be filled in? */ ZeroMemory( &newProcessInfo, sizeof( newProcessInfo ) ); if( !CreateProcessA( appName, enumData.lpszCommandLine, NULL, NULL, FALSE, CREATE_DEFAULT_ERROR_MODE | CREATE_NEW_CONSOLE | CREATE_SUSPENDED, /* Creation Flags */ NULL, enumData.lpszCurrentDirectory, &startupInfo, &newProcessInfo ) ) { FIXME( "Failed to create process for app %s\n", appName ); HeapFree( GetProcessHeap(), 0, appName ); HeapFree( GetProcessHeap(), 0, enumData.lpszCommandLine ); HeapFree( GetProcessHeap(), 0, enumData.lpszCurrentDirectory ); return DPERR_CANTCREATEPROCESS; } HeapFree( GetProcessHeap(), 0, appName ); HeapFree( GetProcessHeap(), 0, enumData.lpszCommandLine ); HeapFree( GetProcessHeap(), 0, enumData.lpszCurrentDirectory ); /* Reserve this global application id! */ if( !DPLAYX_CreateLobbyApplication( newProcessInfo.dwProcessId, hReceiveEvent ) ) { ERR( "Unable to create global application data\n" ); } hr = IDirectPlayLobby_SetConnectionSettings( iface, 0, newProcessInfo.dwProcessId, lpConn ); if( hr != DP_OK ) { FIXME( "SetConnectionSettings failure %s\n", DPLAYX_HresultToString( hr ) ); return hr; } /* Everything seems to have been set correctly, update the dwAppID */ *lpdwAppID = newProcessInfo.dwProcessId; /* Unsuspend the process */ ResumeThread( newProcessInfo.dwThreadId ); LeaveCriticalSection( &This->unk->DPL_lock ); return DP_OK; } static HRESULT WINAPI IDirectPlayLobbyWImpl_RunApplication ( LPDIRECTPLAYLOBBY iface, DWORD dwFlags, LPDWORD lpdwAppID, LPDPLCONNECTION lpConn, HANDLE hReceiveEvent ) { ICOM_THIS(IDirectPlayLobbyWImpl,iface); FIXME( "(%p)->(0x%08lx,%p,%p,%p):stub\n", This, dwFlags, lpdwAppID, lpConn, (void *)hReceiveEvent ); return DPERR_OUTOFMEMORY; } /******************************************************************** * * Sends a message between the application and the lobby client. * All messages are queued until received. * */ static HRESULT WINAPI IDirectPlayLobbyAImpl_SendLobbyMessage ( LPDIRECTPLAYLOBBYA iface, DWORD dwFlags, DWORD dwAppID, LPVOID lpData, DWORD dwDataSize ) { FIXME(":stub\n"); return DPERR_OUTOFMEMORY; } static HRESULT WINAPI IDirectPlayLobbyWImpl_SendLobbyMessage ( LPDIRECTPLAYLOBBY iface, DWORD dwFlags, DWORD dwAppID, LPVOID lpData, DWORD dwDataSize ) { FIXME(":stub\n"); return DPERR_OUTOFMEMORY; } /******************************************************************** * * Modifies the DPLCONNECTION structure to contain all information * needed to start and connect an application. * */ static HRESULT WINAPI IDirectPlayLobbyWImpl_SetConnectionSettings ( LPDIRECTPLAYLOBBY iface, DWORD dwFlags, DWORD dwAppID, LPDPLCONNECTION lpConn ) { ICOM_THIS(IDirectPlayLobbyWImpl,iface); HRESULT hr; TRACE("(%p)->(0x%08lx,0x%08lx,%p)\n", This, dwFlags, dwAppID, lpConn ); EnterCriticalSection( &This->unk->DPL_lock ); hr = DPLAYX_SetConnectionSettingsW( dwFlags, dwAppID, lpConn ); LeaveCriticalSection( &This->unk->DPL_lock ); return hr; } static HRESULT WINAPI IDirectPlayLobbyAImpl_SetConnectionSettings ( LPDIRECTPLAYLOBBYA iface, DWORD dwFlags, DWORD dwAppID, LPDPLCONNECTION lpConn ) { ICOM_THIS(IDirectPlayLobbyAImpl,iface); HRESULT hr; TRACE("(%p)->(0x%08lx,0x%08lx,%p)\n", This, dwFlags, dwAppID, lpConn ); EnterCriticalSection( &This->unk->DPL_lock ); hr = DPLAYX_SetConnectionSettingsA( dwFlags, dwAppID, lpConn ); LeaveCriticalSection( &This->unk->DPL_lock ); return hr; } /******************************************************************** * * Registers an event that will be set when a lobby message is received. * */ static HRESULT WINAPI IDirectPlayLobbyAImpl_SetLobbyMessageEvent ( LPDIRECTPLAYLOBBYA iface, DWORD dwFlags, DWORD dwAppID, HANDLE hReceiveEvent ) { FIXME(":stub\n"); return DPERR_OUTOFMEMORY; } static HRESULT WINAPI IDirectPlayLobbyWImpl_SetLobbyMessageEvent ( LPDIRECTPLAYLOBBY iface, DWORD dwFlags, DWORD dwAppID, HANDLE hReceiveEvent ) { FIXME(":stub\n"); return DPERR_OUTOFMEMORY; } /* DPL 2 methods */ /******************************************************************** * * Registers an event that will be set when a lobby message is received. * */ static HRESULT WINAPI IDirectPlayLobby2WImpl_CreateCompoundAddress ( LPDIRECTPLAYLOBBY2 iface, LPCDPCOMPOUNDADDRESSELEMENT lpElements, DWORD dwElementCount, LPVOID lpAddress, LPDWORD lpdwAddressSize ) { return DPL_CreateCompoundAddress( lpElements, dwElementCount, lpAddress, lpdwAddressSize, FALSE ); } static HRESULT WINAPI IDirectPlayLobby2AImpl_CreateCompoundAddress ( LPDIRECTPLAYLOBBY2A iface, LPCDPCOMPOUNDADDRESSELEMENT lpElements, DWORD dwElementCount, LPVOID lpAddress, LPDWORD lpdwAddressSize ) { return DPL_CreateCompoundAddress( lpElements, dwElementCount, lpAddress, lpdwAddressSize, TRUE ); } HRESULT DPL_CreateCompoundAddress ( LPCDPCOMPOUNDADDRESSELEMENT lpElements, DWORD dwElementCount, LPVOID lpAddress, LPDWORD lpdwAddressSize, BOOL bAnsiInterface ) { DWORD dwSizeRequired = 0; DWORD dwElements; LPCDPCOMPOUNDADDRESSELEMENT lpOrigElements = lpElements; TRACE("(%p,0x%08lx,%p,%p)\n", lpElements, dwElementCount, lpAddress, lpdwAddressSize ); /* Parameter check */ if( ( lpElements == NULL ) || ( dwElementCount == 0 ) /* FIXME: Not sure if this is a failure case */ ) { return DPERR_INVALIDPARAMS; } /* Add the total size chunk */ dwSizeRequired += sizeof( DPADDRESS ) + sizeof( DWORD ); /* Calculate the size of the buffer required */ for ( dwElements = dwElementCount; dwElements > 0; --dwElements, ++lpElements ) { if ( ( IsEqualGUID( &lpElements->guidDataType, &DPAID_ServiceProvider ) ) || ( IsEqualGUID( &lpElements->guidDataType, &DPAID_LobbyProvider ) ) ) { dwSizeRequired += sizeof( DPADDRESS ) + sizeof( GUID ); } else if ( ( IsEqualGUID( &lpElements->guidDataType, &DPAID_Phone ) ) || ( IsEqualGUID( &lpElements->guidDataType, &DPAID_Modem ) ) || ( IsEqualGUID( &lpElements->guidDataType, &DPAID_INet ) ) ) { if( !bAnsiInterface ) { ERR( "Ansi GUIDs used for unicode interface\n" ); return DPERR_INVALIDFLAGS; } dwSizeRequired += sizeof( DPADDRESS ) + lpElements->dwDataSize; } else if ( ( IsEqualGUID( &lpElements->guidDataType, &DPAID_PhoneW ) ) || ( IsEqualGUID( &lpElements->guidDataType, &DPAID_ModemW ) ) || ( IsEqualGUID( &lpElements->guidDataType, &DPAID_INetW ) ) ) { if( bAnsiInterface ) { ERR( "Unicode GUIDs used for ansi interface\n" ); return DPERR_INVALIDFLAGS; } FIXME( "Right size for unicode interface?\n" ); dwSizeRequired += sizeof( DPADDRESS ) + lpElements->dwDataSize * sizeof( WCHAR ); } else if ( IsEqualGUID( &lpElements->guidDataType, &DPAID_INetPort ) ) { dwSizeRequired += sizeof( DPADDRESS ) + sizeof( WORD ); } else if ( IsEqualGUID( &lpElements->guidDataType, &DPAID_ComPort ) ) { FIXME( "Right size for unicode interface?\n" ); dwSizeRequired += sizeof( DPADDRESS ) + sizeof( DPCOMPORTADDRESS ); /* FIXME: Right size? */ } else { ERR( "Unknown GUID %s\n", debugstr_guid(&lpElements->guidDataType) ); return DPERR_INVALIDFLAGS; } } /* The user wants to know how big a buffer to allocate for us */ if( ( lpAddress == NULL ) || ( *lpdwAddressSize < dwSizeRequired ) ) { *lpdwAddressSize = dwSizeRequired; return DPERR_BUFFERTOOSMALL; } /* Add the total size chunk */ { LPDPADDRESS lpdpAddress = (LPDPADDRESS)lpAddress; lpdpAddress->guidDataType = DPAID_TotalSize; lpdpAddress->dwDataSize = sizeof( DWORD ); lpAddress = (char *) lpAddress + sizeof( DPADDRESS ); *(LPDWORD)lpAddress = dwSizeRequired; lpAddress = (char *) lpAddress + sizeof( DWORD ); } /* Calculate the size of the buffer required */ for( dwElements = dwElementCount, lpElements = lpOrigElements; dwElements > 0; --dwElements, ++lpElements ) { if ( ( IsEqualGUID( &lpElements->guidDataType, &DPAID_ServiceProvider ) ) || ( IsEqualGUID( &lpElements->guidDataType, &DPAID_LobbyProvider ) ) ) { LPDPADDRESS lpdpAddress = (LPDPADDRESS)lpAddress; lpdpAddress->guidDataType = lpElements->guidDataType; lpdpAddress->dwDataSize = sizeof( GUID ); lpAddress = (char *) lpAddress + sizeof( DPADDRESS ); *((LPGUID)lpAddress) = *((LPGUID)lpElements->lpData); lpAddress = (char *) lpAddress + sizeof( GUID ); } else if ( ( IsEqualGUID( &lpElements->guidDataType, &DPAID_Phone ) ) || ( IsEqualGUID( &lpElements->guidDataType, &DPAID_Modem ) ) || ( IsEqualGUID( &lpElements->guidDataType, &DPAID_INet ) ) ) { LPDPADDRESS lpdpAddress = (LPDPADDRESS)lpAddress; lpdpAddress->guidDataType = lpElements->guidDataType; lpdpAddress->dwDataSize = lpElements->dwDataSize; lpAddress = (char *) lpAddress + sizeof( DPADDRESS ); lstrcpynA( (LPSTR)lpAddress, (LPCSTR)lpElements->lpData, lpElements->dwDataSize ); lpAddress = (char *) lpAddress + lpElements->dwDataSize; } else if ( ( IsEqualGUID( &lpElements->guidDataType, &DPAID_PhoneW ) ) || ( IsEqualGUID( &lpElements->guidDataType, &DPAID_ModemW ) ) || ( IsEqualGUID( &lpElements->guidDataType, &DPAID_INetW ) ) ) { LPDPADDRESS lpdpAddress = (LPDPADDRESS)lpAddress; lpdpAddress->guidDataType = lpElements->guidDataType; lpdpAddress->dwDataSize = lpElements->dwDataSize; lpAddress = (char *) lpAddress + sizeof( DPADDRESS ); lstrcpynW( (LPWSTR)lpAddress, (LPCWSTR)lpElements->lpData, lpElements->dwDataSize ); lpAddress = (char *) lpAddress + lpElements->dwDataSize * sizeof( WCHAR ); } else if ( IsEqualGUID( &lpElements->guidDataType, &DPAID_INetPort ) ) { LPDPADDRESS lpdpAddress = (LPDPADDRESS)lpAddress; lpdpAddress->guidDataType = lpElements->guidDataType; lpdpAddress->dwDataSize = lpElements->dwDataSize; lpAddress = (char *) lpAddress + sizeof( DPADDRESS ); *((LPWORD)lpAddress) = *((LPWORD)lpElements->lpData); lpAddress = (char *) lpAddress + sizeof( WORD ); } else if ( IsEqualGUID( &lpElements->guidDataType, &DPAID_ComPort ) ) { LPDPADDRESS lpdpAddress = (LPDPADDRESS)lpAddress; lpdpAddress->guidDataType = lpElements->guidDataType; lpdpAddress->dwDataSize = lpElements->dwDataSize; lpAddress = (char *) lpAddress + sizeof( DPADDRESS ); memcpy( lpAddress, lpElements->lpData, sizeof( DPADDRESS ) ); lpAddress = (char *) lpAddress + sizeof( DPADDRESS ); } } return DP_OK; } /* DPL 3 methods */ static HRESULT WINAPI IDirectPlayLobby3WImpl_ConnectEx ( LPDIRECTPLAYLOBBY3 iface, DWORD dwFlags, REFIID riid, LPVOID* lplpDP, IUnknown* pUnk ) { FIXME(":stub\n"); return DP_OK; } static HRESULT WINAPI IDirectPlayLobby3AImpl_ConnectEx ( LPDIRECTPLAYLOBBY3A iface, DWORD dwFlags, REFIID riid, LPVOID* lplpDP, IUnknown* pUnk ) { FIXME(":stub\n"); return DP_OK; } static HRESULT WINAPI IDirectPlayLobby3WImpl_RegisterApplication ( LPDIRECTPLAYLOBBY3 iface, DWORD dwFlags, LPDPAPPLICATIONDESC lpAppDesc ) { FIXME(":stub\n"); return DP_OK; } static HRESULT WINAPI IDirectPlayLobby3AImpl_RegisterApplication ( LPDIRECTPLAYLOBBY3A iface, DWORD dwFlags, LPDPAPPLICATIONDESC lpAppDesc ) { FIXME(":stub\n"); return DP_OK; } static HRESULT WINAPI IDirectPlayLobby3WImpl_UnregisterApplication ( LPDIRECTPLAYLOBBY3 iface, DWORD dwFlags, REFGUID lpAppDesc ) { FIXME(":stub\n"); return DP_OK; } static HRESULT WINAPI IDirectPlayLobby3AImpl_UnregisterApplication ( LPDIRECTPLAYLOBBY3A iface, DWORD dwFlags, REFGUID lpAppDesc ) { FIXME(":stub\n"); return DP_OK; } static HRESULT WINAPI IDirectPlayLobby3WImpl_WaitForConnectionSettings ( LPDIRECTPLAYLOBBY3 iface, DWORD dwFlags ) { FIXME(":stub\n"); return DP_OK; } static HRESULT WINAPI IDirectPlayLobby3AImpl_WaitForConnectionSettings ( LPDIRECTPLAYLOBBY3A iface, DWORD dwFlags ) { FIXME(":stub\n"); return DP_OK; } /* Virtual Table definitions for DPL{1,2,3}{A,W} */ /* Note: Hack so we can reuse the old functions without compiler warnings */ #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(directPlayLobbyAVT.fn##fun)) #else # define XCAST(fun) (void*) #endif /* Direct Play Lobby 1 (ascii) Virtual Table for methods */ /* All lobby 1 methods are exactly the same except QueryInterface */ static struct ICOM_VTABLE(IDirectPlayLobby) directPlayLobbyAVT = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectPlayLobbyAImpl_QueryInterface, XCAST(AddRef)IDirectPlayLobbyImpl_AddRef, XCAST(Release)IDirectPlayLobbyAImpl_Release, IDirectPlayLobbyAImpl_Connect, IDirectPlayLobbyAImpl_CreateAddress, IDirectPlayLobbyAImpl_EnumAddress, IDirectPlayLobbyAImpl_EnumAddressTypes, IDirectPlayLobbyAImpl_EnumLocalApplications, IDirectPlayLobbyAImpl_GetConnectionSettings, IDirectPlayLobbyAImpl_ReceiveLobbyMessage, IDirectPlayLobbyAImpl_RunApplication, IDirectPlayLobbyAImpl_SendLobbyMessage, IDirectPlayLobbyAImpl_SetConnectionSettings, IDirectPlayLobbyAImpl_SetLobbyMessageEvent }; #undef XCAST /* Note: Hack so we can reuse the old functions without compiler warnings */ #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(directPlayLobbyWVT.fn##fun)) #else # define XCAST(fun) (void*) #endif /* Direct Play Lobby 1 (unicode) Virtual Table for methods */ static ICOM_VTABLE(IDirectPlayLobby) directPlayLobbyWVT = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectPlayLobbyW_QueryInterface, XCAST(AddRef)IDirectPlayLobbyImpl_AddRef, XCAST(Release)IDirectPlayLobbyAImpl_Release, IDirectPlayLobbyWImpl_Connect, IDirectPlayLobbyWImpl_CreateAddress, IDirectPlayLobbyWImpl_EnumAddress, IDirectPlayLobbyWImpl_EnumAddressTypes, IDirectPlayLobbyWImpl_EnumLocalApplications, IDirectPlayLobbyWImpl_GetConnectionSettings, IDirectPlayLobbyWImpl_ReceiveLobbyMessage, IDirectPlayLobbyWImpl_RunApplication, IDirectPlayLobbyWImpl_SendLobbyMessage, IDirectPlayLobbyWImpl_SetConnectionSettings, IDirectPlayLobbyWImpl_SetLobbyMessageEvent }; #undef XCAST /* Note: Hack so we can reuse the old functions without compiler warnings */ #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(directPlayLobby2AVT.fn##fun)) #else # define XCAST(fun) (void*) #endif /* Direct Play Lobby 2 (ascii) Virtual Table for methods */ static ICOM_VTABLE(IDirectPlayLobby2) directPlayLobby2AVT = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectPlayLobby2AImpl_QueryInterface, XCAST(AddRef)IDirectPlayLobbyImpl_AddRef, XCAST(Release)IDirectPlayLobbyAImpl_Release, XCAST(Connect)IDirectPlayLobbyAImpl_Connect, XCAST(CreateAddress)IDirectPlayLobbyAImpl_CreateAddress, XCAST(EnumAddress)IDirectPlayLobbyAImpl_EnumAddress, XCAST(EnumAddressTypes)IDirectPlayLobbyAImpl_EnumAddressTypes, XCAST(EnumLocalApplications)IDirectPlayLobbyAImpl_EnumLocalApplications, XCAST(GetConnectionSettings)IDirectPlayLobbyAImpl_GetConnectionSettings, XCAST(ReceiveLobbyMessage)IDirectPlayLobbyAImpl_ReceiveLobbyMessage, XCAST(RunApplication)IDirectPlayLobbyAImpl_RunApplication, XCAST(SendLobbyMessage)IDirectPlayLobbyAImpl_SendLobbyMessage, XCAST(SetConnectionSettings)IDirectPlayLobbyAImpl_SetConnectionSettings, XCAST(SetLobbyMessageEvent)IDirectPlayLobbyAImpl_SetLobbyMessageEvent, IDirectPlayLobby2AImpl_CreateCompoundAddress }; #undef XCAST /* Note: Hack so we can reuse the old functions without compiler warnings */ #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(directPlayLobby2AVT.fn##fun)) #else # define XCAST(fun) (void*) #endif /* Direct Play Lobby 2 (unicode) Virtual Table for methods */ static ICOM_VTABLE(IDirectPlayLobby2) directPlayLobby2WVT = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectPlayLobby2WImpl_QueryInterface, XCAST(AddRef)IDirectPlayLobbyImpl_AddRef, XCAST(Release)IDirectPlayLobbyAImpl_Release, XCAST(Connect)IDirectPlayLobbyWImpl_Connect, XCAST(CreateAddress)IDirectPlayLobbyWImpl_CreateAddress, XCAST(EnumAddress)IDirectPlayLobbyWImpl_EnumAddress, XCAST(EnumAddressTypes)IDirectPlayLobbyWImpl_EnumAddressTypes, XCAST(EnumLocalApplications)IDirectPlayLobbyWImpl_EnumLocalApplications, XCAST(GetConnectionSettings)IDirectPlayLobbyWImpl_GetConnectionSettings, XCAST(ReceiveLobbyMessage)IDirectPlayLobbyWImpl_ReceiveLobbyMessage, XCAST(RunApplication)IDirectPlayLobbyWImpl_RunApplication, XCAST(SendLobbyMessage)IDirectPlayLobbyWImpl_SendLobbyMessage, XCAST(SetConnectionSettings)IDirectPlayLobbyWImpl_SetConnectionSettings, XCAST(SetLobbyMessageEvent)IDirectPlayLobbyWImpl_SetLobbyMessageEvent, IDirectPlayLobby2WImpl_CreateCompoundAddress }; #undef XCAST /* Direct Play Lobby 3 (ascii) Virtual Table for methods */ /* Note: Hack so we can reuse the old functions without compiler warnings */ #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(directPlayLobby3AVT.fn##fun)) #else # define XCAST(fun) (void*) #endif static ICOM_VTABLE(IDirectPlayLobby3) directPlayLobby3AVT = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectPlayLobby3AImpl_QueryInterface, XCAST(AddRef)IDirectPlayLobbyImpl_AddRef, XCAST(Release)IDirectPlayLobbyAImpl_Release, XCAST(Connect)IDirectPlayLobbyAImpl_Connect, XCAST(CreateAddress)IDirectPlayLobbyAImpl_CreateAddress, XCAST(EnumAddress)IDirectPlayLobbyAImpl_EnumAddress, XCAST(EnumAddressTypes)IDirectPlayLobbyAImpl_EnumAddressTypes, XCAST(EnumLocalApplications)IDirectPlayLobbyAImpl_EnumLocalApplications, XCAST(GetConnectionSettings)IDirectPlayLobbyAImpl_GetConnectionSettings, XCAST(ReceiveLobbyMessage)IDirectPlayLobbyAImpl_ReceiveLobbyMessage, XCAST(RunApplication)IDirectPlayLobbyAImpl_RunApplication, XCAST(SendLobbyMessage)IDirectPlayLobbyAImpl_SendLobbyMessage, XCAST(SetConnectionSettings)IDirectPlayLobbyAImpl_SetConnectionSettings, XCAST(SetLobbyMessageEvent)IDirectPlayLobbyAImpl_SetLobbyMessageEvent, XCAST(CreateCompoundAddress)IDirectPlayLobby2AImpl_CreateCompoundAddress, IDirectPlayLobby3AImpl_ConnectEx, IDirectPlayLobby3AImpl_RegisterApplication, IDirectPlayLobby3AImpl_UnregisterApplication, IDirectPlayLobby3AImpl_WaitForConnectionSettings }; #undef XCAST /* Direct Play Lobby 3 (unicode) Virtual Table for methods */ /* Note: Hack so we can reuse the old functions without compiler warnings */ #if !defined(__STRICT_ANSI__) && defined(__GNUC__) # define XCAST(fun) (typeof(directPlayLobby3WVT.fn##fun)) #else # define XCAST(fun) (void*) #endif static ICOM_VTABLE(IDirectPlayLobby3) directPlayLobby3WVT = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectPlayLobby3WImpl_QueryInterface, XCAST(AddRef)IDirectPlayLobbyImpl_AddRef, XCAST(Release)IDirectPlayLobbyAImpl_Release, XCAST(Connect)IDirectPlayLobbyWImpl_Connect, XCAST(CreateAddress)IDirectPlayLobbyWImpl_CreateAddress, XCAST(EnumAddress)IDirectPlayLobbyWImpl_EnumAddress, XCAST(EnumAddressTypes)IDirectPlayLobbyWImpl_EnumAddressTypes, XCAST(EnumLocalApplications)IDirectPlayLobbyWImpl_EnumLocalApplications, XCAST(GetConnectionSettings)IDirectPlayLobbyWImpl_GetConnectionSettings, XCAST(ReceiveLobbyMessage)IDirectPlayLobbyWImpl_ReceiveLobbyMessage, XCAST(RunApplication)IDirectPlayLobbyWImpl_RunApplication, XCAST(SendLobbyMessage)IDirectPlayLobbyWImpl_SendLobbyMessage, XCAST(SetConnectionSettings)IDirectPlayLobbyWImpl_SetConnectionSettings, XCAST(SetLobbyMessageEvent)IDirectPlayLobbyWImpl_SetLobbyMessageEvent, XCAST(CreateCompoundAddress)IDirectPlayLobby2WImpl_CreateCompoundAddress, IDirectPlayLobby3WImpl_ConnectEx, IDirectPlayLobby3WImpl_RegisterApplication, IDirectPlayLobby3WImpl_UnregisterApplication, IDirectPlayLobby3WImpl_WaitForConnectionSettings }; #undef XCAST /********************************************************* * * Direct Play and Direct Play Lobby Interface Implementation * *********************************************************/ /*************************************************************************** * DirectPlayLobbyCreateA (DPLAYX.4) * */ HRESULT WINAPI DirectPlayLobbyCreateA( LPGUID lpGUIDDSP, LPDIRECTPLAYLOBBYA *lplpDPL, IUnknown *lpUnk, LPVOID lpData, DWORD dwDataSize ) { TRACE("lpGUIDDSP=%p lplpDPL=%p lpUnk=%p lpData=%p dwDataSize=%08lx\n", lpGUIDDSP,lplpDPL,lpUnk,lpData,dwDataSize); /* Parameter Check: lpGUIDSP, lpUnk & lpData must be NULL. dwDataSize must * equal 0. These fields are mostly for future expansion. */ if ( lpGUIDDSP || lpUnk || lpData || dwDataSize ) { *lplpDPL = NULL; return DPERR_INVALIDPARAMS; } return directPlayLobby_QueryInterface( &IID_IDirectPlayLobbyA, (void**)lplpDPL ); } /*************************************************************************** * DirectPlayLobbyCreateW (DPLAYX.5) * */ HRESULT WINAPI DirectPlayLobbyCreateW( LPGUID lpGUIDDSP, LPDIRECTPLAYLOBBY *lplpDPL, IUnknown *lpUnk, LPVOID lpData, DWORD dwDataSize ) { TRACE("lpGUIDDSP=%p lplpDPL=%p lpUnk=%p lpData=%p dwDataSize=%08lx\n", lpGUIDDSP,lplpDPL,lpUnk,lpData,dwDataSize); /* Parameter Check: lpGUIDSP, lpUnk & lpData must be NULL. dwDataSize must * equal 0. These fields are mostly for future expansion. */ if ( lpGUIDDSP || lpUnk || lpData || dwDataSize ) { *lplpDPL = NULL; ERR("Bad parameters!\n" ); return DPERR_INVALIDPARAMS; } return directPlayLobby_QueryInterface( &IID_IDirectPlayLobby, (void**)lplpDPL ); } wine-20000526/dlls/dplayx/name_server.c0100644000175000001440000001002507113575026017357 0ustar julliardusers/* DPLAYX.DLL name server implementation * * Copyright 2000 - Peter Hunnisett * * * */ /* NOTE: Methods with the NS_ prefix are name server methods */ #include "winbase.h" #include "debugtools.h" #include "dplayx_global.h" #include "name_server.h" /* FIXME: Need to aquire the interface semaphore before didlling data */ DEFAULT_DEBUG_CHANNEL(dplay); /* NS specific structures */ typedef struct tagNSCacheData { struct tagNSCacheData* next; LPDPSESSIONDESC2 data; } NSCacheData, *lpNSCacheData; typedef struct tagNSCache { lpNSCacheData present; /* keep track of what is to be looked at */ lpNSCacheData first; } NSCache, *lpNSCache; /* Local Prototypes */ static void NS_InvalidateSessionCache( lpNSCache lpCache ); /* Name Server functions * --------------------- */ void NS_SetLocalComputerAsNameServer( LPCDPSESSIONDESC2 lpsd ) { DPLAYX_SetLocalSession( lpsd ); } /* This function is responsible for sending a request for all other known nameservers to send us what sessions they have registered locally */ void NS_SendSessionRequestBroadcast( LPVOID lpNSInfo ) { UINT index = 0; lpNSCache lpCache = (lpNSCache)lpNSInfo; LPDPSESSIONDESC2 lpTmp = NULL; /* Invalidate the session cache for the interface */ NS_InvalidateSessionCache( lpCache ); /* Add the local known sessions to the cache */ if( ( lpTmp = DPLAYX_CopyAndAllocateLocalSession( &index ) ) != NULL ) { lpCache->first = (lpNSCacheData)HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( *(lpCache->first) ) ); lpCache->first->data = lpTmp; lpCache->first->next = NULL; lpCache->present = lpCache->first; while( ( lpTmp = DPLAYX_CopyAndAllocateLocalSession( &index ) ) != NULL ) { lpCache->present->next = (lpNSCacheData)HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( *(lpCache->present) ) ); lpCache->present = lpCache->present->next; lpCache->present->data = lpTmp; lpCache->present->next = NULL; } lpCache->present = lpCache->first; } /* Send out requests for matching sessions to all other known computers */ FIXME( ": no remote requests sent\n" ); /* FIXME - how to handle responses to messages anyways? */ } /* Render all data in a session cache invalid */ static void NS_InvalidateSessionCache( lpNSCache lpCache ) { if( lpCache == NULL ) { ERR( ": invalidate non existant cache\n" ); return; } /* Remove everything from the cache */ while( lpCache->first ) { lpCache->present = lpCache->first; lpCache->first = lpCache->first->next; HeapFree( GetProcessHeap(), 0, lpCache->present ); } /* NULL out the cache pointers */ lpCache->present = NULL; lpCache->first = NULL; } /* Create and initialize a session cache */ BOOL NS_InitializeSessionCache( LPVOID* lplpNSInfo ) { lpNSCache lpCache = (lpNSCache)HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof( *lpCache ) ); *lplpNSInfo = lpCache; if( lpCache == NULL ) { return FALSE; } lpCache->first = lpCache->present = NULL; return TRUE; } /* Delete a session cache */ void NS_DeleteSessionCache( LPVOID lpNSInfo ) { NS_InvalidateSessionCache( (lpNSCache)lpNSInfo ); } /* Reinitialize the present pointer for this cache */ void NS_ResetSessionEnumeration( LPVOID lpNSInfo ) { ((lpNSCache)lpNSInfo)->present = ((lpNSCache)lpNSInfo)->first; } LPDPSESSIONDESC2 NS_WalkSessions( LPVOID lpNSInfo ) { LPDPSESSIONDESC2 lpSessionDesc; lpNSCache lpCache = (lpNSCache)lpNSInfo; /* Test for end of the list */ if( lpCache->present == NULL ) { return NULL; } lpSessionDesc = lpCache->present->data; /* Advance tracking pointer */ lpCache->present = lpCache->present->next; return lpSessionDesc; } wine-20000526/dlls/dplayx/name_server.h0100644000175000001440000000070707113575026017372 0ustar julliardusers #ifndef __WINE_DPLAYX_NAMESERVER #define __WINE_DPLAYX_NAMESERVER #include "dplay.h" void NS_SetLocalComputerAsNameServer( LPCDPSESSIONDESC2 lpsd ); void NS_SendSessionRequestBroadcast( LPVOID lpNSInfo ); BOOL NS_InitializeSessionCache( LPVOID* lplpNSInfo ); void NS_DeleteSessionCache( LPVOID lpNSInfo ); void NS_ResetSessionEnumeration( LPVOID lpNSInfo ); LPDPSESSIONDESC2 NS_WalkSessions( LPVOID lpNSInfo ); #endif /* __WINE_DPLAYX_NAMESERVER */ wine-20000526/dlls/dsound/0040755000175000001440000000000007113604175014703 5ustar julliarduserswine-20000526/dlls/dsound/.cvsignore0100644000175000001440000000004307045213572016676 0ustar julliardusers*.spec.c Makefile libdsound.so.1.0 wine-20000526/dlls/dsound/Makefile.in0100644000175000001440000000032507060307300016734 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = dsound SOVERSION = 1.0 SPEC_SRCS = \ dsound.spec C_SRCS = \ dsound_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/dsound/dsound.spec0100644000175000001440000000064607004651442017054 0ustar julliardusersname dsound type win32 0 stub DirectSoundUnknown 1 stdcall DirectSoundCreate(ptr ptr ptr) DirectSoundCreate 2 stdcall DirectSoundEnumerateA(ptr ptr) DirectSoundEnumerateA 3 stub DirectSoundEnumerateW 4 stdcall DllCanUnloadNow() DSOUND_DllCanUnloadNow 5 stdcall DllGetClassObject(ptr ptr ptr) DSOUND_DllGetClassObject 6 stub DirectSoundCaptureCreate 7 stub DirectSoundCaptureEnumerateA 8 stub DirectSoundCaptureEnumerateW wine-20000526/dlls/dsound/dsound_main.c0100644000175000001440000020176307106353414017354 0ustar julliardusers/* DirectSound * * Copyright 1998 Marcus Meissner * Copyright 1998 Rob Riggs */ /* * Note: This file requires multithread ability. It is not possible to * implement the stuff in a single thread anyway. And most DirectX apps * require threading themselves. * * Most thread locking is complete. There may be a few race * conditions still lurking. * * Tested with a Soundblaster clone, a Gravis UltraSound Classic, * and a Turtle Beach Tropez+. * * TODO: * Implement DirectSoundCapture API * Implement SetCooperativeLevel properly (need to address focus issues) * Use wavetable synth for static buffers if available * Implement DirectSound3DBuffers (stubs in place) * Use hardware 3D support if available (OSS support may be needed first) * Add support for APIs other than OSS: ALSA (http://alsa.jcu.cz/) * and esound (http://www.gnome.org), for instance * * FIXME: Status needs updating. * * Status: * - Wing Commander 4/W95: * The intromovie plays without problems. Nearly lipsynchron. * - DiscWorld 2 * The sound works, but noticeable chunks are left out (from the sound and * the animation). Don't know why yet. * - Diablo: * Sound works, but slows down the movieplayer. * - XvT: * Doesn't sound yet. * - Monkey Island 3: * The background sound of the startscreen works ;) * - WingCommander Prophecy Demo: * Sound works for the intromovie. * - Total Annihilation (1998/12/04): * Sound plays perfectly in the game, but the Smacker movies * (http://www.smacker.com/) play silently. * - A-10 Cuba! Demo (1998/12/04): * Sound works properly (for some people). * - dsstream.exe, from DirectX 5.2 SDK (1998/12/04): * Works properly, but requires "-dll -winmm". * - dsshow.exe, from DirectX 5.2 SDK (1998/12/04): * Initializes the DLL properly with CoCreateInstance(), but the * FileOpen dialog box is broken - could not test properly * - The Dilbert Desktop Game: works (SB16) */ #include "config.h" #include #include #include #include #include #include #include #include #include #include /* Insomnia - pow() function */ #include "dsound.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "winerror.h" #include "wine/obj_base.h" #include "thread.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(dsound); /***************************************************************************** * Predeclare the interface implementation structures */ typedef struct IDirectSoundImpl IDirectSoundImpl; typedef struct IDirectSoundBufferImpl IDirectSoundBufferImpl; typedef struct IDirectSoundNotifyImpl IDirectSoundNotifyImpl; typedef struct IDirectSound3DListenerImpl IDirectSound3DListenerImpl; typedef struct IDirectSound3DBufferImpl IDirectSound3DBufferImpl; /***************************************************************************** * IDirectSound implementation structure */ struct IDirectSoundImpl { /* IUnknown fields */ ICOM_VFIELD(IDirectSound); DWORD ref; /* IDirectSoundImpl fields */ DWORD priolevel; int nrofbuffers; IDirectSoundBufferImpl** buffers; IDirectSoundBufferImpl* primary; IDirectSound3DListenerImpl* listener; WAVEFORMATEX wfx; /* current main waveformat */ CRITICAL_SECTION lock; }; /***************************************************************************** * IDirectSoundBuffer implementation structure */ struct IDirectSoundBufferImpl { /* IUnknown fields */ ICOM_VFIELD(IDirectSoundBuffer); DWORD ref; /* IDirectSoundBufferImpl fields */ WAVEFORMATEX wfx; LPBYTE buffer; IDirectSound3DBufferImpl* ds3db; DWORD playflags,playing; DWORD playpos,writepos,buflen; DWORD nAvgBytesPerSec; DWORD freq; ULONG freqAdjust; LONG volume,pan; LONG lVolAdjust,rVolAdjust; IDirectSoundBufferImpl* parent; /* for duplicates */ IDirectSoundImpl* dsound; DSBUFFERDESC dsbd; LPDSBPOSITIONNOTIFY notifies; int nrofnotifies; CRITICAL_SECTION lock; }; /***************************************************************************** * IDirectSoundNotify implementation structure */ struct IDirectSoundNotifyImpl { /* IUnknown fields */ ICOM_VFIELD(IDirectSoundNotify); DWORD ref; /* IDirectSoundNotifyImpl fields */ IDirectSoundBufferImpl* dsb; }; /***************************************************************************** * IDirectSound3DListener implementation structure */ struct IDirectSound3DListenerImpl { /* IUnknown fields */ ICOM_VFIELD(IDirectSound3DListener); DWORD ref; /* IDirectSound3DListenerImpl fields */ IDirectSoundBufferImpl* dsb; DS3DLISTENER ds3dl; CRITICAL_SECTION lock; }; /***************************************************************************** * IDirectSound3DBuffer implementation structure */ struct IDirectSound3DBufferImpl { /* IUnknown fields */ ICOM_VFIELD(IDirectSound3DBuffer); DWORD ref; /* IDirectSound3DBufferImpl fields */ IDirectSoundBufferImpl* dsb; DS3DBUFFER ds3db; LPBYTE buffer; DWORD buflen; CRITICAL_SECTION lock; }; #ifdef HAVE_OSS # include # ifdef HAVE_MACHINE_SOUNDCARD_H # include # endif # ifdef HAVE_SYS_SOUNDCARD_H # include # endif # ifdef HAVE_SOUNDCARD_H # include # endif /* #define USE_DSOUND3D 1 */ #define DSOUND_FRAGLEN ((primarybuf->wfx.nAvgBytesPerSec >> 4) & ~3) #define DSOUND_FREQSHIFT (14) static int audiofd = -1; static int audioOK = 0; static IDirectSoundImpl* dsound = NULL; static IDirectSoundBufferImpl* primarybuf = NULL; static int DSOUND_setformat(LPWAVEFORMATEX wfex); static void DSOUND_CheckEvent(IDirectSoundBufferImpl *dsb, int len); static void DSOUND_CloseAudio(void); #endif /******************************************************************************* * DirectSoundEnumerateA */ HRESULT WINAPI DirectSoundEnumerateA( LPDSENUMCALLBACKA enumcb, LPVOID context) { TRACE("enumcb = %p, context = %p\n", enumcb, context); #ifdef HAVE_OSS if (enumcb != NULL) enumcb(NULL,"WINE DirectSound using Open Sound System", "sound",context); #endif return DS_OK; } #ifdef HAVE_OSS static void _dump_DSBCAPS(DWORD xmask) { struct { DWORD mask; char *name; } flags[] = { #define FE(x) { x, #x }, FE(DSBCAPS_PRIMARYBUFFER) FE(DSBCAPS_STATIC) FE(DSBCAPS_LOCHARDWARE) FE(DSBCAPS_LOCSOFTWARE) FE(DSBCAPS_CTRLFREQUENCY) FE(DSBCAPS_CTRLPAN) FE(DSBCAPS_CTRLVOLUME) FE(DSBCAPS_CTRLDEFAULT) FE(DSBCAPS_CTRLALL) FE(DSBCAPS_STICKYFOCUS) FE(DSBCAPS_GETCURRENTPOSITION2) }; int i; for (i=0;iref++; return This->ref; } static ULONG WINAPI IDirectSound3DBufferImpl_Release(LPDIRECTSOUND3DBUFFER iface) { ICOM_THIS(IDirectSound3DBufferImpl,iface); if(--This->ref) return This->ref; HeapFree(GetProcessHeap(),0,This->buffer); HeapFree(GetProcessHeap(),0,This); return S_OK; } /* IDirectSound3DBuffer methods */ static HRESULT WINAPI IDirectSound3DBufferImpl_GetAllParameters( LPDIRECTSOUND3DBUFFER iface, LPDS3DBUFFER lpDs3dBuffer) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_GetConeAngles( LPDIRECTSOUND3DBUFFER iface, LPDWORD lpdwInsideConeAngle, LPDWORD lpdwOutsideConeAngle) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_GetConeOrientation( LPDIRECTSOUND3DBUFFER iface, LPD3DVECTOR lpvConeOrientation) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_GetConeOutsideVolume( LPDIRECTSOUND3DBUFFER iface, LPLONG lplConeOutsideVolume) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_GetMaxDistance( LPDIRECTSOUND3DBUFFER iface, LPD3DVALUE lpfMaxDistance) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_GetMinDistance( LPDIRECTSOUND3DBUFFER iface, LPD3DVALUE lpfMinDistance) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_GetMode( LPDIRECTSOUND3DBUFFER iface, LPDWORD lpdwMode) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_GetPosition( LPDIRECTSOUND3DBUFFER iface, LPD3DVECTOR lpvPosition) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_GetVelocity( LPDIRECTSOUND3DBUFFER iface, LPD3DVECTOR lpvVelocity) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_SetAllParameters( LPDIRECTSOUND3DBUFFER iface, LPCDS3DBUFFER lpcDs3dBuffer, DWORD dwApply) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_SetConeAngles( LPDIRECTSOUND3DBUFFER iface, DWORD dwInsideConeAngle, DWORD dwOutsideConeAngle, DWORD dwApply) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_SetConeOrientation( LPDIRECTSOUND3DBUFFER iface, D3DVALUE x, D3DVALUE y, D3DVALUE z, DWORD dwApply) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_SetConeOutsideVolume( LPDIRECTSOUND3DBUFFER iface, LONG lConeOutsideVolume, DWORD dwApply) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_SetMaxDistance( LPDIRECTSOUND3DBUFFER iface, D3DVALUE fMaxDistance, DWORD dwApply) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_SetMinDistance( LPDIRECTSOUND3DBUFFER iface, D3DVALUE fMinDistance, DWORD dwApply) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_SetMode( LPDIRECTSOUND3DBUFFER iface, DWORD dwMode, DWORD dwApply) { ICOM_THIS(IDirectSound3DBufferImpl,iface); TRACE("mode = %lx\n", dwMode); This->ds3db.dwMode = dwMode; return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_SetPosition( LPDIRECTSOUND3DBUFFER iface, D3DVALUE x, D3DVALUE y, D3DVALUE z, DWORD dwApply) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DBufferImpl_SetVelocity( LPDIRECTSOUND3DBUFFER iface, D3DVALUE x, D3DVALUE y, D3DVALUE z, DWORD dwApply) { FIXME("stub\n"); return DS_OK; } ICOM_VTABLE(IDirectSound3DBuffer) ds3dbvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE /* IUnknown methods */ IDirectSound3DBufferImpl_QueryInterface, IDirectSound3DBufferImpl_AddRef, IDirectSound3DBufferImpl_Release, /* IDirectSound3DBuffer methods */ IDirectSound3DBufferImpl_GetAllParameters, IDirectSound3DBufferImpl_GetConeAngles, IDirectSound3DBufferImpl_GetConeOrientation, IDirectSound3DBufferImpl_GetConeOutsideVolume, IDirectSound3DBufferImpl_GetMaxDistance, IDirectSound3DBufferImpl_GetMinDistance, IDirectSound3DBufferImpl_GetMode, IDirectSound3DBufferImpl_GetPosition, IDirectSound3DBufferImpl_GetVelocity, IDirectSound3DBufferImpl_SetAllParameters, IDirectSound3DBufferImpl_SetConeAngles, IDirectSound3DBufferImpl_SetConeOrientation, IDirectSound3DBufferImpl_SetConeOutsideVolume, IDirectSound3DBufferImpl_SetMaxDistance, IDirectSound3DBufferImpl_SetMinDistance, IDirectSound3DBufferImpl_SetMode, IDirectSound3DBufferImpl_SetPosition, IDirectSound3DBufferImpl_SetVelocity, }; #ifdef USE_DSOUND3D static int DSOUND_Create3DBuffer(IDirectSoundBufferImpl* dsb) { DWORD i, temp, iSize, oSize, offset; LPBYTE bIbuf, bObuf, bTbuf = NULL; LPWORD wIbuf, wObuf, wTbuf = NULL; /* Inside DirectX says it's stupid but allowed */ if (dsb->wfx.nChannels == 2) { /* Convert to mono */ if (dsb->wfx.wBitsPerSample == 16) { iSize = dsb->buflen / 4; wTbuf = malloc(dsb->buflen / 2); if (wTbuf == NULL) return DSERR_OUTOFMEMORY; for (i = 0; i < iSize; i++) wTbuf[i] = (dsb->buffer[i] + dsb->buffer[(i * 2) + 1]) / 2; wIbuf = wTbuf; } else { iSize = dsb->buflen / 2; bTbuf = malloc(dsb->buflen / 2); if (bTbuf == NULL) return DSERR_OUTOFMEMORY; for (i = 0; i < iSize; i++) bTbuf[i] = (dsb->buffer[i] + dsb->buffer[(i * 2) + 1]) / 2; bIbuf = bTbuf; } } else { if (dsb->wfx.wBitsPerSample == 16) { iSize = dsb->buflen / 2; wIbuf = (LPWORD) dsb->buffer; } else { bIbuf = (LPBYTE) dsb->buffer; iSize = dsb->buflen; } } if (primarybuf->wfx.wBitsPerSample == 16) { wObuf = (LPWORD) dsb->ds3db->buffer; oSize = dsb->ds3db->buflen / 2; } else { bObuf = (LPBYTE) dsb->ds3db->buffer; oSize = dsb->ds3db->buflen; } offset = primarybuf->wfx.nSamplesPerSec / 100; /* 10ms */ if (primarybuf->wfx.wBitsPerSample == 16 && dsb->wfx.wBitsPerSample == 16) for (i = 0; i < iSize; i++) { temp = wIbuf[i]; if (i >= offset) temp += wIbuf[i - offset] >> 9; else temp += wIbuf[i + iSize - offset] >> 9; wObuf[i * 2] = temp; wObuf[(i * 2) + 1] = temp; } else if (primarybuf->wfx.wBitsPerSample == 8 && dsb->wfx.wBitsPerSample == 8) for (i = 0; i < iSize; i++) { temp = bIbuf[i]; if (i >= offset) temp += bIbuf[i - offset] >> 5; else temp += bIbuf[i + iSize - offset] >> 5; bObuf[i * 2] = temp; bObuf[(i * 2) + 1] = temp; } if (wTbuf) free(wTbuf); if (bTbuf) free(bTbuf); return DS_OK; } #endif /******************************************************************************* * IDirectSound3DListener */ /* IUnknown methods */ static HRESULT WINAPI IDirectSound3DListenerImpl_QueryInterface( LPDIRECTSOUND3DLISTENER iface, REFIID riid, LPVOID *ppobj) { ICOM_THIS(IDirectSound3DListenerImpl,iface); TRACE("(%p,%s,%p)\n",This,debugstr_guid(riid),ppobj); return E_FAIL; } static ULONG WINAPI IDirectSound3DListenerImpl_AddRef(LPDIRECTSOUND3DLISTENER iface) { ICOM_THIS(IDirectSound3DListenerImpl,iface); This->ref++; return This->ref; } static ULONG WINAPI IDirectSound3DListenerImpl_Release(LPDIRECTSOUND3DLISTENER iface) { ICOM_THIS(IDirectSound3DListenerImpl,iface); This->ref--; return This->ref; } /* IDirectSound3DListener methods */ static HRESULT WINAPI IDirectSound3DListenerImpl_GetAllParameter( LPDIRECTSOUND3DLISTENER iface, LPDS3DLISTENER lpDS3DL) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DListenerImpl_GetDistanceFactor( LPDIRECTSOUND3DLISTENER iface, LPD3DVALUE lpfDistanceFactor) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DListenerImpl_GetDopplerFactor( LPDIRECTSOUND3DLISTENER iface, LPD3DVALUE lpfDopplerFactor) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DListenerImpl_GetOrientation( LPDIRECTSOUND3DLISTENER iface, LPD3DVECTOR lpvOrientFront, LPD3DVECTOR lpvOrientTop) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DListenerImpl_GetPosition( LPDIRECTSOUND3DLISTENER iface, LPD3DVECTOR lpvPosition) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DListenerImpl_GetRolloffFactor( LPDIRECTSOUND3DLISTENER iface, LPD3DVALUE lpfRolloffFactor) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DListenerImpl_GetVelocity( LPDIRECTSOUND3DLISTENER iface, LPD3DVECTOR lpvVelocity) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DListenerImpl_SetAllParameters( LPDIRECTSOUND3DLISTENER iface, LPCDS3DLISTENER lpcDS3DL, DWORD dwApply) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DListenerImpl_SetDistanceFactor( LPDIRECTSOUND3DLISTENER iface, D3DVALUE fDistanceFactor, DWORD dwApply) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DListenerImpl_SetDopplerFactor( LPDIRECTSOUND3DLISTENER iface, D3DVALUE fDopplerFactor, DWORD dwApply) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DListenerImpl_SetOrientation( LPDIRECTSOUND3DLISTENER iface, D3DVALUE xFront, D3DVALUE yFront, D3DVALUE zFront, D3DVALUE xTop, D3DVALUE yTop, D3DVALUE zTop, DWORD dwApply) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DListenerImpl_SetPosition( LPDIRECTSOUND3DLISTENER iface, D3DVALUE x, D3DVALUE y, D3DVALUE z, DWORD dwApply) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DListenerImpl_SetRolloffFactor( LPDIRECTSOUND3DLISTENER iface, D3DVALUE fRolloffFactor, DWORD dwApply) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DListenerImpl_SetVelocity( LPDIRECTSOUND3DLISTENER iface, D3DVALUE x, D3DVALUE y, D3DVALUE z, DWORD dwApply) { FIXME("stub\n"); return DS_OK; } static HRESULT WINAPI IDirectSound3DListenerImpl_CommitDeferredSettings( LPDIRECTSOUND3DLISTENER iface) { FIXME("stub\n"); return DS_OK; } ICOM_VTABLE(IDirectSound3DListener) ds3dlvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE /* IUnknown methods */ IDirectSound3DListenerImpl_QueryInterface, IDirectSound3DListenerImpl_AddRef, IDirectSound3DListenerImpl_Release, /* IDirectSound3DListener methods */ IDirectSound3DListenerImpl_GetAllParameter, IDirectSound3DListenerImpl_GetDistanceFactor, IDirectSound3DListenerImpl_GetDopplerFactor, IDirectSound3DListenerImpl_GetOrientation, IDirectSound3DListenerImpl_GetPosition, IDirectSound3DListenerImpl_GetRolloffFactor, IDirectSound3DListenerImpl_GetVelocity, IDirectSound3DListenerImpl_SetAllParameters, IDirectSound3DListenerImpl_SetDistanceFactor, IDirectSound3DListenerImpl_SetDopplerFactor, IDirectSound3DListenerImpl_SetOrientation, IDirectSound3DListenerImpl_SetPosition, IDirectSound3DListenerImpl_SetRolloffFactor, IDirectSound3DListenerImpl_SetVelocity, IDirectSound3DListenerImpl_CommitDeferredSettings, }; /******************************************************************************* * IDirectSoundNotify */ static HRESULT WINAPI IDirectSoundNotifyImpl_QueryInterface( LPDIRECTSOUNDNOTIFY iface,REFIID riid,LPVOID *ppobj ) { ICOM_THIS(IDirectSoundNotifyImpl,iface); TRACE("(%p,%s,%p)\n",This,debugstr_guid(riid),ppobj); return E_FAIL; } static ULONG WINAPI IDirectSoundNotifyImpl_AddRef(LPDIRECTSOUNDNOTIFY iface) { ICOM_THIS(IDirectSoundNotifyImpl,iface); return ++(This->ref); } static ULONG WINAPI IDirectSoundNotifyImpl_Release(LPDIRECTSOUNDNOTIFY iface) { ICOM_THIS(IDirectSoundNotifyImpl,iface); This->ref--; if (!This->ref) { IDirectSoundNotify_Release((LPDIRECTSOUNDBUFFER)This->dsb); HeapFree(GetProcessHeap(),0,This); return S_OK; } return This->ref; } static HRESULT WINAPI IDirectSoundNotifyImpl_SetNotificationPositions( LPDIRECTSOUNDNOTIFY iface,DWORD howmuch,LPCDSBPOSITIONNOTIFY notify ) { ICOM_THIS(IDirectSoundNotifyImpl,iface); int i; if (TRACE_ON(dsound)) { TRACE("(%p,0x%08lx,%p)\n",This,howmuch,notify); for (i=0;idsb->notifies = HeapReAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,This->dsb->notifies,(This->dsb->nrofnotifies+howmuch)*sizeof(DSBPOSITIONNOTIFY)); memcpy( This->dsb->notifies+This->dsb->nrofnotifies, notify, howmuch*sizeof(DSBPOSITIONNOTIFY) ); This->dsb->nrofnotifies+=howmuch; return S_OK; } ICOM_VTABLE(IDirectSoundNotify) dsnvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectSoundNotifyImpl_QueryInterface, IDirectSoundNotifyImpl_AddRef, IDirectSoundNotifyImpl_Release, IDirectSoundNotifyImpl_SetNotificationPositions, }; /******************************************************************************* * IDirectSoundBuffer */ /* This sets this format for the Primary Buffer Only */ /* See file:///cdrom/sdk52/docs/worddoc/dsound.doc page 120 */ static HRESULT WINAPI IDirectSoundBufferImpl_SetFormat( LPDIRECTSOUNDBUFFER iface,LPWAVEFORMATEX wfex ) { ICOM_THIS(IDirectSoundBufferImpl,iface); IDirectSoundBufferImpl** dsb; int i; /* Let's be pedantic! */ if ((wfex == NULL) || (wfex->wFormatTag != WAVE_FORMAT_PCM) || (wfex->nChannels < 1) || (wfex->nChannels > 2) || (wfex->nSamplesPerSec < 1) || (wfex->nBlockAlign < 1) || (wfex->nChannels > 4) || ((wfex->wBitsPerSample != 8) && (wfex->wBitsPerSample != 16))) { TRACE("failed pedantic check!\n"); return DSERR_INVALIDPARAM; } /* **** */ EnterCriticalSection(&(This->dsound->lock)); if (primarybuf->wfx.nSamplesPerSec != wfex->nSamplesPerSec) { dsb = dsound->buffers; for (i = 0; i < dsound->nrofbuffers; i++, dsb++) { /* **** */ EnterCriticalSection(&((*dsb)->lock)); (*dsb)->freqAdjust = ((*dsb)->freq << DSOUND_FREQSHIFT) / wfex->nSamplesPerSec; LeaveCriticalSection(&((*dsb)->lock)); /* **** */ } } memcpy(&(primarybuf->wfx), wfex, sizeof(primarybuf->wfx)); TRACE("(formattag=0x%04x,chans=%d,samplerate=%ld" "bytespersec=%ld,blockalign=%d,bitspersamp=%d,cbSize=%d)\n", wfex->wFormatTag, wfex->nChannels, wfex->nSamplesPerSec, wfex->nAvgBytesPerSec, wfex->nBlockAlign, wfex->wBitsPerSample, wfex->cbSize); primarybuf->wfx.nAvgBytesPerSec = This->wfx.nSamplesPerSec * This->wfx.nBlockAlign; DSOUND_CloseAudio(); LeaveCriticalSection(&(This->dsound->lock)); /* **** */ return DS_OK; } static HRESULT WINAPI IDirectSoundBufferImpl_SetVolume( LPDIRECTSOUNDBUFFER iface,LONG vol ) { ICOM_THIS(IDirectSoundBufferImpl,iface); double temp; TRACE("(%p,%ld)\n",This,vol); /* I'm not sure if we need this for primary buffer */ if (!(This->dsbd.dwFlags & DSBCAPS_CTRLVOLUME)) return DSERR_CONTROLUNAVAIL; if ((vol > DSBVOLUME_MAX) || (vol < DSBVOLUME_MIN)) return DSERR_INVALIDPARAM; /* This needs to adjust the soundcard volume when */ /* called for the primary buffer */ if (This->dsbd.dwFlags & DSBCAPS_PRIMARYBUFFER) { FIXME("Volume control of primary unimplemented.\n"); This->volume = vol; return DS_OK; } /* **** */ EnterCriticalSection(&(This->lock)); This->volume = vol; temp = (double) (This->volume - (This->pan > 0 ? This->pan : 0)); This->lVolAdjust = (ULONG) (pow(2.0, temp / 600.0) * 32768.0); temp = (double) (This->volume + (This->pan < 0 ? This->pan : 0)); This->rVolAdjust = (ULONG) (pow(2.0, temp / 600.0) * 32768.0); LeaveCriticalSection(&(This->lock)); /* **** */ TRACE("left = %lx, right = %lx\n", This->lVolAdjust, This->rVolAdjust); return DS_OK; } static HRESULT WINAPI IDirectSoundBufferImpl_GetVolume( LPDIRECTSOUNDBUFFER iface,LPLONG vol ) { ICOM_THIS(IDirectSoundBufferImpl,iface); TRACE("(%p,%p)\n",This,vol); if (vol == NULL) return DSERR_INVALIDPARAM; *vol = This->volume; return DS_OK; } static HRESULT WINAPI IDirectSoundBufferImpl_SetFrequency( LPDIRECTSOUNDBUFFER iface,DWORD freq ) { ICOM_THIS(IDirectSoundBufferImpl,iface); TRACE("(%p,%ld)\n",This,freq); /* You cannot set the frequency of the primary buffer */ if (!(This->dsbd.dwFlags & DSBCAPS_CTRLFREQUENCY) || (This->dsbd.dwFlags & DSBCAPS_PRIMARYBUFFER)) return DSERR_CONTROLUNAVAIL; if ((freq < DSBFREQUENCY_MIN) || (freq > DSBFREQUENCY_MAX)) return DSERR_INVALIDPARAM; /* **** */ EnterCriticalSection(&(This->lock)); This->freq = freq; This->freqAdjust = (freq << DSOUND_FREQSHIFT) / primarybuf->wfx.nSamplesPerSec; This->nAvgBytesPerSec = freq * This->wfx.nBlockAlign; LeaveCriticalSection(&(This->lock)); /* **** */ return DS_OK; } static HRESULT WINAPI IDirectSoundBufferImpl_Play( LPDIRECTSOUNDBUFFER iface,DWORD reserved1,DWORD reserved2,DWORD flags ) { ICOM_THIS(IDirectSoundBufferImpl,iface); TRACE("(%p,%08lx,%08lx,%08lx)\n", This,reserved1,reserved2,flags ); This->playflags = flags; This->playing = 1; return DS_OK; } static HRESULT WINAPI IDirectSoundBufferImpl_Stop(LPDIRECTSOUNDBUFFER iface) { ICOM_THIS(IDirectSoundBufferImpl,iface); TRACE("(%p)\n",This); /* **** */ EnterCriticalSection(&(This->lock)); This->playing = 0; DSOUND_CheckEvent(This, 0); LeaveCriticalSection(&(This->lock)); /* **** */ return DS_OK; } static DWORD WINAPI IDirectSoundBufferImpl_AddRef(LPDIRECTSOUNDBUFFER iface) { ICOM_THIS(IDirectSoundBufferImpl,iface); /* TRACE("(%p) ref was %ld\n",This, This->ref); */ return ++(This->ref); } static DWORD WINAPI IDirectSoundBufferImpl_Release(LPDIRECTSOUNDBUFFER iface) { ICOM_THIS(IDirectSoundBufferImpl,iface); int i; /* TRACE("(%p) ref was %ld\n",This, This->ref); */ if (--This->ref) return This->ref; EnterCriticalSection(&(This->dsound->lock)); for (i=0;idsound->nrofbuffers;i++) if (This->dsound->buffers[i] == This) break; if (i < This->dsound->nrofbuffers) { /* Put the last buffer of the list in the (now empty) position */ This->dsound->buffers[i] = This->dsound->buffers[This->dsound->nrofbuffers - 1]; This->dsound->buffers = HeapReAlloc(GetProcessHeap(),0,This->dsound->buffers,sizeof(LPDIRECTSOUNDBUFFER)*This->dsound->nrofbuffers); This->dsound->nrofbuffers--; IDirectSound_Release((LPDIRECTSOUND)This->dsound); } LeaveCriticalSection(&(This->dsound->lock)); DeleteCriticalSection(&(This->lock)); if (This->ds3db && ICOM_VTBL(This->ds3db)) IDirectSound3DBuffer_Release((LPDIRECTSOUND3DBUFFER)This->ds3db); if (This->parent) /* this is a duplicate buffer */ IDirectSoundBuffer_Release((LPDIRECTSOUNDBUFFER)This->parent); else /* this is a toplevel buffer */ HeapFree(GetProcessHeap(),0,This->buffer); HeapFree(GetProcessHeap(),0,This); if (This == primarybuf) primarybuf = NULL; return DS_OK; } static HRESULT WINAPI IDirectSoundBufferImpl_GetCurrentPosition( LPDIRECTSOUNDBUFFER iface,LPDWORD playpos,LPDWORD writepos ) { ICOM_THIS(IDirectSoundBufferImpl,iface); TRACE("(%p,%p,%p)\n",This,playpos,writepos); if (playpos) *playpos = This->playpos; if (writepos) *writepos = This->writepos; TRACE("playpos = %ld, writepos = %ld\n", playpos?*playpos:0, writepos?*writepos:0); return DS_OK; } static HRESULT WINAPI IDirectSoundBufferImpl_GetStatus( LPDIRECTSOUNDBUFFER iface,LPDWORD status ) { ICOM_THIS(IDirectSoundBufferImpl,iface); TRACE("(%p,%p)\n",This,status); if (status == NULL) return DSERR_INVALIDPARAM; *status = 0; if (This->playing) *status |= DSBSTATUS_PLAYING; if (This->playflags & DSBPLAY_LOOPING) *status |= DSBSTATUS_LOOPING; return DS_OK; } static HRESULT WINAPI IDirectSoundBufferImpl_GetFormat( LPDIRECTSOUNDBUFFER iface,LPWAVEFORMATEX lpwf,DWORD wfsize,LPDWORD wfwritten ) { ICOM_THIS(IDirectSoundBufferImpl,iface); TRACE("(%p,%p,%ld,%p)\n",This,lpwf,wfsize,wfwritten); if (wfsize>sizeof(This->wfx)) wfsize = sizeof(This->wfx); if (lpwf) { /* NULL is valid */ memcpy(lpwf,&(This->wfx),wfsize); if (wfwritten) *wfwritten = wfsize; } else if (wfwritten) *wfwritten = sizeof(This->wfx); else return DSERR_INVALIDPARAM; return DS_OK; } static HRESULT WINAPI IDirectSoundBufferImpl_Lock( LPDIRECTSOUNDBUFFER iface,DWORD writecursor,DWORD writebytes,LPVOID lplpaudioptr1,LPDWORD audiobytes1,LPVOID lplpaudioptr2,LPDWORD audiobytes2,DWORD flags ) { ICOM_THIS(IDirectSoundBufferImpl,iface); TRACE("(%p,%ld,%ld,%p,%p,%p,%p,0x%08lx)\n", This, writecursor, writebytes, lplpaudioptr1, audiobytes1, lplpaudioptr2, audiobytes2, flags ); if (flags & DSBLOCK_FROMWRITECURSOR) writecursor += This->writepos; if (flags & DSBLOCK_ENTIREBUFFER) writebytes = This->buflen; if (writebytes > This->buflen) writebytes = This->buflen; assert(audiobytes1!=audiobytes2); assert(lplpaudioptr1!=lplpaudioptr2); if (writecursor+writebytes <= This->buflen) { *(LPBYTE*)lplpaudioptr1 = This->buffer+writecursor; *audiobytes1 = writebytes; if (lplpaudioptr2) *(LPBYTE*)lplpaudioptr2 = NULL; if (audiobytes2) *audiobytes2 = 0; TRACE("->%ld.0\n",writebytes); } else { *(LPBYTE*)lplpaudioptr1 = This->buffer+writecursor; *audiobytes1 = This->buflen-writecursor; if (lplpaudioptr2) *(LPBYTE*)lplpaudioptr2 = This->buffer; if (audiobytes2) *audiobytes2 = writebytes-(This->buflen-writecursor); TRACE("->%ld.%ld\n",*audiobytes1,audiobytes2?*audiobytes2:0); } /* No. See file:///cdrom/sdk52/docs/worddoc/dsound.doc page 21 */ /* This->writepos=(writecursor+writebytes)%This->buflen; */ return DS_OK; } static HRESULT WINAPI IDirectSoundBufferImpl_SetCurrentPosition( LPDIRECTSOUNDBUFFER iface,DWORD newpos ) { ICOM_THIS(IDirectSoundBufferImpl,iface); TRACE("(%p,%ld)\n",This,newpos); /* **** */ EnterCriticalSection(&(This->lock)); This->playpos = newpos; LeaveCriticalSection(&(This->lock)); /* **** */ return DS_OK; } static HRESULT WINAPI IDirectSoundBufferImpl_SetPan( LPDIRECTSOUNDBUFFER iface,LONG pan ) { ICOM_THIS(IDirectSoundBufferImpl,iface); double temp; TRACE("(%p,%ld)\n",This,pan); if ((pan > DSBPAN_RIGHT) || (pan < DSBPAN_LEFT)) return DSERR_INVALIDPARAM; /* You cannot set the pan of the primary buffer */ /* and you cannot use both pan and 3D controls */ if (!(This->dsbd.dwFlags & DSBCAPS_CTRLPAN) || (This->dsbd.dwFlags & DSBCAPS_CTRL3D) || (This->dsbd.dwFlags & DSBCAPS_PRIMARYBUFFER)) return DSERR_CONTROLUNAVAIL; /* **** */ EnterCriticalSection(&(This->lock)); This->pan = pan; temp = (double) (This->volume - (This->pan > 0 ? This->pan : 0)); This->lVolAdjust = (ULONG) (pow(2.0, temp / 600.0) * 32768.0); temp = (double) (This->volume + (This->pan < 0 ? This->pan : 0)); This->rVolAdjust = (ULONG) (pow(2.0, temp / 600.0) * 32768.0); LeaveCriticalSection(&(This->lock)); /* **** */ return DS_OK; } static HRESULT WINAPI IDirectSoundBufferImpl_GetPan( LPDIRECTSOUNDBUFFER iface,LPLONG pan ) { ICOM_THIS(IDirectSoundBufferImpl,iface); TRACE("(%p,%p)\n",This,pan); if (pan == NULL) return DSERR_INVALIDPARAM; *pan = This->pan; return DS_OK; } static HRESULT WINAPI IDirectSoundBufferImpl_Unlock( LPDIRECTSOUNDBUFFER iface,LPVOID p1,DWORD x1,LPVOID p2,DWORD x2 ) { ICOM_THIS(IDirectSoundBufferImpl,iface); TRACE("(%p,%p,%ld,%p,%ld):stub\n", This,p1,x1,p2,x2); /* There is really nothing to do here. Should someone */ /* choose to implement static buffers in hardware (by */ /* using a wave table synth, for example) this is where */ /* you'd want to do the loading. For software buffers, */ /* which is what we currently use, we need do nothing. */ #if 0 /* It's also the place to pre-process 3D buffers... */ /* This is highly experimental and liable to break things */ if (This->dsbd.dwFlags & DSBCAPS_CTRL3D) DSOUND_Create3DBuffer(This); #endif return DS_OK; } static HRESULT WINAPI IDirectSoundBufferImpl_GetFrequency( LPDIRECTSOUNDBUFFER iface,LPDWORD freq ) { ICOM_THIS(IDirectSoundBufferImpl,iface); TRACE("(%p,%p)\n",This,freq); if (freq == NULL) return DSERR_INVALIDPARAM; *freq = This->freq; TRACE("-> %ld\n", *freq); return DS_OK; } static HRESULT WINAPI IDirectSoundBufferImpl_Initialize( LPDIRECTSOUNDBUFFER iface,LPDIRECTSOUND dsound,LPDSBUFFERDESC dbsd ) { ICOM_THIS(IDirectSoundBufferImpl,iface); FIXME("(%p,%p,%p):stub\n",This,dsound,dbsd); DPRINTF("Re-Init!!!\n"); return DSERR_ALREADYINITIALIZED; } static HRESULT WINAPI IDirectSoundBufferImpl_GetCaps( LPDIRECTSOUNDBUFFER iface,LPDSBCAPS caps ) { ICOM_THIS(IDirectSoundBufferImpl,iface); TRACE("(%p)->(%p)\n",This,caps); if (caps == NULL) return DSERR_INVALIDPARAM; /* I think we should check this value, not set it. See */ /* Inside DirectX, p215. That should apply here, too. */ caps->dwSize = sizeof(*caps); caps->dwFlags = This->dsbd.dwFlags | DSBCAPS_LOCSOFTWARE; caps->dwBufferBytes = This->dsbd.dwBufferBytes; /* This value represents the speed of the "unlock" command. As unlock is quite fast (it does not do anything), I put 4096 ko/s = 4 Mo / s */ caps->dwUnlockTransferRate = 4096; caps->dwPlayCpuOverhead = 0; return DS_OK; } static HRESULT WINAPI IDirectSoundBufferImpl_QueryInterface( LPDIRECTSOUNDBUFFER iface,REFIID riid,LPVOID *ppobj ) { ICOM_THIS(IDirectSoundBufferImpl,iface); TRACE("(%p,%s,%p)\n",This,debugstr_guid(riid),ppobj); if ( IsEqualGUID( &IID_IDirectSoundNotify, riid ) ) { IDirectSoundNotifyImpl *dsn; dsn = (IDirectSoundNotifyImpl*)HeapAlloc(GetProcessHeap(),0,sizeof(*dsn)); dsn->ref = 1; dsn->dsb = This; IDirectSoundBuffer_AddRef(iface); ICOM_VTBL(dsn) = &dsnvt; *ppobj = (LPVOID)dsn; return S_OK; } if ( IsEqualGUID( &IID_IDirectSound3DBuffer, riid ) ) { *ppobj = This->ds3db; if (*ppobj) return DS_OK; } return E_FAIL; } static ICOM_VTABLE(IDirectSoundBuffer) dsbvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectSoundBufferImpl_QueryInterface, IDirectSoundBufferImpl_AddRef, IDirectSoundBufferImpl_Release, IDirectSoundBufferImpl_GetCaps, IDirectSoundBufferImpl_GetCurrentPosition, IDirectSoundBufferImpl_GetFormat, IDirectSoundBufferImpl_GetVolume, IDirectSoundBufferImpl_GetPan, IDirectSoundBufferImpl_GetFrequency, IDirectSoundBufferImpl_GetStatus, IDirectSoundBufferImpl_Initialize, IDirectSoundBufferImpl_Lock, IDirectSoundBufferImpl_Play, IDirectSoundBufferImpl_SetCurrentPosition, IDirectSoundBufferImpl_SetFormat, IDirectSoundBufferImpl_SetVolume, IDirectSoundBufferImpl_SetPan, IDirectSoundBufferImpl_SetFrequency, IDirectSoundBufferImpl_Stop, IDirectSoundBufferImpl_Unlock }; /******************************************************************************* * IDirectSound */ static HRESULT WINAPI IDirectSoundImpl_SetCooperativeLevel( LPDIRECTSOUND iface,HWND hwnd,DWORD level ) { ICOM_THIS(IDirectSoundImpl,iface); FIXME("(%p,%08lx,%ld):stub\n",This,(DWORD)hwnd,level); return DS_OK; } static HRESULT WINAPI IDirectSoundImpl_CreateSoundBuffer( LPDIRECTSOUND iface,LPDSBUFFERDESC dsbd,LPLPDIRECTSOUNDBUFFER ppdsb,LPUNKNOWN lpunk ) { ICOM_THIS(IDirectSoundImpl,iface); IDirectSoundBufferImpl** ippdsb=(IDirectSoundBufferImpl**)ppdsb; LPWAVEFORMATEX wfex; TRACE("(%p,%p,%p,%p)\n",This,dsbd,ippdsb,lpunk); if ((This == NULL) || (dsbd == NULL) || (ippdsb == NULL)) return DSERR_INVALIDPARAM; if (TRACE_ON(dsound)) { TRACE("(structsize=%ld)\n",dsbd->dwSize); TRACE("(flags=0x%08lx:\n",dsbd->dwFlags); _dump_DSBCAPS(dsbd->dwFlags); DPRINTF(")\n"); TRACE("(bufferbytes=%ld)\n",dsbd->dwBufferBytes); TRACE("(lpwfxFormat=%p)\n",dsbd->lpwfxFormat); } wfex = dsbd->lpwfxFormat; if (wfex) TRACE("(formattag=0x%04x,chans=%d,samplerate=%ld," "bytespersec=%ld,blockalign=%d,bitspersamp=%d,cbSize=%d)\n", wfex->wFormatTag, wfex->nChannels, wfex->nSamplesPerSec, wfex->nAvgBytesPerSec, wfex->nBlockAlign, wfex->wBitsPerSample, wfex->cbSize); if (dsbd->dwFlags & DSBCAPS_PRIMARYBUFFER) { if (primarybuf) { IDirectSoundBuffer_AddRef((LPDIRECTSOUNDBUFFER)primarybuf); *ippdsb = primarybuf; primarybuf->dsbd.dwFlags = dsbd->dwFlags; return DS_OK; } /* Else create primarybuf */ } *ippdsb = (IDirectSoundBufferImpl*)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirectSoundBufferImpl)); if (*ippdsb == NULL) return DSERR_OUTOFMEMORY; (*ippdsb)->ref = 1; TRACE("Created buffer at %p\n", *ippdsb); if (dsbd->dwFlags & DSBCAPS_PRIMARYBUFFER) { (*ippdsb)->buflen = dsound->wfx.nAvgBytesPerSec; (*ippdsb)->freq = dsound->wfx.nSamplesPerSec; } else { (*ippdsb)->buflen = dsbd->dwBufferBytes; (*ippdsb)->freq = dsbd->lpwfxFormat->nSamplesPerSec; } (*ippdsb)->buffer = (LPBYTE)HeapAlloc(GetProcessHeap(),0,(*ippdsb)->buflen); if ((*ippdsb)->buffer == NULL) { HeapFree(GetProcessHeap(),0,(*ippdsb)); *ippdsb = NULL; return DSERR_OUTOFMEMORY; } /* It's not necessary to initialize values to zero since */ /* we allocated this structure with HEAP_ZERO_MEMORY... */ (*ippdsb)->playpos = 0; (*ippdsb)->writepos = 0; (*ippdsb)->parent = NULL; ICOM_VTBL(*ippdsb) = &dsbvt; (*ippdsb)->dsound = This; (*ippdsb)->playing = 0; (*ippdsb)->lVolAdjust = (1 << 15); (*ippdsb)->rVolAdjust = (1 << 15); if (!(dsbd->dwFlags & DSBCAPS_PRIMARYBUFFER)) { (*ippdsb)->freqAdjust = ((*ippdsb)->freq << DSOUND_FREQSHIFT) / primarybuf->wfx.nSamplesPerSec; (*ippdsb)->nAvgBytesPerSec = (*ippdsb)->freq * dsbd->lpwfxFormat->nBlockAlign; } memcpy(&((*ippdsb)->dsbd),dsbd,sizeof(*dsbd)); EnterCriticalSection(&(This->lock)); /* register buffer */ if (!(dsbd->dwFlags & DSBCAPS_PRIMARYBUFFER)) { This->buffers = (IDirectSoundBufferImpl**)HeapReAlloc(GetProcessHeap(),0,This->buffers,sizeof(IDirectSoundBufferImpl*)*(This->nrofbuffers+1)); This->buffers[This->nrofbuffers] = *ippdsb; This->nrofbuffers++; } LeaveCriticalSection(&(This->lock)); IDirectSound_AddRef(iface); if (dsbd->lpwfxFormat) memcpy(&((*ippdsb)->wfx), dsbd->lpwfxFormat, sizeof((*ippdsb)->wfx)); InitializeCriticalSection(&((*ippdsb)->lock)); #if USE_DSOUND3D if (dsbd->dwFlags & DSBCAPS_CTRL3D) { IDirectSound3DBufferImpl *ds3db; ds3db = (IDirectSound3DBufferImpl*)HeapAlloc(GetProcessHeap(), 0,sizeof(*ds3db)); ds3db->ref = 1; ds3db->dsb = (*ippdsb); ICOM_VTBL(ds3db) = &ds3dbvt; (*ippdsb)->ds3db = ds3db; ds3db->ds3db.dwSize = sizeof(DS3DBUFFER); ds3db->ds3db.vPosition.x.x = 0.0; ds3db->ds3db.vPosition.y.y = 0.0; ds3db->ds3db.vPosition.z.z = 0.0; ds3db->ds3db.vVelocity.x.x = 0.0; ds3db->ds3db.vVelocity.y.y = 0.0; ds3db->ds3db.vVelocity.z.z = 0.0; ds3db->ds3db.dwInsideConeAngle = DS3D_DEFAULTCONEANGLE; ds3db->ds3db.dwOutsideConeAngle = DS3D_DEFAULTCONEANGLE; ds3db->ds3db.vConeOrientation.x.x = 0.0; ds3db->ds3db.vConeOrientation.y.y = 0.0; ds3db->ds3db.vConeOrientation.z.z = 0.0; ds3db->ds3db.lConeOutsideVolume = DS3D_DEFAULTCONEOUTSIDEVOLUME; ds3db->ds3db.flMinDistance = DS3D_DEFAULTMINDISTANCE; ds3db->ds3db.flMaxDistance = DS3D_DEFAULTMAXDISTANCE; ds3db->ds3db.dwMode = DS3DMODE_NORMAL; ds3db->buflen = ((*ippdsb)->buflen * primarybuf->wfx.nBlockAlign) / (*ippdsb)->wfx.nBlockAlign; ds3db->buffer = HeapAlloc(GetProcessHeap(), 0, ds3db->buflen); if (ds3db->buffer == NULL) { ds3db->buflen = 0; ds3db->ds3db.dwMode = DS3DMODE_DISABLE; } } #endif return DS_OK; } static HRESULT WINAPI IDirectSoundImpl_DuplicateSoundBuffer( LPDIRECTSOUND iface,LPDIRECTSOUNDBUFFER pdsb,LPLPDIRECTSOUNDBUFFER ppdsb ) { ICOM_THIS(IDirectSoundImpl,iface); IDirectSoundBufferImpl* ipdsb=(IDirectSoundBufferImpl*)pdsb; IDirectSoundBufferImpl** ippdsb=(IDirectSoundBufferImpl**)ppdsb; TRACE("(%p,%p,%p)\n",This,ipdsb,ippdsb); *ippdsb = (IDirectSoundBufferImpl*)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(IDirectSoundBufferImpl)); IDirectSoundBuffer_AddRef(pdsb); memcpy(*ippdsb, ipdsb, sizeof(IDirectSoundBufferImpl)); (*ippdsb)->ref = 1; (*ippdsb)->playpos = 0; (*ippdsb)->writepos = 0; (*ippdsb)->dsound = This; (*ippdsb)->parent = ipdsb; memcpy(&((*ippdsb)->wfx), &(ipdsb->wfx), sizeof((*ippdsb)->wfx)); /* register buffer */ EnterCriticalSection(&(This->lock)); This->buffers = (IDirectSoundBufferImpl**)HeapReAlloc(GetProcessHeap(),0,This->buffers,sizeof(IDirectSoundBufferImpl**)*(This->nrofbuffers+1)); This->buffers[This->nrofbuffers] = *ippdsb; This->nrofbuffers++; IDirectSound_AddRef(iface); LeaveCriticalSection(&(This->lock)); return DS_OK; } static HRESULT WINAPI IDirectSoundImpl_GetCaps(LPDIRECTSOUND iface,LPDSCAPS caps) { ICOM_THIS(IDirectSoundImpl,iface); TRACE("(%p,%p)\n",This,caps); TRACE("(flags=0x%08lx)\n",caps->dwFlags); if (caps == NULL) return DSERR_INVALIDPARAM; /* We should check this value, not set it. See Inside DirectX, p215. */ caps->dwSize = sizeof(*caps); caps->dwFlags = DSCAPS_PRIMARYSTEREO | DSCAPS_PRIMARY16BIT | DSCAPS_SECONDARYSTEREO | DSCAPS_SECONDARY16BIT | DSCAPS_CONTINUOUSRATE; /* FIXME: query OSS */ caps->dwMinSecondarySampleRate = DSBFREQUENCY_MIN; caps->dwMaxSecondarySampleRate = DSBFREQUENCY_MAX; caps->dwPrimaryBuffers = 1; caps->dwMaxHwMixingAllBuffers = 0; caps->dwMaxHwMixingStaticBuffers = 0; caps->dwMaxHwMixingStreamingBuffers = 0; caps->dwFreeHwMixingAllBuffers = 0; caps->dwFreeHwMixingStaticBuffers = 0; caps->dwFreeHwMixingStreamingBuffers = 0; caps->dwMaxHw3DAllBuffers = 0; caps->dwMaxHw3DStaticBuffers = 0; caps->dwMaxHw3DStreamingBuffers = 0; caps->dwFreeHw3DAllBuffers = 0; caps->dwFreeHw3DStaticBuffers = 0; caps->dwFreeHw3DStreamingBuffers = 0; caps->dwTotalHwMemBytes = 0; caps->dwFreeHwMemBytes = 0; caps->dwMaxContigFreeHwMemBytes = 0; caps->dwUnlockTransferRateHwBuffers = 4096; /* But we have none... */ caps->dwPlayCpuOverheadSwBuffers = 1; /* 1% */ return DS_OK; } static ULONG WINAPI IDirectSoundImpl_AddRef(LPDIRECTSOUND iface) { ICOM_THIS(IDirectSoundImpl,iface); return ++(This->ref); } static ULONG WINAPI IDirectSoundImpl_Release(LPDIRECTSOUND iface) { ICOM_THIS(IDirectSoundImpl,iface); TRACE("(%p), ref was %ld\n",This,This->ref); if (!--(This->ref)) { DSOUND_CloseAudio(); while(IDirectSoundBuffer_Release((LPDIRECTSOUNDBUFFER)primarybuf)); /* Deallocate */ FIXME("need to release all buffers!\n"); HeapFree(GetProcessHeap(),0,This); dsound = NULL; return S_OK; } return This->ref; } static HRESULT WINAPI IDirectSoundImpl_SetSpeakerConfig( LPDIRECTSOUND iface,DWORD config ) { ICOM_THIS(IDirectSoundImpl,iface); FIXME("(%p,0x%08lx):stub\n",This,config); return DS_OK; } static HRESULT WINAPI IDirectSoundImpl_QueryInterface( LPDIRECTSOUND iface,REFIID riid,LPVOID *ppobj ) { ICOM_THIS(IDirectSoundImpl,iface); if ( IsEqualGUID( &IID_IDirectSound3DListener, riid ) ) { if (This->listener) { *ppobj = This->listener; return DS_OK; } This->listener = (IDirectSound3DListenerImpl*)HeapAlloc( GetProcessHeap(), 0, sizeof(*(This->listener))); This->listener->ref = 1; ICOM_VTBL(This->listener) = &ds3dlvt; IDirectSound_AddRef(iface); This->listener->ds3dl.dwSize = sizeof(DS3DLISTENER); This->listener->ds3dl.vPosition.x.x = 0.0; This->listener->ds3dl.vPosition.y.y = 0.0; This->listener->ds3dl.vPosition.z.z = 0.0; This->listener->ds3dl.vVelocity.x.x = 0.0; This->listener->ds3dl.vVelocity.y.y = 0.0; This->listener->ds3dl.vVelocity.z.z = 0.0; This->listener->ds3dl.vOrientFront.x.x = 0.0; This->listener->ds3dl.vOrientFront.y.y = 0.0; This->listener->ds3dl.vOrientFront.z.z = 1.0; This->listener->ds3dl.vOrientTop.x.x = 0.0; This->listener->ds3dl.vOrientTop.y.y = 1.0; This->listener->ds3dl.vOrientTop.z.z = 0.0; This->listener->ds3dl.flDistanceFactor = DS3D_DEFAULTDISTANCEFACTOR; This->listener->ds3dl.flRolloffFactor = DS3D_DEFAULTROLLOFFFACTOR; This->listener->ds3dl.flDopplerFactor = DS3D_DEFAULTDOPPLERFACTOR; *ppobj = (LPVOID)This->listener; return DS_OK; } TRACE("(%p,%s,%p)\n",This,debugstr_guid(riid),ppobj); return E_FAIL; } static HRESULT WINAPI IDirectSoundImpl_Compact( LPDIRECTSOUND iface) { ICOM_THIS(IDirectSoundImpl,iface); TRACE("(%p)\n", This); return DS_OK; } static HRESULT WINAPI IDirectSoundImpl_GetSpeakerConfig( LPDIRECTSOUND iface, LPDWORD lpdwSpeakerConfig) { ICOM_THIS(IDirectSoundImpl,iface); TRACE("(%p, %p)\n", This, lpdwSpeakerConfig); *lpdwSpeakerConfig = DSSPEAKER_STEREO | (DSSPEAKER_GEOMETRY_NARROW << 16); return DS_OK; } static HRESULT WINAPI IDirectSoundImpl_Initialize( LPDIRECTSOUND iface, LPGUID lpGuid) { ICOM_THIS(IDirectSoundImpl,iface); TRACE("(%p, %p)\n", This, lpGuid); return DS_OK; } static ICOM_VTABLE(IDirectSound) dsvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDirectSoundImpl_QueryInterface, IDirectSoundImpl_AddRef, IDirectSoundImpl_Release, IDirectSoundImpl_CreateSoundBuffer, IDirectSoundImpl_GetCaps, IDirectSoundImpl_DuplicateSoundBuffer, IDirectSoundImpl_SetCooperativeLevel, IDirectSoundImpl_Compact, IDirectSoundImpl_GetSpeakerConfig, IDirectSoundImpl_SetSpeakerConfig, IDirectSoundImpl_Initialize }; /* See http://www.opensound.com/pguide/audio.html for more details */ static int DSOUND_setformat(LPWAVEFORMATEX wfex) { int xx,channels,speed,format,nformat; if (!audioOK) { TRACE("(%p) deferred\n", wfex); return 0; } switch (wfex->wFormatTag) { default: WARN("unknown WAVE_FORMAT tag %d\n",wfex->wFormatTag); return DSERR_BADFORMAT; case WAVE_FORMAT_PCM: break; } if (wfex->wBitsPerSample==8) format = AFMT_U8; else format = AFMT_S16_LE; if (-1==ioctl(audiofd,SNDCTL_DSP_GETFMTS,&xx)) { perror("ioctl SNDCTL_DSP_GETFMTS"); return -1; } if ((xx&format)!=format) {/* format unsupported */ FIXME("SNDCTL_DSP_GETFMTS: format not supported\n"); return -1; } nformat = format; if (-1==ioctl(audiofd,SNDCTL_DSP_SETFMT,&nformat)) { perror("ioctl SNDCTL_DSP_SETFMT"); return -1; } if (nformat!=format) {/* didn't work */ FIXME("SNDCTL_DSP_GETFMTS: format not set\n"); return -1; } channels = wfex->nChannels-1; if (-1==ioctl(audiofd,SNDCTL_DSP_STEREO,&channels)) { perror("ioctl SNDCTL_DSP_STEREO"); return -1; } speed = wfex->nSamplesPerSec; if (-1==ioctl(audiofd,SNDCTL_DSP_SPEED,&speed)) { perror("ioctl SNDCTL_DSP_SPEED"); return -1; } TRACE("(freq=%ld,channels=%d,bits=%d)\n", wfex->nSamplesPerSec,wfex->nChannels,wfex->wBitsPerSample ); return 0; } static void DSOUND_CheckEvent(IDirectSoundBufferImpl *dsb, int len) { int i; DWORD offset; LPDSBPOSITIONNOTIFY event; if (dsb->nrofnotifies == 0) return; TRACE("(%p) buflen = %ld, playpos = %ld, len = %d\n", dsb, dsb->buflen, dsb->playpos, len); for (i = 0; i < dsb->nrofnotifies ; i++) { event = dsb->notifies + i; offset = event->dwOffset; TRACE("checking %d, position %ld, event = %d\n", i, offset, event->hEventNotify); /* DSBPN_OFFSETSTOP has to be the last element. So this is */ /* OK. [Inside DirectX, p274] */ /* */ /* This also means we can't sort the entries by offset, */ /* because DSBPN_OFFSETSTOP == -1 */ if (offset == DSBPN_OFFSETSTOP) { if (dsb->playing == 0) { SetEvent(event->hEventNotify); TRACE("signalled event %d (%d)\n", event->hEventNotify, i); return; } else return; } if ((dsb->playpos + len) >= dsb->buflen) { if ((offset < ((dsb->playpos + len) % dsb->buflen)) || (offset >= dsb->playpos)) { TRACE("signalled event %d (%d)\n", event->hEventNotify, i); SetEvent(event->hEventNotify); } } else { if ((offset >= dsb->playpos) && (offset < (dsb->playpos + len))) { TRACE("signalled event %d (%d)\n", event->hEventNotify, i); SetEvent(event->hEventNotify); } } } } /* WAV format info can be found at: */ /* */ /* http://www.cwi.nl/ftp/audio/AudioFormats.part2 */ /* ftp://ftp.cwi.nl/pub/audio/RIFF-format */ /* */ /* Import points to remember: */ /* */ /* 8-bit WAV is unsigned */ /* 16-bit WAV is signed */ static inline INT16 cvtU8toS16(BYTE byte) { INT16 s = (byte - 128) << 8; return s; } static inline BYTE cvtS16toU8(INT16 word) { BYTE b = (word + 32768) >> 8; return b; } /* We should be able to optimize these two inline functions */ /* so that we aren't doing 8->16->8 conversions when it is */ /* not necessary. But this is still a WIP. Optimize later. */ static inline void get_fields(const IDirectSoundBufferImpl *dsb, BYTE *buf, INT *fl, INT *fr) { INT16 *bufs = (INT16 *) buf; /* TRACE("(%p)", buf); */ if ((dsb->wfx.wBitsPerSample == 8) && dsb->wfx.nChannels == 2) { *fl = cvtU8toS16(*buf); *fr = cvtU8toS16(*(buf + 1)); return; } if ((dsb->wfx.wBitsPerSample == 16) && dsb->wfx.nChannels == 2) { *fl = *bufs; *fr = *(bufs + 1); return; } if ((dsb->wfx.wBitsPerSample == 8) && dsb->wfx.nChannels == 1) { *fl = cvtU8toS16(*buf); *fr = *fl; return; } if ((dsb->wfx.wBitsPerSample == 16) && dsb->wfx.nChannels == 1) { *fl = *bufs; *fr = *bufs; return; } FIXME("get_fields found an unsupported configuration\n"); return; } static inline void set_fields(BYTE *buf, INT fl, INT fr) { INT16 *bufs = (INT16 *) buf; if ((primarybuf->wfx.wBitsPerSample == 8) && (primarybuf->wfx.nChannels == 2)) { *buf = cvtS16toU8(fl); *(buf + 1) = cvtS16toU8(fr); return; } if ((primarybuf->wfx.wBitsPerSample == 16) && (primarybuf->wfx.nChannels == 2)) { *bufs = fl; *(bufs + 1) = fr; return; } if ((primarybuf->wfx.wBitsPerSample == 8) && (primarybuf->wfx.nChannels == 1)) { *buf = cvtS16toU8((fl + fr) >> 1); return; } if ((primarybuf->wfx.wBitsPerSample == 16) && (primarybuf->wfx.nChannels == 1)) { *bufs = (fl + fr) >> 1; return; } FIXME("set_fields found an unsupported configuration\n"); return; } /* Now with PerfectPitch (tm) technology */ static INT DSOUND_MixerNorm(IDirectSoundBufferImpl *dsb, BYTE *buf, INT len) { INT i, size, ipos, ilen, fieldL, fieldR; BYTE *ibp, *obp; INT iAdvance = dsb->wfx.nBlockAlign; INT oAdvance = primarybuf->wfx.nBlockAlign; ibp = dsb->buffer + dsb->playpos; obp = buf; TRACE("(%p, %p, %p), playpos=%8.8lx\n", dsb, ibp, obp, dsb->playpos); /* Check for the best case */ if ((dsb->freq == primarybuf->wfx.nSamplesPerSec) && (dsb->wfx.wBitsPerSample == primarybuf->wfx.wBitsPerSample) && (dsb->wfx.nChannels == primarybuf->wfx.nChannels)) { DWORD bytesleft = dsb->buflen - dsb->playpos; TRACE("(%p) Best case\n", dsb); if (len <= bytesleft ) memcpy(obp, ibp, len); else { /* wrap */ memcpy(obp, ibp, bytesleft ); memcpy(obp + bytesleft, dsb->buffer, len - bytesleft); } return len; } /* Check for same sample rate */ if (dsb->freq == primarybuf->wfx.nSamplesPerSec) { TRACE("(%p) Same sample rate %ld = primary %ld\n", dsb, dsb->freq, primarybuf->wfx.nSamplesPerSec); ilen = 0; for (i = 0; i < len; i += oAdvance) { get_fields(dsb, ibp, &fieldL, &fieldR); ibp += iAdvance; ilen += iAdvance; set_fields(obp, fieldL, fieldR); obp += oAdvance; if (ibp >= (BYTE *)(dsb->buffer + dsb->buflen)) ibp = dsb->buffer; /* wrap */ } return (ilen); } /* Mix in different sample rates */ /* */ /* New PerfectPitch(tm) Technology (c) 1998 Rob Riggs */ /* Patent Pending :-] */ TRACE("(%p) Adjusting frequency: %ld -> %ld\n", dsb, dsb->freq, primarybuf->wfx.nSamplesPerSec); size = len / oAdvance; ilen = ((size * dsb->freqAdjust) >> DSOUND_FREQSHIFT) * iAdvance; for (i = 0; i < size; i++) { ipos = (((i * dsb->freqAdjust) >> DSOUND_FREQSHIFT) * iAdvance) + dsb->playpos; if (ipos >= dsb->buflen) ipos %= dsb->buflen; /* wrap */ get_fields(dsb, (dsb->buffer + ipos), &fieldL, &fieldR); set_fields(obp, fieldL, fieldR); obp += oAdvance; } return ilen; } static void DSOUND_MixerVol(IDirectSoundBufferImpl *dsb, BYTE *buf, INT len) { INT i, inc = primarybuf->wfx.wBitsPerSample >> 3; BYTE *bpc = buf; INT16 *bps = (INT16 *) buf; TRACE("(%p) left = %lx, right = %lx\n", dsb, dsb->lVolAdjust, dsb->rVolAdjust); if ((!(dsb->dsbd.dwFlags & DSBCAPS_CTRLPAN) || (dsb->pan == 0)) && (!(dsb->dsbd.dwFlags & DSBCAPS_CTRLVOLUME) || (dsb->volume == 0)) && !(dsb->dsbd.dwFlags & DSBCAPS_CTRL3D)) return; /* Nothing to do */ /* If we end up with some bozo coder using panning or 3D sound */ /* with a mono primary buffer, it could sound very weird using */ /* this method. Oh well, tough patooties. */ for (i = 0; i < len; i += inc) { INT val; switch (inc) { case 1: /* 8-bit WAV is unsigned, but we need to operate */ /* on signed data for this to work properly */ val = *bpc - 128; val = ((val * (i & inc ? dsb->rVolAdjust : dsb->lVolAdjust)) >> 15); *bpc = val + 128; bpc++; break; case 2: /* 16-bit WAV is signed -- much better */ val = *bps; val = ((val * ((i & inc) ? dsb->rVolAdjust : dsb->lVolAdjust)) >> 15); *bps = val; bps++; break; default: /* Very ugly! */ FIXME("MixerVol had a nasty error\n"); } } } #ifdef USE_DSOUND3D static void DSOUND_Mixer3D(IDirectSoundBufferImpl *dsb, BYTE *buf, INT len) { BYTE *ibp, *obp; DWORD buflen, playpos; buflen = dsb->ds3db->buflen; playpos = (dsb->playpos * primarybuf->wfx.nBlockAlign) / dsb->wfx.nBlockAlign; ibp = dsb->ds3db->buffer + playpos; obp = buf; if (playpos > buflen) { FIXME("Major breakage"); return; } if (len <= (playpos + buflen)) memcpy(obp, ibp, len); else { /* wrap */ memcpy(obp, ibp, buflen - playpos); memcpy(obp + (buflen - playpos), dsb->buffer, len - (buflen - playpos)); } return; } #endif static void *tmp_buffer; static size_t tmp_buffer_len = 0; static void *DSOUND_tmpbuffer(size_t len) { if (len>tmp_buffer_len) { void *new_buffer = realloc(tmp_buffer, len); if (new_buffer) { tmp_buffer = new_buffer; tmp_buffer_len = len; } return new_buffer; } return tmp_buffer; } static DWORD DSOUND_MixInBuffer(IDirectSoundBufferImpl *dsb) { INT i, len, ilen, temp, field; INT advance = primarybuf->wfx.wBitsPerSample >> 3; BYTE *buf, *ibuf, *obuf; INT16 *ibufs, *obufs; len = DSOUND_FRAGLEN; /* The most we will use */ if (!(dsb->playflags & DSBPLAY_LOOPING)) { temp = MulDiv(primarybuf->wfx.nAvgBytesPerSec, dsb->buflen, dsb->nAvgBytesPerSec) - MulDiv(primarybuf->wfx.nAvgBytesPerSec, dsb->playpos, dsb->nAvgBytesPerSec); len = (len > temp) ? temp : len; } len &= ~3; /* 4 byte alignment */ if (len == 0) { /* This should only happen if we aren't looping and temp < 4 */ /* We skip the remainder, so check for possible events */ DSOUND_CheckEvent(dsb, dsb->buflen - dsb->playpos); /* Stop */ dsb->playing = 0; dsb->writepos = 0; dsb->playpos = 0; /* Check for DSBPN_OFFSETSTOP */ DSOUND_CheckEvent(dsb, 0); return 0; } /* Been seeing segfaults in malloc() for some reason... */ TRACE("allocating buffer (size = %d)\n", len); if ((buf = ibuf = (BYTE *) DSOUND_tmpbuffer(len)) == NULL) return 0; TRACE("MixInBuffer (%p) len = %d\n", dsb, len); ilen = DSOUND_MixerNorm(dsb, ibuf, len); if ((dsb->dsbd.dwFlags & DSBCAPS_CTRLPAN) || (dsb->dsbd.dwFlags & DSBCAPS_CTRLVOLUME)) DSOUND_MixerVol(dsb, ibuf, len); obuf = primarybuf->buffer + primarybuf->playpos; for (i = 0; i < len; i += advance) { obufs = (INT16 *) obuf; ibufs = (INT16 *) ibuf; if (primarybuf->wfx.wBitsPerSample == 8) { /* 8-bit WAV is unsigned */ field = (*ibuf - 128); field += (*obuf - 128); field = field > 127 ? 127 : field; field = field < -128 ? -128 : field; *obuf = field + 128; } else { /* 16-bit WAV is signed */ field = *ibufs; field += *obufs; field = field > 32767 ? 32767 : field; field = field < -32768 ? -32768 : field; *obufs = field; } ibuf += advance; obuf += advance; if (obuf >= (BYTE *)(primarybuf->buffer + primarybuf->buflen)) obuf = primarybuf->buffer; } /* free(buf); */ if (dsb->dsbd.dwFlags & DSBCAPS_CTRLPOSITIONNOTIFY) DSOUND_CheckEvent(dsb, ilen); dsb->playpos += ilen; dsb->writepos = dsb->playpos + ilen; if (dsb->playpos >= dsb->buflen) { if (!(dsb->playflags & DSBPLAY_LOOPING)) { dsb->playing = 0; dsb->writepos = 0; dsb->playpos = 0; DSOUND_CheckEvent(dsb, 0); /* For DSBPN_OFFSETSTOP */ } else dsb->playpos %= dsb->buflen; /* wrap */ } if (dsb->writepos >= dsb->buflen) dsb->writepos %= dsb->buflen; return len; } static DWORD WINAPI DSOUND_MixPrimary(void) { INT i, len, maxlen = 0; IDirectSoundBufferImpl *dsb; for (i = dsound->nrofbuffers - 1; i >= 0; i--) { dsb = dsound->buffers[i]; if (!dsb || !(ICOM_VTBL(dsb))) continue; IDirectSoundBuffer_AddRef((LPDIRECTSOUNDBUFFER)dsb); if (dsb->buflen && dsb->playing) { EnterCriticalSection(&(dsb->lock)); len = DSOUND_MixInBuffer(dsb); maxlen = len > maxlen ? len : maxlen; LeaveCriticalSection(&(dsb->lock)); } IDirectSoundBuffer_Release((LPDIRECTSOUNDBUFFER)dsb); } return maxlen; } static int DSOUND_OpenAudio(void) { int audioFragment,flags; if (primarybuf == NULL) return DSERR_OUTOFMEMORY; while (audiofd >= 0) sleep(5); /* we will most likely not get one, avoid excessive opens ... */ if (audiofd == -ENODEV) return -1; audiofd = open("/dev/audio",O_WRONLY|O_NDELAY); if (audiofd==-1) { /* Don't worry if sound is busy at the moment */ if ((errno != EBUSY) && (errno != ENODEV)) perror("open /dev/audio"); audiofd = -errno; return -1; /* -1 */ } /* We should probably do something here if SETFRAGMENT fails... */ audioFragment=0x0002000c; if (-1==ioctl(audiofd,SNDCTL_DSP_SETFRAGMENT,&audioFragment)) perror("ioctl SETFRAGMENT"); if ((flags = fcntl(audiofd,F_GETFL,0)) != -1) { flags &= ~O_NDELAY; if (-1==fcntl(audiofd,F_SETFL,flags)) perror("clearing the non-blocking flags in DSOUND_OpenAudio"); } else perror("cannot get flags of audiofd"); audioOK = 1; DSOUND_setformat(&(primarybuf->wfx)); return 0; } static void DSOUND_CloseAudio(void) { int neutral; neutral = primarybuf->wfx.wBitsPerSample == 8 ? 128 : 0; audioOK = 0; /* race condition */ Sleep(5); /* It's possible we've been called with audio closed */ /* from SetFormat()... this is just to force a call */ /* to OpenAudio() to reset the hardware properly */ if (audiofd >= 0) close(audiofd); primarybuf->playpos = 0; primarybuf->writepos = DSOUND_FRAGLEN; memset(primarybuf->buffer, neutral, primarybuf->buflen); audiofd = -1; TRACE("Audio stopped\n"); } static int DSOUND_WriteAudio(char *buf, int len) { int result, left = 0; while (left < len) { result = write(audiofd, buf + left, len - left); if (result == -1) { if (errno == EINTR) continue; else return result; } left += result; } return 0; } static void DSOUND_OutputPrimary(int len) { int neutral, flen1, flen2; char *frag1, *frag2; /* This is a bad place for this. We need to clear the */ /* buffer with a neutral value, for unsigned 8-bit WAVE */ /* that's 128, for signed 16-bit it's 0 */ neutral = primarybuf->wfx.wBitsPerSample == 8 ? 128 : 0; /* **** */ EnterCriticalSection(&(primarybuf->lock)); /* Write out the */ if ((audioOK == 1) || (DSOUND_OpenAudio() == 0)) { if (primarybuf->playpos + len >= primarybuf->buflen) { frag1 = primarybuf->buffer + primarybuf->playpos; flen1 = primarybuf->buflen - primarybuf->playpos; frag2 = primarybuf->buffer; flen2 = len - (primarybuf->buflen - primarybuf->playpos); if (DSOUND_WriteAudio(frag1, flen1) != 0) { perror("DSOUND_WriteAudio"); LeaveCriticalSection(&(primarybuf->lock)); ExitThread(0); } memset(frag1, neutral, flen1); if (DSOUND_WriteAudio(frag2, flen2) != 0) { perror("DSOUND_WriteAudio"); LeaveCriticalSection(&(primarybuf->lock)); ExitThread(0); } memset(frag2, neutral, flen2); } else { frag1 = primarybuf->buffer + primarybuf->playpos; flen1 = len; if (DSOUND_WriteAudio(frag1, flen1) != 0) { perror("DSOUND_WriteAudio"); LeaveCriticalSection(&(primarybuf->lock)); ExitThread(0); } memset(frag1, neutral, flen1); } } else { /* Can't play audio at the moment -- we need to sleep */ /* to make up for the time we'd be blocked in write() */ /* to /dev/audio */ Sleep(60); } primarybuf->playpos += len; if (primarybuf->playpos >= primarybuf->buflen) primarybuf->playpos %= primarybuf->buflen; primarybuf->writepos = primarybuf->playpos + DSOUND_FRAGLEN; if (primarybuf->writepos >= primarybuf->buflen) primarybuf->writepos %= primarybuf->buflen; LeaveCriticalSection(&(primarybuf->lock)); /* **** */ } static DWORD WINAPI DSOUND_thread(LPVOID arg) { int len; TRACE("dsound is at pid %d\n",getpid()); while (1) { if (!dsound) { WARN("DSOUND thread giving up.\n"); ExitThread(0); } #if 0 /* EP: since the thread creating this thread can * die before the end of the DSOUND one, this * test is of no use * What shall be tested is whether the DSOUND thread * is the last one in the process */ if (getppid()==1) { WARN("DSOUND father died? Giving up.\n"); ExitThread(0); } #endif /* RACE: dsound could be deleted */ EnterCriticalSection(&(dsound->lock)); if (primarybuf == NULL) { /* Should never happen */ WARN("Lost the primary buffer!\n"); IDirectSound_Release((LPDIRECTSOUND)dsound); ExitThread(0); } EnterCriticalSection(&(primarybuf->lock)); len = DSOUND_MixPrimary(); LeaveCriticalSection(&(primarybuf->lock)); LeaveCriticalSection(&(dsound->lock)); if (primarybuf->playing) len = DSOUND_FRAGLEN > len ? DSOUND_FRAGLEN : len; if (len) { /* This does all the work */ DSOUND_OutputPrimary(len); } else { /* no buffers playing -- close and wait */ if (audioOK) DSOUND_CloseAudio(); Sleep(100); } } ExitThread(0); } #endif /* HAVE_OSS */ /******************************************************************************* * DirectSoundCreate */ HRESULT WINAPI DirectSoundCreate(REFGUID lpGUID,LPDIRECTSOUND *ppDS,IUnknown *pUnkOuter ) { IDirectSoundImpl** ippDS=(IDirectSoundImpl**)ppDS; if (lpGUID) TRACE("(%p,%p,%p)\n",lpGUID,ippDS,pUnkOuter); else TRACE("DirectSoundCreate (%p)\n", ippDS); #ifdef HAVE_OSS if (ippDS == NULL) return DSERR_INVALIDPARAM; if (primarybuf) { IDirectSound_AddRef((LPDIRECTSOUND)dsound); *ippDS = dsound; return DS_OK; } /* Check that we actually have audio capabilities */ /* If we do, whether it's busy or not, we continue */ /* otherwise we return with DSERR_NODRIVER */ audiofd = open("/dev/audio",O_WRONLY|O_NDELAY); if (audiofd == -1) { audiofd = -errno; if (errno == ENODEV) { MESSAGE("No sound hardware found, but continuing anyway.\n"); } else if (errno == EBUSY) { MESSAGE("Sound device busy, will keep trying.\n"); } else { MESSAGE("Unexpected error (%d) while checking for sound support.\n",errno); return DSERR_GENERIC; } } else { close(audiofd); audiofd = -1; } *ippDS = (IDirectSoundImpl*)HeapAlloc(GetProcessHeap(),0,sizeof(IDirectSoundImpl)); if (*ippDS == NULL) return DSERR_OUTOFMEMORY; (*ippDS)->ref = 1; ICOM_VTBL(*ippDS) = &dsvt; (*ippDS)->buffers = NULL; (*ippDS)->nrofbuffers = 0; (*ippDS)->wfx.wFormatTag = 1; (*ippDS)->wfx.nChannels = 2; (*ippDS)->wfx.nSamplesPerSec = 22050; (*ippDS)->wfx.nAvgBytesPerSec = 44100; (*ippDS)->wfx.nBlockAlign = 2; (*ippDS)->wfx.wBitsPerSample = 8; InitializeCriticalSection(&((*ippDS)->lock)); if (!dsound) { HANDLE hnd; DWORD xid; dsound = (*ippDS); if (primarybuf == NULL) { DSBUFFERDESC dsbd; HRESULT hr; dsbd.dwSize = sizeof(DSBUFFERDESC); dsbd.dwFlags = DSBCAPS_PRIMARYBUFFER; dsbd.dwBufferBytes = 0; dsbd.lpwfxFormat = &(dsound->wfx); hr = IDirectSound_CreateSoundBuffer(*ppDS, &dsbd, (LPDIRECTSOUNDBUFFER*)&primarybuf, NULL); if (hr != DS_OK) return hr; dsound->primary = primarybuf; } memset(primarybuf->buffer, 128, primarybuf->buflen); hnd = CreateThread(NULL,0,DSOUND_thread,0,0,&xid); } return DS_OK; #else MessageBoxA(0,"DirectSound needs the Open Sound System Driver, which has not been found by ./configure.","WINE DirectSound",MB_OK|MB_ICONSTOP); return DSERR_NODRIVER; #endif } /******************************************************************************* * DirectSound ClassFactory */ typedef struct { /* IUnknown fields */ ICOM_VFIELD(IClassFactory); DWORD ref; } IClassFactoryImpl; static HRESULT WINAPI DSCF_QueryInterface(LPCLASSFACTORY iface,REFIID riid,LPVOID *ppobj) { ICOM_THIS(IClassFactoryImpl,iface); FIXME("(%p)->(%s,%p),stub!\n",This,debugstr_guid(riid),ppobj); return E_NOINTERFACE; } static ULONG WINAPI DSCF_AddRef(LPCLASSFACTORY iface) { ICOM_THIS(IClassFactoryImpl,iface); return ++(This->ref); } static ULONG WINAPI DSCF_Release(LPCLASSFACTORY iface) { ICOM_THIS(IClassFactoryImpl,iface); /* static class, won't be freed */ return --(This->ref); } static HRESULT WINAPI DSCF_CreateInstance( LPCLASSFACTORY iface,LPUNKNOWN pOuter,REFIID riid,LPVOID *ppobj ) { ICOM_THIS(IClassFactoryImpl,iface); TRACE("(%p)->(%p,%s,%p)\n",This,pOuter,debugstr_guid(riid),ppobj); if ( IsEqualGUID( &IID_IDirectSound, riid ) ) { /* FIXME: reuse already created dsound if present? */ return DirectSoundCreate(riid,(LPDIRECTSOUND*)ppobj,pOuter); } return E_NOINTERFACE; } static HRESULT WINAPI DSCF_LockServer(LPCLASSFACTORY iface,BOOL dolock) { ICOM_THIS(IClassFactoryImpl,iface); FIXME("(%p)->(%d),stub!\n",This,dolock); return S_OK; } static ICOM_VTABLE(IClassFactory) DSCF_Vtbl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DSCF_QueryInterface, DSCF_AddRef, DSCF_Release, DSCF_CreateInstance, DSCF_LockServer }; static IClassFactoryImpl DSOUND_CF = {&DSCF_Vtbl, 1 }; /******************************************************************************* * DllGetClassObject [DSOUND.4] * Retrieves class object from a DLL object * * NOTES * Docs say returns STDAPI * * PARAMS * rclsid [I] CLSID for the class object * riid [I] Reference to identifier of interface for class object * ppv [O] Address of variable to receive interface pointer for riid * * RETURNS * Success: S_OK * Failure: CLASS_E_CLASSNOTAVAILABLE, E_OUTOFMEMORY, E_INVALIDARG, * E_UNEXPECTED */ DWORD WINAPI DSOUND_DllGetClassObject(REFCLSID rclsid,REFIID riid,LPVOID *ppv) { TRACE("(%p,%p,%p)\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv); if ( IsEqualCLSID( &IID_IClassFactory, riid ) ) { *ppv = (LPVOID)&DSOUND_CF; IClassFactory_AddRef((IClassFactory*)*ppv); return S_OK; } FIXME("(%p,%p,%p): no interface found.\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv); return CLASS_E_CLASSNOTAVAILABLE; } /******************************************************************************* * DllCanUnloadNow [DSOUND.3] Determines whether the DLL is in use. * * RETURNS * Success: S_OK * Failure: S_FALSE */ DWORD WINAPI DSOUND_DllCanUnloadNow(void) { FIXME("(void): stub\n"); return S_FALSE; } wine-20000526/dlls/gdi/0040755000175000001440000000000007113604175014152 5ustar julliarduserswine-20000526/dlls/gdi/.cvsignore0100644000175000001440000000007507066760126016157 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libgdi32.so.1.0 thunk.glue.c wine-20000526/dlls/gdi/Makefile.in0100644000175000001440000000040107066760126016215 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = gdi32 SOVERSION = 1.0 ALTNAMES = gdi SPEC_SRCS = gdi32.spec gdi.spec C_SRCS = \ gdi_main.c \ thunk.c GLUE = thunk.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/gdi/gdi.spec0100644000175000001440000004703007073170674015601 0ustar julliardusersname gdi type win16 heap 65488 # 65536 - 16 (instance data) - 32 (stock objects) file gdi.exe 1 pascal SetBkColor(word long) SetBkColor16 2 pascal16 SetBkMode(word word) SetBkMode16 3 pascal16 SetMapMode(word word) SetMapMode16 4 pascal16 SetROP2(word word) SetROP216 5 pascal16 SetRelAbs(word word) SetRelAbs16 6 pascal16 SetPolyFillMode(word word) SetPolyFillMode16 7 pascal16 SetStretchBltMode(word word) SetStretchBltMode16 8 pascal16 SetTextCharacterExtra(word s_word) SetTextCharacterExtra16 9 pascal SetTextColor(word long) SetTextColor16 10 pascal16 SetTextJustification(word s_word s_word) SetTextJustification16 11 pascal SetWindowOrg(word s_word s_word) SetWindowOrg16 12 pascal SetWindowExt(word s_word s_word) SetWindowExt16 13 pascal SetViewportOrg(word s_word s_word) SetViewportOrg16 14 pascal SetViewportExt(word s_word s_word) SetViewportExt16 15 pascal OffsetWindowOrg(word s_word s_word) OffsetWindowOrg16 16 pascal ScaleWindowExt(word s_word s_word s_word s_word) ScaleWindowExt16 17 pascal OffsetViewportOrg(word s_word s_word) OffsetViewportOrg16 18 pascal ScaleViewportExt(word s_word s_word s_word s_word) ScaleViewportExt16 19 pascal16 LineTo(word s_word s_word) LineTo16 20 pascal MoveTo(word s_word s_word) MoveTo16 21 pascal16 ExcludeClipRect(word s_word s_word s_word s_word) ExcludeClipRect16 22 pascal16 IntersectClipRect(word s_word s_word s_word s_word) IntersectClipRect16 23 pascal16 Arc(word s_word s_word s_word s_word s_word s_word s_word s_word) Arc16 24 pascal16 Ellipse(word s_word s_word s_word s_word) Ellipse16 25 pascal16 FloodFill(word s_word s_word long) FloodFill16 26 pascal16 Pie(word s_word s_word s_word s_word s_word s_word s_word s_word) Pie16 27 pascal16 Rectangle(word s_word s_word s_word s_word) Rectangle16 28 pascal16 RoundRect(word s_word s_word s_word s_word s_word s_word) RoundRect16 29 pascal16 PatBlt(word s_word s_word s_word s_word long) PatBlt16 30 pascal16 SaveDC(word) SaveDC16 31 pascal SetPixel(word s_word s_word long) SetPixel16 32 pascal16 OffsetClipRgn(word s_word s_word) OffsetClipRgn16 33 pascal16 TextOut(word s_word s_word str word) TextOut16 34 pascal16 BitBlt( word s_word s_word s_word s_word word s_word s_word long) BitBlt16 35 pascal16 StretchBlt(word s_word s_word s_word s_word word s_word s_word s_word s_word long) StretchBlt16 36 pascal16 Polygon (word ptr word) Polygon16 37 pascal16 Polyline (word ptr word) Polyline16 38 pascal Escape(word word word segptr segptr) Escape16 39 pascal16 RestoreDC(word s_word) RestoreDC16 40 pascal16 FillRgn(word word word) FillRgn16 41 pascal16 FrameRgn(word word word word word) FrameRgn16 42 pascal16 InvertRgn(word word) InvertRgn16 43 pascal16 PaintRgn(word word) PaintRgn16 44 pascal16 SelectClipRgn(word word) SelectClipRgn16 45 pascal16 SelectObject(word word) SelectObject16 #46 pascal __GP? 47 pascal16 CombineRgn(word word word s_word) CombineRgn16 48 pascal16 CreateBitmap(word word word word ptr) CreateBitmap16 49 pascal16 CreateBitmapIndirect(ptr) CreateBitmapIndirect16 50 pascal16 CreateBrushIndirect(ptr) CreateBrushIndirect16 51 pascal16 CreateCompatibleBitmap(word word word) CreateCompatibleBitmap16 52 pascal16 CreateCompatibleDC(word) CreateCompatibleDC16 53 pascal16 CreateDC(ptr ptr ptr ptr) CreateDC16 54 pascal16 CreateEllipticRgn(s_word s_word s_word s_word) CreateEllipticRgn16 55 pascal16 CreateEllipticRgnIndirect(ptr) CreateEllipticRgnIndirect16 56 pascal16 CreateFont(s_word s_word s_word s_word s_word word word word word word word word word str) CreateFont16 57 pascal16 CreateFontIndirect(ptr) CreateFontIndirect16 58 pascal16 CreateHatchBrush(word long) CreateHatchBrush16 60 pascal16 CreatePatternBrush(word) CreatePatternBrush16 61 pascal16 CreatePen(s_word s_word long) CreatePen16 62 pascal16 CreatePenIndirect(ptr) CreatePenIndirect16 63 pascal16 CreatePolygonRgn(ptr word word) CreatePolygonRgn16 64 pascal16 CreateRectRgn(s_word s_word s_word s_word) CreateRectRgn16 65 pascal16 CreateRectRgnIndirect(ptr) CreateRectRgnIndirect16 66 pascal16 CreateSolidBrush(long) CreateSolidBrush16 67 pascal16 DPtoLP(word ptr s_word) DPtoLP16 68 pascal16 DeleteDC(word) DeleteDC16 69 pascal16 DeleteObject(word) DeleteObject16 70 pascal16 EnumFonts(word str segptr long) THUNK_EnumFonts16 71 pascal16 EnumObjects(word word segptr long) THUNK_EnumObjects16 72 pascal16 EqualRgn(word word) EqualRgn16 73 pascal16 ExcludeVisRect(word s_word s_word s_word s_word) ExcludeVisRect16 74 pascal GetBitmapBits(word long ptr) GetBitmapBits16 75 pascal GetBkColor(word) GetBkColor16 76 pascal16 GetBkMode(word) GetBkMode16 77 pascal16 GetClipBox(word ptr) GetClipBox16 78 pascal GetCurrentPosition(word) GetCurrentPosition16 79 pascal GetDCOrg(word) GetDCOrg16 80 pascal16 GetDeviceCaps(word s_word) GetDeviceCaps16 81 pascal16 GetMapMode(word) GetMapMode16 82 pascal16 GetObject(word s_word ptr) GetObject16 83 pascal GetPixel(word s_word s_word) GetPixel16 84 pascal16 GetPolyFillMode(word) GetPolyFillMode16 85 pascal16 GetROP2(word) GetROP216 86 pascal16 GetRelAbs(word) GetRelAbs16 87 pascal16 GetStockObject(word) GetStockObject16 88 pascal16 GetStretchBltMode(word) GetStretchBltMode16 89 pascal16 GetTextCharacterExtra(word) GetTextCharacterExtra16 90 pascal GetTextColor(word) GetTextColor16 91 pascal GetTextExtent(word ptr s_word) GetTextExtent16 92 pascal16 GetTextFace(word s_word ptr) GetTextFace16 93 pascal16 GetTextMetrics(word ptr) GetTextMetrics16 94 pascal GetViewportExt(word) GetViewportExt16 95 pascal GetViewportOrg(word) GetViewportOrg16 96 pascal GetWindowExt(word) GetWindowExt16 97 pascal GetWindowOrg(word) GetWindowOrg16 98 pascal16 IntersectVisRect(word s_word s_word s_word s_word) IntersectVisRect16 99 pascal16 LPtoDP(word ptr s_word) LPtoDP16 100 pascal16 LineDDA(s_word s_word s_word s_word segptr long) LineDDA16 101 pascal16 OffsetRgn(word s_word s_word) OffsetRgn16 102 pascal16 OffsetVisRgn(word s_word s_word) OffsetVisRgn16 103 pascal16 PtVisible(word s_word s_word) PtVisible16 104 pascal16 RectVisibleOld(word ptr) RectVisible16 # also named RECTVISIBLE 105 pascal16 SelectVisRgn(word word) SelectVisRgn16 106 pascal SetBitmapBits(word long ptr) SetBitmapBits16 117 pascal SetDCOrg(word s_word s_word) SetDCOrg16 119 pascal16 AddFontResource(str) AddFontResource16 121 pascal16 Death(word) Death16 122 pascal16 Resurrection(word word word word word word word) Resurrection16 123 pascal16 PlayMetaFile(word word) PlayMetaFile16 124 pascal16 GetMetaFile(str) GetMetaFile16 125 pascal16 CreateMetaFile(str) CreateMetaFile16 126 pascal16 CloseMetaFile(word) CloseMetaFile16 127 pascal16 DeleteMetaFile(word) DeleteMetaFile16 128 pascal16 MulDiv(s_word s_word s_word) MulDiv16 129 pascal16 SaveVisRgn(word) SaveVisRgn16 130 pascal16 RestoreVisRgn(word) RestoreVisRgn16 131 pascal16 InquireVisRgn(word) InquireVisRgn16 132 pascal16 SetEnvironment(str str word) SetEnvironment16 133 pascal16 GetEnvironment(str str word) GetEnvironment16 134 pascal16 GetRgnBox(word ptr) GetRgnBox16 #135 pascal ScanLr 136 pascal16 RemoveFontResource(segptr) RemoveFontResource16 148 pascal SetBrushOrg(word s_word s_word) SetBrushOrg16 149 pascal GetBrushOrg(word) GetBrushOrg16 150 pascal16 UnrealizeObject(word) UnrealizeObject16 151 pascal16 CopyMetaFile(word str) CopyMetaFile16 153 pascal16 CreateIC(str str str ptr) CreateIC16 154 pascal GetNearestColor(word long) GetNearestColor16 155 pascal16 QueryAbort(word word) QueryAbort16 156 pascal16 CreateDiscardableBitmap(word word word) CreateDiscardableBitmap16 158 pascal16 EnumCallback(ptr ptr word long) EnumCallback16 159 pascal16 GetMetaFileBits(word) GetMetaFileBits16 160 pascal16 SetMetaFileBits(word) SetMetaFileBits16 161 pascal16 PtInRegion(word s_word s_word) PtInRegion16 162 pascal GetBitmapDimension(word) GetBitmapDimension16 163 pascal SetBitmapDimension(word s_word s_word) SetBitmapDimension16 169 stub IsDCDirty 170 stub SetDCStatus 172 pascal16 SetRectRgn(word s_word s_word s_word s_word) SetRectRgn16 173 pascal16 GetClipRgn(word) GetClipRgn16 175 pascal16 EnumMetaFile(word word segptr long) THUNK_EnumMetaFile16 176 pascal16 PlayMetaFileRecord(word ptr ptr word) PlayMetaFileRecord16 179 pascal16 GetDCState(word) GetDCState16 180 pascal16 SetDCState(word word) SetDCState16 181 pascal16 RectInRegionOld(word ptr) RectInRegion16 # also named RECTINREGION 188 stub GetTextExtentEx 190 pascal16 SetDCHook(word segptr long) SetDCHook 191 pascal GetDCHook(word ptr) GetDCHook 192 pascal16 SetHookFlags(word word) SetHookFlags16 193 pascal16 SetBoundsRect(word ptr word) SetBoundsRect16 194 pascal16 GetBoundsRect(word ptr word) GetBoundsRect16 195 stub SelectBitmap 196 pascal16 SetMetaFileBitsBetter(word) SetMetaFileBitsBetter16 201 stub DMBITBLT 202 stub DMCOLORINFO 206 pascal16 dmEnumDFonts(ptr str ptr ptr) dmEnumDFonts16 207 stub DMENUMOBJ 208 stub DMOUTPUT 209 stub DMPIXEL 210 pascal16 dmRealizeObject(ptr word ptr ptr segptr) dmRealizeObject16 211 stub DMSTRBLT 212 stub DMSCANLR 213 stub BRUTE 214 stub DMEXTTEXTOUT 215 stub DMGETCHARWIDTH 216 stub DMSTRETCHBLT 217 stub DMDIBBITS 218 stub DMSTRETCHDIBITS 219 stub DMSETDIBTODEV 220 stub DMTRANSPOSE 230 pascal16 CreatePQ(word) CreatePQ16 231 pascal16 MinPQ(word) MinPQ16 232 pascal16 ExtractPQ(word) ExtractPQ16 233 pascal16 InsertPQ(word word word) InsertPQ16 234 pascal16 SizePQ(word word) SizePQ16 235 pascal16 DeletePQ(word) DeletePQ16 240 pascal16 OpenJob(ptr ptr word) OpenJob16 241 pascal16 WriteSpool(word ptr word) WriteSpool16 242 pascal16 WriteDialog(word ptr word) WriteDialog16 243 pascal16 CloseJob(word) CloseJob16 244 pascal16 DeleteJob(word word) DeleteJob16 245 pascal GetSpoolJob(word ptr) GetSpoolJob16 246 pascal16 StartSpoolPage(word) StartSpoolPage16 247 pascal16 EndSpoolPage(word) EndSpoolPage16 248 stub QueryJob 250 pascal16 Copy(ptr ptr word) Copy16 253 stub DeleteSpoolPage 254 stub SpoolFile 267 stub StartDocPrintEra 268 stub StartPagePrinter 269 stub WritePrinter 270 stub EndPagePrinter 271 stub AbortPrinter 272 stub EndDocPrinter 274 stub ClosePrinter 280 stub GetRealDriverInfo 281 pascal DrvSetPrinterData(ptr ptr long ptr long) DrvSetPrinterData16 282 pascal DrvGetPrinterData(ptr ptr ptr ptr long ptr) DrvGetPrinterData16 299 stub ENGINEGETCHARWIDTHEX 300 pascal EngineEnumerateFont(ptr segptr long) EngineEnumerateFont16 301 pascal16 EngineDeleteFont(ptr) EngineDeleteFont16 302 pascal EngineRealizeFont(ptr ptr ptr) EngineRealizeFont16 303 pascal16 EngineGetCharWidth(ptr word word ptr) EngineGetCharWidth16 304 stub ENGINESETFONTCONTEXT 305 stub ENGINEGETGLYPHBMP 306 stub ENGINEMAKEFONTDIR 307 pascal16 GetCharABCWidths(word word word ptr) GetCharABCWidths16 308 pascal16 GetOutlineTextMetrics(word word ptr) GetOutlineTextMetrics16 309 pascal GetGlyphOutline(word word word ptr long ptr ptr) GetGlyphOutline16 310 pascal16 CreateScalableFontResource(word str str str) CreateScalableFontResource16 311 pascal GetFontData(word long long ptr long) GetFontData16 312 stub ConvertOutLineFontFile 313 pascal16 GetRasterizerCaps(ptr word) GetRasterizerCaps16 314 stub EngineExtTextOut 315 pascal EngineRealizeFontExt(long long long long) EngineRealizeFontExt16 316 stub EngineGetCharWidthStr 317 stub EngineGetGlyphBmpExt 330 pascal16 EnumFontFamilies(word str segptr long) THUNK_EnumFontFamilies16 332 pascal16 GetKerningPairs(word word ptr) GetKerningPairs16 345 pascal16 GetTextAlign(word) GetTextAlign16 346 pascal16 SetTextAlign(word word) SetTextAlign16 348 pascal16 Chord(word s_word s_word s_word s_word s_word s_word s_word s_word) Chord16 349 pascal SetMapperFlags(word long) SetMapperFlags16 350 pascal16 GetCharWidth(word word word ptr) GetCharWidth16 351 pascal16 ExtTextOut(word s_word s_word word ptr str word ptr) ExtTextOut16 352 stub GetPhysicalFontHandle 353 stub GetAspectRatioFilter 354 stub ShrinkGDIHeap 355 stub FTrapping0 360 pascal16 CreatePalette(ptr) CreatePalette16 361 pascal16 GDISelectPalette(word word word) GDISelectPalette16 362 pascal16 GDIRealizePalette(word) GDIRealizePalette16 363 pascal16 GetPaletteEntries(word word word ptr) GetPaletteEntries16 364 pascal16 SetPaletteEntries(word word word ptr) SetPaletteEntries16 365 pascal16 RealizeDefaultPalette(word) RealizeDefaultPalette16 366 pascal16 UpdateColors(word) UpdateColors16 367 pascal16 AnimatePalette(word word word ptr) AnimatePalette16 368 pascal16 ResizePalette(word word) ResizePalette16 370 pascal16 GetNearestPaletteIndex(word long) GetNearestPaletteIndex16 372 pascal16 ExtFloodFill(word s_word s_word long word) ExtFloodFill16 373 pascal16 SetSystemPaletteUse(word word) SetSystemPaletteUse16 374 pascal16 GetSystemPaletteUse(word) GetSystemPaletteUse16 375 pascal16 GetSystemPaletteEntries(word word word ptr) GetSystemPaletteEntries16 376 pascal16 ResetDC(word ptr) ResetDC16 377 pascal16 StartDoc(word ptr) StartDoc16 378 pascal16 EndDoc(word) EndDoc16 379 pascal16 StartPage(word) StartPage16 380 pascal16 EndPage(word) EndPage16 381 pascal16 SetAbortProc(word segptr) SetAbortProc16 382 pascal16 AbortDoc(word) AbortDoc16 400 pascal16 FastWindowFrame(word ptr s_word s_word long) FastWindowFrame16 401 stub GDIMOVEBITMAP 403 stub GDIINIT2 404 stub GetTTGlyphIndexMap 405 pascal16 FinalGdiInit(word) FinalGdiInit16 407 pascal16 CreateUserBitmap(word word word word ptr) CreateUserBitmap16 409 pascal16 CreateUserDiscardableBitmap(word word word) CreateUserDiscardableBitmap16 410 pascal16 IsValidMetaFile (word) IsValidMetaFile16 411 pascal16 GetCurLogFont(word) GetCurLogFont16 412 pascal16 IsDCCurrentPalette(word) IsDCCurrentPalette16 439 pascal16 StretchDIBits (word s_word s_word s_word s_word s_word s_word s_word s_word ptr ptr word long) StretchDIBits16 440 pascal16 SetDIBits(word word word word ptr ptr word) SetDIBits16 441 pascal16 GetDIBits(word word word word ptr ptr word) GetDIBits16 442 pascal16 CreateDIBitmap(word ptr long ptr ptr word) CreateDIBitmap16 443 pascal16 SetDIBitsToDevice(word s_word s_word s_word s_word s_word s_word word word ptr ptr word) SetDIBitsToDevice16 444 pascal16 CreateRoundRectRgn(s_word s_word s_word s_word s_word s_word) CreateRoundRectRgn16 445 pascal16 CreateDIBPatternBrush(word word) CreateDIBPatternBrush16 449 stub DEVICECOLORMATCH 450 pascal16 PolyPolygon(word ptr ptr word) PolyPolygon16 451 pascal16 CreatePolyPolygonRgn(ptr ptr word word) CreatePolyPolygonRgn16 452 pascal GdiSeeGdiDo(word word word word) GdiSeeGdiDo16 460 stub GDITASKTERMINATION 461 pascal16 SetObjectOwner(word word) SetObjectOwner16 462 pascal16 IsGDIObject(word) IsGDIObject16 463 pascal16 MakeObjectPrivate(word word) MakeObjectPrivate16 464 stub FIXUPBOGUSPUBLISHERMETAFILE 465 pascal16 RectVisible(word ptr) RectVisible16 # RECTVISIBLE_EHH ?? 466 pascal16 RectInRegion(word ptr) RectInRegion16 # RECTINREGION_EHH ?? 467 stub UNICODETOANSI 468 pascal16 GetBitmapDimensionEx(word ptr) GetBitmapDimensionEx16 469 pascal16 GetBrushOrgEx(word ptr) GetBrushOrgEx16 470 pascal16 GetCurrentPositionEx(word ptr) GetCurrentPositionEx16 471 pascal16 GetTextExtentPoint(word ptr s_word ptr) GetTextExtentPoint16 472 pascal16 GetViewportExtEx(word ptr) GetViewportExtEx16 473 pascal16 GetViewportOrgEx(word ptr) GetViewportOrgEx16 474 pascal16 GetWindowExtEx(word ptr) GetWindowExtEx16 475 pascal16 GetWindowOrgEx(word ptr) GetWindowOrgEx16 476 pascal16 OffsetViewportOrgEx(word s_word s_word ptr) OffsetViewportOrgEx16 477 pascal16 OffsetWindowOrgEx(word s_word s_word ptr) OffsetWindowOrgEx16 478 pascal16 SetBitmapDimensionEx(word s_word s_word ptr) SetBitmapDimensionEx16 479 pascal16 SetViewportExtEx(word s_word s_word ptr) SetViewportExtEx16 480 pascal16 SetViewportOrgEx(word s_word s_word ptr) SetViewportOrgEx16 481 pascal16 SetWindowExtEx(word s_word s_word ptr) SetWindowExtEx16 482 pascal16 SetWindowOrgEx(word s_word s_word ptr) SetWindowOrgEx16 483 pascal16 MoveToEx(word s_word s_word ptr) MoveToEx16 484 pascal16 ScaleViewportExtEx(word s_word s_word s_word s_word ptr) ScaleViewportExtEx16 485 pascal16 ScaleWindowExtEx(word s_word s_word s_word s_word ptr) ScaleWindowExtEx16 486 pascal16 GetAspectRatioFilterEx(word ptr) GetAspectRatioFilterEx16 489 pascal16 CreateDIBSection(word ptr word ptr long long) CreateDIBSection16 490 stub CloseEnhMetafile #490 stub POLYLINEWOW # conflicts with CloseEnhMetaFile !! 491 stub CopyEnhMetafile 492 stub CreateEnhMetafile 493 stub DeleteEnhMetafile 495 stub GDIComment 496 stub GetEnhMetafile 497 stub GetEnhMetafileBits 498 stub GetEnhMetafileDescription 499 stub GetEnhMetafileHeader 501 stub GetEnhMetafilePaletteEntries 502 pascal16 PolyBezier(word ptr word) PolyBezier16 503 pascal16 PolyBezierTo(word ptr word) PolyBezierTo16 504 stub PlayEnhMetafileRecord 505 stub SetEnhMetafileBits 506 stub SetMetaRgn 508 pascal16 ExtSelectClipRgn(word word word) ExtSelectClipRgn16 511 pascal16 AbortPath(word) AbortPath16 512 pascal16 BeginPath(word) BeginPath16 513 pascal16 CloseFigure(word) CloseFigure16 514 pascal16 EndPath(word) EndPath16 515 pascal16 FillPath(word) FillPath16 516 pascal16 FlattenPath(word) FlattenPath16 517 pascal16 GetPath(word ptr ptr word) GetPath16 518 pascal16 PathToRegion(word) PathToRegion16 519 pascal16 SelectClipPath(word word) SelectClipPath16 520 pascal16 StrokeAndFillPath(word) StrokeAndFillPath16 521 pascal16 StrokePath(word) StrokePath16 522 pascal16 WidenPath(word) WidenPath16 523 stub ExtCreatePen 524 pascal16 GetArcDirection(word) GetArcDirection16 525 pascal16 SetArcDirection(word word) SetArcDirection16 526 stub GetMiterLimit 527 stub SetMiterLimit 528 stub GDIParametersInfo 529 pascal16 CreateHalftonePalette(word) CreateHalftonePalette16 # Hebrew version API's 530 pascal16 RawTextOut() RawTextOut16 531 pascal16 RawExtTextOut() RawExtTextOut16 532 pascal16 RawGetTextExtent(word str word) RawGetTextExtent16 536 pascal16 BiDiLayout() BiDiLayout16 538 pascal16 BiDiCreateTabString() BiDiCreateTabString16 540 pascal16 BiDiGlyphOut() BiDiGlyphOut16 543 pascal16 BiDiGetStringExtent() BiDiGetStringExtent16 555 pascal16 BiDiDeleteString() BiDiDeleteString16 556 pascal16 BiDiSetDefaults() BiDiSetDefaults16 558 pascal16 BiDiGetDefaults() BiDiGetDefaults16 560 pascal16 BiDiShape() BiDiShape16 561 pascal16 BiDiFontComplement() BiDiFontComplement16 564 pascal16 BiDiSetKashida() BiDiSetKashida16 565 pascal16 BiDiKExtTextOut() BiDiKExtTextOut16 566 pascal16 BiDiShapeEx() BiDiShapeEx16 569 pascal16 BiDiCreateStringEx() BiDiCreateStringEx16 571 pascal16 GetTextExtentRtoL() GetTextExtentRtoL16 572 pascal16 GetHDCCharSet() GetHDCCharSet16 573 pascal16 BiDiLayoutEx() BiDiLayoutEx16 602 pascal16 SetDIBColorTable(word word word ptr) SetDIBColorTable16 603 pascal16 GetDIBColorTable(word word word ptr) GetDIBColorTable16 604 pascal16 SetSolidBrush(word long) SetSolidBrush16 605 pascal16 SysDeleteObject(word) DeleteObject16 # ??? 606 pascal16 SetMagicColors(word long word) SetMagicColors16 607 pascal GetRegionData(word long ptr) GetRegionData16 608 stub ExtCreateRegion 609 pascal16 GdiFreeResources(long) GdiFreeResources16 610 pascal16 GdiSignalProc32(long long long word) GdiSignalProc 611 stub GetRandomRgn 612 pascal16 GetTextCharset(word) GetTextCharset16 613 pascal16 EnumFontFamiliesEx(word ptr segptr long long) THUNK_EnumFontFamiliesEx16 614 stub AddLpkToGDI 615 stub GetCharacterPlacement 616 pascal GetFontLanguageInfo(word) GetFontLanguageInfo16 650 stub BuildInverseTableDIB 701 stub GDITHKCONNECTIONDATALS 702 stub FT_GDIFTHKTHKCONNECTIONDATA 703 stub FDTHKCONNECTIONDATASL 704 stub ICMTHKCONNECTIONDATASL 820 stub ICMCreateTransform 821 stub ICMDeleteTransform 822 stub ICMTranslateRGB 823 stub ICMTranslateRGBs 824 stub ICMCheckCOlorsInGamut 1000 pascal16 SetLayout(word long) SetLayout16 1001 stub GetLayout wine-20000526/dlls/gdi/gdi32.spec0100644000175000001440000004633107110637250015737 0ustar julliardusersname gdi32 type win32 init MAIN_GdiInit # ordinal exports 100 stdcall @(long long str str str) GDI_CallDevInstall16 101 stdcall @(long str str ptr) GDI_CallExtDeviceModePropSheet16 102 stdcall @(long ptr str str ptr str long) GDI_CallExtDeviceMode16 103 stdcall @(long str ptr ptr) GDI_CallAdvancedSetupDialog16 104 stdcall @(str str long ptr ptr) GDI_CallDeviceCapabilities16 @ stdcall AbortDoc(long) AbortDoc @ stdcall AbortPath(long) AbortPath @ stdcall AddFontResourceA(str) AddFontResourceA @ stub AddFontResourceTracking @ stdcall AddFontResourceW(wstr) AddFontResourceW @ stdcall AngleArc(long long long long long long) AngleArc @ stdcall AnimatePalette(long long long ptr) AnimatePalette @ stdcall Arc(long long long long long long long long long) Arc @ stdcall ArcTo(long long long long long long long long long) ArcTo @ stdcall BeginPath(long) BeginPath @ stdcall BitBlt(long long long long long long long long long) BitBlt @ stub ByeByeGDI @ stub CancelDC @ stub CheckColorsInGamut @ stdcall ChoosePixelFormat(long ptr) ChoosePixelFormat @ stdcall Chord(long long long long long long long long long) Chord @ stdcall CloseEnhMetaFile(long) CloseEnhMetaFile @ stdcall CloseFigure(long) CloseFigure @ stdcall CloseMetaFile(long) CloseMetaFile @ stub ColorCorrectPalette @ stub ColorMatchToTarget @ stdcall CombineRgn(long long long long) CombineRgn @ stdcall CombineTransform(ptr ptr ptr) CombineTransform @ stdcall CopyEnhMetaFileA(long str) CopyEnhMetaFileA @ stub CopyEnhMetaFileW @ stdcall CopyMetaFileA(long str) CopyMetaFileA @ stdcall CopyMetaFileW(long wstr) CopyMetaFileW @ stdcall CreateBitmap(long long long long ptr) CreateBitmap @ stdcall CreateBitmapIndirect(ptr) CreateBitmapIndirect @ stdcall CreateBrushIndirect(ptr) CreateBrushIndirect @ stdcall CreateColorSpaceA(ptr) CreateColorSpaceA @ stdcall CreateColorSpaceW(ptr) CreateColorSpaceW @ stdcall CreateCompatibleBitmap(long long long) CreateCompatibleBitmap @ stdcall CreateCompatibleDC(long) CreateCompatibleDC @ stdcall CreateDCA(str str str ptr) CreateDCA @ stdcall CreateDCW(wstr wstr wstr ptr) CreateDCW @ stdcall CreateDIBPatternBrush(long long) CreateDIBPatternBrush @ stdcall CreateDIBPatternBrushPt(long long) CreateDIBPatternBrushPt @ stdcall CreateDIBSection(long ptr long ptr long long) CreateDIBSection @ stdcall CreateDIBitmap(long ptr long ptr ptr long) CreateDIBitmap @ stdcall CreateDiscardableBitmap(long long long) CreateDiscardableBitmap @ stdcall CreateEllipticRgn(long long long long) CreateEllipticRgn @ stdcall CreateEllipticRgnIndirect(ptr) CreateEllipticRgnIndirect @ stdcall CreateEnhMetaFileA(long str ptr str) CreateEnhMetaFileA @ stdcall CreateEnhMetaFileW(long wstr ptr wstr) CreateEnhMetaFileW @ stdcall CreateFontA(long long long long long long long long long long long long long str) CreateFontA @ stdcall CreateFontIndirectA(ptr) CreateFontIndirectA @ stdcall CreateFontIndirectW(ptr) CreateFontIndirectW @ stdcall CreateFontW(long long long long long long long long long long long long long wstr) CreateFontW @ stdcall CreateHalftonePalette(long) CreateHalftonePalette @ stdcall CreateHatchBrush(long long) CreateHatchBrush @ stdcall CreateICA(str str str ptr) CreateICA @ stdcall CreateICW(wstr wstr wstr ptr) CreateICW @ stdcall CreateMetaFileA(str) CreateMetaFileA @ stdcall CreateMetaFileW(wstr) CreateMetaFileW @ stdcall CreatePalette(ptr) CreatePalette @ stdcall CreatePatternBrush(long) CreatePatternBrush @ stdcall CreatePen(long long long) CreatePen @ stdcall CreatePenIndirect(ptr) CreatePenIndirect @ stdcall CreatePolyPolygonRgn(ptr ptr long long) CreatePolyPolygonRgn @ stdcall CreatePolygonRgn(ptr long long) CreatePolygonRgn @ stdcall CreateRectRgn(long long long long) CreateRectRgn @ stdcall CreateRectRgnIndirect(ptr) CreateRectRgnIndirect @ stdcall CreateRoundRectRgn(long long long long long long) CreateRoundRectRgn @ stdcall CreateScalableFontResourceA(long str str str) CreateScalableFontResourceA @ stdcall CreateScalableFontResourceW(long wstr wstr wstr) CreateScalableFontResourceW @ stdcall CreateSolidBrush(long) CreateSolidBrush @ stdcall DPtoLP(long ptr long) DPtoLP @ stdcall DeleteColorSpace(long) DeleteColorSpace @ stdcall DeleteDC(long) DeleteDC @ stdcall DeleteEnhMetaFile(long) DeleteEnhMetaFile @ stdcall DeleteMetaFile(long) DeleteMetaFile @ stdcall DeleteObject(long) DeleteObject @ stdcall DescribePixelFormat(long long long ptr) DescribePixelFormat @ stub DeviceCapabilitiesEx @ stub DeviceCapabilitiesExA @ stub DeviceCapabilitiesExW @ stdcall DrawEscape(long long long ptr) DrawEscape @ stdcall Ellipse(long long long long long) Ellipse @ stub EnableEUDC @ stdcall EndDoc(long) EndDoc @ stdcall EndPage(long) EndPage @ stdcall EndPath(long) EndPath @ stdcall EnumEnhMetaFile(long long ptr ptr ptr) EnumEnhMetaFile @ stdcall EnumFontFamiliesA(long str ptr long) EnumFontFamiliesA @ stdcall EnumFontFamiliesExA(long ptr ptr long long) EnumFontFamiliesExA @ stdcall EnumFontFamiliesExW(long ptr ptr long long) EnumFontFamiliesExW @ stdcall EnumFontFamiliesW(long wstr ptr long) EnumFontFamiliesW @ stdcall EnumFontsA(long str ptr long) EnumFontsA @ stdcall EnumFontsW(long wstr ptr long) EnumFontsW @ stub EnumICMProfilesA @ stub EnumICMProfilesW @ stdcall EnumMetaFile(long long ptr ptr) EnumMetaFile @ stdcall EnumObjects(long long ptr long) EnumObjects @ stdcall EqualRgn(long long) EqualRgn @ stdcall Escape(long long long ptr ptr) Escape @ stdcall ExcludeClipRect(long long long long long) ExcludeClipRect @ stdcall ExtCreatePen(long long ptr long ptr) ExtCreatePen @ stdcall ExtCreateRegion(ptr long ptr) ExtCreateRegion @ stdcall ExtEscape(long long long ptr long ptr) ExtEscape @ stdcall ExtFloodFill(long long long long long) ExtFloodFill @ stdcall ExtSelectClipRgn(long long long) ExtSelectClipRgn @ stdcall ExtTextOutA(long long long long ptr str long ptr) ExtTextOutA @ stdcall ExtTextOutW(long long long long ptr wstr long ptr) ExtTextOutW @ stdcall FillPath(long) FillPath @ stdcall FillRgn(long long long) FillRgn @ stdcall FixBrushOrgEx(long long long ptr) FixBrushOrgEx @ stdcall FlattenPath(long) FlattenPath @ stdcall FloodFill(long long long long) FloodFill @ stdcall FrameRgn(long long long long long) FrameRgn @ stub FreeImageColorMatcher @ stub GdiAssociateObject @ stub GdiCleanCacheDC @ stdcall GdiComment(long long ptr) GdiComment @ stub GdiConvertAndCheckDC @ stub GdiConvertBitmap @ stub GdiConvertBrush @ stub GdiConvertDC @ stub GdiConvertEnhMetaFile @ stub GdiConvertFont @ stub GdiConvertMetaFilePict @ stub GdiConvertPalette @ stub GdiConvertRegion @ stub GdiCreateLocalBitmap @ stub GdiCreateLocalBrush @ stub GdiCreateLocalEnhMetaFile @ stub GdiCreateLocalFont @ stub GdiCreateLocalMetaFilePict @ stub GdiCreateLocalPalette @ stub GdiCreateLocalRegion @ stub GdiDciBeginAccess @ stub GdiDciCreateOffscreenSurface @ stub GdiDciCreateOverlaySurface @ stub GdiDciCreatePrimarySurface @ stub GdiDciDestroySurface @ stub GdiDciDrawSurface @ stub GdiDciEndAccess @ stub GdiDciEnumSurface @ stub GdiDciInitialize @ stub GdiDciSetClipList @ stub GdiDciSetDestination @ stub GdiDeleteLocalDC @ stub GdiDeleteLocalObject @ stub GdiDllInitialize @ stdcall GdiFlush() GdiFlush @ stdcall GdiGetBatchLimit() GdiGetBatchLimit @ stub GdiGetLocalBitmap @ stub GdiGetLocalBrush @ stub GdiGetLocalDC @ stub GdiGetLocalFont @ stub GdiIsMetaFileDC @ stub GdiPlayDCScript @ stub GdiPlayJournal @ stub GdiPlayScript @ stub GdiReleaseLocalDC @ stub GdiSetAttrs @ stdcall GdiSetBatchLimit(long) GdiSetBatchLimit @ stub GdiSetServerAttr @ stub GdiWinWatchClose @ stub GdiWinWatchDidStatusChange @ stub GdiWinWatchGetClipList @ stub GdiWinWatchOpen @ stdcall GetArcDirection(long) GetArcDirection @ stdcall GetAspectRatioFilterEx(long ptr) GetAspectRatioFilterEx @ stdcall GetBitmapBits(long long ptr) GetBitmapBits @ stdcall GetBitmapDimensionEx(long ptr) GetBitmapDimensionEx @ stdcall GetBkColor(long) GetBkColor @ stdcall GetBkMode(long) GetBkMode @ stdcall GetBoundsRect(long ptr long) GetBoundsRect @ stdcall GetBrushOrgEx(long ptr) GetBrushOrgEx @ stdcall GetCharABCWidthsA(long long long ptr) GetCharABCWidthsA @ stdcall GetCharABCWidthsFloatA(long long long ptr) GetCharABCWidthsFloatA @ stdcall GetCharABCWidthsFloatW(long long long ptr) GetCharABCWidthsFloatW @ stdcall GetCharABCWidthsW(long long long ptr) GetCharABCWidthsW @ stdcall GetCharWidth32A(long long long long) GetCharWidth32A @ stdcall GetCharWidth32W(long long long long) GetCharWidth32W @ stdcall GetCharWidthA(long long long long) GetCharWidth32A @ stdcall GetCharWidthFloatA(long long long ptr) GetCharWidthFloatA @ stdcall GetCharWidthFloatW(long long long ptr) GetCharWidthFloatW @ stdcall GetCharWidthW(long long long long) GetCharWidth32W @ stub GetCharWidthWOW @ stdcall GetCharacterPlacementA(long str long long ptr long) GetCharacterPlacementA @ stdcall GetCharacterPlacementW(long wstr long long ptr long) GetCharacterPlacementW @ stdcall GetClipBox(long ptr) GetClipBox @ stdcall GetClipRgn(long long) GetClipRgn @ stdcall GetColorAdjustment(long ptr) GetColorAdjustment @ stdcall GetColorSpace(long) GetColorSpace @ stdcall GetCurrentObject(long long) GetCurrentObject @ stdcall GetCurrentPositionEx(long ptr) GetCurrentPositionEx @ stdcall GetDCOrgEx(long ptr) GetDCOrgEx @ stdcall GetDIBColorTable(long long long ptr) GetDIBColorTable @ stdcall GetDIBits(long long long long ptr ptr long) GetDIBits @ stdcall GetDeviceCaps(long long) GetDeviceCaps @ stub GetDeviceGammaRamp @ stub GetETM @ stdcall GetEnhMetaFileA(str) GetEnhMetaFileA @ stdcall GetEnhMetaFileBits(long long ptr) GetEnhMetaFileBits @ stdcall GetEnhMetaFileDescriptionA(long long ptr) GetEnhMetaFileDescriptionA @ stdcall GetEnhMetaFileDescriptionW(long long ptr) GetEnhMetaFileDescriptionW @ stdcall GetEnhMetaFileHeader(long long ptr) GetEnhMetaFileHeader @ stdcall GetEnhMetaFilePaletteEntries (long long ptr) GetEnhMetaFilePaletteEntries @ stdcall GetEnhMetaFileW(wstr) GetEnhMetaFileW @ stdcall GetFontData(long long long ptr long) GetFontData @ stdcall GetFontLanguageInfo(long) GetFontLanguageInfo @ stub GetFontResourceInfo @ stub GetFontResourceInfoW @ stub GetGlyphOutline @ stdcall GetGlyphOutlineA(long long long ptr long ptr ptr) GetGlyphOutlineA @ stdcall GetGlyphOutlineW(long long long ptr long ptr ptr) GetGlyphOutlineW @ stub GetGlyphOutlineWow @ stdcall GetGraphicsMode(long) GetGraphicsMode @ stdcall GetICMProfileA(long ptr ptr) GetICMProfileA @ stub GetICMProfileW @ stub GetKerningPairs @ stdcall GetKerningPairsA(long long ptr) GetKerningPairsA @ stdcall GetKerningPairsW(long long ptr) GetKerningPairsW @ stdcall GetLayout(long) GetLayout @ stub GetLogColorSpaceA @ stub GetLogColorSpaceW @ stdcall GetMapMode(long) GetMapMode @ stdcall GetMetaFileA(str) GetMetaFileA @ stdcall GetMetaFileBitsEx(long long ptr) GetMetaFileBitsEx @ stdcall GetMetaFileW(wstr) GetMetaFileW @ stdcall GetMetaRgn(long long) GetMetaRgn @ stdcall GetMiterLimit(long ptr) GetMiterLimit @ stdcall GetNearestColor(long long) GetNearestColor @ stdcall GetNearestPaletteIndex(long long) GetNearestPaletteIndex @ stdcall GetObjectA(long long ptr) GetObjectA @ stdcall GetObjectType(long) GetObjectType @ stdcall GetObjectW(long long ptr) GetObjectW @ stdcall GetOutlineTextMetricsA(long long ptr) GetOutlineTextMetricsA @ stdcall GetOutlineTextMetricsW(long long ptr) GetOutlineTextMetricsW @ stdcall GetPaletteEntries(long long long ptr) GetPaletteEntries @ stdcall GetPath(long ptr ptr long) GetPath @ stdcall GetPixel(long long long) GetPixel @ stdcall GetPixelFormat(long) GetPixelFormat @ stdcall GetPolyFillMode(long) GetPolyFillMode @ stdcall GetROP2(long) GetROP2 @ stdcall GetRandomRgn(long long long) GetRandomRgn @ stdcall GetRasterizerCaps(ptr long) GetRasterizerCaps @ stdcall GetRegionData(long long ptr) GetRegionData @ stdcall GetRelAbs(long long) GetRelAbs @ stdcall GetRgnBox(long ptr) GetRgnBox @ stdcall GetStockObject(long) GetStockObject @ stdcall GetStretchBltMode(long) GetStretchBltMode @ stdcall GetSystemPaletteEntries(long long long ptr) GetSystemPaletteEntries @ stdcall GetSystemPaletteUse(long) GetSystemPaletteUse @ stdcall GetTextAlign(long) GetTextAlign @ stdcall GetTextCharacterExtra(long) GetTextCharacterExtra @ stdcall GetTextCharset(long) GetTextCharset @ stdcall GetTextCharsetInfo(long ptr long) GetTextCharsetInfo @ stdcall GetTextColor(long) GetTextColor @ stdcall GetTextExtentExPointA(long str long long ptr ptr ptr) GetTextExtentExPointA @ stdcall GetTextExtentExPointW(long wstr long long ptr ptr ptr) GetTextExtentExPointW @ stdcall GetTextExtentPoint32A(long ptr long ptr) GetTextExtentPoint32A @ stdcall GetTextExtentPoint32W(long ptr long ptr) GetTextExtentPoint32W @ stdcall GetTextExtentPointA(long ptr long ptr) GetTextExtentPointA @ stdcall GetTextExtentPointW(long ptr long ptr) GetTextExtentPointW @ stdcall GetTextFaceA(long long ptr) GetTextFaceA @ stdcall GetTextFaceW(long long ptr) GetTextFaceW @ stdcall GetTextMetricsA(long ptr) GetTextMetricsA @ stdcall GetTextMetricsW(long ptr) GetTextMetricsW @ stub GetTransform @ stdcall GetViewportExtEx(long ptr) GetViewportExtEx @ stdcall GetViewportOrgEx(long ptr) GetViewportOrgEx @ stdcall GetWinMetaFileBits(long long ptr long long) GetWinMetaFileBits @ stdcall GetWindowExtEx(long ptr) GetWindowExtEx @ stdcall GetWindowOrgEx(long ptr) GetWindowOrgEx @ stdcall GetWorldTransform(long ptr) GetWorldTransform @ stdcall IntersectClipRect(long long long long long) IntersectClipRect @ stdcall InvertRgn(long long) InvertRgn @ stdcall LPtoDP(long ptr long) LPtoDP @ stdcall LineDDA(long long long long ptr long) LineDDA @ stdcall LineTo(long long long) LineTo @ stub LoadImageColorMatcherA @ stub LoadImageColorMatcherW @ stdcall MaskBlt(long long long long long long long long long long long long) MaskBlt @ stdcall ModifyWorldTransform(long ptr long) ModifyWorldTransform @ stdcall MoveToEx(long long long ptr) MoveToEx @ stdcall OffsetClipRgn(long long long) OffsetClipRgn @ stdcall OffsetRgn(long long long) OffsetRgn @ stdcall OffsetViewportOrgEx(long long long ptr) OffsetViewportOrgEx @ stdcall OffsetWindowOrgEx(long long long ptr) OffsetWindowOrgEx @ stdcall PaintRgn(long long) PaintRgn @ stdcall PatBlt(long long long long long long) PatBlt @ stdcall PathToRegion(long) PathToRegion @ stdcall Pie(long long long long long long long long long) Pie @ stdcall PlayEnhMetaFile(long long ptr) PlayEnhMetaFile @ stdcall PlayEnhMetaFileRecord(long ptr ptr long) PlayEnhMetaFileRecord @ stdcall PlayMetaFile(long long) PlayMetaFile @ stdcall PlayMetaFileRecord(long ptr ptr long) PlayMetaFileRecord @ stdcall PlgBlt(long ptr long long long long long long long long) PlgBlt @ stdcall PolyBezier(long ptr long) PolyBezier @ stdcall PolyBezierTo(long ptr long) PolyBezierTo @ stdcall PolyDraw(long ptr ptr long) PolyDraw @ stdcall PolyPolygon(long ptr ptr long) PolyPolygon @ stdcall PolyPolyline(long ptr ptr long) PolyPolyline @ stdcall PolyTextOutA(long ptr long) PolyTextOutA @ stdcall PolyTextOutW(long ptr long) PolyTextOutW @ stdcall Polygon(long ptr long) Polygon @ stdcall Polyline(long ptr long) Polyline @ stdcall PolylineTo(long ptr long) PolylineTo @ stdcall PtInRegion(long long long) PtInRegion @ stdcall PtVisible(long long long) PtVisible @ stdcall RealizePalette(long) RealizePalette @ stdcall RectInRegion(long ptr) RectInRegion @ stdcall RectVisible(long ptr) RectVisible @ stdcall Rectangle(long long long long long) Rectangle @ stdcall RemoveFontResourceA(str) RemoveFontResourceA @ stub RemoveFontResourceTracking @ stdcall RemoveFontResourceW(wstr) RemoveFontResourceW @ stdcall ResetDCA(long ptr) ResetDCA @ stdcall ResetDCW(long ptr) ResetDCW @ stdcall ResizePalette(long long) ResizePalette @ stdcall RestoreDC(long long) RestoreDC @ stdcall RoundRect(long long long long long long long) RoundRect @ stdcall SaveDC(long) SaveDC @ stdcall ScaleViewportExtEx(long long long long long ptr) ScaleViewportExtEx @ stdcall ScaleWindowExtEx(long long long long long ptr) ScaleWindowExtEx @ stub SelectBrushLocal @ stdcall SelectClipPath(long long) SelectClipPath @ stdcall SelectClipRgn(long long) SelectClipRgn @ stub SelectFontLocal @ stdcall SelectObject(long long) SelectObject @ stdcall SelectPalette(long long long) SelectPalette @ stdcall SetAbortProc(long ptr) SetAbortProc @ stdcall SetArcDirection(long long) SetArcDirection @ stdcall SetBitmapBits(long long ptr) SetBitmapBits @ stdcall SetBitmapDimensionEx(long long long ptr) SetBitmapDimensionEx @ stdcall SetBkColor(long long) SetBkColor @ stdcall SetBkMode(long long) SetBkMode @ stdcall SetBoundsRect(long ptr long) SetBoundsRect @ stdcall SetBrushOrgEx(long long long ptr) SetBrushOrgEx @ stdcall SetColorAdjustment(long ptr) SetColorAdjustment @ stdcall SetColorSpace(long long) SetColorSpace @ stdcall SetDIBColorTable(long long long ptr) SetDIBColorTable @ stdcall SetDIBits(long long long long ptr ptr long) SetDIBits @ stdcall SetDIBitsToDevice(long long long long long long long long long ptr ptr long) SetDIBitsToDevice @ stub SetDeviceGammaRamp @ stdcall SetEnhMetaFileBits(long ptr) SetEnhMetaFileBits @ stub SetFontEnumeration @ stdcall SetGraphicsMode(long long) SetGraphicsMode @ stdcall SetICMMode(long long) SetICMMode @ stub SetICMProfileA @ stub SetICMProfileW @ stdcall SetLayout(long long) SetLayout @ stub SetMagicColors @ stdcall SetMapMode(long long) SetMapMode @ stdcall SetMapperFlags(long long) SetMapperFlags @ stdcall SetMetaFileBitsEx(long ptr) SetMetaFileBitsEx @ stdcall SetMetaRgn(long) SetMetaRgn @ stdcall SetMiterLimit(long long ptr) SetMiterLimit @ stdcall SetObjectOwner(long long) SetObjectOwner @ stdcall SetPaletteEntries(long long long ptr) SetPaletteEntries @ stdcall SetPixel(long long long long) SetPixel @ stdcall SetPixelFormat(long long ptr) SetPixelFormat @ stdcall SetPixelV(long long long long) SetPixelV @ stdcall SetPolyFillMode(long long) SetPolyFillMode @ stdcall SetROP2(long long) SetROP2 @ stdcall SetRectRgn(long long long long long) SetRectRgn @ stdcall SetRelAbs(long long) SetRelAbs @ stdcall SetStretchBltMode(long long) SetStretchBltMode @ stdcall SetSystemPaletteUse(long long) SetSystemPaletteUse @ stdcall SetTextAlign(long long) SetTextAlign @ stdcall SetTextCharacterExtra(long long) SetTextCharacterExtra @ stdcall SetTextColor(long long) SetTextColor @ stdcall SetTextJustification(long long long) SetTextJustification @ stdcall SetViewportExtEx(long long long ptr) SetViewportExtEx @ stdcall SetViewportOrgEx(long long long ptr) SetViewportOrgEx @ stub SetVirtualResolution @ stdcall SetWinMetaFileBits(long ptr long ptr) SetWinMetaFileBits @ stdcall SetWindowExtEx(long long long ptr) SetWindowExtEx @ stdcall SetWindowOrgEx(long long long ptr) SetWindowOrgEx @ stdcall SetWorldTransform(long ptr) SetWorldTransform @ stdcall StartDocA(long ptr) StartDocA @ stdcall StartDocW(long ptr) StartDocW @ stdcall StartPage(long) StartPage @ stdcall StretchBlt(long long long long long long long long long long long) StretchBlt @ stdcall StretchDIBits(long long long long long long long long long ptr ptr long long) StretchDIBits @ stdcall StrokeAndFillPath(long) StrokeAndFillPath @ stdcall StrokePath(long) StrokePath @ stdcall SwapBuffers(long) SwapBuffers @ stdcall TextOutA(long long long str long) TextOutA @ stdcall TextOutW(long long long wstr long) TextOutW @ stdcall TranslateCharsetInfo(ptr ptr long) TranslateCharsetInfo @ stub UnloadNetworkFonts @ stdcall UnrealizeObject(long) UnrealizeObject @ stdcall UpdateColors(long) UpdateColors @ stub UpdateICMRegKey @ stub UpdateICMRegKeyA @ stub UpdateICMRegKeyW @ stdcall WidenPath(long) WidenPath @ stub gdiPlaySpoolStream @ extern pfnRealizePalette pfnRealizePalette @ extern pfnSelectPalette pfnSelectPalette @ stub pstackConnect wine-20000526/dlls/gdi/gdi_main.c0100644000175000001440000000156607105334313016065 0ustar julliardusers/* * GDI initialization code */ #include "windef.h" #include "wingdi.h" #include "wine/winbase16.h" #include "gdi.h" #include "global.h" #include "psdrv.h" #include "tweak.h" #include "win16drv.h" /*********************************************************************** * GDI initialisation routine */ BOOL WINAPI MAIN_GdiInit(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved) { HINSTANCE16 instance; if ( GDI_HeapSel ) return TRUE; /* Create GDI heap */ if ((instance = LoadLibrary16( "GDI.EXE" )) < 32) return FALSE; GDI_HeapSel = GlobalHandleToSel16( instance ); if (!TWEAK_Init()) return FALSE; /* GDI initialisation */ if(!GDI_Init()) return FALSE; /* Create the Win16 printer driver */ if (!WIN16DRV_Init()) return FALSE; /* PSDRV initialization */ if(!PSDRV_Init()) return FALSE; return TRUE; } wine-20000526/dlls/gdi/thunk.c0100644000175000001440000000575507066760126015466 0ustar julliardusers/* * GDI 16-bit thunks * * Copyright 1996, 1997 Alexandre Julliard * Copyright 1998 Ulrich Weigand */ #include "windef.h" #include "wingdi.h" #include "wine/wingdi16.h" #include "callback.h" /* ### start build ### */ extern WORD CALLBACK THUNK_CallTo16_word_ll (FARPROC16,LONG,LONG); extern WORD CALLBACK THUNK_CallTo16_word_llwl (FARPROC16,LONG,LONG,WORD,LONG); extern WORD CALLBACK THUNK_CallTo16_word_wllwl(FARPROC16,WORD,LONG,LONG,WORD,LONG); extern WORD CALLBACK THUNK_CallTo16_word_wwl (FARPROC16,WORD,WORD,LONG); /* ### stop build ### */ /*********************************************************************** * THUNK_EnumObjects16 (GDI.71) */ INT16 WINAPI THUNK_EnumObjects16( HDC16 hdc, INT16 nObjType, GOBJENUMPROC16 func, LPARAM lParam ) { DECL_THUNK( thunk, func, THUNK_CallTo16_word_ll ); return EnumObjects16( hdc, nObjType, (GOBJENUMPROC16)&thunk, lParam ); } /************************************************************************* * THUNK_EnumFonts16 (GDI.70) */ INT16 WINAPI THUNK_EnumFonts16( HDC16 hdc, LPCSTR lpFaceName, FONTENUMPROC16 func, LPARAM lParam ) { DECL_THUNK( thunk, func, THUNK_CallTo16_word_llwl ); return EnumFonts16( hdc, lpFaceName, (FONTENUMPROC16)&thunk, lParam ); } /****************************************************************** * THUNK_EnumMetaFile16 (GDI.175) */ BOOL16 WINAPI THUNK_EnumMetaFile16( HDC16 hdc, HMETAFILE16 hmf, MFENUMPROC16 func, LPARAM lParam ) { DECL_THUNK( thunk, func, THUNK_CallTo16_word_wllwl ); return EnumMetaFile16( hdc, hmf, (MFENUMPROC16)&thunk, lParam ); } /************************************************************************* * THUNK_EnumFontFamilies16 (GDI.330) */ INT16 WINAPI THUNK_EnumFontFamilies16( HDC16 hdc, LPCSTR lpszFamily, FONTENUMPROC16 func, LPARAM lParam ) { DECL_THUNK( thunk, func, THUNK_CallTo16_word_llwl ); return EnumFontFamilies16(hdc, lpszFamily, (FONTENUMPROC16)&thunk, lParam); } /************************************************************************* * THUNK_EnumFontFamiliesEx16 (GDI.613) */ INT16 WINAPI THUNK_EnumFontFamiliesEx16( HDC16 hdc, LPLOGFONT16 lpLF, FONTENUMPROCEX16 func, LPARAM lParam, DWORD reserved ) { DECL_THUNK( thunk, func, THUNK_CallTo16_word_llwl ); return EnumFontFamiliesEx16( hdc, lpLF, (FONTENUMPROCEX16)&thunk, lParam, reserved ); } /********************************************************************** * LineDDA16 (GDI.100) */ void WINAPI LineDDA16( INT16 nXStart, INT16 nYStart, INT16 nXEnd, INT16 nYEnd, LINEDDAPROC16 func, LPARAM lParam ) { DECL_THUNK( thunk, func, THUNK_CallTo16_word_wwl ); LineDDA( nXStart, nYStart, nXEnd, nYEnd, (LINEDDAPROC)&thunk, lParam ); } wine-20000526/dlls/icmp/0040755000175000001440000000000007113604175014337 5ustar julliarduserswine-20000526/dlls/icmp/.cvsignore0100644000175000001440000000004107045213572016330 0ustar julliardusers*.spec.c Makefile libicmp.so.1.0 wine-20000526/dlls/icmp/Makefile.in0100644000175000001440000000031407060307300016366 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = icmp SOVERSION = 1.0 SPEC_SRCS = icmp.spec C_SRCS = icmp_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/icmp/icmp.spec0100644000175000001440000000044707033475133016146 0ustar julliardusersname icmp type win32 @ stdcall IcmpCloseHandle(ptr) IcmpCloseHandle @ stdcall IcmpCreateFile() IcmpCreateFile @ stub IcmpParseReplies @ stdcall IcmpSendEcho(ptr long ptr long ptr ptr long long) IcmpSendEcho @ stub IcmpSendEcho2 @ stub do_echo_rep @ stub do_echo_req @ stub register_icmp wine-20000526/dlls/icmp/icmp_main.c0100644000175000001440000004501207111133361016426 0ustar julliardusers/* * ICMP * * Francois Gouget, 1999, based on the work of * RW Hall, 1999, based on public domain code PING.C by Mike Muus (1983) * and later works (c) 1989 Regents of Univ. of California - see copyright * notice at end of source-code. */ /* Future work: * - Systems like FreeBSD don't seem to support the IP_TTL option and maybe others. * But using IP_HDRINCL and building the IP header by hand might work. * - Not all IP options are supported. * - Are ICMP handles real handles, i.e. inheritable and all? There might be some * more work to do here, including server side stuff with synchronization. * - Is it correct to use malloc for the internal buffer, for allocating the * handle's structure? * - This API should probably be thread safe. Is it really? * - Using the winsock functions has not been tested. */ #include "config.h" #include #ifdef HAVE_SYS_SOCKET_H # include #endif #include #include #ifdef HAVE_NETINET_IN_H # include #endif #include #include #include #include #ifdef HAVE_ARPA_INET_H # include #endif #include "windef.h" #include "winbase.h" #ifdef ICMP_WIN #include "winsock.h" #endif #include "winerror.h" #include "wine/ipexport.h" #include "wine/icmpapi.h" #include "debugtools.h" /* Set up endiannes macros for the ip and ip_icmp BSD headers */ #ifndef BIG_ENDIAN #define BIG_ENDIAN 4321 #endif #ifndef LITTLE_ENDIAN #define LITTLE_ENDIAN 1234 #endif #ifndef BYTE_ORDER #ifdef WORDS_BIGENDIAN #define BYTE_ORDER BIG_ENDIAN #else #define BYTE_ORDER LITTLE_ENDIAN #endif #endif /* BYTE_ORDER */ #define u_int16_t WORD #define u_int32_t DWORD /* These are BSD headers. We use these here because they are needed on * libc5 Linux systems. On other platforms they are usually simply more * complete than the native stuff, and cause less portability problems * so we use them anyway. */ #include "ip.h" #include "ip_icmp.h" DEFAULT_DEBUG_CHANNEL(icmp) /* Define the following macro to use the winsock functions */ /*#define ICMP_WIN*/ #ifdef ICMP_WIN /* FIXME: should we include winsock.h ???*/ SOCKET WINAPI WINSOCK_socket(INT af, INT type, INT protocol); INT WINAPI WINSOCK_sendto(SOCKET s, char *buf, INT len, INT flags, struct sockaddr *to, INT tolen); INT WINAPI WINSOCK_recvfrom(SOCKET s, char *buf,INT len, INT flags, struct sockaddr *from, INT *fromlen32); INT WINAPI WINSOCK_shutdown(SOCKET s, INT how); #endif #ifdef ICMP_WIN #define ISOCK_SOCKET SOCKET #define ISOCK_ISVALID(a) ((a)!=INVALID_SOCKET) #define ISOCK_getsockopt(a,b,c,d,e) WINSOCK_getsockopt(a,b,c,d,e) #define ISOCK_recvfrom(a,b,c,d,e,f) WINSOCK_recvfrom(a,b,c,d,e,f) #define ISOCK_select(a,b,c,d,e) WINSOCK_select(a,b,c,d,e) #define ISOCK_sendto(a,b,c,d,e,f) WINSOCK_sendto(a,b,c,d,e,f) #define ISOCK_setsockopt(a,b,c,d,e) WINSOCK_setsockopt(a,b,c,d,e) #define ISOCK_shutdown(a,b) WINSOCK_shutdown(a,b) #define ISOCK_socket(a,b,c) WINSOCK_socket(a,b,c) #else #define ISOCK_SOCKET int #define ISOCK_ISVALID(a) ((a)>=0) #define ISOCK_getsockopt(a,b,c,d,e) getsockopt(a,b,c,d,e) #define ISOCK_recvfrom(a,b,c,d,e,f) recvfrom(a,b,c,d,e,f) #define ISOCK_select(a,b,c,d,e) select(a,b,c,d,e) #define ISOCK_setsockopt(a,b,c,d,e) setsockopt(a,b,c,d,e) #define ISOCK_sendto(a,b,c,d,e,f) sendto(a,b,c,d,e,f) #define ISOCK_shutdown(a,b) shutdown(a,b) #define ISOCK_socket(a,b,c) socket(a,b,c) #endif typedef struct { ISOCK_SOCKET sid; IP_OPTION_INFORMATION default_opts; } icmp_t; #define IP_OPTS_UNKNOWN 0 #define IP_OPTS_DEFAULT 1 #define IP_OPTS_CUSTOM 2 /* The sequence number is unique process wide, so that all threads * have a distinct sequence number. */ static LONG icmp_sequence=0; static int in_cksum(u_short *addr, int len) { int nleft=len; u_short *w = addr; int sum = 0; u_short answer = 0; while (nleft > 1) { sum += *w++; nleft -= 2; } if (nleft == 1) { *(u_char *)(&answer) = *(u_char *)w; sum += answer; } sum = (sum >> 16) + (sum & 0xffff); sum += (sum >> 16); answer = ~sum; return(answer); } /* * Exported Routines. */ /*********************************************************************** * IcmpCreateFile */ HANDLE WINAPI IcmpCreateFile(VOID) { icmp_t* icp; ISOCK_SOCKET sid=ISOCK_socket(AF_INET,SOCK_RAW,IPPROTO_ICMP); if (!ISOCK_ISVALID(sid)) { MESSAGE("WARNING: Trying to use ICMP will fail unless running as root\n"); SetLastError(ERROR_ACCESS_DENIED); return INVALID_HANDLE_VALUE; } icp=HeapAlloc(GetProcessHeap(), 0, sizeof(*icp)); if (icp==NULL) { SetLastError(IP_NO_RESOURCES); return INVALID_HANDLE_VALUE; } icp->sid=sid; icp->default_opts.OptionsSize=IP_OPTS_UNKNOWN; return (HANDLE)icp; } /*********************************************************************** * IcmpCloseHandle */ BOOL WINAPI IcmpCloseHandle(HANDLE IcmpHandle) { icmp_t* icp=(icmp_t*)IcmpHandle; if (IcmpHandle==INVALID_HANDLE_VALUE) { /* FIXME: in fact win98 seems to ignore the handle value !!! */ SetLastError(ERROR_INVALID_HANDLE); return FALSE; } ISOCK_shutdown(icp->sid,2); HeapFree(GetProcessHeap (), 0, icp); return TRUE; } /*********************************************************************** * IcmpSendEcho */ DWORD WINAPI IcmpSendEcho( HANDLE IcmpHandle, IPAddr DestinationAddress, LPVOID RequestData, WORD RequestSize, PIP_OPTION_INFORMATION RequestOptions, LPVOID ReplyBuffer, DWORD ReplySize, DWORD Timeout ) { icmp_t* icp=(icmp_t*)IcmpHandle; unsigned char* reqbuf; int reqsize; struct icmp_echo_reply* ier; struct ip* ip_header; struct icmp* icmp_header; char* endbuf; int ip_header_len; int maxlen; fd_set fdr; struct timeval timeout,send_time,recv_time; struct sockaddr_in addr; int addrlen; unsigned short id,seq,cksum; int res; if (IcmpHandle==INVALID_HANDLE_VALUE) { /* FIXME: in fact win98 seems to ignore the handle value !!! */ SetLastError(ERROR_INVALID_HANDLE); return 0; } if (ReplySizeicmp_type=ICMP_ECHO; icmp_header->icmp_code=0; icmp_header->icmp_cksum=0; icmp_header->icmp_id=id; icmp_header->icmp_seq=seq; memcpy(reqbuf+ICMP_MINLEN, RequestData, RequestSize); icmp_header->icmp_cksum=cksum=in_cksum((u_short*)reqbuf,reqsize); addr.sin_family=AF_INET; addr.sin_addr.s_addr=DestinationAddress; addr.sin_port=0; if (RequestOptions!=NULL) { int val; if (icp->default_opts.OptionsSize==IP_OPTS_UNKNOWN) { int len; /* Before we mess with the options, get the default values */ len=sizeof(val); ISOCK_getsockopt(icp->sid,IPPROTO_IP,IP_TTL,(char *)&val,&len); icp->default_opts.Ttl=val; len=sizeof(val); ISOCK_getsockopt(icp->sid,IPPROTO_IP,IP_TOS,(char *)&val,&len); icp->default_opts.Tos=val; /* FIXME: missing: handling of IP 'flags', and all the other options */ } val=RequestOptions->Ttl; ISOCK_setsockopt(icp->sid,IPPROTO_IP,IP_TTL,(char *)&val,sizeof(val)); val=RequestOptions->Tos; ISOCK_setsockopt(icp->sid,IPPROTO_IP,IP_TOS,(char *)&val,sizeof(val)); /* FIXME: missing: handling of IP 'flags', and all the other options */ icp->default_opts.OptionsSize=IP_OPTS_CUSTOM; } else if (icp->default_opts.OptionsSize==IP_OPTS_CUSTOM) { int val; /* Restore the default options */ val=icp->default_opts.Ttl; ISOCK_setsockopt(icp->sid,IPPROTO_IP,IP_TTL,(char *)&val,sizeof(val)); val=icp->default_opts.Tos; ISOCK_setsockopt(icp->sid,IPPROTO_IP,IP_TOS,(char *)&val,sizeof(val)); /* FIXME: missing: handling of IP 'flags', and all the other options */ icp->default_opts.OptionsSize=IP_OPTS_DEFAULT; } /* Get ready for receiving the reply * Do it before we send the request to minimize the risk of introducing delays */ FD_ZERO(&fdr); FD_SET(icp->sid,&fdr); timeout.tv_sec=Timeout/1000; timeout.tv_usec=(Timeout % 1000)*1000; addrlen=sizeof(addr); ier=ReplyBuffer; ip_header=(struct ip *) ((char *) ReplyBuffer+sizeof(ICMP_ECHO_REPLY)); endbuf=(char *) ReplyBuffer+ReplySize; maxlen=ReplySize-sizeof(ICMP_ECHO_REPLY); /* Send the packet */ TRACE("Sending %d bytes (RequestSize=%d) to %s\n", reqsize, RequestSize, inet_ntoa(addr.sin_addr)); #if 0 if (TRACE_ON(icmp)){ unsigned char* buf=(unsigned char*)reqbuf; int i; printf("Output buffer:\n"); for (i=0;isid, reqbuf, reqsize, 0, (struct sockaddr*)&addr, sizeof(addr)); HeapFree(GetProcessHeap (), 0, reqbuf); if (res<0) { if (errno==EMSGSIZE) SetLastError(IP_PACKET_TOO_BIG); else { switch (errno) { case ENETUNREACH: SetLastError(IP_DEST_NET_UNREACHABLE); break; case EHOSTUNREACH: SetLastError(IP_DEST_NET_UNREACHABLE); break; default: TRACE("unknown error: errno=%d\n",errno); SetLastError(ERROR_UNKNOWN); } } return 0; } /* Get the reply */ ip_header_len=0; /* because gcc was complaining */ while ((res=ISOCK_select(icp->sid+1,&fdr,NULL,NULL,&timeout))>0) { gettimeofday(&recv_time,NULL); res=ISOCK_recvfrom(icp->sid, (char*)ip_header, maxlen, 0, (struct sockaddr*)&addr,&addrlen); TRACE("received %d bytes from %s\n",res, inet_ntoa(addr.sin_addr)); ier->Status=IP_REQ_TIMED_OUT; /* Check whether we should ignore this packet */ if ((ip_header->ip_p==IPPROTO_ICMP) && (res>=sizeof(struct ip)+ICMP_MINLEN)) { ip_header_len=ip_header->ip_hl << 2; icmp_header=(struct icmp*)(((char*)ip_header)+ip_header_len); TRACE("received an ICMP packet of type,code=%d,%d\n",icmp_header->icmp_type,icmp_header->icmp_code); if (icmp_header->icmp_type==ICMP_ECHOREPLY) { if ((icmp_header->icmp_id==id) && (icmp_header->icmp_seq==seq)) ier->Status=IP_SUCCESS; } else { switch (icmp_header->icmp_type) { case ICMP_UNREACH: switch (icmp_header->icmp_code) { case ICMP_UNREACH_HOST: #ifdef ICMP_UNREACH_HOST_UNKNOWN case ICMP_UNREACH_HOST_UNKNOWN: #endif #ifdef ICMP_UNREACH_ISOLATED case ICMP_UNREACH_ISOLATED: #endif #ifdef ICMP_UNREACH_HOST_PROHIB case ICMP_UNREACH_HOST_PROHIB: #endif #ifdef ICMP_UNREACH_TOSHOST case ICMP_UNREACH_TOSHOST: #endif ier->Status=IP_DEST_HOST_UNREACHABLE; break; case ICMP_UNREACH_PORT: ier->Status=IP_DEST_PORT_UNREACHABLE; break; case ICMP_UNREACH_PROTOCOL: ier->Status=IP_DEST_PROT_UNREACHABLE; break; case ICMP_UNREACH_SRCFAIL: ier->Status=IP_BAD_ROUTE; break; default: ier->Status=IP_DEST_NET_UNREACHABLE; } break; case ICMP_TIMXCEED: if (icmp_header->icmp_code==ICMP_TIMXCEED_REASS) ier->Status=IP_TTL_EXPIRED_REASSEM; else ier->Status=IP_TTL_EXPIRED_TRANSIT; break; case ICMP_PARAMPROB: ier->Status=IP_PARAM_PROBLEM; break; case ICMP_SOURCEQUENCH: ier->Status=IP_SOURCE_QUENCH; break; } if (ier->Status!=IP_REQ_TIMED_OUT) { struct ip* rep_ip_header; struct icmp* rep_icmp_header; /* The ICMP header size of all the packets we accept is the same */ rep_ip_header=(struct ip*)(((char*)icmp_header)+ICMP_MINLEN); rep_icmp_header=(struct icmp*)(((char*)rep_ip_header)+(rep_ip_header->ip_hl << 2)); /* Make sure that this is really a reply to our packet */ if (ip_header_len+ICMP_MINLEN+(rep_ip_header->ip_hl << 2)+ICMP_MINLEN>ip_header->ip_len) { ier->Status=IP_REQ_TIMED_OUT; } else if ((rep_icmp_header->icmp_type!=ICMP_ECHO) || (rep_icmp_header->icmp_code!=0) || (rep_icmp_header->icmp_id!=id) || (rep_icmp_header->icmp_seq!=seq) || (rep_icmp_header->icmp_cksum!=cksum)) { /* This was not a reply to one of our packets after all */ TRACE("skipping type,code=%d,%d id,seq=%d,%d cksum=%d\n", rep_icmp_header->icmp_type,rep_icmp_header->icmp_code, rep_icmp_header->icmp_id,rep_icmp_header->icmp_seq, rep_icmp_header->icmp_cksum); TRACE("expected type,code=8,0 id,seq=%d,%d cksum=%d\n", id,seq, cksum); ier->Status=IP_REQ_TIMED_OUT; } } } } if (ier->Status==IP_REQ_TIMED_OUT) { /* This packet was not for us. * Decrease the timeout so that we don't enter an endless loop even * if we get flooded with ICMP packets that are not for us. */ timeout.tv_sec=Timeout/1000-(recv_time.tv_sec-send_time.tv_sec); timeout.tv_usec=(Timeout % 1000)*1000+send_time.tv_usec-(recv_time.tv_usec-send_time.tv_usec); if (timeout.tv_usec<0) { timeout.tv_usec+=1000000; timeout.tv_sec--; } continue; } else { /* This is a reply to our packet */ memcpy(&ier->Address,&ip_header->ip_src,sizeof(IPAddr)); /* Status is already set */ ier->RoundTripTime=(recv_time.tv_sec-send_time.tv_sec)*1000+(recv_time.tv_usec-send_time.tv_usec)/1000; ier->DataSize=res-ip_header_len-ICMP_MINLEN; ier->Reserved=0; ier->Data=endbuf-ier->DataSize; memmove(ier->Data,((char*)ip_header)+ip_header_len+ICMP_MINLEN,ier->DataSize); ier->Options.Ttl=ip_header->ip_ttl; ier->Options.Tos=ip_header->ip_tos; ier->Options.Flags=ip_header->ip_off >> 13; ier->Options.OptionsSize=ip_header_len-sizeof(struct ip); if (ier->Options.OptionsSize!=0) { ier->Options.OptionsData=(unsigned char *) ier->Data-ier->Options.OptionsSize; /* FIXME: We are supposed to rearrange the option's 'source route' data */ memmove(ier->Options.OptionsData,((char*)ip_header)+ip_header_len,ier->Options.OptionsSize); endbuf=ier->Options.OptionsData; } else { ier->Options.OptionsData=NULL; endbuf=ier->Data; } /* Prepare for the next packet */ ier++; ip_header=(struct ip*)(((char*)ip_header)+sizeof(ICMP_ECHO_REPLY)); maxlen=endbuf-(char*)ip_header; /* Check out whether there is more but don't wait this time */ timeout.tv_sec=0; timeout.tv_usec=0; } FD_ZERO(&fdr); FD_SET(icp->sid,&fdr); } res=ier-(ICMP_ECHO_REPLY*)ReplyBuffer; if (res==0) SetLastError(IP_REQ_TIMED_OUT); TRACE("received %d replies\n",res); return res; } /* * Copyright (c) 1989 The Regents of the University of California. * All rights reserved. * * This code is derived from software contributed to Berkeley by * Mike Muuss. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by the University of * California, Berkeley and its contributors. * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * */ wine-20000526/dlls/icmp/ip.h0100644000175000001440000001371507013366756015135 0ustar julliardusers/* * Copyright (c) 1982, 1986, 1993 * The Regents of the University of California. All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by the University of * California, Berkeley and its contributors. * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * * @(#)ip.h 8.2 (Berkeley) 6/1/94 * $FreeBSD: src/sys/netinet/ip.h,v 1.16 1999/08/28 00:49:19 peter Exp $ */ #ifndef _NETINET_IP_H_ #define _NETINET_IP_H_ /* * Definitions for internet protocol version 4. * Per RFC 791, September 1981. */ #define IPVERSION 4 /* * Structure of an internet header, naked of options. */ struct ip { #ifdef _IP_VHL u_char ip_vhl; /* version << 4 | header length >> 2 */ #else #if BYTE_ORDER == LITTLE_ENDIAN u_int ip_hl:4, /* header length */ ip_v:4; /* version */ #endif #if BYTE_ORDER == BIG_ENDIAN u_int ip_v:4, /* version */ ip_hl:4; /* header length */ #endif #endif /* not _IP_VHL */ u_char ip_tos; /* type of service */ u_short ip_len; /* total length */ u_short ip_id; /* identification */ u_short ip_off; /* fragment offset field */ #define IP_RF 0x8000 /* reserved fragment flag */ #define IP_DF 0x4000 /* dont fragment flag */ #define IP_MF 0x2000 /* more fragments flag */ #define IP_OFFMASK 0x1fff /* mask for fragmenting bits */ u_char ip_ttl; /* time to live */ u_char ip_p; /* protocol */ u_short ip_sum; /* checksum */ struct in_addr ip_src,ip_dst; /* source and dest address */ }; #ifdef _IP_VHL #define IP_MAKE_VHL(v, hl) ((v) << 4 | (hl)) #define IP_VHL_HL(vhl) ((vhl) & 0x0f) #define IP_VHL_V(vhl) ((vhl) >> 4) #define IP_VHL_BORING 0x45 #endif #define IP_MAXPACKET 65535 /* maximum packet size */ /* * Definitions for IP type of service (ip_tos) */ #define IPTOS_LOWDELAY 0x10 #define IPTOS_THROUGHPUT 0x08 #define IPTOS_RELIABILITY 0x04 #define IPTOS_MINCOST 0x02 /* * Definitions for IP precedence (also in ip_tos) (hopefully unused) */ #define IPTOS_PREC_NETCONTROL 0xe0 #define IPTOS_PREC_INTERNETCONTROL 0xc0 #define IPTOS_PREC_CRITIC_ECP 0xa0 #define IPTOS_PREC_FLASHOVERRIDE 0x80 #define IPTOS_PREC_FLASH 0x60 #define IPTOS_PREC_IMMEDIATE 0x40 #define IPTOS_PREC_PRIORITY 0x20 #define IPTOS_PREC_ROUTINE 0x00 /* * Definitions for options. */ #define IPOPT_COPIED(o) ((o)&0x80) #define IPOPT_CLASS(o) ((o)&0x60) #define IPOPT_NUMBER(o) ((o)&0x1f) #define IPOPT_CONTROL 0x00 #define IPOPT_RESERVED1 0x20 #define IPOPT_DEBMEAS 0x40 #define IPOPT_RESERVED2 0x60 #define IPOPT_EOL 0 /* end of option list */ #define IPOPT_NOP 1 /* no operation */ #define IPOPT_RR 7 /* record packet route */ #define IPOPT_TS 68 /* timestamp */ #define IPOPT_SECURITY 130 /* provide s,c,h,tcc */ #define IPOPT_LSRR 131 /* loose source route */ #define IPOPT_SATID 136 /* satnet id */ #define IPOPT_SSRR 137 /* strict source route */ #define IPOPT_RA 148 /* router alert */ /* * Offsets to fields in options other than EOL and NOP. */ #define IPOPT_OPTVAL 0 /* option ID */ #define IPOPT_OLEN 1 /* option length */ #define IPOPT_OFFSET 2 /* offset within option */ #define IPOPT_MINOFF 4 /* min value of above */ /* * Time stamp option structure. */ struct ip_timestamp { u_char ipt_code; /* IPOPT_TS */ u_char ipt_len; /* size of structure (variable) */ u_char ipt_ptr; /* index of current entry */ #if BYTE_ORDER == LITTLE_ENDIAN u_int ipt_flg:4, /* flags, see below */ ipt_oflw:4; /* overflow counter */ #endif #if BYTE_ORDER == BIG_ENDIAN u_int ipt_oflw:4, /* overflow counter */ ipt_flg:4; /* flags, see below */ #endif union ipt_timestamp { n_long ipt_time[1]; struct ipt_ta { struct in_addr ipt_addr; n_long ipt_time; } ipt_ta[1]; } ipt_timestamp; }; /* flag bits for ipt_flg */ #define IPOPT_TS_TSONLY 0 /* timestamps only */ #define IPOPT_TS_TSANDADDR 1 /* timestamps and addresses */ #define IPOPT_TS_PRESPEC 3 /* specified modules only */ /* bits for security (not byte swapped) */ #define IPOPT_SECUR_UNCLASS 0x0000 #define IPOPT_SECUR_CONFID 0xf135 #define IPOPT_SECUR_EFTO 0x789a #define IPOPT_SECUR_MMMM 0xbc4d #define IPOPT_SECUR_RESTR 0xaf13 #define IPOPT_SECUR_SECRET 0xd788 #define IPOPT_SECUR_TOPSECRET 0x6bc5 /* * Internet implementation parameters. */ #define MAXTTL 255 /* maximum time to live (seconds) */ #define IPDEFTTL 64 /* default ttl, from RFC 1340 */ #define IPFRAGTTL 60 /* time to live for frags, slowhz */ #define IPTTLDEC 1 /* subtracted when forwarding */ #define IP_MSS 576 /* default maximum segment size */ #endif wine-20000526/dlls/icmp/ip_icmp.h0100644000175000001440000001613507013366756016144 0ustar julliardusers/* * Copyright (c) 1982, 1986, 1993 * The Regents of the University of California. All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by the University of * California, Berkeley and its contributors. * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * * @(#)ip_icmp.h 8.1 (Berkeley) 6/10/93 * $FreeBSD: src/sys/netinet/ip_icmp.h,v 1.13 1999/08/28 00:49:24 peter Exp $ */ #ifndef _NETINET_IP_ICMP_H_ #define _NETINET_IP_ICMP_H_ /* * Interface Control Message Protocol Definitions. * Per RFC 792, September 1981. */ /* * Internal of an ICMP Router Advertisement */ struct icmp_ra_addr { u_int32_t ira_addr; u_int32_t ira_preference; }; /* * Structure of an icmp header. */ struct icmp { u_char icmp_type; /* type of message, see below */ u_char icmp_code; /* type sub code */ u_short icmp_cksum; /* ones complement cksum of struct */ union { u_char ih_pptr; /* ICMP_PARAMPROB */ struct in_addr ih_gwaddr; /* ICMP_REDIRECT */ struct ih_idseq { n_short icd_id; n_short icd_seq; } ih_idseq; int ih_void; /* ICMP_UNREACH_NEEDFRAG -- Path MTU Discovery (RFC1191) */ struct ih_pmtu { n_short ipm_void; n_short ipm_nextmtu; } ih_pmtu; struct ih_rtradv { u_char irt_num_addrs; u_char irt_wpa; u_int16_t irt_lifetime; } ih_rtradv; } icmp_hun; #define icmp_pptr icmp_hun.ih_pptr #define icmp_gwaddr icmp_hun.ih_gwaddr #define icmp_id icmp_hun.ih_idseq.icd_id #define icmp_seq icmp_hun.ih_idseq.icd_seq #define icmp_void icmp_hun.ih_void #define icmp_pmvoid icmp_hun.ih_pmtu.ipm_void #define icmp_nextmtu icmp_hun.ih_pmtu.ipm_nextmtu #define icmp_num_addrs icmp_hun.ih_rtradv.irt_num_addrs #define icmp_wpa icmp_hun.ih_rtradv.irt_wpa #define icmp_lifetime icmp_hun.ih_rtradv.irt_lifetime union { struct id_ts { n_time its_otime; n_time its_rtime; n_time its_ttime; } id_ts; struct id_ip { struct ip idi_ip; /* options and then 64 bits of data */ } id_ip; struct icmp_ra_addr id_radv; u_int32_t id_mask; char id_data[1]; } icmp_dun; #define icmp_otime icmp_dun.id_ts.its_otime #define icmp_rtime icmp_dun.id_ts.its_rtime #define icmp_ttime icmp_dun.id_ts.its_ttime #define icmp_ip icmp_dun.id_ip.idi_ip #define icmp_radv icmp_dun.id_radv #define icmp_mask icmp_dun.id_mask #define icmp_data icmp_dun.id_data }; /* * Lower bounds on packet lengths for various types. * For the error advice packets must first insure that the * packet is large enough to contain the returned ip header. * Only then can we do the check to see if 64 bits of packet * data have been returned, since we need to check the returned * ip header length. */ #define ICMP_MINLEN 8 /* abs minimum */ #define ICMP_TSLEN (8 + 3 * sizeof (n_time)) /* timestamp */ #define ICMP_MASKLEN 12 /* address mask */ #define ICMP_ADVLENMIN (8 + sizeof (struct ip) + 8) /* min */ #ifndef _IP_VHL #define ICMP_ADVLEN(p) (8 + ((p)->icmp_ip.ip_hl << 2) + 8) /* N.B.: must separately check that ip_hl >= 5 */ #else #define ICMP_ADVLEN(p) (8 + (IP_VHL_HL((p)->icmp_ip.ip_vhl) << 2) + 8) /* N.B.: must separately check that header length >= 5 */ #endif /* * Definition of type and code field values. */ #define ICMP_ECHOREPLY 0 /* echo reply */ #define ICMP_UNREACH 3 /* dest unreachable, codes: */ #define ICMP_UNREACH_NET 0 /* bad net */ #define ICMP_UNREACH_HOST 1 /* bad host */ #define ICMP_UNREACH_PROTOCOL 2 /* bad protocol */ #define ICMP_UNREACH_PORT 3 /* bad port */ #define ICMP_UNREACH_NEEDFRAG 4 /* IP_DF caused drop */ #define ICMP_UNREACH_SRCFAIL 5 /* src route failed */ #define ICMP_UNREACH_NET_UNKNOWN 6 /* unknown net */ #define ICMP_UNREACH_HOST_UNKNOWN 7 /* unknown host */ #define ICMP_UNREACH_ISOLATED 8 /* src host isolated */ #define ICMP_UNREACH_NET_PROHIB 9 /* prohibited access */ #define ICMP_UNREACH_HOST_PROHIB 10 /* ditto */ #define ICMP_UNREACH_TOSNET 11 /* bad tos for net */ #define ICMP_UNREACH_TOSHOST 12 /* bad tos for host */ #define ICMP_UNREACH_FILTER_PROHIB 13 /* admin prohib */ #define ICMP_UNREACH_HOST_PRECEDENCE 14 /* host prec vio. */ #define ICMP_UNREACH_PRECEDENCE_CUTOFF 15 /* prec cutoff */ #define ICMP_SOURCEQUENCH 4 /* packet lost, slow down */ #define ICMP_REDIRECT 5 /* shorter route, codes: */ #define ICMP_REDIRECT_NET 0 /* for network */ #define ICMP_REDIRECT_HOST 1 /* for host */ #define ICMP_REDIRECT_TOSNET 2 /* for tos and net */ #define ICMP_REDIRECT_TOSHOST 3 /* for tos and host */ #define ICMP_ECHO 8 /* echo service */ #define ICMP_ROUTERADVERT 9 /* router advertisement */ #define ICMP_ROUTERSOLICIT 10 /* router solicitation */ #define ICMP_TIMXCEED 11 /* time exceeded, code: */ #define ICMP_TIMXCEED_INTRANS 0 /* ttl==0 in transit */ #define ICMP_TIMXCEED_REASS 1 /* ttl==0 in reass */ #define ICMP_PARAMPROB 12 /* ip header bad */ #define ICMP_PARAMPROB_OPTABSENT 1 /* req. opt. absent */ #define ICMP_TSTAMP 13 /* timestamp request */ #define ICMP_TSTAMPREPLY 14 /* timestamp reply */ #define ICMP_IREQ 15 /* information request */ #define ICMP_IREQREPLY 16 /* information reply */ #define ICMP_MASKREQ 17 /* address mask request */ #define ICMP_MASKREPLY 18 /* address mask reply */ #define ICMP_MAXTYPE 18 #define ICMP_INFOTYPE(type) \ ((type) == ICMP_ECHOREPLY || (type) == ICMP_ECHO || \ (type) == ICMP_ROUTERADVERT || (type) == ICMP_ROUTERSOLICIT || \ (type) == ICMP_TSTAMP || (type) == ICMP_TSTAMPREPLY || \ (type) == ICMP_IREQ || (type) == ICMP_IREQREPLY || \ (type) == ICMP_MASKREQ || (type) == ICMP_MASKREPLY) #ifdef KERNEL void icmp_error __P((struct mbuf *, int, int, n_long, struct ifnet *)); void icmp_input __P((struct mbuf *, int)); #endif #endif wine-20000526/dlls/imagehlp/0040755000175000001440000000000007113604175015175 5ustar julliarduserswine-20000526/dlls/imagehlp/.cvsignore0100644000175000001440000000004507045213572017172 0ustar julliardusers*.spec.c Makefile libimagehlp.so.1.0 wine-20000526/dlls/imagehlp/Makefile.in0100644000175000001440000000044407060307300017230 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = imagehlp SOVERSION = 1.0 SPEC_SRCS = imagehlp.spec C_SRCS = \ access.c \ debug.c \ imagehlp_main.c \ integrity.c \ internal.c \ modify.c \ symbol.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/imagehlp/access.c0100644000175000001440000002061407106625254016605 0ustar julliardusers/* * IMAGEHLP library * * Copyright 1998 Patrik Stridvall */ #include "winbase.h" #include "winnt.h" #include "winerror.h" #include "windef.h" #include "heap.h" #include "debugtools.h" #include "imagehlp.h" DEFAULT_DEBUG_CHANNEL(imagehlp); /*********************************************************************** * Data */ static PLOADED_IMAGE IMAGEHLP_pFirstLoadedImage=NULL; static PLOADED_IMAGE IMAGEHLP_pLastLoadedImage=NULL; static LOADED_IMAGE IMAGEHLP_EmptyLoadedImage = { NULL, /* ModuleName */ 0xffffffff, /* hFile */ NULL, /* MappedAddress */ NULL, /* FileHeader */ NULL, /* LastRvaSection */ 0, /* NumberOfSections */ NULL, /* Sections */ 1, /* Characteristics */ FALSE, /* fSystemImage */ FALSE, /* fDOSImage */ { &IMAGEHLP_EmptyLoadedImage.Links, &IMAGEHLP_EmptyLoadedImage.Links }, /* Links */ 148, /* SizeOfImage; */ }; /*********************************************************************** * EnumerateLoadedModules (IMAGEHLP.@) */ BOOL WINAPI EnumerateLoadedModules( HANDLE hProcess, PENUMLOADED_MODULES_CALLBACK EnumLoadedModulesCallback, PVOID UserContext) { FIXME("(0x%08x, %p, %p): stub\n", hProcess, EnumLoadedModulesCallback, UserContext ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * GetTimestampForLoadedLibrary (IMAGEHLP.@) */ DWORD WINAPI GetTimestampForLoadedLibrary(HMODULE Module) { FIXME("(0x%08x): stub\n", Module); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * GetImageConfigInformation (IMAGEHLP.@) */ BOOL WINAPI GetImageConfigInformation( PLOADED_IMAGE LoadedImage, PIMAGE_LOAD_CONFIG_DIRECTORY ImageConfigInformation) { FIXME("(%p, %p): stub\n", LoadedImage, ImageConfigInformation ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * GetImageUnusedHeaderBytes (IMAGEHLP.@) */ DWORD WINAPI GetImageUnusedHeaderBytes( PLOADED_IMAGE LoadedImage, LPDWORD SizeUnusedHeaderBytes) { FIXME("(%p, %p): stub\n", LoadedImage, SizeUnusedHeaderBytes ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImageDirectoryEntryToData (IMAGEHLP.@) */ PVOID WINAPI ImageDirectoryEntryToData( PVOID Base, BOOLEAN MappedAsImage, USHORT DirectoryEntry, PULONG Size) { FIXME("(%p, %d, %hd, %p): stub\n", Base, MappedAsImage, DirectoryEntry, Size ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return NULL; } /*********************************************************************** * ImageLoad (IMAGEHLP.@) */ PLOADED_IMAGE WINAPI ImageLoad(LPSTR DllName, LPSTR DllPath) { PLOADED_IMAGE pLoadedImage = HeapAlloc(IMAGEHLP_hHeap, 0, sizeof(LOADED_IMAGE)); return pLoadedImage; } /*********************************************************************** * ImageNtHeader (IMAGEHLP.@) */ PIMAGE_NT_HEADERS WINAPI ImageNtHeader(PVOID Base) { return (PIMAGE_NT_HEADERS) ((LPBYTE) Base + ((PIMAGE_DOS_HEADER) Base)->e_lfanew); } /*********************************************************************** * ImageRvaToSection (IMAGEHLP.@) */ PIMAGE_SECTION_HEADER WINAPI ImageRvaToSection( PIMAGE_NT_HEADERS NtHeaders, PVOID Base, ULONG Rva) { FIXME("(%p, %p, %ld): stub\n", NtHeaders, Base, Rva); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return NULL; } /*********************************************************************** * ImageRvaToVa (IMAGEHLP.@) */ PVOID WINAPI ImageRvaToVa( PIMAGE_NT_HEADERS NtHeaders, PVOID Base, ULONG Rva, PIMAGE_SECTION_HEADER *LastRvaSection) { FIXME("(%p, %p, %ld, %p): stub\n", NtHeaders, Base, Rva, LastRvaSection ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return NULL; } /*********************************************************************** * ImageUnload (IMAGEHLP.@) */ BOOL WINAPI ImageUnload(PLOADED_IMAGE pLoadedImage) { LIST_ENTRY *pCurrent, *pFind; if(!IMAGEHLP_pFirstLoadedImage || !pLoadedImage) { /* No image loaded or null pointer */ SetLastError(ERROR_INVALID_PARAMETER); return FALSE; } pFind=&pLoadedImage->Links; pCurrent=&IMAGEHLP_pFirstLoadedImage->Links; while((pCurrent != pFind) && (pCurrent != NULL)) pCurrent = pCurrent->Flink; if(!pCurrent) { /* Not found */ SetLastError(ERROR_INVALID_PARAMETER); return FALSE; } if(pCurrent->Blink) pCurrent->Blink->Flink = pCurrent->Flink; else IMAGEHLP_pFirstLoadedImage = pCurrent->Flink?CONTAINING_RECORD( pCurrent->Flink, LOADED_IMAGE, Links):NULL; if(pCurrent->Flink) pCurrent->Flink->Blink = pCurrent->Blink; else IMAGEHLP_pLastLoadedImage = pCurrent->Blink?CONTAINING_RECORD( pCurrent->Blink, LOADED_IMAGE, Links):NULL; return FALSE; } /*********************************************************************** * MapAndLoad (IMAGEHLP.@) */ BOOL WINAPI MapAndLoad( LPSTR pszImageName, LPSTR pszDllPath, PLOADED_IMAGE pLoadedImage, BOOL bDotDll, BOOL bReadOnly) { CHAR szFileName[MAX_PATH]; HANDLE hFile = (HANDLE) NULL; HANDLE hFileMapping = (HANDLE) NULL; HMODULE hModule = (HMODULE) NULL; PIMAGE_NT_HEADERS pNtHeader = NULL; /* PathCombine(&szFileName, pszDllPath, pszImageName); */ /* PathRenameExtension(&szFileName, bDotDll?:"dll":"exe"); */ /* FIXME: Check if the file already loaded (use IMAGEHLP_pFirstLoadedImage) */ if(!(hFile = CreateFileA( szFileName, GENERIC_READ, 1, /* FIXME: FILE_SHARE_READ not defined */ NULL, OPEN_EXISTING, 0, (HANDLE) NULL))) { SetLastError(ERROR_FILE_NOT_FOUND); goto Error; } if(!(hFileMapping = CreateFileMappingA( hFile, NULL, PAGE_READONLY | SEC_COMMIT, 0, 0, NULL))) { DWORD dwLastError = GetLastError(); WARN("CreateFileMapping: Error = %ld\n", dwLastError); SetLastError(dwLastError); goto Error; } CloseHandle(hFile); hFile = (HANDLE) NULL; if(!(hModule = (HMODULE) MapViewOfFile( hFileMapping, FILE_MAP_READ, 0, 0, 0))) { DWORD dwLastError = GetLastError(); WARN("MapViewOfFile: Error = %ld\n", dwLastError); SetLastError(dwLastError); goto Error; } CloseHandle(hFileMapping); hFileMapping=(HANDLE) NULL; pLoadedImage = (PLOADED_IMAGE) HeapAlloc( IMAGEHLP_hHeap, 0, sizeof(LOADED_IMAGE) ); pNtHeader = ImageNtHeader((PVOID) hModule); pLoadedImage->ModuleName = HEAP_strdupA(IMAGEHLP_hHeap, 0, pszDllPath); /* FIXME: Correct? */ pLoadedImage->hFile = hFile; pLoadedImage->MappedAddress = (PUCHAR) hModule; pLoadedImage->FileHeader = pNtHeader; pLoadedImage->Sections = (PIMAGE_SECTION_HEADER) ((LPBYTE) &pNtHeader->OptionalHeader + pNtHeader->FileHeader.SizeOfOptionalHeader); pLoadedImage->NumberOfSections = pNtHeader->FileHeader.NumberOfSections; pLoadedImage->SizeOfImage = pNtHeader->OptionalHeader.SizeOfImage; pLoadedImage->Characteristics = pNtHeader->FileHeader.Characteristics; pLoadedImage->LastRvaSection = pLoadedImage->Sections; pLoadedImage->fSystemImage = FALSE; /* FIXME */ pLoadedImage->fDOSImage = FALSE; /* FIXME */ /* FIXME: Make thread safe */ pLoadedImage->Links.Flink = NULL; pLoadedImage->Links.Blink = &IMAGEHLP_pLastLoadedImage->Links; if(IMAGEHLP_pLastLoadedImage) IMAGEHLP_pLastLoadedImage->Links.Flink = &pLoadedImage->Links; IMAGEHLP_pLastLoadedImage = pLoadedImage; if(!IMAGEHLP_pFirstLoadedImage) IMAGEHLP_pFirstLoadedImage = pLoadedImage; return TRUE; Error: if(hModule) UnmapViewOfFile((PVOID) hModule); if(hFileMapping) CloseHandle(hFileMapping); if(hFile) CloseHandle(hFile); return FALSE; } /*********************************************************************** * SetImageConfigInformation (IMAGEHLP.@) */ BOOL WINAPI SetImageConfigInformation( PLOADED_IMAGE LoadedImage, PIMAGE_LOAD_CONFIG_DIRECTORY ImageConfigInformation) { FIXME("(%p, %p): stub\n", LoadedImage, ImageConfigInformation ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * UnMapAndLoad (IMAGEHLP.@) */ BOOL WINAPI UnMapAndLoad(PLOADED_IMAGE LoadedImage) { FIXME("(%p): stub\n", LoadedImage); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } wine-20000526/dlls/imagehlp/debug.c0100644000175000001440000000545607070212244016430 0ustar julliardusers/* * IMAGEHLP library * * Copyright 1998 Patrik Stridvall */ #include "winerror.h" #include "winbase.h" #include "windef.h" #include "debugtools.h" #include "imagehlp.h" DEFAULT_DEBUG_CHANNEL(imagehlp); /*********************************************************************** * FindDebugInfoFile (IMAGEHLP.@) */ HANDLE WINAPI FindDebugInfoFile( LPSTR FileName, LPSTR SymbolPath, LPSTR DebugFilePath) { FIXME("(%s, %s, %s): stub\n", debugstr_a(FileName), debugstr_a(SymbolPath), debugstr_a(DebugFilePath) ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return (HANDLE) NULL; } /*********************************************************************** * FindExecutableImage (IMAGEHLP.@) */ HANDLE WINAPI FindExecutableImage( LPSTR FileName, LPSTR SymbolPath, LPSTR ImageFilePath) { FIXME("(%s, %s, %s): stub\n", debugstr_a(FileName), debugstr_a(SymbolPath), debugstr_a(ImageFilePath) ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return (HANDLE) NULL; } /*********************************************************************** * MapDebugInformation (IMAGEHLP.@) */ PIMAGE_DEBUG_INFORMATION WINAPI MapDebugInformation( HANDLE FileHandle, LPSTR FileName, LPSTR SymbolPath, DWORD ImageBase) { FIXME("(0x%08x, %s, %s, 0x%08lx): stub\n", FileHandle, FileName, SymbolPath, ImageBase ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return NULL; } /*********************************************************************** * StackWalk (IMAGEHLP.@) */ BOOL WINAPI StackWalk( DWORD MachineType, HANDLE hProcess, HANDLE hThread, PSTACKFRAME StackFrame, PVOID ContextRecord, PREAD_PROCESS_MEMORY_ROUTINE ReadMemoryRoutine, PFUNCTION_TABLE_ACCESS_ROUTINE FunctionTableAccessRoutine, PGET_MODULE_BASE_ROUTINE GetModuleBaseRoutine, PTRANSLATE_ADDRESS_ROUTINE TranslateAddress) { FIXME( "(%ld, 0x%08x, 0x%08x, %p, %p, %p, %p, %p, %p): stub\n", MachineType, hProcess, hThread, StackFrame, ContextRecord, ReadMemoryRoutine, FunctionTableAccessRoutine, GetModuleBaseRoutine, TranslateAddress ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * UnDecorateSymbolName (IMAGEHLP.@) */ DWORD WINAPI UnDecorateSymbolName( LPCSTR DecoratedName, LPSTR UnDecoratedName, DWORD UndecoratedLength, DWORD Flags) { FIXME("(%s, %s, %ld, 0x%08lx): stub\n", debugstr_a(DecoratedName), debugstr_a(UnDecoratedName), UndecoratedLength, Flags ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * UnmapDebugInformation (IMAGEHLP.@) */ BOOL WINAPI UnmapDebugInformation( PIMAGE_DEBUG_INFORMATION DebugInfo) { FIXME("(%p): stub\n", DebugInfo); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } wine-20000526/dlls/imagehlp/imagehlp.spec0100644000175000001440000000720707035734133017643 0ustar julliardusersname imagehlp type win32 init IMAGEHLP_LibMain @ stdcall BindImage(str str str) BindImage @ stdcall BindImageEx(long str str str ptr) BindImageEx @ stdcall CheckSumMappedFile(ptr long ptr ptr) CheckSumMappedFile @ stdcall EnumerateLoadedModules(long ptr ptr) EnumerateLoadedModules @ stdcall FindDebugInfoFile(str str str) FindDebugInfoFile @ stdcall FindExecutableImage(str str str) FindExecutableImage @ stdcall GetImageConfigInformation(ptr ptr) GetImageConfigInformation @ stdcall GetImageUnusedHeaderBytes(ptr ptr) GetImageUnusedHeaderBytes @ stdcall GetTimestampForLoadedLibrary(long) GetTimestampForLoadedLibrary @ stdcall ImageAddCertificate(long ptr ptr) ImageAddCertificate @ stdcall ImageDirectoryEntryToData(ptr long long ptr) ImageDirectoryEntryToData @ stdcall ImageEnumerateCertificates(long long ptr ptr long) ImageEnumerateCertificates @ stdcall ImageGetCertificateData(long long ptr ptr) ImageGetCertificateData @ stdcall ImageGetCertificateHeader(long long ptr) ImageGetCertificateHeader @ stdcall ImageGetDigestStream(long long ptr long) ImageGetDigestStream @ stdcall ImageLoad(str str) ImageLoad @ stdcall ImageNtHeader(ptr) ImageNtHeader @ stdcall ImageRemoveCertificate(long long) ImageRemoveCertificate @ stdcall ImageRvaToSection(ptr ptr long) ImageRvaToSection @ stdcall ImageRvaToVa(ptr ptr long ptr) ImageRvaToVa @ stdcall ImageUnload(ptr) ImageUnload @ stdcall ImagehlpApiVersion() ImagehlpApiVersion @ stdcall ImagehlpApiVersionEx(ptr) ImagehlpApiVersionEx @ stdcall MakeSureDirectoryPathExists(str) MakeSureDirectoryPathExists @ stdcall MapAndLoad(str str ptr long long) MapAndLoad @ stdcall MapDebugInformation(long str str long) MapDebugInformation @ stdcall MapFileAndCheckSumA(str ptr ptr) MapFileAndCheckSumA @ stdcall MapFileAndCheckSumW(wstr ptr ptr) MapFileAndCheckSumW @ stub MarkImageAsRunFromSwap @ stdcall ReBaseImage(str str long long long long ptr ptr ptr ptr long) ReBaseImage @ stdcall RemovePrivateCvSymbolic(ptr ptr ptr) RemovePrivateCvSymbolic @ stdcall RemoveRelocations(ptr) RemoveRelocations @ stdcall SearchTreeForFile(str str str) SearchTreeForFile @ stdcall SetImageConfigInformation(ptr ptr) SetImageConfigInformation @ stdcall SplitSymbols(str str str long) SplitSymbols @ stdcall StackWalk(long long long ptr ptr ptr ptr ptr ptr) StackWalk @ stdcall SymCleanup(long) SymCleanup @ stdcall SymEnumerateModules(long ptr ptr) SymEnumerateModules @ stdcall SymEnumerateSymbols(long long ptr ptr) SymEnumerateSymbols @ stdcall SymFunctionTableAccess(long long) SymFunctionTableAccess @ stdcall SymGetModuleBase(long long) SymGetModuleBase @ stdcall SymGetModuleInfo(long long ptr) SymGetModuleInfo @ stdcall SymGetOptions() SymGetOptions @ stdcall SymGetSearchPath(long str long) SymGetSearchPath @ stdcall SymGetSymFromAddr(long long ptr ptr) SymGetSymFromAddr @ stdcall SymGetSymFromName(long str ptr) SymGetSymFromName @ stdcall SymGetSymNext(long ptr) SymGetSymNext @ stdcall SymGetSymPrev(long ptr) SymGetSymPrev @ stdcall SymInitialize(long str long) SymInitialize @ stdcall SymLoadModule(long long str str long long) SymLoadModule @ stdcall SymRegisterCallback(long ptr ptr) SymRegisterCallback @ stdcall SymSetOptions(long) SymSetOptions @ stdcall SymSetSearchPath(long str) SymSetSearchPath @ stdcall SymUnDName(ptr str long) SymUnDName @ stdcall SymUnloadModule(long long) SymUnloadModule @ stdcall TouchFileTimes(long ptr) TouchFileTimes @ stdcall UnDecorateSymbolName(str str long long) UnDecorateSymbolName @ stdcall UnMapAndLoad(ptr) UnMapAndLoad @ stdcall UnmapDebugInformation(ptr) UnmapDebugInformation @ stdcall UpdateDebugInfoFile(str str str ptr) UpdateDebugInfoFile @ stdcall UpdateDebugInfoFileEx(str str str ptr long) UpdateDebugInfoFileEx wine-20000526/dlls/imagehlp/imagehlp_main.c0100644000175000001440000000543707070212244020133 0ustar julliardusers/* * IMAGEHLP library * * Copyright 1998 Patrik Stridvall */ #include "imagehlp.h" #include "winerror.h" #include "winbase.h" #include "windef.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(imagehlp); /**********************************************************************/ HANDLE IMAGEHLP_hHeap = (HANDLE) NULL; static API_VERSION IMAGEHLP_ApiVersion = { 4, 0, 0, 5 }; /*********************************************************************** * IMAGEHLP_LibMain (IMAGEHLP.init) */ BOOL WINAPI IMAGEHLP_LibMain( HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved) { switch(fdwReason) { case DLL_PROCESS_ATTACH: IMAGEHLP_hHeap = HeapCreate(0, 0x10000, 0); break; case DLL_PROCESS_DETACH: HeapDestroy(IMAGEHLP_hHeap); IMAGEHLP_hHeap = (HANDLE) NULL; break; case DLL_THREAD_ATTACH: break; case DLL_THREAD_DETACH: break; default: break; } return TRUE; } /*********************************************************************** * ImagehlpApiVersion (IMAGEHLP.@) */ PAPI_VERSION WINAPI ImagehlpApiVersion() { return &IMAGEHLP_ApiVersion; } /*********************************************************************** * ImagehlpApiVersionEx (IMAGEHLP.@) */ PAPI_VERSION WINAPI ImagehlpApiVersionEx(PAPI_VERSION AppVersion) { if(!AppVersion) return NULL; AppVersion->MajorVersion = IMAGEHLP_ApiVersion.MajorVersion; AppVersion->MinorVersion = IMAGEHLP_ApiVersion.MinorVersion; AppVersion->Revision = IMAGEHLP_ApiVersion.Revision; AppVersion->Reserved = IMAGEHLP_ApiVersion.Reserved; return AppVersion; } /*********************************************************************** * MakeSureDirectoryPathExists (IMAGEHLP.@) */ BOOL WINAPI MakeSureDirectoryPathExists(LPCSTR DirPath) { FIXME("(%s): stub\n", debugstr_a(DirPath)); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * MarkImageAsRunFromSwap (IMAGEHLP.@) * FIXME * No documentation available. */ /*********************************************************************** * SearchTreeForFile (IMAGEHLP.@) */ BOOL WINAPI SearchTreeForFile( LPSTR RootPath, LPSTR InputPathName, LPSTR OutputPathBuffer) { FIXME("(%s, %s, %s): stub\n", debugstr_a(RootPath), debugstr_a(InputPathName), debugstr_a(OutputPathBuffer) ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * TouchFileTimes (IMAGEHLP.@) */ BOOL WINAPI TouchFileTimes( HANDLE FileHandle, LPSYSTEMTIME lpSystemTime) { FIXME("(0x%08x, %p): stub\n", FileHandle, lpSystemTime ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } wine-20000526/dlls/imagehlp/integrity.c0100644000175000001440000000477407106625254017373 0ustar julliardusers/* * IMAGEHLP library * * Copyright 1998 Patrik Stridvall */ #include "windef.h" #include "winbase.h" #include "winerror.h" #include "imagehlp.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(imagehlp); /*********************************************************************** * ImageAddCertificate (IMAGEHLP.@) */ BOOL WINAPI ImageAddCertificate( HANDLE FileHandle, PWIN_CERTIFICATE Certificate, PDWORD Index) { FIXME("(0x%08x, %p, %p): stub\n", FileHandle, Certificate, Index ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImageEnumerateCertificates (IMAGEHLP.@) */ BOOL WINAPI ImageEnumerateCertificates( HANDLE FileHandle, WORD TypeFilter, PDWORD CertificateCount, PDWORD Indices, DWORD IndexCount) { FIXME("(0x%08x, %hd, %p, %p, %ld): stub\n", FileHandle, TypeFilter, CertificateCount, Indices, IndexCount ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImageGetCertificateData (IMAGEHLP.@) */ BOOL WINAPI ImageGetCertificateData( HANDLE FileHandle, DWORD CertificateIndex, PWIN_CERTIFICATE Certificate, PDWORD RequiredLength) { FIXME("(0x%08x, %ld, %p, %p): stub\n", FileHandle, CertificateIndex, Certificate, RequiredLength ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImageGetCertificateHeader (IMAGEHLP.@) */ BOOL WINAPI ImageGetCertificateHeader( HANDLE FileHandle, DWORD CertificateIndex, PWIN_CERTIFICATE Certificateheader) { FIXME("(0x%08x, %ld, %p): stub\n", FileHandle, CertificateIndex, Certificateheader ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImageGetDigestStream (IMAGEHLP.@) */ BOOL WINAPI ImageGetDigestStream( HANDLE FileHandle, DWORD DigestLevel, DIGEST_FUNCTION DigestFunction, DIGEST_HANDLE DigestHandle) { FIXME("(0x%08x, %ld, %p, %p): stub\n", FileHandle, DigestLevel, DigestFunction, DigestHandle ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImageRemoveCertificate (IMAGEHLP.@) */ BOOL WINAPI ImageRemoveCertificate(HANDLE FileHandle, DWORD Index) { FIXME("(0x%08x, %ld): stub\n", FileHandle, Index); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } wine-20000526/dlls/imagehlp/internal.c0100644000175000001440000000453307070212244017151 0ustar julliardusers/* * IMAGEHLP library * * Copyright 1998 Patrik Stridvall */ #include "winbase.h" #include "winerror.h" #include "windef.h" #include "debugtools.h" #include "imagehlp.h" /*********************************************************************** * InitializeListHead */ VOID InitializeListHead(PLIST_ENTRY pListHead) { pListHead->Flink = pListHead; pListHead->Blink = pListHead; } /*********************************************************************** * InsertHeadList */ VOID InsertHeadList(PLIST_ENTRY pListHead, PLIST_ENTRY pEntry) { pEntry->Blink = pListHead; pEntry->Flink = pListHead->Flink; pListHead->Flink = pEntry; } /*********************************************************************** * InsertTailList */ VOID InsertTailList(PLIST_ENTRY pListHead, PLIST_ENTRY pEntry) { pEntry->Flink = pListHead; pEntry->Blink = pListHead->Blink; pListHead->Blink = pEntry; } /*********************************************************************** * IsListEmpty */ BOOLEAN IsListEmpty(PLIST_ENTRY pListHead) { return !pListHead; } /*********************************************************************** * PopEntryList */ PSINGLE_LIST_ENTRY PopEntryList(PSINGLE_LIST_ENTRY pListHead) { pListHead->Next = NULL; return pListHead; } /*********************************************************************** * PushEntryList */ VOID PushEntryList( PSINGLE_LIST_ENTRY pListHead, PSINGLE_LIST_ENTRY pEntry) { pEntry->Next=pListHead; } /*********************************************************************** * RemoveEntryList */ VOID RemoveEntryList(PLIST_ENTRY pEntry) { pEntry->Flink->Blink = pEntry->Blink; pEntry->Blink->Flink = pEntry->Flink; pEntry->Flink = NULL; pEntry->Blink = NULL; } /*********************************************************************** * RemoveHeadList */ PLIST_ENTRY RemoveHeadList(PLIST_ENTRY pListHead) { PLIST_ENTRY p = pListHead->Flink; if(p != pListHead) { RemoveEntryList(pListHead); return p; } else { pListHead->Flink = NULL; pListHead->Blink = NULL; return NULL; } } /*********************************************************************** * RemoveTailList */ PLIST_ENTRY RemoveTailList(PLIST_ENTRY pListHead) { RemoveHeadList(pListHead->Blink); if(pListHead != pListHead->Blink) return pListHead; else return NULL; } wine-20000526/dlls/imagehlp/modify.c0100644000175000001440000001106307070212244016620 0ustar julliardusers/* * IMAGEHLP library * * Copyright 1998 Patrik Stridvall */ #include "winbase.h" #include "winerror.h" #include "windef.h" #include "debugtools.h" #include "imagehlp.h" DEFAULT_DEBUG_CHANNEL(imagehlp); /*********************************************************************** * BindImage (IMAGEHLP.@) */ BOOL WINAPI BindImage( LPSTR ImageName, LPSTR DllPath, LPSTR SymbolPath) { return BindImageEx(0, ImageName, DllPath, SymbolPath, NULL); } /*********************************************************************** * BindImageEx (IMAGEHLP.@) */ BOOL WINAPI BindImageEx( DWORD Flags, LPSTR ImageName, LPSTR DllPath, LPSTR SymbolPath, PIMAGEHLP_STATUS_ROUTINE StatusRoutine) { FIXME("(%ld, %s, %s, %s, %p): stub\n", Flags, debugstr_a(ImageName), debugstr_a(DllPath), debugstr_a(SymbolPath), StatusRoutine ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * CheckSumMappedFile (IMAGEHLP.@) */ PIMAGE_NT_HEADERS WINAPI CheckSumMappedFile( LPVOID BaseAddress, DWORD FileLength, LPDWORD HeaderSum, LPDWORD CheckSum) { FIXME("(%p, %ld, %p, %p): stub\n", BaseAddress, FileLength, HeaderSum, CheckSum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return NULL; } /*********************************************************************** * MapFileAndCheckSumA (IMAGEHLP.@) */ DWORD WINAPI MapFileAndCheckSumA( LPSTR Filename, LPDWORD HeaderSum, LPDWORD CheckSum) { FIXME("(%s, %p, %p): stub\n", debugstr_a(Filename), HeaderSum, CheckSum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return CHECKSUM_OPEN_FAILURE; } /*********************************************************************** * MapFileAndCheckSumW (IMAGEHLP.@) */ DWORD WINAPI MapFileAndCheckSumW( LPWSTR Filename, LPDWORD HeaderSum, LPDWORD CheckSum) { FIXME("(%s, %p, %p): stub\n", debugstr_w(Filename), HeaderSum, CheckSum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return CHECKSUM_OPEN_FAILURE; } /*********************************************************************** * ReBaseImage (IMAGEHLP.@) */ BOOL WINAPI ReBaseImage( LPSTR CurrentImageName, LPSTR SymbolPath, BOOL fReBase, BOOL fRebaseSysfileOk, BOOL fGoingDown, ULONG CheckImageSize, ULONG *OldImageSize, ULONG *OldImageBase, ULONG *NewImageSize, ULONG *NewImageBase, ULONG TimeStamp) { FIXME( "(%s, %s, %d, %d, %d, %ld, %p, %p, %p, %p, %ld): stub\n", debugstr_a(CurrentImageName),debugstr_a(SymbolPath), fReBase, fRebaseSysfileOk, fGoingDown, CheckImageSize, OldImageSize, OldImageBase, NewImageSize, NewImageBase, TimeStamp ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * RemovePrivateCvSymbolic (IMAGEHLP.@) */ BOOL WINAPI RemovePrivateCvSymbolic( PCHAR DebugData, PCHAR *NewDebugData, ULONG *NewDebugSize) { FIXME("(%p, %p, %p): stub\n", DebugData, NewDebugData, NewDebugSize ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * RemoveRelocations (IMAGEHLP.@) */ VOID WINAPI RemoveRelocations(PCHAR ImageName) { FIXME("(%p): stub\n", ImageName); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); } /*********************************************************************** * SplitSymbols (IMAGEHLP.@) */ BOOL WINAPI SplitSymbols( LPSTR ImageName, LPSTR SymbolsPath, LPSTR SymbolFilePath, DWORD Flags) { FIXME("(%s, %s, %s, %ld): stub\n", debugstr_a(ImageName), debugstr_a(SymbolsPath), debugstr_a(SymbolFilePath), Flags ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * UpdateDebugInfoFile (IMAGEHLP.@) */ BOOL WINAPI UpdateDebugInfoFile( LPSTR ImageFileName, LPSTR SymbolPath, LPSTR DebugFilePath, PIMAGE_NT_HEADERS NtHeaders) { FIXME("(%s, %s, %s, %p): stub\n", debugstr_a(ImageFileName), debugstr_a(SymbolPath), debugstr_a(DebugFilePath), NtHeaders ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * UpdateDebugInfoFileEx (IMAGEHLP.@) */ BOOL WINAPI UpdateDebugInfoFileEx( LPSTR ImageFileName, LPSTR SymbolPath, LPSTR DebugFilePath, PIMAGE_NT_HEADERS NtHeaders, DWORD OldChecksum) { FIXME("(%s, %s, %s, %p, %ld): stub\n", debugstr_a(ImageFileName), debugstr_a(SymbolPath), debugstr_a(DebugFilePath), NtHeaders, OldChecksum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } wine-20000526/dlls/imagehlp/symbol.c0100644000175000001440000001460607106625254016655 0ustar julliardusers/* * IMAGEHLP library * * Copyright 1998 Patrik Stridvall */ #include "winbase.h" #include "winerror.h" #include "windef.h" #include "debugtools.h" #include "imagehlp.h" DEFAULT_DEBUG_CHANNEL(imagehlp); /*********************************************************************** * SymCleanup (IMAGEHLP.@) */ BOOL WINAPI SymCleanup(HANDLE hProcess) { FIXME("(0x%08x): stub\n", hProcess); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * SymEnumerateModules (IMAGEHLP.@) */ BOOL WINAPI SymEnumerateModules( HANDLE hProcess, PSYM_ENUMMODULES_CALLBACK EnumModulesCallback, PVOID UserContext) { FIXME("(0x%08x, %p, %p): stub\n", hProcess, EnumModulesCallback, UserContext ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * SymEnumerateSymbols (IMAGEHLP.@) */ BOOL WINAPI SymEnumerateSymbols( HANDLE hProcess, DWORD BaseOfDll, PSYM_ENUMSYMBOLS_CALLBACK EnumSymbolsCallback, PVOID UserContext) { FIXME("(0x%08x, 0x%08lx, %p, %p): stub\n", hProcess, BaseOfDll, EnumSymbolsCallback, UserContext ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * SymFunctionTableAccess (IMAGEHLP.@) */ PVOID WINAPI SymFunctionTableAccess(HANDLE hProcess, DWORD AddrBase) { FIXME("(0x%08x, 0x%08lx): stub\n", hProcess, AddrBase); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * SymGetModuleBase (IMAGEHLP.@) */ DWORD WINAPI SymGetModuleBase(HANDLE hProcess, DWORD dwAddr) { FIXME("(0x%08x, 0x%08lx): stub\n", hProcess, dwAddr); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * SymGetModuleInfo (IMAGEHLP.@) */ BOOL WINAPI SymGetModuleInfo( HANDLE hProcess, DWORD dwAddr, PIMAGEHLP_MODULE ModuleInfo) { FIXME("(0x%08x, 0x%08lx, %p): stub\n", hProcess, dwAddr, ModuleInfo ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * SymGetOptions (IMAGEHLP.@) */ DWORD WINAPI SymGetOptions() { FIXME("(): stub\n"); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * SymGetSearchPath (IMAGEHLP.@) */ BOOL WINAPI SymGetSearchPath( HANDLE hProcess, LPSTR szSearchPath, DWORD SearchPathLength) { FIXME("(0x%08x, %s, %ld): stub\n", hProcess, debugstr_an(szSearchPath,SearchPathLength), SearchPathLength ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * SymGetSymFromAddr (IMAGEHLP.@) */ BOOL WINAPI SymGetSymFromAddr( HANDLE hProcess, DWORD dwAddr, PDWORD pdwDisplacement, PIMAGEHLP_SYMBOL Symbol) { FIXME("(0x%08x, 0x%08lx, %p, %p): stub\n", hProcess, dwAddr, pdwDisplacement, Symbol ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * SymGetSymFromName (IMAGEHLP.@) */ BOOL WINAPI SymGetSymFromName( HANDLE hProcess, LPSTR Name, PIMAGEHLP_SYMBOL Symbol) { FIXME("(0x%08x, %s, %p): stub\n", hProcess, Name, Symbol); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * SymGetSymNext (IMAGEHLP.@) */ BOOL WINAPI SymGetSymNext( HANDLE hProcess, PIMAGEHLP_SYMBOL Symbol) { FIXME("(0x%08x, %p): stub\n", hProcess, Symbol); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * SymGetSymPrev (IMAGEHLP.@) */ BOOL WINAPI SymGetSymPrev( HANDLE hProcess, PIMAGEHLP_SYMBOL Symbol) { FIXME("(0x%08x, %p): stub\n", hProcess, Symbol); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * SymInitialize (IMAGEHLP.@) */ BOOL WINAPI SymInitialize( HANDLE hProcess, LPSTR UserSearchPath, BOOL fInvadeProcess) { FIXME("(0x%08x, %s, %d): stub\n", hProcess, debugstr_a(UserSearchPath), fInvadeProcess ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * SymLoadModule (IMAGEHLP.@) */ BOOL WINAPI SymLoadModule( HANDLE hProcess, HANDLE hFile, LPSTR ImageName, LPSTR ModuleName, DWORD BaseOfDll, DWORD SizeOfDll) { FIXME("(0x%08x, 0x%08x, %s, %s, %ld, %ld): stub\n", hProcess, hFile, debugstr_a(ImageName), debugstr_a(ModuleName), BaseOfDll, SizeOfDll ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * SymRegisterCallback (IMAGEHLP.@) */ BOOL WINAPI SymRegisterCallback( HANDLE hProcess, PSYMBOL_REGISTERED_CALLBACK CallbackFunction, PVOID UserContext) { FIXME("(0x%08x, %p, %p): stub\n", hProcess, CallbackFunction, UserContext ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * SymSetOptions (IMAGEHLP.@) */ DWORD WINAPI SymSetOptions(DWORD SymOptions) { FIXME("(0x%08lx): stub\n", SymOptions); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * SymSetSearchPath (IMAGEHLP.@) */ BOOL WINAPI SymSetSearchPath(HANDLE hProcess, LPSTR szSearchPath) { FIXME("(0x%08x, %s): stub\n", hProcess, debugstr_a(szSearchPath) ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * SymUnDName (IMAGEHLP.@) */ BOOL WINAPI SymUnDName( PIMAGEHLP_SYMBOL sym, LPSTR UnDecName, DWORD UnDecNameLength) { FIXME("(%p, %s, %ld): stub\n", sym, UnDecName, UnDecNameLength ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * SymUnloadModule (IMAGEHLP.@) */ BOOL WINAPI SymUnloadModule( HANDLE hProcess, DWORD BaseOfDll) { FIXME("(0x%08x, 0x%08lx): stub\n", hProcess, BaseOfDll); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } wine-20000526/dlls/imm32/0040755000175000001440000000000007113604175014336 5ustar julliarduserswine-20000526/dlls/imm32/.cvsignore0100644000175000001440000000004207045213572016330 0ustar julliardusers*.spec.c Makefile libimm32.so.1.0 wine-20000526/dlls/imm32/Makefile.in0100644000175000001440000000030707060307301016370 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = imm32 SOVERSION = 1.0 SPEC_SRCS = imm32.spec C_SRCS = \ imm.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/imm32/imm.c0100644000175000001440000004614107070212244015261 0ustar julliardusers/* * IMM32 library * * Copyright 1998 Patrik Stridvall */ #include "winbase.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "winerror.h" #include "debugtools.h" #include "winversion.h" #include "imm.h" DEFAULT_DEBUG_CHANNEL(imm); /*********************************************************************** * ImmAssociateContext (IMM32.@) */ HIMC WINAPI ImmAssociateContext(HWND hWnd, HIMC hIMC) { FIXME("(0x%08x, 0x%08x): stub\n",hWnd,hIMC); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return (HIMC)NULL; } /*********************************************************************** * ImmConfigureIMEA (IMM32.@) */ BOOL WINAPI ImmConfigureIMEA( HKL hKL, HWND hWnd, DWORD dwMode, LPVOID lpData) { FIXME("(0x%08x, 0x%08x, %ld, %p): stub\n", hKL, hWnd, dwMode, lpData ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmConfigureIMEW (IMM32.@) */ BOOL WINAPI ImmConfigureIMEW( HKL hKL, HWND hWnd, DWORD dwMode, LPVOID lpData) { FIXME("(0x%08x, 0x%08x, %ld, %p): stub\n", hKL, hWnd, dwMode, lpData ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmCreateContext (IMM32.@) */ HIMC WINAPI ImmCreateContext() { FIXME("(): stub\n"); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return (HIMC)NULL; } /*********************************************************************** * ImmDestroyContext (IMM32.@) */ BOOL WINAPI ImmDestroyContext(HIMC hIMC) { FIXME("(0x%08x): stub\n",hIMC); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmEnumRegisterWordA (IMM32.@) */ UINT WINAPI ImmEnumRegisterWordA( HKL hKL, REGISTERWORDENUMPROCA lpfnEnumProc, LPCSTR lpszReading, DWORD dwStyle, LPCSTR lpszRegister, LPVOID lpData) { FIXME("(0x%08x, %p, %s, %ld, %s, %p): stub\n", hKL, lpfnEnumProc, debugstr_a(lpszReading), dwStyle, debugstr_a(lpszRegister), lpData ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmEnumRegisterWordW (IMM32.@) */ UINT WINAPI ImmEnumRegisterWordW( HKL hKL, REGISTERWORDENUMPROCW lpfnEnumProc, LPCWSTR lpszReading, DWORD dwStyle, LPCWSTR lpszRegister, LPVOID lpData) { FIXME("(0x%08x, %p, %s, %ld, %s, %p): stub\n", hKL, lpfnEnumProc, debugstr_w(lpszReading), dwStyle, debugstr_w(lpszRegister), lpData ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmEscapeA (IMM32.@) */ LRESULT WINAPI ImmEscapeA( HKL hKL, HIMC hIMC, UINT uEscape, LPVOID lpData) { FIXME("(0x%08x, 0x%08x, %d, %p): stub\n", hKL, hIMC, uEscape, lpData ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmEscapeW (IMM32.@) */ LRESULT WINAPI ImmEscapeW( HKL hKL, HIMC hIMC, UINT uEscape, LPVOID lpData) { FIXME("(0x%08x, 0x%08x, %d, %p): stub\n", hKL, hIMC, uEscape, lpData ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetCandidateListA (IMM32.@) */ DWORD WINAPI ImmGetCandidateListA( HIMC hIMC, DWORD deIndex, LPCANDIDATELIST lpCandList, DWORD dwBufLen) { FIXME("(0x%08x, %ld, %p, %ld): stub\n", hIMC, deIndex, lpCandList, dwBufLen ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetCandidateListCountA (IMM32.@) */ DWORD WINAPI ImmGetCandidateListCountA( HIMC hIMC, LPDWORD lpdwListCount) { FIXME("(0x%08x, %p): stub\n", hIMC, lpdwListCount); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetCandidateListCountW (IMM32.@) */ DWORD WINAPI ImmGetCandidateListCountW( HIMC hIMC, LPDWORD lpdwListCount) { FIXME("(0x%08x, %p): stub\n", hIMC, lpdwListCount); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetCandidateListW (IMM32.@) */ DWORD WINAPI ImmGetCandidateListW( HIMC hIMC, DWORD deIndex, LPCANDIDATELIST lpCandList, DWORD dwBufLen) { FIXME("(0x%08x, %ld, %p, %ld): stub\n", hIMC, deIndex, lpCandList, dwBufLen ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetCandidateWindow (IMM32.@) */ BOOL WINAPI ImmGetCandidateWindow( HIMC hIMC, DWORD dwBufLen, LPCANDIDATEFORM lpCandidate) { FIXME("(0x%08x, %ld, %p): stub\n", hIMC, dwBufLen, lpCandidate); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmGetCompositionFontA (IMM32.@) */ BOOL WINAPI ImmGetCompositionFontA(HIMC hIMC, LPLOGFONTA lplf) { FIXME("(0x%08x, %p): stub\n", hIMC, lplf); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmGetCompositionFontW (IMM32.@) */ BOOL WINAPI ImmGetCompositionFontW(HIMC hIMC, LPLOGFONTW lplf) { FIXME("(0x%08x, %p): stub\n", hIMC, lplf); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmGetCompositionStringA (IMM32.@) */ LONG WINAPI ImmGetCompositionStringA( HIMC hIMC, DWORD dwIndex, LPVOID lpBuf, DWORD dwBufLen) { FIXME("(0x%08x, %ld, %p, %ld): stub\n", hIMC, dwIndex, lpBuf, dwBufLen ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); switch(VERSION_GetVersion()) { default: FIXME("%s not supported",VERSION_GetVersionName()); case WIN95: return 0xffffffff; case NT40: return 0; } } /*********************************************************************** * ImmGetCompositionStringW (IMM32.@) */ LONG WINAPI ImmGetCompositionStringW( HIMC hIMC, DWORD dwIndex, LPVOID lpBuf, DWORD dwBufLen) { FIXME("(0x%08x, %ld, %p, %ld): stub\n", hIMC, dwIndex, lpBuf, dwBufLen ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); switch(VERSION_GetVersion()) { default: FIXME("%s not supported",VERSION_GetVersionName()); case WIN95: return 0xffffffff; case NT40: return 0; } } /*********************************************************************** * ImmGetCompositionWindow (IMM32.@) */ BOOL WINAPI ImmGetCompositionWindow(HIMC hIMC, LPCOMPOSITIONFORM lpCompForm) { FIXME("(0x%08x, %p): stub\n", hIMC, lpCompForm); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetContext (IMM32.@) */ HIMC WINAPI ImmGetContext(HWND hWnd) { FIXME("(0x%08x): stub\n", hWnd); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return (HIMC)NULL; } /*********************************************************************** * ImmGetConversionListA (IMM32.@) */ DWORD WINAPI ImmGetConversionListA( HKL hKL, HIMC hIMC, LPCSTR pSrc, LPCANDIDATELIST lpDst, DWORD dwBufLen, UINT uFlag) { FIXME("(0x%08x, 0x%08x, %s, %p, %ld, %d): stub\n", hKL, hIMC, debugstr_a(pSrc), lpDst, dwBufLen, uFlag ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetConversionListW (IMM32.@) */ DWORD WINAPI ImmGetConversionListW( HKL hKL, HIMC hIMC, LPCWSTR pSrc, LPCANDIDATELIST lpDst, DWORD dwBufLen, UINT uFlag) { FIXME("(0x%08x, 0x%08x, %s, %p, %ld, %d): stub\n", hKL, hIMC, debugstr_w(pSrc), lpDst, dwBufLen, uFlag ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetConversionStatus (IMM32.@) */ BOOL WINAPI ImmGetConversionStatus( HIMC hIMC, LPDWORD lpfdwConversion, LPDWORD lpfdwSentence) { FIXME("(0x%08x, %p, %p): stub\n", hIMC, lpfdwConversion, lpfdwSentence ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmGetDefaultIMEWnd (IMM32.@) */ HWND WINAPI ImmGetDefaultIMEWnd(HWND hWnd) { FIXME("(0x%08x): stub\n", hWnd); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return (HWND)NULL; } /*********************************************************************** * ImmGetDescriptionA (IMM32.@) */ UINT WINAPI ImmGetDescriptionA( HKL hKL, LPSTR lpszDescription, UINT uBufLen) { FIXME("(0x%08x, %s, %d): stub\n", hKL, debugstr_a(lpszDescription), uBufLen ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetDescriptionW (IMM32.@) */ UINT WINAPI ImmGetDescriptionW(HKL hKL, LPWSTR lpszDescription, UINT uBufLen) { FIXME("(0x%08x, %s, %d): stub\n", hKL, debugstr_w(lpszDescription), uBufLen ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetGuideLineA (IMM32.@) */ DWORD WINAPI ImmGetGuideLineA( HIMC hIMC, DWORD dwIndex, LPSTR lpBuf, DWORD dwBufLen) { FIXME("(0x%08x, %ld, %s, %ld): stub\n", hIMC, dwIndex, debugstr_a(lpBuf), dwBufLen ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetGuideLineW (IMM32.@) */ DWORD WINAPI ImmGetGuideLineW(HIMC hIMC, DWORD dwIndex, LPWSTR lpBuf, DWORD dwBufLen) { FIXME("(0x%08x, %ld, %s, %ld): stub\n", hIMC, dwIndex, debugstr_w(lpBuf), dwBufLen ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetIMEFileNameA (IMM32.@) */ UINT WINAPI ImmGetIMEFileNameA( HKL hKL, LPSTR lpszFileName, UINT uBufLen) { FIXME("(0x%08x, %s, %d): stub\n", hKL, debugstr_a(lpszFileName), uBufLen ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetIMEFileNameW (IMM32.@) */ UINT WINAPI ImmGetIMEFileNameW( HKL hKL, LPWSTR lpszFileName, UINT uBufLen) { FIXME("(0x%08x, %s, %d): stub\n", hKL, debugstr_w(lpszFileName), uBufLen ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetOpenStatus (IMM32.@) */ BOOL WINAPI ImmGetOpenStatus(HIMC hIMC) { FIXME("(0x%08x): stub\n", hIMC); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmGetProperty (IMM32.@) */ DWORD WINAPI ImmGetProperty(HKL hKL, DWORD fdwIndex) { FIXME("(0x%08x, %ld): stub\n", hKL, fdwIndex); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetRegisterWordStyleA (IMM32.@) */ UINT WINAPI ImmGetRegisterWordStyleA( HKL hKL, UINT nItem, LPSTYLEBUFA lpStyleBuf) { FIXME("(0x%08x, %d, %p): stub\n", hKL, nItem, lpStyleBuf); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetRegisterWordStyleW (IMM32.@) */ UINT WINAPI ImmGetRegisterWordStyleW( HKL hKL, UINT nItem, LPSTYLEBUFW lpStyleBuf) { FIXME("(0x%08x, %d, %p): stub\n", hKL, nItem, lpStyleBuf); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * ImmGetStatusWindowPos (IMM32.@) */ BOOL WINAPI ImmGetStatusWindowPos(HIMC hIMC, LPPOINT lpptPos) { FIXME("(0x%08x, %p): stub\n", hIMC, lpptPos); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmGetVirtualKey (IMM32.@) */ UINT WINAPI ImmGetVirtualKey(HWND hWnd) { FIXME("(0x%08x): stub\n", hWnd); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); switch(VERSION_GetVersion()) { default: FIXME("%s not supported", VERSION_GetVersionName()); case WIN95: return VK_PROCESSKEY; case NT40: return 0; } } /*********************************************************************** * ImmInstallIMEA (IMM32.@) */ HKL WINAPI ImmInstallIMEA( LPCSTR lpszIMEFileName, LPCSTR lpszLayoutText) { FIXME("(%s, %s): stub\n", debugstr_a(lpszIMEFileName), debugstr_a(lpszLayoutText) ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return (HKL)NULL; } /*********************************************************************** * ImmInstallIMEW (IMM32.@) */ HKL WINAPI ImmInstallIMEW( LPCWSTR lpszIMEFileName, LPCWSTR lpszLayoutText) { FIXME("(%s, %s): stub\n", debugstr_w(lpszIMEFileName), debugstr_w(lpszLayoutText) ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return (HKL)NULL; } /*********************************************************************** * ImmIsIME (IMM32.@) */ BOOL WINAPI ImmIsIME(HKL hKL) { FIXME("(0x%08x): stub\n", hKL); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmIsUIMessageA (IMM32.@) */ BOOL WINAPI ImmIsUIMessageA( HWND hWndIME, UINT msg, WPARAM wParam, LPARAM lParam) { FIXME("(0x%08x, %d, %d, %ld): stub\n", hWndIME, msg, wParam, lParam ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmIsUIMessageW (IMM32.@) */ BOOL WINAPI ImmIsUIMessageW( HWND hWndIME, UINT msg, WPARAM wParam, LPARAM lParam) { FIXME("(0x%08x, %d, %d, %ld): stub\n", hWndIME, msg, wParam, lParam ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmNotifyIME (IMM32.@) */ BOOL WINAPI ImmNotifyIME( HIMC hIMC, DWORD dwAction, DWORD dwIndex, DWORD dwValue) { FIXME("(0x%08x, %ld, %ld, %ld): stub\n", hIMC, dwAction, dwIndex, dwValue ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmRegisterWordA (IMM32.@) */ BOOL WINAPI ImmRegisterWordA( HKL hKL, LPCSTR lpszReading, DWORD dwStyle, LPCSTR lpszRegister) { FIXME("(0x%08x, %s, %ld, %s): stub\n", hKL, debugstr_a(lpszReading), dwStyle, debugstr_a(lpszRegister) ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmRegisterWordW (IMM32.@) */ BOOL WINAPI ImmRegisterWordW( HKL hKL, LPCWSTR lpszReading, DWORD dwStyle, LPCWSTR lpszRegister) { FIXME("(0x%08x, %s, %ld, %s): stub\n", hKL, debugstr_w(lpszReading), dwStyle, debugstr_w(lpszRegister) ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmReleaseContext (IMM32.@) */ BOOL WINAPI ImmReleaseContext(HWND hWnd, HIMC hIMC) { FIXME("(0x%08x, 0x%08x): stub\n", hWnd, hIMC); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmSetCandidateWindow (IMM32.@) */ BOOL WINAPI ImmSetCandidateWindow( HIMC hIMC, LPCANDIDATEFORM lpCandidate) { FIXME("(0x%08x, %p): stub\n", hIMC, lpCandidate); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmSetCompositionFontA (IMM32.@) */ BOOL WINAPI ImmSetCompositionFontA(HIMC hIMC, LPLOGFONTA lplf) { FIXME("(0x%08x, %p): stub\n", hIMC, lplf); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmSetCompositionFontW (IMM32.@) */ BOOL WINAPI ImmSetCompositionFontW(HIMC hIMC, LPLOGFONTW lplf) { FIXME("(0x%08x, %p): stub\n", hIMC, lplf); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmSetCompositionStringA (IMM32.@) */ BOOL WINAPI ImmSetCompositionStringA( HIMC hIMC, DWORD dwIndex, LPCVOID lpComp, DWORD dwCompLen, LPCVOID lpRead, DWORD dwReadLen) { FIXME("(0x%08x, %ld, %p, %ld, %p, %ld): stub\n", hIMC, dwIndex, lpComp, dwCompLen, lpRead, dwReadLen ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmSetCompositionStringW (IMM32.@) */ BOOL WINAPI ImmSetCompositionStringW( HIMC hIMC, DWORD dwIndex, LPCVOID lpComp, DWORD dwCompLen, LPCVOID lpRead, DWORD dwReadLen) { FIXME("(0x%08x, %ld, %p, %ld, %p, %ld): stub\n", hIMC, dwIndex, lpComp, dwCompLen, lpRead, dwReadLen ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmSetCompositionWindow (IMM32.@) */ BOOL WINAPI ImmSetCompositionWindow( HIMC hIMC, LPCOMPOSITIONFORM lpCompForm) { FIXME("(0x%08x, %p): stub\n", hIMC, lpCompForm); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmSetConversionStatus (IMM32.@) */ BOOL WINAPI ImmSetConversionStatus( HIMC hIMC, DWORD fdwConversion, DWORD fdwSentence) { FIXME("(0x%08x, %ld, %ld): stub\n", hIMC, fdwConversion, fdwSentence ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmSetOpenStatus (IMM32.@) */ BOOL WINAPI ImmSetOpenStatus(HIMC hIMC, BOOL fOpen) { FIXME("(0x%08x, %d): stub\n", hIMC, fOpen); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmSetStatusWindowPos (IMM32.@) */ BOOL WINAPI ImmSetStatusWindowPos(HIMC hIMC, LPPOINT lpptPos) { FIXME("(0x%08x, %p): stub\n", hIMC, lpptPos); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmSimulateHotKey (IMM32.@) */ BOOL WINAPI ImmSimulateHotKey(HWND hWnd, DWORD dwHotKeyID) { FIXME("(0x%08x, %ld): stub\n", hWnd, dwHotKeyID); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmUnregisterWordA (IMM32.@) */ BOOL WINAPI ImmUnregisterWordA( HKL hKL, LPCSTR lpszReading, DWORD dwStyle, LPCSTR lpszUnregister) { FIXME("(0x%08x, %s, %ld, %s): stub\n", hKL, debugstr_a(lpszReading), dwStyle, debugstr_a(lpszUnregister) ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * ImmUnregisterWordW (IMM32.@) */ BOOL WINAPI ImmUnregisterWordW( HKL hKL, LPCWSTR lpszReading, DWORD dwStyle, LPCWSTR lpszUnregister) { FIXME("(0x%08x, %s, %ld, %s): stub\n", hKL, debugstr_w(lpszReading), dwStyle, debugstr_w(lpszUnregister) ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } wine-20000526/dlls/imm32/imm32.spec0100644000175000001440000000775307035734133016153 0ustar julliardusersname imm32 type win32 @ stdcall ImmAssociateContext(long long) ImmAssociateContext @ stdcall ImmConfigureIMEA(long long long ptr) ImmConfigureIMEA @ stdcall ImmConfigureIMEW(long long long ptr) ImmConfigureIMEW @ stdcall ImmCreateContext() ImmCreateContext @ stub ImmCreateIMCC @ stub ImmCreateSoftKeyboard @ stdcall ImmDestroyContext(long) ImmDestroyContext @ stub ImmDestroyIMCC @ stub ImmDestroySoftKeyboard @ stdcall ImmEnumRegisterWordA(long ptr str long str ptr) ImmEnumRegisterWordA @ stdcall ImmEnumRegisterWordW(long ptr wstr long wstr ptr) ImmEnumRegisterWordW @ stdcall ImmEscapeA(long long long ptr) ImmEscapeA @ stdcall ImmEscapeW(long long long ptr) ImmEscapeW @ stub ImmGenerateMessage @ stdcall ImmGetCandidateListA(long long ptr long) ImmGetCandidateListA @ stdcall ImmGetCandidateListCountA(long ptr) ImmGetCandidateListCountA @ stdcall ImmGetCandidateListCountW(long ptr) ImmGetCandidateListCountW @ stdcall ImmGetCandidateListW(long long ptr long) ImmGetCandidateListW @ stdcall ImmGetCandidateWindow(long long ptr) ImmGetCandidateWindow @ stdcall ImmGetCompositionFontA(long ptr) ImmGetCompositionFontA @ stdcall ImmGetCompositionFontW(long ptr) ImmGetCompositionFontW @ stdcall ImmGetCompositionStringA (long long ptr long) ImmGetCompositionStringA @ stdcall ImmGetCompositionStringW (long long ptr long) ImmGetCompositionStringW @ stdcall ImmGetCompositionWindow(long ptr) ImmGetCompositionWindow @ stdcall ImmGetContext(long) ImmGetContext @ stdcall ImmGetConversionListA(long long str ptr long long) ImmGetConversionListA @ stdcall ImmGetConversionListW(long long wstr ptr long long) ImmGetConversionListW @ stdcall ImmGetConversionStatus(long ptr ptr) ImmGetConversionStatus @ stdcall ImmGetDefaultIMEWnd(long) ImmGetDefaultIMEWnd @ stdcall ImmGetDescriptionA(long str long) ImmGetDescriptionA @ stdcall ImmGetDescriptionW(long wstr long) ImmGetDescriptionW @ stdcall ImmGetGuideLineA(long long str long) ImmGetGuideLineA @ stdcall ImmGetGuideLineW(long long wstr long) ImmGetGuideLineW @ stub ImmGetHotKey @ stub ImmGetIMCCLockCount @ stub ImmGetIMCCSize @ stub ImmGetIMCLockCount @ stdcall ImmGetIMEFileNameA(long str long) ImmGetIMEFileNameA @ stdcall ImmGetIMEFileNameW(long wstr long) ImmGetIMEFileNameW @ stdcall ImmGetOpenStatus(long) ImmGetOpenStatus @ stdcall ImmGetProperty(long long) ImmGetProperty @ stdcall ImmGetRegisterWordStyleA(long long ptr) ImmGetRegisterWordStyleA @ stdcall ImmGetRegisterWordStyleW(long long ptr) ImmGetRegisterWordStyleW @ stdcall ImmGetStatusWindowPos(long ptr) ImmGetStatusWindowPos @ stdcall ImmGetVirtualKey(long) ImmGetVirtualKey @ stdcall ImmInstallIMEA(str str) ImmInstallIMEA @ stdcall ImmInstallIMEW(wstr wstr) ImmInstallIMEW @ stdcall ImmIsIME(long) ImmIsIME @ stdcall ImmIsUIMessageA(long long long long) ImmIsUIMessageA @ stdcall ImmIsUIMessageW(long long long long) ImmIsUIMessageW @ stub ImmLockIMC @ stub ImmLockIMCC @ stdcall ImmNotifyIME(long long long long) ImmNotifyIME @ stub ImmReSizeIMCC @ stdcall ImmRegisterWordA(long str long str) ImmRegisterWordA @ stdcall ImmRegisterWordW(long wstr long wstr) ImmRegisterWordW @ stdcall ImmReleaseContext(long long) ImmReleaseContext @ stdcall ImmSetCandidateWindow(long ptr) ImmSetCandidateWindow @ stdcall ImmSetCompositionFontA(long ptr) ImmSetCompositionFontA @ stdcall ImmSetCompositionFontW(long ptr) ImmSetCompositionFontW @ stdcall ImmSetCompositionStringA(long long ptr long ptr long) ImmSetCompositionStringA @ stdcall ImmSetCompositionStringW(long long ptr long ptr long) ImmSetCompositionStringW @ stdcall ImmSetCompositionWindow(long ptr) ImmSetCompositionWindow @ stdcall ImmSetConversionStatus(long long long) ImmSetConversionStatus @ stub ImmSetHotKey @ stdcall ImmSetOpenStatus(long long) ImmSetOpenStatus @ stdcall ImmSetStatusWindowPos(long ptr) ImmSetStatusWindowPos @ stub ImmShowSoftKeyboard @ stdcall ImmSimulateHotKey(long long) ImmSimulateHotKey @ stub ImmUnlockIMC @ stub ImmUnlockIMCC @ stdcall ImmUnregisterWordA(long str long str) ImmUnregisterWordA @ stdcall ImmUnregisterWordW(long wstr long wstr) ImmUnregisterWordW wine-20000526/dlls/lzexpand/0040755000175000001440000000000007113604175015234 5ustar julliarduserswine-20000526/dlls/lzexpand/.cvsignore0100644000175000001440000000005707045213572017234 0ustar julliardusers*.spec.c *.spec.glue.s Makefile liblz32.so.1.0 wine-20000526/dlls/lzexpand/Makefile.in0100644000175000001440000000036307060456111017274 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = lz32 SOVERSION = 1.0 ALTNAMES = lzexpand SPEC_SRCS = lz32.spec lzexpand.spec C_SRCS = \ lzexpand_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/lzexpand/lz32.spec0100644000175000001440000000076307033475133016706 0ustar julliardusersname lz32 type win32 @ stdcall CopyLZFile(long long) CopyLZFile @ stdcall GetExpandedNameA(str ptr) GetExpandedNameA @ stdcall GetExpandedNameW(wstr ptr) GetExpandedNameW @ stdcall LZClose(long) LZClose @ stdcall LZCopy(long long) LZCopy @ stdcall LZDone() LZDone @ stdcall LZInit(long) LZInit @ stdcall LZOpenFileA(str ptr long) LZOpenFileA @ stdcall LZOpenFileW(wstr ptr long) LZOpenFileW @ stdcall LZRead(long ptr long) LZRead @ stdcall LZSeek(long long long) LZSeek @ stdcall LZStart() LZStart wine-20000526/dlls/lzexpand/lzexpand.spec0100644000175000001440000000071706752006276017745 0ustar julliardusersname lzexpand type win16 1 pascal LZCopy(word word) LZCopy16 2 pascal16 LZOpenFile(str ptr word) LZOpenFile16 3 pascal16 LZInit(word) LZInit16 4 pascal LZSeek(word long word) LZSeek16 5 pascal16 LZRead(word ptr word) LZRead16 6 pascal16 LZClose(word) LZClose16 7 pascal16 LZStart() LZStart16 8 pascal CopyLZFile(word word) CopyLZFile16 9 pascal16 LZDone() LZDone 10 pascal16 GetExpandedName(str ptr) GetExpandedName16 #11 WEP #12 ___EXPORTEDSTUB wine-20000526/dlls/lzexpand/lzexpand_main.c0100644000175000001440000004073707102567654020251 0ustar julliardusers/* * LZ Decompression functions * * Copyright 1996 Marcus Meissner */ /* * FIXME: return values might be wrong */ #include #include #include #include #include "windef.h" #include "winbase.h" #include "wine/winbase16.h" #include "wine/winestring.h" #include "file.h" #include "heap.h" #include "lzexpand.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(file); /* The readahead length of the decompressor. Reading single bytes * using _lread() would be SLOW. */ #define GETLEN 2048 /* Format of first 14 byte of LZ compressed file */ struct lzfileheader { BYTE magic[8]; BYTE compressiontype; CHAR lastchar; DWORD reallength; }; static BYTE LZMagic[8]={'S','Z','D','D',0x88,0xf0,0x27,0x33}; struct lzstate { HFILE realfd; /* the real filedescriptor */ CHAR lastchar; /* the last char of the filename */ DWORD reallength; /* the decompressed length of the file */ DWORD realcurrent; /* the position the decompressor currently is */ DWORD realwanted; /* the position the user wants to read from */ BYTE table[0x1000]; /* the rotating LZ table */ UINT curtabent; /* CURrent TABle ENTry */ BYTE stringlen; /* length and position of current string */ DWORD stringpos; /* from stringtable */ WORD bytetype; /* bitmask within blocks */ BYTE *get; /* GETLEN bytes */ DWORD getcur; /* current read */ DWORD getlen; /* length last got */ }; #define MAX_LZSTATES 16 static struct lzstate *lzstates[MAX_LZSTATES]; #define IS_LZ_HANDLE(h) (((h) >= 0x400) && ((h) < 0x400+MAX_LZSTATES)) #define GET_LZ_STATE(h) (IS_LZ_HANDLE(h) ? lzstates[(h)-0x400] : NULL) /* reads one compressed byte, including buffering */ #define GET(lzs,b) _lzget(lzs,&b) #define GET_FLUSH(lzs) lzs->getcur=lzs->getlen; static int _lzget(struct lzstate *lzs,BYTE *b) { if (lzs->getcurgetlen) { *b = lzs->get[lzs->getcur++]; return 1; } else { int ret = _lread(lzs->realfd,lzs->get,GETLEN); if (ret==HFILE_ERROR) return HFILE_ERROR; if (ret==0) return 0; lzs->getlen = ret; lzs->getcur = 1; *b = *(lzs->get); return 1; } } /* internal function, reads lzheader * returns BADINHANDLE for non filedescriptors * return 0 for file not compressed using LZ * return UNKNOWNALG for unknown algorithm * returns lzfileheader in *head */ static INT read_header(HFILE fd,struct lzfileheader *head) { BYTE buf[14]; if (_llseek(fd,0,SEEK_SET)==-1) return LZERROR_BADINHANDLE; /* We can't directly read the lzfileheader struct due to * structure element alignment */ if (_lread(fd,buf,14)<14) return 0; memcpy(head->magic,buf,8); memcpy(&(head->compressiontype),buf+8,1); memcpy(&(head->lastchar),buf+9,1); /* FIXME: consider endianess on non-intel architectures */ memcpy(&(head->reallength),buf+10,4); if (memcmp(head->magic,LZMagic,8)) return 0; if (head->compressiontype!='A') return LZERROR_UNKNOWNALG; return 1; } /*********************************************************************** * LZStart16 (LZEXPAND.7) */ INT16 WINAPI LZStart16(void) { TRACE("(void)\n"); return 1; } /*********************************************************************** * LZStart (LZ32.6) */ INT WINAPI LZStart(void) { TRACE("(void)\n"); return 1; } /*********************************************************************** * LZInit16 (LZEXPAND.3) */ HFILE16 WINAPI LZInit16( HFILE16 hfSrc ) { HFILE ret = LZInit( FILE_GetHandle(hfSrc) ); if (IS_LZ_HANDLE(ret)) return ret; if ((INT)ret <= 0) return ret; return hfSrc; } /*********************************************************************** * LZInit (LZ32.2) * * initializes internal decompression buffers, returns lzfiledescriptor. * (return value the same as hfSrc, if hfSrc is not compressed) * on failure, returns error code <0 * lzfiledescriptors range from 0x400 to 0x410 (only 16 open files per process) * * since _llseek uses the same types as libc.lseek, we just use the macros of * libc */ HFILE WINAPI LZInit( HFILE hfSrc ) { struct lzfileheader head; struct lzstate *lzs; DWORD ret; int i; TRACE("(%d)\n",hfSrc); ret=read_header(hfSrc,&head); if (ret<=0) { _llseek(hfSrc,0,SEEK_SET); return ret?ret:hfSrc; } for (i = 0; i < MAX_LZSTATES; i++) if (!lzstates[i]) break; if (i == MAX_LZSTATES) return LZERROR_GLOBALLOC; lzstates[i] = lzs = HeapAlloc( GetProcessHeap(), 0, sizeof(struct lzstate) ); if(lzs == NULL) return LZERROR_GLOBALLOC; memset(lzs,'\0',sizeof(*lzs)); lzs->realfd = hfSrc; lzs->lastchar = head.lastchar; lzs->reallength = head.reallength; lzs->get = HeapAlloc( GetProcessHeap(), 0, GETLEN ); lzs->getlen = 0; lzs->getcur = 0; if(lzs->get == NULL) { HeapFree(GetProcessHeap(), 0, lzs); lzstates[i] = NULL; return LZERROR_GLOBALLOC; } /* Yes, preinitialize with spaces */ memset(lzs->table,' ',0x1000); /* Yes, start 16 byte from the END of the table */ lzs->curtabent = 0xff0; return 0x400 + i; } /*********************************************************************** * LZDone (LZEXPAND.9) (LZ32.8) */ void WINAPI LZDone(void) { TRACE("(void)\n"); } /*********************************************************************** * GetExpandedName16 (LZEXPAND.10) */ INT16 WINAPI GetExpandedName16( LPCSTR in, LPSTR out ) { return (INT16)GetExpandedNameA( in, out ); } /*********************************************************************** * GetExpandedNameA (LZ32.9) * * gets the full filename of the compressed file 'in' by opening it * and reading the header * * "file." is being translated to "file" * "file.bl_" (with lastchar 'a') is being translated to "file.bla" * "FILE.BL_" (with lastchar 'a') is being translated to "FILE.BLA" */ INT WINAPI GetExpandedNameA( LPCSTR in, LPSTR out ) { struct lzfileheader head; HFILE fd; OFSTRUCT ofs; INT fnislowercased,ret,len; LPSTR s,t; TRACE("(%s)\n",in); fd=OpenFile(in,&ofs,OF_READ); if (fd==HFILE_ERROR) return (INT)(INT16)LZERROR_BADINHANDLE; strcpy(out,in); ret=read_header(fd,&head); if (ret<=0) { /* not a LZ compressed file, so the expanded name is the same * as the input name */ _lclose(fd); return 1; } /* look for directory prefix and skip it. */ s=out; while (NULL!=(t=strpbrk(s,"/\\:"))) s=t+1; /* now mangle the basename */ if (!*s) { /* FIXME: hmm. shouldn't happen? */ WARN("Specified a directory or what? (%s)\n",in); _lclose(fd); return 1; } /* see if we should use lowercase or uppercase on the last char */ fnislowercased=1; t=s+strlen(s)-1; while (t>=out) { if (!isalpha(*t)) { t--; continue; } fnislowercased=islower(*t); break; } if (isalpha(head.lastchar)) { if (fnislowercased) head.lastchar=tolower(head.lastchar); else head.lastchar=toupper(head.lastchar); } /* now look where to replace the last character */ if (NULL!=(t=strchr(s,'.'))) { if (t[1]=='\0') { t[0]='\0'; } else { len=strlen(t)-1; if (t[len]=='_') t[len]=head.lastchar; } } /* else no modification necessary */ _lclose(fd); return 1; } /*********************************************************************** * GetExpandedNameW (LZ32.11) */ INT WINAPI GetExpandedNameW( LPCWSTR in, LPWSTR out ) { char *xin,*xout; INT ret; xout = HeapAlloc( GetProcessHeap(), 0, lstrlenW(in)+3 ); xin = HEAP_strdupWtoA( GetProcessHeap(), 0, in ); ret = GetExpandedName16(xin,xout); if (ret>0) lstrcpyAtoW(out,xout); HeapFree( GetProcessHeap(), 0, xin ); HeapFree( GetProcessHeap(), 0, xout ); return ret; } /*********************************************************************** * LZRead16 (LZEXPAND.5) */ INT16 WINAPI LZRead16( HFILE16 fd, LPVOID buf, UINT16 toread ) { if (IS_LZ_HANDLE(fd)) return LZRead( fd, buf, toread ); return _lread16( fd, buf, toread ); } /*********************************************************************** * LZRead (LZ32.4) */ INT WINAPI LZRead( HFILE fd, LPVOID vbuf, UINT toread ) { int howmuch; BYTE b,*buf; struct lzstate *lzs; buf=(LPBYTE)vbuf; TRACE("(%d,%p,%d)\n",fd,buf,toread); howmuch=toread; if (!(lzs = GET_LZ_STATE(fd))) return _lread(fd,buf,toread); /* The decompressor itself is in a define, cause we need it twice * in this function. (the decompressed byte will be in b) */ #define DECOMPRESS_ONE_BYTE \ if (lzs->stringlen) { \ b = lzs->table[lzs->stringpos]; \ lzs->stringpos = (lzs->stringpos+1)&0xFFF; \ lzs->stringlen--; \ } else { \ if (!(lzs->bytetype&0x100)) { \ if (1!=GET(lzs,b)) \ return toread-howmuch; \ lzs->bytetype = b|0xFF00; \ } \ if (lzs->bytetype & 1) { \ if (1!=GET(lzs,b)) \ return toread-howmuch; \ } else { \ BYTE b1,b2; \ \ if (1!=GET(lzs,b1)) \ return toread-howmuch; \ if (1!=GET(lzs,b2)) \ return toread-howmuch; \ /* Format: \ * b1 b2 \ * AB CD \ * where CAB is the stringoffset in the table\ * and D+3 is the len of the string \ */ \ lzs->stringpos = b1|((b2&0xf0)<<4); \ lzs->stringlen = (b2&0xf)+2; \ /* 3, but we use a byte already below ... */\ b = lzs->table[lzs->stringpos];\ lzs->stringpos = (lzs->stringpos+1)&0xFFF;\ } \ lzs->bytetype>>=1; \ } \ /* store b in table */ \ lzs->table[lzs->curtabent++]= b; \ lzs->curtabent &= 0xFFF; \ lzs->realcurrent++; /* if someone has seeked, we have to bring the decompressor * to that position */ if (lzs->realcurrent!=lzs->realwanted) { /* if the wanted position is before the current position * I see no easy way to unroll ... We have to restart at * the beginning. *sigh* */ if (lzs->realcurrent>lzs->realwanted) { /* flush decompressor state */ _llseek(lzs->realfd,14,SEEK_SET); GET_FLUSH(lzs); lzs->realcurrent= 0; lzs->bytetype = 0; lzs->stringlen = 0; memset(lzs->table,' ',0x1000); lzs->curtabent = 0xFF0; } while (lzs->realcurrentrealwanted) { DECOMPRESS_ONE_BYTE; } } while (howmuch) { DECOMPRESS_ONE_BYTE; lzs->realwanted++; *buf++ = b; howmuch--; } return toread; #undef DECOMPRESS_ONE_BYTE } /*********************************************************************** * LZSeek16 (LZEXPAND.4) */ LONG WINAPI LZSeek16( HFILE16 fd, LONG off, INT16 type ) { if (IS_LZ_HANDLE(fd)) return LZSeek( fd, off, type ); return _llseek16( fd, off, type ); } /*********************************************************************** * LZSeek (LZ32.3) */ LONG WINAPI LZSeek( HFILE fd, LONG off, INT type ) { struct lzstate *lzs; LONG newwanted; TRACE("(%d,%ld,%d)\n",fd,off,type); /* not compressed? just use normal _llseek() */ if (!(lzs = GET_LZ_STATE(fd))) return _llseek(fd,off,type); newwanted = lzs->realwanted; switch (type) { case 1: /* SEEK_CUR */ newwanted += off; break; case 2: /* SEEK_END */ newwanted = lzs->reallength-off; break; default:/* SEEK_SET */ newwanted = off; break; } if (newwanted>lzs->reallength) return LZERROR_BADVALUE; if (newwanted<0) return LZERROR_BADVALUE; lzs->realwanted = newwanted; return newwanted; } /*********************************************************************** * LZCopy16 (LZEXPAND.1) * */ LONG WINAPI LZCopy16( HFILE16 src, HFILE16 dest ) { /* already a LZ handle? */ if (IS_LZ_HANDLE(src)) return LZCopy( src, FILE_GetHandle(dest) ); /* no, try to open one */ src = LZInit16(src); if ((INT16)src <= 0) return 0; if (IS_LZ_HANDLE(src)) { LONG ret = LZCopy( src, FILE_GetHandle(dest) ); LZClose( src ); return ret; } /* it was not a compressed file */ return LZCopy( FILE_GetHandle(src), FILE_GetHandle(dest) ); } /*********************************************************************** * LZCopy (LZ32.0) * * Copies everything from src to dest * if src is a LZ compressed file, it will be uncompressed. * will return the number of bytes written to dest or errors. */ LONG WINAPI LZCopy( HFILE src, HFILE dest ) { int usedlzinit=0,ret,wret; LONG len; HFILE oldsrc = src; #define BUFLEN 1000 BYTE buf[BUFLEN]; /* we need that weird typedef, for i can't seem to get function pointer * casts right. (Or they probably just do not like WINAPI in general) */ typedef UINT WINAPI (*_readfun)(HFILE,LPVOID,UINT); _readfun xread; TRACE("(%d,%d)\n",src,dest); if (!IS_LZ_HANDLE(src)) { src = LZInit(src); if ((INT)src <= 0) return 0; if (src != oldsrc) usedlzinit=1; } /* not compressed? just copy */ if (!IS_LZ_HANDLE(src)) xread=_lread; else xread=(_readfun)LZRead; len=0; while (1) { ret=xread(src,buf,BUFLEN); if (ret<=0) { if (ret==0) break; if (ret==-1) return LZERROR_READ; return ret; } len += ret; wret = _lwrite(dest,buf,ret); if (wret!=ret) return LZERROR_WRITE; } if (usedlzinit) LZClose(src); return len; #undef BUFLEN } /* reverses GetExpandedPathname */ static LPSTR LZEXPAND_MangleName( LPCSTR fn ) { char *p; char *mfn = (char *)HeapAlloc( GetProcessHeap(), 0, strlen(fn) + 3 ); /* "._" and \0 */ if(mfn == NULL) return NULL; strcpy( mfn, fn ); if (!(p = strrchr( mfn, '\\' ))) p = mfn; if ((p = strchr( p, '.' ))) { p++; if (strlen(p) < 3) strcat( p, "_" ); /* append '_' */ else p[strlen(p)-1] = '_'; /* replace last character */ } else strcat( mfn, "._" ); /* append "._" */ return mfn; } /*********************************************************************** * LZOpenFile16 (LZEXPAND.2) */ HFILE16 WINAPI LZOpenFile16( LPCSTR fn, LPOFSTRUCT ofs, UINT16 mode ) { HFILE hfret = LZOpenFileA( fn, ofs, mode ); /* return errors and LZ handles unmodified */ if ((INT)hfret <= 0) return hfret; if (IS_LZ_HANDLE(hfret)) return hfret; /* but allocate a dos handle for 'normal' files */ return FILE_AllocDosHandle(hfret); } /*********************************************************************** * LZOpenFileA (LZ32.1) * * Opens a file. If not compressed, open it as a normal file. */ HFILE WINAPI LZOpenFileA( LPCSTR fn, LPOFSTRUCT ofs, UINT mode ) { HFILE fd,cfd; TRACE("(%s,%p,%d)\n",fn,ofs,mode); /* 0x70 represents all OF_SHARE_* flags, ignore them for the check */ fd=OpenFile(fn,ofs,mode); if (fd==HFILE_ERROR) { LPSTR mfn = LZEXPAND_MangleName(fn); fd = OpenFile(mfn,ofs,mode); HeapFree( GetProcessHeap(), 0, mfn ); } if ((mode&~0x70)!=OF_READ) return fd; if (fd==HFILE_ERROR) return HFILE_ERROR; cfd=LZInit(fd); if ((INT)cfd <= 0) return fd; return cfd; } /*********************************************************************** * LZOpenFileW (LZ32.10) */ HFILE WINAPI LZOpenFileW( LPCWSTR fn, LPOFSTRUCT ofs, UINT mode ) { LPSTR xfn; LPWSTR yfn; HFILE ret; xfn = HEAP_strdupWtoA( GetProcessHeap(), 0, fn); ret = LZOpenFile16(xfn,ofs,mode); HeapFree( GetProcessHeap(), 0, xfn ); if (ret!=HFILE_ERROR) { /* ofs->szPathName is an array with the OFSTRUCT */ yfn = HEAP_strdupAtoW( GetProcessHeap(), 0, ofs->szPathName ); memcpy(ofs->szPathName,yfn,lstrlenW(yfn)*2+2); HeapFree( GetProcessHeap(), 0, yfn ); } return ret; } /*********************************************************************** * LZClose16 (LZEXPAND.6) */ void WINAPI LZClose16( HFILE16 fd ) { if (IS_LZ_HANDLE(fd)) LZClose( fd ); else _lclose16( fd ); } /*********************************************************************** * LZClose (LZ32.5) */ void WINAPI LZClose( HFILE fd ) { struct lzstate *lzs; TRACE("(%d)\n",fd); if (!(lzs = GET_LZ_STATE(fd))) _lclose(fd); else { if (lzs->get) HeapFree( GetProcessHeap(), 0, lzs->get ); CloseHandle(lzs->realfd); lzstates[fd - 0x400] = NULL; HeapFree( GetProcessHeap(), 0, lzs ); } } /*********************************************************************** * CopyLZFile16 (LZEXPAND.8) */ LONG WINAPI CopyLZFile16( HFILE16 src, HFILE16 dest ) { TRACE("(%d,%d)\n",src,dest); return LZCopy16(src,dest); } /*********************************************************************** * CopyLZFile (LZ32.7) * * Copy src to dest (including uncompressing src). * NOTE: Yes. This is exactly the same function as LZCopy. */ LONG WINAPI CopyLZFile( HFILE src, HFILE dest ) { TRACE("(%d,%d)\n",src,dest); return LZCopy(src,dest); } wine-20000526/dlls/mouse/0040755000175000001440000000000007113604175014537 5ustar julliarduserswine-20000526/dlls/mouse/.cvsignore0100644000175000001440000000004007022607501016521 0ustar julliardusersMakefile mouse.spec.c mouserc.s wine-20000526/dlls/mouse/Makefile.in0100644000175000001440000000044307060307301016572 0ustar julliardusersDEFS = @DLLFLAGS@ -D__WINE__ TOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = mouse WRCEXTRA = -s -w16 -pmouse SPEC_SRCS = mouse.spec C_SRCS = \ mouse_main.c RC_SRCS = \ mouserc.rc all: $(MODULE).o @MAKE_RULES@ ### Dependencies: wine-20000526/dlls/mouse/mouse.spec0100644000175000001440000000045307036006217016537 0ustar julliardusersname mouse type win16 rsrc mouse 1 pascal16 Inquire(ptr) MOUSE_Inquire 2 pascal16 Enable(segptr) WIN16_MOUSE_Enable 3 pascal16 Disable() MOUSE_Disable 4 stub MOUSEGETINTVECT 5 stub GETSETMOUSEDATA #Control Panel thinks this is implemented if it is available #6 stub CPLAPPLET 7 stub POWEREVENTPROC wine-20000526/dlls/mouse/mouse_main.c0100644000175000001440000000745407065466037017057 0ustar julliardusers/* * MOUSE driver * * Copyright 1998 Ulrich Weigand * */ #include #include "debugtools.h" #include "callback.h" #include "builtin16.h" #include "module.h" #include "mouse.h" #include "monitor.h" #include "user.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "win.h" #include "wine/winbase16.h" DEFAULT_DEBUG_CHANNEL(event); /**********************************************************************/ static LPMOUSE_EVENT_PROC DefMouseEventProc = NULL; /*********************************************************************** * MOUSE_Inquire (MOUSE.1) */ WORD WINAPI MOUSE_Inquire(LPMOUSEINFO mouseInfo) { mouseInfo->msExist = TRUE; mouseInfo->msRelative = FALSE; mouseInfo->msNumButtons = 2; mouseInfo->msRate = 34; /* the DDK says so ... */ mouseInfo->msXThreshold = 0; mouseInfo->msYThreshold = 0; mouseInfo->msXRes = 0; mouseInfo->msYRes = 0; mouseInfo->msMouseCommPort = 0; return sizeof(MOUSEINFO); } /*********************************************************************** * MOUSE_Enable (MOUSE.2) */ VOID WINAPI MOUSE_Enable(LPMOUSE_EVENT_PROC lpMouseEventProc) { static BOOL initDone = FALSE; THUNK_Free( (FARPROC)DefMouseEventProc ); DefMouseEventProc = lpMouseEventProc; /* Now initialize the mouse driver */ if (initDone == FALSE) { USER_Driver->pInitMouse(); initDone = TRUE; } } static VOID WINAPI MOUSE_CallMouseEventProc( FARPROC16 proc, DWORD dwFlags, DWORD dx, DWORD dy, DWORD cButtons, DWORD dwExtraInfo ) { CONTEXT86 context; memset( &context, 0, sizeof(context) ); CS_reg(&context) = SELECTOROF( proc ); EIP_reg(&context) = OFFSETOF( proc ); AX_reg(&context) = (WORD)dwFlags; BX_reg(&context) = (WORD)dx; CX_reg(&context) = (WORD)dy; DX_reg(&context) = (WORD)cButtons; SI_reg(&context) = LOWORD( dwExtraInfo ); DI_reg(&context) = HIWORD( dwExtraInfo ); CallTo16RegisterShort( &context, 0 ); } VOID WINAPI WIN16_MOUSE_Enable( FARPROC16 proc ) { LPMOUSE_EVENT_PROC thunk = (LPMOUSE_EVENT_PROC)THUNK_Alloc( proc, (RELAY)MOUSE_CallMouseEventProc ); MOUSE_Enable( thunk ); } /*********************************************************************** * MOUSE_Disable (MOUSE.3) */ VOID WINAPI MOUSE_Disable(VOID) { THUNK_Free( (FARPROC)DefMouseEventProc ); DefMouseEventProc = 0; } /*********************************************************************** * MOUSE_SendEvent */ void MOUSE_SendEvent( DWORD mouseStatus, DWORD posX, DWORD posY, DWORD keyState, DWORD time, HWND hWnd ) { int width = MONITOR_GetWidth (&MONITOR_PrimaryMonitor); int height = MONITOR_GetHeight(&MONITOR_PrimaryMonitor); int iWndsLocks; WINE_MOUSEEVENT wme; if ( !DefMouseEventProc ) return; TRACE("(%04lX,%ld,%ld)\n", mouseStatus, posX, posY ); if (mouseStatus & MOUSEEVENTF_MOVE) { if (mouseStatus & MOUSEEVENTF_ABSOLUTE) { /* Relative mouse movements seems not to be scaled as absolute ones */ posX = (((long)posX << 16) + width-1) / width; posY = (((long)posY << 16) + height-1) / height; } } wme.magic = WINE_MOUSEEVENT_MAGIC; wme.time = time; wme.hWnd = hWnd; wme.keyState = keyState; USER_Driver->pEnableWarpPointer(FALSE); /* To avoid deadlocks, we have to suspend all locks on windows structures before the program control is passed to the mouse driver */ iWndsLocks = WIN_SuspendWndsLock(); DefMouseEventProc( mouseStatus, posX, posY, 0, (DWORD)&wme ); WIN_RestoreWndsLock(iWndsLocks); USER_Driver->pEnableWarpPointer(TRUE); } wine-20000526/dlls/mouse/mouserc.rc0100644000175000001440000000026107022607501016531 0ustar julliardusers/* * Top level resource file for MOUSE driver dll * */ /* this ought to be VERSION_INFO */ DUMMY1 1 { 0x1, 0x2, 0x3, 0x4, 0x5 } /* what's that ? */ DUMMY2 3 { 0x0 } wine-20000526/dlls/mpr/0040755000175000001440000000000007113604176014206 5ustar julliarduserswine-20000526/dlls/mpr/.cvsignore0100644000175000001440000000004207064445274016206 0ustar julliardusersMakefile libmpr.so.1.0 mpr.spec.c wine-20000526/dlls/mpr/Makefile.in0100644000175000001440000000040107064445274016252 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = mpr SOVERSION = 1.0 SPEC_SRCS = mpr.spec C_SRCS = \ auth.c \ mpr_main.c \ multinet.c \ nps.c \ pwcache.c \ wnet.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/mpr/auth.c0100644000175000001440000000356606753041601015317 0ustar julliardusers/* * MPR Authentication and Logon functions */ #include "winbase.h" #include "winnetwk.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(mpr) /***************************************************************** * WNetLogoffA [MPR.89] */ DWORD WINAPI WNetLogoffA( LPCSTR lpProvider, HWND hwndOwner ) { FIXME( "(%s, %04x): stub\n", debugstr_a(lpProvider), hwndOwner ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /***************************************************************** * WNetLogoffW [MPR.90] */ DWORD WINAPI WNetLogoffW( LPCWSTR lpProvider, HWND hwndOwner ) { FIXME( "(%s, %04x): stub\n", debugstr_w(lpProvider), hwndOwner ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /***************************************************************** * WNetLogonA [MPR.91] */ DWORD WINAPI WNetLogonA( LPCSTR lpProvider, HWND hwndOwner ) { FIXME( "(%s, %04x): stub\n", debugstr_a(lpProvider), hwndOwner ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /***************************************************************** * WNetLogonW [MPR.91] */ DWORD WINAPI WNetLogonW( LPCWSTR lpProvider, HWND hwndOwner ) { FIXME( "(%s, %04x): stub\n", debugstr_w(lpProvider), hwndOwner ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /***************************************************************** * WNetVerifyPasswordA [MPR.91] */ DWORD WINAPI WNetVerifyPasswordA( LPCSTR lpszPassword, BOOL *pfMatch ) { FIXME( "(%p, %p): stub\n", lpszPassword, pfMatch ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /***************************************************************** * WNetVerifyPasswordW [MPR.91] */ DWORD WINAPI WNetVerifyPasswordW( LPCWSTR lpszPassword, BOOL *pfMatch ) { FIXME( "(%p, %p): stub\n", lpszPassword, pfMatch ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } wine-20000526/dlls/mpr/mpr.spec0100644000175000001440000001243007033475134015656 0ustar julliardusersname mpr type win32 # ordinal exports 1 stub @ 2 stub @ 3 stub @ 4 stub @ 5 stub @ 6 stub @ 7 stub @ 8 stub @ 9 stub @ 12 stub @ 13 stub @ 14 stub @ 15 stub @ 16 stub @ 17 stub @ 18 stub @ 19 stub @ 20 stub @ 21 stub @ 22 stdcall @(long) MPR_Alloc 23 stdcall @(ptr long) MPR_ReAlloc 24 stdcall @(ptr) MPR_Free 25 stdcall @(ptr long) _MPR_25 @ stub DllCanUnloadNow @ stub DllGetClassObject @ stdcall MultinetGetConnectionPerformanceA(ptr ptr) MultinetGetConnectionPerformanceA @ stdcall MultinetGetConnectionPerformanceW(ptr ptr) MultinetGetConnectionPerformanceW @ stdcall MultinetGetErrorTextA(long ptr long)MultinetGetErrorTextA @ stdcall MultinetGetErrorTextW(long ptr long)MultinetGetErrorTextW @ stdcall NPSAuthenticationDialogA(ptr) NPSAuthenticationDialogA @ stdcall NPSCopyStringA(str ptr ptr) NPSCopyStringA @ stdcall NPSDeviceGetNumberA(str ptr ptr) NPSDeviceGetNumberA @ stdcall NPSDeviceGetStringA(long long ptr long) NPSDeviceGetStringA @ stdcall NPSGetProviderHandleA(ptr) NPSGetProviderHandleA @ stdcall NPSGetProviderNameA(long ptr) NPSGetProviderNameA @ stdcall NPSGetSectionNameA(long ptr) NPSGetSectionNameA @ stdcall NPSNotifyGetContextA(ptr) NPSNotifyGetContextA @ stdcall NPSNotifyRegisterA(long ptr) NPSNotifyRegisterA @ stdcall NPSSetCustomTextA(str) NPSSetCustomTextA @ stdcall NPSSetExtendedErrorA(long str) NPSSetExtendedErrorA @ stub PwdChangePasswordA @ stub PwdChangePasswordW @ stub PwdGetPasswordStatusA @ stub PwdGetPasswordStatusW @ stub PwdSetPasswordStatusA @ stub PwdSetPasswordStatusW @ stdcall WNetAddConnection2A(ptr str str long) WNetAddConnection2A @ stdcall WNetAddConnection2W(ptr wstr wstr long) WNetAddConnection2W @ stdcall WNetAddConnection3A(long ptr str str long) WNetAddConnection3A @ stdcall WNetAddConnection3W(long ptr wstr wstr long) WNetAddConnection3W @ stdcall WNetAddConnectionA(str str str) WNetAddConnectionA @ stdcall WNetAddConnectionW(wstr wstr wstr) WNetAddConnectionW @ stdcall WNetCachePassword(str long str long long long) WNetCachePassword @ stdcall WNetCancelConnection2A(str long long) WNetCancelConnection2A @ stdcall WNetCancelConnection2W(wstr long long) WNetCancelConnection2W @ stdcall WNetCancelConnectionA(str long) WNetCancelConnectionA @ stdcall WNetCancelConnectionW(wstr long) WNetCancelConnectionW @ stdcall WNetCloseEnum(long) WNetCloseEnum @ stdcall WNetConnectionDialog1A(ptr) WNetConnectionDialog1A @ stdcall WNetConnectionDialog1W(ptr) WNetConnectionDialog1W @ stdcall WNetConnectionDialog(long long) WNetConnectionDialog @ stdcall WNetDisconnectDialog1A(ptr) WNetDisconnectDialog1A @ stdcall WNetDisconnectDialog1W(ptr) WNetDisconnectDialog1W @ stdcall WNetDisconnectDialog(long long) WNetDisconnectDialog @ stdcall WNetEnumCachedPasswords(str long long ptr long) WNetEnumCachedPasswords @ stdcall WNetEnumResourceA(long ptr ptr ptr) WNetEnumResourceA @ stdcall WNetEnumResourceW(long ptr ptr ptr) WNetEnumResourceW @ stub WNetFormatNetworkNameA @ stub WNetFormatNetworkNameW @ stdcall WNetGetCachedPassword(ptr long ptr ptr long) WNetGetCachedPassword @ stdcall WNetGetConnectionA(str ptr ptr) WNetGetConnectionA @ stdcall WNetGetConnectionW(wstr ptr ptr) WNetGetConnectionW @ stub WNetGetHomeDirectoryA @ stub WNetGetHomeDirectoryW @ stdcall WNetGetLastErrorA(ptr ptr long ptr long) WNetGetLastErrorA @ stdcall WNetGetLastErrorW(ptr ptr long ptr long) WNetGetLastErrorW @ stdcall WNetGetNetworkInformationA(str ptr) WNetGetNetworkInformationA @ stdcall WNetGetNetworkInformationW(wstr ptr) WNetGetNetworkInformationW @ stdcall WNetGetProviderNameA(long ptr ptr) WNetGetProviderNameA @ stdcall WNetGetProviderNameW(long ptr ptr) WNetGetProviderNameW @ stdcall WNetGetResourceInformationA(ptr ptr ptr ptr) WNetGetResourceInformationA @ stdcall WNetGetResourceInformationW(ptr ptr ptr ptr) WNetGetResourceInformationW @ stdcall WNetGetResourceParentA(ptr ptr ptr) WNetGetResourceParentA @ stdcall WNetGetResourceParentW(ptr ptr ptr) WNetGetResourceParentW @ stdcall WNetGetUniversalNameA (str long ptr ptr) WNetGetUniversalNameA @ stdcall WNetGetUniversalNameW (wstr long ptr ptr) WNetGetUniversalNameW @ stdcall WNetGetUserA(str ptr ptr) WNetGetUserA @ stdcall WNetGetUserW(wstr wstr ptr) WNetGetUserW @ stdcall WNetLogoffA(str long) WNetLogoffA @ stdcall WNetLogoffW(wstr long) WNetLogoffW @ stdcall WNetLogonA(str long) WNetLogonA @ stdcall WNetLogonW(wstr long) WNetLogonW @ stdcall WNetOpenEnumA(long long long ptr ptr) WNetOpenEnumA @ stdcall WNetOpenEnumW(long long long ptr ptr) WNetOpenEnumW @ stdcall WNetRemoveCachedPassword(long long long) WNetRemoveCachedPassword @ stdcall WNetRestoreConnectionA(long str) WNetRestoreConnectionA @ stdcall WNetRestoreConnectionW(long wstr) WNetRestoreConnectionW @ stdcall WNetSetConnectionA(str long ptr) WNetSetConnectionA @ stdcall WNetSetConnectionW(wstr long ptr) WNetSetConnectionW @ stdcall WNetUseConnectionA(long ptr str str long str ptr ptr) WNetUseConnectionA @ stdcall WNetUseConnectionW(long ptr wstr wstr long wstr ptr ptr) WNetUseConnectionW @ stdcall WNetVerifyPasswordA(str ptr) WNetVerifyPasswordA @ stdcall WNetVerifyPasswordW(wstr ptr) WNetVerifyPasswordW #additions, not in win95 mpr.dll @ stub WNetRestoreConnection @ stub WNetLogonNotify @ stub WNetPasswordChangeNotify @ stub WNetGetPropertyTextA @ stub WNetPropertyDialogA @ stub WNetGetDirectoryTypeA @ stub WNetFMXGetPermHelp @ stub WNetFMXEditPerm @ stub WNetFMXGetPermCaps wine-20000526/dlls/mpr/mpr_main.c0100644000175000001440000000230207066752015016151 0ustar julliardusers/* * MPR undocumented functions */ #include "winbase.h" #include "winnetwk.h" #include "heap.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(mpr) /* * FIXME: The following routines should use a private heap ... */ /***************************************************************** * MPR_Alloc [MPR.22] */ LPVOID WINAPI MPR_Alloc( DWORD dwSize ) { return HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, dwSize ); } /***************************************************************** * MPR_ReAlloc [MPR.23] */ LPVOID WINAPI MPR_ReAlloc( LPVOID lpSrc, DWORD dwSize ) { if ( lpSrc ) return HeapReAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, lpSrc, dwSize ); else return HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, dwSize ); } /***************************************************************** * MPR_Free [MPR.24] */ BOOL WINAPI MPR_Free( LPVOID lpMem ) { if ( lpMem ) return HeapFree( GetProcessHeap(), 0, lpMem ); else return FALSE; } /***************************************************************** * _MPR_25 [MPR.25] */ BOOL WINAPI _MPR_25( LPBYTE lpMem, INT len ) { FIXME( "(%p, %d): stub\n", lpMem, len ); return FALSE; } wine-20000526/dlls/mpr/multinet.c0100644000175000001440000000316106753041601016206 0ustar julliardusers/* * MPR Multinet functions */ #include "winbase.h" #include "winnetwk.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(mpr) /***************************************************************** * MultinetGetConnectionPerformanceA [MPR.25] * * RETURNS * Success: NO_ERROR * Failure: ERROR_NOT_SUPPORTED, ERROR_NOT_CONNECTED, * ERROR_NO_NET_OR_BAD_PATH, ERROR_BAD_DEVICE, * ERROR_BAD_NET_NAME, ERROR_INVALID_PARAMETER, * ERROR_NO_NETWORK, ERROR_EXTENDED_ERROR */ DWORD WINAPI MultinetGetConnectionPerformanceA( LPNETRESOURCEA lpNetResource, LPNETCONNECTINFOSTRUCT lpNetConnectInfoStruct ) { FIXME( "(%p, %p): stub\n", lpNetResource, lpNetConnectInfoStruct ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /***************************************************************** * MultinetGetConnectionPerformanceW [MPR.26] */ DWORD WINAPI MultinetGetConnectionPerformanceW( LPNETRESOURCEW lpNetResource, LPNETCONNECTINFOSTRUCT lpNetConnectInfoStruct ) { FIXME( "(%p, %p): stub\n", lpNetResource, lpNetConnectInfoStruct ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /***************************************************************** * MultinetGetErrorTextA [MPR.27] */ DWORD WINAPI MultinetGetErrorTextA( DWORD x, DWORD y, DWORD z ) { FIXME( "(%lx, %lx, %lx): stub\n", x, y, z ); return 0; } /***************************************************************** * MultinetGetErrorTextW [MPR.28] */ DWORD WINAPI MultinetGetErrorTextW( DWORD x, DWORD y, DWORD z ) { FIXME( "(%lx, %lx, %lx ): stub\n", x, y, z ); return 0; } wine-20000526/dlls/mpr/nps.c0100644000175000001440000000630006753041601015143 0ustar julliardusers/* * MPR Network Provider Services functions */ #include "winbase.h" #include "winnetwk.h" #include "netspi.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(mpr) /***************************************************************** * NPSAuthenticationDialogA [MPR.30] */ DWORD WINAPI NPSAuthenticationDialogA( LPAUTHDLGSTRUCTA lpAuthDlgStruct ) { FIXME( "(%p): stub\n", lpAuthDlgStruct ); return WN_NOT_SUPPORTED; } /***************************************************************** * NPSGetProviderHandleA [MPR.34] */ DWORD WINAPI NPSGetProviderHandleA( PHPROVIDER phProvider ) { FIXME( "(%p): stub\n", phProvider ); return WN_NOT_SUPPORTED; } /***************************************************************** * NPSGetProviderNameA [MPR.35] */ DWORD WINAPI NPSGetProviderNameA( HPROVIDER hProvider, LPCSTR *lpszProviderName ) { FIXME( "(%p, %p): stub\n", hProvider, lpszProviderName ); return WN_NOT_SUPPORTED; } /***************************************************************** * NPSGetSectionNameA [MPR.36] */ DWORD WINAPI NPSGetSectionNameA( HPROVIDER hProvider, LPCSTR *lpszSectionName ) { FIXME( "(%p, %p): stub\n", hProvider, lpszSectionName ); return WN_NOT_SUPPORTED; } /***************************************************************** * NPSSetExtendedErrorA [MPR.40] */ DWORD WINAPI NPSSetExtendedErrorA( DWORD NetSpecificError, LPSTR lpExtendedErrorText ) { FIXME( "(%08lx, %s): stub\n", NetSpecificError, debugstr_a(lpExtendedErrorText) ); return WN_NOT_SUPPORTED; } /***************************************************************** * NPSSetCustomTextA [MPR.39] */ VOID WINAPI NPSSetCustomTextA( LPSTR lpCustomErrorText ) { FIXME( "(%s): stub\n", debugstr_a(lpCustomErrorText) ); } /***************************************************************** * NPSCopyStringA [MPR.31] */ DWORD WINAPI NPSCopyStringA( LPCSTR lpString, LPVOID lpBuffer, LPDWORD lpdwBufferSize ) { FIXME( "(%s, %p, %p): stub\n", debugstr_a(lpString), lpBuffer, lpdwBufferSize ); return WN_NOT_SUPPORTED; } /***************************************************************** * NPSDeviceGetNumberA [MPR.32] */ DWORD WINAPI NPSDeviceGetNumberA( LPSTR lpLocalName, LPDWORD lpdwNumber, LPDWORD lpdwType ) { FIXME( "(%s, %p, %p): stub\n", debugstr_a(lpLocalName), lpdwNumber, lpdwType ); return WN_NOT_SUPPORTED; } /***************************************************************** * NPSDeviceGetStringA [MPR.33] */ DWORD WINAPI NPSDeviceGetStringA( DWORD dwNumber, DWORD dwType, LPSTR lpLocalName, LPDWORD lpdwBufferSize ) { FIXME( "(%ld, %ld, %p, %p): stub\n", dwNumber, dwType, lpLocalName, lpdwBufferSize ); return WN_NOT_SUPPORTED; } /***************************************************************** * NPSNotifyRegisterA [MPR.38] */ DWORD WINAPI NPSNotifyRegisterA( enum NOTIFYTYPE NotifyType, NOTIFYCALLBACK pfNotifyCallBack ) { FIXME( "(%d, %p): stub\n", NotifyType, pfNotifyCallBack ); return WN_NOT_SUPPORTED; } /***************************************************************** * NPSNotifyGetContextA [MPR.37] */ LPVOID WINAPI NPSNotifyGetContextA( NOTIFYCALLBACK pfNotifyCallBack ) { FIXME( "(%p): stub\n", pfNotifyCallBack ); return NULL; } wine-20000526/dlls/mpr/pwcache.c0100644000175000001440000000641607016612267015772 0ustar julliardusers/* * MPR Password Cache functions */ #include "winbase.h" #include "winnetwk.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(mpr) /************************************************************************** * WNetCachePassword [MPR.52] Saves password in cache * * NOTES * only the parameter count is verifyed * * ---- everything below this line might be wrong (js) ----- * RETURNS * Success: WN_SUCCESS * Failure: WN_ACCESS_DENIED, WN_BAD_PASSWORD, WN_BADVALUE, WN_NET_ERROR, * WN_NOT_SUPPORTED, WN_OUT_OF_MEMORY */ DWORD WINAPI WNetCachePassword( LPSTR pbResource, /* [in] Name of workgroup, computer, or resource */ WORD cbResource, /* [in] Size of name */ LPSTR pbPassword, /* [in] Buffer containing password */ WORD cbPassword, /* [in] Size of password */ BYTE nType, /* [in] Type of password to cache */ WORD x) { FIXME( "(%p(%s), %d, %p(%s), %d, %d, 0x%08x): stub\n", pbResource, debugstr_a(pbResource), cbResource, pbPassword, debugstr_a(pbPassword), cbPassword, nType, x ); return WN_SUCCESS; } /***************************************************************** * WNetRemoveCachedPassword [MPR.95] */ UINT WINAPI WNetRemoveCachedPassword( LPSTR pbResource, WORD cbResource, BYTE nType ) { FIXME( "(%p(%s), %d, %d): stub\n", pbResource, debugstr_a(pbResource), cbResource, nType ); return WN_SUCCESS; } /***************************************************************** * WNetGetCachedPassword [MPR.69] Retrieves password from cache * * NOTES * the stub seems to be wrong: * arg1: ptr 0x40xxxxxx -> (no string) * arg2: len 36 * arg3: ptr 0x40xxxxxx -> (no string) * arg4: ptr 0x40xxxxxx -> 0xc8 * arg5: type? 4 * * ---- everything below this line might be wrong (js) ----- * RETURNS * Success: WN_SUCCESS * Failure: WN_ACCESS_DENIED, WN_BAD_PASSWORD, WN_BAD_VALUE, * WN_NET_ERROR, WN_NOT_SUPPORTED, WN_OUT_OF_MEMORY */ DWORD WINAPI WNetGetCachedPassword( LPSTR pbResource, /* [in] Name of workgroup, computer, or resource */ WORD cbResource, /* [in] Size of name */ LPSTR pbPassword, /* [out] Buffer to receive password */ LPWORD pcbPassword, /* [out] Receives size of password */ BYTE nType) /* [in] Type of password to retrieve */ { FIXME( "(%p(%s), %d, %p, %p, %d): stub\n", pbResource, debugstr_a(pbResource), cbResource, pbPassword, pcbPassword, nType ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /******************************************************************* * WNetEnumCachedPasswords [MPR.61] * * NOTES * the parameter count is verifyed * * observed values: * arg1 ptr 0x40xxxxxx -> (no string) * arg2 int 32 * arg3 type? 4 * arg4 enumPasswordProc (verifyed) * arg5 ptr 0x40xxxxxx -> 0x0 * * ---- everything below this line might be wrong (js) ----- */ UINT WINAPI WNetEnumCachedPasswords( LPSTR pbPrefix, WORD cbPrefix, BYTE nType, ENUMPASSWORDPROC enumPasswordProc, DWORD x) { FIXME( "(%p(%s), %d, %d, %p, 0x%08lx): stub\n", pbPrefix, debugstr_a(pbPrefix), cbPrefix, nType, enumPasswordProc, x ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } wine-20000526/dlls/mpr/wnet.c0100644000175000001440000004465306753041601015335 0ustar julliardusers/* * MPR WNet functions */ #include #include #include #include #include #include "winbase.h" #include "winnetwk.h" #include "drive.h" #include "heap.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(mpr) /* * Browsing Functions */ /********************************************************************* * WNetOpenEnumA [MPR.92] */ DWORD WINAPI WNetOpenEnumA( DWORD dwScope, DWORD dwType, DWORD dwUsage, LPNETRESOURCEA lpNet, LPHANDLE lphEnum ) { FIXME( "(%08lX, %08lX, %08lX, %p, %p): stub\n", dwScope, dwType, dwUsage, lpNet, lphEnum ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /********************************************************************* * WNetOpenEnumW [MPR.93] */ DWORD WINAPI WNetOpenEnumW( DWORD dwScope, DWORD dwType, DWORD dwUsage, LPNETRESOURCEW lpNet, LPHANDLE lphEnum ) { FIXME( "(%08lX, %08lX, %08lX, %p, %p): stub\n", dwScope, dwType, dwUsage, lpNet, lphEnum ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /********************************************************************* * WNetEnumResourceA [MPR.66] */ DWORD WINAPI WNetEnumResourceA( HANDLE hEnum, LPDWORD lpcCount, LPVOID lpBuffer, LPDWORD lpBufferSize ) { FIXME( "(%04X, %p, %p, %p): stub\n", hEnum, lpcCount, lpBuffer, lpBufferSize ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /********************************************************************* * WNetEnumResourceW [MPR.67] */ DWORD WINAPI WNetEnumResourceW( HANDLE hEnum, LPDWORD lpcCount, LPVOID lpBuffer, LPDWORD lpBufferSize ) { FIXME( "(%04X, %p, %p, %p): stub\n", hEnum, lpcCount, lpBuffer, lpBufferSize ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /********************************************************************* * WNetCloseEnum [MPR.58] */ DWORD WINAPI WNetCloseEnum( HANDLE hEnum ) { FIXME( "(%04X): stub\n", hEnum ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /********************************************************************* * WNetGetResourceInformationA [MPR.80] */ DWORD WINAPI WNetGetResourceInformationA( LPNETRESOURCEA lpNetResource, LPVOID lpBuffer, LPDWORD cbBuffer, LPSTR *lplpSystem ) { FIXME( "(%p, %p, %p, %p): stub\n", lpNetResource, lpBuffer, cbBuffer, lplpSystem ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /********************************************************************* * WNetGetResourceInformationW [MPR.80] */ DWORD WINAPI WNetGetResourceInformationW( LPNETRESOURCEW lpNetResource, LPVOID lpBuffer, LPDWORD cbBuffer, LPWSTR *lplpSystem ) { FIXME( "(%p, %p, %p, %p): stub\n", lpNetResource, lpBuffer, cbBuffer, lplpSystem ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /********************************************************************* * WNetGetResourceParentA [MPR.83] */ DWORD WINAPI WNetGetResourceParentA( LPNETRESOURCEA lpNetResource, LPVOID lpBuffer, LPDWORD lpBufferSize ) { FIXME( "(%p, %p, %p): stub\n", lpNetResource, lpBuffer, lpBufferSize ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /********************************************************************* * WNetGetResourceParentW [MPR.84] */ DWORD WINAPI WNetGetResourceParentW( LPNETRESOURCEW lpNetResource, LPVOID lpBuffer, LPDWORD lpBufferSize ) { FIXME( "(%p, %p, %p): stub\n", lpNetResource, lpBuffer, lpBufferSize ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /* * Connection Functions */ /********************************************************************* * WNetAddConnectionA [MPR.50] */ DWORD WINAPI WNetAddConnectionA( LPCSTR lpRemoteName, LPCSTR lpPassword, LPCSTR lpLocalName ) { FIXME( "(%s, %p, %s): stub\n", debugstr_a(lpRemoteName), lpPassword, debugstr_a(lpLocalName) ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /********************************************************************* * WNetAddConnectionW [MPR.51] */ DWORD WINAPI WNetAddConnectionW( LPCWSTR lpRemoteName, LPCWSTR lpPassword, LPCWSTR lpLocalName ) { FIXME( "(%s, %p, %s): stub\n", debugstr_w(lpRemoteName), lpPassword, debugstr_w(lpLocalName) ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /********************************************************************* * WNetAddConnection2A [MPR.46] */ DWORD WINAPI WNetAddConnection2A( LPNETRESOURCEA lpNetResource, LPCSTR lpPassword, LPCSTR lpUserID, DWORD dwFlags ) { FIXME( "(%p, %p, %s, 0x%08lX): stub\n", lpNetResource, lpPassword, debugstr_a(lpUserID), dwFlags ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /********************************************************************* * WNetAddConnection2W [MPR.47] */ DWORD WINAPI WNetAddConnection2W( LPNETRESOURCEW lpNetResource, LPCWSTR lpPassword, LPCWSTR lpUserID, DWORD dwFlags ) { FIXME( "(%p, %p, %s, 0x%08lX): stub\n", lpNetResource, lpPassword, debugstr_w(lpUserID), dwFlags ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /********************************************************************* * WNetAddConnection3A [MPR.48] */ DWORD WINAPI WNetAddConnection3A( HWND hwndOwner, LPNETRESOURCEA lpNetResource, LPCSTR lpPassword, LPCSTR lpUserID, DWORD dwFlags ) { FIXME( "(%04x, %p, %p, %s, 0x%08lX), stub\n", hwndOwner, lpNetResource, lpPassword, debugstr_a(lpUserID), dwFlags ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /********************************************************************* * WNetAddConnection3W [MPR.49] */ DWORD WINAPI WNetAddConnection3W( HWND hwndOwner, LPNETRESOURCEW lpNetResource, LPCWSTR lpPassword, LPCWSTR lpUserID, DWORD dwFlags ) { FIXME( "(%04x, %p, %p, %s, 0x%08lX), stub\n", hwndOwner, lpNetResource, lpPassword, debugstr_w(lpUserID), dwFlags ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /***************************************************************** * WNetUseConnectionA [MPR.100] */ DWORD WINAPI WNetUseConnectionA( HWND hwndOwner, LPNETRESOURCEA lpNetResource, LPCSTR lpPassword, LPCSTR lpUserID, DWORD dwFlags, LPSTR lpAccessName, LPDWORD lpBufferSize, LPDWORD lpResult ) { FIXME( "(%04x, %p, %p, %s, 0x%08lX, %s, %p, %p), stub\n", hwndOwner, lpNetResource, lpPassword, debugstr_a(lpUserID), dwFlags, debugstr_a(lpAccessName), lpBufferSize, lpResult ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /***************************************************************** * WNetUseConnectionW [MPR.101] */ DWORD WINAPI WNetUseConnectionW( HWND hwndOwner, LPNETRESOURCEW lpNetResource, LPCWSTR lpPassword, LPCWSTR lpUserID, DWORD dwFlags, LPWSTR lpAccessName, LPDWORD lpBufferSize, LPDWORD lpResult ) { FIXME( "(%04x, %p, %p, %s, 0x%08lX, %s, %p, %p), stub\n", hwndOwner, lpNetResource, lpPassword, debugstr_w(lpUserID), dwFlags, debugstr_w(lpAccessName), lpBufferSize, lpResult ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /********************************************************************* * WNetCancelConnectionA [MPR.55] */ DWORD WINAPI WNetCancelConnectionA( LPCSTR lpName, BOOL fForce ) { FIXME( "(%s, %d), stub\n", debugstr_a(lpName), fForce ); return WN_SUCCESS; } /********************************************************************* * WNetCancelConnectionW [MPR.56] */ DWORD WINAPI WNetCancelConnectionW( LPCWSTR lpName, BOOL fForce ) { FIXME( "(%s, %d), stub\n", debugstr_w(lpName), fForce ); return WN_SUCCESS; } /********************************************************************* * WNetCancelConnection2A [MPR.53] */ DWORD WINAPI WNetCancelConnection2A( LPCSTR lpName, DWORD dwFlags, BOOL fForce ) { FIXME( "(%s, %08lX, %d), stub\n", debugstr_a(lpName), dwFlags, fForce ); return WN_SUCCESS; } /********************************************************************* * WNetCancelConnection2W [MPR.54] */ DWORD WINAPI WNetCancelConnection2W( LPCWSTR lpName, DWORD dwFlags, BOOL fForce ) { FIXME( "(%s, %08lX, %d), stub\n", debugstr_w(lpName), dwFlags, fForce ); return WN_SUCCESS; } /***************************************************************** * WNetRestoreConnectionA [MPR.96] */ DWORD WINAPI WNetRestoreConnectionA( HWND hwndOwner, LPSTR lpszDevice ) { FIXME( "(%04X, %s), stub\n", hwndOwner, debugstr_a(lpszDevice) ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /***************************************************************** * WNetRestoreConnectionW [MPR.97] */ DWORD WINAPI WNetRestoreConnectionW( HWND hwndOwner, LPWSTR lpszDevice ) { FIXME( "(%04X, %s), stub\n", hwndOwner, debugstr_w(lpszDevice) ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /************************************************************************** * WNetGetConnectionA [MPR.71] * * RETURNS * - WN_BAD_LOCALNAME lpLocalName makes no sense * - WN_NOT_CONNECTED drive is a local drive * - WN_MORE_DATA buffer isn't big enough * - WN_SUCCESS success (net path in buffer) * */ DWORD WINAPI WNetGetConnectionA( LPCSTR lpLocalName, LPSTR lpRemoteName, LPDWORD lpBufferSize ) { const char *path; TRACE( "local %s\n", lpLocalName ); if (lpLocalName[1] == ':') { int drive = toupper(lpLocalName[0]) - 'A'; switch(DRIVE_GetType(drive)) { case TYPE_INVALID: return WN_BAD_LOCALNAME; case TYPE_NETWORK: path = DRIVE_GetLabel(drive); if (strlen(path) + 1 > *lpBufferSize) { *lpBufferSize = strlen(path) + 1; return WN_MORE_DATA; } strcpy( lpRemoteName, path ); *lpBufferSize = strlen(lpRemoteName) + 1; return WN_SUCCESS; case TYPE_FLOPPY: case TYPE_HD: case TYPE_CDROM: TRACE("file is local\n"); return WN_NOT_CONNECTED; default: return WN_BAD_LOCALNAME; } } return WN_BAD_LOCALNAME; } /************************************************************************** * WNetGetConnectionW [MPR.72] */ DWORD WINAPI WNetGetConnectionW( LPCWSTR lpLocalName, LPWSTR lpRemoteName, LPDWORD lpBufferSize ) { DWORD x; CHAR buf[200]; LPSTR lnA = HEAP_strdupWtoA( GetProcessHeap(), 0, lpLocalName ); DWORD ret = WNetGetConnectionA( lnA, buf, &x ); lstrcpyAtoW( lpRemoteName, buf ); *lpBufferSize=lstrlenW( lpRemoteName ); HeapFree( GetProcessHeap(), 0, lnA ); return ret; } /************************************************************************** * WNetSetConnectionA [MPR.72] */ DWORD WINAPI WNetSetConnectionA( LPCSTR lpName, DWORD dwProperty, LPVOID pvValue ) { FIXME( "(%s, %08lX, %p): stub\n", debugstr_a(lpName), dwProperty, pvValue ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /************************************************************************** * WNetSetConnectionW [MPR.72] */ DWORD WINAPI WNetSetConnectionW( LPCWSTR lpName, DWORD dwProperty, LPVOID pvValue ) { FIXME( "(%s, %08lX, %p): stub\n", debugstr_w(lpName), dwProperty, pvValue ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /***************************************************************** * WNetGetUniversalNameA [MPR.85] */ DWORD WINAPI WNetGetUniversalNameA ( LPCSTR lpLocalPath, DWORD dwInfoLevel, LPVOID lpBuffer, LPDWORD lpBufferSize ) { FIXME( "(%s, 0x%08lX, %p, %p): stub\n", debugstr_a(lpLocalPath), dwInfoLevel, lpBuffer, lpBufferSize); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /***************************************************************** * WNetGetUniversalNameW [MPR.86] */ DWORD WINAPI WNetGetUniversalNameW ( LPCWSTR lpLocalPath, DWORD dwInfoLevel, LPVOID lpBuffer, LPDWORD lpBufferSize ) { FIXME( "(%s, 0x%08lX, %p, %p): stub\n", debugstr_w(lpLocalPath), dwInfoLevel, lpBuffer, lpBufferSize); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /* * Other Functions */ /************************************************************************** * WNetGetUserA [MPR.86] * * FIXME: we should not return ourselves, but the owner of the drive lpName */ DWORD WINAPI WNetGetUserA( LPCSTR lpName, LPSTR lpUserID, LPDWORD lpBufferSize ) { struct passwd *pwd = getpwuid(getuid()); FIXME( "(%s, %p, %p): mostly stub\n", debugstr_a(lpName), lpUserID, lpBufferSize ); if (pwd) { if ( strlen(pwd->pw_name) + 1 > *lpBufferSize ) { *lpBufferSize = strlen(pwd->pw_name) + 1; SetLastError(ERROR_MORE_DATA); return ERROR_MORE_DATA; } strcpy( lpUserID, pwd->pw_name ); *lpBufferSize = strlen(pwd->pw_name) + 1; return WN_SUCCESS; } /* FIXME: wrong return value */ SetLastError(ERROR_NO_NETWORK); return ERROR_NO_NETWORK; } /***************************************************************** * WNetGetUserW [MPR.87] */ DWORD WINAPI WNetGetUserW( LPCWSTR lpName, LPWSTR lpUserID, LPDWORD lpBufferSize ) { FIXME( "(%s, %p, %p): mostly stub\n", debugstr_w(lpName), lpUserID, lpBufferSize ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /********************************************************************* * WNetConnectionDialog [MPR.61] */ DWORD WINAPI WNetConnectionDialog( HWND hwnd, DWORD dwType ) { FIXME( "(%04x, %08lX): stub\n", hwnd, dwType ); SetLastError(WN_NO_NETWORK); return ERROR_NO_NETWORK; } /********************************************************************* * WNetConnectionDialog1A [MPR.59] */ DWORD WINAPI WNetConnectionDialog1A( LPCONNECTDLGSTRUCTA lpConnDlgStruct ) { FIXME( "(%p): stub\n", lpConnDlgStruct ); SetLastError(WN_NO_NETWORK); return ERROR_NO_NETWORK; } /********************************************************************* * WNetConnectionDialog1W [MPR.60] */ DWORD WINAPI WNetConnectionDialog1W( LPCONNECTDLGSTRUCTW lpConnDlgStruct ) { FIXME( "(%p): stub\n", lpConnDlgStruct ); SetLastError(WN_NO_NETWORK); return ERROR_NO_NETWORK; } /********************************************************************* * WNetDisconnectDialog [MPR.64] */ DWORD WINAPI WNetDisconnectDialog( HWND hwnd, DWORD dwType ) { FIXME( "(%04x, %08lX): stub\n", hwnd, dwType ); SetLastError(WN_NO_NETWORK); return ERROR_NO_NETWORK; } /********************************************************************* * WNetDisconnectDialog1A [MPR.62] */ DWORD WINAPI WNetDisconnectDialog1A( LPDISCDLGSTRUCTA lpConnDlgStruct ) { FIXME( "(%p): stub\n", lpConnDlgStruct ); SetLastError(WN_NO_NETWORK); return ERROR_NO_NETWORK; } /********************************************************************* * WNetDisconnectDialog1W [MPR.63] */ DWORD WINAPI WNetDisconnectDialog1W( LPDISCDLGSTRUCTW lpConnDlgStruct ) { FIXME( "(%p): stub\n", lpConnDlgStruct ); SetLastError(WN_NO_NETWORK); return ERROR_NO_NETWORK; } /********************************************************************* * WNetGetLastErrorA [MPR.75] */ DWORD WINAPI WNetGetLastErrorA( LPDWORD lpError, LPSTR lpErrorBuf, DWORD nErrorBufSize, LPSTR lpNameBuf, DWORD nNameBufSize ) { FIXME( "(%p, %p, %ld, %p, %ld): stub\n", lpError, lpErrorBuf, nErrorBufSize, lpNameBuf, nNameBufSize ); SetLastError(WN_NO_NETWORK); return ERROR_NO_NETWORK; } /********************************************************************* * WNetGetLastErrorW [MPR.76] */ DWORD WINAPI WNetGetLastErrorW( LPDWORD lpError, LPWSTR lpErrorBuf, DWORD nErrorBufSize, LPWSTR lpNameBuf, DWORD nNameBufSize ) { FIXME( "(%p, %p, %ld, %p, %ld): stub\n", lpError, lpErrorBuf, nErrorBufSize, lpNameBuf, nNameBufSize ); SetLastError(WN_NO_NETWORK); return ERROR_NO_NETWORK; } /********************************************************************* * WNetGetNetworkInformationA [MPR.77] */ DWORD WINAPI WNetGetNetworkInformationA( LPCSTR lpProvider, LPNETINFOSTRUCT lpNetInfoStruct ) { FIXME( "(%s, %p): stub\n", debugstr_a(lpProvider), lpNetInfoStruct ); SetLastError(WN_NO_NETWORK); return ERROR_NO_NETWORK; } /********************************************************************* * WNetGetNetworkInformationW [MPR.77] */ DWORD WINAPI WNetGetNetworkInformationW( LPCWSTR lpProvider, LPNETINFOSTRUCT lpNetInfoStruct ) { FIXME( "(%s, %p): stub\n", debugstr_w(lpProvider), lpNetInfoStruct ); SetLastError(WN_NO_NETWORK); return ERROR_NO_NETWORK; } /***************************************************************** * WNetGetProviderNameA [MPR.79] */ DWORD WINAPI WNetGetProviderNameA( DWORD dwNetType, LPSTR lpProvider, LPDWORD lpBufferSize ) { FIXME( "(%ld, %p, %p): stub\n", dwNetType, lpProvider, lpBufferSize ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } /***************************************************************** * WNetGetProviderNameW [MPR.80] */ DWORD WINAPI WNetGetProviderNameW( DWORD dwNetType, LPWSTR lpProvider, LPDWORD lpBufferSize ) { FIXME( "(%ld, %p, %p): stub\n", dwNetType, lpProvider, lpBufferSize ); SetLastError(WN_NO_NETWORK); return WN_NO_NETWORK; } wine-20000526/dlls/msacm/0040755000175000001440000000000007113604176014510 5ustar julliarduserswine-20000526/dlls/msacm/.cvsignore0100644000175000001440000000006007045213573016502 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libmsacm.so.1.0 wine-20000526/dlls/msacm/Makefile.in0100644000175000001440000000031707060307301016542 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = msacm SOVERSION = 1.0 SPEC_SRCS = msacm.spec C_SRCS = \ msacm_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/msacm/msacm.spec0100644000175000001440000000414506746606647016505 0ustar julliardusersname msacm type win16 1 stub WEP 2 stub DRIVERPROC 3 stub ___EXPORTEDSTUB 7 pascal acmGetVersion() acmGetVersion16 8 pascal16 acmMetrics(word word ptr) acmMetrics16 10 pascal16 acmDriverEnum(ptr long long) acmDriverEnum16 11 pascal16 acmDriverDetails(word ptr long) acmDriverDetails16 12 pascal16 acmDriverAdd(ptr word long long long) acmDriverAdd16 13 pascal16 acmDriverRemove(word long) acmDriverRemove16 14 pascal16 acmDriverOpen(ptr word long) acmDriverOpen16 15 pascal16 acmDriverClose(word long) acmDriverClose16 16 pascal acmDriverMessage(word word long long) acmDriverMessage16 17 pascal16 acmDriverID(word ptr long) acmDriverID16 18 pascal16 acmDriverPriority(word long long) acmDriverPriority16 30 pascal16 acmFormatTagDetails(word ptr long) acmFormatTagDetails16 31 pascal16 acmFormatTagEnum(word ptr ptr long long) acmFormatTagEnum16 40 pascal16 acmFormatChoose(ptr) acmFormatChoose16 41 pascal16 acmFormatDetails(word ptr long) acmFormatDetails16 42 pascal16 acmFormatEnum(word ptr ptr long long) acmFormatEnum16 45 pascal16 acmFormatSuggest(word ptr ptr long long) acmFormatSuggest16 50 pascal16 acmFilterTagDetails(word ptr long) acmFilterTagDetails16 51 pascal16 acmFilterTagEnum(word ptr ptr long long) acmFilterTagEnum16 60 pascal16 acmFilterChoose(ptr) acmFilterChoose16 61 pascal16 acmFilterDetails(word ptr long) acmFilterDetails16 62 pascal16 acmFilterEnum(word ptr ptr long long) acmFilterEnum16 70 pascal16 acmStreamOpen(ptr word ptr ptr ptr long long long) acmStreamOpen16 71 pascal16 acmStreamClose(word long) acmStreamClose16 72 pascal16 acmStreamSize(word long ptr long) acmStreamSize16 75 pascal16 acmStreamConvert(word ptr long) acmStreamConvert16 76 pascal16 acmStreamReset(word long) acmStreamReset16 77 pascal16 acmStreamPrepareHeader(word ptr long) acmStreamPrepareHeader16 78 pascal16 acmStreamUnprepareHeader(word ptr long) acmStreamUnprepareHeader16 150 stub ACMAPPLICATIONEXIT 175 stub ACMHUGEPAGELOCK 176 stub ACMHUGEPAGEUNLOCK 200 stub ACMOPENCONVERSION 201 stub ACMCLOSECONVERSION 202 stub ACMCONVERT 203 stub ACMCHOOSEFORMAT wine-20000526/dlls/msacm/msacm_main.c0100644000175000001440000002657507073170674017002 0ustar julliardusers/* * MSACM library * * Copyright 1998 Patrik Stridvall */ #include "winbase.h" #include "winerror.h" #include "msacm.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(msacm) /*********************************************************************** * acmGetVersion (MSACM.7) */ DWORD WINAPI acmGetVersion16() { FIXME("(): stub\n"); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; /* FIXME */ } /*********************************************************************** * acmMetrics (MSACM.8) */ MMRESULT16 WINAPI acmMetrics16( HACMOBJ16 hao, UINT16 uMetric, LPVOID pMetric) { FIXME("(0x%04x, %d, %p): stub\n", hao, uMetric, pMetric); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmDriverEnum (MSACM.10) */ MMRESULT16 WINAPI acmDriverEnum16( ACMDRIVERENUMCB16 fnCallback, DWORD dwInstance, DWORD fdwEnum) { FIXME("(%p, %ld, %ld): stub\n", fnCallback, dwInstance, fdwEnum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmDriverDetails (MSACM.11) */ MMRESULT16 WINAPI acmDriverDetails16( HACMDRIVERID16 hadid, LPACMDRIVERDETAILS16 padd, DWORD fdwDetails) { FIXME("(0x%04x, %p, %ld): stub\n", hadid, padd, fdwDetails); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmDriverAdd (MSACM.12) */ MMRESULT16 WINAPI acmDriverAdd16( LPHACMDRIVERID16 phadid, HINSTANCE16 hinstModule, LPARAM lParam, DWORD dwPriority, DWORD fdwAdd) { FIXME("(%p, 0x%04x, %ld, %ld, %ld): stub\n", phadid, hinstModule, lParam, dwPriority, fdwAdd ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmDriverRemove (MSACM.13) */ MMRESULT16 WINAPI acmDriverRemove16( HACMDRIVERID16 hadid, DWORD fdwRemove) { FIXME("(0x%04x, %ld): stub\n", hadid, fdwRemove); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmDriverOpen (MSACM.14) */ MMRESULT16 WINAPI acmDriverOpen16( LPHACMDRIVER16 phad, HACMDRIVERID16 hadid, DWORD fdwOpen) { FIXME("(%p, 0x%04x, %ld): stub\n", phad, hadid, fdwOpen); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmDriverClose (MSACM.15) */ MMRESULT16 WINAPI acmDriverClose16( HACMDRIVER16 had, DWORD fdwClose) { FIXME("(0x%04x, %ld): stub\n", had, fdwClose); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmDriverMessage (MSACM.16) */ LRESULT WINAPI acmDriverMessage16( HACMDRIVER16 had, UINT16 uMsg, LPARAM lParam1, LPARAM lParam2) { FIXME("(0x%04x, %d, %ld, %ld): stub\n", had, uMsg, lParam1, lParam2 ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return 0; } /*********************************************************************** * acmDriverID (MSACM.17) */ MMRESULT16 WINAPI acmDriverID16( HACMOBJ16 hao, LPHACMDRIVERID16 phadid, DWORD fdwDriverID) { FIXME("(0x%04x, %p, %ld): stub\n", hao, phadid, fdwDriverID); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmDriverPriority (MSACM.18) */ MMRESULT16 WINAPI acmDriverPriority16( HACMDRIVERID16 hadid, DWORD dwPriority, DWORD fdwPriority) { FIXME("(0x%04x, %ld, %ld): stub\n", hadid, dwPriority, fdwPriority ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFormatTagDetails (MSACM.30) */ MMRESULT16 WINAPI acmFormatTagDetails16( HACMDRIVER16 had, LPACMFORMATTAGDETAILS16 paftd, DWORD fdwDetails) { FIXME("(0x%04x, %p, %ld): stub\n", had, paftd, fdwDetails); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFormatTagEnum (MSACM.31) */ MMRESULT16 WINAPI acmFormatTagEnum16( HACMDRIVER16 had, LPACMFORMATTAGDETAILS16 paftd, ACMFORMATTAGENUMCB16 fnCallback, DWORD dwInstance, DWORD fdwEnum) { FIXME("(0x%04x, %p, %p, %ld, %ld): stub\n", had, paftd, fnCallback, dwInstance, fdwEnum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFormatChoose (MSACM.40) */ MMRESULT16 WINAPI acmFormatChoose16( LPACMFORMATCHOOSE16 pafmtc) { FIXME("(%p): stub\n", pafmtc); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFormatDetails (MSACM.41) */ MMRESULT16 WINAPI acmFormatDetails16( HACMDRIVER16 had, LPACMFORMATDETAILS16 pafd, DWORD fdwDetails) { FIXME("(0x%04x, %p, %ld): stub\n", had, pafd, fdwDetails); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFormatEnum (MSACM.42) */ MMRESULT16 WINAPI acmFormatEnum16( HACMDRIVER16 had, LPACMFORMATDETAILS16 pafd, ACMFORMATENUMCB16 fnCallback, DWORD dwInstance, DWORD fdwEnum) { FIXME("(0x%04x, %p, %p, %ld, %ld): stub\n", had, pafd, fnCallback, dwInstance, fdwEnum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFormatSuggest (MSACM.45) */ MMRESULT16 WINAPI acmFormatSuggest16( HACMDRIVER16 had, LPWAVEFORMATEX pwfxSrc, LPWAVEFORMATEX pwfxDst, DWORD cbwfxDst, DWORD fdwSuggest) { FIXME("(0x%04x, %p, %p, %ld, %ld): stub\n", had, pwfxSrc, pwfxDst, cbwfxDst, fdwSuggest ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFilterTagDetails (MSACM.50) */ MMRESULT16 WINAPI acmFilterTagDetails16( HACMDRIVER16 had, LPACMFILTERTAGDETAILS16 paftd, DWORD fdwDetails) { FIXME("(0x%04x, %p, %ld): stub\n", had, paftd, fdwDetails); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFilterTagEnum (MSACM.51) */ MMRESULT16 WINAPI acmFilterTagEnum16( HACMDRIVER16 had, LPACMFILTERTAGDETAILS16 paftd, ACMFILTERTAGENUMCB16 fnCallback, DWORD dwInstance, DWORD fdwEnum) { FIXME("(0x%04x, %p, %p, %ld, %ld): stub\n", had, paftd, fnCallback, dwInstance, fdwEnum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFilterChoose (MSACM.60) */ MMRESULT16 WINAPI acmFilterChoose16( LPACMFILTERCHOOSE16 pafltrc) { FIXME("(%p): stub\n", pafltrc); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFilterDetails (MSACM.61) */ MMRESULT16 WINAPI acmFilterDetails16( HACMDRIVER16 had, LPACMFILTERDETAILS16 pafd, DWORD fdwDetails) { FIXME("(0x%04x, %p, %ld): stub\n", had, pafd, fdwDetails); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFilterEnum (MSACM.62) */ MMRESULT16 WINAPI acmFilterEnum16( HACMDRIVER16 had, LPACMFILTERDETAILS16 pafd, ACMFILTERENUMCB16 fnCallback, DWORD dwInstance, DWORD fdwEnum) { FIXME("(0x%04x, %p, %p, %ld, %ld): stub\n", had, pafd, fnCallback, dwInstance, fdwEnum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmStreamOpen (MSACM.70) */ MMRESULT16 WINAPI acmStreamOpen16( LPHACMSTREAM16 phas, HACMDRIVER16 had, LPWAVEFORMATEX pwfxSrc, LPWAVEFORMATEX pwfxDst, LPWAVEFILTER pwfltr, DWORD dwCallback, DWORD dwInstance, DWORD fdwOpen) { FIXME("(%p, 0x%04x, %p, %p, %p, %ld, %ld, %ld): stub\n", phas, had, pwfxSrc, pwfxDst, pwfltr, dwCallback, dwInstance, fdwOpen ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmStreamClose (MSACM.71) */ MMRESULT16 WINAPI acmStreamClose16( HACMSTREAM16 has, DWORD fdwClose) { FIXME("(0x%04x, %ld): stub\n", has, fdwClose); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmStreamSize (MSACM.72) */ MMRESULT16 WINAPI acmStreamSize16( HACMSTREAM16 has, DWORD cbInput, LPDWORD pdwOutputBytes, DWORD fdwSize) { FIXME("(0x%04x, %ld, %p, %ld): stub\n", has, cbInput, pdwOutputBytes, fdwSize ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmStreamConvert (MSACM.75) */ MMRESULT16 WINAPI acmStreamConvert16( HACMSTREAM16 has, LPACMSTREAMHEADER16 pash, DWORD fdwConvert) { FIXME("(0x%04x, %p, %ld): stub\n", has, pash, fdwConvert); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmStreamReset (MSACM.76) */ MMRESULT16 WINAPI acmStreamReset16( HACMSTREAM16 has, DWORD fdwReset) { FIXME("(0x%04x, %ld): stub\n", has, fdwReset); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmStreamPrepareHeader (MSACM.77) */ MMRESULT16 WINAPI acmStreamPrepareHeader16( HACMSTREAM16 has, LPACMSTREAMHEADER16 pash, DWORD fdwPrepare) { FIXME("(0x%04x, %p, %ld): stub\n", has, pash, fdwPrepare); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmStreamUnprepareHeader (MSACM.78) */ MMRESULT16 WINAPI acmStreamUnprepareHeader16( HACMSTREAM16 has, LPACMSTREAMHEADER16 pash, DWORD fdwUnprepare) { FIXME("(0x%04x, %p, %ld): stub\n", has, pash, fdwUnprepare ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * ACMAPPLICATIONEXIT (MSACM.150) * FIXME * No documentation found. */ /*********************************************************************** * ACMHUGEPAGELOCK (MSACM.175) *FIXME * No documentation found. */ /*********************************************************************** * ACMHUGEPAGEUNLOCK (MSACM.176) * FIXME * No documentation found. */ /*********************************************************************** * ACMOPENCONVERSION (MSACM.200) * FIXME * No documentation found. */ /*********************************************************************** * ACMCLOSECONVERSION (MSACM.201) * FIXME * No documentation found. */ /*********************************************************************** * ACMCONVERT (MSACM.202) * FIXME * No documentation found. */ /*********************************************************************** * ACMCHOOSEFORMAT (MSACM.203) * FIXME * No documentation found. */ wine-20000526/dlls/msacm32/0040755000175000001440000000000007113604176014655 5ustar julliarduserswine-20000526/dlls/msacm32/.cvsignore0100644000175000001440000000004407045213573016651 0ustar julliardusers*.spec.c Makefile libmsacm32.so.1.0 wine-20000526/dlls/msacm32/Makefile.in0100644000175000001440000000042307060307301016705 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = msacm32 SOVERSION = 1.0 SPEC_SRCS = msacm32.spec C_SRCS = \ driver.c \ filter.c \ format.c \ internal.c \ msacm32_main.c \ stream.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/msacm32/driver.c0100644000175000001440000002175707057041316016323 0ustar julliardusers/* -*- tab-width: 8; c-basic-offset: 4 -*- */ /* * MSACM32 library * * Copyright 1998 Patrik Stridvall * 1999 Eric Pouech */ #include "winbase.h" #include "winerror.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "debugtools.h" #include "driver.h" #include "heap.h" #include "mmsystem.h" #include "msacm.h" #include "msacmdrv.h" #include "wineacm.h" #include "winreg.h" DEFAULT_DEBUG_CHANNEL(msacm) /*********************************************************************** * acmDriverAddA (MSACM32.2) */ MMRESULT WINAPI acmDriverAddA(PHACMDRIVERID phadid, HINSTANCE hinstModule, LPARAM lParam, DWORD dwPriority, DWORD fdwAdd) { if (!phadid) return MMSYSERR_INVALPARAM; /* Check if any unknown flags */ if (fdwAdd & ~(ACM_DRIVERADDF_FUNCTION|ACM_DRIVERADDF_NOTIFYHWND| ACM_DRIVERADDF_GLOBAL)) return MMSYSERR_INVALFLAG; /* Check if any incompatible flags */ if ((fdwAdd & ACM_DRIVERADDF_FUNCTION) && (fdwAdd & ACM_DRIVERADDF_NOTIFYHWND)) return MMSYSERR_INVALFLAG; /* FIXME: in fact, should GetModuleFileName(hinstModule) and do a * LoadDriver on it, to be sure we can call SendDriverMessage on the * hDrvr handle. */ *phadid = (HACMDRIVERID) MSACM_RegisterDriver(NULL, NULL, hinstModule); /* FIXME: lParam, dwPriority and fdwAdd ignored */ return MMSYSERR_NOERROR; } /*********************************************************************** * acmDriverAddW (MSACM32.3) * FIXME * Not implemented */ MMRESULT WINAPI acmDriverAddW(PHACMDRIVERID phadid, HINSTANCE hinstModule, LPARAM lParam, DWORD dwPriority, DWORD fdwAdd) { FIXME("(%p, 0x%08x, %ld, %ld, %ld): stub\n", phadid, hinstModule, lParam, dwPriority, fdwAdd); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmDriverClose (MSACM32.4) */ MMRESULT WINAPI acmDriverClose(HACMDRIVER had, DWORD fdwClose) { PWINE_ACMDRIVER p; PWINE_ACMDRIVER* tp; if (fdwClose) return MMSYSERR_INVALFLAG; p = MSACM_GetDriver(had); if (!p) return MMSYSERR_INVALHANDLE; for (tp = &(p->obj.pACMDriverID->pACMDriverList); *tp; *tp = (*tp)->pNextACMDriver) { if (*tp == p) { *tp = (*tp)->pNextACMDriver; break; } } if (p->hDrvr && !p->obj.pACMDriverID->pACMDriverList) CloseDriver(p->hDrvr, 0, 0); HeapFree(MSACM_hHeap, 0, p); return MMSYSERR_NOERROR; } /*********************************************************************** * acmDriverDetailsA (MSACM32.5) */ MMRESULT WINAPI acmDriverDetailsA(HACMDRIVERID hadid, PACMDRIVERDETAILSA padd, DWORD fdwDetails) { MMRESULT mmr; ACMDRIVERDETAILSW addw; addw.cbStruct = sizeof(addw); mmr = acmDriverDetailsW(hadid, &addw, fdwDetails); if (mmr == 0) { padd->fccType = addw.fccType; padd->fccComp = addw.fccComp; padd->wMid = addw.wMid; padd->wPid = addw.wPid; padd->vdwACM = addw.vdwACM; padd->vdwDriver = addw.vdwDriver; padd->fdwSupport = addw.fdwSupport; padd->cFormatTags = addw.cFormatTags; padd->cFilterTags = addw.cFilterTags; padd->hicon = addw.hicon; lstrcpyWtoA(padd->szShortName, addw.szShortName); lstrcpyWtoA(padd->szLongName, addw.szLongName); lstrcpyWtoA(padd->szCopyright, addw.szCopyright); lstrcpyWtoA(padd->szLicensing, addw.szLicensing); lstrcpyWtoA(padd->szFeatures, addw.szFeatures); } return mmr; } /*********************************************************************** * acmDriverDetailsW (MSACM32.6) */ MMRESULT WINAPI acmDriverDetailsW(HACMDRIVERID hadid, PACMDRIVERDETAILSW padd, DWORD fdwDetails) { HACMDRIVER acmDrvr; MMRESULT mmr; if (fdwDetails) return MMSYSERR_INVALFLAG; mmr = acmDriverOpen(&acmDrvr, hadid, 0); if (mmr == 0) { mmr = (MMRESULT)acmDriverMessage(acmDrvr, ACMDM_DRIVER_DETAILS, (LPARAM) padd, 0); acmDriverClose(acmDrvr, 0); } return mmr; } /*********************************************************************** * acmDriverEnum (MSACM32.7) */ MMRESULT WINAPI acmDriverEnum(ACMDRIVERENUMCB fnCallback, DWORD dwInstance, DWORD fdwEnum) { PWINE_ACMDRIVERID p; DWORD fdwSupport; if (!fnCallback) { return MMSYSERR_INVALPARAM; } if (fdwEnum && ~(ACM_DRIVERENUMF_NOLOCAL|ACM_DRIVERENUMF_DISABLED)) { return MMSYSERR_INVALFLAG; } for (p = MSACM_pFirstACMDriverID; p; p = p->pNextACMDriverID) { fdwSupport = ACMDRIVERDETAILS_SUPPORTF_CODEC; if (!p->bEnabled) { if (fdwEnum & ACM_DRIVERENUMF_DISABLED) fdwSupport |= ACMDRIVERDETAILS_SUPPORTF_DISABLED; else continue; } (*fnCallback)((HACMDRIVERID) p, dwInstance, fdwSupport); } return MMSYSERR_NOERROR; } /*********************************************************************** * acmDriverID (MSACM32.8) */ MMRESULT WINAPI acmDriverID(HACMOBJ hao, PHACMDRIVERID phadid, DWORD fdwDriverID) { PWINE_ACMOBJ pao; pao = MSACM_GetObj(hao); if (!pao) return MMSYSERR_INVALHANDLE; if (!phadid) return MMSYSERR_INVALPARAM; if (fdwDriverID) return MMSYSERR_INVALFLAG; *phadid = (HACMDRIVERID) pao->pACMDriverID; return MMSYSERR_NOERROR; } /*********************************************************************** * acmDriverMessage (MSACM32.9) * FIXME * Not implemented */ LRESULT WINAPI acmDriverMessage(HACMDRIVER had, UINT uMsg, LPARAM lParam1, LPARAM lParam2) { PWINE_ACMDRIVER pad = MSACM_GetDriver(had); if (!pad) return MMSYSERR_INVALPARAM; /* FIXME: Check if uMsg legal */ if (!SendDriverMessage(pad->hDrvr, uMsg, lParam1, lParam2)) return MMSYSERR_NOTSUPPORTED; return MMSYSERR_NOERROR; } /*********************************************************************** * acmDriverOpen (MSACM32.10) */ MMRESULT WINAPI acmDriverOpen(PHACMDRIVER phad, HACMDRIVERID hadid, DWORD fdwOpen) { PWINE_ACMDRIVERID padid; PWINE_ACMDRIVER pad; TRACE("(%p, %x, %08lu)\n", phad, hadid, fdwOpen); if (!phad) return MMSYSERR_INVALPARAM; padid = MSACM_GetDriverID(hadid); if (!padid) return MMSYSERR_INVALHANDLE; if (fdwOpen) return MMSYSERR_INVALFLAG; pad = HeapAlloc(MSACM_hHeap, 0, sizeof(WINE_ACMDRIVER)); if (!pad) return MMSYSERR_NOMEM; pad->obj.pACMDriverID = padid; if (!padid->hInstModule) pad->hDrvr = OpenDriverA(padid->pszDriverAlias, "drivers32", 0); else pad->hDrvr = padid->hInstModule; if (!pad->hDrvr) { HeapFree(MSACM_hHeap, 0, pad); return MMSYSERR_ERROR; } pad->pfnDriverProc = GetProcAddress(pad->hDrvr, "DriverProc"); /* insert new pad at beg of list */ pad->pNextACMDriver = padid->pACMDriverList; padid->pACMDriverList = pad; /* FIXME: Create a WINE_ACMDRIVER32 */ *phad = (HACMDRIVER)pad; return MMSYSERR_NOERROR; } /*********************************************************************** * acmDriverPriority (MSACM32.11) */ MMRESULT WINAPI acmDriverPriority(HACMDRIVERID hadid, DWORD dwPriority, DWORD fdwPriority) { PWINE_ACMDRIVERID padid; CHAR szSubKey[17]; CHAR szBuffer[256]; LONG lBufferLength = sizeof(szBuffer); LONG lError; HKEY hPriorityKey; DWORD dwPriorityCounter; padid = MSACM_GetDriverID(hadid); if (!padid) return MMSYSERR_INVALHANDLE; /* Check for unknown flags */ if (fdwPriority & ~(ACM_DRIVERPRIORITYF_ENABLE|ACM_DRIVERPRIORITYF_DISABLE| ACM_DRIVERPRIORITYF_BEGIN|ACM_DRIVERPRIORITYF_END)) return MMSYSERR_INVALFLAG; /* Check for incompatible flags */ if ((fdwPriority & ACM_DRIVERPRIORITYF_ENABLE) && (fdwPriority & ACM_DRIVERPRIORITYF_DISABLE)) return MMSYSERR_INVALFLAG; /* Check for incompatible flags */ if ((fdwPriority & ACM_DRIVERPRIORITYF_BEGIN) && (fdwPriority & ACM_DRIVERPRIORITYF_END)) return MMSYSERR_INVALFLAG; lError = RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Microsoft\\Multimedia\\" "Audio Compression Manager\\Priority v4.00", &hPriorityKey ); /* FIXME: Create key */ if (lError != ERROR_SUCCESS) return MMSYSERR_ERROR; for (dwPriorityCounter = 1; ; dwPriorityCounter++) { wsnprintfA(szSubKey, 17, "Priorty%ld", dwPriorityCounter); lError = RegQueryValueA(hPriorityKey, szSubKey, szBuffer, &lBufferLength); if (lError != ERROR_SUCCESS) break; FIXME("(0x%08x, %ld, %ld): stub (partial)\n", hadid, dwPriority, fdwPriority); break; } RegCloseKey(hPriorityKey); return MMSYSERR_ERROR; } /*********************************************************************** * acmDriverRemove (MSACM32.12) */ MMRESULT WINAPI acmDriverRemove(HACMDRIVERID hadid, DWORD fdwRemove) { PWINE_ACMDRIVERID padid; padid = MSACM_GetDriverID(hadid); if (!padid) return MMSYSERR_INVALHANDLE; if (fdwRemove) return MMSYSERR_INVALFLAG; MSACM_UnregisterDriver(padid); return MMSYSERR_NOERROR; } wine-20000526/dlls/msacm32/filter.c0100644000175000001440000001070106716756013016310 0ustar julliardusers/* * MSACM32 library * * Copyright 1998 Patrik Stridvall */ #include "winbase.h" #include "winerror.h" #include "mmsystem.h" #include "msacm.h" #include "msacmdrv.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(msacm) /*********************************************************************** * acmFilterChooseA (MSACM32.13) */ MMRESULT WINAPI acmFilterChooseA( PACMFILTERCHOOSEA pafltrc) { FIXME("(%p): stub\n", pafltrc); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFilterChooseW (MSACM32.14) */ MMRESULT WINAPI acmFilterChooseW( PACMFILTERCHOOSEW pafltrc) { FIXME("(%p): stub\n", pafltrc); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFilterDetailsA (MSACM32.15) */ MMRESULT WINAPI acmFilterDetailsA( HACMDRIVER had, PACMFILTERDETAILSA pafd, DWORD fdwDetails) { if(fdwDetails & ~(ACM_FILTERDETAILSF_FILTER)) return MMSYSERR_INVALFLAG; /* FIXME * How does the driver know if the ANSI or * the UNICODE variant of PACMFILTERDETAILS is used? * It might check cbStruct or does it only accept ANSI. */ return (MMRESULT) acmDriverMessage( had, ACMDM_FILTER_DETAILS, (LPARAM) pafd, (LPARAM) fdwDetails ); } /*********************************************************************** * acmFilterDetailsW (MSACM32.16) */ MMRESULT WINAPI acmFilterDetailsW( HACMDRIVER had, PACMFILTERDETAILSW pafd, DWORD fdwDetails) { FIXME("(0x%08x, %p, %ld): stub\n", had, pafd, fdwDetails); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFilterEnumA (MSACM32.17) */ MMRESULT WINAPI acmFilterEnumA( HACMDRIVER had, PACMFILTERDETAILSA pafd, ACMFILTERENUMCBA fnCallback, DWORD dwInstance, DWORD fdwEnum) { FIXME("(0x%08x, %p, %p, %ld, %ld): stub\n", had, pafd, fnCallback, dwInstance, fdwEnum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFilterEnumW (MSACM32.18) */ MMRESULT WINAPI acmFilterEnumW( HACMDRIVER had, PACMFILTERDETAILSW pafd, ACMFILTERENUMCBW fnCallback, DWORD dwInstance, DWORD fdwEnum) { FIXME("(0x%08x, %p, %p, %ld, %ld): stub\n", had, pafd, fnCallback, dwInstance, fdwEnum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFilterTagDetailsA (MSACM32.19) */ MMRESULT WINAPI acmFilterTagDetailsA( HACMDRIVER had, PACMFILTERTAGDETAILSA paftd, DWORD fdwDetails) { if(fdwDetails & ~(ACM_FILTERTAGDETAILSF_FILTERTAG| ACM_FILTERTAGDETAILSF_LARGESTSIZE)) return MMSYSERR_INVALFLAG; /* FIXME * How does the driver know if the ANSI or * the UNICODE variant of PACMFILTERTAGDETAILS is used? * It might check cbStruct or does it only accept ANSI. */ return (MMRESULT) acmDriverMessage( had, ACMDM_FILTERTAG_DETAILS, (LPARAM) paftd, (LPARAM) fdwDetails ); } /*********************************************************************** * acmFilterTagDetailsW (MSACM32.20) */ MMRESULT WINAPI acmFilterTagDetailsW( HACMDRIVER had, PACMFILTERTAGDETAILSW paftd, DWORD fdwDetails) { FIXME("(0x%08x, %p, %ld): stub\n", had, paftd, fdwDetails); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFilterTagEnumA (MSACM32.21) */ MMRESULT WINAPI acmFilterTagEnumA( HACMDRIVER had, PACMFILTERTAGDETAILSA paftd, ACMFILTERTAGENUMCBA fnCallback, DWORD dwInstance, DWORD fdwEnum) { FIXME("(0x%08x, %p, %p, %ld, %ld): stub\n", had, paftd, fnCallback, dwInstance, fdwEnum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFilterTagEnumW (MSACM32.22) */ MMRESULT WINAPI acmFilterTagEnumW( HACMDRIVER had, PACMFILTERTAGDETAILSW paftd, ACMFILTERTAGENUMCBW fnCallback, DWORD dwInstance, DWORD fdwEnum) { FIXME("(0x%08x, %p, %p, %ld, %ld): stub\n", had, paftd, fnCallback, dwInstance, fdwEnum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } wine-20000526/dlls/msacm32/format.c0100644000175000001440000001156406716756013016323 0ustar julliardusers/* * MSACM32 library * * Copyright 1998 Patrik Stridvall */ #include "winbase.h" #include "winerror.h" #include "windef.h" #include "debugtools.h" #include "mmsystem.h" #include "msacm.h" #include "msacmdrv.h" DEFAULT_DEBUG_CHANNEL(msacm) /*********************************************************************** * acmFormatChooseA (MSACM32.23) */ MMRESULT WINAPI acmFormatChooseA( PACMFORMATCHOOSEA pafmtc) { FIXME("(%p): stub\n", pafmtc); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFormatChooseW (MSACM32.24) */ MMRESULT WINAPI acmFormatChooseW( PACMFORMATCHOOSEW pafmtc) { FIXME("(%p): stub\n", pafmtc); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFormatDetailsA (MSACM32.25) */ MMRESULT WINAPI acmFormatDetailsA( HACMDRIVER had, PACMFORMATDETAILSA pafd, DWORD fdwDetails) { if(fdwDetails & ~(ACM_FORMATDETAILSF_FORMAT)) return MMSYSERR_INVALFLAG; /* FIXME * How does the driver know if the ANSI or * the UNICODE variant of PACMFORMATDETAILS is used? * It might check cbStruct or does it only accept ANSI. */ return (MMRESULT) acmDriverMessage( had, ACMDM_FORMAT_DETAILS, (LPARAM) pafd, (LPARAM) fdwDetails ); } /*********************************************************************** * acmFormatDetailsW (MSACM32.26) */ MMRESULT WINAPI acmFormatDetailsW( HACMDRIVER had, PACMFORMATDETAILSW pafd, DWORD fdwDetails) { FIXME("(0x%08x, %p, %ld): stub\n", had, pafd, fdwDetails); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFormatEnumA (MSACM32.27) */ MMRESULT WINAPI acmFormatEnumA( HACMDRIVER had, PACMFORMATDETAILSA pafd, ACMFORMATENUMCBA fnCallback, DWORD dwInstance, DWORD fdwEnum) { FIXME("(0x%08x, %p, %p, %ld, %ld): stub\n", had, pafd, fnCallback, dwInstance, fdwEnum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFormatEnumW (MSACM32.28) */ MMRESULT WINAPI acmFormatEnumW( HACMDRIVER had, PACMFORMATDETAILSW pafd, ACMFORMATENUMCBW fnCallback, DWORD dwInstance, DWORD fdwEnum) { FIXME("(0x%08x, %p, %p, %ld, %ld): stub\n", had, pafd, fnCallback, dwInstance, fdwEnum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFormatSuggest (MSACM32.29) */ MMRESULT WINAPI acmFormatSuggest( HACMDRIVER had, PWAVEFORMATEX pwfxSrc, PWAVEFORMATEX pwfxDst, DWORD cbwfxDst, DWORD fdwSuggest) { FIXME("(0x%08x, %p, %p, %ld, %ld): stub\n", had, pwfxSrc, pwfxDst, cbwfxDst, fdwSuggest ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFormatTagDetailsA (MSACM32.30) */ MMRESULT WINAPI acmFormatTagDetailsA( HACMDRIVER had, PACMFORMATTAGDETAILSA paftd, DWORD fdwDetails) { if(fdwDetails & ~(ACM_FORMATTAGDETAILSF_FORMATTAG|ACM_FORMATTAGDETAILSF_LARGESTSIZE)) return MMSYSERR_INVALFLAG; /* FIXME * How does the driver know if the ANSI or * the UNICODE variant of PACMFORMATTAGDETAILS is used? * It might check cbStruct or does it only accept ANSI. */ return (MMRESULT) acmDriverMessage( had, ACMDM_FORMATTAG_DETAILS, (LPARAM) paftd, (LPARAM) fdwDetails ); } /*********************************************************************** * acmFormatTagDetailsW (MSACM32.31) */ MMRESULT WINAPI acmFormatTagDetailsW( HACMDRIVER had, PACMFORMATTAGDETAILSW paftd, DWORD fdwDetails) { FIXME("(0x%08x, %p, %ld): stub\n", had, paftd, fdwDetails); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFormatTagEnumA (MSACM32.32) */ MMRESULT WINAPI acmFormatTagEnumA( HACMDRIVER had, PACMFORMATTAGDETAILSA paftd, ACMFORMATTAGENUMCBA fnCallback, DWORD dwInstance, DWORD fdwEnum) { FIXME("(0x%08x, %p, %p, %ld, %ld): stub\n", had, paftd, fnCallback, dwInstance, fdwEnum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmFormatTagEnumW (MSACM32.33) */ MMRESULT WINAPI acmFormatTagEnumW( HACMDRIVER had, PACMFORMATTAGDETAILSW paftd, ACMFORMATTAGENUMCBW fnCallback, DWORD dwInstance, DWORD fdwEnum) { FIXME("(0x%08x, %p, %p, %ld, %ld): stub\n", had, paftd, fnCallback, dwInstance, fdwEnum ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } wine-20000526/dlls/msacm32/internal.c0100644000175000001440000001067307050605550016636 0ustar julliardusers/* -*- tab-width: 8; c-basic-offset: 4 -*- */ /* * MSACM32 library * * Copyright 1998 Patrik Stridvall * 1999 Eric Pouech */ #include #include "winbase.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "winerror.h" #include "driver.h" #include "heap.h" #include "mmsystem.h" #include "msacm.h" #include "msacmdrv.h" #include "wineacm.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(msacm) /**********************************************************************/ HANDLE MSACM_hHeap = (HANDLE) NULL; PWINE_ACMDRIVERID MSACM_pFirstACMDriverID = NULL; PWINE_ACMDRIVERID MSACM_pLastACMDriverID = NULL; /*********************************************************************** * MSACM_RegisterDriver32() */ PWINE_ACMDRIVERID MSACM_RegisterDriver(LPSTR pszDriverAlias, LPSTR pszFileName, HINSTANCE hinstModule) { PWINE_ACMDRIVERID padid; TRACE("('%s', '%s', 0x%08x)\n", pszDriverAlias, pszFileName, hinstModule); padid = (PWINE_ACMDRIVERID) HeapAlloc(MSACM_hHeap, 0, sizeof(WINE_ACMDRIVERID)); padid->pszDriverAlias = HEAP_strdupA(MSACM_hHeap, 0, pszDriverAlias); padid->pszFileName = HEAP_strdupA(MSACM_hHeap, 0, pszFileName); padid->hInstModule = hinstModule; padid->bEnabled = TRUE; padid->pACMDriverList = NULL; padid->pNextACMDriverID = NULL; padid->pPrevACMDriverID = MSACM_pLastACMDriverID; if (MSACM_pLastACMDriverID) MSACM_pLastACMDriverID->pNextACMDriverID = padid; MSACM_pLastACMDriverID = padid; if (!MSACM_pFirstACMDriverID) MSACM_pFirstACMDriverID = padid; return padid; } /*********************************************************************** * MSACM_RegisterAllDrivers32() */ void MSACM_RegisterAllDrivers(void) { LPSTR pszBuffer; DWORD dwBufferLength; /* FIXME * What if the user edits system.ini while the program is running? * Does Windows handle that? */ if (MSACM_pFirstACMDriverID) return; /* FIXME: Do not work! How do I determine the section length? */ dwBufferLength = 1024; /* EPP GetPrivateProfileSectionA("drivers32", NULL, 0, "system.ini"); */ pszBuffer = (LPSTR) HeapAlloc(MSACM_hHeap, 0, dwBufferLength); if (GetPrivateProfileSectionA("drivers32", pszBuffer, dwBufferLength, "system.ini")) { char* s = pszBuffer; while (*s) { if (!lstrncmpiA("MSACM.", s, 6)) { char *s2 = s; while (*s2 != '\0' && *s2 != '=') s2++; if (*s2) { *s2++ = '\0'; MSACM_RegisterDriver(s, s2, 0); } } s += lstrlenA(s) + 1; /* Either next char or \0 */ } } HeapFree(MSACM_hHeap, 0, pszBuffer); } /*********************************************************************** * MSACM_UnregisterDriver32() */ PWINE_ACMDRIVERID MSACM_UnregisterDriver(PWINE_ACMDRIVERID p) { PWINE_ACMDRIVERID pNextACMDriverID; while (p->pACMDriverList) acmDriverClose((HACMDRIVER) p->pACMDriverList, 0); if (p->pszDriverAlias) HeapFree(MSACM_hHeap, 0, p->pszDriverAlias); if (p->pszFileName) HeapFree(MSACM_hHeap, 0, p->pszFileName); if (p == MSACM_pFirstACMDriverID) MSACM_pFirstACMDriverID = p->pNextACMDriverID; if (p == MSACM_pLastACMDriverID) MSACM_pLastACMDriverID = p->pPrevACMDriverID; if (p->pPrevACMDriverID) p->pPrevACMDriverID->pNextACMDriverID = p->pNextACMDriverID; if (p->pNextACMDriverID) p->pNextACMDriverID->pPrevACMDriverID = p->pPrevACMDriverID; pNextACMDriverID = p->pNextACMDriverID; HeapFree(MSACM_hHeap, 0, p); return pNextACMDriverID; } /*********************************************************************** * MSACM_UnregisterAllDrivers32() * FIXME * Where should this function be called? */ void MSACM_UnregisterAllDrivers(void) { PWINE_ACMDRIVERID p; for (p = MSACM_pFirstACMDriverID; p; p = MSACM_UnregisterDriver(p)); } /*********************************************************************** * MSACM_GetDriverID32() */ PWINE_ACMDRIVERID MSACM_GetDriverID(HACMDRIVERID hDriverID) { return (PWINE_ACMDRIVERID)hDriverID; } /*********************************************************************** * MSACM_GetDriver32() */ PWINE_ACMDRIVER MSACM_GetDriver(HACMDRIVER hDriver) { return (PWINE_ACMDRIVER)hDriver; } /*********************************************************************** * MSACM_GetObj32() */ PWINE_ACMOBJ MSACM_GetObj(HACMOBJ hObj) { return (PWINE_ACMOBJ)hObj; } wine-20000526/dlls/msacm32/msacm32.spec0100644000175000001440000000515606746606647017022 0ustar julliardusersname msacm32 type win32 init MSACM32_LibMain 1 stub XRegThunkEntry 2 stdcall acmDriverAddA(ptr long long long long) acmDriverAddA 3 stdcall acmDriverAddW(ptr long long long long) acmDriverAddW 4 stdcall acmDriverClose(long long) acmDriverClose 5 stdcall acmDriverDetailsA(long ptr long) acmDriverDetailsA 6 stdcall acmDriverDetailsW(long ptr long) acmDriverDetailsW 7 stdcall acmDriverEnum(ptr long long) acmDriverEnum 8 stdcall acmDriverID(long ptr long) acmDriverID 9 stdcall acmDriverMessage(long long long long) acmDriverMessage 10 stdcall acmDriverOpen(ptr long long) acmDriverOpen 11 stdcall acmDriverPriority(long long long) acmDriverPriority 12 stdcall acmDriverRemove(long long) acmDriverRemove 13 stdcall acmFilterChooseA(ptr) acmFilterChooseA 14 stdcall acmFilterChooseW(ptr) acmFilterChooseW 15 stdcall acmFilterDetailsA(long ptr long) acmFilterDetailsA 16 stdcall acmFilterDetailsW(long ptr long) acmFilterDetailsW 17 stdcall acmFilterEnumA(long ptr ptr long long) acmFilterEnumA 18 stdcall acmFilterEnumW(long ptr ptr long long) acmFilterEnumW 19 stdcall acmFilterTagDetailsA(long ptr long) acmFilterTagDetailsA 20 stdcall acmFilterTagDetailsW(long ptr long) acmFilterTagDetailsW 21 stdcall acmFilterTagEnumA(long ptr ptr long long) acmFilterTagEnumA 22 stdcall acmFilterTagEnumW(long ptr ptr long long) acmFilterTagEnumW 23 stdcall acmFormatChooseA(ptr) acmFormatChooseA 24 stdcall acmFormatChooseW(ptr) acmFormatChooseW 25 stdcall acmFormatDetailsA(long ptr long) acmFormatDetailsA 26 stdcall acmFormatDetailsW(long ptr long) acmFormatDetailsW 27 stdcall acmFormatEnumA(long ptr ptr long long) acmFormatEnumA 28 stdcall acmFormatEnumW(long ptr ptr long long) acmFormatEnumW 29 stdcall acmFormatSuggest(long ptr ptr long long) acmFormatSuggest 30 stdcall acmFormatTagDetailsA(long ptr long) acmFormatTagDetailsA 31 stdcall acmFormatTagDetailsW(long ptr long) acmFormatTagDetailsW 32 stdcall acmFormatTagEnumA(long ptr ptr long long) acmFormatTagEnumA 33 stdcall acmFormatTagEnumW(long ptr ptr long long) acmFormatTagEnumW 34 stdcall acmGetVersion() acmGetVersion 35 stub acmMessage32 36 stdcall acmMetrics(long long ptr) acmMetrics 37 stdcall acmStreamClose(long long) acmStreamClose 38 stdcall acmStreamConvert(long ptr long) acmStreamConvert 39 stdcall acmStreamMessage(long long long long) acmStreamMessage 40 stdcall acmStreamOpen(ptr long ptr ptr ptr long long long) acmStreamOpen 41 stdcall acmStreamPrepareHeader(long ptr long) acmStreamPrepareHeader 42 stdcall acmStreamReset(long long) acmStreamReset 43 stdcall acmStreamSize(long long ptr long) acmStreamSize 44 stdcall acmStreamUnprepareHeader(long ptr long) acmStreamUnprepareHeader wine-20000526/dlls/msacm32/msacm32_main.c0100644000175000001440000001072607070212244017266 0ustar julliardusers/* -*- tab-width: 8; c-basic-offset: 4 -*- */ /* * MSACM32 library * * Copyright 1998 Patrik Stridvall * 1999 Eric Pouech */ #include "winbase.h" #include "winerror.h" #include "windef.h" #include "debugtools.h" #include "msacm.h" #include "msacmdrv.h" #include "wineacm.h" #include "winversion.h" DEFAULT_DEBUG_CHANNEL(msacm) /**********************************************************************/ static DWORD MSACM_dwProcessesAttached = 0; /*********************************************************************** * MSACM_LibMain (MSACM32.init) */ BOOL WINAPI MSACM32_LibMain(HINSTANCE hInstDLL, DWORD fdwReason, LPVOID lpvReserved) { TRACE("0x%x 0x%lx %p\n", hInstDLL, fdwReason, lpvReserved); switch (fdwReason) { case DLL_PROCESS_ATTACH: if (MSACM_dwProcessesAttached == 0) { MSACM_hHeap = HeapCreate(0, 0x10000, 0); MSACM_RegisterAllDrivers(); } MSACM_dwProcessesAttached++; break; case DLL_PROCESS_DETACH: MSACM_dwProcessesAttached--; if (MSACM_dwProcessesAttached == 0) { MSACM_UnregisterAllDrivers(); HeapDestroy(MSACM_hHeap); MSACM_hHeap = (HANDLE) NULL; } break; case DLL_THREAD_ATTACH: break; case DLL_THREAD_DETACH: break; default: break; } return TRUE; } /*********************************************************************** * XRegThunkEntry (MSACM32.1) * FIXME * No documentation found. */ /*********************************************************************** * acmGetVersion (MSACM32.34) */ DWORD WINAPI acmGetVersion(void) { switch (VERSION_GetVersion()) { default: FIXME("%s not supported\n", VERSION_GetVersionName()); case WIN95: return 0x04000000; /* 4.0.0 */ case NT40: return 0x04000565; /* 4.0.1381 */ } } /*********************************************************************** * acmMessage32 (MSACM32.35) * FIXME * No documentation found. */ /*********************************************************************** * acmMetrics (MSACM32.36) */ MMRESULT WINAPI acmMetrics(HACMOBJ hao, UINT uMetric, LPVOID pMetric) { PWINE_ACMOBJ pao = MSACM_GetObj(hao); BOOL bLocal = TRUE; PWINE_ACMDRIVERID padid; DWORD val = 0; FIXME("(0x%08x, %d, %p): stub\n", hao, uMetric, pMetric); switch (uMetric) { case ACM_METRIC_COUNT_DRIVERS: bLocal = FALSE; /* fall thru */ case ACM_METRIC_COUNT_LOCAL_DRIVERS: if (!pao) return MMSYSERR_INVALHANDLE; for (padid = MSACM_pFirstACMDriverID; padid; padid = padid->pNextACMDriverID) if (padid->bEnabled /* && (local(padid) || !bLocal) */) val++; *(LPDWORD)pMetric = val; return 0; case ACM_METRIC_COUNT_CODECS: if (!pao) return MMSYSERR_INVALHANDLE; bLocal = FALSE; /* fall thru */ case ACM_METRIC_COUNT_LOCAL_CODECS: /* FIXME: don't know how to differentiate codec, converters & filters yet */ for (padid = MSACM_pFirstACMDriverID; padid; padid = padid->pNextACMDriverID) if (padid->bEnabled /* && (local(padid) || !bLocal) */) val++; *(LPDWORD)pMetric = val; return 0; case ACM_METRIC_COUNT_CONVERTERS: bLocal = FALSE; /* fall thru */ case ACM_METRIC_COUNT_LOCAL_CONVERTERS: /* FIXME: don't know how to differentiate codec, converters & filters yet */ for (padid = MSACM_pFirstACMDriverID; padid; padid = padid->pNextACMDriverID) if (padid->bEnabled /* && (local(padid) || !bLocal) */) val++; *(LPDWORD)pMetric = val; return 0; case ACM_METRIC_COUNT_FILTERS: bLocal = FALSE; /* fall thru */ case ACM_METRIC_COUNT_LOCAL_FILTERS: /* FIXME: don't know how to differentiate codec, converters & filters yet */ for (padid = MSACM_pFirstACMDriverID; padid; padid = padid->pNextACMDriverID) if (padid->bEnabled /* && (local(padid) || !bLocal) */) val++; *(LPDWORD)pMetric = val; return 0; case ACM_METRIC_COUNT_DISABLED: bLocal = FALSE; /* fall thru */ case ACM_METRIC_COUNT_LOCAL_DISABLED: if (!pao) return MMSYSERR_INVALHANDLE; for (padid = MSACM_pFirstACMDriverID; padid; padid = padid->pNextACMDriverID) if (!padid->bEnabled /* && (local(padid) || !bLocal) */) val++; *(LPDWORD)pMetric = val; return 0; case ACM_METRIC_COUNT_HARDWARE: case ACM_METRIC_HARDWARE_WAVE_INPUT: case ACM_METRIC_HARDWARE_WAVE_OUTPUT: case ACM_METRIC_MAX_SIZE_FORMAT: case ACM_METRIC_MAX_SIZE_FILTER: case ACM_METRIC_DRIVER_SUPPORT: case ACM_METRIC_DRIVER_PRIORITY: default: return MMSYSERR_NOTSUPPORTED; } return MMSYSERR_NOERROR; } wine-20000526/dlls/msacm32/stream.c0100644000175000001440000003032007022570172016304 0ustar julliardusers/* -*- tab-width: 8; c-basic-offset: 4 -*- */ /* * MSACM32 library * * Copyright 1998 Patrik Stridvall * 1999 Eric Pouech */ /* TODO * + asynchronous conversion is not implemented * + callback/notification * * acmStreamMessage * + properly close ACM streams */ #include "winbase.h" #include "winerror.h" #include "windef.h" #include "debugtools.h" #include "mmsystem.h" #include "msacm.h" #include "msacmdrv.h" #include "wineacm.h" DEFAULT_DEBUG_CHANNEL(msacm) static PWINE_ACMSTREAM ACM_GetStream(HACMSTREAM has) { return (PWINE_ACMSTREAM)has; } /*********************************************************************** * acmStreamClose (MSACM32.37) */ MMRESULT WINAPI acmStreamClose(HACMSTREAM has, DWORD fdwClose) { PWINE_ACMSTREAM was; MMRESULT ret; TRACE("(0x%08x, %ld)\n", has, fdwClose); if ((was = ACM_GetStream(has)) == NULL) { return MMSYSERR_INVALHANDLE; } ret = SendDriverMessage(was->pDrv->hDrvr, ACMDM_STREAM_CLOSE, (DWORD)&was->drvInst, 0); if (ret == MMSYSERR_NOERROR) { if (was->hAcmDriver) acmDriverClose(was->hAcmDriver, 0L); HeapFree(MSACM_hHeap, 0, was); } TRACE("=> (%d)\n", ret); return ret; } /*********************************************************************** * acmStreamConvert (MSACM32.38) */ MMRESULT WINAPI acmStreamConvert(HACMSTREAM has, PACMSTREAMHEADER pash, DWORD fdwConvert) { PWINE_ACMSTREAM was; MMRESULT ret = MMSYSERR_NOERROR; PACMDRVSTREAMHEADER padsh; TRACE("(0x%08x, %p, %ld)\n", has, pash, fdwConvert); if ((was = ACM_GetStream(has)) == NULL) return MMSYSERR_INVALHANDLE; if (!pash || pash->cbStruct < sizeof(ACMSTREAMHEADER)) return MMSYSERR_INVALPARAM; if (!(pash->fdwStatus & ACMSTREAMHEADER_STATUSF_PREPARED)) return ACMERR_UNPREPARED; /* Note: the ACMSTREAMHEADER and ACMDRVSTREAMHEADER structs are of same * size. some fields are private to msacm internals, and are exposed * in ACMSTREAMHEADER in the dwReservedDriver array */ padsh = (PACMDRVSTREAMHEADER)pash; /* check that pointers have not been modified */ if (padsh->pbPreparedSrc != padsh->pbSrc || padsh->cbPreparedSrcLength < padsh->cbSrcLength || padsh->pbPreparedDst != padsh->pbDst || padsh->cbPreparedDstLength < padsh->cbDstLength) { return MMSYSERR_INVALPARAM; } padsh->fdwConvert = fdwConvert; ret = SendDriverMessage(was->pDrv->hDrvr, ACMDM_STREAM_CONVERT, (DWORD)&was->drvInst, (DWORD)padsh); if (ret == MMSYSERR_NOERROR) { padsh->fdwStatus |= ACMSTREAMHEADER_STATUSF_DONE; } TRACE("=> (%d)\n", ret); return ret; } /*********************************************************************** * acmStreamMessage (MSACM32.39) */ MMRESULT WINAPI acmStreamMessage(HACMSTREAM has, UINT uMsg, LPARAM lParam1, LPARAM lParam2) { FIXME("(0x%08x, %u, %ld, %ld): stub\n", has, uMsg, lParam1, lParam2); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return MMSYSERR_ERROR; } /*********************************************************************** * acmStreamOpen (MSACM32.40) */ MMRESULT WINAPI acmStreamOpen(PHACMSTREAM phas, HACMDRIVER had, PWAVEFORMATEX pwfxSrc, PWAVEFORMATEX pwfxDst, PWAVEFILTER pwfltr, DWORD dwCallback, DWORD dwInstance, DWORD fdwOpen) { PWINE_ACMSTREAM was; PWINE_ACMDRIVER wad; MMRESULT ret; int wfxSrcSize; int wfxDstSize; TRACE("(%p, 0x%08x, %p, %p, %p, %ld, %ld, %ld)\n", phas, had, pwfxSrc, pwfxDst, pwfltr, dwCallback, dwInstance, fdwOpen); TRACE("src [wFormatTag=%u, nChannels=%u, nSamplesPerSec=%lu, nAvgBytesPerSec=%lu, nBlockAlign=%u, wBitsPerSample=%u, cbSize=%u]\n", pwfxSrc->wFormatTag, pwfxSrc->nChannels, pwfxSrc->nSamplesPerSec, pwfxSrc->nAvgBytesPerSec, pwfxSrc->nBlockAlign, pwfxSrc->wBitsPerSample, pwfxSrc->cbSize); TRACE("dst [wFormatTag=%u, nChannels=%u, nSamplesPerSec=%lu, nAvgBytesPerSec=%lu, nBlockAlign=%u, wBitsPerSample=%u, cbSize=%u]\n", pwfxDst->wFormatTag, pwfxDst->nChannels, pwfxDst->nSamplesPerSec, pwfxDst->nAvgBytesPerSec, pwfxDst->nBlockAlign, pwfxDst->wBitsPerSample, pwfxDst->cbSize); #define SIZEOF_WFX(wfx) (sizeof(WAVEFORMATEX) + ((wfx->wFormatTag == WAVE_FORMAT_PCM) ? 0 : wfx->cbSize)) wfxSrcSize = SIZEOF_WFX(pwfxSrc); wfxDstSize = SIZEOF_WFX(pwfxDst); #undef SIZEOF_WFX was = HeapAlloc(MSACM_hHeap, 0, sizeof(*was) + wfxSrcSize + wfxDstSize + ((pwfltr) ? sizeof(WAVEFILTER) : 0)); if (was == NULL) return MMSYSERR_NOMEM; was->drvInst.cbStruct = sizeof(was->drvInst); was->drvInst.pwfxSrc = (PWAVEFORMATEX)((LPSTR)was + sizeof(*was)); memcpy(was->drvInst.pwfxSrc, pwfxSrc, wfxSrcSize); was->drvInst.pwfxDst = (PWAVEFORMATEX)((LPSTR)was + sizeof(*was) + wfxSrcSize); memcpy(was->drvInst.pwfxDst, pwfxDst, wfxDstSize); if (pwfltr) { was->drvInst.pwfltr = (PWAVEFILTER)((LPSTR)was + sizeof(*was) + wfxSrcSize + wfxDstSize); memcpy(was->drvInst.pwfltr, pwfltr, sizeof(WAVEFILTER)); } else { was->drvInst.pwfltr = NULL; } was->drvInst.dwCallback = dwCallback; was->drvInst.dwInstance = dwInstance; was->drvInst.fdwOpen = fdwOpen; was->drvInst.fdwDriver = 0L; was->drvInst.dwDriver = 0L; was->drvInst.has = (HACMSTREAM)was; if (had) { if (!(wad = MSACM_GetDriver(had))) { ret = MMSYSERR_INVALPARAM; goto errCleanUp; } was->obj.pACMDriverID = wad->obj.pACMDriverID; was->pDrv = wad; was->hAcmDriver = 0; /* not to close it in acmStreamClose */ ret = SendDriverMessage(wad->hDrvr, ACMDM_STREAM_OPEN, (DWORD)&was->drvInst, 0L); if (ret != MMSYSERR_NOERROR) goto errCleanUp; } else { PWINE_ACMDRIVERID wadi; ret = ACMERR_NOTPOSSIBLE; for (wadi = MSACM_pFirstACMDriverID; wadi; wadi = wadi->pNextACMDriverID) { ret = acmDriverOpen(&had, (HACMDRIVERID)wadi, 0L); if (ret == MMSYSERR_NOERROR) { if ((wad = MSACM_GetDriver(had)) != 0) { was->obj.pACMDriverID = wad->obj.pACMDriverID; was->pDrv = wad; was->hAcmDriver = had; ret = SendDriverMessage(wad->hDrvr, ACMDM_STREAM_OPEN, (DWORD)&was->drvInst, 0L); if (ret == MMSYSERR_NOERROR) { if (fdwOpen & ACM_STREAMOPENF_QUERY) { acmDriverClose(had, 0L); } break; } } /* no match, close this acm driver and try next one */ acmDriverClose(had, 0L); } } if (ret != MMSYSERR_NOERROR) { ret = ACMERR_NOTPOSSIBLE; goto errCleanUp; } } ret = MMSYSERR_NOERROR; if (!(fdwOpen & ACM_STREAMOPENF_QUERY)) { if (phas) *phas = (HACMSTREAM)was; TRACE("=> (%d)\n", ret); return ret; } errCleanUp: if (phas) *phas = (HACMSTREAM)0; HeapFree(MSACM_hHeap, 0, was); TRACE("=> (%d)\n", ret); return ret; } /*********************************************************************** * acmStreamPrepareHeader (MSACM32.41) */ MMRESULT WINAPI acmStreamPrepareHeader(HACMSTREAM has, PACMSTREAMHEADER pash, DWORD fdwPrepare) { PWINE_ACMSTREAM was; MMRESULT ret = MMSYSERR_NOERROR; PACMDRVSTREAMHEADER padsh; TRACE("(0x%08x, %p, %ld)\n", has, pash, fdwPrepare); if ((was = ACM_GetStream(has)) == NULL) return MMSYSERR_INVALHANDLE; if (!pash || pash->cbStruct < sizeof(ACMSTREAMHEADER)) return MMSYSERR_INVALPARAM; if (fdwPrepare) ret = MMSYSERR_INVALFLAG; if (pash->fdwStatus & ACMSTREAMHEADER_STATUSF_DONE) return MMSYSERR_NOERROR; /* Note: the ACMSTREAMHEADER and ACMDRVSTREAMHEADER structs are of same * size. some fields are private to msacm internals, and are exposed * in ACMSTREAMHEADER in the dwReservedDriver array */ padsh = (PACMDRVSTREAMHEADER)pash; padsh->fdwConvert = fdwPrepare; padsh->padshNext = NULL; padsh->fdwDriver = padsh->dwDriver = 0L; padsh->fdwPrepared = 0; padsh->dwPrepared = 0; padsh->pbPreparedSrc = 0; padsh->cbPreparedSrcLength = 0; padsh->pbPreparedDst = 0; padsh->cbPreparedDstLength = 0; ret = SendDriverMessage(was->pDrv->hDrvr, ACMDM_STREAM_PREPARE, (DWORD)&was->drvInst, (DWORD)padsh); if (ret == MMSYSERR_NOERROR || ret == MMSYSERR_NOTSUPPORTED) { ret = MMSYSERR_NOERROR; padsh->fdwStatus &= ~(ACMSTREAMHEADER_STATUSF_DONE|ACMSTREAMHEADER_STATUSF_INQUEUE); padsh->fdwStatus |= ACMSTREAMHEADER_STATUSF_PREPARED; padsh->fdwPrepared = padsh->fdwStatus; padsh->dwPrepared = 0; padsh->pbPreparedSrc = padsh->pbSrc; padsh->cbPreparedSrcLength = padsh->cbSrcLength; padsh->pbPreparedDst = padsh->pbDst; padsh->cbPreparedDstLength = padsh->cbDstLength; } else { padsh->fdwPrepared = 0; padsh->dwPrepared = 0; padsh->pbPreparedSrc = 0; padsh->cbPreparedSrcLength = 0; padsh->pbPreparedDst = 0; padsh->cbPreparedDstLength = 0; } TRACE("=> (%d)\n", ret); return ret; } /*********************************************************************** * acmStreamReset (MSACM32.42) */ MMRESULT WINAPI acmStreamReset(HACMSTREAM has, DWORD fdwReset) { PWINE_ACMSTREAM was; MMRESULT ret = MMSYSERR_NOERROR; TRACE("(0x%08x, %ld)\n", has, fdwReset); if (fdwReset) { ret = MMSYSERR_INVALFLAG; } else if ((was = ACM_GetStream(has)) == NULL) { return MMSYSERR_INVALHANDLE; } else if (was->drvInst.fdwOpen & ACM_STREAMOPENF_ASYNC) { ret = SendDriverMessage(was->pDrv->hDrvr, ACMDM_STREAM_RESET, (DWORD)&was->drvInst, 0); } TRACE("=> (%d)\n", ret); return ret; } /*********************************************************************** * acmStreamSize (MSACM32.43) */ MMRESULT WINAPI acmStreamSize(HACMSTREAM has, DWORD cbInput, LPDWORD pdwOutputBytes, DWORD fdwSize) { PWINE_ACMSTREAM was; ACMDRVSTREAMSIZE adss; MMRESULT ret; TRACE("(0x%08x, %ld, %p, %ld)\n", has, cbInput, pdwOutputBytes, fdwSize); if ((was = ACM_GetStream(has)) == NULL) { return MMSYSERR_INVALHANDLE; } if ((fdwSize & ~ACM_STREAMSIZEF_QUERYMASK) != 0) { return MMSYSERR_INVALFLAG; } *pdwOutputBytes = 0L; switch (fdwSize & ACM_STREAMSIZEF_QUERYMASK) { case ACM_STREAMSIZEF_DESTINATION: adss.cbDstLength = cbInput; adss.cbSrcLength = 0; break; case ACM_STREAMSIZEF_SOURCE: adss.cbSrcLength = cbInput; adss.cbDstLength = 0; break; default: return MMSYSERR_INVALFLAG; } adss.cbStruct = sizeof(adss); adss.fdwSize = fdwSize; ret = SendDriverMessage(was->pDrv->hDrvr, ACMDM_STREAM_SIZE, (DWORD)&was->drvInst, (DWORD)&adss); if (ret == MMSYSERR_NOERROR) { switch (fdwSize & ACM_STREAMSIZEF_QUERYMASK) { case ACM_STREAMSIZEF_DESTINATION: *pdwOutputBytes = adss.cbSrcLength; break; case ACM_STREAMSIZEF_SOURCE: *pdwOutputBytes = adss.cbDstLength; break; } } TRACE("=> (%d) [%lu]\n", ret, *pdwOutputBytes); return ret; } /*********************************************************************** * acmStreamUnprepareHeader (MSACM32.44) */ MMRESULT WINAPI acmStreamUnprepareHeader(HACMSTREAM has, PACMSTREAMHEADER pash, DWORD fdwUnprepare) { PWINE_ACMSTREAM was; MMRESULT ret = MMSYSERR_NOERROR; PACMDRVSTREAMHEADER padsh; TRACE("(0x%08x, %p, %ld)\n", has, pash, fdwUnprepare); if ((was = ACM_GetStream(has)) == NULL) return MMSYSERR_INVALHANDLE; if (!pash || pash->cbStruct < sizeof(ACMSTREAMHEADER)) return MMSYSERR_INVALPARAM; if (!(pash->fdwStatus & ACMSTREAMHEADER_STATUSF_PREPARED)) return ACMERR_UNPREPARED; /* Note: the ACMSTREAMHEADER and ACMDRVSTREAMHEADER structs are of same * size. some fields are private to msacm internals, and are exposed * in ACMSTREAMHEADER in the dwReservedDriver array */ padsh = (PACMDRVSTREAMHEADER)pash; /* check that pointers have not been modified */ if (padsh->pbPreparedSrc != padsh->pbSrc || padsh->cbPreparedSrcLength < padsh->cbSrcLength || padsh->pbPreparedDst != padsh->pbDst || padsh->cbPreparedDstLength < padsh->cbDstLength) { return MMSYSERR_INVALPARAM; } padsh->fdwConvert = fdwUnprepare; ret = SendDriverMessage(was->pDrv->hDrvr, ACMDM_STREAM_UNPREPARE, (DWORD)&was->drvInst, (DWORD)padsh); if (ret == MMSYSERR_NOERROR || ret == MMSYSERR_NOTSUPPORTED) { ret = MMSYSERR_NOERROR; padsh->fdwStatus &= ~(ACMSTREAMHEADER_STATUSF_DONE|ACMSTREAMHEADER_STATUSF_INQUEUE|ACMSTREAMHEADER_STATUSF_PREPARED); } TRACE("=> (%d)\n", ret); return ret; } wine-20000526/dlls/msacm32/wineacm.h0100644000175000001440000000321207025011551016433 0ustar julliardusers/* -*- tab-width: 8; c-basic-offset: 4 -*- */ /*********************************************************************** * Wine specific - Win32 */ typedef struct _WINE_ACMDRIVERID *PWINE_ACMDRIVERID; typedef struct _WINE_ACMDRIVER *PWINE_ACMDRIVER; typedef struct _WINE_ACMOBJ { PWINE_ACMDRIVERID pACMDriverID; } WINE_ACMOBJ, *PWINE_ACMOBJ; typedef struct _WINE_ACMDRIVER { WINE_ACMOBJ obj; HDRVR hDrvr; DRIVERPROC pfnDriverProc; PWINE_ACMDRIVER pNextACMDriver; } WINE_ACMDRIVER; typedef struct _WINE_ACMSTREAM { WINE_ACMOBJ obj; PWINE_ACMDRIVER pDrv; ACMDRVSTREAMINSTANCE drvInst; HACMDRIVER hAcmDriver; } WINE_ACMSTREAM, *PWINE_ACMSTREAM; typedef struct _WINE_ACMDRIVERID { LPSTR pszDriverAlias; LPSTR pszFileName; HINSTANCE hInstModule; /* NULL if global */ DWORD dwProcessID; /* ID of process which installed a local driver */ BOOL bEnabled; PWINE_ACMDRIVER pACMDriverList; PWINE_ACMDRIVERID pNextACMDriverID; PWINE_ACMDRIVERID pPrevACMDriverID; } WINE_ACMDRIVERID; /* From internal.c */ extern HANDLE MSACM_hHeap; extern PWINE_ACMDRIVERID MSACM_pFirstACMDriverID; extern PWINE_ACMDRIVERID MSACM_pLastACMDriverID; PWINE_ACMDRIVERID MSACM_RegisterDriver( LPSTR pszDriverAlias, LPSTR pszFileName, HINSTANCE hinstModule); void MSACM_RegisterAllDrivers(void); PWINE_ACMDRIVERID MSACM_UnregisterDriver(PWINE_ACMDRIVERID p); void MSACM_UnregisterAllDrivers(void); PWINE_ACMDRIVERID MSACM_GetDriverID(HACMDRIVERID hDriverID); PWINE_ACMDRIVER MSACM_GetDriver(HACMDRIVER hDriver); PWINE_ACMOBJ MSACM_GetObj(HACMOBJ hObj); wine-20000526/dlls/msnet32/0040755000175000001440000000000007113604176014703 5ustar julliarduserswine-20000526/dlls/msnet32/.cvsignore0100644000175000001440000000004407045213573016677 0ustar julliardusers*.spec.c Makefile libmsnet32.so.1.0 wine-20000526/dlls/msnet32/Makefile.in0100644000175000001440000000027007060307301016733 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = msnet32 SOVERSION = 1.0 SPEC_SRCS = msnet32.spec @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/msnet32/msnet32.spec0100644000175000001440000000362306752006276017060 0ustar julliardusersname msnet32 type win32 1 stub MSNET32_1 2 stub MSNET32_2 3 stub MSNET32_3 4 stub MSNET32_4 5 stub MSNET32_5 6 stub MSNET32_6 7 stub MSNET32_7 8 stub MSNET32_8 9 stub MSNET32_9 10 stub MSNET32_10 11 stub MSNET32_11 12 stub MSNET32_12 13 stub MSNET32_13 14 stub MSNET32_14 15 stub MSNET32_15 16 stub MSNET32_16 17 stub MSNET32_17 18 stub MSNET32_18 19 stub MSNET32_19 20 stub MSNET32_20 21 stub MSNET32_21 22 stub MSNET32_22 23 stub MSNET32_23 24 stub MSNET32_24 25 stub MSNET32_25 26 stub MSNET32_26 27 stub MSNET32_27 28 stub MSNET32_28 29 stub MSNET32_29 30 stub MSNET32_30 31 stub MSNET32_31 32 stub MSNET32_32 33 stub MSNET32_33 34 stub MSNET32_34 35 stub MSNET32_35 36 stub MSNET32_36 37 stub MSNET32_37 38 stub MSNET32_38 39 stub MSNET32_39 40 stub MSNET32_40 41 stub MSNET32_41 42 stub MSNET32_42 43 stub MSNET32_43 44 stub MSNET32_44 45 stub MSNET32_45 46 stub MSNET32_46 47 stub MSNET32_47 48 stub MSNET32_48 49 stub MSNET32_49 50 stub MSNET32_50 51 stub MSNET32_51 52 stub MSNET32_52 53 stub MSNET32_53 54 stub MSNET32_54 55 stub MSNET32_55 56 stub MSNET32_56 57 stub MSNET32_57 58 stub MSNET32_58 59 stub MSNET32_59 60 stub MSNET32_60 61 stub MSNET32_61 62 stub MSNET32_62 63 stub MSNET32_63 64 stub MSNET32_64 65 stub MSNET32_65 66 stub MSNET32_66 67 stub MSNET32_67 68 stub MSNET32_68 69 stub MSNET32_69 70 stub MSNET32_70 71 stub MSNET32_71 72 stub MSNET32_72 73 stub MSNET32_73 74 stub MSNET32_74 75 stub MSNET32_75 76 stub MSNET32_76 77 stub MSNET32_77 78 stub MSNET32_78 79 stub MSNET32_79 80 stub MSNET32_80 81 stub MSNET32_81 82 stub MSNET32_82 83 stub MSNET32_83 84 stub MSNET32_84 85 stub MSNET32_85 86 stub MSNET32_86 87 stub MSNET32_87 88 stub MSNET32_88 89 stub MSNET32_89 90 stub MSNET32_90 91 stub MSNET32_91 92 stub MSNET32_92 93 stub MSNET32_93 94 stub MSNET32_94 95 stub MSNET32_95 96 stub MSNET32_96 wine-20000526/dlls/msvideo/0040755000175000001440000000000007113604176015056 5ustar julliarduserswine-20000526/dlls/msvideo/.cvsignore0100644000175000001440000000006207045213573017052 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libmsvfw32.so.1.0 wine-20000526/dlls/msvideo/Makefile.in0100644000175000001440000000041007060456111017106 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = msvfw32 SOVERSION = 1.0 ALTNAMES = msvideo IMPORTS = winmm SPEC_SRCS = msvfw32.spec msvideo.spec C_SRCS = \ msvideo_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/msvideo/msvfw32.spec0100644000175000001440000000433107077362252017244 0ustar julliardusersname msvfw32 type win32 import winmm.dll # Yes, ICCompress,ICDecompress,MCIWnd* and ICDraw* are cdecl (VFWAPIV). # The rest is stdcall (VFWAPI) however. -Marcus Meissner, 990124 2 stdcall VideoForWindowsVersion() VideoForWindowsVersion 3 stdcall DrawDibBegin(long long long long ptr long long long) DrawDibBegin 4 stub DrawDibChangePalette 5 stdcall DrawDibClose(long) DrawDibClose 6 stub DrawDibDraw 7 stub DrawDibEnd 8 stub DrawDibGetBuffer 9 stub DrawDibGetPalette 10 stdcall DrawDibOpen() DrawDibOpen 11 stub DrawDibProfileDisplay 12 stdcall DrawDibRealize(long long long) DrawDibRealize 13 stdcall DrawDibSetPalette(long long) DrawDibSetPalette 14 stub DrawDibStart 15 stub DrawDibStop 16 stub DrawDibTime 17 stub GetOpenFileNamePreview 18 stub GetOpenFileNamePreviewA 19 stub GetOpenFileNamePreviewW 20 stub GetSaveFileNamePreviewA 21 stub GetSaveFileNamePreviewW 22 stdcall ICClose(long) ICClose 23 cdecl ICCompress(long long ptr ptr ptr ptr ptr ptr long long long ptr ptr) ICCompress 24 stub ICCompressorChoose 25 stub ICCompressorFree 26 cdecl ICDecompress(long long ptr ptr ptr ptr) ICDecompress 27 cdecl ICDraw(long long ptr ptr long long) ICDraw 28 cdecl ICDrawBegin(long long long long long long long long long ptr long long long long long long) ICDrawBegin 29 stdcall ICGetDisplayFormat(long ptr ptr long long long) ICGetDisplayFormat 30 stdcall ICGetInfo(long ptr long) ICGetInfo 31 stub ICImageCompress 32 stub ICImageDecompress 33 stdcall ICInfo(long long ptr) ICInfo 34 stub ICInstall 35 stdcall ICLocate(long long ptr ptr long) ICLocate 36 stub ICMThunk 37 stdcall ICOpen(long long long) ICOpen 38 stdcall ICOpenFunction(long long long ptr) ICOpenFunction 39 stub ICRemove 40 stdcall ICSendMessage(long long long long) ICSendMessage 41 stub ICSeqCompressFrame 42 stub ICSeqCompressFrameEnd 43 stub ICSeqCompressFrameStart 44 cdecl MCIWndCreate (long long long ptr) MCIWndCreate 45 cdecl MCIWndCreateA (long long long str) MCIWndCreateA 46 cdecl MCIWndCreateW (long long long wstr) MCIWndCreateW 47 stub MCIWndRegisterClass 48 stub StretchDIB 49 stub ls_ThunkData32 50 stub sl_ThunkData32 wine-20000526/dlls/msvideo/msvideo.spec0100644000175000001440000000331007001074063017362 0ustar julliardusersname msvideo type win16 2 pascal VideoForWindowsVersion() VideoForWindowsVersion 20 stub VIDEOGETNUMDEVS 21 stub VIDEOGETERRORTEXT 22 pascal VIDEOCAPDRIVERDESCANDVER(word ptr word ptr word) VideoCapDriverDescAndVer 28 stub VIDEOOPEN 29 stub VIDEOCLOSE 30 stub VIDEODIALOG 31 stub VIDEOFRAME 32 stub VIDEOCONFIGURE 33 stub VIDEOCONFIGURESTORAGE 34 stub VIDEOGETCHANNELCAPS 35 stub VIDEOUPDATE 40 stub VIDEOSTREAMADDBUFFER 41 stub VIDEOSTREAMFINI 42 stub VIDEOSTREAMGETERROR 43 stub VIDEOSTREAMGETPOSITION 44 stub VIDEOSTREAMINIT 46 stub VIDEOSTREAMPREPAREHEADER 47 stub VIDEOSTREAMRESET 49 stub VIDEOSTREAMSTART 50 stub VIDEOSTREAMSTOP 51 stub VIDEOSTREAMUNPREPAREHEADER 52 stub VIDEOSTREAMALLOCHDRANDBUFFER 53 stub VIDEOSTREAMFREEHDRANDBUFFER 60 stub VIDEOMESSAGE 102 stub DRAWDIBOPEN 103 stub DRAWDIBCLOSE 104 stub DRAWDIBBEGIN 105 stub DRAWDIBEND 106 stub DRAWDIBDRAW 108 stub DRAWDIBGETPALETTE 110 stub DRAWDIBSETPALETTE 111 stub DRAWDIBCHANGEPALETTE 112 stub DRAWDIBREALIZE 113 stub DRAWDIBTIME 114 stub DRAWDIBPROFILEDISPLAY 115 stub STRETCHDIB 118 stub DRAWDIBSTART 119 stub DRAWDIBSTOP 120 stub DRAWDIBGETBUFFER 200 stub ICINFO 201 stub ICINSTALL 202 stub ICREMOVE 203 stub ICOPEN 204 stub ICCLOSE 205 stub ICSENDMESSAGE 206 stub ICOPENFUNCTION 207 stub _ICMESSAGE 212 stub ICGETINFO 213 stub ICLOCATE 224 stub _ICCOMPRESS 230 stub _ICDECOMPRESS 232 stub _ICDRAWBEGIN 234 stub _ICDRAW 239 stub ICGETDISPLAYFORMAT 240 stub ICIMAGECOMPRESS 241 stub ICIMAGEDECOMPRESS 242 stub ICCOMPRESSORCHOOSE 243 stub ICCOMPRESSORFREE 244 stub ICSEQCOMPRESSFRAMESTART 245 stub ICSEQCOMPRESSFRAMEEND 246 stub ICSEQCOMPRESSFRAME 250 stub _MCIWNDCREATE 251 stub _MCIWNDREGISTERCLASS 252 stub GETOPENFILENAMEPREVIEW 253 stub GETSAVEFILENAMEPREVIEW wine-20000526/dlls/msvideo/msvideo_main.c0100644000175000001440000003241007066752015017674 0ustar julliardusers/* * Copyright 1998 Marcus Meissner */ #include #include #include "winbase.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "vfw.h" #include "wine/winestring.h" #include "driver.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(msvideo) /*********************************************************************** * VideoForWindowsVersion [MSVFW.2][MSVIDEO.2] * Returns the version in major.minor form. * In Windows95 this returns 0x040003b6 (4.950) */ DWORD WINAPI VideoForWindowsVersion(void) { return 0x040003B6; /* 4.950 */ } /*********************************************************************** * VideoCapDriverDescAndVer [MSVIDEO.22] */ DWORD WINAPI VideoCapDriverDescAndVer(WORD nr,LPVOID buf1,WORD buf1len,LPVOID buf2,WORD buf2len) { FIXME("(%d,%p,%d,%p,%d), stub!\n",nr,buf1,buf1len,buf2,buf2len); return 0; } /* system.ini: [drivers] */ /*********************************************************************** * ICInfo [MSVFW.33] * Get information about an installable compressor. Return TRUE if there * is one. */ BOOL WINAPI ICInfo( DWORD fccType, /* [in] type of compressor ('vidc') */ DWORD fccHandler, /* [in] th compressor */ ICINFO *lpicinfo /* [out] information about compressor */ ) { char type[5],buf[2000]; memcpy(type,&fccType,4);type[4]=0; TRACE("(%s,%ld,%p).\n",type,fccHandler,lpicinfo); /* does OpenDriver/CloseDriver */ lpicinfo->dwSize = sizeof(ICINFO); lpicinfo->fccType = fccType; lpicinfo->dwFlags = 0; if (GetPrivateProfileStringA("drivers32",NULL,NULL,buf,2000,"system.ini")) { char *s = buf; while (*s) { if (!lstrncmpiA(type,s,4)) { if(!fccHandler--) { lpicinfo->fccHandler = mmioStringToFOURCCA(s+5,0); return TRUE; } } s=s+lstrlenA(s)+1; /* either next char or \0 */ } } return FALSE; } /*********************************************************************** * ICOpen [MSVFW.37] * Opens an installable compressor. Return special handle. */ HIC WINAPI ICOpen(DWORD fccType,DWORD fccHandler,UINT wMode) { char type[5],handler[5],codecname[20]; ICOPEN icopen; HDRVR hdrv; WINE_HIC *whic; memcpy(type,&fccType,4);type[4]=0; memcpy(handler,&fccHandler,4);handler[4]=0; TRACE("(%s,%s,0x%08lx)\n",type,handler,(DWORD)wMode); sprintf(codecname,"%s.%s",type,handler); /* Well, lParam2 is in fact a LPVIDEO_OPEN_PARMS, but it has the * same layout as ICOPEN */ icopen.fccType = fccType; icopen.fccHandler = fccHandler; icopen.dwSize = sizeof(ICOPEN); icopen.dwFlags = wMode; /* FIXME: do we need to fill out the rest too? */ hdrv=OpenDriverA(codecname,"drivers32",(LPARAM)&icopen); if (!hdrv) { if (!strcasecmp(type,"vids")) { sprintf(codecname,"vidc.%s",handler); fccType = mmioFOURCC('v','i','d','c'); } hdrv=OpenDriverA(codecname,"drivers32",(LPARAM)&icopen); if (!hdrv) return 0; } whic = HeapAlloc(GetProcessHeap(),0,sizeof(WINE_HIC)); whic->hdrv = hdrv; whic->driverproc= NULL; whic->private = ICSendMessage((HIC)whic,DRV_OPEN,0,(LPARAM)&icopen); return (HIC)whic; } /*********************************************************************** * ICOpenFunction [MSVFW.38] */ HIC VFWAPI ICOpenFunction(DWORD fccType, DWORD fccHandler, UINT wMode, FARPROC lpfnHandler) { char type[5],handler[5]; HIC hic; WINE_HIC *whic; memcpy(type,&fccType,4);type[4]=0; memcpy(handler,&fccHandler,4);handler[4]=0; FIXME("(%s,%s,%d,%p), stub!\n",type,handler,wMode,lpfnHandler); hic = ICOpen(fccType,fccHandler,wMode); if (!hic) return hic; whic = (WINE_HIC*)hic; whic->driverproc = lpfnHandler; return hic; } /*********************************************************************** * ICGetInfo [MSVFW.30] */ LRESULT WINAPI ICGetInfo(HIC hic,ICINFO *picinfo,DWORD cb) { LRESULT ret; TRACE("(0x%08lx,%p,%ld)\n",(DWORD)hic,picinfo,cb); ret = ICSendMessage(hic,ICM_GETINFO,(DWORD)picinfo,cb); TRACE(" -> 0x%08lx\n",ret); return ret; } /*********************************************************************** * ICLocate [MSVFW.35] */ HIC VFWAPI ICLocate( DWORD fccType, DWORD fccHandler, LPBITMAPINFOHEADER lpbiIn, LPBITMAPINFOHEADER lpbiOut, WORD wMode ) { char type[5],handler[5]; HIC hic; DWORD querymsg; switch (wMode) { case ICMODE_FASTCOMPRESS: case ICMODE_COMPRESS: querymsg = ICM_COMPRESS_QUERY; break; case ICMODE_DECOMPRESS: case ICMODE_FASTDECOMPRESS: querymsg = ICM_DECOMPRESS_QUERY; break; case ICMODE_DRAW: querymsg = ICM_DRAW_QUERY; break; default: FIXME("Unknown mode (%d)\n",wMode); return 0; } /* Easy case: handler/type match, we just fire a query and return */ hic = ICOpen(fccType,fccHandler,wMode); if (hic) { if (!ICSendMessage(hic,querymsg,(DWORD)lpbiIn,(DWORD)lpbiOut)) return hic; ICClose(hic); } type[4]='\0';memcpy(type,&fccType,4); handler[4]='\0';memcpy(handler,&fccHandler,4); if (fccType==streamtypeVIDEO) { hic = ICLocate(ICTYPE_VIDEO,fccHandler,lpbiIn,lpbiOut,wMode); if (hic) return hic; } FIXME("(%s,%s,%p,%p,0x%04x),unhandled!\n",type,handler,lpbiIn,lpbiOut,wMode); return 0; } /*********************************************************************** * ICGetDisplayFormat [MSVFW.29] */ HIC VFWAPI ICGetDisplayFormat( HIC hic,LPBITMAPINFOHEADER lpbiIn,LPBITMAPINFOHEADER lpbiOut, INT depth,INT dx,INT dy ) { HIC tmphic = hic; LRESULT lres; FIXME("(0x%08lx,%p,%p,%d,%d,%d),stub!\n",(DWORD)hic,lpbiIn,lpbiOut,depth,dx,dy); if (!tmphic) { tmphic=ICLocate(ICTYPE_VIDEO,0,lpbiIn,NULL,ICMODE_DECOMPRESS); if (!tmphic) return tmphic; } if ((dy == lpbiIn->biHeight) || (dx == lpbiIn->biWidth)) dy = dx = 0; /* no resize needed */ /* Can we decompress it ? */ lres = ICDecompressQuery(tmphic,lpbiIn,NULL); if (lres) goto errout; /* no, sorry */ ICDecompressGetFormat(hic,lpbiIn,lpbiOut); *lpbiOut=*lpbiIn; lpbiOut->biCompression = 0; lpbiOut->biSize = sizeof(*lpbiOut); if (!depth) { HDC hdc; hdc = GetDC(0); depth = GetDeviceCaps(hdc,12)*GetDeviceCaps(hdc,14); ReleaseDC(0,hdc); if (depth==15) depth = 16; if (depth<8) depth = 8; /* more constraints and tests */ } if (lpbiIn->biBitCount == 8) depth = 8; return hic; errout: if (hic!=tmphic) ICClose(tmphic); return 0; } /*********************************************************************** * ICCompress [MSVFW.23] */ DWORD VFWAPIV ICCompress( HIC hic,DWORD dwFlags,LPBITMAPINFOHEADER lpbiOutput,LPVOID lpData, LPBITMAPINFOHEADER lpbiInput,LPVOID lpBits,LPDWORD lpckid, LPDWORD lpdwFlags,LONG lFrameNum,DWORD dwFrameSize,DWORD dwQuality, LPBITMAPINFOHEADER lpbiPrev,LPVOID lpPrev ) { ICCOMPRESS iccmp; iccmp.dwFlags = dwFlags; iccmp.lpbiOutput = lpbiOutput; iccmp.lpOutput = lpData; iccmp.lpbiInput = lpbiInput; iccmp.lpInput = lpBits; iccmp.lpckid = lpckid; iccmp.lpdwFlags = lpdwFlags; iccmp.lFrameNum = lFrameNum; iccmp.dwFrameSize = dwFrameSize; iccmp.dwQuality = dwQuality; iccmp.lpbiPrev = lpbiPrev; iccmp.lpPrev = lpPrev; return ICSendMessage(hic,ICM_COMPRESS,(LPARAM)&iccmp,sizeof(iccmp)); } /*********************************************************************** * ICDecompress [MSVFW.26] */ DWORD VFWAPIV ICDecompress(HIC hic,DWORD dwFlags,LPBITMAPINFOHEADER lpbiFormat,LPVOID lpData,LPBITMAPINFOHEADER lpbi,LPVOID lpBits) { ICDECOMPRESS icd; icd.dwFlags = dwFlags; icd.lpbiInput = lpbiFormat; icd.lpInput = lpData; icd.lpbiOutput = lpbi; icd.lpOutput = lpBits; icd.ckid = 0; return ICSendMessage(hic,ICM_DECOMPRESS,(LPARAM)&icd,sizeof(icd)); } /*********************************************************************** * ICSendMessage [MSVFW.40] */ LRESULT VFWAPI ICSendMessage(HIC hic,UINT msg,DWORD lParam1,DWORD lParam2) { LRESULT ret; WINE_HIC *whic = (WINE_HIC*)hic; #define XX(x) case x: TRACE("(0x%08lx,"#x",0x%08lx,0x%08lx)\n",(DWORD)hic,lParam1,lParam2);break; switch (msg) { XX(ICM_ABOUT) XX(ICM_GETINFO) XX(ICM_COMPRESS_FRAMES_INFO) XX(ICM_COMPRESS_GET_FORMAT) XX(ICM_COMPRESS_GET_SIZE) XX(ICM_COMPRESS_QUERY) XX(ICM_COMPRESS_BEGIN) XX(ICM_COMPRESS) XX(ICM_COMPRESS_END) XX(ICM_DECOMPRESS_GET_FORMAT) XX(ICM_DECOMPRESS_QUERY) XX(ICM_DECOMPRESS_BEGIN) XX(ICM_DECOMPRESS) XX(ICM_DECOMPRESS_END) XX(ICM_DECOMPRESS_SET_PALETTE) XX(ICM_DECOMPRESS_GET_PALETTE) XX(ICM_DRAW_QUERY) XX(ICM_DRAW_BEGIN) XX(ICM_DRAW_GET_PALETTE) XX(ICM_DRAW_START) XX(ICM_DRAW_STOP) XX(ICM_DRAW_END) XX(ICM_DRAW_GETTIME) XX(ICM_DRAW) XX(ICM_DRAW_WINDOW) XX(ICM_DRAW_SETTIME) XX(ICM_DRAW_REALIZE) XX(ICM_DRAW_FLUSH) XX(ICM_DRAW_RENDERBUFFER) XX(ICM_DRAW_START_PLAY) XX(ICM_DRAW_STOP_PLAY) XX(ICM_DRAW_SUGGESTFORMAT) XX(ICM_DRAW_CHANGEPALETTE) XX(ICM_GETBUFFERSWANTED) XX(ICM_GETDEFAULTKEYFRAMERATE) XX(ICM_DECOMPRESSEX_BEGIN) XX(ICM_DECOMPRESSEX_QUERY) XX(ICM_DECOMPRESSEX) XX(ICM_DECOMPRESSEX_END) XX(ICM_SET_STATUS_PROC) default: FIXME("(0x%08lx,0x%08lx,0x%08lx,0x%08lx)\n",(DWORD)hic,(DWORD)msg,lParam1,lParam2); } #if 0 if (whic->driverproc) { FIXME("(0x%08lx,0x%08lx,0x%08lx,0x%08lx), calling %p\n",(DWORD)hic,(DWORD)msg,lParam1,lParam2,whic->driverproc); ret = whic->driverproc(whic->hdrv,1,msg,lParam1,lParam2); } else #endif ret = SendDriverMessage(whic->hdrv,msg,lParam1,lParam2); TRACE(" -> 0x%08lx\n",ret); return ret; } /*********************************************************************** * ICDrawBegin [MSVFW.28] */ DWORD VFWAPIV ICDrawBegin( HIC hic, DWORD dwFlags,/* flags */ HPALETTE hpal, /* palette to draw with */ HWND hwnd, /* window to draw to */ HDC hdc, /* HDC to draw to */ INT xDst, /* destination rectangle */ INT yDst, INT dxDst, INT dyDst, LPBITMAPINFOHEADER lpbi, /* format of frame to draw */ INT xSrc, /* source rectangle */ INT ySrc, INT dxSrc, INT dySrc, DWORD dwRate, /* frames/second = (dwRate/dwScale) */ DWORD dwScale) { ICDRAWBEGIN icdb; icdb.dwFlags = dwFlags; icdb.hpal = hpal; icdb.hwnd = hwnd; icdb.hdc = hdc; icdb.xDst = xDst; icdb.yDst = yDst; icdb.dxDst = dxDst; icdb.dyDst = dyDst; icdb.lpbi = lpbi; icdb.xSrc = xSrc; icdb.ySrc = ySrc; icdb.dxSrc = dxSrc; icdb.dySrc = dySrc; icdb.dwRate = dwRate; icdb.dwScale = dwScale; return ICSendMessage(hic,ICM_DRAW_BEGIN,(LPARAM)&icdb,sizeof(icdb)); } /*********************************************************************** * ICDraw [MSVFW.27] */ DWORD VFWAPIV ICDraw( HIC hic,DWORD dwFlags,LPVOID lpFormat,LPVOID lpData,DWORD cbData, LONG lTime ) { ICDRAW icd; icd.dwFlags = dwFlags; icd.lpFormat = lpFormat; icd.lpData = lpData; icd.cbData = cbData; icd.lTime = lTime; return ICSendMessage(hic,ICM_DRAW,(LPARAM)&icd,sizeof(icd)); } /*********************************************************************** * ICClose [MSVFW.22] */ LRESULT WINAPI ICClose(HIC hic) { WINE_HIC *whic = (WINE_HIC*)hic; TRACE("(%d).\n",hic); /* FIXME: correct? */ CloseDriver(whic->hdrv,0,0); HeapFree(GetProcessHeap(),0,whic); return 0; } /*********************************************************************** * DrawDibOpen [MSVFW.10] */ HANDLE /* HDRAWDIB */ WINAPI DrawDibOpen( void ) { FIXME("stub!\n"); return 0xdead; } /*********************************************************************** * DrawDibClose [MSVFW.5] */ BOOL WINAPI DrawDibClose( HANDLE /*HDRAWDIB*/ hDib ) { FIXME("stub!\n"); return TRUE; } /*********************************************************************** * DrawDibBegin [MSVFW.3] */ BOOL VFWAPI DrawDibBegin(HANDLE /*HDRAWDIB*/ hdd, HDC hdc, INT dxDst, INT dyDst, LPBITMAPINFOHEADER lpbi, INT dxSrc, INT dySrc, UINT wFlags) { FIXME("(%d,0x%lx,%d,%d,%p,%d,%d,0x%08lx), stub!\n", hdd,(DWORD)hdc,dxDst,dyDst,lpbi,dxSrc,dySrc,(DWORD)wFlags ); return TRUE; } /*********************************************************************** * DrawDibSetPalette [MSVFW.13] */ BOOL VFWAPI DrawDibSetPalette(HANDLE /*HDRAWDIB*/ hdd, HPALETTE hpal) { FIXME("(%d,%d),stub!\n",hdd,hpal); return TRUE; } /*********************************************************************** * DrawDibRealize [MSVFW.12] */ UINT VFWAPI DrawDibRealize(HANDLE /*HDRAWDIB*/ hdd, HDC hdc, BOOL fBackground) { FIXME("(0x%08lx,0x%08lx,%d),stub!\n",(DWORD)hdd,(DWORD)hdc,fBackground); return 0; } /*********************************************************************** * MCIWndCreate [MSVFW.44] */ HWND VFWAPIV MCIWndCreate (HWND hwndParent, HINSTANCE hInstance, DWORD dwStyle,LPVOID szFile) { FIXME("%x %x %lx %p\n",hwndParent, hInstance, dwStyle, szFile); return 0; } /*********************************************************************** * MCIWndCreateA [MSVFW.45] */ HWND VFWAPIV MCIWndCreateA(HWND hwndParent, HINSTANCE hInstance, DWORD dwStyle,LPCSTR szFile) { FIXME("%x %x %lx %s\n",hwndParent, hInstance, dwStyle, szFile); return 0; } /*********************************************************************** * MCIWndCreateW [MSVFW.46] */ HWND VFWAPIV MCIWndCreateW(HWND hwndParent, HINSTANCE hInstance, DWORD dwStyle,LPCWSTR szFile) { FIXME("%x %x %lx %s\n",hwndParent, hInstance, dwStyle, debugstr_w(szFile)); return 0; } wine-20000526/dlls/ntdll/0040755000175000001440000000000007113604177014526 5ustar julliarduserswine-20000526/dlls/ntdll/.cvsignore0100644000175000001440000000002606746606647016540 0ustar julliardusersMakefile ntdll.spec.c wine-20000526/dlls/ntdll/Makefile.in0100644000175000001440000000057307043136501016566 0ustar julliardusersDEFS = @DLLFLAGS@ -D__WINE__ TOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = ntdll SPEC_SRCS = ntdll.spec C_SRCS = \ exception.c \ error.c \ file.c \ misc.c \ nt.c \ om.c \ reg.c \ rtl.c \ rtlstr.c \ sec.c \ signal_i386.c \ signal_sparc.c \ sync.c \ time.c all: $(MODULE).o @MAKE_RULES@ ### Dependencies: wine-20000526/dlls/ntdll/error.c0100644000175000001440000013647407043136501016030 0ustar julliardusers/* * NTDLL error handling * * Copyright 2000 Alexandre Julliard */ #include "config.h" #include "ntddk.h" #include "winerror.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ntdll); struct error_table { DWORD start; DWORD end; const WORD *table; }; static const struct error_table error_table[]; /************************************************************************** * RtlNtStatusToDosError */ DWORD WINAPI RtlNtStatusToDosError( DWORD status ) { const struct error_table *table = error_table; if (!status || (status & 0x20000000)) return status; /* 0xd... is equivalent to 0xc... */ if ((status & 0xf0000000) == 0xd0000000) status &= ~0x10000000; while (table->start) { if (status < table->start) break; if (status < table->end) { DWORD ret = table->table[status - table->start]; if (!ret) ret = status; /* 0 means 1:1 mapping */ else if (ret == ERROR_MR_MID_NOT_FOUND) FIXME( "no mapping for %08lx\n", status ); return ret; } table++; } /* now some special cases */ if (HIWORD(status) == 0xc001) return LOWORD(status); if (HIWORD(status) == 0x8007) return LOWORD(status); FIXME( "no mapping for %08lx\n", status ); return ERROR_MR_MID_NOT_FOUND; } /* conversion tables */ static const WORD table_00000103[11] = { ERROR_IO_PENDING, /* 00000103 (STATUS_PENDING) */ ERROR_MR_MID_NOT_FOUND, /* 00000104 */ ERROR_MORE_DATA, /* 00000105 */ ERROR_NOT_ALL_ASSIGNED, /* 00000106 */ ERROR_SOME_NOT_MAPPED, /* 00000107 */ ERROR_MR_MID_NOT_FOUND, /* 00000108 */ ERROR_MR_MID_NOT_FOUND, /* 00000109 */ ERROR_MR_MID_NOT_FOUND, /* 0000010a */ ERROR_MR_MID_NOT_FOUND, /* 0000010b */ ERROR_NOTIFY_ENUM_DIR, /* 0000010c */ ERROR_NO_QUOTAS_FOR_ACCOUNT /* 0000010d */ }; static const WORD table_40000002[12] = { ERROR_INVALID_PARAMETER, /* 40000002 */ ERROR_MR_MID_NOT_FOUND, /* 40000003 */ ERROR_MR_MID_NOT_FOUND, /* 40000004 */ ERROR_MR_MID_NOT_FOUND, /* 40000005 */ ERROR_LOCAL_USER_SESSION_KEY, /* 40000006 */ ERROR_MR_MID_NOT_FOUND, /* 40000007 */ ERROR_MORE_WRITES, /* 40000008 */ ERROR_REGISTRY_RECOVERED, /* 40000009 */ ERROR_MR_MID_NOT_FOUND, /* 4000000a */ ERROR_MR_MID_NOT_FOUND, /* 4000000b */ ERROR_COUNTER_TIMEOUT, /* 4000000c */ ERROR_NULL_LM_PASSWORD /* 4000000d */ }; static const WORD table_40020056[1] = { RPC_S_UUID_LOCAL_ONLY /* 40020056 */ }; static const WORD table_400200af[1] = { RPC_S_SEND_INCOMPLETE /* 400200af */ }; static const WORD table_80000001[37] = { 0, /* 80000001 (STATUS_GUARD_PAGE_VIOLATION) */ ERROR_NOACCESS, /* 80000002 (STATUS_DATATYPE_MISALIGNMENT) */ 0, /* 80000003 (STATUS_BREAKPOINT) */ 0, /* 80000004 (STATUS_SINGLE_STEP) */ ERROR_MORE_DATA, /* 80000005 (STATUS_BUFFER_OVERFLOW) */ ERROR_NO_MORE_FILES, /* 80000006 (STATUS_NO_MORE_FILES) */ ERROR_MR_MID_NOT_FOUND, /* 80000007 (STATUS_WAKE_SYSTEM_DEBUGGER) */ ERROR_MR_MID_NOT_FOUND, /* 80000008 */ ERROR_MR_MID_NOT_FOUND, /* 80000009 */ ERROR_MR_MID_NOT_FOUND, /* 8000000a (STATUS_HANDLES_CLOSED) */ ERROR_NO_INHERITANCE, /* 8000000b (STATUS_NO_INHERITANCE) */ ERROR_MR_MID_NOT_FOUND, /* 8000000c (STATUS_GUID_SUBSTITUTION_MADE) */ ERROR_PARTIAL_COPY, /* 8000000d (STATUS_PARTIAL_COPY) */ ERROR_OUT_OF_PAPER, /* 8000000e (STATUS_DEVICE_PAPER_EMPTY) */ ERROR_NOT_READY, /* 8000000f (STATUS_DEVICE_POWERED_OFF) */ ERROR_NOT_READY, /* 80000010 (STATUS_DEVICE_OFF_LINE) */ ERROR_BUSY, /* 80000011 (STATUS_DEVICE_BUSY) */ ERROR_NO_MORE_ITEMS, /* 80000012 (STATUS_NO_MORE_EAS) */ ERROR_INVALID_EA_NAME, /* 80000013 (STATUS_INVALID_EA_NAME) */ ERROR_EA_LIST_INCONSISTENT, /* 80000014 (STATUS_EA_LIST_INCONSISTENT) */ ERROR_EA_LIST_INCONSISTENT, /* 80000015 (STATUS_INVALID_EA_FLAG) */ ERROR_MEDIA_CHANGED, /* 80000016 (STATUS_VERIFY_REQUIRED) */ ERROR_MR_MID_NOT_FOUND, /* 80000017 (STATUS_EXTRANEOUS_INFORMATION) */ ERROR_MR_MID_NOT_FOUND, /* 80000018 (STATUS_RXACT_COMMIT_NECESSARY) */ ERROR_MR_MID_NOT_FOUND, /* 80000019 */ ERROR_NO_MORE_ITEMS, /* 8000001a (STATUS_NO_MORE_ENTRIES) */ ERROR_FILEMARK_DETECTED, /* 8000001b (STATUS_FILEMARK_DETECTED) */ ERROR_MEDIA_CHANGED, /* 8000001c (STATUS_MEDIA_CHANGED) */ ERROR_BUS_RESET, /* 8000001d (STATUS_BUS_RESET) */ ERROR_END_OF_MEDIA, /* 8000001e (STATUS_END_OF_MEDIA) */ ERROR_BEGINNING_OF_MEDIA, /* 8000001f (STATUS_BEGINNING_OF_MEDIA) */ ERROR_MR_MID_NOT_FOUND, /* 80000020 (STATUS_MEDIA_CHECK) */ ERROR_SETMARK_DETECTED, /* 80000021 (STATUS_SETMARK_DETECTED) */ ERROR_NO_DATA_DETECTED, /* 80000022 (STATUS_NO_DATA_DETECTED) */ ERROR_MR_MID_NOT_FOUND, /* 80000023 (STATUS_REDIRECTOR_HAS_OPEN_HANDLES) */ ERROR_MR_MID_NOT_FOUND, /* 80000024 (STATUS_SERVER_HAS_OPEN_HANDLES) */ ERROR_ACTIVE_CONNECTIONS /* 80000025 (STATUS_ALREADY_DISCONNECTED) */ }; static const WORD table_80090300[23] = { ERROR_NO_SYSTEM_RESOURCES, /* 80090300 */ ERROR_INVALID_HANDLE, /* 80090301 */ ERROR_INVALID_FUNCTION, /* 80090302 */ ERROR_BAD_NETPATH, /* 80090303 */ ERROR_INTERNAL_ERROR, /* 80090304 */ ERROR_NO_SUCH_PACKAGE, /* 80090305 */ ERROR_NOT_OWNER, /* 80090306 */ ERROR_NO_SUCH_PACKAGE, /* 80090307 */ ERROR_INVALID_PARAMETER, /* 80090308 */ ERROR_INVALID_PARAMETER, /* 80090309 */ ERROR_NOT_SUPPORTED, /* 8009030a */ ERROR_CANNOT_IMPERSONATE, /* 8009030b */ ERROR_LOGON_FAILURE, /* 8009030c */ ERROR_INVALID_PARAMETER, /* 8009030d */ ERROR_NO_SUCH_LOGON_SESSION, /* 8009030e */ ERROR_ACCESS_DENIED, /* 8009030f */ ERROR_ACCESS_DENIED, /* 80090310 */ ERROR_NO_LOGON_SERVERS, /* 80090311 */ ERROR_MR_MID_NOT_FOUND, /* 80090312 */ ERROR_MR_MID_NOT_FOUND, /* 80090313 */ ERROR_MR_MID_NOT_FOUND, /* 80090314 */ ERROR_MR_MID_NOT_FOUND, /* 80090315 */ ERROR_NO_SUCH_PACKAGE /* 80090316 */ }; static const WORD table_c0000001[411] = { ERROR_GEN_FAILURE, /* c0000001 (STATUS_UNSUCCESSFUL) */ ERROR_INVALID_FUNCTION, /* c0000002 (STATUS_NOT_IMPLEMENTED) */ ERROR_INVALID_PARAMETER, /* c0000003 (STATUS_INVALID_INFO_CLASS) */ ERROR_BAD_LENGTH, /* c0000004 (STATUS_INFO_LENGTH_MISMATCH) */ ERROR_NOACCESS, /* c0000005 (STATUS_ACCESS_VIOLATION) */ ERROR_SWAPERROR, /* c0000006 (STATUS_IN_PAGE_ERROR) */ ERROR_PAGEFILE_QUOTA, /* c0000007 (STATUS_PAGEFILE_QUOTA) */ ERROR_INVALID_HANDLE, /* c0000008 (STATUS_INVALID_HANDLE) */ ERROR_STACK_OVERFLOW, /* c0000009 (STATUS_BAD_INITIAL_STACK) */ ERROR_BAD_EXE_FORMAT, /* c000000a (STATUS_BAD_INITIAL_PC) */ ERROR_INVALID_PARAMETER, /* c000000b (STATUS_INVALID_CID) */ ERROR_MR_MID_NOT_FOUND, /* c000000c (STATUS_TIMER_NOT_CANCELED) */ ERROR_INVALID_PARAMETER, /* c000000d (STATUS_INVALID_PARAMETER) */ ERROR_FILE_NOT_FOUND, /* c000000e (STATUS_NO_SUCH_DEVICE) */ ERROR_FILE_NOT_FOUND, /* c000000f (STATUS_NO_SUCH_FILE) */ ERROR_INVALID_FUNCTION, /* c0000010 (STATUS_INVALID_DEVICE_REQUEST) */ ERROR_HANDLE_EOF, /* c0000011 (STATUS_END_OF_FILE) */ ERROR_WRONG_DISK, /* c0000012 (STATUS_WRONG_VOLUME) */ ERROR_NOT_READY, /* c0000013 (STATUS_NO_MEDIA_IN_DEVICE) */ ERROR_UNRECOGNIZED_MEDIA, /* c0000014 (STATUS_UNRECOGNIZED_MEDIA) */ ERROR_SECTOR_NOT_FOUND, /* c0000015 (STATUS_NONEXISTENT_SECTOR) */ ERROR_MORE_DATA, /* c0000016 (STATUS_MORE_PROCESSING_REQUIRED) */ ERROR_NOT_ENOUGH_MEMORY, /* c0000017 (STATUS_NO_MEMORY) */ ERROR_INVALID_ADDRESS, /* c0000018 (STATUS_CONFLICTING_ADDRESSES) */ ERROR_INVALID_ADDRESS, /* c0000019 (STATUS_NOT_MAPPED_VIEW) */ ERROR_INVALID_PARAMETER, /* c000001a (STATUS_UNABLE_TO_FREE_VM) */ ERROR_INVALID_PARAMETER, /* c000001b (STATUS_UNABLE_TO_DELETE_SECTION) */ ERROR_INVALID_FUNCTION, /* c000001c (STATUS_INVALID_SYSTEM_SERVICE) */ 0, /* c000001d (STATUS_ILLEGAL_INSTRUCTION) */ ERROR_ACCESS_DENIED, /* c000001e (STATUS_INVALID_LOCK_SEQUENCE) */ ERROR_ACCESS_DENIED, /* c000001f (STATUS_INVALID_VIEW_SIZE) */ ERROR_BAD_EXE_FORMAT, /* c0000020 (STATUS_INVALID_FILE_FOR_SECTION) */ ERROR_ACCESS_DENIED, /* c0000021 (STATUS_ALREADY_COMMITTED) */ ERROR_ACCESS_DENIED, /* c0000022 (STATUS_ACCESS_DENIED) */ ERROR_INSUFFICIENT_BUFFER, /* c0000023 (STATUS_BUFFER_TOO_SMALL) */ ERROR_INVALID_HANDLE, /* c0000024 (STATUS_OBJECT_TYPE_MISMATCH) */ 0, /* c0000025 (STATUS_NONCONTINUABLE_EXCEPTION) */ 0, /* c0000026 (STATUS_INVALID_DISPOSITION) */ ERROR_MR_MID_NOT_FOUND, /* c0000027 (STATUS_UNWIND) */ ERROR_MR_MID_NOT_FOUND, /* c0000028 (STATUS_BAD_STACK) */ ERROR_MR_MID_NOT_FOUND, /* c0000029 (STATUS_INVALID_UNWIND_TARGET) */ ERROR_NOT_LOCKED, /* c000002a (STATUS_NOT_LOCKED) */ 0, /* c000002b (STATUS_PARITY_ERROR) */ ERROR_INVALID_ADDRESS, /* c000002c (STATUS_UNABLE_TO_DECOMMIT_VM) */ ERROR_INVALID_ADDRESS, /* c000002d (STATUS_NOT_COMMITTED) */ ERROR_MR_MID_NOT_FOUND, /* c000002e (STATUS_INVALID_PORT_ATTRIBUTES) */ ERROR_MR_MID_NOT_FOUND, /* c000002f (STATUS_PORT_MESSAGE_TOO_LONG) */ ERROR_INVALID_PARAMETER, /* c0000030 (STATUS_INVALID_PARAMETER_MIX) */ ERROR_MR_MID_NOT_FOUND, /* c0000031 (STATUS_INVALID_QUOTA_LOWER) */ ERROR_DISK_CORRUPT, /* c0000032 (STATUS_DISK_CORRUPT_ERROR) */ ERROR_INVALID_NAME, /* c0000033 (STATUS_OBJECT_NAME_INVALID) */ ERROR_FILE_NOT_FOUND, /* c0000034 (STATUS_OBJECT_NAME_NOT_FOUND) */ ERROR_ALREADY_EXISTS, /* c0000035 (STATUS_OBJECT_NAME_COLLISION) */ ERROR_MR_MID_NOT_FOUND, /* c0000036 */ ERROR_INVALID_HANDLE, /* c0000037 (STATUS_PORT_DISCONNECTED) */ ERROR_MR_MID_NOT_FOUND, /* c0000038 (STATUS_DEVICE_ALREADY_ATTACHED) */ ERROR_BAD_PATHNAME, /* c0000039 (STATUS_OBJECT_PATH_INVALID) */ ERROR_PATH_NOT_FOUND, /* c000003a (STATUS_OBJECT_PATH_NOT_FOUND) */ ERROR_BAD_PATHNAME, /* c000003b (STATUS_PATH_SYNTAX_BAD) */ ERROR_IO_DEVICE, /* c000003c (STATUS_DATA_OVERRUN) */ ERROR_IO_DEVICE, /* c000003d (STATUS_DATA_LATE_ERROR) */ ERROR_CRC, /* c000003e (STATUS_DATA_ERROR) */ ERROR_CRC, /* c000003f (STATUS_CRC_ERROR) */ ERROR_NOT_ENOUGH_MEMORY, /* c0000040 (STATUS_SECTION_TOO_BIG) */ ERROR_ACCESS_DENIED, /* c0000041 (STATUS_PORT_CONNECTION_REFUSED) */ ERROR_INVALID_HANDLE, /* c0000042 (STATUS_INVALID_PORT_HANDLE) */ ERROR_SHARING_VIOLATION, /* c0000043 (STATUS_SHARING_VIOLATION) */ ERROR_NOT_ENOUGH_QUOTA, /* c0000044 (STATUS_QUOTA_EXCEEDED) */ ERROR_INVALID_PARAMETER, /* c0000045 (STATUS_INVALID_PAGE_PROTECTION) */ ERROR_NOT_OWNER, /* c0000046 (STATUS_MUTANT_NOT_OWNED) */ ERROR_TOO_MANY_POSTS, /* c0000047 (STATUS_SEMAPHORE_LIMIT_EXCEEDED) */ ERROR_INVALID_PARAMETER, /* c0000048 (STATUS_PORT_ALREADY_SET) */ ERROR_INVALID_PARAMETER, /* c0000049 */ ERROR_SIGNAL_REFUSED, /* c000004a (STATUS_SUSPEND_COUNT_EXCEEDED) */ ERROR_ACCESS_DENIED, /* c000004b */ ERROR_INVALID_PARAMETER, /* c000004c */ ERROR_INVALID_PARAMETER, /* c000004d */ ERROR_INVALID_PARAMETER, /* c000004e */ ERROR_MR_MID_NOT_FOUND, /* c000004f */ ERROR_EA_LIST_INCONSISTENT, /* c0000050 */ ERROR_FILE_CORRUPT, /* c0000051 */ ERROR_FILE_CORRUPT, /* c0000052 */ ERROR_FILE_CORRUPT, /* c0000053 */ ERROR_LOCK_VIOLATION, /* c0000054 (STATUS_LOCK_NOT_GRANTED) */ ERROR_LOCK_VIOLATION, /* c0000055 (STATUS_FILE_LOCK_CONFLICT) */ ERROR_ACCESS_DENIED, /* c0000056 */ ERROR_NOT_SUPPORTED, /* c0000057 */ ERROR_UNKNOWN_REVISION, /* c0000058 (STATUS_UNKNOWN_REVISION) */ ERROR_REVISION_MISMATCH, /* c0000059 */ ERROR_INVALID_OWNER, /* c000005a */ ERROR_INVALID_PRIMARY_GROUP, /* c000005b */ ERROR_NO_IMPERSONATION_TOKEN, /* c000005c */ ERROR_CANT_DISABLE_MANDATORY, /* c000005d */ ERROR_NO_LOGON_SERVERS, /* c000005e */ ERROR_NO_SUCH_LOGON_SESSION, /* c000005f */ ERROR_NO_SUCH_PRIVILEGE, /* c0000060 */ ERROR_PRIVILEGE_NOT_HELD, /* c0000061 */ ERROR_INVALID_ACCOUNT_NAME, /* c0000062 */ ERROR_USER_EXISTS, /* c0000063 */ ERROR_NO_SUCH_USER, /* c0000064 */ ERROR_GROUP_EXISTS, /* c0000065 */ ERROR_NO_SUCH_GROUP, /* c0000066 */ ERROR_MEMBER_IN_GROUP, /* c0000067 */ ERROR_MEMBER_NOT_IN_GROUP, /* c0000068 */ ERROR_LAST_ADMIN, /* c0000069 */ ERROR_INVALID_PASSWORD, /* c000006a */ ERROR_ILL_FORMED_PASSWORD, /* c000006b */ ERROR_PASSWORD_RESTRICTION, /* c000006c */ ERROR_LOGON_FAILURE, /* c000006d */ ERROR_ACCOUNT_RESTRICTION, /* c000006e */ ERROR_INVALID_LOGON_HOURS, /* c000006f */ ERROR_INVALID_WORKSTATION, /* c0000070 */ ERROR_PASSWORD_EXPIRED, /* c0000071 */ ERROR_ACCOUNT_DISABLED, /* c0000072 */ ERROR_NONE_MAPPED, /* c0000073 */ ERROR_TOO_MANY_LUIDS_REQUESTED, /* c0000074 */ ERROR_LUIDS_EXHAUSTED, /* c0000075 */ ERROR_INVALID_SUB_AUTHORITY, /* c0000076 */ ERROR_INVALID_ACL, /* c0000077 */ ERROR_INVALID_SID, /* c0000078 */ ERROR_INVALID_SECURITY_DESCR, /* c0000079 (STATUS_INVALID_SECURITY_DESCR) */ ERROR_PROC_NOT_FOUND, /* c000007a */ ERROR_BAD_EXE_FORMAT, /* c000007b */ ERROR_NO_TOKEN, /* c000007c */ ERROR_BAD_INHERITANCE_ACL, /* c000007d */ ERROR_NOT_LOCKED, /* c000007e */ ERROR_DISK_FULL, /* c000007f (STATUS_DISK_FULL) */ ERROR_SERVER_DISABLED, /* c0000080 */ ERROR_SERVER_NOT_DISABLED, /* c0000081 */ ERROR_TOO_MANY_NAMES, /* c0000082 */ ERROR_NO_MORE_ITEMS, /* c0000083 */ ERROR_INVALID_ID_AUTHORITY, /* c0000084 */ ERROR_NO_MORE_ITEMS, /* c0000085 */ ERROR_LABEL_TOO_LONG, /* c0000086 */ ERROR_OUTOFMEMORY, /* c0000087 (STATUS_SECTION_NOT_EXTENDED) */ ERROR_INVALID_ADDRESS, /* c0000088 */ ERROR_RESOURCE_DATA_NOT_FOUND, /* c0000089 */ ERROR_RESOURCE_TYPE_NOT_FOUND, /* c000008a */ ERROR_RESOURCE_NAME_NOT_FOUND, /* c000008b */ 0, /* c000008c (STATUS_ARRAY_BOUNDS_EXCEEDED) */ 0, /* c000008d (STATUS_FLOAT_DENORMAL_OPERAND) */ 0, /* c000008e (STATUS_FLOAT_DIVIDE_BY_ZERO) */ 0, /* c000008f (STATUS_FLOAT_INEXACT_RESULT) */ 0, /* c0000090 (STATUS_FLOAT_INVALID_OPERATION) */ 0, /* c0000091 (STATUS_FLOAT_OVERFLOW) */ 0, /* c0000092 (STATUS_FLOAT_STACK_CHECK) */ 0, /* c0000093 (STATUS_FLOAT_UNDERFLOW) */ 0, /* c0000094 (STATUS_INTEGER_DIVIDE_BY_ZERO) */ ERROR_ARITHMETIC_OVERFLOW, /* c0000095 (STATUS_INTEGER_OVERFLOW) */ 0, /* c0000096 (STATUS_PRIVILEGED_INSTRUCTION) */ ERROR_NOT_ENOUGH_MEMORY, /* c0000097 */ ERROR_FILE_INVALID, /* c0000098 */ ERROR_ALLOTTED_SPACE_EXCEEDED, /* c0000099 */ ERROR_NO_SYSTEM_RESOURCES, /* c000009a */ ERROR_PATH_NOT_FOUND, /* c000009b */ ERROR_CRC, /* c000009c */ ERROR_NOT_READY, /* c000009d */ ERROR_NOT_READY, /* c000009e */ ERROR_INVALID_ADDRESS, /* c000009f */ ERROR_INVALID_ADDRESS, /* c00000a0 */ ERROR_WORKING_SET_QUOTA, /* c00000a1 */ ERROR_WRITE_PROTECT, /* c00000a2 */ ERROR_NOT_READY, /* c00000a3 */ ERROR_INVALID_GROUP_ATTRIBUTES, /* c00000a4 */ ERROR_BAD_IMPERSONATION_LEVEL, /* c00000a5 */ ERROR_CANT_OPEN_ANONYMOUS, /* c00000a6 */ ERROR_BAD_VALIDATION_CLASS, /* c00000a7 */ ERROR_BAD_TOKEN_TYPE, /* c00000a8 */ ERROR_MR_MID_NOT_FOUND, /* c00000a9 */ ERROR_MR_MID_NOT_FOUND, /* c00000aa */ ERROR_PIPE_BUSY, /* c00000ab */ ERROR_PIPE_BUSY, /* c00000ac */ ERROR_BAD_PIPE, /* c00000ad */ ERROR_PIPE_BUSY, /* c00000ae */ ERROR_INVALID_FUNCTION, /* c00000af */ ERROR_PIPE_NOT_CONNECTED, /* c00000b0 */ ERROR_NO_DATA, /* c00000b1 */ ERROR_PIPE_CONNECTED, /* c00000b2 */ ERROR_PIPE_LISTENING, /* c00000b3 */ ERROR_BAD_PIPE, /* c00000b4 */ ERROR_SEM_TIMEOUT, /* c00000b5 */ ERROR_HANDLE_EOF, /* c00000b6 */ ERROR_MR_MID_NOT_FOUND, /* c00000b7 */ ERROR_MR_MID_NOT_FOUND, /* c00000b8 */ ERROR_MR_MID_NOT_FOUND, /* c00000b9 */ ERROR_ACCESS_DENIED, /* c00000ba */ ERROR_NOT_SUPPORTED, /* c00000bb */ ERROR_REM_NOT_LIST, /* c00000bc */ ERROR_DUP_NAME, /* c00000bd */ ERROR_BAD_NETPATH, /* c00000be */ ERROR_NETWORK_BUSY, /* c00000bf */ ERROR_DEV_NOT_EXIST, /* c00000c0 */ ERROR_TOO_MANY_CMDS, /* c00000c1 */ ERROR_ADAP_HDW_ERR, /* c00000c2 */ ERROR_BAD_NET_RESP, /* c00000c3 */ ERROR_UNEXP_NET_ERR, /* c00000c4 */ ERROR_BAD_REM_ADAP, /* c00000c5 */ ERROR_PRINTQ_FULL, /* c00000c6 */ ERROR_NO_SPOOL_SPACE, /* c00000c7 */ ERROR_PRINT_CANCELLED, /* c00000c8 */ ERROR_NETNAME_DELETED, /* c00000c9 */ ERROR_NETWORK_ACCESS_DENIED, /* c00000ca */ ERROR_BAD_DEV_TYPE, /* c00000cb */ ERROR_BAD_NET_NAME, /* c00000cc */ ERROR_TOO_MANY_NAMES, /* c00000cd */ ERROR_TOO_MANY_SESS, /* c00000ce */ ERROR_SHARING_PAUSED, /* c00000cf */ ERROR_REQ_NOT_ACCEP, /* c00000d0 */ ERROR_REDIR_PAUSED, /* c00000d1 */ ERROR_NET_WRITE_FAULT, /* c00000d2 */ ERROR_MR_MID_NOT_FOUND, /* c00000d3 */ ERROR_NOT_SAME_DEVICE, /* c00000d4 */ ERROR_MR_MID_NOT_FOUND, /* c00000d5 */ ERROR_VC_DISCONNECTED, /* c00000d6 */ ERROR_NO_SECURITY_ON_OBJECT, /* c00000d7 */ ERROR_MR_MID_NOT_FOUND, /* c00000d8 */ ERROR_NO_DATA, /* c00000d9 */ ERROR_CANT_ACCESS_DOMAIN_INFO, /* c00000da */ ERROR_MR_MID_NOT_FOUND, /* c00000db */ ERROR_INVALID_SERVER_STATE, /* c00000dc */ ERROR_INVALID_DOMAIN_STATE, /* c00000dd */ ERROR_INVALID_DOMAIN_ROLE, /* c00000de */ ERROR_NO_SUCH_DOMAIN, /* c00000df */ ERROR_DOMAIN_EXISTS, /* c00000e0 */ ERROR_DOMAIN_LIMIT_EXCEEDED, /* c00000e1 */ ERROR_MR_MID_NOT_FOUND, /* c00000e2 */ ERROR_MR_MID_NOT_FOUND, /* c00000e3 */ ERROR_INTERNAL_DB_CORRUPTION, /* c00000e4 */ ERROR_INTERNAL_ERROR, /* c00000e5 */ ERROR_GENERIC_NOT_MAPPED, /* c00000e6 */ ERROR_BAD_DESCRIPTOR_FORMAT, /* c00000e7 */ ERROR_INVALID_USER_BUFFER, /* c00000e8 */ ERROR_MR_MID_NOT_FOUND, /* c00000e9 */ ERROR_MR_MID_NOT_FOUND, /* c00000ea */ ERROR_MR_MID_NOT_FOUND, /* c00000eb */ ERROR_MR_MID_NOT_FOUND, /* c00000ec */ ERROR_NOT_LOGON_PROCESS, /* c00000ed */ ERROR_LOGON_SESSION_EXISTS, /* c00000ee */ ERROR_INVALID_PARAMETER, /* c00000ef */ ERROR_INVALID_PARAMETER, /* c00000f0 (STATUS_INVALID_PARAMETER_2) */ ERROR_INVALID_PARAMETER, /* c00000f1 */ ERROR_INVALID_PARAMETER, /* c00000f2 */ ERROR_INVALID_PARAMETER, /* c00000f3 */ ERROR_INVALID_PARAMETER, /* c00000f4 */ ERROR_INVALID_PARAMETER, /* c00000f5 */ ERROR_INVALID_PARAMETER, /* c00000f6 */ ERROR_INVALID_PARAMETER, /* c00000f7 */ ERROR_INVALID_PARAMETER, /* c00000f8 */ ERROR_INVALID_PARAMETER, /* c00000f9 */ ERROR_INVALID_PARAMETER, /* c00000fa */ ERROR_PATH_NOT_FOUND, /* c00000fb */ ERROR_MR_MID_NOT_FOUND, /* c00000fc */ ERROR_STACK_OVERFLOW, /* c00000fd (STATUS_STACK_OVERFLOW) */ ERROR_NO_SUCH_PACKAGE, /* c00000fe */ ERROR_MR_MID_NOT_FOUND, /* c00000ff */ ERROR_ENVVAR_NOT_FOUND, /* c0000100 */ ERROR_DIR_NOT_EMPTY, /* c0000101 (STATUS_DIRECTORY_NOT_EMPTY) */ ERROR_FILE_CORRUPT, /* c0000102 */ ERROR_DIRECTORY, /* c0000103 */ ERROR_BAD_LOGON_SESSION_STATE, /* c0000104 */ ERROR_LOGON_SESSION_COLLISION, /* c0000105 */ ERROR_FILENAME_EXCED_RANGE, /* c0000106 */ ERROR_MR_MID_NOT_FOUND, /* c0000107 */ ERROR_DEVICE_IN_USE, /* c0000108 */ ERROR_MR_MID_NOT_FOUND, /* c0000109 */ ERROR_ACCESS_DENIED, /* c000010a */ ERROR_INVALID_LOGON_TYPE, /* c000010b */ ERROR_MR_MID_NOT_FOUND, /* c000010c */ ERROR_CANNOT_IMPERSONATE, /* c000010d */ ERROR_SERVICE_ALREADY_RUNNING, /* c000010e */ ERROR_MR_MID_NOT_FOUND, /* c000010f */ ERROR_MR_MID_NOT_FOUND, /* c0000110 */ ERROR_MR_MID_NOT_FOUND, /* c0000111 */ ERROR_MR_MID_NOT_FOUND, /* c0000112 */ ERROR_MR_MID_NOT_FOUND, /* c0000113 */ ERROR_MR_MID_NOT_FOUND, /* c0000114 */ ERROR_MR_MID_NOT_FOUND, /* c0000115 */ ERROR_MR_MID_NOT_FOUND, /* c0000116 */ ERROR_MR_MID_NOT_FOUND, /* c0000117 */ ERROR_MR_MID_NOT_FOUND, /* c0000118 */ ERROR_MR_MID_NOT_FOUND, /* c0000119 */ ERROR_MR_MID_NOT_FOUND, /* c000011a */ ERROR_BAD_EXE_FORMAT, /* c000011b */ ERROR_RXACT_INVALID_STATE, /* c000011c */ ERROR_RXACT_COMMIT_FAILURE, /* c000011d */ ERROR_FILE_INVALID, /* c000011e */ ERROR_TOO_MANY_OPEN_FILES, /* c000011f (STATUS_TOO_MANY_OPENED_FILES) */ ERROR_OPERATION_ABORTED, /* c0000120 */ ERROR_ACCESS_DENIED, /* c0000121 */ ERROR_INVALID_COMPUTERNAME, /* c0000122 */ ERROR_ACCESS_DENIED, /* c0000123 */ ERROR_SPECIAL_ACCOUNT, /* c0000124 */ ERROR_SPECIAL_GROUP, /* c0000125 */ ERROR_SPECIAL_USER, /* c0000126 */ ERROR_MEMBERS_PRIMARY_GROUP, /* c0000127 */ ERROR_INVALID_HANDLE, /* c0000128 */ ERROR_MR_MID_NOT_FOUND, /* c0000129 */ ERROR_MR_MID_NOT_FOUND, /* c000012a */ ERROR_TOKEN_ALREADY_IN_USE, /* c000012b */ ERROR_MR_MID_NOT_FOUND, /* c000012c */ ERROR_COMMITMENT_LIMIT, /* c000012d */ ERROR_BAD_EXE_FORMAT, /* c000012e */ ERROR_BAD_EXE_FORMAT, /* c000012f */ ERROR_BAD_EXE_FORMAT, /* c0000130 */ ERROR_BAD_EXE_FORMAT, /* c0000131 */ ERROR_MR_MID_NOT_FOUND, /* c0000132 */ ERROR_MR_MID_NOT_FOUND, /* c0000133 */ ERROR_MR_MID_NOT_FOUND, /* c0000134 */ ERROR_MOD_NOT_FOUND, /* c0000135 */ ERROR_MR_MID_NOT_FOUND, /* c0000136 */ ERROR_MR_MID_NOT_FOUND, /* c0000137 */ ERROR_INVALID_ORDINAL, /* c0000138 */ ERROR_PROC_NOT_FOUND, /* c0000139 */ ERROR_MR_MID_NOT_FOUND, /* c000013a (STATUS_CONTROL_C_EXIT) */ ERROR_NETNAME_DELETED, /* c000013b */ ERROR_NETNAME_DELETED, /* c000013c */ ERROR_REM_NOT_LIST, /* c000013d */ ERROR_UNEXP_NET_ERR, /* c000013e */ ERROR_UNEXP_NET_ERR, /* c000013f */ ERROR_UNEXP_NET_ERR, /* c0000140 */ ERROR_UNEXP_NET_ERR, /* c0000141 */ ERROR_DLL_INIT_FAILED, /* c0000142 */ ERROR_MR_MID_NOT_FOUND, /* c0000143 */ ERROR_MR_MID_NOT_FOUND, /* c0000144 */ ERROR_MR_MID_NOT_FOUND, /* c0000145 */ ERROR_MR_MID_NOT_FOUND, /* c0000146 */ ERROR_MR_MID_NOT_FOUND, /* c0000147 */ ERROR_INVALID_LEVEL, /* c0000148 */ ERROR_INVALID_PASSWORD, /* c0000149 */ ERROR_MR_MID_NOT_FOUND, /* c000014a */ ERROR_BROKEN_PIPE, /* c000014b (STATUS_PIPE_BROKEN) */ ERROR_BADDB, /* c000014c */ ERROR_REGISTRY_IO_FAILED, /* c000014d */ ERROR_MR_MID_NOT_FOUND, /* c000014e */ ERROR_UNRECOGNIZED_VOLUME, /* c000014f */ ERROR_SERIAL_NO_DEVICE, /* c0000150 */ ERROR_NO_SUCH_ALIAS, /* c0000151 */ ERROR_MEMBER_NOT_IN_ALIAS, /* c0000152 */ ERROR_MEMBER_IN_ALIAS, /* c0000153 */ ERROR_ALIAS_EXISTS, /* c0000154 */ ERROR_LOGON_NOT_GRANTED, /* c0000155 */ ERROR_TOO_MANY_SECRETS, /* c0000156 */ ERROR_SECRET_TOO_LONG, /* c0000157 */ ERROR_INTERNAL_DB_ERROR, /* c0000158 */ ERROR_FULLSCREEN_MODE, /* c0000159 */ ERROR_TOO_MANY_CONTEXT_IDS, /* c000015a */ ERROR_LOGON_TYPE_NOT_GRANTED, /* c000015b */ ERROR_NOT_REGISTRY_FILE, /* c000015c (STATUS_NOT_REGISTRY_FILE) */ ERROR_NT_CROSS_ENCRYPTION_REQUIRED, /* c000015d */ ERROR_MR_MID_NOT_FOUND, /* c000015e */ ERROR_IO_DEVICE, /* c000015f */ ERROR_MR_MID_NOT_FOUND, /* c0000160 */ ERROR_MR_MID_NOT_FOUND, /* c0000161 */ ERROR_NO_UNICODE_TRANSLATION, /* c0000162 */ ERROR_MR_MID_NOT_FOUND, /* c0000163 */ ERROR_MR_MID_NOT_FOUND, /* c0000164 */ ERROR_FLOPPY_ID_MARK_NOT_FOUND, /* c0000165 */ ERROR_FLOPPY_WRONG_CYLINDER, /* c0000166 */ ERROR_FLOPPY_UNKNOWN_ERROR, /* c0000167 */ ERROR_FLOPPY_BAD_REGISTERS, /* c0000168 */ ERROR_DISK_RECALIBRATE_FAILED, /* c0000169 */ ERROR_DISK_OPERATION_FAILED, /* c000016a */ ERROR_DISK_RESET_FAILED, /* c000016b */ ERROR_IRQ_BUSY, /* c000016c */ ERROR_IO_DEVICE, /* c000016d */ ERROR_MR_MID_NOT_FOUND, /* c000016e */ ERROR_MR_MID_NOT_FOUND, /* c000016f */ ERROR_MR_MID_NOT_FOUND, /* c0000170 */ ERROR_MR_MID_NOT_FOUND, /* c0000171 */ ERROR_PARTITION_FAILURE, /* c0000172 (STATUS_PARTITION_FAILURE) */ ERROR_INVALID_BLOCK_LENGTH, /* c0000173 (STATUS_INVALID_BLOCK_LENGTH) */ ERROR_DEVICE_NOT_PARTITIONED, /* c0000174 (STATUS_DEVICE_NOT_PARTITIONED) */ ERROR_UNABLE_TO_LOCK_MEDIA, /* c0000175 (STATUS_UNABLE_TO_LOCK_MEDIA) */ ERROR_UNABLE_TO_UNLOAD_MEDIA, /* c0000176 (STATUS_UNABLE_TO_UNLOAD_MEDIA) */ ERROR_EOM_OVERFLOW, /* c0000177 (STATUS_EOM_OVERFLOW) */ ERROR_NO_MEDIA_IN_DRIVE, /* c0000178 (STATUS_NO_MEDIA) */ ERROR_MR_MID_NOT_FOUND, /* c0000179 */ ERROR_NO_SUCH_MEMBER, /* c000017a (STATUS_NO_SUCH_MEMBER) */ ERROR_INVALID_MEMBER, /* c000017b (STATUS_INVALID_MEMBER) */ ERROR_KEY_DELETED, /* c000017c (STATUS_KEY_DELETED) */ ERROR_NO_LOG_SPACE, /* c000017d (STATUS_NO_LOG_SPACE) */ ERROR_TOO_MANY_SIDS, /* c000017e (STATUS_TOO_MANY_SIDS) */ ERROR_LM_CROSS_ENCRYPTION_REQUIRED, /* c000017f (STATUS_LM_CROSS_ENCRYPTION_REQUIRED) */ ERROR_KEY_HAS_CHILDREN, /* c0000180 (STATUS_KEY_HAS_CHILDREN) */ ERROR_CHILD_MUST_BE_VOLATILE, /* c0000181 (STATUS_CHILD_MUST_BE_VOLATILE) */ ERROR_INVALID_PARAMETER, /* c0000182 */ ERROR_IO_DEVICE, /* c0000183 (STATUS_DRIVER_INTERNAL_ERROR) */ ERROR_BAD_COMMAND, /* c0000184 (STATUS_INVALID_DEVICE_STATE) */ ERROR_IO_DEVICE, /* c0000185 (STATUS_IO_DEVICE_ERROR) */ ERROR_IO_DEVICE, /* c0000186 (STATUS_DEVICE_PROTOCOL_ERROR) */ ERROR_MR_MID_NOT_FOUND, /* c0000187 (STATUS_BACKUP_CONTROLLER) */ ERROR_LOG_FILE_FULL, /* c0000188 (STATUS_LOG_FILE_FULL) */ ERROR_WRITE_PROTECT, /* c0000189 (STATUS_TOO_LATE) */ ERROR_NO_TRUST_LSA_SECRET, /* c000018a (STATUS_NO_TRUST_LSA_SECRET) */ ERROR_NO_TRUST_SAM_ACCOUNT, /* c000018b (STATUS_NO_TRUST_SAM_ACCOUNT) */ ERROR_TRUSTED_DOMAIN_FAILURE, /* c000018c (STATUS_TRUSTED_DOMAIN_FAILURE) */ ERROR_TRUSTED_RELATIONSHIP_FAILURE, /* c000018d (STATUS_TRUSTED_RELATIONSHIP_FAILURE) */ ERROR_EVENTLOG_FILE_CORRUPT, /* c000018e (STATUS_EVENTLOG_FILE_CORRUPT) */ ERROR_EVENTLOG_CANT_START, /* c000018f (STATUS_EVENTLOG_CANT_START) */ ERROR_TRUST_FAILURE, /* c0000190 (STATUS_TRUST_FAILURE) */ ERROR_MR_MID_NOT_FOUND, /* c0000191 (STATUS_MUTANT_LIMIT_EXCEEDED) */ ERROR_NETLOGON_NOT_STARTED, /* c0000192 (STATUS_NETLOGON_NOT_STARTED) */ ERROR_ACCOUNT_EXPIRED, /* c0000193 (STATUS_ACCOUNT_EXPIRED) */ ERROR_POSSIBLE_DEADLOCK, /* c0000194 (STATUS_POSSIBLE_DEADLOCK) */ ERROR_SESSION_CREDENTIAL_CONFLICT, /* c0000195 (STATUS_NETWORK_CREDENTIAL_CONFLICT) */ ERROR_REMOTE_SESSION_LIMIT_EXCEEDED, /* c0000196 (STATUS_REMOTE_SESSION_LIMIT) */ ERROR_EVENTLOG_FILE_CHANGED, /* c0000197 (STATUS_EVENTLOG_FILE_CHANGED) */ ERROR_NOLOGON_INTERDOMAIN_TRUST_ACCOUNT,/* c0000198 (STATUS_NOLOGON_INTERDOMAIN_TRUST_ACCOUNT) */ ERROR_NOLOGON_WORKSTATION_TRUST_ACCOUNT,/* c0000199 (STATUS_NOLOGON_WORKSTATION_TRUST_ACCOUNT) */ ERROR_NOLOGON_SERVER_TRUST_ACCOUNT, /* c000019a (STATUS_NOLOGON_SERVER_TRUST_ACCOUNT) */ ERROR_DOMAIN_TRUST_INCONSISTENT /* c000019b (STATUS_DOMAIN_TRUST_INCONSISTENT) */ }; static const WORD table_c0000202[109] = { ERROR_NO_USER_SESSION_KEY, /* c0000202 */ ERROR_UNEXP_NET_ERR, /* c0000203 */ ERROR_RESOURCE_LANG_NOT_FOUND, /* c0000204 (STATUS_RESOURCE_LANG_NOT_FOUND) */ ERROR_NOT_ENOUGH_SERVER_MEMORY, /* c0000205 */ ERROR_INVALID_USER_BUFFER, /* c0000206 */ ERROR_INVALID_NETNAME, /* c0000207 */ ERROR_INVALID_NETNAME, /* c0000208 */ ERROR_TOO_MANY_NAMES, /* c0000209 */ ERROR_DUP_NAME, /* c000020a */ ERROR_NETNAME_DELETED, /* c000020b */ ERROR_NETNAME_DELETED, /* c000020c */ ERROR_NETNAME_DELETED, /* c000020d */ ERROR_TOO_MANY_NAMES, /* c000020e */ ERROR_UNEXP_NET_ERR, /* c000020f */ ERROR_UNEXP_NET_ERR, /* c0000210 */ ERROR_UNEXP_NET_ERR, /* c0000211 */ ERROR_UNEXP_NET_ERR, /* c0000212 */ ERROR_UNEXP_NET_ERR, /* c0000213 */ ERROR_UNEXP_NET_ERR, /* c0000214 */ ERROR_UNEXP_NET_ERR, /* c0000215 */ ERROR_NOT_SUPPORTED, /* c0000216 */ ERROR_NOT_SUPPORTED, /* c0000217 */ ERROR_MR_MID_NOT_FOUND, /* c0000218 */ ERROR_MR_MID_NOT_FOUND, /* c0000219 */ ERROR_MR_MID_NOT_FOUND, /* c000021a */ ERROR_MR_MID_NOT_FOUND, /* c000021b */ ERROR_NO_BROWSER_SERVERS_FOUND, /* c000021c */ ERROR_MR_MID_NOT_FOUND, /* c000021d */ ERROR_MR_MID_NOT_FOUND, /* c000021e */ ERROR_MR_MID_NOT_FOUND, /* c000021f */ ERROR_MAPPED_ALIGNMENT, /* c0000220 */ ERROR_BAD_EXE_FORMAT, /* c0000221 */ ERROR_MR_MID_NOT_FOUND, /* c0000222 */ ERROR_MR_MID_NOT_FOUND, /* c0000223 */ ERROR_PASSWORD_MUST_CHANGE, /* c0000224 */ ERROR_MR_MID_NOT_FOUND, /* c0000225 */ ERROR_MR_MID_NOT_FOUND, /* c0000226 */ ERROR_MR_MID_NOT_FOUND, /* c0000227 */ ERROR_MR_MID_NOT_FOUND, /* c0000228 */ ERROR_MR_MID_NOT_FOUND, /* c0000229 */ 0, /* c000022a */ 0, /* c000022b */ ERROR_MR_MID_NOT_FOUND, /* c000022c */ ERROR_MR_MID_NOT_FOUND, /* c000022d */ ERROR_MR_MID_NOT_FOUND, /* c000022e */ ERROR_MR_MID_NOT_FOUND, /* c000022f */ ERROR_MR_MID_NOT_FOUND, /* c0000230 */ ERROR_MR_MID_NOT_FOUND, /* c0000231 */ ERROR_MR_MID_NOT_FOUND, /* c0000232 */ ERROR_DOMAIN_CONTROLLER_NOT_FOUND, /* c0000233 */ ERROR_ACCOUNT_LOCKED_OUT, /* c0000234 */ ERROR_INVALID_HANDLE, /* c0000235 */ ERROR_CONNECTION_REFUSED, /* c0000236 */ ERROR_GRACEFUL_DISCONNECT, /* c0000237 */ ERROR_ADDRESS_ALREADY_ASSOCIATED, /* c0000238 */ ERROR_ADDRESS_NOT_ASSOCIATED, /* c0000239 */ ERROR_CONNECTION_INVALID, /* c000023a */ ERROR_CONNECTION_ACTIVE, /* c000023b */ ERROR_NETWORK_UNREACHABLE, /* c000023c */ ERROR_HOST_UNREACHABLE, /* c000023d */ ERROR_PROTOCOL_UNREACHABLE, /* c000023e */ ERROR_PORT_UNREACHABLE, /* c000023f */ ERROR_REQUEST_ABORTED, /* c0000240 */ ERROR_CONNECTION_ABORTED, /* c0000241 */ ERROR_MR_MID_NOT_FOUND, /* c0000242 */ ERROR_USER_MAPPED_FILE, /* c0000243 */ ERROR_MR_MID_NOT_FOUND, /* c0000244 */ ERROR_MR_MID_NOT_FOUND, /* c0000245 */ ERROR_CONNECTION_COUNT_LIMIT, /* c0000246 */ ERROR_LOGIN_TIME_RESTRICTION, /* c0000247 */ ERROR_LOGIN_WKSTA_RESTRICTION, /* c0000248 */ ERROR_BAD_EXE_FORMAT, /* c0000249 */ ERROR_MR_MID_NOT_FOUND, /* c000024a */ ERROR_MR_MID_NOT_FOUND, /* c000024b */ ERROR_MR_MID_NOT_FOUND, /* c000024c */ ERROR_MR_MID_NOT_FOUND, /* c000024d */ ERROR_MR_MID_NOT_FOUND, /* c000024e */ ERROR_MR_MID_NOT_FOUND, /* c000024f */ ERROR_MR_MID_NOT_FOUND, /* c0000250 */ ERROR_MR_MID_NOT_FOUND, /* c0000251 */ ERROR_MR_MID_NOT_FOUND, /* c0000252 */ ERROR_INTERNAL_ERROR, /* c0000253 */ ERROR_MR_MID_NOT_FOUND, /* c0000254 */ ERROR_MR_MID_NOT_FOUND, /* c0000255 */ ERROR_MR_MID_NOT_FOUND, /* c0000256 */ ERROR_HOST_UNREACHABLE, /* c0000257 */ ERROR_MR_MID_NOT_FOUND, /* c0000258 */ ERROR_LICENSE_QUOTA_EXCEEDED, /* c0000259 */ ERROR_MR_MID_NOT_FOUND, /* c000025a */ ERROR_MR_MID_NOT_FOUND, /* c000025b */ ERROR_MR_MID_NOT_FOUND, /* c000025c */ ERROR_MR_MID_NOT_FOUND, /* c000025d */ ERROR_SERVICE_DISABLED, /* c000025e */ ERROR_MR_MID_NOT_FOUND, /* c000025f */ ERROR_MR_MID_NOT_FOUND, /* c0000260 */ ERROR_MR_MID_NOT_FOUND, /* c0000261 */ ERROR_INVALID_ORDINAL, /* c0000262 */ ERROR_PROC_NOT_FOUND, /* c0000263 */ ERROR_NOT_OWNER, /* c0000264 */ ERROR_TOO_MANY_LINKS, /* c0000265 */ ERROR_MR_MID_NOT_FOUND, /* c0000266 */ ERROR_MR_MID_NOT_FOUND, /* c0000267 */ ERROR_MR_MID_NOT_FOUND, /* c0000268 */ ERROR_MR_MID_NOT_FOUND, /* c0000269 */ ERROR_MR_MID_NOT_FOUND, /* c000026a */ ERROR_MR_MID_NOT_FOUND, /* c000026b */ ERROR_MR_MID_NOT_FOUND, /* c000026c */ ERROR_MR_MID_NOT_FOUND, /* c000026d */ ERROR_NOT_READY /* c000026e */ }; static const WORD table_c0020001[88] = { RPC_S_INVALID_STRING_BINDING, /* c0020001 */ RPC_S_WRONG_KIND_OF_BINDING, /* c0020002 */ ERROR_INVALID_HANDLE, /* c0020003 */ RPC_S_PROTSEQ_NOT_SUPPORTED, /* c0020004 */ RPC_S_INVALID_RPC_PROTSEQ, /* c0020005 */ RPC_S_INVALID_STRING_UUID, /* c0020006 */ RPC_S_INVALID_ENDPOINT_FORMAT, /* c0020007 */ RPC_S_INVALID_NET_ADDR, /* c0020008 */ RPC_S_NO_ENDPOINT_FOUND, /* c0020009 */ RPC_S_INVALID_TIMEOUT, /* c002000a */ RPC_S_OBJECT_NOT_FOUND, /* c002000b */ RPC_S_ALREADY_REGISTERED, /* c002000c */ RPC_S_TYPE_ALREADY_REGISTERED, /* c002000d */ RPC_S_ALREADY_LISTENING, /* c002000e */ RPC_S_NO_PROTSEQS_REGISTERED, /* c002000f */ RPC_S_NOT_LISTENING, /* c0020010 */ RPC_S_UNKNOWN_MGR_TYPE, /* c0020011 */ RPC_S_UNKNOWN_IF, /* c0020012 */ RPC_S_NO_BINDINGS, /* c0020013 */ RPC_S_NO_PROTSEQS, /* c0020014 */ RPC_S_CANT_CREATE_ENDPOINT, /* c0020015 */ RPC_S_OUT_OF_RESOURCES, /* c0020016 */ RPC_S_SERVER_UNAVAILABLE, /* c0020017 */ RPC_S_SERVER_TOO_BUSY, /* c0020018 */ RPC_S_INVALID_NETWORK_OPTIONS, /* c0020019 */ RPC_S_NO_CALL_ACTIVE, /* c002001a */ RPC_S_CALL_FAILED, /* c002001b */ RPC_S_CALL_FAILED_DNE, /* c002001c */ RPC_S_PROTOCOL_ERROR, /* c002001d */ ERROR_MR_MID_NOT_FOUND, /* c002001e */ RPC_S_UNSUPPORTED_TRANS_SYN, /* c002001f */ ERROR_MR_MID_NOT_FOUND, /* c0020020 */ RPC_S_UNSUPPORTED_TYPE, /* c0020021 */ RPC_S_INVALID_TAG, /* c0020022 */ RPC_S_INVALID_BOUND, /* c0020023 */ RPC_S_NO_ENTRY_NAME, /* c0020024 */ RPC_S_INVALID_NAME_SYNTAX, /* c0020025 */ RPC_S_UNSUPPORTED_NAME_SYNTAX, /* c0020026 */ ERROR_MR_MID_NOT_FOUND, /* c0020027 */ RPC_S_UUID_NO_ADDRESS, /* c0020028 */ RPC_S_DUPLICATE_ENDPOINT, /* c0020029 */ RPC_S_UNKNOWN_AUTHN_TYPE, /* c002002a */ RPC_S_MAX_CALLS_TOO_SMALL, /* c002002b */ RPC_S_STRING_TOO_LONG, /* c002002c */ RPC_S_PROTSEQ_NOT_FOUND, /* c002002d */ RPC_S_PROCNUM_OUT_OF_RANGE, /* c002002e */ RPC_S_BINDING_HAS_NO_AUTH, /* c002002f */ RPC_S_UNKNOWN_AUTHN_SERVICE, /* c0020030 */ RPC_S_UNKNOWN_AUTHN_LEVEL, /* c0020031 */ RPC_S_INVALID_AUTH_IDENTITY, /* c0020032 */ RPC_S_UNKNOWN_AUTHZ_SERVICE, /* c0020033 */ EPT_S_INVALID_ENTRY, /* c0020034 */ EPT_S_CANT_PERFORM_OP, /* c0020035 */ EPT_S_NOT_REGISTERED, /* c0020036 */ RPC_S_NOTHING_TO_EXPORT, /* c0020037 */ RPC_S_INCOMPLETE_NAME, /* c0020038 */ RPC_S_INVALID_VERS_OPTION, /* c0020039 */ RPC_S_NO_MORE_MEMBERS, /* c002003a */ RPC_S_NOT_ALL_OBJS_UNEXPORTED, /* c002003b */ RPC_S_INTERFACE_NOT_FOUND, /* c002003c */ RPC_S_ENTRY_ALREADY_EXISTS, /* c002003d */ RPC_S_ENTRY_NOT_FOUND, /* c002003e */ RPC_S_NAME_SERVICE_UNAVAILABLE, /* c002003f */ RPC_S_INVALID_NAF_ID, /* c0020040 */ RPC_S_CANNOT_SUPPORT, /* c0020041 */ RPC_S_NO_CONTEXT_AVAILABLE, /* c0020042 */ RPC_S_INTERNAL_ERROR, /* c0020043 */ RPC_S_ZERO_DIVIDE, /* c0020044 */ RPC_S_ADDRESS_ERROR, /* c0020045 */ RPC_S_FP_DIV_ZERO, /* c0020046 */ RPC_S_FP_UNDERFLOW, /* c0020047 */ RPC_S_FP_OVERFLOW, /* c0020048 */ RPC_S_CALL_IN_PROGRESS, /* c0020049 */ RPC_S_NO_MORE_BINDINGS, /* c002004a */ RPC_S_GROUP_MEMBER_NOT_FOUND, /* c002004b */ EPT_S_CANT_CREATE, /* c002004c */ RPC_S_INVALID_OBJECT, /* c002004d */ ERROR_MR_MID_NOT_FOUND, /* c002004e */ RPC_S_NO_INTERFACES, /* c002004f */ RPC_S_CALL_CANCELLED, /* c0020050 */ RPC_S_BINDING_INCOMPLETE, /* c0020051 */ RPC_S_COMM_FAILURE, /* c0020052 */ RPC_S_UNSUPPORTED_AUTHN_LEVEL, /* c0020053 */ RPC_S_NO_PRINC_NAME, /* c0020054 */ RPC_S_NOT_RPC_ERROR, /* c0020055 */ ERROR_MR_MID_NOT_FOUND, /* c0020056 */ RPC_S_SEC_PKG_ERROR, /* c0020057 */ RPC_S_NOT_CANCELLED /* c0020058 */ }; static const WORD table_c0030001[12] = { RPC_X_NO_MORE_ENTRIES, /* c0030001 */ RPC_X_SS_CHAR_TRANS_OPEN_FAIL, /* c0030002 */ RPC_X_SS_CHAR_TRANS_SHORT_FILE, /* c0030003 */ ERROR_INVALID_HANDLE, /* c0030004 */ ERROR_INVALID_HANDLE, /* c0030005 */ RPC_X_SS_CONTEXT_DAMAGED, /* c0030006 */ RPC_X_SS_HANDLES_MISMATCH, /* c0030007 */ RPC_X_SS_CANNOT_GET_CALL_HANDLE, /* c0030008 */ RPC_X_NULL_REF_POINTER, /* c0030009 */ RPC_X_ENUM_VALUE_OUT_OF_RANGE, /* c003000a */ RPC_X_BYTE_COUNT_TOO_SMALL, /* c003000b */ RPC_X_BAD_STUB_DATA /* c003000c */ }; static const WORD table_c0030059[6] = { RPC_X_INVALID_ES_ACTION, /* c0030059 */ RPC_X_WRONG_ES_VERSION, /* c003005a */ RPC_X_WRONG_STUB_VERSION, /* c003005b */ RPC_X_INVALID_PIPE_OBJECT, /* c003005c */ RPC_X_WRONG_PIPE_ORDER, /* c003005d */ RPC_X_WRONG_PIPE_VERSION /* c003005e */ }; static const struct error_table error_table[] = { { 0x00000103, 0x0000010e, table_00000103 }, { 0x40000002, 0x4000000e, table_40000002 }, { 0x40020056, 0x40020057, table_40020056 }, { 0x400200af, 0x400200b0, table_400200af }, { 0x80000001, 0x80000026, table_80000001 }, { 0x80090300, 0x80090317, table_80090300 }, { 0xc0000001, 0xc000019c, table_c0000001 }, { 0xc0000202, 0xc000026f, table_c0000202 }, { 0xc0020001, 0xc0020059, table_c0020001 }, { 0xc0030001, 0xc003000d, table_c0030001 }, { 0xc0030059, 0xc003005f, table_c0030059 }, { 0, 0, 0 } /* last entry */ }; wine-20000526/dlls/ntdll/exception.c0100644000175000001440000002403507062272052016665 0ustar julliardusers/* * NT exception handling routines * * Copyright 1999 Turchanov Sergey * Copyright 1999 Alexandre Julliard */ #include #include "winnt.h" #include "ntddk.h" #include "process.h" #include "global.h" #include "wine/exception.h" #include "stackframe.h" #include "miscemu.h" #include "server.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(seh); /* Exception record for handling exceptions happening inside exception handlers */ typedef struct { EXCEPTION_FRAME frame; EXCEPTION_FRAME *prevFrame; } EXC_NESTED_FRAME; /******************************************************************* * EXC_RaiseHandler * * Handler for exceptions happening inside a handler. */ static DWORD EXC_RaiseHandler( EXCEPTION_RECORD *rec, EXCEPTION_FRAME *frame, CONTEXT *context, EXCEPTION_FRAME **dispatcher ) { if (rec->ExceptionFlags & (EH_UNWINDING | EH_EXIT_UNWIND)) return ExceptionContinueSearch; /* We shouldn't get here so we store faulty frame in dispatcher */ *dispatcher = ((EXC_NESTED_FRAME*)frame)->prevFrame; return ExceptionNestedException; } /******************************************************************* * EXC_UnwindHandler * * Handler for exceptions happening inside an unwind handler. */ static DWORD EXC_UnwindHandler( EXCEPTION_RECORD *rec, EXCEPTION_FRAME *frame, CONTEXT *context, EXCEPTION_FRAME **dispatcher ) { if (!(rec->ExceptionFlags & (EH_UNWINDING | EH_EXIT_UNWIND))) return ExceptionContinueSearch; /* We shouldn't get here so we store faulty frame in dispatcher */ *dispatcher = ((EXC_NESTED_FRAME*)frame)->prevFrame; return ExceptionCollidedUnwind; } /******************************************************************* * EXC_CallHandler * * Call an exception handler, setting up an exception frame to catch exceptions * happening during the handler execution. * Please do not change the first 4 parameters order in any way - some exceptions handlers * rely on Base Pointer (EBP) to have a fixed position related to the exception frame */ static DWORD EXC_CallHandler( EXCEPTION_RECORD *record, EXCEPTION_FRAME *frame, CONTEXT *context, EXCEPTION_FRAME **dispatcher, PEXCEPTION_HANDLER handler, PEXCEPTION_HANDLER nested_handler) { EXC_NESTED_FRAME newframe; DWORD ret; newframe.frame.Handler = nested_handler; newframe.prevFrame = frame; EXC_push_frame( &newframe.frame ); TRACE( "calling handler at %p code=%lx flags=%lx\n", handler, record->ExceptionCode, record->ExceptionFlags ); ret = handler( record, frame, context, dispatcher ); TRACE( "handler returned %lx\n", ret ); EXC_pop_frame( &newframe.frame ); return ret; } /********************************************************************** * EXC_SendEvent * * Send an EXCEPTION_DEBUG_EVENT event to the debugger. */ static inline int send_debug_event( EXCEPTION_RECORD *rec, int first_chance, CONTEXT *context ) { struct exception_event_request *req = get_req_buffer(); req->record = *rec; req->first = first_chance; req->context = *context; if (!server_call_noerr( REQ_EXCEPTION_EVENT )) *context = req->context; return req->status; } /******************************************************************* * EXC_DefaultHandling * * Default handling for exceptions. Called when we didn't find a suitable handler. */ static void EXC_DefaultHandling( EXCEPTION_RECORD *rec, CONTEXT *context ) { if (send_debug_event( rec, FALSE, context ) == DBG_CONTINUE) return; /* continue execution */ if (rec->ExceptionFlags & EH_STACK_INVALID) ERR("Exception frame is not in stack limits => unable to dispatch exception.\n"); else if (rec->ExceptionCode == EXCEPTION_NONCONTINUABLE_EXCEPTION) ERR("Process attempted to continue execution after noncontinuable exception.\n"); else ERR("Unhandled exception code %lx flags %lx addr %p\n", rec->ExceptionCode, rec->ExceptionFlags, rec->ExceptionAddress ); TerminateProcess( GetCurrentProcess(), 1 ); } /*********************************************************************** * EXC_RtlRaiseException / RtlRaiseException (NTDLL.464) */ DEFINE_REGS_ENTRYPOINT_1( RtlRaiseException, EXC_RtlRaiseException, EXCEPTION_RECORD * ) void WINAPI EXC_RtlRaiseException( EXCEPTION_RECORD *rec, CONTEXT *context ) { PEXCEPTION_FRAME frame, dispatch, nested_frame; EXCEPTION_RECORD newrec; DWORD res; TRACE( "code=%lx flags=%lx\n", rec->ExceptionCode, rec->ExceptionFlags ); if (send_debug_event( rec, TRUE, context ) == DBG_CONTINUE) return; /* continue execution */ frame = NtCurrentTeb()->except; nested_frame = NULL; while (frame != (PEXCEPTION_FRAME)0xFFFFFFFF) { /* Check frame address */ if (((void*)frame < NtCurrentTeb()->stack_low) || ((void*)(frame+1) > NtCurrentTeb()->stack_top) || (int)frame & 3) { rec->ExceptionFlags |= EH_STACK_INVALID; break; } /* Call handler */ res = EXC_CallHandler( rec, frame, context, &dispatch, frame->Handler, EXC_RaiseHandler ); if (frame == nested_frame) { /* no longer nested */ nested_frame = NULL; rec->ExceptionFlags &= ~EH_NESTED_CALL; } switch(res) { case ExceptionContinueExecution: if (!(rec->ExceptionFlags & EH_NONCONTINUABLE)) return; newrec.ExceptionCode = STATUS_NONCONTINUABLE_EXCEPTION; newrec.ExceptionFlags = EH_NONCONTINUABLE; newrec.ExceptionRecord = rec; newrec.NumberParameters = 0; RtlRaiseException( &newrec ); /* never returns */ break; case ExceptionContinueSearch: break; case ExceptionNestedException: if (nested_frame < dispatch) nested_frame = dispatch; rec->ExceptionFlags |= EH_NESTED_CALL; break; default: newrec.ExceptionCode = STATUS_INVALID_DISPOSITION; newrec.ExceptionFlags = EH_NONCONTINUABLE; newrec.ExceptionRecord = rec; newrec.NumberParameters = 0; RtlRaiseException( &newrec ); /* never returns */ break; } frame = frame->Prev; } EXC_DefaultHandling( rec, context ); } /******************************************************************* * EXC_RtlUnwind / RtlUnwind (KERNEL32.590) (NTDLL.518) */ DEFINE_REGS_ENTRYPOINT_4( RtlUnwind, EXC_RtlUnwind, PEXCEPTION_FRAME, LPVOID, PEXCEPTION_RECORD, DWORD ) void WINAPI EXC_RtlUnwind( PEXCEPTION_FRAME pEndFrame, LPVOID unusedEip, PEXCEPTION_RECORD pRecord, DWORD returnEax, CONTEXT *context ) { EXCEPTION_RECORD record, newrec; PEXCEPTION_FRAME frame, dispatch; #ifdef __i386__ context->Eax = returnEax; #endif /* build an exception record, if we do not have one */ if (!pRecord) { record.ExceptionCode = STATUS_UNWIND; record.ExceptionFlags = 0; record.ExceptionRecord = NULL; record.ExceptionAddress = GET_IP(context); record.NumberParameters = 0; pRecord = &record; } pRecord->ExceptionFlags |= EH_UNWINDING | (pEndFrame ? 0 : EH_EXIT_UNWIND); TRACE( "code=%lx flags=%lx\n", pRecord->ExceptionCode, pRecord->ExceptionFlags ); /* get chain of exception frames */ frame = NtCurrentTeb()->except; while ((frame != (PEXCEPTION_FRAME)0xffffffff) && (frame != pEndFrame)) { /* Check frame address */ if (pEndFrame && (frame > pEndFrame)) { newrec.ExceptionCode = STATUS_INVALID_UNWIND_TARGET; newrec.ExceptionFlags = EH_NONCONTINUABLE; newrec.ExceptionRecord = pRecord; newrec.NumberParameters = 0; RtlRaiseException( &newrec ); /* never returns */ } if (((void*)frame < NtCurrentTeb()->stack_low) || ((void*)(frame+1) > NtCurrentTeb()->stack_top) || (int)frame & 3) { newrec.ExceptionCode = STATUS_BAD_STACK; newrec.ExceptionFlags = EH_NONCONTINUABLE; newrec.ExceptionRecord = pRecord; newrec.NumberParameters = 0; RtlRaiseException( &newrec ); /* never returns */ } /* Call handler */ switch(EXC_CallHandler( pRecord, frame, context, &dispatch, frame->Handler, EXC_UnwindHandler )) { case ExceptionContinueSearch: break; case ExceptionCollidedUnwind: frame = dispatch; break; default: newrec.ExceptionCode = STATUS_INVALID_DISPOSITION; newrec.ExceptionFlags = EH_NONCONTINUABLE; newrec.ExceptionRecord = pRecord; newrec.NumberParameters = 0; RtlRaiseException( &newrec ); /* never returns */ break; } frame = EXC_pop_frame( frame ); } } /******************************************************************* * EXC_NtRaiseException / NtRaiseException (NTDLL.175) */ DEFINE_REGS_ENTRYPOINT_3( NtRaiseException, EXC_NtRaiseException, EXCEPTION_RECORD *, CONTEXT *, BOOL ) void WINAPI EXC_NtRaiseException( EXCEPTION_RECORD *rec, CONTEXT *ctx, BOOL first, CONTEXT *context ) { EXC_RtlRaiseException( rec, ctx ); *context = *ctx; } /*********************************************************************** * RtlRaiseStatus (NTDLL.465) * * Raise an exception with ExceptionCode = status */ void WINAPI RtlRaiseStatus( NTSTATUS status ) { EXCEPTION_RECORD ExceptionRec; ExceptionRec.ExceptionCode = status; ExceptionRec.ExceptionFlags = EH_NONCONTINUABLE; ExceptionRec.ExceptionRecord = NULL; ExceptionRec.NumberParameters = 0; RtlRaiseException( &ExceptionRec ); } wine-20000526/dlls/ntdll/file.c0100644000175000001440000001641407042701065015607 0ustar julliardusers#include #include #include "debugtools.h" #include "ntdll_misc.h" #include "ntddk.h" DEFAULT_DEBUG_CHANNEL(ntdll) /************************************************************************** * NtOpenFile [NTDLL.127] * FUNCTION: Opens a file * ARGUMENTS: * FileHandle Variable that receives the file handle on return * DesiredAccess Access desired by the caller to the file * ObjectAttributes Structue describing the file to be opened * IoStatusBlock Receives details about the result of the operation * ShareAccess Type of shared access the caller requires * OpenOptions Options for the file open */ NTSTATUS WINAPI NtOpenFile( OUT PHANDLE FileHandle, ACCESS_MASK DesiredAccess, POBJECT_ATTRIBUTES ObjectAttributes, OUT PIO_STATUS_BLOCK IoStatusBlock, ULONG ShareAccess, ULONG OpenOptions) { FIXME("(%p,0x%08lx,%p,%p,0x%08lx,0x%08lx) stub\n", FileHandle, DesiredAccess, ObjectAttributes, IoStatusBlock, ShareAccess, OpenOptions); dump_ObjectAttributes (ObjectAttributes); return 0; } /************************************************************************** * NtCreateFile [NTDLL.73] * FUNCTION: Either causes a new file or directory to be created, or it opens * an existing file, device, directory or volume, giving the caller a handle * for the file object. This handle can be used by subsequent calls to * manipulate data within the file or the file object's state of attributes. * ARGUMENTS: * FileHandle Points to a variable which receives the file handle on return * DesiredAccess Desired access to the file * ObjectAttributes Structure describing the file * IoStatusBlock Receives information about the operation on return * AllocationSize Initial size of the file in bytes * FileAttributes Attributes to create the file with * ShareAccess Type of shared access the caller would like to the file * CreateDisposition Specifies what to do, depending on whether the file already exists * CreateOptions Options for creating a new file * EaBuffer Undocumented * EaLength Undocumented */ NTSTATUS WINAPI NtCreateFile( OUT PHANDLE FileHandle, ACCESS_MASK DesiredAccess, POBJECT_ATTRIBUTES ObjectAttributes, OUT PIO_STATUS_BLOCK IoStatusBlock, PLARGE_INTEGER AllocateSize, ULONG FileAttributes, ULONG ShareAccess, ULONG CreateDisposition, ULONG CreateOptions, PVOID EaBuffer, ULONG EaLength) { FIXME("(%p,0x%08lx,%p,%p,%p,0x%08lx,0x%08lx,0x%08lx,0x%08lx,%p,0x%08lx) stub\n", FileHandle,DesiredAccess,ObjectAttributes, IoStatusBlock,AllocateSize,FileAttributes, ShareAccess,CreateDisposition,CreateOptions,EaBuffer,EaLength); dump_ObjectAttributes (ObjectAttributes); return 0; } /****************************************************************************** * NtReadFile [NTDLL] * ZwReadFile * * Parameters * HANDLE32 FileHandle * HANDLE32 Event OPTIONAL * PIO_APC_ROUTINE ApcRoutine OPTIONAL * PVOID ApcContext OPTIONAL * PIO_STATUS_BLOCK IoStatusBlock * PVOID Buffer * ULONG Length * PLARGE_INTEGER ByteOffset OPTIONAL * PULONG Key OPTIONAL */ NTSTATUS WINAPI NtReadFile ( HANDLE FileHandle, HANDLE EventHandle, PIO_APC_ROUTINE ApcRoutine, PVOID ApcContext, PIO_STATUS_BLOCK IoStatusBlock, PVOID Buffer, ULONG Length, PLARGE_INTEGER ByteOffset, PULONG Key) { FIXME("(0x%08x,0x%08x,%p,%p,%p,%p,0x%08lx,%p,%p),stub!\n", FileHandle,EventHandle,ApcRoutine,ApcContext,IoStatusBlock,Buffer,Length,ByteOffset,Key); return 0; } /************************************************************************** * NtDeviceIoControlFile [NTDLL.94] */ NTSTATUS WINAPI NtDeviceIoControlFile( IN HANDLE DeviceHandle, IN HANDLE Event OPTIONAL, IN PIO_APC_ROUTINE UserApcRoutine OPTIONAL, IN PVOID UserApcContext OPTIONAL, OUT PIO_STATUS_BLOCK IoStatusBlock, IN ULONG IoControlCode, IN PVOID InputBuffer, IN ULONG InputBufferSize, OUT PVOID OutputBuffer, IN ULONG OutputBufferSize) { FIXME("(0x%08x,0x%08x,%p,%p,%p,0x%08lx,%p,0x%08lx,%p,0x%08lx): empty stub\n", DeviceHandle, Event, UserApcRoutine, UserApcContext, IoStatusBlock, IoControlCode, InputBuffer, InputBufferSize, OutputBuffer, OutputBufferSize); return 0; } /****************************************************************************** * NtFsControlFile [NTDLL.108] */ NTSTATUS WINAPI NtFsControlFile( IN HANDLE DeviceHandle, IN HANDLE Event OPTIONAL, IN PIO_APC_ROUTINE ApcRoutine OPTIONAL, IN PVOID ApcContext OPTIONAL, OUT PIO_STATUS_BLOCK IoStatusBlock, IN ULONG IoControlCode, IN PVOID InputBuffer, IN ULONG InputBufferSize, OUT PVOID OutputBuffer, IN ULONG OutputBufferSize) { FIXME("(0x%08x,0x%08x,%p,%p,%p,0x%08lx,%p,0x%08lx,%p,0x%08lx): stub\n", DeviceHandle,Event,ApcRoutine,ApcContext,IoStatusBlock,IoControlCode, InputBuffer,InputBufferSize,OutputBuffer,OutputBufferSize); return 0; } /****************************************************************************** * NtSetVolumeInformationFile [NTDLL] */ NTSTATUS WINAPI NtSetVolumeInformationFile( IN HANDLE FileHandle, PIO_STATUS_BLOCK IoStatusBlock, PVOID FsInformation, ULONG Length, FS_INFORMATION_CLASS FsInformationClass) { FIXME("(0x%08x,%p,%p,0x%08lx,0x%08x) stub\n", FileHandle,IoStatusBlock,FsInformation,Length,FsInformationClass); return 0; } /****************************************************************************** * NtQueryInformationFile [NTDLL] */ NTSTATUS WINAPI NtQueryInformationFile( HANDLE FileHandle, PIO_STATUS_BLOCK IoStatusBlock, PVOID FileInformation, ULONG Length, FILE_INFORMATION_CLASS FileInformationClass) { FIXME("(0x%08x,%p,%p,0x%08lx,0x%08x),stub!\n", FileHandle,IoStatusBlock,FileInformation,Length,FileInformationClass); return 0; } /****************************************************************************** * NtSetInformationFile [NTDLL] */ NTSTATUS WINAPI NtSetInformationFile( HANDLE FileHandle, PIO_STATUS_BLOCK IoStatusBlock, PVOID FileInformation, ULONG Length, FILE_INFORMATION_CLASS FileInformationClass) { FIXME("(0x%08x,%p,%p,0x%08lx,0x%08x)\n", FileHandle,IoStatusBlock,FileInformation,Length,FileInformationClass); return 0; } /****************************************************************************** * NtQueryDirectoryFile [NTDLL] * ZwQueryDirectoryFile */ NTSTATUS WINAPI NtQueryDirectoryFile( IN HANDLE FileHandle, IN HANDLE Event OPTIONAL, IN PIO_APC_ROUTINE ApcRoutine OPTIONAL, IN PVOID ApcContext OPTIONAL, OUT PIO_STATUS_BLOCK IoStatusBlock, OUT PVOID FileInformation, IN ULONG Length, IN FILE_INFORMATION_CLASS FileInformationClass, IN BOOLEAN ReturnSingleEntry, IN PUNICODE_STRING FileName OPTIONAL, IN BOOLEAN RestartScan) { FIXME("(0x%08x 0x%08x %p %p %p %p 0x%08lx 0x%08x 0x%08x %p 0x%08x\n", FileHandle, Event, ApcRoutine, ApcContext, IoStatusBlock, FileInformation, Length, FileInformationClass, ReturnSingleEntry, debugstr_us(FileName),RestartScan); return 0; } /****************************************************************************** * NtQueryVolumeInformationFile [NTDLL] */ NTSTATUS WINAPI NtQueryVolumeInformationFile ( IN HANDLE FileHandle, OUT PIO_STATUS_BLOCK IoStatusBlock, OUT PVOID FSInformation, IN ULONG Length, IN FS_INFORMATION_CLASS FSInformationClass) { TRACE("(0x%08x %p %p 0x%08lx 0x%08x) stub\n", FileHandle, IoStatusBlock, FSInformation, Length, FSInformationClass); return STATUS_SUCCESS; } wine-20000526/dlls/ntdll/misc.c0100644000175000001440000000225307050634171015621 0ustar julliardusers/* * Helper functions for ntdll */ #include #include "config.h" #include "debugtools.h" #include "ntdll_misc.h" DEFAULT_DEBUG_CHANNEL(ntdll); void dump_ObjectAttributes (POBJECT_ATTRIBUTES oa) { if (oa) TRACE("%p:(name=%s, attr=0x%08lx, hRoot=0x%08x, sd=%p) \n", oa, debugstr_us(oa->ObjectName), oa->Attributes, oa->RootDirectory, oa->SecurityDescriptor); } void dump_AnsiString(PANSI_STRING as, BOOLEAN showstring) { if (as) { if (showstring) TRACE("%p %p(%s) (%u %u)\n", as, as->Buffer, debugstr_as(as), as->Length, as->MaximumLength); else TRACE("%p %p() (%u %u)\n", as, as->Buffer, as->Length, as->MaximumLength); } } void dump_UnicodeString(PUNICODE_STRING us, BOOLEAN showstring) { if (us) { if (showstring) TRACE("%p %p(%s) (%u %u)\n", us, us->Buffer, debugstr_us(us), us->Length, us->MaximumLength); else TRACE("%p %p() (%u %u)\n", us, us->Buffer, us->Length, us->MaximumLength); } } LPCSTR debugstr_as (PANSI_STRING us) { if (!us) return NULL; return debugstr_an(us->Buffer, us->Length); } LPCSTR debugstr_us (PUNICODE_STRING us) { if (!us) return NULL; return debugstr_wn(us->Buffer, us->Length); } wine-20000526/dlls/ntdll/nt.c0100644000175000001440000004125107066752015015315 0ustar julliardusers/* * NT basis DLL * * This file contains the Nt* API functions of NTDLL.DLL. * In the original ntdll.dll they all seem to just call int 0x2e (down to the HAL) * * Copyright 1996-1998 Marcus Meissner */ #include #include #include #include #include "debugtools.h" #include "ntddk.h" #include "ntdll_misc.h" DEFAULT_DEBUG_CHANNEL(ntdll); /* * Timer object */ /************************************************************************** * NtCreateTimer [NTDLL.87] */ NTSTATUS WINAPI NtCreateTimer( OUT PHANDLE TimerHandle, IN ACCESS_MASK DesiredAccess, IN POBJECT_ATTRIBUTES ObjectAttributes OPTIONAL, IN TIMER_TYPE TimerType) { FIXME("(%p,0x%08lx,%p,0x%08x) stub\n", TimerHandle,DesiredAccess,ObjectAttributes, TimerType); dump_ObjectAttributes(ObjectAttributes); return 0; } /************************************************************************** * NtSetTimer [NTDLL.221] */ NTSTATUS WINAPI NtSetTimer( IN HANDLE TimerHandle, IN PLARGE_INTEGER DueTime, IN PTIMERAPCROUTINE TimerApcRoutine, IN PVOID TimerContext, IN BOOLEAN WakeTimer, IN ULONG Period OPTIONAL, OUT PBOOLEAN PreviousState OPTIONAL) { FIXME("(0x%08x,%p,%p,%p,%08x,0x%08lx,%p) stub\n", TimerHandle,DueTime,TimerApcRoutine,TimerContext,WakeTimer,Period,PreviousState); return 0; } /****************************************************************************** * NtQueryTimerResolution [NTDLL.129] */ NTSTATUS WINAPI NtQueryTimerResolution(DWORD x1,DWORD x2,DWORD x3) { FIXME("(0x%08lx,0x%08lx,0x%08lx), stub!\n",x1,x2,x3); return 1; } /* * Process object */ /****************************************************************************** * NtTerminateProcess [NTDLL.] * * Native applications must kill themselves when done * FIXME: return value 0-success */ NTSTATUS WINAPI NtTerminateProcess( HANDLE ProcessHandle, LONG ExitStatus) { TRACE("0x%08x 0x%08lx\n", ProcessHandle, ExitStatus ); /* win32 (0x7fffffff) to nt (-1) */ if ( NtCurrentProcess() == ProcessHandle ) ProcessHandle = GetCurrentProcess(); return (! TerminateProcess( ProcessHandle, ExitStatus )); } /****************************************************************************** * NtQueryInformationProcess [NTDLL.] * */ NTSTATUS WINAPI NtQueryInformationProcess( IN HANDLE ProcessHandle, IN PROCESSINFOCLASS ProcessInformationClass, OUT PVOID ProcessInformation, IN ULONG ProcessInformationLength, OUT PULONG ReturnLength) { FIXME("(0x%08x,0x%08x,%p,0x%08lx,%p),stub!\n", ProcessHandle,ProcessInformationClass,ProcessInformation,ProcessInformationLength,ReturnLength); return 0; } /****************************************************************************** * NtSetInformationProcess [NTDLL.207] */ NTSTATUS WINAPI NtSetInformationProcess( IN HANDLE ProcessHandle, IN PROCESSINFOCLASS ProcessInformationClass, IN PVOID ProcessInformation, IN ULONG ProcessInformationLength) { FIXME("(0x%08x,0x%08x,%p,0x%08lx) stub\n", ProcessHandle,ProcessInformationClass,ProcessInformation,ProcessInformationLength); return 0; } /* * Thread */ /****************************************************************************** * NtResumeThread [NTDLL] */ NTSTATUS WINAPI NtResumeThread( IN HANDLE ThreadHandle, IN PULONG SuspendCount) { FIXME("(0x%08x,%p),stub!\n", ThreadHandle,SuspendCount); return 0; } /****************************************************************************** * NtTerminateThread [NTDLL] */ NTSTATUS WINAPI NtTerminateThread( IN HANDLE ThreadHandle, IN NTSTATUS ExitStatus) { if ( TerminateThread(ThreadHandle,ExitStatus) ) return 0; return 0xc0000000; /* FIXME: lasterror->ntstatus */ } /****************************************************************************** * NtQueryInformationThread [NTDLL.] * */ NTSTATUS WINAPI NtQueryInformationThread( IN HANDLE ThreadHandle, IN THREADINFOCLASS ThreadInformationClass, OUT PVOID ThreadInformation, IN ULONG ThreadInformationLength, OUT PULONG ReturnLength) { FIXME("(0x%08x,0x%08x,%p,0x%08lx,%p),stub!\n", ThreadHandle, ThreadInformationClass, ThreadInformation, ThreadInformationLength, ReturnLength); return 0; } /****************************************************************************** * NtSetInformationThread [NTDLL] */ NTSTATUS WINAPI NtSetInformationThread( HANDLE ThreadHandle, THREADINFOCLASS ThreadInformationClass, PVOID ThreadInformation, ULONG ThreadInformationLength) { FIXME("(0x%08x,0x%08x,%p,0x%08lx),stub!\n", ThreadHandle, ThreadInformationClass, ThreadInformation, ThreadInformationLength); return 0; } /* * Token */ /****************************************************************************** * NtDuplicateToken [NTDLL] */ NTSTATUS WINAPI NtDuplicateToken( IN HANDLE ExistingToken, IN ACCESS_MASK DesiredAccess, IN POBJECT_ATTRIBUTES ObjectAttributes, IN SECURITY_IMPERSONATION_LEVEL ImpersonationLevel, IN TOKEN_TYPE TokenType, OUT PHANDLE NewToken) { FIXME("(0x%08x,0x%08lx,%p,0x%08x,0x%08x,%p),stub!\n", ExistingToken, DesiredAccess, ObjectAttributes, ImpersonationLevel, TokenType, NewToken); dump_ObjectAttributes(ObjectAttributes); return 0; } /****************************************************************************** * NtOpenProcessToken [NTDLL] */ NTSTATUS WINAPI NtOpenProcessToken( HANDLE ProcessHandle, DWORD DesiredAccess, HANDLE *TokenHandle) { FIXME("(0x%08x,0x%08lx,%p): stub\n", ProcessHandle,DesiredAccess, TokenHandle); *TokenHandle = 0xcafe; return 0; } /****************************************************************************** * NtOpenThreadToken [NTDLL] */ NTSTATUS WINAPI NtOpenThreadToken( HANDLE ThreadHandle, DWORD DesiredAccess, BOOLEAN OpenAsSelf, HANDLE *TokenHandle) { FIXME("(0x%08x,0x%08lx,0x%08x,%p): stub\n", ThreadHandle,DesiredAccess, OpenAsSelf, TokenHandle); *TokenHandle = 0xcafe; return 0; } /****************************************************************************** * NtAdjustPrivilegesToken [NTDLL] * * FIXME: parameters unsafe */ NTSTATUS WINAPI NtAdjustPrivilegesToken( IN HANDLE TokenHandle, IN BOOLEAN DisableAllPrivileges, IN PTOKEN_PRIVILEGES NewState, IN DWORD BufferLength, OUT PTOKEN_PRIVILEGES PreviousState, OUT PDWORD ReturnLength) { FIXME("(0x%08x,0x%08x,%p,0x%08lx,%p,%p),stub!\n", TokenHandle, DisableAllPrivileges, NewState, BufferLength, PreviousState, ReturnLength); return 0; } /****************************************************************************** * NtQueryInformationToken [NTDLL.156] * * NOTES * Buffer for TokenUser: * 0x00 TOKEN_USER the PSID field points to the SID * 0x08 SID * */ NTSTATUS WINAPI NtQueryInformationToken( HANDLE token, DWORD tokeninfoclass, LPVOID tokeninfo, DWORD tokeninfolength, LPDWORD retlen ) { FIXME("(%08x,%ld,%p,%ld,%p): stub\n", token,tokeninfoclass,tokeninfo,tokeninfolength,retlen); switch (tokeninfoclass) { case TokenGroups: /* 2 */ *retlen = sizeof (TOKEN_GROUPS); break; case TokenUser: /* 1 */ { int len = sizeof (TOKEN_USER)+ sizeof(SID); *retlen = len; if ( len <= tokeninfolength) if( tokeninfo ) { TOKEN_USER * tuser = tokeninfo; PSID sid = (PSID) &((LPBYTE)tokeninfo)[sizeof(TOKEN_USER)]; SID_IDENTIFIER_AUTHORITY localSidAuthority = {SECURITY_NT_AUTHORITY}; RtlInitializeSid(sid, &localSidAuthority, 1); *(RtlSubAuthoritySid(sid, 0)) = SECURITY_INTERACTIVE_RID; tuser->User.Sid = sid; } } break; case TokenPrivileges: *retlen = sizeof (TOKEN_PRIVILEGES); break; case TokenOwner: *retlen = sizeof (TOKEN_OWNER); break; case TokenPrimaryGroup: *retlen = sizeof (TOKEN_PRIMARY_GROUP); break; case TokenDefaultDacl: *retlen = sizeof (TOKEN_DEFAULT_DACL); break; case TokenSource: *retlen = sizeof (TOKEN_SOURCE); break; case TokenType: *retlen = sizeof (TOKEN_TYPE); break; #if 0 case TokenImpersonationLevel: case TokenStatistics: #endif /* 0 */ } return 0; } /* * Section */ /****************************************************************************** * NtCreateSection [NTDLL] */ NTSTATUS WINAPI NtCreateSection( OUT PHANDLE SectionHandle, IN ACCESS_MASK DesiredAccess, IN POBJECT_ATTRIBUTES ObjectAttributes OPTIONAL, IN PLARGE_INTEGER MaximumSize OPTIONAL, IN ULONG SectionPageProtection OPTIONAL, IN ULONG AllocationAttributes, IN HANDLE FileHandle OPTIONAL) { FIXME("(%p,0x%08lx,%p,%p,0x%08lx,0x%08lx,0x%08x) stub\n", SectionHandle,DesiredAccess, ObjectAttributes, MaximumSize,SectionPageProtection,AllocationAttributes,FileHandle); dump_ObjectAttributes(ObjectAttributes); return 0; } /****************************************************************************** * NtOpenSection [NTDLL] */ NTSTATUS WINAPI NtOpenSection( PHANDLE SectionHandle, ACCESS_MASK DesiredAccess, POBJECT_ATTRIBUTES ObjectAttributes) { FIXME("(%p,0x%08lx,%p),stub!\n", SectionHandle,DesiredAccess,ObjectAttributes); dump_ObjectAttributes(ObjectAttributes); return 0; } /****************************************************************************** * NtQuerySection [NTDLL] */ NTSTATUS WINAPI NtQuerySection( IN HANDLE SectionHandle, IN PVOID SectionInformationClass, OUT PVOID SectionInformation, IN ULONG Length, OUT PULONG ResultLength) { FIXME("(0x%08x,%p,%p,0x%08lx,%p) stub!\n", SectionHandle,SectionInformationClass,SectionInformation,Length,ResultLength); return 0; } /****************************************************************************** * NtMapViewOfSection [NTDLL] * FUNCTION: Maps a view of a section into the virtual address space of a process * * ARGUMENTS: * SectionHandle Handle of the section * ProcessHandle Handle of the process * BaseAddress Desired base address (or NULL) on entry * Actual base address of the view on exit * ZeroBits Number of high order address bits that must be zero * CommitSize Size in bytes of the initially committed section of the view * SectionOffset Offset in bytes from the beginning of the section to the beginning of the view * ViewSize Desired length of map (or zero to map all) on entry Actual length mapped on exit * InheritDisposition Specified how the view is to be shared with * child processes * AllocateType Type of allocation for the pages * Protect Protection for the committed region of the view */ NTSTATUS WINAPI NtMapViewOfSection( HANDLE SectionHandle, HANDLE ProcessHandle, PVOID* BaseAddress, ULONG ZeroBits, ULONG CommitSize, PLARGE_INTEGER SectionOffset, PULONG ViewSize, SECTION_INHERIT InheritDisposition, ULONG AllocationType, ULONG Protect) { FIXME("(0x%08x,0x%08x,%p,0x%08lx,0x%08lx,%p,%p,0x%08x,0x%08lx,0x%08lx) stub\n", SectionHandle,ProcessHandle,BaseAddress,ZeroBits,CommitSize,SectionOffset, ViewSize,InheritDisposition,AllocationType,Protect); return 0; } /* * ports */ /****************************************************************************** * NtCreatePort [NTDLL] */ NTSTATUS WINAPI NtCreatePort(DWORD x1,DWORD x2,DWORD x3,DWORD x4,DWORD x5) { FIXME("(0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx),stub!\n",x1,x2,x3,x4,x5); return 0; } /****************************************************************************** * NtConnectPort [NTDLL] */ NTSTATUS WINAPI NtConnectPort(DWORD x1,PUNICODE_STRING uni,DWORD x3,DWORD x4,DWORD x5,DWORD x6,DWORD x7,DWORD x8) { FIXME("(0x%08lx,%s,0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx),stub!\n", x1,debugstr_w(uni->Buffer),x3,x4,x5,x6,x7,x8); return 0; } /****************************************************************************** * NtListenPort [NTDLL] */ NTSTATUS WINAPI NtListenPort(DWORD x1,DWORD x2) { FIXME("(0x%08lx,0x%08lx),stub!\n",x1,x2); return 0; } /****************************************************************************** * NtAcceptConnectPort [NTDLL] */ NTSTATUS WINAPI NtAcceptConnectPort(DWORD x1,DWORD x2,DWORD x3,DWORD x4,DWORD x5,DWORD x6) { FIXME("(0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx),stub!\n",x1,x2,x3,x4,x5,x6); return 0; } /****************************************************************************** * NtCompleteConnectPort [NTDLL] */ NTSTATUS WINAPI NtCompleteConnectPort(DWORD x1) { FIXME("(0x%08lx),stub!\n",x1); return 0; } /****************************************************************************** * NtRegisterThreadTerminatePort [NTDLL] */ NTSTATUS WINAPI NtRegisterThreadTerminatePort(DWORD x1) { FIXME("(0x%08lx),stub!\n",x1); return 0; } /****************************************************************************** * NtRequestWaitReplyPort [NTDLL] */ NTSTATUS WINAPI NtRequestWaitReplyPort(DWORD x1,DWORD x2,DWORD x3) { FIXME("(0x%08lx,0x%08lx,0x%08lx),stub!\n",x1,x2,x3); return 0; } /****************************************************************************** * NtReplyWaitReceivePort [NTDLL] */ NTSTATUS WINAPI NtReplyWaitReceivePort(DWORD x1,DWORD x2,DWORD x3,DWORD x4) { FIXME("(0x%08lx,0x%08lx,0x%08lx,0x%08lx),stub!\n",x1,x2,x3,x4); return 0; } /* * Misc */ /****************************************************************************** * NtSetIntervalProfile [NTDLL] */ NTSTATUS WINAPI NtSetIntervalProfile(DWORD x1,DWORD x2) { FIXME("(0x%08lx,0x%08lx),stub!\n",x1,x2); return 0; } /****************************************************************************** * NtQueryPerformanceCounter [NTDLL] */ NTSTATUS WINAPI NtQueryPerformanceCounter( IN PLARGE_INTEGER Counter, IN PLARGE_INTEGER Frequency) { FIXME("(%p, 0%p) stub\n", Counter, Frequency); return 0; } /****************************************************************************** * NtCreateMailslotFile [NTDLL] */ NTSTATUS WINAPI NtCreateMailslotFile(DWORD x1,DWORD x2,DWORD x3,DWORD x4,DWORD x5,DWORD x6,DWORD x7,DWORD x8) { FIXME("(0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx),stub!\n",x1,x2,x3,x4,x5,x6,x7,x8); return 0; } /****************************************************************************** * NtQuerySystemInformation [NTDLL.168] * * ARGUMENTS: * SystemInformationClass Index to a certain information structure * SystemTimeAdjustmentInformation SYSTEM_TIME_ADJUSTMENT * SystemCacheInformation SYSTEM_CACHE_INFORMATION * SystemConfigurationInformation CONFIGURATION_INFORMATION * observed (class/len): * 0x0/0x2c * 0x12/0x18 * 0x2/0x138 * 0x8/0x600 * SystemInformation caller supplies storage for the information structure * Length size of the structure * ResultLength Data written */ NTSTATUS WINAPI NtQuerySystemInformation( IN SYSTEM_INFORMATION_CLASS SystemInformationClass, OUT PVOID SystemInformation, IN ULONG Length, OUT PULONG ResultLength) { FIXME("(0x%08x,%p,0x%08lx,%p) stub\n", SystemInformationClass,SystemInformation,Length,ResultLength); ZeroMemory (SystemInformation, Length); return 0; } /****************************************************************************** * NtCreatePagingFile [NTDLL] */ NTSTATUS WINAPI NtCreatePagingFile( IN PUNICODE_STRING PageFileName, IN ULONG MiniumSize, IN ULONG MaxiumSize, OUT PULONG ActualSize) { FIXME("(%p(%s),0x%08lx,0x%08lx,%p),stub!\n", PageFileName->Buffer, debugstr_w(PageFileName->Buffer),MiniumSize,MaxiumSize,ActualSize); return 0; } /****************************************************************************** * NtDisplayString [NTDLL.95] * * writes a string to the nt-textmode screen eg. during startup */ NTSTATUS WINAPI NtDisplayString ( PUNICODE_STRING string) { TRACE("%p(%s)\n",string->Buffer, debugstr_w(string->Buffer)); WriteConsoleW(GetStdHandle(STD_OUTPUT_HANDLE), string->Buffer, string->Length, 0, 0); return 0; } /****************************************************************************** * _alldiv [NTDLL.937] * * */ long long WINAPI _alldiv(LARGE_INTEGER a, LARGE_INTEGER b) { #if SIZEOF_LONG_LONG==8 return (*(long long*)&a / *(long long*)&b); #else FIXME("stub\n"); return 0; #endif } /****************************************************************************** * _allmul [NTDLL.938] * * */ long long WINAPI _allmul(LARGE_INTEGER a, LARGE_INTEGER b) { #if SIZEOF_LONG_LONG==8 return (*(long long*)&a * *(long long*)&b); #else FIXME("stub\n"); return 0; #endif } /****************************************************************************** * NtPowerInformation [NTDLL] * */ NTSTATUS WINAPI NtPowerInformation(DWORD x1,DWORD x2,DWORD x3,DWORD x4,DWORD x5) { FIXME("(0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx),stub\n",x1,x2,x3,x4,x5); return 0; } /****************************************************************************** * NtAllocateLocallyUniqueId * * FIXME: the server should do that */ NTSTATUS WINAPI NtAllocateLocallyUniqueId(PLUID Luid) { static LUID luid; FIXME("%p (0x%08lx%08lx)\n", Luid, luid.DUMMYSTRUCTNAME.HighPart, luid.DUMMYSTRUCTNAME.LowPart); luid.QuadPart++; Luid->QuadPart = luid.QuadPart; return STATUS_SUCCESS; } wine-20000526/dlls/ntdll/ntdll.spec0100644000175000001440000010672707075367070016536 0ustar julliardusersname ntdll type win32 #note that the Zw... functions are alternate names for the #Nt... functions. (see www.sysinternals.com for details) #if you change a Nt.. function DON'T FORGET to change the #Zw one too. @ stub CsrAllocateCaptureBuffer @ stub CsrAllocateCapturePointer @ stub CsrAllocateMessagePointer @ stub CsrCaptureMessageBuffer @ stub CsrCaptureMessageString @ stub CsrCaptureTimeout @ stub CsrClientCallServer @ stub CsrClientConnectToServer @ stub CsrClientMaxMessage @ stub CsrClientSendMessage @ stub CsrClientThreadConnect @ stub CsrFreeCaptureBuffer @ stub CsrIdentifyAlertableThread @ stub CsrNewThread @ stub CsrProbeForRead @ stub CsrProbeForWrite @ stub CsrSetPriorityClass @ stub CsrpProcessCallbackRequest @ stdcall DbgBreakPoint() DbgBreakPoint @ varargs DbgPrint(str) DbgPrint @ stub DbgPrompt @ stub DbgSsHandleKmApiMsg @ stub DbgSsInitialize @ stub DbgUiConnectToDbg @ stub DbgUiContinue @ stub DbgUiWaitStateChange @ stdcall DbgUserBreakPoint() DbgUserBreakPoint @ stub KiUserApcDispatcher @ stub KiUserCallbackDispatcher @ stub KiUserExceptionDispatcher @ stub LdrAccessResource @ stub LdrDisableThreadCalloutsForDll @ stub LdrEnumResources @ stub LdrFindEntryForAddress @ stub LdrFindResourceDirectory_U @ stub LdrFindResource_U @ stub LdrGetDllHandle @ stub LdrGetProcedureAddress @ stub LdrInitializeThunk @ stub LdrLoadDll @ stub LdrProcessRelocationBlock @ stub LdrQueryImageFileExecutionOptions @ stub LdrQueryProcessModuleInformation @ stub LdrShutdownProcess @ stub LdrShutdownThread @ stub LdrUnloadDll @ stub LdrVerifyImageMatchesChecksum @ stub NPXEMULATORTABLE @ stub NlsMbCodePageTag @ stub NlsMbOemCodePageTag @ stdcall NtAcceptConnectPort(long long long long long long) NtAcceptConnectPort @ stdcall NtAccessCheck(ptr long long ptr ptr ptr ptr ptr) NtAccessCheck @ stub NtAccessCheckAndAuditAlarm @ stub NtAdjustGroupsToken @ stdcall NtAdjustPrivilegesToken(long long long long long long) NtAdjustPrivilegesToken @ stub NtAlertResumeThread @ stub NtAlertThread @ stdcall NtAllocateLocallyUniqueId(ptr) NtAllocateLocallyUniqueId @ stdcall NtAllocateUuids(ptr ptr ptr) NtAllocateUuids @ stub NtAllocateVirtualMemory @ stub NtCallbackReturn @ stub NtCancelIoFile @ stub NtCancelTimer @ stdcall NtClearEvent(long) NtClearEvent @ stdcall NtClose(long) NtClose @ stub NtCloseObjectAuditAlarm @ stdcall NtCompleteConnectPort(long) NtCompleteConnectPort @ stdcall NtConnectPort(long long long long long long long long) NtConnectPort @ stub NtContinue @ stdcall NtCreateDirectoryObject(long long long) NtCreateDirectoryObject @ stdcall NtCreateEvent(long long long long long) NtCreateEvent @ stub NtCreateEventPair @ stdcall NtCreateFile(ptr long ptr ptr long long long ptr long long ptr) NtCreateFile @ stub NtCreateIoCompletion @ stdcall NtCreateKey(long long long long long long long) NtCreateKey @ stdcall NtCreateMailslotFile(long long long long long long long long) NtCreateMailslotFile @ stub NtCreateMutant @ stub NtCreateNamedPipeFile @ stdcall NtCreatePagingFile(long long long long) NtCreatePagingFile @ stdcall NtCreatePort(long long long long long) NtCreatePort @ stub NtCreateProcess @ stub NtCreateProfile @ stdcall NtCreateSection(long long long long long long long) NtCreateSection @ stdcall NtCreateSemaphore(ptr long ptr long long) NtCreateSemaphore @ stdcall NtCreateSymbolicLinkObject(ptr long ptr ptr) NtCreateSymbolicLinkObject @ stub NtCreateThread @ stdcall NtCreateTimer(ptr long ptr long) NtCreateTimer @ stub NtCreateToken @ stdcall NtCurrentTeb() NtCurrentTeb @ stub NtDelayExecution @ stub NtDeleteFile @ stdcall NtDeleteKey(long) NtDeleteKey @ stdcall NtDeleteValueKey(long ptr) NtDeleteValueKey @ stdcall NtDeviceIoControlFile(long long long long long long long long long long) NtDeviceIoControlFile @ stdcall NtDisplayString(ptr)NtDisplayString @ stdcall NtDuplicateObject(long long long long long long long) NtDuplicateObject @ stdcall NtDuplicateToken(long long long long long long) NtDuplicateToken @ stub NtEnumerateBus @ stdcall NtEnumerateKey (long long long long long long) NtEnumerateKey @ stdcall NtEnumerateValueKey (long long long long long long) NtEnumerateValueKey @ stub NtExtendSection @ stub NtFlushBuffersFile @ stub NtFlushInstructionCache @ stdcall NtFlushKey(long) NtFlushKey @ stub NtFlushVirtualMemory @ stub NtFlushWriteBuffer @ stub NtFreeVirtualMemory @ stdcall NtFsControlFile(long long long long long long long long long long) NtFsControlFile @ stub NtGetContextThread @ stub NtGetPlugPlayEvent @ stub NtGetTickCount @ stub NtImpersonateClientOfPort @ stub NtImpersonateThread @ stub NtInitializeRegistry @ stdcall NtListenPort(long long) NtListenPort @ stub NtLoadDriver @ stdcall NtLoadKey(ptr ptr) NtLoadKey @ stub NtLockFile @ stub NtLockVirtualMemory @ stub NtMakeTemporaryObject @ stdcall NtMapViewOfSection(long long long long long long long long long long) NtMapViewOfSection @ stub NtNotifyChangeDirectoryFile @ stdcall NtNotifyChangeKey(long long ptr ptr ptr long long ptr long long) NtNotifyChangeKey @ stdcall NtOpenDirectoryObject(long long long) NtOpenDirectoryObject @ stdcall NtOpenEvent(long long long) NtOpenEvent @ stub NtOpenEventPair @ stdcall NtOpenFile(ptr long ptr ptr long long) NtOpenFile @ stub NtOpenIoCompletion @ stdcall NtOpenKey(ptr long ptr) NtOpenKey @ stub NtOpenMutant @ stub NtOpenObjectAuditAlarm @ stub NtOpenProcess @ stdcall NtOpenProcessToken(long long long) NtOpenProcessToken @ stdcall NtOpenSection(long long long) NtOpenSection @ stdcall NtOpenSemaphore(long long ptr) NtOpenSemaphore @ stdcall NtOpenSymbolicLinkObject (long long long) NtOpenSymbolicLinkObject @ stub NtOpenThread @ stdcall NtOpenThreadToken(long long long long) NtOpenThreadToken @ stub NtOpenTimer @ stub NtPlugPlayControl @ stub NtPrivilegeCheck @ stub NtPrivilegeObjectAuditAlarm @ stub NtPrivilegedServiceAuditAlarm @ stub NtProtectVirtualMemory @ stdcall NtPulseEvent(long ptr) NtPulseEvent @ stub NtQueryAttributesFile @ stub NtQueryDefaultLocale @ stdcall NtQueryDirectoryFile(long long ptr ptr ptr ptr long long long ptr long)NtQueryDirectoryFile @ stdcall NtQueryDirectoryObject(long long long long long long long) NtQueryDirectoryObject @ stub NtQueryEaFile @ stdcall NtQueryEvent(long long ptr long ptr) NtQueryEvent @ stdcall NtQueryInformationFile(long long long long long) NtQueryInformationFile @ stub NtQueryInformationPort @ stdcall NtQueryInformationProcess(long long long long long) NtQueryInformationProcess @ stdcall NtQueryInformationThread (long long long long long) NtQueryInformationThread @ stdcall NtQueryInformationToken (long long long long long) NtQueryInformationToken @ stub NtQueryIntervalProfile @ stub NtQueryIoCompletion @ stdcall NtQueryKey (long long ptr long ptr) NtQueryKey @ stub NtQueryMutant @ stdcall NtQueryObject(long long long long long) NtQueryObject @ stdcall NtQueryPerformanceCounter (long long) NtQueryPerformanceCounter @ stdcall NtQuerySection (long long long long long) NtQuerySection @ stdcall NtQuerySecurityObject (long long long long long) NtQuerySecurityObject @ stdcall NtQuerySemaphore (long long long long long) NtQuerySemaphore @ stdcall NtQuerySymbolicLinkObject(long ptr ptr) NtQuerySymbolicLinkObject @ stub NtQuerySystemEnvironmentValue @ stdcall NtQuerySystemInformation(long long long long) NtQuerySystemInformation @ stdcall NtQuerySystemTime(ptr) GetSystemTimeAsFileTime @ stub NtQueryTimer @ stdcall NtQueryTimerResolution(long long long) NtQueryTimerResolution @ stdcall NtQueryValueKey(long long long long long long) NtQueryValueKey @ stub NtQueryVirtualMemory @ stdcall NtRaiseException(ptr ptr long) NtRaiseException @ stub NtRaiseHardError @ stdcall NtReadFile(long long long long long long long long long) NtReadFile @ stub NtReadRequestData @ stub NtReadVirtualMemory @ stub NtRegisterNewDevice @ stdcall NtRegisterThreadTerminatePort(long) NtRegisterThreadTerminatePort @ stub NtReleaseMutant @ stub NtReleaseProcessMutant @ stdcall NtReleaseSemaphore(long long ptr) NtReleaseSemaphore @ stub NtRemoveIoCompletion @ stdcall NtReplaceKey(ptr long ptr) NtReplaceKey @ stub NtReplyPort @ stdcall NtReplyWaitReceivePort(long long long long) NtReplyWaitReceivePort @ stub NtReplyWaitReplyPort @ stub NtRequestPort @ stdcall NtRequestWaitReplyPort(long long long) NtRequestWaitReplyPort @ stdcall NtResetEvent(long ptr) NtResetEvent @ stdcall NtRestoreKey(long long long) NtRestoreKey @ stdcall NtResumeThread(long long) NtResumeThread @ stdcall NtSaveKey(long long) NtSaveKey @ stub NtSetContextThread @ stub NtSetDefaultHardErrorPort @ stub NtSetDefaultLocale @ stub NtSetEaFile @ stdcall NtSetEvent(long long) NtSetEvent @ stub NtSetHighEventPair @ stub NtSetHighWaitLowEventPair @ stub NtSetHighWaitLowThread @ stdcall NtSetInformationFile(long long long long long) NtSetInformationFile @ stdcall NtSetInformationKey(long long ptr long) NtSetInformationKey @ stub NtSetInformationObject @ stdcall NtSetInformationProcess(long long long long) NtSetInformationProcess @ stdcall NtSetInformationThread(long long long long) NtSetInformationThread @ stub NtSetInformationToken @ stdcall NtSetIntervalProfile(long long) NtSetIntervalProfile @ stub NtSetIoCompletion @ stub NtSetLdtEntries @ stub NtSetLowEventPair @ stub NtSetLowWaitHighEventPair @ stub NtSetLowWaitHighThread @ stdcall NtSetSecurityObject(long long ptr) NtSetSecurityObject @ stub NtSetSystemEnvironmentValue @ stub NtSetSystemInformation @ stub NtSetSystemPowerState @ stub NtSetSystemTime @ stdcall NtSetTimer(long ptr ptr ptr long long ptr) NtSetTimer @ stub NtSetTimerResolution @ stdcall NtSetValueKey(long long long long long long) NtSetValueKey @ stdcall NtSetVolumeInformationFile(long ptr ptr long long) NtSetVolumeInformationFile @ stub NtShutdownSystem @ stub NtStartProfile @ stub NtStopProfile @ stub NtSuspendThread @ stub NtSystemDebugControl @ stdcall NtTerminateProcess(long long)NtTerminateProcess @ stdcall NtTerminateThread(long long) NtTerminateThread @ stub NtTestAlert @ stub NtUnloadDriver @ stdcall NtUnloadKey(long) NtUnloadKey @ stub NtUnlockFile @ stub NtUnlockVirtualMemory @ stub NtUnmapViewOfSection @ stub NtVdmControl @ stub NtW32Call @ stub NtWaitForMultipleObjects @ stub NtWaitForProcessMutant @ stdcall NtWaitForSingleObject(long long long) NtWaitForSingleObject @ stub NtWaitHighEventPair @ stub NtWaitLowEventPair @ stub NtWriteFile @ stub NtWriteRequestData @ stub NtWriteVirtualMemory @ stub PfxFindPrefix @ stub PfxInitialize @ stub PfxInsertPrefix @ stub PfxRemovePrefix @ stub RestoreEm87Context @ stub RtlAbortRXact @ stub RtlAbsoluteToSelfRelativeSD @ stdcall RtlAcquirePebLock() RtlAcquirePebLock @ stdcall RtlAcquireResourceExclusive(ptr long) RtlAcquireResourceExclusive @ stdcall RtlAcquireResourceShared(ptr long) RtlAcquireResourceShared @ stdcall RtlAddAccessAllowedAce(long long long long) RtlAddAccessAllowedAce @ stub RtlAddAccessDeniedAce @ stdcall RtlAddAce(ptr long long ptr long) RtlAddAce @ stub RtlAddActionToRXact @ stub RtlAddAttributeActionToRXact @ stub RtlAddAuditAccessAce @ stdcall RtlAdjustPrivilege(long long long long) RtlAdjustPrivilege @ stdcall RtlAllocateAndInitializeSid (ptr long long long long long long long long long ptr) RtlAllocateAndInitializeSid @ stdcall RtlAllocateHeap(long long long) RtlAllocateHeap @ stub RtlAnsiCharToUnicodeChar @ stub RtlAnsiStringToUnicodeSize @ stdcall RtlAnsiStringToUnicodeString(ptr ptr long) RtlAnsiStringToUnicodeString @ stub RtlAppendAsciizToString @ stub RtlAppendStringToString @ stub RtlAppendUnicodeStringToString @ stub RtlAppendUnicodeToString @ stub RtlApplyRXact @ stub RtlApplyRXactNoFlush @ stub RtlAreAllAccessesGranted @ stub RtlAreAnyAccessesGranted @ stub RtlAreBitsClear @ stub RtlAreBitsSet @ stdcall RtlAssert(ptr ptr long long) RtlAssert @ stub RtlCaptureStackBackTrace @ stub RtlCharToInteger @ stub RtlCheckRegistryKey @ stub RtlClearAllBits @ stdcall RtlClearBits(long long long) RtlClearBits @ stub RtlCompactHeap @ stdcall RtlCompareMemory(ptr ptr long) RtlCompareMemory @ stub RtlCompareMemoryUlong @ stub RtlCompareString @ stdcall RtlCompareUnicodeString (ptr ptr long) RtlCompareUnicodeString @ stub RtlCompressBuffer @ stub RtlConsoleMultiByteToUnicodeN @ stub RtlConvertExclusiveToShared @ stub RtlConvertLongToLargeInteger @ stub RtlConvertSharedToExclusive @ stub RtlConvertSidToUnicodeString @ stub RtlConvertUiListToApiList @ stub RtlConvertUlongToLargeInteger @ stub RtlCopyLuid @ stub RtlCopyLuidAndAttributesArray @ stub RtlCopySecurityDescriptor @ stdcall RtlCopySid(long ptr ptr) RtlCopySid @ stub RtlCopySidAndAttributesArray @ stub RtlCopyString @ stub RtlCopyUnicodeString @ stdcall RtlCreateAcl(ptr long long) RtlCreateAcl @ stub RtlCreateAndSetSD @ stdcall RtlCreateEnvironment(long long) RtlCreateEnvironment @ stdcall RtlCreateHeap(long ptr long long ptr ptr) RtlCreateHeap @ stub RtlCreateProcessParameters @ stub RtlCreateQueryDebugBuffer @ stub RtlCreateRegistryKey @ stdcall RtlCreateSecurityDescriptor(ptr long) RtlCreateSecurityDescriptor @ stub RtlCreateTagHeap @ stub RtlCreateUnicodeString @ stub RtlCreateUnicodeStringFromAsciiz @ stub RtlCreateUserProcess @ stub RtlCreateUserSecurityObject @ stub RtlCreateUserThread @ stub RtlCustomCPToUnicodeN @ stub RtlCutoverTimeToSystemTime @ stub RtlDeNormalizeProcessParams @ stub RtlDecompressBuffer @ stub RtlDecompressFragment @ stub RtlDelete @ stub RtlDeleteAce @ stdcall RtlDeleteCriticalSection(ptr) DeleteCriticalSection @ stub RtlDeleteElementGenericTable @ stub RtlDeleteRegistryValue @ stdcall RtlDeleteResource(ptr) RtlDeleteResource @ stdcall RtlDeleteSecurityObject(long) RtlDeleteSecurityObject @ stdcall RtlDestroyEnvironment(long) RtlDestroyEnvironment @ stdcall RtlDestroyHeap(long) RtlDestroyHeap @ stub RtlDestroyProcessParameters @ stub RtlDestroyQueryDebugBuffer @ stub RtlDetermineDosPathNameType_U @ stub RtlDoesFileExists_U @ stdcall RtlDosPathNameToNtPathName_U(ptr ptr long long) RtlDosPathNameToNtPathName_U @ stub RtlDosSearchPath_U @ stdcall RtlDumpResource(ptr) RtlDumpResource @ stub RtlEnlargedIntegerMultiply @ stub RtlEnlargedUnsignedDivide @ stub RtlEnlargedUnsignedMultiply @ stdcall RtlEnterCriticalSection(ptr) EnterCriticalSection @ stub RtlEnumProcessHeaps @ stub RtlEnumerateGenericTable @ stub RtlEnumerateGenericTableWithoutSplaying @ stub RtlEqualComputerName @ stub RtlEqualDomainName @ stub RtlEqualLuid @ stdcall RtlEqualPrefixSid(ptr ptr) RtlEqualPrefixSid @ stdcall RtlEqualSid (long long) RtlEqualSid @ stub RtlEqualString @ stdcall RtlEqualUnicodeString(long long long) RtlEqualUnicodeString @ stub RtlEraseUnicodeString @ stub RtlExpandEnvironmentStrings_U @ stub RtlExtendHeap @ stdcall RtlExtendedIntegerMultiply(long long long) RtlExtendedIntegerMultiply @ stdcall RtlExtendedLargeIntegerDivide(long long long ptr) RtlExtendedLargeIntegerDivide @ stub RtlExtendedMagicDivide @ stdcall RtlFillMemory(ptr long long) RtlFillMemory @ stub RtlFillMemoryUlong @ stdcall RtlFindClearBits(long long long) RtlFindClearBits @ stub RtlFindClearBitsAndSet @ stub RtlFindLongestRunClear @ stub RtlFindLongestRunSet @ stub RtlFindMessage @ stub RtlFindSetBits @ stub RtlFindSetBitsAndClear @ stdcall RtlFirstFreeAce(ptr ptr) RtlFirstFreeAce @ stdcall RtlFormatCurrentUserKeyPath(ptr) RtlFormatCurrentUserKeyPath @ stub RtlFormatMessage @ stdcall RtlFreeAnsiString(long) RtlFreeAnsiString @ stdcall RtlFreeHeap(long long long) RtlFreeHeap @ stub RtlFreeOemString @ stdcall RtlFreeSid (long) RtlFreeSid @ stdcall RtlFreeUnicodeString(ptr) RtlFreeUnicodeString @ stub RtlGenerate8dot3Name @ stdcall RtlGetAce(ptr long ptr) RtlGetAce @ stub RtlGetCallersAddress @ stub RtlGetCompressionWorkSpaceSize @ stdcall RtlGetControlSecurityDescriptor(ptr ptr ptr) RtlGetControlSecurityDescriptor @ stub RtlGetCurrentDirectory_U @ stdcall RtlGetDaclSecurityDescriptor(ptr ptr ptr ptr) RtlGetDaclSecurityDescriptor @ stub RtlGetElementGenericTable @ stub RtlGetFullPathName_U @ stdcall RtlGetGroupSecurityDescriptor(ptr ptr ptr) RtlGetGroupSecurityDescriptor @ stub RtlGetLongestNtPathLength @ stub RtlGetNtGlobalFlags @ stdcall RtlGetNtProductType(ptr) RtlGetNtProductType @ stdcall RtlGetOwnerSecurityDescriptor(ptr ptr ptr) RtlGetOwnerSecurityDescriptor @ stub RtlGetProcessHeaps @ stdcall RtlGetSaclSecurityDescriptor(ptr ptr ptr ptr)RtlGetSaclSecurityDescriptor @ stub RtlGetUserInfoHeap @ stdcall RtlIdentifierAuthoritySid(ptr) RtlIdentifierAuthoritySid @ stub RtlImageDirectoryEntryToData @ stdcall RtlImageNtHeader(long) RtlImageNtHeader @ stdcall RtlImpersonateSelf(long) RtlImpersonateSelf @ stdcall RtlInitAnsiString(ptr str) RtlInitAnsiString @ stub RtlInitCodePageTable @ stub RtlInitNlsTables @ stdcall RtlInitString(ptr str) RtlInitString @ stdcall RtlInitUnicodeString(ptr wstr) RtlInitUnicodeString @ stdcall RtlInitializeBitMap(long long long) RtlInitializeBitMap @ stub RtlInitializeContext @ stdcall RtlInitializeCriticalSection(ptr) InitializeCriticalSection @ stdcall RtlInitializeGenericTable() RtlInitializeGenericTable @ stub RtlInitializeRXact @ stdcall RtlInitializeResource(ptr) RtlInitializeResource @ stdcall RtlInitializeSid(ptr ptr long) RtlInitializeSid @ stub RtlInsertElementGenericTable @ stdcall RtlIntegerToChar(long long long long) RtlIntegerToChar @ stub RtlIntegerToUnicodeString @ stub RtlIsDosDeviceName_U @ stub RtlIsGenericTableEmpty @ stub RtlIsNameLegalDOS8Dot3 @ stdcall RtlIsTextUnicode(ptr long ptr) RtlIsTextUnicode @ stub RtlLargeIntegerAdd @ stub RtlLargeIntegerArithmeticShift @ stub RtlLargeIntegerDivide @ stub RtlLargeIntegerNegate @ stub RtlLargeIntegerShiftLeft @ stub RtlLargeIntegerShiftRight @ stub RtlLargeIntegerSubtract @ stub RtlLargeIntegerToChar @ stdcall RtlLeaveCriticalSection(ptr) LeaveCriticalSection @ stdcall RtlLengthRequiredSid(long) RtlLengthRequiredSid @ stdcall RtlLengthSecurityDescriptor(ptr) RtlLengthSecurityDescriptor @ stdcall RtlLengthSid(ptr) RtlLengthSid @ stub RtlLocalTimeToSystemTime @ stub RtlLockHeap @ stub RtlLookupElementGenericTable @ stdcall RtlMakeSelfRelativeSD(ptr ptr ptr) RtlMakeSelfRelativeSD @ stub RtlMapGenericMask @ stdcall RtlMoveMemory(ptr ptr long) RtlMoveMemory @ stdcall RtlMultiByteToUnicodeN(ptr long ptr ptr long) RtlMultiByteToUnicodeN @ stub RtlMultiByteToUnicodeSize @ stub RtlNewInstanceSecurityObject @ stub RtlNewSecurityGrantedAccess @ stdcall RtlNewSecurityObject(long long long long long long) RtlNewSecurityObject @ stdcall RtlNormalizeProcessParams(ptr) RtlNormalizeProcessParams @ stdcall RtlNtStatusToDosError(long) RtlNtStatusToDosError @ stub RtlNumberGenericTableElements @ stub RtlNumberOfClearBits @ stub RtlNumberOfSetBits @ stub RtlOemStringToUnicodeSize @ stdcall RtlOemStringToUnicodeString(ptr ptr long) RtlOemStringToUnicodeString @ stdcall RtlOemToUnicodeN(ptr long ptr ptr long) RtlOemToUnicodeN @ stdcall RtlOpenCurrentUser(long ptr) RtlOpenCurrentUser @ stub RtlPcToFileHeader @ stub RtlPrefixString @ stdcall RtlPrefixUnicodeString(ptr ptr long) RtlPrefixUnicodeString @ stub RtlProtectHeap @ stdcall RtlQueryEnvironmentVariable_U(long long long) RtlQueryEnvironmentVariable_U @ stub RtlQueryInformationAcl @ stub RtlQueryProcessBackTraceInformation @ stub RtlQueryProcessDebugInformation @ stub RtlQueryProcessHeapInformation @ stub RtlQueryProcessLockInformation @ stub RtlQueryRegistryValues @ stub RtlQuerySecurityObject @ stub RtlQueryTagHeap @ stub RtlQueryTimeZoneInformation @ stdcall RtlRaiseException(ptr) RtlRaiseException @ stdcall RtlRaiseStatus(long) RtlRaiseStatus @ stub RtlRandom @ stub RtlReAllocateHeap @ stub RtlRealPredecessor @ stub RtlRealSuccessor @ stdcall RtlReleasePebLock() RtlReleasePebLock @ stdcall RtlReleaseResource(ptr) RtlReleaseResource @ stub RtlRemoteCall @ stub RtlResetRtlTranslations @ stub RtlRunDecodeUnicodeString @ stub RtlRunEncodeUnicodeString @ stub RtlSecondsSince1970ToTime @ stub RtlSecondsSince1980ToTime @ stub RtlSelfRelativeToAbsoluteSD @ stub RtlSetAllBits @ stdcall RtlSetBits(long long long) RtlSetBits @ stub RtlSetCurrentDirectory_U @ stub RtlSetCurrentEnvironment @ stdcall RtlSetDaclSecurityDescriptor(ptr long ptr long) RtlSetDaclSecurityDescriptor @ stdcall RtlSetEnvironmentVariable(long long long) RtlSetEnvironmentVariable @ stdcall RtlSetGroupSecurityDescriptor(ptr ptr long) RtlSetGroupSecurityDescriptor @ stub RtlSetInformationAcl @ stdcall RtlSetOwnerSecurityDescriptor(ptr ptr long) RtlSetOwnerSecurityDescriptor @ stdcall RtlSetSaclSecurityDescriptor(ptr long ptr long) RtlSetSaclSecurityDescriptor @ stub RtlSetSecurityObject @ stub RtlSetTimeZoneInformation @ stub RtlSetUserFlagsHeap @ stub RtlSetUserValueHeap @ stdcall RtlSizeHeap(long long long) HeapSize @ stub RtlSplay @ stub RtlStartRXact @ stdcall RtlSubAuthorityCountSid(ptr) RtlSubAuthorityCountSid @ stdcall RtlSubAuthoritySid(ptr long) RtlSubAuthoritySid @ stub RtlSubtreePredecessor @ stub RtlSubtreeSuccessor @ stdcall RtlSystemTimeToLocalTime (long long) RtlSystemTimeToLocalTime @ stdcall RtlTimeFieldsToTime(ptr ptr) RtlTimeFieldsToTime @ stdcall RtlTimeToElapsedTimeFields(long long) RtlTimeToElapsedTimeFields @ stdcall RtlTimeToSecondsSince1970(ptr ptr) RtlTimeToSecondsSince1970 @ stdcall RtlTimeToSecondsSince1980(ptr ptr) RtlTimeToSecondsSince1980 @ stdcall RtlTimeToTimeFields (long long) RtlTimeToTimeFields @ stub RtlUnicodeStringToAnsiSize @ stdcall RtlUnicodeStringToAnsiString(ptr ptr long) RtlUnicodeStringToAnsiString @ stub RtlUnicodeStringToCountedOemString @ stub RtlUnicodeStringToInteger @ stub RtlUnicodeStringToOemSize @ stdcall RtlUnicodeStringToOemString(ptr ptr long) RtlUnicodeStringToOemString @ stub RtlUnicodeToCustomCPN @ stdcall RtlUnicodeToMultiByteN(ptr long ptr ptr long) RtlUnicodeToMultiByteN @ stub RtlUnicodeToMultiByteSize @ stdcall RtlUnicodeToOemN(ptr long ptr ptr long) RtlUnicodeToOemN @ stub RtlUniform @ stub RtlUnlockHeap @ stdcall RtlUnwind(ptr ptr ptr long) RtlUnwind @ stub RtlUpcaseUnicodeChar @ stdcall RtlUpcaseUnicodeString(ptr ptr long) RtlUpcaseUnicodeString @ stub RtlUpcaseUnicodeStringToAnsiString @ stub RtlUpcaseUnicodeStringToCountedOemString @ stdcall RtlUpcaseUnicodeStringToOemString(ptr ptr long) RtlUpcaseUnicodeStringToOemString @ stub RtlUpcaseUnicodeToCustomCPN @ stub RtlUpcaseUnicodeToMultiByteN @ stdcall RtlUpcaseUnicodeToOemN(ptr long ptr ptr long) RtlUpcaseUnicodeToOemN @ stub RtlUpperChar @ stub RtlUpperString @ stub RtlUsageHeap @ stub RtlValidAcl @ stdcall RtlValidSecurityDescriptor(ptr) RtlValidSecurityDescriptor @ stdcall RtlValidSid(ptr) RtlValidSid @ stub RtlValidateHeap @ stub RtlValidateProcessHeaps @ stub RtlWalkHeap @ stub RtlWriteRegistryValue @ stub RtlZeroHeap @ stdcall RtlZeroMemory(ptr long) RtlZeroMemory @ stub RtlpInitializeRtl @ stub RtlpNtCreateKey @ stub RtlpNtEnumerateSubKey @ stub RtlpNtMakeTemporaryKey @ stub RtlpNtOpenKey @ stub RtlpNtQueryValueKey @ stub RtlpNtSetValueKey @ stub RtlpUnWaitCriticalSection @ stub RtlpWaitForCriticalSection @ stdcall RtlxAnsiStringToUnicodeSize(ptr) RtlxAnsiStringToUnicodeSize @ stdcall RtlxOemStringToUnicodeSize(ptr) RtlxOemStringToUnicodeSize @ stub RtlxUnicodeStringToAnsiSize @ stdcall RtlxUnicodeStringToOemSize(ptr) RtlxUnicodeStringToOemSize @ stub SaveEm87Context @ stdcall ZwAcceptConnectPort(long long long long long long) NtAcceptConnectPort @ stub ZwAccessCheck @ stub ZwAccessCheckAndAuditAlarm @ stdcall ZwAdjustGroupsToken(long long long long long long) NtAdjustPrivilegesToken @ stub ZwAdjustPrivilegesToken @ stub ZwAlertResumeThread @ stub ZwAlertThread @ stub ZwAllocateLocallyUniqueId @ stub ZwAllocateUuids @ stub ZwAllocateVirtualMemory @ stub ZwCallbackReturn @ stub ZwCancelIoFile @ stub ZwCancelTimer @ stub ZwClearEvent @ stub ZwClose @ stub ZwCloseObjectAuditAlarm @ stdcall ZwCompleteConnectPort(long) NtCompleteConnectPort @ stdcall ZwConnectPort(long long long long long long long long) NtConnectPort @ stub ZwContinue @ stdcall ZwCreateDirectoryObject(long long long) NtCreateDirectoryObject @ stdcall ZwCreateEvent(long long long long long) NtCreateEvent @ stub ZwCreateEventPair @ stdcall ZwCreateFile(ptr long ptr ptr long long long ptr long long ptr) NtCreateFile @ stub ZwCreateIoCompletion @ stdcall ZwCreateKey(long long long long long long long) NtCreateKey @ stdcall ZwCreateMailslotFile(long long long long long long long long) NtCreateMailslotFile @ stub ZwCreateMutant @ stub ZwCreateNamedPipeFile @ stdcall ZwCreatePagingFile(long long long long) NtCreatePagingFile @ stdcall ZwCreatePort(long long long long long) NtCreatePort @ stub ZwCreateProcess @ stub ZwCreateProfile @ stdcall ZwCreateSection(long long long long long long long) NtCreateSection @ stub ZwCreateSemaphore @ stub ZwCreateSymbolicLinkObject @ stub ZwCreateThread @ stdcall ZwCreateTimer(ptr long ptr long) NtCreateTimer @ stub ZwCreateToken @ stub ZwDelayExecution @ stub ZwDeleteFile @ stub ZwDeleteKey @ stub ZwDeleteValueKey @ stdcall ZwDeviceIoControlFile(long long long long long long long long long long) NtDeviceIoControlFile @ stub ZwDisplayString @ stdcall ZwDuplicateObject(long long long long long long long) NtDuplicateObject @ stdcall ZwDuplicateToken(long long long long long long) NtDuplicateToken @ stub ZwEnumerateBus @ stub ZwEnumerateKey @ stub ZwEnumerateValueKey @ stub ZwExtendSection @ stub ZwFlushBuffersFile @ stub ZwFlushInstructionCache @ stub ZwFlushKey @ stub ZwFlushVirtualMemory @ stub ZwFlushWriteBuffer @ stub ZwFreeVirtualMemory @ stdcall ZwFsControlFile(long long long long long long long long long long) NtFsControlFile @ stub ZwGetContextThread @ stub ZwGetPlugPlayEvent @ stub ZwGetTickCount @ stub ZwImpersonateClientOfPort @ stub ZwImpersonateThread @ stub ZwInitializeRegistry @ stdcall ZwListenPort(long long) NtListenPort @ stub ZwLoadDriver @ stub ZwLoadKey @ stub ZwLockFile @ stub ZwLockVirtualMemory @ stub ZwMakeTemporaryObject @ stdcall ZwMapViewOfSection(long long long long long long long long long long) NtMapViewOfSection @ stub ZwNotifyChangeDirectoryFile @ stub ZwNotifyChangeKey @ stdcall ZwOpenDirectoryObject(long long long) NtOpenDirectoryObject @ stdcall ZwOpenEvent(long long long) NtOpenEvent @ stub ZwOpenEventPair @ stdcall ZwOpenFile(ptr long ptr ptr long long) NtOpenFile @ stub ZwOpenIoCompletion @ stdcall ZwOpenKey(ptr long ptr) NtOpenKey @ stub ZwOpenMutant @ stub ZwOpenObjectAuditAlarm @ stub ZwOpenProcess @ stdcall ZwOpenProcessToken(long long long) NtOpenProcessToken @ stdcall ZwOpenSection(long long long) NtOpenSection @ stub ZwOpenSemaphore @ stub ZwOpenSymbolicLinkObject @ stub ZwOpenThread @ stdcall ZwOpenThreadToken(long long long long) NtOpenThreadToken @ stub ZwOpenTimer @ stub ZwPlugPlayControl @ stub ZwPrivilegeCheck @ stub ZwPrivilegeObjectAuditAlarm @ stub ZwPrivilegedServiceAuditAlarm @ stub ZwProtectVirtualMemory @ stub ZwPulseEvent @ stub ZwQueryAttributesFile @ stub ZwQueryDefaultLocale @ stdcall ZwQueryDirectoryFile(long long ptr ptr ptr ptr long long long ptr long)NtQueryDirectoryFile @ stdcall ZwQueryDirectoryObject(long long long long long long long) NtQueryDirectoryObject @ stub ZwQueryEaFile @ stub ZwQueryEvent @ stdcall ZwQueryInformationFile(long long long long long) NtQueryInformationFile @ stub ZwQueryInformationPort @ stdcall ZwQueryInformationProcess(long long long long long) NtQueryInformationProcess @ stdcall ZwQueryInformationThread(long long long long long) NtQueryInformationThread @ stdcall ZwQueryInformationToken(long long long long long) NtQueryInformationToken @ stub ZwQueryIntervalProfile @ stub ZwQueryIoCompletion @ stub ZwQueryKey @ stub ZwQueryMutant @ stdcall ZwQueryObject(long long long long long) NtQueryObject @ stub ZwQueryPerformanceCounter @ stub ZwQuerySection @ stub ZwQuerySecurityObject @ stub ZwQuerySemaphore @ stub ZwQuerySymbolicLinkObject @ stub ZwQuerySystemEnvironmentValue @ stdcall ZwQuerySystemInformation(long long long long) NtQuerySystemInformation @ stdcall ZwQuerySystemTime(ptr) GetSystemTimeAsFileTime @ stub ZwQueryTimer @ stub ZwQueryTimerResolution @ stub ZwQueryValueKey @ stub ZwQueryVirtualMemory @ stub ZwQueryVolumeInformationFile @ stub ZwRaiseException @ stub ZwRaiseHardError @ stdcall ZwReadFile(long long long long long long long long long) NtReadFile @ stub ZwReadRequestData @ stub ZwReadVirtualMemory @ stub ZwRegisterNewDevice @ stdcall ZwRegisterThreadTerminatePort(long) NtRegisterThreadTerminatePort @ stub ZwReleaseMutant @ stub ZwReleaseProcessMutant @ stub ZwReleaseSemaphore @ stub ZwRemoveIoCompletion @ stub ZwReplaceKey @ stub ZwReplyPort @ stdcall ZwReplyWaitReceivePort(long long long long) NtReplyWaitReceivePort @ stub ZwReplyWaitReplyPort @ stub ZwRequestPort @ stdcall ZwRequestWaitReplyPort(long long long) NtRequestWaitReplyPort @ stub ZwResetEvent @ stub ZwRestoreKey @ stdcall ZwResumeThread(long long) NtResumeThread @ stub ZwSaveKey @ stub ZwSetContextThread @ stub ZwSetDefaultHardErrorPort @ stub ZwSetDefaultLocale @ stub ZwSetEaFile @ stdcall ZwSetEvent(long long) NtSetEvent @ stub ZwSetHighEventPair @ stub ZwSetHighWaitLowEventPair @ stub ZwSetHighWaitLowThread @ stdcall ZwSetInformationFile(long long long long long) NtSetInformationFile @ stub ZwSetInformationKey @ stub ZwSetInformationObject @ stdcall ZwSetInformationProcess(long long long long) NtSetInformationProcess @ stdcall ZwSetInformationThread(long long long long) NtSetInformationThread @ stub ZwSetInformationToken @ stdcall ZwSetIntervalProfile(long long) NtSetIntervalProfile @ stub ZwSetIoCompletion @ stub ZwSetLdtEntries @ stub ZwSetLowEventPair @ stub ZwSetLowWaitHighEventPair @ stub ZwSetLowWaitHighThread @ stub ZwSetSecurityObject @ stub ZwSetSystemEnvironmentValue @ stub ZwSetSystemInformation @ stub ZwSetSystemPowerState @ stub ZwSetSystemTime @ stdcall ZwSetTimer(long ptr ptr ptr long long ptr) NtSetTimer @ stub ZwSetTimerResolution @ stdcall ZwSetValueKey(long long long long long long) NtSetValueKey @ stdcall ZwSetVolumeInformationFile(long ptr ptr long long) NtSetVolumeInformationFile @ stub ZwShutdownSystem @ stub ZwStartProfile @ stub ZwStopProfile @ stub ZwSuspendThread @ stub ZwSystemDebugControl @ stub ZwTerminateProcess @ stdcall ZwTerminateThread(long long) NtTerminateThread @ stub ZwTestAlert @ stub ZwUnloadDriver @ stub ZwUnloadKey @ stub ZwUnlockFile @ stub ZwUnlockVirtualMemory @ stub ZwUnmapViewOfSection @ stub ZwVdmControl @ stub ZwW32Call @ stub ZwWaitForMultipleObjects @ stub ZwWaitForProcessMutant @ stdcall ZwWaitForSingleObject(long long long) NtWaitForSingleObject @ stub ZwWaitHighEventPair @ stub ZwWaitLowEventPair @ stub ZwWriteFile @ stub ZwWriteRequestData @ stub ZwWriteVirtualMemory @ stub _CIpow @ stub __eCommonExceptions @ stub __eEmulatorInit @ stub __eF2XM1 @ stub __eFABS @ stub __eFADD32 @ stub __eFADD64 @ stub __eFADDPreg @ stub __eFADDreg @ stub __eFADDtop @ stub __eFCHS @ stub __eFCOM @ stub __eFCOM32 @ stub __eFCOM64 @ stub __eFCOMP @ stub __eFCOMP32 @ stub __eFCOMP64 @ stub __eFCOMPP @ stub __eFCOS @ stub __eFDECSTP @ stub __eFDIV32 @ stub __eFDIV64 @ stub __eFDIVPreg @ stub __eFDIVR32 @ stub __eFDIVR64 @ stub __eFDIVRPreg @ stub __eFDIVRreg @ stub __eFDIVRtop @ stub __eFDIVreg @ stub __eFDIVtop @ stub __eFFREE @ stub __eFIADD16 @ stub __eFIADD32 @ stub __eFICOM16 @ stub __eFICOM32 @ stub __eFICOMP16 @ stub __eFICOMP32 @ stub __eFIDIV16 @ stub __eFIDIV32 @ stub __eFIDIVR16 @ stub __eFIDIVR32 @ stub __eFILD16 @ stub __eFILD32 @ stub __eFILD64 @ stub __eFIMUL16 @ stub __eFIMUL32 @ stub __eFINCSTP @ stub __eFINIT @ stub __eFIST16 @ stub __eFIST32 @ stub __eFISTP16 @ stub __eFISTP32 @ stub __eFISTP64 @ stub __eFISUB16 @ stub __eFISUB32 @ stub __eFISUBR16 @ stub __eFISUBR32 @ stub __eFLD1 @ stub __eFLD32 @ stub __eFLD64 @ stub __eFLD80 @ stub __eFLDCW @ stub __eFLDENV @ stub __eFLDL2E @ stub __eFLDLN2 @ stub __eFLDPI @ stub __eFLDZ @ stub __eFMUL32 @ stub __eFMUL64 @ stub __eFMULPreg @ stub __eFMULreg @ stub __eFMULtop @ stub __eFPATAN @ stub __eFPREM @ stub __eFPREM1 @ stub __eFPTAN @ stub __eFRNDINT @ stub __eFRSTOR @ stub __eFSAVE @ stub __eFSCALE @ stub __eFSIN @ stub __eFSQRT @ stub __eFST @ stub __eFST32 @ stub __eFST64 @ stub __eFSTCW @ stub __eFSTENV @ stub __eFSTP @ stub __eFSTP32 @ stub __eFSTP64 @ stub __eFSTP80 @ stub __eFSTSW @ stub __eFSUB32 @ stub __eFSUB64 @ stub __eFSUBPreg @ stub __eFSUBR32 @ stub __eFSUBR64 @ stub __eFSUBRPreg @ stub __eFSUBRreg @ stub __eFSUBRtop @ stub __eFSUBreg @ stub __eFSUBtop @ stub __eFTST @ stub __eFUCOM @ stub __eFUCOMP @ stub __eFUCOMPP @ stub __eFXAM @ stub __eFXCH @ stub __eFXTRACT @ stub __eFYL2X @ stub __eFYL2XP1 @ stub __eGetStatusWord @ register _alloca_probe() NTDLL_alloca_probe @ register _chkstk() NTDLL_chkstk @ stub _fltused @ cdecl _ftol(double) CRTDLL__ftol @ cdecl _itoa(long ptr long) CRTDLL__itoa @ stub _ltoa @ stub _memccpy @ cdecl _memicmp(str str long) CRTDLL__memicmp @ stub _snprintf @ stub _snwprintf @ stub _splitpath @ cdecl _strcmpi(str str) CRTDLL__strcmpi @ cdecl _stricmp(str str) CRTDLL__strcmpi @ cdecl _strlwr(str) CRTDLL__strlwr @ cdecl _strnicmp(str str long) CRTDLL__strnicmp @ cdecl _strupr(str) CRTDLL__strupr @ cdecl _ultoa(long ptr long) CRTDLL__ultoa @ stub _vsnprintf @ cdecl _wcsicmp(wstr wstr) CRTDLL__wcsicmp @ cdecl _wcslwr(wstr) CRTDLL__wcslwr @ cdecl _wcsnicmp(wstr wstr long) CRTDLL__wcsnicmp @ cdecl _wcsupr(wstr) CRTDLL__wcsupr @ stub abs @ stub atan @ cdecl atoi(str) atoi @ cdecl atol(str) atol @ stub ceil @ stub cos @ stub fabs @ stub floor @ cdecl isalpha(long) isalpha @ cdecl isdigit(long) isdigit @ cdecl islower(long) islower @ cdecl isprint(long) isprint @ cdecl isspace(long) isspace @ cdecl isupper(long) isupper @ cdecl iswalpha(long) CRTDLL_iswalpha @ cdecl iswctype(long long) CRTDLL_iswctype @ cdecl isxdigit(long) isxdigit @ stub labs @ stub log @ cdecl mbstowcs(ptr str long) CRTDLL_mbstowcs @ cdecl memchr(ptr long long) memchr @ cdecl memcmp(ptr ptr long) memcmp @ cdecl memcpy(ptr ptr long) memcpy @ cdecl memmove(ptr ptr long) memmove @ cdecl memset(ptr long long) memset @ stub pow @ stub qsort @ stub sin @ varargs sprintf(str str) wsprintfA @ stub sqrt @ varargs sscanf() sscanf @ cdecl strcat(str str) strcat @ cdecl strchr(str long) strchr @ cdecl strcmp(str str) strcmp @ cdecl strcpy(ptr str) strcpy @ cdecl strcspn(str str) strcspn @ cdecl strlen(str) strlen @ cdecl strncat(str str long) strncat @ cdecl strncmp(str str long) strncmp @ cdecl strncpy(ptr str long) strncpy @ cdecl strpbrk(str str long) strpbrk @ cdecl strrchr(str long) strrchr @ cdecl strspn(str str) strspn @ cdecl strstr(str str) strstr @ varargs swprintf(wstr wstr) wsprintfW @ stub tan @ cdecl tolower(long) tolower @ cdecl toupper(long) toupper @ cdecl towlower(long) towlower @ cdecl towupper(long) towupper @ cdecl vsprintf(ptr str ptr) CRTDLL_vsprintf @ cdecl wcscat(wstr wstr) CRTDLL_wcscat @ cdecl wcschr(wstr long) CRTDLL_wcschr @ cdecl wcscmp(wstr wstr) CRTDLL_wcscmp @ cdecl wcscpy(ptr wstr) CRTDLL_wcscpy @ cdecl wcscspn(wstr wstr) CRTDLL_wcscspn @ cdecl wcslen(wstr) CRTDLL_wcslen @ cdecl wcsncat(wstr wstr long) CRTDLL_wcsncat @ cdecl wcsncmp(wstr wstr long) CRTDLL_wcsncmp @ cdecl wcsncpy(ptr wstr long) CRTDLL_wcsncpy @ cdecl wcspbrk(wstr wstr) CRTDLL_wcspbrk @ cdecl wcsrchr(wstr long) CRTDLL_wcsrchr @ cdecl wcsspn(wstr wstr) CRTDLL_wcsspn @ cdecl wcsstr(wstr wstr) CRTDLL_wcsstr @ cdecl wcstok(wstr wstr) CRTDLL_wcstok @ cdecl wcstol(wstr ptr long) CRTDLL_wcstol @ cdecl wcstombs(ptr ptr long) CRTDLL_wcstombs @ stub wcstoul @ stub NtAddAtom @ stub NtDeleteAtom @ stub NtFindAtom @ stub NtQueryFullAttributesFile @ stub NtQueueApcThread @ stub NtReadFileScatter @ stub NtSignalAndWaitForSingleObject @ stub NtWriteFileGather @ stub NtYieldExecution @ stub RtlAddAtomToAtomTable @ stub RtlAllocateHandle @ stub RtlCreateAtomTable @ stub RtlDeleteAtomFromAtomTable @ stub RtlFreeHandle @ stub RtlInitializeHandleTable @ stub RtlIsValidHandle @ stub RtlLookupAtomInAtomTable @ stub RtlQueryAtomInAtomTable @ stdcall RtlTryEnterCriticalSection(ptr) TryEnterCriticalSection @ stub RtlEnumerateProperties @ stub RtlSetPropertyClassId @ stub RtlSetPropertyNames @ stub RtlQueryPropertyNames @ stub RtlFlushPropertySet @ stub RtlSetProperties @ stub RtlQueryProperties @ stub RtlQueryPropertySet @ stub RtlSetUnicodeCallouts @ stub RtlPropertySetNameToGuid @ stub RtlGuidToPropertySetName @ stub RtlClosePropertySet @ stub RtlCreatePropertySet @ stub _wtoi @ stub _wtol @ stub RtlSetPropertySetClassId @ stdcall NtPowerInformation(long long long long long) NtPowerInformation wine-20000526/dlls/ntdll/ntdll_misc.h0100644000175000001440000000065307050634171017025 0ustar julliardusers#ifndef __WINE_NTDLL_MISC_H #define __WINE_NTDLL_MISC_H #include "ntdef.h" #include "winnt.h" /* debug helper */ extern LPCSTR debugstr_as (PANSI_STRING us); extern LPCSTR debugstr_us (PUNICODE_STRING us); extern void dump_ObjectAttributes (POBJECT_ATTRIBUTES ObjectAttributes); extern void dump_AnsiString(PANSI_STRING as, BOOLEAN showstring); extern void dump_UnicodeString(PUNICODE_STRING us, BOOLEAN showstring); #endif wine-20000526/dlls/ntdll/om.c0100644000175000001440000002546207076152246015316 0ustar julliardusers/* * Object management functions */ #include #include #include "debugtools.h" #include "ntddk.h" #include "ntdll_misc.h" DEFAULT_DEBUG_CHANNEL(ntdll) /* move to somewhere */ typedef void * POBJDIR_INFORMATION; /* * Generic object functions */ /****************************************************************************** * NtQueryObject [NTDLL.161] */ NTSTATUS WINAPI NtQueryObject( IN HANDLE ObjectHandle, IN OBJECT_INFORMATION_CLASS ObjectInformationClass, OUT PVOID ObjectInformation, IN ULONG Length, OUT PULONG ResultLength) { FIXME("(0x%08x,0x%08x,%p,0x%08lx,%p): stub\n", ObjectHandle, ObjectInformationClass, ObjectInformation, Length, ResultLength); return 0; } /****************************************************************************** * NtQuerySecurityObject [NTDLL] * * analogue to GetKernelObjectSecurity * * NOTES * only the lowest 4 bit of SecurityObjectInformationClass are used * 0x7-0xf returns STATUS_ACCESS_DENIED (even running with system priviledges) * * FIXME: we are constructing a fake sid * (Administrators:Full, System:Full, Everyone:Read) */ NTSTATUS WINAPI NtQuerySecurityObject( IN HANDLE Object, IN SECURITY_INFORMATION RequestedInformation, OUT PSECURITY_DESCRIPTOR pSecurityDesriptor, IN ULONG Length, OUT PULONG ResultLength) { static SID_IDENTIFIER_AUTHORITY localSidAuthority = {SECURITY_NT_AUTHORITY}; static SID_IDENTIFIER_AUTHORITY worldSidAuthority = {SECURITY_WORLD_SID_AUTHORITY}; BYTE Buffer[256]; PISECURITY_DESCRIPTOR_RELATIVE psd = (PISECURITY_DESCRIPTOR_RELATIVE)Buffer; UINT BufferIndex = sizeof(SECURITY_DESCRIPTOR_RELATIVE); FIXME("(0x%08x,0x%08lx,%p,0x%08lx,%p) stub!\n", Object, RequestedInformation, pSecurityDesriptor, Length, ResultLength); RequestedInformation &= 0x0000000f; if (RequestedInformation & SACL_SECURITY_INFORMATION) return STATUS_ACCESS_DENIED; ZeroMemory(Buffer, 256); RtlCreateSecurityDescriptor((PSECURITY_DESCRIPTOR)psd, SECURITY_DESCRIPTOR_REVISION); psd->Control = SE_SELF_RELATIVE | ((RequestedInformation & DACL_SECURITY_INFORMATION) ? SE_DACL_PRESENT:0); /* owner: administrator S-1-5-20-220*/ if (OWNER_SECURITY_INFORMATION & RequestedInformation) { PSID psid = (PSID)&(Buffer[BufferIndex]); psd->Owner = BufferIndex; BufferIndex += RtlLengthRequiredSid(2); psid->Revision = SID_REVISION; psid->SubAuthorityCount = 2; psid->IdentifierAuthority = localSidAuthority; psid->SubAuthority[0] = SECURITY_BUILTIN_DOMAIN_RID; psid->SubAuthority[1] = DOMAIN_ALIAS_RID_ADMINS; } /* group: built in domain S-1-5-12 */ if (GROUP_SECURITY_INFORMATION & RequestedInformation) { PSID psid = (PSID) &(Buffer[BufferIndex]); psd->Group = BufferIndex; BufferIndex += RtlLengthRequiredSid(1); psid->Revision = SID_REVISION; psid->SubAuthorityCount = 1; psid->IdentifierAuthority = localSidAuthority; psid->SubAuthority[0] = SECURITY_LOCAL_SYSTEM_RID; } /* discretionary ACL */ if (DACL_SECURITY_INFORMATION & RequestedInformation) { /* acl header */ PACL pacl = (PACL)&(Buffer[BufferIndex]); PACCESS_ALLOWED_ACE pace; PSID psid; psd->Dacl = BufferIndex; pacl->AclRevision = MIN_ACL_REVISION; pacl->AceCount = 3; pacl->AclSize = BufferIndex; /* storing the start index temporary */ BufferIndex += sizeof(ACL); /* ACE System - full access */ pace = (PACCESS_ALLOWED_ACE)&(Buffer[BufferIndex]); BufferIndex += sizeof(ACCESS_ALLOWED_ACE)-sizeof(DWORD); pace->Header.AceType = ACCESS_ALLOWED_ACE_TYPE; pace->Header.AceFlags = CONTAINER_INHERIT_ACE; pace->Header.AceSize = sizeof(ACCESS_ALLOWED_ACE)-sizeof(DWORD) + RtlLengthRequiredSid(1); pace->Mask = DELETE | READ_CONTROL | WRITE_DAC | WRITE_OWNER | 0x3f; pace->SidStart = BufferIndex; /* SID S-1-5-12 (System) */ psid = (PSID)&(Buffer[BufferIndex]); BufferIndex += RtlLengthRequiredSid(1); psid->Revision = SID_REVISION; psid->SubAuthorityCount = 1; psid->IdentifierAuthority = localSidAuthority; psid->SubAuthority[0] = SECURITY_LOCAL_SYSTEM_RID; /* ACE Administrators - full access*/ pace = (PACCESS_ALLOWED_ACE) &(Buffer[BufferIndex]); BufferIndex += sizeof(ACCESS_ALLOWED_ACE)-sizeof(DWORD); pace->Header.AceType = ACCESS_ALLOWED_ACE_TYPE; pace->Header.AceFlags = CONTAINER_INHERIT_ACE; pace->Header.AceSize = sizeof(ACCESS_ALLOWED_ACE)-sizeof(DWORD) + RtlLengthRequiredSid(2); pace->Mask = DELETE | READ_CONTROL | WRITE_DAC | WRITE_OWNER | 0x3f; pace->SidStart = BufferIndex; /* S-1-5-12 (Administrators) */ psid = (PSID)&(Buffer[BufferIndex]); BufferIndex += RtlLengthRequiredSid(2); psid->Revision = SID_REVISION; psid->SubAuthorityCount = 2; psid->IdentifierAuthority = localSidAuthority; psid->SubAuthority[0] = SECURITY_BUILTIN_DOMAIN_RID; psid->SubAuthority[1] = DOMAIN_ALIAS_RID_ADMINS; /* ACE Everyone - read access */ pace = (PACCESS_ALLOWED_ACE)&(Buffer[BufferIndex]); BufferIndex += sizeof(ACCESS_ALLOWED_ACE)-sizeof(DWORD); pace->Header.AceType = ACCESS_ALLOWED_ACE_TYPE; pace->Header.AceFlags = CONTAINER_INHERIT_ACE; pace->Header.AceSize = sizeof(ACCESS_ALLOWED_ACE)-sizeof(DWORD) + RtlLengthRequiredSid(1); pace->Mask = READ_CONTROL| 0x19; pace->SidStart = BufferIndex; /* SID S-1-1-0 (Everyone) */ psid = (PSID)&(Buffer[BufferIndex]); BufferIndex += RtlLengthRequiredSid(1); psid->Revision = SID_REVISION; psid->SubAuthorityCount = 1; psid->IdentifierAuthority = worldSidAuthority; psid->SubAuthority[0] = 0; /* calculate used bytes */ pacl->AclSize = BufferIndex - pacl->AclSize; } *ResultLength = BufferIndex; TRACE("len=%lu\n", *ResultLength); if (Length < *ResultLength) return STATUS_BUFFER_TOO_SMALL; memcpy(pSecurityDesriptor, Buffer, *ResultLength); return STATUS_SUCCESS; } /****************************************************************************** * NtDuplicateObject [NTDLL] */ NTSTATUS WINAPI NtDuplicateObject( IN HANDLE SourceProcessHandle, IN PHANDLE SourceHandle, IN HANDLE TargetProcessHandle, OUT PHANDLE TargetHandle, IN ACCESS_MASK DesiredAccess, IN BOOLEAN InheritHandle, ULONG Options) { FIXME("(0x%08x,%p,0x%08x,%p,0x%08lx,0x%08x,0x%08lx) stub!\n", SourceProcessHandle,SourceHandle,TargetProcessHandle,TargetHandle, DesiredAccess,InheritHandle,Options); *TargetHandle = 0; return 0; } /************************************************************************** * NtClose [NTDLL.65] * FUNCTION: Closes a handle reference to an object * ARGUMENTS: * Handle handle to close */ NTSTATUS WINAPI NtClose( HANDLE Handle) { TRACE("(0x%08x)\n",Handle); if (CloseHandle(Handle)) return STATUS_SUCCESS; return STATUS_UNSUCCESSFUL; /*fixme*/ } /****************************************************************************** * NtWaitForSingleObject [NTDLL] */ NTSTATUS WINAPI NtWaitForSingleObject( IN PHANDLE Object, IN BOOLEAN Alertable, IN PLARGE_INTEGER Time) { FIXME("(%p,0x%08x,%p),stub!\n",Object,Alertable,Time); return 0; } /* * Directory functions */ /************************************************************************** * NtOpenDirectoryObject [NTDLL.124] * FUNCTION: Opens a namespace directory object * ARGUMENTS: * DirectoryHandle Variable which receives the directory handle * DesiredAccess Desired access to the directory * ObjectAttributes Structure describing the directory * RETURNS: Status */ NTSTATUS WINAPI NtOpenDirectoryObject( PHANDLE DirectoryHandle, ACCESS_MASK DesiredAccess, POBJECT_ATTRIBUTES ObjectAttributes) { FIXME("(%p,0x%08lx,%p): stub\n", DirectoryHandle, DesiredAccess, ObjectAttributes); dump_ObjectAttributes(ObjectAttributes); return 0; } /****************************************************************************** * NtCreateDirectoryObject [NTDLL] */ NTSTATUS WINAPI NtCreateDirectoryObject( PHANDLE DirectoryHandle, ACCESS_MASK DesiredAccess, POBJECT_ATTRIBUTES ObjectAttributes) { FIXME("(%p,0x%08lx,%p),stub!\n", DirectoryHandle,DesiredAccess,ObjectAttributes); dump_ObjectAttributes(ObjectAttributes); return 0; } /****************************************************************************** * NtQueryDirectoryObject [NTDLL.149] * FUNCTION: Reads information from a namespace directory * ARGUMENTS: * DirObjInformation Buffer to hold the data read * BufferLength Size of the buffer in bytes * GetNextIndex If TRUE then set ObjectIndex to the index of the next object * If FALSE then set ObjectIndex to the number of objects in the directory * IgnoreInputIndex If TRUE start reading at index 0 * If FALSE start reading at the index specified by object index * ObjectIndex Zero based index into the directory, interpretation depends on IgnoreInputIndex and GetNextIndex * DataWritten Caller supplied storage for the number of bytes written (or NULL) */ NTSTATUS WINAPI NtQueryDirectoryObject( IN HANDLE DirObjHandle, OUT POBJDIR_INFORMATION DirObjInformation, IN ULONG BufferLength, IN BOOLEAN GetNextIndex, IN BOOLEAN IgnoreInputIndex, IN OUT PULONG ObjectIndex, OUT PULONG DataWritten OPTIONAL) { FIXME("(0x%08x,%p,0x%08lx,0x%08x,0x%08x,%p,%p) stub\n", DirObjHandle, DirObjInformation, BufferLength, GetNextIndex, IgnoreInputIndex, ObjectIndex, DataWritten); return 0xc0000000; /* We don't have any. Whatever. (Yet.) */ } /* * Link objects */ /****************************************************************************** * NtOpenSymbolicLinkObject [NTDLL] */ NTSTATUS WINAPI NtOpenSymbolicLinkObject( OUT PHANDLE LinkHandle, IN ACCESS_MASK DesiredAccess, IN POBJECT_ATTRIBUTES ObjectAttributes) { FIXME("(%p,0x%08lx,%p) stub\n", LinkHandle, DesiredAccess, ObjectAttributes); dump_ObjectAttributes(ObjectAttributes); return 0; } /****************************************************************************** * NtCreateSymbolicLinkObject [NTDLL] */ NTSTATUS WINAPI NtCreateSymbolicLinkObject( OUT PHANDLE SymbolicLinkHandle, IN ACCESS_MASK DesiredAccess, IN POBJECT_ATTRIBUTES ObjectAttributes, IN PUNICODE_STRING Name) { FIXME("(%p,0x%08lx,%p, %p) stub\n", SymbolicLinkHandle, DesiredAccess, ObjectAttributes, debugstr_us(Name)); dump_ObjectAttributes(ObjectAttributes); return 0; } /****************************************************************************** * NtQuerySymbolicLinkObject [NTDLL] */ NTSTATUS WINAPI NtQuerySymbolicLinkObject( IN HANDLE LinkHandle, IN OUT PUNICODE_STRING LinkTarget, OUT PULONG ReturnedLength OPTIONAL) { FIXME("(0x%08x,%p,%p) stub\n", LinkHandle, debugstr_us(LinkTarget), ReturnedLength); return 0; } /****************************************************************************** * NtAllocateUuids [NTDLL] * * I have seen lpdwCount pointing to a pointer once... */ NTSTATUS WINAPI NtAllocateUuids(LPDWORD lpdwCount, LPDWORD *p2, LPDWORD *p3) { FIXME("(%p[%ld],%p,%p), stub.\n", lpdwCount, lpdwCount ? *lpdwCount : 0, p2, p3); return 0; } wine-20000526/dlls/ntdll/reg.c0100644000175000001440000005222507055751204015451 0ustar julliardusers/* * registry functions * * NOTES: * HKEY_LOCAL_MACHINE \\REGISTRY\\MACHINE * HKEY_USERS \\REGISTRY\\USER * HKEY_CURRENT_CONFIG \\REGISTRY\\MACHINE\\SYSTEM\\CURRENTCONTROLSET\\HARDWARE PROFILES\\CURRENT * HKEY_CLASSES \\REGISTRY\\MACHINE\\SOFTWARE\\CLASSES */ #include "debugtools.h" #include "winreg.h" #include "winerror.h" #include "file.h" #include "server.h" #include "ntddk.h" #include "crtdll.h" #include "ntdll_misc.h" DEFAULT_DEBUG_CHANNEL(ntdll); /* copy a key name into the request buffer */ static inline NTSTATUS copy_nameU( LPWSTR Dest, PUNICODE_STRING Name, UINT Offset ) { if (Name->Buffer) { if ((Name->Length-Offset) > MAX_PATH) return STATUS_BUFFER_OVERFLOW; lstrcpyW( Dest, Name->Buffer+Offset ); } else Dest[0] = 0; return STATUS_SUCCESS; } /* translates predefined paths to HKEY_ constants */ static BOOLEAN _NtKeyToWinKey( IN POBJECT_ATTRIBUTES ObjectAttributes, OUT UINT * Offset, /* offset within ObjectName */ OUT HKEY * KeyHandle) /* translated handle */ { static const WCHAR KeyPath_HKLM[] = { '\\','R','E','G','I','S','T','R','Y', '\\','M','A','C','H','I','N','E',0}; static const WCHAR KeyPath_HKU [] = { '\\','R','E','G','I','S','T','R','Y', '\\','U','S','E','R',0}; static const WCHAR KeyPath_HCC [] = { '\\','R','E','G','I','S','T','R','Y', '\\','M','A','C','H','I','N','E', '\\','S','Y','S','T','E','M', '\\','C','U','R','R','E','N','T','C','O','N','T','R','O','L','S','E','T', '\\','H','A','R','D','W','A','R','E','P','R','O','F','I','L','E','S', '\\','C','U','R','R','E','N','T',0}; static const WCHAR KeyPath_HCR [] = { '\\','R','E','G','I','S','T','R','Y', '\\','M','A','C','H','I','N','E', '\\','S','O','F','T','W','A','R','E', '\\','C','L','A','S','S','E','S',0}; int len; PUNICODE_STRING ObjectName = ObjectAttributes->ObjectName; if(ObjectAttributes->RootDirectory) { len = 0; *KeyHandle = ObjectAttributes->RootDirectory; } else if((ObjectName->Length > (len=lstrlenW(KeyPath_HKLM))) && (0==CRTDLL__wcsnicmp(ObjectName->Buffer,KeyPath_HKLM,len))) { *KeyHandle = HKEY_LOCAL_MACHINE; } else if((ObjectName->Length > (len=lstrlenW(KeyPath_HKU))) && (0==CRTDLL__wcsnicmp(ObjectName->Buffer,KeyPath_HKU,len))) { *KeyHandle = HKEY_USERS; } else if((ObjectName->Length > (len=lstrlenW(KeyPath_HCR))) && (0==CRTDLL__wcsnicmp(ObjectName->Buffer,KeyPath_HCR,len))) { *KeyHandle = HKEY_CLASSES_ROOT; } else if((ObjectName->Length > (len=lstrlenW(KeyPath_HCC))) && (0==CRTDLL__wcsnicmp(ObjectName->Buffer,KeyPath_HCC,len))) { *KeyHandle = HKEY_CURRENT_CONFIG; } else { *KeyHandle = 0; *Offset = 0; return FALSE; } if (len > 0 && ObjectName->Buffer[len] == (WCHAR)'\\') len++; *Offset = len; TRACE("off=%u hkey=0x%08x\n", *Offset, *KeyHandle); return TRUE; } /****************************************************************************** * NtCreateKey [NTDLL] * ZwCreateKey */ NTSTATUS WINAPI NtCreateKey( PHANDLE KeyHandle, ACCESS_MASK DesiredAccess, POBJECT_ATTRIBUTES ObjectAttributes, ULONG TitleIndex, PUNICODE_STRING Class, ULONG CreateOptions, PULONG Disposition) { struct create_key_request *req = get_req_buffer(); UINT ObjectNameOffset; HKEY RootDirectory; NTSTATUS ret; TRACE("(%p,0x%08lx,0x%08lx,%p(%s),0x%08lx,%p)\n", KeyHandle, DesiredAccess, TitleIndex, Class, debugstr_us(Class), CreateOptions, Disposition); dump_ObjectAttributes(ObjectAttributes); if (!KeyHandle) return STATUS_INVALID_PARAMETER; _NtKeyToWinKey(ObjectAttributes, &ObjectNameOffset, &RootDirectory); req->parent = RootDirectory; req->access = DesiredAccess; req->options = CreateOptions; req->modif = time(NULL); if (copy_nameU( req->name, ObjectAttributes->ObjectName, ObjectNameOffset ) != STATUS_SUCCESS) return STATUS_INVALID_PARAMETER; if (Class) { int ClassLen = Class->Length+1; if ( ClassLen*sizeof(WCHAR) > server_remaining(req->class)) return STATUS_BUFFER_OVERFLOW; lstrcpynW( req->class, Class->Buffer, ClassLen); } else req->class[0] = 0x0000; if (!(ret = server_call_noerr(REQ_CREATE_KEY))) { *KeyHandle = req->hkey; if (Disposition) *Disposition = req->created ? REG_CREATED_NEW_KEY : REG_OPENED_EXISTING_KEY; } return ret; } /****************************************************************************** * NtOpenKey [NTDLL.129] * ZwOpenKey * OUT PHANDLE KeyHandle (returns 0 when failure) * IN ACCESS_MASK DesiredAccess * IN POBJECT_ATTRIBUTES ObjectAttributes */ NTSTATUS WINAPI NtOpenKey( PHANDLE KeyHandle, ACCESS_MASK DesiredAccess, POBJECT_ATTRIBUTES ObjectAttributes) { struct open_key_request *req = get_req_buffer(); UINT ObjectNameOffset; HKEY RootDirectory; NTSTATUS ret; TRACE("(%p,0x%08lx)\n", KeyHandle, DesiredAccess); dump_ObjectAttributes(ObjectAttributes); if (!KeyHandle) return STATUS_INVALID_PARAMETER; *KeyHandle = 0; _NtKeyToWinKey(ObjectAttributes, &ObjectNameOffset, &RootDirectory); req->parent = RootDirectory; req->access = DesiredAccess; if (copy_nameU( req->name, ObjectAttributes->ObjectName, ObjectNameOffset ) != STATUS_SUCCESS) return STATUS_INVALID_PARAMETER; if (!(ret = server_call_noerr(REQ_OPEN_KEY))) { *KeyHandle = req->hkey; } return ret; } /****************************************************************************** * NtDeleteKey [NTDLL] * ZwDeleteKey */ NTSTATUS WINAPI NtDeleteKey(HANDLE KeyHandle) { FIXME("(0x%08x) stub!\n", KeyHandle); return STATUS_SUCCESS; } /****************************************************************************** * NtDeleteValueKey [NTDLL] * ZwDeleteValueKey */ NTSTATUS WINAPI NtDeleteValueKey( IN HANDLE KeyHandle, IN PUNICODE_STRING ValueName) { FIXME("(0x%08x,%p(%s)) stub!\n", KeyHandle, ValueName,debugstr_us(ValueName)); return STATUS_SUCCESS; } /****************************************************************************** * NtEnumerateKey [NTDLL] * ZwEnumerateKey * * NOTES * the name copied into the buffer is NOT 0-terminated */ NTSTATUS WINAPI NtEnumerateKey( HANDLE KeyHandle, ULONG Index, KEY_INFORMATION_CLASS KeyInformationClass, PVOID KeyInformation, ULONG Length, PULONG ResultLength) { struct enum_key_request *req = get_req_buffer(); NTSTATUS ret; TRACE("(0x%08x,0x%08lx,0x%08x,%p,0x%08lx,%p)\n", KeyHandle, Index, KeyInformationClass, KeyInformation, Length, ResultLength); req->hkey = KeyHandle; req->index = Index; if ((ret = server_call_noerr(REQ_ENUM_KEY)) != STATUS_SUCCESS) return ret; switch (KeyInformationClass) { case KeyBasicInformation: { PKEY_BASIC_INFORMATION kbi = KeyInformation; UINT NameLength = lstrlenW(req->name) * sizeof(WCHAR); *ResultLength = sizeof(KEY_BASIC_INFORMATION) - sizeof(WCHAR) + NameLength; if (Length < *ResultLength) return STATUS_BUFFER_OVERFLOW; DOSFS_UnixTimeToFileTime(req->modif, &kbi->LastWriteTime, 0); kbi->TitleIndex = 0; kbi->NameLength = NameLength; memcpy (kbi->Name, req->name, NameLength); } break; case KeyFullInformation: { PKEY_FULL_INFORMATION kfi = KeyInformation; kfi->ClassLength = lstrlenW(req->class) * sizeof(WCHAR); kfi->ClassOffset = (kfi->ClassLength) ? sizeof(KEY_FULL_INFORMATION) - sizeof(WCHAR) : 0xffffffff; *ResultLength = sizeof(KEY_FULL_INFORMATION) - sizeof(WCHAR) + kfi->ClassLength; if (Length < *ResultLength) return STATUS_BUFFER_OVERFLOW; DOSFS_UnixTimeToFileTime(req->modif, &kfi->LastWriteTime, 0); kfi->TitleIndex = 0; /* kfi->SubKeys = req->subkeys; kfi->MaxNameLength = req->max_subkey; kfi->MaxClassLength = req->max_class; kfi->Values = req->values; kfi->MaxValueNameLen = req->max_value; kfi->MaxValueDataLen = req->max_data; */ FIXME("incomplete\n"); if (kfi->ClassLength) memcpy (kfi->Class, req->class, kfi->ClassLength); } break; case KeyNodeInformation: { PKEY_NODE_INFORMATION kni = KeyInformation; kni->ClassLength = lstrlenW(req->class) * sizeof(WCHAR); kni->NameLength = lstrlenW(req->name) * sizeof(WCHAR); kni->ClassOffset = (kni->ClassLength) ? sizeof(KEY_NODE_INFORMATION) - sizeof(WCHAR) + kni->NameLength : 0xffffffff; *ResultLength = sizeof(KEY_NODE_INFORMATION) - sizeof(WCHAR) + kni->NameLength + kni->ClassLength; if (Length < *ResultLength) return STATUS_BUFFER_OVERFLOW; DOSFS_UnixTimeToFileTime(req->modif, &kni->LastWriteTime, 0); kni->TitleIndex = 0; memcpy (kni->Name, req->name, kni->NameLength); if (kni->ClassLength) memcpy ((char *) KeyInformation + kni->ClassOffset, req->class, kni->ClassLength); } break; default: FIXME("KeyInformationClass not implemented\n"); return STATUS_UNSUCCESSFUL; } TRACE("buf=%lu len=%lu\n", Length, *ResultLength); return ret; } /****************************************************************************** * NtQueryKey [NTDLL] * ZwQueryKey */ NTSTATUS WINAPI NtQueryKey( HANDLE KeyHandle, KEY_INFORMATION_CLASS KeyInformationClass, PVOID KeyInformation, ULONG Length, PULONG ResultLength) { struct query_key_info_request *req = get_req_buffer(); NTSTATUS ret; TRACE("(0x%08x,0x%08x,%p,0x%08lx,%p) stub\n", KeyHandle, KeyInformationClass, KeyInformation, Length, ResultLength); req->hkey = KeyHandle; if ((ret = server_call_noerr(REQ_QUERY_KEY_INFO)) != STATUS_SUCCESS) return ret; switch (KeyInformationClass) { case KeyBasicInformation: { PKEY_BASIC_INFORMATION kbi = KeyInformation; UINT NameLength = lstrlenW(req->name) * sizeof(WCHAR); *ResultLength = sizeof(KEY_BASIC_INFORMATION) - sizeof(WCHAR) + NameLength; if (Length < *ResultLength) return STATUS_BUFFER_OVERFLOW; DOSFS_UnixTimeToFileTime(req->modif, &kbi->LastWriteTime, 0); kbi->TitleIndex = 0; kbi->NameLength = NameLength; memcpy (kbi->Name, req->name, NameLength); } break; case KeyFullInformation: { PKEY_FULL_INFORMATION kfi = KeyInformation; kfi->ClassLength = lstrlenW(req->class) * sizeof(WCHAR); kfi->ClassOffset = (kfi->ClassLength) ? sizeof(KEY_FULL_INFORMATION) - sizeof(WCHAR) : 0xffffffff; *ResultLength = sizeof(KEY_FULL_INFORMATION) - sizeof(WCHAR) + kfi->ClassLength; if (Length < *ResultLength) return STATUS_BUFFER_OVERFLOW; DOSFS_UnixTimeToFileTime(req->modif, &kfi->LastWriteTime, 0); kfi->TitleIndex = 0; kfi->SubKeys = req->subkeys; kfi->MaxNameLen = req->max_subkey; kfi->MaxClassLen = req->max_class; kfi->Values = req->values; kfi->MaxValueNameLen = req->max_value; kfi->MaxValueDataLen = req->max_data; if(kfi->ClassLength) memcpy ((char *) KeyInformation + kfi->ClassOffset, req->class, kfi->ClassLength); } break; case KeyNodeInformation: { PKEY_NODE_INFORMATION kni = KeyInformation; kni->ClassLength = lstrlenW(req->class) * sizeof(WCHAR); kni->NameLength = lstrlenW(req->name) * sizeof(WCHAR); kni->ClassOffset = (kni->ClassLength) ? sizeof(KEY_NODE_INFORMATION) - sizeof(WCHAR) + kni->NameLength : 0xffffffff; *ResultLength = sizeof(KEY_NODE_INFORMATION) - sizeof(WCHAR) + kni->NameLength + kni->ClassLength; if (Length < *ResultLength) return STATUS_BUFFER_OVERFLOW; DOSFS_UnixTimeToFileTime(req->modif, &kni->LastWriteTime, 0); kni->TitleIndex = 0; memcpy (kni->Name, req->name, kni->NameLength); if(kni->ClassLength) memcpy ((char *) KeyInformation + kni->ClassOffset, req->class, kni->ClassLength); } break; default: FIXME("KeyInformationClass not implemented\n"); return STATUS_UNSUCCESSFUL; } return ret; } /****************************************************************************** * NtEnumerateValueKey [NTDLL] * ZwEnumerateValueKey */ NTSTATUS WINAPI NtEnumerateValueKey( HANDLE KeyHandle, ULONG Index, KEY_VALUE_INFORMATION_CLASS KeyInformationClass, PVOID KeyInformation, ULONG Length, PULONG ResultLength) { struct enum_key_value_request *req = get_req_buffer(); UINT NameLength; NTSTATUS ret; TRACE("(0x%08x,0x%08lx,0x%08x,%p,0x%08lx,%p)\n", KeyHandle, Index, KeyInformationClass, KeyInformation, Length, ResultLength); req->hkey = KeyHandle; req->index = Index; if ((ret = server_call_noerr(REQ_ENUM_KEY_VALUE)) != STATUS_SUCCESS) return ret; switch (KeyInformationClass) { case KeyBasicInformation: { PKEY_VALUE_BASIC_INFORMATION kbi = KeyInformation; NameLength = lstrlenW(req->name) * sizeof(WCHAR); *ResultLength = sizeof(KEY_VALUE_BASIC_INFORMATION) - sizeof(WCHAR) + NameLength; if (*ResultLength > Length) return STATUS_BUFFER_TOO_SMALL; kbi->TitleIndex = 0; kbi->Type = req->type; kbi->NameLength = NameLength; memcpy(kbi->Name, req->name, kbi->NameLength); } break; case KeyValueFullInformation: { PKEY_VALUE_FULL_INFORMATION kbi = KeyInformation; UINT DataOffset; NameLength = lstrlenW(req->name) * sizeof(WCHAR); DataOffset = sizeof(KEY_VALUE_FULL_INFORMATION) - sizeof(WCHAR) + NameLength; *ResultLength = DataOffset + req->len; if (*ResultLength > Length) return STATUS_BUFFER_TOO_SMALL; kbi->TitleIndex = 0; kbi->Type = req->type; kbi->DataOffset = DataOffset; kbi->DataLength = req->len; kbi->NameLength = NameLength; memcpy(kbi->Name, req->name, kbi->NameLength); memcpy(((LPBYTE)kbi) + DataOffset, req->data, req->len); } break; case KeyValuePartialInformation: { PKEY_VALUE_PARTIAL_INFORMATION kbi = KeyInformation; *ResultLength = sizeof(KEY_VALUE_PARTIAL_INFORMATION) - sizeof(WCHAR) + req->len; if (*ResultLength > Length) return STATUS_BUFFER_TOO_SMALL; kbi->TitleIndex = 0; kbi->Type = req->type; kbi->DataLength = req->len; memcpy(kbi->Data, req->data, req->len); } break; default: FIXME("not implemented\n"); } return STATUS_SUCCESS; } /****************************************************************************** * NtFlushKey [NTDLL] * ZwFlushKey */ NTSTATUS WINAPI NtFlushKey(HANDLE KeyHandle) { FIXME("(0x%08x) stub!\n", KeyHandle); return 1; } /****************************************************************************** * NtLoadKey [NTDLL] * ZwLoadKey */ NTSTATUS WINAPI NtLoadKey( PHANDLE KeyHandle, POBJECT_ATTRIBUTES ObjectAttributes) { FIXME("(%p),stub!\n", KeyHandle); dump_ObjectAttributes(ObjectAttributes); return STATUS_SUCCESS; } /****************************************************************************** * NtNotifyChangeKey [NTDLL] * ZwNotifyChangeKey */ NTSTATUS WINAPI NtNotifyChangeKey( IN HANDLE KeyHandle, IN HANDLE Event, IN PIO_APC_ROUTINE ApcRoutine OPTIONAL, IN PVOID ApcContext OPTIONAL, OUT PIO_STATUS_BLOCK IoStatusBlock, IN ULONG CompletionFilter, IN BOOLEAN Asynchroneous, OUT PVOID ChangeBuffer, IN ULONG Length, IN BOOLEAN WatchSubtree) { FIXME("(0x%08x,0x%08x,%p,%p,%p,0x%08lx, 0x%08x,%p,0x%08lx,0x%08x) stub!\n", KeyHandle, Event, ApcRoutine, ApcContext, IoStatusBlock, CompletionFilter, Asynchroneous, ChangeBuffer, Length, WatchSubtree); return STATUS_SUCCESS; } /****************************************************************************** * NtQueryMultipleValueKey [NTDLL] * ZwQueryMultipleValueKey */ NTSTATUS WINAPI NtQueryMultipleValueKey( HANDLE KeyHandle, PVALENTW ListOfValuesToQuery, ULONG NumberOfItems, PVOID MultipleValueInformation, ULONG Length, PULONG ReturnLength) { FIXME("(0x%08x,%p,0x%08lx,%p,0x%08lx,%p) stub!\n", KeyHandle, ListOfValuesToQuery, NumberOfItems, MultipleValueInformation, Length,ReturnLength); return STATUS_SUCCESS; } /****************************************************************************** * NtQueryValueKey [NTDLL] * ZwQueryValueKey * * NOTES * the name in the KeyValueInformation is never set */ NTSTATUS WINAPI NtQueryValueKey( IN HANDLE KeyHandle, IN PUNICODE_STRING ValueName, IN KEY_VALUE_INFORMATION_CLASS KeyValueInformationClass, OUT PVOID KeyValueInformation, IN ULONG Length, OUT PULONG ResultLength) { struct get_key_value_request *req = get_req_buffer(); NTSTATUS ret; TRACE("(0x%08x,%s,0x%08x,%p,0x%08lx,%p)\n", KeyHandle, debugstr_us(ValueName), KeyValueInformationClass, KeyValueInformation, Length, ResultLength); req->hkey = KeyHandle; if (copy_nameU(req->name, ValueName, 0) != STATUS_SUCCESS) return STATUS_BUFFER_OVERFLOW; if ((ret = server_call_noerr(REQ_GET_KEY_VALUE)) != STATUS_SUCCESS) return ret; switch(KeyValueInformationClass) { case KeyValueBasicInformation: { PKEY_VALUE_BASIC_INFORMATION kbi = (PKEY_VALUE_BASIC_INFORMATION) KeyValueInformation; kbi->Type = req->type; *ResultLength = sizeof(KEY_VALUE_BASIC_INFORMATION)-sizeof(WCHAR); if (Length <= *ResultLength) return STATUS_BUFFER_OVERFLOW; kbi->NameLength = 0; } break; case KeyValueFullInformation: { PKEY_VALUE_FULL_INFORMATION kfi = (PKEY_VALUE_FULL_INFORMATION) KeyValueInformation; ULONG DataOffset; kfi->Type = req->type; DataOffset = sizeof(KEY_VALUE_FULL_INFORMATION)-sizeof(WCHAR); *ResultLength = DataOffset + req->len; if (Length <= *ResultLength) return STATUS_BUFFER_OVERFLOW; kfi->NameLength = 0; kfi->DataOffset = DataOffset; kfi->DataLength = req->len; memcpy((char *) KeyValueInformation + DataOffset, req->data, req->len); } break; case KeyValuePartialInformation: { PKEY_VALUE_PARTIAL_INFORMATION kpi = (PKEY_VALUE_PARTIAL_INFORMATION) KeyValueInformation; kpi->Type = req->type; *ResultLength = sizeof(KEY_VALUE_FULL_INFORMATION)-sizeof(UCHAR)+req->len; if (Length <= *ResultLength) return STATUS_BUFFER_OVERFLOW; kpi->DataLength = req->len; memcpy(kpi->Data, req->data, req->len); } break; default: FIXME("KeyValueInformationClass not implemented\n"); return STATUS_UNSUCCESSFUL; } return ret; } /****************************************************************************** * NtReplaceKey [NTDLL] * ZwReplaceKey */ NTSTATUS WINAPI NtReplaceKey( IN POBJECT_ATTRIBUTES ObjectAttributes, IN HANDLE Key, IN POBJECT_ATTRIBUTES ReplacedObjectAttributes) { FIXME("(0x%08x),stub!\n", Key); dump_ObjectAttributes(ObjectAttributes); dump_ObjectAttributes(ReplacedObjectAttributes); return STATUS_SUCCESS; } /****************************************************************************** * NtRestoreKey [NTDLL] * ZwRestoreKey */ NTSTATUS WINAPI NtRestoreKey( HANDLE KeyHandle, HANDLE FileHandle, ULONG RestoreFlags) { FIXME("(0x%08x,0x%08x,0x%08lx) stub\n", KeyHandle, FileHandle, RestoreFlags); return STATUS_SUCCESS; } /****************************************************************************** * NtSaveKey [NTDLL] * ZwSaveKey */ NTSTATUS WINAPI NtSaveKey( IN HANDLE KeyHandle, IN HANDLE FileHandle) { FIXME("(0x%08x,0x%08x) stub\n", KeyHandle, FileHandle); return STATUS_SUCCESS; } /****************************************************************************** * NtSetInformationKey [NTDLL] * ZwSetInformationKey */ NTSTATUS WINAPI NtSetInformationKey( IN HANDLE KeyHandle, IN const int KeyInformationClass, IN PVOID KeyInformation, IN ULONG KeyInformationLength) { FIXME("(0x%08x,0x%08x,%p,0x%08lx) stub\n", KeyHandle, KeyInformationClass, KeyInformation, KeyInformationLength); return STATUS_SUCCESS; } /****************************************************************************** * NtSetValueKey [NTDLL] * ZwSetValueKey */ NTSTATUS WINAPI NtSetValueKey( HANDLE KeyHandle, PUNICODE_STRING ValueName, ULONG TitleIndex, ULONG Type, PVOID Data, ULONG DataSize) { FIXME("(0x%08x,%p(%s), 0x%08lx, 0x%08lx, %p, 0x%08lx) stub!\n", KeyHandle, ValueName,debugstr_us(ValueName), TitleIndex, Type, Data, DataSize); return STATUS_SUCCESS; } /****************************************************************************** * NtUnloadKey [NTDLL] * ZwUnloadKey */ NTSTATUS WINAPI NtUnloadKey( IN HANDLE KeyHandle) { FIXME("(0x%08x) stub\n", KeyHandle); return STATUS_SUCCESS; } /****************************************************************************** * RtlFormatCurrentUserKeyPath [NTDLL.371] */ NTSTATUS WINAPI RtlFormatCurrentUserKeyPath( IN OUT PUNICODE_STRING KeyPath) { /* LPSTR Path = "\\REGISTRY\\USER\\S-1-5-21-0000000000-000000000-0000000000-500";*/ LPSTR Path = "\\REGISTRY\\USER\\.DEFAULT"; ANSI_STRING AnsiPath; FIXME("(%p) stub\n",KeyPath); RtlInitAnsiString(&AnsiPath, Path); return RtlAnsiStringToUnicodeString(KeyPath, &AnsiPath, TRUE); } /****************************************************************************** * RtlOpenCurrentUser [NTDLL] * * if we return just HKEY_CURRENT_USER the advapi try's to find a remote * registry (odd handle) and fails * */ DWORD WINAPI RtlOpenCurrentUser( IN ACCESS_MASK DesiredAccess, OUT PHANDLE KeyHandle) /* handle of HKEY_CURRENT_USER */ { OBJECT_ATTRIBUTES ObjectAttributes; UNICODE_STRING ObjectName; NTSTATUS ret; TRACE("(0x%08lx, %p) stub\n",DesiredAccess, KeyHandle); RtlFormatCurrentUserKeyPath(&ObjectName); InitializeObjectAttributes(&ObjectAttributes,&ObjectName,OBJ_CASE_INSENSITIVE,0, NULL); ret = NtOpenKey(KeyHandle, DesiredAccess, &ObjectAttributes); RtlFreeUnicodeString(&ObjectName); return ret; } wine-20000526/dlls/ntdll/rtl.c0100644000175000001440000003510607066752015015477 0ustar julliardusers/* * NT basis DLL * * This file contains the Rtl* API functions. These should be implementable. * * Copyright 1996-1998 Marcus Meissner * 1999 Alex Korobka */ #include #include #include "heap.h" #include "debugtools.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "winerror.h" #include "stackframe.h" #include "ntddk.h" #include "winreg.h" DEFAULT_DEBUG_CHANNEL(ntdll) /* * resource functions */ /*********************************************************************** * RtlInitializeResource (NTDLL.409) * * xxxResource() functions implement multiple-reader-single-writer lock. * The code is based on information published in WDJ January 1999 issue. */ void WINAPI RtlInitializeResource(LPRTL_RWLOCK rwl) { if( rwl ) { rwl->iNumberActive = 0; rwl->uExclusiveWaiters = 0; rwl->uSharedWaiters = 0; rwl->hOwningThreadId = 0; rwl->dwTimeoutBoost = 0; /* no info on this one, default value is 0 */ InitializeCriticalSection( &rwl->rtlCS ); rwl->hExclusiveReleaseSemaphore = CreateSemaphoreA( NULL, 0, 65535, NULL ); rwl->hSharedReleaseSemaphore = CreateSemaphoreA( NULL, 0, 65535, NULL ); } } /*********************************************************************** * RtlDeleteResource (NTDLL.330) */ void WINAPI RtlDeleteResource(LPRTL_RWLOCK rwl) { if( rwl ) { EnterCriticalSection( &rwl->rtlCS ); if( rwl->iNumberActive || rwl->uExclusiveWaiters || rwl->uSharedWaiters ) MESSAGE("Deleting active MRSW lock (%p), expect failure\n", rwl ); rwl->hOwningThreadId = 0; rwl->uExclusiveWaiters = rwl->uSharedWaiters = 0; rwl->iNumberActive = 0; CloseHandle( rwl->hExclusiveReleaseSemaphore ); CloseHandle( rwl->hSharedReleaseSemaphore ); LeaveCriticalSection( &rwl->rtlCS ); DeleteCriticalSection( &rwl->rtlCS ); } } /*********************************************************************** * RtlAcquireResourceExclusive (NTDLL.256) */ BYTE WINAPI RtlAcquireResourceExclusive(LPRTL_RWLOCK rwl, BYTE fWait) { BYTE retVal = 0; if( !rwl ) return 0; start: EnterCriticalSection( &rwl->rtlCS ); if( rwl->iNumberActive == 0 ) /* lock is free */ { rwl->iNumberActive = -1; retVal = 1; } else if( rwl->iNumberActive < 0 ) /* exclusive lock in progress */ { if( rwl->hOwningThreadId == GetCurrentThreadId() ) { retVal = 1; rwl->iNumberActive--; goto done; } wait: if( fWait ) { rwl->uExclusiveWaiters++; LeaveCriticalSection( &rwl->rtlCS ); if( WaitForSingleObject( rwl->hExclusiveReleaseSemaphore, INFINITE ) == WAIT_FAILED ) goto done; goto start; /* restart the acquisition to avoid deadlocks */ } } else /* one or more shared locks are in progress */ if( fWait ) goto wait; if( retVal == 1 ) rwl->hOwningThreadId = GetCurrentThreadId(); done: LeaveCriticalSection( &rwl->rtlCS ); return retVal; } /*********************************************************************** * RtlAcquireResourceShared (NTDLL.257) */ BYTE WINAPI RtlAcquireResourceShared(LPRTL_RWLOCK rwl, BYTE fWait) { DWORD dwWait = WAIT_FAILED; BYTE retVal = 0; if( !rwl ) return 0; start: EnterCriticalSection( &rwl->rtlCS ); if( rwl->iNumberActive < 0 ) { if( rwl->hOwningThreadId == GetCurrentThreadId() ) { rwl->iNumberActive--; retVal = 1; goto done; } if( fWait ) { rwl->uSharedWaiters++; LeaveCriticalSection( &rwl->rtlCS ); if( (dwWait = WaitForSingleObject( rwl->hSharedReleaseSemaphore, INFINITE )) == WAIT_FAILED ) goto done; goto start; } } else { if( dwWait != WAIT_OBJECT_0 ) /* otherwise RtlReleaseResource() has already done it */ rwl->iNumberActive++; retVal = 1; } done: LeaveCriticalSection( &rwl->rtlCS ); return retVal; } /*********************************************************************** * RtlReleaseResource (NTDLL.471) */ void WINAPI RtlReleaseResource(LPRTL_RWLOCK rwl) { EnterCriticalSection( &rwl->rtlCS ); if( rwl->iNumberActive > 0 ) /* have one or more readers */ { if( --rwl->iNumberActive == 0 ) { if( rwl->uExclusiveWaiters ) { wake_exclusive: rwl->uExclusiveWaiters--; ReleaseSemaphore( rwl->hExclusiveReleaseSemaphore, 1, NULL ); } } } else if( rwl->iNumberActive < 0 ) /* have a writer, possibly recursive */ { if( ++rwl->iNumberActive == 0 ) { rwl->hOwningThreadId = 0; if( rwl->uExclusiveWaiters ) goto wake_exclusive; else if( rwl->uSharedWaiters ) { UINT n = rwl->uSharedWaiters; rwl->iNumberActive = rwl->uSharedWaiters; /* prevent new writers from joining until * all queued readers have done their thing */ rwl->uSharedWaiters = 0; ReleaseSemaphore( rwl->hSharedReleaseSemaphore, n, NULL ); } } } LeaveCriticalSection( &rwl->rtlCS ); } /*********************************************************************** * RtlDumpResource (NTDLL.340) */ void WINAPI RtlDumpResource(LPRTL_RWLOCK rwl) { if( rwl ) { MESSAGE("RtlDumpResource(%p):\n\tactive count = %i\n\twaiting readers = %i\n\twaiting writers = %i\n", rwl, rwl->iNumberActive, rwl->uSharedWaiters, rwl->uExclusiveWaiters ); if( rwl->iNumberActive ) MESSAGE("\towner thread = %08x\n", rwl->hOwningThreadId ); } } /* * heap functions */ /****************************************************************************** * RtlCreateHeap [NTDLL] */ HANDLE WINAPI RtlCreateHeap( ULONG Flags, PVOID BaseAddress, ULONG SizeToReserve, ULONG SizeToCommit, PVOID Unknown, PRTL_HEAP_DEFINITION Definition) { FIXME("(0x%08lx, %p, 0x%08lx, 0x%08lx, %p, %p) semi-stub\n", Flags, BaseAddress, SizeToReserve, SizeToCommit, Unknown, Definition); return HeapCreate ( Flags, SizeToCommit, SizeToReserve); } /****************************************************************************** * RtlAllocateHeap [NTDLL] */ PVOID WINAPI RtlAllocateHeap( HANDLE Heap, ULONG Flags, ULONG Size) { TRACE("(0x%08x, 0x%08lx, 0x%08lx) semi stub\n", Heap, Flags, Size); return HeapAlloc(Heap, Flags, Size); } /****************************************************************************** * RtlFreeHeap [NTDLL] */ BOOLEAN WINAPI RtlFreeHeap( HANDLE Heap, ULONG Flags, PVOID Address) { TRACE("(0x%08x, 0x%08lx, %p) semi stub\n", Heap, Flags, Address); return HeapFree(Heap, Flags, Address); } /****************************************************************************** * RtlDestroyHeap [NTDLL] * * FIXME: prototype guessed */ BOOLEAN WINAPI RtlDestroyHeap( HANDLE Heap) { TRACE("(0x%08x) semi stub\n", Heap); return HeapDestroy(Heap); } /* * misc functions */ /****************************************************************************** * DbgPrint [NTDLL] */ void WINAPIV DbgPrint(LPCSTR fmt, ...) { char buf[512]; va_list args; va_start(args, fmt); wvsprintfA(buf,fmt, args); va_end(args); MESSAGE("DbgPrint says: %s",buf); /* hmm, raise exception? */ } /****************************************************************************** * RtlAcquirePebLock [NTDLL] */ VOID WINAPI RtlAcquirePebLock(void) { FIXME("()\n"); /* enter critical section ? */ } /****************************************************************************** * RtlReleasePebLock [NTDLL] */ VOID WINAPI RtlReleasePebLock(void) { FIXME("()\n"); /* leave critical section ? */ } /****************************************************************************** * RtlIntegerToChar [NTDLL] */ DWORD WINAPI RtlIntegerToChar(DWORD x1,DWORD x2,DWORD x3,DWORD x4) { FIXME("(0x%08lx,0x%08lx,0x%08lx,0x%08lx),stub!\n",x1,x2,x3,x4); return 0; } /****************************************************************************** * RtlSetEnvironmentVariable [NTDLL] */ DWORD WINAPI RtlSetEnvironmentVariable(DWORD x1,PUNICODE_STRING key,PUNICODE_STRING val) { FIXME("(0x%08lx,%s,%s),stub!\n",x1,debugstr_w(key->Buffer),debugstr_w(val->Buffer)); return 0; } /****************************************************************************** * RtlNewSecurityObject [NTDLL] */ DWORD WINAPI RtlNewSecurityObject(DWORD x1,DWORD x2,DWORD x3,DWORD x4,DWORD x5,DWORD x6) { FIXME("(0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx),stub!\n",x1,x2,x3,x4,x5,x6); return 0; } /****************************************************************************** * RtlDeleteSecurityObject [NTDLL] */ DWORD WINAPI RtlDeleteSecurityObject(DWORD x1) { FIXME("(0x%08lx),stub!\n",x1); return 0; } /************************************************************************** * RtlNormalizeProcessParams [NTDLL.441] */ LPVOID WINAPI RtlNormalizeProcessParams(LPVOID x) { FIXME("(%p), stub\n",x); return x; } /************************************************************************** * RtlGetNtProductType [NTDLL.390] */ BOOLEAN WINAPI RtlGetNtProductType(LPDWORD type) { FIXME("(%p): stub\n", type); *type=3; /* dunno. 1 for client, 3 for server? */ return 1; } /************************************************************************** * NTDLL_chkstk [NTDLL.862] * NTDLL_alloca_probe [NTDLL.861] * Glorified "enter xxxx". */ void WINAPI NTDLL_chkstk( CONTEXT86 *context ) { ESP_reg(context) -= EAX_reg(context); } void WINAPI NTDLL_alloca_probe( CONTEXT86 *context ) { ESP_reg(context) -= EAX_reg(context); } /****************************************************************************** * RtlExtendedLargeIntegerDivide [NTDLL.359] */ INT WINAPI RtlExtendedLargeIntegerDivide( LARGE_INTEGER dividend, DWORD divisor, LPDWORD rest ) { #if SIZEOF_LONG_LONG==8 long long x1 = *(long long*)÷nd; if (*rest) *rest = x1 % divisor; return x1/divisor; #else FIXME("((%ld<<32)+%ld,%ld,%p), implement this using normal integer arithmetic!\n", dividend.s.HighPart,dividend.s.LowPart,divisor,rest); return 0; #endif } /****************************************************************************** * RtlExtendedIntegerMultiply [NTDLL.359] * Note: This even works, since gcc returns 64bit values in eax/edx just like * the caller expects. However... The relay code won't grok this I think. */ LARGE_INTEGER WINAPI RtlExtendedIntegerMultiply( LARGE_INTEGER factor1, INT factor2) { #if SIZEOF_LONG_LONG==8 long long result = (*(long long*)&factor1) * factor2; return (*(LARGE_INTEGER*)&result); #else LARGE_INTEGER result; result.s.HighPart = 0; result.s.LowPart = 0; FIXME("((%ld<<32)+%ld,%d), implement this using normal integer arithmetic!\n", factor1.s.HighPart,factor1.s.LowPart,factor2); return result; #endif } /************************************************************************** * RtlDosPathNameToNtPathName_U [NTDLL.338] * * FIXME: convert to UNC or whatever is expected here */ BOOLEAN WINAPI RtlDosPathNameToNtPathName_U( LPWSTR from,PUNICODE_STRING us,DWORD x2,DWORD x3) { LPSTR fromA = HEAP_strdupWtoA(GetProcessHeap(),0,from); FIXME("(%s,%p,%08lx,%08lx)\n",fromA,us,x2,x3); if (us) RtlInitUnicodeString(us,HEAP_strdupW(GetProcessHeap(),0,from)); return TRUE; } /****************************************************************************** * RtlCreateEnvironment [NTDLL] */ DWORD WINAPI RtlCreateEnvironment(DWORD x1,DWORD x2) { FIXME("(0x%08lx,0x%08lx),stub!\n",x1,x2); return 0; } /****************************************************************************** * RtlDestroyEnvironment [NTDLL] */ DWORD WINAPI RtlDestroyEnvironment(DWORD x) { FIXME("(0x%08lx),stub!\n",x); return 0; } /****************************************************************************** * RtlQueryEnvironmentVariable_U [NTDLL] */ DWORD WINAPI RtlQueryEnvironmentVariable_U(DWORD x1,PUNICODE_STRING key,PUNICODE_STRING val) { FIXME("(0x%08lx,%s,%p),stub!\n",x1,debugstr_w(key->Buffer),val); return 0; } /****************************************************************************** * RtlInitializeGenericTable [NTDLL] */ DWORD WINAPI RtlInitializeGenericTable(void) { FIXME("\n"); return 0; } /****************************************************************************** * RtlInitializeBitMap [NTDLL] * */ NTSTATUS WINAPI RtlInitializeBitMap(DWORD x1,DWORD x2,DWORD x3) { FIXME("(0x%08lx,0x%08lx,0x%08lx),stub\n",x1,x2,x3); return 0; } /****************************************************************************** * RtlSetBits [NTDLL] * */ NTSTATUS WINAPI RtlSetBits(DWORD x1,DWORD x2,DWORD x3) { FIXME("(0x%08lx,0x%08lx,0x%08lx),stub\n",x1,x2,x3); return 0; } /****************************************************************************** * RtlFindClearBits [NTDLL] * */ NTSTATUS WINAPI RtlFindClearBits(DWORD x1,DWORD x2,DWORD x3) { FIXME("(0x%08lx,0x%08lx,0x%08lx),stub\n",x1,x2,x3); return 0; } /****************************************************************************** * RtlClearBits [NTDLL] * */ NTSTATUS WINAPI RtlClearBits(DWORD x1,DWORD x2,DWORD x3) { FIXME("(0x%08lx,0x%08lx,0x%08lx),stub\n",x1,x2,x3); return 0; } /****************************************************************************** * RtlCopyMemory [NTDLL] * */ #undef RtlCopyMemory VOID WINAPI RtlCopyMemory( VOID *Destination, CONST VOID *Source, SIZE_T Length ) { memcpy(Destination, Source, Length); } /****************************************************************************** * RtlMoveMemory [NTDLL] */ #undef RtlMoveMemory VOID WINAPI RtlMoveMemory( VOID *Destination, CONST VOID *Source, SIZE_T Length ) { memmove(Destination, Source, Length); } /****************************************************************************** * RtlFillMemory [NTDLL] */ #undef RtlFillMemory VOID WINAPI RtlFillMemory( VOID *Destination, SIZE_T Length, BYTE Fill ) { memset(Destination, Fill, Length); } /****************************************************************************** * RtlZeroMemory [NTDLL] */ #undef RtlZeroMemory VOID WINAPI RtlZeroMemory( VOID *Destination, SIZE_T Length ) { memset(Destination, 0, Length); } /****************************************************************************** * RtlCompareMemory [NTDLL] */ SIZE_T WINAPI RtlCompareMemory( const VOID *Source1, const VOID *Source2, SIZE_T Length) { int i; for(i=0; (i #include #include #ifdef HAVE_WCTYPE_H # include #endif #include "wine/winestring.h" #include "crtdll.h" #include "heap.h" #include "winnls.h" #include "debugtools.h" #include "ntdll_misc.h" #include "ntddk.h" DEFAULT_DEBUG_CHANNEL(ntdll) /* STRING FUNCTIONS */ /************************************************************************** * RtlInitString */ VOID WINAPI RtlInitString(PSTRING target,LPCSTR source) { TRACE("%p %p(%s)\n", target, source, debugstr_a(source)); target->Buffer = (LPSTR)source; if (source) { target->Length = lstrlenA(source); target->MaximumLength = target->Length+1; } else { target->Length = target->MaximumLength = 0; } } /* ANSI FUNCTIONS */ /************************************************************************** * RtlInitAnsiString */ VOID WINAPI RtlInitAnsiString( PANSI_STRING target, LPCSTR source) { TRACE("%p %p(%s)\n", target, source, debugstr_a(source)); target->Buffer = (LPSTR)source; if (source) { target->Length = lstrlenA(source); target->MaximumLength = target->Length+1; } else { target->Length = target->MaximumLength = 0; } } /************************************************************************** * RtlFreeAnsiString */ VOID WINAPI RtlFreeAnsiString( PANSI_STRING AnsiString) { TRACE("%p\n", AnsiString); dump_AnsiString(AnsiString, TRUE); if( AnsiString->Buffer ) HeapFree( GetProcessHeap(),0,AnsiString->Buffer ); } /* UNICODE FUNCTIONS */ /************************************************************************** * RtlInitUnicodeString [NTDLL.403] */ VOID WINAPI RtlInitUnicodeString( PUNICODE_STRING target, LPCWSTR source) { TRACE("%p %p(%s)\n", target, source, debugstr_w(source)); target->Buffer = (LPWSTR)source; if (source) { target->Length = lstrlenW(source)*2; target->MaximumLength = target->Length + 2; } else { target->Length = target->MaximumLength = 0; } } /************************************************************************** * RtlFreeUnicodeString [NTDLL.377] */ VOID WINAPI RtlFreeUnicodeString( PUNICODE_STRING UnicodeString) { TRACE("%p\n", UnicodeString); dump_UnicodeString(UnicodeString, TRUE); if (UnicodeString->Buffer) HeapFree(GetProcessHeap(),0,UnicodeString->Buffer); } /* COMPARE FUNCTIONS */ /************************************************************************** * RtlEqualUnicodeString */ BOOLEAN WINAPI RtlEqualUnicodeString( IN PUNICODE_STRING s1, IN PUNICODE_STRING s2, IN BOOLEAN CaseInsensitive) { BOOLEAN ret; TRACE("(%p,%p,%x)\n",s1,s2,CaseInsensitive); dump_UnicodeString(s1, TRUE); dump_UnicodeString(s2, TRUE); if(!s1 || !s2 || !s1->Buffer || !s2->Buffer) return FALSE; if (s1->Length != s2->Length) return FALSE; if (CaseInsensitive) ret = !CRTDLL__wcsnicmp(s1->Buffer,s2->Buffer,s1->Length/sizeof(WCHAR)); else ret = !CRTDLL_wcsncmp(s1->Buffer,s2->Buffer,s1->Length/sizeof(WCHAR)); return ret; } /****************************************************************************** * RtlCompareUnicodeString */ LONG WINAPI RtlCompareUnicodeString( PUNICODE_STRING s1, PUNICODE_STRING s2, BOOLEAN CaseInsensitive) { LONG ret; TRACE("(%p,%p,%x)\n",s1,s2,CaseInsensitive); dump_UnicodeString(s1, TRUE); dump_UnicodeString(s2, TRUE); if(!s1 || !s2 || !s1->Buffer || !s2->Buffer) return FALSE; if (s1->Length != s2->Length) return (s1->Length - s2->Length); if (CaseInsensitive) ret = CRTDLL__wcsnicmp(s1->Buffer,s2->Buffer,s1->Length/sizeof(WCHAR)); else ret = CRTDLL_wcsncmp(s1->Buffer,s2->Buffer,s1->Length/sizeof(WCHAR)); return ret; } /* COPY BETWEEN ANSI_STRING or UNICODE_STRING there is no parameter checking, it just crashes */ /************************************************************************** * RtlAnsiStringToUnicodeString * * NOTES: * writes terminating 0 */ NTSTATUS WINAPI RtlAnsiStringToUnicodeString( PUNICODE_STRING uni, PANSI_STRING ansi, BOOLEAN doalloc) { int len = ansi->Length * sizeof(WCHAR); TRACE("%p %p %u\n",uni, ansi, doalloc); dump_AnsiString(ansi, TRUE); dump_UnicodeString(uni, FALSE); if (len>0xfffe) return STATUS_INVALID_PARAMETER_2; uni->Length = len; if (doalloc) { uni->MaximumLength = len + sizeof(WCHAR); uni->Buffer = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,uni->MaximumLength); if (!uni->Buffer) return STATUS_NO_MEMORY; } else if (len+sizeof(WCHAR) > uni->MaximumLength) { return STATUS_BUFFER_OVERFLOW; } lstrcpynAtoW(uni->Buffer,ansi->Buffer,ansi->Length+1); return STATUS_SUCCESS; } /************************************************************************** * RtlUpcaseUnicodeString * * NOTES: * destination string is never 0-terminated because dest can be equal to src * and src might be not 0-terminated * dest.Length only set when success */ DWORD WINAPI RtlUpcaseUnicodeString( PUNICODE_STRING dest, PUNICODE_STRING src, BOOLEAN doalloc) { int i, len = src->Length; TRACE("(%p,%p,%x)\n",dest, src, doalloc); dump_UnicodeString(dest, FALSE); dump_UnicodeString(src, TRUE); if (doalloc) { dest->Buffer = (LPWSTR)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, len); if (!dest->Buffer) return STATUS_NO_MEMORY; dest->MaximumLength = len; } else if (len > dest->MaximumLength) { return STATUS_BUFFER_OVERFLOW; } for (i=0; i < len/sizeof(WCHAR); i++) { dest->Buffer[i] = towupper(src->Buffer[i]); } dest->Length = len; return STATUS_SUCCESS; } /************************************************************************** * RtlOemStringToUnicodeString * * NOTES * writes terminating 0 * buffer must be bigger than (ansi->Length+1)*2 * if astr.Length > 0x7ffe it returns STATUS_INVALID_PARAMETER_2 * * FIXME * OEM to unicode */ NTSTATUS WINAPI RtlOemStringToUnicodeString( PUNICODE_STRING uni, PSTRING ansi, BOOLEAN doalloc) { int len = ansi->Length * sizeof(WCHAR); if (len > 0xfffe) return STATUS_INVALID_PARAMETER_2; uni->Length = len; if (doalloc) { uni->Buffer = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY, len + sizeof(WCHAR)); if (!uni->Buffer) return STATUS_NO_MEMORY; uni->MaximumLength = len + sizeof(WCHAR); } else if (len+1 > uni->MaximumLength ) { return STATUS_BUFFER_OVERFLOW; } lstrcpynAtoW(uni->Buffer,ansi->Buffer,ansi->Length+1); return STATUS_SUCCESS; } /************************************************************************** * RtlUnicodeStringToOemString * * NOTES * allocates uni->Length+1 * writes terminating 0 */ NTSTATUS WINAPI RtlUnicodeStringToOemString( PANSI_STRING oem, PUNICODE_STRING uni, BOOLEAN doalloc) { int len = uni->Length/sizeof(WCHAR); TRACE("%p %s %i\n", oem, debugstr_us(uni), doalloc); oem->Length = len; if (doalloc) { oem->Buffer = (LPSTR)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, len+1); if (! oem->Buffer) return STATUS_NO_MEMORY; oem->MaximumLength = len + 1; } else if (oem->MaximumLength <= len) { return STATUS_BUFFER_OVERFLOW; } lstrcpynWtoA(oem->Buffer, uni->Buffer, len+1); return STATUS_SUCCESS; } /************************************************************************** * RtlUpcaseUnicodeStringToOemString * * NOTES * writes terminating 0 */ NTSTATUS WINAPI RtlUpcaseUnicodeStringToOemString( PANSI_STRING oem, PUNICODE_STRING uni, BOOLEAN doalloc) { int i, len = uni->Length/sizeof(WCHAR); TRACE("%p %s %i\n", oem, debugstr_us(uni), doalloc); oem->Length = len; if (doalloc) { oem->Buffer = (LPSTR)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, len+1); if (! oem->Buffer) return STATUS_NO_MEMORY; oem->MaximumLength = len + 1; } else if (oem->MaximumLength <= len) { return STATUS_BUFFER_OVERFLOW; } for (i=0; i < len; i++) { oem->Buffer[i] = towupper((char)(uni->Buffer[i])); } oem->Buffer[i] = 0; return STATUS_SUCCESS; } /************************************************************************** * RtlUnicodeStringToAnsiString * * NOTES * writes terminating 0 * copys a part if the buffer is to small */ NTSTATUS WINAPI RtlUnicodeStringToAnsiString( PANSI_STRING ansi, PUNICODE_STRING uni, BOOLEAN doalloc) { int len = uni->Length/sizeof(WCHAR); NTSTATUS ret = STATUS_SUCCESS; TRACE("%p %s %i\n", ansi, debugstr_us(uni), doalloc); ansi->Length = len; if (doalloc) { ansi->Buffer = (LPSTR)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, len+1); if (! ansi->Buffer) return STATUS_NO_MEMORY; ansi->MaximumLength = len + 1; } else if (ansi->MaximumLength <= len) { ansi->Length = ansi->MaximumLength - 1; ret = STATUS_BUFFER_OVERFLOW; } lstrcpynWtoA(ansi->Buffer, uni->Buffer, ansi->Length+1); return ret; } /* COPY BETWEEN ANSI/UNICODE_STRING AND MULTIBYTE STRINGS */ /************************************************************************** * RtlMultiByteToUnicodeN * * NOTES * dest can be equal to src * if unistr is to small a part is copyed * * FIXME * multibyte support */ NTSTATUS WINAPI RtlMultiByteToUnicodeN( LPWSTR unistr, DWORD unilen, LPDWORD reslen, LPSTR oemstr, DWORD oemlen) { UINT len; int i; TRACE("%p %lu, %p, %s, %lu\n", oemstr, oemlen, reslen, debugstr_w(unistr), unilen); len = (unilen/sizeof(WCHAR) < oemlen) ? unilen/sizeof(WCHAR) : oemlen; for (i = len-1; i>=0; i--) unistr[i] = (WCHAR)oemstr[i]; if (reslen) *reslen = len * 2; return 0; } /************************************************************************** * RtlOemToUnicodeN */ NTSTATUS WINAPI RtlOemToUnicodeN( LPWSTR unistr, DWORD unilen, LPDWORD reslen, LPSTR oemstr, DWORD oemlen) { UINT len; int i; TRACE("%p %lu, %p, %s, %lu\n", oemstr, oemlen, reslen, debugstr_w(unistr), unilen); len = (unilen/sizeof(WCHAR) < oemlen) ? unilen/sizeof(WCHAR) : oemlen; for (i = len-1; i>=0; i--) unistr[i] = (WCHAR)oemstr[i]; if (reslen) *reslen = len * 2; return 0; } /************************************************************************** * RtlUnicodeToOemN */ NTSTATUS WINAPI RtlUnicodeToOemN( LPSTR oemstr, DWORD oemlen, LPDWORD reslen, LPWSTR unistr, DWORD unilen) { UINT len; int i; TRACE("%p %lu, %p, %s, %lu\n", oemstr, oemlen, reslen, debugstr_w(unistr), unilen); len = (oemlen < unilen/sizeof(WCHAR)) ? unilen/sizeof(WCHAR) : oemlen; for (i = len-1; i>=0; i--) oemstr[i] = (CHAR)unistr[i]; if (reslen) *reslen = len * 2; return 0; } /************************************************************************** * RtlUpcaseUnicodeToOemN */ NTSTATUS WINAPI RtlUpcaseUnicodeToOemN( LPSTR oemstr, DWORD oemlen, LPDWORD reslen, LPWSTR unistr, DWORD unilen) { UINT len; int i; TRACE("%p %lu, %p, %s, %lu\n", oemstr, oemlen, reslen, debugstr_w(unistr), unilen); len = (oemlen < unilen/sizeof(WCHAR)) ? unilen/sizeof(WCHAR) : oemlen; for (i = len-1; i>=0; i--) oemstr[i] = toupper((CHAR)unistr[i]); if (reslen) *reslen = len * 2; return 0; } /************************************************************************** * RtlUnicodeToMultiByteN */ NTSTATUS WINAPI RtlUnicodeToMultiByteN( PCHAR MbString, ULONG MbSize, PULONG ResultSize, PWCHAR UnicodeString, ULONG UnicodeSize) { int Size = 0, i; TRACE("(%p,%lu,%p,%p(%s),%lu)\n", MbString, MbSize, ResultSize, UnicodeString, debugstr_w(UnicodeString), UnicodeSize); Size = (UnicodeSize > (MbSize*sizeof(WCHAR))) ? MbSize: UnicodeSize/sizeof(WCHAR); if (ResultSize != NULL) *ResultSize = Size; for(i = 0; i < Size; i++) { *(MbString++) = *(UnicodeString++); } return STATUS_SUCCESS; } /* STRING SIZE Rtlx* supports multibyte */ /************************************************************************** * RtlxOemStringToUnicodeSize */ UINT WINAPI RtlxOemStringToUnicodeSize(PSTRING str) { return str->Length*2+2; } /************************************************************************** * RtlxAnsiStringToUnicodeSize */ UINT WINAPI RtlxAnsiStringToUnicodeSize(PANSI_STRING str) { return str->Length*2+2; } /************************************************************************** * RtlxUnicodeStringToOemSize * */ UINT WINAPI RtlxUnicodeStringToOemSize(PUNICODE_STRING str) { return str->Length+1; } /* MISC */ /************************************************************************** * RtlIsTextUnicode * * Apply various feeble heuristics to guess whether * the text buffer contains Unicode. * FIXME: should implement more tests. */ DWORD WINAPI RtlIsTextUnicode( LPVOID buf, DWORD len, DWORD *pf) { LPWSTR s = buf; DWORD flags = -1, out_flags = 0; if (!len) goto out; if (pf) flags = *pf; /* * Apply various tests to the text string. According to the * docs, each test "passed" sets the corresponding flag in * the output flags. But some of the tests are mutually * exclusive, so I don't see how you could pass all tests ... */ /* Check for an odd length ... pass if even. */ if (!(len & 1)) out_flags |= IS_TEXT_UNICODE_ODD_LENGTH; /* Check for the special unicode marker byte. */ if (*s == 0xFEFF) out_flags |= IS_TEXT_UNICODE_SIGNATURE; /* * Check whether the string passed all of the tests. */ flags &= ITU_IMPLEMENTED_TESTS; if ((out_flags & flags) != flags) len = 0; out: if (pf) *pf = out_flags; return len; } /************************************************************************** * RtlPrefixUnicodeString */ NTSTATUS WINAPI RtlPrefixUnicodeString( PUNICODE_STRING a, PUNICODE_STRING b, DWORD x) { TRACE("(%s,%s,%lx)\n",debugstr_us(a),debugstr_us(b),x); return STATUS_SUCCESS; } wine-20000526/dlls/ntdll/sec.c0100644000175000001440000004433107066752015015450 0ustar julliardusers/* * Security functions * * Copyright 1996-1998 Marcus Meissner */ #include #include #include #include #include #include "windef.h" #include "winbase.h" #include "wingdi.h" #include "winuser.h" #include "wine/winestring.h" #include "file.h" #include "heap.h" #include "winnls.h" #include "debugtools.h" #include "winerror.h" #include "stackframe.h" #include "ntddk.h" #include "winreg.h" DEFAULT_DEBUG_CHANNEL(ntdll); #define NT_SUCCESS(status) (status == STATUS_SUCCESS) /* * SID FUNCTIONS */ /****************************************************************************** * RtlAllocateAndInitializeSid [NTDLL.265] * */ BOOLEAN WINAPI RtlAllocateAndInitializeSid ( PSID_IDENTIFIER_AUTHORITY pIdentifierAuthority, BYTE nSubAuthorityCount, DWORD nSubAuthority0, DWORD nSubAuthority1, DWORD nSubAuthority2, DWORD nSubAuthority3, DWORD nSubAuthority4, DWORD nSubAuthority5, DWORD nSubAuthority6, DWORD nSubAuthority7, PSID *pSid ) { TRACE("(%p, 0x%04x,0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx,%p)\n", pIdentifierAuthority,nSubAuthorityCount, nSubAuthority0, nSubAuthority1, nSubAuthority2, nSubAuthority3, nSubAuthority4, nSubAuthority5, nSubAuthority6, nSubAuthority7, pSid); if (!(*pSid = HeapAlloc( GetProcessHeap(), 0, RtlLengthRequiredSid(nSubAuthorityCount)))) return FALSE; (*pSid)->Revision = SID_REVISION; if (pIdentifierAuthority) memcpy(&(*pSid)->IdentifierAuthority, pIdentifierAuthority, sizeof (SID_IDENTIFIER_AUTHORITY)); *GetSidSubAuthorityCount(*pSid) = nSubAuthorityCount; if (nSubAuthorityCount > 0) *GetSidSubAuthority(*pSid, 0) = nSubAuthority0; if (nSubAuthorityCount > 1) *GetSidSubAuthority(*pSid, 1) = nSubAuthority1; if (nSubAuthorityCount > 2) *GetSidSubAuthority(*pSid, 2) = nSubAuthority2; if (nSubAuthorityCount > 3) *GetSidSubAuthority(*pSid, 3) = nSubAuthority3; if (nSubAuthorityCount > 4) *GetSidSubAuthority(*pSid, 4) = nSubAuthority4; if (nSubAuthorityCount > 5) *GetSidSubAuthority(*pSid, 5) = nSubAuthority5; if (nSubAuthorityCount > 6) *GetSidSubAuthority(*pSid, 6) = nSubAuthority6; if (nSubAuthorityCount > 7) *GetSidSubAuthority(*pSid, 7) = nSubAuthority7; return STATUS_SUCCESS; } /****************************************************************************** * RtlEqualSid [NTDLL.352] * */ BOOL WINAPI RtlEqualSid( PSID pSid1, PSID pSid2 ) { if (!RtlValidSid(pSid1) || !RtlValidSid(pSid2)) return FALSE; if (*RtlSubAuthorityCountSid(pSid1) != *RtlSubAuthorityCountSid(pSid2)) return FALSE; if (memcmp(pSid1, pSid2, GetLengthSid(pSid1)) != 0) return FALSE; return TRUE; } /****************************************************************************** * RtlEqualPrefixSid [ntdll.] */ BOOL WINAPI RtlEqualPrefixSid (PSID pSid1, PSID pSid2) { if (!RtlValidSid(pSid1) || !RtlValidSid(pSid2)) return FALSE; if (*RtlSubAuthorityCountSid(pSid1) != *RtlSubAuthorityCountSid(pSid2)) return FALSE; if (memcmp(pSid1, pSid2, RtlLengthRequiredSid(pSid1->SubAuthorityCount - 1)) != 0) return FALSE; return TRUE; } /****************************************************************************** * RtlFreeSid [NTDLL.376] */ DWORD WINAPI RtlFreeSid(PSID pSid) { TRACE("(%p)\n", pSid); HeapFree( GetProcessHeap(), 0, pSid ); return STATUS_SUCCESS; } /************************************************************************** * RtlLengthRequiredSid [NTDLL.427] * * PARAMS * nSubAuthorityCount [] */ DWORD WINAPI RtlLengthRequiredSid(DWORD nrofsubauths) { return (nrofsubauths-1)*sizeof(DWORD) + sizeof(SID); } /************************************************************************** * RtlLengthSid [NTDLL.429] */ DWORD WINAPI RtlLengthSid(PSID pSid) { TRACE("sid=%p\n",pSid); if (!pSid) return 0; return RtlLengthRequiredSid(*RtlSubAuthorityCountSid(pSid)); } /************************************************************************** * RtlInitializeSid [NTDLL.410] */ BOOL WINAPI RtlInitializeSid( PSID pSid, PSID_IDENTIFIER_AUTHORITY pIdentifierAuthority, BYTE nSubAuthorityCount) { int i; if (nSubAuthorityCount >= SID_MAX_SUB_AUTHORITIES) return FALSE; pSid->Revision = SID_REVISION; pSid->SubAuthorityCount = nSubAuthorityCount; if (pIdentifierAuthority) memcpy(&pSid->IdentifierAuthority, pIdentifierAuthority, sizeof (SID_IDENTIFIER_AUTHORITY)); for (i = 0; i < nSubAuthorityCount; i++) *GetSidSubAuthority(pSid, i) = 0; return TRUE; } /************************************************************************** * RtlSubAuthoritySid [NTDLL.497] * * PARAMS * pSid [] * nSubAuthority [] */ LPDWORD WINAPI RtlSubAuthoritySid( PSID pSid, DWORD nSubAuthority ) { return &(pSid->SubAuthority[nSubAuthority]); } /************************************************************************** * RtlIdentifierAuthoritySid [NTDLL.395] * * PARAMS * pSid [] */ PSID_IDENTIFIER_AUTHORITY WINAPI RtlIdentifierAuthoritySid( PSID pSid ) { return &(pSid->IdentifierAuthority); } /************************************************************************** * RtlSubAuthorityCountSid [NTDLL.496] * * PARAMS * pSid [] * nSubAuthority [] */ LPBYTE WINAPI RtlSubAuthorityCountSid(PSID pSid) { return &(pSid->SubAuthorityCount); } /************************************************************************** * RtlCopySid [NTDLL.302] */ DWORD WINAPI RtlCopySid( DWORD nDestinationSidLength, PSID pDestinationSid, PSID pSourceSid ) { if (!pSourceSid || !RtlValidSid(pSourceSid) || (nDestinationSidLength < RtlLengthSid(pSourceSid))) return FALSE; if (nDestinationSidLength < (pSourceSid->SubAuthorityCount*4+8)) return FALSE; memmove(pDestinationSid, pSourceSid, pSourceSid->SubAuthorityCount*4+8); return TRUE; } /****************************************************************************** * RtlValidSid [NTDLL.532] * * PARAMS * pSid [] */ BOOL WINAPI RtlValidSid( PSID pSid ) { if (IsBadReadPtr(pSid, 4)) { WARN("(%p): invalid pointer!\n", pSid); return FALSE; } if (pSid->SubAuthorityCount > SID_MAX_SUB_AUTHORITIES) return FALSE; if (!pSid || pSid->Revision != SID_REVISION) return FALSE; return TRUE; } /* * security descriptor functions */ /************************************************************************** * RtlCreateSecurityDescriptor [NTDLL.313] * * RETURNS: * 0 success, * STATUS_INVALID_OWNER, STATUS_PRIVILEGE_NOT_HELD, STATUS_NO_INHERITANCE, * STATUS_NO_MEMORY */ NTSTATUS WINAPI RtlCreateSecurityDescriptor( PSECURITY_DESCRIPTOR lpsd, DWORD rev) { if (rev!=SECURITY_DESCRIPTOR_REVISION) return STATUS_UNKNOWN_REVISION; memset(lpsd,'\0',sizeof(*lpsd)); lpsd->Revision = SECURITY_DESCRIPTOR_REVISION; return STATUS_SUCCESS; } /************************************************************************** * RtlValidSecurityDescriptor [NTDLL.313] * */ NTSTATUS WINAPI RtlValidSecurityDescriptor( PSECURITY_DESCRIPTOR SecurityDescriptor) { if ( ! SecurityDescriptor ) return STATUS_INVALID_SECURITY_DESCR; if ( SecurityDescriptor->Revision != SECURITY_DESCRIPTOR_REVISION ) return STATUS_UNKNOWN_REVISION; return STATUS_SUCCESS; } /************************************************************************** * RtlLengthSecurityDescriptor [NTDLL] */ ULONG WINAPI RtlLengthSecurityDescriptor( PSECURITY_DESCRIPTOR SecurityDescriptor) { ULONG Size; Size = SECURITY_DESCRIPTOR_MIN_LENGTH; if ( SecurityDescriptor == NULL ) return 0; if ( SecurityDescriptor->Owner != NULL ) Size += SecurityDescriptor->Owner->SubAuthorityCount; if ( SecurityDescriptor->Group != NULL ) Size += SecurityDescriptor->Group->SubAuthorityCount; if ( SecurityDescriptor->Sacl != NULL ) Size += SecurityDescriptor->Sacl->AclSize; if ( SecurityDescriptor->Dacl != NULL ) Size += SecurityDescriptor->Dacl->AclSize; return Size; } /****************************************************************************** * RtlGetDaclSecurityDescriptor [NTDLL] * */ NTSTATUS WINAPI RtlGetDaclSecurityDescriptor( IN PSECURITY_DESCRIPTOR pSecurityDescriptor, OUT PBOOLEAN lpbDaclPresent, OUT PACL *pDacl, OUT PBOOLEAN lpbDaclDefaulted) { TRACE("(%p,%p,%p,%p)\n", pSecurityDescriptor, lpbDaclPresent, *pDacl, lpbDaclDefaulted); if (pSecurityDescriptor->Revision != SECURITY_DESCRIPTOR_REVISION) return STATUS_UNKNOWN_REVISION ; if ( (*lpbDaclPresent = (SE_DACL_PRESENT & pSecurityDescriptor->Control) ? 1 : 0) ) { if ( SE_SELF_RELATIVE & pSecurityDescriptor->Control) { *pDacl = (PACL) ((LPBYTE)pSecurityDescriptor + (DWORD)pSecurityDescriptor->Dacl); } else { *pDacl = pSecurityDescriptor->Dacl; } } *lpbDaclDefaulted = (( SE_DACL_DEFAULTED & pSecurityDescriptor->Control ) ? 1 : 0); return STATUS_SUCCESS; } /************************************************************************** * RtlSetDaclSecurityDescriptor [NTDLL.483] */ NTSTATUS WINAPI RtlSetDaclSecurityDescriptor ( PSECURITY_DESCRIPTOR lpsd, BOOLEAN daclpresent, PACL dacl, BOOLEAN dacldefaulted ) { if (lpsd->Revision!=SECURITY_DESCRIPTOR_REVISION) return STATUS_UNKNOWN_REVISION; if (lpsd->Control & SE_SELF_RELATIVE) return STATUS_INVALID_SECURITY_DESCR; if (!daclpresent) { lpsd->Control &= ~SE_DACL_PRESENT; return TRUE; } lpsd->Control |= SE_DACL_PRESENT; lpsd->Dacl = dacl; if (dacldefaulted) lpsd->Control |= SE_DACL_DEFAULTED; else lpsd->Control &= ~SE_DACL_DEFAULTED; return STATUS_SUCCESS; } /****************************************************************************** * RtlGetSaclSecurityDescriptor [NTDLL] * */ NTSTATUS WINAPI RtlGetSaclSecurityDescriptor( IN PSECURITY_DESCRIPTOR pSecurityDescriptor, OUT PBOOLEAN lpbSaclPresent, OUT PACL *pSacl, OUT PBOOLEAN lpbSaclDefaulted) { TRACE("(%p,%p,%p,%p)\n", pSecurityDescriptor, lpbSaclPresent, *pSacl, lpbSaclDefaulted); if (pSecurityDescriptor->Revision != SECURITY_DESCRIPTOR_REVISION) return STATUS_UNKNOWN_REVISION ; if ( (*lpbSaclPresent = (SE_SACL_PRESENT & pSecurityDescriptor->Control) ? 1 : 0) ) { if ( SE_SELF_RELATIVE & pSecurityDescriptor->Control) { *pSacl = (PACL) ((LPBYTE)pSecurityDescriptor + (DWORD)pSecurityDescriptor->Sacl); } else { *pSacl = pSecurityDescriptor->Sacl; } } *lpbSaclDefaulted = (( SE_SACL_DEFAULTED & pSecurityDescriptor->Control ) ? 1 : 0); return STATUS_SUCCESS; } /************************************************************************** * RtlSetSaclSecurityDescriptor [NTDLL.488] */ NTSTATUS WINAPI RtlSetSaclSecurityDescriptor ( PSECURITY_DESCRIPTOR lpsd, BOOLEAN saclpresent, PACL sacl, BOOLEAN sacldefaulted) { if (lpsd->Revision!=SECURITY_DESCRIPTOR_REVISION) return STATUS_UNKNOWN_REVISION; if (lpsd->Control & SE_SELF_RELATIVE) return STATUS_INVALID_SECURITY_DESCR; if (!saclpresent) { lpsd->Control &= ~SE_SACL_PRESENT; return 0; } lpsd->Control |= SE_SACL_PRESENT; lpsd->Sacl = sacl; if (sacldefaulted) lpsd->Control |= SE_SACL_DEFAULTED; else lpsd->Control &= ~SE_SACL_DEFAULTED; return STATUS_SUCCESS; } /************************************************************************** * RtlGetOwnerSecurityDescriptor [NTDLL.488] */ NTSTATUS WINAPI RtlGetOwnerSecurityDescriptor( PSECURITY_DESCRIPTOR SecurityDescriptor, PSID *Owner, PBOOLEAN OwnerDefaulted) { if ( !SecurityDescriptor || !Owner || !OwnerDefaulted ) return STATUS_INVALID_PARAMETER; *Owner = SecurityDescriptor->Owner; if ( *Owner != NULL ) { if ( SecurityDescriptor->Control & SE_OWNER_DEFAULTED ) *OwnerDefaulted = TRUE; else *OwnerDefaulted = FALSE; } return STATUS_SUCCESS; } /************************************************************************** * RtlSetOwnerSecurityDescriptor [NTDLL.487] */ NTSTATUS WINAPI RtlSetOwnerSecurityDescriptor( PSECURITY_DESCRIPTOR lpsd, PSID owner, BOOLEAN ownerdefaulted) { if (lpsd->Revision!=SECURITY_DESCRIPTOR_REVISION) return STATUS_UNKNOWN_REVISION; if (lpsd->Control & SE_SELF_RELATIVE) return STATUS_INVALID_SECURITY_DESCR; lpsd->Owner = owner; if (ownerdefaulted) lpsd->Control |= SE_OWNER_DEFAULTED; else lpsd->Control &= ~SE_OWNER_DEFAULTED; return STATUS_SUCCESS; } /************************************************************************** * RtlSetGroupSecurityDescriptor [NTDLL.485] */ NTSTATUS WINAPI RtlSetGroupSecurityDescriptor ( PSECURITY_DESCRIPTOR lpsd, PSID group, BOOLEAN groupdefaulted) { if (lpsd->Revision!=SECURITY_DESCRIPTOR_REVISION) return STATUS_UNKNOWN_REVISION; if (lpsd->Control & SE_SELF_RELATIVE) return STATUS_INVALID_SECURITY_DESCR; lpsd->Group = group; if (groupdefaulted) lpsd->Control |= SE_GROUP_DEFAULTED; else lpsd->Control &= ~SE_GROUP_DEFAULTED; return STATUS_SUCCESS; } /************************************************************************** * RtlGetGroupSecurityDescriptor [NTDLL] */ NTSTATUS WINAPI RtlGetGroupSecurityDescriptor( PSECURITY_DESCRIPTOR SecurityDescriptor, PSID *Group, PBOOLEAN GroupDefaulted) { if ( !SecurityDescriptor || !Group || !GroupDefaulted ) return STATUS_INVALID_PARAMETER; *Group = SecurityDescriptor->Group; if ( *Group != NULL ) { if ( SecurityDescriptor->Control & SE_GROUP_DEFAULTED ) *GroupDefaulted = TRUE; else *GroupDefaulted = FALSE; } return STATUS_SUCCESS; } /************************************************************************** * RtlMakeSelfRelativeSD [NTDLL] */ NTSTATUS WINAPI RtlMakeSelfRelativeSD( IN PSECURITY_DESCRIPTOR pAbsoluteSecurityDescriptor, IN PSECURITY_DESCRIPTOR pSelfRelativeSecurityDescriptor, IN OUT LPDWORD lpdwBufferLength) { FIXME("(%p,%p,%p(%lu))\n", pAbsoluteSecurityDescriptor, pSelfRelativeSecurityDescriptor, lpdwBufferLength,*lpdwBufferLength); return STATUS_SUCCESS; } /* * access control list's */ /************************************************************************** * RtlCreateAcl [NTDLL.306] * * NOTES * This should return NTSTATUS */ NTSTATUS WINAPI RtlCreateAcl(PACL acl,DWORD size,DWORD rev) { TRACE("%p 0x%08lx 0x%08lx\n", acl, size, rev); if (rev!=ACL_REVISION) return STATUS_INVALID_PARAMETER; if (size0xFFFF) return STATUS_INVALID_PARAMETER; memset(acl,'\0',sizeof(ACL)); acl->AclRevision = rev; acl->AclSize = size; acl->AceCount = 0; return 0; } /************************************************************************** * RtlFirstFreeAce [NTDLL.370] * looks for the AceCount+1 ACE, and if it is still within the alloced * ACL, return a pointer to it */ BOOLEAN WINAPI RtlFirstFreeAce( PACL acl, PACE_HEADER *x) { PACE_HEADER ace; int i; *x = 0; ace = (PACE_HEADER)(acl+1); for (i=0;iAceCount;i++) { if ((DWORD)ace>=(((DWORD)acl)+acl->AclSize)) return 0; ace = (PACE_HEADER)(((BYTE*)ace)+ace->AceSize); } if ((DWORD)ace>=(((DWORD)acl)+acl->AclSize)) return 0; *x = ace; return 1; } /************************************************************************** * RtlAddAce [NTDLL.260] */ NTSTATUS WINAPI RtlAddAce( PACL acl, DWORD rev, DWORD xnrofaces, PACE_HEADER acestart, DWORD acelen) { PACE_HEADER ace,targetace; int nrofaces; if (acl->AclRevision != ACL_REVISION) return STATUS_INVALID_PARAMETER; if (!RtlFirstFreeAce(acl,&targetace)) return STATUS_INVALID_PARAMETER; nrofaces=0;ace=acestart; while (((DWORD)ace-(DWORD)acestart)AceSize); } if ((DWORD)targetace+acelen>(DWORD)acl+acl->AclSize) /* too much aces */ return STATUS_INVALID_PARAMETER; memcpy((LPBYTE)targetace,acestart,acelen); acl->AceCount+=nrofaces; return STATUS_SUCCESS; } /****************************************************************************** * RtlAddAccessAllowedAce [NTDLL] */ BOOL WINAPI RtlAddAccessAllowedAce( IN OUT PACL pAcl, IN DWORD dwAceRevision, IN DWORD AccessMask, IN PSID pSid) { FIXME("(%p,0x%08lx,0x%08lx,%p),stub!\n", pAcl, dwAceRevision, AccessMask, pSid); return 0; } /****************************************************************************** * RtlGetAce [NTDLL] */ DWORD WINAPI RtlGetAce(PACL pAcl,DWORD dwAceIndex,LPVOID *pAce ) { FIXME("(%p,%ld,%p),stub!\n",pAcl,dwAceIndex,pAce); return 0; } /* * misc */ /****************************************************************************** * RtlAdjustPrivilege [NTDLL] */ DWORD WINAPI RtlAdjustPrivilege(DWORD x1,DWORD x2,DWORD x3,DWORD x4) { FIXME("(0x%08lx,0x%08lx,0x%08lx,0x%08lx),stub!\n",x1,x2,x3,x4); return 0; } /****************************************************************************** * RtlImpersonateSelf [NTDLL] */ BOOL WINAPI RtlImpersonateSelf(SECURITY_IMPERSONATION_LEVEL ImpersonationLevel) { FIXME("(%08x), stub\n", ImpersonationLevel); return TRUE; } /****************************************************************************** * NtAccessCheck [NTDLL] */ NTSTATUS WINAPI NtAccessCheck( IN PSECURITY_DESCRIPTOR SecurityDescriptor, IN HANDLE ClientToken, IN ACCESS_MASK DesiredAccess, IN PGENERIC_MAPPING GenericMapping, OUT PPRIVILEGE_SET PrivilegeSet, OUT PULONG ReturnLength, OUT PULONG GrantedAccess, OUT PBOOLEAN AccessStatus) { FIXME("(%p, %04x, %08lx, %p, %p, %p, %p, %p), stub\n", SecurityDescriptor, ClientToken, DesiredAccess, GenericMapping, PrivilegeSet, ReturnLength, GrantedAccess, AccessStatus); *AccessStatus = TRUE; return STATUS_SUCCESS; } /****************************************************************************** * NtSetSecurityObject [NTDLL] */ NTSTATUS WINAPI NtSetSecurityObject( IN HANDLE Handle, IN SECURITY_INFORMATION SecurityInformation, IN PSECURITY_DESCRIPTOR SecurityDescriptor) { FIXME("0x%08x 0x%08lx %p\n", Handle, SecurityInformation, SecurityDescriptor); return STATUS_SUCCESS; } /****************************************************************************** * RtlGetControlSecurityDescriptor */ NTSTATUS WINAPI RtlGetControlSecurityDescriptor( PSECURITY_DESCRIPTOR pSecurityDescriptor, PSECURITY_DESCRIPTOR_CONTROL pControl, LPDWORD lpdwRevision) { FIXME("(%p,%p,%p),stub!\n",pSecurityDescriptor,pControl,lpdwRevision); return STATUS_SUCCESS; } wine-20000526/dlls/ntdll/signal_i386.c0100644000175000001440000005734707075417501016735 0ustar julliardusers/* * i386 signal handling routines * * Copyright 1999 Alexandre Julliard */ #ifdef __i386__ #include "config.h" #include #include #include #include #include #ifdef HAVE_SYS_PARAM_H # include #endif #ifdef HAVE_SYSCALL_H # include #else # ifdef HAVE_SYS_SYSCALL_H # include # endif #endif #include "selectors.h" /*********************************************************************** * signal context platform-specific definitions */ #ifdef linux typedef struct { unsigned short sc_gs, __gsh; unsigned short sc_fs, __fsh; unsigned short sc_es, __esh; unsigned short sc_ds, __dsh; unsigned long sc_edi; unsigned long sc_esi; unsigned long sc_ebp; unsigned long sc_esp; unsigned long sc_ebx; unsigned long sc_edx; unsigned long sc_ecx; unsigned long sc_eax; unsigned long sc_trapno; unsigned long sc_err; unsigned long sc_eip; unsigned short sc_cs, __csh; unsigned long sc_eflags; unsigned long esp_at_signal; unsigned short sc_ss, __ssh; unsigned long i387; unsigned long oldmask; unsigned long cr2; } SIGCONTEXT; #define HANDLER_DEF(name) void name( int __signal, SIGCONTEXT __context ) #define HANDLER_CONTEXT (&__context) /* this is the sigaction structure from the Linux 2.1.20 kernel. */ struct kernel_sigaction { void (*ksa_handler)(); unsigned long ksa_mask; unsigned long ksa_flags; void *ksa_restorer; }; /* Similar to the sigaction function in libc, except it leaves alone the restorer field, which is used to specify the signal stack address */ static inline int wine_sigaction( int sig, struct kernel_sigaction *new, struct kernel_sigaction *old ) { __asm__ __volatile__( "pushl %%ebx\n\t" "movl %2,%%ebx\n\t" "int $0x80\n\t" "popl %%ebx" : "=a" (sig) : "0" (SYS_sigaction), "r" (sig), "c" (new), "d" (old) ); if (sig>=0) return 0; errno = -sig; return -1; } #ifdef HAVE_SIGALTSTACK /* direct syscall for sigaltstack to work around glibc 2.0 brain-damage */ static inline int wine_sigaltstack( const struct sigaltstack *new, struct sigaltstack *old ) { int ret; __asm__ __volatile__( "pushl %%ebx\n\t" "movl %2,%%ebx\n\t" "int $0x80\n\t" "popl %%ebx" : "=a" (ret) : "0" (SYS_sigaltstack), "r" (new), "c" (old) ); if (ret >= 0) return 0; errno = -ret; return -1; } #endif #endif /* linux */ #ifdef BSDI #define EAX_sig(context) ((context)->tf_eax) #define EBX_sig(context) ((context)->tf_ebx) #define ECX_sig(context) ((context)->tf_ecx) #define EDX_sig(context) ((context)->tf_edx) #define ESI_sig(context) ((context)->tf_esi) #define EDI_sig(context) ((context)->tf_edi) #define EBP_sig(context) ((context)->tf_ebp) #define CS_sig(context) ((context)->tf_cs) #define DS_sig(context) ((context)->tf_ds) #define ES_sig(context) ((context)->tf_es) #define SS_sig(context) ((context)->tf_ss) #include typedef struct trapframe SIGCONTEXT; #define HANDLER_DEF(name) void name( int __signal, int code, SIGCONTEXT *__context ) #define HANDLER_CONTEXT __context #define EFL_sig(context) ((context)->tf_eflags) #define EIP_sig(context) (*((unsigned long*)&(context)->tf_eip)) #define ESP_sig(context) (*((unsigned long*)&(context)->tf_esp)) #endif /* bsdi */ #if defined(__NetBSD__) || defined(__FreeBSD__) || defined(__OpenBSD__) typedef struct sigcontext SIGCONTEXT; #define HANDLER_DEF(name) void name( int __signal, int code, SIGCONTEXT *__context ) #define HANDLER_CONTEXT __context #endif /* FreeBSD */ #if defined(__svr4__) || defined(_SCO_DS) || defined(__sun) #ifdef _SCO_DS #include #endif /* Solaris kludge */ #undef ERR #include #undef ERR typedef struct ucontext SIGCONTEXT; #define HANDLER_DEF(name) void name( int __signal, void *__siginfo, SIGCONTEXT *__context ) #define HANDLER_CONTEXT __context #endif /* svr4 || SCO_DS */ #ifdef __EMX__ typedef struct { unsigned long ContextFlags; FLOATING_SAVE_AREA sc_float; unsigned long sc_gs; unsigned long sc_fs; unsigned long sc_es; unsigned long sc_ds; unsigned long sc_edi; unsigned long sc_esi; unsigned long sc_eax; unsigned long sc_ebx; unsigned long sc_ecx; unsigned long sc_edx; unsigned long sc_ebp; unsigned long sc_eip; unsigned long sc_cs; unsigned long sc_eflags; unsigned long sc_esp; unsigned long sc_ss; } SIGCONTEXT; #endif /* __EMX__ */ #if defined(linux) || defined(__NetBSD__) || defined(__FreeBSD__) || defined(__OpenBSD__) || defined(__EMX__) #define EAX_sig(context) ((context)->sc_eax) #define EBX_sig(context) ((context)->sc_ebx) #define ECX_sig(context) ((context)->sc_ecx) #define EDX_sig(context) ((context)->sc_edx) #define ESI_sig(context) ((context)->sc_esi) #define EDI_sig(context) ((context)->sc_edi) #define EBP_sig(context) ((context)->sc_ebp) #define CS_sig(context) ((context)->sc_cs) #define DS_sig(context) ((context)->sc_ds) #define ES_sig(context) ((context)->sc_es) #define SS_sig(context) ((context)->sc_ss) /* FS and GS are now in the sigcontext struct of FreeBSD, but not * saved by the exception handling. duh. * Actually they are in -current (have been for a while), and that * patch now finally has been MFC'd to -stable too (Nov 15 1999). * If you're running a system from the -stable branch older than that, * like a 3.3-RELEASE, grab the patch from the ports tree: * ftp://ftp.freebsd.org/pub/FreeBSD/FreeBSD-current/ports/emulators/wine/files/patch-3.3-sys-fsgs * (If its not yet there when you look, go here: * http://www.jelal.kn-bremen.de/freebsd/ports/emulators/wine/files/ ) */ #ifdef __FreeBSD__ #define FS_sig(context) ((context)->sc_fs) #define GS_sig(context) ((context)->sc_gs) #endif #ifdef linux #define FS_sig(context) ((context)->sc_fs) #define GS_sig(context) ((context)->sc_gs) #define CR2_sig(context) ((context)->cr2) #define TRAP_sig(context) ((context)->sc_trapno) #define ERROR_sig(context) ((context)->sc_err) #define FPU_sig(context) ((FLOATING_SAVE_AREA*)((context)->i387)) #endif #ifndef __FreeBSD__ #define EFL_sig(context) ((context)->sc_eflags) #else #define EFL_sig(context) ((context)->sc_efl) /* FreeBSD, see i386/i386/traps.c::trap_pfault va->err kludge */ #define CR2_sig(context) ((context)->sc_err) #define TRAP_sig(context) ((context)->sc_trapno) #endif #define EIP_sig(context) (*((unsigned long*)&(context)->sc_eip)) #define ESP_sig(context) (*((unsigned long*)&(context)->sc_esp)) #endif /* linux || __NetBSD__ || __FreeBSD__ || __OpenBSD__ */ #if defined(__svr4__) || defined(_SCO_DS) || defined(__sun) #ifdef _SCO_DS #define gregs regs #endif #define EAX_sig(context) ((context)->uc_mcontext.gregs[EAX]) #define EBX_sig(context) ((context)->uc_mcontext.gregs[EBX]) #define ECX_sig(context) ((context)->uc_mcontext.gregs[ECX]) #define EDX_sig(context) ((context)->uc_mcontext.gregs[EDX]) #define ESI_sig(context) ((context)->uc_mcontext.gregs[ESI]) #define EDI_sig(context) ((context)->uc_mcontext.gregs[EDI]) #define EBP_sig(context) ((context)->uc_mcontext.gregs[EBP]) #define CS_sig(context) ((context)->uc_mcontext.gregs[CS]) #define DS_sig(context) ((context)->uc_mcontext.gregs[DS]) #define ES_sig(context) ((context)->uc_mcontext.gregs[ES]) #define SS_sig(context) ((context)->uc_mcontext.gregs[SS]) #define FS_sig(context) ((context)->uc_mcontext.gregs[FS]) #define GS_sig(context) ((context)->uc_mcontext.gregs[GS]) #define EFL_sig(context) ((context)->uc_mcontext.gregs[EFL]) #define EIP_sig(context) ((context)->uc_mcontext.gregs[EIP]) #ifdef R_ESP #define ESP_sig(context) ((context)->uc_mcontext.gregs[R_ESP]) #else #define ESP_sig(context) ((context)->uc_mcontext.gregs[ESP]) #endif #ifdef TRAPNO #define TRAP_sig(context) ((context)->uc_mcontext.gregs[TRAPNO]) #endif #endif /* svr4 || SCO_DS */ /* exception code definitions (already defined by FreeBSD) */ #ifndef __FreeBSD__ /* FIXME: other BSDs? */ #define T_DIVIDE 0 /* Division by zero exception */ #define T_TRCTRAP 1 /* Single-step exception */ #define T_NMI 2 /* NMI interrupt */ #define T_BPTFLT 3 /* Breakpoint exception */ #define T_OFLOW 4 /* Overflow exception */ #define T_BOUND 5 /* Bound range exception */ #define T_PRIVINFLT 6 /* Invalid opcode exception */ #define T_DNA 7 /* Device not available exception */ #define T_DOUBLEFLT 8 /* Double fault exception */ #define T_FPOPFLT 9 /* Coprocessor segment overrun */ #define T_TSSFLT 10 /* Invalid TSS exception */ #define T_SEGNPFLT 11 /* Segment not present exception */ #define T_STKFLT 12 /* Stack fault */ #define T_PROTFLT 13 /* General protection fault */ #define T_PAGEFLT 14 /* Page fault */ #define T_RESERVED 15 /* Unknown exception */ #define T_ARITHTRAP 16 /* Floating point exception */ #define T_ALIGNFLT 17 /* Alignment check exception */ #define T_MCHK 18 /* Machine check exception */ #define T_CACHEFLT 19 /* Cache flush exception */ #endif #define T_UNKNOWN (-1) /* Unknown fault (TRAP_sig not defined) */ #include "wine/exception.h" #include "winnt.h" #include "stackframe.h" #include "global.h" #include "miscemu.h" #include "ntddk.h" #include "syslevel.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(seh) /*********************************************************************** * handler_init * * Initialization code for a signal handler. * Restores the proper %fs value for the current thread. */ static inline void handler_init( CONTEXT *context, const SIGCONTEXT *sigcontext ) { WORD fs; /* get %fs at time of the fault */ #ifdef FS_sig fs = FS_sig(sigcontext); #else fs = __get_fs(); #endif context->SegFs = fs; /* now restore a proper %fs for the fault handler */ if (!IS_SELECTOR_SYSTEM(CS_sig(sigcontext))) fs = SYSLEVEL_Win16CurrentTeb; if (!fs) fs = SYSLEVEL_EmergencyTeb; __set_fs(fs); } /*********************************************************************** * get_trap_code * * Get the trap code for a signal. */ static inline int get_trap_code( const SIGCONTEXT *sigcontext ) { #ifdef TRAP_sig return TRAP_sig(sigcontext); #else return T_UNKNOWN; /* unknown trap code */ #endif } /*********************************************************************** * save_context * * Set the register values from a sigcontext. */ static void save_context( CONTEXT *context, const SIGCONTEXT *sigcontext ) { context->Eax = EAX_sig(sigcontext); context->Ebx = EBX_sig(sigcontext); context->Ecx = ECX_sig(sigcontext); context->Edx = EDX_sig(sigcontext); context->Esi = ESI_sig(sigcontext); context->Edi = EDI_sig(sigcontext); context->Ebp = EBP_sig(sigcontext); context->EFlags = EFL_sig(sigcontext); context->Eip = EIP_sig(sigcontext); context->Esp = ESP_sig(sigcontext); context->SegCs = LOWORD(CS_sig(sigcontext)); context->SegDs = LOWORD(DS_sig(sigcontext)); context->SegEs = LOWORD(ES_sig(sigcontext)); context->SegSs = LOWORD(SS_sig(sigcontext)); /* %fs already handled in handler_init */ #ifdef GS_sig context->SegGs = LOWORD(GS_sig(sigcontext)); #else context->SegGs = __get_gs(); #endif if (ISV86(context)) V86BASE(context) = (DWORD)DOSMEM_MemoryBase(0); } /*********************************************************************** * restore_context * * Build a sigcontext from the register values. */ static void restore_context( const CONTEXT *context, SIGCONTEXT *sigcontext ) { EAX_sig(sigcontext) = context->Eax; EBX_sig(sigcontext) = context->Ebx; ECX_sig(sigcontext) = context->Ecx; EDX_sig(sigcontext) = context->Edx; ESI_sig(sigcontext) = context->Esi; EDI_sig(sigcontext) = context->Edi; EBP_sig(sigcontext) = context->Ebp; EFL_sig(sigcontext) = context->EFlags; EIP_sig(sigcontext) = context->Eip; ESP_sig(sigcontext) = context->Esp; CS_sig(sigcontext) = context->SegCs; DS_sig(sigcontext) = context->SegDs; ES_sig(sigcontext) = context->SegEs; SS_sig(sigcontext) = context->SegSs; #ifdef FS_sig FS_sig(sigcontext) = context->SegFs; #else __set_fs( context->SegFs ); #endif #ifdef GS_sig GS_sig(sigcontext) = context->SegGs; #else __set_gs( context->SegGs ); #endif } /*********************************************************************** * save_fpu * * Set the FPU context from a sigcontext. */ static void inline save_fpu( CONTEXT *context, const SIGCONTEXT *sigcontext ) { #ifdef FPU_sig if (FPU_sig(sigcontext)) { context->FloatSave = *FPU_sig(sigcontext); return; } #endif /* FPU_sig */ #ifdef __GNUC__ __asm__ __volatile__( "fnsave %0; fwait" : "=m" (context->FloatSave) ); #endif /* __GNUC__ */ } /*********************************************************************** * restore_fpu * * Restore the FPU context to a sigcontext. */ static void inline restore_fpu( CONTEXT *context, const SIGCONTEXT *sigcontext ) { #ifdef FPU_sig if (FPU_sig(sigcontext)) { *FPU_sig(sigcontext) = context->FloatSave; return; } #endif /* FPU_sig */ #ifdef __GNUC__ /* avoid nested exceptions */ context->FloatSave.StatusWord &= context->FloatSave.ControlWord | 0xffffff80; __asm__ __volatile__( "frstor %0; fwait" : : "m" (context->FloatSave) ); #endif /* __GNUC__ */ } /********************************************************************** * get_fpu_code * * Get the FPU exception code from the FPU status. */ static inline DWORD get_fpu_code( const CONTEXT *context ) { DWORD status = context->FloatSave.StatusWord; if (status & 0x01) /* IE */ { if (status & 0x40) /* SF */ return EXCEPTION_FLT_STACK_CHECK; else return EXCEPTION_FLT_INVALID_OPERATION; } if (status & 0x02) return EXCEPTION_FLT_DENORMAL_OPERAND; /* DE flag */ if (status & 0x04) return EXCEPTION_FLT_DIVIDE_BY_ZERO; /* ZE flag */ if (status & 0x08) return EXCEPTION_FLT_OVERFLOW; /* OE flag */ if (status & 0x10) return EXCEPTION_FLT_UNDERFLOW; /* UE flag */ if (status & 0x20) return EXCEPTION_FLT_INEXACT_RESULT; /* PE flag */ return EXCEPTION_FLT_INVALID_OPERATION; /* generic error */ } /********************************************************************** * segv_handler * * Handler for SIGSEGV and related errors. */ static HANDLER_DEF(segv_handler) { EXCEPTION_RECORD rec; CONTEXT context; DWORD page_fault_code = EXCEPTION_ACCESS_VIOLATION; handler_init( &context, HANDLER_CONTEXT ); #ifdef CR2_sig /* we want the page-fault case to be fast */ if (get_trap_code(HANDLER_CONTEXT) == T_PAGEFLT) if (!(page_fault_code = VIRTUAL_HandleFault( (LPVOID)CR2_sig(HANDLER_CONTEXT) ))) return; #endif save_context( &context, HANDLER_CONTEXT ); rec.ExceptionRecord = NULL; rec.ExceptionFlags = EXCEPTION_CONTINUABLE; rec.ExceptionAddress = (LPVOID)context.Eip; rec.NumberParameters = 0; switch(get_trap_code(HANDLER_CONTEXT)) { case T_OFLOW: /* Overflow exception */ rec.ExceptionCode = EXCEPTION_INT_OVERFLOW; break; case T_BOUND: /* Bound range exception */ rec.ExceptionCode = EXCEPTION_ARRAY_BOUNDS_EXCEEDED; break; case T_PRIVINFLT: /* Invalid opcode exception */ rec.ExceptionCode = EXCEPTION_ILLEGAL_INSTRUCTION; break; case T_STKFLT: /* Stack fault */ rec.ExceptionCode = EXCEPTION_STACK_OVERFLOW; break; case T_SEGNPFLT: /* Segment not present exception */ case T_PROTFLT: /* General protection fault */ case T_UNKNOWN: /* Unknown fault code */ if (INSTR_EmulateInstruction( &context )) goto restore; rec.ExceptionCode = EXCEPTION_PRIV_INSTRUCTION; break; case T_PAGEFLT: /* Page fault */ #ifdef CR2_sig rec.NumberParameters = 2; #ifdef ERROR_sig rec.ExceptionInformation[0] = (ERROR_sig(HANDLER_CONTEXT) & 2) != 0; #else rec.ExceptionInformation[0] = 0; #endif /* ERROR_sig */ rec.ExceptionInformation[1] = CR2_sig(HANDLER_CONTEXT); #endif /* CR2_sig */ rec.ExceptionCode = page_fault_code; break; case T_ALIGNFLT: /* Alignment check exception */ /* FIXME: pass through exception handler first? */ if (context.EFlags & 0x00040000) { /* Disable AC flag, return */ context.EFlags &= ~0x00040000; goto restore; } rec.ExceptionCode = EXCEPTION_DATATYPE_MISALIGNMENT; break; default: ERR( "Got unexpected trap %d\n", get_trap_code(HANDLER_CONTEXT) ); /* fall through */ case T_NMI: /* NMI interrupt */ case T_DNA: /* Device not available exception */ case T_DOUBLEFLT: /* Double fault exception */ case T_TSSFLT: /* Invalid TSS exception */ case T_RESERVED: /* Unknown exception */ case T_MCHK: /* Machine check exception */ #ifdef T_CACHEFLT case T_CACHEFLT: /* Cache flush exception */ #endif rec.ExceptionCode = EXCEPTION_ILLEGAL_INSTRUCTION; break; } EXC_RtlRaiseException( &rec, &context ); restore: restore_context( &context, HANDLER_CONTEXT ); } /********************************************************************** * trap_handler * * Handler for SIGTRAP. */ static HANDLER_DEF(trap_handler) { EXCEPTION_RECORD rec; CONTEXT context; handler_init( &context, HANDLER_CONTEXT ); save_context( &context, HANDLER_CONTEXT ); rec.ExceptionFlags = EXCEPTION_CONTINUABLE; rec.ExceptionRecord = NULL; rec.ExceptionAddress = (LPVOID)context.Eip; rec.NumberParameters = 0; switch(get_trap_code(HANDLER_CONTEXT)) { case T_TRCTRAP: /* Single-step exception */ rec.ExceptionCode = EXCEPTION_SINGLE_STEP; context.EFlags &= ~0x100; /* clear single-step flag */ break; case T_BPTFLT: /* Breakpoint exception */ rec.ExceptionAddress = (char *) rec.ExceptionAddress - 1; /* back up over the int3 instruction */ /* fall through */ default: rec.ExceptionCode = EXCEPTION_BREAKPOINT; break; } EXC_RtlRaiseException( &rec, &context ); restore_context( &context, HANDLER_CONTEXT ); } /********************************************************************** * fpe_handler * * Handler for SIGFPE. */ static HANDLER_DEF(fpe_handler) { EXCEPTION_RECORD rec; CONTEXT context; handler_init( &context, HANDLER_CONTEXT ); save_fpu( &context, HANDLER_CONTEXT ); switch(get_trap_code(HANDLER_CONTEXT)) { case T_DIVIDE: /* Division by zero exception */ rec.ExceptionCode = EXCEPTION_INT_DIVIDE_BY_ZERO; break; case T_FPOPFLT: /* Coprocessor segment overrun */ rec.ExceptionCode = EXCEPTION_FLT_INVALID_OPERATION; break; case T_ARITHTRAP: /* Floating point exception */ case T_UNKNOWN: /* Unknown fault code */ rec.ExceptionCode = get_fpu_code( &context ); break; default: ERR( "Got unexpected trap %d\n", get_trap_code(HANDLER_CONTEXT) ); rec.ExceptionCode = EXCEPTION_FLT_INVALID_OPERATION; break; } save_context( &context, HANDLER_CONTEXT ); rec.ExceptionFlags = EXCEPTION_CONTINUABLE; rec.ExceptionRecord = NULL; rec.ExceptionAddress = (LPVOID)context.Eip; rec.NumberParameters = 0; EXC_RtlRaiseException( &rec, &context ); restore_context( &context, HANDLER_CONTEXT ); restore_fpu( &context, HANDLER_CONTEXT ); } /********************************************************************** * int_handler * * Handler for SIGINT. */ static HANDLER_DEF(int_handler) { EXCEPTION_RECORD rec; CONTEXT context; handler_init( &context, HANDLER_CONTEXT ); save_context( &context, HANDLER_CONTEXT ); rec.ExceptionCode = CONTROL_C_EXIT; rec.ExceptionFlags = EXCEPTION_CONTINUABLE; rec.ExceptionRecord = NULL; rec.ExceptionAddress = (LPVOID)context.Eip; rec.NumberParameters = 0; EXC_RtlRaiseException( &rec, &context ); restore_context( &context, HANDLER_CONTEXT ); } /*********************************************************************** * set_handler * * Set a signal handler */ static int set_handler( int sig, int have_sigaltstack, void (*func)() ) { struct sigaction sig_act; #ifdef linux if (!have_sigaltstack && NtCurrentTeb()->signal_stack) { struct kernel_sigaction sig_act; sig_act.ksa_handler = func; sig_act.ksa_flags = SA_RESTART | SA_NOMASK; sig_act.ksa_mask = 0; /* point to the top of the stack */ sig_act.ksa_restorer = (char *)NtCurrentTeb()->signal_stack + SIGNAL_STACK_SIZE; return wine_sigaction( sig, &sig_act, NULL ); } #endif /* linux */ sig_act.sa_handler = func; sigemptyset( &sig_act.sa_mask ); #ifdef linux sig_act.sa_flags = SA_RESTART | SA_NOMASK; #elif defined (__svr4__) || defined(_SCO_DS) sig_act.sa_flags = SA_SIGINFO | SA_RESTART; #else sig_act.sa_flags = 0; #endif #ifdef SA_ONSTACK if (have_sigaltstack) sig_act.sa_flags |= SA_ONSTACK; #endif return sigaction( sig, &sig_act, NULL ); } /********************************************************************** * SIGNAL_Init */ BOOL SIGNAL_Init(void) { int have_sigaltstack = 0; #ifdef HAVE_SIGALTSTACK struct sigaltstack ss; if ((ss.ss_sp = NtCurrentTeb()->signal_stack)) { ss.ss_size = SIGNAL_STACK_SIZE; ss.ss_flags = 0; if (!sigaltstack(&ss, NULL)) have_sigaltstack = 1; #ifdef linux /* sigaltstack may fail because the kernel is too old, or because glibc is brain-dead. In the latter case a direct system call should succeed. */ else if (!wine_sigaltstack(&ss, NULL)) have_sigaltstack = 1; #endif /* linux */ } #endif /* HAVE_SIGALTSTACK */ /* ignore SIGPIPE so that WINSOCK can get a EPIPE error instead */ signal( SIGPIPE, SIG_IGN ); /* automatic child reaping to avoid zombies */ signal( SIGCHLD, SIG_IGN ); if (set_handler( SIGINT, have_sigaltstack, (void (*)())int_handler ) == -1) goto error; if (set_handler( SIGFPE, have_sigaltstack, (void (*)())fpe_handler ) == -1) goto error; if (set_handler( SIGSEGV, have_sigaltstack, (void (*)())segv_handler ) == -1) goto error; if (set_handler( SIGILL, have_sigaltstack, (void (*)())segv_handler ) == -1) goto error; #ifdef SIGBUS if (set_handler( SIGBUS, have_sigaltstack, (void (*)())segv_handler ) == -1) goto error; #endif #ifdef SIGTRAP if (set_handler( SIGTRAP, have_sigaltstack, (void (*)())trap_handler ) == -1) goto error; #endif return TRUE; error: perror("sigaction"); return FALSE; } /********************************************************************** * DbgBreakPoint (NTDLL) */ void WINAPI DbgBreakPoint(void); __ASM_GLOBAL_FUNC( DbgBreakPoint, "int $3; ret"); /********************************************************************** * DbgUserBreakPoint (NTDLL) */ void WINAPI DbgUserBreakPoint(void); __ASM_GLOBAL_FUNC( DbgUserBreakPoint, "int $3; ret"); #endif /* __i386__ */ wine-20000526/dlls/ntdll/signal_sparc.c0100644000175000001440000002421007013375034017327 0ustar julliardusers/* * Sparc signal handling routines * * Copyright 1999 Ulrich Weigand */ #ifdef __sparc__ #include "config.h" #include #include #include #include #include #include "wine/exception.h" #include "winnt.h" #include "winbase.h" #include "global.h" #include "stackframe.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(seh) /* * FIXME: All this works only on Solaris for now */ /********************************************************************** * save_context */ static void save_context( CONTEXT *context, ucontext_t *ucontext ) { /* Special registers */ context->psr = ucontext->uc_mcontext.gregs[REG_PSR]; context->pc = ucontext->uc_mcontext.gregs[REG_PC]; context->npc = ucontext->uc_mcontext.gregs[REG_nPC]; context->y = ucontext->uc_mcontext.gregs[REG_Y]; context->wim = 0; /* FIXME */ context->tbr = 0; /* FIXME */ /* Global registers */ context->g0 = 0; /* always */ context->g1 = ucontext->uc_mcontext.gregs[REG_G1]; context->g2 = ucontext->uc_mcontext.gregs[REG_G2]; context->g3 = ucontext->uc_mcontext.gregs[REG_G3]; context->g4 = ucontext->uc_mcontext.gregs[REG_G4]; context->g5 = ucontext->uc_mcontext.gregs[REG_G5]; context->g6 = ucontext->uc_mcontext.gregs[REG_G6]; context->g7 = ucontext->uc_mcontext.gregs[REG_G7]; /* Current 'out' registers */ context->o0 = ucontext->uc_mcontext.gregs[REG_O0]; context->o1 = ucontext->uc_mcontext.gregs[REG_O1]; context->o2 = ucontext->uc_mcontext.gregs[REG_O2]; context->o3 = ucontext->uc_mcontext.gregs[REG_O3]; context->o4 = ucontext->uc_mcontext.gregs[REG_O4]; context->o5 = ucontext->uc_mcontext.gregs[REG_O5]; context->o6 = ucontext->uc_mcontext.gregs[REG_O6]; context->o7 = ucontext->uc_mcontext.gregs[REG_O7]; /* FIXME: what if the current register window isn't saved? */ if ( ucontext->uc_mcontext.gwins && ucontext->uc_mcontext.gwins->wbcnt > 0 ) { /* Current 'local' registers from first register window */ context->l0 = ucontext->uc_mcontext.gwins->wbuf[0].rw_local[0]; context->l1 = ucontext->uc_mcontext.gwins->wbuf[0].rw_local[1]; context->l2 = ucontext->uc_mcontext.gwins->wbuf[0].rw_local[2]; context->l3 = ucontext->uc_mcontext.gwins->wbuf[0].rw_local[3]; context->l4 = ucontext->uc_mcontext.gwins->wbuf[0].rw_local[4]; context->l5 = ucontext->uc_mcontext.gwins->wbuf[0].rw_local[5]; context->l6 = ucontext->uc_mcontext.gwins->wbuf[0].rw_local[6]; context->l7 = ucontext->uc_mcontext.gwins->wbuf[0].rw_local[7]; /* Current 'in' registers from first register window */ context->i0 = ucontext->uc_mcontext.gwins->wbuf[0].rw_in[0]; context->i1 = ucontext->uc_mcontext.gwins->wbuf[0].rw_in[1]; context->i2 = ucontext->uc_mcontext.gwins->wbuf[0].rw_in[2]; context->i3 = ucontext->uc_mcontext.gwins->wbuf[0].rw_in[3]; context->i4 = ucontext->uc_mcontext.gwins->wbuf[0].rw_in[4]; context->i5 = ucontext->uc_mcontext.gwins->wbuf[0].rw_in[5]; context->i6 = ucontext->uc_mcontext.gwins->wbuf[0].rw_in[6]; context->i7 = ucontext->uc_mcontext.gwins->wbuf[0].rw_in[7]; } } /********************************************************************** * restore_context */ static void restore_context( CONTEXT *context, ucontext_t *ucontext ) { /* FIXME */ } /********************************************************************** * save_fpu */ static void save_fpu( CONTEXT *context, ucontext_t *ucontext ) { /* FIXME */ } /********************************************************************** * restore_fpu */ static void restore_fpu( CONTEXT *context, ucontext_t *ucontext ) { /* FIXME */ } /********************************************************************** * segv_handler * * Handler for SIGSEGV. */ static void segv_handler( int signal, siginfo_t *info, ucontext_t *ucontext ) { EXCEPTION_RECORD rec; CONTEXT context; /* we want the page-fault case to be fast */ if ( info->si_code == SEGV_ACCERR ) if (VIRTUAL_HandleFault( (LPVOID)info->si_addr )) return; save_context( &context, ucontext ); rec.ExceptionCode = EXCEPTION_ACCESS_VIOLATION; rec.ExceptionRecord = NULL; rec.ExceptionFlags = EXCEPTION_CONTINUABLE; rec.ExceptionAddress = (LPVOID)context.pc; rec.NumberParameters = 2; rec.ExceptionInformation[0] = 0; /* FIXME: read/write access ? */ rec.ExceptionInformation[1] = (DWORD)info->si_addr; EXC_RtlRaiseException( &rec, &context ); restore_context( &context, ucontext ); } /********************************************************************** * bus_handler * * Handler for SIGBUS. */ static void bus_handler( int signal, siginfo_t *info, ucontext_t *ucontext ) { EXCEPTION_RECORD rec; CONTEXT context; save_context( &context, ucontext ); rec.ExceptionRecord = NULL; rec.ExceptionFlags = EXCEPTION_CONTINUABLE; rec.ExceptionAddress = (LPVOID)context.pc; rec.NumberParameters = 0; if ( info->si_code == BUS_ADRALN ) rec.ExceptionCode = EXCEPTION_DATATYPE_MISALIGNMENT; else rec.ExceptionCode = EXCEPTION_ACCESS_VIOLATION; EXC_RtlRaiseException( &rec, &context ); restore_context( &context, ucontext ); } /********************************************************************** * ill_handler * * Handler for SIGILL. */ static void ill_handler( int signal, siginfo_t *info, ucontext_t *ucontext ) { EXCEPTION_RECORD rec; CONTEXT context; switch ( info->si_code ) { default: case ILL_ILLOPC: case ILL_ILLOPN: case ILL_ILLADR: case ILL_ILLTRP: rec.ExceptionCode = EXCEPTION_ILLEGAL_INSTRUCTION; break; case ILL_PRVOPC: case ILL_PRVREG: rec.ExceptionCode = EXCEPTION_PRIV_INSTRUCTION; break; case ILL_BADSTK: rec.ExceptionCode = EXCEPTION_STACK_OVERFLOW; break; } save_context( &context, ucontext ); rec.ExceptionRecord = NULL; rec.ExceptionFlags = EXCEPTION_CONTINUABLE; rec.ExceptionAddress = (LPVOID)context.pc; rec.NumberParameters = 0; EXC_RtlRaiseException( &rec, &context ); restore_context( &context, ucontext ); } /********************************************************************** * trap_handler * * Handler for SIGTRAP. */ static void trap_handler( int signal, siginfo_t *info, ucontext_t *ucontext ) { EXCEPTION_RECORD rec; CONTEXT context; switch ( info->si_code ) { case TRAP_TRACE: rec.ExceptionCode = EXCEPTION_SINGLE_STEP; break; case TRAP_BRKPT: default: rec.ExceptionCode = EXCEPTION_BREAKPOINT; break; } save_context( &context, ucontext ); rec.ExceptionFlags = EXCEPTION_CONTINUABLE; rec.ExceptionRecord = NULL; rec.ExceptionAddress = (LPVOID)context.pc; rec.NumberParameters = 0; EXC_RtlRaiseException( &rec, &context ); restore_context( &context, ucontext ); } /********************************************************************** * fpe_handler * * Handler for SIGFPE. */ static void fpe_handler( int signal, siginfo_t *info, ucontext_t *ucontext ) { EXCEPTION_RECORD rec; CONTEXT context; switch ( info->si_code ) { case FPE_FLTSUB: rec.ExceptionCode = EXCEPTION_ARRAY_BOUNDS_EXCEEDED; break; case FPE_INTDIV: rec.ExceptionCode = EXCEPTION_INT_DIVIDE_BY_ZERO; break; case FPE_INTOVF: rec.ExceptionCode = EXCEPTION_INT_OVERFLOW; break; case FPE_FLTDIV: rec.ExceptionCode = EXCEPTION_FLT_DIVIDE_BY_ZERO; break; case FPE_FLTOVF: rec.ExceptionCode = EXCEPTION_FLT_OVERFLOW; break; case FPE_FLTUND: rec.ExceptionCode = EXCEPTION_FLT_UNDERFLOW; break; case FPE_FLTRES: rec.ExceptionCode = EXCEPTION_FLT_INEXACT_RESULT; break; case FPE_FLTINV: default: rec.ExceptionCode = EXCEPTION_FLT_INVALID_OPERATION; break; } save_context( &context, ucontext ); save_fpu( &context, ucontext ); rec.ExceptionFlags = EXCEPTION_CONTINUABLE; rec.ExceptionRecord = NULL; rec.ExceptionAddress = (LPVOID)context.pc; rec.NumberParameters = 0; EXC_RtlRaiseException( &rec, &context ); restore_context( &context, ucontext ); restore_fpu( &context, ucontext ); } /********************************************************************** * int_handler * * Handler for SIGINT. */ static void int_handler( int signal, siginfo_t *info, ucontext_t *ucontext ) { EXCEPTION_RECORD rec; CONTEXT context; save_context( &context, ucontext ); rec.ExceptionCode = CONTROL_C_EXIT; rec.ExceptionFlags = EXCEPTION_CONTINUABLE; rec.ExceptionRecord = NULL; rec.ExceptionAddress = (LPVOID)context.pc; rec.NumberParameters = 0; EXC_RtlRaiseException( &rec, &context ); restore_context( &context, ucontext ); } /*********************************************************************** * set_handler * * Set a signal handler */ static int set_handler( int sig, void (*func)() ) { struct sigaction sig_act; sig_act.sa_handler = NULL; sig_act.sa_sigaction = func; sigemptyset( &sig_act.sa_mask ); sig_act.sa_flags = SA_SIGINFO; return sigaction( sig, &sig_act, NULL ); } /********************************************************************** * SIGNAL_Init */ BOOL SIGNAL_Init(void) { /* ignore SIGPIPE so that WINSOCK can get a EPIPE error instead */ signal( SIGPIPE, SIG_IGN ); /* automatic child reaping to avoid zombies */ signal( SIGCHLD, SIG_IGN ); if (set_handler( SIGINT, (void (*)())int_handler ) == -1) goto error; if (set_handler( SIGFPE, (void (*)())fpe_handler ) == -1) goto error; if (set_handler( SIGSEGV, (void (*)())segv_handler ) == -1) goto error; if (set_handler( SIGILL, (void (*)())ill_handler ) == -1) goto error; if (set_handler( SIGBUS, (void (*)())bus_handler ) == -1) goto error; if (set_handler( SIGTRAP, (void (*)())trap_handler ) == -1) goto error; return TRUE; error: perror("sigaction"); return FALSE; } #endif /* __sparc__ */ wine-20000526/dlls/ntdll/sync.c0100644000175000001440000001432107044642146015645 0ustar julliardusers/* * Process synchronisation */ #include #include #include #include #include "debugtools.h" #include "winerror.h" #include "server.h" #include "ntddk.h" #include "ntdll_misc.h" DEFAULT_DEBUG_CHANNEL(ntdll); /* copy a key name into the request buffer */ static inline NTSTATUS copy_nameU( LPWSTR Dest, const OBJECT_ATTRIBUTES *attr ) { if (attr && attr->ObjectName && attr->ObjectName->Buffer) { if ((attr->ObjectName->Length) > MAX_PATH) return STATUS_BUFFER_OVERFLOW; lstrcpyW( Dest, attr->ObjectName->Buffer ); } else Dest[0] = 0; return STATUS_SUCCESS; } /* * Semaphores */ /****************************************************************************** * NtCreateSemaphore */ NTSTATUS WINAPI NtCreateSemaphore( OUT PHANDLE SemaphoreHandle, IN ACCESS_MASK DesiredAccess, IN POBJECT_ATTRIBUTES ObjectAttributes OPTIONAL, IN ULONG InitialCount, IN ULONG MaximumCount) { struct create_semaphore_request *req = get_req_buffer(); NTSTATUS ret; if ((MaximumCount <= 0) || (InitialCount < 0) || (InitialCount > MaximumCount)) return STATUS_INVALID_PARAMETER; *SemaphoreHandle = 0; req->initial = InitialCount; req->max = MaximumCount; req->inherit = ObjectAttributes && (ObjectAttributes->Attributes & OBJ_INHERIT); if (!(ret = copy_nameU( req->name, ObjectAttributes )) && !(ret = server_call_noerr( REQ_CREATE_SEMAPHORE ))) *SemaphoreHandle = req->handle; return ret; } /****************************************************************************** * NtOpenSemaphore */ NTSTATUS WINAPI NtOpenSemaphore( OUT PHANDLE SemaphoreHandle, IN ACCESS_MASK DesiredAcces, IN POBJECT_ATTRIBUTES ObjectAttributes) { struct open_semaphore_request *req = get_req_buffer(); NTSTATUS ret; *SemaphoreHandle = 0; req->access = DesiredAcces; req->inherit = ObjectAttributes && (ObjectAttributes->Attributes & OBJ_INHERIT); if (!(ret = copy_nameU( req->name, ObjectAttributes )) && !(ret = server_call_noerr( REQ_OPEN_SEMAPHORE ))) *SemaphoreHandle = req->handle; return ret; } /****************************************************************************** * NtQuerySemaphore */ NTSTATUS WINAPI NtQuerySemaphore( HANDLE SemaphoreHandle, PVOID SemaphoreInformationClass, OUT PVOID SemaphoreInformation, ULONG Length, PULONG ReturnLength) { FIXME("(0x%08x,%p,%p,0x%08lx,%p) stub!\n", SemaphoreHandle, SemaphoreInformationClass, SemaphoreInformation, Length, ReturnLength); return STATUS_SUCCESS; } /****************************************************************************** * NtReleaseSemaphore */ NTSTATUS WINAPI NtReleaseSemaphore( IN HANDLE SemaphoreHandle, IN ULONG ReleaseCount, IN PULONG PreviousCount) { struct release_semaphore_request *req = get_req_buffer(); NTSTATUS ret; if (ReleaseCount < 0) return STATUS_INVALID_PARAMETER; req->handle = SemaphoreHandle; req->count = ReleaseCount; if (!(ret = server_call_noerr( REQ_RELEASE_SEMAPHORE ))) { if (PreviousCount) *PreviousCount = req->prev_count; } return ret; } /* * Events */ /************************************************************************** * NtCreateEvent */ NTSTATUS WINAPI NtCreateEvent( OUT PHANDLE EventHandle, IN ACCESS_MASK DesiredAccess, IN POBJECT_ATTRIBUTES ObjectAttributes, IN BOOLEAN ManualReset, IN BOOLEAN InitialState) { struct create_event_request *req = get_req_buffer(); NTSTATUS ret; *EventHandle = 0; req->manual_reset = ManualReset; req->initial_state = InitialState; req->inherit = ObjectAttributes && (ObjectAttributes->Attributes & OBJ_INHERIT); if (!(ret = copy_nameU( req->name, ObjectAttributes )) && !(ret = server_call_noerr( REQ_CREATE_EVENT ))) *EventHandle = req->handle; return ret; } /****************************************************************************** * NtOpenEvent */ NTSTATUS WINAPI NtOpenEvent( OUT PHANDLE EventHandle, IN ACCESS_MASK DesiredAccess, IN POBJECT_ATTRIBUTES ObjectAttributes) { struct open_event_request *req = get_req_buffer(); NTSTATUS ret; *EventHandle = 0; req->access = DesiredAccess; req->inherit = ObjectAttributes && (ObjectAttributes->Attributes & OBJ_INHERIT); if (!(ret = copy_nameU( req->name, ObjectAttributes )) && !(ret = server_call_noerr( REQ_OPEN_EVENT ))) *EventHandle = req->handle; return ret; } /****************************************************************************** * NtSetEvent */ NTSTATUS WINAPI NtSetEvent( IN HANDLE EventHandle, PULONG NumberOfThreadsReleased) { struct event_op_request *req = get_req_buffer(); FIXME("(0x%08x,%p)\n", EventHandle, NumberOfThreadsReleased); req->handle = EventHandle; req->op = SET_EVENT; return server_call_noerr( REQ_EVENT_OP ); } /****************************************************************************** * NtResetEvent */ NTSTATUS WINAPI NtResetEvent( IN HANDLE EventHandle, PULONG NumberOfThreadsReleased) { struct event_op_request *req = get_req_buffer(); FIXME("(0x%08x,%p)\n", EventHandle, NumberOfThreadsReleased); req->handle = EventHandle; req->op = RESET_EVENT; return server_call_noerr( REQ_EVENT_OP ); } /****************************************************************************** * NtClearEvent * * FIXME * same as NtResetEvent ??? */ NTSTATUS WINAPI NtClearEvent ( IN HANDLE EventHandle) { return NtResetEvent( EventHandle, NULL ); } /****************************************************************************** * NtPulseEvent * * FIXME * PulseCount */ NTSTATUS WINAPI NtPulseEvent( IN HANDLE EventHandle, IN PULONG PulseCount) { struct event_op_request *req = get_req_buffer(); FIXME("(0x%08x,%p)\n", EventHandle, PulseCount); req->handle = EventHandle; req->op = PULSE_EVENT; return server_call_noerr( REQ_EVENT_OP ); } /****************************************************************************** * NtQueryEvent */ NTSTATUS WINAPI NtQueryEvent ( IN HANDLE EventHandle, IN UINT EventInformationClass, OUT PVOID EventInformation, IN ULONG EventInformationLength, OUT PULONG ReturnLength) { FIXME("(0x%08x)\n", EventHandle); return STATUS_SUCCESS; } wine-20000526/dlls/ntdll/time.c0100644000175000001440000001423207066752015015631 0ustar julliardusers/* * Conversion between Time and TimeFields * * RtlTimeToTimeFields, RtlTimeFieldsToTime and defines are taken from ReactOS and * adapted to wine with special permissions of the author * Rex Jolliff (rex@lvcablemodem.com) * * */ #include #include "ntddk.h" #include "debugtools.h" #include "file.h" DEFAULT_DEBUG_CHANNEL(ntdll) #define TICKSPERSEC 10000000 #define TICKSPERMSEC 10000 #define SECSPERDAY 86400 #define SECSPERHOUR 3600 #define SECSPERMIN 60 #define MINSPERHOUR 60 #define HOURSPERDAY 24 #define EPOCHWEEKDAY 0 #define DAYSPERWEEK 7 #define EPOCHYEAR 1601 #define DAYSPERNORMALYEAR 365 #define DAYSPERLEAPYEAR 366 #define MONSPERYEAR 12 static const int YearLengths[2] = {DAYSPERNORMALYEAR, DAYSPERLEAPYEAR}; static const int MonthLengths[2][MONSPERYEAR] = { { 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 }, { 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 } }; static inline int IsLeapYear(int Year) { return Year % 4 == 0 && (Year % 100 != 0 || Year % 400 == 0) ? 1 : 0; } static inline void NormalizeTimeFields(CSHORT *FieldToNormalize, CSHORT *CarryField,int Modulus) { *FieldToNormalize = (CSHORT) (*FieldToNormalize - Modulus); *CarryField = (CSHORT) (*CarryField + 1); } /****************************************************************************** * RtlTimeToTimeFields [NTDLL.265] * */ VOID WINAPI RtlTimeToTimeFields( PLARGE_INTEGER liTime, PTIME_FIELDS TimeFields) { const int *Months; int LeapSecondCorrections, SecondsInDay, CurYear; int LeapYear, CurMonth, GMTOffset; long int Days; long long int Time = *(long long int *)&liTime; /* Extract millisecond from time and convert time into seconds */ TimeFields->Milliseconds = (CSHORT) ((Time % TICKSPERSEC) / TICKSPERMSEC); Time = Time / TICKSPERSEC; /* FIXME: Compute the number of leap second corrections here */ LeapSecondCorrections = 0; /* FIXME: get the GMT offset here */ GMTOffset = 0; /* Split the time into days and seconds within the day */ Days = Time / SECSPERDAY; SecondsInDay = Time % SECSPERDAY; /* Adjust the values for GMT and leap seconds */ SecondsInDay += (GMTOffset - LeapSecondCorrections); while (SecondsInDay < 0) { SecondsInDay += SECSPERDAY; Days--; } while (SecondsInDay >= SECSPERDAY) { SecondsInDay -= SECSPERDAY; Days++; } /* compute time of day */ TimeFields->Hour = (CSHORT) (SecondsInDay / SECSPERHOUR); SecondsInDay = SecondsInDay % SECSPERHOUR; TimeFields->Minute = (CSHORT) (SecondsInDay / SECSPERMIN); TimeFields->Second = (CSHORT) (SecondsInDay % SECSPERMIN); /* FIXME: handle the possibility that we are on a leap second (i.e. Second = 60) */ /* compute day of week */ TimeFields->Weekday = (CSHORT) ((EPOCHWEEKDAY + Days) % DAYSPERWEEK); /* compute year */ CurYear = EPOCHYEAR; /* FIXME: handle calendar modifications */ while (1) { LeapYear = IsLeapYear(CurYear); if (Days < (long) YearLengths[LeapYear]) { break; } CurYear++; Days = Days - (long) YearLengths[LeapYear]; } TimeFields->Year = (CSHORT) CurYear; /* Compute month of year */ Months = MonthLengths[LeapYear]; for (CurMonth = 0; Days >= (long) Months[CurMonth]; CurMonth++) Days = Days - (long) Months[CurMonth]; TimeFields->Month = (CSHORT) (CurMonth + 1); TimeFields->Day = (CSHORT) (Days + 1); } /****************************************************************************** * RtlTimeFieldsToTime [NTDLL.265] * */ BOOLEAN WINAPI RtlTimeFieldsToTime( PTIME_FIELDS tfTimeFields, PLARGE_INTEGER Time) { int CurYear, CurMonth; long long int rcTime; TIME_FIELDS TimeFields = *tfTimeFields; rcTime = 0; /* FIXME: normalize the TIME_FIELDS structure here */ while (TimeFields.Second >= SECSPERMIN) { NormalizeTimeFields(&TimeFields.Second, &TimeFields.Minute, SECSPERMIN); } while (TimeFields.Minute >= MINSPERHOUR) { NormalizeTimeFields(&TimeFields.Minute, &TimeFields.Hour, MINSPERHOUR); } while (TimeFields.Hour >= HOURSPERDAY) { NormalizeTimeFields(&TimeFields.Hour, &TimeFields.Day, HOURSPERDAY); } while (TimeFields.Day > MonthLengths[IsLeapYear(TimeFields.Year)][TimeFields.Month - 1]) { NormalizeTimeFields(&TimeFields.Day, &TimeFields.Month, SECSPERMIN); } while (TimeFields.Month > MONSPERYEAR) { NormalizeTimeFields(&TimeFields.Month, &TimeFields.Year, MONSPERYEAR); } /* FIXME: handle calendar corrections here */ for (CurYear = EPOCHYEAR; CurYear < TimeFields.Year; CurYear++) { rcTime += YearLengths[IsLeapYear(CurYear)]; } for (CurMonth = 1; CurMonth < TimeFields.Month; CurMonth++) { rcTime += MonthLengths[IsLeapYear(CurYear)][CurMonth - 1]; } rcTime += TimeFields.Day - 1; rcTime *= SECSPERDAY; rcTime += TimeFields.Hour * SECSPERHOUR + TimeFields.Minute * SECSPERMIN + TimeFields.Second; rcTime *= TICKSPERSEC; rcTime += TimeFields.Milliseconds * TICKSPERMSEC; *Time = *(LARGE_INTEGER *)&rcTime; return TRUE; } /************* end of code by Rex Jolliff (rex@lvcablemodem.com) *******************/ /****************************************************************************** * RtlSystemTimeToLocalTime [NTDLL] */ VOID WINAPI RtlSystemTimeToLocalTime( IN PLARGE_INTEGER SystemTime, OUT PLARGE_INTEGER LocalTime) { FIXME("(%p, %p),stub!\n",SystemTime,LocalTime); memcpy (LocalTime, SystemTime, sizeof (PLARGE_INTEGER)); } /****************************************************************************** * RtlTimeToSecondsSince1980 [NTDLL] */ BOOLEAN WINAPI RtlTimeToSecondsSince1980( LPFILETIME ft, LPDWORD timeret) { /* 1980 = 1970+10*365 days + 29. februar 1972 + 29.februar 1976 */ *timeret = DOSFS_FileTimeToUnixTime(ft,NULL) - (10*365+2)*24*3600; return 1; } /****************************************************************************** * RtlTimeToSecondsSince1970 [NTDLL] */ BOOLEAN WINAPI RtlTimeToSecondsSince1970( LPFILETIME ft, LPDWORD timeret) { *timeret = DOSFS_FileTimeToUnixTime(ft,NULL); return 1; } /****************************************************************************** * RtlTimeToElapsedTimeFields [NTDLL.502] * FIXME: prototype guessed */ VOID WINAPI RtlTimeToElapsedTimeFields( PLARGE_INTEGER liTime, PTIME_FIELDS TimeFields) { FIXME("(%p,%p): stub\n",liTime,TimeFields); } wine-20000526/dlls/odbc32/0040755000175000001440000000000007113604177014465 5ustar julliarduserswine-20000526/dlls/odbc32/.cvsignore0100644000175000001440000000004307045213573016457 0ustar julliardusers*.spec.c Makefile libodbc32.so.1.0 wine-20000526/dlls/odbc32/Makefile.in0100644000175000001440000000032107060307301016511 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = odbc32 SOVERSION = 1.0 SPEC_SRCS = odbc32.spec C_SRCS = \ proxyodbc.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/odbc32/odbc32.spec0100644000175000001440000001724707034237646016432 0ustar julliardusersname odbc32 type win32 init MAIN_OdbcInit 001 stdcall SQLAllocConnect(long ptr) SQLAllocConnect 002 stdcall SQLAllocEnv(ptr) SQLAllocEnv 003 stdcall SQLAllocStmt(long ptr) SQLAllocStmt 004 stdcall SQLBindCol(long long long ptr long ptr) SQLBindCol 005 stdcall SQLCancel(long) SQLCancel 006 stdcall SQLColAttributes(long long long ptr long ptr ptr) SQLColAttributes 007 stdcall SQLConnect(long str long str long str long) SQLConnect 008 stdcall SQLDescribeCol(long long str long ptr ptr ptr ptr ptr) SQLDescribeCol 009 stdcall SQLDisconnect(long) SQLDisconnect 010 stdcall SQLError(long long long str ptr str long ptr) SQLError 011 stdcall SQLExecDirect(long str long) SQLExecDirect 012 stdcall SQLExecute(long) SQLExecute 013 stdcall SQLFetch(long) SQLFetch 014 stdcall SQLFreeConnect(long) SQLFreeConnect 015 stdcall SQLFreeEnv(long) SQLFreeEnv 016 stdcall SQLFreeStmt(long long ) SQLFreeStmt 017 stdcall SQLGetCursorName(long str long ptr) SQLGetCursorName 018 stdcall SQLNumResultCols(long ptr) SQLNumResultCols 019 stdcall SQLPrepare(long str long) SQLPrepare 020 stdcall SQLRowCount(long ptr) SQLRowCount 021 stdcall SQLSetCursorName(long str long) SQLSetCursorName 022 stdcall SQLSetParam(long long long long long long ptr ptr) SQLSetParam 023 stdcall SQLTransact(long long long) SQLTransact 024 stdcall SQLAllocHandle(long long ptr) SQLAllocHandle 025 stdcall SQLBindParam(long long long long long long ptr ptr) SQLBindParam 026 stdcall SQLCloseCursor(long) SQLCloseCursor 027 stdcall SQLColAttribute(long long long ptr long ptr ptr) SQLColAttribute 028 stdcall SQLCopyDesc(long long) SQLCopyDesc 029 stdcall SQLEndTran(long long long) SQLEndTran 030 stdcall SQLFetchScroll(long long long) SQLFetchScroll 031 stdcall SQLFreeHandle(long long) SQLFreeHandle 032 stdcall SQLGetConnectAttr(long long ptr long ptr) SQLGetConnectAttr 033 stdcall SQLGetDescField(long long long ptr long ptr) SQLGetDescField 034 stdcall SQLGetDescRec(long long str long ptr ptr ptr ptr ptr ptr ptr) SQLGetDescRec 035 stdcall SQLGetDiagField(long long long long ptr long ptr) SQLGetDiagField 036 stdcall SQLGetDiagRec(long long long str ptr str long ptr) SQLGetDiagRec 037 stdcall SQLGetEnvAttr(long long ptr long ptr) SQLGetEnvAttr 038 stdcall SQLGetStmtAttr(long long ptr long ptr) SQLGetStmtAttr 039 stdcall SQLSetConnectAttr(long long ptr long) SQLSetConnectAttr 040 stdcall SQLColumns(long str long str long str long str long) SQLColumns 041 stdcall SQLDriverConnect(long long str long str long str long) SQLDriverConnect 042 stdcall SQLGetConnectOption(long long ptr) SQLGetConnectOption 043 stdcall SQLGetData(long long long ptr long ptr) SQLGetData 044 stdcall SQLGetFunctions(long long ptr) SQLGetFunctions 045 stdcall SQLGetInfo(long long ptr long ptr) SQLGetInfo 046 stdcall SQLGetStmtOption(long long ptr) SQLGetStmtOption 047 stdcall SQLGetTypeInfo(long long) SQLGetTypeInfo 048 stdcall SQLParamData(long ptr) SQLParamData 049 stdcall SQLPutData(long ptr long) SQLPutData 050 stdcall SQLSetConnectOption(long long long) SQLSetConnectOption 051 stdcall SQLSetStmtOption(long long long) SQLSetStmtOption 052 stdcall SQLSpecialColumns(long long str long str long str long long long) SQLSpecialColumns 053 stdcall SQLStatistics(long str long str long str long long long) SQLStatistics 054 stdcall SQLTables(long str long str long str long str long) SQLTables 055 stdcall SQLBrowseConnect(long str long str long ptr) SQLBrowseConnect 056 stdcall SQLColumnPrivileges(long str long str long str long str long) SQLColumnPrivileges 057 stdcall SQLDataSources(long long str long ptr str long ptr) SQLDataSources 058 stdcall SQLDescribeParam(long long ptr ptr ptr ptr) SQLDescribeParam 059 stdcall SQLExtendedFetch(long long long ptr ptr) SQLExtendedFetch 060 stdcall SQLForeignKeys(long str long str long str long str long str long str long) SQLForeignKeys 061 stdcall SQLMoreResults(long) SQLMoreResults 062 stdcall SQLNativeSql(long str long str long ptr) SQLNativeSql 063 stdcall SQLNumParams(long ptr) SQLNumParams 064 stdcall SQLParamOptions(long long ptr) SQLParamOptions 065 stdcall SQLPrimaryKeys(long str long str long str long) SQLPrimaryKeys 066 stdcall SQLProcedureColumns(long str long str long str long str long) SQLProcedureColumns 067 stdcall SQLProcedures(long str long str long str long) SQLProcedures 068 stdcall SQLSetPos(long long long long) SQLSetPos 069 stdcall SQLSetScrollOptions(long long long long) SQLSetScrollOptions 070 stdcall SQLTablePrivileges(long str long str long str long) SQLTablePrivileges 071 stdcall SQLDrivers(long long str long ptr str long ptr) SQLDrivers 072 stdcall SQLBindParameter(long long long long long long long ptr long ptr) SQLBindParameter 073 stdcall SQLSetDescField(long long long ptr long) SQLSetDescField 074 stdcall SQLSetDescRec(long long long long long long long ptr ptr ptr) SQLSetDescRec 075 stdcall SQLSetEnvAttr(long long ptr long) SQLSetEnvAttr 076 stdcall SQLSetStmtAttr(long long ptr long) SQLSetStmtAttr 077 stdcall SQLAllocHandleStd(long long ptr) SQLAllocHandleStd 078 stdcall SQLBulkOperations(long long) SQLBulkOperations 079 stub CloseODBCPerfData 080 stub CollectODBCPerfData 081 stub CursorLibLockDbc 082 stub CursorLibLockDesc 083 stub CursorLibLockStmt 084 stub ODBCGetTryWaitValue 085 stub CursorLibTransact 086 stub ODBSetTryWaitValue 087 stub LockHandle 088 stub ODBCInternalConnectW 089 stub ODBCSharedPerfMon 090 stub ODBCSharedVSFlag 091 stub OpenODBCPerfData 092 stub PostComponentError 093 stub PostODBCComponentError 094 stub PostODBCError 095 stub SearchStatusCode 096 stub VFreeErrors 097 stub VRetrieveDriverErrorsRowCol 098 stub ValidateErrorQueue 099 stub SQLColAttributesW 100 stub SQLConnectW 101 stub SQLDescribeColW 102 stub SQLErrorW 103 stub SQLExecDirectW 104 stub SQLGetCursorNameW 105 stub SQLPrepareW 106 stub SQLSetCursorNameW 107 stub SQLColAttributeW 108 stub SQLGetConnectAttrW 109 stub SQLGetDescFieldW 110 stub SQLGetDescRecW 111 stub SQLGetDiagFieldW 112 stub SQLGetDiagRecW 113 stub SQLGetStmtAttrW 114 stub SQLSetConnectAttrW 115 stub SQLColumnsW 116 stub SQLDriverConnectW 117 stub SQLGetConnectOptionW 118 stub SQLGetInfoW 119 stub SQLGetTypeInfoW 120 stub SQLSetConnectOptionW 121 stub SQLSpecialColumnsW 122 stub SQLStatisticsW 123 stub SQLTablesW 124 stub SQLBrowseConnectW 125 stub SQLDataSourcesW 126 stub SQLColumnPrivilegesW 127 stub SQLForeignKeysW 128 stub SQLNativeSqlW 129 stub SQLPrimaryKeysW 130 stub SQLProcedureColumnsW 131 stub SQLProceduresW 132 stub SQLTablePrivilegesW 133 stub SQLDriversW 134 stub SQLSetDescFieldW 135 stub SQLSetStmtAttrW 136 stub SQLColAttributesA 137 stub SQLConnectA 138 stub SQLDescribeColA 139 stub SQLErrorA 140 stub SQLExecDirectA 141 stub SQLGetCursorNameA 142 stub SQLPrepareA 143 stub SQLSetCursorNameA 144 stub SQLColAttributeA 145 stub SQLGetConnectAttrA 146 stub SQLGetDescFieldA 147 stub SQLGetDescRecA 148 stub SQLGetDiagFieldA 149 stub SQLGetDiagRecA 150 stub SQLGetStmtAttrA 151 stub SQLSetConnectAttrA 152 stub SQLColumnsA 153 stub SQLDriverConnectA 154 stub SQLGetConnectOptionA 155 stub SQLGetInfoA 156 stub SQLGetTypeInfoA 157 stub SQLSetConnectOptionA 158 stub SQLSpecialColumnsA 159 stub SQLStatisticsA 160 stub SQLTablesA 161 stub SQLBrowseConnectA 162 stub SQLColumnPrivilegesA 163 stub SQLDataSourcesA 164 stub SQLForeignKeysA 165 stub SQLNativeSqlA 166 stub SQLPrimaryKeysA 167 stub SQLProcedureColumnsA 168 stub SQLProceduresA 169 stub SQLTablePrivilegesA 170 stub SQLDriversA 171 stub SQLSetDescFieldA 172 stub SQLSetStmtAttrA 173 stub ODBCSharedTraceFlag 174 stub ODBCQualifyFileDSNW wine-20000526/dlls/odbc32/proxyodbc.c0100644000175000001440000016273107066752015016653 0ustar julliardusers/* * Win32 ODBC functions * * Proxy ODBC driver manager. This manager delegates all ODBC calls to a real ODBC driver manager which is either: * 1) its name is defined in the environment variable LIB_ODBC_DRIVER_MANAGER * 2) if LIB_ODBC_DRIVER_MANAGER is not defined, a default library libodbc.so will be used. * * Xiang Li, Corel Corporation, Nov. 12, 1999 * */ #include #include #include #include #include "winbase.h" #include "debugtools.h" #ifndef _WINDOWS #define _WINDOWS #endif typedef char* GUID; /* This definition is in sqltypes.h, but if _WINDOWS is defined, this is skipped. */ #include "sql.h" #include "sqltypes.h" #include "sqlext.h" #include "proxyodbc.h" /*#define SQLRETURNTYPE SQLRETURN SQL_API*/ #define SQLRETURNTYPE SQLRETURN WINAPI DEFAULT_DEBUG_CHANNEL(odbc); static DM_FUNC template_func[] = { /* 00 */ { SQL_API_SQLALLOCCONNECT, "SQLAllocConnect", SQLAllocConnect }, /* 01 */ { SQL_API_SQLALLOCENV, "SQLAllocEnv", SQLAllocEnv }, /* 02 */ { SQL_API_SQLALLOCHANDLE, "SQLAllocHandle", SQLAllocHandle }, /* 03 */ { SQL_API_SQLALLOCSTMT, "SQLAllocStmt", SQLAllocStmt }, /* 04 */ { SQL_API_SQLALLOCHANDLESTD, "SQLAllocHandleStd", SQLAllocHandleStd }, /* 05 */ { SQL_API_SQLBINDCOL, "SQLBindCol", SQLBindCol }, /* 06 */ { SQL_API_SQLBINDPARAM, "SQLBindParam", SQLBindParam }, /* 07 */ { SQL_API_SQLBINDPARAMETER, "SQLBindParameter", SQLBindParameter }, /* 08 */ { SQL_API_SQLBROWSECONNECT, "SQLBrowseConnect", SQLBrowseConnect }, /* 09 */ { SQL_API_SQLBULKOPERATIONS, "SQLBulkOperations", SQLBulkOperations }, /* 10 */ { SQL_API_SQLCANCEL, "SQLCancel", SQLCancel }, /* 11 */ { SQL_API_SQLCLOSECURSOR, "SQLCloseCursor", SQLCloseCursor }, /* 12 */ { SQL_API_SQLCOLATTRIBUTE, "SQLColAttribute", SQLColAttribute }, /* 13 */ { SQL_API_SQLCOLATTRIBUTES, "SQLColAttributes", SQLColAttributes }, /* 14 */ { SQL_API_SQLCOLUMNPRIVILEGES, "SQLColumnPrivileges", SQLColumnPrivileges }, /* 15 */ { SQL_API_SQLCOLUMNS, "SQLColumns", SQLColumns }, /* 16 */ { SQL_API_SQLCONNECT, "SQLConnect", SQLConnect }, /* 17 */ { SQL_API_SQLCOPYDESC, "SQLCopyDesc", SQLCopyDesc }, /* 18 */ { SQL_API_SQLDATASOURCES, "SQLDataSources", SQLDataSources }, /* 19 */ { SQL_API_SQLDESCRIBECOL, "SQLDescribeCol", SQLDescribeCol }, /* 20 */ { SQL_API_SQLDESCRIBEPARAM, "SQLDescribeParam", SQLDescribeParam }, /* 21 */ { SQL_API_SQLDISCONNECT, "SQLDisconnect", SQLDisconnect }, /* 22 */ { SQL_API_SQLDRIVERCONNECT, "SQLDriverConnect", SQLDriverConnect }, /* 23 */ { SQL_API_SQLDRIVERS, "SQLDrivers", SQLDrivers }, /* 24 */ { SQL_API_SQLENDTRAN, "SQLEndTran", SQLEndTran }, /* 25 */ { SQL_API_SQLERROR, "SQLError", SQLError }, /* 26 */ { SQL_API_SQLEXECDIRECT, "SQLExecDirect", SQLExecDirect }, /* 27 */ { SQL_API_SQLEXECUTE, "SQLExecute", SQLExecute }, /* 28 */ { SQL_API_SQLEXTENDEDFETCH, "SQLExtendedFetch", SQLExtendedFetch }, /* 29 */ { SQL_API_SQLFETCH, "SQLFetch", SQLFetch }, /* 30 */ { SQL_API_SQLFETCHSCROLL, "SQLFetchScroll", SQLFetchScroll }, /* 31 */ { SQL_API_SQLFOREIGNKEYS, "SQLForeignKeys", SQLForeignKeys }, /* 32 */ { SQL_API_SQLFREEENV, "SQLFreeEnv", SQLFreeEnv }, /* 33 */ { SQL_API_SQLFREEHANDLE, "SQLFreeHandle", SQLFreeHandle }, /* 34 */ { SQL_API_SQLFREESTMT, "SQLFreeStmt", SQLFreeStmt }, /* 35 */ { SQL_API_SQLFREECONNECT, "SQLFreeConnect", SQLFreeConnect }, /* 36 */ { SQL_API_SQLGETCONNECTATTR, "SQLGetConnectAttr", SQLGetConnectAttr }, /* 37 */ { SQL_API_SQLGETCONNECTOPTION, "SQLGetConnectOption", SQLGetConnectOption }, /* 38 */ { SQL_API_SQLGETCURSORNAME, "SQLGetCursorName", SQLGetCursorName }, /* 39 */ { SQL_API_SQLGETDATA, "SQLGetData", SQLGetData }, /* 40 */ { SQL_API_SQLGETDESCFIELD, "SQLGetDescField", SQLGetDescField }, /* 41 */ { SQL_API_SQLGETDESCREC, "SQLGetDescRec", SQLGetDescRec }, /* 42 */ { SQL_API_SQLGETDIAGFIELD, "SQLGetDiagField", SQLGetDiagField }, /* 43 */ { SQL_API_SQLGETENVATTR, "SQLGetEnvAttr", SQLGetEnvAttr }, /* 44 */ { SQL_API_SQLGETFUNCTIONS, "SQLGetFunctions", SQLGetFunctions }, /* 45 */ { SQL_API_SQLGETINFO, "SQLGetInfo", SQLGetInfo }, /* 46 */ { SQL_API_SQLGETSTMTATTR, "SQLGetStmtAttr", SQLGetStmtAttr }, /* 47 */ { SQL_API_SQLGETSTMTOPTION, "SQLGetStmtOption", SQLGetStmtOption }, /* 48 */ { SQL_API_SQLGETTYPEINFO, "SQLGetTypeInfo", SQLGetTypeInfo }, /* 49 */ { SQL_API_SQLMORERESULTS, "SQLMoreResults", SQLMoreResults }, /* 50 */ { SQL_API_SQLNATIVESQL, "SQLNativeSql", SQLNativeSql }, /* 51 */ { SQL_API_SQLNUMPARAMS, "SQLNumParams", SQLNumParams }, /* 52 */ { SQL_API_SQLNUMRESULTCOLS, "SQLNumResultCols", SQLNumResultCols }, /* 53 */ { SQL_API_SQLPARAMDATA, "SQLParamData", SQLParamData }, /* 54 */ { SQL_API_SQLPARAMOPTIONS, "SQLParamOptions", SQLParamOptions }, /* 55 */ { SQL_API_SQLPREPARE, "SQLPrepare", SQLPrepare }, /* 56 */ { SQL_API_SQLPRIMARYKEYS, "SQLPrimaryKeys", SQLPrimaryKeys }, /* 57 */ { SQL_API_SQLPROCEDURECOLUMNS, "SQLProcedureColumns", SQLProcedureColumns }, /* 58 */ { SQL_API_SQLPROCEDURES, "SQLProcedures", SQLProcedures }, /* 59 */ { SQL_API_SQLPUTDATA, "SQLPutData", SQLPutData }, /* 60 */ { SQL_API_SQLROWCOUNT, "SQLRowCount", SQLRowCount }, /* 61 */ { SQL_API_SQLSETCONNECTATTR, "SQLSetConnectAttr", SQLSetConnectAttr }, /* 62 */ { SQL_API_SQLSETCONNECTOPTION, "SQLSetConnectOption", SQLSetConnectOption }, /* 63 */ { SQL_API_SQLSETCURSORNAME, "SQLSetCursorName", SQLSetCursorName }, /* 64 */ { SQL_API_SQLSETDESCFIELD, "SQLSetDescField", SQLSetDescField }, /* 65 */ { SQL_API_SQLSETDESCREC, "SQLSetDescRec", SQLSetDescRec }, /* 66 */ { SQL_API_SQLSETENVATTR, "SQLSetEnvAttr", SQLSetEnvAttr }, /* 67 */ { SQL_API_SQLSETPARAM, "SQLSetParam", SQLSetParam }, /* 68 */ { SQL_API_SQLSETPOS, "SQLSetPos", SQLSetPos }, /* 69 */ { SQL_API_SQLSETSCROLLOPTIONS, "SQLSetScrollOptions", SQLSetScrollOptions }, /* 70 */ { SQL_API_SQLSETSTMTATTR, "SQLSetStmtAttr", SQLSetStmtAttr }, /* 71 */ { SQL_API_SQLSETSTMTOPTION, "SQLSetStmtOption", SQLSetStmtOption }, /* 72 */ { SQL_API_SQLSPECIALCOLUMNS, "SQLSpecialColumns", SQLSpecialColumns }, /* 73 */ { SQL_API_SQLSTATISTICS, "SQLStatistics", SQLStatistics }, /* 74 */ { SQL_API_SQLTABLEPRIVILEGES, "SQLTablePrivileges", SQLTablePrivileges }, /* 75 */ { SQL_API_SQLTABLES, "SQLTables", SQLTables }, /* 76 */ { SQL_API_SQLTRANSACT, "SQLTransact", SQLTransact }, /* 77 */ { SQL_API_SQLGETDIAGREC, "SQLGetDiagRec", SQLGetDiagRec }, }; static PROXYHANDLE gProxyHandle = {NULL, FALSE, FALSE, FALSE, ERROR_LIBRARY_NOT_FOUND}; SQLRETURN SQLDummyFunc() { TRACE("SQLDummyFunc: \n"); return SQL_SUCCESS; } /*********************************************************************** * MAIN_OdbcInit [Internal] Initializes the internal 'ODBC32.DLL'. * * PARAMS * hinstDLL [I] handle to the 'dlls' instance * fdwReason [I] * lpvReserved [I] reserverd, must be NULL * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI MAIN_OdbcInit(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved) { int i; TRACE("Initializing proxy ODBC: %x,%lx,%p\n", hinstDLL, fdwReason, lpvReserved); if (fdwReason == DLL_PROCESS_ATTACH) { TRACE("Loading ODBC...\n"); if (ODBC_LoadDriverManager()) ODBC_LoadDMFunctions(); } else if (fdwReason == DLL_PROCESS_DETACH) { TRACE("Unloading ODBC...\n"); if (gProxyHandle.bFunctionReady) { for ( i = 0; i < NUM_SQLFUNC; i ++ ) { gProxyHandle.functions[i].func = SQLDummyFunc; } } if (gProxyHandle.dmHandle) { dlclose(gProxyHandle.dmHandle); gProxyHandle.dmHandle = NULL; } } return TRUE; } /*********************************************************************** * ODBC_LoadDriverManager [Internal] Load ODBC library. * * PARAMS * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL ODBC_LoadDriverManager() { char *s = getenv("LIB_ODBC_DRIVER_MANAGER"); TRACE("\n"); gProxyHandle.bFunctionReady = FALSE; if (s != NULL && strlen(s) > 0) strcpy(gProxyHandle.dmLibName, s); else strcpy(gProxyHandle.dmLibName, "libodbc.so"); gProxyHandle.dmHandle = dlopen(gProxyHandle.dmLibName, RTLD_LAZY); if (gProxyHandle.dmHandle == NULL) /* fail to load unixODBC driver manager */ { WARN("failed to open library %s\n", gProxyHandle.dmLibName); gProxyHandle.dmLibName[0] = '\0'; gProxyHandle.nErrorType = ERROR_LIBRARY_NOT_FOUND; return FALSE; } else { gProxyHandle.nErrorType = ERROR_FREE; return TRUE; } } /*********************************************************************** * ODBC_LoadDMFunctions [Internal] Populate function table. * * PARAMS * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL ODBC_LoadDMFunctions() { int i; if (gProxyHandle.dmHandle == NULL) return FALSE; for ( i = 0; i < NUM_SQLFUNC; i ++ ) { gProxyHandle.functions[i] = template_func[i]; gProxyHandle.functions[i].func = dlsym(gProxyHandle.dmHandle, gProxyHandle.functions[i].name); if (dlerror()) { ERR("Failed to load function %s",gProxyHandle.functions[i].name); gProxyHandle.functions[i].func = SQLDummyFunc; } } gProxyHandle.bFunctionReady = TRUE; return TRUE; } /************************************************************************* * SQLAllocConnect [ODBC32.001] */ SQLRETURNTYPE SQLAllocConnect(SQLHENV EnvironmentHandle, SQLHDBC *ConnectionHandle) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { *ConnectionHandle = SQL_NULL_HDBC; return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLALLOCCONNECT].func) (EnvironmentHandle, ConnectionHandle); } /************************************************************************* * SQLAllocEnv [ODBC32.002] */ SQLRETURNTYPE SQLAllocEnv(SQLHENV *EnvironmentHandle) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { *EnvironmentHandle = SQL_NULL_HENV; return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLALLOCENV].func) (EnvironmentHandle); } /************************************************************************* * SQLAllocHandle [ODBC32.024] */ SQLRETURNTYPE SQLAllocHandle(SQLSMALLINT HandleType, SQLHANDLE InputHandle, SQLHANDLE *OutputHandle) { TRACE(".\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { if (gProxyHandle.nErrorType == ERROR_LIBRARY_NOT_FOUND) WARN("ProxyODBC: Can not load ODBC driver manager library.\n"); if (HandleType == SQL_HANDLE_ENV) *OutputHandle = SQL_NULL_HENV; else if (HandleType == SQL_HANDLE_DBC) *OutputHandle = SQL_NULL_HDBC; else if (HandleType == SQL_HANDLE_STMT) *OutputHandle = SQL_NULL_HSTMT; else if (HandleType == SQL_HANDLE_DESC) *OutputHandle = SQL_NULL_HDESC; return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLALLOCHANDLE].func) (HandleType, InputHandle, OutputHandle); } /************************************************************************* * SQLAllocStmt [ODBC32.003] */ SQLRETURNTYPE SQLAllocStmt(SQLHDBC ConnectionHandle, SQLHSTMT *StatementHandle) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { *StatementHandle = SQL_NULL_HSTMT; return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLALLOCSTMT].func) (ConnectionHandle, StatementHandle); } /************************************************************************* * SQLAllocHandleStd [ODBC32.077] */ SQLRETURNTYPE SQLAllocHandleStd( SQLSMALLINT HandleType, SQLHANDLE InputHandle, SQLHANDLE *OutputHandle) { TRACE("ProxyODBC: SQLAllocHandelStd.\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { if (gProxyHandle.nErrorType == ERROR_LIBRARY_NOT_FOUND) WARN("ProxyODBC: Can not load ODBC driver manager library.\n"); if (HandleType == SQL_HANDLE_ENV) *OutputHandle = SQL_NULL_HENV; else if (HandleType == SQL_HANDLE_DBC) *OutputHandle = SQL_NULL_HDBC; else if (HandleType == SQL_HANDLE_STMT) *OutputHandle = SQL_NULL_HSTMT; else if (HandleType == SQL_HANDLE_DESC) *OutputHandle = SQL_NULL_HDESC; return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLALLOCHANDLESTD].func) (HandleType, InputHandle, OutputHandle); } /************************************************************************* * SQLBindCol [ODBC32.004] */ SQLRETURNTYPE SQLBindCol(SQLHSTMT StatementHandle, SQLUSMALLINT ColumnNumber, SQLSMALLINT TargetType, SQLPOINTER TargetValue, SQLINTEGER BufferLength, SQLINTEGER *StrLen_or_Ind) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLBINDCOL].func) (StatementHandle, ColumnNumber, TargetType, TargetValue, BufferLength, StrLen_or_Ind); } /************************************************************************* * SQLBindParam [ODBC32.025] */ SQLRETURNTYPE SQLBindParam(SQLHSTMT StatementHandle, SQLUSMALLINT ParameterNumber, SQLSMALLINT ValueType, SQLSMALLINT ParameterType, SQLUINTEGER LengthPrecision, SQLSMALLINT ParameterScale, SQLPOINTER ParameterValue, SQLINTEGER *StrLen_or_Ind) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLBINDPARAM].func) (StatementHandle, ParameterNumber, ValueType, ParameterScale, ParameterValue, StrLen_or_Ind); } /************************************************************************* * SQLCancel [ODBC32.005] */ SQLRETURNTYPE SQLCancel(SQLHSTMT StatementHandle) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLCANCEL].func) (StatementHandle); } /************************************************************************* * SQLCloseCursor [ODBC32.026] */ SQLRETURNTYPE SQLCloseCursor(SQLHSTMT StatementHandle) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLCLOSECURSOR].func) (StatementHandle); } /************************************************************************* * SQLColAttribute [ODBC32.027] */ SQLRETURNTYPE SQLColAttribute (SQLHSTMT StatementHandle, SQLUSMALLINT ColumnNumber, SQLUSMALLINT FieldIdentifier, SQLPOINTER CharacterAttribute, SQLSMALLINT BufferLength, SQLSMALLINT *StringLength, SQLPOINTER NumericAttribute) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLCOLATTRIBUTE].func) (StatementHandle, ColumnNumber, FieldIdentifier, CharacterAttribute, BufferLength, StringLength, NumericAttribute); } /************************************************************************* * SQLColumns [ODBC32.040] */ SQLRETURNTYPE SQLColumns(SQLHSTMT StatementHandle, SQLCHAR *CatalogName, SQLSMALLINT NameLength1, SQLCHAR *SchemaName, SQLSMALLINT NameLength2, SQLCHAR *TableName, SQLSMALLINT NameLength3, SQLCHAR *ColumnName, SQLSMALLINT NameLength4) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLCOLUMNS].func) (StatementHandle, CatalogName, NameLength1, SchemaName, NameLength2, TableName, NameLength3, ColumnName, NameLength4); } /************************************************************************* * SQLConnect [ODBC32.007] */ SQLRETURNTYPE SQLConnect(SQLHDBC ConnectionHandle, SQLCHAR *ServerName, SQLSMALLINT NameLength1, SQLCHAR *UserName, SQLSMALLINT NameLength2, SQLCHAR *Authentication, SQLSMALLINT NameLength3) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } strcpy(gProxyHandle.ServerName, ServerName); strcpy(gProxyHandle.UserName, UserName); return (gProxyHandle.functions[SQLAPI_INDEX_SQLCONNECT].func) (ConnectionHandle, ServerName, NameLength1, UserName, NameLength2, Authentication, NameLength3); } /************************************************************************* * SQLCopyDesc [ODBC32.028] */ SQLRETURNTYPE SQLCopyDesc(SQLHDESC SourceDescHandle, SQLHDESC TargetDescHandle) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLCOPYDESC].func) (SourceDescHandle, TargetDescHandle); } /************************************************************************* * SQLDataSources [ODBC32.057] */ SQLRETURNTYPE SQLDataSources(SQLHENV EnvironmentHandle, SQLUSMALLINT Direction, SQLCHAR *ServerName, SQLSMALLINT BufferLength1, SQLSMALLINT *NameLength1, SQLCHAR *Description, SQLSMALLINT BufferLength2, SQLSMALLINT *NameLength2) { SQLRETURN ret; TRACE("EnvironmentHandle = %p\n", (LPVOID)EnvironmentHandle); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { ERR("Error: empty dm handle (gProxyHandle.dmHandle == NULL)\n"); return SQL_ERROR; } ret = (gProxyHandle.functions[SQLAPI_INDEX_SQLDATASOURCES].func) (EnvironmentHandle, Direction, ServerName, BufferLength1, NameLength1, Description, BufferLength2, NameLength2); if (TRACE_ON(odbc)) { TRACE("returns: %d \t", ret); if (*NameLength1 > 0) TRACE("DataSource = %s,", ServerName); if (*NameLength2 > 0) TRACE(" Description = %s\n", Description); } return ret; } /************************************************************************* * SQLDescribeCol [ODBC32.008] */ SQLRETURNTYPE SQLDescribeCol(SQLHSTMT StatementHandle, SQLUSMALLINT ColumnNumber, SQLCHAR *ColumnName, SQLSMALLINT BufferLength, SQLSMALLINT *NameLength, SQLSMALLINT *DataType, SQLUINTEGER *ColumnSize, SQLSMALLINT *DecimalDigits, SQLSMALLINT *Nullable) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLDESCRIBECOL].func) (StatementHandle, ColumnNumber, ColumnName, BufferLength, NameLength, DataType, ColumnSize, DecimalDigits, Nullable); } /************************************************************************* * SQLDisconnect [ODBC32.009] */ SQLRETURNTYPE SQLDisconnect(SQLHDBC ConnectionHandle) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } gProxyHandle.ServerName[0] = '\0'; gProxyHandle.UserName[0] = '\0'; return (gProxyHandle.functions[SQLAPI_INDEX_SQLDISCONNECT].func) (ConnectionHandle); } /************************************************************************* * SQLEndTran [ODBC32.029] */ SQLRETURNTYPE SQLEndTran(SQLSMALLINT HandleType, SQLHANDLE Handle, SQLSMALLINT CompletionType) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLENDTRAN].func) (HandleType, Handle, CompletionType); } /************************************************************************* * SQLError [ODBC32.010] */ SQLRETURNTYPE SQLError(SQLHENV EnvironmentHandle, SQLHDBC ConnectionHandle, SQLHSTMT StatementHandle, SQLCHAR *Sqlstate, SQLINTEGER *NativeError, SQLCHAR *MessageText, SQLSMALLINT BufferLength, SQLSMALLINT *TextLength) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLERROR].func) (EnvironmentHandle, ConnectionHandle, StatementHandle, Sqlstate, NativeError, MessageText, BufferLength, TextLength); } /************************************************************************* * SQLExecDirect [ODBC32.011] */ SQLRETURNTYPE SQLExecDirect(SQLHSTMT StatementHandle, SQLCHAR *StatementText, SQLINTEGER TextLength) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLEXECDIRECT].func) (StatementHandle, StatementText, TextLength); } /************************************************************************* * SQLExecute [ODBC32.012] */ SQLRETURNTYPE SQLExecute(SQLHSTMT StatementHandle) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLEXECUTE].func) (StatementHandle); } /************************************************************************* * SQLFetch [ODBC32.013] */ SQLRETURNTYPE SQLFetch(SQLHSTMT StatementHandle) { TRACE("\n"); if (!gProxyHandle.bFunctionReady || gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLFETCH].func) (StatementHandle); } /************************************************************************* * SQLFetchScroll [ODBC32.030] */ SQLRETURNTYPE SQLFetchScroll(SQLHSTMT StatementHandle, SQLSMALLINT FetchOrientation, SQLINTEGER FetchOffset) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLFETCHSCROLL].func) (StatementHandle, FetchOrientation, FetchOffset); } /************************************************************************* * SQLFreeConnect [ODBC32.014] */ SQLRETURNTYPE SQLFreeConnect(SQLHDBC ConnectionHandle) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLFREECONNECT].func) (ConnectionHandle); } /************************************************************************* * SQLFreeEnv [ODBC32.015] */ SQLRETURNTYPE SQLFreeEnv(SQLHENV EnvironmentHandle) { SQLRETURN ret; TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } ret = (gProxyHandle.functions[SQLAPI_INDEX_SQLFREEENV].func) (EnvironmentHandle); /* if (gProxyHandle.dmHandle) { dlclose(gProxyHandle.dmHandle); gProxyHandle.dmHandle = NULL; } */ return ret; } /************************************************************************* * SQLFreeHandle [ODBC32.031] */ SQLRETURNTYPE SQLFreeHandle(SQLSMALLINT HandleType, SQLHANDLE Handle) { SQLRETURN ret; TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } ret = (gProxyHandle.functions[SQLAPI_INDEX_SQLFREEHANDLE].func) (HandleType, Handle); if (HandleType == SQL_HANDLE_ENV) /* it is time to close the loaded library */ { if (gProxyHandle.dmHandle) { dlclose(gProxyHandle.dmHandle); gProxyHandle.dmHandle = NULL; } } return ret; } /************************************************************************* * SQLFreeStmt [ODBC32.016] */ SQLRETURNTYPE SQLFreeStmt(SQLHSTMT StatementHandle, SQLUSMALLINT Option) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLFREESTMT].func) (StatementHandle, Option); } /************************************************************************* * SQLGetConnectAttr [ODBC32.032] */ SQLRETURNTYPE SQLGetConnectAttr(SQLHDBC ConnectionHandle, SQLINTEGER Attribute, SQLPOINTER Value, SQLINTEGER BufferLength, SQLINTEGER *StringLength) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLGETCONNECTATTR].func) (ConnectionHandle, Attribute, Value, BufferLength, StringLength); } /************************************************************************* * SQLGetConnectOption [ODBC32.042] */ SQLRETURNTYPE SQLGetConnectOption(SQLHDBC ConnectionHandle, SQLUSMALLINT Option, SQLPOINTER Value) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLGETCONNECTOPTION].func) (ConnectionHandle, Option, Value); } /************************************************************************* * SQLGetCursorName [ODBC32.017] */ SQLRETURNTYPE SQLGetCursorName(SQLHSTMT StatementHandle, SQLCHAR *CursorName, SQLSMALLINT BufferLength, SQLSMALLINT *NameLength) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLGETCURSORNAME].func) (StatementHandle, CursorName, BufferLength, NameLength); } /************************************************************************* * SQLGetData [ODBC32.043] */ SQLRETURNTYPE SQLGetData(SQLHSTMT StatementHandle, SQLUSMALLINT ColumnNumber, SQLSMALLINT TargetType, SQLPOINTER TargetValue, SQLINTEGER BufferLength, SQLINTEGER *StrLen_or_Ind) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLGETDATA].func) (StatementHandle, ColumnNumber, TargetType, TargetValue, BufferLength, StrLen_or_Ind); } /************************************************************************* * SQLGetDescField [ODBC32.033] */ SQLRETURNTYPE SQLGetDescField(SQLHDESC DescriptorHandle, SQLSMALLINT RecNumber, SQLSMALLINT FieldIdentifier, SQLPOINTER Value, SQLINTEGER BufferLength, SQLINTEGER *StringLength) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLGETDESCFIELD].func) (DescriptorHandle, RecNumber, FieldIdentifier, Value, BufferLength, StringLength); } /************************************************************************* * SQLGetDescRec [ODBC32.034] */ SQLRETURNTYPE SQLGetDescRec(SQLHDESC DescriptorHandle, SQLSMALLINT RecNumber, SQLCHAR *Name, SQLSMALLINT BufferLength, SQLSMALLINT *StringLength, SQLSMALLINT *Type, SQLSMALLINT *SubType, SQLINTEGER *Length, SQLSMALLINT *Precision, SQLSMALLINT *Scale, SQLSMALLINT *Nullable) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLGETDESCREC].func) (DescriptorHandle, RecNumber, Name, BufferLength, StringLength, Type, SubType, Length, Precision, Scale, Nullable); } /************************************************************************* * SQLGetDiagField [ODBC32.035] */ SQLRETURNTYPE SQLGetDiagField(SQLSMALLINT HandleType, SQLHANDLE Handle, SQLSMALLINT RecNumber, SQLSMALLINT DiagIdentifier, SQLPOINTER DiagInfo, SQLSMALLINT BufferLength, SQLSMALLINT *StringLength) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLGETDIAGFIELD].func) (HandleType, Handle, RecNumber, DiagIdentifier, DiagInfo, BufferLength, StringLength); } /************************************************************************* * SQLGetDiagRec [ODBC32.036] */ SQLRETURNTYPE SQLGetDiagRec(SQLSMALLINT HandleType, SQLHANDLE Handle, SQLSMALLINT RecNumber, SQLCHAR *Sqlstate, SQLINTEGER *NativeError, SQLCHAR *MessageText, SQLSMALLINT BufferLength, SQLSMALLINT *TextLength) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLGETDIAGREC].func) (HandleType, Handle, RecNumber, Sqlstate, NativeError, MessageText, BufferLength, TextLength); } /************************************************************************* * SQLGetEnvAttr [ODBC32.037] */ SQLRETURNTYPE SQLGetEnvAttr(SQLHENV EnvironmentHandle, SQLINTEGER Attribute, SQLPOINTER Value, SQLINTEGER BufferLength, SQLINTEGER *StringLength) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLGETENVATTR].func) (EnvironmentHandle, Attribute, Value, BufferLength, StringLength); } /************************************************************************* * SQLGetFunctions [ODBC32.044] */ SQLRETURNTYPE SQLGetFunctions(SQLHDBC ConnectionHandle, SQLUSMALLINT FunctionId, SQLUSMALLINT *Supported) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLGETFUNCTIONS].func) (ConnectionHandle, FunctionId, Supported); } /************************************************************************* * SQLGetInfo [ODBC32.045] */ SQLRETURNTYPE SQLGetInfo(SQLHDBC ConnectionHandle, SQLUSMALLINT InfoType, SQLPOINTER InfoValue, SQLSMALLINT BufferLength, SQLSMALLINT *StringLength) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLGETINFO].func) (ConnectionHandle, InfoType, InfoValue, BufferLength, StringLength); } /************************************************************************* * SQLGetStmtAttr [ODBC32.038] */ SQLRETURNTYPE SQLGetStmtAttr(SQLHSTMT StatementHandle, SQLINTEGER Attribute, SQLPOINTER Value, SQLINTEGER BufferLength, SQLINTEGER *StringLength) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLGETSTMTATTR].func) (StatementHandle, Attribute, Value, BufferLength, StringLength); } /************************************************************************* * SQLGetStmtOption [ODBC32.046] */ SQLRETURNTYPE SQLGetStmtOption(SQLHSTMT StatementHandle, SQLUSMALLINT Option, SQLPOINTER Value) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLGETSTMTOPTION].func) (StatementHandle, Option, Value); } /************************************************************************* * SQLGetTypeInfo [ODBC32.047] */ SQLRETURNTYPE SQLGetTypeInfo(SQLHSTMT StatementHandle, SQLSMALLINT DataType) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLGETTYPEINFO].func) (StatementHandle, DataType); } /************************************************************************* * SQLNumResultCols [ODBC32.018] */ SQLRETURNTYPE SQLNumResultCols(SQLHSTMT StatementHandle, SQLSMALLINT *ColumnCount) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLNUMRESULTCOLS].func) (StatementHandle, ColumnCount); } /************************************************************************* * SQLParamData [ODBC32.048] */ SQLRETURNTYPE SQLParamData(SQLHSTMT StatementHandle, SQLPOINTER *Value) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLPARAMDATA].func) (StatementHandle, Value); } /************************************************************************* * SQLPrepare [ODBC32.019] */ SQLRETURNTYPE SQLPrepare(SQLHSTMT StatementHandle, SQLCHAR *StatementText, SQLINTEGER TextLength) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLPREPARE].func) (StatementHandle, StatementText, TextLength); } /************************************************************************* * SQLPutData [ODBC32.049] */ SQLRETURNTYPE SQLPutData(SQLHSTMT StatementHandle, SQLPOINTER Data, SQLINTEGER StrLen_or_Ind) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLPUTDATA].func) (StatementHandle, Data, StrLen_or_Ind); } /************************************************************************* * SQLRowCount [ODBC32.020] */ SQLRETURNTYPE SQLRowCount(SQLHSTMT StatementHandle, SQLINTEGER *RowCount) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLROWCOUNT].func) (StatementHandle, RowCount); } /************************************************************************* * SQLSetConnectAttr [ODBC32.039] */ SQLRETURNTYPE SQLSetConnectAttr(SQLHDBC ConnectionHandle, SQLINTEGER Attribute, SQLPOINTER Value, SQLINTEGER StringLength) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLSETCONNECTATTR].func) (ConnectionHandle, Attribute, Value, StringLength); } /************************************************************************* * SQLSetConnectOption [ODBC32.050] */ SQLRETURNTYPE SQLSetConnectOption(SQLHDBC ConnectionHandle, SQLUSMALLINT Option, SQLUINTEGER Value) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLSETCONNECTOPTION].func) (ConnectionHandle, Option, Value); } /************************************************************************* * SQLSetCursorName [ODBC32.021] */ SQLRETURNTYPE SQLSetCursorName(SQLHSTMT StatementHandle, SQLCHAR *CursorName, SQLSMALLINT NameLength) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLSETCURSORNAME].func) (StatementHandle, CursorName, NameLength); } /************************************************************************* * SQLSetDescField [ODBC32.073] */ SQLRETURNTYPE SQLSetDescField(SQLHDESC DescriptorHandle, SQLSMALLINT RecNumber, SQLSMALLINT FieldIdentifier, SQLPOINTER Value, SQLINTEGER BufferLength) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLSETDESCFIELD].func) (DescriptorHandle, RecNumber, FieldIdentifier, Value, BufferLength); } /************************************************************************* * SQLSetDescRec [ODBC32.074] */ SQLRETURNTYPE SQLSetDescRec(SQLHDESC DescriptorHandle, SQLSMALLINT RecNumber, SQLSMALLINT Type, SQLSMALLINT SubType, SQLINTEGER Length, SQLSMALLINT Precision, SQLSMALLINT Scale, SQLPOINTER Data, SQLINTEGER *StringLength, SQLINTEGER *Indicator) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLSETDESCREC].func) (DescriptorHandle, RecNumber, Type, SubType, Length, Precision, Scale, Data, StringLength, Indicator); } /************************************************************************* * SQLSetEnvAttr [ODBC32.075] */ SQLRETURNTYPE SQLSetEnvAttr(SQLHENV EnvironmentHandle, SQLINTEGER Attribute, SQLPOINTER Value, SQLINTEGER StringLength) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLSETENVATTR].func) (EnvironmentHandle, Attribute, Value, StringLength); } /************************************************************************* * SQLSetParam [ODBC32.022] */ SQLRETURNTYPE SQLSetParam(SQLHSTMT StatementHandle, SQLUSMALLINT ParameterNumber, SQLSMALLINT ValueType, SQLSMALLINT ParameterType, SQLUINTEGER LengthPrecision, SQLSMALLINT ParameterScale, SQLPOINTER ParameterValue, SQLINTEGER *StrLen_or_Ind) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLSETPARAM].func) (StatementHandle, ParameterNumber, ValueType, ParameterType, LengthPrecision, ParameterScale, ParameterValue, StrLen_or_Ind); } /************************************************************************* * SQLSetStmtAttr [ODBC32.076] */ SQLRETURNTYPE SQLSetStmtAttr(SQLHSTMT StatementHandle, SQLINTEGER Attribute, SQLPOINTER Value, SQLINTEGER StringLength) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLSETSTMTATTR].func) (StatementHandle, Attribute, Value, StringLength); } /************************************************************************* * SQLSetStmtOption [ODBC32.051] */ SQLRETURNTYPE SQLSetStmtOption(SQLHSTMT StatementHandle, SQLUSMALLINT Option, SQLUINTEGER Value) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLSETSTMTOPTION].func) (StatementHandle, Option, Value); } /************************************************************************* * SQLSpecialColumns [ODBC32.052] */ SQLRETURNTYPE SQLSpecialColumns(SQLHSTMT StatementHandle, SQLUSMALLINT IdentifierType, SQLCHAR *CatalogName, SQLSMALLINT NameLength1, SQLCHAR *SchemaName, SQLSMALLINT NameLength2, SQLCHAR *TableName, SQLSMALLINT NameLength3, SQLUSMALLINT Scope, SQLUSMALLINT Nullable) { if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLSPECIALCOLUMNS].func) (StatementHandle, IdentifierType, CatalogName, NameLength1, SchemaName, NameLength2, TableName, NameLength3, Scope, Nullable); } /************************************************************************* * SQLStatistics [ODBC32.053] */ SQLRETURNTYPE SQLStatistics(SQLHSTMT StatementHandle, SQLCHAR *CatalogName, SQLSMALLINT NameLength1, SQLCHAR *SchemaName, SQLSMALLINT NameLength2, SQLCHAR *TableName, SQLSMALLINT NameLength3, SQLUSMALLINT Unique, SQLUSMALLINT Reserved) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLSTATISTICS].func) (StatementHandle, CatalogName, NameLength1, SchemaName, NameLength2, TableName, NameLength3, Unique, Reserved); } /************************************************************************* * SQLTables [ODBC32.054] */ SQLRETURNTYPE SQLTables(SQLHSTMT StatementHandle, SQLCHAR *CatalogName, SQLSMALLINT NameLength1, SQLCHAR *SchemaName, SQLSMALLINT NameLength2, SQLCHAR *TableName, SQLSMALLINT NameLength3, SQLCHAR *TableType, SQLSMALLINT NameLength4) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLTABLES].func) (StatementHandle, CatalogName, NameLength1, SchemaName, NameLength2, TableName, NameLength3, TableType, NameLength4); } /************************************************************************* * SQLTransact [ODBC32.023] */ SQLRETURNTYPE SQLTransact(SQLHENV EnvironmentHandle, SQLHDBC ConnectionHandle, SQLUSMALLINT CompletionType) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLTRANSACT].func) (EnvironmentHandle, ConnectionHandle, CompletionType); } /************************************************************************* * SQLBrowseConnect [ODBC32.055] */ SQLRETURNTYPE SQLBrowseConnect( SQLHDBC hdbc, SQLCHAR *szConnStrIn, SQLSMALLINT cbConnStrIn, SQLCHAR *szConnStrOut, SQLSMALLINT cbConnStrOutMax, SQLSMALLINT *pcbConnStrOut) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLBROWSECONNECT].func) (hdbc, szConnStrIn, cbConnStrIn, szConnStrOut, cbConnStrOutMax, pcbConnStrOut); } /************************************************************************* * SQLBulkOperations [ODBC32.078] */ SQLRETURNTYPE SQLBulkOperations( SQLHSTMT StatementHandle, SQLSMALLINT Operation) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLBULKOPERATIONS].func) (StatementHandle, Operation); } /************************************************************************* * SQLColAttributes [ODBC32.006] */ SQLRETURNTYPE SQLColAttributes( SQLHSTMT hstmt, SQLUSMALLINT icol, SQLUSMALLINT fDescType, SQLPOINTER rgbDesc, SQLSMALLINT cbDescMax, SQLSMALLINT *pcbDesc, SQLINTEGER *pfDesc) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLCOLATTRIBUTES].func) (hstmt, icol, fDescType, rgbDesc, cbDescMax, pcbDesc, pfDesc); } /************************************************************************* * SQLColumnPrivileges [ODBC32.056] */ SQLRETURNTYPE SQLColumnPrivileges( SQLHSTMT hstmt, SQLCHAR *szCatalogName, SQLSMALLINT cbCatalogName, SQLCHAR *szSchemaName, SQLSMALLINT cbSchemaName, SQLCHAR *szTableName, SQLSMALLINT cbTableName, SQLCHAR *szColumnName, SQLSMALLINT cbColumnName) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLCOLUMNPRIVILEGES].func) (hstmt, szCatalogName, cbCatalogName, szSchemaName, cbSchemaName, szTableName, cbTableName, szColumnName, cbColumnName); } /************************************************************************* * SQLDescribeParam [ODBC32.058] */ SQLRETURNTYPE SQLDescribeParam( SQLHSTMT hstmt, SQLUSMALLINT ipar, SQLSMALLINT *pfSqlType, SQLUINTEGER *pcbParamDef, SQLSMALLINT *pibScale, SQLSMALLINT *pfNullable) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLDESCRIBEPARAM].func) (hstmt, ipar, pfSqlType, pcbParamDef, pibScale, pfNullable); } /************************************************************************* * SQLExtendedFetch [ODBC32.059] */ SQLRETURNTYPE SQLExtendedFetch( SQLHSTMT hstmt, SQLUSMALLINT fFetchType, SQLINTEGER irow, SQLUINTEGER *pcrow, SQLUSMALLINT *rgfRowStatus) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLEXTENDEDFETCH].func) (hstmt, fFetchType, irow, pcrow, rgfRowStatus); } /************************************************************************* * SQLForeignKeys [ODBC32.060] */ SQLRETURNTYPE SQLForeignKeys( SQLHSTMT hstmt, SQLCHAR *szPkCatalogName, SQLSMALLINT cbPkCatalogName, SQLCHAR *szPkSchemaName, SQLSMALLINT cbPkSchemaName, SQLCHAR *szPkTableName, SQLSMALLINT cbPkTableName, SQLCHAR *szFkCatalogName, SQLSMALLINT cbFkCatalogName, SQLCHAR *szFkSchemaName, SQLSMALLINT cbFkSchemaName, SQLCHAR *szFkTableName, SQLSMALLINT cbFkTableName) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLFOREIGNKEYS].func) (hstmt, szPkCatalogName, cbPkCatalogName, szPkSchemaName, cbPkSchemaName, szPkTableName, cbPkTableName, szFkCatalogName, cbFkCatalogName, szFkSchemaName, cbFkSchemaName, szFkTableName, cbFkTableName); } /************************************************************************* * SQLMoreResults [ODBC32.061] */ SQLRETURNTYPE SQLMoreResults(SQLHSTMT hstmt) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLMORERESULTS].func) (hstmt); } /************************************************************************* * SQLNativeSql [ODBC32.062] */ SQLRETURNTYPE SQLNativeSql( SQLHDBC hdbc, SQLCHAR *szSqlStrIn, SQLINTEGER cbSqlStrIn, SQLCHAR *szSqlStr, SQLINTEGER cbSqlStrMax, SQLINTEGER *pcbSqlStr) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLNATIVESQL].func) (hdbc, szSqlStrIn, cbSqlStrIn, szSqlStr, cbSqlStrMax, pcbSqlStr); } /************************************************************************* * SQLNumParams [ODBC32.063] */ SQLRETURNTYPE SQLNumParams( SQLHSTMT hstmt, SQLSMALLINT *pcpar) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLNUMPARAMS].func) (hstmt, pcpar); } /************************************************************************* * SQLParamOptions [ODBC32.064] */ SQLRETURNTYPE SQLParamOptions( SQLHSTMT hstmt, SQLUINTEGER crow, SQLUINTEGER *pirow) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLPARAMOPTIONS].func) (hstmt, crow, pirow); } /************************************************************************* * SQLPrimaryKeys [ODBC32.065] */ SQLRETURNTYPE SQLPrimaryKeys( SQLHSTMT hstmt, SQLCHAR *szCatalogName, SQLSMALLINT cbCatalogName, SQLCHAR *szSchemaName, SQLSMALLINT cbSchemaName, SQLCHAR *szTableName, SQLSMALLINT cbTableName) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLPRIMARYKEYS].func) (hstmt, szCatalogName, cbCatalogName, szSchemaName, cbSchemaName, szTableName, cbTableName); } /************************************************************************* * SQLProcedureColumns [ODBC32.066] */ SQLRETURNTYPE SQLProcedureColumns( SQLHSTMT hstmt, SQLCHAR *szCatalogName, SQLSMALLINT cbCatalogName, SQLCHAR *szSchemaName, SQLSMALLINT cbSchemaName, SQLCHAR *szProcName, SQLSMALLINT cbProcName, SQLCHAR *szColumnName, SQLSMALLINT cbColumnName) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLPROCEDURECOLUMNS].func) (hstmt, szCatalogName, cbCatalogName, szSchemaName, cbSchemaName, szProcName, cbProcName, szColumnName, cbColumnName); } /************************************************************************* * SQLProcedures [ODBC32.067] */ SQLRETURNTYPE SQLProcedures( SQLHSTMT hstmt, SQLCHAR *szCatalogName, SQLSMALLINT cbCatalogName, SQLCHAR *szSchemaName, SQLSMALLINT cbSchemaName, SQLCHAR *szProcName, SQLSMALLINT cbProcName) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLPROCEDURES].func) (hstmt, szCatalogName, cbCatalogName, szSchemaName, cbSchemaName, szProcName, cbProcName); } /************************************************************************* * SQLSetPos [ODBC32.068] */ SQLRETURNTYPE SQLSetPos( SQLHSTMT hstmt, SQLUSMALLINT irow, SQLUSMALLINT fOption, SQLUSMALLINT fLock) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLSETPOS].func) (hstmt, irow, fOption, fLock); } /************************************************************************* * SQLTablePrivileges [ODBC32.070] */ SQLRETURNTYPE SQLTablePrivileges( SQLHSTMT hstmt, SQLCHAR *szCatalogName, SQLSMALLINT cbCatalogName, SQLCHAR *szSchemaName, SQLSMALLINT cbSchemaName, SQLCHAR *szTableName, SQLSMALLINT cbTableName) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLTABLEPRIVILEGES].func) (hstmt, szCatalogName, cbCatalogName, szSchemaName, cbSchemaName, szTableName, cbTableName); } /************************************************************************* * SQLDrivers [ODBC32.071] */ SQLRETURNTYPE SQLDrivers( SQLHENV henv, SQLUSMALLINT fDirection, SQLCHAR *szDriverDesc, SQLSMALLINT cbDriverDescMax, SQLSMALLINT *pcbDriverDesc, SQLCHAR *szDriverAttributes, SQLSMALLINT cbDriverAttrMax, SQLSMALLINT *pcbDriverAttr) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLDRIVERS].func) (henv, fDirection, szDriverDesc, cbDriverDescMax, pcbDriverDesc, szDriverAttributes, cbDriverAttrMax, pcbDriverAttr); } /************************************************************************* * SQLBindParameter [ODBC32.072] */ SQLRETURNTYPE SQLBindParameter( SQLHSTMT hstmt, SQLUSMALLINT ipar, SQLSMALLINT fParamType, SQLSMALLINT fCType, SQLSMALLINT fSqlType, SQLUINTEGER cbColDef, SQLSMALLINT ibScale, SQLPOINTER rgbValue, SQLINTEGER cbValueMax, SQLINTEGER *pcbValue) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLBINDPARAMETER].func) (hstmt, ipar, fParamType, fCType, fSqlType, cbColDef, ibScale, rgbValue, cbValueMax, pcbValue); } /************************************************************************* * SQLDriverConnect [ODBC32.041] */ SQLRETURNTYPE SQLDriverConnect( SQLHDBC hdbc, SQLHWND hwnd, SQLCHAR *conn_str_in, SQLSMALLINT len_conn_str_in, SQLCHAR *conn_str_out, SQLSMALLINT conn_str_out_max, SQLSMALLINT *ptr_conn_str_out, SQLUSMALLINT driver_completion ) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLDRIVERCONNECT].func) (hdbc, hwnd, conn_str_in, len_conn_str_in, conn_str_out, conn_str_out_max, ptr_conn_str_out, driver_completion); } /************************************************************************* * SQLSetScrollOptions [ODBC32.069] */ SQLRETURNTYPE SQLSetScrollOptions( SQLHSTMT statement_handle, SQLUSMALLINT f_concurrency, SQLINTEGER crow_keyset, SQLUSMALLINT crow_rowset ) { TRACE("\n"); if (gProxyHandle.dmHandle == NULL) { return SQL_ERROR; } return (gProxyHandle.functions[SQLAPI_INDEX_SQLSETSCROLLOPTIONS].func) (statement_handle, f_concurrency, crow_keyset, crow_rowset); } wine-20000526/dlls/odbc32/proxyodbc.h0100644000175000001440000001263107024562276016653 0ustar julliardusers#ifndef _PROXYMANAGER_H #define _PROXYMANAGER_H #define NUM_SQLFUNC 78 #define ERROR_FREE 0 #define ERROR_SQLERROR 1 #define ERROR_LIBRARY_NOT_FOUND 2 #define ERROR_FUNCTIONS_NOT_LOADED 3 #define ODBCVER 0x0351 typedef struct dm_func /* driver manager functions */ { int ordinal; char *name; void *d_func; SQLRETURN (*func)(); } DM_FUNC; typedef struct proxyhandle { void *dmHandle; /* driver manager handle */ BOOL isWindowsDriver; /* is driver a Windows version*/ BOOL bCallbackReady; /* procs taken from Windows driver placed in driver manager as callbacks */ BOOL bFunctionReady; int nErrorType; DM_FUNC functions[NUM_SQLFUNC]; /* entry point for driver manager functions */ char driverLibName[200]; /* ODBC driver SO name */ char dmLibName[200]; /* driver manager library name */ char ServerName[200]; /* keep server name */ char UserName[50]; /* keep username */ } PROXYHANDLE; BOOL ODBC_LoadDriverManager(); BOOL ODBC_LoadDMFunctions(); #define /* 00 */ SQLAPI_INDEX_SQLALLOCCONNECT 0 #define /* 01 */ SQLAPI_INDEX_SQLALLOCENV 1 #define /* 02 */ SQLAPI_INDEX_SQLALLOCHANDLE 2 #define /* 03 */ SQLAPI_INDEX_SQLALLOCSTMT 3 #define /* 04 */ SQLAPI_INDEX_SQLALLOCHANDLESTD 4 #define /* 05 */ SQLAPI_INDEX_SQLBINDCOL 5 #define /* 06 */ SQLAPI_INDEX_SQLBINDPARAM 6 #define /* 07 */ SQLAPI_INDEX_SQLBINDPARAMETER 7 #define /* 08 */ SQLAPI_INDEX_SQLBROWSECONNECT 8 #define /* 09 */ SQLAPI_INDEX_SQLBULKOPERATIONS 9 #define /* 10 */ SQLAPI_INDEX_SQLCANCEL 10 #define /* 11 */ SQLAPI_INDEX_SQLCLOSECURSOR 11 #define /* 12 */ SQLAPI_INDEX_SQLCOLATTRIBUTE 12 #define /* 13 */ SQLAPI_INDEX_SQLCOLATTRIBUTES 13 #define /* 14 */ SQLAPI_INDEX_SQLCOLUMNPRIVILEGES 14 #define /* 15 */ SQLAPI_INDEX_SQLCOLUMNS 15 #define /* 16 */ SQLAPI_INDEX_SQLCONNECT 16 #define /* 17 */ SQLAPI_INDEX_SQLCOPYDESC 17 #define /* 18 */ SQLAPI_INDEX_SQLDATASOURCES 18 #define /* 19 */ SQLAPI_INDEX_SQLDESCRIBECOL 19 #define /* 20 */ SQLAPI_INDEX_SQLDESCRIBEPARAM 20 #define /* 21 */ SQLAPI_INDEX_SQLDISCONNECT 21 #define /* 22 */ SQLAPI_INDEX_SQLDRIVERCONNECT 22 #define /* 23 */ SQLAPI_INDEX_SQLDRIVERS 23 #define /* 24 */ SQLAPI_INDEX_SQLENDTRAN 24 #define /* 25 */ SQLAPI_INDEX_SQLERROR 25 #define /* 26 */ SQLAPI_INDEX_SQLEXECDIRECT 26 #define /* 27 */ SQLAPI_INDEX_SQLEXECUTE 27 #define /* 28 */ SQLAPI_INDEX_SQLEXTENDEDFETCH 28 #define /* 29 */ SQLAPI_INDEX_SQLFETCH 29 #define /* 30 */ SQLAPI_INDEX_SQLFETCHSCROLL 30 #define /* 31 */ SQLAPI_INDEX_SQLFOREIGNKEYS 31 #define /* 32 */ SQLAPI_INDEX_SQLFREEENV 32 #define /* 33 */ SQLAPI_INDEX_SQLFREEHANDLE 33 #define /* 34 */ SQLAPI_INDEX_SQLFREESTMT 34 #define /* 35 */ SQLAPI_INDEX_SQLFREECONNECT 35 #define /* 36 */ SQLAPI_INDEX_SQLGETCONNECTATTR 36 #define /* 37 */ SQLAPI_INDEX_SQLGETCONNECTOPTION 37 #define /* 38 */ SQLAPI_INDEX_SQLGETCURSORNAME 38 #define /* 39 */ SQLAPI_INDEX_SQLGETDATA 39 #define /* 40 */ SQLAPI_INDEX_SQLGETDESCFIELD 40 #define /* 41 */ SQLAPI_INDEX_SQLGETDESCREC 41 #define /* 42 */ SQLAPI_INDEX_SQLGETDIAGFIELD 42 #define /* 43 */ SQLAPI_INDEX_SQLGETENVATTR 43 #define /* 44 */ SQLAPI_INDEX_SQLGETFUNCTIONS 44 #define /* 45 */ SQLAPI_INDEX_SQLGETINFO 45 #define /* 46 */ SQLAPI_INDEX_SQLGETSTMTATTR 46 #define /* 47 */ SQLAPI_INDEX_SQLGETSTMTOPTION 47 #define /* 48 */ SQLAPI_INDEX_SQLGETTYPEINFO 48 #define /* 49 */ SQLAPI_INDEX_SQLMORERESULTS 49 #define /* 50 */ SQLAPI_INDEX_SQLNATIVESQL 50 #define /* 51 */ SQLAPI_INDEX_SQLNUMPARAMS 51 #define /* 52 */ SQLAPI_INDEX_SQLNUMRESULTCOLS 52 #define /* 53 */ SQLAPI_INDEX_SQLPARAMDATA 53 #define /* 54 */ SQLAPI_INDEX_SQLPARAMOPTIONS 54 #define /* 55 */ SQLAPI_INDEX_SQLPREPARE 55 #define /* 56 */ SQLAPI_INDEX_SQLPRIMARYKEYS 56 #define /* 57 */ SQLAPI_INDEX_SQLPROCEDURECOLUMNS 57 #define /* 58 */ SQLAPI_INDEX_SQLPROCEDURES 58 #define /* 59 */ SQLAPI_INDEX_SQLPUTDATA 59 #define /* 60 */ SQLAPI_INDEX_SQLROWCOUNT 60 #define /* 61 */ SQLAPI_INDEX_SQLSETCONNECTATTR 61 #define /* 62 */ SQLAPI_INDEX_SQLSETCONNECTOPTION 62 #define /* 63 */ SQLAPI_INDEX_SQLSETCURSORNAME 63 #define /* 64 */ SQLAPI_INDEX_SQLSETDESCFIELD 64 #define /* 65 */ SQLAPI_INDEX_SQLSETDESCREC 65 #define /* 66 */ SQLAPI_INDEX_SQLSETENVATTR 66 #define /* 67 */ SQLAPI_INDEX_SQLSETPARAM 67 #define /* 68 */ SQLAPI_INDEX_SQLSETPOS 68 #define /* 69 */ SQLAPI_INDEX_SQLSETSCROLLOPTIONS 69 #define /* 70 */ SQLAPI_INDEX_SQLSETSTMTATTR 70 #define /* 71 */ SQLAPI_INDEX_SQLSETSTMTOPTION 71 #define /* 72 */ SQLAPI_INDEX_SQLSPECIALCOLUMNS 72 #define /* 73 */ SQLAPI_INDEX_SQLSTATISTICS 73 #define /* 74 */ SQLAPI_INDEX_SQLTABLEPRIVILEGES 74 #define /* 75 */ SQLAPI_INDEX_SQLTABLES 75 #define /* 76 */ SQLAPI_INDEX_SQLTRANSACT 76 #define /* 77 */ SQLAPI_INDEX_SQLGETDIAGREC 77 #endif wine-20000526/dlls/ole32/0040755000175000001440000000000007113604203014323 5ustar julliarduserswine-20000526/dlls/ole32/.cvsignore0100644000175000001440000000006007045213573016326 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libole32.so.1.0 wine-20000526/dlls/ole32/Makefile.in0100644000175000001440000000130407111133237016365 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = ole32 SOVERSION = 1.0 ALTNAMES = ole2 ole2nls ole2conv ole2prox ole2thk storage compobj SPEC_SRCS = ole32.spec ole2.spec ole2conv.spec ole2nls.spec \ ole2prox.spec ole2thk.spec storage.spec compobj.spec C_SRCS = \ antimoniker.c \ bindctx.c \ clipboard.c \ compobj.c \ compositemoniker.c \ datacache.c \ defaulthandler.c \ errorinfo.c \ filemoniker.c \ hglobalstream.c \ ifs.c \ itemmoniker.c \ memlockbytes.c \ moniker.c \ ole2.c \ ole2stubs.c \ ole2impl.c \ ole2nls.c \ oleobj.c \ stg_bigblockfile.c \ stg_stream.c \ storage.c \ storage32.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/ole32/antimoniker.c0100644000175000001440000005473706771226505017042 0ustar julliardusers/*************************************************************************************** * AntiMonikers implementation * * Copyright 1999 Noomen Hamza ***************************************************************************************/ #include #include "winbase.h" #include "winerror.h" #include "wine/obj_moniker.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ole) /* AntiMoniker data structure */ typedef struct AntiMonikerImpl{ ICOM_VTABLE(IMoniker)* lpvtbl1; /* VTable relative to the IMoniker interface.*/ /* The ROT (RunningObjectTable implementation) uses the IROTData interface to test whether * two monikers are equal. That's whay IROTData interface is implemented by monikers. */ ICOM_VTABLE(IROTData)* lpvtbl2; /* VTable relative to the IROTData interface.*/ ULONG ref; /* reference counter for this object */ } AntiMonikerImpl; /********************************************************************************/ /* AntiMoniker prototype functions : */ /* IUnknown prototype functions */ static HRESULT WINAPI AntiMonikerImpl_QueryInterface(IMoniker* iface,REFIID riid,void** ppvObject); static ULONG WINAPI AntiMonikerImpl_AddRef(IMoniker* iface); static ULONG WINAPI AntiMonikerImpl_Release(IMoniker* iface); /* IPersist prototype functions */ static HRESULT WINAPI AntiMonikerImpl_GetClassID(IMoniker* iface, CLSID *pClassID); /* IPersistStream prototype functions */ static HRESULT WINAPI AntiMonikerImpl_IsDirty(IMoniker* iface); static HRESULT WINAPI AntiMonikerImpl_Load(IMoniker* iface, IStream* pStm); static HRESULT WINAPI AntiMonikerImpl_Save(IMoniker* iface, IStream* pStm, BOOL fClearDirty); static HRESULT WINAPI AntiMonikerImpl_GetSizeMax(IMoniker* iface, ULARGE_INTEGER* pcbSize); /* IMoniker prototype functions */ static HRESULT WINAPI AntiMonikerImpl_BindToObject(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, REFIID riid, VOID** ppvResult); static HRESULT WINAPI AntiMonikerImpl_BindToStorage(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, REFIID riid, VOID** ppvResult); static HRESULT WINAPI AntiMonikerImpl_Reduce(IMoniker* iface,IBindCtx* pbc, DWORD dwReduceHowFar,IMoniker** ppmkToLeft, IMoniker** ppmkReduced); static HRESULT WINAPI AntiMonikerImpl_ComposeWith(IMoniker* iface,IMoniker* pmkRight,BOOL fOnlyIfNotGeneric, IMoniker** ppmkComposite); static HRESULT WINAPI AntiMonikerImpl_Enum(IMoniker* iface,BOOL fForward, IEnumMoniker** ppenumMoniker); static HRESULT WINAPI AntiMonikerImpl_IsEqual(IMoniker* iface,IMoniker* pmkOtherMoniker); static HRESULT WINAPI AntiMonikerImpl_Hash(IMoniker* iface,DWORD* pdwHash); static HRESULT WINAPI AntiMonikerImpl_IsRunning(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, IMoniker* pmkNewlyRunning); static HRESULT WINAPI AntiMonikerImpl_GetTimeOfLastChange(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, FILETIME* pAntiTime); static HRESULT WINAPI AntiMonikerImpl_Inverse(IMoniker* iface,IMoniker** ppmk); static HRESULT WINAPI AntiMonikerImpl_CommonPrefixWith(IMoniker* iface,IMoniker* pmkOther, IMoniker** ppmkPrefix); static HRESULT WINAPI AntiMonikerImpl_RelativePathTo(IMoniker* iface,IMoniker* pmOther, IMoniker** ppmkRelPath); static HRESULT WINAPI AntiMonikerImpl_GetDisplayName(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, LPOLESTR *ppszDisplayName); static HRESULT WINAPI AntiMonikerImpl_ParseDisplayName(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, LPOLESTR pszDisplayName, ULONG* pchEaten, IMoniker** ppmkOut); static HRESULT WINAPI AntiMonikerImpl_IsSystemMoniker(IMoniker* iface,DWORD* pwdMksys); /********************************************************************************/ /* IROTData prototype functions */ /* IUnknown prototype functions */ static HRESULT WINAPI AntiMonikerROTDataImpl_QueryInterface(IROTData* iface,REFIID riid,VOID** ppvObject); static ULONG WINAPI AntiMonikerROTDataImpl_AddRef(IROTData* iface); static ULONG WINAPI AntiMonikerROTDataImpl_Release(IROTData* iface); /* IROTData prototype function */ static HRESULT WINAPI AntiMonikerROTDataImpl_GetComparaisonData(IROTData* iface,BYTE* pbData,ULONG cbMax,ULONG* pcbData); /* Local function used by AntiMoniker implementation */ HRESULT WINAPI AntiMonikerImpl_Construct(AntiMonikerImpl* iface); HRESULT WINAPI AntiMonikerImpl_Destroy(AntiMonikerImpl* iface); /********************************************************************************/ /* Virtual function table for the AntiMonikerImpl class witch include Ipersist,*/ /* IPersistStream and IMoniker functions. */ static ICOM_VTABLE(IMoniker) VT_AntiMonikerImpl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE AntiMonikerImpl_QueryInterface, AntiMonikerImpl_AddRef, AntiMonikerImpl_Release, AntiMonikerImpl_GetClassID, AntiMonikerImpl_IsDirty, AntiMonikerImpl_Load, AntiMonikerImpl_Save, AntiMonikerImpl_GetSizeMax, AntiMonikerImpl_BindToObject, AntiMonikerImpl_BindToStorage, AntiMonikerImpl_Reduce, AntiMonikerImpl_ComposeWith, AntiMonikerImpl_Enum, AntiMonikerImpl_IsEqual, AntiMonikerImpl_Hash, AntiMonikerImpl_IsRunning, AntiMonikerImpl_GetTimeOfLastChange, AntiMonikerImpl_Inverse, AntiMonikerImpl_CommonPrefixWith, AntiMonikerImpl_RelativePathTo, AntiMonikerImpl_GetDisplayName, AntiMonikerImpl_ParseDisplayName, AntiMonikerImpl_IsSystemMoniker }; /********************************************************************************/ /* Virtual function table for the IROTData class. */ static ICOM_VTABLE(IROTData) VT_ROTDataImpl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE AntiMonikerROTDataImpl_QueryInterface, AntiMonikerROTDataImpl_AddRef, AntiMonikerROTDataImpl_Release, AntiMonikerROTDataImpl_GetComparaisonData }; /******************************************************************************* * AntiMoniker_QueryInterface *******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_QueryInterface(IMoniker* iface,REFIID riid,void** ppvObject) { ICOM_THIS(AntiMonikerImpl,iface); TRACE("(%p,%p,%p)\n",This,riid,ppvObject); /* Perform a sanity check on the parameters.*/ if ( (This==0) || (ppvObject==0) ) return E_INVALIDARG; /* Initialize the return parameter */ *ppvObject = 0; /* Compare the riid with the interface IDs implemented by this object.*/ if (IsEqualIID(&IID_IUnknown, riid) || IsEqualIID(&IID_IPersist, riid) || IsEqualIID(&IID_IPersistStream, riid) || IsEqualIID(&IID_IMoniker, riid) ) *ppvObject = iface; else if (IsEqualIID(&IID_IROTData, riid)) *ppvObject = (IROTData*)&(This->lpvtbl2); /* Check that we obtained an interface.*/ if ((*ppvObject)==0) return E_NOINTERFACE; /* Query Interface always increases the reference count by one when it is successful */ AntiMonikerImpl_AddRef(iface); return S_OK; } /****************************************************************************** * AntiMoniker_AddRef ******************************************************************************/ ULONG WINAPI AntiMonikerImpl_AddRef(IMoniker* iface) { ICOM_THIS(AntiMonikerImpl,iface); TRACE("(%p)\n",This); return ++(This->ref); } /****************************************************************************** * AntiMoniker_Release ******************************************************************************/ ULONG WINAPI AntiMonikerImpl_Release(IMoniker* iface) { ICOM_THIS(AntiMonikerImpl,iface); TRACE("(%p)\n",This); This->ref--; /* destroy the object if there's no more reference on it */ if (This->ref==0){ AntiMonikerImpl_Destroy(This); return 0; } return This->ref;; } /****************************************************************************** * AntiMoniker_GetClassID ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_GetClassID(IMoniker* iface,CLSID *pClassID) { TRACE("(%p,%p),stub!\n",iface,pClassID); if (pClassID==NULL) return E_POINTER; *pClassID = CLSID_AntiMoniker; return S_OK; } /****************************************************************************** * AntiMoniker_IsDirty ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_IsDirty(IMoniker* iface) { /* Note that the OLE-provided implementations of the IPersistStream::IsDirty method in the OLE-provided moniker interfaces always return S_FALSE because their internal state never changes. */ TRACE("(%p)\n",iface); return S_FALSE; } /****************************************************************************** * AntiMoniker_Load ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_Load(IMoniker* iface,IStream* pStm) { DWORD constant=1,dwbuffer; HRESULT res; /* data read by this function is only a DWORD constant (must be 1) ! */ res=IStream_Read(pStm,&dwbuffer,sizeof(DWORD),NULL); if (SUCCEEDED(res)&& dwbuffer!=constant) return E_FAIL; return res; } /****************************************************************************** * AntiMoniker_Save ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_Save(IMoniker* iface,IStream* pStm,BOOL fClearDirty) { DWORD constant=1; HRESULT res; /* data writen by this function is only a DWORD constant seted to 1 ! */ res=IStream_Write(pStm,&constant,sizeof(constant),NULL); return res; } /****************************************************************************** * AntiMoniker_GetSizeMax ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_GetSizeMax(IMoniker* iface, ULARGE_INTEGER* pcbSize)/* Pointer to size of stream needed to save object */ { TRACE("(%p,%p)\n",iface,pcbSize); if (pcbSize!=NULL) return E_POINTER; /* for more details see AntiMonikerImpl_Save coments */ /* Normaly the sizemax must be the size of DWORD ! but I tested this function it ususlly return 16 bytes */ /* more than the number of bytes used by AntiMoniker::Save function */ pcbSize->s.LowPart = sizeof(DWORD)+16; pcbSize->s.HighPart=0; return S_OK; } /****************************************************************************** * AntiMoniker_Construct (local function) *******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_Construct(AntiMonikerImpl* This) { TRACE("(%p)\n",This); /* Initialize the virtual fgunction table. */ This->lpvtbl1 = &VT_AntiMonikerImpl; This->lpvtbl2 = &VT_ROTDataImpl; This->ref = 0; return S_OK; } /****************************************************************************** * AntiMoniker_Destroy (local function) *******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_Destroy(AntiMonikerImpl* This) { TRACE("(%p)\n",This); return HeapFree(GetProcessHeap(),0,This); } /****************************************************************************** * AntiMoniker_BindToObject ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_BindToObject(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, REFIID riid, VOID** ppvResult) { TRACE("(%p,%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,riid,ppvResult); return E_NOTIMPL; } /****************************************************************************** * AntiMoniker_BindToStorage ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_BindToStorage(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, REFIID riid, VOID** ppvResult) { TRACE("(%p,%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,riid,ppvResult); return E_NOTIMPL; } /****************************************************************************** * AntiMoniker_Reduce ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_Reduce(IMoniker* iface, IBindCtx* pbc, DWORD dwReduceHowFar, IMoniker** ppmkToLeft, IMoniker** ppmkReduced) { TRACE("(%p,%p,%ld,%p,%p)\n",iface,pbc,dwReduceHowFar,ppmkToLeft,ppmkReduced); if (ppmkReduced==NULL) return E_POINTER; AntiMonikerImpl_AddRef(iface); *ppmkReduced=iface; return MK_S_REDUCED_TO_SELF; } /****************************************************************************** * AntiMoniker_ComposeWith ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_ComposeWith(IMoniker* iface, IMoniker* pmkRight, BOOL fOnlyIfNotGeneric, IMoniker** ppmkComposite) { TRACE("(%p,%p,%d,%p)\n",iface,pmkRight,fOnlyIfNotGeneric,ppmkComposite); if ((ppmkComposite==NULL)||(pmkRight==NULL)) return E_POINTER; *ppmkComposite=0; if (fOnlyIfNotGeneric) return MK_E_NEEDGENERIC; else return CreateGenericComposite(iface,pmkRight,ppmkComposite); } /****************************************************************************** * AntiMoniker_Enum ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_Enum(IMoniker* iface,BOOL fForward, IEnumMoniker** ppenumMoniker) { TRACE("(%p,%d,%p)\n",iface,fForward,ppenumMoniker); if (ppenumMoniker == NULL) return E_POINTER; *ppenumMoniker = NULL; return S_OK; } /****************************************************************************** * AntiMoniker_IsEqual ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_IsEqual(IMoniker* iface,IMoniker* pmkOtherMoniker) { DWORD mkSys; TRACE("(%p,%p)\n",iface,pmkOtherMoniker); if (pmkOtherMoniker==NULL) return S_FALSE; IMoniker_IsSystemMoniker(pmkOtherMoniker,&mkSys); if (mkSys==MKSYS_ANTIMONIKER) return S_OK; else return S_FALSE; } /****************************************************************************** * AntiMoniker_Hash ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_Hash(IMoniker* iface,DWORD* pdwHash) { if (pdwHash==NULL) return E_POINTER; *pdwHash=0; return S_OK; } /****************************************************************************** * AntiMoniker_IsRunning ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_IsRunning(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, IMoniker* pmkNewlyRunning) { IRunningObjectTable* rot; HRESULT res; TRACE("(%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,pmkNewlyRunning); if (pbc==NULL) return E_INVALIDARG; res=IBindCtx_GetRunningObjectTable(pbc,&rot); if (FAILED(res)) return res; res = IRunningObjectTable_IsRunning(rot,iface); IRunningObjectTable_Release(rot); return res; } /****************************************************************************** * AntiMoniker_GetTimeOfLastChange ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_GetTimeOfLastChange(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, FILETIME* pAntiTime) { TRACE("(%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,pAntiTime); return E_NOTIMPL; } /****************************************************************************** * AntiMoniker_Inverse ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_Inverse(IMoniker* iface,IMoniker** ppmk) { TRACE("(%p,%p)\n",iface,ppmk); if (ppmk==NULL) return E_POINTER; *ppmk=0; return MK_E_NOINVERSE; } /****************************************************************************** * AntiMoniker_CommonPrefixWith ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_CommonPrefixWith(IMoniker* iface,IMoniker* pmkOther,IMoniker** ppmkPrefix) { DWORD mkSys; IMoniker_IsSystemMoniker(pmkOther,&mkSys); if(mkSys==MKSYS_ITEMMONIKER){ IMoniker_AddRef(iface); *ppmkPrefix=iface; IMoniker_AddRef(iface); return MK_S_US; } else return MonikerCommonPrefixWith(iface,pmkOther,ppmkPrefix); } /****************************************************************************** * AntiMoniker_RelativePathTo ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_RelativePathTo(IMoniker* iface,IMoniker* pmOther, IMoniker** ppmkRelPath) { TRACE("(%p,%p,%p)\n",iface,pmOther,ppmkRelPath); if (ppmkRelPath==NULL) return E_POINTER; IMoniker_AddRef(pmOther); *ppmkRelPath=pmOther; return MK_S_HIM; } /****************************************************************************** * AntiMoniker_GetDisplayName ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_GetDisplayName(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, LPOLESTR *ppszDisplayName) { WCHAR back[]={'\\','.','.',0}; TRACE("(%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,ppszDisplayName); if (ppszDisplayName==NULL) return E_POINTER; if (pmkToLeft!=NULL){ FIXME("() pmkToLeft!=NULL not implemented \n"); return E_NOTIMPL; } *ppszDisplayName=CoTaskMemAlloc(sizeof(back)); if (*ppszDisplayName==NULL) return E_OUTOFMEMORY; lstrcpyW(*ppszDisplayName,back); return S_OK; } /****************************************************************************** * AntiMoniker_ParseDisplayName ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_ParseDisplayName(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, LPOLESTR pszDisplayName, ULONG* pchEaten, IMoniker** ppmkOut) { TRACE("(%p,%p,%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,pszDisplayName,pchEaten,ppmkOut); return E_NOTIMPL; } /****************************************************************************** * AntiMoniker_IsSystemMonker ******************************************************************************/ HRESULT WINAPI AntiMonikerImpl_IsSystemMoniker(IMoniker* iface,DWORD* pwdMksys) { TRACE("(%p,%p)\n",iface,pwdMksys); if (!pwdMksys) return E_POINTER; (*pwdMksys)=MKSYS_ANTIMONIKER; return S_OK; } /******************************************************************************* * AntiMonikerIROTData_QueryInterface *******************************************************************************/ HRESULT WINAPI AntiMonikerROTDataImpl_QueryInterface(IROTData *iface,REFIID riid,VOID** ppvObject) { ICOM_THIS_From_IROTData(IMoniker, iface); TRACE("(%p,%p,%p)\n",iface,riid,ppvObject); return AntiMonikerImpl_QueryInterface(This, riid, ppvObject); } /*********************************************************************** * AntiMonikerIROTData_AddRef */ ULONG WINAPI AntiMonikerROTDataImpl_AddRef(IROTData *iface) { ICOM_THIS_From_IROTData(IMoniker, iface); TRACE("(%p)\n",iface); return AntiMonikerImpl_AddRef(This); } /*********************************************************************** * AntiMonikerIROTData_Release */ ULONG WINAPI AntiMonikerROTDataImpl_Release(IROTData* iface) { ICOM_THIS_From_IROTData(IMoniker, iface); TRACE("(%p)\n",iface); return AntiMonikerImpl_Release(This); } /****************************************************************************** * AntiMonikerIROTData_GetComparaisonData ******************************************************************************/ HRESULT WINAPI AntiMonikerROTDataImpl_GetComparaisonData(IROTData* iface, BYTE* pbData, ULONG cbMax, ULONG* pcbData) { FIXME("(),stub!\n"); return E_NOTIMPL; } /****************************************************************************** * CreateAntiMoniker [OLE.55] ******************************************************************************/ HRESULT WINAPI CreateAntiMoniker(LPMONIKER * ppmk) { AntiMonikerImpl* newAntiMoniker = 0; HRESULT hr = S_OK; IID riid=IID_IMoniker; TRACE("(%p)\n",ppmk); newAntiMoniker = HeapAlloc(GetProcessHeap(), 0, sizeof(AntiMonikerImpl)); if (newAntiMoniker == 0) return STG_E_INSUFFICIENTMEMORY; hr = AntiMonikerImpl_Construct(newAntiMoniker); if (FAILED(hr)){ HeapFree(GetProcessHeap(),0,newAntiMoniker); return hr; } hr = AntiMonikerImpl_QueryInterface((IMoniker*)newAntiMoniker,&riid,(void**)ppmk); return hr; } wine-20000526/dlls/ole32/bindctx.c0100644000175000001440000004216407031574150016134 0ustar julliardusers/*************************************************************************************** * BindCtx implementation * * Copyright 1999 Noomen Hamza ***************************************************************************************/ #include #include #include "winerror.h" #include "wine/obj_moniker.h" #include "debugtools.h" #include "heap.h" DEFAULT_DEBUG_CHANNEL(ole) /* represent the first size table and it's increment block size */ #define BLOCK_TAB_SIZE 10 #define MAX_TAB_SIZE 0xFFFFFFFF /* data structure of the BindCtx table elements */ typedef struct BindCtxObject{ IUnknown* pObj; /* point on a bound object */ LPOLESTR pkeyObj; /* key associated to this bound object */ BYTE regType; /* registration type: 1 if RegisterObjectParam and 0 if RegisterObjectBound */ } BindCtxObject; /* BindCtx data strucrture */ typedef struct BindCtxImpl{ ICOM_VFIELD(IBindCtx); /* VTable relative to the IBindCtx interface.*/ ULONG ref; /* reference counter for this object */ BindCtxObject* bindCtxTable; /* this is a table in witch all bounded objects are stored*/ DWORD bindCtxTableLastIndex; /* first free index in the table */ DWORD bindCtxTableSize; /* size table */ BIND_OPTS2 bindOption2; /* a structure witch contains the bind options*/ } BindCtxImpl; /* IBindCtx prototype functions : */ /* IUnknown functions*/ static HRESULT WINAPI BindCtxImpl_QueryInterface(IBindCtx* iface,REFIID riid,void** ppvObject); static ULONG WINAPI BindCtxImpl_AddRef(IBindCtx* iface); static ULONG WINAPI BindCtxImpl_Release(IBindCtx* iface); /* IBindCtx functions */ static HRESULT WINAPI BindCtxImpl_RegisterObjectBound(IBindCtx* iface,IUnknown* punk); static HRESULT WINAPI BindCtxImpl_RevokeObjectBound(IBindCtx* iface, IUnknown* punk); static HRESULT WINAPI BindCtxImpl_ReleaseBoundObjects(IBindCtx* iface); static HRESULT WINAPI BindCtxImpl_SetBindOptions(IBindCtx* iface,LPBIND_OPTS2 pbindopts); static HRESULT WINAPI BindCtxImpl_GetBindOptions(IBindCtx* iface,LPBIND_OPTS2 pbindopts); static HRESULT WINAPI BindCtxImpl_GetRunningObjectTable(IBindCtx* iface,IRunningObjectTable** pprot); static HRESULT WINAPI BindCtxImpl_RegisterObjectParam(IBindCtx* iface,LPOLESTR pszkey, IUnknown* punk); static HRESULT WINAPI BindCtxImpl_GetObjectParam(IBindCtx* iface,LPOLESTR pszkey, IUnknown** punk); static HRESULT WINAPI BindCtxImpl_EnumObjectParam(IBindCtx* iface,IEnumString** ppenum); static HRESULT WINAPI BindCtxImpl_RevokeObjectParam(IBindCtx* iface,LPOLESTR pszkey); /* Local functions*/ HRESULT WINAPI BindCtxImpl_Construct(BindCtxImpl* This); HRESULT WINAPI BindCtxImpl_Destroy(BindCtxImpl* This); HRESULT WINAPI BindCtxImpl_GetObjectIndex(BindCtxImpl* This,IUnknown* punk,LPOLESTR pszkey,DWORD *index); /* Virtual function table for the BindCtx class. */ static ICOM_VTABLE(IBindCtx) VT_BindCtxImpl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE BindCtxImpl_QueryInterface, BindCtxImpl_AddRef, BindCtxImpl_Release, BindCtxImpl_RegisterObjectBound, BindCtxImpl_RevokeObjectBound, BindCtxImpl_ReleaseBoundObjects, BindCtxImpl_SetBindOptions, BindCtxImpl_GetBindOptions, BindCtxImpl_GetRunningObjectTable, BindCtxImpl_RegisterObjectParam, BindCtxImpl_GetObjectParam, BindCtxImpl_EnumObjectParam, BindCtxImpl_RevokeObjectParam }; /******************************************************************************* * BindCtx_QueryInterface *******************************************************************************/ HRESULT WINAPI BindCtxImpl_QueryInterface(IBindCtx* iface,REFIID riid,void** ppvObject) { ICOM_THIS(BindCtxImpl,iface); TRACE("(%p,%p,%p)\n",This,riid,ppvObject); /* Perform a sanity check on the parameters.*/ if ( (This==0) || (ppvObject==0) ) return E_INVALIDARG; /* Initialize the return parameter.*/ *ppvObject = 0; /* Compare the riid with the interface IDs implemented by this object.*/ if (IsEqualIID(&IID_IUnknown, riid)) *ppvObject = (IBindCtx*)This; else if (IsEqualIID(&IID_IBindCtx, riid)) *ppvObject = (IBindCtx*)This; /* Check that we obtained an interface.*/ if ((*ppvObject)==0) return E_NOINTERFACE; /* Query Interface always increases the reference count by one when it is successful */ BindCtxImpl_AddRef(iface); return S_OK; } /****************************************************************************** * BindCtx_AddRef ******************************************************************************/ ULONG WINAPI BindCtxImpl_AddRef(IBindCtx* iface) { ICOM_THIS(BindCtxImpl,iface); TRACE("(%p)\n",This); return ++(This->ref); } /****************************************************************************** * BindCtx_Release ******************************************************************************/ ULONG WINAPI BindCtxImpl_Release(IBindCtx* iface) { ICOM_THIS(BindCtxImpl,iface); TRACE("(%p)\n",This); This->ref--; if (This->ref==0){ /* release all registered objects */ BindCtxImpl_ReleaseBoundObjects((IBindCtx*)This); BindCtxImpl_Destroy(This); return 0; } return This->ref;; } /****************************************************************************** * BindCtx_Construct (local function) *******************************************************************************/ HRESULT WINAPI BindCtxImpl_Construct(BindCtxImpl* This) { TRACE("(%p)\n",This); /* Initialize the virtual function table.*/ ICOM_VTBL(This) = &VT_BindCtxImpl; This->ref = 0; /* Initialize the BIND_OPTS2 structure */ This->bindOption2.cbStruct = sizeof(BIND_OPTS2); This->bindOption2.grfFlags = 0; This->bindOption2.grfMode = STGM_READWRITE; This->bindOption2.dwTickCountDeadline = 0; This->bindOption2.dwTrackFlags = 0; This->bindOption2.dwClassContext = CLSCTX_SERVER; This->bindOption2.locale = 1033; This->bindOption2.pServerInfo = 0; /* Initialize the bindctx table */ This->bindCtxTableSize=BLOCK_TAB_SIZE; This->bindCtxTableLastIndex=0; This->bindCtxTable= HeapAlloc(GetProcessHeap(), 0,This->bindCtxTableSize*sizeof(BindCtxObject)); if (This->bindCtxTable==NULL) return E_OUTOFMEMORY; return S_OK; } /****************************************************************************** * BindCtx_Destroy (local function) *******************************************************************************/ HRESULT WINAPI BindCtxImpl_Destroy(BindCtxImpl* This) { TRACE("(%p)\n",This); /* free the table space memory */ HeapFree(GetProcessHeap(),0,This->bindCtxTable); /* free the bindctx structure */ HeapFree(GetProcessHeap(),0,This); return S_OK; } /****************************************************************************** * BindCtx_RegisterObjectBound ******************************************************************************/ HRESULT WINAPI BindCtxImpl_RegisterObjectBound(IBindCtx* iface,IUnknown* punk) { ICOM_THIS(BindCtxImpl,iface); DWORD lastIndex=This->bindCtxTableLastIndex; BindCtxObject cell; TRACE("(%p,%p)\n",This,punk); if (punk==NULL) return E_POINTER; IUnknown_AddRef(punk); /* put the object in the first free element in the table */ This->bindCtxTable[lastIndex].pObj = punk; This->bindCtxTable[lastIndex].pkeyObj = NULL; This->bindCtxTable[lastIndex].regType = 0; cell=This->bindCtxTable[lastIndex]; lastIndex= ++This->bindCtxTableLastIndex; if (lastIndex == This->bindCtxTableSize){ /* the table is full so it must be resized */ if (This->bindCtxTableSize > (MAX_TAB_SIZE-BLOCK_TAB_SIZE)){ FIXME("This->bindCtxTableSize: %ld is out of data limite \n",This->bindCtxTableSize); return E_FAIL; } This->bindCtxTableSize+=BLOCK_TAB_SIZE; /* new table size */ This->bindCtxTable = HeapReAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,This->bindCtxTable, This->bindCtxTableSize * sizeof(BindCtxObject)); if (!This->bindCtxTable) return E_OUTOFMEMORY; } return S_OK; } /****************************************************************************** * BindCtx_RevokeObjectBound ******************************************************************************/ HRESULT WINAPI BindCtxImpl_RevokeObjectBound(IBindCtx* iface, IUnknown* punk) { DWORD index,j; ICOM_THIS(BindCtxImpl,iface); TRACE("(%p,%p)\n",This,punk); /* check if the object was registred or not */ if (BindCtxImpl_GetObjectIndex(This,punk,NULL,&index)==S_FALSE) return MK_E_NOTBOUND; IUnknown_Release(This->bindCtxTable[index].pObj); /* left-shift all elements in the rigth side of the curent revoked object */ for(j=index; jbindCtxTableLastIndex-1; j++) This->bindCtxTable[j]= This->bindCtxTable[j+1]; This->bindCtxTableLastIndex--; return S_OK; } /****************************************************************************** * BindCtx_ReleaseBoundObjects ******************************************************************************/ HRESULT WINAPI BindCtxImpl_ReleaseBoundObjects(IBindCtx* iface) { DWORD i; ICOM_THIS(BindCtxImpl,iface); TRACE("(%p)\n",This); for(i=0;ibindCtxTableLastIndex;i++) IUnknown_Release(This->bindCtxTable[i].pObj); This->bindCtxTableLastIndex = 0; return S_OK; } /****************************************************************************** * BindCtx_SetBindOptions ******************************************************************************/ HRESULT WINAPI BindCtxImpl_SetBindOptions(IBindCtx* iface,LPBIND_OPTS2 pbindopts) { ICOM_THIS(BindCtxImpl,iface); TRACE("(%p,%p)\n",This,pbindopts); if (pbindopts==NULL) return E_POINTER; if (pbindopts->cbStruct > sizeof(BIND_OPTS2)) { WARN("invalid size"); return E_INVALIDARG; /* FIXME : not verified */ } memcpy(&This->bindOption2, pbindopts, pbindopts->cbStruct); return S_OK; } /****************************************************************************** * BindCtx_GetBindOptions ******************************************************************************/ HRESULT WINAPI BindCtxImpl_GetBindOptions(IBindCtx* iface,LPBIND_OPTS2 pbindopts) { ICOM_THIS(BindCtxImpl,iface); TRACE("(%p,%p)\n",This,pbindopts); if (pbindopts==NULL) return E_POINTER; if (pbindopts->cbStruct > sizeof(BIND_OPTS2)) { WARN("invalid size"); return E_INVALIDARG; /* FIXME : not verified */ } memcpy(pbindopts, &This->bindOption2, pbindopts->cbStruct); return S_OK; } /****************************************************************************** * BindCtx_GetRunningObjectTable ******************************************************************************/ HRESULT WINAPI BindCtxImpl_GetRunningObjectTable(IBindCtx* iface,IRunningObjectTable** pprot) { HRESULT res; ICOM_THIS(BindCtxImpl,iface); TRACE("(%p,%p)\n",This,pprot); if (pprot==NULL) return E_POINTER; res=GetRunningObjectTable(0, pprot); return res; } /****************************************************************************** * BindCtx_RegisterObjectParam ******************************************************************************/ HRESULT WINAPI BindCtxImpl_RegisterObjectParam(IBindCtx* iface,LPOLESTR pszkey, IUnknown* punk) { ICOM_THIS(BindCtxImpl,iface); TRACE("(%p,%p,%p)\n",This,pszkey,punk); if (punk==NULL) return E_INVALIDARG; IUnknown_AddRef(punk); This->bindCtxTable[This->bindCtxTableLastIndex].pObj = punk; This->bindCtxTable[This->bindCtxTableLastIndex].regType = 1; if (pszkey==NULL) This->bindCtxTable[This->bindCtxTableLastIndex].pkeyObj=NULL; else{ This->bindCtxTable[This->bindCtxTableLastIndex].pkeyObj= HeapAlloc(GetProcessHeap(),0,(sizeof(WCHAR)*(1+lstrlenW(pszkey)))); if (This->bindCtxTable[This->bindCtxTableLastIndex].pkeyObj==NULL) return E_OUTOFMEMORY; lstrcpyW(This->bindCtxTable[This->bindCtxTableLastIndex].pkeyObj,pszkey); } This->bindCtxTableLastIndex++; if (This->bindCtxTableLastIndex == This->bindCtxTableSize){ /* table is full ! must be resized */ This->bindCtxTableSize+=BLOCK_TAB_SIZE; /* new table size */ if (This->bindCtxTableSize > (MAX_TAB_SIZE-BLOCK_TAB_SIZE)){ FIXME("This->bindCtxTableSize: %ld is out of data limite \n",This->bindCtxTableSize); return E_FAIL; } This->bindCtxTable = HeapReAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,This->bindCtxTable, This->bindCtxTableSize * sizeof(BindCtxObject)); if (!This->bindCtxTable) return E_OUTOFMEMORY; } return S_OK; } /****************************************************************************** * BindCtx_GetObjectParam ******************************************************************************/ HRESULT WINAPI BindCtxImpl_GetObjectParam(IBindCtx* iface,LPOLESTR pszkey, IUnknown** punk) { DWORD index; ICOM_THIS(BindCtxImpl,iface); TRACE("(%p,%p,%p)\n",This,pszkey,punk); if (punk==NULL) return E_POINTER; *punk=0; if (BindCtxImpl_GetObjectIndex(This,NULL,pszkey,&index)==S_FALSE) return E_FAIL; IUnknown_AddRef(This->bindCtxTable[index].pObj); *punk = This->bindCtxTable[index].pObj; return S_OK; } /****************************************************************************** * BindCtx_RevokeObjectParam ******************************************************************************/ HRESULT WINAPI BindCtxImpl_RevokeObjectParam(IBindCtx* iface,LPOLESTR ppenum) { DWORD index,j; ICOM_THIS(BindCtxImpl,iface); TRACE("(%p,%p)\n",This,ppenum); if (BindCtxImpl_GetObjectIndex(This,NULL,ppenum,&index)==S_FALSE) return E_FAIL; /* release the object if it's found */ IUnknown_Release(This->bindCtxTable[index].pObj); /* remove the object from the table with a left-shifting of all objects in the right side */ for(j=index; jbindCtxTableLastIndex-1; j++) This->bindCtxTable[j]= This->bindCtxTable[j+1]; This->bindCtxTableLastIndex--; return S_OK; } /****************************************************************************** * BindCtx_EnumObjectParam ******************************************************************************/ HRESULT WINAPI BindCtxImpl_EnumObjectParam(IBindCtx* iface,IEnumString** pszkey) { FIXME("(%p,%p),stub!\n",iface,pszkey); return E_NOTIMPL; } /******************************************************************************** * GetObjectIndex (local function) ********************************************************************************/ HRESULT WINAPI BindCtxImpl_GetObjectIndex(BindCtxImpl* This, IUnknown* punk, LPOLESTR pszkey, DWORD *index) { DWORD i; BYTE found=0; TRACE("(%p,%p,%p,%p)\n",This,punk,pszkey,index); if (punk==NULL) /* search object identified by a register key */ for(i=0; ( (ibindCtxTableLastIndex) && (!found));i++){ if(This->bindCtxTable[i].regType==1){ if ( ( (This->bindCtxTable[i].pkeyObj==NULL) && (pszkey==NULL) ) || ( (This->bindCtxTable[i].pkeyObj!=NULL) && (pszkey!=NULL) && (lstrcmpW(This->bindCtxTable[i].pkeyObj,pszkey)==0) ) ) found=1; } } else /* search object identified by a moniker*/ for(i=0; ( (ibindCtxTableLastIndex) && (!found));i++) if(This->bindCtxTable[i].pObj==punk) found=1; if (index != NULL) *index=i-1; if (found) return S_OK; else return S_FALSE; } /****************************************************************************** * CreateBindCtx16 ******************************************************************************/ HRESULT WINAPI CreateBindCtx16(DWORD reserved, LPBC * ppbc) { FIXME("(%ld,%p),stub!\n",reserved,ppbc); return E_NOTIMPL; } /****************************************************************************** * CreateBindCtx ******************************************************************************/ HRESULT WINAPI CreateBindCtx(DWORD reserved, LPBC * ppbc) { BindCtxImpl* newBindCtx = 0; HRESULT hr; IID riid=IID_IBindCtx; TRACE("(%ld,%p)\n",reserved,ppbc); newBindCtx = HeapAlloc(GetProcessHeap(), 0, sizeof(BindCtxImpl)); if (newBindCtx == 0) return E_OUTOFMEMORY; hr = BindCtxImpl_Construct(newBindCtx); if (FAILED(hr)){ HeapFree(GetProcessHeap(),0,newBindCtx); return hr; } hr = BindCtxImpl_QueryInterface((IBindCtx*)newBindCtx,&riid,(void**)ppbc); return hr; } wine-20000526/dlls/ole32/clipboard.c0100644000175000001440000014241407070212244016433 0ustar julliardusers/* * OLE 2 clipboard support * * Copyright 1999 Noel Borthwick * Copyright 2000 Abey George * * NOTES: * This file contains the implementation for the OLE Clipboard and its * internal interfaces. The OLE clipboard interacts with an IDataObject * interface via the OleSetClipboard, OleGetClipboard and * OleIsCurrentClipboard API's. An internal IDataObject delegates * to a client supplied IDataObject or the WIN32 clipboard API depending * on whether OleSetClipboard has been invoked. * Here are some operating scenarios: * * 1. OleSetClipboard called: In this case the internal IDataObject * delegates to the client supplied IDataObject. Additionally OLE takes * ownership of the Windows clipboard and any HGLOCBAL IDataObject * items are placed on the Windows clipboard. This allows non OLE aware * applications to access these. A local WinProc fields WM_RENDERFORMAT * and WM_RENDERALLFORMATS messages in this case. * * 2. OleGetClipboard called without previous OleSetClipboard. Here the internal * IDataObject functionality wraps around the WIN32 clipboard API. * * 3. OleGetClipboard called after previous OleSetClipboard. Here the internal * IDataObject delegates to the source IDataObjects functionality directly, * thereby bypassing the Windows clipboard. * * Implementation references : Inside OLE 2'nd edition by Kraig Brockschmidt * * TODO: * - Support for pasting between different processes. OLE clipboard support * currently works only for in process copy and paste. Since we internally * store a pointer to the source's IDataObject and delegate to that, this * will fail if the IDataObject client belongs to a different process. * - IDataObject::GetDataHere is not implemented * - OleFlushClipboard needs to additionally handle TYMED_IStorage media * by copying the storage into global memory. Subsequently the default * data object exposed through OleGetClipboard must convert this TYMED_HGLOBAL * back to TYMED_IStorage. * - OLE1 compatibility formats to be synthesized from OLE2 formats and put on * clipboard in OleSetClipboard. * */ #include #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "winbase.h" #include "winerror.h" #include "ole2.h" #include "debugtools.h" #include "olestd.h" #include "storage32.h" #define HANDLE_ERROR(err) { hr = err; TRACE("(HRESULT=%lx)\n", (HRESULT)err); goto CLEANUP; } /* For CoGetMalloc (MEMCTX_TASK is currently ignored) */ #ifndef MEMCTX_TASK #define MEMCTX_TASK -1 #endif DEFAULT_DEBUG_CHANNEL(ole) /**************************************************************************** * OLEClipbrd * DO NOT add any members before the VTables declaration! */ struct OLEClipbrd { /* * List all interface VTables here */ ICOM_VTABLE(IDataObject)* lpvtbl1; /* IDataObject VTable */ /* * The hidden OLE clipboard window. This window is used as the bridge between the * the OLE and windows clipboard API. (Windows creates one such window per process) */ HWND hWndClipboard; /* * Pointer to the source data object (via OleSetClipboard) */ IDataObject* pIDataObjectSrc; /* * The registered DataObject clipboard format */ UINT cfDataObj; /* * The handle to our ourself */ UINT hSelf; /* * Reference count of this object */ ULONG ref; }; typedef struct OLEClipbrd OLEClipbrd; /**************************************************************************** * IEnumFORMATETC implementation * DO NOT add any members before the VTables declaration! */ typedef struct { /* IEnumFORMATETC VTable */ ICOM_VFIELD(IEnumFORMATETC); /* IEnumFORMATETC fields */ UINT posFmt; /* current enumerator position */ UINT countFmt; /* number of EnumFORMATETC's in array */ LPFORMATETC pFmt; /* array of EnumFORMATETC's */ /* * Reference count of this object */ DWORD ref; /* * IUnknown implementation of the parent data object. */ IUnknown* pUnkDataObj; } IEnumFORMATETCImpl; typedef struct PresentationDataHeader { BYTE unknown1[28]; DWORD dwObjectExtentX; DWORD dwObjectExtentY; DWORD dwSize; } PresentationDataHeader; /* * The one and only OLEClipbrd object which is created by OLEClipbrd_Initialize() */ static HGLOBAL hTheOleClipboard = 0; static OLEClipbrd* theOleClipboard = NULL; /* * Prototypes for the methods of the OLEClipboard class. */ extern void OLEClipbrd_Initialize(); extern void OLEClipbrd_UnInitialize(); static OLEClipbrd* OLEClipbrd_Construct(); static void OLEClipbrd_Destroy(OLEClipbrd* ptrToDestroy); static HWND OLEClipbrd_CreateWindow(); static void OLEClipbrd_DestroyWindow(HWND hwnd); LRESULT CALLBACK OLEClipbrd_WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam); static HRESULT OLEClipbrd_RenderFormat( IDataObject *pIDataObject, LPFORMATETC pFormatetc ); static HGLOBAL OLEClipbrd_GlobalDupMem( HGLOBAL hGlobalSrc ); /* * Prototypes for the methods of the OLEClipboard class * that implement IDataObject methods. */ static HRESULT WINAPI OLEClipbrd_IDataObject_QueryInterface( IDataObject* iface, REFIID riid, void** ppvObject); static ULONG WINAPI OLEClipbrd_IDataObject_AddRef( IDataObject* iface); static ULONG WINAPI OLEClipbrd_IDataObject_Release( IDataObject* iface); static HRESULT WINAPI OLEClipbrd_IDataObject_GetData( IDataObject* iface, LPFORMATETC pformatetcIn, STGMEDIUM* pmedium); static HRESULT WINAPI OLEClipbrd_IDataObject_GetDataHere( IDataObject* iface, LPFORMATETC pformatetc, STGMEDIUM* pmedium); static HRESULT WINAPI OLEClipbrd_IDataObject_QueryGetData( IDataObject* iface, LPFORMATETC pformatetc); static HRESULT WINAPI OLEClipbrd_IDataObject_GetCanonicalFormatEtc( IDataObject* iface, LPFORMATETC pformatectIn, LPFORMATETC pformatetcOut); static HRESULT WINAPI OLEClipbrd_IDataObject_SetData( IDataObject* iface, LPFORMATETC pformatetc, STGMEDIUM* pmedium, BOOL fRelease); static HRESULT WINAPI OLEClipbrd_IDataObject_EnumFormatEtc( IDataObject* iface, DWORD dwDirection, IEnumFORMATETC** ppenumFormatEtc); static HRESULT WINAPI OLEClipbrd_IDataObject_DAdvise( IDataObject* iface, FORMATETC* pformatetc, DWORD advf, IAdviseSink* pAdvSink, DWORD* pdwConnection); static HRESULT WINAPI OLEClipbrd_IDataObject_DUnadvise( IDataObject* iface, DWORD dwConnection); static HRESULT WINAPI OLEClipbrd_IDataObject_EnumDAdvise( IDataObject* iface, IEnumSTATDATA** ppenumAdvise); /* * Prototypes for the IEnumFORMATETC methods. */ static LPENUMFORMATETC OLEClipbrd_IEnumFORMATETC_Construct(UINT cfmt, const FORMATETC afmt[], LPUNKNOWN pUnkDataObj); static HRESULT WINAPI OLEClipbrd_IEnumFORMATETC_QueryInterface(LPENUMFORMATETC iface, REFIID riid, LPVOID* ppvObj); static ULONG WINAPI OLEClipbrd_IEnumFORMATETC_AddRef(LPENUMFORMATETC iface); static ULONG WINAPI OLEClipbrd_IEnumFORMATETC_Release(LPENUMFORMATETC iface); static HRESULT WINAPI OLEClipbrd_IEnumFORMATETC_Next(LPENUMFORMATETC iface, ULONG celt, FORMATETC* rgelt, ULONG* pceltFethed); static HRESULT WINAPI OLEClipbrd_IEnumFORMATETC_Skip(LPENUMFORMATETC iface, ULONG celt); static HRESULT WINAPI OLEClipbrd_IEnumFORMATETC_Reset(LPENUMFORMATETC iface); static HRESULT WINAPI OLEClipbrd_IEnumFORMATETC_Clone(LPENUMFORMATETC iface, LPENUMFORMATETC* ppenum); /* * Virtual function table for the OLEClipbrd's exposed IDataObject interface */ static ICOM_VTABLE(IDataObject) OLEClipbrd_IDataObject_VTable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE OLEClipbrd_IDataObject_QueryInterface, OLEClipbrd_IDataObject_AddRef, OLEClipbrd_IDataObject_Release, OLEClipbrd_IDataObject_GetData, OLEClipbrd_IDataObject_GetDataHere, OLEClipbrd_IDataObject_QueryGetData, OLEClipbrd_IDataObject_GetCanonicalFormatEtc, OLEClipbrd_IDataObject_SetData, OLEClipbrd_IDataObject_EnumFormatEtc, OLEClipbrd_IDataObject_DAdvise, OLEClipbrd_IDataObject_DUnadvise, OLEClipbrd_IDataObject_EnumDAdvise }; /* * Virtual function table for IEnumFORMATETC interface */ static struct ICOM_VTABLE(IEnumFORMATETC) efvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE OLEClipbrd_IEnumFORMATETC_QueryInterface, OLEClipbrd_IEnumFORMATETC_AddRef, OLEClipbrd_IEnumFORMATETC_Release, OLEClipbrd_IEnumFORMATETC_Next, OLEClipbrd_IEnumFORMATETC_Skip, OLEClipbrd_IEnumFORMATETC_Reset, OLEClipbrd_IEnumFORMATETC_Clone }; /* * Name of our registered OLE clipboard window class */ CHAR OLEClipbrd_WNDCLASS[] = "CLIPBRDWNDCLASS"; /* * If we need to store state info we can store it here. * For now we dont need this functionality. * typedef struct tagClipboardWindowInfo { } ClipboardWindowInfo; */ /*---------------------------------------------------------------------* * Win32 OLE clipboard API *---------------------------------------------------------------------*/ /*********************************************************************** * OleSetClipboard [OLE32.127] * Places a pointer to the specified data object onto the clipboard, * making the data object accessible to the OleGetClipboard function. * * RETURNS: * * S_OK IDataObject pointer placed on the clipboard * CLIPBRD_E_CANT_OPEN OpenClipboard failed * CLIPBRD_E_CANT_EMPTY EmptyClipboard failed * CLIPBRD_E_CANT_CLOSE CloseClipboard failed * CLIPBRD_E_CANT_SET SetClipboard failed */ HRESULT WINAPI OleSetClipboard(IDataObject* pDataObj) { HRESULT hr = S_OK; IEnumFORMATETC* penumFormatetc = NULL; FORMATETC rgelt; BOOL bClipboardOpen = FALSE; /* HGLOBAL hDataObject = 0; OLEClipbrd **ppDataObject; */ TRACE("(%p)\n", pDataObj); /* * Make sure we have a clipboard object */ OLEClipbrd_Initialize(); /* * If the Ole clipboard window hasn't been created yet, create it now. */ if ( !theOleClipboard->hWndClipboard ) theOleClipboard->hWndClipboard = OLEClipbrd_CreateWindow(); if ( !theOleClipboard->hWndClipboard ) /* sanity check */ HANDLE_ERROR( E_FAIL ); /* * Open the Windows clipboard, associating it with our hidden window */ if ( !(bClipboardOpen = OpenClipboard(theOleClipboard->hWndClipboard)) ) HANDLE_ERROR( CLIPBRD_E_CANT_OPEN ); /* * Empty the current clipboard and make our window the clipboard owner * NOTE: This will trigger a WM_DESTROYCLIPBOARD message */ if ( !EmptyClipboard() ) HANDLE_ERROR( CLIPBRD_E_CANT_EMPTY ); /* * If we are already holding on to an IDataObject first release that. */ if ( theOleClipboard->pIDataObjectSrc ) { IDataObject_Release(theOleClipboard->pIDataObjectSrc); theOleClipboard->pIDataObjectSrc = NULL; } /* * AddRef the data object passed in and save its pointer. * A NULL value indicates that the clipboard should be emptied. */ theOleClipboard->pIDataObjectSrc = pDataObj; if ( pDataObj ) { IDataObject_AddRef(theOleClipboard->pIDataObjectSrc); } /* * Enumerate all HGLOBAL formats supported by the source and make * those formats available using delayed rendering using SetClipboardData. * Only global memory based data items may be made available to non-OLE * applications via the standard Windows clipboard API. Data based on other * mediums(non TYMED_HGLOBAL) can only be accessed via the Ole Clipboard API. * * TODO: Do we need to additionally handle TYMED_IStorage media by copying * the storage into global memory? */ if ( pDataObj ) { if ( FAILED(hr = IDataObject_EnumFormatEtc( pDataObj, DATADIR_GET, &penumFormatetc ))) { HANDLE_ERROR( hr ); } while ( S_OK == IEnumFORMATETC_Next(penumFormatetc, 1, &rgelt, NULL) ) { if ( rgelt.tymed == TYMED_HGLOBAL ) { CHAR szFmtName[80]; TRACE("(cfFormat=%d:%s)\n", rgelt.cfFormat, GetClipboardFormatNameA(rgelt.cfFormat, szFmtName, sizeof(szFmtName)-1) ? szFmtName : ""); SetClipboardData( rgelt.cfFormat, (HANDLE)NULL); } } IEnumFORMATETC_Release(penumFormatetc); } /* * Windows additionally creates a new "DataObject" clipboard format * and stores in on the clipboard. We could possibly store a pointer * to our internal IDataObject interface on the clipboard. I'm not * sure what the use of this is though. * Enable the code below for this functionality. */ /* theOleClipboard->cfDataObj = RegisterClipboardFormatA("DataObject"); hDataObject = GlobalAlloc( GMEM_DDESHARE|GMEM_MOVEABLE|GMEM_ZEROINIT, sizeof(OLEClipbrd *)); if (hDataObject==0) HANDLE_ERROR( E_OUTOFMEMORY ); ppDataObject = (OLEClipbrd**)GlobalLock(hDataObject); *ppDataObject = theOleClipboard; GlobalUnlock(hDataObject); if ( !SetClipboardData( theOleClipboard->cfDataObj, hDataObject ) ) HANDLE_ERROR( CLIPBRD_E_CANT_SET ); */ hr = S_OK; CLEANUP: /* * Close Windows clipboard (It remains associated with our window) */ if ( bClipboardOpen && !CloseClipboard() ) hr = CLIPBRD_E_CANT_CLOSE; /* * Release the source IDataObject if something failed */ if ( FAILED(hr) ) { if (theOleClipboard->pIDataObjectSrc) { IDataObject_Release(theOleClipboard->pIDataObjectSrc); theOleClipboard->pIDataObjectSrc = NULL; } } return hr; } /*********************************************************************** * OleGetClipboard [OLE32.105] * Returns a pointer to our internal IDataObject which represents the conceptual * state of the Windows clipboard. If the current clipboard already contains * an IDataObject, our internal IDataObject will delegate to this object. */ HRESULT WINAPI OleGetClipboard(IDataObject** ppDataObj) { HRESULT hr = S_OK; TRACE("()\n"); /* * Make sure we have a clipboard object */ OLEClipbrd_Initialize(); if (!theOleClipboard) return E_OUTOFMEMORY; /* Return a reference counted IDataObject */ hr = IDataObject_QueryInterface( (IDataObject*)&(theOleClipboard->lpvtbl1), &IID_IDataObject, (void**)ppDataObj); return hr; } /*********************************************************************** * OleFlushClipboard [OLE2.76] */ HRESULT WINAPI OleFlushClipboard16(void) { return OleFlushClipboard(); } /****************************************************************************** * OleFlushClipboard [OLE32.103] * Renders the data from the source IDataObject into the windows clipboard * * TODO: OleFlushClipboard needs to additionally handle TYMED_IStorage media * by copying the storage into global memory. Subsequently the default * data object exposed through OleGetClipboard must convert this TYMED_HGLOBAL * back to TYMED_IStorage. */ HRESULT WINAPI OleFlushClipboard() { IEnumFORMATETC* penumFormatetc = NULL; FORMATETC rgelt; HRESULT hr = S_OK; BOOL bClipboardOpen = FALSE; IDataObject* pIDataObjectSrc = NULL; TRACE("()\n"); /* * Make sure we have a clipboard object */ OLEClipbrd_Initialize(); /* * Already flushed or no source DataObject? Nothing to do. */ if (!theOleClipboard->pIDataObjectSrc) return S_OK; /* * Addref and save the source data object we are holding on to temporarily, * since it will be released when we empty the clipboard. */ pIDataObjectSrc = theOleClipboard->pIDataObjectSrc; IDataObject_AddRef(pIDataObjectSrc); /* * Open the Windows clipboard */ if ( !(bClipboardOpen = OpenClipboard(theOleClipboard->hWndClipboard)) ) HANDLE_ERROR( CLIPBRD_E_CANT_OPEN ); /* * Empty the current clipboard */ if ( !EmptyClipboard() ) HANDLE_ERROR( CLIPBRD_E_CANT_EMPTY ); /* * Render all HGLOBAL formats supported by the source into * the windows clipboard. */ if ( FAILED( hr = IDataObject_EnumFormatEtc( pIDataObjectSrc, DATADIR_GET, &penumFormatetc) )) { HANDLE_ERROR( hr ); } while ( S_OK == IEnumFORMATETC_Next(penumFormatetc, 1, &rgelt, NULL) ) { if ( rgelt.tymed == TYMED_HGLOBAL ) { CHAR szFmtName[80]; TRACE("(cfFormat=%d:%s)\n", rgelt.cfFormat, GetClipboardFormatNameA(rgelt.cfFormat, szFmtName, sizeof(szFmtName)-1) ? szFmtName : ""); /* * Render the clipboard data */ if ( FAILED(OLEClipbrd_RenderFormat( pIDataObjectSrc, &rgelt )) ) continue; } } IEnumFORMATETC_Release(penumFormatetc); /* * Release the source data object we are holding on to */ IDataObject_Release(pIDataObjectSrc); CLEANUP: /* * Close Windows clipboard (It remains associated with our window) */ if ( bClipboardOpen && !CloseClipboard() ) hr = CLIPBRD_E_CANT_CLOSE; return hr; } /*********************************************************************** * OleIsCurrentClipboard [OLE32.110] */ HRESULT WINAPI OleIsCurrentClipboard ( IDataObject *pDataObject) { TRACE("()\n"); /* * Make sure we have a clipboard object */ OLEClipbrd_Initialize(); if (!theOleClipboard) return E_OUTOFMEMORY; return (pDataObject == theOleClipboard->pIDataObjectSrc) ? S_OK : S_FALSE; } /*---------------------------------------------------------------------* * Internal implementation methods for the OLE clipboard *---------------------------------------------------------------------*/ /*********************************************************************** * OLEClipbrd_Initialize() * Initializes the OLE clipboard. */ void OLEClipbrd_Initialize() { /* * Create the clipboard if necesary */ if ( !theOleClipboard ) { TRACE("()\n"); theOleClipboard = OLEClipbrd_Construct(); } } /*********************************************************************** * OLEClipbrd_UnInitialize() * Un-Initializes the OLE clipboard */ void OLEClipbrd_UnInitialize() { TRACE("()\n"); /* * Destroy the clipboard if no one holds a reference to us. * Note that the clipboard was created with a reference count of 1. */ if ( theOleClipboard && (theOleClipboard->ref <= 1) ) { OLEClipbrd_Destroy( theOleClipboard ); } else { WARN( "() : OLEClipbrd_UnInitialize called while client holds an IDataObject reference!\n"); } } /********************************************************* * Construct the OLEClipbrd class. */ static OLEClipbrd* OLEClipbrd_Construct() { OLEClipbrd* newObject = NULL; HGLOBAL hNewObject = 0; /* * Allocate space for the object. We use GlobalAlloc since we need * an HGLOBAL to expose our DataObject as a registered clipboard type. */ hNewObject = GlobalAlloc( GMEM_DDESHARE|GMEM_MOVEABLE|GMEM_ZEROINIT, sizeof(OLEClipbrd)); if (hNewObject==0) return NULL; /* * Lock the handle for the entire lifetime of the clipboard. */ newObject = GlobalLock(hNewObject); /* * Initialize the virtual function table. */ newObject->lpvtbl1 = &OLEClipbrd_IDataObject_VTable; /* * Start with one reference count. The caller of this function * must release the interface pointer when it is done. */ newObject->ref = 1; newObject->hSelf = hNewObject; /* * The Ole clipboard is a singleton - save the global handle and pointer */ theOleClipboard = newObject; hTheOleClipboard = hNewObject; return theOleClipboard; } static void OLEClipbrd_Destroy(OLEClipbrd* ptrToDestroy) { TRACE("()\n"); if ( !ptrToDestroy ) return; /* * Destroy the Ole clipboard window */ if ( ptrToDestroy->hWndClipboard ) OLEClipbrd_DestroyWindow(ptrToDestroy->hWndClipboard); /* * Free the actual OLE Clipboard structure. */ TRACE("() - Destroying clipboard data object.\n"); GlobalUnlock(ptrToDestroy->hSelf); GlobalFree(ptrToDestroy->hSelf); /* * The Ole clipboard is a singleton (ptrToDestroy == theOleClipboard) */ theOleClipboard = NULL; hTheOleClipboard = 0; } /*********************************************************************** * OLEClipbrd_CreateWindow() * Create the clipboard window */ static HWND OLEClipbrd_CreateWindow() { HWND hwnd = 0; WNDCLASSEXA wcex; /* * Register the clipboard window class if necessary */ ZeroMemory( &wcex, sizeof(WNDCLASSEXA)); wcex.cbSize = sizeof(WNDCLASSEXA); /* Windows creates this class with a style mask of 0 * We dont bother doing this since the FindClassByAtom code * would have to be changed to deal with this idiosyncracy. */ wcex.style = CS_GLOBALCLASS; wcex.lpfnWndProc = (WNDPROC)OLEClipbrd_WndProc; wcex.hInstance = 0; wcex.lpszClassName = OLEClipbrd_WNDCLASS; RegisterClassExA(&wcex); /* * Create a hidden window to receive OLE clipboard messages */ /* * If we need to store state info we can store it here. * For now we dont need this functionality. * ClipboardWindowInfo clipboardInfo; * ZeroMemory( &trackerInfo, sizeof(ClipboardWindowInfo)); */ hwnd = CreateWindowA(OLEClipbrd_WNDCLASS, "ClipboardWindow", WS_POPUP | WS_CLIPSIBLINGS | WS_OVERLAPPED, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, 0, 0, 0, 0 /*(LPVOID)&clipboardInfo */); return hwnd; } /*********************************************************************** * OLEClipbrd_DestroyWindow(HWND) * Destroy the clipboard window and unregister its class */ static void OLEClipbrd_DestroyWindow(HWND hwnd) { /* * Destroy clipboard window and unregister its WNDCLASS */ DestroyWindow(hwnd); UnregisterClassA( OLEClipbrd_WNDCLASS, 0 ); } /*********************************************************************** * OLEClipbrd_WndProc(HWND, unsigned, WORD, LONG) * Processes messages sent to the OLE clipboard window. * Note that we will intercept messages in our WndProc only when data * has been placed in the clipboard via OleSetClipboard(). * i.e. Only when OLE owns the windows clipboard. */ LRESULT CALLBACK OLEClipbrd_WndProc (HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam) { switch (message) { /* * WM_RENDERFORMAT * We receive this message to allow us to handle delayed rendering of * a specific clipboard format when an application requests data in * that format by calling GetClipboardData. * (Recall that in OleSetClipboard, we used SetClipboardData to * make all HGLOBAL formats supported by the source IDataObject * available using delayed rendering) * On receiving this mesage we must actually render the data in the * specified format and place it on the clipboard by calling the * SetClipboardData function. */ case WM_RENDERFORMAT: { FORMATETC rgelt; ZeroMemory( &rgelt, sizeof(FORMATETC)); /* * Initialize FORMATETC to a Windows clipboard friendly format */ rgelt.cfFormat = (UINT) wParam; rgelt.dwAspect = DVASPECT_CONTENT; rgelt.lindex = -1; rgelt.tymed = TYMED_HGLOBAL; TRACE("(): WM_RENDERFORMAT(cfFormat=%d)\n", rgelt.cfFormat); /* * Render the clipboard data. * (We must have a source data object or we wouldn't be in this WndProc) */ OLEClipbrd_RenderFormat( (IDataObject*)&(theOleClipboard->lpvtbl1), &rgelt ); break; } /* * WM_RENDERALLFORMATS * Sent before the clipboard owner window is destroyed. * We should receive this message only when OleUninitialize is called * while we have an IDataObject in the clipboard. * For the content of the clipboard to remain available to other * applications, we must render data in all the formats the source IDataObject * is capable of generating, and place the data on the clipboard by calling * SetClipboardData. */ case WM_RENDERALLFORMATS: { IEnumFORMATETC* penumFormatetc = NULL; FORMATETC rgelt; TRACE("(): WM_RENDERALLFORMATS\n"); /* * Render all HGLOBAL formats supported by the source into * the windows clipboard. */ if ( FAILED( IDataObject_EnumFormatEtc( (IDataObject*)&(theOleClipboard->lpvtbl1), DATADIR_GET, &penumFormatetc) ) ) { WARN("(): WM_RENDERALLFORMATS failed to retrieve EnumFormatEtc!\n"); return 0; } while ( S_OK == IEnumFORMATETC_Next(penumFormatetc, 1, &rgelt, NULL) ) { if ( rgelt.tymed == TYMED_HGLOBAL ) { /* * Render the clipboard data. */ if ( FAILED(OLEClipbrd_RenderFormat( (IDataObject*)&(theOleClipboard->lpvtbl1), &rgelt )) ) continue; TRACE("(): WM_RENDERALLFORMATS(cfFormat=%d)\n", rgelt.cfFormat); } } IEnumFORMATETC_Release(penumFormatetc); break; } /* * WM_DESTROYCLIPBOARD * This is sent by EmptyClipboard before the clipboard is emptied. * We should release any IDataObject we are holding onto when we receive * this message, since it indicates that the OLE clipboard should be empty * from this point on. */ case WM_DESTROYCLIPBOARD: { TRACE("(): WM_DESTROYCLIPBOARD\n"); /* * Release the data object we are holding on to */ if ( theOleClipboard->pIDataObjectSrc ) { IDataObject_Release(theOleClipboard->pIDataObjectSrc); theOleClipboard->pIDataObjectSrc = NULL; } break; } /* case WM_ASKCBFORMATNAME: case WM_CHANGECBCHAIN: case WM_DRAWCLIPBOARD: case WM_SIZECLIPBOARD: case WM_HSCROLLCLIPBOARD: case WM_VSCROLLCLIPBOARD: case WM_PAINTCLIPBOARD: */ default: return DefWindowProcA(hWnd, message, wParam, lParam); } return 0; } #define MAX_CLIPFORMAT_NAME 80 /*********************************************************************** * OLEClipbrd_RenderFormat(LPFORMATETC) * Render the clipboard data. Note that this call will delegate to the * source data object. * Note: This function assumes it is passed an HGLOBAL format to render. */ static HRESULT OLEClipbrd_RenderFormat(IDataObject *pIDataObject, LPFORMATETC pFormatetc) { STGMEDIUM std; HGLOBAL hDup; HRESULT hr = S_OK; char szFmtName[MAX_CLIPFORMAT_NAME]; ILockBytes *ptrILockBytes = 0; HGLOBAL hStorage = 0; GetClipboardFormatNameA(pFormatetc->cfFormat, szFmtName, MAX_CLIPFORMAT_NAME); /* If embed source */ if (!strcmp(szFmtName, CF_EMBEDSOURCE)) { memset(&std, 0, sizeof(STGMEDIUM)); std.tymed = pFormatetc->tymed = TYMED_ISTORAGE; hStorage = GlobalAlloc(GMEM_SHARE|GMEM_MOVEABLE, 0); hr = CreateILockBytesOnHGlobal(hStorage, FALSE, &ptrILockBytes); hr = StgCreateDocfileOnILockBytes(ptrILockBytes, STGM_SHARE_EXCLUSIVE|STGM_READWRITE, 0, &std.u.pstg); if (FAILED(hr = IDataObject_GetDataHere(theOleClipboard->pIDataObjectSrc, pFormatetc, &std))) { WARN("() : IDataObject_GetDataHere failed to render clipboard data! (%lx)\n", hr); return hr; } if (1) /* check whether the presentation data is already -not- present */ { FORMATETC fmt2; STGMEDIUM std2; METAFILEPICT *mfp = 0; fmt2.cfFormat = CF_METAFILEPICT; fmt2.ptd = 0; fmt2.dwAspect = DVASPECT_CONTENT; fmt2.lindex = -1; fmt2.tymed = TYMED_MFPICT; memset(&std2, 0, sizeof(STGMEDIUM)); std2.tymed = TYMED_MFPICT; /* Get the metafile picture out of it */ if (!FAILED(hr = IDataObject_GetData(theOleClipboard->pIDataObjectSrc, &fmt2, &std2))) { mfp = (METAFILEPICT *)GlobalLock(std2.u.hMetaFilePict); } if (mfp) { OLECHAR name[]={ 2, 'O', 'l', 'e', 'P', 'r', 'e', 's', '0', '0', '0', 0}; IStream *pStream = 0; void *mfBits; PresentationDataHeader pdh; INT nSize; CLSID clsID; LPOLESTR strProgID; CHAR strOleTypeName[51]; BYTE OlePresStreamHeader [] = { 0xFF, 0xFF, 0xFF, 0xFF, 0x03, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0xFF, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 }; nSize = GetMetaFileBitsEx(mfp->hMF, 0, NULL); memset(&pdh, 0, sizeof(PresentationDataHeader)); memcpy(&pdh, OlePresStreamHeader, sizeof(OlePresStreamHeader)); pdh.dwObjectExtentX = mfp->xExt; pdh.dwObjectExtentY = mfp->yExt; pdh.dwSize = nSize; hr = IStorage_CreateStream(std.u.pstg, name, STGM_CREATE|STGM_SHARE_EXCLUSIVE|STGM_READWRITE, 0, 0, &pStream); hr = IStream_Write(pStream, &pdh, sizeof(PresentationDataHeader), NULL); mfBits = HeapAlloc(GetProcessHeap(), 0, nSize); nSize = GetMetaFileBitsEx(mfp->hMF, nSize, mfBits); hr = IStream_Write(pStream, mfBits, nSize, NULL); IStream_Release(pStream); HeapFree(GetProcessHeap(), 0, mfBits); GlobalUnlock(std2.u.hMetaFilePict); ReadClassStg(std.u.pstg, &clsID); ProgIDFromCLSID(&clsID, &strProgID); lstrcpyWtoA(strOleTypeName, strProgID); OLECONVERT_CreateOleStream(std.u.pstg); OLECONVERT_CreateCompObjStream(std.u.pstg, strOleTypeName); } } } else { if (FAILED(hr = IDataObject_GetData(pIDataObject, pFormatetc, &std))) { WARN("() : IDataObject_GetData failed to render clipboard data! (%lx)\n", hr); return hr; } /* To put a copy back on the clipboard */ hStorage = std.u.hGlobal; } /* * Put a copy of the rendered data back on the clipboard */ if ( !(hDup = OLEClipbrd_GlobalDupMem(hStorage)) ) HANDLE_ERROR( E_OUTOFMEMORY ); if ( !SetClipboardData( pFormatetc->cfFormat, hDup ) ) { GlobalFree(hDup); WARN("() : Failed to set rendered clipboard data into clipboard!\n"); } CLEANUP: ReleaseStgMedium(&std); return hr; } /*********************************************************************** * OLEClipbrd_GlobalDupMem( HGLOBAL ) * Helper method to duplicate an HGLOBAL chunk of memory */ static HGLOBAL OLEClipbrd_GlobalDupMem( HGLOBAL hGlobalSrc ) { HGLOBAL hGlobalDest; PVOID pGlobalSrc, pGlobalDest; DWORD cBytes; if ( !hGlobalSrc ) return 0; cBytes = GlobalSize(hGlobalSrc); if ( 0 == cBytes ) return 0; hGlobalDest = GlobalAlloc( GMEM_DDESHARE|GMEM_MOVEABLE, cBytes ); if ( !hGlobalDest ) return 0; pGlobalSrc = GlobalLock(hGlobalSrc); pGlobalDest = GlobalLock(hGlobalDest); if ( !pGlobalSrc || !pGlobalDest ) return 0; memcpy(pGlobalDest, pGlobalSrc, cBytes); GlobalUnlock(hGlobalSrc); GlobalUnlock(hGlobalDest); return hGlobalDest; } /*---------------------------------------------------------------------* * Implementation of the internal IDataObject interface exposed by * the OLE clipboard. *---------------------------------------------------------------------*/ /************************************************************************ * OLEClipbrd_IDataObject_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static HRESULT WINAPI OLEClipbrd_IDataObject_QueryInterface( IDataObject* iface, REFIID riid, void** ppvObject) { /* * Declare "This" pointer */ ICOM_THIS(OLEClipbrd, iface); TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObject); /* * Perform a sanity check on the parameters. */ if ( (This==0) || (ppvObject==0) ) return E_INVALIDARG; /* * Initialize the return parameter. */ *ppvObject = 0; /* * Compare the riid with the interface IDs implemented by this object. */ if (memcmp(&IID_IUnknown, riid, sizeof(IID_IUnknown)) == 0) { *ppvObject = iface; } else if (memcmp(&IID_IDataObject, riid, sizeof(IID_IDataObject)) == 0) { *ppvObject = (IDataObject*)&(This->lpvtbl1); } else /* We only support IUnknown and IDataObject */ { WARN( "() : asking for unsupported interface %s\n", debugstr_guid(riid)); return E_NOINTERFACE; } /* * Query Interface always increases the reference count by one when it is * successful. */ IUnknown_AddRef((IUnknown*)*ppvObject); return S_OK; } /************************************************************************ * OLEClipbrd_IDataObject_AddRef (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI OLEClipbrd_IDataObject_AddRef( IDataObject* iface) { /* * Declare "This" pointer */ ICOM_THIS(OLEClipbrd, iface); TRACE("(%p)->(count=%lu)\n",This, This->ref); This->ref++; return This->ref; } /************************************************************************ * OLEClipbrd_IDataObject_Release (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI OLEClipbrd_IDataObject_Release( IDataObject* iface) { /* * Declare "This" pointer */ ICOM_THIS(OLEClipbrd, iface); TRACE("(%p)->(count=%lu)\n",This, This->ref); /* * Decrease the reference count on this object. */ This->ref--; /* * If the reference count goes down to 0, perform suicide. */ if (This->ref==0) { OLEClipbrd_Destroy(This); } return This->ref; } /************************************************************************ * OLEClipbrd_IDataObject_GetData (IDataObject) * * The OLE Clipboard's implementation of this method delegates to * a data source if there is one or wraps around the windows clipboard * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI OLEClipbrd_IDataObject_GetData( IDataObject* iface, LPFORMATETC pformatetcIn, STGMEDIUM* pmedium) { HANDLE hData = 0; BOOL bClipboardOpen = FALSE; HRESULT hr = S_OK; /* * Declare "This" pointer */ ICOM_THIS(OLEClipbrd, iface); TRACE("(%p,%p,%p)\n", iface, pformatetcIn, pmedium); if ( !pformatetcIn || !pmedium ) return E_INVALIDARG; /* * If we have a data source placed on the clipboard (via OleSetClipboard) * simply delegate to the source object's QueryGetData * NOTE: This code assumes that the IDataObject is in the same address space! * We will need to add marshalling support when Wine handles multiple processes. */ if ( This->pIDataObjectSrc ) { return IDataObject_GetData(This->pIDataObjectSrc, pformatetcIn, pmedium); } if ( pformatetcIn->lindex != -1 ) return DV_E_LINDEX; if ( (pformatetcIn->tymed & TYMED_HGLOBAL) != TYMED_HGLOBAL ) return DV_E_TYMED; /* if ( pformatetcIn->dwAspect != DVASPECT_CONTENT ) return DV_E_DVASPECT; */ /* * Otherwise, get the data from the windows clipboard using GetClipboardData */ if ( !(bClipboardOpen = OpenClipboard(theOleClipboard->hWndClipboard)) ) HANDLE_ERROR( CLIPBRD_E_CANT_OPEN ); hData = GetClipboardData(pformatetcIn->cfFormat); /* * Return the clipboard data in the storage medium structure */ pmedium->tymed = (hData == 0) ? TYMED_NULL : TYMED_HGLOBAL; pmedium->u.hGlobal = (HGLOBAL)hData; pmedium->pUnkForRelease = NULL; hr = S_OK; CLEANUP: /* * Close Windows clipboard */ if ( bClipboardOpen && !CloseClipboard() ) hr = CLIPBRD_E_CANT_CLOSE; if ( FAILED(hr) ) return hr; return (hData == 0) ? DV_E_FORMATETC : S_OK; } static HRESULT WINAPI OLEClipbrd_IDataObject_GetDataHere( IDataObject* iface, LPFORMATETC pformatetc, STGMEDIUM* pmedium) { FIXME(": Stub\n"); return E_NOTIMPL; } /************************************************************************ * OLEClipbrd_IDataObject_QueryGetData (IDataObject) * * The OLE Clipboard's implementation of this method delegates to * a data source if there is one or wraps around the windows clipboard * function IsClipboardFormatAvailable() otherwise. * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI OLEClipbrd_IDataObject_QueryGetData( IDataObject* iface, LPFORMATETC pformatetc) { /* * Declare "This" pointer */ ICOM_THIS(OLEClipbrd, iface); TRACE("(%p, %p)\n", iface, pformatetc); /* * If we have a data source placed on the clipboard (via OleSetClipboard) * simply delegate to the source object's QueryGetData */ if ( This->pIDataObjectSrc ) { return IDataObject_QueryGetData(This->pIDataObjectSrc, pformatetc); } if (!pformatetc) return E_INVALIDARG; /* if ( pformatetc->dwAspect != DVASPECT_CONTENT ) return DV_E_DVASPECT; */ if ( pformatetc->lindex != -1 ) return DV_E_LINDEX; /* TODO: Handle TYMED_IStorage media which were put on the clipboard * by copying the storage into global memory. We must convert this * TYMED_HGLOBAL back to TYMED_IStorage. */ if ( pformatetc->tymed != TYMED_HGLOBAL ) return DV_E_TYMED; /* * Delegate to the Windows clipboard function IsClipboardFormatAvailable */ return (IsClipboardFormatAvailable(pformatetc->cfFormat)) ? S_OK : DV_E_FORMATETC; } /************************************************************************ * OLEClipbrd_IDataObject_GetCanonicalFormatEtc (IDataObject) * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI OLEClipbrd_IDataObject_GetCanonicalFormatEtc( IDataObject* iface, LPFORMATETC pformatectIn, LPFORMATETC pformatetcOut) { TRACE("(%p, %p, %p)\n", iface, pformatectIn, pformatetcOut); if ( !pformatectIn || !pformatetcOut ) return E_INVALIDARG; memcpy(pformatetcOut, pformatectIn, sizeof(FORMATETC)); return DATA_S_SAMEFORMATETC; } /************************************************************************ * OLEClipbrd_IDataObject_SetData (IDataObject) * * The OLE Clipboard's does not implement this method * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI OLEClipbrd_IDataObject_SetData( IDataObject* iface, LPFORMATETC pformatetc, STGMEDIUM* pmedium, BOOL fRelease) { TRACE("\n"); return E_NOTIMPL; } /************************************************************************ * OLEClipbrd_IDataObject_EnumFormatEtc (IDataObject) * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI OLEClipbrd_IDataObject_EnumFormatEtc( IDataObject* iface, DWORD dwDirection, IEnumFORMATETC** ppenumFormatEtc) { HRESULT hr = S_OK; FORMATETC *afmt = NULL; int cfmt, i; UINT format; BOOL bClipboardOpen; /* * Declare "This" pointer */ ICOM_THIS(OLEClipbrd, iface); TRACE("(%p, %lx, %p)\n", iface, dwDirection, ppenumFormatEtc); /* * If we have a data source placed on the clipboard (via OleSetClipboard) * simply delegate to the source object's EnumFormatEtc */ if ( This->pIDataObjectSrc ) { return IDataObject_EnumFormatEtc(This->pIDataObjectSrc, dwDirection, ppenumFormatEtc); } /* * Otherwise we must provide our own enumerator which wraps around the * Windows clipboard function EnumClipboardFormats */ if ( !ppenumFormatEtc ) return E_INVALIDARG; if ( dwDirection != DATADIR_GET ) /* IDataObject_SetData not implemented */ return E_NOTIMPL; /* * Store all current clipboard formats in an array of FORMATETC's, * and create an IEnumFORMATETC enumerator from this list. */ cfmt = CountClipboardFormats(); afmt = (FORMATETC *)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(FORMATETC) * cfmt); /* * Open the Windows clipboard, associating it with our hidden window */ if ( !(bClipboardOpen = OpenClipboard(This->hWndClipboard)) ) HANDLE_ERROR( CLIPBRD_E_CANT_OPEN ); /* * Store all current clipboard formats in an array of FORMATETC's * TODO: Handle TYMED_IStorage media which were put on the clipboard * by copying the storage into global memory. We must convert this * TYMED_HGLOBAL back to TYMED_IStorage. */ for (i = 0, format = 0; i < cfmt; i++) { format = EnumClipboardFormats(format); if (!format) /* Failed! */ { ERR("EnumClipboardFormats failed to return format!\n"); HANDLE_ERROR( E_FAIL ); } /* Init the FORMATETC struct */ afmt[i].cfFormat = format; afmt[i].ptd = NULL; afmt[i].dwAspect = DVASPECT_CONTENT; afmt[i].lindex = -1; afmt[i].tymed = TYMED_HGLOBAL; } /* * Create an EnumFORMATETC enumerator and return an * EnumFORMATETC after bumping up its ref count */ *ppenumFormatEtc = OLEClipbrd_IEnumFORMATETC_Construct( cfmt, afmt, (LPUNKNOWN)iface); if (!(*ppenumFormatEtc)) HANDLE_ERROR( E_OUTOFMEMORY ); if (FAILED( hr = IEnumFORMATETC_AddRef(*ppenumFormatEtc))) HANDLE_ERROR( hr ); hr = S_OK; CLEANUP: /* * Free the array of FORMATETC's */ if (afmt) HeapFree(GetProcessHeap(), 0, afmt); /* * Close Windows clipboard */ if ( bClipboardOpen && !CloseClipboard() ) hr = CLIPBRD_E_CANT_CLOSE; return hr; } /************************************************************************ * OLEClipbrd_IDataObject_DAdvise (IDataObject) * * The OLE Clipboard's does not implement this method * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI OLEClipbrd_IDataObject_DAdvise( IDataObject* iface, FORMATETC* pformatetc, DWORD advf, IAdviseSink* pAdvSink, DWORD* pdwConnection) { TRACE("\n"); return E_NOTIMPL; } /************************************************************************ * OLEClipbrd_IDataObject_DUnadvise (IDataObject) * * The OLE Clipboard's does not implement this method * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI OLEClipbrd_IDataObject_DUnadvise( IDataObject* iface, DWORD dwConnection) { TRACE("\n"); return E_NOTIMPL; } /************************************************************************ * OLEClipbrd_IDataObject_EnumDAdvise (IDataObject) * * The OLE Clipboard does not implement this method * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI OLEClipbrd_IDataObject_EnumDAdvise( IDataObject* iface, IEnumSTATDATA** ppenumAdvise) { TRACE("\n"); return E_NOTIMPL; } /*---------------------------------------------------------------------* * Implementation of the internal IEnumFORMATETC interface returned by * the OLE clipboard's IDataObject. *---------------------------------------------------------------------*/ /************************************************************************ * OLEClipbrd_IEnumFORMATETC_Construct (UINT, const FORMATETC, LPUNKNOWN) * * Creates an IEnumFORMATETC enumerator from an array of FORMATETC * Structures. pUnkOuter is the outer unknown for reference counting only. * NOTE: this does not AddRef the interface. */ LPENUMFORMATETC OLEClipbrd_IEnumFORMATETC_Construct(UINT cfmt, const FORMATETC afmt[], LPUNKNOWN pUnkDataObj) { IEnumFORMATETCImpl* ef; DWORD size=cfmt * sizeof(FORMATETC); LPMALLOC pIMalloc; ef = (IEnumFORMATETCImpl*)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IEnumFORMATETCImpl)); if (!ef) return NULL; ef->ref = 0; ICOM_VTBL(ef) = &efvt; ef->pUnkDataObj = pUnkDataObj; ef->posFmt = 0; ef->countFmt = cfmt; if (FAILED(CoGetMalloc(MEMCTX_TASK, &pIMalloc))) return NULL; ef->pFmt = (LPFORMATETC)IMalloc_Alloc(pIMalloc, size); IMalloc_Release(pIMalloc); if (ef->pFmt) memcpy(ef->pFmt, afmt, size); TRACE("(%p)->()\n",ef); return (LPENUMFORMATETC)ef; } /************************************************************************ * OLEClipbrd_IEnumFORMATETC_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static HRESULT WINAPI OLEClipbrd_IEnumFORMATETC_QueryInterface (LPENUMFORMATETC iface, REFIID riid, LPVOID* ppvObj) { ICOM_THIS(IEnumFORMATETCImpl,iface); TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); /* * Since enumerators are seperate objects from the parent data object * we only need to support the IUnknown and IEnumFORMATETC interfaces */ *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown)) { *ppvObj = This; } else if(IsEqualIID(riid, &IID_IEnumFORMATETC)) { *ppvObj = (IDataObject*)This; } if(*ppvObj) { IEnumFORMATETC_AddRef((IEnumFORMATETC*)*ppvObj); TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } /************************************************************************ * OLEClipbrd_IEnumFORMATETC_AddRef (IUnknown) * * Since enumerating formats only makes sense when our data object is around, * we insure that it stays as long as we stay by calling our parents IUnknown * for AddRef and Release. But since we are not controlled by the lifetime of * the outer object, we still keep our own reference count in order to * free ourselves. */ static ULONG WINAPI OLEClipbrd_IEnumFORMATETC_AddRef(LPENUMFORMATETC iface) { ICOM_THIS(IEnumFORMATETCImpl,iface); TRACE("(%p)->(count=%lu)\n",This, This->ref); if (This->pUnkDataObj) IUnknown_AddRef(This->pUnkDataObj); return ++(This->ref); } /************************************************************************ * OLEClipbrd_IEnumFORMATETC_Release (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI OLEClipbrd_IEnumFORMATETC_Release(LPENUMFORMATETC iface) { ICOM_THIS(IEnumFORMATETCImpl,iface); LPMALLOC pIMalloc; TRACE("(%p)->(count=%lu)\n",This, This->ref); if (This->pUnkDataObj) IUnknown_Release(This->pUnkDataObj); /* Release parent data object */ if (!--(This->ref)) { TRACE("() - destroying IEnumFORMATETC(%p)\n",This); if (SUCCEEDED(CoGetMalloc(MEMCTX_TASK, &pIMalloc))) { IMalloc_Free(pIMalloc, This->pFmt); IMalloc_Release(pIMalloc); } HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } /************************************************************************ * OLEClipbrd_IEnumFORMATETC_Next (IEnumFORMATETC) * * Standard enumerator members for IEnumFORMATETC */ static HRESULT WINAPI OLEClipbrd_IEnumFORMATETC_Next (LPENUMFORMATETC iface, ULONG celt, FORMATETC *rgelt, ULONG *pceltFethed) { ICOM_THIS(IEnumFORMATETCImpl,iface); UINT cfetch; HRESULT hres = S_FALSE; TRACE("(%p)->(pos=%u)\n", This, This->posFmt); if (This->posFmt < This->countFmt) { cfetch = This->countFmt - This->posFmt; if (cfetch >= celt) { cfetch = celt; hres = S_OK; } memcpy(rgelt, &This->pFmt[This->posFmt], cfetch * sizeof(FORMATETC)); This->posFmt += cfetch; } else { cfetch = 0; } if (pceltFethed) { *pceltFethed = cfetch; } return hres; } /************************************************************************ * OLEClipbrd_IEnumFORMATETC_Skip (IEnumFORMATETC) * * Standard enumerator members for IEnumFORMATETC */ static HRESULT WINAPI OLEClipbrd_IEnumFORMATETC_Skip(LPENUMFORMATETC iface, ULONG celt) { ICOM_THIS(IEnumFORMATETCImpl,iface); TRACE("(%p)->(num=%lu)\n", This, celt); This->posFmt += celt; if (This->posFmt > This->countFmt) { This->posFmt = This->countFmt; return S_FALSE; } return S_OK; } /************************************************************************ * OLEClipbrd_IEnumFORMATETC_Reset (IEnumFORMATETC) * * Standard enumerator members for IEnumFORMATETC */ static HRESULT WINAPI OLEClipbrd_IEnumFORMATETC_Reset(LPENUMFORMATETC iface) { ICOM_THIS(IEnumFORMATETCImpl,iface); TRACE("(%p)->()\n", This); This->posFmt = 0; return S_OK; } /************************************************************************ * OLEClipbrd_IEnumFORMATETC_Clone (IEnumFORMATETC) * * Standard enumerator members for IEnumFORMATETC */ static HRESULT WINAPI OLEClipbrd_IEnumFORMATETC_Clone (LPENUMFORMATETC iface, LPENUMFORMATETC* ppenum) { ICOM_THIS(IEnumFORMATETCImpl,iface); HRESULT hr = S_OK; TRACE("(%p)->(ppenum=%p)\n", This, ppenum); if ( !ppenum ) return E_INVALIDARG; *ppenum = OLEClipbrd_IEnumFORMATETC_Construct(This->countFmt, This->pFmt, This->pUnkDataObj); if (FAILED( hr = IEnumFORMATETC_AddRef(*ppenum))) return ( hr ); return (*ppenum) ? S_OK : E_OUTOFMEMORY; } wine-20000526/dlls/ole32/compobj.c0100644000175000001440000015542707073163220016137 0ustar julliardusers/* * COMPOBJ library * * Copyright 1995 Martin von Loewis * Copyright 1998 Justin Bradford * Copyright 1999 Francis Beaudet * Copyright 1999 Sylvain St-Germain */ #include "config.h" #include #include #include #include #include #ifdef HAVE_SYS_FILE_H # include #endif #include #ifdef HAVE_SYS_SOCKET_H # include #endif #ifdef HAVE_SYS_SOCKIO_H # include #endif #ifdef HAVE_NET_IF_H # include #endif #ifdef HAVE_NETINET_IN_H # include #endif #include #include #include #include #include #include "windef.h" #include "wtypes.h" #include "wingdi.h" #include "wine/winbase16.h" #include "winerror.h" #include "wownt32.h" #include "ole.h" #include "ole2ver.h" #include "debugtools.h" #include "file.h" #include "heap.h" #include "ldt.h" #include "winreg.h" #include "wine/obj_base.h" #include "wine/obj_misc.h" #include "wine/obj_storage.h" #include "wine/obj_clientserver.h" #include "ifs.h" #include "compobj.h" DEFAULT_DEBUG_CHANNEL(ole); /**************************************************************************** * COM External Lock structures and methods declaration * * This api provides a linked list to managed external references to * COM objects. * * The public interface consists of three calls: * COM_ExternalLockAddRef * COM_ExternalLockRelease * COM_ExternalLockFreeList */ #define EL_END_OF_LIST 0 #define EL_NOT_FOUND 0 /* * Declaration of the static structure that manage the * external lock to COM objects. */ typedef struct COM_ExternalLock COM_ExternalLock; typedef struct COM_ExternalLockList COM_ExternalLockList; struct COM_ExternalLock { IUnknown *pUnk; /* IUnknown referenced */ ULONG uRefCount; /* external lock counter to IUnknown object*/ COM_ExternalLock *next; /* Pointer to next element in list */ }; struct COM_ExternalLockList { COM_ExternalLock *head; /* head of list */ }; /* * Declaration and initialization of the static structure that manages * the external lock to COM objects. */ static COM_ExternalLockList elList = { EL_END_OF_LIST }; /* * Public Interface to the external lock list */ static void COM_ExternalLockFreeList(); static void COM_ExternalLockAddRef(IUnknown *pUnk); static void COM_ExternalLockRelease(IUnknown *pUnk, BOOL bRelAll); void COM_ExternalLockDump(); /* testing purposes, not static to avoid warning */ /* * Private methods used to managed the linked list */ static BOOL COM_ExternalLockInsert( IUnknown *pUnk); static void COM_ExternalLockDelete( COM_ExternalLock *element); static COM_ExternalLock* COM_ExternalLockFind( IUnknown *pUnk); static COM_ExternalLock* COM_ExternalLockLocate( COM_ExternalLock *element, IUnknown *pUnk); /**************************************************************************** * This section defines variables internal to the COM module. * * TODO: Most of these things will have to be made thread-safe. */ HINSTANCE16 COMPOBJ_hInstance = 0; HINSTANCE COMPOBJ_hInstance32 = 0; static int COMPOBJ_Attach = 0; LPMALLOC16 currentMalloc16=NULL; LPMALLOC currentMalloc32=NULL; HTASK16 hETask = 0; WORD Table_ETask[62]; /* * This lock count counts the number of times CoInitialize is called. It is * decreased every time CoUninitialize is called. When it hits 0, the COM * libraries are freed */ static ULONG s_COMLockCount = 0; /* * This linked list contains the list of registered class objects. These * are mostly used to register the factories for out-of-proc servers of OLE * objects. * * TODO: Make this data structure aware of inter-process communication. This * means that parts of this will be exported to the Wine Server. */ typedef struct tagRegisteredClass { CLSID classIdentifier; LPUNKNOWN classObject; DWORD runContext; DWORD connectFlags; DWORD dwCookie; struct tagRegisteredClass* nextClass; } RegisteredClass; static RegisteredClass* firstRegisteredClass = NULL; /* this open DLL table belongs in a per process table, but my guess is that * it shouldn't live in the kernel, so I'll put them out here in DLL * space assuming that there is one OLE32 per process. */ typedef struct tagOpenDll { HINSTANCE hLibrary; struct tagOpenDll *next; } OpenDll; static OpenDll *openDllList = NULL; /* linked list of open dlls */ /***************************************************************************** * This section contains prototypes to internal methods for this * module */ static HRESULT COM_GetRegisteredClassObject(REFCLSID rclsid, DWORD dwClsContext, LPUNKNOWN* ppUnk); static void COM_RevokeAllClasses(); /****************************************************************************** * CoBuildVersion [COMPOBJ.1] * * RETURNS * Current build version, hiword is majornumber, loword is minornumber */ DWORD WINAPI CoBuildVersion(void) { TRACE("Returning version %d, build %d.\n", rmm, rup); return (rmm<<16)+rup; } /****************************************************************************** * CoInitialize16 [COMPOBJ.2] * Set the win16 IMalloc used for memory management */ HRESULT WINAPI CoInitialize16( LPVOID lpReserved /* [in] pointer to win16 malloc interface */ ) { currentMalloc16 = (LPMALLOC16)lpReserved; return S_OK; } /****************************************************************************** * CoInitialize [OLE32.26] * * Initializes the COM libraries. * * See CoInitializeEx */ HRESULT WINAPI CoInitialize( LPVOID lpReserved /* [in] pointer to win32 malloc interface (obsolete, should be NULL) */ ) { /* * Just delegate to the newer method. */ return CoInitializeEx(lpReserved, COINIT_APARTMENTTHREADED); } /****************************************************************************** * CoInitializeEx [OLE32.163] * * Initializes the COM libraries. The behavior used to set the win32 IMalloc * used for memory management is obsolete. * * RETURNS * S_OK if successful, * S_FALSE if this function was called already. * RPC_E_CHANGED_MODE if a previous call to CoInitialize specified another * threading model. * * BUGS * Only the single threaded model is supported. As a result RPC_E_CHANGED_MODE * is never returned. * * See the windows documentation for more details. */ HRESULT WINAPI CoInitializeEx( LPVOID lpReserved, /* [in] pointer to win32 malloc interface (obsolete, should be NULL) */ DWORD dwCoInit /* [in] A value from COINIT specifies the threading model */ ) { HRESULT hr; TRACE("(%p, %x)\n", lpReserved, (int)dwCoInit); if (lpReserved!=NULL) { ERR("(%p, %x) - Bad parameter passed-in %p, must be an old Windows Application\n", lpReserved, (int)dwCoInit, lpReserved); } /* * Check for unsupported features. */ if (dwCoInit!=COINIT_APARTMENTTHREADED) { FIXME(":(%p,%x): unsupported flag %x\n", lpReserved, (int)dwCoInit, (int)dwCoInit); /* Hope for the best and continue anyway */ } /* * Check the lock count. If this is the first time going through the initialize * process, we have to initialize the libraries. */ if (s_COMLockCount==0) { /* * Initialize the various COM libraries and data structures. */ TRACE("() - Initializing the COM libraries\n"); RunningObjectTableImpl_Initialize(); hr = S_OK; } else hr = S_FALSE; /* * Crank-up that lock count. */ s_COMLockCount++; return hr; } /*********************************************************************** * CoUninitialize16 [COMPOBJ.3] * Don't know what it does. * 3-Nov-98 -- this was originally misspelled, I changed it to what I * believe is the correct spelling */ void WINAPI CoUninitialize16(void) { TRACE("()\n"); CoFreeAllLibraries(); } /*********************************************************************** * CoUninitialize [OLE32.47] * * This method will release the COM libraries. * * See the windows documentation for more details. */ void WINAPI CoUninitialize(void) { TRACE("()\n"); /* * Decrease the reference count. */ s_COMLockCount--; /* * If we are back to 0 locks on the COM library, make sure we free * all the associated data structures. */ if (s_COMLockCount==0) { /* * Release the various COM libraries and data structures. */ TRACE("() - Releasing the COM libraries\n"); RunningObjectTableImpl_UnInitialize(); /* * Release the references to the registered class objects. */ COM_RevokeAllClasses(); /* * This will free the loaded COM Dlls. */ CoFreeAllLibraries(); /* * This will free list of external references to COM objects. */ COM_ExternalLockFreeList(); } } /*********************************************************************** * CoGetMalloc16 [COMPOBJ.4] * RETURNS * The current win16 IMalloc */ HRESULT WINAPI CoGetMalloc16( DWORD dwMemContext, /* [in] unknown */ LPMALLOC16 * lpMalloc /* [out] current win16 malloc interface */ ) { if(!currentMalloc16) currentMalloc16 = IMalloc16_Constructor(); *lpMalloc = currentMalloc16; return S_OK; } /****************************************************************************** * CoGetMalloc [OLE32.20] * * RETURNS * The current win32 IMalloc */ HRESULT WINAPI CoGetMalloc( DWORD dwMemContext, /* [in] unknown */ LPMALLOC *lpMalloc /* [out] current win32 malloc interface */ ) { if(!currentMalloc32) currentMalloc32 = IMalloc_Constructor(); *lpMalloc = currentMalloc32; return S_OK; } /*********************************************************************** * CoCreateStandardMalloc16 [COMPOBJ.71] */ HRESULT WINAPI CoCreateStandardMalloc16(DWORD dwMemContext, LPMALLOC16 *lpMalloc) { /* FIXME: docu says we shouldn't return the same allocator as in * CoGetMalloc16 */ *lpMalloc = IMalloc16_Constructor(); return S_OK; } /****************************************************************************** * CoDisconnectObject [COMPOBJ.15] */ HRESULT WINAPI CoDisconnectObject( LPUNKNOWN lpUnk, DWORD reserved ) { TRACE("%p %lx\n",lpUnk,reserved); return S_OK; } /*********************************************************************** * IsEqualGUID16 [COMPOBJ.18] * * Compares two Unique Identifiers. * * RETURNS * TRUE if equal */ BOOL16 WINAPI IsEqualGUID16( GUID* g1, /* [in] unique id 1 */ GUID* g2 /* [in] unique id 2 */ ) { return !memcmp( g1, g2, sizeof(GUID) ); } /*********************************************************************** * IsEqualGUID32 [OLE32.76] * * Compares two Unique Identifiers. * * RETURNS * TRUE if equal */ BOOL WINAPI IsEqualGUID32( REFGUID rguid1, /* [in] unique id 1 */ REFGUID rguid2 /* [in] unique id 2 */ ) { return !memcmp(rguid1,rguid2,sizeof(GUID)); } /****************************************************************************** * CLSIDFromString16 [COMPOBJ.20] * Converts a unique identifier from it's string representation into * the GUID struct. * * Class id: DWORD-WORD-WORD-BYTES[2]-BYTES[6] * * RETURNS * the converted GUID */ HRESULT WINAPI CLSIDFromString16( LPCOLESTR16 idstr, /* [in] string representation of guid */ CLSID *id /* [out] GUID converted from string */ ) { BYTE *s = (BYTE *) idstr; BYTE *p; int i; BYTE table[256]; if (!s) s = "{00000000-0000-0000-0000-000000000000}"; TRACE("%s -> %p\n", s, id); /* quick lookup table */ memset(table, 0, 256); for (i = 0; i < 10; i++) { table['0' + i] = i; } for (i = 0; i < 6; i++) { table['A' + i] = i+10; table['a' + i] = i+10; } /* in form {XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX} */ if (strlen(s) != 38) return OLE_ERROR_OBJECT; p = (BYTE *) id; s++; /* skip leading brace */ for (i = 0; i < 4; i++) { p[3 - i] = table[*s]<<4 | table[*(s+1)]; s += 2; } p += 4; s++; /* skip - */ for (i = 0; i < 2; i++) { p[1-i] = table[*s]<<4 | table[*(s+1)]; s += 2; } p += 2; s++; /* skip - */ for (i = 0; i < 2; i++) { p[1-i] = table[*s]<<4 | table[*(s+1)]; s += 2; } p += 2; s++; /* skip - */ /* these are just sequential bytes */ for (i = 0; i < 2; i++) { *p++ = table[*s]<<4 | table[*(s+1)]; s += 2; } s++; /* skip - */ for (i = 0; i < 6; i++) { *p++ = table[*s]<<4 | table[*(s+1)]; s += 2; } return S_OK; } /****************************************************************************** * CoCreateGuid[OLE32.6] * * Creates a 128bit GUID. * Implemented according the DCE specification for UUID generation. * Code is based upon uuid library in e2fsprogs by Theodore Ts'o. * Copyright (C) 1996, 1997 Theodore Ts'o. * * RETURNS * * S_OK if successful. */ HRESULT WINAPI CoCreateGuid( GUID *pguid /* [out] points to the GUID to initialize */ ) { static char has_init = 0; unsigned char a[6]; static int adjustment = 0; static struct timeval last = {0, 0}; static UINT16 clock_seq; struct timeval tv; unsigned long long clock_reg; UINT clock_high, clock_low; UINT16 temp_clock_seq, temp_clock_mid, temp_clock_hi_and_version; #ifdef HAVE_NET_IF_H int sd; struct ifreq ifr, *ifrp; struct ifconf ifc; char buf[1024]; int n, i; #endif /* Have we already tried to get the MAC address? */ if (!has_init) { #ifdef HAVE_NET_IF_H /* BSD 4.4 defines the size of an ifreq to be * max(sizeof(ifreq), sizeof(ifreq.ifr_name)+ifreq.ifr_addr.sa_len * However, under earlier systems, sa_len isn't present, so * the size is just sizeof(struct ifreq) */ #ifdef HAVE_SA_LEN # ifndef max # define max(a,b) ((a) > (b) ? (a) : (b)) # endif # define ifreq_size(i) max(sizeof(struct ifreq),\ sizeof((i).ifr_name)+(i).ifr_addr.sa_len) # else # define ifreq_size(i) sizeof(struct ifreq) # endif /* HAVE_SA_LEN */ sd = socket(AF_INET, SOCK_DGRAM, IPPROTO_IP); if (sd < 0) { /* if we can't open a socket, just use random numbers */ /* set the multicast bit to prevent conflicts with real cards */ a[0] = (rand() & 0xff) | 0x80; a[1] = rand() & 0xff; a[2] = rand() & 0xff; a[3] = rand() & 0xff; a[4] = rand() & 0xff; a[5] = rand() & 0xff; } else { memset(buf, 0, sizeof(buf)); ifc.ifc_len = sizeof(buf); ifc.ifc_buf = buf; /* get the ifconf interface */ if (ioctl (sd, SIOCGIFCONF, (char *)&ifc) < 0) { close(sd); /* no ifconf, so just use random numbers */ /* set the multicast bit to prevent conflicts with real cards */ a[0] = (rand() & 0xff) | 0x80; a[1] = rand() & 0xff; a[2] = rand() & 0xff; a[3] = rand() & 0xff; a[4] = rand() & 0xff; a[5] = rand() & 0xff; } else { /* loop through the interfaces, looking for a valid one */ n = ifc.ifc_len; for (i = 0; i < n; i+= ifreq_size(*ifr) ) { ifrp = (struct ifreq *)((char *) ifc.ifc_buf+i); strncpy(ifr.ifr_name, ifrp->ifr_name, IFNAMSIZ); /* try to get the address for this interface */ # ifdef SIOCGIFHWADDR if (ioctl(sd, SIOCGIFHWADDR, &ifr) < 0) continue; memcpy(a, (unsigned char *)&ifr.ifr_hwaddr.sa_data, 6); # else # ifdef SIOCGENADDR if (ioctl(sd, SIOCGENADDR, &ifr) < 0) continue; memcpy(a, (unsigned char *) ifr.ifr_enaddr, 6); # else /* XXX we don't have a way of getting the hardware address */ close(sd); a[0] = 0; break; # endif /* SIOCGENADDR */ # endif /* SIOCGIFHWADDR */ /* make sure it's not blank */ if (!a[0] && !a[1] && !a[2] && !a[3] && !a[4] && !a[5]) continue; goto valid_address; } /* if we didn't find a valid address, make a random one */ /* once again, set multicast bit to avoid conflicts */ a[0] = (rand() & 0xff) | 0x80; a[1] = rand() & 0xff; a[2] = rand() & 0xff; a[3] = rand() & 0xff; a[4] = rand() & 0xff; a[5] = rand() & 0xff; valid_address: close(sd); } } #else /* no networking info, so generate a random address */ a[0] = (rand() & 0xff) | 0x80; a[1] = rand() & 0xff; a[2] = rand() & 0xff; a[3] = rand() & 0xff; a[4] = rand() & 0xff; a[5] = rand() & 0xff; #endif /* HAVE_NET_IF_H */ has_init = 1; } /* generate time element of GUID */ /* Assume that the gettimeofday() has microsecond granularity */ #define MAX_ADJUSTMENT 10 try_again: gettimeofday(&tv, 0); if ((last.tv_sec == 0) && (last.tv_usec == 0)) { clock_seq = ((rand() & 0xff) << 8) + (rand() & 0xff); clock_seq &= 0x1FFF; last = tv; last.tv_sec--; } if ((tv.tv_sec < last.tv_sec) || ((tv.tv_sec == last.tv_sec) && (tv.tv_usec < last.tv_usec))) { clock_seq = (clock_seq+1) & 0x1FFF; adjustment = 0; } else if ((tv.tv_sec == last.tv_sec) && (tv.tv_usec == last.tv_usec)) { if (adjustment >= MAX_ADJUSTMENT) goto try_again; adjustment++; } else adjustment = 0; clock_reg = tv.tv_usec*10 + adjustment; clock_reg += ((unsigned long long) tv.tv_sec)*10000000; clock_reg += (((unsigned long long) 0x01B21DD2) << 32) + 0x13814000; clock_high = clock_reg >> 32; clock_low = clock_reg; temp_clock_seq = clock_seq | 0x8000; temp_clock_mid = (UINT16)clock_high; temp_clock_hi_and_version = (clock_high >> 16) | 0x1000; /* pack the information into the GUID structure */ ((unsigned char*)&pguid->Data1)[3] = (unsigned char)clock_low; clock_low >>= 8; ((unsigned char*)&pguid->Data1)[2] = (unsigned char)clock_low; clock_low >>= 8; ((unsigned char*)&pguid->Data1)[1] = (unsigned char)clock_low; clock_low >>= 8; ((unsigned char*)&pguid->Data1)[0] = (unsigned char)clock_low; ((unsigned char*)&pguid->Data2)[1] = (unsigned char)temp_clock_mid; temp_clock_mid >>= 8; ((unsigned char*)&pguid->Data2)[0] = (unsigned char)temp_clock_mid; ((unsigned char*)&pguid->Data3)[1] = (unsigned char)temp_clock_hi_and_version; temp_clock_hi_and_version >>= 8; ((unsigned char*)&pguid->Data3)[0] = (unsigned char)temp_clock_hi_and_version; ((unsigned char*)pguid->Data4)[1] = (unsigned char)temp_clock_seq; temp_clock_seq >>= 8; ((unsigned char*)pguid->Data4)[0] = (unsigned char)temp_clock_seq; ((unsigned char*)pguid->Data4)[2] = a[0]; ((unsigned char*)pguid->Data4)[3] = a[1]; ((unsigned char*)pguid->Data4)[4] = a[2]; ((unsigned char*)pguid->Data4)[5] = a[3]; ((unsigned char*)pguid->Data4)[6] = a[4]; ((unsigned char*)pguid->Data4)[7] = a[5]; TRACE("%p", pguid); return S_OK; } /****************************************************************************** * CLSIDFromString [OLE32.3] * Converts a unique identifier from it's string representation into * the GUID struct. * RETURNS * the converted GUID */ HRESULT WINAPI CLSIDFromString( LPCOLESTR idstr, /* [in] string representation of GUID */ CLSID *id /* [out] GUID represented by above string */ ) { LPOLESTR16 xid = HEAP_strdupWtoA(GetProcessHeap(),0,idstr); OLESTATUS ret = CLSIDFromString16(xid,id); HeapFree(GetProcessHeap(),0,xid); return ret; } /****************************************************************************** * WINE_StringFromCLSID [Internal] * Converts a GUID into the respective string representation. * * NOTES * * RETURNS * the string representation and OLESTATUS */ HRESULT WINE_StringFromCLSID( const CLSID *id, /* [in] GUID to be converted */ LPSTR idstr /* [out] pointer to buffer to contain converted guid */ ) { static const char *hex = "0123456789ABCDEF"; char *s; int i; if (!id) { ERR("called with id=Null\n"); *idstr = 0x00; return E_FAIL; } sprintf(idstr, "{%08lX-%04X-%04X-%02X%02X-", id->Data1, id->Data2, id->Data3, id->Data4[0], id->Data4[1]); s = &idstr[25]; /* 6 hex bytes */ for (i = 2; i < 8; i++) { *s++ = hex[id->Data4[i]>>4]; *s++ = hex[id->Data4[i] & 0xf]; } *s++ = '}'; *s++ = '\0'; TRACE("%p->%s\n", id, idstr); return OLE_OK; } /****************************************************************************** * StringFromCLSID16 [COMPOBJ.19] * Converts a GUID into the respective string representation. * The target string is allocated using the OLE IMalloc. * RETURNS * the string representation and OLESTATUS */ HRESULT WINAPI StringFromCLSID16( REFCLSID id, /* [in] the GUID to be converted */ LPOLESTR16 *idstr /* [out] a pointer to a to-be-allocated segmented pointer pointing to the resulting string */ ) { LPMALLOC16 mllc; OLESTATUS ret; DWORD args[2]; ret = CoGetMalloc16(0,&mllc); if (ret) return ret; args[0] = (DWORD)mllc; args[1] = 40; /* No need for a Callback entry, we have WOWCallback16Ex which does * everything we need. */ if (!WOWCallback16Ex( (DWORD)((ICOM_VTABLE(IMalloc16)*)PTR_SEG_TO_LIN( ICOM_VTBL(((LPMALLOC16)PTR_SEG_TO_LIN(mllc)))) )->fnAlloc, WCB16_CDECL, 2*sizeof(DWORD), (LPVOID)args, (LPDWORD)idstr )) { WARN("CallTo16 IMalloc16 failed\n"); return E_FAIL; } return WINE_StringFromCLSID(id,PTR_SEG_TO_LIN(*idstr)); } /****************************************************************************** * StringFromCLSID [OLE32.151] * Converts a GUID into the respective string representation. * The target string is allocated using the OLE IMalloc. * RETURNS * the string representation and OLESTATUS */ HRESULT WINAPI StringFromCLSID( REFCLSID id, /* [in] the GUID to be converted */ LPOLESTR *idstr /* [out] a pointer to a to-be-allocated pointer pointing to the resulting string */ ) { char buf[80]; OLESTATUS ret; LPMALLOC mllc; if ((ret=CoGetMalloc(0,&mllc))) return ret; ret=WINE_StringFromCLSID(id,buf); if (!ret) { *idstr = IMalloc_Alloc(mllc,strlen(buf)*2+2); lstrcpyAtoW(*idstr,buf); } return ret; } /****************************************************************************** * StringFromGUID2 [COMPOBJ.76] [OLE32.152] * * Converts a global unique identifier into a string of an API- * specified fixed format. (The usual {.....} stuff.) * * RETURNS * The (UNICODE) string representation of the GUID in 'str' * The length of the resulting string, 0 if there was any problem. */ INT WINAPI StringFromGUID2(REFGUID id, LPOLESTR str, INT cmax) { char xguid[80]; if (WINE_StringFromCLSID(id,xguid)) return 0; if (strlen(xguid)>=cmax) return 0; lstrcpyAtoW(str,xguid); return strlen(xguid) + 1; } /****************************************************************************** * ProgIDFromCLSID [OLE32.133] * Converts a class id into the respective Program ID. (By using a registry lookup) * RETURNS S_OK on success * riid associated with the progid */ HRESULT WINAPI ProgIDFromCLSID( REFCLSID clsid, /* [in] class id as found in registry */ LPOLESTR *lplpszProgID/* [out] associated Prog ID */ ) { char strCLSID[50], *buf, *buf2; DWORD buf2len; HKEY xhkey; LPMALLOC mllc; HRESULT ret = S_OK; WINE_StringFromCLSID(clsid, strCLSID); buf = HeapAlloc(GetProcessHeap(), 0, strlen(strCLSID)+14); sprintf(buf,"CLSID\\%s\\ProgID", strCLSID); if (RegOpenKeyA(HKEY_CLASSES_ROOT, buf, &xhkey)) ret = REGDB_E_CLASSNOTREG; HeapFree(GetProcessHeap(), 0, buf); if (ret == S_OK) { buf2 = HeapAlloc(GetProcessHeap(), 0, 255); buf2len = 255; if (RegQueryValueA(xhkey, NULL, buf2, &buf2len)) ret = REGDB_E_CLASSNOTREG; if (ret == S_OK) { if (CoGetMalloc(0,&mllc)) ret = E_OUTOFMEMORY; else { *lplpszProgID = IMalloc_Alloc(mllc, (buf2len+1)*2); lstrcpyAtoW(*lplpszProgID, buf2); } } HeapFree(GetProcessHeap(), 0, buf2); } RegCloseKey(xhkey); return ret; } /****************************************************************************** * CLSIDFromProgID16 [COMPOBJ.61] * Converts a program id into the respective GUID. (By using a registry lookup) * RETURNS * riid associated with the progid */ HRESULT WINAPI CLSIDFromProgID16( LPCOLESTR16 progid, /* [in] program id as found in registry */ LPCLSID riid /* [out] associated CLSID */ ) { char *buf,buf2[80]; DWORD buf2len; HRESULT err; HKEY xhkey; buf = HeapAlloc(GetProcessHeap(),0,strlen(progid)+8); sprintf(buf,"%s\\CLSID",progid); if ((err=RegOpenKeyA(HKEY_CLASSES_ROOT,buf,&xhkey))) { HeapFree(GetProcessHeap(),0,buf); return OLE_ERROR_GENERIC; } HeapFree(GetProcessHeap(),0,buf); buf2len = sizeof(buf2); if ((err=RegQueryValueA(xhkey,NULL,buf2,&buf2len))) { RegCloseKey(xhkey); return OLE_ERROR_GENERIC; } RegCloseKey(xhkey); return CLSIDFromString16(buf2,riid); } /****************************************************************************** * CLSIDFromProgID [OLE32.2] * Converts a program id into the respective GUID. (By using a registry lookup) * RETURNS * riid associated with the progid */ HRESULT WINAPI CLSIDFromProgID( LPCOLESTR progid, /* [in] program id as found in registry */ LPCLSID riid /* [out] associated CLSID */ ) { LPOLESTR16 pid = HEAP_strdupWtoA(GetProcessHeap(),0,progid); OLESTATUS ret = CLSIDFromProgID16(pid,riid); HeapFree(GetProcessHeap(),0,pid); return ret; } /*********************************************************************** * WriteClassStm * * This function write a CLSID on stream */ HRESULT WINAPI WriteClassStm(IStream *pStm,REFCLSID rclsid) { TRACE("(%p,%p)\n",pStm,rclsid); if (rclsid==NULL) return E_INVALIDARG; return IStream_Write(pStm,rclsid,sizeof(CLSID),NULL); } /*********************************************************************** * ReadClassStm * * This function read a CLSID from a stream */ HRESULT WINAPI ReadClassStm(IStream *pStm,REFCLSID rclsid) { ULONG nbByte; HRESULT res; TRACE("(%p,%p)\n",pStm,rclsid); if (rclsid==NULL) return E_INVALIDARG; res = IStream_Read(pStm,(void*)rclsid,sizeof(CLSID),&nbByte); if (FAILED(res)) return res; if (nbByte != sizeof(CLSID)) return S_FALSE; else return S_OK; } /* FIXME: this function is not declared in the WINELIB headers. But where should it go ? */ /*********************************************************************** * LookupETask (COMPOBJ.94) */ OLESTATUS WINAPI LookupETask16(HTASK16 *hTask,LPVOID p) { FIXME("(%p,%p),stub!\n",hTask,p); if ((*hTask = GetCurrentTask()) == hETask) { memcpy(p, Table_ETask, sizeof(Table_ETask)); } return 0; } /* FIXME: this function is not declared in the WINELIB headers. But where should it go ? */ /*********************************************************************** * SetETask (COMPOBJ.95) */ OLESTATUS WINAPI SetETask16(HTASK16 hTask, LPVOID p) { FIXME("(%04x,%p),stub!\n",hTask,p); hETask = hTask; return 0; } /* FIXME: this function is not declared in the WINELIB headers. But where should it go ? */ /*********************************************************************** * CallObjectInWOW (COMPOBJ.201) */ OLESTATUS WINAPI CallObjectInWOW(LPVOID p1,LPVOID p2) { FIXME("(%p,%p),stub!\n",p1,p2); return 0; } /****************************************************************************** * CoRegisterClassObject16 [COMPOBJ.5] * * Don't know where it registers it ... */ HRESULT WINAPI CoRegisterClassObject16( REFCLSID rclsid, LPUNKNOWN pUnk, DWORD dwClsContext, /* [in] CLSCTX flags indicating the context in which to run the executable */ DWORD flags, /* [in] REGCLS flags indicating how connections are made */ LPDWORD lpdwRegister ) { char buf[80]; WINE_StringFromCLSID(rclsid,buf); FIXME("(%s,%p,0x%08lx,0x%08lx,%p),stub\n", buf,pUnk,dwClsContext,flags,lpdwRegister ); return 0; } /****************************************************************************** * CoRevokeClassObject16 [COMPOBJ.6] * */ HRESULT WINAPI CoRevokeClassObject16(DWORD dwRegister /* token on class obj */) { FIXME("(0x%08lx),stub!\n", dwRegister); return 0; } /*** * COM_GetRegisteredClassObject * * This internal method is used to scan the registered class list to * find a class object. * * Params: * rclsid Class ID of the class to find. * dwClsContext Class context to match. * ppv [out] returns a pointer to the class object. Complying * to normal COM usage, this method will increase the * reference count on this object. */ static HRESULT COM_GetRegisteredClassObject( REFCLSID rclsid, DWORD dwClsContext, LPUNKNOWN* ppUnk) { RegisteredClass* curClass; /* * Sanity check */ assert(ppUnk!=0); /* * Iterate through the whole list and try to match the class ID. */ curClass = firstRegisteredClass; while (curClass != 0) { /* * Check if we have a match on the class ID. */ if (IsEqualGUID32(&(curClass->classIdentifier), rclsid)) { /* * Since we don't do out-of process or DCOM just right away, let's ignore the * class context. */ /* * We have a match, return the pointer to the class object. */ *ppUnk = curClass->classObject; IUnknown_AddRef(curClass->classObject); return S_OK; } /* * Step to the next class in the list. */ curClass = curClass->nextClass; } /* * If we get to here, we haven't found our class. */ return S_FALSE; } /****************************************************************************** * CoRegisterClassObject [OLE32.36] * * This method will register the class object for a given class ID. * * See the Windows documentation for more details. */ HRESULT WINAPI CoRegisterClassObject( REFCLSID rclsid, LPUNKNOWN pUnk, DWORD dwClsContext, /* [in] CLSCTX flags indicating the context in which to run the executable */ DWORD flags, /* [in] REGCLS flags indicating how connections are made */ LPDWORD lpdwRegister ) { RegisteredClass* newClass; LPUNKNOWN foundObject; HRESULT hr; char buf[80]; WINE_StringFromCLSID(rclsid,buf); TRACE("(%s,%p,0x%08lx,0x%08lx,%p)\n", buf,pUnk,dwClsContext,flags,lpdwRegister); /* * Perform a sanity check on the parameters */ if ( (lpdwRegister==0) || (pUnk==0) ) { return E_INVALIDARG; } /* * Initialize the cookie (out parameter) */ *lpdwRegister = 0; /* * First, check if the class is already registered. * If it is, this should cause an error. */ hr = COM_GetRegisteredClassObject(rclsid, dwClsContext, &foundObject); if (hr == S_OK) { /* * The COM_GetRegisteredClassObject increased the reference count on the * object so it has to be released. */ IUnknown_Release(foundObject); return CO_E_OBJISREG; } /* * If it is not registered, we must create a new entry for this class and * append it to the registered class list. * We use the address of the chain node as the cookie since we are sure it's * unique. */ newClass = HeapAlloc(GetProcessHeap(), 0, sizeof(RegisteredClass)); /* * Initialize the node. */ newClass->classIdentifier = *rclsid; newClass->runContext = dwClsContext; newClass->connectFlags = flags; newClass->dwCookie = (DWORD)newClass; newClass->nextClass = firstRegisteredClass; /* * Since we're making a copy of the object pointer, we have to increase it's * reference count. */ newClass->classObject = pUnk; IUnknown_AddRef(newClass->classObject); firstRegisteredClass = newClass; /* * Assign the out parameter (cookie) */ *lpdwRegister = newClass->dwCookie; /* * We're successful Yippee! */ return S_OK; } /*********************************************************************** * CoRevokeClassObject [OLE32.40] * * This method will remove a class object from the class registry * * See the Windows documentation for more details. */ HRESULT WINAPI CoRevokeClassObject( DWORD dwRegister) { RegisteredClass** prevClassLink; RegisteredClass* curClass; TRACE("(%08lx)\n",dwRegister); /* * Iterate through the whole list and try to match the cookie. */ curClass = firstRegisteredClass; prevClassLink = &firstRegisteredClass; while (curClass != 0) { /* * Check if we have a match on the cookie. */ if (curClass->dwCookie == dwRegister) { /* * Remove the class from the chain. */ *prevClassLink = curClass->nextClass; /* * Release the reference to the class object. */ IUnknown_Release(curClass->classObject); /* * Free the memory used by the chain node. */ HeapFree(GetProcessHeap(), 0, curClass); return S_OK; } /* * Step to the next class in the list. */ prevClassLink = &(curClass->nextClass); curClass = curClass->nextClass; } /* * If we get to here, we haven't found our class. */ return E_INVALIDARG; } /*********************************************************************** * CoGetClassObject [COMPOBJ.7] */ HRESULT WINAPI CoGetClassObject(REFCLSID rclsid, DWORD dwClsContext, LPVOID pvReserved, REFIID iid, LPVOID *ppv) { LPUNKNOWN regClassObject; HRESULT hres = E_UNEXPECTED; char xclsid[80]; WCHAR dllName[MAX_PATH+1]; DWORD dllNameLen = sizeof(dllName); HINSTANCE hLibrary; typedef HRESULT (CALLBACK *DllGetClassObjectFunc)(REFCLSID clsid, REFIID iid, LPVOID *ppv); DllGetClassObjectFunc DllGetClassObject; WINE_StringFromCLSID((LPCLSID)rclsid,xclsid); TRACE("\n\tCLSID:\t%s,\n\tIID:\t%s\n", debugstr_guid(rclsid), debugstr_guid(iid) ); /* * First, try and see if we can't match the class ID with one of the * registered classes. */ if (S_OK == COM_GetRegisteredClassObject(rclsid, dwClsContext, ®ClassObject)) { /* * Get the required interface from the retrieved pointer. */ hres = IUnknown_QueryInterface(regClassObject, iid, ppv); /* * Since QI got another reference on the pointer, we want to release the * one we already have. If QI was unsuccessful, this will release the object. This * is good since we are not returning it in the "out" parameter. */ IUnknown_Release(regClassObject); return hres; } /* out of process and remote servers not supported yet */ if (((CLSCTX_LOCAL_SERVER|CLSCTX_REMOTE_SERVER) & dwClsContext) && !((CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER) & dwClsContext)){ FIXME("CLSCTX_LOCAL_SERVER and CLSCTX_REMOTE_SERVER not supported!\n"); return E_ACCESSDENIED; } if ((CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER) & dwClsContext) { HKEY CLSIDkey,key; WCHAR valname[]={ 'I','n','p','r','o','c', 'S','e','r','v','e','r','3','2',0}; /* lookup CLSID in registry key HKCR/CLSID */ hres = RegOpenKeyExA(HKEY_CLASSES_ROOT, "CLSID", 0, KEY_READ, &CLSIDkey); if (hres != ERROR_SUCCESS) return REGDB_E_READREGDB; hres = RegOpenKeyExA(CLSIDkey,xclsid,0,KEY_QUERY_VALUE,&key); if (hres != ERROR_SUCCESS) { RegCloseKey(CLSIDkey); return REGDB_E_CLASSNOTREG; } memset(dllName,0,sizeof(dllName)); hres = RegQueryValueW(key, valname, dllName, &dllNameLen); if (hres) { ERR("RegQueryValue of %s failed with hres %lx\n",debugstr_w(dllName),hres); return REGDB_E_CLASSNOTREG; /* FIXME: check retval */ } RegCloseKey(key); RegCloseKey(CLSIDkey); if (hres != ERROR_SUCCESS) return REGDB_E_READREGDB; TRACE("found InprocServer32 dll %s\n", debugstr_w(dllName)); /* open dll, call DllGetClassFactory */ hLibrary = CoLoadLibrary(dllName, TRUE); if (hLibrary == 0) { FIXME("couldn't load InprocServer32 dll %s\n", debugstr_w(dllName)); return E_ACCESSDENIED; /* or should this be CO_E_DLLNOTFOUND? */ } DllGetClassObject = (DllGetClassObjectFunc)GetProcAddress(hLibrary, "DllGetClassObject"); if (!DllGetClassObject) { /* not sure if this should be called here CoFreeLibrary(hLibrary);*/ FIXME("couldn't find function DllGetClassObject in %s\n", debugstr_w(dllName)); return E_ACCESSDENIED; } /* * Ask the DLL for it's class object. (there was a note here about class * factories but this is good. */ return DllGetClassObject(rclsid, iid, ppv); } return hres; } /*********************************************************************** * CoResumeClassObjects * * Resumes classobjects registered with REGCLS suspended */ HRESULT WINAPI CoResumeClassObjects(void) { FIXME("\n"); return S_OK; } /*********************************************************************** * GetClassFile * * This function supplies the CLSID associated with the given filename. */ HRESULT WINAPI GetClassFile(LPOLESTR filePathName,CLSID *pclsid) { IStorage *pstg=0; HRESULT res; int nbElm=0,length=0,i=0; LONG sizeProgId=20; LPOLESTR *pathDec=0,absFile=0,progId=0; WCHAR extention[100]={0}; TRACE("()\n"); /* if the file contain a storage object the return the CLSID writen by IStorage_SetClass method*/ if((StgIsStorageFile(filePathName))==S_OK){ res=StgOpenStorage(filePathName,NULL,STGM_READ | STGM_SHARE_DENY_WRITE,NULL,0,&pstg); if (SUCCEEDED(res)) res=ReadClassStg(pstg,pclsid); IStorage_Release(pstg); return res; } /* if the file is not a storage object then attemps to match various bits in the file against a pattern in the registry. this case is not frequently used ! so I present only the psodocode for this case for(i=0;i=0) && (extention[i]=absFile[i]) );i--); /* get the progId associated to the extension */ progId=CoTaskMemAlloc(sizeProgId); res=RegQueryValueW(HKEY_CLASSES_ROOT,extention,progId,&sizeProgId); if (res==ERROR_MORE_DATA){ progId = CoTaskMemRealloc(progId,sizeProgId); res=RegQueryValueW(HKEY_CLASSES_ROOT,extention,progId,&sizeProgId); } if (res==ERROR_SUCCESS) /* return the clsid associated to the progId */ res= CLSIDFromProgID(progId,pclsid); for(i=0; pathDec[i]!=NULL;i++) CoTaskMemFree(pathDec[i]); CoTaskMemFree(pathDec); CoTaskMemFree(progId); if (res==ERROR_SUCCESS) return res; return MK_E_INVALIDEXTENSION; } /****************************************************************************** * CoRegisterMessageFilter16 [COMPOBJ.27] */ HRESULT WINAPI CoRegisterMessageFilter16( LPMESSAGEFILTER lpMessageFilter, LPMESSAGEFILTER *lplpMessageFilter ) { FIXME("(%p,%p),stub!\n",lpMessageFilter,lplpMessageFilter); return 0; } /*********************************************************************** * CoCreateInstance [COMPOBJ.13, OLE32.7] */ HRESULT WINAPI CoCreateInstance( REFCLSID rclsid, LPUNKNOWN pUnkOuter, DWORD dwClsContext, REFIID iid, LPVOID *ppv) { HRESULT hres; LPCLASSFACTORY lpclf = 0; /* * Sanity check */ if (ppv==0) return E_POINTER; /* * Initialize the "out" parameter */ *ppv = 0; /* * Get a class factory to construct the object we want. */ hres = CoGetClassObject(rclsid, dwClsContext, NULL, &IID_IClassFactory, (LPVOID)&lpclf); if (FAILED(hres)) return hres; /* * Create the object and don't forget to release the factory */ hres = IClassFactory_CreateInstance(lpclf, pUnkOuter, iid, ppv); IClassFactory_Release(lpclf); return hres; } /*********************************************************************** * CoCreateInstanceEx [OLE32.165] */ HRESULT WINAPI CoCreateInstanceEx( REFCLSID rclsid, LPUNKNOWN pUnkOuter, DWORD dwClsContext, COSERVERINFO* pServerInfo, ULONG cmq, MULTI_QI* pResults) { IUnknown* pUnk = NULL; HRESULT hr; ULONG index; int successCount = 0; /* * Sanity check */ if ( (cmq==0) || (pResults==NULL)) return E_INVALIDARG; if (pServerInfo!=NULL) FIXME("() non-NULL pServerInfo not supported!\n"); /* * Initialize all the "out" parameters. */ for (index = 0; index < cmq; index++) { pResults[index].pItf = NULL; pResults[index].hr = E_NOINTERFACE; } /* * Get the object and get it's IUnknown pointer. */ hr = CoCreateInstance(rclsid, pUnkOuter, dwClsContext, &IID_IUnknown, (VOID**)&pUnk); if (hr) return hr; /* * Then, query for all the interfaces requested. */ for (index = 0; index < cmq; index++) { pResults[index].hr = IUnknown_QueryInterface(pUnk, pResults[index].pIID, (VOID**)&(pResults[index].pItf)); if (pResults[index].hr == S_OK) successCount++; } /* * Release our temporary unknown pointer. */ IUnknown_Release(pUnk); if (successCount == 0) return E_NOINTERFACE; if (successCount!=cmq) return CO_S_NOTALLINTERFACES; return S_OK; } /*********************************************************************** * CoFreeLibrary [COMPOBJ.13] */ void WINAPI CoFreeLibrary(HINSTANCE hLibrary) { OpenDll *ptr, *prev; OpenDll *tmp; /* lookup library in linked list */ prev = NULL; for (ptr = openDllList; ptr != NULL; ptr=ptr->next) { if (ptr->hLibrary == hLibrary) { break; } prev = ptr; } if (ptr == NULL) { /* shouldn't happen if user passed in a valid hLibrary */ return; } /* assert: ptr points to the library entry to free */ /* free library and remove node from list */ FreeLibrary(hLibrary); if (ptr == openDllList) { tmp = openDllList->next; HeapFree(GetProcessHeap(), 0, openDllList); openDllList = tmp; } else { tmp = ptr->next; HeapFree(GetProcessHeap(), 0, ptr); prev->next = tmp; } } /*********************************************************************** * CoFreeAllLibraries [COMPOBJ.12] */ void WINAPI CoFreeAllLibraries(void) { OpenDll *ptr, *tmp; for (ptr = openDllList; ptr != NULL; ) { tmp=ptr->next; CoFreeLibrary(ptr->hLibrary); ptr = tmp; } } /*********************************************************************** * CoFreeUnusedLibraries [COMPOBJ.17] */ void WINAPI CoFreeUnusedLibraries(void) { OpenDll *ptr, *tmp; typedef HRESULT(*DllCanUnloadNowFunc)(void); DllCanUnloadNowFunc DllCanUnloadNow; for (ptr = openDllList; ptr != NULL; ) { DllCanUnloadNow = (DllCanUnloadNowFunc) GetProcAddress(ptr->hLibrary, "DllCanUnloadNow"); if ( (DllCanUnloadNow != NULL) && (DllCanUnloadNow() == S_OK) ) { tmp=ptr->next; CoFreeLibrary(ptr->hLibrary); ptr = tmp; } else { ptr=ptr->next; } } } /*********************************************************************** * CoFileTimeNow [COMPOBJ.82, OLE32.10] * RETURNS * the current system time in lpFileTime */ HRESULT WINAPI CoFileTimeNow( FILETIME *lpFileTime /* [out] the current time */ ) { DOSFS_UnixTimeToFileTime(time(NULL), lpFileTime, 0); return S_OK; } /*********************************************************************** * CoTaskMemAlloc (OLE32.43) * RETURNS * pointer to newly allocated block */ LPVOID WINAPI CoTaskMemAlloc( ULONG size /* [in] size of memoryblock to be allocated */ ) { LPMALLOC lpmalloc; HRESULT ret = CoGetMalloc(0,&lpmalloc); if (FAILED(ret)) return NULL; return IMalloc_Alloc(lpmalloc,size); } /*********************************************************************** * CoTaskMemFree (OLE32.44) */ VOID WINAPI CoTaskMemFree( LPVOID ptr /* [in] pointer to be freed */ ) { LPMALLOC lpmalloc; HRESULT ret = CoGetMalloc(0,&lpmalloc); if (FAILED(ret)) return; IMalloc_Free(lpmalloc, ptr); } /*********************************************************************** * CoTaskMemRealloc (OLE32.45) * RETURNS * pointer to newly allocated block */ LPVOID WINAPI CoTaskMemRealloc( LPVOID pvOld, ULONG size) /* [in] size of memoryblock to be allocated */ { LPMALLOC lpmalloc; HRESULT ret = CoGetMalloc(0,&lpmalloc); if (FAILED(ret)) return NULL; return IMalloc_Realloc(lpmalloc, pvOld, size); } /*********************************************************************** * CoLoadLibrary (OLE32.30) */ HINSTANCE WINAPI CoLoadLibrary(LPOLESTR lpszLibName, BOOL bAutoFree) { HINSTANCE hLibrary; OpenDll *ptr; OpenDll *tmp; TRACE("CoLoadLibrary(%p, %d\n", debugstr_w(lpszLibName), bAutoFree); hLibrary = LoadLibraryExW(lpszLibName, 0, LOAD_WITH_ALTERED_SEARCH_PATH); if (!bAutoFree) return hLibrary; if (openDllList == NULL) { /* empty list -- add first node */ openDllList = (OpenDll*)HeapAlloc(GetProcessHeap(),0, sizeof(OpenDll)); openDllList->hLibrary=hLibrary; openDllList->next = NULL; } else { /* search for this dll */ int found = FALSE; for (ptr = openDllList; ptr->next != NULL; ptr=ptr->next) { if (ptr->hLibrary == hLibrary) { found = TRUE; break; } } if (!found) { /* dll not found, add it */ tmp = openDllList; openDllList = (OpenDll*)HeapAlloc(GetProcessHeap(),0, sizeof(OpenDll)); openDllList->hLibrary = hLibrary; openDllList->next = tmp; } } return hLibrary; } /*********************************************************************** * CoInitializeWOW (OLE32.27) */ HRESULT WINAPI CoInitializeWOW(DWORD x,DWORD y) { FIXME("(0x%08lx,0x%08lx),stub!\n",x,y); return 0; } /****************************************************************************** * CoLockObjectExternal16 [COMPOBJ.63] */ HRESULT WINAPI CoLockObjectExternal16( LPUNKNOWN pUnk, /* [in] object to be locked */ BOOL16 fLock, /* [in] do lock */ BOOL16 fLastUnlockReleases /* [in] ? */ ) { FIXME("(%p,%d,%d),stub!\n",pUnk,fLock,fLastUnlockReleases); return S_OK; } /****************************************************************************** * CoLockObjectExternal [OLE32.31] */ HRESULT WINAPI CoLockObjectExternal( LPUNKNOWN pUnk, /* [in] object to be locked */ BOOL fLock, /* [in] do lock */ BOOL fLastUnlockReleases) /* [in] unlock all */ { if (fLock) { /* * Increment the external lock coutner, COM_ExternalLockAddRef also * increment the object's internal lock counter. */ COM_ExternalLockAddRef( pUnk); } else { /* * Decrement the external lock coutner, COM_ExternalLockRelease also * decrement the object's internal lock counter. */ COM_ExternalLockRelease( pUnk, fLastUnlockReleases); } return S_OK; } /*********************************************************************** * CoGetState16 [COMPOBJ.115] */ HRESULT WINAPI CoGetState16(LPDWORD state) { FIXME("(%p),stub!\n", state); *state = 0; return S_OK; } /*********************************************************************** * CoSetState [COM32.42] */ HRESULT WINAPI CoSetState(LPDWORD state) { FIXME("(%p),stub!\n", state); if (state) *state = 0; return S_OK; } /*********************************************************************** * DllGetClassObject [OLE32.63] */ HRESULT WINAPI OLE32_DllGetClassObject(REFCLSID rclsid, REFIID iid,LPVOID *ppv) { FIXME("\n\tCLSID:\t%s,\n\tIID:\t%s\n",debugstr_guid(rclsid),debugstr_guid(iid)); *ppv = NULL; return CLASS_E_CLASSNOTAVAILABLE; } /*** * COM_RevokeAllClasses * * This method is called when the COM libraries are uninitialized to * release all the references to the class objects registered with * the library */ static void COM_RevokeAllClasses() { while (firstRegisteredClass!=0) { CoRevokeClassObject(firstRegisteredClass->dwCookie); } } /**************************************************************************** * COM External Lock methods implementation */ /**************************************************************************** * Public - Method that increments the count for a IUnknown* in the linked * list. The item is inserted if not already in the list. */ static void COM_ExternalLockAddRef( IUnknown *pUnk) { COM_ExternalLock *externalLock = COM_ExternalLockFind(pUnk); /* * Add an external lock to the object. If it was already externally * locked, just increase the reference count. If it was not. * add the item to the list. */ if ( externalLock == EL_NOT_FOUND ) COM_ExternalLockInsert(pUnk); else externalLock->uRefCount++; /* * Add an internal lock to the object */ IUnknown_AddRef(pUnk); } /**************************************************************************** * Public - Method that decrements the count for a IUnknown* in the linked * list. The item is removed from the list if its count end up at zero or if * bRelAll is TRUE. */ static void COM_ExternalLockRelease( IUnknown *pUnk, BOOL bRelAll) { COM_ExternalLock *externalLock = COM_ExternalLockFind(pUnk); if ( externalLock != EL_NOT_FOUND ) { do { externalLock->uRefCount--; /* release external locks */ IUnknown_Release(pUnk); /* release local locks as well */ if ( bRelAll == FALSE ) break; /* perform single release */ } while ( externalLock->uRefCount > 0 ); if ( externalLock->uRefCount == 0 ) /* get rid of the list entry */ COM_ExternalLockDelete(externalLock); } } /**************************************************************************** * Public - Method that frees the content of the list. */ static void COM_ExternalLockFreeList() { COM_ExternalLock *head; head = elList.head; /* grab it by the head */ while ( head != EL_END_OF_LIST ) { COM_ExternalLockDelete(head); /* get rid of the head stuff */ head = elList.head; /* get the new head... */ } } /**************************************************************************** * Public - Method that dump the content of the list. */ void COM_ExternalLockDump() { COM_ExternalLock *current = elList.head; DPRINTF("\nExternal lock list contains:\n"); while ( current != EL_END_OF_LIST ) { DPRINTF( "\t%p with %lu references count.\n", current->pUnk, current->uRefCount); /* Skip to the next item */ current = current->next; } } /**************************************************************************** * Internal - Find a IUnknown* in the linked list */ static COM_ExternalLock* COM_ExternalLockFind( IUnknown *pUnk) { return COM_ExternalLockLocate(elList.head, pUnk); } /**************************************************************************** * Internal - Recursivity agent for IUnknownExternalLockList_Find */ static COM_ExternalLock* COM_ExternalLockLocate( COM_ExternalLock *element, IUnknown *pUnk) { if ( element == EL_END_OF_LIST ) return EL_NOT_FOUND; else if ( element->pUnk == pUnk ) /* We found it */ return element; else /* Not the right guy, keep on looking */ return COM_ExternalLockLocate( element->next, pUnk); } /**************************************************************************** * Internal - Insert a new IUnknown* to the linked list */ static BOOL COM_ExternalLockInsert( IUnknown *pUnk) { COM_ExternalLock *newLock = NULL; COM_ExternalLock *previousHead = NULL; /* * Allocate space for the new storage object */ newLock = HeapAlloc(GetProcessHeap(), 0, sizeof(COM_ExternalLock)); if (newLock!=NULL) { if ( elList.head == EL_END_OF_LIST ) { elList.head = newLock; /* The list is empty */ } else { /* * insert does it at the head */ previousHead = elList.head; elList.head = newLock; } /* * Set new list item data member */ newLock->pUnk = pUnk; newLock->uRefCount = 1; newLock->next = previousHead; return TRUE; } else return FALSE; } /**************************************************************************** * Internal - Method that removes an item from the linked list. */ static void COM_ExternalLockDelete( COM_ExternalLock *itemList) { COM_ExternalLock *current = elList.head; if ( current == itemList ) { /* * this section handles the deletion of the first node */ elList.head = itemList->next; HeapFree( GetProcessHeap(), 0, itemList); } else { do { if ( current->next == itemList ) /* We found the item to free */ { current->next = itemList->next; /* readjust the list pointers */ HeapFree( GetProcessHeap(), 0, itemList); break; } /* Skip to the next item */ current = current->next; } while ( current != EL_END_OF_LIST ); } } /*********************************************************************** * COMPOBJ_DllEntryPoint [COMPOBJ.entry] * * Initialization code for the COMPOBJ DLL * * RETURNS: */ BOOL WINAPI COMPOBJ_DllEntryPoint(DWORD Reason, HINSTANCE16 hInst, WORD ds, WORD HeapSize, DWORD res1, WORD res2) { TRACE("(%08lx, %04x, %04x, %04x, %08lx, %04x)\n", Reason, hInst, ds, HeapSize, res1, res2); switch(Reason) { case DLL_PROCESS_ATTACH: COMPOBJ_Attach++; if(COMPOBJ_hInstance) { ERR("compobj.dll instantiated twice!\n"); /* * We should return FALSE here, but that will break * most apps that use CreateProcess because we do * not yet support seperate address-spaces. */ return TRUE; } COMPOBJ_hInstance = hInst; break; case DLL_PROCESS_DETACH: if(!--COMPOBJ_Attach) COMPOBJ_hInstance = 0; break; } return TRUE; } wine-20000526/dlls/ole32/compobj.spec0100644000175000001440000001776606771226505016664 0ustar julliardusersname compobj type win16 1 pascal CoBuildVersion() CoBuildVersion 2 pascal CoInitialize(long) CoInitialize16 3 pascal CoUninitialize() CoUninitialize16 4 pascal CoGetMalloc(long ptr) CoGetMalloc16 5 pascal CoRegisterClassObject(ptr ptr long long ptr) CoRegisterClassObject16 6 pascal CoRevokeClassObject(long) CoRevokeClassObject16 7 pascal CoGetClassObject(ptr long ptr ptr ptr) CoGetClassObject 8 stub COMARSHALINTERFACE 9 stub COUNMARSHALINTERFACE 10 stub COLOADLIBRARY 11 stub COFREELIBRARY 12 stub COFREEALLLIBRARIES 13 pascal CoCreateInstance(ptr ptr long ptr ptr) CoCreateInstance 14 stub STRINGFROMIID 15 pascal CoDisconnectObject(ptr long) CoDisconnectObject 16 stub CORELEASEMARSHALDATA 17 pascal16 COFREEUNUSEDLIBRARIES() CoFreeUnusedLibraries 18 pascal16 IsEqualGUID(ptr ptr) IsEqualGUID16 19 pascal StringFromCLSID(ptr ptr) StringFromCLSID16 20 pascal CLSIDFromString(str ptr) CLSIDFromString16 21 stub ISVALIDPTRIN 22 stub ISVALIDPTROUT 23 stub ISVALIDINTERFACE 24 stub ISVALIDIID 25 stub RESULTFROMSCODE 26 stub GETSCODE 27 pascal CoRegisterMessageFilter(ptr ptr) CoRegisterMessageFilter16 28 stub COISHANDLERCONNECTED 29 stub SHRADDREF 30 pascal CoFileTimeToDosDateTime(ptr ptr ptr) FileTimeToDosDateTime 31 pascal CoDosDateTimeToFileTime(word word ptr) DosDateTimeToFileTime 32 stub COMARSHALHRESULT 33 stub COUNMARSHALHRESULT 34 pascal CoGetCurrentProcess() CoGetCurrentProcess 35 stub SHRCREATE 36 stub COISOLE1CLASS 37 stub _GUID_NULL 38 stub _IID_IUNKNOWN 39 stub _IID_ICLASSFACTORY 40 stub _IID_IMALLOC 41 stub _IID_IMARSHAL 42 stub _IID_IRPCCHANNEL 43 stub _IID_IRPCSTUB 44 stub _IID_ISTUBMANAGER 45 stub _IID_IRPCPROXY 46 stub _IID_IPROXYMANAGER 47 stub _IID_IPSFACTORY 48 stub _IID_ILOCKBYTES 49 stub _IID_ISTORAGE 50 stub _IID_ISTREAM 51 stub _IID_IENUMSTATSTG 52 stub _IID_IBINDCTX 53 stub _IID_IMONIKER 54 stub _IID_IRUNNINGOBJECTTABLE 55 stub _IID_IINTERNALMONIKER 56 stub _IID_IROOTSTORAGE 57 stub _IID_IDFRESERVED1 58 stub _IID_IDFRESERVED2 59 stub _IID_IDFRESERVED3 60 stub _IID_IMESSAGEFILTER 61 pascal CLSIDFromProgID(str ptr) CLSIDFromProgID16 62 stub PROGIDFROMCLSID 63 pascal CoLockObjectExternal(segptr word word) CoLockObjectExternal16 64 stub _CLSID_STDMARSHAL 65 stub COGETTREATASCLASS 66 stub COTREATASCLASS 67 stub COGETSTANDARDMARSHAL 68 stub PROPAGATERESULT 69 stub IIDFROMSTRING 70 stub _IID_ISTDMARSHALINFO 71 pascal CoCreateStandardMalloc(long ptr) CoCreateStandardMalloc16 72 stub _IID_IEXTERNALCONNECTION 73 stub COCREATEGUID 75 stub FNASSERT 76 pascal STRINGFROMGUID2(ptr ptr word) StringFromGUID2 77 stub COGETCLASSEXT 78 stub OLE1CLASSFROMCLSID2 79 stub CLSIDFROMOLE1CLASS 80 stub COOPENCLASSKEY 81 stub GUIDFROMSTRING 82 pascal CoFileTimeNow(ptr) CoFileTimeNow 83 stub REMALLOCOID 84 stub REMFREEOID 85 stub REMCREATEREMOTEHANDLER 86 stub REMCONNECTTOOBJECT 87 stub REMGETINFOFORCID 88 stub LRPCCALL 89 stub LRPCDISPATCH 90 stub LRPCREGISTERMONITOR 91 stub LRPCREVOKEMONITOR 92 stub LRPCGETTHREADWINDOW 93 stub TIMERCALLBACKPROC 94 pascal LookupETask(ptr ptr) LookupETask16 95 pascal16 SetETask(word ptr) SetETask16 96 stub LRPCFREEMONITORDATA 97 stub REMLOOKUPSHUNK 98 stub SHRGETSIZE 99 stub CALLTHKMGRUNINITIALIZE 100 stub ??0CARRAYFVALUE@@REC@KI@Z 101 stub ??1CARRAYFVALUE@@REC@XZ 102 stub ?ASSERTVALID@CARRAYFVALUE@@RFCXXZ 103 stub ?FREEEXTRA@CARRAYFVALUE@@RECXXZ 104 stub ?_GETAT@CARRAYFVALUE@@RFCPEXH@Z 105 stub ?GETSIZE@CARRAYFVALUE@@RFCHXZ 106 stub ?REMOVEALL@CARRAYFVALUE@@RECXXZ 107 stub SHRDESTROY 108 stub ?INDEXOF@CARRAYFVALUE@@RECHPEXII@Z 109 stub ?INSERTAT@CARRAYFVALUE@@RECHHPEXH@Z 110 stub COSETSTATE 111 stub ?REMOVEAT@CARRAYFVALUE@@RECXHH@Z 112 stub ?SETAT@CARRAYFVALUE@@RECXHPEX@Z 113 stub ?SETATGROW@CARRAYFVALUE@@RECHHPEX@Z 114 stub ?SETSIZE@CARRAYFVALUE@@RECHHH@Z 115 pascal CoGetState(ptr) CoGetState16 116 pascal DllEntryPoint(long word word word long word) COMPOBJ_DllEntryPoint 117 stub ?RELEASE@CSTDMALLOC@@VEAKXZ 118 stub ?ALLOC@CSTDMALLOC@@VEAPEXK@Z 119 stub SHRRELEASE 120 stub ?GETASSOCAT@CMAPKEYTOVALUE@@BFCPEUCASSOC@1@PEXIAEI@Z 121 stub ?SETASSOCKEY@CMAPKEYTOVALUE@@BFCHPEUCASSOC@1@PEXI@Z 122 stub ??1CMAPKEYTOVALUE@@REC@XZ 123 stub ?GETASSOCKEYPTR@CMAPKEYTOVALUE@@BFCXPEUCASSOC@1@PEPEXPEI@Z 124 stub ?NEWASSOC@CMAPKEYTOVALUE@@BECPEUCASSOC@1@IPEXI0@Z 125 stub ?SIZEASSOC@CMAPKEYTOVALUE@@BFCIXZ 126 stub ?FREEASSOC@CMAPKEYTOVALUE@@BECXPEUCASSOC@1@@Z 127 stub ?GETSTARTPOSITION@CMAPKEYTOVALUE@@RFCPEXXZ 128 stub ?GETNEXTASSOC@CMAPKEYTOVALUE@@RFCXPEPEXPEXPEI1@Z 129 stub ?COMPAREASSOCKEY@CMAPKEYTOVALUE@@BFCHPEUCASSOC@1@PEXI@Z 130 stub ?REMOVEHKEY@CMAPKEYTOVALUE@@RECHK@Z 131 stub ?GETHKEY@CMAPKEYTOVALUE@@RFCKPEXI@Z 132 stub ?GETCOUNT@CMAPKEYTOVALUE@@RFCHXZ 133 stub ?LOOKUP@CMAPKEYTOVALUE@@RFCHPEXI0@Z 134 stub ?GETASSOCVALUE@CMAPKEYTOVALUE@@BFCXPEUCASSOC@1@PEX@Z 135 stub ?REMOVEKEY@CMAPKEYTOVALUE@@RECHPEXI@Z 136 stub ?REMOVEALL@CMAPKEYTOVALUE@@RECXXZ 137 stub SHRALLOC 138 stub ?FREEASSOCKEY@CMAPKEYTOVALUE@@BFCXPEUCASSOC@1@@Z 139 stub ?SETAT@CMAPKEYTOVALUE@@RECHPEXI0@Z 140 stub ?LOOKUPHKEY@CMAPKEYTOVALUE@@RFCHKPEX@Z 141 stub ?ASSERTVALID@CMAPKEYTOVALUE@@RFCXXZ 142 stub ?SETASSOCVALUE@CMAPKEYTOVALUE@@BFCXPEUCASSOC@1@PEX@Z 143 stub ?SETATHKEY@CMAPKEYTOVALUE@@RECHKPEX@Z 144 stub ??0CMAPKEYTOVALUE@@REC@KIIHP7CIPEXI@ZI@Z 145 stub ?INITHASHTABLE@CMAPKEYTOVALUE@@BECHXZ 146 stub ?GETASSOCVALUEPTR@CMAPKEYTOVALUE@@BFCXPEUCASSOC@1@PEPEX@Z 147 stub ?LOOKUPADD@CMAPKEYTOVALUE@@RFCHPEXI0@Z 148 stub MKVDEFAULTHASHKEY 149 stub DELETE16 150 stub COMEMCTXOF 151 stub COMEMALLOC 152 stub COMEMFREE 153 stub SHRREALLOC 154 stub ___EXPORTEDSTUB 155 stub LRPCREGISTERWIN32SMONITOR 156 stub MYREMGETINFOFORCID 157 stub SHRFREE 158 stub OPNEW16 159 stub ADDCOINFO 160 stub CORUNMODALLOOP 161 stub COHANDLEINCOMINGCALL 162 stub COSETACKSTATE 163 stub SHRDIDALLOC 164 stub ?GETAT@CARRAYFVALUE@@RFCPEXH@Z 165 stub ?GETUPPERBOUND@CARRAYFVALUE@@RFCHXZ 166 stub OPDELETE16 167 stub ?GETSIZEVALUE@CARRAYFVALUE@@RFCHXZ 168 stub ?PROXY1632ADDREF@@ZAKPEVCPROXY1632@@@Z 169 stub REMLOOKUPSHUNK 170 stub ?ISEMPTY@CMAPKEYTOVALUE@@RFCHXZ 171 stub ?FREE@CSTDMALLOC@@VEAXPEX@Z 172 stub CALLTHKMGRINITIALIZE 173 stub ?REALLOC@CSTDMALLOC@@VEAPEXPEXK@Z 174 stub ?SM16RHQI@@ZAPEXPEVCSM16RELEASEHANDLER@@AFUGUID@@PEPEX@Z 175 stub ?PROXY1632METHOD10@@ZAKPEVCPROXY1632@@@Z 176 stub ___EXPORTEDSTUB 177 stub ?PROXY1632METHOD20@@ZAKPEVCPROXY1632@@@Z 178 stub ?PROXY1632METHOD11@@ZAKPEVCPROXY1632@@@Z 179 stub ?PROXY1632METHOD30@@ZAKPEVCPROXY1632@@@Z 180 stub ?PROXY1632METHOD21@@ZAKPEVCPROXY1632@@@Z 181 stub ?PROXY1632METHOD12@@ZAKPEVCPROXY1632@@@Z 182 stub ?PROXY1632METHOD31@@ZAKPEVCPROXY1632@@@Z 183 stub ?PROXY1632METHOD22@@ZAKPEVCPROXY1632@@@Z 184 stub ?PROXY1632METHOD13@@ZAKPEVCPROXY1632@@@Z 185 stub ?GETSIZE@CSTDMALLOC@@VEAKPEX@Z 186 stub ?PROXY1632METHOD23@@ZAKPEVCPROXY1632@@@Z 187 stub ?PROXY1632METHOD14@@ZAKPEVCPROXY1632@@@Z 188 stub ?PROXY1632METHOD24@@ZAKPEVCPROXY1632@@@Z 189 stub ?PROXY1632METHOD15@@ZAKPEVCPROXY1632@@@Z 190 stub ?PROXY1632METHOD25@@ZAKPEVCPROXY1632@@@Z 191 stub ?PROXY1632METHOD16@@ZAKPEVCPROXY1632@@@Z 192 stub ?PROXY1632METHOD26@@ZAKPEVCPROXY1632@@@Z 193 stub ?PROXY1632METHOD17@@ZAKPEVCPROXY1632@@@Z 194 stub ?PROXY1632METHOD27@@ZAKPEVCPROXY1632@@@Z 195 stub ?PROXY1632METHOD18@@ZAKPEVCPROXY1632@@@Z 196 stub ?PROXY1632METHOD28@@ZAKPEVCPROXY1632@@@Z 197 stub ?ADDREF@CSTDMALLOC@@VEAKXZ 198 stub ?PROXY1632METHOD19@@ZAKPEVCPROXY1632@@@Z 199 stub ?PROXY1632METHOD29@@ZAKPEVCPROXY1632@@@Z 200 stub CALL32INITIALIZE 201 pascal CALLOBJECTINWOW(ptr ptr) CallObjectInWOW 203 stub CALLOBJECTINWOWCHECKINIT 204 stub CALLOBJECTINWOWCHECKTHKMGR 205 stub CONVERTHR1632 206 stub CONVERTHR3216 207 stub ADDAPPCOMPATFLAG # WINE internal relays (for Win16 interfaces) 500 cdecl IMalloc16_QueryInterface(ptr ptr ptr) IMalloc16_fnQueryInterface 501 cdecl IMalloc16_AddRef(ptr) IMalloc16_fnAddRef 502 cdecl IMalloc16_Release(ptr) IMalloc16_fnRelease 503 cdecl IMalloc16_Alloc(ptr long) IMalloc16_fnAlloc 504 cdecl IMalloc16_Realloc(ptr segptr long) IMalloc16_fnRealloc 505 cdecl IMalloc16_Free(ptr segptr) IMalloc16_fnFree 506 cdecl IMalloc16_GetSize(ptr segptr) IMalloc16_fnGetSize 507 cdecl IMalloc16_DidAlloc(ptr segptr) IMalloc16_fnDidAlloc 508 cdecl IMalloc16_HeapMinimize(ptr) IMalloc16_fnHeapMinimize wine-20000526/dlls/ole32/compositemoniker.c0100644000175000001440000016331507066752015020100 0ustar julliardusers/*************************************************************************************** * CompositeMonikers implementation * * Copyright 1999 Noomen Hamza ***************************************************************************************/ #include #include "winbase.h" #include "winerror.h" #include "debugtools.h" #include "wine/obj_inplace.h" #include "ole2.h" DEFAULT_DEBUG_CHANNEL(ole) #define BLOCK_TAB_SIZE 5 /* represent the first size table and it's increment block size */ /* CompositeMoniker data structure */ typedef struct CompositeMonikerImpl{ ICOM_VTABLE(IMoniker)* lpvtbl1; /* VTable relative to the IMoniker interface.*/ /* The ROT (RunningObjectTable implementation) uses the IROTData interface to test whether * two monikers are equal. That's whay IROTData interface is implemented by monikers. */ ICOM_VTABLE(IROTData)* lpvtbl2; /* VTable relative to the IROTData interface.*/ ULONG ref; /* reference counter for this object */ IMoniker** tabMoniker; /* dynamaic table containing all components (monikers) of this composite moniker */ ULONG tabSize; /* size of tabMoniker */ ULONG tabLastIndex; /* first free index in tabMoniker */ } CompositeMonikerImpl; /* EnumMoniker data structure */ typedef struct EnumMonikerImpl{ ICOM_VFIELD(IEnumMoniker); /* VTable relative to the IEnumMoniker interface.*/ ULONG ref; /* reference counter for this object */ IMoniker** tabMoniker; /* dynamic table containing the enumerated monikers */ ULONG tabSize; /* size of tabMoniker */ ULONG currentPos; /* index pointer on the current moniker */ } EnumMonikerImpl; /********************************************************************************/ /* CompositeMoniker prototype functions : */ /* IUnknown prototype functions */ static HRESULT WINAPI CompositeMonikerImpl_QueryInterface(IMoniker* iface,REFIID riid,void** ppvObject); static ULONG WINAPI CompositeMonikerImpl_AddRef(IMoniker* iface); static ULONG WINAPI CompositeMonikerImpl_Release(IMoniker* iface); /* IPersist prototype functions */ static HRESULT WINAPI CompositeMonikerImpl_GetClassID(IMoniker* iface, CLSID *pClassID); /* IPersistStream prototype functions */ static HRESULT WINAPI CompositeMonikerImpl_IsDirty(IMoniker* iface); static HRESULT WINAPI CompositeMonikerImpl_Load(IMoniker* iface, IStream* pStm); static HRESULT WINAPI CompositeMonikerImpl_Save(IMoniker* iface, IStream* pStm, BOOL fClearDirty); static HRESULT WINAPI CompositeMonikerImpl_GetSizeMax(IMoniker* iface, ULARGE_INTEGER* pcbSize); /* IMoniker prototype functions */ static HRESULT WINAPI CompositeMonikerImpl_BindToObject(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, REFIID riid, VOID** ppvResult); static HRESULT WINAPI CompositeMonikerImpl_BindToStorage(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, REFIID riid, VOID** ppvResult); static HRESULT WINAPI CompositeMonikerImpl_Reduce(IMoniker* iface,IBindCtx* pbc, DWORD dwReduceHowFar,IMoniker** ppmkToLeft, IMoniker** ppmkReduced); static HRESULT WINAPI CompositeMonikerImpl_ComposeWith(IMoniker* iface,IMoniker* pmkRight,BOOL fOnlyIfNotGeneric, IMoniker** ppmkComposite); static HRESULT WINAPI CompositeMonikerImpl_Enum(IMoniker* iface,BOOL fForward, IEnumMoniker** ppenumMoniker); static HRESULT WINAPI CompositeMonikerImpl_IsEqual(IMoniker* iface,IMoniker* pmkOtherMoniker); static HRESULT WINAPI CompositeMonikerImpl_Hash(IMoniker* iface,DWORD* pdwHash); static HRESULT WINAPI CompositeMonikerImpl_IsRunning(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, IMoniker* pmkNewlyRunning); static HRESULT WINAPI CompositeMonikerImpl_GetTimeOfLastChange(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, FILETIME* pCompositeTime); static HRESULT WINAPI CompositeMonikerImpl_Inverse(IMoniker* iface,IMoniker** ppmk); static HRESULT WINAPI CompositeMonikerImpl_CommonPrefixWith(IMoniker* iface,IMoniker* pmkOther, IMoniker** ppmkPrefix); static HRESULT WINAPI CompositeMonikerImpl_RelativePathTo(IMoniker* iface,IMoniker* pmOther, IMoniker** ppmkRelPath); static HRESULT WINAPI CompositeMonikerImpl_GetDisplayName(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, LPOLESTR *ppszDisplayName); static HRESULT WINAPI CompositeMonikerImpl_ParseDisplayName(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, LPOLESTR pszDisplayName, ULONG* pchEaten, IMoniker** ppmkOut); static HRESULT WINAPI CompositeMonikerImpl_IsSystemMoniker(IMoniker* iface,DWORD* pwdMksys); /********************************************************************************/ /* IROTData prototype functions */ /* IUnknown prototype functions */ static HRESULT WINAPI CompositeMonikerROTDataImpl_QueryInterface(IROTData* iface,REFIID riid,VOID** ppvObject); static ULONG WINAPI CompositeMonikerROTDataImpl_AddRef(IROTData* iface); static ULONG WINAPI CompositeMonikerROTDataImpl_Release(IROTData* iface); /* IROTData prototype function */ static HRESULT WINAPI CompositeMonikerROTDataImpl_GetComparaisonData(IROTData* iface,BYTE* pbData,ULONG cbMax,ULONG* pcbData); /* Local function used by CompositeMoniker implementation */ HRESULT WINAPI CompositeMonikerImpl_Construct(CompositeMonikerImpl* This,LPMONIKER pmkFirst, LPMONIKER pmkRest); HRESULT WINAPI CompositeMonikerImpl_Destroy(CompositeMonikerImpl* iface); /********************************************************************************/ /* IEnumMoniker prototype functions */ /* IUnknown prototype functions */ static HRESULT WINAPI EnumMonikerImpl_QueryInterface(IEnumMoniker* iface,REFIID riid,void** ppvObject); static ULONG WINAPI EnumMonikerImpl_AddRef(IEnumMoniker* iface); static ULONG WINAPI EnumMonikerImpl_Release(IEnumMoniker* iface); /* IEnumMonker prototype functions */ static HRESULT WINAPI EnumMonikerImpl_Next(IEnumMoniker* iface,ULONG celt,IMoniker** rgelt,ULONG* pceltFetched); static HRESULT WINAPI EnumMonikerImpl_Skip(IEnumMoniker* iface,ULONG celt); static HRESULT WINAPI EnumMonikerImpl_Reset(IEnumMoniker* iface); static HRESULT WINAPI EnumMonikerImpl_Clone(IEnumMoniker* iface,IEnumMoniker** ppenum); HRESULT WINAPI EnumMonikerImpl_CreateEnumMoniker(IMoniker** tabMoniker,ULONG tabSize,ULONG currentPos,BOOL leftToRigth,IEnumMoniker ** ppmk); /********************************************************************************/ /* Virtual function table for the CompositeMonikerImpl class witch include */ /* Ipersist, IPersistStream and IMoniker functions. */ static ICOM_VTABLE(IMoniker) VT_CompositeMonikerImpl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE CompositeMonikerImpl_QueryInterface, CompositeMonikerImpl_AddRef, CompositeMonikerImpl_Release, CompositeMonikerImpl_GetClassID, CompositeMonikerImpl_IsDirty, CompositeMonikerImpl_Load, CompositeMonikerImpl_Save, CompositeMonikerImpl_GetSizeMax, CompositeMonikerImpl_BindToObject, CompositeMonikerImpl_BindToStorage, CompositeMonikerImpl_Reduce, CompositeMonikerImpl_ComposeWith, CompositeMonikerImpl_Enum, CompositeMonikerImpl_IsEqual, CompositeMonikerImpl_Hash, CompositeMonikerImpl_IsRunning, CompositeMonikerImpl_GetTimeOfLastChange, CompositeMonikerImpl_Inverse, CompositeMonikerImpl_CommonPrefixWith, CompositeMonikerImpl_RelativePathTo, CompositeMonikerImpl_GetDisplayName, CompositeMonikerImpl_ParseDisplayName, CompositeMonikerImpl_IsSystemMoniker }; /********************************************************************************/ /* Virtual function table for the IROTData class. */ static ICOM_VTABLE(IROTData) VT_ROTDataImpl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE CompositeMonikerROTDataImpl_QueryInterface, CompositeMonikerROTDataImpl_AddRef, CompositeMonikerROTDataImpl_Release, CompositeMonikerROTDataImpl_GetComparaisonData }; /********************************************************************************/ /* Virtual function table for the IROTData class */ static ICOM_VTABLE(IEnumMoniker) VT_EnumMonikerImpl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE EnumMonikerImpl_QueryInterface, EnumMonikerImpl_AddRef, EnumMonikerImpl_Release, EnumMonikerImpl_Next, EnumMonikerImpl_Skip, EnumMonikerImpl_Reset, EnumMonikerImpl_Clone }; /******************************************************************************* * CompositeMoniker_QueryInterface *******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_QueryInterface(IMoniker* iface,REFIID riid,void** ppvObject) { ICOM_THIS(CompositeMonikerImpl,iface); TRACE("(%p,%p,%p)\n",This,riid,ppvObject); /* Perform a sanity check on the parameters.*/ if ( (This==0) || (ppvObject==0) ) return E_INVALIDARG; /* Initialize the return parameter */ *ppvObject = 0; /* Compare the riid with the interface IDs implemented by this object.*/ if (IsEqualIID(&IID_IUnknown, riid) || IsEqualIID(&IID_IPersist, riid) || IsEqualIID(&IID_IPersistStream, riid) || IsEqualIID(&IID_IMoniker, riid) ) *ppvObject = iface; else if (IsEqualIID(&IID_IROTData, riid)) *ppvObject = (IROTData*)&(This->lpvtbl2); /* Check that we obtained an interface.*/ if ((*ppvObject)==0) return E_NOINTERFACE; /* Query Interface always increases the reference count by one when it is successful */ CompositeMonikerImpl_AddRef(iface); return S_OK; } /****************************************************************************** * CompositeMoniker_AddRef ******************************************************************************/ ULONG WINAPI CompositeMonikerImpl_AddRef(IMoniker* iface) { ICOM_THIS(CompositeMonikerImpl,iface); TRACE("(%p)\n",This); return ++(This->ref); } /****************************************************************************** * CompositeMoniker_Release ******************************************************************************/ ULONG WINAPI CompositeMonikerImpl_Release(IMoniker* iface) { ICOM_THIS(CompositeMonikerImpl,iface); ULONG i; TRACE("(%p)\n",This); This->ref--; /* destroy the object if there's no more reference on it */ if (This->ref==0){ /* release all the components before destroying this object */ for (i=0;itabLastIndex;i++) IMoniker_Release(This->tabMoniker[i]); CompositeMonikerImpl_Destroy(This); return 0; } return This->ref;; } /****************************************************************************** * CompositeMoniker_GetClassID ******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_GetClassID(IMoniker* iface,CLSID *pClassID) { TRACE("(%p,%p),stub!\n",iface,pClassID); if (pClassID==NULL) return E_POINTER; *pClassID = CLSID_CompositeMoniker; return S_OK; } /****************************************************************************** * CompositeMoniker_IsDirty ******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_IsDirty(IMoniker* iface) { /* Note that the OLE-provided implementations of the IPersistStream::IsDirty method in the OLE-provided moniker interfaces always return S_FALSE because their internal state never changes. */ TRACE("(%p)\n",iface); return S_FALSE; } /****************************************************************************** * CompositeMoniker_Load ******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_Load(IMoniker* iface,IStream* pStm) { HRESULT res; DWORD constant; CLSID clsid; WCHAR string[1]={0}; ICOM_THIS(CompositeMonikerImpl,iface); TRACE("(%p,%p)\n",iface,pStm); /* this function call OleLoadFromStream function for each moniker within this object */ /* read the a constant writen by CompositeMonikerImpl_Save (see CompositeMonikerImpl_Save for more details)*/ res=IStream_Read(pStm,&constant,sizeof(DWORD),NULL); if (SUCCEEDED(res)&& constant!=3) return E_FAIL; while(1){ #if 0 res=OleLoadFromStream(pStm,&IID_IMoniker,(void**)&This->tabMoniker[This->tabLastIndex]); #endif res=ReadClassStm(pStm,&clsid); DPRINTF("res=%ld",res); if (FAILED(res)) break; if (IsEqualIID(&clsid,&CLSID_FileMoniker)){ res=CreateFileMoniker(string,&This->tabMoniker[This->tabLastIndex]); if (FAILED(res)) break; res=IMoniker_Load(This->tabMoniker[This->tabLastIndex],pStm); if (FAILED(res)) break; } else if (IsEqualIID(&clsid,&CLSID_ItemMoniker)){ CreateItemMoniker(string,string,&This->tabMoniker[This->tabLastIndex]); if (res!=S_OK) break; IMoniker_Load(This->tabMoniker[This->tabLastIndex],pStm); if (FAILED(res)) break; } else if (IsEqualIID(&clsid,&CLSID_AntiMoniker)){ CreateAntiMoniker(&This->tabMoniker[This->tabLastIndex]); if (FAILED(res)) break; IMoniker_Load(This->tabMoniker[This->tabLastIndex],pStm); if (FAILED(res)) break; } else if (IsEqualIID(&clsid,&CLSID_CompositeMoniker)) return E_FAIL; else{ FIXME("()"); break; return E_NOTIMPL; } /* resize the table if needed */ if (++This->tabLastIndex==This->tabSize){ This->tabSize+=BLOCK_TAB_SIZE; This->tabMoniker=HeapReAlloc(GetProcessHeap(),0,This->tabMoniker,This->tabSize*sizeof(IMoniker)); if (This->tabMoniker==NULL) return E_OUTOFMEMORY; } } return res; } /****************************************************************************** * CompositeMoniker_Save ******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_Save(IMoniker* iface,IStream* pStm,BOOL fClearDirty) { HRESULT res; IEnumMoniker *enumMk; IMoniker *pmk; DWORD constant=3; TRACE("(%p,%p,%d)\n",iface,pStm,fClearDirty); /* this function call OleSaveToStream function for each moniker within this object */ /* when I tested this function in windows system ! I usually found this constant in the begining of */ /* the stream I dont known why (there's no indication in specification) ! */ res=IStream_Write(pStm,&constant,sizeof(constant),NULL); IMoniker_Enum(iface,TRUE,&enumMk); while(IEnumMoniker_Next(enumMk,1,&pmk,NULL)==S_OK){ res=OleSaveToStream((IPersistStream*)pmk,pStm); IMoniker_Release(pmk); if (FAILED(res)){ IEnumMoniker_Release(pmk); return res; } } IEnumMoniker_Release(enumMk); return S_OK; } /****************************************************************************** * CompositeMoniker_GetSizeMax ******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_GetSizeMax(IMoniker* iface,ULARGE_INTEGER* pcbSize) { IEnumMoniker *enumMk; IMoniker *pmk; ULARGE_INTEGER ptmpSize; /* the sizeMax of this object is calculated by calling GetSizeMax on each moniker within this object then */ /* suming all returned sizemax */ TRACE("(%p,%p)\n",iface,pcbSize); if (pcbSize!=NULL) return E_POINTER; pcbSize->s.LowPart =0; pcbSize->s.HighPart=0; IMoniker_Enum(iface,TRUE,&enumMk); while(IEnumMoniker_Next(enumMk,1,&pmk,NULL)==TRUE){ IMoniker_GetSizeMax(pmk,&ptmpSize); IMoniker_Release(pmk); pcbSize->s.LowPart +=ptmpSize.s.LowPart; pcbSize->s.HighPart+=ptmpSize.s.HighPart; } IEnumMoniker_Release(enumMk); return S_OK; } /****************************************************************************** * Composite-Moniker_Construct (local function) *******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_Construct(CompositeMonikerImpl* This,LPMONIKER pmkFirst, LPMONIKER pmkRest) { DWORD mkSys; IEnumMoniker *enumMoniker; IMoniker *tempMk; HRESULT res; TRACE("(%p,%p,%p)\n",This,pmkFirst,pmkRest); /* Initialize the virtual fgunction table. */ This->lpvtbl1 = &VT_CompositeMonikerImpl; This->lpvtbl2 = &VT_ROTDataImpl; This->ref = 0; This->tabSize=BLOCK_TAB_SIZE; This->tabLastIndex=0; This->tabMoniker=HeapAlloc(GetProcessHeap(),0,This->tabSize*sizeof(IMoniker)); if (This->tabMoniker==NULL) return E_OUTOFMEMORY; IMoniker_IsSystemMoniker(pmkFirst,&mkSys); /* put the first moniker contents in the begining of the table */ if (mkSys!=MKSYS_GENERICCOMPOSITE){ This->tabMoniker[(This->tabLastIndex)++]=pmkFirst; IMoniker_AddRef(pmkFirst); } else{ IMoniker_Enum(pmkFirst,TRUE,&enumMoniker); while(IEnumMoniker_Next(enumMoniker,1,&This->tabMoniker[This->tabLastIndex],NULL)==S_OK){ if (++This->tabLastIndex==This->tabSize){ This->tabSize+=BLOCK_TAB_SIZE; This->tabMoniker=HeapReAlloc(GetProcessHeap(),0,This->tabMoniker,This->tabSize*sizeof(IMoniker)); if (This->tabMoniker==NULL) return E_OUTOFMEMORY; } } IEnumMoniker_Release(enumMoniker); } /* put the rest moniker contents after the first one and make simplification if needed */ IMoniker_IsSystemMoniker(pmkRest,&mkSys); if (mkSys!=MKSYS_GENERICCOMPOSITE){ /* add a simple moniker to the moniker table */ res=IMoniker_ComposeWith(This->tabMoniker[This->tabLastIndex-1],pmkRest,TRUE,&tempMk); if (res==MK_E_NEEDGENERIC){ /* there's no simplification in this case */ This->tabMoniker[This->tabLastIndex]=pmkRest; This->tabLastIndex++; IMoniker_AddRef(pmkRest); } else if (tempMk==NULL){ /* we have an antimoniker after a simple moniker so we can make a simplification in this case */ IMoniker_Release(This->tabMoniker[This->tabLastIndex-1]); This->tabLastIndex--; } else if (SUCCEEDED(res)){ /* the non-generic composition was successful so we can make a simplification in this case */ IMoniker_Release(This->tabMoniker[This->tabLastIndex-1]); This->tabMoniker[This->tabLastIndex-1]=tempMk; } else return res; /* resize tabMoniker if needed */ if (This->tabLastIndex==This->tabSize){ This->tabSize+=BLOCK_TAB_SIZE; This->tabMoniker=HeapReAlloc(GetProcessHeap(),0,This->tabMoniker,This->tabSize*sizeof(IMoniker)); if (This->tabMoniker==NULL) return E_OUTOFMEMORY; } } else{ /* add a composite moniker to the moniker table (do the same thing for each moniker within the */ /* composite moniker as a simple moniker (see above how to add a simple moniker case) ) */ IMoniker_Enum(pmkRest,TRUE,&enumMoniker); while(IEnumMoniker_Next(enumMoniker,1,&This->tabMoniker[This->tabLastIndex],NULL)==S_OK){ res=IMoniker_ComposeWith(This->tabMoniker[This->tabLastIndex-1],This->tabMoniker[This->tabLastIndex],TRUE,&tempMk); if (res==MK_E_NEEDGENERIC){ This->tabLastIndex++; } else if (tempMk==NULL){ IMoniker_Release(This->tabMoniker[This->tabLastIndex-1]); IMoniker_Release(This->tabMoniker[This->tabLastIndex]); This->tabLastIndex--; } else{ IMoniker_Release(This->tabMoniker[This->tabLastIndex-1]); This->tabMoniker[This->tabLastIndex-1]=tempMk; } if (This->tabLastIndex==This->tabSize){ This->tabSize+=BLOCK_TAB_SIZE; This->tabMoniker=HeapReAlloc(GetProcessHeap(),0,This->tabMoniker,This->tabSize*sizeof(IMoniker)); if (This->tabMoniker==NULL) return E_OUTOFMEMORY; } } IEnumMoniker_Release(enumMoniker); } return S_OK; } /****************************************************************************** * CompositeMoniker_Destroy (local function) *******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_Destroy(CompositeMonikerImpl* This) { TRACE("(%p)\n",This); HeapFree(GetProcessHeap(),0,This->tabMoniker); HeapFree(GetProcessHeap(),0,This); return S_OK; } /****************************************************************************** * CompositeMoniker_BindToObject ******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_BindToObject(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, REFIID riid, VOID** ppvResult) { HRESULT res; IRunningObjectTable *prot; IMoniker *tempMk,*antiMk,*mostRigthMk; IEnumMoniker *enumMoniker; TRACE("(%p,%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,riid,ppvResult); if (ppvResult==NULL) return E_POINTER; *ppvResult=0; /* If pmkToLeft is NULL, this method looks for the moniker in the ROT, and if found, queries the retrieved */ /* object for the requested interface pointer. */ if(pmkToLeft==NULL){ res=IBindCtx_GetRunningObjectTable(pbc,&prot); if (SUCCEEDED(res)){ /* if the requested class was loaded befor ! we dont need to reload it */ res = IRunningObjectTable_GetObject(prot,iface,(IUnknown**)ppvResult); if (res==S_OK) return res; } } else{ /* If pmkToLeft is not NULL, the method recursively calls IMoniker::BindToObject on the rightmost */ /* component of the composite, passing the rest of the composite as the pmkToLeft parameter for that call */ IMoniker_Enum(iface,FALSE,&enumMoniker); IEnumMoniker_Next(enumMoniker,1,&mostRigthMk,NULL); IEnumMoniker_Release(enumMoniker); res=CreateAntiMoniker(&antiMk); res=IMoniker_ComposeWith(iface,antiMk,0,&tempMk); IMoniker_Release(antiMk); res=CompositeMonikerImpl_BindToObject(mostRigthMk,pbc,tempMk,riid,ppvResult); IMoniker_Release(tempMk); IMoniker_Release(mostRigthMk); } return res; } /****************************************************************************** * CompositeMoniker_BindToStorage ******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_BindToStorage(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, REFIID riid, VOID** ppvResult) { HRESULT res; IMoniker *tempMk,*antiMk,*mostRigthMk; IEnumMoniker *enumMoniker; TRACE("(%p,%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,riid,ppvResult); *ppvResult=0; /* This method recursively calls BindToStorage on the rightmost component of the composite, */ /* passing the rest of the composite as the pmkToLeft parameter for that call. */ if (pmkToLeft!=NULL){ IMoniker_Enum(iface,FALSE,&enumMoniker); IEnumMoniker_Next(enumMoniker,1,&mostRigthMk,NULL); IEnumMoniker_Release(enumMoniker); res=CreateAntiMoniker(&antiMk); res=IMoniker_ComposeWith(iface,antiMk,0,&tempMk); IMoniker_Release(antiMk); res=CompositeMonikerImpl_BindToStorage(mostRigthMk,pbc,tempMk,riid,ppvResult); IMoniker_Release(tempMk); IMoniker_Release(mostRigthMk); return res; } else return IMoniker_BindToStorage(iface,pbc,NULL,riid,ppvResult); } /****************************************************************************** * CompositeMoniker_Reduce ******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_Reduce(IMoniker* iface, IBindCtx* pbc, DWORD dwReduceHowFar, IMoniker** ppmkToLeft, IMoniker** ppmkReduced) { HRESULT res; IMoniker *tempMk,*antiMk,*mostRigthMk,*leftReducedComposedMk,*mostRigthReducedMk; IEnumMoniker *enumMoniker; TRACE("(%p,%p,%ld,%p,%p)\n",iface,pbc,dwReduceHowFar,ppmkToLeft,ppmkReduced); if (ppmkReduced==NULL) return E_POINTER; /* This method recursively calls Reduce for each of its component monikers. */ if (ppmkToLeft==NULL){ IMoniker_Enum(iface,FALSE,&enumMoniker); IEnumMoniker_Next(enumMoniker,1,&mostRigthMk,NULL); IEnumMoniker_Release(enumMoniker); res=CreateAntiMoniker(&antiMk); res=IMoniker_ComposeWith(iface,antiMk,0,&tempMk); IMoniker_Release(antiMk); return CompositeMonikerImpl_Reduce(mostRigthMk,pbc,dwReduceHowFar,&tempMk, ppmkReduced); } else if (*ppmkToLeft==NULL) return IMoniker_Reduce(iface,pbc,dwReduceHowFar,NULL,ppmkReduced); else{ /* separate the copmosite moniker in to left and wrigth moniker */ IMoniker_Enum(iface,FALSE,&enumMoniker); IEnumMoniker_Next(enumMoniker,1,&mostRigthMk,NULL); IEnumMoniker_Release(enumMoniker); res=CreateAntiMoniker(&antiMk); res=IMoniker_ComposeWith(iface,antiMk,0,&tempMk); IMoniker_Release(antiMk); /* If any of the components reduces itself, the method returns S_OK and passes back a composite */ /* of the reduced components */ if (IMoniker_Reduce(mostRigthMk,pbc,dwReduceHowFar,NULL,&mostRigthReducedMk) && CompositeMonikerImpl_Reduce(mostRigthMk,pbc,dwReduceHowFar,&tempMk,&leftReducedComposedMk) ) return CreateGenericComposite(leftReducedComposedMk,mostRigthReducedMk,ppmkReduced); else{ /* If no reduction occurred, the method passes back the same moniker and returns MK_S_REDUCED_TO_SELF.*/ IMoniker_AddRef(iface); *ppmkReduced=iface; return MK_S_REDUCED_TO_SELF; } } } /****************************************************************************** * CompositeMoniker_ComposeWith ******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_ComposeWith(IMoniker* iface, IMoniker* pmkRight, BOOL fOnlyIfNotGeneric, IMoniker** ppmkComposite) { TRACE("(%p,%p,%d,%p)\n",iface,pmkRight,fOnlyIfNotGeneric,ppmkComposite); if ((ppmkComposite==NULL)||(pmkRight==NULL)) return E_POINTER; *ppmkComposite=0; /* If fOnlyIfNotGeneric is TRUE, this method sets *pmkComposite to NULL and returns MK_E_NEEDGENERIC; */ /* otherwise, the method returns the result of combining the two monikers by calling the */ /* CreateGenericComposite function */ if (fOnlyIfNotGeneric) return MK_E_NEEDGENERIC; return CreateGenericComposite(iface,pmkRight,ppmkComposite); } /****************************************************************************** * CompositeMoniker_Enum ******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_Enum(IMoniker* iface,BOOL fForward, IEnumMoniker** ppenumMoniker) { ICOM_THIS(CompositeMonikerImpl,iface); TRACE("(%p,%d,%p)\n",iface,fForward,ppenumMoniker); if (ppenumMoniker == NULL) return E_POINTER; return EnumMonikerImpl_CreateEnumMoniker(This->tabMoniker,This->tabLastIndex,0,fForward,ppenumMoniker); } /****************************************************************************** * CompositeMoniker_IsEqual ******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_IsEqual(IMoniker* iface,IMoniker* pmkOtherMoniker) { IEnumMoniker *enumMoniker1,*enumMoniker2; IMoniker *tempMk1,*tempMk2; HRESULT res1,res2,res; TRACE("(%p,%p)\n",iface,pmkOtherMoniker); if (pmkOtherMoniker==NULL) return S_FALSE; /* This method returns S_OK if the components of both monikers are equal when compared in the */ /* left-to-right order.*/ IMoniker_Enum(pmkOtherMoniker,TRUE,&enumMoniker1); if (enumMoniker1==NULL) return S_FALSE; IMoniker_Enum(iface,TRUE,&enumMoniker2); while(1){ res1=IEnumMoniker_Next(enumMoniker1,1,&tempMk1,NULL); res2=IEnumMoniker_Next(enumMoniker2,1,&tempMk2,NULL); if((res1==S_OK)&&(res2==S_OK)){ if(IMoniker_IsEqual(tempMk1,tempMk2)==S_FALSE){ res= S_FALSE; break; } else continue; } else if ( (res1==S_FALSE) && (res2==S_FALSE) ){ res = S_OK; break; } else{ res = S_FALSE; break; } if (res1==S_OK) IMoniker_Release(tempMk1); if (res2==S_OK) IMoniker_Release(tempMk2); } IEnumMoniker_Release(enumMoniker1); IEnumMoniker_Release(enumMoniker2); return res; } /****************************************************************************** * CompositeMoniker_Hash ******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_Hash(IMoniker* iface,DWORD* pdwHash) { FIXME("(),stub!\n"); return E_NOTIMPL; } /****************************************************************************** * CompositeMoniker_IsRunning ******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_IsRunning(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, IMoniker* pmkNewlyRunning) { IRunningObjectTable* rot; HRESULT res; IMoniker *tempMk,*antiMk,*mostRigthMk; IEnumMoniker *enumMoniker; TRACE("(%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,pmkNewlyRunning); /* If pmkToLeft is non-NULL, this method composes pmkToLeft with this moniker and calls IsRunning on the result.*/ if (pmkToLeft!=NULL){ CreateGenericComposite(pmkToLeft,iface,&tempMk); res = IMoniker_IsRunning(tempMk,pbc,NULL,pmkNewlyRunning); IMoniker_Release(tempMk); return res; } else /* If pmkToLeft is NULL, this method returns S_OK if pmkNewlyRunning is non-NULL and is equal */ /* to this moniker */ if (pmkNewlyRunning!=NULL) if (IMoniker_IsEqual(iface,pmkNewlyRunning)==S_OK) return S_OK; else return S_FALSE; else{ if (pbc==NULL) return E_POINTER; /* If pmkToLeft and pmkNewlyRunning are both NULL, this method checks the ROT to see whether */ /* the moniker is running. If so, the method returns S_OK; otherwise, it recursively calls */ /* IMoniker::IsRunning on the rightmost component of the composite, passing the remainder of */ /* the composite as the pmkToLeft parameter for that call. */ res=IBindCtx_GetRunningObjectTable(pbc,&rot); if (FAILED(res)) return res; res = IRunningObjectTable_IsRunning(rot,iface); IRunningObjectTable_Release(rot); if(res==S_OK) return S_OK; else{ IMoniker_Enum(iface,FALSE,&enumMoniker); IEnumMoniker_Next(enumMoniker,1,&mostRigthMk,NULL); IEnumMoniker_Release(enumMoniker); res=CreateAntiMoniker(&antiMk); res=IMoniker_ComposeWith(iface,antiMk,0,&tempMk); IMoniker_Release(antiMk); res=IMoniker_IsRunning(mostRigthMk,pbc,tempMk,pmkNewlyRunning); IMoniker_Release(tempMk); IMoniker_Release(mostRigthMk); return res; } } } /****************************************************************************** * CompositeMoniker_GetTimeOfLastChange ******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_GetTimeOfLastChange(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, FILETIME* pCompositeTime) { IRunningObjectTable* rot; HRESULT res; IMoniker *tempMk,*antiMk,*mostRigthMk; IEnumMoniker *enumMoniker; TRACE("(%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,pCompositeTime); if (pCompositeTime==NULL) return E_INVALIDARG; /* This method creates a composite of pmkToLeft (if non-NULL) and this moniker and uses the ROT to */ /* retrieve the time of last change. If the object is not in the ROT, the method recursively calls */ /* IMoniker::GetTimeOfLastChange on the rightmost component of the composite, passing the remainder */ /* of the composite as the pmkToLeft parameter for that call. */ if (pmkToLeft!=NULL){ res=CreateGenericComposite(pmkToLeft,iface,&tempMk); res=IBindCtx_GetRunningObjectTable(pbc,&rot); if (FAILED(res)) return res; if (IRunningObjectTable_GetTimeOfLastChange(rot,tempMk,pCompositeTime)==S_OK) return res; else IMoniker_Enum(iface,FALSE,&enumMoniker); IEnumMoniker_Next(enumMoniker,1,&mostRigthMk,NULL); IEnumMoniker_Release(enumMoniker); res=CreateAntiMoniker(&antiMk); res=IMoniker_ComposeWith(iface,antiMk,0,&tempMk); IMoniker_Release(antiMk); res=CompositeMonikerImpl_GetTimeOfLastChange(mostRigthMk,pbc,tempMk,pCompositeTime); IMoniker_Release(tempMk); IMoniker_Release(mostRigthMk); return res; } else return IMoniker_GetTimeOfLastChange(iface,pbc,NULL,pCompositeTime); } /****************************************************************************** * CompositeMoniker_Inverse ******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_Inverse(IMoniker* iface,IMoniker** ppmk) { HRESULT res; IMoniker *tempMk,*antiMk,*mostRigthMk,*tempInvMk,*mostRigthInvMk; IEnumMoniker *enumMoniker; TRACE("(%p,%p)\n",iface,ppmk); if (ppmk==NULL) return E_POINTER; /* This method returns a composite moniker that consists of the inverses of each of the components */ /* of the original composite, stored in reverse order */ res=CreateAntiMoniker(&antiMk); res=IMoniker_ComposeWith(iface,antiMk,0,&tempMk); IMoniker_Release(antiMk); if (tempMk==NULL) return IMoniker_Inverse(iface,ppmk); else{ IMoniker_Enum(iface,FALSE,&enumMoniker); IEnumMoniker_Next(enumMoniker,1,&mostRigthMk,NULL); IEnumMoniker_Release(enumMoniker); IMoniker_Inverse(mostRigthMk,&mostRigthInvMk); CompositeMonikerImpl_Inverse(tempMk,&tempInvMk); res=CreateGenericComposite(mostRigthInvMk,tempInvMk,ppmk); IMoniker_Release(tempMk); IMoniker_Release(mostRigthMk); IMoniker_Release(tempInvMk); IMoniker_Release(mostRigthInvMk); return res; } } /****************************************************************************** * CompositeMoniker_CommonPrefixWith ******************************************************************************/ HRESULT WINAPI CompositeMonikerImpl_CommonPrefixWith(IMoniker* iface,IMoniker* pmkOther,IMoniker** ppmkPrefix) { DWORD mkSys; HRESULT res1,res2; IMoniker *tempMk1,*tempMk2,*mostLeftMk1,*mostLeftMk2; IEnumMoniker *enumMoniker1,*enumMoniker2; ULONG i,nbCommonMk=0; /* If the other moniker is a composite, this method compares the components of each composite from left */ /* to right. The returned common prefix moniker might also be a composite moniker, depending on how many */ /* of the leftmost components were common to both monikers. */ if (ppmkPrefix==NULL) return E_POINTER; *ppmkPrefix=0; if (pmkOther==NULL) return MK_E_NOPREFIX; IMoniker_IsSystemMoniker(pmkOther,&mkSys); if((mkSys==MKSYS_GENERICCOMPOSITE)){ IMoniker_Enum(iface,TRUE,&enumMoniker1); IMoniker_Enum(pmkOther,TRUE,&enumMoniker2); while(1){ res1=IEnumMoniker_Next(enumMoniker1,1,&mostLeftMk1,NULL); res2=IEnumMoniker_Next(enumMoniker2,1,&mostLeftMk2,NULL); if ((res1==S_FALSE) && (res2==S_FALSE)){ /* If the monikers are equal, the method returns MK_S_US and sets ppmkPrefix to this moniker.*/ *ppmkPrefix=iface; IMoniker_AddRef(iface); return MK_S_US; } else if ((res1==S_OK) && (res2==S_OK)){ if (IMoniker_IsEqual(mostLeftMk1,mostLeftMk2)==S_OK) nbCommonMk++; else break; } else if (res1==S_OK){ /* If the other moniker is a prefix of this moniker, the method returns MK_S_HIM and sets */ /* ppmkPrefix to the other moniker. */ *ppmkPrefix=pmkOther; return MK_S_HIM; } else{ /* If this moniker is a prefix of the other, this method returns MK_S_ME and sets ppmkPrefix */ /* to this moniker. */ *ppmkPrefix=iface; return MK_S_ME; } } IEnumMoniker_Release(enumMoniker1); IEnumMoniker_Release(enumMoniker2); /* If there is no common prefix, this method returns MK_E_NOPREFIX and sets ppmkPrefix to NULL. */ if (nbCommonMk==0) return MK_E_NOPREFIX; IEnumMoniker_Reset(enumMoniker1); IEnumMoniker_Next(enumMoniker1,1,&tempMk1,NULL); /* if we have more than one commun moniker the result will be a composite moniker */ if (nbCommonMk>1){ /* initialize the common prefix moniker with the composite of two first moniker (from the left)*/ IEnumMoniker_Next(enumMoniker1,1,&tempMk2,NULL); CreateGenericComposite(tempMk1,tempMk2,ppmkPrefix); IMoniker_Release(tempMk1); IMoniker_Release(tempMk2); /* compose all common monikers in a composite moniker */ for(i=0;iref); } /****************************************************************************** * EnumMonikerImpl_Release ******************************************************************************/ ULONG WINAPI EnumMonikerImpl_Release(IEnumMoniker* iface) { ICOM_THIS(EnumMonikerImpl,iface); ULONG i ; TRACE("(%p)\n",This); This->ref--; /* destroy the object if there's no more reference on it */ if (This->ref==0){ for(i=0;itabSize;i++) IMoniker_Release(This->tabMoniker[i]); HeapFree(GetProcessHeap(),0,This->tabMoniker); HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref;; } /****************************************************************************** * EnumMonikerImpl_Next ******************************************************************************/ HRESULT WINAPI EnumMonikerImpl_Next(IEnumMoniker* iface,ULONG celt, IMoniker** rgelt, ULONG* pceltFethed){ ICOM_THIS(EnumMonikerImpl,iface); ULONG i; /* retrieve the requested number of moniker from the current position */ for(i=0;((This->currentPos < This->tabSize) && (i < celt));i++) rgelt[i]=This->tabMoniker[This->currentPos++]; if (pceltFethed!=NULL) *pceltFethed= i; if (i==celt) return S_OK; else return S_FALSE; } /****************************************************************************** * EnumMonikerImpl_Skip ******************************************************************************/ HRESULT WINAPI EnumMonikerImpl_Skip(IEnumMoniker* iface,ULONG celt){ ICOM_THIS(EnumMonikerImpl,iface); if ((This->currentPos+celt) >= This->tabSize) return S_FALSE; This->currentPos+=celt; return S_OK; } /****************************************************************************** * EnumMonikerImpl_Reset ******************************************************************************/ HRESULT WINAPI EnumMonikerImpl_Reset(IEnumMoniker* iface){ ICOM_THIS(EnumMonikerImpl,iface); This->currentPos=0; return S_OK; } /****************************************************************************** * EnumMonikerImpl_Clone ******************************************************************************/ HRESULT WINAPI EnumMonikerImpl_Clone(IEnumMoniker* iface,IEnumMoniker** ppenum){ ICOM_THIS(EnumMonikerImpl,iface); return EnumMonikerImpl_CreateEnumMoniker(This->tabMoniker,This->tabSize,This->currentPos,TRUE,ppenum); } /****************************************************************************** * EnumMonikerImpl_CreateEnumMoniker ******************************************************************************/ HRESULT WINAPI EnumMonikerImpl_CreateEnumMoniker(IMoniker** tabMoniker, ULONG tabSize, ULONG currentPos, BOOL leftToRigth, IEnumMoniker ** ppmk) { EnumMonikerImpl* newEnumMoniker; int i; newEnumMoniker = HeapAlloc(GetProcessHeap(), 0, sizeof(EnumMonikerImpl)); if (newEnumMoniker == 0) return STG_E_INSUFFICIENTMEMORY; if (currentPos > tabSize) return E_INVALIDARG; /* Initialize the virtual function table. */ ICOM_VTBL(newEnumMoniker) = &VT_EnumMonikerImpl; newEnumMoniker->ref = 0; newEnumMoniker->tabSize=tabSize; newEnumMoniker->currentPos=currentPos; newEnumMoniker->tabMoniker=HeapAlloc(GetProcessHeap(),0,tabSize*sizeof(IMoniker)); if (newEnumMoniker->tabMoniker==NULL) return E_OUTOFMEMORY; if (leftToRigth) for (i=0;itabMoniker[i]=tabMoniker[i]; IMoniker_AddRef(tabMoniker[i]); } else for (i=tabSize-1;i>=0;i--){ newEnumMoniker->tabMoniker[tabSize-i-1]=tabMoniker[i]; IMoniker_AddRef(tabMoniker[i]); } *ppmk=(IEnumMoniker*)newEnumMoniker; return S_OK; } /****************************************************************************** * CreateGenericComposite [OLE.55] ******************************************************************************/ HRESULT WINAPI CreateGenericComposite(LPMONIKER pmkFirst, LPMONIKER pmkRest, LPMONIKER* ppmkComposite) { CompositeMonikerImpl* newCompositeMoniker = 0; HRESULT hr = S_OK; TRACE("(%p,%p,%p)\n",pmkFirst,pmkRest,ppmkComposite); if (ppmkComposite==NULL) return E_POINTER; *ppmkComposite=0; if (pmkFirst==NULL && pmkRest!=NULL){ *ppmkComposite=pmkRest; return S_OK; } else if (pmkFirst!=NULL && pmkRest==NULL){ *ppmkComposite=pmkFirst; return S_OK; } else if (pmkFirst==NULL && pmkRest==NULL) return S_OK; newCompositeMoniker = HeapAlloc(GetProcessHeap(), 0,sizeof(CompositeMonikerImpl)); if (newCompositeMoniker == 0) return STG_E_INSUFFICIENTMEMORY; hr = CompositeMonikerImpl_Construct(newCompositeMoniker,pmkFirst,pmkRest); if (FAILED(hr)){ HeapFree(GetProcessHeap(),0,newCompositeMoniker); return hr; } if (newCompositeMoniker->tabLastIndex==1) hr = IMoniker_QueryInterface(newCompositeMoniker->tabMoniker[0],&IID_IMoniker,(void**)ppmkComposite); else hr = CompositeMonikerImpl_QueryInterface((IMoniker*)newCompositeMoniker,&IID_IMoniker,(void**)ppmkComposite); return hr; } /****************************************************************************** * MonikerCommonPrefixWith [OLE.55] ******************************************************************************/ HRESULT WINAPI MonikerCommonPrefixWith(IMoniker* pmkThis,IMoniker* pmkOther,IMoniker** ppmkCommon) { FIXME("(),stub!\n"); return E_NOTIMPL; } wine-20000526/dlls/ole32/datacache.c0100644000175000001440000015205407112612620016371 0ustar julliardusers/* * OLE 2 Data cache * * Copyright 1999 Francis Beaudet * Copyright 2000 Abey George * * NOTES: * The OLE2 data cache supports a whole whack of * interfaces including: * IDataObject, IPersistStorage, IViewObject2, * IOleCache2 and IOleCacheControl. * * Most of the implementation details are taken from: Inside OLE * second edition by Kraig Brockschmidt, * * NOTES * - This implementation of the datacache will let your application * load documents that have embedded OLE objects in them and it will * also retrieve the metafile representation of those objects. * - This implementation of the datacache will also allow your * application to save new documents with OLE objects in them. * - The main thing that it doesn't do is allow you to activate * or modify the OLE objects in any way. * - I haven't found any good documentation on the real usage of * the streams created by the data cache. In particular, How to * determine what the XXX stands for in the stream name * "\002OlePresXXX". It appears to just be a counter. * - Also, I don't know the real content of the presentation stream * header. I was able to figure-out where the extent of the object * was stored and the aspect, but that's about it. */ #include #include "windef.h" #include "winbase.h" #include "wingdi.h" #include "winuser.h" #include "winerror.h" #include "crtdll.h" #include "wine/obj_oleview.h" #include "wine/obj_cache.h" #include "ole2.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ole); /**************************************************************************** * PresentationDataHeader * * This structure represents the header of the \002OlePresXXX stream in * the OLE object strorage. * * Most fields are still unknown. */ typedef struct PresentationDataHeader { DWORD unknown1; /* -1 */ DWORD unknown2; /* 3, possibly CF_METAFILEPICT */ DWORD unknown3; /* 4, possibly TYMED_ISTREAM */ DVASPECT dvAspect; DWORD unknown5; /* -1 */ DWORD unknown6; DWORD unknown7; /* 0 */ DWORD dwObjectExtentX; DWORD dwObjectExtentY; DWORD dwSize; } PresentationDataHeader; /**************************************************************************** * DataCache */ struct DataCache { /* * List all interface VTables here */ ICOM_VTABLE(IDataObject)* lpvtbl1; ICOM_VTABLE(IUnknown)* lpvtbl2; ICOM_VTABLE(IPersistStorage)* lpvtbl3; ICOM_VTABLE(IViewObject2)* lpvtbl4; ICOM_VTABLE(IOleCache2)* lpvtbl5; ICOM_VTABLE(IOleCacheControl)* lpvtbl6; /* * Reference count of this object */ ULONG ref; /* * IUnknown implementation of the outer object. */ IUnknown* outerUnknown; /* * This storage pointer is set through a call to * IPersistStorage_Load. This is where the visual * representation of the object is stored. */ IStorage* presentationStorage; /* * The user of this object can setup ONE advise sink * connection with the object. These parameters describe * that connection. */ DWORD sinkAspects; DWORD sinkAdviseFlag; IAdviseSink* sinkInterface; }; typedef struct DataCache DataCache; /* * Here, I define utility macros to help with the casting of the * "this" parameter. * There is a version to accomodate all of the VTables implemented * by this object. */ #define _ICOM_THIS_From_IDataObject(class,name) class* this = (class*)name; #define _ICOM_THIS_From_NDIUnknown(class, name) class* this = (class*)(((char*)name)-sizeof(void*)); #define _ICOM_THIS_From_IPersistStorage(class, name) class* this = (class*)(((char*)name)-2*sizeof(void*)); #define _ICOM_THIS_From_IViewObject2(class, name) class* this = (class*)(((char*)name)-3*sizeof(void*)); #define _ICOM_THIS_From_IOleCache2(class, name) class* this = (class*)(((char*)name)-4*sizeof(void*)); #define _ICOM_THIS_From_IOleCacheControl(class, name) class* this = (class*)(((char*)name)-5*sizeof(void*)); /* * Prototypes for the methods of the DataCache class. */ static DataCache* DataCache_Construct(REFCLSID clsid, LPUNKNOWN pUnkOuter); static void DataCache_Destroy(DataCache* ptrToDestroy); static HRESULT DataCache_ReadPresentationData(DataCache* this, DWORD drawAspect, PresentationDataHeader* header); static HRESULT DataCache_OpenPresStream(DataCache *this, DWORD drawAspect, IStream **pStm); static HMETAFILE DataCache_ReadPresMetafile(DataCache* this, DWORD drawAspect); static void DataCache_FireOnViewChange(DataCache* this, DWORD aspect, LONG lindex); /* * Prototypes for the methods of the DataCache class * that implement non delegating IUnknown methods. */ static HRESULT WINAPI DataCache_NDIUnknown_QueryInterface( IUnknown* iface, REFIID riid, void** ppvObject); static ULONG WINAPI DataCache_NDIUnknown_AddRef( IUnknown* iface); static ULONG WINAPI DataCache_NDIUnknown_Release( IUnknown* iface); /* * Prototypes for the methods of the DataCache class * that implement IDataObject methods. */ static HRESULT WINAPI DataCache_IDataObject_QueryInterface( IDataObject* iface, REFIID riid, void** ppvObject); static ULONG WINAPI DataCache_IDataObject_AddRef( IDataObject* iface); static ULONG WINAPI DataCache_IDataObject_Release( IDataObject* iface); static HRESULT WINAPI DataCache_GetData( IDataObject* iface, LPFORMATETC pformatetcIn, STGMEDIUM* pmedium); static HRESULT WINAPI DataCache_GetDataHere( IDataObject* iface, LPFORMATETC pformatetc, STGMEDIUM* pmedium); static HRESULT WINAPI DataCache_QueryGetData( IDataObject* iface, LPFORMATETC pformatetc); static HRESULT WINAPI DataCache_GetCanonicalFormatEtc( IDataObject* iface, LPFORMATETC pformatectIn, LPFORMATETC pformatetcOut); static HRESULT WINAPI DataCache_IDataObject_SetData( IDataObject* iface, LPFORMATETC pformatetc, STGMEDIUM* pmedium, BOOL fRelease); static HRESULT WINAPI DataCache_EnumFormatEtc( IDataObject* iface, DWORD dwDirection, IEnumFORMATETC** ppenumFormatEtc); static HRESULT WINAPI DataCache_DAdvise( IDataObject* iface, FORMATETC* pformatetc, DWORD advf, IAdviseSink* pAdvSink, DWORD* pdwConnection); static HRESULT WINAPI DataCache_DUnadvise( IDataObject* iface, DWORD dwConnection); static HRESULT WINAPI DataCache_EnumDAdvise( IDataObject* iface, IEnumSTATDATA** ppenumAdvise); /* * Prototypes for the methods of the DataCache class * that implement IPersistStorage methods. */ static HRESULT WINAPI DataCache_IPersistStorage_QueryInterface( IPersistStorage* iface, REFIID riid, void** ppvObject); static ULONG WINAPI DataCache_IPersistStorage_AddRef( IPersistStorage* iface); static ULONG WINAPI DataCache_IPersistStorage_Release( IPersistStorage* iface); static HRESULT WINAPI DataCache_GetClassID( IPersistStorage* iface, CLSID* pClassID); static HRESULT WINAPI DataCache_IsDirty( IPersistStorage* iface); static HRESULT WINAPI DataCache_InitNew( IPersistStorage* iface, IStorage* pStg); static HRESULT WINAPI DataCache_Load( IPersistStorage* iface, IStorage* pStg); static HRESULT WINAPI DataCache_Save( IPersistStorage* iface, IStorage* pStg, BOOL fSameAsLoad); static HRESULT WINAPI DataCache_SaveCompleted( IPersistStorage* iface, IStorage* pStgNew); static HRESULT WINAPI DataCache_HandsOffStorage( IPersistStorage* iface); /* * Prototypes for the methods of the DataCache class * that implement IViewObject2 methods. */ static HRESULT WINAPI DataCache_IViewObject2_QueryInterface( IViewObject2* iface, REFIID riid, void** ppvObject); static ULONG WINAPI DataCache_IViewObject2_AddRef( IViewObject2* iface); static ULONG WINAPI DataCache_IViewObject2_Release( IViewObject2* iface); static HRESULT WINAPI DataCache_Draw( IViewObject2* iface, DWORD dwDrawAspect, LONG lindex, void* pvAspect, DVTARGETDEVICE* ptd, HDC hdcTargetDev, HDC hdcDraw, LPCRECTL lprcBounds, LPCRECTL lprcWBounds, IVO_ContCallback pfnContinue, DWORD dwContinue); static HRESULT WINAPI DataCache_GetColorSet( IViewObject2* iface, DWORD dwDrawAspect, LONG lindex, void* pvAspect, DVTARGETDEVICE* ptd, HDC hicTargetDevice, LOGPALETTE** ppColorSet); static HRESULT WINAPI DataCache_Freeze( IViewObject2* iface, DWORD dwDrawAspect, LONG lindex, void* pvAspect, DWORD* pdwFreeze); static HRESULT WINAPI DataCache_Unfreeze( IViewObject2* iface, DWORD dwFreeze); static HRESULT WINAPI DataCache_SetAdvise( IViewObject2* iface, DWORD aspects, DWORD advf, IAdviseSink* pAdvSink); static HRESULT WINAPI DataCache_GetAdvise( IViewObject2* iface, DWORD* pAspects, DWORD* pAdvf, IAdviseSink** ppAdvSink); static HRESULT WINAPI DataCache_GetExtent( IViewObject2* iface, DWORD dwDrawAspect, LONG lindex, DVTARGETDEVICE* ptd, LPSIZEL lpsizel); /* * Prototypes for the methods of the DataCache class * that implement IOleCache2 methods. */ static HRESULT WINAPI DataCache_IOleCache2_QueryInterface( IOleCache2* iface, REFIID riid, void** ppvObject); static ULONG WINAPI DataCache_IOleCache2_AddRef( IOleCache2* iface); static ULONG WINAPI DataCache_IOleCache2_Release( IOleCache2* iface); static HRESULT WINAPI DataCache_Cache( IOleCache2* iface, FORMATETC* pformatetc, DWORD advf, DWORD* pdwConnection); static HRESULT WINAPI DataCache_Uncache( IOleCache2* iface, DWORD dwConnection); static HRESULT WINAPI DataCache_EnumCache( IOleCache2* iface, IEnumSTATDATA** ppenumSTATDATA); static HRESULT WINAPI DataCache_InitCache( IOleCache2* iface, IDataObject* pDataObject); static HRESULT WINAPI DataCache_IOleCache2_SetData( IOleCache2* iface, FORMATETC* pformatetc, STGMEDIUM* pmedium, BOOL fRelease); static HRESULT WINAPI DataCache_UpdateCache( IOleCache2* iface, LPDATAOBJECT pDataObject, DWORD grfUpdf, LPVOID pReserved); static HRESULT WINAPI DataCache_DiscardCache( IOleCache2* iface, DWORD dwDiscardOptions); /* * Prototypes for the methods of the DataCache class * that implement IOleCacheControl methods. */ static HRESULT WINAPI DataCache_IOleCacheControl_QueryInterface( IOleCacheControl* iface, REFIID riid, void** ppvObject); static ULONG WINAPI DataCache_IOleCacheControl_AddRef( IOleCacheControl* iface); static ULONG WINAPI DataCache_IOleCacheControl_Release( IOleCacheControl* iface); static HRESULT WINAPI DataCache_OnRun( IOleCacheControl* iface, LPDATAOBJECT pDataObject); static HRESULT WINAPI DataCache_OnStop( IOleCacheControl* iface); /* * Virtual function tables for the DataCache class. */ static ICOM_VTABLE(IUnknown) DataCache_NDIUnknown_VTable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DataCache_NDIUnknown_QueryInterface, DataCache_NDIUnknown_AddRef, DataCache_NDIUnknown_Release }; static ICOM_VTABLE(IDataObject) DataCache_IDataObject_VTable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DataCache_IDataObject_QueryInterface, DataCache_IDataObject_AddRef, DataCache_IDataObject_Release, DataCache_GetData, DataCache_GetDataHere, DataCache_QueryGetData, DataCache_GetCanonicalFormatEtc, DataCache_IDataObject_SetData, DataCache_EnumFormatEtc, DataCache_DAdvise, DataCache_DUnadvise, DataCache_EnumDAdvise }; static ICOM_VTABLE(IPersistStorage) DataCache_IPersistStorage_VTable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DataCache_IPersistStorage_QueryInterface, DataCache_IPersistStorage_AddRef, DataCache_IPersistStorage_Release, DataCache_GetClassID, DataCache_IsDirty, DataCache_InitNew, DataCache_Load, DataCache_Save, DataCache_SaveCompleted, DataCache_HandsOffStorage }; static ICOM_VTABLE(IViewObject2) DataCache_IViewObject2_VTable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DataCache_IViewObject2_QueryInterface, DataCache_IViewObject2_AddRef, DataCache_IViewObject2_Release, DataCache_Draw, DataCache_GetColorSet, DataCache_Freeze, DataCache_Unfreeze, DataCache_SetAdvise, DataCache_GetAdvise, DataCache_GetExtent }; static ICOM_VTABLE(IOleCache2) DataCache_IOleCache2_VTable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DataCache_IOleCache2_QueryInterface, DataCache_IOleCache2_AddRef, DataCache_IOleCache2_Release, DataCache_Cache, DataCache_Uncache, DataCache_EnumCache, DataCache_InitCache, DataCache_IOleCache2_SetData, DataCache_UpdateCache, DataCache_DiscardCache }; static ICOM_VTABLE(IOleCacheControl) DataCache_IOleCacheControl_VTable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DataCache_IOleCacheControl_QueryInterface, DataCache_IOleCacheControl_AddRef, DataCache_IOleCacheControl_Release, DataCache_OnRun, DataCache_OnStop }; /****************************************************************************** * CreateDataCache [OLE32.54] */ HRESULT WINAPI CreateDataCache( LPUNKNOWN pUnkOuter, REFCLSID rclsid, REFIID riid, LPVOID* ppvObj) { DataCache* newCache = NULL; HRESULT hr = S_OK; TRACE("(%s, %p, %s, %p)\n", debugstr_guid(rclsid), pUnkOuter, debugstr_guid(riid), ppvObj); /* * Sanity check */ if (ppvObj==0) return E_POINTER; *ppvObj = 0; /* * If this cache is constructed for aggregation, make sure * the caller is requesting the IUnknown interface. * This is necessary because it's the only time the non-delegating * IUnknown pointer can be returned to the outside. */ if ( (pUnkOuter!=NULL) && (memcmp(&IID_IUnknown, riid, sizeof(IID_IUnknown)) != 0) ) return CLASS_E_NOAGGREGATION; /* * Try to construct a new instance of the class. */ newCache = DataCache_Construct(rclsid, pUnkOuter); if (newCache == 0) return E_OUTOFMEMORY; /* * Make sure it supports the interface required by the caller. */ hr = IUnknown_QueryInterface((IUnknown*)&(newCache->lpvtbl2), riid, ppvObj); /* * Release the reference obtained in the constructor. If * the QueryInterface was unsuccessful, it will free the class. */ IUnknown_Release((IUnknown*)&(newCache->lpvtbl2)); return hr; } /********************************************************* * Method implementation for DataCache class. */ static DataCache* DataCache_Construct( REFCLSID clsid, LPUNKNOWN pUnkOuter) { DataCache* newObject = 0; /* * Allocate space for the object. */ newObject = HeapAlloc(GetProcessHeap(), 0, sizeof(DataCache)); if (newObject==0) return newObject; /* * Initialize the virtual function table. */ newObject->lpvtbl1 = &DataCache_IDataObject_VTable; newObject->lpvtbl2 = &DataCache_NDIUnknown_VTable; newObject->lpvtbl3 = &DataCache_IPersistStorage_VTable; newObject->lpvtbl4 = &DataCache_IViewObject2_VTable; newObject->lpvtbl5 = &DataCache_IOleCache2_VTable; newObject->lpvtbl6 = &DataCache_IOleCacheControl_VTable; /* * Start with one reference count. The caller of this function * must release the interface pointer when it is done. */ newObject->ref = 1; /* * Initialize the outer unknown * We don't keep a reference on the outer unknown since, the way * aggregation works, our lifetime is at least as large as it's * lifetime. */ if (pUnkOuter==NULL) pUnkOuter = (IUnknown*)&(newObject->lpvtbl2); newObject->outerUnknown = pUnkOuter; /* * Initialize the other members of the structure. */ newObject->presentationStorage = NULL; newObject->sinkAspects = 0; newObject->sinkAdviseFlag = 0; newObject->sinkInterface = 0; return newObject; } static void DataCache_Destroy( DataCache* ptrToDestroy) { TRACE("()\n"); if (ptrToDestroy->sinkInterface != NULL) { IAdviseSink_Release(ptrToDestroy->sinkInterface); ptrToDestroy->sinkInterface = NULL; } if (ptrToDestroy->presentationStorage != NULL) { IStorage_Release(ptrToDestroy->presentationStorage); ptrToDestroy->presentationStorage = NULL; } /* * Free the datacache pointer. */ HeapFree(GetProcessHeap(), 0, ptrToDestroy); } /************************************************************************ * DataCache_ReadPresentationData * * This method will read information for the requested presentation * into the given structure. * * Param: * this - Pointer to the DataCache object * drawAspect - The aspect of the object that we wish to draw. * header - The structure containing information about this * aspect of the object. */ static HRESULT DataCache_ReadPresentationData( DataCache* this, DWORD drawAspect, PresentationDataHeader* header) { IStream* presStream = NULL; HRESULT hres; /* * Open the presentation stream. */ hres = DataCache_OpenPresStream( this, drawAspect, &presStream); if (FAILED(hres)) return hres; /* * Read the header. */ hres = IStream_Read( presStream, header, sizeof(PresentationDataHeader), NULL); /* * Cleanup. */ IStream_Release(presStream); /* * We don't want to propagate any other error * code than a failure. */ if (hres!=S_OK) hres = E_FAIL; return hres; } /************************************************************************ * DataCache_FireOnViewChange * * This method will fire an OnViewChange notification to the advise * sink registered with the datacache. * * See IAdviseSink::OnViewChange for more details. */ static void DataCache_FireOnViewChange( DataCache* this, DWORD aspect, LONG lindex) { TRACE("(%p, %lx, %ld)\n", this, aspect, lindex); /* * The sink supplies a filter when it registers * we make sure we only send the notifications when that * filter matches. */ if ((this->sinkAspects & aspect) != 0) { if (this->sinkInterface != NULL) { IAdviseSink_OnViewChange(this->sinkInterface, aspect, lindex); /* * Some sinks want to be unregistered automatically when * the first notification goes out. */ if ( (this->sinkAdviseFlag & ADVF_ONLYONCE) != 0) { IAdviseSink_Release(this->sinkInterface); this->sinkInterface = NULL; this->sinkAspects = 0; this->sinkAdviseFlag = 0; } } } } /* Helper for DataCache_OpenPresStream */ static BOOL DataCache_IsPresentationStream(const STATSTG *elem) { /* The presentation streams have names of the form "\002OlePresXXX", * where XXX goes from 000 to 999. */ static const WCHAR OlePres[] = { 2,'O','l','e','P','r','e','s' }; LPCWSTR name = elem->pwcsName; return (elem->type == STGTY_STREAM) && (elem->cbSize.s.LowPart >= sizeof(PresentationDataHeader)) && (CRTDLL_wcslen(name) == 11) && (CRTDLL_wcsncmp(name, OlePres, 8) == 0) && CRTDLL_iswdigit(name[8]) && CRTDLL_iswdigit(name[9]) && CRTDLL_iswdigit(name[10]); } /************************************************************************ * DataCache_OpenPresStream * * This method will find the stream for the given presentation. It makes * no attempt at fallback. * * Param: * this - Pointer to the DataCache object * drawAspect - The aspect of the object that we wish to draw. * pStm - A returned stream. It points to the beginning of the * - presentation data, including the header. * * Errors: * S_OK The requested stream has been opened. * OLE_E_BLANK The requested stream could not be found. * Quite a few others I'm too lazy to map correctly. * * Notes: * Algorithm: Scan the elements of the presentation storage, looking * for presentation streams. For each presentation stream, * load the header and check to see if the aspect maches. * * If a fallback is desired, just opening the first presentation stream * is a possibility. */ static HRESULT DataCache_OpenPresStream( DataCache *this, DWORD drawAspect, IStream **ppStm) { STATSTG elem; IEnumSTATSTG *pEnum; HRESULT hr; if (!ppStm) return E_POINTER; hr = IStorage_EnumElements(this->presentationStorage, 0, NULL, 0, &pEnum); if (FAILED(hr)) return hr; while ((hr = IEnumSTATSTG_Next(pEnum, 1, &elem, NULL)) == S_OK) { if (DataCache_IsPresentationStream(&elem)) { IStream *pStm; hr = IStorage_OpenStream(this->presentationStorage, elem.pwcsName, NULL, STGM_READ | STGM_SHARE_EXCLUSIVE, 0, &pStm); if (SUCCEEDED(hr)) { PresentationDataHeader header; ULONG actual_read; hr = IStream_Read(pStm, &header, sizeof(header), &actual_read); /* can't use SUCCEEDED(hr): S_FALSE counts as an error */ if (hr == S_OK && actual_read == sizeof(header) && header.dvAspect == drawAspect) { /* Rewind the stream before returning it. */ LARGE_INTEGER offset; offset.s.LowPart = 0; offset.s.HighPart = 0; IStream_Seek(pStm, offset, STREAM_SEEK_SET, NULL); *ppStm = pStm; CoTaskMemFree(elem.pwcsName); IEnumSTATSTG_Release(pEnum); return S_OK; } IStream_Release(pStm); } } CoTaskMemFree(elem.pwcsName); } IEnumSTATSTG_Release(pEnum); return (hr == S_FALSE ? OLE_E_BLANK : hr); } /************************************************************************ * DataCache_ReadPresentationData * * This method will read information for the requested presentation * into the given structure. * * Param: * this - Pointer to the DataCache object * drawAspect - The aspect of the object that we wish to draw. * * Returns: * This method returns a metafile handle if it is successful. * it will return 0 if not. */ static HMETAFILE DataCache_ReadPresMetafile( DataCache* this, DWORD drawAspect) { LARGE_INTEGER offset; IStream* presStream = NULL; HRESULT hres; void* metafileBits; STATSTG streamInfo; HMETAFILE newMetafile = 0; /* * Open the presentation stream. */ hres = DataCache_OpenPresStream( this, drawAspect, &presStream); if (FAILED(hres)) return hres; /* * Get the size of the stream. */ hres = IStream_Stat(presStream, &streamInfo, STATFLAG_NONAME); /* * Skip the header */ offset.s.HighPart = 0; offset.s.LowPart = sizeof(PresentationDataHeader); hres = IStream_Seek( presStream, offset, STREAM_SEEK_SET, NULL); streamInfo.cbSize.s.LowPart -= offset.s.LowPart; /* * Allocate a buffer for the metafile bits. */ metafileBits = HeapAlloc(GetProcessHeap(), 0, streamInfo.cbSize.s.LowPart); /* * Read the metafile bits. */ hres = IStream_Read( presStream, metafileBits, streamInfo.cbSize.s.LowPart, NULL); /* * Create a metafile with those bits. */ if (SUCCEEDED(hres)) { newMetafile = SetMetaFileBitsEx(streamInfo.cbSize.s.LowPart, metafileBits); } /* * Cleanup. */ HeapFree(GetProcessHeap(), 0, metafileBits); IStream_Release(presStream); if (newMetafile==0) hres = E_FAIL; return newMetafile; } /********************************************************* * Method implementation for the non delegating IUnknown * part of the DataCache class. */ /************************************************************************ * DataCache_NDIUnknown_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. * * This version of QueryInterface will not delegate it's implementation * to the outer unknown. */ static HRESULT WINAPI DataCache_NDIUnknown_QueryInterface( IUnknown* iface, REFIID riid, void** ppvObject) { _ICOM_THIS_From_NDIUnknown(DataCache, iface); /* * Perform a sanity check on the parameters. */ if ( (this==0) || (ppvObject==0) ) return E_INVALIDARG; /* * Initialize the return parameter. */ *ppvObject = 0; /* * Compare the riid with the interface IDs implemented by this object. */ if (memcmp(&IID_IUnknown, riid, sizeof(IID_IUnknown)) == 0) { *ppvObject = iface; } else if (memcmp(&IID_IDataObject, riid, sizeof(IID_IDataObject)) == 0) { *ppvObject = (IDataObject*)&(this->lpvtbl1); } else if ( (memcmp(&IID_IPersistStorage, riid, sizeof(IID_IPersistStorage)) == 0) || (memcmp(&IID_IPersist, riid, sizeof(IID_IPersist)) == 0) ) { *ppvObject = (IPersistStorage*)&(this->lpvtbl3); } else if ( (memcmp(&IID_IViewObject, riid, sizeof(IID_IViewObject)) == 0) || (memcmp(&IID_IViewObject2, riid, sizeof(IID_IViewObject2)) == 0) ) { *ppvObject = (IViewObject2*)&(this->lpvtbl4); } else if ( (memcmp(&IID_IOleCache, riid, sizeof(IID_IOleCache)) == 0) || (memcmp(&IID_IOleCache2, riid, sizeof(IID_IOleCache2)) == 0) ) { *ppvObject = (IOleCache2*)&(this->lpvtbl5); } else if (memcmp(&IID_IOleCacheControl, riid, sizeof(IID_IOleCacheControl)) == 0) { *ppvObject = (IOleCacheControl*)&(this->lpvtbl6); } /* * Check that we obtained an interface. */ if ((*ppvObject)==0) { WARN( "() : asking for un supported interface %s\n", debugstr_guid(riid)); return E_NOINTERFACE; } /* * Query Interface always increases the reference count by one when it is * successful. */ IUnknown_AddRef((IUnknown*)*ppvObject); return S_OK;; } /************************************************************************ * DataCache_NDIUnknown_AddRef (IUnknown) * * See Windows documentation for more details on IUnknown methods. * * This version of QueryInterface will not delegate it's implementation * to the outer unknown. */ static ULONG WINAPI DataCache_NDIUnknown_AddRef( IUnknown* iface) { _ICOM_THIS_From_NDIUnknown(DataCache, iface); this->ref++; return this->ref; } /************************************************************************ * DataCache_NDIUnknown_Release (IUnknown) * * See Windows documentation for more details on IUnknown methods. * * This version of QueryInterface will not delegate it's implementation * to the outer unknown. */ static ULONG WINAPI DataCache_NDIUnknown_Release( IUnknown* iface) { _ICOM_THIS_From_NDIUnknown(DataCache, iface); /* * Decrease the reference count on this object. */ this->ref--; /* * If the reference count goes down to 0, perform suicide. */ if (this->ref==0) { DataCache_Destroy(this); return 0; } return this->ref; } /********************************************************* * Method implementation for the IDataObject * part of the DataCache class. */ /************************************************************************ * DataCache_IDataObject_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static HRESULT WINAPI DataCache_IDataObject_QueryInterface( IDataObject* iface, REFIID riid, void** ppvObject) { _ICOM_THIS_From_IDataObject(DataCache, iface); return IUnknown_QueryInterface(this->outerUnknown, riid, ppvObject); } /************************************************************************ * DataCache_IDataObject_AddRef (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DataCache_IDataObject_AddRef( IDataObject* iface) { _ICOM_THIS_From_IDataObject(DataCache, iface); return IUnknown_AddRef(this->outerUnknown); } /************************************************************************ * DataCache_IDataObject_Release (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DataCache_IDataObject_Release( IDataObject* iface) { _ICOM_THIS_From_IDataObject(DataCache, iface); return IUnknown_Release(this->outerUnknown); } /************************************************************************ * DataCache_GetData * * Get Data from a source dataobject using format pformatetcIn->cfFormat * See Windows documentation for more details on GetData. * TODO: Currently only CF_METAFILEPICT is implemented */ static HRESULT WINAPI DataCache_GetData( IDataObject* iface, LPFORMATETC pformatetcIn, STGMEDIUM* pmedium) { HRESULT hr = 0; HRESULT hrRet = E_UNEXPECTED; IPersistStorage *pPersistStorage = 0; IStorage *pStorage = 0; IStream *pStream = 0; OLECHAR name[]={ 2, 'O', 'l', 'e', 'P', 'r', 'e', 's', '0', '0', '0', 0}; HGLOBAL hGlobalMF = 0; void *mfBits = 0; PresentationDataHeader pdh; METAFILEPICT *mfPict; HMETAFILE hMetaFile = 0; if (pformatetcIn->cfFormat == CF_METAFILEPICT) { /* Get the Persist Storage */ hr = IDataObject_QueryInterface(iface, &IID_IPersistStorage, (void**)&pPersistStorage); if (hr != S_OK) goto cleanup; /* Create a doc file to copy the doc to a storage */ hr = StgCreateDocfile(NULL, STGM_CREATE | STGM_READWRITE | STGM_SHARE_EXCLUSIVE, 0, &pStorage); if (hr != S_OK) goto cleanup; /* Save it to storage */ hr = OleSave(pPersistStorage, pStorage, FALSE); if (hr != S_OK) goto cleanup; /* Open the Presentation data srteam */ hr = IStorage_OpenStream(pStorage, name, 0, STGM_CREATE|STGM_SHARE_EXCLUSIVE|STGM_READWRITE, 0, &pStream); if (hr != S_OK) goto cleanup; /* Read the presentation header */ hr = IStream_Read(pStream, &pdh, sizeof(PresentationDataHeader), NULL); if (hr != S_OK) goto cleanup; mfBits = HeapAlloc(GetProcessHeap(), 0, pdh.dwSize); /* Read the Metafile bits */ hr = IStream_Read(pStream, mfBits, pdh.dwSize, NULL); if (hr != S_OK) goto cleanup; /* Create the metafile and place it in the STGMEDIUM structure */ hMetaFile = SetMetaFileBitsEx(pdh.dwSize, mfBits); hGlobalMF = GlobalAlloc(GMEM_SHARE|GMEM_MOVEABLE, sizeof(METAFILEPICT)); mfPict = (METAFILEPICT *)GlobalLock(hGlobalMF); mfPict->hMF = hMetaFile; GlobalUnlock(hGlobalMF); pmedium->u.hGlobal = hGlobalMF; pmedium->tymed = TYMED_MFPICT; hrRet = S_OK; cleanup: if (mfBits) HeapFree(GetProcessHeap(), 0, mfBits); if (pStream) IStream_Release(pStream); if (pStorage) IStorage_Release(pStorage); if (pPersistStorage) IPersistStorage_Release(pPersistStorage); return hrRet; } /* TODO: Other formats are not implemented */ return E_NOTIMPL; } static HRESULT WINAPI DataCache_GetDataHere( IDataObject* iface, LPFORMATETC pformatetc, STGMEDIUM* pmedium) { FIXME("stub\n"); return E_NOTIMPL; } static HRESULT WINAPI DataCache_QueryGetData( IDataObject* iface, LPFORMATETC pformatetc) { FIXME("stub\n"); return E_NOTIMPL; } /************************************************************************ * DataCache_EnumFormatEtc (IDataObject) * * The data cache doesn't implement this method. * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI DataCache_GetCanonicalFormatEtc( IDataObject* iface, LPFORMATETC pformatectIn, LPFORMATETC pformatetcOut) { TRACE("()\n"); return E_NOTIMPL; } /************************************************************************ * DataCache_IDataObject_SetData (IDataObject) * * This method is delegated to the IOleCache2 implementation. * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI DataCache_IDataObject_SetData( IDataObject* iface, LPFORMATETC pformatetc, STGMEDIUM* pmedium, BOOL fRelease) { IOleCache2* oleCache = NULL; HRESULT hres; TRACE("(%p, %p, %p, %d)\n", iface, pformatetc, pmedium, fRelease); hres = IDataObject_QueryInterface(iface, &IID_IOleCache2, (void**)&oleCache); if (FAILED(hres)) return E_UNEXPECTED; hres = IOleCache2_SetData(oleCache, pformatetc, pmedium, fRelease); IOleCache2_Release(oleCache); return hres;; } /************************************************************************ * DataCache_EnumFormatEtc (IDataObject) * * The data cache doesn't implement this method. * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI DataCache_EnumFormatEtc( IDataObject* iface, DWORD dwDirection, IEnumFORMATETC** ppenumFormatEtc) { TRACE("()\n"); return E_NOTIMPL; } /************************************************************************ * DataCache_DAdvise (IDataObject) * * The data cache doesn't support connections. * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI DataCache_DAdvise( IDataObject* iface, FORMATETC* pformatetc, DWORD advf, IAdviseSink* pAdvSink, DWORD* pdwConnection) { TRACE("()\n"); return OLE_E_ADVISENOTSUPPORTED; } /************************************************************************ * DataCache_DUnadvise (IDataObject) * * The data cache doesn't support connections. * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI DataCache_DUnadvise( IDataObject* iface, DWORD dwConnection) { TRACE("()\n"); return OLE_E_NOCONNECTION; } /************************************************************************ * DataCache_EnumDAdvise (IDataObject) * * The data cache doesn't support connections. * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI DataCache_EnumDAdvise( IDataObject* iface, IEnumSTATDATA** ppenumAdvise) { TRACE("()\n"); return OLE_E_ADVISENOTSUPPORTED; } /********************************************************* * Method implementation for the IDataObject * part of the DataCache class. */ /************************************************************************ * DataCache_IPersistStorage_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static HRESULT WINAPI DataCache_IPersistStorage_QueryInterface( IPersistStorage* iface, REFIID riid, void** ppvObject) { _ICOM_THIS_From_IPersistStorage(DataCache, iface); return IUnknown_QueryInterface(this->outerUnknown, riid, ppvObject); } /************************************************************************ * DataCache_IPersistStorage_AddRef (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DataCache_IPersistStorage_AddRef( IPersistStorage* iface) { _ICOM_THIS_From_IPersistStorage(DataCache, iface); return IUnknown_AddRef(this->outerUnknown); } /************************************************************************ * DataCache_IPersistStorage_Release (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DataCache_IPersistStorage_Release( IPersistStorage* iface) { _ICOM_THIS_From_IPersistStorage(DataCache, iface); return IUnknown_Release(this->outerUnknown); } /************************************************************************ * DataCache_GetClassID (IPersistStorage) * * The data cache doesn't implement this method. * * See Windows documentation for more details on IPersistStorage methods. */ static HRESULT WINAPI DataCache_GetClassID( IPersistStorage* iface, CLSID* pClassID) { TRACE("(%p, %p)\n", iface, pClassID); return E_NOTIMPL; } /************************************************************************ * DataCache_IsDirty (IPersistStorage) * * Until we actully connect to a running object and retrieve new * information to it, we never get dirty. * * See Windows documentation for more details on IPersistStorage methods. */ static HRESULT WINAPI DataCache_IsDirty( IPersistStorage* iface) { TRACE("(%p)\n", iface); return S_FALSE; } /************************************************************************ * DataCache_InitNew (IPersistStorage) * * The data cache implementation of IPersistStorage_InitNew simply stores * the storage pointer. * * See Windows documentation for more details on IPersistStorage methods. */ static HRESULT WINAPI DataCache_InitNew( IPersistStorage* iface, IStorage* pStg) { TRACE("(%p, %p)\n", iface, pStg); return DataCache_Load(iface, pStg); } /************************************************************************ * DataCache_Load (IPersistStorage) * * The data cache implementation of IPersistStorage_Load doesn't * actually load anything. Instead, it holds on to the storage pointer * and it will load the presentation information when the * IDataObject_GetData or IViewObject2_Draw methods are called. * * See Windows documentation for more details on IPersistStorage methods. */ static HRESULT WINAPI DataCache_Load( IPersistStorage* iface, IStorage* pStg) { _ICOM_THIS_From_IPersistStorage(DataCache, iface); TRACE("(%p, %p)\n", iface, pStg); if (this->presentationStorage != NULL) { IStorage_Release(this->presentationStorage); } this->presentationStorage = pStg; if (this->presentationStorage != NULL) { IStorage_AddRef(this->presentationStorage); } return S_OK; } /************************************************************************ * DataCache_Save (IPersistStorage) * * Until we actully connect to a running object and retrieve new * information to it, we never have to save anything. However, it is * our responsability to copy the information when saving to a new * storage. * * See Windows documentation for more details on IPersistStorage methods. */ static HRESULT WINAPI DataCache_Save( IPersistStorage* iface, IStorage* pStg, BOOL fSameAsLoad) { _ICOM_THIS_From_IPersistStorage(DataCache, iface); TRACE("(%p, %p, %d)\n", iface, pStg, fSameAsLoad); if ( (!fSameAsLoad) && (this->presentationStorage!=NULL) ) { return IStorage_CopyTo(this->presentationStorage, 0, NULL, NULL, pStg); } return S_OK; } /************************************************************************ * DataCache_SaveCompleted (IPersistStorage) * * This method is called to tell the cache to release the storage * pointer it's currentlu holding. * * See Windows documentation for more details on IPersistStorage methods. */ static HRESULT WINAPI DataCache_SaveCompleted( IPersistStorage* iface, IStorage* pStgNew) { TRACE("(%p, %p)\n", iface, pStgNew); if (pStgNew) { /* * First, make sure we get our hands off any storage we have. */ DataCache_HandsOffStorage(iface); /* * Then, attach to the new storage. */ DataCache_Load(iface, pStgNew); } return S_OK; } /************************************************************************ * DataCache_HandsOffStorage (IPersistStorage) * * This method is called to tell the cache to release the storage * pointer it's currentlu holding. * * See Windows documentation for more details on IPersistStorage methods. */ static HRESULT WINAPI DataCache_HandsOffStorage( IPersistStorage* iface) { _ICOM_THIS_From_IPersistStorage(DataCache, iface); TRACE("(%p)\n", iface); if (this->presentationStorage != NULL) { IStorage_Release(this->presentationStorage); this->presentationStorage = NULL; } return S_OK; } /********************************************************* * Method implementation for the IViewObject2 * part of the DataCache class. */ /************************************************************************ * DataCache_IViewObject2_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static HRESULT WINAPI DataCache_IViewObject2_QueryInterface( IViewObject2* iface, REFIID riid, void** ppvObject) { _ICOM_THIS_From_IViewObject2(DataCache, iface); return IUnknown_QueryInterface(this->outerUnknown, riid, ppvObject); } /************************************************************************ * DataCache_IViewObject2_AddRef (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DataCache_IViewObject2_AddRef( IViewObject2* iface) { _ICOM_THIS_From_IViewObject2(DataCache, iface); return IUnknown_AddRef(this->outerUnknown); } /************************************************************************ * DataCache_IViewObject2_Release (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DataCache_IViewObject2_Release( IViewObject2* iface) { _ICOM_THIS_From_IViewObject2(DataCache, iface); return IUnknown_Release(this->outerUnknown); } /************************************************************************ * DataCache_Draw (IViewObject2) * * This method will draw the cached representation of the object * to the given device context. * * See Windows documentation for more details on IViewObject2 methods. */ static HRESULT WINAPI DataCache_Draw( IViewObject2* iface, DWORD dwDrawAspect, LONG lindex, void* pvAspect, DVTARGETDEVICE* ptd, HDC hdcTargetDev, HDC hdcDraw, LPCRECTL lprcBounds, LPCRECTL lprcWBounds, IVO_ContCallback pfnContinue, DWORD dwContinue) { PresentationDataHeader presData; HMETAFILE presMetafile = 0; HRESULT hres; _ICOM_THIS_From_IViewObject2(DataCache, iface); TRACE("(%p, %lx, %ld, %p, %x, %x, %p, %p, %p, %lx)\n", iface, dwDrawAspect, lindex, pvAspect, hdcTargetDev, hdcDraw, lprcBounds, lprcWBounds, pfnContinue, dwContinue); /* * Sanity check */ if (lprcBounds==NULL) return E_INVALIDARG; /* * First, we need to retrieve the dimensions of the * image in the metafile. */ hres = DataCache_ReadPresentationData(this, dwDrawAspect, &presData); if (FAILED(hres)) return hres; /* * Then, we can extract the metafile itself from the cached * data. * * FIXME Unless it isn't a metafile. I think it could be any CF_XXX type, * particularly CF_DIB. */ presMetafile = DataCache_ReadPresMetafile(this, dwDrawAspect); /* * If we have a metafile, just draw baby... * We have to be careful not to modify the state of the * DC. */ if (presMetafile!=0) { INT prevMapMode = SetMapMode(hdcDraw, MM_ANISOTROPIC); SIZE oldWindowExt; SIZE oldViewportExt; POINT oldViewportOrg; SetWindowExtEx(hdcDraw, presData.dwObjectExtentX, presData.dwObjectExtentY, &oldWindowExt); SetViewportExtEx(hdcDraw, lprcBounds->right - lprcBounds->left, lprcBounds->bottom - lprcBounds->top, &oldViewportExt); SetViewportOrgEx(hdcDraw, lprcBounds->left, lprcBounds->top, &oldViewportOrg); PlayMetaFile(hdcDraw, presMetafile); SetWindowExtEx(hdcDraw, oldWindowExt.cx, oldWindowExt.cy, NULL); SetViewportExtEx(hdcDraw, oldViewportExt.cx, oldViewportExt.cy, NULL); SetViewportOrgEx(hdcDraw, oldViewportOrg.x, oldViewportOrg.y, NULL); SetMapMode(hdcDraw, prevMapMode); DeleteMetaFile(presMetafile); } return S_OK; } static HRESULT WINAPI DataCache_GetColorSet( IViewObject2* iface, DWORD dwDrawAspect, LONG lindex, void* pvAspect, DVTARGETDEVICE* ptd, HDC hicTargetDevice, LOGPALETTE** ppColorSet) { FIXME("stub\n"); return E_NOTIMPL; } static HRESULT WINAPI DataCache_Freeze( IViewObject2* iface, DWORD dwDrawAspect, LONG lindex, void* pvAspect, DWORD* pdwFreeze) { FIXME("stub\n"); return E_NOTIMPL; } static HRESULT WINAPI DataCache_Unfreeze( IViewObject2* iface, DWORD dwFreeze) { FIXME("stub\n"); return E_NOTIMPL; } /************************************************************************ * DataCache_SetAdvise (IViewObject2) * * This sets-up an advisory sink with the data cache. When the object's * view changes, this sink is called. * * See Windows documentation for more details on IViewObject2 methods. */ static HRESULT WINAPI DataCache_SetAdvise( IViewObject2* iface, DWORD aspects, DWORD advf, IAdviseSink* pAdvSink) { _ICOM_THIS_From_IViewObject2(DataCache, iface); TRACE("(%p, %lx, %lx, %p)\n", iface, aspects, advf, pAdvSink); /* * A call to this function removes the previous sink */ if (this->sinkInterface != NULL) { IAdviseSink_Release(this->sinkInterface); this->sinkInterface = NULL; this->sinkAspects = 0; this->sinkAdviseFlag = 0; } /* * Now, setup the new one. */ if (pAdvSink!=NULL) { this->sinkInterface = pAdvSink; this->sinkAspects = aspects; this->sinkAdviseFlag = advf; IAdviseSink_AddRef(this->sinkInterface); } /* * When the ADVF_PRIMEFIRST flag is set, we have to advise the * sink immediately. */ if (advf & ADVF_PRIMEFIRST) { DataCache_FireOnViewChange(this, DVASPECT_CONTENT, -1); } return S_OK; } /************************************************************************ * DataCache_GetAdvise (IViewObject2) * * This method queries the current state of the advise sink * installed on the data cache. * * See Windows documentation for more details on IViewObject2 methods. */ static HRESULT WINAPI DataCache_GetAdvise( IViewObject2* iface, DWORD* pAspects, DWORD* pAdvf, IAdviseSink** ppAdvSink) { _ICOM_THIS_From_IViewObject2(DataCache, iface); TRACE("(%p, %p, %p, %p)\n", iface, pAspects, pAdvf, ppAdvSink); /* * Just copy all the requested values. */ if (pAspects!=NULL) *pAspects = this->sinkAspects; if (pAdvf!=NULL) *pAdvf = this->sinkAdviseFlag; if (ppAdvSink!=NULL) { IAdviseSink_QueryInterface(this->sinkInterface, &IID_IAdviseSink, (void**)ppAdvSink); } return S_OK; } /************************************************************************ * DataCache_GetExtent (IViewObject2) * * This method retrieves the "natural" size of this cached object. * * See Windows documentation for more details on IViewObject2 methods. */ static HRESULT WINAPI DataCache_GetExtent( IViewObject2* iface, DWORD dwDrawAspect, LONG lindex, DVTARGETDEVICE* ptd, LPSIZEL lpsizel) { PresentationDataHeader presData; HRESULT hres = E_FAIL; _ICOM_THIS_From_IViewObject2(DataCache, iface); TRACE("(%p, %lx, %ld, %p, %p)\n", iface, dwDrawAspect, lindex, ptd, lpsizel); /* * Sanity check */ if (lpsizel==NULL) return E_POINTER; /* * Initialize the out parameter. */ lpsizel->cx = 0; lpsizel->cy = 0; /* * This flag should be set to -1. */ if (lindex!=-1) FIXME("Unimplemented flag lindex = %ld\n", lindex); /* * Right now, we suport only the callback from * the default handler. */ if (ptd!=NULL) FIXME("Unimplemented ptd = %p\n", ptd); /* * Get the presentation information from the * cache. */ hres = DataCache_ReadPresentationData(this, dwDrawAspect, &presData); if (SUCCEEDED(hres)) { lpsizel->cx = presData.dwObjectExtentX; lpsizel->cy = presData.dwObjectExtentY; } /* * This method returns OLE_E_BLANK when it fails. */ if (FAILED(hres)) hres = OLE_E_BLANK; return hres; } /********************************************************* * Method implementation for the IOleCache2 * part of the DataCache class. */ /************************************************************************ * DataCache_IOleCache2_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static HRESULT WINAPI DataCache_IOleCache2_QueryInterface( IOleCache2* iface, REFIID riid, void** ppvObject) { _ICOM_THIS_From_IOleCache2(DataCache, iface); return IUnknown_QueryInterface(this->outerUnknown, riid, ppvObject); } /************************************************************************ * DataCache_IOleCache2_AddRef (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DataCache_IOleCache2_AddRef( IOleCache2* iface) { _ICOM_THIS_From_IOleCache2(DataCache, iface); return IUnknown_AddRef(this->outerUnknown); } /************************************************************************ * DataCache_IOleCache2_Release (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DataCache_IOleCache2_Release( IOleCache2* iface) { _ICOM_THIS_From_IOleCache2(DataCache, iface); return IUnknown_Release(this->outerUnknown); } static HRESULT WINAPI DataCache_Cache( IOleCache2* iface, FORMATETC* pformatetc, DWORD advf, DWORD* pdwConnection) { FIXME("stub\n"); return E_NOTIMPL; } static HRESULT WINAPI DataCache_Uncache( IOleCache2* iface, DWORD dwConnection) { FIXME("stub\n"); return E_NOTIMPL; } static HRESULT WINAPI DataCache_EnumCache( IOleCache2* iface, IEnumSTATDATA** ppenumSTATDATA) { FIXME("stub\n"); return E_NOTIMPL; } static HRESULT WINAPI DataCache_InitCache( IOleCache2* iface, IDataObject* pDataObject) { FIXME("stub\n"); return E_NOTIMPL; } static HRESULT WINAPI DataCache_IOleCache2_SetData( IOleCache2* iface, FORMATETC* pformatetc, STGMEDIUM* pmedium, BOOL fRelease) { FIXME("stub\n"); return E_NOTIMPL; } static HRESULT WINAPI DataCache_UpdateCache( IOleCache2* iface, LPDATAOBJECT pDataObject, DWORD grfUpdf, LPVOID pReserved) { FIXME("stub\n"); return E_NOTIMPL; } static HRESULT WINAPI DataCache_DiscardCache( IOleCache2* iface, DWORD dwDiscardOptions) { FIXME("stub\n"); return E_NOTIMPL; } /********************************************************* * Method implementation for the IOleCacheControl * part of the DataCache class. */ /************************************************************************ * DataCache_IOleCacheControl_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static HRESULT WINAPI DataCache_IOleCacheControl_QueryInterface( IOleCacheControl* iface, REFIID riid, void** ppvObject) { _ICOM_THIS_From_IOleCacheControl(DataCache, iface); return IUnknown_QueryInterface(this->outerUnknown, riid, ppvObject); } /************************************************************************ * DataCache_IOleCacheControl_AddRef (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DataCache_IOleCacheControl_AddRef( IOleCacheControl* iface) { _ICOM_THIS_From_IOleCacheControl(DataCache, iface); return IUnknown_AddRef(this->outerUnknown); } /************************************************************************ * DataCache_IOleCacheControl_Release (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DataCache_IOleCacheControl_Release( IOleCacheControl* iface) { _ICOM_THIS_From_IOleCacheControl(DataCache, iface); return IUnknown_Release(this->outerUnknown); } static HRESULT WINAPI DataCache_OnRun( IOleCacheControl* iface, LPDATAOBJECT pDataObject) { FIXME("stub\n"); return E_NOTIMPL; } static HRESULT WINAPI DataCache_OnStop( IOleCacheControl* iface) { FIXME("stub\n"); return E_NOTIMPL; } wine-20000526/dlls/ole32/defaulthandler.c0100644000175000001440000013451707112612620017462 0ustar julliardusers/* * OLE 2 default object handler * * Copyright 1999 Francis Beaudet * Copyright 2000 Abey George * * NOTES: * The OLE2 default object handler supports a whole whack of * interfaces including: * IOleObject, IDataObject, IPersistStorage, IViewObject2, * IRunnableObject, IOleCache2, IOleCacheControl and much more. * * All the implementation details are taken from: Inside OLE * second edition by Kraig Brockschmidt, * * TODO * - This implementation of the default handler does not launch the * server in the DoVerb, Update, GetData, GetDataHere and Run * methods. When it is fixed to do so, all the methods will have * to be revisited to allow delegating to the running object * * - All methods in the class that use the class ID should be * aware that it is possible for a class to be treated as * another one and go into emulation mode. Nothing has been * done in this area. * * - Some functions still return E_NOTIMPL they have to be * implemented. Most of those are related to the running of the * actual server. * * - All the methods related to notification and advise sinks are * in place but no notifications are sent to the sinks yet. */ #include #include "winbase.h" #include "winerror.h" #include "ole2.h" #include "wine/obj_oleview.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ole) /**************************************************************************** * DefaultHandler * */ struct DefaultHandler { /* * List all interface VTables here */ ICOM_VTABLE(IOleObject)* lpvtbl1; ICOM_VTABLE(IUnknown)* lpvtbl2; ICOM_VTABLE(IDataObject)* lpvtbl3; ICOM_VTABLE(IRunnableObject)* lpvtbl4; /* * Reference count of this object */ ULONG ref; /* * IUnknown implementation of the outer object. */ IUnknown* outerUnknown; /* * Class Id that this handler object represents. */ CLSID clsid; /* * IUnknown implementation of the datacache. */ IUnknown* dataCache; /* * Client site for the embedded object. */ IOleClientSite* clientSite; /* * The IOleAdviseHolder maintains the connections * on behalf of the default handler. */ IOleAdviseHolder* oleAdviseHolder; /* * The IDataAdviseHolder maintains the data * connections on behalf of the default handler. */ IDataAdviseHolder* dataAdviseHolder; /* * Name of the container and object contained */ LPWSTR containerApp; LPWSTR containerObj; }; typedef struct DefaultHandler DefaultHandler; /* * Here, I define utility macros to help with the casting of the * "this" parameter. * There is a version to accomodate all of the VTables implemented * by this object. */ #define _ICOM_THIS_From_IOleObject(class,name) class* this = (class*)name; #define _ICOM_THIS_From_NDIUnknown(class, name) class* this = (class*)(((char*)name)-sizeof(void*)); #define _ICOM_THIS_From_IDataObject(class, name) class* this = (class*)(((char*)name)-2*sizeof(void*)); #define _ICOM_THIS_From_IRunnableObject(class, name) class* this = (class*)(((char*)name)-3*sizeof(void*)); /* * Prototypes for the methods of the DefaultHandler class. */ static DefaultHandler* DefaultHandler_Construct(REFCLSID clsid, LPUNKNOWN pUnkOuter); static void DefaultHandler_Destroy(DefaultHandler* ptrToDestroy); /* * Prototypes for the methods of the DefaultHandler class * that implement non delegating IUnknown methods. */ static HRESULT WINAPI DefaultHandler_NDIUnknown_QueryInterface( IUnknown* iface, REFIID riid, void** ppvObject); static ULONG WINAPI DefaultHandler_NDIUnknown_AddRef( IUnknown* iface); static ULONG WINAPI DefaultHandler_NDIUnknown_Release( IUnknown* iface); /* * Prototypes for the methods of the DefaultHandler class * that implement IOleObject methods. */ static HRESULT WINAPI DefaultHandler_QueryInterface( IOleObject* iface, REFIID riid, void** ppvObject); static ULONG WINAPI DefaultHandler_AddRef( IOleObject* iface); static ULONG WINAPI DefaultHandler_Release( IOleObject* iface); static HRESULT WINAPI DefaultHandler_SetClientSite( IOleObject* iface, IOleClientSite* pClientSite); static HRESULT WINAPI DefaultHandler_GetClientSite( IOleObject* iface, IOleClientSite** ppClientSite); static HRESULT WINAPI DefaultHandler_SetHostNames( IOleObject* iface, LPCOLESTR szContainerApp, LPCOLESTR szContainerObj); static HRESULT WINAPI DefaultHandler_Close( IOleObject* iface, DWORD dwSaveOption); static HRESULT WINAPI DefaultHandler_SetMoniker( IOleObject* iface, DWORD dwWhichMoniker, IMoniker* pmk); static HRESULT WINAPI DefaultHandler_GetMoniker( IOleObject* iface, DWORD dwAssign, DWORD dwWhichMoniker, IMoniker** ppmk); static HRESULT WINAPI DefaultHandler_InitFromData( IOleObject* iface, IDataObject* pDataObject, BOOL fCreation, DWORD dwReserved); static HRESULT WINAPI DefaultHandler_GetClipboardData( IOleObject* iface, DWORD dwReserved, IDataObject** ppDataObject); static HRESULT WINAPI DefaultHandler_DoVerb( IOleObject* iface, LONG iVerb, struct tagMSG* lpmsg, IOleClientSite* pActiveSite, LONG lindex, HWND hwndParent, LPCRECT lprcPosRect); static HRESULT WINAPI DefaultHandler_EnumVerbs( IOleObject* iface, IEnumOLEVERB** ppEnumOleVerb); static HRESULT WINAPI DefaultHandler_Update( IOleObject* iface); static HRESULT WINAPI DefaultHandler_IsUpToDate( IOleObject* iface); static HRESULT WINAPI DefaultHandler_GetUserClassID( IOleObject* iface, CLSID* pClsid); static HRESULT WINAPI DefaultHandler_GetUserType( IOleObject* iface, DWORD dwFormOfType, LPOLESTR* pszUserType); static HRESULT WINAPI DefaultHandler_SetExtent( IOleObject* iface, DWORD dwDrawAspect, SIZEL* psizel); static HRESULT WINAPI DefaultHandler_GetExtent( IOleObject* iface, DWORD dwDrawAspect, SIZEL* psizel); static HRESULT WINAPI DefaultHandler_Advise( IOleObject* iface, IAdviseSink* pAdvSink, DWORD* pdwConnection); static HRESULT WINAPI DefaultHandler_Unadvise( IOleObject* iface, DWORD dwConnection); static HRESULT WINAPI DefaultHandler_EnumAdvise( IOleObject* iface, IEnumSTATDATA** ppenumAdvise); static HRESULT WINAPI DefaultHandler_GetMiscStatus( IOleObject* iface, DWORD dwAspect, DWORD* pdwStatus); static HRESULT WINAPI DefaultHandler_SetColorScheme( IOleObject* iface, struct tagLOGPALETTE* pLogpal); /* * Prototypes for the methods of the DefaultHandler class * that implement IDataObject methods. */ static HRESULT WINAPI DefaultHandler_IDataObject_QueryInterface( IDataObject* iface, REFIID riid, void** ppvObject); static ULONG WINAPI DefaultHandler_IDataObject_AddRef( IDataObject* iface); static ULONG WINAPI DefaultHandler_IDataObject_Release( IDataObject* iface); static HRESULT WINAPI DefaultHandler_GetData( IDataObject* iface, LPFORMATETC pformatetcIn, STGMEDIUM* pmedium); static HRESULT WINAPI DefaultHandler_GetDataHere( IDataObject* iface, LPFORMATETC pformatetc, STGMEDIUM* pmedium); static HRESULT WINAPI DefaultHandler_QueryGetData( IDataObject* iface, LPFORMATETC pformatetc); static HRESULT WINAPI DefaultHandler_GetCanonicalFormatEtc( IDataObject* iface, LPFORMATETC pformatectIn, LPFORMATETC pformatetcOut); static HRESULT WINAPI DefaultHandler_SetData( IDataObject* iface, LPFORMATETC pformatetc, STGMEDIUM* pmedium, BOOL fRelease); static HRESULT WINAPI DefaultHandler_EnumFormatEtc( IDataObject* iface, DWORD dwDirection, IEnumFORMATETC** ppenumFormatEtc); static HRESULT WINAPI DefaultHandler_DAdvise( IDataObject* iface, FORMATETC* pformatetc, DWORD advf, IAdviseSink* pAdvSink, DWORD* pdwConnection); static HRESULT WINAPI DefaultHandler_DUnadvise( IDataObject* iface, DWORD dwConnection); static HRESULT WINAPI DefaultHandler_EnumDAdvise( IDataObject* iface, IEnumSTATDATA** ppenumAdvise); /* * Prototypes for the methods of the DefaultHandler class * that implement IRunnableObject methods. */ static HRESULT WINAPI DefaultHandler_IRunnableObject_QueryInterface( IRunnableObject* iface, REFIID riid, void** ppvObject); static ULONG WINAPI DefaultHandler_IRunnableObject_AddRef( IRunnableObject* iface); static ULONG WINAPI DefaultHandler_IRunnableObject_Release( IRunnableObject* iface); static HRESULT WINAPI DefaultHandler_GetRunningClass( IRunnableObject* iface, LPCLSID lpClsid); static HRESULT WINAPI DefaultHandler_Run( IRunnableObject* iface, IBindCtx* pbc); static BOOL WINAPI DefaultHandler_IsRunning( IRunnableObject* iface); static HRESULT WINAPI DefaultHandler_LockRunning( IRunnableObject* iface, BOOL fLock, BOOL fLastUnlockCloses); static HRESULT WINAPI DefaultHandler_SetContainedObject( IRunnableObject* iface, BOOL fContained); /* * Virtual function tables for the DefaultHandler class. */ static ICOM_VTABLE(IOleObject) DefaultHandler_IOleObject_VTable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DefaultHandler_QueryInterface, DefaultHandler_AddRef, DefaultHandler_Release, DefaultHandler_SetClientSite, DefaultHandler_GetClientSite, DefaultHandler_SetHostNames, DefaultHandler_Close, DefaultHandler_SetMoniker, DefaultHandler_GetMoniker, DefaultHandler_InitFromData, DefaultHandler_GetClipboardData, DefaultHandler_DoVerb, DefaultHandler_EnumVerbs, DefaultHandler_Update, DefaultHandler_IsUpToDate, DefaultHandler_GetUserClassID, DefaultHandler_GetUserType, DefaultHandler_SetExtent, DefaultHandler_GetExtent, DefaultHandler_Advise, DefaultHandler_Unadvise, DefaultHandler_EnumAdvise, DefaultHandler_GetMiscStatus, DefaultHandler_SetColorScheme }; static ICOM_VTABLE(IUnknown) DefaultHandler_NDIUnknown_VTable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DefaultHandler_NDIUnknown_QueryInterface, DefaultHandler_NDIUnknown_AddRef, DefaultHandler_NDIUnknown_Release, }; static ICOM_VTABLE(IDataObject) DefaultHandler_IDataObject_VTable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DefaultHandler_IDataObject_QueryInterface, DefaultHandler_IDataObject_AddRef, DefaultHandler_IDataObject_Release, DefaultHandler_GetData, DefaultHandler_GetDataHere, DefaultHandler_QueryGetData, DefaultHandler_GetCanonicalFormatEtc, DefaultHandler_SetData, DefaultHandler_EnumFormatEtc, DefaultHandler_DAdvise, DefaultHandler_DUnadvise, DefaultHandler_EnumDAdvise }; static ICOM_VTABLE(IRunnableObject) DefaultHandler_IRunnableObject_VTable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DefaultHandler_IRunnableObject_QueryInterface, DefaultHandler_IRunnableObject_AddRef, DefaultHandler_IRunnableObject_Release, DefaultHandler_GetRunningClass, DefaultHandler_Run, DefaultHandler_IsRunning, DefaultHandler_LockRunning, DefaultHandler_SetContainedObject }; /****************************************************************************** * OleCreateDefaultHandler [OLE32.90] */ HRESULT WINAPI OleCreateDefaultHandler( REFCLSID clsid, LPUNKNOWN pUnkOuter, REFIID riid, LPVOID* ppvObj) { DefaultHandler* newHandler = NULL; HRESULT hr = S_OK; TRACE("(%s, %p, %s, %p)\n", debugstr_guid(clsid), pUnkOuter, debugstr_guid(riid), ppvObj); /* * Sanity check */ if (ppvObj==0) return E_POINTER; *ppvObj = 0; /* * If this handler is constructed for aggregation, make sure * the caller is requesting the IUnknown interface. * This is necessary because it's the only time the non-delegating * IUnknown pointer can be returned to the outside. */ if ( (pUnkOuter!=NULL) && (memcmp(&IID_IUnknown, riid, sizeof(IID_IUnknown)) != 0) ) return CLASS_E_NOAGGREGATION; /* * Try to construct a new instance of the class. */ newHandler = DefaultHandler_Construct(clsid, pUnkOuter); if (newHandler == 0) return E_OUTOFMEMORY; /* * Make sure it supports the interface required by the caller. */ hr = IUnknown_QueryInterface((IUnknown*)&(newHandler->lpvtbl2), riid, ppvObj); /* * Release the reference obtained in the constructor. If * the QueryInterface was unsuccessful, it will free the class. */ IUnknown_Release((IUnknown*)&(newHandler->lpvtbl2)); return hr; } /********************************************************* * Methods implementation for the DefaultHandler class. */ static DefaultHandler* DefaultHandler_Construct( REFCLSID clsid, LPUNKNOWN pUnkOuter) { DefaultHandler* newObject = 0; /* * Allocate space for the object. */ newObject = HeapAlloc(GetProcessHeap(), 0, sizeof(DefaultHandler)); if (newObject==0) return newObject; /* * Initialize the virtual function table. */ newObject->lpvtbl1 = &DefaultHandler_IOleObject_VTable; newObject->lpvtbl2 = &DefaultHandler_NDIUnknown_VTable; newObject->lpvtbl3 = &DefaultHandler_IDataObject_VTable; newObject->lpvtbl4 = &DefaultHandler_IRunnableObject_VTable; /* * Start with one reference count. The caller of this function * must release the interface pointer when it is done. */ newObject->ref = 1; /* * Initialize the outer unknown * We don't keep a reference on the outer unknown since, the way * aggregation works, our lifetime is at least as large as it's * lifetime. */ if (pUnkOuter==NULL) pUnkOuter = (IUnknown*)&(newObject->lpvtbl2); newObject->outerUnknown = pUnkOuter; /* * Create a datacache object. * We aggregate with the datacache. Make sure we pass our outer * unknown as the datacache's outer unknown. */ CreateDataCache(newObject->outerUnknown, clsid, &IID_IUnknown, (void**)&newObject->dataCache); /* * Initialize the other data members of the class. */ memcpy(&(newObject->clsid), clsid, sizeof(CLSID)); newObject->clientSite = NULL; newObject->oleAdviseHolder = NULL; newObject->dataAdviseHolder = NULL; newObject->containerApp = NULL; newObject->containerObj = NULL; return newObject; } static void DefaultHandler_Destroy( DefaultHandler* ptrToDestroy) { /* * Free the strings idenfitying the object */ if (ptrToDestroy->containerApp!=NULL) { HeapFree( GetProcessHeap(), 0, ptrToDestroy->containerApp ); ptrToDestroy->containerApp = NULL; } if (ptrToDestroy->containerObj!=NULL) { HeapFree( GetProcessHeap(), 0, ptrToDestroy->containerObj ); ptrToDestroy->containerObj = NULL; } /* * Release our reference to the data cache. */ if (ptrToDestroy->dataCache!=NULL) { IUnknown_Release(ptrToDestroy->dataCache); ptrToDestroy->dataCache = NULL; } /* * Same thing for the client site. */ if (ptrToDestroy->clientSite!=NULL) { IOleClientSite_Release(ptrToDestroy->clientSite); ptrToDestroy->clientSite = NULL; } /* * And the advise holder. */ if (ptrToDestroy->oleAdviseHolder!=NULL) { IOleAdviseHolder_Release(ptrToDestroy->oleAdviseHolder); ptrToDestroy->oleAdviseHolder = NULL; } /* * And the data advise holder. */ if (ptrToDestroy->dataAdviseHolder!=NULL) { IDataAdviseHolder_Release(ptrToDestroy->dataAdviseHolder); ptrToDestroy->dataAdviseHolder = NULL; } /* * Free the actual default handler structure. */ HeapFree(GetProcessHeap(), 0, ptrToDestroy); } /********************************************************* * Method implementation for the non delegating IUnknown * part of the DefaultHandler class. */ /************************************************************************ * DefaultHandler_NDIUnknown_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. * * This version of QueryInterface will not delegate it's implementation * to the outer unknown. */ static HRESULT WINAPI DefaultHandler_NDIUnknown_QueryInterface( IUnknown* iface, REFIID riid, void** ppvObject) { _ICOM_THIS_From_NDIUnknown(DefaultHandler, iface); /* * Perform a sanity check on the parameters. */ if ( (this==0) || (ppvObject==0) ) return E_INVALIDARG; /* * Initialize the return parameter. */ *ppvObject = 0; /* * Compare the riid with the interface IDs implemented by this object. */ if (memcmp(&IID_IUnknown, riid, sizeof(IID_IUnknown)) == 0) { *ppvObject = iface; } else if (memcmp(&IID_IOleObject, riid, sizeof(IID_IOleObject)) == 0) { *ppvObject = (IOleObject*)&(this->lpvtbl1); } else if (memcmp(&IID_IDataObject, riid, sizeof(IID_IDataObject)) == 0) { *ppvObject = (IDataObject*)&(this->lpvtbl3); } else if (memcmp(&IID_IRunnableObject, riid, sizeof(IID_IRunnableObject)) == 0) { *ppvObject = (IRunnableObject*)&(this->lpvtbl4); } else { /* * Blind aggregate the data cache to "inherit" it's interfaces. */ if (IUnknown_QueryInterface(this->dataCache, riid, ppvObject) == S_OK) return S_OK; } /* * Check that we obtained an interface. */ if ((*ppvObject)==0) { WARN( "() : asking for un supported interface %s\n", debugstr_guid(riid)); return E_NOINTERFACE; } /* * Query Interface always increases the reference count by one when it is * successful. */ IUnknown_AddRef((IUnknown*)*ppvObject); return S_OK;; } /************************************************************************ * DefaultHandler_NDIUnknown_AddRef (IUnknown) * * See Windows documentation for more details on IUnknown methods. * * This version of QueryInterface will not delegate it's implementation * to the outer unknown. */ static ULONG WINAPI DefaultHandler_NDIUnknown_AddRef( IUnknown* iface) { _ICOM_THIS_From_NDIUnknown(DefaultHandler, iface); this->ref++; return this->ref; } /************************************************************************ * DefaultHandler_NDIUnknown_Release (IUnknown) * * See Windows documentation for more details on IUnknown methods. * * This version of QueryInterface will not delegate it's implementation * to the outer unknown. */ static ULONG WINAPI DefaultHandler_NDIUnknown_Release( IUnknown* iface) { _ICOM_THIS_From_NDIUnknown(DefaultHandler, iface); /* * Decrease the reference count on this object. */ this->ref--; /* * If the reference count goes down to 0, perform suicide. */ if (this->ref==0) { DefaultHandler_Destroy(this); return 0; } return this->ref; } /********************************************************* * Methods implementation for the IOleObject part of * the DefaultHandler class. */ /************************************************************************ * DefaultHandler_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static HRESULT WINAPI DefaultHandler_QueryInterface( IOleObject* iface, REFIID riid, void** ppvObject) { _ICOM_THIS_From_IOleObject(DefaultHandler, iface); return IUnknown_QueryInterface(this->outerUnknown, riid, ppvObject); } /************************************************************************ * DefaultHandler_AddRef (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DefaultHandler_AddRef( IOleObject* iface) { _ICOM_THIS_From_IOleObject(DefaultHandler, iface); return IUnknown_AddRef(this->outerUnknown); } /************************************************************************ * DefaultHandler_Release (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DefaultHandler_Release( IOleObject* iface) { _ICOM_THIS_From_IOleObject(DefaultHandler, iface); return IUnknown_Release(this->outerUnknown); } /************************************************************************ * DefaultHandler_SetClientSite (IOleObject) * * The default handler's implementation of this method only keeps the * client site pointer for future reference. * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_SetClientSite( IOleObject* iface, IOleClientSite* pClientSite) { _ICOM_THIS_From_IOleObject(DefaultHandler, iface); TRACE("(%p, %p)\n", iface, pClientSite); /* * Make sure we release the previous client site if there * was one. */ if (this->clientSite!=NULL) { IOleClientSite_Release(this->clientSite); } this->clientSite = pClientSite; if (this->clientSite!=NULL) { IOleClientSite_AddRef(this->clientSite); } return S_OK; } /************************************************************************ * DefaultHandler_GetClientSite (IOleObject) * * The default handler's implementation of this method returns the * last pointer set in IOleObject_SetClientSite. * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_GetClientSite( IOleObject* iface, IOleClientSite** ppClientSite) { _ICOM_THIS_From_IOleObject(DefaultHandler, iface); /* * Sanity check. */ if (ppClientSite == NULL) return E_POINTER; *ppClientSite = this->clientSite; if (this->clientSite != NULL) { IOleClientSite_AddRef(this->clientSite); } return S_OK; } /************************************************************************ * DefaultHandler_SetHostNames (IOleObject) * * The default handler's implementation of this method just stores * the strings and returns S_OK. * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_SetHostNames( IOleObject* iface, LPCOLESTR szContainerApp, LPCOLESTR szContainerObj) { _ICOM_THIS_From_IOleObject(DefaultHandler, iface); TRACE("(%p, %s, %s)\n", iface, debugstr_w(szContainerApp), debugstr_w(szContainerObj)); /* * Be sure to cleanup before re-assinging the strings. */ if (this->containerApp!=NULL) { HeapFree( GetProcessHeap(), 0, this->containerApp ); this->containerApp = NULL; } if (this->containerObj!=NULL) { HeapFree( GetProcessHeap(), 0, this->containerObj ); this->containerObj = NULL; } /* * Copy the string supplied. */ if (szContainerApp != NULL) { if ((this->containerApp = HeapAlloc( GetProcessHeap(), 0, (lstrlenW(szContainerApp) + 1) * sizeof(WCHAR) ))) lstrcpyW( this->containerApp, szContainerApp ); } if (szContainerObj != NULL) { if ((this->containerObj = HeapAlloc( GetProcessHeap(), 0, (lstrlenW(szContainerObj) + 1) * sizeof(WCHAR) ))) lstrcpyW( this->containerObj, szContainerObj ); } return S_OK; } /************************************************************************ * DefaultHandler_Close (IOleObject) * * The default handler's implementation of this method is meaningless * without a running server so it does nothing. * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_Close( IOleObject* iface, DWORD dwSaveOption) { TRACE("()\n"); return S_OK; } /************************************************************************ * DefaultHandler_SetMoniker (IOleObject) * * The default handler's implementation of this method does nothing. * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_SetMoniker( IOleObject* iface, DWORD dwWhichMoniker, IMoniker* pmk) { TRACE("(%p, %ld, %p)\n", iface, dwWhichMoniker, pmk); return S_OK; } /************************************************************************ * DefaultHandler_GetMoniker (IOleObject) * * Delegate this request to the client site if we have one. * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_GetMoniker( IOleObject* iface, DWORD dwAssign, DWORD dwWhichMoniker, IMoniker** ppmk) { _ICOM_THIS_From_IOleObject(DefaultHandler, iface); TRACE("(%p, %ld, %ld, %p)\n", iface, dwAssign, dwWhichMoniker, ppmk); if (this->clientSite) { return IOleClientSite_GetMoniker(this->clientSite, dwAssign, dwWhichMoniker, ppmk); } return E_UNSPEC; } /************************************************************************ * DefaultHandler_InitFromData (IOleObject) * * This method is meaningless if the server is not running * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_InitFromData( IOleObject* iface, IDataObject* pDataObject, BOOL fCreation, DWORD dwReserved) { TRACE("(%p, %p, %d, %ld)\n", iface, pDataObject, fCreation, dwReserved); return OLE_E_NOTRUNNING; } /************************************************************************ * DefaultHandler_GetClipboardData (IOleObject) * * This method is meaningless if the server is not running * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_GetClipboardData( IOleObject* iface, DWORD dwReserved, IDataObject** ppDataObject) { TRACE("(%p, %ld, %p)\n", iface, dwReserved, ppDataObject); return OLE_E_NOTRUNNING; } static HRESULT WINAPI DefaultHandler_DoVerb( IOleObject* iface, LONG iVerb, struct tagMSG* lpmsg, IOleClientSite* pActiveSite, LONG lindex, HWND hwndParent, LPCRECT lprcPosRect) { FIXME(": Stub\n"); return E_NOTIMPL; } /************************************************************************ * DefaultHandler_EnumVerbs (IOleObject) * * The default handler implementation of this method simply delegates * to OleRegEnumVerbs * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_EnumVerbs( IOleObject* iface, IEnumOLEVERB** ppEnumOleVerb) { _ICOM_THIS_From_IOleObject(DefaultHandler, iface); TRACE("(%p, %p)\n", iface, ppEnumOleVerb); return OleRegEnumVerbs(&this->clsid, ppEnumOleVerb); } static HRESULT WINAPI DefaultHandler_Update( IOleObject* iface) { FIXME(": Stub\n"); return E_NOTIMPL; } /************************************************************************ * DefaultHandler_IsUpToDate (IOleObject) * * This method is meaningless if the server is not running * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_IsUpToDate( IOleObject* iface) { TRACE("(%p)\n", iface); return OLE_E_NOTRUNNING; } /************************************************************************ * DefaultHandler_GetUserClassID (IOleObject) * * TODO: Map to a new class ID if emulation is active. * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_GetUserClassID( IOleObject* iface, CLSID* pClsid) { _ICOM_THIS_From_IOleObject(DefaultHandler, iface); TRACE("(%p, %p)\n", iface, pClsid); /* * Sanity check. */ if (pClsid==NULL) return E_POINTER; memcpy(pClsid, &this->clsid, sizeof(CLSID)); return S_OK; } /************************************************************************ * DefaultHandler_GetUserType (IOleObject) * * The default handler implementation of this method simply delegates * to OleRegGetUserType * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_GetUserType( IOleObject* iface, DWORD dwFormOfType, LPOLESTR* pszUserType) { _ICOM_THIS_From_IOleObject(DefaultHandler, iface); TRACE("(%p, %ld, %p)\n", iface, dwFormOfType, pszUserType); return OleRegGetUserType(&this->clsid, dwFormOfType, pszUserType); } /************************************************************************ * DefaultHandler_SetExtent (IOleObject) * * This method is meaningless if the server is not running * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_SetExtent( IOleObject* iface, DWORD dwDrawAspect, SIZEL* psizel) { TRACE("(%p, %lx, (%d,%d))\n", iface, dwDrawAspect, psizel->cx, psizel->cy); return OLE_E_NOTRUNNING; } /************************************************************************ * DefaultHandler_GetExtent (IOleObject) * * The default handler's implementation of this method returns uses * the cache to locate the aspect and extract the extent from it. * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_GetExtent( IOleObject* iface, DWORD dwDrawAspect, SIZEL* psizel) { DVTARGETDEVICE* targetDevice; IViewObject2* cacheView = NULL; HRESULT hres; _ICOM_THIS_From_IOleObject(DefaultHandler, iface); TRACE("(%p, %lx, %p)\n", iface, dwDrawAspect, psizel); hres = IUnknown_QueryInterface(this->dataCache, &IID_IViewObject2, (void**)&cacheView); if (FAILED(hres)) return E_UNEXPECTED; /* * Prepare the call to the cache's GetExtent method. * * Here we would build a valid DVTARGETDEVICE structure * but, since we are calling into the data cache, we * know it's implementation and we'll skip this * extra work until later. */ targetDevice = NULL; hres = IViewObject2_GetExtent(cacheView, dwDrawAspect, -1, targetDevice, psizel); /* * Cleanup */ IViewObject2_Release(cacheView); return hres; } /************************************************************************ * DefaultHandler_Advise (IOleObject) * * The default handler's implementation of this method simply * delegates to the OleAdviseHolder. * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_Advise( IOleObject* iface, IAdviseSink* pAdvSink, DWORD* pdwConnection) { HRESULT hres = S_OK; _ICOM_THIS_From_IOleObject(DefaultHandler, iface); TRACE("(%p, %p, %p)\n", iface, pAdvSink, pdwConnection); /* * Make sure we have an advise holder before we start. */ if (this->oleAdviseHolder==NULL) { hres = CreateOleAdviseHolder(&this->oleAdviseHolder); } if (SUCCEEDED(hres)) { hres = IOleAdviseHolder_Advise(this->oleAdviseHolder, pAdvSink, pdwConnection); } return hres; } /************************************************************************ * DefaultHandler_Unadvise (IOleObject) * * The default handler's implementation of this method simply * delegates to the OleAdviseHolder. * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_Unadvise( IOleObject* iface, DWORD dwConnection) { _ICOM_THIS_From_IOleObject(DefaultHandler, iface); TRACE("(%p, %ld)\n", iface, dwConnection); /* * If we don't have an advise holder yet, it means we don't have * a connection. */ if (this->oleAdviseHolder==NULL) return OLE_E_NOCONNECTION; return IOleAdviseHolder_Unadvise(this->oleAdviseHolder, dwConnection); } /************************************************************************ * DefaultHandler_EnumAdvise (IOleObject) * * The default handler's implementation of this method simply * delegates to the OleAdviseHolder. * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_EnumAdvise( IOleObject* iface, IEnumSTATDATA** ppenumAdvise) { _ICOM_THIS_From_IOleObject(DefaultHandler, iface); TRACE("(%p, %p)\n", iface, ppenumAdvise); /* * Sanity check */ if (ppenumAdvise==NULL) return E_POINTER; /* * Initialize the out parameter. */ *ppenumAdvise = NULL; if (this->oleAdviseHolder==NULL) return IOleAdviseHolder_EnumAdvise(this->oleAdviseHolder, ppenumAdvise); return S_OK; } /************************************************************************ * DefaultHandler_GetMiscStatus (IOleObject) * * The default handler's implementation of this method simply delegates * to OleRegGetMiscStatus. * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_GetMiscStatus( IOleObject* iface, DWORD dwAspect, DWORD* pdwStatus) { HRESULT hres; _ICOM_THIS_From_IOleObject(DefaultHandler, iface); TRACE("(%p, %lx, %p)\n", iface, dwAspect, pdwStatus); hres = OleRegGetMiscStatus(&(this->clsid), dwAspect, pdwStatus); if (FAILED(hres)) *pdwStatus = 0; return S_OK; } /************************************************************************ * DefaultHandler_SetExtent (IOleObject) * * This method is meaningless if the server is not running * * See Windows documentation for more details on IOleObject methods. */ static HRESULT WINAPI DefaultHandler_SetColorScheme( IOleObject* iface, struct tagLOGPALETTE* pLogpal) { TRACE("(%p, %p))\n", iface, pLogpal); return OLE_E_NOTRUNNING; } /********************************************************* * Methods implementation for the IDataObject part of * the DefaultHandler class. */ /************************************************************************ * DefaultHandler_IDataObject_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static HRESULT WINAPI DefaultHandler_IDataObject_QueryInterface( IDataObject* iface, REFIID riid, void** ppvObject) { _ICOM_THIS_From_IDataObject(DefaultHandler, iface); return IUnknown_QueryInterface(this->outerUnknown, riid, ppvObject); } /************************************************************************ * DefaultHandler_IDataObject_AddRef (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DefaultHandler_IDataObject_AddRef( IDataObject* iface) { _ICOM_THIS_From_IDataObject(DefaultHandler, iface); return IUnknown_AddRef(this->outerUnknown); } /************************************************************************ * DefaultHandler_IDataObject_Release (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DefaultHandler_IDataObject_Release( IDataObject* iface) { _ICOM_THIS_From_IDataObject(DefaultHandler, iface); return IUnknown_Release(this->outerUnknown); } /************************************************************************ * DefaultHandler_GetData * * Get Data from a source dataobject using format pformatetcIn->cfFormat * See Windows documentation for more details on GetData. * Default handler's implementation of this method delegates to the cache. */ static HRESULT WINAPI DefaultHandler_GetData( IDataObject* iface, LPFORMATETC pformatetcIn, STGMEDIUM* pmedium) { IDataObject* cacheDataObject = NULL; HRESULT hres; _ICOM_THIS_From_IDataObject(DefaultHandler, iface); TRACE("(%p, %p, %p)\n", iface, pformatetcIn, pmedium); hres = IUnknown_QueryInterface(this->dataCache, &IID_IDataObject, (void**)&cacheDataObject); if (FAILED(hres)) return E_UNEXPECTED; hres = IDataObject_GetData(cacheDataObject, pformatetcIn, pmedium); IDataObject_Release(cacheDataObject); return hres; } static HRESULT WINAPI DefaultHandler_GetDataHere( IDataObject* iface, LPFORMATETC pformatetc, STGMEDIUM* pmedium) { FIXME(": Stub\n"); return E_NOTIMPL; } /************************************************************************ * DefaultHandler_QueryGetData (IDataObject) * * The default handler's implementation of this method delegates to * the cache. * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI DefaultHandler_QueryGetData( IDataObject* iface, LPFORMATETC pformatetc) { IDataObject* cacheDataObject = NULL; HRESULT hres; _ICOM_THIS_From_IDataObject(DefaultHandler, iface); TRACE("(%p, %p)\n", iface, pformatetc); hres = IUnknown_QueryInterface(this->dataCache, &IID_IDataObject, (void**)&cacheDataObject); if (FAILED(hres)) return E_UNEXPECTED; hres = IDataObject_QueryGetData(cacheDataObject, pformatetc); IDataObject_Release(cacheDataObject); return hres; } /************************************************************************ * DefaultHandler_GetCanonicalFormatEtc (IDataObject) * * This method is meaningless if the server is not running * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI DefaultHandler_GetCanonicalFormatEtc( IDataObject* iface, LPFORMATETC pformatectIn, LPFORMATETC pformatetcOut) { FIXME("(%p, %p, %p)\n", iface, pformatectIn, pformatetcOut); return OLE_E_NOTRUNNING; } /************************************************************************ * DefaultHandler_SetData (IDataObject) * * The default handler's implementation of this method delegates to * the cache. * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI DefaultHandler_SetData( IDataObject* iface, LPFORMATETC pformatetc, STGMEDIUM* pmedium, BOOL fRelease) { IDataObject* cacheDataObject = NULL; HRESULT hres; _ICOM_THIS_From_IDataObject(DefaultHandler, iface); TRACE("(%p, %p, %p, %d)\n", iface, pformatetc, pmedium, fRelease); hres = IUnknown_QueryInterface(this->dataCache, &IID_IDataObject, (void**)&cacheDataObject); if (FAILED(hres)) return E_UNEXPECTED; hres = IDataObject_SetData(cacheDataObject, pformatetc, pmedium, fRelease); IDataObject_Release(cacheDataObject); return hres; } /************************************************************************ * DefaultHandler_EnumFormatEtc (IDataObject) * * The default handler's implementation of this method simply delegates * to OleRegEnumFormatEtc. * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI DefaultHandler_EnumFormatEtc( IDataObject* iface, DWORD dwDirection, IEnumFORMATETC** ppenumFormatEtc) { HRESULT hres; _ICOM_THIS_From_IDataObject(DefaultHandler, iface); TRACE("(%p, %lx, %p)\n", iface, dwDirection, ppenumFormatEtc); hres = OleRegEnumFormatEtc(&(this->clsid), dwDirection, ppenumFormatEtc); return hres; } /************************************************************************ * DefaultHandler_DAdvise (IDataObject) * * The default handler's implementation of this method simply * delegates to the DataAdviseHolder. * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI DefaultHandler_DAdvise( IDataObject* iface, FORMATETC* pformatetc, DWORD advf, IAdviseSink* pAdvSink, DWORD* pdwConnection) { HRESULT hres = S_OK; _ICOM_THIS_From_IDataObject(DefaultHandler, iface); TRACE("(%p, %p, %ld, %p, %p)\n", iface, pformatetc, advf, pAdvSink, pdwConnection); /* * Make sure we have a data advise holder before we start. */ if (this->dataAdviseHolder==NULL) { hres = CreateDataAdviseHolder(&this->dataAdviseHolder); } if (SUCCEEDED(hres)) { hres = IDataAdviseHolder_Advise(this->dataAdviseHolder, iface, pformatetc, advf, pAdvSink, pdwConnection); } return hres; } /************************************************************************ * DefaultHandler_DUnadvise (IDataObject) * * The default handler's implementation of this method simply * delegates to the DataAdviseHolder. * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI DefaultHandler_DUnadvise( IDataObject* iface, DWORD dwConnection) { _ICOM_THIS_From_IDataObject(DefaultHandler, iface); TRACE("(%p, %ld)\n", iface, dwConnection); /* * If we don't have a data advise holder yet, it means that * we don't have any connections.. */ if (this->dataAdviseHolder==NULL) { return OLE_E_NOCONNECTION; } return IDataAdviseHolder_Unadvise(this->dataAdviseHolder, dwConnection); } /************************************************************************ * DefaultHandler_EnumDAdvise (IDataObject) * * The default handler's implementation of this method simply * delegates to the DataAdviseHolder. * * See Windows documentation for more details on IDataObject methods. */ static HRESULT WINAPI DefaultHandler_EnumDAdvise( IDataObject* iface, IEnumSTATDATA** ppenumAdvise) { _ICOM_THIS_From_IDataObject(DefaultHandler, iface); TRACE("(%p, %p)\n", iface, ppenumAdvise); /* * Sanity check */ if (ppenumAdvise == NULL) return E_POINTER; /* * Initialize the out parameter. */ *ppenumAdvise = NULL; /* * If we have a data advise holder object, delegate. */ if (this->dataAdviseHolder!=NULL) { return IDataAdviseHolder_EnumAdvise(this->dataAdviseHolder, ppenumAdvise); } return S_OK; } /********************************************************* * Methods implementation for the IRunnableObject part * of the DefaultHandler class. */ /************************************************************************ * DefaultHandler_IRunnableObject_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static HRESULT WINAPI DefaultHandler_IRunnableObject_QueryInterface( IRunnableObject* iface, REFIID riid, void** ppvObject) { _ICOM_THIS_From_IRunnableObject(DefaultHandler, iface); return IUnknown_QueryInterface(this->outerUnknown, riid, ppvObject); } /************************************************************************ * DefaultHandler_IRunnableObject_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DefaultHandler_IRunnableObject_AddRef( IRunnableObject* iface) { _ICOM_THIS_From_IRunnableObject(DefaultHandler, iface); return IUnknown_AddRef(this->outerUnknown); } /************************************************************************ * DefaultHandler_IRunnableObject_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DefaultHandler_IRunnableObject_Release( IRunnableObject* iface) { _ICOM_THIS_From_IRunnableObject(DefaultHandler, iface); return IUnknown_Release(this->outerUnknown); } /************************************************************************ * DefaultHandler_GetRunningClass (IRunnableObject) * * According to Brockscmidt, Chapter 19, the default handler's * implementation of IRunnableobject does nothing until the object * is actually running. * * See Windows documentation for more details on IRunnableObject methods. */ static HRESULT WINAPI DefaultHandler_GetRunningClass( IRunnableObject* iface, LPCLSID lpClsid) { TRACE("()\n"); return S_OK; } static HRESULT WINAPI DefaultHandler_Run( IRunnableObject* iface, IBindCtx* pbc) { FIXME(": Stub\n"); return E_NOTIMPL; } /************************************************************************ * DefaultHandler_IsRunning (IRunnableObject) * * According to Brockscmidt, Chapter 19, the default handler's * implementation of IRunnableobject does nothing until the object * is actually running. * * See Windows documentation for more details on IRunnableObject methods. */ static BOOL WINAPI DefaultHandler_IsRunning( IRunnableObject* iface) { TRACE("()\n"); return S_FALSE; } /************************************************************************ * DefaultHandler_LockRunning (IRunnableObject) * * According to Brockscmidt, Chapter 19, the default handler's * implementation of IRunnableobject does nothing until the object * is actually running. * * See Windows documentation for more details on IRunnableObject methods. */ static HRESULT WINAPI DefaultHandler_LockRunning( IRunnableObject* iface, BOOL fLock, BOOL fLastUnlockCloses) { TRACE("()\n"); return S_OK; } /************************************************************************ * DefaultHandler_SetContainedObject (IRunnableObject) * * According to Brockscmidt, Chapter 19, the default handler's * implementation of IRunnableobject does nothing until the object * is actually running. * * See Windows documentation for more details on IRunnableObject methods. */ static HRESULT WINAPI DefaultHandler_SetContainedObject( IRunnableObject* iface, BOOL fContained) { TRACE("()\n"); return S_OK; } wine-20000526/dlls/ole32/errorinfo.c0100644000175000001440000000155607056022535016510 0ustar julliardusers/* * ErrorInfo API * * Copyright 2000 Patrik Stridvall * */ #include "debugtools.h" #include "oleauto.h" #include "windef.h" #include "winerror.h" DEFAULT_DEBUG_CHANNEL(ole) /*********************************************************************** * CreateErrorInfo */ HRESULT WINAPI CreateErrorInfo(ICreateErrorInfo **pperrinfo) { FIXME("(%p): stub:\n", pperrinfo); return S_OK; } /*********************************************************************** * GetErrorInfo */ HRESULT WINAPI GetErrorInfo(ULONG dwReserved, IErrorInfo **pperrinfo) { FIXME("(%ld, %p): stub:\n", dwReserved, pperrinfo); return S_OK; } /*********************************************************************** * SetErrorInfo */ HRESULT WINAPI SetErrorInfo(ULONG dwReserved, IErrorInfo *perrinfo) { FIXME("(%ld, %p): stub:\n", dwReserved, perrinfo); return S_OK; } wine-20000526/dlls/ole32/filemoniker.c0100644000175000001440000012522707061172233017006 0ustar julliardusers/*************************************************************************************** * FileMonikers implementation * * Copyright 1999 Noomen Hamza ***************************************************************************************/ #include #include "winbase.h" #include "winerror.h" #include "debugtools.h" #include "objbase.h" #include "wine/obj_storage.h" #include "wine/obj_moniker.h" #include "wine/obj_base.h" DEFAULT_DEBUG_CHANNEL(ole) /* filemoniker data structure */ typedef struct FileMonikerImpl{ ICOM_VTABLE(IMoniker)* lpvtbl1; /* VTable relative to the IMoniker interface.*/ /* The ROT (RunningObjectTable implementation) uses the IROTData interface to test whether * two monikers are equal. That's whay IROTData interface is implemented by monikers. */ ICOM_VTABLE(IROTData)* lpvtbl2; /* VTable relative to the IROTData interface.*/ ULONG ref; /* reference counter for this object */ LPOLESTR filePathName; /* path string identified by this filemoniker */ } FileMonikerImpl; /********************************************************************************/ /* FileMoniker prototype functions : */ /* IUnknown prototype functions */ static HRESULT WINAPI FileMonikerImpl_QueryInterface(IMoniker* iface,REFIID riid,void** ppvObject); static ULONG WINAPI FileMonikerImpl_AddRef(IMoniker* iface); static ULONG WINAPI FileMonikerImpl_Release(IMoniker* iface); /* IPersist prototype functions */ static HRESULT WINAPI FileMonikerImpl_GetClassID(IMoniker* iface, CLSID *pClassID); /* IPersistStream prototype functions */ static HRESULT WINAPI FileMonikerImpl_IsDirty(IMoniker* iface); static HRESULT WINAPI FileMonikerImpl_Load(IMoniker* iface, IStream* pStm); static HRESULT WINAPI FileMonikerImpl_Save(IMoniker* iface, IStream* pStm, BOOL fClearDirty); static HRESULT WINAPI FileMonikerImpl_GetSizeMax(IMoniker* iface, ULARGE_INTEGER* pcbSize); /* IMoniker prototype functions */ static HRESULT WINAPI FileMonikerImpl_BindToObject(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, REFIID riid, VOID** ppvResult); static HRESULT WINAPI FileMonikerImpl_BindToStorage(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, REFIID riid, VOID** ppvResult); static HRESULT WINAPI FileMonikerImpl_Reduce(IMoniker* iface,IBindCtx* pbc, DWORD dwReduceHowFar,IMoniker** ppmkToLeft, IMoniker** ppmkReduced); static HRESULT WINAPI FileMonikerImpl_ComposeWith(IMoniker* iface,IMoniker* pmkRight,BOOL fOnlyIfNotGeneric, IMoniker** ppmkComposite); static HRESULT WINAPI FileMonikerImpl_Enum(IMoniker* iface,BOOL fForward, IEnumMoniker** ppenumMoniker); static HRESULT WINAPI FileMonikerImpl_IsEqual(IMoniker* iface,IMoniker* pmkOtherMoniker); static HRESULT WINAPI FileMonikerImpl_Hash(IMoniker* iface,DWORD* pdwHash); static HRESULT WINAPI FileMonikerImpl_IsRunning(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, IMoniker* pmkNewlyRunning); static HRESULT WINAPI FileMonikerImpl_GetTimeOfLastChange(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, FILETIME* pFileTime); static HRESULT WINAPI FileMonikerImpl_Inverse(IMoniker* iface,IMoniker** ppmk); static HRESULT WINAPI FileMonikerImpl_CommonPrefixWith(IMoniker* iface,IMoniker* pmkOther, IMoniker** ppmkPrefix); static HRESULT WINAPI FileMonikerImpl_RelativePathTo(IMoniker* iface,IMoniker* pmOther, IMoniker** ppmkRelPath); static HRESULT WINAPI FileMonikerImpl_GetDisplayName(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, LPOLESTR *ppszDisplayName); static HRESULT WINAPI FileMonikerImpl_ParseDisplayName(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, LPOLESTR pszDisplayName, ULONG* pchEaten, IMoniker** ppmkOut); static HRESULT WINAPI FileMonikerImpl_IsSystemMoniker(IMoniker* iface,DWORD* pwdMksys); /********************************************************************************/ /* IROTData prototype functions */ /* IUnknown prototype functions */ static HRESULT WINAPI FileMonikerROTDataImpl_QueryInterface(IROTData* iface,REFIID riid,VOID** ppvObject); static ULONG WINAPI FileMonikerROTDataImpl_AddRef(IROTData* iface); static ULONG WINAPI FileMonikerROTDataImpl_Release(IROTData* iface); /* IROTData prototype function */ static HRESULT WINAPI FileMonikerROTDataImpl_GetComparaisonData(IROTData* iface,BYTE* pbData,ULONG cbMax,ULONG* pcbData); /* Local function used by filemoniker implementation */ HRESULT WINAPI FileMonikerImpl_Construct(FileMonikerImpl* iface, LPCOLESTR lpszPathName); HRESULT WINAPI FileMonikerImpl_Destroy(FileMonikerImpl* iface); int WINAPI FileMonikerImpl_DecomposePath(LPOLESTR str, LPOLESTR** tabStr); /********************************************************************************/ /* Virtual function table for the FileMonikerImpl class witch include Ipersist,*/ /* IPersistStream and IMoniker functions. */ static ICOM_VTABLE(IMoniker) VT_FileMonikerImpl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE FileMonikerImpl_QueryInterface, FileMonikerImpl_AddRef, FileMonikerImpl_Release, FileMonikerImpl_GetClassID, FileMonikerImpl_IsDirty, FileMonikerImpl_Load, FileMonikerImpl_Save, FileMonikerImpl_GetSizeMax, FileMonikerImpl_BindToObject, FileMonikerImpl_BindToStorage, FileMonikerImpl_Reduce, FileMonikerImpl_ComposeWith, FileMonikerImpl_Enum, FileMonikerImpl_IsEqual, FileMonikerImpl_Hash, FileMonikerImpl_IsRunning, FileMonikerImpl_GetTimeOfLastChange, FileMonikerImpl_Inverse, FileMonikerImpl_CommonPrefixWith, FileMonikerImpl_RelativePathTo, FileMonikerImpl_GetDisplayName, FileMonikerImpl_ParseDisplayName, FileMonikerImpl_IsSystemMoniker }; /********************************************************************************/ /* Virtual function table for the IROTData class. */ static ICOM_VTABLE(IROTData) VT_ROTDataImpl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE FileMonikerROTDataImpl_QueryInterface, FileMonikerROTDataImpl_AddRef, FileMonikerROTDataImpl_Release, FileMonikerROTDataImpl_GetComparaisonData }; /******************************************************************************* * FileMoniker_QueryInterface *******************************************************************************/ HRESULT WINAPI FileMonikerImpl_QueryInterface(IMoniker* iface,REFIID riid,void** ppvObject) { ICOM_THIS(FileMonikerImpl,iface); TRACE("(%p,%p,%p)\n",This,riid,ppvObject); /* Perform a sanity check on the parameters.*/ if ( (This==0) || (ppvObject==0) ) return E_INVALIDARG; /* Initialize the return parameter */ *ppvObject = 0; /* Compare the riid with the interface IDs implemented by this object.*/ if (IsEqualIID(&IID_IUnknown, riid) || IsEqualIID(&IID_IPersist, riid) || IsEqualIID(&IID_IPersistStream,riid) || IsEqualIID(&IID_IMoniker, riid) ) *ppvObject = iface; else if (IsEqualIID(&IID_IROTData, riid)) *ppvObject = (IROTData*)&(This->lpvtbl2); /* Check that we obtained an interface.*/ if ((*ppvObject)==0) return E_NOINTERFACE; /* Query Interface always increases the reference count by one when it is successful */ FileMonikerImpl_AddRef(iface); return S_OK; } /****************************************************************************** * FileMoniker_AddRef ******************************************************************************/ ULONG WINAPI FileMonikerImpl_AddRef(IMoniker* iface) { ICOM_THIS(FileMonikerImpl,iface); TRACE("(%p)\n",iface); return ++(This->ref); } /****************************************************************************** * FileMoniker_Release ******************************************************************************/ ULONG WINAPI FileMonikerImpl_Release(IMoniker* iface) { ICOM_THIS(FileMonikerImpl,iface); TRACE("(%p)\n",iface); This->ref--; /* destroy the object if there's no more reference on it */ if (This->ref==0){ FileMonikerImpl_Destroy(This); return 0; } return This->ref;; } /****************************************************************************** * FileMoniker_GetClassID ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_GetClassID(IMoniker* iface, CLSID *pClassID)/* Pointer to CLSID of object */ { TRACE("(%p,%p),stub!\n",iface,pClassID); if (pClassID==NULL) return E_POINTER; *pClassID = CLSID_FileMoniker; return S_OK; } /****************************************************************************** * FileMoniker_IsDirty ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_IsDirty(IMoniker* iface) { /* Note that the OLE-provided implementations of the IPersistStream::IsDirty method in the OLE-provided moniker interfaces always return S_FALSE because their internal state never changes. */ TRACE("(%p)\n",iface); return S_FALSE; } /****************************************************************************** * FileMoniker_Load ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_Load(IMoniker* iface,IStream* pStm) { HRESULT res; CHAR* filePathA; WCHAR* filePathW; ULONG bread; WORD wbuffer; DWORD dwbuffer,length,i,doubleLenHex,doubleLenDec; ICOM_THIS(FileMonikerImpl,iface); TRACE("(%p,%p)\n",iface,pStm); /* this function locate and read from the stream the filePath string writen by FileMonikerImpl_Save */ /* first WORD is non significative */ res=IStream_Read(pStm,&wbuffer,sizeof(WORD),&bread); if (bread!=sizeof(WORD) || wbuffer!=0) return E_FAIL; /* read filePath string length (plus one) */ res=IStream_Read(pStm,&length,sizeof(DWORD),&bread); if (bread != sizeof(DWORD)) return E_FAIL; /* read filePath string */ filePathA=HeapAlloc(GetProcessHeap(),0,length); res=IStream_Read(pStm,filePathA,length,&bread); if (bread != length) return E_FAIL; /* read the first constant */ IStream_Read(pStm,&dwbuffer,sizeof(DWORD),&bread); if (bread != sizeof(DWORD) || dwbuffer != 0xDEADFFFF) return E_FAIL; length--; for(i=0;i<10;i++){ res=IStream_Read(pStm,&wbuffer,sizeof(WORD),&bread); if (bread!=sizeof(WORD) || wbuffer!=0) return E_FAIL; } if (length>8) length=0; doubleLenHex=doubleLenDec=2*length; if (length > 5) doubleLenDec+=6; res=IStream_Read(pStm,&dwbuffer,sizeof(DWORD),&bread); if (bread!=sizeof(DWORD) || dwbuffer!=doubleLenDec) return E_FAIL; if (length==0) return res; res=IStream_Read(pStm,&dwbuffer,sizeof(DWORD),&bread); if (bread!=sizeof(DWORD) || dwbuffer!=doubleLenHex) return E_FAIL; res=IStream_Read(pStm,&wbuffer,sizeof(WORD),&bread); if (bread!=sizeof(WORD) || wbuffer!=0x3) return E_FAIL; filePathW=HeapAlloc(GetProcessHeap(),0,(length+1)*sizeof(WCHAR)); filePathW[length]=0; res=IStream_Read(pStm,filePathW,doubleLenHex,&bread); if (bread!=doubleLenHex) return E_FAIL; if (This->filePathName!=NULL) HeapFree(GetProcessHeap(),0,This->filePathName); This->filePathName=filePathW; HeapFree(GetProcessHeap(),0,filePathA); return res; } /****************************************************************************** * FileMoniker_Save ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_Save(IMoniker* iface, IStream* pStm,/* poniter to the stream where the object is to be saved */ BOOL fClearDirty)/* Specifies whether to clear the dirty flag */ { /* this function saves data of this object. In the begining I thougth that I have just to write * the filePath string on Stream. But, when I tested this function whith windows programs samples ! * I noted that it was not the case. So I analysed data writen by this function on Windows system and * what did this function do exactly ! but I have no idear a bout its logic ! * I guessed data who must be writen on stream wich is: * 1) WORD constant:zero 2) length of the path string ("\0" included) 3) path string type A * 4) DWORD constant : 0xDEADFFFF 5) ten WORD constant: zero 6) DWORD: double-length of the the path * string type W ("\0" not included) 7) WORD constant: 0x3 8) filePath unicode string. * if the length(filePath) > 8 or.length(filePath) == 8 stop at step 5) */ ICOM_THIS(FileMonikerImpl,iface); HRESULT res; LPOLESTR filePathW=This->filePathName; CHAR* filePathA; DWORD len=1+lstrlenW(filePathW); DWORD constant1 = 0xDEADFFFF; /* these constants are detected after analysing the data structure writen by */ WORD constant2 = 0x3; /* FileMoniker_Save function in a windows program system */ WORD zero=0; DWORD doubleLenHex; DWORD doubleLenDec; int i=0; TRACE("(%p,%p,%d)\n",iface,pStm,fClearDirty); if (pStm==NULL) return E_POINTER; /* write a DWORD seted to 0 : constant */ res=IStream_Write(pStm,&zero,sizeof(WORD),NULL); /* write length of filePath string ( "\0" included )*/ res=IStream_Write(pStm,&len,sizeof(DWORD),NULL); /* write filePath string type A */ filePathA=HeapAlloc(GetProcessHeap(),0,len); lstrcpyWtoA(filePathA,filePathW); res=IStream_Write(pStm,filePathA,len,NULL); HeapFree(GetProcessHeap(),0,filePathA); /* write a DWORD seted to 0xDEADFFFF: constant */ res=IStream_Write(pStm,&constant1,sizeof(DWORD),NULL); len--; /* write 10 times a DWORD seted to 0 : constants */ for(i=0;i<10;i++) res=IStream_Write(pStm,&zero,sizeof(WORD),NULL); if (len>8) len=0; doubleLenHex=doubleLenDec=2*len; if (len > 5) doubleLenDec+=6; /* write double-length of the path string ( "\0" included )*/ res=IStream_Write(pStm,&doubleLenDec,sizeof(DWORD),NULL); if (len==0) return res; /* write double-length (hexa representation) of the path string ( "\0" included ) */ res=IStream_Write(pStm,&doubleLenHex,sizeof(DWORD),NULL); /* write a WORD seted to 0x3: constant */ res=IStream_Write(pStm,&constant2,sizeof(WORD),NULL); /* write path unicode string */ res=IStream_Write(pStm,filePathW,doubleLenHex,NULL); return res; } /****************************************************************************** * FileMoniker_GetSizeMax ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_GetSizeMax(IMoniker* iface, ULARGE_INTEGER* pcbSize)/* Pointer to size of stream needed to save object */ { ICOM_THIS(FileMonikerImpl,iface); DWORD len=lstrlenW(This->filePathName); DWORD sizeMAx; TRACE("(%p,%p)\n",iface,pcbSize); if (pcbSize!=NULL) return E_POINTER; /* for more details see FileMonikerImpl_Save coments */ sizeMAx = sizeof(WORD) + /* first WORD is 0 */ sizeof(DWORD)+ /* length of filePath including "\0" in the end of the string */ (len+1)+ /* filePath string */ sizeof(DWORD)+ /* constant : 0xDEADFFFF */ 10*sizeof(WORD)+ /* 10 zero WORD */ sizeof(DWORD); /* size of the unicode filePath: "\0" not included */ if (len==0 || len > 8) return S_OK; sizeMAx += sizeof(DWORD)+ /* size of the unicode filePath: "\0" not included */ sizeof(WORD)+ /* constant : 0x3 */ len*sizeof(WCHAR); /* unicde filePath string */ pcbSize->s.LowPart=sizeMAx; pcbSize->s.HighPart=0; return S_OK; } /****************************************************************************** * FileMoniker_Construct (local function) *******************************************************************************/ HRESULT WINAPI FileMonikerImpl_Construct(FileMonikerImpl* This, LPCOLESTR lpszPathName) { int nb=0,i; int sizeStr=lstrlenW(lpszPathName); LPOLESTR *tabStr=0; WCHAR twoPoint[]={'.','.',0}; WCHAR bkSlash[]={'\\',0}; BYTE addBkSlash; TRACE("(%p,%p)\n",This,lpszPathName); /* Initialize the virtual fgunction table. */ This->lpvtbl1 = &VT_FileMonikerImpl; This->lpvtbl2 = &VT_ROTDataImpl; This->ref = 0; This->filePathName=HeapAlloc(GetProcessHeap(),0,sizeof(WCHAR)*(sizeStr+1)); if (This->filePathName==NULL) return E_OUTOFMEMORY; lstrcpyW(This->filePathName,lpszPathName); nb=FileMonikerImpl_DecomposePath(This->filePathName,&tabStr); if (nb > 0 ){ addBkSlash=1; if (lstrcmpW(tabStr[0],twoPoint)!=0) addBkSlash=0; else for(i=0;ifilePathName=HeapReAlloc(GetProcessHeap(),0,This->filePathName,(sizeStr+1)*sizeof(WCHAR)); *This->filePathName=0; for(i=0;tabStr[i]!=NULL;i++) lstrcatW(This->filePathName,tabStr[i]); if (addBkSlash) lstrcatW(This->filePathName,bkSlash); } for(i=0; tabStr[i]!=NULL;i++) CoTaskMemFree(tabStr[i]); CoTaskMemFree(tabStr); return S_OK; } /****************************************************************************** * FileMoniker_Destroy (local function) *******************************************************************************/ HRESULT WINAPI FileMonikerImpl_Destroy(FileMonikerImpl* This) { TRACE("(%p)\n",This); if (This->filePathName!=NULL) HeapFree(GetProcessHeap(),0,This->filePathName); HeapFree(GetProcessHeap(),0,This); return S_OK; } /****************************************************************************** * FileMoniker_BindToObject ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_BindToObject(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, REFIID riid, VOID** ppvResult) { HRESULT res=E_FAIL; CLSID clsID; IUnknown* pObj=0; IRunningObjectTable *prot=0; IPersistFile *ppf=0; IClassFactory *pcf=0; IClassActivator *pca=0; ICOM_THIS(FileMonikerImpl,iface); *ppvResult=0; TRACE("(%p,%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,riid,ppvResult); if(pmkToLeft==NULL){ res=IBindCtx_GetRunningObjectTable(pbc,&prot); if (SUCCEEDED(res)){ /* if the requested class was loaded befor ! we dont need to reload it */ res = IRunningObjectTable_GetObject(prot,iface,&pObj); if (res==S_FALSE){ /* first activation of this class */ res=GetClassFile(This->filePathName,&clsID); if (SUCCEEDED(res)){ res=CoCreateInstance(&clsID,NULL,CLSCTX_ALL,&IID_IPersistFile,(void**)&ppf); if (SUCCEEDED(res)){ res=IPersistFile_Load(ppf,This->filePathName,STGM_READ); if (SUCCEEDED(res)){ pObj=(IUnknown*)ppf; IUnknown_AddRef(pObj); } } } } } } else{ res=IMoniker_BindToObject(pmkToLeft,pbc,NULL,&IID_IClassFactory,(void**)&pcf); if (res==E_NOINTERFACE){ res=IMoniker_BindToObject(pmkToLeft,pbc,NULL,&IID_IClassActivator,(void**)&pca); if (res==E_NOINTERFACE) return MK_E_INTERMEDIATEINTERFACENOTSUPPORTED; } if (pcf!=NULL){ IClassFactory_CreateInstance(pcf,NULL,&IID_IPersistFile,(void**)ppf); res=IPersistFile_Load(ppf,This->filePathName,STGM_READ); if (SUCCEEDED(res)){ pObj=(IUnknown*)ppf; IUnknown_AddRef(pObj); } } if (pca!=NULL){ FIXME("()"); /*res=GetClassFile(This->filePathName,&clsID); if (SUCCEEDED(res)){ res=IClassActivator_GetClassObject(pca,&clsID,CLSCTX_ALL,0,&IID_IPersistFile,(void**)&ppf); if (SUCCEEDED(res)){ pObj=(IUnknown*)ppf; IUnknown_AddRef(pObj); } }*/ } } if (pObj!=NULL){ /* get the requested interface from the loaded class */ res= IUnknown_QueryInterface(pObj,riid,ppvResult); IBindCtx_RegisterObjectBound(pbc,(IUnknown*)*ppvResult); IUnknown_Release(pObj); } if (prot!=NULL) IRunningObjectTable_Release(prot); if (ppf!=NULL) IPersistFile_Release(ppf); if (pca!=NULL) IClassActivator_Release(pca); if (pcf!=NULL) IClassFactory_Release(pcf); return res; } /****************************************************************************** * FileMoniker_BindToStorage ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_BindToStorage(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, REFIID riid, VOID** ppvObject) { LPOLESTR filePath=0; IStorage *pstg=0; HRESULT res; TRACE("(%p,%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,riid,ppvObject); if (pmkToLeft==NULL){ if (IsEqualIID(&IID_IStorage, riid)){ /* get the file name */ FileMonikerImpl_GetDisplayName(iface,pbc,pmkToLeft,&filePath); /* verifie if the file contains a storage object */ res=StgIsStorageFile(filePath); if(res==S_OK){ res=StgOpenStorage(filePath,NULL,STGM_READWRITE|STGM_SHARE_DENY_WRITE,NULL,0,&pstg); if (SUCCEEDED(res)){ *ppvObject=pstg; IStorage_AddRef(pstg); return res; } } CoTaskMemFree(filePath); } else if ( (IsEqualIID(&IID_IStream, riid)) || (IsEqualIID(&IID_ILockBytes, riid)) ) return E_UNSPEC; else return E_NOINTERFACE; } else { FIXME("(%p,%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,riid,ppvObject); return E_NOTIMPL; } return res; } /****************************************************************************** * FileMoniker_Reduce ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_Reduce(IMoniker* iface, IBindCtx* pbc, DWORD dwReduceHowFar, IMoniker** ppmkToLeft, IMoniker** ppmkReduced) { TRACE("(%p,%p,%ld,%p,%p)\n",iface,pbc,dwReduceHowFar,ppmkToLeft,ppmkReduced); if (ppmkReduced==NULL) return E_POINTER; FileMonikerImpl_AddRef(iface); *ppmkReduced=iface; return MK_S_REDUCED_TO_SELF; } /****************************************************************************** * FileMoniker_ComposeWith ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_ComposeWith(IMoniker* iface, IMoniker* pmkRight, BOOL fOnlyIfNotGeneric, IMoniker** ppmkComposite) { HRESULT res; LPOLESTR str1=0,str2=0,*strDec1=0,*strDec2=0,newStr=0; WCHAR twoPoint[]={'.','.',0}; WCHAR bkSlash[]={'\\',0}; IBindCtx *bind=0; int i=0,j=0,lastIdx1=0,lastIdx2=0; DWORD mkSys; TRACE("(%p,%p,%d,%p)\n",iface,pmkRight,fOnlyIfNotGeneric,ppmkComposite); if (ppmkComposite==NULL) return E_POINTER; if (pmkRight==NULL) return E_INVALIDARG; *ppmkComposite=0; IMoniker_IsSystemMoniker(pmkRight,&mkSys); /* check if we have two filemonikers to compose or not */ if(mkSys==MKSYS_FILEMONIKER){ CreateBindCtx(0,&bind); FileMonikerImpl_GetDisplayName(iface,bind,NULL,&str1); IMoniker_GetDisplayName(pmkRight,bind,NULL,&str2); /* decompose pathnames of the two monikers : (to prepare the path merge operation ) */ lastIdx1=FileMonikerImpl_DecomposePath(str1,&strDec1)-1; lastIdx2=FileMonikerImpl_DecomposePath(str2,&strDec2)-1; if ((lastIdx1==-1 && lastIdx2>-1)||(lastIdx1==1 && lstrcmpW(strDec1[0],twoPoint)==0)) return MK_E_SYNTAX; if(lstrcmpW(strDec1[lastIdx1],bkSlash)==0) lastIdx1--; /* for etch "..\" in the left of str2 remove the right element from str1 */ for(i=0; ( (lastIdx1>=0) && (strDec2[i]!=NULL) && (lstrcmpW(strDec2[i],twoPoint)==0) ) ;i+=2){ lastIdx1-=2; } /* the length of the composed path string is raised by the sum of the two paths lengths */ newStr=HeapAlloc(GetProcessHeap(),0,sizeof(WCHAR)*(lstrlenW(str1)+lstrlenW(str2)+1)); if (newStr==NULL) return E_OUTOFMEMORY; /* new path is the concatenation of the rest of str1 and str2 */ for(*newStr=0,j=0;j<=lastIdx1;j++) lstrcatW(newStr,strDec1[j]); if ((strDec2[i]==NULL && lastIdx1>-1 && lastIdx2>-1) || lstrcmpW(strDec2[i],bkSlash)!=0) lstrcatW(newStr,bkSlash); for(j=i;j<=lastIdx2;j++) lstrcatW(newStr,strDec2[j]); /* create a new moniker with the new string */ res=CreateFileMoniker(newStr,ppmkComposite); /* free all strings space memory used by this function */ HeapFree(GetProcessHeap(),0,newStr); for(i=0; strDec1[i]!=NULL;i++) CoTaskMemFree(strDec1[i]); for(i=0; strDec2[i]!=NULL;i++) CoTaskMemFree(strDec2[i]); CoTaskMemFree(strDec1); CoTaskMemFree(strDec2); CoTaskMemFree(str1); CoTaskMemFree(str2); return res; } else if(mkSys==MKSYS_ANTIMONIKER){ *ppmkComposite=NULL; return S_OK; } else if (fOnlyIfNotGeneric){ *ppmkComposite=NULL; return MK_E_NEEDGENERIC; } else return CreateGenericComposite(iface,pmkRight,ppmkComposite); } /****************************************************************************** * FileMoniker_Enum ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_Enum(IMoniker* iface,BOOL fForward, IEnumMoniker** ppenumMoniker) { TRACE("(%p,%d,%p)\n",iface,fForward,ppenumMoniker); if (ppenumMoniker == NULL) return E_POINTER; *ppenumMoniker = NULL; return S_OK; } /****************************************************************************** * FileMoniker_IsEqual ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_IsEqual(IMoniker* iface,IMoniker* pmkOtherMoniker) { ICOM_THIS(FileMonikerImpl,iface); CLSID clsid; LPOLESTR filePath; IBindCtx* bind; HRESULT res; TRACE("(%p,%p)\n",iface,pmkOtherMoniker); if (pmkOtherMoniker==NULL) return S_FALSE; IMoniker_GetClassID(pmkOtherMoniker,&clsid); if (!IsEqualCLSID(&clsid,&CLSID_FileMoniker)) return S_FALSE; res=CreateBindCtx(0,&bind); if (FAILED(res)) return res; IMoniker_GetDisplayName(pmkOtherMoniker,bind,NULL,&filePath); if (lstrcmpiW(filePath, This->filePathName)!=0) return S_FALSE; return S_OK; } /****************************************************************************** * FileMoniker_Hash ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_Hash(IMoniker* iface,DWORD* pdwHash) { ICOM_THIS(FileMonikerImpl,iface); int h = 0,i,skip,len; int off = 0; LPOLESTR val; if (pdwHash==NULL) return E_POINTER; val = This->filePathName; len = lstrlenW(val); if (len < 16) { for (i = len ; i > 0; i--) { h = (h * 37) + val[off++]; } } else { /* only sample some characters */ skip = len / 8; for (i = len ; i > 0; i -= skip, off += skip) { h = (h * 39) + val[off]; } } *pdwHash=h; return S_OK; } /****************************************************************************** * FileMoniker_IsRunning ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_IsRunning(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, IMoniker* pmkNewlyRunning) { IRunningObjectTable* rot; HRESULT res; TRACE("(%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,pmkNewlyRunning); if ( (pmkNewlyRunning!=NULL) && (IMoniker_IsEqual(pmkNewlyRunning,iface)==S_OK) ) return S_OK; if (pbc==NULL) return E_POINTER; res=IBindCtx_GetRunningObjectTable(pbc,&rot); if (FAILED(res)) return res; res = IRunningObjectTable_IsRunning(rot,iface); IRunningObjectTable_Release(rot); return res; } /****************************************************************************** * FileMoniker_GetTimeOfLastChange ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_GetTimeOfLastChange(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, FILETIME* pFileTime) { ICOM_THIS(FileMonikerImpl,iface); IRunningObjectTable* rot; HRESULT res; WIN32_FILE_ATTRIBUTE_DATA info; TRACE("(%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,pFileTime); if (pFileTime==NULL) return E_POINTER; if (pmkToLeft!=NULL) return E_INVALIDARG; res=IBindCtx_GetRunningObjectTable(pbc,&rot); if (FAILED(res)) return res; res= IRunningObjectTable_GetTimeOfLastChange(rot,iface,pFileTime); if (FAILED(res)){ /* the moniker is not registred */ if (!GetFileAttributesExW(This->filePathName,GetFileExInfoStandard,&info)) return MK_E_NOOBJECT; *pFileTime=info.ftLastWriteTime; } return S_OK; } /****************************************************************************** * FileMoniker_Inverse ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_Inverse(IMoniker* iface,IMoniker** ppmk) { TRACE("(%p,%p)\n",iface,ppmk); return CreateAntiMoniker(ppmk); } /****************************************************************************** * FileMoniker_CommonPrefixWith ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_CommonPrefixWith(IMoniker* iface,IMoniker* pmkOther,IMoniker** ppmkPrefix) { LPOLESTR pathThis,pathOther,*stringTable1,*stringTable2,commonPath; IBindCtx *pbind; DWORD mkSys; ULONG nb1,nb2,i,sameIdx; BOOL machimeNameCase=FALSE; if (ppmkPrefix==NULL) return E_POINTER; if (pmkOther==NULL) return E_INVALIDARG; *ppmkPrefix=0; /* check if we have the same type of moniker */ IMoniker_IsSystemMoniker(pmkOther,&mkSys); if(mkSys==MKSYS_FILEMONIKER){ CreateBindCtx(0,&pbind); /* create a string based on common part of the two paths */ IMoniker_GetDisplayName(iface,pbind,NULL,&pathThis); IMoniker_GetDisplayName(pmkOther,pbind,NULL,&pathOther); nb1=FileMonikerImpl_DecomposePath(pathThis,&stringTable1); nb2=FileMonikerImpl_DecomposePath(pathOther,&stringTable2); if (nb1==0 || nb2==0) return MK_E_NOPREFIX; commonPath=HeapAlloc(GetProcessHeap(),0,sizeof(WCHAR)*(min(lstrlenW(pathThis),lstrlenW(pathOther))+1)); *commonPath=0; for(sameIdx=0; ( (stringTable1[sameIdx]!=NULL) && (stringTable2[sameIdx]!=NULL) && (lstrcmpiW(stringTable1[sameIdx],stringTable2[sameIdx])==0)); sameIdx++); if (sameIdx > 1 && *stringTable1[0]=='\\' && *stringTable2[1]=='\\'){ machimeNameCase=TRUE; for(i=2;i 3 || nb2 > 3) ) return MK_E_NOPREFIX; for(i=0;i0 && !(len1==1 && len2==1 && sameIdx==0)) for(j=sameIdx;(tabStr1[j] != NULL); j++) if (*tabStr1[j]!='\\') lstrcatW(relPath,back); /* add items of the second path (similar items with the first path are not included) to the relativePath */ for(j=sameIdx;tabStr2[j]!=NULL;j++) lstrcatW(relPath,tabStr2[j]); res=CreateFileMoniker(relPath,ppmkRelPath); for(j=0; tabStr1[j]!=NULL;j++) CoTaskMemFree(tabStr1[j]); for(j=0; tabStr2[j]!=NULL;j++) CoTaskMemFree(tabStr2[j]); CoTaskMemFree(tabStr1); CoTaskMemFree(tabStr2); CoTaskMemFree(str1); CoTaskMemFree(str2); HeapFree(GetProcessHeap(),0,relPath); if (len1==0 || len2==0 || (len1==1 && len2==1 && sameIdx==0)) return MK_S_HIM; return res; } /****************************************************************************** * FileMoniker_GetDisplayName ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_GetDisplayName(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, LPOLESTR *ppszDisplayName) { ICOM_THIS(FileMonikerImpl,iface); int len=lstrlenW(This->filePathName); TRACE("(%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,ppszDisplayName); if (ppszDisplayName==NULL) return E_POINTER; if (pmkToLeft!=NULL) return E_INVALIDARG; *ppszDisplayName=CoTaskMemAlloc(sizeof(WCHAR)*(len+1)); if (*ppszDisplayName==NULL) return E_OUTOFMEMORY; lstrcpyW(*ppszDisplayName,This->filePathName); return S_OK; } /****************************************************************************** * FileMoniker_ParseDisplayName ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_ParseDisplayName(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, LPOLESTR pszDisplayName, ULONG* pchEaten, IMoniker** ppmkOut) { FIXME("(%p,%p,%p,%p,%p,%p),stub!\n",iface,pbc,pmkToLeft,pszDisplayName,pchEaten,ppmkOut); return E_NOTIMPL; } /****************************************************************************** * FileMoniker_IsSystemMonker ******************************************************************************/ HRESULT WINAPI FileMonikerImpl_IsSystemMoniker(IMoniker* iface,DWORD* pwdMksys) { TRACE("(%p,%p)\n",iface,pwdMksys); if (!pwdMksys) return E_POINTER; (*pwdMksys)=MKSYS_FILEMONIKER; return S_OK; } /******************************************************************************* * FileMonikerIROTData_QueryInterface *******************************************************************************/ HRESULT WINAPI FileMonikerROTDataImpl_QueryInterface(IROTData *iface,REFIID riid,VOID** ppvObject) { ICOM_THIS_From_IROTData(IMoniker, iface); TRACE("(%p,%p,%p)\n",This,riid,ppvObject); return FileMonikerImpl_QueryInterface(This, riid, ppvObject); } /*********************************************************************** * FileMonikerIROTData_AddRef */ ULONG WINAPI FileMonikerROTDataImpl_AddRef(IROTData *iface) { ICOM_THIS_From_IROTData(IMoniker, iface); TRACE("(%p)\n",This); return FileMonikerImpl_AddRef(This); } /*********************************************************************** * FileMonikerIROTData_Release */ ULONG WINAPI FileMonikerROTDataImpl_Release(IROTData* iface) { ICOM_THIS_From_IROTData(IMoniker, iface); TRACE("(%p)\n",This); return FileMonikerImpl_Release(This); } /****************************************************************************** * FileMonikerIROTData_GetComparaisonData ******************************************************************************/ HRESULT WINAPI FileMonikerROTDataImpl_GetComparaisonData(IROTData* iface, BYTE* pbData, ULONG cbMax, ULONG* pcbData) { FIXME("(),stub!\n"); return E_NOTIMPL; } /****************************************************************************** * CreateFileMoniker16 ******************************************************************************/ HRESULT WINAPI CreateFileMoniker16(LPCOLESTR16 lpszPathName,LPMONIKER* ppmk) { FIXME("(%s,%p),stub!\n",lpszPathName,ppmk); return E_NOTIMPL; } /****************************************************************************** * CreateFileMoniker ******************************************************************************/ HRESULT WINAPI CreateFileMoniker(LPCOLESTR lpszPathName, LPMONIKER * ppmk) { FileMonikerImpl* newFileMoniker = 0; HRESULT hr = E_FAIL; IID riid=IID_IMoniker; TRACE("(%p,%p)\n",lpszPathName,ppmk); if (ppmk==NULL) return E_POINTER; if(lpszPathName==NULL) return MK_E_SYNTAX; *ppmk=0; newFileMoniker = HeapAlloc(GetProcessHeap(), 0, sizeof(FileMonikerImpl)); if (newFileMoniker == 0) return E_OUTOFMEMORY; hr = FileMonikerImpl_Construct(newFileMoniker,lpszPathName); if (SUCCEEDED(hr)) hr = FileMonikerImpl_QueryInterface((IMoniker*)newFileMoniker,&riid,(void**)ppmk); else HeapFree(GetProcessHeap(),0,newFileMoniker); return hr; } wine-20000526/dlls/ole32/hglobalstream.c0100644000175000001440000004774307067231504017337 0ustar julliardusers/* * HGLOBAL Stream implementation * * This file contains the implementation of the stream interface * for streams contained supported by an HGLOBAL pointer. * * Copyright 1999 Francis Beaudet */ #include #include #include #include #include "winbase.h" #include "winerror.h" #include "debugtools.h" #include "objbase.h" DEFAULT_DEBUG_CHANNEL(storage) /**************************************************************************** * HGLOBALStreamImpl definition. * * This class imlements the IStream inteface and represents a stream * supported by an HGLOBAL pointer. */ struct HGLOBALStreamImpl { ICOM_VFIELD(IStream); /* Needs to be the first item in the stuct * since we want to cast this in a IStream pointer */ /* * Reference count */ ULONG ref; /* * Support for the stream */ HGLOBAL supportHandle; /* * This flag is TRUE if the HGLOBAL is destroyed when the stream * is finally released. */ BOOL deleteOnRelease; /* * Helper variable that contains the size of the stream */ ULARGE_INTEGER streamSize; /* * This is the current position of the cursor in the stream */ ULARGE_INTEGER currentPosition; }; typedef struct HGLOBALStreamImpl HGLOBALStreamImpl; /* * Method definition for the StgStreamImpl class. */ HGLOBALStreamImpl* HGLOBALStreamImpl_Construct( HGLOBAL hGlobal, BOOL fDeleteOnRelease); void HGLOBALStreamImpl_Destroy( HGLOBALStreamImpl* This); void HGLOBALStreamImpl_OpenBlockChain( HGLOBALStreamImpl* This); HRESULT WINAPI HGLOBALStreamImpl_QueryInterface( IStream* iface, REFIID riid, /* [in] */ void** ppvObject); /* [iid_is][out] */ ULONG WINAPI HGLOBALStreamImpl_AddRef( IStream* iface); ULONG WINAPI HGLOBALStreamImpl_Release( IStream* iface); HRESULT WINAPI HGLOBALStreamImpl_Read( IStream* iface, void* pv, /* [length_is][size_is][out] */ ULONG cb, /* [in] */ ULONG* pcbRead); /* [out] */ HRESULT WINAPI HGLOBALStreamImpl_Write( IStream* iface, const void* pv, /* [size_is][in] */ ULONG cb, /* [in] */ ULONG* pcbWritten); /* [out] */ HRESULT WINAPI HGLOBALStreamImpl_Seek( IStream* iface, LARGE_INTEGER dlibMove, /* [in] */ DWORD dwOrigin, /* [in] */ ULARGE_INTEGER* plibNewPosition); /* [out] */ HRESULT WINAPI HGLOBALStreamImpl_SetSize( IStream* iface, ULARGE_INTEGER libNewSize); /* [in] */ HRESULT WINAPI HGLOBALStreamImpl_CopyTo( IStream* iface, IStream* pstm, /* [unique][in] */ ULARGE_INTEGER cb, /* [in] */ ULARGE_INTEGER* pcbRead, /* [out] */ ULARGE_INTEGER* pcbWritten); /* [out] */ HRESULT WINAPI HGLOBALStreamImpl_Commit( IStream* iface, DWORD grfCommitFlags); /* [in] */ HRESULT WINAPI HGLOBALStreamImpl_Revert( IStream* iface); HRESULT WINAPI HGLOBALStreamImpl_LockRegion( IStream* iface, ULARGE_INTEGER libOffset, /* [in] */ ULARGE_INTEGER cb, /* [in] */ DWORD dwLockType); /* [in] */ HRESULT WINAPI HGLOBALStreamImpl_UnlockRegion( IStream* iface, ULARGE_INTEGER libOffset, /* [in] */ ULARGE_INTEGER cb, /* [in] */ DWORD dwLockType); /* [in] */ HRESULT WINAPI HGLOBALStreamImpl_Stat( IStream* iface, STATSTG* pstatstg, /* [out] */ DWORD grfStatFlag); /* [in] */ HRESULT WINAPI HGLOBALStreamImpl_Clone( IStream* iface, IStream** ppstm); /* [out] */ /* * Virtual function table for the HGLOBALStreamImpl class. */ static ICOM_VTABLE(IStream) HGLOBALStreamImpl_Vtbl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE HGLOBALStreamImpl_QueryInterface, HGLOBALStreamImpl_AddRef, HGLOBALStreamImpl_Release, HGLOBALStreamImpl_Read, HGLOBALStreamImpl_Write, HGLOBALStreamImpl_Seek, HGLOBALStreamImpl_SetSize, HGLOBALStreamImpl_CopyTo, HGLOBALStreamImpl_Commit, HGLOBALStreamImpl_Revert, HGLOBALStreamImpl_LockRegion, HGLOBALStreamImpl_UnlockRegion, HGLOBALStreamImpl_Stat, HGLOBALStreamImpl_Clone }; /*********************************************************************** * CreateStreamOnHGlobal [OLE32.61] */ HRESULT WINAPI CreateStreamOnHGlobal( HGLOBAL hGlobal, BOOL fDeleteOnRelease, LPSTREAM* ppstm) { HGLOBALStreamImpl* newStream; newStream = HGLOBALStreamImpl_Construct(hGlobal, fDeleteOnRelease); if (newStream!=NULL) { return IUnknown_QueryInterface((IUnknown*)newStream, &IID_IStream, (void**)ppstm); } return E_OUTOFMEMORY; } /*********************************************************************** * GetHGlobalFromStream [OLE32.71] */ HRESULT WINAPI GetHGlobalFromStream(IStream* pstm, HGLOBAL* phglobal) { HGLOBALStreamImpl* pStream; if (pstm == NULL) return E_INVALIDARG; pStream = (HGLOBALStreamImpl*) pstm; /* * Verify that the stream object was created with CreateStreamOnHGlobal. */ if (ICOM_VTBL(pStream) == &HGLOBALStreamImpl_Vtbl) *phglobal = pStream->supportHandle; else { *phglobal = 0; return E_INVALIDARG; } return S_OK; } /****************************************************************************** ** HGLOBALStreamImpl implementation */ /*** * This is the constructor for the HGLOBALStreamImpl class. * * Params: * hGlobal - Handle that will support the stream. can be NULL. * fDeleteOnRelease - Flag set to TRUE if the HGLOBAL will be released * when the IStream object is destroyed. */ HGLOBALStreamImpl* HGLOBALStreamImpl_Construct( HGLOBAL hGlobal, BOOL fDeleteOnRelease) { HGLOBALStreamImpl* newStream; newStream = HeapAlloc(GetProcessHeap(), 0, sizeof(HGLOBALStreamImpl)); if (newStream!=0) { /* * Set-up the virtual function table and reference count. */ ICOM_VTBL(newStream) = &HGLOBALStreamImpl_Vtbl; newStream->ref = 0; /* * Initialize the support. */ newStream->supportHandle = hGlobal; newStream->deleteOnRelease = fDeleteOnRelease; /* * This method will allocate a handle if one is not supplied. */ if (newStream->supportHandle == NULL) { newStream->supportHandle = GlobalAlloc(GMEM_MOVEABLE | GMEM_NODISCARD, 0); } /* * Start the stream at the begining. */ newStream->currentPosition.s.HighPart = 0; newStream->currentPosition.s.LowPart = 0; /* * Initialize the size of the stream to the size of the handle. */ newStream->streamSize.s.HighPart = 0; newStream->streamSize.s.LowPart = GlobalSize(newStream->supportHandle); } return newStream; } /*** * This is the destructor of the HGLOBALStreamImpl class. * * This method will clean-up all the resources used-up by the given HGLOBALStreamImpl * class. The pointer passed-in to this function will be freed and will not * be valid anymore. */ void HGLOBALStreamImpl_Destroy(HGLOBALStreamImpl* This) { TRACE("(%p)\n", This); /* * Release the HGlobal if the constructor asked for that. */ if (This->deleteOnRelease) { GlobalFree(This->supportHandle); This->supportHandle=0; } /* * Finally, free the memory used-up by the class. */ HeapFree(GetProcessHeap(), 0, This); } /*** * This implements the IUnknown method QueryInterface for this * class */ HRESULT WINAPI HGLOBALStreamImpl_QueryInterface( IStream* iface, REFIID riid, /* [in] */ void** ppvObject) /* [iid_is][out] */ { HGLOBALStreamImpl* const This=(HGLOBALStreamImpl*)iface; /* * Perform a sanity check on the parameters. */ if (ppvObject==0) return E_INVALIDARG; /* * Initialize the return parameter. */ *ppvObject = 0; /* * Compare the riid with the interface IDs implemented by this object. */ if (memcmp(&IID_IUnknown, riid, sizeof(IID_IUnknown)) == 0) { *ppvObject = (IStream*)This; } else if (memcmp(&IID_IStream, riid, sizeof(IID_IStream)) == 0) { *ppvObject = (IStream*)This; } /* * Check that we obtained an interface. */ if ((*ppvObject)==0) return E_NOINTERFACE; /* * Query Interface always increases the reference count by one when it is * successful */ HGLOBALStreamImpl_AddRef(iface); return S_OK;; } /*** * This implements the IUnknown method AddRef for this * class */ ULONG WINAPI HGLOBALStreamImpl_AddRef( IStream* iface) { HGLOBALStreamImpl* const This=(HGLOBALStreamImpl*)iface; This->ref++; return This->ref; } /*** * This implements the IUnknown method Release for this * class */ ULONG WINAPI HGLOBALStreamImpl_Release( IStream* iface) { HGLOBALStreamImpl* const This=(HGLOBALStreamImpl*)iface; ULONG newRef; This->ref--; newRef = This->ref; /* * If the reference count goes down to 0, perform suicide. */ if (newRef==0) { HGLOBALStreamImpl_Destroy(This); } return newRef; } /*** * This method is part of the ISequentialStream interface. * * If reads a block of information from the stream at the current * position. It then moves the current position at the end of the * read block * * See the documentation of ISequentialStream for more info. */ HRESULT WINAPI HGLOBALStreamImpl_Read( IStream* iface, void* pv, /* [length_is][size_is][out] */ ULONG cb, /* [in] */ ULONG* pcbRead) /* [out] */ { HGLOBALStreamImpl* const This=(HGLOBALStreamImpl*)iface; void* supportBuffer; ULONG bytesReadBuffer; ULONG bytesToReadFromBuffer; TRACE("(%p, %p, %ld, %p)\n", iface, pv, cb, pcbRead); /* * If the caller is not interested in the nubmer of bytes read, * we use another buffer to avoid "if" statements in the code. */ if (pcbRead==0) pcbRead = &bytesReadBuffer; /* * Using the known size of the stream, calculate the number of bytes * to read from the block chain */ bytesToReadFromBuffer = min( This->streamSize.s.LowPart - This->currentPosition.s.LowPart, cb); /* * Lock the buffer in position and copy the data. */ supportBuffer = GlobalLock(This->supportHandle); memcpy(pv, (char *) supportBuffer+This->currentPosition.s.LowPart, bytesToReadFromBuffer); /* * Move the current position to the new position */ This->currentPosition.s.LowPart+=bytesToReadFromBuffer; /* * Return the number of bytes read. */ *pcbRead = bytesToReadFromBuffer; /* * Cleanup */ GlobalUnlock(This->supportHandle); /* * The function returns S_OK if the buffer was filled completely * it returns S_FALSE if the end of the stream is reached before the * buffer is filled */ if(*pcbRead == cb) return S_OK; return S_FALSE; } /*** * This method is part of the ISequentialStream interface. * * It writes a block of information to the stream at the current * position. It then moves the current position at the end of the * written block. If the stream is too small to fit the block, * the stream is grown to fit. * * See the documentation of ISequentialStream for more info. */ HRESULT WINAPI HGLOBALStreamImpl_Write( IStream* iface, const void* pv, /* [size_is][in] */ ULONG cb, /* [in] */ ULONG* pcbWritten) /* [out] */ { HGLOBALStreamImpl* const This=(HGLOBALStreamImpl*)iface; void* supportBuffer; ULARGE_INTEGER newSize; ULONG bytesWritten = 0; TRACE("(%p, %p, %ld, %p)\n", iface, pv, cb, pcbWritten); /* * If the caller is not interested in the number of bytes written, * we use another buffer to avoid "if" statements in the code. */ if (pcbWritten == 0) pcbWritten = &bytesWritten; if (cb == 0) { return S_OK; } else { newSize.s.HighPart = 0; newSize.s.LowPart = This->currentPosition.s.LowPart + cb; } /* * Verify if we need to grow the stream */ if (newSize.s.LowPart > This->streamSize.s.LowPart) { /* grow stream */ IStream_SetSize(iface, newSize); } /* * Lock the buffer in position and copy the data. */ supportBuffer = GlobalLock(This->supportHandle); memcpy((char *) supportBuffer+This->currentPosition.s.LowPart, pv, cb); /* * Move the current position to the new position */ This->currentPosition.s.LowPart+=cb; /* * Return the number of bytes read. */ *pcbWritten = cb; /* * Cleanup */ GlobalUnlock(This->supportHandle); return S_OK; } /*** * This method is part of the IStream interface. * * It will move the current stream pointer according to the parameters * given. * * See the documentation of IStream for more info. */ HRESULT WINAPI HGLOBALStreamImpl_Seek( IStream* iface, LARGE_INTEGER dlibMove, /* [in] */ DWORD dwOrigin, /* [in] */ ULARGE_INTEGER* plibNewPosition) /* [out] */ { HGLOBALStreamImpl* const This=(HGLOBALStreamImpl*)iface; ULARGE_INTEGER newPosition; TRACE("(%p, %ld, %ld, %p)\n", iface, dlibMove.s.LowPart, dwOrigin, plibNewPosition); /* * The caller is allowed to pass in NULL as the new position return value. * If it happens, we assign it to a dynamic variable to avoid special cases * in the code below. */ if (plibNewPosition == 0) { plibNewPosition = &newPosition; } /* * The file pointer is moved depending on the given "function" * parameter. */ switch (dwOrigin) { case STREAM_SEEK_SET: plibNewPosition->s.HighPart = 0; plibNewPosition->s.LowPart = 0; break; case STREAM_SEEK_CUR: *plibNewPosition = This->currentPosition; break; case STREAM_SEEK_END: *plibNewPosition = This->streamSize; break; default: return STG_E_INVALIDFUNCTION; } /* * We don't support files with offsets of 64 bits. */ assert(dlibMove.s.HighPart == 0); /* * Check if we end-up before the beginning of the file. That should trigger an * error. */ if ( (dlibMove.s.LowPart<0) && (plibNewPosition->s.LowPart < (ULONG)(-dlibMove.s.LowPart)) ) { /* * I don't know what error to send there. */ return E_FAIL; } /* * Move the actual file pointer * If the file pointer ends-up after the end of the stream, the next Write operation will * make the file larger. This is how it is documented. */ plibNewPosition->s.LowPart += dlibMove.s.LowPart; This->currentPosition = *plibNewPosition; return S_OK; } /*** * This method is part of the IStream interface. * * It will change the size of a stream. * * TODO: Switch from small blocks to big blocks and vice versa. * * See the documentation of IStream for more info. */ HRESULT WINAPI HGLOBALStreamImpl_SetSize( IStream* iface, ULARGE_INTEGER libNewSize) /* [in] */ { HGLOBALStreamImpl* const This=(HGLOBALStreamImpl*)iface; TRACE("(%p, %ld)\n", iface, libNewSize.s.LowPart); /* * As documented. */ if (libNewSize.s.HighPart != 0) return STG_E_INVALIDFUNCTION; if (This->streamSize.s.LowPart == libNewSize.s.LowPart) return S_OK; /* * Re allocate the HGlobal to fit the new size of the stream. */ This->supportHandle = GlobalReAlloc(This->supportHandle, libNewSize.s.LowPart, 0); This->streamSize.s.LowPart = libNewSize.s.LowPart; return S_OK; } /*** * This method is part of the IStream interface. * * It will copy the 'cb' Bytes to 'pstm' IStream. * * See the documentation of IStream for more info. */ HRESULT WINAPI HGLOBALStreamImpl_CopyTo( IStream* iface, IStream* pstm, /* [unique][in] */ ULARGE_INTEGER cb, /* [in] */ ULARGE_INTEGER* pcbRead, /* [out] */ ULARGE_INTEGER* pcbWritten) /* [out] */ { HRESULT hr = S_OK; BYTE tmpBuffer[128]; ULONG bytesRead, bytesWritten, copySize; ULARGE_INTEGER totalBytesRead; ULARGE_INTEGER totalBytesWritten; TRACE("(%p, %p, %ld, %p, %p)\n", iface, pstm, cb.s.LowPart, pcbRead, pcbWritten); /* * Sanity check */ if ( pstm == 0 ) return STG_E_INVALIDPOINTER; totalBytesRead.s.LowPart = totalBytesRead.s.HighPart = 0; totalBytesWritten.s.LowPart = totalBytesWritten.s.HighPart = 0; /* * use stack to store data temporarly * there is surely more performant way of doing it, for now this basic * implementation will do the job */ while ( cb.s.LowPart > 0 ) { if ( cb.s.LowPart >= 128 ) copySize = 128; else copySize = cb.s.LowPart; IStream_Read(iface, tmpBuffer, copySize, &bytesRead); totalBytesRead.s.LowPart += bytesRead; IStream_Write(pstm, tmpBuffer, bytesRead, &bytesWritten); totalBytesWritten.s.LowPart += bytesWritten; /* * Check that read & write operations were succesfull */ if (bytesRead != bytesWritten) { hr = STG_E_MEDIUMFULL; break; } if (bytesRead!=copySize) cb.s.LowPart = 0; else cb.s.LowPart -= bytesRead; } /* * Update number of bytes read and written */ if (pcbRead) { pcbRead->s.LowPart = totalBytesRead.s.LowPart; pcbRead->s.HighPart = totalBytesRead.s.HighPart; } if (pcbWritten) { pcbWritten->s.LowPart = totalBytesWritten.s.LowPart; pcbWritten->s.HighPart = totalBytesWritten.s.HighPart; } return hr; } /*** * This method is part of the IStream interface. * * For streams supported by HGLOBALS, this function does nothing. * This is what the documentation tells us. * * See the documentation of IStream for more info. */ HRESULT WINAPI HGLOBALStreamImpl_Commit( IStream* iface, DWORD grfCommitFlags) /* [in] */ { return S_OK; } /*** * This method is part of the IStream interface. * * For streams supported by HGLOBALS, this function does nothing. * This is what the documentation tells us. * * See the documentation of IStream for more info. */ HRESULT WINAPI HGLOBALStreamImpl_Revert( IStream* iface) { return S_OK; } /*** * This method is part of the IStream interface. * * For streams supported by HGLOBALS, this function does nothing. * This is what the documentation tells us. * * See the documentation of IStream for more info. */ HRESULT WINAPI HGLOBALStreamImpl_LockRegion( IStream* iface, ULARGE_INTEGER libOffset, /* [in] */ ULARGE_INTEGER cb, /* [in] */ DWORD dwLockType) /* [in] */ { return S_OK; } /* * This method is part of the IStream interface. * * For streams supported by HGLOBALS, this function does nothing. * This is what the documentation tells us. * * See the documentation of IStream for more info. */ HRESULT WINAPI HGLOBALStreamImpl_UnlockRegion( IStream* iface, ULARGE_INTEGER libOffset, /* [in] */ ULARGE_INTEGER cb, /* [in] */ DWORD dwLockType) /* [in] */ { return S_OK; } /*** * This method is part of the IStream interface. * * This method returns information about the current * stream. * * See the documentation of IStream for more info. */ HRESULT WINAPI HGLOBALStreamImpl_Stat( IStream* iface, STATSTG* pstatstg, /* [out] */ DWORD grfStatFlag) /* [in] */ { HGLOBALStreamImpl* const This=(HGLOBALStreamImpl*)iface; memset(pstatstg, 0, sizeof(STATSTG)); pstatstg->pwcsName = NULL; pstatstg->type = STGTY_STREAM; pstatstg->cbSize = This->streamSize; return S_OK; } HRESULT WINAPI HGLOBALStreamImpl_Clone( IStream* iface, IStream** ppstm) /* [out] */ { FIXME("not implemented!\n"); return E_NOTIMPL; } wine-20000526/dlls/ole32/ifs.c0100644000175000001440000002435507070204076015264 0ustar julliardusers/* * basic interfaces * * Copyright 1997 Marcus Meissner */ #include #include #include #include #include "winerror.h" #include "ldt.h" #include "heap.h" #include "wine/winbase16.h" #include "wine/obj_base.h" #include "local.h" #include "module.h" #include "debugtools.h" #include "ifs.h" DEFAULT_DEBUG_CHANNEL(relay) /* --- IUnknown implementation */ typedef struct { /* IUnknown fields */ ICOM_VFIELD(IUnknown); DWORD ref; } IUnknownImpl; /****************************************************************************** * IUnknown_AddRef [VTABLE:IUNKNOWN.1] */ static ULONG WINAPI IUnknown_fnAddRef(LPUNKNOWN iface) { ICOM_THIS(IUnknownImpl,iface); TRACE("(%p)->AddRef()\n",This); return ++(This->ref); } /****************************************************************************** * IUnknown_Release [VTABLE:IUNKNOWN.2] */ static ULONG WINAPI IUnknown_fnRelease(LPUNKNOWN iface) { ICOM_THIS(IUnknownImpl,iface); TRACE("(%p)->Release()\n",This); if (!--(This->ref)) { HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } /****************************************************************************** * IUnknown_QueryInterface [VTABLE:IUNKNOWN.0] */ static HRESULT WINAPI IUnknown_fnQueryInterface(LPUNKNOWN iface,REFIID refiid,LPVOID *obj) { ICOM_THIS(IUnknownImpl,iface); TRACE("(%p)->QueryInterface(%s,%p)\n",This,debugstr_guid(refiid),obj); if (!memcmp(&IID_IUnknown,refiid,sizeof(IID_IUnknown))) { *obj = This; return 0; } return OLE_E_ENUM_NOMORE; } static ICOM_VTABLE(IUnknown) uvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IUnknown_fnQueryInterface, IUnknown_fnAddRef, IUnknown_fnRelease }; /****************************************************************************** * IUnknown_Constructor [INTERNAL] */ LPUNKNOWN IUnknown_Constructor() { IUnknownImpl* unk; unk = (IUnknownImpl*)HeapAlloc(GetProcessHeap(),0,sizeof(IUnknownImpl)); ICOM_VTBL(unk) = &uvt; unk->ref = 1; return (LPUNKNOWN)unk; } /* --- IMalloc16 implementation */ typedef struct { /* IUnknown fields */ ICOM_VFIELD(IMalloc16); DWORD ref; /* IMalloc16 fields */ /* Gmm, I think one is not enough, we should probably manage a list of * heaps */ HGLOBAL16 heap; } IMalloc16Impl; /****************************************************************************** * IMalloc16_QueryInterface [COMPOBJ.500] */ HRESULT WINAPI IMalloc16_fnQueryInterface(IMalloc16* iface,REFIID refiid,LPVOID *obj) { ICOM_THIS(IMalloc16Impl,iface); TRACE("(%p)->QueryInterface(%s,%p)\n",This,debugstr_guid(refiid),obj); if ( !memcmp(&IID_IUnknown,refiid,sizeof(IID_IUnknown)) || !memcmp(&IID_IMalloc,refiid,sizeof(IID_IMalloc)) ) { *obj = This; return 0; } return OLE_E_ENUM_NOMORE; } /****************************************************************************** * IMalloc16_AddRef [COMPOBJ.501] */ ULONG WINAPI IMalloc16_fnAddRef(IMalloc16* iface) { ICOM_THIS(IMalloc16Impl,iface); TRACE("(%p)->AddRef()\n",This); return 1; /* cannot be freed */ } /****************************************************************************** * IMalloc16_Release [COMPOBJ.502] */ ULONG WINAPI IMalloc16_fnRelease(IMalloc16* iface) { ICOM_THIS(IMalloc16Impl,iface); TRACE("(%p)->Release()\n",This); return 1; /* cannot be freed */ } /****************************************************************************** * IMalloc16_Alloc [COMPOBJ.503] */ LPVOID WINAPI IMalloc16_fnAlloc(IMalloc16* iface,DWORD cb) { ICOM_THIS(IMalloc16Impl,iface); TRACE("(%p)->Alloc(%ld)\n",This,cb); return (LPVOID)PTR_SEG_OFF_TO_SEGPTR(This->heap,LOCAL_Alloc(This->heap,0,cb)); } /****************************************************************************** * IMalloc16_Realloc [COMPOBJ.504] */ LPVOID WINAPI IMalloc16_fnRealloc(IMalloc16* iface,LPVOID pv,DWORD cb) { ICOM_THIS(IMalloc16Impl,iface); TRACE("(%p)->Realloc(%p,%ld)\n",This,pv,cb); return (LPVOID)PTR_SEG_OFF_TO_SEGPTR(This->heap,LOCAL_ReAlloc(This->heap,0,LOWORD(pv),cb)); } /****************************************************************************** * IMalloc16_Free [COMPOBJ.505] */ VOID WINAPI IMalloc16_fnFree(IMalloc16* iface,LPVOID pv) { ICOM_THIS(IMalloc16Impl,iface); TRACE("(%p)->Free(%p)\n",This,pv); LOCAL_Free(This->heap,LOWORD(pv)); } /****************************************************************************** * IMalloc16_GetSize [COMPOBJ.506] */ DWORD WINAPI IMalloc16_fnGetSize(const IMalloc16* iface,LPVOID pv) { ICOM_CTHIS(IMalloc16Impl,iface); TRACE("(%p)->GetSize(%p)\n",This,pv); return LOCAL_Size(This->heap,LOWORD(pv)); } /****************************************************************************** * IMalloc16_DidAlloc [COMPOBJ.507] */ INT16 WINAPI IMalloc16_fnDidAlloc(const IMalloc16* iface,LPVOID pv) { ICOM_CTHIS(IMalloc16,iface); TRACE("(%p)->DidAlloc(%p)\n",This,pv); return (INT16)-1; } /****************************************************************************** * IMalloc16_HeapMinimize [COMPOBJ.508] */ LPVOID WINAPI IMalloc16_fnHeapMinimize(IMalloc16* iface) { ICOM_THIS(IMalloc16Impl,iface); TRACE("(%p)->HeapMinimize()\n",This); return NULL; } static ICOM_VTABLE(IMalloc16)* msegvt16 = NULL; /****************************************************************************** * IMalloc16_Constructor [VTABLE] */ LPMALLOC16 IMalloc16_Constructor() { IMalloc16Impl* This; HMODULE16 hcomp = GetModuleHandle16("COMPOBJ"); This = (IMalloc16Impl*)SEGPTR_NEW(IMalloc16Impl); if (!msegvt16) { msegvt16 = SEGPTR_NEW(ICOM_VTABLE(IMalloc16)); #define VTENT(x) msegvt16->fn##x = (void*)WIN32_GetProcAddress16(hcomp,"IMalloc16_"#x);assert(msegvt16->fn##x) VTENT(QueryInterface); VTENT(AddRef); VTENT(Release); VTENT(Alloc); VTENT(Realloc); VTENT(Free); VTENT(GetSize); VTENT(DidAlloc); VTENT(HeapMinimize); #undef VTENT } ICOM_VTBL(This) = (ICOM_VTABLE(IMalloc16)*)SEGPTR_GET(msegvt16); This->ref = 1; /* FIXME: implement multiple heaps */ This->heap = GlobalAlloc16(GMEM_MOVEABLE,64000); LocalInit16(This->heap,0,64000); return (LPMALLOC16)SEGPTR_GET(This); } /* --- IMalloc32 implementation */ typedef struct { /* IUnknown fields */ ICOM_VFIELD(IMalloc); DWORD ref; } IMalloc32Impl; /****************************************************************************** * IMalloc32_QueryInterface [VTABLE] */ static HRESULT WINAPI IMalloc_fnQueryInterface(LPMALLOC iface,REFIID refiid,LPVOID *obj) { ICOM_THIS(IMalloc32Impl,iface); TRACE("(%p)->QueryInterface(%s,%p)\n",This,debugstr_guid(refiid),obj); if ( !memcmp(&IID_IUnknown,refiid,sizeof(IID_IUnknown)) || !memcmp(&IID_IMalloc,refiid,sizeof(IID_IMalloc)) ) { *obj = This; return S_OK; } return OLE_E_ENUM_NOMORE; } /****************************************************************************** * IMalloc32_AddRef [VTABLE] */ static ULONG WINAPI IMalloc_fnAddRef(LPMALLOC iface) { ICOM_THIS(IMalloc32Impl,iface); TRACE("(%p)->AddRef()\n",This); return 1; /* cannot be freed */ } /****************************************************************************** * IMalloc32_Release [VTABLE] */ static ULONG WINAPI IMalloc_fnRelease(LPMALLOC iface) { ICOM_THIS(IMalloc32Impl,iface); TRACE("(%p)->Release()\n",This); return 1; /* cannot be freed */ } /****************************************************************************** * IMalloc32_Alloc [VTABLE] */ static LPVOID WINAPI IMalloc_fnAlloc(LPMALLOC iface,DWORD cb) { ICOM_THIS(IMalloc32Impl,iface); TRACE("(%p)->Alloc(%ld)\n",This,cb); return HeapAlloc(GetProcessHeap(),0,cb); } /****************************************************************************** * IMalloc32_Realloc [VTABLE] */ static LPVOID WINAPI IMalloc_fnRealloc(LPMALLOC iface,LPVOID pv,DWORD cb) { ICOM_THIS(IMalloc32Impl,iface); TRACE("(%p)->Realloc(%p,%ld)\n",This,pv,cb); return HeapReAlloc(GetProcessHeap(),0,pv,cb); } /****************************************************************************** * IMalloc32_Free [VTABLE] */ static VOID WINAPI IMalloc_fnFree(LPMALLOC iface,LPVOID pv) { ICOM_THIS(IMalloc32Impl,iface); TRACE("(%p)->Free(%p)\n",This,pv); HeapFree(GetProcessHeap(),0,pv); } /****************************************************************************** * IMalloc32_GetSize [VTABLE] */ static DWORD WINAPI IMalloc_fnGetSize(LPMALLOC iface,LPVOID pv) { ICOM_CTHIS(IMalloc,iface); TRACE("(%p)->GetSize(%p)\n",This,pv); return HeapSize(GetProcessHeap(),0,pv); } /****************************************************************************** * IMalloc32_DidAlloc [VTABLE] */ static INT WINAPI IMalloc_fnDidAlloc(LPMALLOC iface,LPVOID pv) { ICOM_CTHIS(IMalloc32Impl,iface); TRACE("(%p)->DidAlloc(%p)\n",This,pv); return -1; } /****************************************************************************** * IMalloc32_HeapMinimize [VTABLE] */ static VOID WINAPI IMalloc_fnHeapMinimize(LPMALLOC iface) { ICOM_THIS(IMalloc32Impl,iface); TRACE("(%p)->HeapMinimize()\n",This); } static ICOM_VTABLE(IMalloc) VT_IMalloc32 = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IMalloc_fnQueryInterface, IMalloc_fnAddRef, IMalloc_fnRelease, IMalloc_fnAlloc, IMalloc_fnRealloc, IMalloc_fnFree, IMalloc_fnGetSize, IMalloc_fnDidAlloc, IMalloc_fnHeapMinimize }; /****************************************************************************** * IMalloc32_Constructor [VTABLE] */ LPMALLOC IMalloc_Constructor() { IMalloc32Impl* This; This = (IMalloc32Impl*)HeapAlloc(GetProcessHeap(),0,sizeof(IMalloc32Impl)); ICOM_VTBL(This) = &VT_IMalloc32; This->ref = 1; return (LPMALLOC)This; } /**************************************************************************** * API Functions */ /****************************************************************************** * IsValidInterface [OLE32.78] * * RETURNS * True, if the passed pointer is a valid interface */ BOOL WINAPI IsValidInterface( LPUNKNOWN punk /* [in] interface to be tested */ ) { return !( IsBadReadPtr(punk,4) || IsBadReadPtr(ICOM_VTBL(punk),4) || IsBadReadPtr(ICOM_VTBL(punk)->fnQueryInterface,9) || IsBadCodePtr(ICOM_VTBL(punk)->fnQueryInterface) ); } wine-20000526/dlls/ole32/ifs.h0100644000175000001440000000024406771226505015270 0ustar julliardusers#ifndef __WINE_OLE_IFS_H #define __WINE_OLE_IFS_H extern LPMALLOC16 IMalloc16_Constructor(); extern LPMALLOC IMalloc_Constructor(); #endif /* __WINE_OLE_IFS_H */ wine-20000526/dlls/ole32/itemmoniker.c0100644000175000001440000010256306771226505017034 0ustar julliardusers/*************************************************************************************** * ItemMonikers implementation * * Copyright 1999 Noomen Hamza ***************************************************************************************/ #include "wine/obj_base.h" #include "wine/obj_moniker.h" #include "winbase.h" #include #include "winerror.h" #include "debugtools.h" #include "wine/obj_inplace.h" DEFAULT_DEBUG_CHANNEL(ole) /* ItemMoniker data structure */ typedef struct ItemMonikerImpl{ ICOM_VTABLE(IMoniker)* lpvtbl1; /* VTable relative to the IMoniker interface.*/ /* The ROT (RunningObjectTable implementation) uses the IROTData interface to test whether * two monikers are equal. That's whay IROTData interface is implemented by monikers. */ ICOM_VTABLE(IROTData)* lpvtbl2; /* VTable relative to the IROTData interface.*/ ULONG ref; /* reference counter for this object */ LPOLESTR itemName; /* item name identified by this ItemMoniker */ LPOLESTR itemDelimiter; /* Delimiter string */ } ItemMonikerImpl; /********************************************************************************/ /* ItemMoniker prototype functions : */ /* IUnknown prototype functions */ static HRESULT WINAPI ItemMonikerImpl_QueryInterface(IMoniker* iface,REFIID riid,void** ppvObject); static ULONG WINAPI ItemMonikerImpl_AddRef(IMoniker* iface); static ULONG WINAPI ItemMonikerImpl_Release(IMoniker* iface); /* IPersist prototype functions */ static HRESULT WINAPI ItemMonikerImpl_GetClassID(IMoniker* iface, CLSID *pClassID); /* IPersistStream prototype functions */ static HRESULT WINAPI ItemMonikerImpl_IsDirty(IMoniker* iface); static HRESULT WINAPI ItemMonikerImpl_Load(IMoniker* iface, IStream* pStm); static HRESULT WINAPI ItemMonikerImpl_Save(IMoniker* iface, IStream* pStm, BOOL fClearDirty); static HRESULT WINAPI ItemMonikerImpl_GetSizeMax(IMoniker* iface, ULARGE_INTEGER* pcbSize); /* IMoniker prototype functions */ static HRESULT WINAPI ItemMonikerImpl_BindToObject(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, REFIID riid, VOID** ppvResult); static HRESULT WINAPI ItemMonikerImpl_BindToStorage(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, REFIID riid, VOID** ppvResult); static HRESULT WINAPI ItemMonikerImpl_Reduce(IMoniker* iface,IBindCtx* pbc, DWORD dwReduceHowFar,IMoniker** ppmkToLeft, IMoniker** ppmkReduced); static HRESULT WINAPI ItemMonikerImpl_ComposeWith(IMoniker* iface,IMoniker* pmkRight,BOOL fOnlyIfNotGeneric, IMoniker** ppmkComposite); static HRESULT WINAPI ItemMonikerImpl_Enum(IMoniker* iface,BOOL fForward, IEnumMoniker** ppenumMoniker); static HRESULT WINAPI ItemMonikerImpl_IsEqual(IMoniker* iface,IMoniker* pmkOtherMoniker); static HRESULT WINAPI ItemMonikerImpl_Hash(IMoniker* iface,DWORD* pdwHash); static HRESULT WINAPI ItemMonikerImpl_IsRunning(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, IMoniker* pmkNewlyRunning); static HRESULT WINAPI ItemMonikerImpl_GetTimeOfLastChange(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, FILETIME* pItemTime); static HRESULT WINAPI ItemMonikerImpl_Inverse(IMoniker* iface,IMoniker** ppmk); static HRESULT WINAPI ItemMonikerImpl_CommonPrefixWith(IMoniker* iface,IMoniker* pmkOther, IMoniker** ppmkPrefix); static HRESULT WINAPI ItemMonikerImpl_RelativePathTo(IMoniker* iface,IMoniker* pmOther, IMoniker** ppmkRelPath); static HRESULT WINAPI ItemMonikerImpl_GetDisplayName(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, LPOLESTR *ppszDisplayName); static HRESULT WINAPI ItemMonikerImpl_ParseDisplayName(IMoniker* iface,IBindCtx* pbc, IMoniker* pmkToLeft, LPOLESTR pszDisplayName, ULONG* pchEaten, IMoniker** ppmkOut); static HRESULT WINAPI ItemMonikerImpl_IsSystemMoniker(IMoniker* iface,DWORD* pwdMksys); /* Local function used by ItemMoniker implementation */ HRESULT WINAPI ItemMonikerImpl_Construct(ItemMonikerImpl* iface, LPCOLESTR lpszDelim,LPCOLESTR lpszPathName); HRESULT WINAPI ItemMonikerImpl_Destroy(ItemMonikerImpl* iface); /********************************************************************************/ /* IROTData prototype functions */ /* IUnknown prototype functions */ static HRESULT WINAPI ItemMonikerROTDataImpl_QueryInterface(IROTData* iface,REFIID riid,VOID** ppvObject); static ULONG WINAPI ItemMonikerROTDataImpl_AddRef(IROTData* iface); static ULONG WINAPI ItemMonikerROTDataImpl_Release(IROTData* iface); /* IROTData prototype function */ static HRESULT WINAPI ItemMonikerROTDataImpl_GetComparaisonData(IROTData* iface,BYTE* pbData,ULONG cbMax,ULONG* pcbData); /********************************************************************************/ /* Virtual function table for the ItemMonikerImpl class witch include Ipersist,*/ /* IPersistStream and IMoniker functions. */ static ICOM_VTABLE(IMoniker) VT_ItemMonikerImpl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE ItemMonikerImpl_QueryInterface, ItemMonikerImpl_AddRef, ItemMonikerImpl_Release, ItemMonikerImpl_GetClassID, ItemMonikerImpl_IsDirty, ItemMonikerImpl_Load, ItemMonikerImpl_Save, ItemMonikerImpl_GetSizeMax, ItemMonikerImpl_BindToObject, ItemMonikerImpl_BindToStorage, ItemMonikerImpl_Reduce, ItemMonikerImpl_ComposeWith, ItemMonikerImpl_Enum, ItemMonikerImpl_IsEqual, ItemMonikerImpl_Hash, ItemMonikerImpl_IsRunning, ItemMonikerImpl_GetTimeOfLastChange, ItemMonikerImpl_Inverse, ItemMonikerImpl_CommonPrefixWith, ItemMonikerImpl_RelativePathTo, ItemMonikerImpl_GetDisplayName, ItemMonikerImpl_ParseDisplayName, ItemMonikerImpl_IsSystemMoniker }; /********************************************************************************/ /* Virtual function table for the IROTData class. */ static ICOM_VTABLE(IROTData) VT_ROTDataImpl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE ItemMonikerROTDataImpl_QueryInterface, ItemMonikerROTDataImpl_AddRef, ItemMonikerROTDataImpl_Release, ItemMonikerROTDataImpl_GetComparaisonData }; /******************************************************************************* * ItemMoniker_QueryInterface *******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_QueryInterface(IMoniker* iface,REFIID riid,void** ppvObject) { ICOM_THIS(ItemMonikerImpl,iface); TRACE("(%p,%p,%p)\n",This,riid,ppvObject); /* Perform a sanity check on the parameters.*/ if ( (This==0) || (ppvObject==0) ) return E_INVALIDARG; /* Initialize the return parameter */ *ppvObject = 0; /* Compare the riid with the interface IDs implemented by this object.*/ if (IsEqualIID(&IID_IUnknown, riid) || IsEqualIID(&IID_IPersist, riid) || IsEqualIID(&IID_IPersistStream, riid) || IsEqualIID(&IID_IMoniker, riid) ) *ppvObject = iface; else if (IsEqualIID(&IID_IROTData, riid)) *ppvObject = (IROTData*)&(This->lpvtbl2); /* Check that we obtained an interface.*/ if ((*ppvObject)==0) return E_NOINTERFACE; /* Query Interface always increases the reference count by one when it is successful */ ItemMonikerImpl_AddRef(iface); return S_OK; } /****************************************************************************** * ItemMoniker_AddRef ******************************************************************************/ ULONG WINAPI ItemMonikerImpl_AddRef(IMoniker* iface) { ICOM_THIS(ItemMonikerImpl,iface); TRACE("(%p)\n",This); return ++(This->ref); } /****************************************************************************** * ItemMoniker_Release ******************************************************************************/ ULONG WINAPI ItemMonikerImpl_Release(IMoniker* iface) { ICOM_THIS(ItemMonikerImpl,iface); TRACE("(%p)\n",This); This->ref--; /* destroy the object if there's no more reference on it */ if (This->ref==0){ ItemMonikerImpl_Destroy(This); return 0; } return This->ref;; } /****************************************************************************** * ItemMoniker_GetClassID ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_GetClassID(IMoniker* iface,CLSID *pClassID) { TRACE("(%p,%p),stub!\n",iface,pClassID); if (pClassID==NULL) return E_POINTER; *pClassID = CLSID_ItemMoniker; return S_OK; } /****************************************************************************** * ItemMoniker_IsDirty ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_IsDirty(IMoniker* iface) { /* Note that the OLE-provided implementations of the IPersistStream::IsDirty method in the OLE-provided moniker interfaces always return S_FALSE because their internal state never changes. */ TRACE("(%p)\n",iface); return S_FALSE; } /****************************************************************************** * ItemMoniker_Load ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_Load(IMoniker* iface,IStream* pStm) { ICOM_THIS(ItemMonikerImpl,iface); HRESULT res; DWORD delimiterLength,nameLength; CHAR *itemNameA,*itemDelimiterA; ULONG bread; /* for more details about data read by this function see coments of ItemMonikerImpl_Save function */ /* read item delimiter string length + 1 */ res=IStream_Read(pStm,&delimiterLength,sizeof(DWORD),&bread); if (bread != sizeof(DWORD)) return E_FAIL; /* read item delimiter string */ itemDelimiterA=HeapAlloc(GetProcessHeap(),0,delimiterLength); res=IStream_Read(pStm,itemDelimiterA,delimiterLength,&bread); if (bread != delimiterLength) return E_FAIL; This->itemDelimiter=HeapReAlloc(GetProcessHeap(),0,This->itemDelimiter,delimiterLength*sizeof(WCHAR)); if (!This->itemDelimiter) return E_OUTOFMEMORY; lstrcpyAtoW(This->itemDelimiter,itemDelimiterA); /* read item name string length + 1*/ res=IStream_Read(pStm,&nameLength,sizeof(DWORD),&bread); if (bread != sizeof(DWORD)) return E_FAIL; /* read item name string */ itemNameA=HeapAlloc(GetProcessHeap(),0,nameLength); res=IStream_Read(pStm,itemNameA,nameLength,&bread); if (bread != nameLength) return E_FAIL; This->itemName=HeapReAlloc(GetProcessHeap(),0,This->itemName,nameLength*sizeof(WCHAR)); if (!This->itemName) return E_OUTOFMEMORY; lstrcpyAtoW(This->itemName,itemNameA); return res; } /****************************************************************************** * ItemMoniker_Save ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_Save(IMoniker* iface, IStream* pStm,/* pointer to the stream where the object is to be saved */ BOOL fClearDirty)/* Specifies whether to clear the dirty flag */ { ICOM_THIS(ItemMonikerImpl,iface); HRESULT res; DWORD delimiterLength=lstrlenW(This->itemDelimiter)+1; DWORD nameLength=lstrlenW(This->itemName)+1; CHAR *itemNameA,*itemDelimiterA; /* data writen by this function are : 1) DWORD : size of item delimiter string ('\0' included ) */ /* 2) String (type A): item delimiter string ('\0' included) */ /* 3) DWORD : size of item name string ('\0' included) */ /* 4) String (type A): item name string ('\0' included) */ itemNameA=HeapAlloc(GetProcessHeap(),0,nameLength); itemDelimiterA=HeapAlloc(GetProcessHeap(),0,delimiterLength); lstrcpyWtoA(itemNameA,This->itemName); lstrcpyWtoA(itemDelimiterA,This->itemDelimiter); res=IStream_Write(pStm,&delimiterLength,sizeof(DWORD),NULL); res=IStream_Write(pStm,itemDelimiterA,delimiterLength * sizeof(CHAR),NULL); res=IStream_Write(pStm,&nameLength,sizeof(DWORD),NULL); res=IStream_Write(pStm,itemNameA,nameLength * sizeof(CHAR),NULL); return res; } /****************************************************************************** * ItemMoniker_GetSizeMax ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_GetSizeMax(IMoniker* iface, ULARGE_INTEGER* pcbSize)/* Pointer to size of stream needed to save object */ { ICOM_THIS(ItemMonikerImpl,iface); DWORD delimiterLength=lstrlenW(This->itemDelimiter)+1; DWORD nameLength=lstrlenW(This->itemName)+1; TRACE("(%p,%p)\n",iface,pcbSize); if (pcbSize!=NULL) return E_POINTER; /* for more details see ItemMonikerImpl_Save coments */ pcbSize->s.LowPart = sizeof(DWORD) + /* DWORD witch contains delimiter length */ delimiterLength + /* item delimiter string */ sizeof(DWORD) + /* DWORD witch contains item name length */ nameLength + /* item name string */ 34; /* this constant was added ! because when I tested this function it usually */ /* returns 34 bytes more than the number of bytes used by IMoniker::Save function */ pcbSize->s.HighPart=0; return S_OK; } /****************************************************************************** * ItemMoniker_Construct (local function) *******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_Construct(ItemMonikerImpl* This, LPCOLESTR lpszDelim,LPCOLESTR lpszItem) { int sizeStr1=lstrlenW(lpszItem); int sizeStr2=lstrlenW(lpszDelim); TRACE("(%p,%p)\n",This,lpszItem); /* Initialize the virtual fgunction table. */ This->lpvtbl1 = &VT_ItemMonikerImpl; This->lpvtbl2 = &VT_ROTDataImpl; This->ref = 0; This->itemName=HeapAlloc(GetProcessHeap(),0,sizeof(WCHAR)*(sizeStr1+1)); This->itemDelimiter=HeapAlloc(GetProcessHeap(),0,sizeof(WCHAR)*(sizeStr2+1)); if ((This->itemName==NULL)||(This->itemDelimiter==NULL)) return E_OUTOFMEMORY; lstrcpyW(This->itemName,lpszItem); lstrcpyW(This->itemDelimiter,lpszDelim); return S_OK; } /****************************************************************************** * ItemMoniker_Destroy (local function) *******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_Destroy(ItemMonikerImpl* This) { TRACE("(%p)\n",This); if (This->itemName) HeapFree(GetProcessHeap(),0,This->itemName); if (This->itemDelimiter) HeapFree(GetProcessHeap(),0,This->itemDelimiter); HeapFree(GetProcessHeap(),0,This); return S_OK; } /****************************************************************************** * ItemMoniker_BindToObject ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_BindToObject(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, REFIID riid, VOID** ppvResult) { ICOM_THIS(ItemMonikerImpl,iface); HRESULT res; IID refid=IID_IOleItemContainer; IOleItemContainer *poic=0; TRACE("(%p,%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,riid,ppvResult); if(ppvResult ==NULL) return E_POINTER; if(pmkToLeft==NULL) return E_INVALIDARG; *ppvResult=0; res=IMoniker_BindToObject(pmkToLeft,pbc,NULL,&refid,(void**)&poic); if (SUCCEEDED(res)){ res=IOleItemContainer_GetObject(poic,This->itemName,BINDSPEED_MODERATE,pbc,riid,ppvResult); IOleItemContainer_Release(poic); } return res; } /****************************************************************************** * ItemMoniker_BindToStorage ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_BindToStorage(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, REFIID riid, VOID** ppvResult) { ICOM_THIS(ItemMonikerImpl,iface); HRESULT res; IOleItemContainer *poic=0; TRACE("(%p,%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,riid,ppvResult); *ppvResult=0; if(pmkToLeft==NULL) return E_INVALIDARG; res=IMoniker_BindToObject(pmkToLeft,pbc,NULL,&IID_IOleItemContainer,(void**)&poic); if (SUCCEEDED(res)){ res=IOleItemContainer_GetObjectStorage(poic,This->itemName,pbc,riid,ppvResult); IOleItemContainer_Release(poic); } return res; } /****************************************************************************** * ItemMoniker_Reduce ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_Reduce(IMoniker* iface, IBindCtx* pbc, DWORD dwReduceHowFar, IMoniker** ppmkToLeft, IMoniker** ppmkReduced) { TRACE("(%p,%p,%ld,%p,%p)\n",iface,pbc,dwReduceHowFar,ppmkToLeft,ppmkReduced); if (ppmkReduced==NULL) return E_POINTER; ItemMonikerImpl_AddRef(iface); *ppmkReduced=iface; return MK_S_REDUCED_TO_SELF; } /****************************************************************************** * ItemMoniker_ComposeWith ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_ComposeWith(IMoniker* iface, IMoniker* pmkRight, BOOL fOnlyIfNotGeneric, IMoniker** ppmkComposite) { HRESULT res=S_OK; DWORD mkSys,mkSys2; IEnumMoniker* penumMk=0; IMoniker *pmostLeftMk=0; IMoniker* tempMkComposite=0; TRACE("(%p,%p,%d,%p)\n",iface,pmkRight,fOnlyIfNotGeneric,ppmkComposite); if ((ppmkComposite==NULL)||(pmkRight==NULL)) return E_POINTER; *ppmkComposite=0; IMoniker_IsSystemMoniker(pmkRight,&mkSys); /* If pmkRight is an anti-moniker, the returned moniker is NULL */ if(mkSys==MKSYS_ANTIMONIKER) return res; else /* if pmkRight is a composite whose leftmost component is an anti-moniker, */ /* the returned moniker is the composite after the leftmost anti-moniker is removed. */ if(mkSys==MKSYS_GENERICCOMPOSITE){ res=IMoniker_Enum(pmkRight,TRUE,&penumMk); if (FAILED(res)) return res; res=IEnumMoniker_Next(penumMk,1,&pmostLeftMk,NULL); IMoniker_IsSystemMoniker(pmostLeftMk,&mkSys2); if(mkSys2==MKSYS_ANTIMONIKER){ IMoniker_Release(pmostLeftMk); tempMkComposite=iface; IMoniker_AddRef(iface); while(IEnumMoniker_Next(penumMk,1,&pmostLeftMk,NULL)==S_OK){ res=CreateGenericComposite(tempMkComposite,pmostLeftMk,ppmkComposite); IMoniker_Release(tempMkComposite); IMoniker_Release(pmostLeftMk); tempMkComposite=*ppmkComposite; IMoniker_AddRef(tempMkComposite); } return res; } else return CreateGenericComposite(iface,pmkRight,ppmkComposite); } /* If pmkRight is not an anti-moniker, the method combines the two monikers into a generic composite if fOnlyIfNotGeneric is FALSE; if fOnlyIfNotGeneric is TRUE, the method returns a NULL moniker and a return value of MK_E_NEEDGENERIC */ else if (!fOnlyIfNotGeneric) return CreateGenericComposite(iface,pmkRight,ppmkComposite); else return MK_E_NEEDGENERIC; } /****************************************************************************** * ItemMoniker_Enum ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_Enum(IMoniker* iface,BOOL fForward, IEnumMoniker** ppenumMoniker) { TRACE("(%p,%d,%p)\n",iface,fForward,ppenumMoniker); if (ppenumMoniker == NULL) return E_POINTER; *ppenumMoniker = NULL; return S_OK; } /****************************************************************************** * ItemMoniker_IsEqual ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_IsEqual(IMoniker* iface,IMoniker* pmkOtherMoniker) { CLSID clsid; LPOLESTR dispName1,dispName2; IBindCtx* bind; HRESULT res; TRACE("(%p,%p)\n",iface,pmkOtherMoniker); if (pmkOtherMoniker==NULL) return S_FALSE; /* This method returns S_OK if both monikers are item monikers and their display names are */ /* identical (using a case-insensitive comparison); otherwise, the method returns S_FALSE. */ IMoniker_GetClassID(pmkOtherMoniker,&clsid); if (!IsEqualCLSID(&clsid,&CLSID_ItemMoniker)) return S_FALSE; res=CreateBindCtx(0,&bind); if (FAILED(res)) return res; IMoniker_GetDisplayName(iface,bind,NULL,&dispName1); IMoniker_GetDisplayName(pmkOtherMoniker,bind,NULL,&dispName2); if (lstrcmpW(dispName1,dispName2)!=0) return S_FALSE; return S_OK; } /****************************************************************************** * ItemMoniker_Hash ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_Hash(IMoniker* iface,DWORD* pdwHash) { ICOM_THIS(ItemMonikerImpl,iface); int h = 0,i,skip,len; int off = 0; LPOLESTR val; if (pdwHash==NULL) return E_POINTER; val = This->itemName; len = lstrlenW(val); if (len < 16) { for (i = len ; i > 0; i--) { h = (h * 37) + val[off++]; } } else { /* only sample some characters */ skip = len / 8; for (i = len ; i > 0; i -= skip, off += skip) { h = (h * 39) + val[off]; } } *pdwHash=h; return S_OK; } /****************************************************************************** * ItemMoniker_IsRunning ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_IsRunning(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, IMoniker* pmkNewlyRunning) { IRunningObjectTable* rot; HRESULT res; IOleItemContainer *poic=0; ICOM_THIS(ItemMonikerImpl,iface); TRACE("(%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,pmkNewlyRunning); /* If pmkToLeft is NULL, this method returns TRUE if pmkNewlyRunning is non-NULL and is equal to this */ /* moniker. Otherwise, the method checks the ROT to see whether this moniker is running. */ if (pmkToLeft==NULL) if ((pmkNewlyRunning!=NULL)&&(IMoniker_IsEqual(pmkNewlyRunning,iface)==S_OK)) return S_OK; else { if (pbc==NULL) return E_POINTER; res=IBindCtx_GetRunningObjectTable(pbc,&rot); if (FAILED(res)) return res; res = IRunningObjectTable_IsRunning(rot,iface); IRunningObjectTable_Release(rot); } else{ /* If pmkToLeft is non-NULL, the method calls IMoniker::BindToObject on the pmkToLeft parameter, */ /* requesting an IOleItemContainer interface pointer. The method then calls IOleItemContainer::IsRunning,*/ /* passing the string contained within this moniker. */ res=IMoniker_BindToObject(pmkToLeft,pbc,NULL,&IID_IOleItemContainer,(void**)&poic); if (SUCCEEDED(res)){ res=IOleItemContainer_IsRunning(poic,This->itemName); IOleItemContainer_Release(poic); } } return res; } /****************************************************************************** * ItemMoniker_GetTimeOfLastChange ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_GetTimeOfLastChange(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, FILETIME* pItemTime) { IRunningObjectTable* rot; HRESULT res; IMoniker *compositeMk; TRACE("(%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,pItemTime); if (pItemTime==NULL) return E_INVALIDARG; /* If pmkToLeft is NULL, this method returns MK_E_NOTBINDABLE */ if (pmkToLeft==NULL) return MK_E_NOTBINDABLE; else { /* Otherwise, the method creates a composite of pmkToLeft and this moniker and uses the ROT to access */ /* the time of last change. If the object is not in the ROT, the method calls */ /* IMoniker::GetTimeOfLastChange on the pmkToLeft parameter. */ res=CreateGenericComposite(pmkToLeft,iface,&compositeMk); res=IBindCtx_GetRunningObjectTable(pbc,&rot); if (IRunningObjectTable_GetTimeOfLastChange(rot,compositeMk,pItemTime)!=S_OK) res=IMoniker_GetTimeOfLastChange(pmkToLeft,pbc,NULL,pItemTime); IMoniker_Release(compositeMk); } return res; } /****************************************************************************** * ItemMoniker_Inverse ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_Inverse(IMoniker* iface,IMoniker** ppmk) { TRACE("(%p,%p)\n",iface,ppmk); if (ppmk==NULL) return E_POINTER; return CreateAntiMoniker(ppmk); } /****************************************************************************** * ItemMoniker_CommonPrefixWith ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_CommonPrefixWith(IMoniker* iface,IMoniker* pmkOther,IMoniker** ppmkPrefix) { DWORD mkSys; IMoniker_IsSystemMoniker(pmkOther,&mkSys); /* If the other moniker is an item moniker that is equal to this moniker, this method sets *ppmkPrefix */ /* to this moniker and returns MK_S_US */ if((mkSys==MKSYS_ITEMMONIKER) && (IMoniker_IsEqual(iface,pmkOther)==S_OK) ){ *ppmkPrefix=iface; IMoniker_AddRef(iface); return MK_S_US; } else /* otherwise, the method calls the MonikerCommonPrefixWith function. This function correctly handles */ /* the case where the other moniker is a generic composite. */ return MonikerCommonPrefixWith(iface,pmkOther,ppmkPrefix); } /****************************************************************************** * ItemMoniker_RelativePathTo ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_RelativePathTo(IMoniker* iface,IMoniker* pmOther, IMoniker** ppmkRelPath) { TRACE("(%p,%p,%p)\n",iface,pmOther,ppmkRelPath); if (ppmkRelPath==NULL) return E_POINTER; *ppmkRelPath=0; return MK_E_NOTBINDABLE; } /****************************************************************************** * ItemMoniker_GetDisplayName ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_GetDisplayName(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, LPOLESTR *ppszDisplayName) { ICOM_THIS(ItemMonikerImpl,iface); TRACE("(%p,%p,%p,%p)\n",iface,pbc,pmkToLeft,ppszDisplayName); if (ppszDisplayName==NULL) return E_POINTER; if (pmkToLeft!=NULL){ return E_INVALIDARG; } *ppszDisplayName=CoTaskMemAlloc(sizeof(WCHAR)*(lstrlenW(This->itemDelimiter)+lstrlenW(This->itemName)+1)); if (*ppszDisplayName==NULL) return E_OUTOFMEMORY; lstrcpyW(*ppszDisplayName,This->itemDelimiter); lstrcatW(*ppszDisplayName,This->itemName); return S_OK; } /****************************************************************************** * ItemMoniker_ParseDisplayName ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_ParseDisplayName(IMoniker* iface, IBindCtx* pbc, IMoniker* pmkToLeft, LPOLESTR pszDisplayName, ULONG* pchEaten, IMoniker** ppmkOut) { IOleItemContainer* poic=0; IParseDisplayName* ppdn=0; LPOLESTR displayName; HRESULT res; ICOM_THIS(ItemMonikerImpl,iface); /* If pmkToLeft is NULL, this method returns MK_E_SYNTAX */ if (pmkToLeft==NULL) return MK_E_SYNTAX; else{ /* Otherwise, the method calls IMoniker::BindToObject on the pmkToLeft parameter, requesting an */ /* IParseDisplayName interface pointer to the object identified by the moniker, and passes the display */ /* name to IParseDisplayName::ParseDisplayName */ res=IMoniker_BindToObject(pmkToLeft,pbc,NULL,&IID_IOleItemContainer,(void**)&poic); if (SUCCEEDED(res)){ res=IOleItemContainer_GetObject(poic,This->itemName,BINDSPEED_MODERATE,pbc,&IID_IParseDisplayName,(void**)&ppdn); res=IMoniker_GetDisplayName(iface,pbc,NULL,&displayName); res=IParseDisplayName_ParseDisplayName(ppdn,pbc,displayName,pchEaten,ppmkOut); IOleItemContainer_Release(poic); IParseDisplayName_Release(ppdn); } } return res; } /****************************************************************************** * ItemMoniker_IsSystemMonker ******************************************************************************/ HRESULT WINAPI ItemMonikerImpl_IsSystemMoniker(IMoniker* iface,DWORD* pwdMksys) { TRACE("(%p,%p)\n",iface,pwdMksys); if (!pwdMksys) return E_POINTER; (*pwdMksys)=MKSYS_ITEMMONIKER; return S_OK; } /******************************************************************************* * ItemMonikerIROTData_QueryInterface *******************************************************************************/ HRESULT WINAPI ItemMonikerROTDataImpl_QueryInterface(IROTData *iface,REFIID riid,VOID** ppvObject) { ICOM_THIS_From_IROTData(IMoniker, iface); TRACE("(%p,%p,%p)\n",iface,riid,ppvObject); return ItemMonikerImpl_QueryInterface(This, riid, ppvObject); } /*********************************************************************** * ItemMonikerIROTData_AddRef */ ULONG WINAPI ItemMonikerROTDataImpl_AddRef(IROTData *iface) { ICOM_THIS_From_IROTData(IMoniker, iface); TRACE("(%p)\n",iface); return ItemMonikerImpl_AddRef(This); } /*********************************************************************** * ItemMonikerIROTData_Release */ ULONG WINAPI ItemMonikerROTDataImpl_Release(IROTData* iface) { ICOM_THIS_From_IROTData(IMoniker, iface); TRACE("(%p)\n",iface); return ItemMonikerImpl_Release(This); } /****************************************************************************** * ItemMonikerIROTData_GetComparaisonData ******************************************************************************/ HRESULT WINAPI ItemMonikerROTDataImpl_GetComparaisonData(IROTData* iface, BYTE* pbData, ULONG cbMax, ULONG* pcbData) { FIXME("(),stub!\n"); return E_NOTIMPL; } /****************************************************************************** * CreateItemMoniker16 [OLE2.28] ******************************************************************************/ HRESULT WINAPI CreateItemMoniker16(LPCOLESTR16 lpszDelim,LPCOLESTR lpszItem,LPMONIKER* ppmk) { FIXME("(%s,%p),stub!\n",lpszDelim,ppmk); *ppmk = NULL; return E_NOTIMPL; } /****************************************************************************** * CreateItemMoniker [OLE.55] ******************************************************************************/ HRESULT WINAPI CreateItemMoniker(LPCOLESTR lpszDelim,LPCOLESTR lpszItem, LPMONIKER * ppmk) { ItemMonikerImpl* newItemMoniker = 0; HRESULT hr = S_OK; IID riid=IID_IMoniker; TRACE("(%p,%p,%p)\n",lpszDelim,lpszItem,ppmk); newItemMoniker = HeapAlloc(GetProcessHeap(), 0, sizeof(ItemMonikerImpl)); if (newItemMoniker == 0) return STG_E_INSUFFICIENTMEMORY; hr = ItemMonikerImpl_Construct(newItemMoniker,lpszDelim,lpszItem); if (FAILED(hr)){ HeapFree(GetProcessHeap(),0,newItemMoniker); return hr; } return ItemMonikerImpl_QueryInterface((IMoniker*)newItemMoniker,&riid,(void**)ppmk); } wine-20000526/dlls/ole32/memlockbytes.c0100644000175000001440000003627307067231504017205 0ustar julliardusers/****************************************************************************** * * Global memory implementation of ILockBytes. * * Copyright 1999 Thuy Nguyen * */ #include #include "winbase.h" #include "winerror.h" #include "objbase.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ole) /****************************************************************************** * HGLOBALLockBytesImpl definition. * * This class imlements the ILockBytes inteface and represents a byte array * object supported by an HGLOBAL pointer. */ struct HGLOBALLockBytesImpl { /* * Needs to be the first item in the stuct * since we want to cast this in an ILockBytes pointer */ ICOM_VFIELD(ILockBytes); /* * Reference count */ ULONG ref; /* * Support for the LockBytes object */ HGLOBAL supportHandle; /* * This flag is TRUE if the HGLOBAL is destroyed when the object * is finally released. */ BOOL deleteOnRelease; /* * Helper variable that contains the size of the byte array */ ULARGE_INTEGER byteArraySize; }; typedef struct HGLOBALLockBytesImpl HGLOBALLockBytesImpl; /* * Method definition for the HGLOBALLockBytesImpl class. */ HGLOBALLockBytesImpl* HGLOBALLockBytesImpl_Construct( HGLOBAL hGlobal, BOOL fDeleteOnRelease); void HGLOBALLockBytesImpl_Destroy(HGLOBALLockBytesImpl* This); HRESULT WINAPI HGLOBALLockBytesImpl_QueryInterface( ILockBytes* iface, REFIID riid, /* [in] */ void** ppvObject); /* [iid_is][out] */ ULONG WINAPI HGLOBALLockBytesImpl_AddRef( ILockBytes* iface); ULONG WINAPI HGLOBALLockBytesImpl_Release( ILockBytes* iface); HRESULT WINAPI HGLOBALLockBytesImpl_ReadAt( ILockBytes* iface, ULARGE_INTEGER ulOffset, /* [in] */ void* pv, /* [length_is][size_is][out] */ ULONG cb, /* [in] */ ULONG* pcbRead); /* [out] */ HRESULT WINAPI HGLOBALLockBytesImpl_WriteAt( ILockBytes* iface, ULARGE_INTEGER ulOffset, /* [in] */ const void* pv, /* [size_is][in] */ ULONG cb, /* [in] */ ULONG* pcbWritten); /* [out] */ HRESULT WINAPI HGLOBALLockBytesImpl_Flush( ILockBytes* iface); HRESULT WINAPI HGLOBALLockBytesImpl_SetSize( ILockBytes* iface, ULARGE_INTEGER libNewSize); /* [in] */ HRESULT WINAPI HGLOBALLockBytesImpl_LockRegion( ILockBytes* iface, ULARGE_INTEGER libOffset, /* [in] */ ULARGE_INTEGER cb, /* [in] */ DWORD dwLockType); /* [in] */ HRESULT WINAPI HGLOBALLockBytesImpl_UnlockRegion( ILockBytes* iface, ULARGE_INTEGER libOffset, /* [in] */ ULARGE_INTEGER cb, /* [in] */ DWORD dwLockType); /* [in] */ HRESULT WINAPI HGLOBALLockBytesImpl_Stat( ILockBytes* iface, STATSTG* pstatstg, /* [out] */ DWORD grfStatFlag); /* [in] */ /* * Virtual function table for the HGLOBALLockBytesImpl class. */ static ICOM_VTABLE(ILockBytes) HGLOBALLockBytesImpl_Vtbl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE HGLOBALLockBytesImpl_QueryInterface, HGLOBALLockBytesImpl_AddRef, HGLOBALLockBytesImpl_Release, HGLOBALLockBytesImpl_ReadAt, HGLOBALLockBytesImpl_WriteAt, HGLOBALLockBytesImpl_Flush, HGLOBALLockBytesImpl_SetSize, HGLOBALLockBytesImpl_LockRegion, HGLOBALLockBytesImpl_UnlockRegion, HGLOBALLockBytesImpl_Stat, }; /****************************************************************************** * CreateILockBytesOnHGlobal [OLE32.57] */ HRESULT WINAPI CreateILockBytesOnHGlobal(HGLOBAL hGlobal, BOOL fDeleteOnRelease, LPLOCKBYTES* ppLkbyt) { HGLOBALLockBytesImpl* newLockBytes; newLockBytes = HGLOBALLockBytesImpl_Construct(hGlobal, fDeleteOnRelease); if (newLockBytes != NULL) { return IUnknown_QueryInterface((IUnknown*)newLockBytes, &IID_ILockBytes, (void**)ppLkbyt); } return E_OUTOFMEMORY; } /****************************************************************************** * GetHGlobalFromILockBytes [OLE32.70] */ HRESULT WINAPI GetHGlobalFromILockBytes(ILockBytes* plkbyt, HGLOBAL* phglobal) { HGLOBALLockBytesImpl* const pMemLockBytes = (HGLOBALLockBytesImpl*)plkbyt; if (ICOM_VTBL(pMemLockBytes) == &HGLOBALLockBytesImpl_Vtbl) *phglobal = pMemLockBytes->supportHandle; else *phglobal = 0; if (*phglobal == 0) return E_INVALIDARG; return S_OK; } /****************************************************************************** * * HGLOBALLockBytesImpl implementation * */ /****************************************************************************** * This is the constructor for the HGLOBALLockBytesImpl class. * * Params: * hGlobal - Handle that will support the stream. can be NULL. * fDeleteOnRelease - Flag set to TRUE if the HGLOBAL will be released * when the IStream object is destroyed. */ HGLOBALLockBytesImpl* HGLOBALLockBytesImpl_Construct(HGLOBAL hGlobal, BOOL fDeleteOnRelease) { HGLOBALLockBytesImpl* newLockBytes; newLockBytes = HeapAlloc(GetProcessHeap(), 0, sizeof(HGLOBALLockBytesImpl)); if (newLockBytes!=0) { /* * Set up the virtual function table and reference count. */ ICOM_VTBL(newLockBytes) = &HGLOBALLockBytesImpl_Vtbl; newLockBytes->ref = 0; /* * Initialize the support. */ newLockBytes->supportHandle = hGlobal; newLockBytes->deleteOnRelease = fDeleteOnRelease; /* * This method will allocate a handle if one is not supplied. */ if (newLockBytes->supportHandle == 0) { newLockBytes->supportHandle = GlobalAlloc(GMEM_MOVEABLE | GMEM_NODISCARD, 0); } /* * Initialize the size of the array to the size of the handle. */ newLockBytes->byteArraySize.s.HighPart = 0; newLockBytes->byteArraySize.s.LowPart = GlobalSize( newLockBytes->supportHandle); } return newLockBytes; } /****************************************************************************** * This is the destructor of the HGLOBALStreamImpl class. * * This method will clean-up all the resources used-up by the given * HGLOBALLockBytesImpl class. The pointer passed-in to this function will be * freed and will not be valid anymore. */ void HGLOBALLockBytesImpl_Destroy(HGLOBALLockBytesImpl* This) { /* * Release the HGlobal if the constructor asked for that. */ if (This->deleteOnRelease) { GlobalFree(This->supportHandle); This->supportHandle = 0; } /* * Finally, free the memory used-up by the class. */ HeapFree(GetProcessHeap(), 0, This); } /****************************************************************************** * This implements the IUnknown method QueryInterface for this * class */ HRESULT WINAPI HGLOBALLockBytesImpl_QueryInterface( ILockBytes* iface, REFIID riid, /* [in] */ void** ppvObject) /* [iid_is][out] */ { HGLOBALLockBytesImpl* const This=(HGLOBALLockBytesImpl*)iface; /* * Perform a sanity check on the parameters. */ if (ppvObject==0) return E_INVALIDARG; /* * Initialize the return parameter. */ *ppvObject = 0; /* * Compare the riid with the interface IDs implemented by this object. */ if (memcmp(&IID_IUnknown, riid, sizeof(IID_IUnknown)) == 0) { *ppvObject = (ILockBytes*)This; } else if (memcmp(&IID_ILockBytes, riid, sizeof(IID_ILockBytes)) == 0) { *ppvObject = (ILockBytes*)This; } /* * Check that we obtained an interface. */ if ((*ppvObject)==0) return E_NOINTERFACE; /* * Query Interface always increases the reference count by one when it is * successful */ HGLOBALLockBytesImpl_AddRef(iface); return S_OK;; } /****************************************************************************** * This implements the IUnknown method AddRef for this * class */ ULONG WINAPI HGLOBALLockBytesImpl_AddRef(ILockBytes* iface) { HGLOBALLockBytesImpl* const This=(HGLOBALLockBytesImpl*)iface; This->ref++; return This->ref; } /****************************************************************************** * This implements the IUnknown method Release for this * class */ ULONG WINAPI HGLOBALLockBytesImpl_Release(ILockBytes* iface) { HGLOBALLockBytesImpl* const This=(HGLOBALLockBytesImpl*)iface; ULONG newRef; This->ref--; newRef = This->ref; /* * If the reference count goes down to 0, perform suicide. */ if (newRef==0) { HGLOBALLockBytesImpl_Destroy(This); } return newRef; } /****************************************************************************** * This method is part of the ILockBytes interface. * * It reads a block of information from the byte array at the specified * offset. * * See the documentation of ILockBytes for more info. */ HRESULT WINAPI HGLOBALLockBytesImpl_ReadAt( ILockBytes* iface, ULARGE_INTEGER ulOffset, /* [in] */ void* pv, /* [length_is][size_is][out] */ ULONG cb, /* [in] */ ULONG* pcbRead) /* [out] */ { HGLOBALLockBytesImpl* const This=(HGLOBALLockBytesImpl*)iface; void* supportBuffer; ULONG bytesReadBuffer = 0; ULONG bytesToReadFromBuffer; /* * If the caller is not interested in the number of bytes read, * we use another buffer to avoid "if" statements in the code. */ if (pcbRead == 0) pcbRead = &bytesReadBuffer; /* * Make sure the offset is valid. */ if (ulOffset.s.LowPart > This->byteArraySize.s.LowPart) return E_FAIL; /* * Using the known size of the array, calculate the number of bytes * to read. */ bytesToReadFromBuffer = min(This->byteArraySize.s.LowPart - ulOffset.s.LowPart, cb); /* * Lock the buffer in position and copy the data. */ supportBuffer = GlobalLock(This->supportHandle); memcpy(pv, (char *) supportBuffer + ulOffset.s.LowPart, bytesToReadFromBuffer); /* * Return the number of bytes read. */ *pcbRead = bytesToReadFromBuffer; /* * Cleanup */ GlobalUnlock(This->supportHandle); /* * The function returns S_OK if the specified number of bytes were read * or the end of the array was reached. * It returns STG_E_READFAULT if the number of bytes to read does not equal * the number of bytes actually read. */ if(*pcbRead == cb) return S_OK; return STG_E_READFAULT; } /****************************************************************************** * This method is part of the ILockBytes interface. * * It writes the specified bytes at the specified offset. * position. If the array is too small, it will be resized. * * See the documentation of ILockBytes for more info. */ HRESULT WINAPI HGLOBALLockBytesImpl_WriteAt( ILockBytes* iface, ULARGE_INTEGER ulOffset, /* [in] */ const void* pv, /* [size_is][in] */ ULONG cb, /* [in] */ ULONG* pcbWritten) /* [out] */ { HGLOBALLockBytesImpl* const This=(HGLOBALLockBytesImpl*)iface; void* supportBuffer; ULARGE_INTEGER newSize; ULONG bytesWritten = 0; /* * If the caller is not interested in the number of bytes written, * we use another buffer to avoid "if" statements in the code. */ if (pcbWritten == 0) pcbWritten = &bytesWritten; if (cb == 0) { return S_OK; } else { newSize.s.HighPart = 0; newSize.s.LowPart = ulOffset.s.LowPart + cb; } /* * Verify if we need to grow the stream */ if (newSize.s.LowPart > This->byteArraySize.s.LowPart) { /* grow stream */ if (HGLOBALLockBytesImpl_SetSize(iface, newSize) == STG_E_MEDIUMFULL) return STG_E_MEDIUMFULL; } /* * Lock the buffer in position and copy the data. */ supportBuffer = GlobalLock(This->supportHandle); memcpy((char *) supportBuffer + ulOffset.s.LowPart, pv, cb); /* * Return the number of bytes written. */ *pcbWritten = cb; /* * Cleanup */ GlobalUnlock(This->supportHandle); return S_OK; } /****************************************************************************** * This method is part of the ILockBytes interface. * * See the documentation of ILockBytes for more info. */ HRESULT WINAPI HGLOBALLockBytesImpl_Flush(ILockBytes* iface) { return S_OK; } /****************************************************************************** * This method is part of the ILockBytes interface. * * It will change the size of the byte array. * * See the documentation of ILockBytes for more info. */ HRESULT WINAPI HGLOBALLockBytesImpl_SetSize( ILockBytes* iface, ULARGE_INTEGER libNewSize) /* [in] */ { HGLOBALLockBytesImpl* const This=(HGLOBALLockBytesImpl*)iface; /* * As documented. */ if (libNewSize.s.HighPart != 0) return STG_E_INVALIDFUNCTION; if (This->byteArraySize.s.LowPart == libNewSize.s.LowPart) return S_OK; /* * Re allocate the HGlobal to fit the new size of the stream. */ This->supportHandle = GlobalReAlloc(This->supportHandle, libNewSize.s.LowPart, 0); if (This->supportHandle == 0) return STG_E_MEDIUMFULL; This->byteArraySize.s.LowPart = libNewSize.s.LowPart; return S_OK; } /****************************************************************************** * This method is part of the ILockBytes interface. * * The global memory implementation of ILockBytes does not support locking. * * See the documentation of ILockBytes for more info. */ HRESULT WINAPI HGLOBALLockBytesImpl_LockRegion( ILockBytes* iface, ULARGE_INTEGER libOffset, /* [in] */ ULARGE_INTEGER cb, /* [in] */ DWORD dwLockType) /* [in] */ { return STG_E_INVALIDFUNCTION; } /****************************************************************************** * This method is part of the ILockBytes interface. * * The global memory implementation of ILockBytes does not support locking. * * See the documentation of ILockBytes for more info. */ HRESULT WINAPI HGLOBALLockBytesImpl_UnlockRegion( ILockBytes* iface, ULARGE_INTEGER libOffset, /* [in] */ ULARGE_INTEGER cb, /* [in] */ DWORD dwLockType) /* [in] */ { return STG_E_INVALIDFUNCTION; } /****************************************************************************** * This method is part of the ILockBytes interface. * * This method returns information about the current * byte array object. * * See the documentation of ILockBytes for more info. */ HRESULT WINAPI HGLOBALLockBytesImpl_Stat( ILockBytes* iface, STATSTG* pstatstg, /* [out] */ DWORD grfStatFlag) /* [in] */ { HGLOBALLockBytesImpl* const This=(HGLOBALLockBytesImpl*)iface; memset(pstatstg, 0, sizeof(STATSTG)); pstatstg->pwcsName = NULL; pstatstg->type = STGTY_LOCKBYTES; pstatstg->cbSize = This->byteArraySize; return S_OK; } wine-20000526/dlls/ole32/moniker.c0100644000175000001440000004377107061515422016152 0ustar julliardusers/* * Monikers * * Copyright 1998 Marcus Meissner * Copyright 1999 Noomen Hamza */ #include #include "winerror.h" #include "wine/obj_moniker.h" #include "debugtools.h" #include "heap.h" #include "ole2.h" DEFAULT_DEBUG_CHANNEL(ole) #define BLOCK_TAB_SIZE 20 /* represent the first size table and it's increment block size */ /* define the structure of the running object table elements */ typedef struct RunObject{ IUnknown* pObj; /* points on a running object*/ IMoniker* pmkObj; /* points on a moniker who identifies this object */ FILETIME lastModifObj; DWORD identRegObj; /* registration key relative to this object */ DWORD regTypeObj; /* registration type : strong or weak */ }RunObject; /* define the RunningObjectTableImpl structure */ typedef struct RunningObjectTableImpl{ ICOM_VFIELD(IRunningObjectTable); ULONG ref; RunObject* runObjTab; /* pointer to the first object in the table */ DWORD runObjTabSize; /* current table size */ DWORD runObjTabLastIndx; /* first free index element in the table. */ DWORD runObjTabRegister; /* registration key of the next registered object */ } RunningObjectTableImpl; RunningObjectTableImpl* runningObjectTableInstance=0; /* IRunningObjectTable prototype functions : */ /* IUnknown functions*/ static HRESULT WINAPI RunningObjectTableImpl_QueryInterface(IRunningObjectTable* iface,REFIID riid,void** ppvObject); static ULONG WINAPI RunningObjectTableImpl_AddRef(IRunningObjectTable* iface); static ULONG WINAPI RunningObjectTableImpl_Release(IRunningObjectTable* iface); /* IRunningObjectTable functions */ static HRESULT WINAPI RunningObjectTableImpl_Register(IRunningObjectTable* iface, DWORD grfFlags,IUnknown* punkObject,IMoniker* pmkObjectName,DWORD* pdwRegister); static HRESULT WINAPI RunningObjectTableImpl_Revoke(IRunningObjectTable* iface, DWORD dwRegister); static HRESULT WINAPI RunningObjectTableImpl_IsRunning(IRunningObjectTable* iface, IMoniker* pmkObjectName); static HRESULT WINAPI RunningObjectTableImpl_GetObject(IRunningObjectTable* iface, IMoniker* pmkObjectName,IUnknown** ppunkObject); static HRESULT WINAPI RunningObjectTableImpl_NoteChangeTime(IRunningObjectTable* iface, DWORD dwRegister,FILETIME* pfiletime); static HRESULT WINAPI RunningObjectTableImpl_GetTimeOfLastChange(IRunningObjectTable* iface, IMoniker* pmkObjectName,FILETIME* pfiletime); static HRESULT WINAPI RunningObjectTableImpl_EnumRunning(IRunningObjectTable* iface, IEnumMoniker** ppenumMoniker); /* Local functions*/ HRESULT WINAPI RunningObjectTableImpl_Initialize(); HRESULT WINAPI RunningObjectTableImpl_UnInitialize(); HRESULT WINAPI RunningObjectTableImpl_Destroy(); HRESULT WINAPI RunningObjectTableImpl_GetObjectIndex(RunningObjectTableImpl* This,DWORD identReg,IMoniker* pmk,DWORD *indx); /* Virtual function table for the IRunningObjectTable class. */ static ICOM_VTABLE(IRunningObjectTable) VT_RunningObjectTableImpl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE RunningObjectTableImpl_QueryInterface, RunningObjectTableImpl_AddRef, RunningObjectTableImpl_Release, RunningObjectTableImpl_Register, RunningObjectTableImpl_Revoke, RunningObjectTableImpl_IsRunning, RunningObjectTableImpl_GetObject, RunningObjectTableImpl_NoteChangeTime, RunningObjectTableImpl_GetTimeOfLastChange, RunningObjectTableImpl_EnumRunning }; /*********************************************************************** * RunningObjectTable_QueryInterface */ HRESULT WINAPI RunningObjectTableImpl_QueryInterface(IRunningObjectTable* iface,REFIID riid,void** ppvObject) { ICOM_THIS(RunningObjectTableImpl,iface); TRACE("(%p,%p,%p)\n",This,riid,ppvObject); /* validate arguments */ if (This==0) return CO_E_NOTINITIALIZED; if (ppvObject==0) return E_INVALIDARG; *ppvObject = 0; if (IsEqualIID(&IID_IUnknown, riid)) *ppvObject = (IRunningObjectTable*)This; else if (IsEqualIID(&IID_IRunningObjectTable, riid)) *ppvObject = (IRunningObjectTable*)This; if ((*ppvObject)==0) return E_NOINTERFACE; RunningObjectTableImpl_AddRef(iface); return S_OK; } /*********************************************************************** * RunningObjectTable_AddRef */ ULONG WINAPI RunningObjectTableImpl_AddRef(IRunningObjectTable* iface) { ICOM_THIS(RunningObjectTableImpl,iface); TRACE("(%p)\n",This); return ++(This->ref); } /*********************************************************************** * RunningObjectTable_Initialize */ HRESULT WINAPI RunningObjectTableImpl_Destroy() { TRACE("()\n"); if (runningObjectTableInstance==NULL) return E_INVALIDARG; /* free the ROT table memory */ HeapFree(GetProcessHeap(),0,runningObjectTableInstance->runObjTab); /* free the ROT structure memory */ HeapFree(GetProcessHeap(),0,runningObjectTableInstance); return S_OK; } /*********************************************************************** * RunningObjectTable_Release */ ULONG WINAPI RunningObjectTableImpl_Release(IRunningObjectTable* iface) { DWORD i; ICOM_THIS(RunningObjectTableImpl,iface); TRACE("(%p)\n",This); This->ref--; /* unitialize ROT structure if there's no more reference to it*/ if (This->ref==0){ /* release all registered objects */ for(i=0;irunObjTabLastIndx;i++) { if (( This->runObjTab[i].regTypeObj & ROTFLAGS_REGISTRATIONKEEPSALIVE) != 0) IUnknown_Release(This->runObjTab[i].pObj); IMoniker_Release(This->runObjTab[i].pmkObj); } /* RunningObjectTable data structure will be not destroyed here ! the destruction will be done only * when RunningObjectTableImpl_UnInitialize function is called */ /* there's no more elements in the table */ This->runObjTabRegister=0; This->runObjTabLastIndx=0; return 0; } return This->ref; } /*********************************************************************** * RunningObjectTable_Initialize */ HRESULT WINAPI RunningObjectTableImpl_Initialize() { TRACE("()\n"); /* create the unique instance of the RunningObjectTableImpl structure */ runningObjectTableInstance = HeapAlloc(GetProcessHeap(), 0, sizeof(RunningObjectTableImpl)); if (runningObjectTableInstance == 0) return E_OUTOFMEMORY; /* initialize the virtual table function */ ICOM_VTBL(runningObjectTableInstance) = &VT_RunningObjectTableImpl; /* the initial reference is set to "1" ! because if set to "0" it will be not practis when */ /* the ROT refered many times not in the same time (all the objects in the ROT will */ /* be removed evry time the ROT is removed ) */ runningObjectTableInstance->ref = 1; /* allocate space memory for the table witch contains all the running objects */ runningObjectTableInstance->runObjTab = HeapAlloc(GetProcessHeap(), 0, sizeof(RunObject[BLOCK_TAB_SIZE])); if (runningObjectTableInstance->runObjTab == NULL) return E_OUTOFMEMORY; runningObjectTableInstance->runObjTabSize=BLOCK_TAB_SIZE; runningObjectTableInstance->runObjTabRegister=1; runningObjectTableInstance->runObjTabLastIndx=0; return S_OK; } /*********************************************************************** * RunningObjectTable_UnInitialize */ HRESULT WINAPI RunningObjectTableImpl_UnInitialize() { TRACE("()\n"); if (runningObjectTableInstance==NULL) return E_POINTER; RunningObjectTableImpl_Release((IRunningObjectTable*)runningObjectTableInstance); RunningObjectTableImpl_Destroy(); return S_OK; } /*********************************************************************** * RunningObjectTable_Register */ HRESULT WINAPI RunningObjectTableImpl_Register(IRunningObjectTable* iface, DWORD grfFlags, /* Registration options */ IUnknown *punkObject, /* Pointer to the object being registered */ IMoniker *pmkObjectName, /* Pointer to the moniker of the object being registered */ DWORD *pdwRegister) /* Pointer to the value identifying the registration */ { HRESULT res=S_OK; ICOM_THIS(RunningObjectTableImpl,iface); TRACE("(%p,%ld,%p,%p,%p)\n",This,grfFlags,punkObject,pmkObjectName,pdwRegister); /* there's only tow types of register : strong and or weak registration (only one must be passed on parameter) */ if ( ( (grfFlags & ROTFLAGS_REGISTRATIONKEEPSALIVE) || !(grfFlags & ROTFLAGS_ALLOWANYCLIENT)) && (!(grfFlags & ROTFLAGS_REGISTRATIONKEEPSALIVE) || (grfFlags & ROTFLAGS_ALLOWANYCLIENT)) && (grfFlags) ) return E_INVALIDARG; if (punkObject==NULL || pmkObjectName==NULL || pdwRegister==NULL) return E_INVALIDARG; /* verify if the object to be registered was registered before */ if (RunningObjectTableImpl_GetObjectIndex(This,-1,pmkObjectName,NULL)==S_OK) res = MK_S_MONIKERALREADYREGISTERED; /* put the new registered object in the first free element in the table */ This->runObjTab[This->runObjTabLastIndx].pObj = punkObject; This->runObjTab[This->runObjTabLastIndx].pmkObj = pmkObjectName; This->runObjTab[This->runObjTabLastIndx].regTypeObj = grfFlags; This->runObjTab[This->runObjTabLastIndx].identRegObj = This->runObjTabRegister; CoFileTimeNow(&(This->runObjTab[This->runObjTabLastIndx].lastModifObj)); /* gives a registration identifier to the registered object*/ (*pdwRegister)= This->runObjTabRegister; if (This->runObjTabRegister == 0xFFFFFFFF){ FIXME("runObjTabRegister: %ld is out of data limite \n",This->runObjTabRegister); return E_FAIL; } This->runObjTabRegister++; This->runObjTabLastIndx++; if (This->runObjTabLastIndx == This->runObjTabSize){ /* table is full ! so it must be resized */ This->runObjTabSize+=BLOCK_TAB_SIZE; /* newsize table */ This->runObjTab=HeapReAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,This->runObjTab, This->runObjTabSize * sizeof(RunObject)); if (!This->runObjTab) return E_OUTOFMEMORY; } /* add a reference to the object in the strong registration case */ if ((grfFlags & ROTFLAGS_REGISTRATIONKEEPSALIVE) !=0 ) IUnknown_AddRef(punkObject); IMoniker_AddRef(pmkObjectName); return res; } /*********************************************************************** * RunningObjectTable_Revoke */ HRESULT WINAPI RunningObjectTableImpl_Revoke( IRunningObjectTable* iface, DWORD dwRegister) /* Value identifying registration to be revoked*/ { DWORD index,j; ICOM_THIS(RunningObjectTableImpl,iface); TRACE("(%p,%ld)\n",This,dwRegister); /* verify if the object to be revoked was registered before or not */ if (RunningObjectTableImpl_GetObjectIndex(This,dwRegister,NULL,&index)==S_FALSE) return E_INVALIDARG; /* release the object if it was registered with a strong registrantion option */ if ((This->runObjTab[index].regTypeObj & ROTFLAGS_REGISTRATIONKEEPSALIVE)!=0) IUnknown_Release(This->runObjTab[index].pObj); IMoniker_Release(This->runObjTab[index].pmkObj); /* remove the object from the table */ for(j=index; jrunObjTabLastIndx-1; j++) This->runObjTab[j]= This->runObjTab[j+1]; This->runObjTabLastIndx--; return S_OK; } /*********************************************************************** * RunningObjectTable_IsRunning */ HRESULT WINAPI RunningObjectTableImpl_IsRunning( IRunningObjectTable* iface, IMoniker *pmkObjectName) /* Pointer to the moniker of the object whose status is desired */ { ICOM_THIS(RunningObjectTableImpl,iface); TRACE("(%p,%p)\n",This,pmkObjectName); return RunningObjectTableImpl_GetObjectIndex(This,-1,pmkObjectName,NULL); } /*********************************************************************** * RunningObjectTable_GetObject */ HRESULT WINAPI RunningObjectTableImpl_GetObject( IRunningObjectTable* iface, IMoniker *pmkObjectName,/* Pointer to the moniker on the object */ IUnknown **ppunkObject) /* Address of output variable that receives the IUnknown interface pointer */ { DWORD index; ICOM_THIS(RunningObjectTableImpl,iface); TRACE("(%p,%p,%p)\n",This,pmkObjectName,ppunkObject); if (ppunkObject==NULL) return E_POINTER; *ppunkObject=0; /* verify if the object was registered before or not */ if (RunningObjectTableImpl_GetObjectIndex(This,-1,pmkObjectName,&index)==S_FALSE) return MK_E_UNAVAILABLE; /* add a reference to the object then set output object argument */ IUnknown_AddRef(This->runObjTab[index].pObj); *ppunkObject=This->runObjTab[index].pObj; return S_OK; } /*********************************************************************** * RunningObjectTable_NoteChangeTime */ HRESULT WINAPI RunningObjectTableImpl_NoteChangeTime(IRunningObjectTable* iface, DWORD dwRegister, /* Value identifying registration being updated */ FILETIME *pfiletime) /* Pointer to structure containing object's last change time */ { DWORD index=-1; ICOM_THIS(RunningObjectTableImpl,iface); TRACE("(%p,%ld,%p)\n",This,dwRegister,pfiletime); /* verify if the object to be changed was registered before or not */ if (RunningObjectTableImpl_GetObjectIndex(This,dwRegister,NULL,&index)==S_FALSE) return E_INVALIDARG; /* set the new value of the last time change */ This->runObjTab[index].lastModifObj= (*pfiletime); return S_OK; } /*********************************************************************** * RunningObjectTable_GetTimeOfLastChange */ HRESULT WINAPI RunningObjectTableImpl_GetTimeOfLastChange(IRunningObjectTable* iface, IMoniker *pmkObjectName, /* Pointer to moniker on the object whose status is desired */ FILETIME *pfiletime) /* Pointer to structure that receives object's last change time */ { DWORD index=-1; ICOM_THIS(RunningObjectTableImpl,iface); TRACE("(%p,%p,%p)\n",This,pmkObjectName,pfiletime); if (pmkObjectName==NULL || pfiletime==NULL) return E_INVALIDARG; /* verify if the object was registered before or not */ if (RunningObjectTableImpl_GetObjectIndex(This,-1,pmkObjectName,&index)==S_FALSE) return MK_E_UNAVAILABLE;; (*pfiletime)= This->runObjTab[index].lastModifObj; return S_OK; } /*********************************************************************** * RunningObjectTable_EnumRunning */ HRESULT WINAPI RunningObjectTableImpl_EnumRunning(IRunningObjectTable* iface, IEnumMoniker **ppenumMoniker) /* Address of output variable that receives the IEnumMoniker interface pointer */ { FIXME("(%p,%p) needs the IEnumMoniker implementation \n",iface,ppenumMoniker); return E_NOTIMPL; } /*********************************************************************** * GetObjectIndex */ HRESULT WINAPI RunningObjectTableImpl_GetObjectIndex(RunningObjectTableImpl* This, DWORD identReg, IMoniker* pmk, DWORD *indx) { DWORD i; TRACE("(%p,%ld,%p,%p)\n",This,identReg,pmk,indx); if (pmk!=NULL) /* search object identified by a moniker */ for(i=0 ; (i < This->runObjTabLastIndx) &&(!IMoniker_IsEqual(This->runObjTab[i].pmkObj,pmk)==S_OK);i++); else /* search object identified by a register identifier */ for(i=0;((irunObjTabLastIndx)&&(This->runObjTab[i].identRegObj!=identReg));i++); if (i==This->runObjTabLastIndx) return S_FALSE; if (indx != NULL) *indx=i; return S_OK; } /****************************************************************************** * GetRunningObjectTable16 [OLE2.30] */ HRESULT WINAPI GetRunningObjectTable16(DWORD reserved, LPRUNNINGOBJECTTABLE *pprot) { FIXME("(%ld,%p),stub!\n",reserved,pprot); return E_NOTIMPL; } /*********************************************************************** * GetRunningObjectTable (OLE2.73) */ HRESULT WINAPI GetRunningObjectTable(DWORD reserved, LPRUNNINGOBJECTTABLE *pprot) { IID riid=IID_IRunningObjectTable; HRESULT res; TRACE("()\n"); if (reserved!=0) return E_UNEXPECTED; if(runningObjectTableInstance==NULL) return CO_E_NOTINITIALIZED; res = RunningObjectTableImpl_QueryInterface((IRunningObjectTable*)runningObjectTableInstance,&riid,(void**)pprot); return res; } /****************************************************************************** * OleRun [OLE32.123] */ HRESULT WINAPI OleRun(LPUNKNOWN pUnknown) { IRunnableObject *runable; ICOM_THIS(IRunnableObject,pUnknown); LRESULT ret; ret = IRunnableObject_QueryInterface(This,&IID_IRunnableObject,(LPVOID*)&runable); if (ret) return 0; /* Appears to return no error. */ ret = IRunnableObject_Run(runable,NULL); IRunnableObject_Release(runable); return ret; } /****************************************************************************** * MkParseDisplayName [OLE32.81] */ HRESULT MkParseDisplayName( LPBC pbc, LPCOLESTR szUserName, LPDWORD pchEaten, LPMONIKER *ppmk) { FIXME("(%p, %s, %p, %p): stub.\n", pbc, debugstr_w(szUserName), pchEaten, *ppmk); if (!(IsValidInterface((LPUNKNOWN) pbc))) return E_INVALIDARG; return MK_E_SYNTAX; } wine-20000526/dlls/ole32/ole2.c0100644000175000001440000015203107105334140015330 0ustar julliardusers/* * OLE2 library * * Copyright 1995 Martin von Loewis * Copyright 1999 Francis Beaudet * Copyright 1999 Noel Borthwick */ #include #include #include #include #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "winerror.h" #include "ole2.h" #include "process.h" #include "commctrl.h" #include "wine/obj_clientserver.h" #include "wine/winbase16.h" #include "wine/wingdi16.h" #include "debugtools.h" #include "ole2ver.h" #include "winreg.h" DEFAULT_DEBUG_CHANNEL(ole); /****************************************************************************** * These are static/global variables and internal data structures that the * OLE module uses to maintain it's state. */ typedef struct tagDropTargetNode { HWND hwndTarget; IDropTarget* dropTarget; struct tagDropTargetNode* prevDropTarget; struct tagDropTargetNode* nextDropTarget; } DropTargetNode; typedef struct tagTrackerWindowInfo { IDataObject* dataObject; IDropSource* dropSource; DWORD dwOKEffect; DWORD* pdwEffect; BOOL trackingDone; HRESULT returnValue; BOOL escPressed; HWND curDragTargetHWND; IDropTarget* curDragTarget; } TrackerWindowInfo; typedef struct tagOleMenuDescriptor /* OleMenuDescriptor */ { HWND hwndFrame; /* The containers frame window */ HWND hwndActiveObject; /* The active objects window */ OLEMENUGROUPWIDTHS mgw; /* OLE menu group widths for the shared menu */ HMENU hmenuCombined; /* The combined menu */ BOOL bIsServerItem; /* True if the currently open popup belongs to the server */ } OleMenuDescriptor; typedef struct tagOleMenuHookItem /* OleMenu hook item in per thread hook list */ { DWORD tid; /* Thread Id */ HANDLE hHeap; /* Heap this is allocated from */ HHOOK GetMsg_hHook; /* message hook for WH_GETMESSAGE */ HHOOK CallWndProc_hHook; /* message hook for WH_CALLWNDPROC */ struct tagOleMenuHookItem *next; } OleMenuHookItem; static OleMenuHookItem *hook_list; /* * This is the lock count on the OLE library. It is controlled by the * OLEInitialize/OLEUninitialize methods. */ static ULONG OLE_moduleLockCount = 0; /* * Name of our registered window class. */ static const char OLEDD_DRAGTRACKERCLASS[] = "WineDragDropTracker32"; /* * This is the head of the Drop target container. */ static DropTargetNode* targetListHead = NULL; /****************************************************************************** * These are the prototypes of miscelaneous utility methods */ static void OLEUTL_ReadRegistryDWORDValue(HKEY regKey, DWORD* pdwValue); /****************************************************************************** * These are the prototypes of the utility methods used to manage a shared menu */ static void OLEMenu_Initialize(); static void OLEMenu_UnInitialize(); BOOL OLEMenu_InstallHooks( DWORD tid ); BOOL OLEMenu_UnInstallHooks( DWORD tid ); OleMenuHookItem * OLEMenu_IsHookInstalled( DWORD tid ); static BOOL OLEMenu_FindMainMenuIndex( HMENU hMainMenu, HMENU hPopupMenu, UINT *pnPos ); BOOL OLEMenu_SetIsServerMenu( HMENU hmenu, OleMenuDescriptor *pOleMenuDescriptor ); LRESULT CALLBACK OLEMenu_CallWndProc(INT code, WPARAM wParam, LPARAM lParam); LRESULT CALLBACK OLEMenu_GetMsgProc(INT code, WPARAM wParam, LPARAM lParam); /****************************************************************************** * These are the prototypes of the OLE Clipboard initialization methods (in clipboard.c) */ void OLEClipbrd_UnInitialize(); void OLEClipbrd_Initialize(); /****************************************************************************** * These are the prototypes of the utility methods used for OLE Drag n Drop */ static void OLEDD_Initialize(); static void OLEDD_UnInitialize(); static void OLEDD_InsertDropTarget( DropTargetNode* nodeToAdd); static DropTargetNode* OLEDD_ExtractDropTarget( HWND hwndOfTarget); static DropTargetNode* OLEDD_FindDropTarget( HWND hwndOfTarget); static LRESULT WINAPI OLEDD_DragTrackerWindowProc( HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam); static void OLEDD_TrackMouseMove( TrackerWindowInfo* trackerInfo, POINT mousePos, DWORD keyState); static void OLEDD_TrackStateChange( TrackerWindowInfo* trackerInfo, POINT mousePos, DWORD keyState); static DWORD OLEDD_GetButtonState(); /****************************************************************************** * OleBuildVersion [OLE2.1] */ DWORD WINAPI OleBuildVersion(void) { TRACE("Returning version %d, build %d.\n", rmm, rup); return (rmm<<16)+rup; } /*********************************************************************** * OleInitialize (OLE2.2) (OLE32.108) */ HRESULT WINAPI OleInitialize(LPVOID reserved) { HRESULT hr; TRACE("(%p)\n", reserved); /* * The first duty of the OleInitialize is to initialize the COM libraries. */ hr = CoInitializeEx(NULL, COINIT_APARTMENTTHREADED); /* * If the CoInitializeEx call failed, the OLE libraries can't be * initialized. */ if (FAILED(hr)) return hr; /* * Then, it has to initialize the OLE specific modules. * This includes: * Clipboard * Drag and Drop * Object linking and Embedding * In-place activation */ if (OLE_moduleLockCount==0) { /* * Initialize the libraries. */ TRACE("() - Initializing the OLE libraries\n"); /* * OLE Clipboard */ OLEClipbrd_Initialize(); /* * Drag and Drop */ OLEDD_Initialize(); /* * OLE shared menu */ OLEMenu_Initialize(); } /* * Then, we increase the lock count on the OLE module. */ OLE_moduleLockCount++; return hr; } /****************************************************************************** * CoGetCurrentProcess [COMPOBJ.34] [OLE2.2][OLE32.108] * * NOTES * Is DWORD really the correct return type for this function? */ DWORD WINAPI CoGetCurrentProcess(void) { return (DWORD)PROCESS_Current(); } /****************************************************************************** * OleUninitialize [OLE2.3] [OLE32.131] */ void WINAPI OleUninitialize(void) { TRACE("()\n"); /* * Decrease the lock count on the OLE module. */ OLE_moduleLockCount--; /* * If we hit the bottom of the lock stack, free the libraries. */ if (OLE_moduleLockCount==0) { /* * Actually free the libraries. */ TRACE("() - Freeing the last reference count\n"); /* * OLE Clipboard */ OLEClipbrd_UnInitialize(); /* * Drag and Drop */ OLEDD_UnInitialize(); /* * OLE shared menu */ OLEMenu_UnInitialize(); } /* * Then, uninitialize the COM libraries. */ CoUninitialize(); } /****************************************************************************** * CoRegisterMessageFilter [OLE32.38] */ HRESULT WINAPI CoRegisterMessageFilter( LPMESSAGEFILTER lpMessageFilter, /* Pointer to interface */ LPMESSAGEFILTER *lplpMessageFilter /* Indirect pointer to prior instance if non-NULL */ ) { FIXME("stub\n"); if (lplpMessageFilter) { *lplpMessageFilter = NULL; } return S_OK; } /****************************************************************************** * OleInitializeWOW [OLE32.109] */ HRESULT WINAPI OleInitializeWOW(DWORD x) { FIXME("(0x%08lx),stub!\n",x); return 0; } /*********************************************************************** * RegisterDragDrop16 (OLE2.35) */ HRESULT WINAPI RegisterDragDrop16( HWND16 hwnd, LPDROPTARGET pDropTarget ) { FIXME("(0x%04x,%p),stub!\n",hwnd,pDropTarget); return S_OK; } /*********************************************************************** * RegisterDragDrop (OLE32.139) */ HRESULT WINAPI RegisterDragDrop( HWND hwnd, LPDROPTARGET pDropTarget) { DropTargetNode* dropTargetInfo; TRACE("(0x%x,%p)\n", hwnd, pDropTarget); /* * First, check if the window is already registered. */ dropTargetInfo = OLEDD_FindDropTarget(hwnd); if (dropTargetInfo!=NULL) return DRAGDROP_E_ALREADYREGISTERED; /* * If it's not there, we can add it. We first create a node for it. */ dropTargetInfo = HeapAlloc(GetProcessHeap(), 0, sizeof(DropTargetNode)); if (dropTargetInfo==NULL) return E_OUTOFMEMORY; dropTargetInfo->hwndTarget = hwnd; dropTargetInfo->prevDropTarget = NULL; dropTargetInfo->nextDropTarget = NULL; /* * Don't forget that this is an interface pointer, need to nail it down since * we keep a copy of it. */ dropTargetInfo->dropTarget = pDropTarget; IDropTarget_AddRef(dropTargetInfo->dropTarget); OLEDD_InsertDropTarget(dropTargetInfo); return S_OK; } /*********************************************************************** * RevokeDragDrop16 (OLE2.36) */ HRESULT WINAPI RevokeDragDrop16( HWND16 hwnd ) { FIXME("(0x%04x),stub!\n",hwnd); return S_OK; } /*********************************************************************** * RevokeDragDrop (OLE32.141) */ HRESULT WINAPI RevokeDragDrop( HWND hwnd) { DropTargetNode* dropTargetInfo; TRACE("(0x%x)\n", hwnd); /* * First, check if the window is already registered. */ dropTargetInfo = OLEDD_ExtractDropTarget(hwnd); /* * If it ain't in there, it's an error. */ if (dropTargetInfo==NULL) return DRAGDROP_E_NOTREGISTERED; /* * If it's in there, clean-up it's used memory and * references */ IDropTarget_Release(dropTargetInfo->dropTarget); HeapFree(GetProcessHeap(), 0, dropTargetInfo); return S_OK; } /*********************************************************************** * OleRegGetUserType (OLE32.122) * * This implementation of OleRegGetUserType ignores the dwFormOfType * parameter and always returns the full name of the object. This is * not too bad since this is the case for many objects because of the * way they are registered. */ HRESULT WINAPI OleRegGetUserType( REFCLSID clsid, DWORD dwFormOfType, LPOLESTR* pszUserType) { char xclsid[50]; char keyName[60]; DWORD dwKeyType; DWORD cbData; HKEY clsidKey; LONG hres; LPBYTE buffer; HRESULT retVal; /* * Initialize the out parameter. */ *pszUserType = NULL; /* * Build the key name we're looking for */ WINE_StringFromCLSID((LPCLSID)clsid, xclsid); strcpy(keyName, "CLSID\\"); strcat(keyName, xclsid); strcat(keyName, "\\"); TRACE("(%s, %ld, %p)\n", keyName, dwFormOfType, pszUserType); /* * Open the class id Key */ hres = RegOpenKeyA(HKEY_CLASSES_ROOT, keyName, &clsidKey); if (hres != ERROR_SUCCESS) return REGDB_E_CLASSNOTREG; /* * Retrieve the size of the name string. */ cbData = 0; hres = RegQueryValueExA(clsidKey, "", NULL, &dwKeyType, NULL, &cbData); if (hres!=ERROR_SUCCESS) { RegCloseKey(clsidKey); return REGDB_E_READREGDB; } /* * Allocate a buffer for the registry value. */ *pszUserType = CoTaskMemAlloc(cbData*2); if (*pszUserType==NULL) { RegCloseKey(clsidKey); return E_OUTOFMEMORY; } buffer = HeapAlloc(GetProcessHeap(), 0, cbData); if (buffer == NULL) { RegCloseKey(clsidKey); CoTaskMemFree(*pszUserType); *pszUserType=NULL; return E_OUTOFMEMORY; } hres = RegQueryValueExA(clsidKey, "", NULL, &dwKeyType, buffer, &cbData); RegCloseKey(clsidKey); if (hres!=ERROR_SUCCESS) { CoTaskMemFree(*pszUserType); *pszUserType=NULL; retVal = REGDB_E_READREGDB; } else { lstrcpyAtoW(*pszUserType, buffer); retVal = S_OK; } HeapFree(GetProcessHeap(), 0, buffer); return retVal; } /*********************************************************************** * DoDragDrop [OLE32.65] */ HRESULT WINAPI DoDragDrop ( IDataObject *pDataObject, /* ptr to the data obj */ IDropSource* pDropSource, /* ptr to the source obj */ DWORD dwOKEffect, /* effects allowed by the source */ DWORD *pdwEffect) /* ptr to effects of the source */ { TrackerWindowInfo trackerInfo; HWND hwndTrackWindow; MSG msg; TRACE("(DataObject %p, DropSource %p)\n", pDataObject, pDropSource); /* * Setup the drag n drop tracking window. */ trackerInfo.dataObject = pDataObject; trackerInfo.dropSource = pDropSource; trackerInfo.dwOKEffect = dwOKEffect; trackerInfo.pdwEffect = pdwEffect; trackerInfo.trackingDone = FALSE; trackerInfo.escPressed = FALSE; trackerInfo.curDragTargetHWND = 0; trackerInfo.curDragTarget = 0; hwndTrackWindow = CreateWindowA(OLEDD_DRAGTRACKERCLASS, "TrackerWindow", WS_POPUP, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, 0, 0, 0, (LPVOID)&trackerInfo); if (hwndTrackWindow!=0) { /* * Capture the mouse input */ SetCapture(hwndTrackWindow); /* * Pump messages. All mouse input should go the the capture window. */ while (!trackerInfo.trackingDone && GetMessageA(&msg, 0, 0, 0) ) { if ( (msg.message >= WM_KEYFIRST) && (msg.message <= WM_KEYFIRST) ) { /* * When keyboard messages are sent to windows on this thread, we * want to ignore notify the drop source that the state changed. * in the case of the Escape key, we also notify the drop source * we give it a special meaning. */ if ( (msg.message==WM_KEYDOWN) && (msg.wParam==VK_ESCAPE) ) { trackerInfo.escPressed = TRUE; } /* * Notify the drop source. */ OLEDD_TrackStateChange(&trackerInfo, msg.pt, OLEDD_GetButtonState()); } else { /* * Dispatch the messages only when it's not a keyboard message. */ DispatchMessageA(&msg); } } /* * Destroy the temporary window. */ DestroyWindow(hwndTrackWindow); return trackerInfo.returnValue; } return E_FAIL; } /*********************************************************************** * OleQueryLinkFromData [OLE32.118] */ HRESULT WINAPI OleQueryLinkFromData( IDataObject* pSrcDataObject) { FIXME("(%p),stub!\n", pSrcDataObject); return S_OK; } /*********************************************************************** * OleRegGetMiscStatus [OLE32.121] */ HRESULT WINAPI OleRegGetMiscStatus( REFCLSID clsid, DWORD dwAspect, DWORD* pdwStatus) { char xclsid[50]; char keyName[60]; HKEY clsidKey; HKEY miscStatusKey; HKEY aspectKey; LONG result; /* * Initialize the out parameter. */ *pdwStatus = 0; /* * Build the key name we're looking for */ WINE_StringFromCLSID((LPCLSID)clsid, xclsid); strcpy(keyName, "CLSID\\"); strcat(keyName, xclsid); strcat(keyName, "\\"); TRACE("(%s, %ld, %p)\n", keyName, dwAspect, pdwStatus); /* * Open the class id Key */ result = RegOpenKeyA(HKEY_CLASSES_ROOT, keyName, &clsidKey); if (result != ERROR_SUCCESS) return REGDB_E_CLASSNOTREG; /* * Get the MiscStatus */ result = RegOpenKeyA(clsidKey, "MiscStatus", &miscStatusKey); if (result != ERROR_SUCCESS) { RegCloseKey(clsidKey); return REGDB_E_READREGDB; } /* * Read the default value */ OLEUTL_ReadRegistryDWORDValue(miscStatusKey, pdwStatus); /* * Open the key specific to the requested aspect. */ sprintf(keyName, "%ld", dwAspect); result = RegOpenKeyA(miscStatusKey, keyName, &aspectKey); if (result == ERROR_SUCCESS) { OLEUTL_ReadRegistryDWORDValue(aspectKey, pdwStatus); RegCloseKey(aspectKey); } /* * Cleanup */ RegCloseKey(miscStatusKey); RegCloseKey(clsidKey); return S_OK; } /****************************************************************************** * OleSetContainedObject [OLE32.128] */ HRESULT WINAPI OleSetContainedObject( LPUNKNOWN pUnknown, BOOL fContained) { IRunnableObject* runnable = NULL; HRESULT hres; TRACE("(%p,%x), stub!\n", pUnknown, fContained); hres = IUnknown_QueryInterface(pUnknown, &IID_IRunnableObject, (void**)&runnable); if (SUCCEEDED(hres)) { hres = IRunnableObject_SetContainedObject(runnable, fContained); IRunnableObject_Release(runnable); return hres; } return S_OK; } /****************************************************************************** * OleLoad [OLE32.112] */ HRESULT WINAPI OleLoad( LPSTORAGE pStg, REFIID riid, LPOLECLIENTSITE pClientSite, LPVOID* ppvObj) { IPersistStorage* persistStorage = NULL; IOleObject* oleObject = NULL; STATSTG storageInfo; HRESULT hres; TRACE("(%p,%p,%p,%p)\n", pStg, riid, pClientSite, ppvObj); /* * TODO, Conversion ... OleDoAutoConvert */ /* * Get the class ID for the object. */ hres = IStorage_Stat(pStg, &storageInfo, STATFLAG_NONAME); /* * Now, try and create the handler for the object */ hres = CoCreateInstance(&storageInfo.clsid, NULL, CLSCTX_INPROC_HANDLER, &IID_IOleObject, (void**)&oleObject); /* * If that fails, as it will most times, load the default * OLE handler. */ if (FAILED(hres)) { hres = OleCreateDefaultHandler(&storageInfo.clsid, NULL, &IID_IOleObject, (void**)&oleObject); } /* * If we couldn't find a handler... this is bad. Abort the whole thing. */ if (FAILED(hres)) return hres; /* * Inform the new object of it's client site. */ hres = IOleObject_SetClientSite(oleObject, pClientSite); /* * Initialize the object with it's IPersistStorage interface. */ hres = IOleObject_QueryInterface(oleObject, &IID_IPersistStorage, (void**)&persistStorage); if (SUCCEEDED(hres)) { IPersistStorage_Load(persistStorage, pStg); IPersistStorage_Release(persistStorage); persistStorage = NULL; } /* * Return the requested interface to the caller. */ hres = IOleObject_QueryInterface(oleObject, riid, ppvObj); /* * Cleanup interfaces used internally */ IOleObject_Release(oleObject); return hres; } /*********************************************************************** * OleSave [OLE32.124] */ HRESULT WINAPI OleSave( LPPERSISTSTORAGE pPS, LPSTORAGE pStg, BOOL fSameAsLoad) { HRESULT hres; CLSID objectClass; TRACE("(%p,%p,%x)\n", pPS, pStg, fSameAsLoad); /* * First, we transfer the class ID (if available) */ hres = IPersistStorage_GetClassID(pPS, &objectClass); if (SUCCEEDED(hres)) { WriteClassStg(pStg, &objectClass); } /* * Then, we ask the object to save itself to the * storage. If it is successful, we commit the storage. */ hres = IPersistStorage_Save(pPS, pStg, fSameAsLoad); if (SUCCEEDED(hres)) { IStorage_Commit(pStg, STGC_DEFAULT); } return hres; } /************************************************************************** * Internal methods to manage the shared OLE menu in response to the * OLE***MenuDescriptor API */ /*** * OLEMenu_Initialize() * * Initializes the OLEMENU data structures. */ static void OLEMenu_Initialize() { } /*** * OLEMenu_UnInitialize() * * Releases the OLEMENU data structures. */ static void OLEMenu_UnInitialize() { } /************************************************************************* * OLEMenu_InstallHooks * Install thread scope message hooks for WH_GETMESSAGE and WH_CALLWNDPROC * * RETURNS: TRUE if message hooks were succesfully installed * FALSE on failure */ BOOL OLEMenu_InstallHooks( DWORD tid ) { OleMenuHookItem *pHookItem = NULL; /* Create an entry for the hook table */ if ( !(pHookItem = HeapAlloc(GetProcessHeap(), 0, sizeof(OleMenuHookItem)) ) ) return FALSE; pHookItem->tid = tid; pHookItem->hHeap = GetProcessHeap(); /* Install a thread scope message hook for WH_GETMESSAGE */ pHookItem->GetMsg_hHook = SetWindowsHookExA( WH_GETMESSAGE, OLEMenu_GetMsgProc, 0, GetCurrentThreadId() ); if ( !pHookItem->GetMsg_hHook ) goto CLEANUP; /* Install a thread scope message hook for WH_CALLWNDPROC */ pHookItem->CallWndProc_hHook = SetWindowsHookExA( WH_CALLWNDPROC, OLEMenu_CallWndProc, 0, GetCurrentThreadId() ); if ( !pHookItem->CallWndProc_hHook ) goto CLEANUP; /* Insert the hook table entry */ pHookItem->next = hook_list; hook_list = pHookItem; return TRUE; CLEANUP: /* Unhook any hooks */ if ( pHookItem->GetMsg_hHook ) UnhookWindowsHookEx( pHookItem->GetMsg_hHook ); if ( pHookItem->CallWndProc_hHook ) UnhookWindowsHookEx( pHookItem->CallWndProc_hHook ); /* Release the hook table entry */ HeapFree(pHookItem->hHeap, 0, pHookItem ); return FALSE; } /************************************************************************* * OLEMenu_UnInstallHooks * UnInstall thread scope message hooks for WH_GETMESSAGE and WH_CALLWNDPROC * * RETURNS: TRUE if message hooks were succesfully installed * FALSE on failure */ BOOL OLEMenu_UnInstallHooks( DWORD tid ) { OleMenuHookItem *pHookItem = NULL; OleMenuHookItem **ppHook = &hook_list; while (*ppHook) { if ((*ppHook)->tid == tid) { pHookItem = *ppHook; *ppHook = pHookItem->next; break; } ppHook = &(*ppHook)->next; } if (!pHookItem) return FALSE; /* Uninstall the hooks installed for this thread */ if ( !UnhookWindowsHookEx( pHookItem->GetMsg_hHook ) ) goto CLEANUP; if ( !UnhookWindowsHookEx( pHookItem->CallWndProc_hHook ) ) goto CLEANUP; /* Release the hook table entry */ HeapFree(pHookItem->hHeap, 0, pHookItem ); return TRUE; CLEANUP: /* Release the hook table entry */ if (pHookItem) HeapFree(pHookItem->hHeap, 0, pHookItem ); return FALSE; } /************************************************************************* * OLEMenu_IsHookInstalled * Tests if OLEMenu hooks have been installed for a thread * * RETURNS: The pointer and index of the hook table entry for the tid * NULL and -1 for the index if no hooks were installed for this thread */ OleMenuHookItem * OLEMenu_IsHookInstalled( DWORD tid ) { OleMenuHookItem *pHookItem = NULL; /* Do a simple linear search for an entry whose tid matches ours. * We really need a map but efficiency is not a concern here. */ for (pHookItem = hook_list; pHookItem; pHookItem = pHookItem->next) { if ( tid == pHookItem->tid ) return pHookItem; } return NULL; } /*********************************************************************** * OLEMenu_FindMainMenuIndex * * Used by OLEMenu API to find the top level group a menu item belongs to. * On success pnPos contains the index of the item in the top level menu group * * RETURNS: TRUE if the ID was found, FALSE on failure */ static BOOL OLEMenu_FindMainMenuIndex( HMENU hMainMenu, HMENU hPopupMenu, UINT *pnPos ) { UINT i, nItems; nItems = GetMenuItemCount( hMainMenu ); for (i = 0; i < nItems; i++) { HMENU hsubmenu; /* Is the current item a submenu? */ if ( (hsubmenu = GetSubMenu(hMainMenu, i)) ) { /* If the handle is the same we're done */ if ( hsubmenu == hPopupMenu ) { if (pnPos) *pnPos = i; return TRUE; } /* Recursively search without updating pnPos */ else if ( OLEMenu_FindMainMenuIndex( hsubmenu, hPopupMenu, NULL ) ) { if (pnPos) *pnPos = i; return TRUE; } } } return FALSE; } /*********************************************************************** * OLEMenu_SetIsServerMenu * * Checks whether a popup menu belongs to a shared menu group which is * owned by the server, and sets the menu descriptor state accordingly. * All menu messages from these groups should be routed to the server. * * RETURNS: TRUE if the popup menu is part of a server owned group * FASE if the popup menu is part of a container owned group */ BOOL OLEMenu_SetIsServerMenu( HMENU hmenu, OleMenuDescriptor *pOleMenuDescriptor ) { UINT nPos = 0, nWidth, i; pOleMenuDescriptor->bIsServerItem = FALSE; /* Don't bother searching if the popup is the combined menu itself */ if ( hmenu == pOleMenuDescriptor->hmenuCombined ) return FALSE; /* Find the menu item index in the shared OLE menu that this item belongs to */ if ( !OLEMenu_FindMainMenuIndex( pOleMenuDescriptor->hmenuCombined, hmenu, &nPos ) ) return FALSE; /* The group widths array has counts for the number of elements * in the groups File, Edit, Container, Object, Window, Help. * The Edit, Object & Help groups belong to the server object * and the other three belong to the container. * Loop thru the group widths and locate the group we are a member of. */ for ( i = 0, nWidth = 0; i < 6; i++ ) { nWidth += pOleMenuDescriptor->mgw.width[i]; if ( nPos < nWidth ) { /* Odd elements are server menu widths */ pOleMenuDescriptor->bIsServerItem = (i%2) ? TRUE : FALSE; break; } } return pOleMenuDescriptor->bIsServerItem; } /************************************************************************* * OLEMenu_CallWndProc * Thread scope WH_CALLWNDPROC hook proc filter function (callback) * This is invoked from a message hook installed in OleSetMenuDescriptor. */ LRESULT CALLBACK OLEMenu_CallWndProc(INT code, WPARAM wParam, LPARAM lParam) { LPCWPSTRUCT pMsg = NULL; HOLEMENU hOleMenu = 0; OleMenuDescriptor *pOleMenuDescriptor = NULL; OleMenuHookItem *pHookItem = NULL; WORD fuFlags; TRACE("%i, %04x, %08x\n", code, wParam, (unsigned)lParam ); /* Check if we're being asked to process the message */ if ( HC_ACTION != code ) goto NEXTHOOK; /* Retrieve the current message being dispatched from lParam */ pMsg = (LPCWPSTRUCT)lParam; /* Check if the message is destined for a window we are interested in: * If the window has an OLEMenu property we may need to dispatch * the menu message to its active objects window instead. */ hOleMenu = (HOLEMENU)GetPropA( pMsg->hwnd, "PROP_OLEMenuDescriptor" ); if ( !hOleMenu ) goto NEXTHOOK; /* Get the menu descriptor */ pOleMenuDescriptor = (OleMenuDescriptor *) GlobalLock( hOleMenu ); if ( !pOleMenuDescriptor ) /* Bad descriptor! */ goto NEXTHOOK; /* Process menu messages */ switch( pMsg->message ) { case WM_INITMENU: { /* Reset the menu descriptor state */ pOleMenuDescriptor->bIsServerItem = FALSE; /* Send this message to the server as well */ SendMessageA( pOleMenuDescriptor->hwndActiveObject, pMsg->message, pMsg->wParam, pMsg->lParam ); goto NEXTHOOK; } case WM_INITMENUPOPUP: { /* Save the state for whether this is a server owned menu */ OLEMenu_SetIsServerMenu( (HMENU)pMsg->wParam, pOleMenuDescriptor ); break; } case WM_MENUSELECT: { fuFlags = HIWORD(pMsg->wParam); /* Get flags */ if ( fuFlags & MF_SYSMENU ) goto NEXTHOOK; /* Save the state for whether this is a server owned popup menu */ else if ( fuFlags & MF_POPUP ) OLEMenu_SetIsServerMenu( (HMENU)pMsg->lParam, pOleMenuDescriptor ); break; } case WM_DRAWITEM: { LPDRAWITEMSTRUCT lpdis = (LPDRAWITEMSTRUCT) pMsg->lParam; if ( pMsg->wParam != 0 || lpdis->CtlType != ODT_MENU ) goto NEXTHOOK; /* Not a menu message */ break; } default: goto NEXTHOOK; } /* If the message was for the server dispatch it accordingly */ if ( pOleMenuDescriptor->bIsServerItem ) { SendMessageA( pOleMenuDescriptor->hwndActiveObject, pMsg->message, pMsg->wParam, pMsg->lParam ); } NEXTHOOK: if ( pOleMenuDescriptor ) GlobalUnlock( hOleMenu ); /* Lookup the hook item for the current thread */ if ( !( pHookItem = OLEMenu_IsHookInstalled( GetCurrentThreadId() ) ) ) { /* This should never fail!! */ WARN("could not retrieve hHook for current thread!\n" ); return 0; } /* Pass on the message to the next hooker */ return CallNextHookEx( pHookItem->CallWndProc_hHook, code, wParam, lParam ); } /************************************************************************* * OLEMenu_GetMsgProc * Thread scope WH_GETMESSAGE hook proc filter function (callback) * This is invoked from a message hook installed in OleSetMenuDescriptor. */ LRESULT CALLBACK OLEMenu_GetMsgProc(INT code, WPARAM wParam, LPARAM lParam) { LPMSG pMsg = NULL; HOLEMENU hOleMenu = 0; OleMenuDescriptor *pOleMenuDescriptor = NULL; OleMenuHookItem *pHookItem = NULL; WORD wCode; TRACE("%i, %04x, %08x\n", code, wParam, (unsigned)lParam ); /* Check if we're being asked to process a messages */ if ( HC_ACTION != code ) goto NEXTHOOK; /* Retrieve the current message being dispatched from lParam */ pMsg = (LPMSG)lParam; /* Check if the message is destined for a window we are interested in: * If the window has an OLEMenu property we may need to dispatch * the menu message to its active objects window instead. */ hOleMenu = (HOLEMENU)GetPropA( pMsg->hwnd, "PROP_OLEMenuDescriptor" ); if ( !hOleMenu ) goto NEXTHOOK; /* Process menu messages */ switch( pMsg->message ) { case WM_COMMAND: { wCode = HIWORD(pMsg->wParam); /* Get notification code */ if ( wCode ) goto NEXTHOOK; /* Not a menu message */ break; } default: goto NEXTHOOK; } /* Get the menu descriptor */ pOleMenuDescriptor = (OleMenuDescriptor *) GlobalLock( hOleMenu ); if ( !pOleMenuDescriptor ) /* Bad descriptor! */ goto NEXTHOOK; /* If the message was for the server dispatch it accordingly */ if ( pOleMenuDescriptor->bIsServerItem ) { /* Change the hWnd in the message to the active objects hWnd. * The message loop which reads this message will automatically * dispatch it to the embedded objects window. */ pMsg->hwnd = pOleMenuDescriptor->hwndActiveObject; } NEXTHOOK: if ( pOleMenuDescriptor ) GlobalUnlock( hOleMenu ); /* Lookup the hook item for the current thread */ if ( !( pHookItem = OLEMenu_IsHookInstalled( GetCurrentThreadId() ) ) ) { /* This should never fail!! */ WARN("could not retrieve hHook for current thread!\n" ); return FALSE; } /* Pass on the message to the next hooker */ return CallNextHookEx( pHookItem->GetMsg_hHook, code, wParam, lParam ); } /*********************************************************************** * OleCreateMenuDescriptor [OLE32.97] * Creates an OLE menu descriptor for OLE to use when dispatching * menu messages and commands. * * PARAMS: * hmenuCombined - Handle to the objects combined menu * lpMenuWidths - Pointer to array of 6 LONG's indicating menus per group * */ HOLEMENU WINAPI OleCreateMenuDescriptor( HMENU hmenuCombined, LPOLEMENUGROUPWIDTHS lpMenuWidths) { HOLEMENU hOleMenu; OleMenuDescriptor *pOleMenuDescriptor; int i; if ( !hmenuCombined || !lpMenuWidths ) return 0; /* Create an OLE menu descriptor */ if ( !(hOleMenu = GlobalAlloc(GMEM_MOVEABLE | GMEM_ZEROINIT, sizeof(OleMenuDescriptor) ) ) ) return 0; pOleMenuDescriptor = (OleMenuDescriptor *) GlobalLock( hOleMenu ); if ( !pOleMenuDescriptor ) return 0; /* Initialize menu group widths and hmenu */ for ( i = 0; i < 6; i++ ) pOleMenuDescriptor->mgw.width[i] = lpMenuWidths->width[i]; pOleMenuDescriptor->hmenuCombined = hmenuCombined; pOleMenuDescriptor->bIsServerItem = FALSE; GlobalUnlock( hOleMenu ); return hOleMenu; } /*********************************************************************** * OleDestroyMenuDescriptor [OLE32.99] * Destroy the shared menu descriptor */ HRESULT WINAPI OleDestroyMenuDescriptor( HOLEMENU hmenuDescriptor) { if ( hmenuDescriptor ) GlobalFree( hmenuDescriptor ); return S_OK; } /*********************************************************************** * OleSetMenuDescriptor [OLE32.129] * Installs or removes OLE dispatching code for the containers frame window * FIXME: The lpFrame and lpActiveObject parameters are currently ignored * OLE should install context sensitive help F1 filtering for the app when * these are non null. * * PARAMS: * hOleMenu Handle to composite menu descriptor * hwndFrame Handle to containers frame window * hwndActiveObject Handle to objects in-place activation window * lpFrame Pointer to IOleInPlaceFrame on containers window * lpActiveObject Pointer to IOleInPlaceActiveObject on active in-place object * * RETURNS: * S_OK - menu installed correctly * E_FAIL, E_INVALIDARG, E_UNEXPECTED - failure */ HRESULT WINAPI OleSetMenuDescriptor( HOLEMENU hOleMenu, HWND hwndFrame, HWND hwndActiveObject, LPOLEINPLACEFRAME lpFrame, LPOLEINPLACEACTIVEOBJECT lpActiveObject) { OleMenuDescriptor *pOleMenuDescriptor = NULL; /* Check args */ if ( !hwndFrame || (hOleMenu && !hwndActiveObject) ) return E_INVALIDARG; if ( lpFrame || lpActiveObject ) { FIXME("(%x, %x, %x, %p, %p), Context sensitive help filtering not implemented!\n", (unsigned int)hOleMenu, hwndFrame, hwndActiveObject, lpFrame, lpActiveObject); } /* Set up a message hook to intercept the containers frame window messages. * The message filter is responsible for dispatching menu messages from the * shared menu which are intended for the object. */ if ( hOleMenu ) /* Want to install dispatching code */ { /* If OLEMenu hooks are already installed for this thread, fail * Note: This effectively means that OleSetMenuDescriptor cannot * be called twice in succession on the same frame window * without first calling it with a null hOleMenu to uninstall */ if ( OLEMenu_IsHookInstalled( GetCurrentThreadId() ) ) return E_FAIL; /* Get the menu descriptor */ pOleMenuDescriptor = (OleMenuDescriptor *) GlobalLock( hOleMenu ); if ( !pOleMenuDescriptor ) return E_UNEXPECTED; /* Update the menu descriptor */ pOleMenuDescriptor->hwndFrame = hwndFrame; pOleMenuDescriptor->hwndActiveObject = hwndActiveObject; GlobalUnlock( hOleMenu ); pOleMenuDescriptor = NULL; /* Add a menu descriptor windows property to the frame window */ SetPropA( hwndFrame, "PROP_OLEMenuDescriptor", hOleMenu ); /* Install thread scope message hooks for WH_GETMESSAGE and WH_CALLWNDPROC */ if ( !OLEMenu_InstallHooks( GetCurrentThreadId() ) ) return E_FAIL; } else /* Want to uninstall dispatching code */ { /* Uninstall the hooks */ if ( !OLEMenu_UnInstallHooks( GetCurrentThreadId() ) ) return E_FAIL; /* Remove the menu descriptor property from the frame window */ RemovePropA( hwndFrame, "PROP_OLEMenuDescriptor" ); } return S_OK; } /*********************************************************************** * ReleaseStgMedium [OLE32.140] */ void WINAPI ReleaseStgMedium( STGMEDIUM* pmedium) { switch (pmedium->tymed) { case TYMED_HGLOBAL: { if ( (pmedium->pUnkForRelease==0) && (pmedium->u.hGlobal!=0) ) GlobalFree(pmedium->u.hGlobal); pmedium->u.hGlobal = 0; break; } case TYMED_FILE: { if (pmedium->u.lpszFileName!=0) { if (pmedium->pUnkForRelease==0) { DeleteFileW(pmedium->u.lpszFileName); } CoTaskMemFree(pmedium->u.lpszFileName); } pmedium->u.lpszFileName = 0; break; } case TYMED_ISTREAM: { if (pmedium->u.pstm!=0) { IStream_Release(pmedium->u.pstm); } pmedium->u.pstm = 0; break; } case TYMED_ISTORAGE: { if (pmedium->u.pstg!=0) { IStorage_Release(pmedium->u.pstg); } pmedium->u.pstg = 0; break; } case TYMED_GDI: { if ( (pmedium->pUnkForRelease==0) && (pmedium->u.hGlobal!=0) ) DeleteObject(pmedium->u.hGlobal); pmedium->u.hGlobal = 0; break; } case TYMED_MFPICT: { if ( (pmedium->pUnkForRelease==0) && (pmedium->u.hMetaFilePict!=0) ) { DeleteMetaFile(pmedium->u.hMetaFilePict); GlobalFree(pmedium->u.hMetaFilePict); } pmedium->u.hMetaFilePict = 0; break; } case TYMED_ENHMF: { if ( (pmedium->pUnkForRelease==0) && (pmedium->u.hEnhMetaFile!=0) ) { DeleteEnhMetaFile(pmedium->u.hEnhMetaFile); } pmedium->u.hEnhMetaFile = 0; break; } case TYMED_NULL: default: break; } /* * After cleaning up, the unknown is released */ if (pmedium->pUnkForRelease!=0) { IUnknown_Release(pmedium->pUnkForRelease); pmedium->pUnkForRelease = 0; } } /*** * OLEDD_Initialize() * * Initializes the OLE drag and drop data structures. */ static void OLEDD_Initialize() { WNDCLASSA wndClass; ZeroMemory (&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS; wndClass.lpfnWndProc = (WNDPROC)OLEDD_DragTrackerWindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(TrackerWindowInfo*); wndClass.hCursor = 0; wndClass.hbrBackground = 0; wndClass.lpszClassName = OLEDD_DRAGTRACKERCLASS; RegisterClassA (&wndClass); } /*** * OLEDD_UnInitialize() * * Releases the OLE drag and drop data structures. */ static void OLEDD_UnInitialize() { /* * Simply empty the list. */ while (targetListHead!=NULL) { RevokeDragDrop(targetListHead->hwndTarget); } } /*** * OLEDD_InsertDropTarget() * * Insert the target node in the tree. */ static void OLEDD_InsertDropTarget(DropTargetNode* nodeToAdd) { DropTargetNode* curNode; DropTargetNode** parentNodeLink; /* * Iterate the tree to find the insertion point. */ curNode = targetListHead; parentNodeLink = &targetListHead; while (curNode!=NULL) { if (nodeToAdd->hwndTargethwndTarget) { /* * If the node we want to add has a smaller HWND, go left */ parentNodeLink = &curNode->prevDropTarget; curNode = curNode->prevDropTarget; } else if (nodeToAdd->hwndTarget>curNode->hwndTarget) { /* * If the node we want to add has a larger HWND, go right */ parentNodeLink = &curNode->nextDropTarget; curNode = curNode->nextDropTarget; } else { /* * The item was found in the list. It shouldn't have been there */ assert(FALSE); return; } } /* * If we get here, we have found a spot for our item. The parentNodeLink * pointer points to the pointer that we have to modify. * The curNode should be NULL. We just have to establish the link and Voila! */ assert(curNode==NULL); assert(parentNodeLink!=NULL); assert(*parentNodeLink==NULL); *parentNodeLink=nodeToAdd; } /*** * OLEDD_ExtractDropTarget() * * Removes the target node from the tree. */ static DropTargetNode* OLEDD_ExtractDropTarget(HWND hwndOfTarget) { DropTargetNode* curNode; DropTargetNode** parentNodeLink; /* * Iterate the tree to find the insertion point. */ curNode = targetListHead; parentNodeLink = &targetListHead; while (curNode!=NULL) { if (hwndOfTargethwndTarget) { /* * If the node we want to add has a smaller HWND, go left */ parentNodeLink = &curNode->prevDropTarget; curNode = curNode->prevDropTarget; } else if (hwndOfTarget>curNode->hwndTarget) { /* * If the node we want to add has a larger HWND, go right */ parentNodeLink = &curNode->nextDropTarget; curNode = curNode->nextDropTarget; } else { /* * The item was found in the list. Detach it from it's parent and * re-insert it's kids in the tree. */ assert(parentNodeLink!=NULL); assert(*parentNodeLink==curNode); /* * We arbitrately re-attach the left sub-tree to the parent. */ *parentNodeLink = curNode->prevDropTarget; /* * And we re-insert the right subtree */ if (curNode->nextDropTarget!=NULL) { OLEDD_InsertDropTarget(curNode->nextDropTarget); } /* * The node we found is still a valid node once we complete * the unlinking of the kids. */ curNode->nextDropTarget=NULL; curNode->prevDropTarget=NULL; return curNode; } } /* * If we get here, the node is not in the tree */ return NULL; } /*** * OLEDD_FindDropTarget() * * Finds information about the drop target. */ static DropTargetNode* OLEDD_FindDropTarget(HWND hwndOfTarget) { DropTargetNode* curNode; /* * Iterate the tree to find the HWND value. */ curNode = targetListHead; while (curNode!=NULL) { if (hwndOfTargethwndTarget) { /* * If the node we want to add has a smaller HWND, go left */ curNode = curNode->prevDropTarget; } else if (hwndOfTarget>curNode->hwndTarget) { /* * If the node we want to add has a larger HWND, go right */ curNode = curNode->nextDropTarget; } else { /* * The item was found in the list. */ return curNode; } } /* * If we get here, the item is not in the list */ return NULL; } /*** * OLEDD_DragTrackerWindowProc() * * This method is the WindowProcedure of the drag n drop tracking * window. During a drag n Drop operation, an invisible window is created * to receive the user input and act upon it. This procedure is in charge * of this behavior. */ static LRESULT WINAPI OLEDD_DragTrackerWindowProc( HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { switch (uMsg) { case WM_CREATE: { LPCREATESTRUCTA createStruct = (LPCREATESTRUCTA)lParam; SetWindowLongA(hwnd, 0, (LONG)createStruct->lpCreateParams); break; } case WM_MOUSEMOVE: { TrackerWindowInfo* trackerInfo = (TrackerWindowInfo*)GetWindowLongA(hwnd, 0); POINT mousePos; /* * Get the current mouse position in screen coordinates. */ mousePos.x = LOWORD(lParam); mousePos.y = HIWORD(lParam); ClientToScreen(hwnd, &mousePos); /* * Track the movement of the mouse. */ OLEDD_TrackMouseMove(trackerInfo, mousePos, wParam); break; } case WM_LBUTTONUP: case WM_MBUTTONUP: case WM_RBUTTONUP: case WM_LBUTTONDOWN: case WM_MBUTTONDOWN: case WM_RBUTTONDOWN: { TrackerWindowInfo* trackerInfo = (TrackerWindowInfo*)GetWindowLongA(hwnd, 0); POINT mousePos; /* * Get the current mouse position in screen coordinates. */ mousePos.x = LOWORD(lParam); mousePos.y = HIWORD(lParam); ClientToScreen(hwnd, &mousePos); /* * Notify everyone that the button state changed * TODO: Check if the "escape" key was pressed. */ OLEDD_TrackStateChange(trackerInfo, mousePos, wParam); break; } } /* * This is a window proc after all. Let's call the default. */ return DefWindowProcA (hwnd, uMsg, wParam, lParam); } /*** * OLEDD_TrackMouseMove() * * This method is invoked while a drag and drop operation is in effect. * it will generate the appropriate callbacks in the drop source * and drop target. It will also provide the expected feedback to * the user. * * params: * trackerInfo - Pointer to the structure identifying the * drag & drop operation that is currently * active. * mousePos - Current position of the mouse in screen * coordinates. * keyState - Contains the state of the shift keys and the * mouse buttons (MK_LBUTTON and the like) */ static void OLEDD_TrackMouseMove( TrackerWindowInfo* trackerInfo, POINT mousePos, DWORD keyState) { HWND hwndNewTarget = 0; HRESULT hr = S_OK; /* * Get the handle of the window under the mouse */ hwndNewTarget = WindowFromPoint(mousePos); /* * Every time, we re-initialize the effects passed to the * IDropTarget to the effects allowed by the source. */ *trackerInfo->pdwEffect = trackerInfo->dwOKEffect; /* * If we are hovering over the same target as before, send the * DragOver notification */ if ( (trackerInfo->curDragTarget != 0) && (trackerInfo->curDragTargetHWND==hwndNewTarget) ) { POINTL mousePosParam; /* * The documentation tells me that the coordinate should be in the target * window's coordinate space. However, the tests I made tell me the * coordinates should be in screen coordinates. */ mousePosParam.x = mousePos.x; mousePosParam.y = mousePos.y; IDropTarget_DragOver(trackerInfo->curDragTarget, keyState, mousePosParam, trackerInfo->pdwEffect); } else { DropTargetNode* newDropTargetNode = 0; /* * If we changed window, we have to notify our old target and check for * the new one. */ if (trackerInfo->curDragTarget!=0) { IDropTarget_DragLeave(trackerInfo->curDragTarget); } /* * Make sure we're hovering over a window. */ if (hwndNewTarget!=0) { /* * Find-out if there is a drag target under the mouse */ newDropTargetNode = OLEDD_FindDropTarget(hwndNewTarget); trackerInfo->curDragTargetHWND = hwndNewTarget; trackerInfo->curDragTarget = newDropTargetNode ? newDropTargetNode->dropTarget : 0; /* * If there is, notify it that we just dragged-in */ if (trackerInfo->curDragTarget!=0) { POINTL mousePosParam; /* * The documentation tells me that the coordinate should be in the target * window's coordinate space. However, the tests I made tell me the * coordinates should be in screen coordinates. */ mousePosParam.x = mousePos.x; mousePosParam.y = mousePos.y; IDropTarget_DragEnter(trackerInfo->curDragTarget, trackerInfo->dataObject, keyState, mousePosParam, trackerInfo->pdwEffect); } } else { /* * The mouse is not over a window so we don't track anything. */ trackerInfo->curDragTargetHWND = 0; trackerInfo->curDragTarget = 0; } } /* * Now that we have done that, we have to tell the source to give * us feedback on the work being done by the target. If we don't * have a target, simulate no effect. */ if (trackerInfo->curDragTarget==0) { *trackerInfo->pdwEffect = DROPEFFECT_NONE; } hr = IDropSource_GiveFeedback(trackerInfo->dropSource, *trackerInfo->pdwEffect); /* * When we ask for feedback from the drop source, sometimes it will * do all the necessary work and sometimes it will not handle it * when that's the case, we must display the standard drag and drop * cursors. */ if (hr==DRAGDROP_S_USEDEFAULTCURSORS) { if ( (*trackerInfo->pdwEffect & DROPEFFECT_MOVE) || (*trackerInfo->pdwEffect & DROPEFFECT_COPY) || (*trackerInfo->pdwEffect & DROPEFFECT_LINK) ) { SetCursor(LoadCursorA(0, IDC_SIZEALLA)); } else { SetCursor(LoadCursorA(0, IDC_NOA)); } } } /*** * OLEDD_TrackStateChange() * * This method is invoked while a drag and drop operation is in effect. * It is used to notify the drop target/drop source callbacks when * the state of the keyboard or mouse button change. * * params: * trackerInfo - Pointer to the structure identifying the * drag & drop operation that is currently * active. * mousePos - Current position of the mouse in screen * coordinates. * keyState - Contains the state of the shift keys and the * mouse buttons (MK_LBUTTON and the like) */ static void OLEDD_TrackStateChange( TrackerWindowInfo* trackerInfo, POINT mousePos, DWORD keyState) { /* * Ask the drop source what to do with the operation. */ trackerInfo->returnValue = IDropSource_QueryContinueDrag( trackerInfo->dropSource, trackerInfo->escPressed, keyState); /* * All the return valued will stop the operation except the S_OK * return value. */ if (trackerInfo->returnValue!=S_OK) { /* * Make sure the message loop in DoDragDrop stops */ trackerInfo->trackingDone = TRUE; /* * Release the mouse in case the drop target decides to show a popup * or a menu or something. */ ReleaseCapture(); /* * If we end-up over a target, drop the object in the target or * inform the target that the operation was cancelled. */ if (trackerInfo->curDragTarget!=0) { switch (trackerInfo->returnValue) { /* * If the source wants us to complete the operation, we tell * the drop target that we just dropped the object in it. */ case DRAGDROP_S_DROP: { POINTL mousePosParam; /* * The documentation tells me that the coordinate should be * in the target window's coordinate space. However, the tests * I made tell me the coordinates should be in screen coordinates. */ mousePosParam.x = mousePos.x; mousePosParam.y = mousePos.y; IDropTarget_Drop(trackerInfo->curDragTarget, trackerInfo->dataObject, keyState, mousePosParam, trackerInfo->pdwEffect); break; } /* * If the source told us that we should cancel, fool the drop * target by telling it that the mouse left it's window. * Also set the drop effect to "NONE" in case the application * ignores the result of DoDragDrop. */ case DRAGDROP_S_CANCEL: IDropTarget_DragLeave(trackerInfo->curDragTarget); *trackerInfo->pdwEffect = DROPEFFECT_NONE; break; } } } } /*** * OLEDD_GetButtonState() * * This method will use the current state of the keyboard to build * a button state mask equivalent to the one passed in the * WM_MOUSEMOVE wParam. */ static DWORD OLEDD_GetButtonState() { BYTE keyboardState[256]; DWORD keyMask = 0; GetKeyboardState(keyboardState); if ( (keyboardState[VK_SHIFT] & 0x80) !=0) keyMask |= MK_SHIFT; if ( (keyboardState[VK_CONTROL] & 0x80) !=0) keyMask |= MK_CONTROL; if ( (keyboardState[VK_LBUTTON] & 0x80) !=0) keyMask |= MK_LBUTTON; if ( (keyboardState[VK_RBUTTON] & 0x80) !=0) keyMask |= MK_RBUTTON; if ( (keyboardState[VK_MBUTTON] & 0x80) !=0) keyMask |= MK_MBUTTON; return keyMask; } /*** * OLEDD_GetButtonState() * * This method will read the default value of the registry key in * parameter and extract a DWORD value from it. The registry key value * can be in a string key or a DWORD key. * * params: * regKey - Key to read the default value from * pdwValue - Pointer to the location where the DWORD * value is returned. This value is not modified * if the value is not found. */ static void OLEUTL_ReadRegistryDWORDValue( HKEY regKey, DWORD* pdwValue) { char buffer[20]; DWORD dwKeyType; DWORD cbData = 20; LONG lres; lres = RegQueryValueExA(regKey, "", NULL, &dwKeyType, (LPBYTE)buffer, &cbData); if (lres==ERROR_SUCCESS) { switch (dwKeyType) { case REG_DWORD: *pdwValue = *(DWORD*)buffer; break; case REG_EXPAND_SZ: case REG_MULTI_SZ: case REG_SZ: *pdwValue = (DWORD)strtoul(buffer, NULL, 10); break; } } } /****************************************************************************** * OleMetaFilePictFromIconAndLabel * * Returns a global memory handle to a metafile which contains the icon and * label given. * I guess the result of that should look somehow like desktop icons. * If no hIcon is given, we load the icon via lpszSourceFile and iIconIndex. * This code might be wrong at some places. */ HGLOBAL16 WINAPI OleMetaFilePictFromIconAndLabel16( HICON16 hIcon, LPCOLESTR16 lpszLabel, LPCOLESTR16 lpszSourceFile, UINT16 iIconIndex ) { METAFILEPICT16 *mf; HGLOBAL16 hmf; HDC16 hdc; FIXME("(%04x, '%s', '%s', %d): incorrect metrics, please try to correct them !\n\n\n", hIcon, lpszLabel, lpszSourceFile, iIconIndex); if (!hIcon) { if (lpszSourceFile) { HINSTANCE16 hInstance = LoadLibrary16(lpszSourceFile); /* load the icon at index from lpszSourceFile */ hIcon = (HICON16)LoadIconA(hInstance, (LPCSTR)(DWORD)iIconIndex); FreeLibrary16(hInstance); } else return (HGLOBAL)NULL; } hdc = CreateMetaFile16(NULL); DrawIcon(hdc, 0, 0, hIcon); /* FIXME */ TextOut16(hdc, 0, 0, lpszLabel, 1); /* FIXME */ hmf = GlobalAlloc16(0, sizeof(METAFILEPICT16)); mf = (METAFILEPICT16 *)GlobalLock16(hmf); mf->mm = MM_ANISOTROPIC; mf->xExt = 20; /* FIXME: bogus */ mf->yExt = 20; /* dito */ mf->hMF = CloseMetaFile16(hdc); return hmf; } wine-20000526/dlls/ole32/ole2.spec0100644000175000001440000001010307044652533016044 0ustar julliardusersname ole2 type win16 1 pascal OleBuildVersion() OleBuildVersion 2 pascal OleInitialize(ptr) OleInitialize 3 pascal OleUninitialize() OleUninitialize 4 stub DLLGETCLASSOBJECT #5 WEP 6 stub OLEQUERYLINKFROMDATA 7 stub OLEQUERYCREATEFROMDATA 8 stub OLECREATEFROMDATA 9 stub OLECREATELINKFROMDATA 10 stub OLECREATE 11 stub OLECREATELINK 12 stub OLELOAD 13 stub OLESAVE 14 stub OLERUN #15 ___EXPORTEDSTUB 16 stub OLEISRUNNING 17 stub OLELOCKRUNNING 18 stub READCLASSSTG 19 stub WRITECLASSSTG 20 stub READCLASSSTM 21 stub WRITECLASSSTM 22 stub BINDMONIKER 23 stub MKPARSEDISPLAYNAME 24 stub OLESAVETOSTREAM 25 stub OLELOADFROMSTREAM 26 stub CREATEBINDCTX 27 stub CREATEITEMMONIKER 28 pascal CreateFileMoniker(str ptr) CreateFileMoniker16 29 stub CREATEGENERICCOMPOSITE 30 pascal GetRunningObjectTable(long ptr) GetRunningObjectTable16 31 stub OLEGETMALLOC 32 stub RELEASESTGMEDIUM 33 stub READSTRINGSTREAM 34 stub WRITESTRINGSTREAM 35 pascal RegisterDragDrop(word segptr) RegisterDragDrop16 36 pascal RevokeDragDrop(word) RevokeDragDrop16 37 stub DODRAGDROP 38 stub CREATEOLEADVISEHOLDER 39 stub CREATEDATAADVISEHOLDER 40 stub OLECREATEMENUDESCRIPTOR 41 stub OLESETMENUDESCRIPTOR 42 stub OLEDESTROYMENUDESCRIPTOR 43 stub OPENORCREATESTREAM 44 stub CREATEANTIMONIKER 45 stub CREATEPOINTERMONIKER 46 stub MONIKERRELATIVEPATHTO 47 stub MONIKERCOMMONPREFIXWITH 48 stub ISACCELERATOR 49 stub OLESETCLIPBOARD 50 stub OLEGETCLIPBOARD 51 stub OLEDUPLICATEDATA 52 stub OLEGETICONOFFILE 53 stub OLEGETICONOFCLASS 54 stub CREATEILOCKBYTESONHGLOBAL 55 stub GETHGLOBALFROMILOCKBYTES 56 pascal16 OleMetaFilePictFromIconAndLabel(word str str word) OleMetaFilePictFromIconAndLabel16 57 stub GETCLASSFILE 58 stub OLEDRAW 59 stub OLECREATEDEFAULTHANDLER 60 stub OLECREATEEMBEDDINGHELPER 61 stub OLECONVERTISTORAGETOOLESTREAMEX 62 stub OLECONVERTOLESTREAMTOISTORAGEEX 63 stub SETDOCUMENTBITSTG 64 stub GETDOCUMENTBITSTG 65 stub WRITEOLESTG 66 stub READOLESTG 67 stub OLECREATEFROMFILE 68 stub OLECREATELINKTOFILE 69 stub CREATEDATACACHE 70 stub OLECONVERTISTORAGETOOLESTREAM 71 stub OLECONVERTOLESTREAMTOISTORAGE 74 stub READFMTUSERTYPESTG 75 stub WRITEFMTUSERTYPESTG 76 pascal16 OleFlushClipboard() OleFlushClipboard16 77 stub OLEISCURRENTCLIPBOARD 78 stub OLETRANSLATEACCELERATOR 79 stub OLEDOAUTOCONVERT 80 stub OLEGETAUTOCONVERT 81 stub OLESETAUTOCONVERT 82 stub GETCONVERTSTG 83 stub SETCONVERTSTG 84 stub CREATESTREAMONHGLOBAL 85 stub GETHGLOBALFROMSTREAM 86 stub OLESETCONTAINEDOBJECT 87 stub OLENOTEOBJECTVISIBLE 88 stub OLECREATESTATICFROMDATA 89 stub OLEREGGETUSERTYPE 90 stub OLEREGGETMISCSTATUS 91 stub OLEREGENUMFORMATETC 92 stub OLEREGENUMVERBS 93 stub OLEGETENUMFORMATETC 100 stub MAKEDEBUGSTREAM 104 stub DBGLOGOPEN 105 stub DBGLOGCLOSE 106 stub DBGLOGOUTPUTDEBUGSTRING 107 stub DBGLOGWRITE 108 stub DBGLOGTIMESTAMP 109 stub DBGLOGWRITEBANNER 110 stub DBGDUMPOBJECT 111 stub DBGISOBJECTVALID 112 stub DUMPALLOBJECTS 113 stub VALIDATEALLOBJECTS 114 stub DBGDUMPCLASSNAME 115 stub DBGDUMPEXTERNALOBJECT 120 stub _IID_IENUMUNKNOWN 121 stub _IID_IENUMSTRING 122 stub _IID_IENUMMONIKER 123 stub _IID_IENUMFORMATETC 124 stub _IID_IENUMOLEVERB 125 stub _IID_IENUMSTATDATA 126 stub _IID_IENUMGENERIC 127 stub _IID_IENUMHOLDER 128 stub _IID_IENUMCALLBACK 129 stub _IID_IPERSISTSTREAM 130 stub _IID_IPERSISTSTORAGE 131 stub _IID_IPERSISTFILE 132 stub _IID_IPERSIST 133 stub _IID_IVIEWOBJECT 134 stub _IID_IDATAOBJECT 135 stub _IID_IADVISESINK 136 stub _IID_IDATAADVISEHOLDER 137 stub _IID_IOLEADVISEHOLDER 138 stub _IID_IOLEOBJECT 139 stub _IID_IOLEINPLACEOBJECT 140 stub _IID_IOLEWINDOW 141 stub _IID_IOLEINPLACEUIWINDOW 142 stub _IID_IOLEINPLACEFRAME 143 stub _IID_IOLEINPLACEACTIVEOBJECT 144 stub _IID_IOLECLIENTSITE 145 stub _IID_IOLEINPLACESITE 146 stub _IID_IPARSEDISPLAYNAME 147 stub _IID_IOLECONTAINER 148 stub _IID_IOLEITEMCONTAINER 149 stub _IID_IOLELINK 150 stub _IID_IOLECACHE 151 stub _IID_IOLEMANAGER 152 stub _IID_IOLEPRESOBJ 153 stub _IID_IDROPSOURCE 154 stub _IID_IDROPTARGET 155 stub _IID_IDEBUG 156 stub _IID_IDEBUGSTREAM 157 stub _IID_IADVISESINK2 158 stub _IID_IVIEWOBJECT2 159 stub _IID_IOLECACHE2 160 stub _IID_IOLECACHECONTROL 161 stub _IID_IRUNNABLEOBJECT wine-20000526/dlls/ole32/ole2conv.spec0100644000175000001440000000027207111133237016726 0ustar julliardusersname ole2conv type win16 1 stub GETFILTERINFO 2 stub IMPORTGR 3 stub GETFILTERPREF 4 stub IMPORTEMBEDDEDGR 5 stub QD2GDI 6 stub STATUSPROC 7 stub ENUMFONTFUNC #8 WEP #9 ___EXPORTEDSTUB wine-20000526/dlls/ole32/ole2impl.c0100644000175000001440000001174407061520300016213 0ustar julliardusers/* * Ole 2 Create functions implementation * * Copyright (C) 1999-2000 Abey George */ #include "ole2.h" #include "wingdi.h" #include "winuser.h" #include "debugtools.h" #include "olestd.h" #include "winreg.h" DEFAULT_DEBUG_CHANNEL(ole) #define MAX_CLIPFORMAT_NAME 80 /****************************************************************************** * Function : OleQueryCreateFromData [OLE32.117] * Author : Abey George * Checks whether an object can become an embedded object. * the clipboard or OLE drag and drop. * Returns : S_OK - Format that supports Embedded object creation are present. * OLE_E_STATIC - Format that supports static object creation are present. * S_FALSE - No acceptable format is available. */ HRESULT WINAPI OleQueryCreateFromData(LPDATAOBJECT pSrcDataObject) { IEnumFORMATETC *pfmt; FORMATETC fmt; CHAR szFmtName[MAX_CLIPFORMAT_NAME]; BOOL bFoundStatic = FALSE; HRESULT hr = IDataObject_EnumFormatEtc(pSrcDataObject, DATADIR_GET, &pfmt); if (hr == S_OK) hr = IEnumFORMATETC_Next(pfmt, 1, &fmt, NULL); while (hr == S_OK) { GetClipboardFormatNameA(fmt.cfFormat, szFmtName, MAX_CLIPFORMAT_NAME-1); /* first, Check for Embedded Object, Embed Source or Filename */ if (!strcmp(szFmtName, CF_EMBEDDEDOBJECT) || !strcmp(szFmtName, CF_EMBEDSOURCE) || !strcmp(szFmtName, CF_FILENAME)) return S_OK; /* Check for Metafile, Bitmap or DIB */ if (fmt.cfFormat == CF_METAFILEPICT || fmt.cfFormat == CF_BITMAP || fmt.cfFormat == CF_DIB) bFoundStatic = TRUE; hr = IEnumFORMATETC_Next(pfmt, 1, &fmt, NULL); } /* Found a static format, but no embed format */ if (bFoundStatic) return OLE_S_STATIC; return S_FALSE; } /****************************************************************************** * Function : OleCreateFromData [OLE32.92] * Author : Abey George * Creates an embedded object from data transfer object retrieved from * the clipboard or OLE drag and drop. * Returns : S_OK - Embedded object was created successfully. * OLE_E_STATIC - OLE can create only a static object * DV_E_FORMATETC - No acceptable format is available (only error return code) * TODO : CF_FILENAME, CF_EMBEDEDOBJECT formats. Parameter renderopt is currently ignored. */ HRESULT WINAPI OleCreateFromData(LPDATAOBJECT pSrcDataObject, REFIID riid, DWORD renderopt, LPFORMATETC pFormatEtc, LPOLECLIENTSITE pClientSite, LPSTORAGE pStg, LPVOID* ppvObj) { IEnumFORMATETC *pfmt; FORMATETC fmt; CHAR szFmtName[MAX_CLIPFORMAT_NAME]; STGMEDIUM std; HRESULT hr; HRESULT hr1; hr = IDataObject_EnumFormatEtc(pSrcDataObject, DATADIR_GET, &pfmt); if (hr == S_OK) { memset(&std, 0, sizeof(STGMEDIUM)); hr = IEnumFORMATETC_Next(pfmt, 1, &fmt, NULL); while (hr == S_OK) { GetClipboardFormatNameA(fmt.cfFormat, szFmtName, MAX_CLIPFORMAT_NAME-1); /* first, Check for Embedded Object, Embed Source or Filename */ /* TODO: Currently checks only for Embed Source. */ if (!strcmp(szFmtName, CF_EMBEDSOURCE)) { std.tymed = TYMED_HGLOBAL; if ((hr1 = IDataObject_GetData(pSrcDataObject, &fmt, &std)) == S_OK) { ILockBytes *ptrILockBytes = 0; IStorage *pStorage = 0; IOleObject *pOleObject = 0; IPersistStorage *pPersistStorage = 0; CLSID clsID; /* Create ILock bytes */ hr1 = CreateILockBytesOnHGlobal(std.u.hGlobal, FALSE, &ptrILockBytes); /* Open storage on the ILock bytes */ if (hr1 == S_OK) hr1 = StgOpenStorageOnILockBytes(ptrILockBytes, NULL, STGM_SHARE_EXCLUSIVE, NULL, 0, &pStorage); /* Get Class ID from the opened storage */ if (hr1 == S_OK) hr1 = ReadClassStg(pStorage, &clsID); /* Create default handler for Persist storage */ if (hr1 == S_OK) hr1 = OleCreateDefaultHandler(&clsID, NULL, &IID_IPersistStorage, (LPVOID*)&pPersistStorage); /* Load the storage to Persist storage */ if (hr1 == S_OK) hr1 = IPersistStorage_Load(pPersistStorage, pStorage); /* Query for IOleObject */ if (hr1 == S_OK) hr1 = IPersistStorage_QueryInterface(pPersistStorage, &IID_IOleObject, (LPVOID*)&pOleObject); /* Set client site with the IOleObject */ if (hr1 == S_OK) hr1 = IOleObject_SetClientSite(pOleObject, pClientSite); IPersistStorage_Release(pPersistStorage); /* Query for the requested interface */ if (hr1 == S_OK) hr1 = IPersistStorage_QueryInterface(pPersistStorage, riid, ppvObj); IPersistStorage_Release(pPersistStorage); IStorage_Release(pStorage); if (hr1 == S_OK) return S_OK; } /* Return error */ return DV_E_FORMATETC; } hr = IEnumFORMATETC_Next(pfmt, 1, &fmt, NULL); } } return DV_E_FORMATETC; } wine-20000526/dlls/ole32/ole2nls.c0100644000175000001440000000357307105333124016054 0ustar julliardusers/* * OLE2NLS library * * Copyright 1995 Martin von Loewis * Copyright 1998 David Lee Lambert * Copyright 2000 Julio César Gázquez */ #include #include #include #include #include #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "heap.h" #include "options.h" #include "winver.h" #include "winnls.h" #include "winreg.h" #include "winerror.h" #include "debugtools.h" #include "crtdll.h" #include "main.h" DEFAULT_DEBUG_CHANNEL(ole); static LPVOID lpNLSInfo = NULL; /****************************************************************************** * GetLocaleInfo16 [OLE2NLS.5] * Is the last parameter really WORD for Win16? */ INT16 WINAPI GetLocaleInfo16(LCID lcid,LCTYPE LCType,LPSTR buf,INT16 len) { return GetLocaleInfoA(lcid,LCType,buf,len); } /****************************************************************************** * GetStringType16 [OLE2NLS.7] */ BOOL16 WINAPI GetStringType16(LCID locale,DWORD dwInfoType,LPCSTR src, INT16 cchSrc,LPWORD chartype) { return GetStringTypeExA(locale,dwInfoType,src,cchSrc,chartype); } /*********************************************************************** * CompareString16 (OLE2NLS.8) */ UINT16 WINAPI CompareString16(DWORD lcid,DWORD fdwStyle, LPCSTR s1,DWORD l1,LPCSTR s2,DWORD l2) { return (UINT16)CompareStringA(lcid,fdwStyle,s1,l1,s2,l2); } /****************************************************************************** * RegisterNLSInfoChanged [OLE2NLS.10] */ BOOL16 WINAPI RegisterNLSInfoChanged16(LPVOID/*FIXME*/ lpNewNLSInfo) { FIXME("Fully implemented, but doesn't effect anything.\n"); if (!lpNewNLSInfo) { lpNLSInfo = NULL; return TRUE; } else { if (!lpNLSInfo) { lpNLSInfo = lpNewNLSInfo; return TRUE; } } return FALSE; /* ptr not set */ } wine-20000526/dlls/ole32/ole2nls.spec0100644000175000001440000000111007105333124016545 0ustar julliardusersname ole2nls type win16 1 pascal GetUserDefaultLCID() GetUserDefaultLCID 2 pascal GetSystemDefaultLCID() GetSystemDefaultLCID 3 pascal GetUserDefaultLangID() GetUserDefaultLangID 4 pascal GetSystemDefaultLangID() GetSystemDefaultLangID 5 pascal GetLocaleInfoA(long long ptr word) GetLocaleInfo16 6 stub LCMAPSTRINGA 7 pascal16 GetStringTypeA(long long str word ptr) GetStringType16 8 pascal16 CompareStringA(long long str word str word) CompareString16 9 pascal16 RegisterNLSInfoChanged(ptr) RegisterNLSInfoChanged16 #10 stub WEP 11 stub LIBMAIN 12 stub NOTIFYWINDOWPROC wine-20000526/dlls/ole32/ole2prox.spec0100644000175000001440000000011507111133237016745 0ustar julliardusersname ole2prox type win16 1 stub DLLGETCLASSOBJECT #2 WEP #3 ___EXPORTEDSTUB wine-20000526/dlls/ole32/ole2stubs.c0100644000175000001440000001602007061520300016402 0ustar julliardusers/* * Temporary place for ole2 stubs. * * Copyright (C) 1999 Corel Corporation * Move these functions to dlls/ole32/ole2impl.c when you implement them. */ #include "ole2.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ole) /****************************************************************************** * OleCreateLinkToFile [OLE32.96] */ HRESULT WINAPI OleCreateLinkToFile(LPCOLESTR lpszFileName, REFIID riid, DWORD renderopt, LPFORMATETC lpFormatEtc, LPOLECLIENTSITE pClientSite, LPSTORAGE pStg, LPVOID* ppvObj) { FIXME("(%p,%p,%li,%p,%p,%p,%p), stub!\n",lpszFileName, riid, renderopt, lpFormatEtc, pClientSite, pStg, ppvObj); return S_OK; } /****************************************************************************** * OleDuplicateData [OLE32.102] */ HRESULT WINAPI OleDuplicateData(HANDLE hSrc, CLIPFORMAT cfFormat, UINT uiFlags) { FIXME("(%x,%x,%x), stub!\n", hSrc, cfFormat, uiFlags); return S_OK; } /*********************************************************************** * WriteFmtUserTypeStg (OLE32.160) */ HRESULT WINAPI WriteFmtUserTypeStg( LPSTORAGE pstg, CLIPFORMAT cf, LPOLESTR lpszUserType) { FIXME("(%p,%x,%p) stub!\n",pstg,cf,lpszUserType); return S_OK; } /*********************************************************************** * OleTranslateAccelerator [OLE32.130] */ HRESULT WINAPI OleTranslateAccelerator (LPOLEINPLACEFRAME lpFrame, LPOLEINPLACEFRAMEINFO lpFrameInfo, LPMSG lpmsg) { FIXME("(%p,%p,%p),stub!\n", lpFrame, lpFrameInfo, lpmsg); return S_OK; } /****************************************************************************** * CoTreatAsClass [OLE32.46] */ HRESULT WINAPI CoTreatAsClass(REFCLSID clsidOld, REFCLSID clsidNew) { FIXME("(%p,%p), stub!\n", clsidOld, clsidNew); return S_OK; } /****************************************************************************** * IsAccelerator [OLE32.75] */ BOOL WINAPI IsAccelerator(HACCEL hAccel, int cAccelEntries, LPMSG lpMsg, WORD* lpwCmd) { FIXME("(%x,%i,%p,%p), stub!\n", hAccel, cAccelEntries, lpMsg, lpwCmd); return TRUE; } /****************************************************************************** * SetConvertStg [OLE32.142] */ HRESULT WINAPI SetConvertStg(LPSTORAGE pStg, BOOL fConvert) { FIXME("(%p,%x), stub!\n", pStg, fConvert); return S_OK; } /****************************************************************************** * OleCreate [OLE32.80] */ HRESULT WINAPI OleCreate(REFCLSID rclsid, REFIID riid, DWORD renderopt, LPFORMATETC pFormatEtc, LPOLECLIENTSITE pClientSite, LPSTORAGE pStg, LPVOID* ppvObj) { FIXME("(not shown), stub!\n"); return E_OUTOFMEMORY; } /****************************************************************************** * OleCreateLink [OLE32.94] */ HRESULT WINAPI OleCreateLink(LPMONIKER pmkLinkSrc, REFIID riid, DWORD renderopt, LPFORMATETC lpFormatEtc, LPOLECLIENTSITE pClientSite, LPSTORAGE pStg, LPVOID* ppvObj) { FIXME("(not shown), stub!\n"); return S_OK; } /****************************************************************************** * OleCreateFromFile [OLE32.93] */ HRESULT WINAPI OleCreateFromFile(REFCLSID rclsid, LPCOLESTR lpszFileName, REFIID riid, DWORD renderopt, LPFORMATETC lpFormatEtc, LPOLECLIENTSITE pClientSite, LPSTORAGE pStg, LPVOID* ppvObj) { FIXME("(not shown), stub!\n"); return S_OK; } /****************************************************************************** * OleLockRunning [OLE32.114] */ HRESULT WINAPI OleLockRunning(LPUNKNOWN pUnknown, BOOL fLock, BOOL fLastUnlockCloses) { FIXME("(%p,%x,%x), stub!\n", pUnknown, fLock, fLastUnlockCloses); return S_OK; } /****************************************************************************** * OleGetIconOfClass [OLE32.106] */ HGLOBAL WINAPI OleGetIconOfClass(REFCLSID rclsid, LPOLESTR lpszLabel, BOOL fUseTypeAsLabel) { FIXME("(%p,%p,%x), stub!\n", rclsid, lpszLabel, fUseTypeAsLabel); return S_OK; } /****************************************************************************** * ReadFmtUserTypeStg [OLE32.136] */ HRESULT WINAPI ReadFmtUserTypeStg (LPSTORAGE pstg, CLIPFORMAT* pcf, LPOLESTR* lplpszUserType) { FIXME("(%p,%p,%p), stub!\n", pstg, pcf, lplpszUserType); return S_OK; } /****************************************************************************** * OleCreateStaticFromData [OLE32.98] */ HRESULT WINAPI OleCreateStaticFromData(LPDATAOBJECT pSrcDataObj, REFIID iid, DWORD renderopt, LPFORMATETC pFormatEtc, LPOLECLIENTSITE pClientSite, LPSTORAGE pStg, LPVOID* ppvObj) { FIXME("(not shown), stub!\n"); return S_OK; } /****************************************************************************** * OleCreateLinkFromData [OLE32.95] */ HRESULT WINAPI OleCreateLinkFromData(LPDATAOBJECT pSrcDataObj, REFIID riid, DWORD renderopt, LPFORMATETC pFormatEtc, LPOLECLIENTSITE pClientSite, LPSTORAGE pStg, LPVOID* ppvObj) { FIXME("(not shown), stub!\n"); return S_OK; } /****************************************************************************** * OleIsRunning [OLE32.111] */ BOOL WINAPI OleIsRunning(LPOLEOBJECT pObject) { FIXME("(%p), stub!\n", pObject); return TRUE; } /*********************************************************************** * OleRegEnumVerbs [OLE32.120] */ HRESULT WINAPI OleRegEnumVerbs (REFCLSID clsid, LPENUMOLEVERB* ppenum) { FIXME("(%p,%p), stub!\n", clsid, ppenum); return OLEOBJ_E_NOVERBS; } /*********************************************************************** * OleRegEnumFormatEtc [OLE32.119] */ HRESULT WINAPI OleRegEnumFormatEtc ( REFCLSID clsid, DWORD dwDirection, LPENUMFORMATETC* ppenumFormatetc) { FIXME("(%p, %ld, %p), stub!\n", clsid, dwDirection, ppenumFormatetc); return S_OK; } /*********************************************************************** * PropVariantClear [OLE32.166] */ HRESULT WINAPI PropVariantClear(/*PROPVARIANT* */void* pvar) { FIXME("(%p): stub:\n", pvar); *(LPWORD)pvar = 0; /* sets at least the vt field to VT_EMPTY */ return S_OK; } /*********************************************************************** * PropVariantCopy [OLE32.246] */ HRESULT WINAPI PropVariantCopy(/*PROPVARIANT* */void* pvarDest, /*const PROPVARIANT* */ void* pvarSrc) { FIXME("(%p, %p): stub:\n", pvarDest, pvarSrc); return S_OK; } /*********************************************************************** * FreePropVariantArray [OLE32.195] */ HRESULT WINAPI FreePropVariantArray(ULONG cVariants, /*PROPVARIANT* */void* rgvars) { FIXME("(%lu, %p): stub:\n", cVariants, rgvars); return S_OK; } wine-20000526/dlls/ole32/ole2thk.spec0100644000175000001440000000027107111133237016546 0ustar julliardusersname ole2thk type win16 1 stub WEP 2 stub ROT16_ISRUNNING16 3 stub ISWIN32SHANDLE 4 stub ___EXPORTEDSTUB 5 stub COTHKCOMMON 6 stub ROT16_GETTIMEOFLASTCHANGE16 7 stub ROT16_GETOBJECT16 wine-20000526/dlls/ole32/ole32.spec0100644000175000001440000003130507056251360016132 0ustar julliardusersname ole32 type win32 1 stub BindMoniker # stdcall (ptr long ptr ptr) return 0,ERR_NOTIMPLEMENTED 2 stdcall CLSIDFromProgID(wstr ptr) CLSIDFromProgID 3 stdcall CLSIDFromString(wstr ptr) CLSIDFromString 4 stdcall CoBuildVersion() CoBuildVersion 5 stub CoCreateFreeThreadedMarshaler # stdcall (ptr ptr) return 0,ERR_NOTIMPLEMENTED 6 stdcall CoCreateGuid(ptr) CoCreateGuid 7 stdcall CoCreateInstance(ptr ptr long ptr ptr) CoCreateInstance 8 stdcall CoDisconnectObject(ptr long) CoDisconnectObject 9 stdcall CoDosDateTimeToFileTime(long long ptr) DosDateTimeToFileTime 10 stdcall CoFileTimeNow(ptr) CoFileTimeNow 11 stdcall CoFileTimeToDosDateTime(ptr ptr ptr) FileTimeToDosDateTime 12 stdcall CoFreeAllLibraries() CoFreeAllLibraries 13 stdcall CoFreeLibrary(long) CoFreeLibrary 14 stdcall CoFreeUnusedLibraries() CoFreeUnusedLibraries 15 stub CoGetCallerTID 16 stdcall CoGetClassObject(ptr long ptr ptr ptr) CoGetClassObject 17 stub CoGetCurrentLogicalThreadId 18 stdcall CoGetCurrentProcess() CoGetCurrentProcess 19 stub CoGetInterfaceAndReleaseStream # stdcall (ptr ptr ptr) return 0,ERR_NOTIMPLEMENTED 20 stdcall CoGetMalloc(long ptr) CoGetMalloc 21 stub CoGetMarshalSizeMax # stdcall (ptr ptr ptr long ptr long) return 0,ERR_NOTIMPLEMENTED 22 stub CoGetPSClsid # stdcall (ptr ptr) return 0,ERR_NOTIMPLEMENTED 23 stub CoGetStandardMarshal # stdcall (ptr ptr long ptr long ptr) return 0,ERR_NOTIMPLEMENTED 24 stub CoGetState 25 stub CoGetTreatAsClass # stdcall (ptr ptr) return 0,ERR_NOTIMPLEMENTED 26 stdcall CoInitialize(ptr) CoInitialize 27 stdcall CoInitializeWOW(long long) CoInitializeWOW 28 stub CoIsHandlerConnected # stdcall (ptr) return 0,ERR_NOTIMPLEMENTED 29 stub CoIsOle1Class # stdcall (ptr) return 0,ERR_NOTIMPLEMENTED 30 stdcall CoLoadLibrary(wstr long) CoLoadLibrary 31 stdcall CoLockObjectExternal(ptr long long) CoLockObjectExternal 32 stub CoMarshalHresult # stdcall (ptr ptr) return 0,ERR_NOTIMPLEMENTED 33 stub CoMarshalInterThreadInterfaceInStream # stdcall (ptr ptr ptr) return 0,ERR_NOTIMPLEMENTED 34 stub CoMarshalInterface # stdcall (ptr ptr ptr long ptr long) return 0,ERR_NOTIMPLEMENTED 35 stub CoQueryReleaseObject 36 stdcall CoRegisterClassObject(ptr ptr long long ptr) CoRegisterClassObject 37 stub CoRegisterMallocSpy # stdcall (ptr) return 0,ERR_NOTIMPLEMENTED 38 stdcall CoRegisterMessageFilter(ptr ptr) CoRegisterMessageFilter 39 stub CoReleaseMarshalData # stdcall (ptr) return 0,ERR_NOTIMPLEMENTED 40 stdcall CoRevokeClassObject(long) CoRevokeClassObject 41 stub CoRevokeMallocSpy # stdcall () return 0,ERR_NOTIMPLEMENTED 42 stdcall CoSetState(ptr) CoSetState 43 stdcall CoTaskMemAlloc(long) CoTaskMemAlloc 44 stdcall CoTaskMemFree(ptr) CoTaskMemFree 45 stdcall CoTaskMemRealloc(ptr long) CoTaskMemRealloc 46 stdcall CoTreatAsClass(ptr ptr) CoTreatAsClass 47 stdcall CoUninitialize() CoUninitialize 48 stub CoUnloadingWOW 49 stub CoUnmarshalHresult # stdcall (ptr ptr) return 0,ERR_NOTIMPLEMENTED 50 stub CoUnmarshalInterface # stdcall (ptr ptr ptr) return 0,ERR_NOTIMPLEMENTED 51 stdcall CreateAntiMoniker(ptr) CreateAntiMoniker 52 stdcall CreateBindCtx(long ptr) CreateBindCtx 53 stdcall CreateDataAdviseHolder(ptr) CreateDataAdviseHolder 54 stdcall CreateDataCache(ptr ptr ptr ptr) CreateDataCache 55 stdcall CreateFileMoniker(wstr ptr) CreateFileMoniker 56 stdcall CreateGenericComposite(ptr ptr ptr) CreateGenericComposite 57 stdcall CreateILockBytesOnHGlobal(ptr long ptr) CreateILockBytesOnHGlobal 58 stdcall CreateItemMoniker(wstr wstr ptr) CreateItemMoniker 59 stdcall CreateOleAdviseHolder(ptr) CreateOleAdviseHolder 60 stub CreatePointerMoniker # stdcall (ptr ptr) return 0,ERR_NOTIMPLEMENTED 61 stdcall CreateStreamOnHGlobal(ptr long ptr) CreateStreamOnHGlobal 62 stub DllDebugObjectRPCHook 63 stdcall DllGetClassObject (ptr ptr ptr) OLE32_DllGetClassObject 64 stub DllGetClassObjectWOW 65 stdcall DoDragDrop(ptr ptr long ptr) DoDragDrop 66 stub EnableHookObject 67 stdcall GetClassFile(ptr ptr) GetClassFile 68 stub GetConvertStg 69 stub GetDocumentBitStg 70 stdcall GetHGlobalFromILockBytes(ptr ptr) GetHGlobalFromILockBytes 71 stdcall GetHGlobalFromStream(ptr ptr) GetHGlobalFromStream 72 stub GetHookInterface 73 stdcall GetRunningObjectTable(long ptr) GetRunningObjectTable 74 stub IIDFromString 75 stdcall IsAccelerator(long long ptr long) IsAccelerator 76 stdcall IsEqualGUID(ptr ptr) IsEqualGUID32 77 stub IsValidIid 78 stdcall IsValidInterface(ptr) IsValidInterface 79 stub IsValidPtrIn 80 stub IsValidPtrOut 81 stdcall MkParseDisplayName(ptr ptr ptr ptr) MkParseDisplayName 82 stdcall MonikerCommonPrefixWith(ptr ptr ptr) MonikerCommonPrefixWith 83 stub MonikerRelativePathTo 84 stdcall OleBuildVersion() OleBuildVersion 85 stdcall OleConvertIStorageToOLESTREAM(ptr ptr) OleConvertIStorageToOLESTREAM 86 stub OleConvertIStorageToOLESTREAMEx 87 stdcall OleConvertOLESTREAMToIStorage(ptr ptr ptr) OleConvertOLESTREAMToIStorage 88 stub OleConvertOLESTREAMToIStorageEx 89 stdcall OleCreate(ptr ptr long ptr ptr ptr ptr) OleCreate 90 stdcall OleCreateDefaultHandler(ptr ptr ptr ptr) OleCreateDefaultHandler 91 stub OleCreateEmbeddingHelper 92 stdcall OleCreateFromData(ptr ptr long ptr ptr ptr ptr) OleCreateFromData 93 stdcall OleCreateFromFile(ptr ptr ptr long ptr ptr ptr ptr) OleCreateFromFile 94 stdcall OleCreateLink(ptr ptr long ptr ptr ptr ptr) OleCreateLink 95 stdcall OleCreateLinkFromData(ptr ptr long ptr ptr ptr ptr) OleCreateLinkFromData 96 stdcall OleCreateLinkToFile(ptr ptr long ptr ptr ptr ptr) OleCreateLinkToFile 97 stdcall OleCreateMenuDescriptor(long ptr) OleCreateMenuDescriptor 98 stdcall OleCreateStaticFromData(ptr ptr long ptr ptr ptr ptr) OleCreateStaticFromData 99 stdcall OleDestroyMenuDescriptor(long) OleDestroyMenuDescriptor 100 stub OleDoAutoConvert 101 stub OleDraw 102 stdcall OleDuplicateData(long long long) OleDuplicateData 103 stdcall OleFlushClipboard() OleFlushClipboard 104 stub OleGetAutoConvert 105 stdcall OleGetClipboard(ptr) OleGetClipboard 106 stdcall OleGetIconOfClass(ptr ptr long) OleGetIconOfClass 107 stub OleGetIconOfFile 108 stdcall OleInitialize(ptr) OleInitialize 109 stdcall OleInitializeWOW(long) OleInitializeWOW 110 stdcall OleIsCurrentClipboard(ptr) OleIsCurrentClipboard 111 stdcall OleIsRunning(ptr) OleIsRunning 112 stdcall OleLoad(ptr ptr ptr ptr) OleLoad 113 stdcall OleLoadFromStream(ptr ptr ptr) OleLoadFromStream 114 stdcall OleLockRunning(ptr long long) OleLockRunning 115 stub OleMetafilePictFromIconAndLabel 116 stub OleNoteObjectVisible 117 stdcall OleQueryCreateFromData(ptr) OleQueryCreateFromData 118 stdcall OleQueryLinkFromData(ptr) OleQueryLinkFromData 119 stdcall OleRegEnumFormatEtc(ptr long ptr) OleRegEnumFormatEtc 120 stdcall OleRegEnumVerbs(long ptr) OleRegEnumVerbs 121 stdcall OleRegGetMiscStatus(ptr long ptr) OleRegGetMiscStatus 122 stdcall OleRegGetUserType(long long ptr) OleRegGetUserType 123 stdcall OleRun(ptr) OleRun 124 stdcall OleSave(ptr ptr long) OleSave 125 stdcall OleSaveToStream(ptr ptr) OleSaveToStream 126 stub OleSetAutoConvert 127 stdcall OleSetClipboard(ptr) OleSetClipboard 128 stdcall OleSetContainedObject(ptr long) OleSetContainedObject 129 stdcall OleSetMenuDescriptor(long long long ptr ptr) OleSetMenuDescriptor 130 stdcall OleTranslateAccelerator(ptr ptr ptr) OleTranslateAccelerator 131 stdcall OleUninitialize() OleUninitialize 132 stub OpenOrCreateStream 133 stdcall ProgIDFromCLSID(wstr ptr) ProgIDFromCLSID 134 stdcall ReadClassStg(ptr ptr) ReadClassStg 135 stdcall ReadClassStm(ptr ptr) ReadClassStm 136 stdcall ReadFmtUserTypeStg(ptr ptr ptr) ReadFmtUserTypeStg 137 stub ReadOleStg 138 stub ReadStringStream 139 stdcall RegisterDragDrop(long ptr) RegisterDragDrop 140 stdcall ReleaseStgMedium(ptr) ReleaseStgMedium 141 stdcall RevokeDragDrop(long) RevokeDragDrop 142 stdcall SetConvertStg(ptr long) SetConvertStg 143 stub SetDocumentBitStg 144 stdcall StgCreateDocfile(wstr long long ptr) StgCreateDocfile 145 stdcall StgCreateDocfileOnILockBytes(ptr long long ptr) StgCreateDocfileOnILockBytes 146 stdcall StgIsStorageFile(wstr) StgIsStorageFile 147 stdcall StgIsStorageILockBytes(ptr) StgIsStorageILockBytes 148 stdcall StgOpenStorage(wstr ptr long ptr long ptr) StgOpenStorage 149 stdcall StgOpenStorageOnILockBytes(ptr ptr long long long ptr) StgOpenStorageOnILockBytes 150 stdcall StgSetTimes(ptr ptr ptr ptr ) StgSetTimes 151 stdcall StringFromCLSID(ptr ptr) StringFromCLSID 152 stdcall StringFromGUID2(ptr ptr long) StringFromGUID2 153 stdcall StringFromIID(ptr ptr) StringFromCLSID 154 stub UtConvertDvtd16toDvtd32 155 stub UtConvertDvtd32toDvtd16 156 stub UtGetDvtd16Info 157 stub UtGetDvtd32Info 158 stdcall WriteClassStg(ptr ptr) WriteClassStg 159 stdcall WriteClassStm(ptr ptr) WriteClassStm 160 stdcall WriteFmtUserTypeStg(ptr long ptr) WriteFmtUserTypeStg 161 stub WriteOleStg 162 stub WriteStringStream 163 stdcall CoInitializeEx(ptr long) CoInitializeEx 164 stub CoInitializeSecurity # stdcall (ptr long ptr ptr long long ptr long ptr) return 0,ERR_NOTIMPLEMENTED 165 stdcall CoCreateInstanceEx(ptr ptr long ptr long ptr) CoCreateInstanceEx 166 stdcall PropVariantClear(ptr) PropVariantClear 167 stub CoCopyProxy # stdcall (ptr ptr) return 0,ERR_NOTIMPLEMENTED 168 stub CoGetCallContext # stdcall (ptr ptr) return 0,ERR_NOTIMPLEMENTED 169 stub CoGetInstanceFromFile # stdcall (ptr ptr ptr long wstr long ptr) return 0,ERR_NOTIMPLEMENTED 170 stub CoGetInstanceFromIStorage # stdcall (ptr ptr ptr long ptr long ptr) return 0,ERR_NOTIMPLEMENTED 171 stub CoRegisterPSClsid # stdcall (ptr ptr) return 0,ERR_NOTIMPLEMENTED 172 stub CoReleaseServerProcess # stdcall () return 0,ERR_NOTIMPLEMENTED 173 stdcall CoResumeClassObjects() CoResumeClassObjects 174 stub CoRevertToSelf # stdcall () return 0,ERR_NOTIMPLEMENTED 175 stub CoSetProxyBlanket # stdcall (ptr long long wstr long long ptr long) return 0,ERR_NOTIMPLEMENTED 176 stub CoSuspendClassObjects # stdcall () return 0,ERR_NOTIMPLEMENTED 177 stub CreateClassMoniker # stdcall (ptr ptr) return 0,ERR_NOTIMPLEMENTED 178 stub CLIPFORMAT_UserFree 179 stub CLIPFORMAT_UserMarshal 180 stub CLIPFORMAT_UserSize 181 stub CLIPFORMAT_UserUnmarshal 182 stub CoAddRefServerProcess 183 stub CoGetObject 184 stub CoGetTIDFromIPID 185 stub CoImpersonateClient 186 stub CoQueryAuthenticationServices 187 stub CoQueryClientBlanket 188 stub CoQueryProxyBlanket 189 stub CoRegisterChannelHook 190 stub CoRegisterSurrogate 191 stub CoSwitchCallContext 192 stdcall CreateErrorInfo(ptr) CreateErrorInfo 193 stub CreateObjrefMoniker 194 stub DllRegisterServer 195 stdcall FreePropVariantArray(long ptr) FreePropVariantArray 196 stdcall GetErrorInfo(long ptr) GetErrorInfo 197 stub HACCEL_UserFree 198 stub HACCEL_UserMarshal 199 stub HACCEL_UserSize 200 stub HACCEL_UserUnmarshal 201 stub HBITMAP_UserFree 202 stub HBITMAP_UserMarshal 203 stub HBITMAP_UserSize 204 stub HBITMAP_UserUnmarshal 205 stub HBRUSH_UserFree 206 stub HBRUSH_UserMarshal 207 stub HBRUSH_UserSize 208 stub HBRUSH_UserUnmarshal 209 stub HENHMETAFILE_UserFree 210 stub HENHMETAFILE_UserMarshal 211 stub HENHMETAFILE_UserSize 212 stub HENHMETAFILE_UserUnmarshal 213 stub HGLOBAL_UserFree 214 stub HGLOBAL_UserMarshal 215 stub HGLOBAL_UserSize 216 stub HGLOBAL_UserUnmarshal 217 stub HMENU_UserFree 218 stub HMENU_UserMarshal 219 stub HMENU_UserSize 220 stub HMENU_UserUnmarshal 221 stub HMETAFILEPICT_UserFree 222 stub HMETAFILEPICT_UserMarshal 223 stub HMETAFILEPICT_UserSize 224 stub HMETAFILEPICT_UserUnmarshal 225 stub HMETAFILE_UserFree 226 stub HMETAFILE_UserMarshal 227 stub HMETAFILE_UserSize 228 stub HMETAFILE_UserUnmarshal 229 stub HPALETTE_UserFree 230 stub HPALETTE_UserMarshal 231 stub HPALETTE_UserSize 232 stub HPALETTE_UserUnmarshal 233 stub HWND_UserFree 234 stub HWND_UserMarshal 235 stub HWND_UserSize 236 stub HWND_UserUnmarshal 237 stub I_RemoteMain 238 stub OleCreateEx 239 stub OleCreateFromDataEx 240 stub OleCreateFromFileEx 241 stub OleCreateLinkEx 242 stub OleCreateLinkFromDataEx 243 stub OleCreateLinkToFileEx 244 stub PropSysAllocString 245 stub PropSysFreeString 246 stdcall PropVariantCopy(ptr ptr) PropVariantCopy 247 stub SNB_UserFree 248 stub SNB_UserMarshal 249 stub SNB_UserSize 250 stub SNB_UserUnmarshal 251 stub STGMEDIUM_UserFree 252 stub STGMEDIUM_UserMarshal 253 stub STGMEDIUM_UserSize 254 stub STGMEDIUM_UserUnmarshal 255 stdcall SetErrorInfo(long ptr) SetErrorInfo 256 stub StgCreateStorageEx 257 stub StgGetIFillLockBytesOnFile 258 stub StgGetIFillLockBytesOnILockBytes 259 stub StgOpenAsyncDocfileOnIFillLockBytes 260 stub StgOpenStorageEx 261 stub UpdateDCOMSettings 262 stub WdtpInterfacePointer_UserFree 263 stub WdtpInterfacePointer_UserMarshal 264 stub WdtpInterfacePointer_UserSize 265 stub WdtpInterfacePointer_UserUnmarshal wine-20000526/dlls/ole32/oleobj.c0100644000175000001440000003525107044724024015753 0ustar julliardusers/* * OLE2 COM objects * * Copyright 1998 Eric Kohl * Copyright 1999 Francis Beaudet */ #include #include "winbase.h" #include "winerror.h" #include "oleidl.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ole) /************************************************************************** * OleAdviseHolderImpl Implementation */ typedef struct OleAdviseHolderImpl { ICOM_VFIELD(IOleAdviseHolder); DWORD ref; DWORD maxSinks; IAdviseSink** arrayOfSinks; } OleAdviseHolderImpl; static LPOLEADVISEHOLDER OleAdviseHolderImpl_Constructor(); static void OleAdviseHolderImpl_Destructor(OleAdviseHolderImpl* ptrToDestroy); static HRESULT WINAPI OleAdviseHolderImpl_QueryInterface(LPOLEADVISEHOLDER,REFIID,LPVOID*); static ULONG WINAPI OleAdviseHolderImpl_AddRef(LPOLEADVISEHOLDER); static ULONG WINAPI OleAdviseHolderImpl_Release(LPOLEADVISEHOLDER); static HRESULT WINAPI OleAdviseHolderImpl_Advise(LPOLEADVISEHOLDER, IAdviseSink*, DWORD*); static HRESULT WINAPI OleAdviseHolderImpl_Unadvise (LPOLEADVISEHOLDER, DWORD); static HRESULT WINAPI OleAdviseHolderImpl_EnumAdvise (LPOLEADVISEHOLDER, IEnumSTATDATA **); static HRESULT WINAPI OleAdviseHolderImpl_SendOnRename (LPOLEADVISEHOLDER, IMoniker *); static HRESULT WINAPI OleAdviseHolderImpl_SendOnSave (LPOLEADVISEHOLDER); static HRESULT WINAPI OleAdviseHolderImpl_SendOnClose (LPOLEADVISEHOLDER); /************************************************************************** * OleAdviseHolderImpl_VTable */ static struct ICOM_VTABLE(IOleAdviseHolder) oahvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE OleAdviseHolderImpl_QueryInterface, OleAdviseHolderImpl_AddRef, OleAdviseHolderImpl_Release, OleAdviseHolderImpl_Advise, OleAdviseHolderImpl_Unadvise, OleAdviseHolderImpl_EnumAdvise, OleAdviseHolderImpl_SendOnRename, OleAdviseHolderImpl_SendOnSave, OleAdviseHolderImpl_SendOnClose }; /************************************************************************** * OleAdviseHolderImpl_Constructor */ static LPOLEADVISEHOLDER OleAdviseHolderImpl_Constructor() { OleAdviseHolderImpl* lpoah; DWORD index; lpoah= (OleAdviseHolderImpl*)HeapAlloc(GetProcessHeap(), 0, sizeof(OleAdviseHolderImpl)); ICOM_VTBL(lpoah) = &oahvt; lpoah->ref = 1; lpoah->maxSinks = 10; lpoah->arrayOfSinks = HeapAlloc(GetProcessHeap(), 0, lpoah->maxSinks * sizeof(IAdviseSink*)); for (index = 0; index < lpoah->maxSinks; index++) lpoah->arrayOfSinks[index]=0; return (LPOLEADVISEHOLDER)lpoah; } /************************************************************************** * OleAdviseHolderImpl_Destructor */ static void OleAdviseHolderImpl_Destructor( OleAdviseHolderImpl* ptrToDestroy) { DWORD index; for (index = 0; index < ptrToDestroy->maxSinks; index++) { if (ptrToDestroy->arrayOfSinks[index]!=0) { IAdviseSink_Release(ptrToDestroy->arrayOfSinks[index]); ptrToDestroy->arrayOfSinks[index] = NULL; } } HeapFree(GetProcessHeap(), 0, ptrToDestroy->arrayOfSinks); HeapFree(GetProcessHeap(), 0, ptrToDestroy); } /************************************************************************** * OleAdviseHolderImpl_QueryInterface */ static HRESULT WINAPI OleAdviseHolderImpl_QueryInterface( LPOLEADVISEHOLDER iface, REFIID riid, LPVOID* ppvObj) { ICOM_THIS(OleAdviseHolderImpl, iface); /* * Sanity check */ if (ppvObj==NULL) return E_POINTER; *ppvObj = NULL; if (IsEqualIID(riid, &IID_IUnknown)) { /* IUnknown */ *ppvObj = This; } else if(IsEqualIID(riid, &IID_IOleAdviseHolder)) { /* IOleAdviseHolder */ *ppvObj = (IOleAdviseHolder*) This; } if(*ppvObj == NULL) return E_NOINTERFACE; /* * A successful QI always increments the reference count. */ IUnknown_AddRef((IUnknown*)*ppvObj); return S_OK; } /****************************************************************************** * OleAdviseHolderImpl_AddRef */ static ULONG WINAPI OleAdviseHolderImpl_AddRef( LPOLEADVISEHOLDER iface) { ICOM_THIS(OleAdviseHolderImpl, iface); return ++(This->ref); } /****************************************************************************** * OleAdviseHolderImpl_Release */ static ULONG WINAPI OleAdviseHolderImpl_Release( LPOLEADVISEHOLDER iface) { ICOM_THIS(OleAdviseHolderImpl, iface); This->ref--; if (This->ref == 0) { OleAdviseHolderImpl_Destructor(This); return 0; } return This->ref; } /****************************************************************************** * OleAdviseHolderImpl_Advise */ static HRESULT WINAPI OleAdviseHolderImpl_Advise( LPOLEADVISEHOLDER iface, IAdviseSink* pAdvise, DWORD* pdwConnection) { DWORD index; ICOM_THIS(OleAdviseHolderImpl, iface); TRACE("(%p, %p, %p)\n", This, pAdvise, pdwConnection); /* * Sanity check */ if (pdwConnection==NULL) return E_POINTER; *pdwConnection = 0; /* * Find a free spot in the array. */ for (index = 0; index < This->maxSinks; index++) { if (This->arrayOfSinks[index]==NULL) break; } /* * If the array is full, we need to grow it. */ if (index == This->maxSinks) { DWORD i; This->maxSinks+=10; This->arrayOfSinks = HeapReAlloc(GetProcessHeap(), 0, This->arrayOfSinks, This->maxSinks*sizeof(IAdviseSink*)); for (i=index;i < This->maxSinks; i++) This->arrayOfSinks[i]=0; } /* * Store the new sink */ This->arrayOfSinks[index] = pAdvise; if (This->arrayOfSinks[index]!=NULL) IAdviseSink_AddRef(This->arrayOfSinks[index]); /* * Return the index as the cookie. * Since 0 is not a valid cookie, we will increment by * 1 the index in the table. */ *pdwConnection = index+1; return S_OK; } /****************************************************************************** * OleAdviseHolderImpl_Unadvise */ static HRESULT WINAPI OleAdviseHolderImpl_Unadvise( LPOLEADVISEHOLDER iface, DWORD dwConnection) { ICOM_THIS(OleAdviseHolderImpl, iface); TRACE("(%p, %lu)\n", This, dwConnection); /* * So we don't return 0 as a cookie, the index was * incremented by 1 in OleAdviseHolderImpl_Advise * we have to compensate. */ dwConnection--; /* * Check for invalid cookies. */ if ( (dwConnection < 0) || (dwConnection >= This->maxSinks) ) return OLE_E_NOCONNECTION; if (This->arrayOfSinks[dwConnection] == NULL) return OLE_E_NOCONNECTION; /* * Release the sink and mark the spot in the list as free. */ IAdviseSink_Release(This->arrayOfSinks[dwConnection]); This->arrayOfSinks[dwConnection] = NULL; return S_OK; } /****************************************************************************** * OleAdviseHolderImpl_EnumAdvise */ static HRESULT WINAPI OleAdviseHolderImpl_EnumAdvise (LPOLEADVISEHOLDER iface, IEnumSTATDATA **ppenumAdvise) { ICOM_THIS(OleAdviseHolderImpl, iface); FIXME("(%p)->(%p)\n", This, ppenumAdvise); *ppenumAdvise = NULL; return S_OK; } /****************************************************************************** * OleAdviseHolderImpl_SendOnRename */ static HRESULT WINAPI OleAdviseHolderImpl_SendOnRename (LPOLEADVISEHOLDER iface, IMoniker *pmk) { ICOM_THIS(OleAdviseHolderImpl, iface); FIXME("(%p)->(%p)\n", This, pmk); return S_OK; } /****************************************************************************** * OleAdviseHolderImpl_SendOnSave */ static HRESULT WINAPI OleAdviseHolderImpl_SendOnSave (LPOLEADVISEHOLDER iface) { ICOM_THIS(OleAdviseHolderImpl, iface); FIXME("(%p)\n", This); return S_OK; } /****************************************************************************** * OleAdviseHolderImpl_SendOnClose */ static HRESULT WINAPI OleAdviseHolderImpl_SendOnClose (LPOLEADVISEHOLDER iface) { ICOM_THIS(OleAdviseHolderImpl, iface); FIXME("(%p)\n", This); return S_OK; } /************************************************************************** * DataAdviseHolder Implementation */ typedef struct DataAdviseHolder { ICOM_VFIELD(IDataAdviseHolder); DWORD ref; } DataAdviseHolder; /************************************************************************** * DataAdviseHolder method prototypes */ static IDataAdviseHolder* DataAdviseHolder_Constructor(); static void DataAdviseHolder_Destructor(DataAdviseHolder* ptrToDestroy); static HRESULT WINAPI DataAdviseHolder_QueryInterface( IDataAdviseHolder* iface, REFIID riid, void** ppvObject); static ULONG WINAPI DataAdviseHolder_AddRef( IDataAdviseHolder* iface); static ULONG WINAPI DataAdviseHolder_Release( IDataAdviseHolder* iface); static HRESULT WINAPI DataAdviseHolder_Advise( IDataAdviseHolder* iface, IDataObject* pDataObject, FORMATETC* pFetc, DWORD advf, IAdviseSink* pAdvise, DWORD* pdwConnection); static HRESULT WINAPI DataAdviseHolder_Unadvise( IDataAdviseHolder* iface, DWORD dwConnection); static HRESULT WINAPI DataAdviseHolder_EnumAdvise( IDataAdviseHolder* iface, IEnumSTATDATA** ppenumAdvise); static HRESULT WINAPI DataAdviseHolder_SendOnDataChange( IDataAdviseHolder* iface, IDataObject* pDataObject, DWORD dwReserved, DWORD advf); /************************************************************************** * DataAdviseHolderImpl_VTable */ static struct ICOM_VTABLE(IDataAdviseHolder) DataAdviseHolderImpl_VTable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE DataAdviseHolder_QueryInterface, DataAdviseHolder_AddRef, DataAdviseHolder_Release, DataAdviseHolder_Advise, DataAdviseHolder_Unadvise, DataAdviseHolder_EnumAdvise, DataAdviseHolder_SendOnDataChange }; /****************************************************************************** * DataAdviseHolder_Constructor */ static IDataAdviseHolder* DataAdviseHolder_Constructor() { DataAdviseHolder* newHolder; newHolder = (DataAdviseHolder*)HeapAlloc(GetProcessHeap(), 0, sizeof(DataAdviseHolder)); ICOM_VTBL(newHolder) = &DataAdviseHolderImpl_VTable; newHolder->ref = 1; return (IDataAdviseHolder*)newHolder; } /****************************************************************************** * DataAdviseHolder_Destructor */ static void DataAdviseHolder_Destructor( DataAdviseHolder* ptrToDestroy) { HeapFree(GetProcessHeap(), 0, ptrToDestroy); } /************************************************************************ * DataAdviseHolder_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static HRESULT WINAPI DataAdviseHolder_QueryInterface( IDataAdviseHolder* iface, REFIID riid, void** ppvObject) { ICOM_THIS(DataAdviseHolder, iface); /* * Perform a sanity check on the parameters. */ if ( (This==0) || (ppvObject==0) ) return E_INVALIDARG; /* * Initialize the return parameter. */ *ppvObject = 0; /* * Compare the riid with the interface IDs implemented by this object. */ if ( (memcmp(&IID_IUnknown, riid, sizeof(IID_IUnknown)) == 0) || (memcmp(&IID_IDataAdviseHolder, riid, sizeof(IID_IDataAdviseHolder)) == 0) ) { *ppvObject = iface; } /* * Check that we obtained an interface. */ if ((*ppvObject)==0) { return E_NOINTERFACE; } /* * Query Interface always increases the reference count by one when it is * successful. */ IUnknown_AddRef((IUnknown*)*ppvObject); return S_OK;; } /************************************************************************ * DataAdviseHolder_AddRef (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DataAdviseHolder_AddRef( IDataAdviseHolder* iface) { ICOM_THIS(DataAdviseHolder, iface); This->ref++; return This->ref; } /************************************************************************ * DataAdviseHolder_Release (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI DataAdviseHolder_Release( IDataAdviseHolder* iface) { ICOM_THIS(DataAdviseHolder, iface); /* * Decrease the reference count on this object. */ This->ref--; /* * If the reference count goes down to 0, perform suicide. */ if (This->ref==0) { DataAdviseHolder_Destructor(This); return 0; } return This->ref; } static HRESULT WINAPI DataAdviseHolder_Advise( IDataAdviseHolder* iface, IDataObject* pDataObject, FORMATETC* pFetc, DWORD advf, IAdviseSink* pAdvise, DWORD* pdwConnection) { FIXME("(): stub\n"); return E_NOTIMPL; } static HRESULT WINAPI DataAdviseHolder_Unadvise( IDataAdviseHolder* iface, DWORD dwConnection) { FIXME("(): stub\n"); return E_NOTIMPL; } static HRESULT WINAPI DataAdviseHolder_EnumAdvise( IDataAdviseHolder* iface, IEnumSTATDATA** ppenumAdvise) { FIXME("(): stub\n"); return E_NOTIMPL; } static HRESULT WINAPI DataAdviseHolder_SendOnDataChange( IDataAdviseHolder* iface, IDataObject* pDataObject, DWORD dwReserved, DWORD advf) { FIXME("(): stub\n"); return E_NOTIMPL; } /*********************************************************************** * API functions */ /*********************************************************************** * CreateOleAdviseHolder [OLE32.59] */ HRESULT WINAPI CreateOleAdviseHolder( LPOLEADVISEHOLDER *ppOAHolder) { TRACE("(%p)\n", ppOAHolder); /* * Sanity check, */ if (ppOAHolder==NULL) return E_POINTER; *ppOAHolder = OleAdviseHolderImpl_Constructor (); if (*ppOAHolder != NULL) return S_OK; return E_OUTOFMEMORY; } /****************************************************************************** * CreateDataAdviseHolder [OLE32.53] */ HRESULT WINAPI CreateDataAdviseHolder( LPDATAADVISEHOLDER* ppDAHolder) { TRACE("(%p)\n", ppDAHolder); /* * Sanity check, */ if (ppDAHolder==NULL) return E_POINTER; *ppDAHolder = DataAdviseHolder_Constructor(); if (*ppDAHolder != NULL) return S_OK; return E_OUTOFMEMORY; } wine-20000526/dlls/ole32/olestd.h0100644000175000001440000000306107061520300015760 0ustar julliardusers/************************************************************************* ** ** olestd.h ** *************************************************************************/ #if !defined( __WINE_OLESTD_H_ ) #define __WINE_OLESTD_H_ #if !defined(__cplusplus) && !defined( __TURBOC__) #define NONAMELESSUNION /* use strict ANSI standard (for DVOBJ.H) */ #endif /* Clipboard format strings */ #define CF_EMBEDSOURCE "Embed Source" #define CF_EMBEDDEDOBJECT "Embedded Object" #define CF_LINKSOURCE "Link Source" #define CF_CUSTOMLINKSOURCE "Custom Link Source" #define CF_OBJECTDESCRIPTOR "Object Descriptor" #define CF_LINKSRCDESCRIPTOR "Link Source Descriptor" #define CF_OWNERLINK "OwnerLink" #define CF_FILENAME "FileName" #define OleStdQueryOleObjectData(lpformatetc) \ (((lpformatetc)->tymed & TYMED_ISTORAGE) ? \ NOERROR : ResultFromScode(DV_E_FORMATETC)) #define OleStdQueryLinkSourceData(lpformatetc) \ (((lpformatetc)->tymed & TYMED_ISTREAM) ? \ NOERROR : ResultFromScode(DV_E_FORMATETC)) #define OleStdQueryObjectDescriptorData(lpformatetc) \ (((lpformatetc)->tymed & TYMED_HGLOBAL) ? \ NOERROR : ResultFromScode(DV_E_FORMATETC)) #define OleStdQueryFormatMedium(lpformatetc, tymd) \ (((lpformatetc)->tymed & tymd) ? \ NOERROR : ResultFromScode(DV_E_FORMATETC)) /* Make an independent copy of a MetafilePict */ #define OleStdCopyMetafilePict(hpictin, phpictout) \ (*(phpictout) = OleDuplicateData(hpictin,CF_METAFILEPICT,GHND|GMEM_SHARE)) #endif /* __WINE_OLESTD_H_ */ wine-20000526/dlls/ole32/stg_bigblockfile.c0100644000175000001440000005224007064445151017772 0ustar julliardusers/****************************************************************************** * * BigBlockFile * * This is the implementation of a file that consists of blocks of * a predetermined size. * This class is used in the Compound File implementation of the * IStorage and IStream interfaces. It provides the functionality * to read and write any blocks in the file as well as setting and * obtaining the size of the file. * The blocks are indexed sequentially from the start of the file * starting with -1. * * TODO: * - Support for a transacted mode * * Copyright 1999 Thuy Nguyen * */ #include #include #include #include #include #include "winbase.h" #include "winerror.h" #include "wine/obj_storage.h" #include "ole2.h" #include "storage32.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(storage) /*********************************************************** * Data structures used internally by the BigBlockFile * class. */ /* We map in PAGE_SIZE-sized chunks. Must be a multiple of 4096. */ #define PAGE_SIZE 131072 #define BLOCKS_PER_PAGE (PAGE_SIZE / BIG_BLOCK_SIZE) /* We keep a list of recently-discarded pages. This controls the * size of that list. */ #define MAX_VICTIM_PAGES 16 /* This structure provides one bit for each block in a page. * Use BIGBLOCKFILE_{Test,Set,Clear}Bit to manipulate it. */ typedef struct { unsigned int bits[BLOCKS_PER_PAGE / (CHAR_BIT * sizeof(unsigned int))]; } BlockBits; /*** * This structure identifies the paged that are mapped * from the file and their position in memory. It is * also used to hold a reference count to those pages. * * page_index identifies which PAGE_SIZE chunk from the * file this mapping represents. (The mappings are always * PAGE_SIZE-aligned.) */ struct MappedPage { MappedPage *next; MappedPage *prev; DWORD page_index; LPVOID lpBytes; LONG refcnt; BlockBits readable_blocks; BlockBits writable_blocks; }; /*********************************************************** * Prototypes for private methods */ static void* BIGBLOCKFILE_GetMappedView(LPBIGBLOCKFILE This, DWORD page_index); static void BIGBLOCKFILE_ReleaseMappedPage(LPBIGBLOCKFILE This, MappedPage *page); static void BIGBLOCKFILE_FreeAllMappedPages(LPBIGBLOCKFILE This); static void BIGBLOCKFILE_UnmapAllMappedPages(LPBIGBLOCKFILE This); static void BIGBLOCKFILE_RemapAllMappedPages(LPBIGBLOCKFILE This); static void* BIGBLOCKFILE_GetBigBlockPointer(LPBIGBLOCKFILE This, ULONG index, DWORD desired_access); static MappedPage* BIGBLOCKFILE_GetPageFromPointer(LPBIGBLOCKFILE This, void* pBlock); static MappedPage* BIGBLOCKFILE_CreatePage(LPBIGBLOCKFILE This, ULONG page_index); static DWORD BIGBLOCKFILE_GetProtectMode(DWORD openFlags); static BOOL BIGBLOCKFILE_FileInit(LPBIGBLOCKFILE This, HANDLE hFile); static BOOL BIGBLOCKFILE_MemInit(LPBIGBLOCKFILE This, ILockBytes* plkbyt); /* Note that this evaluates a and b multiple times, so don't * pass expressions with side effects. */ #define ROUND_UP(a, b) ((((a) + (b) - 1)/(b))*(b)) /*********************************************************** * Blockbits functions. */ static inline BOOL BIGBLOCKFILE_TestBit(const BlockBits *bb, unsigned int index) { unsigned int array_index = index / (CHAR_BIT * sizeof(unsigned int)); unsigned int bit_index = index % (CHAR_BIT * sizeof(unsigned int)); return bb->bits[array_index] & (1 << bit_index); } static inline void BIGBLOCKFILE_SetBit(BlockBits *bb, unsigned int index) { unsigned int array_index = index / (CHAR_BIT * sizeof(unsigned int)); unsigned int bit_index = index % (CHAR_BIT * sizeof(unsigned int)); bb->bits[array_index] |= (1 << bit_index); } static inline void BIGBLOCKFILE_ClearBit(BlockBits *bb, unsigned int index) { unsigned int array_index = index / (CHAR_BIT * sizeof(unsigned int)); unsigned int bit_index = index % (CHAR_BIT * sizeof(unsigned int)); bb->bits[array_index] &= ~(1 << bit_index); } static inline void BIGBLOCKFILE_Zero(BlockBits *bb) { memset(bb->bits, 0, sizeof(bb->bits)); } /****************************************************************************** * BIGBLOCKFILE_Construct * * Construct a big block file. Create the file mapping object. * Create the read only mapped pages list, the writable mapped page list * and the blocks in use list. */ BigBlockFile * BIGBLOCKFILE_Construct( HANDLE hFile, ILockBytes* pLkByt, DWORD openFlags, ULONG blocksize, BOOL fileBased) { LPBIGBLOCKFILE This; This = (LPBIGBLOCKFILE)HeapAlloc(GetProcessHeap(), 0, sizeof(BigBlockFile)); if (This == NULL) return NULL; This->fileBased = fileBased; This->flProtect = BIGBLOCKFILE_GetProtectMode(openFlags); This->blocksize = blocksize; This->maplist = NULL; This->victimhead = NULL; This->victimtail = NULL; This->num_victim_pages = 0; if (This->fileBased) { if (!BIGBLOCKFILE_FileInit(This, hFile)) { HeapFree(GetProcessHeap(), 0, This); return NULL; } } else { if (!BIGBLOCKFILE_MemInit(This, pLkByt)) { HeapFree(GetProcessHeap(), 0, This); return NULL; } } return This; } /****************************************************************************** * BIGBLOCKFILE_FileInit * * Initialize a big block object supported by a file. */ static BOOL BIGBLOCKFILE_FileInit(LPBIGBLOCKFILE This, HANDLE hFile) { This->pLkbyt = NULL; This->hbytearray = 0; This->pbytearray = NULL; This->hfile = hFile; if (This->hfile == INVALID_HANDLE_VALUE) return FALSE; /* create the file mapping object */ This->hfilemap = CreateFileMappingA(This->hfile, NULL, This->flProtect, 0, 0, NULL); if (This->hfilemap == NULL) { CloseHandle(This->hfile); return FALSE; } This->filesize.s.LowPart = GetFileSize(This->hfile, &This->filesize.s.HighPart); This->maplist = NULL; TRACE("file len %lu\n", This->filesize.s.LowPart); return TRUE; } /****************************************************************************** * BIGBLOCKFILE_MemInit * * Initialize a big block object supported by an ILockBytes on HGLOABL. */ static BOOL BIGBLOCKFILE_MemInit(LPBIGBLOCKFILE This, ILockBytes* plkbyt) { This->hfile = 0; This->hfilemap = NULL; /* * Retrieve the handle to the byte array from the LockByte object. */ if (GetHGlobalFromILockBytes(plkbyt, &(This->hbytearray)) != S_OK) { FIXME("May not be an ILockBytes on HGLOBAL\n"); return FALSE; } This->pLkbyt = plkbyt; /* * Increment the reference count of the ILockByte object since * we're keeping a reference to it. */ ILockBytes_AddRef(This->pLkbyt); This->filesize.s.LowPart = GlobalSize(This->hbytearray); This->filesize.s.HighPart = 0; This->pbytearray = GlobalLock(This->hbytearray); TRACE("mem on %p len %lu\n", This->pbytearray, This->filesize.s.LowPart); return TRUE; } /****************************************************************************** * BIGBLOCKFILE_Destructor * * Destructor. Clean up, free memory. */ void BIGBLOCKFILE_Destructor( LPBIGBLOCKFILE This) { BIGBLOCKFILE_FreeAllMappedPages(This); if (This->fileBased) { CloseHandle(This->hfilemap); CloseHandle(This->hfile); } else { GlobalUnlock(This->hbytearray); ILockBytes_Release(This->pLkbyt); } /* destroy this */ HeapFree(GetProcessHeap(), 0, This); } /****************************************************************************** * BIGBLOCKFILE_GetROBigBlock * * Returns the specified block in read only mode. * Will return NULL if the block doesn't exists. */ void* BIGBLOCKFILE_GetROBigBlock( LPBIGBLOCKFILE This, ULONG index) { /* * block index starts at -1 * translate to zero based index */ if (index == 0xffffffff) index = 0; else index++; /* * validate the block index * */ if (This->blocksize * (index + 1) > ROUND_UP(This->filesize.s.LowPart, This->blocksize)) { TRACE("out of range %lu vs %lu\n", This->blocksize * (index + 1), This->filesize.s.LowPart); return NULL; } return BIGBLOCKFILE_GetBigBlockPointer(This, index, FILE_MAP_READ); } /****************************************************************************** * BIGBLOCKFILE_GetBigBlock * * Returns the specified block. * Will grow the file if necessary. */ void* BIGBLOCKFILE_GetBigBlock(LPBIGBLOCKFILE This, ULONG index) { /* * block index starts at -1 * translate to zero based index */ if (index == 0xffffffff) index = 0; else index++; /* * make sure that the block physically exists */ if ((This->blocksize * (index + 1)) > This->filesize.s.LowPart) { ULARGE_INTEGER newSize; newSize.s.HighPart = 0; newSize.s.LowPart = This->blocksize * (index + 1); BIGBLOCKFILE_SetSize(This, newSize); } return BIGBLOCKFILE_GetBigBlockPointer(This, index, FILE_MAP_WRITE); } /****************************************************************************** * BIGBLOCKFILE_ReleaseBigBlock * * Releases the specified block. */ void BIGBLOCKFILE_ReleaseBigBlock(LPBIGBLOCKFILE This, void *pBlock) { MappedPage *page; if (pBlock == NULL) return; page = BIGBLOCKFILE_GetPageFromPointer(This, pBlock); if (page == NULL) return; BIGBLOCKFILE_ReleaseMappedPage(This, page); } /****************************************************************************** * BIGBLOCKFILE_SetSize * * Sets the size of the file. * */ void BIGBLOCKFILE_SetSize(LPBIGBLOCKFILE This, ULARGE_INTEGER newSize) { if (This->filesize.s.LowPart == newSize.s.LowPart) return; TRACE("from %lu to %lu\n", This->filesize.s.LowPart, newSize.s.LowPart); /* * unmap all views, must be done before call to SetEndFile */ BIGBLOCKFILE_UnmapAllMappedPages(This); if (This->fileBased) { char buf[10]; /* * close file-mapping object, must be done before call to SetEndFile */ CloseHandle(This->hfilemap); This->hfilemap = NULL; /* * BEGIN HACK * This fixes a bug when saving through smbfs. * smbmount a Windows shared directory, save a structured storage file * to that dir: crash. * * The problem is that the SetFilePointer-SetEndOfFile combo below * doesn't always succeed. The file is not grown. It seems like the * operation is cached. By doing the WriteFile, the file is actually * grown on disk. * This hack is only needed when saving to smbfs. */ memset(buf, '0', 10); SetFilePointer(This->hfile, newSize.s.LowPart, NULL, FILE_BEGIN); WriteFile(This->hfile, buf, 10, NULL, NULL); /* * END HACK */ /* * set the new end of file */ SetFilePointer(This->hfile, newSize.s.LowPart, NULL, FILE_BEGIN); SetEndOfFile(This->hfile); /* * re-create the file mapping object */ This->hfilemap = CreateFileMappingA(This->hfile, NULL, This->flProtect, 0, 0, NULL); } else { GlobalUnlock(This->hbytearray); /* * Resize the byte array object. */ ILockBytes_SetSize(This->pLkbyt, newSize); /* * Re-acquire the handle, it may have changed. */ GetHGlobalFromILockBytes(This->pLkbyt, &This->hbytearray); This->pbytearray = GlobalLock(This->hbytearray); } This->filesize.s.LowPart = newSize.s.LowPart; This->filesize.s.HighPart = newSize.s.HighPart; BIGBLOCKFILE_RemapAllMappedPages(This); } /****************************************************************************** * BIGBLOCKFILE_GetSize * * Returns the size of the file. * */ ULARGE_INTEGER BIGBLOCKFILE_GetSize(LPBIGBLOCKFILE This) { return This->filesize; } /****************************************************************************** * BIGBLOCKFILE_AccessCheck [PRIVATE] * * block_index is the index within the page. */ static BOOL BIGBLOCKFILE_AccessCheck(MappedPage *page, ULONG block_index, DWORD desired_access) { assert(block_index < BLOCKS_PER_PAGE); if (desired_access == FILE_MAP_READ) { if (BIGBLOCKFILE_TestBit(&page->writable_blocks, block_index)) return FALSE; BIGBLOCKFILE_SetBit(&page->readable_blocks, block_index); } else { assert(desired_access == FILE_MAP_WRITE); if (BIGBLOCKFILE_TestBit(&page->readable_blocks, block_index)) return FALSE; BIGBLOCKFILE_SetBit(&page->writable_blocks, block_index); } return TRUE; } /****************************************************************************** * BIGBLOCKFILE_GetBigBlockPointer [PRIVATE] * * Returns a pointer to the specified block. */ static void* BIGBLOCKFILE_GetBigBlockPointer( LPBIGBLOCKFILE This, ULONG block_index, DWORD desired_access) { DWORD page_index = block_index / BLOCKS_PER_PAGE; DWORD block_on_page = block_index % BLOCKS_PER_PAGE; MappedPage *page = BIGBLOCKFILE_GetMappedView(This, page_index); if (!page || !page->lpBytes) return NULL; if (!BIGBLOCKFILE_AccessCheck(page, block_on_page, desired_access)) { BIGBLOCKFILE_ReleaseMappedPage(This, page); return NULL; } return (LPBYTE)page->lpBytes + (block_on_page * This->blocksize); } /****************************************************************************** * BIGBLOCKFILE_GetMappedPageFromPointer [PRIVATE] * * pBlock is a pointer to a block on a page. * The page has to be on the in-use list. (As oppsed to the victim list.) * * Does not increment the usage count. */ static MappedPage *BIGBLOCKFILE_GetPageFromPointer(LPBIGBLOCKFILE This, void *pBlock) { MappedPage *page; for (page = This->maplist; page != NULL; page = page->next) { if ((LPBYTE)pBlock >= (LPBYTE)page->lpBytes && (LPBYTE)pBlock <= (LPBYTE)page->lpBytes + PAGE_SIZE) break; } return page; } /****************************************************************************** * BIGBLOCKFILE_FindPageInList [PRIVATE] * */ static MappedPage *BIGBLOCKFILE_FindPageInList(MappedPage *head, ULONG page_index) { for (; head != NULL; head = head->next) { if (head->page_index == page_index) { InterlockedIncrement(&head->refcnt); break; } } return head; } static void BIGBLOCKFILE_UnlinkPage(MappedPage *page) { if (page->next) page->next->prev = page->prev; if (page->prev) page->prev->next = page->next; } static void BIGBLOCKFILE_LinkHeadPage(MappedPage **head, MappedPage *page) { if (*head) (*head)->prev = page; page->next = *head; page->prev = NULL; *head = page; } /****************************************************************************** * BIGBLOCKFILE_GetMappedView [PRIVATE] * * Gets the page requested if it is already mapped. * If it's not already mapped, this method will map it */ static void * BIGBLOCKFILE_GetMappedView( LPBIGBLOCKFILE This, DWORD page_index) { MappedPage *page; page = BIGBLOCKFILE_FindPageInList(This->maplist, page_index); if (!page) { page = BIGBLOCKFILE_FindPageInList(This->victimhead, page_index); if (page) { This->num_victim_pages--; BIGBLOCKFILE_Zero(&page->readable_blocks); BIGBLOCKFILE_Zero(&page->writable_blocks); } } if (page) { /* If the page is not already at the head of the list, move * it there. (Also moves pages from victim to main list.) */ if (This->maplist != page) { if (This->victimhead == page) This->victimhead = page->next; if (This->victimtail == page) This->victimtail = page->prev; BIGBLOCKFILE_UnlinkPage(page); BIGBLOCKFILE_LinkHeadPage(&This->maplist, page); } return page; } page = BIGBLOCKFILE_CreatePage(This, page_index); if (!page) return NULL; BIGBLOCKFILE_LinkHeadPage(&This->maplist, page); return page; } static BOOL BIGBLOCKFILE_MapPage(LPBIGBLOCKFILE This, MappedPage *page) { DWORD lowoffset = PAGE_SIZE * page->page_index; if (This->fileBased) { DWORD numBytesToMap; DWORD desired_access; if (lowoffset + PAGE_SIZE > This->filesize.s.LowPart) numBytesToMap = This->filesize.s.LowPart - lowoffset; else numBytesToMap = PAGE_SIZE; if (This->flProtect == PAGE_READONLY) desired_access = FILE_MAP_READ; else desired_access = FILE_MAP_WRITE; page->lpBytes = MapViewOfFile(This->hfilemap, desired_access, 0, lowoffset, numBytesToMap); } else { page->lpBytes = (LPBYTE)This->pbytearray + lowoffset; } TRACE("mapped page %lu to %p\n", page->page_index, page->lpBytes); return page->lpBytes != NULL; } static MappedPage *BIGBLOCKFILE_CreatePage(LPBIGBLOCKFILE This, ULONG page_index) { MappedPage *page; page = HeapAlloc(GetProcessHeap(), 0, sizeof(MappedPage)); if (page == NULL) return NULL; page->page_index = page_index; page->refcnt = 1; page->next = NULL; page->prev = NULL; BIGBLOCKFILE_MapPage(This, page); BIGBLOCKFILE_Zero(&page->readable_blocks); BIGBLOCKFILE_Zero(&page->writable_blocks); return page; } static void BIGBLOCKFILE_UnmapPage(LPBIGBLOCKFILE This, MappedPage *page) { TRACE("%ld at %p\n", page->page_index, page->lpBytes); if (page->refcnt > 0) ERR("unmapping inuse page %p\n", page->lpBytes); if (This->fileBased && page->lpBytes) UnmapViewOfFile(page->lpBytes); page->lpBytes = NULL; } static void BIGBLOCKFILE_DeletePage(LPBIGBLOCKFILE This, MappedPage *page) { BIGBLOCKFILE_UnmapPage(This, page); HeapFree(GetProcessHeap(), 0, page); } /****************************************************************************** * BIGBLOCKFILE_ReleaseMappedPage [PRIVATE] * * Decrements the reference count of the mapped page. */ static void BIGBLOCKFILE_ReleaseMappedPage( LPBIGBLOCKFILE This, MappedPage *page) { assert(This != NULL); assert(page != NULL); /* If the page is no longer refenced, move it to the victim list. * If the victim list is too long, kick somebody off. */ if (!InterlockedDecrement(&page->refcnt)) { if (This->maplist == page) This->maplist = page->next; BIGBLOCKFILE_UnlinkPage(page); if (MAX_VICTIM_PAGES > 0) { if (This->num_victim_pages >= MAX_VICTIM_PAGES) { MappedPage *victim = This->victimtail; if (victim) { This->victimtail = victim->prev; if (This->victimhead == victim) This->victimhead = victim->next; BIGBLOCKFILE_UnlinkPage(victim); BIGBLOCKFILE_DeletePage(This, victim); } } else This->num_victim_pages++; BIGBLOCKFILE_LinkHeadPage(&This->victimhead, page); if (This->victimtail == NULL) This->victimtail = page; } else BIGBLOCKFILE_DeletePage(This, page); } } static void BIGBLOCKFILE_DeleteList(LPBIGBLOCKFILE This, MappedPage *list) { while (list != NULL) { MappedPage *next = list->next; BIGBLOCKFILE_DeletePage(This, list); list = next; } } /****************************************************************************** * BIGBLOCKFILE_FreeAllMappedPages [PRIVATE] * * Unmap all currently mapped pages. * Empty mapped pages list. */ static void BIGBLOCKFILE_FreeAllMappedPages( LPBIGBLOCKFILE This) { BIGBLOCKFILE_DeleteList(This, This->maplist); BIGBLOCKFILE_DeleteList(This, This->victimhead); This->maplist = NULL; This->victimhead = NULL; This->victimtail = NULL; This->num_victim_pages = 0; } static void BIGBLOCKFILE_UnmapList(LPBIGBLOCKFILE This, MappedPage *list) { for (; list != NULL; list = list->next) { BIGBLOCKFILE_UnmapPage(This, list); } } static void BIGBLOCKFILE_UnmapAllMappedPages(LPBIGBLOCKFILE This) { BIGBLOCKFILE_UnmapList(This, This->maplist); BIGBLOCKFILE_UnmapList(This, This->victimhead); } static void BIGBLOCKFILE_RemapList(LPBIGBLOCKFILE This, MappedPage *list) { while (list != NULL) { MappedPage *next = list->next; if (list->page_index * PAGE_SIZE > This->filesize.s.LowPart) { TRACE("discarding %lu\n", list->page_index); /* page is entirely outside of the file, delete it */ BIGBLOCKFILE_UnlinkPage(list); BIGBLOCKFILE_DeletePage(This, list); } else { /* otherwise, remap it */ BIGBLOCKFILE_MapPage(This, list); } list = next; } } static void BIGBLOCKFILE_RemapAllMappedPages(LPBIGBLOCKFILE This) { BIGBLOCKFILE_RemapList(This, This->maplist); BIGBLOCKFILE_RemapList(This, This->victimhead); } /**************************************************************************** * BIGBLOCKFILE_GetProtectMode * * This function will return a protection mode flag for a file-mapping object * from the open flags of a file. */ static DWORD BIGBLOCKFILE_GetProtectMode(DWORD openFlags) { if (openFlags & (STGM_WRITE | STGM_READWRITE)) return PAGE_READWRITE; else return PAGE_READONLY; } wine-20000526/dlls/ole32/stg_stream.c0100644000175000001440000005252407104062111016640 0ustar julliardusers/* * Compound Storage (32 bit version) * Stream implementation * * This file contains the implementation of the stream interface * for streams contained in a compound storage. * * Copyright 1999 Francis Beaudet * Copyright 1999 Thuy Nguyen */ #include #include #include #include #include "winbase.h" #include "winerror.h" #include "debugtools.h" #include "wine/obj_storage.h" #include "storage32.h" DEFAULT_DEBUG_CHANNEL(storage) /* * Virtual function table for the StgStreamImpl class. */ static ICOM_VTABLE(IStream) StgStreamImpl_Vtbl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE StgStreamImpl_QueryInterface, StgStreamImpl_AddRef, StgStreamImpl_Release, StgStreamImpl_Read, StgStreamImpl_Write, StgStreamImpl_Seek, StgStreamImpl_SetSize, StgStreamImpl_CopyTo, StgStreamImpl_Commit, StgStreamImpl_Revert, StgStreamImpl_LockRegion, StgStreamImpl_UnlockRegion, StgStreamImpl_Stat, StgStreamImpl_Clone }; /****************************************************************************** ** StgStreamImpl implementation */ /*** * This is the constructor for the StgStreamImpl class. * * Params: * parentStorage - Pointer to the storage that contains the stream to open * ownerProperty - Index of the property that points to this stream. */ StgStreamImpl* StgStreamImpl_Construct( StorageBaseImpl* parentStorage, DWORD grfMode, ULONG ownerProperty) { StgStreamImpl* newStream; newStream = HeapAlloc(GetProcessHeap(), 0, sizeof(StgStreamImpl)); if (newStream!=0) { /* * Set-up the virtual function table and reference count. */ ICOM_VTBL(newStream) = &StgStreamImpl_Vtbl; newStream->ref = 0; /* * We want to nail-down the reference to the storage in case the * stream out-lives the storage in the client application. */ newStream->parentStorage = parentStorage; IStorage_AddRef((IStorage*)newStream->parentStorage); newStream->grfMode = grfMode; newStream->ownerProperty = ownerProperty; /* * Start the stream at the begining. */ newStream->currentPosition.s.HighPart = 0; newStream->currentPosition.s.LowPart = 0; /* * Initialize the rest of the data. */ newStream->streamSize.s.HighPart = 0; newStream->streamSize.s.LowPart = 0; newStream->bigBlockChain = 0; newStream->smallBlockChain = 0; /* * Read the size from the property and determine if the blocks forming * this stream are large or small. */ StgStreamImpl_OpenBlockChain(newStream); } return newStream; } /*** * This is the destructor of the StgStreamImpl class. * * This method will clean-up all the resources used-up by the given StgStreamImpl * class. The pointer passed-in to this function will be freed and will not * be valid anymore. */ void StgStreamImpl_Destroy(StgStreamImpl* This) { TRACE("(%p)\n", This); /* * Release the reference we are holding on the parent storage. */ IStorage_Release((IStorage*)This->parentStorage); This->parentStorage = 0; /* * Make sure we clean-up the block chain stream objects that we were using. */ if (This->bigBlockChain != 0) { BlockChainStream_Destroy(This->bigBlockChain); This->bigBlockChain = 0; } if (This->smallBlockChain != 0) { SmallBlockChainStream_Destroy(This->smallBlockChain); This->smallBlockChain = 0; } /* * Finally, free the memory used-up by the class. */ HeapFree(GetProcessHeap(), 0, This); } /*** * This implements the IUnknown method QueryInterface for this * class */ HRESULT WINAPI StgStreamImpl_QueryInterface( IStream* iface, REFIID riid, /* [in] */ void** ppvObject) /* [iid_is][out] */ { StgStreamImpl* const This=(StgStreamImpl*)iface; /* * Perform a sanity check on the parameters. */ if (ppvObject==0) return E_INVALIDARG; /* * Initialize the return parameter. */ *ppvObject = 0; /* * Compare the riid with the interface IDs implemented by this object. */ if (memcmp(&IID_IUnknown, riid, sizeof(IID_IUnknown)) == 0) { *ppvObject = (IStream*)This; } else if (memcmp(&IID_IStream, riid, sizeof(IID_IStream)) == 0) { *ppvObject = (IStream*)This; } /* * Check that we obtained an interface. */ if ((*ppvObject)==0) return E_NOINTERFACE; /* * Query Interface always increases the reference count by one when it is * successful */ StgStreamImpl_AddRef(iface); return S_OK;; } /*** * This implements the IUnknown method AddRef for this * class */ ULONG WINAPI StgStreamImpl_AddRef( IStream* iface) { StgStreamImpl* const This=(StgStreamImpl*)iface; This->ref++; return This->ref; } /*** * This implements the IUnknown method Release for this * class */ ULONG WINAPI StgStreamImpl_Release( IStream* iface) { StgStreamImpl* const This=(StgStreamImpl*)iface; ULONG newRef; This->ref--; newRef = This->ref; /* * If the reference count goes down to 0, perform suicide. */ if (newRef==0) { StgStreamImpl_Destroy(This); } return newRef; } /*** * This method will open the block chain pointed by the property * that describes the stream. * If the stream's size is null, no chain is opened. */ void StgStreamImpl_OpenBlockChain( StgStreamImpl* This) { StgProperty curProperty; BOOL readSucessful; /* * Make sure no old object is staying behind. */ if (This->smallBlockChain != 0) { SmallBlockChainStream_Destroy(This->smallBlockChain); This->smallBlockChain = 0; } if (This->bigBlockChain != 0) { BlockChainStream_Destroy(This->bigBlockChain); This->bigBlockChain = 0; } /* * Read the information from the property. */ readSucessful = StorageImpl_ReadProperty(This->parentStorage->ancestorStorage, This->ownerProperty, &curProperty); if (readSucessful) { This->streamSize = curProperty.size; /* * This code supports only streams that are <32 bits in size. */ assert(This->streamSize.s.HighPart == 0); if(curProperty.startingBlock == BLOCK_END_OF_CHAIN) { assert( (This->streamSize.s.HighPart == 0) && (This->streamSize.s.LowPart == 0) ); } else { if ( (This->streamSize.s.HighPart == 0) && (This->streamSize.s.LowPart < LIMIT_TO_USE_SMALL_BLOCK) ) { This->smallBlockChain = SmallBlockChainStream_Construct( This->parentStorage->ancestorStorage, This->ownerProperty); } else { This->bigBlockChain = BlockChainStream_Construct( This->parentStorage->ancestorStorage, NULL, This->ownerProperty); } } } } /*** * This method is part of the ISequentialStream interface. * * If reads a block of information from the stream at the current * position. It then moves the current position at the end of the * read block * * See the documentation of ISequentialStream for more info. */ HRESULT WINAPI StgStreamImpl_Read( IStream* iface, void* pv, /* [length_is][size_is][out] */ ULONG cb, /* [in] */ ULONG* pcbRead) /* [out] */ { StgStreamImpl* const This=(StgStreamImpl*)iface; ULONG bytesReadBuffer; ULONG bytesToReadFromBuffer; TRACE("(%p, %p, %ld, %p)\n", iface, pv, cb, pcbRead); /* * If the caller is not interested in the nubmer of bytes read, * we use another buffer to avoid "if" statements in the code. */ if (pcbRead==0) pcbRead = &bytesReadBuffer; /* * Using the known size of the stream, calculate the number of bytes * to read from the block chain */ bytesToReadFromBuffer = min( This->streamSize.s.LowPart - This->currentPosition.s.LowPart, cb); /* * Depending on the type of chain that was opened when the stream was constructed, * we delegate the work to the method that read the block chains. */ if (This->smallBlockChain!=0) { SmallBlockChainStream_ReadAt(This->smallBlockChain, This->currentPosition, bytesToReadFromBuffer, pv, pcbRead); } else if (This->bigBlockChain!=0) { BlockChainStream_ReadAt(This->bigBlockChain, This->currentPosition, bytesToReadFromBuffer, pv, pcbRead); } else { /* * Small and big block chains are both NULL. This case will happen * when a stream starts with BLOCK_END_OF_CHAIN and has size zero. */ *pcbRead = 0; return S_OK; } /* * We should always be able to read the proper amount of data from the * chain. */ assert(bytesToReadFromBuffer == *pcbRead); /* * Advance the pointer for the number of positions read. */ This->currentPosition.s.LowPart += *pcbRead; /* * The function returns S_OK if the buffer was filled completely * it returns S_FALSE if the end of the stream is reached before the * buffer is filled */ if(*pcbRead == cb) return S_OK; return S_FALSE; } /*** * This method is part of the ISequentialStream interface. * * It writes a block of information to the stream at the current * position. It then moves the current position at the end of the * written block. If the stream is too small to fit the block, * the stream is grown to fit. * * See the documentation of ISequentialStream for more info. */ HRESULT WINAPI StgStreamImpl_Write( IStream* iface, const void* pv, /* [size_is][in] */ ULONG cb, /* [in] */ ULONG* pcbWritten) /* [out] */ { StgStreamImpl* const This=(StgStreamImpl*)iface; ULARGE_INTEGER newSize; ULONG bytesWritten = 0; TRACE("(%p, %p, %ld, %p)\n", iface, pv, cb, pcbWritten); /* * Do we have permission to write to this stream? */ if (!(This->grfMode & (STGM_WRITE | STGM_READWRITE))) { return STG_E_ACCESSDENIED; } /* * If the caller is not interested in the number of bytes written, * we use another buffer to avoid "if" statements in the code. */ if (pcbWritten == 0) pcbWritten = &bytesWritten; /* * Initialize the out parameter */ *pcbWritten = 0; if (cb == 0) { return S_OK; } else { newSize.s.HighPart = 0; newSize.s.LowPart = This->currentPosition.s.LowPart + cb; } /* * Verify if we need to grow the stream */ if (newSize.s.LowPart > This->streamSize.s.LowPart) { /* grow stream */ IStream_SetSize(iface, newSize); } /* * Depending on the type of chain that was opened when the stream was constructed, * we delegate the work to the method that readwrites to the block chains. */ if (This->smallBlockChain!=0) { SmallBlockChainStream_WriteAt(This->smallBlockChain, This->currentPosition, cb, pv, pcbWritten); } else if (This->bigBlockChain!=0) { BlockChainStream_WriteAt(This->bigBlockChain, This->currentPosition, cb, pv, pcbWritten); } else assert(FALSE); /* * Advance the position pointer for the number of positions written. */ This->currentPosition.s.LowPart += *pcbWritten; return S_OK; } /*** * This method is part of the IStream interface. * * It will move the current stream pointer according to the parameters * given. * * See the documentation of IStream for more info. */ HRESULT WINAPI StgStreamImpl_Seek( IStream* iface, LARGE_INTEGER dlibMove, /* [in] */ DWORD dwOrigin, /* [in] */ ULARGE_INTEGER* plibNewPosition) /* [out] */ { StgStreamImpl* const This=(StgStreamImpl*)iface; ULARGE_INTEGER newPosition; TRACE("(%p, %ld, %ld, %p)\n", iface, dlibMove.s.LowPart, dwOrigin, plibNewPosition); /* * The caller is allowed to pass in NULL as the new position return value. * If it happens, we assign it to a dynamic variable to avoid special cases * in the code below. */ if (plibNewPosition == 0) { plibNewPosition = &newPosition; } /* * The file pointer is moved depending on the given "function" * parameter. */ switch (dwOrigin) { case STREAM_SEEK_SET: plibNewPosition->s.HighPart = 0; plibNewPosition->s.LowPart = 0; break; case STREAM_SEEK_CUR: *plibNewPosition = This->currentPosition; break; case STREAM_SEEK_END: *plibNewPosition = This->streamSize; break; default: return STG_E_INVALIDFUNCTION; } #if SIZEOF_LONG_LONG >= 8 plibNewPosition->QuadPart += dlibMove.QuadPart; #else /* * do some multiword arithmetic: * treat HighPart as a signed value * treat LowPart as unsigned * NOTE: this stuff is two's complement specific! */ if (dlibMove.s.HighPart < 0) { /* dlibMove is < 0 */ /* calculate the absolute value of dlibMove ... */ dlibMove.s.HighPart = -dlibMove.s.HighPart; dlibMove.s.LowPart ^= -1; /* ... and subtract with carry */ if (dlibMove.s.LowPart > plibNewPosition->s.LowPart) { /* carry needed, This accounts for any underflows at [1]*/ plibNewPosition->s.HighPart -= 1; } plibNewPosition->s.LowPart -= dlibMove.s.LowPart; /* [1] */ plibNewPosition->s.HighPart -= dlibMove.s.HighPart; } else { /* add directly */ int initialLowPart = plibNewPosition->s.LowPart; plibNewPosition->s.LowPart += dlibMove.s.LowPart; if((plibNewPosition->s.LowPart < initialLowPart) || (plibNewPosition->s.LowPart < dlibMove.s.LowPart)) { /* LowPart has rolled over => add the carry digit to HighPart */ plibNewPosition->s.HighPart++; } plibNewPosition->s.HighPart += dlibMove.s.HighPart; } /* * Check if we end-up before the beginning of the file. That should * trigger an error. */ if (plibNewPosition->s.HighPart < 0) { return STG_E_INVALIDPOINTER; } /* * We currently don't support files with offsets of >32 bits. * Note that we have checked for a negative offset already */ assert(plibNewPosition->s.HighPart <= 0); #endif /* * tell the caller what we calculated */ This->currentPosition = *plibNewPosition; return S_OK; } /*** * This method is part of the IStream interface. * * It will change the size of a stream. * * TODO: Switch from small blocks to big blocks and vice versa. * * See the documentation of IStream for more info. */ HRESULT WINAPI StgStreamImpl_SetSize( IStream* iface, ULARGE_INTEGER libNewSize) /* [in] */ { StgStreamImpl* const This=(StgStreamImpl*)iface; StgProperty curProperty; BOOL Success; TRACE("(%p, %ld)\n", iface, libNewSize.s.LowPart); /* * As documented. */ if (libNewSize.s.HighPart != 0) return STG_E_INVALIDFUNCTION; /* * Do we have permission? */ if (!(This->grfMode & (STGM_WRITE | STGM_READWRITE))) return STG_E_ACCESSDENIED; if (This->streamSize.s.LowPart == libNewSize.s.LowPart) return S_OK; /* * This will happen if we're creating a stream */ if ((This->smallBlockChain == 0) && (This->bigBlockChain == 0)) { if (libNewSize.s.LowPart < LIMIT_TO_USE_SMALL_BLOCK) { This->smallBlockChain = SmallBlockChainStream_Construct( This->parentStorage->ancestorStorage, This->ownerProperty); } else { This->bigBlockChain = BlockChainStream_Construct( This->parentStorage->ancestorStorage, NULL, This->ownerProperty); } } /* * Read this stream's property to see if it's small blocks or big blocks */ Success = StorageImpl_ReadProperty(This->parentStorage->ancestorStorage, This->ownerProperty, &curProperty); /* * Determine if we have to switch from small to big blocks or vice versa */ if ( (This->smallBlockChain!=0) && (curProperty.size.s.LowPart < LIMIT_TO_USE_SMALL_BLOCK) ) { if (libNewSize.s.LowPart >= LIMIT_TO_USE_SMALL_BLOCK) { /* * Transform the small block chain into a big block chain */ This->bigBlockChain = Storage32Impl_SmallBlocksToBigBlocks( This->parentStorage->ancestorStorage, &This->smallBlockChain); } } if (This->smallBlockChain!=0) { Success = SmallBlockChainStream_SetSize(This->smallBlockChain, libNewSize); } else { Success = BlockChainStream_SetSize(This->bigBlockChain, libNewSize); } /* * Write to the property the new information about this stream */ Success = StorageImpl_ReadProperty(This->parentStorage->ancestorStorage, This->ownerProperty, &curProperty); curProperty.size.s.HighPart = libNewSize.s.HighPart; curProperty.size.s.LowPart = libNewSize.s.LowPart; if (Success) { StorageImpl_WriteProperty(This->parentStorage->ancestorStorage, This->ownerProperty, &curProperty); } This->streamSize = libNewSize; return S_OK; } /*** * This method is part of the IStream interface. * * It will copy the 'cb' Bytes to 'pstm' IStream. * * See the documentation of IStream for more info. */ HRESULT WINAPI StgStreamImpl_CopyTo( IStream* iface, IStream* pstm, /* [unique][in] */ ULARGE_INTEGER cb, /* [in] */ ULARGE_INTEGER* pcbRead, /* [out] */ ULARGE_INTEGER* pcbWritten) /* [out] */ { HRESULT hr = S_OK; BYTE tmpBuffer[128]; ULONG bytesRead, bytesWritten, copySize; ULARGE_INTEGER totalBytesRead; ULARGE_INTEGER totalBytesWritten; TRACE("(%p, %p, %ld, %p, %p)\n", iface, pstm, cb.s.LowPart, pcbRead, pcbWritten); /* * Sanity check */ if ( pstm == 0 ) return STG_E_INVALIDPOINTER; totalBytesRead.s.LowPart = totalBytesRead.s.HighPart = 0; totalBytesWritten.s.LowPart = totalBytesWritten.s.HighPart = 0; /* * use stack to store data temporarly * there is surely more performant way of doing it, for now this basic * implementation will do the job */ while ( cb.s.LowPart > 0 ) { if ( cb.s.LowPart >= 128 ) copySize = 128; else copySize = cb.s.LowPart; IStream_Read(iface, tmpBuffer, copySize, &bytesRead); totalBytesRead.s.LowPart += bytesRead; IStream_Write(pstm, tmpBuffer, bytesRead, &bytesWritten); totalBytesWritten.s.LowPart += bytesWritten; /* * Check that read & write operations were succesfull */ if (bytesRead != bytesWritten) { hr = STG_E_MEDIUMFULL; break; } if (bytesRead!=copySize) cb.s.LowPart = 0; else cb.s.LowPart -= bytesRead; } /* * Update number of bytes read and written */ if (pcbRead) { pcbRead->s.LowPart = totalBytesRead.s.LowPart; pcbRead->s.HighPart = totalBytesRead.s.HighPart; } if (pcbWritten) { pcbWritten->s.LowPart = totalBytesWritten.s.LowPart; pcbWritten->s.HighPart = totalBytesWritten.s.HighPart; } return hr; } /*** * This method is part of the IStream interface. * * For streams contained in structured storages, this method * does nothing. This is what the documentation tells us. * * See the documentation of IStream for more info. */ HRESULT WINAPI StgStreamImpl_Commit( IStream* iface, DWORD grfCommitFlags) /* [in] */ { return S_OK; } /*** * This method is part of the IStream interface. * * For streams contained in structured storages, this method * does nothing. This is what the documentation tells us. * * See the documentation of IStream for more info. */ HRESULT WINAPI StgStreamImpl_Revert( IStream* iface) { return S_OK; } HRESULT WINAPI StgStreamImpl_LockRegion( IStream* iface, ULARGE_INTEGER libOffset, /* [in] */ ULARGE_INTEGER cb, /* [in] */ DWORD dwLockType) /* [in] */ { FIXME("not implemented!\n"); return E_NOTIMPL; } HRESULT WINAPI StgStreamImpl_UnlockRegion( IStream* iface, ULARGE_INTEGER libOffset, /* [in] */ ULARGE_INTEGER cb, /* [in] */ DWORD dwLockType) /* [in] */ { FIXME("not implemented!\n"); return E_NOTIMPL; } /*** * This method is part of the IStream interface. * * This method returns information about the current * stream. * * See the documentation of IStream for more info. */ HRESULT WINAPI StgStreamImpl_Stat( IStream* iface, STATSTG* pstatstg, /* [out] */ DWORD grfStatFlag) /* [in] */ { StgStreamImpl* const This=(StgStreamImpl*)iface; StgProperty curProperty; BOOL readSucessful; /* * Read the information from the property. */ readSucessful = StorageImpl_ReadProperty(This->parentStorage->ancestorStorage, This->ownerProperty, &curProperty); if (readSucessful) { StorageUtl_CopyPropertyToSTATSTG(pstatstg, &curProperty, grfStatFlag); pstatstg->grfMode = This->grfMode; return S_OK; } return E_FAIL; } HRESULT WINAPI StgStreamImpl_Clone( IStream* iface, IStream** ppstm) /* [out] */ { FIXME("not implemented!\n"); return E_NOTIMPL; } wine-20000526/dlls/ole32/storage.c0100644000175000001440000014035707111133456016147 0ustar julliardusers/* Compound Storage * * Implemented using the documentation of the LAOLA project at * * (Thanks to Martin Schwartz ) * * Copyright 1998 Marcus Meissner */ #include #include #include #include #include #include "windef.h" #include "winerror.h" #include "wine/winestring.h" #include "wine/winbase16.h" #include "wingdi.h" #include "wtypes.h" #include "file.h" #include "ole.h" #include "wine/obj_base.h" #include "wine/obj_storage.h" #include "heap.h" #include "module.h" #include "ldt.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ole); DECLARE_DEBUG_CHANNEL(relay); struct storage_header { BYTE magic[8]; /* 00: magic */ BYTE unknown1[36]; /* 08: unknown */ DWORD num_of_bbd_blocks;/* 2C: length of big datablocks */ DWORD root_startblock;/* 30: root storage first big block */ DWORD unknown2[2]; /* 34: unknown */ DWORD sbd_startblock; /* 3C: small block depot first big block */ DWORD unknown3[3]; /* 40: unknown */ DWORD bbd_list[109]; /* 4C: big data block list (up to end of sector)*/ }; struct storage_pps_entry { WCHAR pps_rawname[32];/* 00: \0 terminated widechar name */ WORD pps_sizeofname; /* 40: namelength in bytes */ BYTE pps_type; /* 42: flags, 1 storage/dir, 2 stream, 5 root */ BYTE pps_unknown0; /* 43: unknown */ DWORD pps_prev; /* 44: previous pps */ DWORD pps_next; /* 48: next pps */ DWORD pps_dir; /* 4C: directory pps */ GUID pps_guid; /* 50: class ID */ DWORD pps_unknown1; /* 60: unknown */ FILETIME pps_ft1; /* 64: filetime1 */ FILETIME pps_ft2; /* 70: filetime2 */ DWORD pps_sb; /* 74: data startblock */ DWORD pps_size; /* 78: datalength. (<0x1000)?small:big blocks*/ DWORD pps_unknown2; /* 7C: unknown */ }; #define STORAGE_CHAINENTRY_FAT 0xfffffffd #define STORAGE_CHAINENTRY_ENDOFCHAIN 0xfffffffe #define STORAGE_CHAINENTRY_FREE 0xffffffff static const BYTE STORAGE_magic[8] ={0xd0,0xcf,0x11,0xe0,0xa1,0xb1,0x1a,0xe1}; static const BYTE STORAGE_notmagic[8]={0x0e,0x11,0xfc,0x0d,0xd0,0xcf,0x11,0xe0}; static const BYTE STORAGE_oldmagic[8]={0xd0,0xcf,0x11,0xe0,0x0e,0x11,0xfc,0x0d}; #define BIGSIZE 512 #define SMALLSIZE 64 #define SMALLBLOCKS_PER_BIGBLOCK (BIGSIZE/SMALLSIZE) #define READ_HEADER assert(STORAGE_get_big_block(hf,-1,(LPBYTE)&sth));assert(!memcmp(STORAGE_magic,sth.magic,sizeof(STORAGE_magic))); static ICOM_VTABLE(IStorage16) stvt16; static ICOM_VTABLE(IStorage16) *segstvt16 = NULL; static ICOM_VTABLE(IStream16) strvt16; static ICOM_VTABLE(IStream16) *segstrvt16 = NULL; /*ULONG WINAPI IStorage16_AddRef(LPSTORAGE16 this);*/ static void _create_istorage16(LPSTORAGE16 *stg); static void _create_istream16(LPSTREAM16 *str); #define IMPLEMENTED 1 /****************************************************************************** * STORAGE_get_big_block [Internal] * * Reading OLE compound storage */ static BOOL STORAGE_get_big_block(HFILE hf,int n,BYTE *block) { assert(n>=-1); if (-1==_llseek(hf,(n+1)*BIGSIZE,SEEK_SET)) { WARN(" seek failed (%ld)\n",GetLastError()); return FALSE; } assert((n+1)*BIGSIZE==_llseek(hf,0,SEEK_CUR)); if (BIGSIZE!=_lread(hf,block,BIGSIZE)) { WARN("(block size %d): read didn't read (%ld)\n",n,GetLastError()); assert(0); return FALSE; } return TRUE; } /****************************************************************************** * STORAGE_put_big_block [INTERNAL] */ static BOOL STORAGE_put_big_block(HFILE hf,int n,BYTE *block) { assert(n>=-1); if (-1==_llseek(hf,(n+1)*BIGSIZE,SEEK_SET)) { WARN(" seek failed (%ld)\n",GetLastError()); return FALSE; } assert((n+1)*BIGSIZE==_llseek(hf,0,SEEK_CUR)); if (BIGSIZE!=_lwrite(hf,block,BIGSIZE)) { WARN(" write failed (%ld)\n",GetLastError()); return FALSE; } return TRUE; } /****************************************************************************** * STORAGE_get_next_big_blocknr [INTERNAL] */ static int STORAGE_get_next_big_blocknr(HFILE hf,int blocknr) { INT bbs[BIGSIZE/sizeof(INT)]; struct storage_header sth; READ_HEADER; assert(blocknr>>7>7]==0xffffffff) return -5; if (!STORAGE_get_big_block(hf,sth.bbd_list[blocknr>>7],(LPBYTE)bbs)) return -5; assert(bbs[blocknr&0x7f]!=STORAGE_CHAINENTRY_FREE); return bbs[blocknr&0x7f]; } /****************************************************************************** * STORAGE_get_nth_next_big_blocknr [INTERNAL] */ static int STORAGE_get_nth_next_big_blocknr(HFILE hf,int blocknr,int nr) { INT bbs[BIGSIZE/sizeof(INT)]; int lastblock = -1; struct storage_header sth; READ_HEADER; assert(blocknr>=0); while (nr--) { assert((blocknr>>7)>7]!=0xffffffff); /* simple caching... */ if (lastblock!=sth.bbd_list[blocknr>>7]) { assert(STORAGE_get_big_block(hf,sth.bbd_list[blocknr>>7],(LPBYTE)bbs)); lastblock = sth.bbd_list[blocknr>>7]; } blocknr = bbs[blocknr&0x7f]; } return blocknr; } /****************************************************************************** * STORAGE_get_root_pps_entry [Internal] */ static BOOL STORAGE_get_root_pps_entry(HFILE hf,struct storage_pps_entry *pstde) { int blocknr,i; BYTE block[BIGSIZE]; struct storage_pps_entry *stde=(struct storage_pps_entry*)block; struct storage_header sth; READ_HEADER; blocknr = sth.root_startblock; while (blocknr>=0) { assert(STORAGE_get_big_block(hf,blocknr,block)); for (i=0;i<4;i++) { if (!stde[i].pps_sizeofname) continue; if (stde[i].pps_type==5) { *pstde=stde[i]; return TRUE; } } blocknr=STORAGE_get_next_big_blocknr(hf,blocknr); } return FALSE; } /****************************************************************************** * STORAGE_get_small_block [INTERNAL] */ static BOOL STORAGE_get_small_block(HFILE hf,int blocknr,BYTE *sblock) { BYTE block[BIGSIZE]; int bigblocknr; struct storage_pps_entry root; assert(blocknr>=0); assert(STORAGE_get_root_pps_entry(hf,&root)); bigblocknr = STORAGE_get_nth_next_big_blocknr(hf,root.pps_sb,blocknr/SMALLBLOCKS_PER_BIGBLOCK); assert(bigblocknr>=0); assert(STORAGE_get_big_block(hf,bigblocknr,block)); memcpy(sblock,((LPBYTE)block)+SMALLSIZE*(blocknr&(SMALLBLOCKS_PER_BIGBLOCK-1)),SMALLSIZE); return TRUE; } /****************************************************************************** * STORAGE_put_small_block [INTERNAL] */ static BOOL STORAGE_put_small_block(HFILE hf,int blocknr,BYTE *sblock) { BYTE block[BIGSIZE]; int bigblocknr; struct storage_pps_entry root; assert(blocknr>=0); assert(STORAGE_get_root_pps_entry(hf,&root)); bigblocknr = STORAGE_get_nth_next_big_blocknr(hf,root.pps_sb,blocknr/SMALLBLOCKS_PER_BIGBLOCK); assert(bigblocknr>=0); assert(STORAGE_get_big_block(hf,bigblocknr,block)); memcpy(((LPBYTE)block)+SMALLSIZE*(blocknr&(SMALLBLOCKS_PER_BIGBLOCK-1)),sblock,SMALLSIZE); assert(STORAGE_put_big_block(hf,bigblocknr,block)); return TRUE; } /****************************************************************************** * STORAGE_get_next_small_blocknr [INTERNAL] */ static int STORAGE_get_next_small_blocknr(HFILE hf,int blocknr) { BYTE block[BIGSIZE]; LPINT sbd = (LPINT)block; int bigblocknr; struct storage_header sth; READ_HEADER; assert(blocknr>=0); bigblocknr = STORAGE_get_nth_next_big_blocknr(hf,sth.sbd_startblock,blocknr/128); assert(bigblocknr>=0); assert(STORAGE_get_big_block(hf,bigblocknr,block)); assert(sbd[blocknr & 127]!=STORAGE_CHAINENTRY_FREE); return sbd[blocknr & (128-1)]; } /****************************************************************************** * STORAGE_get_nth_next_small_blocknr [INTERNAL] */ static int STORAGE_get_nth_next_small_blocknr(HFILE hf,int blocknr,int nr) { int lastblocknr; BYTE block[BIGSIZE]; LPINT sbd = (LPINT)block; struct storage_header sth; READ_HEADER; lastblocknr=-1; assert(blocknr>=0); while ((nr--) && (blocknr>=0)) { if (lastblocknr/128!=blocknr/128) { int bigblocknr; bigblocknr = STORAGE_get_nth_next_big_blocknr(hf,sth.sbd_startblock,blocknr/128); assert(bigblocknr>=0); assert(STORAGE_get_big_block(hf,bigblocknr,block)); lastblocknr = blocknr; } assert(lastblocknr>=0); lastblocknr=blocknr; blocknr=sbd[blocknr & (128-1)]; assert(blocknr!=STORAGE_CHAINENTRY_FREE); } return blocknr; } /****************************************************************************** * STORAGE_get_pps_entry [INTERNAL] */ static int STORAGE_get_pps_entry(HFILE hf,int n,struct storage_pps_entry *pstde) { int blocknr; BYTE block[BIGSIZE]; struct storage_pps_entry *stde = (struct storage_pps_entry*)(((LPBYTE)block)+128*(n&3)); struct storage_header sth; READ_HEADER; /* we have 4 pps entries per big block */ blocknr = STORAGE_get_nth_next_big_blocknr(hf,sth.root_startblock,n/4); assert(blocknr>=0); assert(STORAGE_get_big_block(hf,blocknr,block)); *pstde=*stde; return 1; } /****************************************************************************** * STORAGE_put_pps_entry [Internal] */ static int STORAGE_put_pps_entry(HFILE hf,int n,struct storage_pps_entry *pstde) { int blocknr; BYTE block[BIGSIZE]; struct storage_pps_entry *stde = (struct storage_pps_entry*)(((LPBYTE)block)+128*(n&3)); struct storage_header sth; READ_HEADER; /* we have 4 pps entries per big block */ blocknr = STORAGE_get_nth_next_big_blocknr(hf,sth.root_startblock,n/4); assert(blocknr>=0); assert(STORAGE_get_big_block(hf,blocknr,block)); *stde=*pstde; assert(STORAGE_put_big_block(hf,blocknr,block)); return 1; } /****************************************************************************** * STORAGE_look_for_named_pps [Internal] */ static int STORAGE_look_for_named_pps(HFILE hf,int n,LPOLESTR name) { struct storage_pps_entry stde; int ret; if (n==-1) return -1; if (1!=STORAGE_get_pps_entry(hf,n,&stde)) return -1; if (!lstrcmpW(name,stde.pps_rawname)) return n; if (stde.pps_prev != -1) { ret=STORAGE_look_for_named_pps(hf,stde.pps_prev,name); if (ret!=-1) return ret; } if (stde.pps_next != -1) { ret=STORAGE_look_for_named_pps(hf,stde.pps_next,name); if (ret!=-1) return ret; } return -1; } /****************************************************************************** * STORAGE_dump_pps_entry [Internal] * * FIXME * Function is unused */ void STORAGE_dump_pps_entry(struct storage_pps_entry *stde) { char name[33]; lstrcpyWtoA(name,stde->pps_rawname); if (!stde->pps_sizeofname) return; DPRINTF("name: %s\n",name); DPRINTF("type: %d\n",stde->pps_type); DPRINTF("prev pps: %ld\n",stde->pps_prev); DPRINTF("next pps: %ld\n",stde->pps_next); DPRINTF("dir pps: %ld\n",stde->pps_dir); DPRINTF("guid: %s\n",debugstr_guid(&(stde->pps_guid))); if (stde->pps_type !=2) { time_t t; t = DOSFS_FileTimeToUnixTime(&(stde->pps_ft1),NULL); DPRINTF("ts1: %s\n",ctime(&t)); t = DOSFS_FileTimeToUnixTime(&(stde->pps_ft2),NULL); DPRINTF("ts2: %s\n",ctime(&t)); } DPRINTF("startblock: %ld\n",stde->pps_sb); DPRINTF("size: %ld\n",stde->pps_size); } /****************************************************************************** * STORAGE_init_storage [INTERNAL] */ static BOOL STORAGE_init_storage(HFILE hf) { BYTE block[BIGSIZE]; LPDWORD bbs; struct storage_header *sth; struct storage_pps_entry *stde; assert(-1!=_llseek(hf,0,SEEK_SET)); /* block -1 is the storage header */ sth = (struct storage_header*)block; memcpy(sth->magic,STORAGE_magic,8); memset(sth->unknown1,0,sizeof(sth->unknown1)); memset(sth->unknown2,0,sizeof(sth->unknown2)); memset(sth->unknown3,0,sizeof(sth->unknown3)); sth->num_of_bbd_blocks = 1; sth->root_startblock = 1; sth->sbd_startblock = 0xffffffff; memset(sth->bbd_list,0xff,sizeof(sth->bbd_list)); sth->bbd_list[0] = 0; assert(BIGSIZE==_lwrite(hf,block,BIGSIZE)); /* block 0 is the big block directory */ bbs=(LPDWORD)block; memset(block,0xff,sizeof(block)); /* mark all blocks as free */ bbs[0]=STORAGE_CHAINENTRY_ENDOFCHAIN; /* for this block */ bbs[1]=STORAGE_CHAINENTRY_ENDOFCHAIN; /* for directory entry */ assert(BIGSIZE==_lwrite(hf,block,BIGSIZE)); /* block 1 is the root directory entry */ memset(block,0x00,sizeof(block)); stde = (struct storage_pps_entry*)block; lstrcpyAtoW(stde->pps_rawname,"RootEntry"); stde->pps_sizeofname = lstrlenW(stde->pps_rawname)*2+2; stde->pps_type = 5; stde->pps_dir = -1; stde->pps_next = -1; stde->pps_prev = -1; stde->pps_sb = 0xffffffff; stde->pps_size = 0; assert(BIGSIZE==_lwrite(hf,block,BIGSIZE)); return TRUE; } /****************************************************************************** * STORAGE_set_big_chain [Internal] */ static BOOL STORAGE_set_big_chain(HFILE hf,int blocknr,INT type) { BYTE block[BIGSIZE]; LPINT bbd = (LPINT)block; int nextblocknr,bigblocknr; struct storage_header sth; READ_HEADER; assert(blocknr!=type); while (blocknr>=0) { bigblocknr = sth.bbd_list[blocknr/128]; assert(bigblocknr>=0); assert(STORAGE_get_big_block(hf,bigblocknr,block)); nextblocknr = bbd[blocknr&(128-1)]; bbd[blocknr&(128-1)] = type; if (type>=0) return TRUE; assert(STORAGE_put_big_block(hf,bigblocknr,block)); type = STORAGE_CHAINENTRY_FREE; blocknr = nextblocknr; } return TRUE; } /****************************************************************************** * STORAGE_set_small_chain [Internal] */ static BOOL STORAGE_set_small_chain(HFILE hf,int blocknr,INT type) { BYTE block[BIGSIZE]; LPINT sbd = (LPINT)block; int lastblocknr,nextsmallblocknr,bigblocknr; struct storage_header sth; READ_HEADER; assert(blocknr!=type); lastblocknr=-129;bigblocknr=-2; while (blocknr>=0) { /* cache block ... */ if (lastblocknr/128!=blocknr/128) { bigblocknr = STORAGE_get_nth_next_big_blocknr(hf,sth.sbd_startblock,blocknr/128); assert(bigblocknr>=0); assert(STORAGE_get_big_block(hf,bigblocknr,block)); } lastblocknr = blocknr; nextsmallblocknr = sbd[blocknr&(128-1)]; sbd[blocknr&(128-1)] = type; assert(STORAGE_put_big_block(hf,bigblocknr,block)); if (type>=0) return TRUE; type = STORAGE_CHAINENTRY_FREE; blocknr = nextsmallblocknr; } return TRUE; } /****************************************************************************** * STORAGE_get_free_big_blocknr [Internal] */ static int STORAGE_get_free_big_blocknr(HFILE hf) { BYTE block[BIGSIZE]; LPINT sbd = (LPINT)block; int lastbigblocknr,i,curblock,bigblocknr; struct storage_header sth; READ_HEADER; curblock = 0; lastbigblocknr = -1; bigblocknr = sth.bbd_list[curblock]; while (curblock=0); assert(STORAGE_get_big_block(hf,bigblocknr,block)); for (i=0;i<128;i++) if (sbd[i]==STORAGE_CHAINENTRY_FREE) { sbd[i] = STORAGE_CHAINENTRY_ENDOFCHAIN; assert(STORAGE_put_big_block(hf,bigblocknr,block)); memset(block,0x42,sizeof(block)); assert(STORAGE_put_big_block(hf,i+curblock*128,block)); return i+curblock*128; } lastbigblocknr = bigblocknr; bigblocknr = sth.bbd_list[++curblock]; } bigblocknr = curblock*128; /* since we have marked all blocks from 0 up to curblock*128-1 * the next free one is curblock*128, where we happily put our * next large block depot. */ memset(block,0xff,sizeof(block)); /* mark the block allocated and returned by this function */ sbd[1] = STORAGE_CHAINENTRY_ENDOFCHAIN; assert(STORAGE_put_big_block(hf,bigblocknr,block)); /* if we had a bbd block already (mostlikely) we need * to link the new one into the chain */ if (lastbigblocknr!=-1) assert(STORAGE_set_big_chain(hf,lastbigblocknr,bigblocknr)); sth.bbd_list[curblock]=bigblocknr; sth.num_of_bbd_blocks++; assert(sth.num_of_bbd_blocks==curblock+1); assert(STORAGE_put_big_block(hf,-1,(LPBYTE)&sth)); /* Set the end of the chain for the bigblockdepots */ assert(STORAGE_set_big_chain(hf,bigblocknr,STORAGE_CHAINENTRY_ENDOFCHAIN)); /* add 1, for the first entry is used for the additional big block * depot. (means we already used bigblocknr) */ memset(block,0x42,sizeof(block)); /* allocate this block (filled with 0x42) */ assert(STORAGE_put_big_block(hf,bigblocknr+1,block)); return bigblocknr+1; } /****************************************************************************** * STORAGE_get_free_small_blocknr [Internal] */ static int STORAGE_get_free_small_blocknr(HFILE hf) { BYTE block[BIGSIZE]; LPINT sbd = (LPINT)block; int lastbigblocknr,newblocknr,i,curblock,bigblocknr; struct storage_pps_entry root; struct storage_header sth; READ_HEADER; bigblocknr = sth.sbd_startblock; curblock = 0; lastbigblocknr = -1; newblocknr = -1; while (bigblocknr>=0) { if (!STORAGE_get_big_block(hf,bigblocknr,block)) return -1; for (i=0;i<128;i++) if (sbd[i]==STORAGE_CHAINENTRY_FREE) { sbd[i]=STORAGE_CHAINENTRY_ENDOFCHAIN; newblocknr = i+curblock*128; break; } if (i!=128) break; lastbigblocknr = bigblocknr; bigblocknr = STORAGE_get_next_big_blocknr(hf,bigblocknr); curblock++; } if (newblocknr==-1) { bigblocknr = STORAGE_get_free_big_blocknr(hf); if (bigblocknr<0) return -1; READ_HEADER; memset(block,0xff,sizeof(block)); sbd[0]=STORAGE_CHAINENTRY_ENDOFCHAIN; if (!STORAGE_put_big_block(hf,bigblocknr,block)) return -1; if (lastbigblocknr==-1) { sth.sbd_startblock = bigblocknr; if (!STORAGE_put_big_block(hf,-1,(LPBYTE)&sth)) /* need to write it */ return -1; } else { if (!STORAGE_set_big_chain(hf,lastbigblocknr,bigblocknr)) return -1; } if (!STORAGE_set_big_chain(hf,bigblocknr,STORAGE_CHAINENTRY_ENDOFCHAIN)) return -1; newblocknr = curblock*128; } /* allocate enough big blocks for storing the allocated small block */ if (!STORAGE_get_root_pps_entry(hf,&root)) return -1; if (root.pps_sb==-1) lastbigblocknr = -1; else lastbigblocknr = STORAGE_get_nth_next_big_blocknr(hf,root.pps_sb,(root.pps_size-1)/BIGSIZE); while (root.pps_size < (newblocknr*SMALLSIZE+SMALLSIZE-1)) { /* we need to allocate more stuff */ bigblocknr = STORAGE_get_free_big_blocknr(hf); if (bigblocknr<0) return -1; READ_HEADER; if (root.pps_sb==-1) { root.pps_sb = bigblocknr; root.pps_size += BIGSIZE; } else { if (!STORAGE_set_big_chain(hf,lastbigblocknr,bigblocknr)) return -1; root.pps_size += BIGSIZE; } lastbigblocknr = bigblocknr; } if (!STORAGE_set_big_chain(hf,lastbigblocknr,STORAGE_CHAINENTRY_ENDOFCHAIN)) return -1; if (!STORAGE_put_pps_entry(hf,0,&root)) return -1; return newblocknr; } /****************************************************************************** * STORAGE_get_free_pps_entry [Internal] */ static int STORAGE_get_free_pps_entry(HFILE hf) { int blocknr,i,curblock,lastblocknr; BYTE block[BIGSIZE]; struct storage_pps_entry *stde = (struct storage_pps_entry*)block; struct storage_header sth; READ_HEADER; blocknr = sth.root_startblock; assert(blocknr>=0); curblock=0; while (blocknr>=0) { if (!STORAGE_get_big_block(hf,blocknr,block)) return -1; for (i=0;i<4;i++) if (stde[i].pps_sizeofname==0) /* free */ return curblock*4+i; lastblocknr = blocknr; blocknr = STORAGE_get_next_big_blocknr(hf,blocknr); curblock++; } assert(blocknr==STORAGE_CHAINENTRY_ENDOFCHAIN); blocknr = STORAGE_get_free_big_blocknr(hf); /* sth invalidated */ if (blocknr<0) return -1; if (!STORAGE_set_big_chain(hf,lastblocknr,blocknr)) return -1; if (!STORAGE_set_big_chain(hf,blocknr,STORAGE_CHAINENTRY_ENDOFCHAIN)) return -1; memset(block,0,sizeof(block)); STORAGE_put_big_block(hf,blocknr,block); return curblock*4; } /* --- IStream16 implementation */ typedef struct { /* IUnknown fields */ ICOM_VFIELD(IStream16); DWORD ref; /* IStream16 fields */ SEGPTR thisptr; /* pointer to this struct as segmented */ struct storage_pps_entry stde; int ppsent; HFILE hf; ULARGE_INTEGER offset; } IStream16Impl; /****************************************************************************** * IStream16_QueryInterface [STORAGE.518] */ HRESULT WINAPI IStream16_fnQueryInterface( IStream16* iface,REFIID refiid,LPVOID *obj ) { ICOM_THIS(IStream16Impl,iface); TRACE_(relay)("(%p)->(%s,%p)\n",This,debugstr_guid(refiid),obj); if (!memcmp(&IID_IUnknown,refiid,sizeof(IID_IUnknown))) { *obj = This; return 0; } return OLE_E_ENUM_NOMORE; } /****************************************************************************** * IStream16_AddRef [STORAGE.519] */ ULONG WINAPI IStream16_fnAddRef(IStream16* iface) { ICOM_THIS(IStream16Impl,iface); return ++(This->ref); } /****************************************************************************** * IStream16_Release [STORAGE.520] */ ULONG WINAPI IStream16_fnRelease(IStream16* iface) { ICOM_THIS(IStream16Impl,iface); FlushFileBuffers(This->hf); This->ref--; if (!This->ref) { CloseHandle(This->hf); SEGPTR_FREE(This); return 0; } return This->ref; } /****************************************************************************** * IStream16_Seek [STORAGE.523] * * FIXME * Does not handle 64 bits */ HRESULT WINAPI IStream16_fnSeek( IStream16* iface,LARGE_INTEGER offset,DWORD whence,ULARGE_INTEGER *newpos ) { ICOM_THIS(IStream16Impl,iface); TRACE_(relay)("(%p)->([%ld.%ld],%ld,%p)\n",This,offset.s.HighPart,offset.s.LowPart,whence,newpos); switch (whence) { /* unix SEEK_xx should be the same as win95 ones */ case SEEK_SET: /* offset must be ==0 (<0 is invalid, and >0 cannot be handled * right now. */ assert(offset.s.HighPart==0); This->offset.s.HighPart = offset.s.HighPart; This->offset.s.LowPart = offset.s.LowPart; break; case SEEK_CUR: if (offset.s.HighPart < 0) { /* FIXME: is this negation correct ? */ offset.s.HighPart = -offset.s.HighPart; offset.s.LowPart = (0xffffffff ^ offset.s.LowPart)+1; assert(offset.s.HighPart==0); assert(This->offset.s.LowPart >= offset.s.LowPart); This->offset.s.LowPart -= offset.s.LowPart; } else { assert(offset.s.HighPart==0); This->offset.s.LowPart+= offset.s.LowPart; } break; case SEEK_END: assert(offset.s.HighPart==0); This->offset.s.LowPart = This->stde.pps_size-offset.s.LowPart; break; } if (This->offset.s.LowPart>This->stde.pps_size) This->offset.s.LowPart=This->stde.pps_size; if (newpos) *newpos = This->offset; return S_OK; } /****************************************************************************** * IStream16_Read [STORAGE.521] */ HRESULT WINAPI IStream16_fnRead( IStream16* iface,void *pv,ULONG cb,ULONG *pcbRead ) { ICOM_THIS(IStream16Impl,iface); BYTE block[BIGSIZE]; ULONG *bytesread=pcbRead,xxread; int blocknr; TRACE_(relay)("(%p)->(%p,%ld,%p)\n",This,pv,cb,pcbRead); if (!pcbRead) bytesread=&xxread; *bytesread = 0; if (cb>This->stde.pps_size-This->offset.s.LowPart) cb=This->stde.pps_size-This->offset.s.LowPart; if (This->stde.pps_size < 0x1000) { /* use small block reader */ blocknr = STORAGE_get_nth_next_small_blocknr(This->hf,This->stde.pps_sb,This->offset.s.LowPart/SMALLSIZE); while (cb) { int cc; if (!STORAGE_get_small_block(This->hf,blocknr,block)) { WARN("small block read failed!!!\n"); return E_FAIL; } cc = cb; if (cc>SMALLSIZE-(This->offset.s.LowPart&(SMALLSIZE-1))) cc=SMALLSIZE-(This->offset.s.LowPart&(SMALLSIZE-1)); memcpy((LPBYTE)pv,block+(This->offset.s.LowPart&(SMALLSIZE-1)),cc); This->offset.s.LowPart+=cc; (LPBYTE)pv+=cc; *bytesread+=cc; cb-=cc; blocknr = STORAGE_get_next_small_blocknr(This->hf,blocknr); } } else { /* use big block reader */ blocknr = STORAGE_get_nth_next_big_blocknr(This->hf,This->stde.pps_sb,This->offset.s.LowPart/BIGSIZE); while (cb) { int cc; if (!STORAGE_get_big_block(This->hf,blocknr,block)) { WARN("big block read failed!!!\n"); return E_FAIL; } cc = cb; if (cc>BIGSIZE-(This->offset.s.LowPart&(BIGSIZE-1))) cc=BIGSIZE-(This->offset.s.LowPart&(BIGSIZE-1)); memcpy((LPBYTE)pv,block+(This->offset.s.LowPart&(BIGSIZE-1)),cc); This->offset.s.LowPart+=cc; (LPBYTE)pv+=cc; *bytesread+=cc; cb-=cc; blocknr=STORAGE_get_next_big_blocknr(This->hf,blocknr); } } return S_OK; } /****************************************************************************** * IStream16_Write [STORAGE.522] */ HRESULT WINAPI IStream16_fnWrite( IStream16* iface,const void *pv,ULONG cb,ULONG *pcbWrite ) { ICOM_THIS(IStream16Impl,iface); BYTE block[BIGSIZE]; ULONG *byteswritten=pcbWrite,xxwritten; int oldsize,newsize,i,curoffset=0,lastblocknr,blocknr,cc; HFILE hf = This->hf; if (!pcbWrite) byteswritten=&xxwritten; *byteswritten = 0; TRACE_(relay)("(%p)->(%p,%ld,%p)\n",This,pv,cb,pcbWrite); /* do we need to junk some blocks? */ newsize = This->offset.s.LowPart+cb; oldsize = This->stde.pps_size; if (newsize < oldsize) { if (oldsize < 0x1000) { /* only small blocks */ blocknr=STORAGE_get_nth_next_small_blocknr(hf,This->stde.pps_sb,newsize/SMALLSIZE); assert(blocknr>=0); /* will set the rest of the chain to 'free' */ if (!STORAGE_set_small_chain(hf,blocknr,STORAGE_CHAINENTRY_ENDOFCHAIN)) return E_FAIL; } else { if (newsize >= 0x1000) { blocknr=STORAGE_get_nth_next_big_blocknr(hf,This->stde.pps_sb,newsize/BIGSIZE); assert(blocknr>=0); /* will set the rest of the chain to 'free' */ if (!STORAGE_set_big_chain(hf,blocknr,STORAGE_CHAINENTRY_ENDOFCHAIN)) return E_FAIL; } else { /* Migrate large blocks to small blocks * (we just migrate newsize bytes) */ LPBYTE curdata,data = HeapAlloc(GetProcessHeap(),0,newsize+BIGSIZE); cc = newsize; blocknr = This->stde.pps_sb; curdata = data; while (cc>0) { if (!STORAGE_get_big_block(hf,blocknr,curdata)) { HeapFree(GetProcessHeap(),0,data); return E_FAIL; } curdata += BIGSIZE; cc -= BIGSIZE; blocknr = STORAGE_get_next_big_blocknr(hf,blocknr); } /* frees complete chain for this stream */ if (!STORAGE_set_big_chain(hf,This->stde.pps_sb,STORAGE_CHAINENTRY_FREE)) return E_FAIL; curdata = data; blocknr = This->stde.pps_sb = STORAGE_get_free_small_blocknr(hf); if (blocknr<0) return E_FAIL; cc = newsize; while (cc>0) { if (!STORAGE_put_small_block(hf,blocknr,curdata)) return E_FAIL; cc -= SMALLSIZE; if (cc<=0) { if (!STORAGE_set_small_chain(hf,blocknr,STORAGE_CHAINENTRY_ENDOFCHAIN)) return E_FAIL; break; } else { int newblocknr = STORAGE_get_free_small_blocknr(hf); if (newblocknr<0) return E_FAIL; if (!STORAGE_set_small_chain(hf,blocknr,newblocknr)) return E_FAIL; blocknr = newblocknr; } curdata += SMALLSIZE; } HeapFree(GetProcessHeap(),0,data); } } This->stde.pps_size = newsize; } if (newsize > oldsize) { if (oldsize >= 0x1000) { /* should return the block right before the 'endofchain' */ blocknr = STORAGE_get_nth_next_big_blocknr(hf,This->stde.pps_sb,This->stde.pps_size/BIGSIZE); assert(blocknr>=0); lastblocknr = blocknr; for (i=oldsize/BIGSIZE;istde.pps_sb = blocknr = STORAGE_get_free_small_blocknr(hf); else blocknr = STORAGE_get_nth_next_small_blocknr(hf,This->stde.pps_sb,This->stde.pps_size/SMALLSIZE); if (blocknr<0) return E_FAIL; /* allocate required new small blocks */ lastblocknr = blocknr; for (i=oldsize/SMALLSIZE;istde.pps_sb = blocknr; } else { /* Migrate small blocks to big blocks */ LPBYTE curdata,data = HeapAlloc(GetProcessHeap(),0,oldsize+BIGSIZE); cc = oldsize; blocknr = This->stde.pps_sb; curdata = data; /* slurp in */ while (cc>0) { if (!STORAGE_get_small_block(hf,blocknr,curdata)) { HeapFree(GetProcessHeap(),0,data); return E_FAIL; } curdata += SMALLSIZE; cc -= SMALLSIZE; blocknr = STORAGE_get_next_small_blocknr(hf,blocknr); } /* free small block chain */ if (!STORAGE_set_small_chain(hf,This->stde.pps_sb,STORAGE_CHAINENTRY_FREE)) return E_FAIL; curdata = data; blocknr = This->stde.pps_sb = STORAGE_get_free_big_blocknr(hf); if (blocknr<0) return E_FAIL; /* put the data into the big blocks */ cc = This->stde.pps_size; while (cc>0) { if (!STORAGE_put_big_block(hf,blocknr,curdata)) return E_FAIL; cc -= BIGSIZE; if (cc<=0) { if (!STORAGE_set_big_chain(hf,blocknr,STORAGE_CHAINENTRY_ENDOFCHAIN)) return E_FAIL; break; } else { int newblocknr = STORAGE_get_free_big_blocknr(hf); if (newblocknr<0) return E_FAIL; if (!STORAGE_set_big_chain(hf,blocknr,newblocknr)) return E_FAIL; blocknr = newblocknr; } curdata += BIGSIZE; } HeapFree(GetProcessHeap(),0,data); } /* generate big blocks to fit the new data */ lastblocknr = blocknr; for (i=oldsize/BIGSIZE;istde.pps_size = newsize; } /* There are just some cases where we didn't modify it, we write it out * everytime */ if (!STORAGE_put_pps_entry(hf,This->ppsent,&(This->stde))) return E_FAIL; /* finally the write pass */ if (This->stde.pps_size < 0x1000) { blocknr = STORAGE_get_nth_next_small_blocknr(hf,This->stde.pps_sb,This->offset.s.LowPart/SMALLSIZE); assert(blocknr>=0); while (cb>0) { /* we ensured that it is allocated above */ assert(blocknr>=0); /* Read old block everytime, since we can have * overlapping data at START and END of the write */ if (!STORAGE_get_small_block(hf,blocknr,block)) return E_FAIL; cc = SMALLSIZE-(This->offset.s.LowPart&(SMALLSIZE-1)); if (cc>cb) cc=cb; memcpy( ((LPBYTE)block)+(This->offset.s.LowPart&(SMALLSIZE-1)), (LPBYTE)((char *) pv+curoffset), cc ); if (!STORAGE_put_small_block(hf,blocknr,block)) return E_FAIL; cb -= cc; curoffset += cc; (LPBYTE)pv += cc; This->offset.s.LowPart += cc; *byteswritten += cc; blocknr = STORAGE_get_next_small_blocknr(hf,blocknr); } } else { blocknr = STORAGE_get_nth_next_big_blocknr(hf,This->stde.pps_sb,This->offset.s.LowPart/BIGSIZE); assert(blocknr>=0); while (cb>0) { /* we ensured that it is allocated above, so it better is */ assert(blocknr>=0); /* read old block everytime, since we can have * overlapping data at START and END of the write */ if (!STORAGE_get_big_block(hf,blocknr,block)) return E_FAIL; cc = BIGSIZE-(This->offset.s.LowPart&(BIGSIZE-1)); if (cc>cb) cc=cb; memcpy( ((LPBYTE)block)+(This->offset.s.LowPart&(BIGSIZE-1)), (LPBYTE)((char *) pv+curoffset), cc ); if (!STORAGE_put_big_block(hf,blocknr,block)) return E_FAIL; cb -= cc; curoffset += cc; (LPBYTE)pv += cc; This->offset.s.LowPart += cc; *byteswritten += cc; blocknr = STORAGE_get_next_big_blocknr(hf,blocknr); } } return S_OK; } /****************************************************************************** * _create_istream16 [Internal] */ static void _create_istream16(LPSTREAM16 *str) { IStream16Impl* lpst; if (!strvt16.fnQueryInterface) { HMODULE16 wp = GetModuleHandle16("STORAGE"); if (wp>=32) { /* FIXME: what is This WIN32_GetProcAddress16. Should the name be IStream16_QueryInterface of IStream16_fnQueryInterface */ #define VTENT(xfn) strvt16.fn##xfn = (void*)WIN32_GetProcAddress16(wp,"IStream16_"#xfn);assert(strvt16.fn##xfn) VTENT(QueryInterface); VTENT(AddRef); VTENT(Release); VTENT(Read); VTENT(Write); VTENT(Seek); VTENT(SetSize); VTENT(CopyTo); VTENT(Commit); VTENT(Revert); VTENT(LockRegion); VTENT(UnlockRegion); VTENT(Stat); VTENT(Clone); #undef VTENT segstrvt16 = SEGPTR_NEW(ICOM_VTABLE(IStream16)); memcpy(segstrvt16,&strvt16,sizeof(strvt16)); segstrvt16 = (ICOM_VTABLE(IStream16)*)SEGPTR_GET(segstrvt16); } else { #define VTENT(xfn) strvt16.fn##xfn = IStream16_fn##xfn; VTENT(QueryInterface); VTENT(AddRef); VTENT(Release); VTENT(Read); VTENT(Write); VTENT(Seek); /* VTENT(CopyTo); VTENT(Commit); VTENT(SetSize); VTENT(Revert); VTENT(LockRegion); VTENT(UnlockRegion); VTENT(Stat); VTENT(Clone); */ #undef VTENT segstrvt16 = &strvt16; } } lpst = SEGPTR_NEW(IStream16Impl); ICOM_VTBL(lpst) = segstrvt16; lpst->ref = 1; lpst->thisptr = SEGPTR_GET(lpst); *str = (void*)lpst->thisptr; } /* --- IStream32 implementation */ typedef struct { /* IUnknown fields */ ICOM_VFIELD(IStream); DWORD ref; /* IStream32 fields */ struct storage_pps_entry stde; int ppsent; HFILE hf; ULARGE_INTEGER offset; } IStream32Impl; /***************************************************************************** * IStream32_QueryInterface [VTABLE] */ HRESULT WINAPI IStream_fnQueryInterface( IStream* iface,REFIID refiid,LPVOID *obj ) { ICOM_THIS(IStream32Impl,iface); TRACE_(relay)("(%p)->(%s,%p)\n",This,debugstr_guid(refiid),obj); if (!memcmp(&IID_IUnknown,refiid,sizeof(IID_IUnknown))) { *obj = This; return 0; } return OLE_E_ENUM_NOMORE; } /****************************************************************************** * IStream32_AddRef [VTABLE] */ ULONG WINAPI IStream_fnAddRef(IStream* iface) { ICOM_THIS(IStream32Impl,iface); return ++(This->ref); } /****************************************************************************** * IStream32_Release [VTABLE] */ ULONG WINAPI IStream_fnRelease(IStream* iface) { ICOM_THIS(IStream32Impl,iface); FlushFileBuffers(This->hf); This->ref--; if (!This->ref) { CloseHandle(This->hf); SEGPTR_FREE(This); return 0; } return This->ref; } /* --- IStorage16 implementation */ typedef struct { /* IUnknown fields */ ICOM_VFIELD(IStorage16); DWORD ref; /* IStorage16 fields */ SEGPTR thisptr; /* pointer to this struct as segmented */ struct storage_pps_entry stde; int ppsent; HFILE hf; } IStorage16Impl; /****************************************************************************** * IStorage16_QueryInterface [STORAGE.500] */ HRESULT WINAPI IStorage16_fnQueryInterface( IStorage16* iface,REFIID refiid,LPVOID *obj ) { ICOM_THIS(IStorage16Impl,iface); TRACE_(relay)("(%p)->(%s,%p)\n",This,debugstr_guid(refiid),obj); if (!memcmp(&IID_IUnknown,refiid,sizeof(IID_IUnknown))) { *obj = This; return 0; } return OLE_E_ENUM_NOMORE; } /****************************************************************************** * IStorage16_AddRef [STORAGE.501] */ ULONG WINAPI IStorage16_fnAddRef(IStorage16* iface) { ICOM_THIS(IStorage16Impl,iface); return ++(This->ref); } /****************************************************************************** * IStorage16_Release [STORAGE.502] */ ULONG WINAPI IStorage16_fnRelease(IStorage16* iface) { ICOM_THIS(IStorage16Impl,iface); This->ref--; if (This->ref) return This->ref; SEGPTR_FREE(This); return 0; } /****************************************************************************** * IStorage16_Stat [STORAGE.517] */ HRESULT WINAPI IStorage16_fnStat( LPSTORAGE16 iface,STATSTG16 *pstatstg, DWORD grfStatFlag ) { ICOM_THIS(IStorage16Impl,iface); TRACE("(%p)->(%p,0x%08lx)\n", This,pstatstg,grfStatFlag ); pstatstg->pwcsName=(LPOLESTR16)SEGPTR_GET(SEGPTR_STRDUP_WtoA(This->stde.pps_rawname)); pstatstg->type = This->stde.pps_type; pstatstg->cbSize.s.LowPart = This->stde.pps_size; pstatstg->mtime = This->stde.pps_ft1; /* FIXME */ /* why? */ pstatstg->atime = This->stde.pps_ft2; /* FIXME */ pstatstg->ctime = This->stde.pps_ft2; /* FIXME */ pstatstg->grfMode = 0; /* FIXME */ pstatstg->grfLocksSupported = 0; /* FIXME */ pstatstg->clsid = This->stde.pps_guid; pstatstg->grfStateBits = 0; /* FIXME */ pstatstg->reserved = 0; return S_OK; } /****************************************************************************** * IStorage16_Commit [STORAGE.509] */ HRESULT WINAPI IStorage16_fnCommit( LPSTORAGE16 iface,DWORD commitflags ) { ICOM_THIS(IStorage16Impl,iface); FIXME("(%p)->(0x%08lx),STUB!\n", This,commitflags ); return S_OK; } /****************************************************************************** * IStorage16_CopyTo [STORAGE.507] */ HRESULT WINAPI IStorage16_fnCopyTo(LPSTORAGE16 iface,DWORD ciidExclude,const IID *rgiidExclude,SNB16 SNB16Exclude,IStorage16 *pstgDest) { ICOM_THIS(IStorage16Impl,iface); FIXME("IStorage16(%p)->(0x%08lx,%s,%p,%p),stub!\n", This,ciidExclude,debugstr_guid(rgiidExclude),SNB16Exclude,pstgDest ); return S_OK; } /****************************************************************************** * IStorage16_CreateStorage [STORAGE.505] */ HRESULT WINAPI IStorage16_fnCreateStorage( LPSTORAGE16 iface,LPCOLESTR16 pwcsName,DWORD grfMode,DWORD dwStgFormat,DWORD reserved2, IStorage16 **ppstg ) { ICOM_THIS(IStorage16Impl,iface); IStorage16Impl* lpstg; int ppsent,x; struct storage_pps_entry stde; struct storage_header sth; HFILE hf=This->hf; READ_HEADER; TRACE("(%p)->(%s,0x%08lx,0x%08lx,0x%08lx,%p)\n", This,pwcsName,grfMode,dwStgFormat,reserved2,ppstg ); if (grfMode & STGM_TRANSACTED) FIXME("We do not support transacted Compound Storage. Using direct mode.\n"); _create_istorage16(ppstg); lpstg = (IStorage16Impl*)PTR_SEG_TO_LIN(*ppstg); lpstg->hf = This->hf; ppsent=STORAGE_get_free_pps_entry(lpstg->hf); if (ppsent<0) return E_FAIL; stde=This->stde; if (stde.pps_dir==-1) { stde.pps_dir = ppsent; x = This->ppsent; } else { FIXME(" use prev chain too ?\n"); x=stde.pps_dir; if (1!=STORAGE_get_pps_entry(lpstg->hf,x,&stde)) return E_FAIL; while (stde.pps_next!=-1) { x=stde.pps_next; if (1!=STORAGE_get_pps_entry(lpstg->hf,x,&stde)) return E_FAIL; } stde.pps_next = ppsent; } assert(STORAGE_put_pps_entry(lpstg->hf,x,&stde)); assert(1==STORAGE_get_pps_entry(lpstg->hf,ppsent,&(lpstg->stde))); lstrcpyAtoW(lpstg->stde.pps_rawname,pwcsName); lpstg->stde.pps_sizeofname = lstrlenA(pwcsName)*2+2; lpstg->stde.pps_next = -1; lpstg->stde.pps_prev = -1; lpstg->stde.pps_dir = -1; lpstg->stde.pps_sb = -1; lpstg->stde.pps_size = 0; lpstg->stde.pps_type = 1; lpstg->ppsent = ppsent; /* FIXME: timestamps? */ if (!STORAGE_put_pps_entry(lpstg->hf,ppsent,&(lpstg->stde))) return E_FAIL; return S_OK; } /****************************************************************************** * IStorage16_CreateStream [STORAGE.503] */ HRESULT WINAPI IStorage16_fnCreateStream( LPSTORAGE16 iface,LPCOLESTR16 pwcsName,DWORD grfMode,DWORD reserved1,DWORD reserved2, IStream16 **ppstm ) { ICOM_THIS(IStorage16Impl,iface); IStream16Impl* lpstr; int ppsent,x; struct storage_pps_entry stde; TRACE("(%p)->(%s,0x%08lx,0x%08lx,0x%08lx,%p)\n", This,pwcsName,grfMode,reserved1,reserved2,ppstm ); if (grfMode & STGM_TRANSACTED) FIXME("We do not support transacted Compound Storage. Using direct mode.\n"); _create_istream16(ppstm); lpstr = (IStream16Impl*)PTR_SEG_TO_LIN(*ppstm); DuplicateHandle( GetCurrentProcess(), This->hf, GetCurrentProcess(), &lpstr->hf, 0, TRUE, DUPLICATE_SAME_ACCESS ); lpstr->offset.s.LowPart = 0; lpstr->offset.s.HighPart = 0; ppsent=STORAGE_get_free_pps_entry(lpstr->hf); if (ppsent<0) return E_FAIL; stde=This->stde; if (stde.pps_next==-1) x=This->ppsent; else while (stde.pps_next!=-1) { x=stde.pps_next; if (1!=STORAGE_get_pps_entry(lpstr->hf,x,&stde)) return E_FAIL; } stde.pps_next = ppsent; assert(STORAGE_put_pps_entry(lpstr->hf,x,&stde)); assert(1==STORAGE_get_pps_entry(lpstr->hf,ppsent,&(lpstr->stde))); lstrcpyAtoW(lpstr->stde.pps_rawname,pwcsName); lpstr->stde.pps_sizeofname = lstrlenA(pwcsName)*2+2; lpstr->stde.pps_next = -1; lpstr->stde.pps_prev = -1; lpstr->stde.pps_dir = -1; lpstr->stde.pps_sb = -1; lpstr->stde.pps_size = 0; lpstr->stde.pps_type = 2; lpstr->ppsent = ppsent; /* FIXME: timestamps? */ if (!STORAGE_put_pps_entry(lpstr->hf,ppsent,&(lpstr->stde))) return E_FAIL; return S_OK; } /****************************************************************************** * IStorage16_OpenStorage [STORAGE.506] */ HRESULT WINAPI IStorage16_fnOpenStorage( LPSTORAGE16 iface,LPCOLESTR16 pwcsName, IStorage16 *pstgPrio, DWORD grfMode, SNB16 snbExclude, DWORD reserved, IStorage16 **ppstg ) { ICOM_THIS(IStorage16Impl,iface); IStream16Impl* lpstg; WCHAR name[33]; int newpps; TRACE_(relay)("(%p)->(%s,%p,0x%08lx,%p,0x%08lx,%p)\n", This,pwcsName,pstgPrio,grfMode,snbExclude,reserved,ppstg ); if (grfMode & STGM_TRANSACTED) FIXME("We do not support transacted Compound Storage. Using direct mode.\n"); _create_istorage16(ppstg); lpstg = (IStream16Impl*)PTR_SEG_TO_LIN(*ppstg); DuplicateHandle( GetCurrentProcess(), This->hf, GetCurrentProcess(), &lpstg->hf, 0, TRUE, DUPLICATE_SAME_ACCESS ); lstrcpyAtoW(name,pwcsName); newpps = STORAGE_look_for_named_pps(lpstg->hf,This->stde.pps_dir,name); if (newpps==-1) { IStream16_fnRelease((IStream16*)lpstg); return E_FAIL; } if (1!=STORAGE_get_pps_entry(lpstg->hf,newpps,&(lpstg->stde))) { IStream16_fnRelease((IStream16*)lpstg); return E_FAIL; } lpstg->ppsent = newpps; return S_OK; } /****************************************************************************** * IStorage16_OpenStream [STORAGE.504] */ HRESULT WINAPI IStorage16_fnOpenStream( LPSTORAGE16 iface,LPCOLESTR16 pwcsName, void *reserved1, DWORD grfMode, DWORD reserved2, IStream16 **ppstm ) { ICOM_THIS(IStorage16Impl,iface); IStream16Impl* lpstr; WCHAR name[33]; int newpps; TRACE_(relay)("(%p)->(%s,%p,0x%08lx,0x%08lx,%p)\n", This,pwcsName,reserved1,grfMode,reserved2,ppstm ); if (grfMode & STGM_TRANSACTED) FIXME("We do not support transacted Compound Storage. Using direct mode.\n"); _create_istream16(ppstm); lpstr = (IStream16Impl*)PTR_SEG_TO_LIN(*ppstm); DuplicateHandle( GetCurrentProcess(), This->hf, GetCurrentProcess(), &lpstr->hf, 0, TRUE, DUPLICATE_SAME_ACCESS ); lstrcpyAtoW(name,pwcsName); newpps = STORAGE_look_for_named_pps(lpstr->hf,This->stde.pps_dir,name); if (newpps==-1) { IStream16_fnRelease((IStream16*)lpstr); return E_FAIL; } if (1!=STORAGE_get_pps_entry(lpstr->hf,newpps,&(lpstr->stde))) { IStream16_fnRelease((IStream16*)lpstr); return E_FAIL; } lpstr->offset.s.LowPart = 0; lpstr->offset.s.HighPart = 0; lpstr->ppsent = newpps; return S_OK; } /****************************************************************************** * _create_istorage16 [INTERNAL] */ static void _create_istorage16(LPSTORAGE16 *stg) { IStorage16Impl* lpst; if (!stvt16.fnQueryInterface) { HMODULE16 wp = GetModuleHandle16("STORAGE"); if (wp>=32) { #define VTENT(xfn) stvt16.fn##xfn = (void*)WIN32_GetProcAddress16(wp,"IStorage16_"#xfn); VTENT(QueryInterface) VTENT(AddRef) VTENT(Release) VTENT(CreateStream) VTENT(OpenStream) VTENT(CreateStorage) VTENT(OpenStorage) VTENT(CopyTo) VTENT(MoveElementTo) VTENT(Commit) VTENT(Revert) VTENT(EnumElements) VTENT(DestroyElement) VTENT(RenameElement) VTENT(SetElementTimes) VTENT(SetClass) VTENT(SetStateBits) VTENT(Stat) #undef VTENT segstvt16 = SEGPTR_NEW(ICOM_VTABLE(IStorage16)); memcpy(segstvt16,&stvt16,sizeof(stvt16)); segstvt16 = (ICOM_VTABLE(IStorage16)*)SEGPTR_GET(segstvt16); } else { #define VTENT(xfn) stvt16.fn##xfn = IStorage16_fn##xfn; VTENT(QueryInterface) VTENT(AddRef) VTENT(Release) VTENT(CreateStream) VTENT(OpenStream) VTENT(CreateStorage) VTENT(OpenStorage) VTENT(CopyTo) VTENT(Commit) /* not (yet) implemented ... VTENT(MoveElementTo) VTENT(Revert) VTENT(EnumElements) VTENT(DestroyElement) VTENT(RenameElement) VTENT(SetElementTimes) VTENT(SetClass) VTENT(SetStateBits) VTENT(Stat) */ #undef VTENT segstvt16 = &stvt16; } } lpst = SEGPTR_NEW(IStorage16Impl); ICOM_VTBL(lpst) = segstvt16; lpst->ref = 1; lpst->thisptr = SEGPTR_GET(lpst); *stg = (void*)lpst->thisptr; } /****************************************************************************** * Storage API functions */ /****************************************************************************** * StgCreateDocFile16 [STORAGE.1] */ HRESULT WINAPI StgCreateDocFile16( LPCOLESTR16 pwcsName,DWORD grfMode,DWORD reserved,IStorage16 **ppstgOpen ) { HFILE hf; int i,ret; IStorage16Impl* lpstg; struct storage_pps_entry stde; TRACE("(%s,0x%08lx,0x%08lx,%p)\n", pwcsName,grfMode,reserved,ppstgOpen ); _create_istorage16(ppstgOpen); hf = CreateFileA(pwcsName,GENERIC_READ|GENERIC_WRITE,0,NULL,CREATE_NEW,0,0); if (hf==INVALID_HANDLE_VALUE) { WARN("couldn't open file for storage:%ld\n",GetLastError()); return E_FAIL; } lpstg = (IStorage16Impl*)PTR_SEG_TO_LIN(*ppstgOpen); lpstg->hf = hf; /* FIXME: check for existance before overwriting? */ if (!STORAGE_init_storage(hf)) { CloseHandle(hf); return E_FAIL; } i=0;ret=0; while (!ret) { /* neither 1 nor <0 */ ret=STORAGE_get_pps_entry(hf,i,&stde); if ((ret==1) && (stde.pps_type==5)) { lpstg->stde = stde; lpstg->ppsent = i; break; } i++; } if (ret!=1) { IStorage16_fnRelease((IStorage16*)lpstg); /* will remove it */ return E_FAIL; } return S_OK; } /****************************************************************************** * StgIsStorageFile16 [STORAGE.5] */ HRESULT WINAPI StgIsStorageFile16(LPCOLESTR16 fn) { HFILE hf; OFSTRUCT ofs; BYTE magic[24]; TRACE("(\'%s\')\n",fn); hf = OpenFile(fn,&ofs,OF_SHARE_DENY_NONE); if (hf==HFILE_ERROR) return STG_E_FILENOTFOUND; if (24!=_lread(hf,magic,24)) { WARN(" too short\n"); _lclose(hf); return S_FALSE; } if (!memcmp(magic,STORAGE_magic,8)) { WARN(" -> YES\n"); _lclose(hf); return S_OK; } if (!memcmp(magic,STORAGE_notmagic,8)) { WARN(" -> NO\n"); _lclose(hf); return S_FALSE; } if (!memcmp(magic,STORAGE_oldmagic,8)) { WARN(" -> old format\n"); _lclose(hf); return STG_E_OLDFORMAT; } WARN(" -> Invalid header.\n"); _lclose(hf); return STG_E_INVALIDHEADER; } /****************************************************************************** * StgIsStorageFile [OLE32.146] */ HRESULT WINAPI StgIsStorageFile(LPCOLESTR fn) { LPOLESTR16 xfn = HEAP_strdupWtoA(GetProcessHeap(),0,fn); OLESTATUS ret = StgIsStorageFile16(xfn); HeapFree(GetProcessHeap(),0,xfn); return ret; } /****************************************************************************** * StgOpenStorage16 [STORAGE.3] */ HRESULT WINAPI StgOpenStorage16( LPCOLESTR16 pwcsName,IStorage16 *pstgPriority,DWORD grfMode, SNB16 snbExclude,DWORD reserved, IStorage16 **ppstgOpen ) { HFILE hf; int ret,i; IStorage16Impl* lpstg; struct storage_pps_entry stde; TRACE("(%s,%p,0x%08lx,%p,%ld,%p)\n", pwcsName,pstgPriority,grfMode,snbExclude,reserved,ppstgOpen ); _create_istorage16(ppstgOpen); hf = CreateFileA(pwcsName,GENERIC_READ,FILE_SHARE_READ,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,0); if (hf==INVALID_HANDLE_VALUE) { WARN("Couldn't open file for storage\n"); return E_FAIL; } lpstg = (IStorage16Impl*)PTR_SEG_TO_LIN(*ppstgOpen); lpstg->hf = hf; i=0;ret=0; while (!ret) { /* neither 1 nor <0 */ ret=STORAGE_get_pps_entry(hf,i,&stde); if ((ret==1) && (stde.pps_type==5)) { lpstg->stde=stde; break; } i++; } if (ret!=1) { IStorage16_fnRelease((IStorage16*)lpstg); /* will remove it */ return E_FAIL; } return S_OK; } wine-20000526/dlls/ole32/storage.spec0100644000175000001440000000453106771226505016661 0ustar julliardusers# Compound Storage DLL. # (FIXME: some methods are commented out. Commenting them in _WILL_ # result in dataloss. Do it at your own risk.) name storage type win16 1 pascal StgCreateDocFileA(str long long ptr) StgCreateDocFile16 2 stub StgCreateDocFileOnILockBytes 3 pascal StgOpenStorage(str ptr long ptr long ptr) StgOpenStorage16 4 stub StgOpenStorageOnILockBytes 5 pascal StgIsStorageFile(str) StgIsStorageFile16 6 stub StgIsStorageILockBytes 7 stub StgSetTimes #8 WEP #9 ___EXPORTEDSTUB 103 stub DllGetClassObject # Storage Interface functions. Starting at 500 # these are not exported in the real storage.dll, we use them # as 16->32 relays. They use the cdecl calling convention. # IStorage 500 cdecl IStorage16_QueryInterface(ptr ptr ptr) IStorage16_fnQueryInterface 501 cdecl IStorage16_AddRef(ptr) IStorage16_fnAddRef 502 cdecl IStorage16_Release(ptr) IStorage16_fnRelease #503 cdecl IStorage16_CreateStream(ptr str long long long ptr) IStorage16_fnCreateStream 503 stub IStorage16_CreateStream 504 cdecl IStorage16_OpenStream(ptr str ptr long long ptr) IStorage16_fnOpenStream #505 cdecl IStorage16_CreateStorage(ptr str long long long ptr) IStorage16_fnCreateStorage 505 stub IStorage16_CreateStorage 506 cdecl IStorage16_OpenStorage(ptr str ptr long ptr long ptr) IStorage16_fnOpenStorage 507 cdecl IStorage16_CopyTo(ptr long ptr ptr ptr) IStorage16_fnCopyTo 508 stub IStorage16_MoveElementTo 509 cdecl IStorage16_Commit(ptr long) IStorage16_fnCommit 510 stub IStorage16_Revert 511 stub IStorage16_EnumElements 512 stub IStorage16_DestroyElement 513 stub IStorage16_RenameElement 514 stub IStorage16_SetElementTimes 515 stub IStorage16_SetClass 516 stub IStorage16_SetStateBits 517 cdecl IStorage16_Stat(ptr ptr long) IStorage16_fnStat # IStream 518 cdecl IStream16_QueryInterface(ptr ptr ptr) IStream16_fnQueryInterface 519 cdecl IStream16_AddRef(ptr) IStream16_fnAddRef 520 cdecl IStream16_Release(ptr) IStream16_fnRelease 521 cdecl IStream16_Read(ptr ptr long ptr) IStream16_fnRead #522 cdecl IStream16_Write(ptr ptr long ptr) IStream16_fnWrite 522 stub IStream16_Write 523 cdecl IStream16_Seek(ptr long long long ptr) IStream16_fnSeek 524 stub IStream16_SetSize 525 stub IStream16_CopyTo 526 stub IStream16_Commit 527 stub IStream16_Revert 528 stub IStream16_LockRegion 529 stub IStream16_UnlockRegion 530 stub IStream16_Stat 531 stub IStream16_Clone wine-20000526/dlls/ole32/storage32.c0100644000175000001440000056015407073170674016327 0ustar julliardusers/* * Compound Storage (32 bit version) * Storage implementation * * This file contains the compound file implementation * of the storage interface. * * Copyright 1999 Francis Beaudet * Copyright 1999 Sylvain St-Germain * Copyright 1999 Thuy Nguyen */ #include #include #include #include #include "winbase.h" /* for lstrlenW() and the likes */ #include "winnls.h" #include "debugtools.h" #include "storage32.h" #include "ole2.h" /* For Write/ReadClassStm */ #include "winreg.h" #include "wine/wingdi16.h" DEFAULT_DEBUG_CHANNEL(storage) #define FILE_BEGIN 0 /* Used for OleConvertIStorageToOLESTREAM and OleConvertOLESTREAMToIStorage */ #define OLESTREAM_ID 0x501 #define OLESTREAM_MAX_STR_LEN 255 static const char rootPropertyName[] = "Root Entry"; /* OLESTREAM memory structure to use for Get and Put Routines */ /* Used for OleConvertIStorageToOLESTREAM and OleConvertOLESTREAMToIStorage */ typedef struct { DWORD dwOleID; DWORD dwTypeID; DWORD dwOleTypeNameLength; CHAR strOleTypeName[OLESTREAM_MAX_STR_LEN]; CHAR *pstrOleObjFileName; DWORD dwOleObjFileNameLength; DWORD dwMetaFileWidth; DWORD dwMetaFileHeight; CHAR strUnknown[8]; /* don't know what is this 8 byts information in OLE stream. */ DWORD dwDataLength; BYTE *pData; }OLECONVERT_OLESTREAM_DATA; /* CompObj Stream structure */ /* Used for OleConvertIStorageToOLESTREAM and OleConvertOLESTREAMToIStorage */ typedef struct { BYTE byUnknown1[12]; CLSID clsid; DWORD dwCLSIDNameLength; CHAR strCLSIDName[OLESTREAM_MAX_STR_LEN]; DWORD dwOleTypeNameLength; CHAR strOleTypeName[OLESTREAM_MAX_STR_LEN]; DWORD dwProgIDNameLength; CHAR strProgIDName[OLESTREAM_MAX_STR_LEN]; BYTE byUnknown2[16]; }OLECONVERT_ISTORAGE_COMPOBJ; /* Ole Presention Stream structure */ /* Used for OleConvertIStorageToOLESTREAM and OleConvertOLESTREAMToIStorage */ typedef struct { BYTE byUnknown1[28]; DWORD dwExtentX; DWORD dwExtentY; DWORD dwSize; BYTE *pData; }OLECONVERT_ISTORAGE_OLEPRES; /*********************************************************************** * Forward declaration of internal functions used by the method DestroyElement */ static HRESULT deleteStorageProperty( StorageImpl *parentStorage, ULONG foundPropertyIndexToDelete, StgProperty propertyToDelete); static HRESULT deleteStreamProperty( StorageImpl *parentStorage, ULONG foundPropertyIndexToDelete, StgProperty propertyToDelete); static HRESULT findPlaceholder( StorageImpl *storage, ULONG propertyIndexToStore, ULONG storagePropertyIndex, INT typeOfRelation); static HRESULT adjustPropertyChain( StorageImpl *This, StgProperty propertyToDelete, StgProperty parentProperty, ULONG parentPropertyId, INT typeOfRelation); /*********************************************************************** * Declaration of the functions used to manipulate StgProperty */ static ULONG getFreeProperty( StorageImpl *storage); static void updatePropertyChain( StorageImpl *storage, ULONG newPropertyIndex, StgProperty newProperty); static LONG propertyNameCmp( OLECHAR *newProperty, OLECHAR *currentProperty); /*********************************************************************** * Declaration of miscellaneous functions... */ static HRESULT validateSTGM(DWORD stgmValue); static DWORD GetShareModeFromSTGM(DWORD stgm); static DWORD GetAccessModeFromSTGM(DWORD stgm); static DWORD GetCreationModeFromSTGM(DWORD stgm); /* * Virtual function table for the IStorage32Impl class. */ static ICOM_VTABLE(IStorage) Storage32Impl_Vtbl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE StorageBaseImpl_QueryInterface, StorageBaseImpl_AddRef, StorageBaseImpl_Release, StorageBaseImpl_CreateStream, StorageBaseImpl_OpenStream, StorageImpl_CreateStorage, StorageBaseImpl_OpenStorage, StorageImpl_CopyTo, StorageImpl_MoveElementTo, StorageImpl_Commit, StorageImpl_Revert, StorageBaseImpl_EnumElements, StorageImpl_DestroyElement, StorageBaseImpl_RenameElement, StorageImpl_SetElementTimes, StorageBaseImpl_SetClass, StorageImpl_SetStateBits, StorageBaseImpl_Stat }; /* * Virtual function table for the Storage32InternalImpl class. */ static ICOM_VTABLE(IStorage) Storage32InternalImpl_Vtbl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE StorageBaseImpl_QueryInterface, StorageBaseImpl_AddRef, StorageBaseImpl_Release, StorageBaseImpl_CreateStream, StorageBaseImpl_OpenStream, StorageImpl_CreateStorage, StorageBaseImpl_OpenStorage, StorageImpl_CopyTo, StorageImpl_MoveElementTo, StorageInternalImpl_Commit, StorageInternalImpl_Revert, StorageBaseImpl_EnumElements, StorageImpl_DestroyElement, StorageBaseImpl_RenameElement, StorageImpl_SetElementTimes, StorageBaseImpl_SetClass, StorageImpl_SetStateBits, StorageBaseImpl_Stat }; /* * Virtual function table for the IEnumSTATSTGImpl class. */ static ICOM_VTABLE(IEnumSTATSTG) IEnumSTATSTGImpl_Vtbl = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IEnumSTATSTGImpl_QueryInterface, IEnumSTATSTGImpl_AddRef, IEnumSTATSTGImpl_Release, IEnumSTATSTGImpl_Next, IEnumSTATSTGImpl_Skip, IEnumSTATSTGImpl_Reset, IEnumSTATSTGImpl_Clone }; /************************************************************************ ** Storage32BaseImpl implementatiion */ /************************************************************************ * Storage32BaseImpl_QueryInterface (IUnknown) * * This method implements the common QueryInterface for all IStorage32 * implementations contained in this file. * * See Windows documentation for more details on IUnknown methods. */ HRESULT WINAPI StorageBaseImpl_QueryInterface( IStorage* iface, REFIID riid, void** ppvObject) { ICOM_THIS(StorageBaseImpl,iface); /* * Perform a sanity check on the parameters. */ if ( (This==0) || (ppvObject==0) ) return E_INVALIDARG; /* * Initialize the return parameter. */ *ppvObject = 0; /* * Compare the riid with the interface IDs implemented by this object. */ if (memcmp(&IID_IUnknown, riid, sizeof(IID_IUnknown)) == 0) { *ppvObject = (IStorage*)This; } else if (memcmp(&IID_IStorage, riid, sizeof(IID_IStorage)) == 0) { *ppvObject = (IStorage*)This; } /* * Check that we obtained an interface. */ if ((*ppvObject)==0) return E_NOINTERFACE; /* * Query Interface always increases the reference count by one when it is * successful */ StorageBaseImpl_AddRef(iface); return S_OK; } /************************************************************************ * Storage32BaseImpl_AddRef (IUnknown) * * This method implements the common AddRef for all IStorage32 * implementations contained in this file. * * See Windows documentation for more details on IUnknown methods. */ ULONG WINAPI StorageBaseImpl_AddRef( IStorage* iface) { ICOM_THIS(StorageBaseImpl,iface); This->ref++; return This->ref; } /************************************************************************ * Storage32BaseImpl_Release (IUnknown) * * This method implements the common Release for all IStorage32 * implementations contained in this file. * * See Windows documentation for more details on IUnknown methods. */ ULONG WINAPI StorageBaseImpl_Release( IStorage* iface) { ICOM_THIS(StorageBaseImpl,iface); /* * Decrease the reference count on this object. */ This->ref--; /* * If the reference count goes down to 0, perform suicide. */ if (This->ref==0) { /* * Since we are using a system of base-classes, we want to call the * destructor of the appropriate derived class. To do this, we are * using virtual functions to implement the destructor. */ This->v_destructor(This); return 0; } return This->ref; } /************************************************************************ * Storage32BaseImpl_OpenStream (IStorage) * * This method will open the specified stream object from the current storage. * * See Windows documentation for more details on IStorage methods. */ HRESULT WINAPI StorageBaseImpl_OpenStream( IStorage* iface, const OLECHAR* pwcsName, /* [string][in] */ void* reserved1, /* [unique][in] */ DWORD grfMode, /* [in] */ DWORD reserved2, /* [in] */ IStream** ppstm) /* [out] */ { ICOM_THIS(StorageBaseImpl,iface); IEnumSTATSTGImpl* propertyEnumeration; StgStreamImpl* newStream; StgProperty currentProperty; ULONG foundPropertyIndex; TRACE("(%p, %s, %p, %lx, %ld, %p)\n", iface, debugstr_w(pwcsName), reserved1, grfMode, reserved2, ppstm); /* * Perform a sanity check on the parameters. */ if ( (pwcsName==NULL) || (ppstm==0) ) return E_INVALIDARG; /* * Initialize the out parameter */ *ppstm = 0; /* * Validate the STGM flags */ if ( FAILED( validateSTGM(grfMode) )) return STG_E_INVALIDFLAG; /* * As documented. */ if ( !(grfMode & STGM_SHARE_EXCLUSIVE) || (grfMode & STGM_DELETEONRELEASE) || (grfMode & STGM_TRANSACTED) ) return STG_E_INVALIDFUNCTION; /* * Create a property enumeration to search the properties */ propertyEnumeration = IEnumSTATSTGImpl_Construct( This->ancestorStorage, This->rootPropertySetIndex); /* * Search the enumeration for the property with the given name */ foundPropertyIndex = IEnumSTATSTGImpl_FindProperty( propertyEnumeration, pwcsName, ¤tProperty); /* * Delete the property enumeration since we don't need it anymore */ IEnumSTATSTGImpl_Destroy(propertyEnumeration); /* * If it was found, construct the stream object and return a pointer to it. */ if ( (foundPropertyIndex!=PROPERTY_NULL) && (currentProperty.propertyType==PROPTYPE_STREAM) ) { newStream = StgStreamImpl_Construct(This, grfMode, foundPropertyIndex); if (newStream!=0) { newStream->grfMode = grfMode; *ppstm = (IStream*)newStream; /* * Since we are returning a pointer to the interface, we have to * nail down the reference. */ StgStreamImpl_AddRef(*ppstm); return S_OK; } return E_OUTOFMEMORY; } return STG_E_FILENOTFOUND; } /************************************************************************ * Storage32BaseImpl_OpenStorage (IStorage) * * This method will open a new storage object from the current storage. * * See Windows documentation for more details on IStorage methods. */ HRESULT WINAPI StorageBaseImpl_OpenStorage( IStorage* iface, const OLECHAR* pwcsName, /* [string][unique][in] */ IStorage* pstgPriority, /* [unique][in] */ DWORD grfMode, /* [in] */ SNB snbExclude, /* [unique][in] */ DWORD reserved, /* [in] */ IStorage** ppstg) /* [out] */ { ICOM_THIS(StorageBaseImpl,iface); StorageInternalImpl* newStorage; IEnumSTATSTGImpl* propertyEnumeration; StgProperty currentProperty; ULONG foundPropertyIndex; TRACE("(%p, %s, %p, %lx, %p, %ld, %p)\n", iface, debugstr_w(pwcsName), pstgPriority, grfMode, snbExclude, reserved, ppstg); /* * Perform a sanity check on the parameters. */ if ( (This==0) || (pwcsName==NULL) || (ppstg==0) ) return E_INVALIDARG; /* * Validate the STGM flags */ if ( FAILED( validateSTGM(grfMode) )) return STG_E_INVALIDFLAG; /* * As documented. */ if ( !(grfMode & STGM_SHARE_EXCLUSIVE) || (grfMode & STGM_DELETEONRELEASE) || (grfMode & STGM_PRIORITY) ) return STG_E_INVALIDFUNCTION; /* * Initialize the out parameter */ *ppstg = 0; /* * Create a property enumeration to search the properties */ propertyEnumeration = IEnumSTATSTGImpl_Construct( This->ancestorStorage, This->rootPropertySetIndex); /* * Search the enumeration for the property with the given name */ foundPropertyIndex = IEnumSTATSTGImpl_FindProperty( propertyEnumeration, pwcsName, ¤tProperty); /* * Delete the property enumeration since we don't need it anymore */ IEnumSTATSTGImpl_Destroy(propertyEnumeration); /* * If it was found, construct the stream object and return a pointer to it. */ if ( (foundPropertyIndex!=PROPERTY_NULL) && (currentProperty.propertyType==PROPTYPE_STORAGE) ) { /* * Construct a new Storage object */ newStorage = StorageInternalImpl_Construct( This->ancestorStorage, foundPropertyIndex); if (newStorage != 0) { *ppstg = (IStorage*)newStorage; /* * Since we are returning a pointer to the interface, * we have to nail down the reference. */ StorageBaseImpl_AddRef(*ppstg); return S_OK; } return STG_E_INSUFFICIENTMEMORY; } return STG_E_FILENOTFOUND; } /************************************************************************ * Storage32BaseImpl_EnumElements (IStorage) * * This method will create an enumerator object that can be used to * retrieve informatino about all the properties in the storage object. * * See Windows documentation for more details on IStorage methods. */ HRESULT WINAPI StorageBaseImpl_EnumElements( IStorage* iface, DWORD reserved1, /* [in] */ void* reserved2, /* [size_is][unique][in] */ DWORD reserved3, /* [in] */ IEnumSTATSTG** ppenum) /* [out] */ { ICOM_THIS(StorageBaseImpl,iface); IEnumSTATSTGImpl* newEnum; TRACE("(%p, %ld, %p, %ld, %p)\n", iface, reserved1, reserved2, reserved3, ppenum); /* * Perform a sanity check on the parameters. */ if ( (This==0) || (ppenum==0)) return E_INVALIDARG; /* * Construct the enumerator. */ newEnum = IEnumSTATSTGImpl_Construct( This->ancestorStorage, This->rootPropertySetIndex); if (newEnum!=0) { *ppenum = (IEnumSTATSTG*)newEnum; /* * Don't forget to nail down a reference to the new object before * returning it. */ IEnumSTATSTGImpl_AddRef(*ppenum); return S_OK; } return E_OUTOFMEMORY; } /************************************************************************ * Storage32BaseImpl_Stat (IStorage) * * This method will retrieve information about this storage object. * * See Windows documentation for more details on IStorage methods. */ HRESULT WINAPI StorageBaseImpl_Stat( IStorage* iface, STATSTG* pstatstg, /* [out] */ DWORD grfStatFlag) /* [in] */ { ICOM_THIS(StorageBaseImpl,iface); StgProperty curProperty; BOOL readSuccessful; TRACE("(%p, %p, %lx)\n", iface, pstatstg, grfStatFlag); /* * Perform a sanity check on the parameters. */ if ( (This==0) || (pstatstg==0)) return E_INVALIDARG; /* * Read the information from the property. */ readSuccessful = StorageImpl_ReadProperty( This->ancestorStorage, This->rootPropertySetIndex, &curProperty); if (readSuccessful) { StorageUtl_CopyPropertyToSTATSTG( pstatstg, &curProperty, grfStatFlag); return S_OK; } return E_FAIL; } /************************************************************************ * Storage32BaseImpl_RenameElement (IStorage) * * This method will rename the specified element. * * See Windows documentation for more details on IStorage methods. * * Implementation notes: The method used to rename consists of creating a clone * of the deleted StgProperty object setting it with the new name and to * perform a DestroyElement of the old StgProperty. */ HRESULT WINAPI StorageBaseImpl_RenameElement( IStorage* iface, const OLECHAR* pwcsOldName, /* [in] */ const OLECHAR* pwcsNewName) /* [in] */ { ICOM_THIS(StorageBaseImpl,iface); IEnumSTATSTGImpl* propertyEnumeration; StgProperty currentProperty; ULONG foundPropertyIndex; TRACE("(%p, %s, %s)\n", iface, debugstr_w(pwcsOldName), debugstr_w(pwcsNewName)); /* * Create a property enumeration to search the properties */ propertyEnumeration = IEnumSTATSTGImpl_Construct(This->ancestorStorage, This->rootPropertySetIndex); /* * Search the enumeration for the new property name */ foundPropertyIndex = IEnumSTATSTGImpl_FindProperty(propertyEnumeration, pwcsNewName, ¤tProperty); if (foundPropertyIndex != PROPERTY_NULL) { /* * There is already a property with the new name */ IEnumSTATSTGImpl_Destroy(propertyEnumeration); return STG_E_FILEALREADYEXISTS; } IEnumSTATSTGImpl_Reset((IEnumSTATSTG*)propertyEnumeration); /* * Search the enumeration for the old property name */ foundPropertyIndex = IEnumSTATSTGImpl_FindProperty(propertyEnumeration, pwcsOldName, ¤tProperty); /* * Delete the property enumeration since we don't need it anymore */ IEnumSTATSTGImpl_Destroy(propertyEnumeration); if (foundPropertyIndex != PROPERTY_NULL) { StgProperty renamedProperty; ULONG renamedPropertyIndex; /* * Setup a new property for the renamed property */ renamedProperty.sizeOfNameString = ( lstrlenW(pwcsNewName)+1 ) * sizeof(WCHAR); if (renamedProperty.sizeOfNameString > PROPERTY_NAME_BUFFER_LEN) return STG_E_INVALIDNAME; lstrcpyW(renamedProperty.name, pwcsNewName); renamedProperty.propertyType = currentProperty.propertyType; renamedProperty.startingBlock = currentProperty.startingBlock; renamedProperty.size.s.LowPart = currentProperty.size.s.LowPart; renamedProperty.size.s.HighPart = currentProperty.size.s.HighPart; renamedProperty.previousProperty = PROPERTY_NULL; renamedProperty.nextProperty = PROPERTY_NULL; /* * Bring the dirProperty link in case it is a storage and in which * case the renamed storage elements don't require to be reorganized. */ renamedProperty.dirProperty = currentProperty.dirProperty; /* call CoFileTime to get the current time renamedProperty.timeStampS1 renamedProperty.timeStampD1 renamedProperty.timeStampS2 renamedProperty.timeStampD2 renamedProperty.propertyUniqueID */ /* * Obtain a free property in the property chain */ renamedPropertyIndex = getFreeProperty(This->ancestorStorage); /* * Save the new property into the new property spot */ StorageImpl_WriteProperty( This->ancestorStorage, renamedPropertyIndex, &renamedProperty); /* * Find a spot in the property chain for our newly created property. */ updatePropertyChain( (StorageImpl*)This, renamedPropertyIndex, renamedProperty); /* * At this point the renamed property has been inserted in the tree, * now, before to Destroy the old property we must zeroed it's dirProperty * otherwise the DestroyProperty below will zap it all and we do not want * this to happen. * Also, we fake that the old property is a storage so the DestroyProperty * will not do a SetSize(0) on the stream data. * * This means that we need to tweek the StgProperty if it is a stream or a * non empty storage. */ StorageImpl_ReadProperty(This->ancestorStorage, foundPropertyIndex, ¤tProperty); currentProperty.dirProperty = PROPERTY_NULL; currentProperty.propertyType = PROPTYPE_STORAGE; StorageImpl_WriteProperty( This->ancestorStorage, foundPropertyIndex, ¤tProperty); /* * Invoke Destroy to get rid of the ole property and automatically redo * the linking of it's previous and next members... */ StorageImpl_DestroyElement((IStorage*)This->ancestorStorage, pwcsOldName); } else { /* * There is no property with the old name */ return STG_E_FILENOTFOUND; } return S_OK; } /************************************************************************ * Storage32BaseImpl_CreateStream (IStorage) * * This method will create a stream object within this storage * * See Windows documentation for more details on IStorage methods. */ HRESULT WINAPI StorageBaseImpl_CreateStream( IStorage* iface, const OLECHAR* pwcsName, /* [string][in] */ DWORD grfMode, /* [in] */ DWORD reserved1, /* [in] */ DWORD reserved2, /* [in] */ IStream** ppstm) /* [out] */ { ICOM_THIS(StorageBaseImpl,iface); IEnumSTATSTGImpl* propertyEnumeration; StgStreamImpl* newStream; StgProperty currentProperty, newStreamProperty; ULONG foundPropertyIndex, newPropertyIndex; TRACE("(%p, %s, %lx, %ld, %ld, %p)\n", iface, debugstr_w(pwcsName), grfMode, reserved1, reserved2, ppstm); /* * Validate parameters */ if (ppstm == 0) return STG_E_INVALIDPOINTER; if (pwcsName == 0) return STG_E_INVALIDNAME; /* * Validate the STGM flags */ if ( FAILED( validateSTGM(grfMode) )) return STG_E_INVALIDFLAG; /* * As documented. */ if ( !(grfMode & STGM_SHARE_EXCLUSIVE) || (grfMode & STGM_DELETEONRELEASE) || (grfMode & STGM_TRANSACTED) ) return STG_E_INVALIDFUNCTION; /* * Initialize the out parameter */ *ppstm = 0; /* * Create a property enumeration to search the properties */ propertyEnumeration = IEnumSTATSTGImpl_Construct(This->ancestorStorage, This->rootPropertySetIndex); foundPropertyIndex = IEnumSTATSTGImpl_FindProperty(propertyEnumeration, pwcsName, ¤tProperty); IEnumSTATSTGImpl_Destroy(propertyEnumeration); if (foundPropertyIndex != PROPERTY_NULL) { /* * An element with this name already exists */ if (grfMode & STGM_CREATE) { IStorage_DestroyElement(iface, pwcsName); } else return STG_E_FILEALREADYEXISTS; } /* * memset the empty property */ memset(&newStreamProperty, 0, sizeof(StgProperty)); newStreamProperty.sizeOfNameString = ( lstrlenW(pwcsName)+1 ) * sizeof(WCHAR); if (newStreamProperty.sizeOfNameString > PROPERTY_NAME_BUFFER_LEN) return STG_E_INVALIDNAME; lstrcpyW(newStreamProperty.name, pwcsName); newStreamProperty.propertyType = PROPTYPE_STREAM; newStreamProperty.startingBlock = BLOCK_END_OF_CHAIN; newStreamProperty.size.s.LowPart = 0; newStreamProperty.size.s.HighPart = 0; newStreamProperty.previousProperty = PROPERTY_NULL; newStreamProperty.nextProperty = PROPERTY_NULL; newStreamProperty.dirProperty = PROPERTY_NULL; /* call CoFileTime to get the current time newStreamProperty.timeStampS1 newStreamProperty.timeStampD1 newStreamProperty.timeStampS2 newStreamProperty.timeStampD2 */ /* newStreamProperty.propertyUniqueID */ /* * Get a free property or create a new one */ newPropertyIndex = getFreeProperty(This->ancestorStorage); /* * Save the new property into the new property spot */ StorageImpl_WriteProperty( This->ancestorStorage, newPropertyIndex, &newStreamProperty); /* * Find a spot in the property chain for our newly created property. */ updatePropertyChain( (StorageImpl*)This, newPropertyIndex, newStreamProperty); /* * Open the stream to return it. */ newStream = StgStreamImpl_Construct(This, grfMode, newPropertyIndex); if (newStream != 0) { *ppstm = (IStream*)newStream; /* * Since we are returning a pointer to the interface, we have to nail down * the reference. */ StgStreamImpl_AddRef(*ppstm); } else { return STG_E_INSUFFICIENTMEMORY; } return S_OK; } /************************************************************************ * Storage32BaseImpl_SetClass (IStorage) * * This method will write the specified CLSID in the property of this * storage. * * See Windows documentation for more details on IStorage methods. */ HRESULT WINAPI StorageBaseImpl_SetClass( IStorage* iface, REFCLSID clsid) /* [in] */ { ICOM_THIS(StorageBaseImpl,iface); HRESULT hRes = E_FAIL; StgProperty curProperty; BOOL success; TRACE("(%p, %p)\n", iface, clsid); success = StorageImpl_ReadProperty(This->ancestorStorage, This->rootPropertySetIndex, &curProperty); if (success) { curProperty.propertyUniqueID = *clsid; success = StorageImpl_WriteProperty(This->ancestorStorage, This->rootPropertySetIndex, &curProperty); if (success) hRes = S_OK; } return hRes; } /************************************************************************ ** Storage32Impl implementation */ /************************************************************************ * Storage32Impl_CreateStorage (IStorage) * * This method will create the storage object within the provided storage. * * See Windows documentation for more details on IStorage methods. */ HRESULT WINAPI StorageImpl_CreateStorage( IStorage* iface, const OLECHAR *pwcsName, /* [string][in] */ DWORD grfMode, /* [in] */ DWORD reserved1, /* [in] */ DWORD reserved2, /* [in] */ IStorage **ppstg) /* [out] */ { StorageImpl* const This=(StorageImpl*)iface; IEnumSTATSTGImpl *propertyEnumeration; StgProperty currentProperty; StgProperty newProperty; ULONG foundPropertyIndex; ULONG newPropertyIndex; HRESULT hr; TRACE("(%p, %s, %lx, %ld, %ld, %p)\n", iface, debugstr_w(pwcsName), grfMode, reserved1, reserved2, ppstg); /* * Validate parameters */ if (ppstg == 0) return STG_E_INVALIDPOINTER; if (pwcsName == 0) return STG_E_INVALIDNAME; /* * Validate the STGM flags */ if ( FAILED( validateSTGM(grfMode) ) || (grfMode & STGM_DELETEONRELEASE) ) return STG_E_INVALIDFLAG; /* * Initialize the out parameter */ *ppstg = 0; /* * Create a property enumeration and search the properties */ propertyEnumeration = IEnumSTATSTGImpl_Construct( This->ancestorStorage, This->rootPropertySetIndex); foundPropertyIndex = IEnumSTATSTGImpl_FindProperty(propertyEnumeration, pwcsName, ¤tProperty); IEnumSTATSTGImpl_Destroy(propertyEnumeration); if (foundPropertyIndex != PROPERTY_NULL) { /* * An element with this name already exists */ if (grfMode & STGM_CREATE) IStorage_DestroyElement(iface, pwcsName); else return STG_E_FILEALREADYEXISTS; } /* * memset the empty property */ memset(&newProperty, 0, sizeof(StgProperty)); newProperty.sizeOfNameString = (lstrlenW(pwcsName)+1)*sizeof(WCHAR); if (newProperty.sizeOfNameString > PROPERTY_NAME_BUFFER_LEN) return STG_E_INVALIDNAME; lstrcpyW(newProperty.name, pwcsName); newProperty.propertyType = PROPTYPE_STORAGE; newProperty.startingBlock = BLOCK_END_OF_CHAIN; newProperty.size.s.LowPart = 0; newProperty.size.s.HighPart = 0; newProperty.previousProperty = PROPERTY_NULL; newProperty.nextProperty = PROPERTY_NULL; newProperty.dirProperty = PROPERTY_NULL; /* call CoFileTime to get the current time newProperty.timeStampS1 newProperty.timeStampD1 newProperty.timeStampS2 newProperty.timeStampD2 */ /* newStorageProperty.propertyUniqueID */ /* * Obtain a free property in the property chain */ newPropertyIndex = getFreeProperty(This->ancestorStorage); /* * Save the new property into the new property spot */ StorageImpl_WriteProperty( This->ancestorStorage, newPropertyIndex, &newProperty); /* * Find a spot in the property chain for our newly created property. */ updatePropertyChain( This, newPropertyIndex, newProperty); /* * Open it to get a pointer to return. */ hr = IStorage_OpenStorage( iface, (OLECHAR*)pwcsName, 0, grfMode, 0, 0, ppstg); if( (hr != S_OK) || (*ppstg == NULL)) { return hr; } return S_OK; } /*************************************************************************** * * Internal Method * * Get a free property or create a new one. */ static ULONG getFreeProperty( StorageImpl *storage) { ULONG currentPropertyIndex = 0; ULONG newPropertyIndex = PROPERTY_NULL; BOOL readSuccessful = TRUE; StgProperty currentProperty; do { /* * Start by reading the root property */ readSuccessful = StorageImpl_ReadProperty(storage->ancestorStorage, currentPropertyIndex, ¤tProperty); if (readSuccessful) { if (currentProperty.sizeOfNameString == 0) { /* * The property existis and is available, we found it. */ newPropertyIndex = currentPropertyIndex; } } else { /* * We exhausted the property list, we will create more space below */ newPropertyIndex = currentPropertyIndex; } currentPropertyIndex++; } while (newPropertyIndex == PROPERTY_NULL); /* * grow the property chain */ if (! readSuccessful) { StgProperty emptyProperty; ULARGE_INTEGER newSize; ULONG propertyIndex; ULONG lastProperty = 0; ULONG blockCount = 0; /* * obtain the new count of property blocks */ blockCount = BlockChainStream_GetCount( storage->ancestorStorage->rootBlockChain)+1; /* * initialize the size used by the property stream */ newSize.s.HighPart = 0; newSize.s.LowPart = storage->bigBlockSize * blockCount; /* * add a property block to the property chain */ BlockChainStream_SetSize(storage->ancestorStorage->rootBlockChain, newSize); /* * memset the empty property in order to initialize the unused newly * created property */ memset(&emptyProperty, 0, sizeof(StgProperty)); /* * initialize them */ lastProperty = storage->bigBlockSize / PROPSET_BLOCK_SIZE * blockCount; for( propertyIndex = newPropertyIndex; propertyIndex < lastProperty; propertyIndex++) { StorageImpl_WriteProperty( storage->ancestorStorage, propertyIndex, &emptyProperty); } } return newPropertyIndex; } /**************************************************************************** * * Internal Method * * Case insensitive comparaison of StgProperty.name by first considering * their size. * * Returns <0 when newPrpoerty < currentProperty * >0 when newPrpoerty > currentProperty * 0 when newPrpoerty == currentProperty */ static LONG propertyNameCmp( OLECHAR *newProperty, OLECHAR *currentProperty) { LONG diff = lstrlenW(newProperty) - lstrlenW(currentProperty); if (diff == 0) { /* * We compare the string themselves only when they are of the same lenght */ diff = lstrcmpiW( newProperty, currentProperty); } return diff; } /**************************************************************************** * * Internal Method * * Properly link this new element in the property chain. */ static void updatePropertyChain( StorageImpl *storage, ULONG newPropertyIndex, StgProperty newProperty) { StgProperty currentProperty; /* * Read the root property */ StorageImpl_ReadProperty(storage->ancestorStorage, storage->rootPropertySetIndex, ¤tProperty); if (currentProperty.dirProperty != PROPERTY_NULL) { /* * The root storage contains some element, therefore, start the research * for the appropriate location. */ BOOL found = 0; ULONG current, next, previous, currentPropertyId; /* * Keep the StgProperty sequence number of the storage first property */ currentPropertyId = currentProperty.dirProperty; /* * Read */ StorageImpl_ReadProperty(storage->ancestorStorage, currentProperty.dirProperty, ¤tProperty); previous = currentProperty.previousProperty; next = currentProperty.nextProperty; current = currentPropertyId; while (found == 0) { LONG diff = propertyNameCmp( newProperty.name, currentProperty.name); if (diff < 0) { if (previous != PROPERTY_NULL) { StorageImpl_ReadProperty(storage->ancestorStorage, previous, ¤tProperty); current = previous; } else { currentProperty.previousProperty = newPropertyIndex; StorageImpl_WriteProperty(storage->ancestorStorage, current, ¤tProperty); found = 1; } } else if (diff > 0) { if (next != PROPERTY_NULL) { StorageImpl_ReadProperty(storage->ancestorStorage, next, ¤tProperty); current = next; } else { currentProperty.nextProperty = newPropertyIndex; StorageImpl_WriteProperty(storage->ancestorStorage, current, ¤tProperty); found = 1; } } else { /* * Trying to insert an item with the same name in the * subtree structure. */ assert(FALSE); } previous = currentProperty.previousProperty; next = currentProperty.nextProperty; } } else { /* * The root storage is empty, link the new property to it's dir property */ currentProperty.dirProperty = newPropertyIndex; StorageImpl_WriteProperty(storage->ancestorStorage, storage->rootPropertySetIndex, ¤tProperty); } } /************************************************************************* * CopyTo (IStorage) */ HRESULT WINAPI StorageImpl_CopyTo( IStorage* iface, DWORD ciidExclude, /* [in] */ const IID* rgiidExclude, /* [size_is][unique][in] */ SNB snbExclude, /* [unique][in] */ IStorage* pstgDest) /* [unique][in] */ { IEnumSTATSTG *elements = 0; STATSTG curElement, strStat; HRESULT hr; IStorage *pstgTmp, *pstgChild; IStream *pstrTmp, *pstrChild; if ((ciidExclude != 0) || (rgiidExclude != NULL) || (snbExclude != NULL)) FIXME("Exclude option not implemented\n"); TRACE("(%p, %ld, %p, %p, %p)\n", iface, ciidExclude, rgiidExclude, snbExclude, pstgDest); /* * Perform a sanity check */ if ( pstgDest == 0 ) return STG_E_INVALIDPOINTER; /* * Enumerate the elements */ hr = IStorage_EnumElements( iface, 0, 0, 0, &elements ); if ( hr != S_OK ) return hr; /* * set the class ID */ IStorage_Stat( iface, &curElement, STATFLAG_NONAME); IStorage_SetClass( pstgDest, &curElement.clsid ); do { /* * Obtain the next element */ hr = IEnumSTATSTG_Next( elements, 1, &curElement, NULL ); if ( hr == S_FALSE ) { hr = S_OK; /* done, every element has been copied */ break; } if (curElement.type == STGTY_STORAGE) { /* * open child source storage */ hr = IStorage_OpenStorage( iface, curElement.pwcsName, NULL, STGM_READ|STGM_SHARE_EXCLUSIVE, NULL, 0, &pstgChild ); if (hr != S_OK) break; /* * Check if destination storage is not a child of the source * storage, which will cause an infinite loop */ if (pstgChild == pstgDest) { IEnumSTATSTG_Release(elements); return STG_E_ACCESSDENIED; } /* * create a new storage in destination storage */ hr = IStorage_CreateStorage( pstgDest, curElement.pwcsName, STGM_FAILIFTHERE|STGM_WRITE|STGM_SHARE_EXCLUSIVE, 0, 0, &pstgTmp ); /* * if it already exist, don't create a new one use this one */ if (hr == STG_E_FILEALREADYEXISTS) { hr = IStorage_OpenStorage( pstgDest, curElement.pwcsName, NULL, STGM_WRITE|STGM_SHARE_EXCLUSIVE, NULL, 0, &pstgTmp ); } if (hr != S_OK) break; /* * do the copy recursively */ hr = IStorage_CopyTo( pstgChild, ciidExclude, rgiidExclude, snbExclude, pstgTmp ); IStorage_Release( pstgTmp ); IStorage_Release( pstgChild ); } else if (curElement.type == STGTY_STREAM) { /* * create a new stream in destination storage. If the stream already * exist, it will be deleted and a new one will be created. */ hr = IStorage_CreateStream( pstgDest, curElement.pwcsName, STGM_CREATE|STGM_WRITE|STGM_SHARE_EXCLUSIVE, 0, 0, &pstrTmp ); if (hr != S_OK) break; /* * open child stream storage */ hr = IStorage_OpenStream( iface, curElement.pwcsName, NULL, STGM_READ|STGM_SHARE_EXCLUSIVE, 0, &pstrChild ); if (hr != S_OK) break; /* * Get the size of the source stream */ IStream_Stat( pstrChild, &strStat, STATFLAG_NONAME ); /* * Set the size of the destination stream. */ IStream_SetSize(pstrTmp, strStat.cbSize); /* * do the copy */ hr = IStream_CopyTo( pstrChild, pstrTmp, strStat.cbSize, NULL, NULL ); IStream_Release( pstrTmp ); IStream_Release( pstrChild ); } else { WARN("unknown element type: %ld\n", curElement.type); } } while (hr == S_OK); /* * Clean-up */ IEnumSTATSTG_Release(elements); return hr; } /************************************************************************* * MoveElementTo (IStorage) */ HRESULT WINAPI StorageImpl_MoveElementTo( IStorage* iface, const OLECHAR *pwcsName, /* [string][in] */ IStorage *pstgDest, /* [unique][in] */ const OLECHAR *pwcsNewName,/* [string][in] */ DWORD grfFlags) /* [in] */ { FIXME("not implemented!\n"); return E_NOTIMPL; } /************************************************************************* * Commit (IStorage) */ HRESULT WINAPI StorageImpl_Commit( IStorage* iface, DWORD grfCommitFlags)/* [in] */ { FIXME("(%ld): stub!\n", grfCommitFlags); return S_OK; } /************************************************************************* * Revert (IStorage) */ HRESULT WINAPI StorageImpl_Revert( IStorage* iface) { FIXME("not implemented!\n"); return E_NOTIMPL; } /************************************************************************* * DestroyElement (IStorage) * * Stategy: This implementation is build this way for simplicity not for speed. * I always delete the top most element of the enumeration and adjust * the deleted element pointer all the time. This takes longer to * do but allow to reinvoke DestroyElement whenever we encounter a * storage object. The optimisation reside in the usage of another * enumeration stategy that would give all the leaves of a storage * first. (postfix order) */ HRESULT WINAPI StorageImpl_DestroyElement( IStorage* iface, const OLECHAR *pwcsName)/* [string][in] */ { StorageImpl* const This=(StorageImpl*)iface; IEnumSTATSTGImpl* propertyEnumeration; HRESULT hr = S_OK; BOOL res; StgProperty propertyToDelete; StgProperty parentProperty; ULONG foundPropertyIndexToDelete; ULONG typeOfRelation; ULONG parentPropertyId; TRACE("(%p, %s)\n", iface, debugstr_w(pwcsName)); /* * Perform a sanity check on the parameters. */ if (pwcsName==NULL) return STG_E_INVALIDPOINTER; /* * Create a property enumeration to search the property with the given name */ propertyEnumeration = IEnumSTATSTGImpl_Construct( This->ancestorStorage, This->rootPropertySetIndex); foundPropertyIndexToDelete = IEnumSTATSTGImpl_FindProperty( propertyEnumeration, pwcsName, &propertyToDelete); IEnumSTATSTGImpl_Destroy(propertyEnumeration); if ( foundPropertyIndexToDelete == PROPERTY_NULL ) { return STG_E_FILENOTFOUND; } /* * Find the parent property of the property to delete (the one that * link to it). If This->dirProperty == foundPropertyIndexToDelete, * the parent is This. Otherwise, the parent is one of it's sibling... */ /* * First, read This's StgProperty.. */ res = StorageImpl_ReadProperty( This->ancestorStorage, This->rootPropertySetIndex, &parentProperty); assert(res==TRUE); /* * Second, check to see if by any chance the actual storage (This) is not * the parent of the property to delete... We never know... */ if ( parentProperty.dirProperty == foundPropertyIndexToDelete ) { /* * Set data as it would have been done in the else part... */ typeOfRelation = PROPERTY_RELATION_DIR; parentPropertyId = This->rootPropertySetIndex; } else { /* * Create a property enumeration to search the parent properties, and * delete it once done. */ IEnumSTATSTGImpl* propertyEnumeration2; propertyEnumeration2 = IEnumSTATSTGImpl_Construct( This->ancestorStorage, This->rootPropertySetIndex); typeOfRelation = IEnumSTATSTGImpl_FindParentProperty( propertyEnumeration2, foundPropertyIndexToDelete, &parentProperty, &parentPropertyId); IEnumSTATSTGImpl_Destroy(propertyEnumeration2); } if ( propertyToDelete.propertyType == PROPTYPE_STORAGE ) { hr = deleteStorageProperty( This, foundPropertyIndexToDelete, propertyToDelete); } else if ( propertyToDelete.propertyType == PROPTYPE_STREAM ) { hr = deleteStreamProperty( This, foundPropertyIndexToDelete, propertyToDelete); } if (hr!=S_OK) return hr; /* * Adjust the property chain */ hr = adjustPropertyChain( This, propertyToDelete, parentProperty, parentPropertyId, typeOfRelation); return hr; } /********************************************************************* * * Internal Method * * Perform the deletion of a complete storage node * */ static HRESULT deleteStorageProperty( StorageImpl *parentStorage, ULONG indexOfPropertyToDelete, StgProperty propertyToDelete) { IEnumSTATSTG *elements = 0; IStorage *childStorage = 0; STATSTG currentElement; HRESULT hr; HRESULT destroyHr = S_OK; /* * Open the storage and enumerate it */ hr = StorageBaseImpl_OpenStorage( (IStorage*)parentStorage, propertyToDelete.name, 0, STGM_SHARE_EXCLUSIVE, 0, 0, &childStorage); if (hr != S_OK) { return hr; } /* * Enumerate the elements */ IStorage_EnumElements( childStorage, 0, 0, 0, &elements); do { /* * Obtain the next element */ hr = IEnumSTATSTG_Next(elements, 1, ¤tElement, NULL); if (hr==S_OK) { destroyHr = StorageImpl_DestroyElement( (IStorage*)childStorage, (OLECHAR*)currentElement.pwcsName); CoTaskMemFree(currentElement.pwcsName); } /* * We need to Reset the enumeration every time because we delete elements * and the enumeration could be invalid */ IEnumSTATSTG_Reset(elements); } while ((hr == S_OK) && (destroyHr == S_OK)); /* * Invalidate the property by zeroing it's name member. */ propertyToDelete.sizeOfNameString = 0; StorageImpl_WriteProperty(parentStorage->ancestorStorage, indexOfPropertyToDelete, &propertyToDelete); IStorage_Release(childStorage); IEnumSTATSTG_Release(elements); return destroyHr; } /********************************************************************* * * Internal Method * * Perform the deletion of a stream node * */ static HRESULT deleteStreamProperty( StorageImpl *parentStorage, ULONG indexOfPropertyToDelete, StgProperty propertyToDelete) { IStream *pis; HRESULT hr; ULARGE_INTEGER size; size.s.HighPart = 0; size.s.LowPart = 0; hr = StorageBaseImpl_OpenStream( (IStorage*)parentStorage, (OLECHAR*)propertyToDelete.name, NULL, STGM_WRITE | STGM_SHARE_EXCLUSIVE, 0, &pis); if (hr!=S_OK) { return(hr); } /* * Zap the stream */ hr = IStream_SetSize(pis, size); if(hr != S_OK) { return hr; } /* * Release the stream object. */ IStream_Release(pis); /* * Invalidate the property by zeroing it's name member. */ propertyToDelete.sizeOfNameString = 0; /* * Here we should re-read the property so we get the updated pointer * but since we are here to zap it, I don't do it... */ StorageImpl_WriteProperty( parentStorage->ancestorStorage, indexOfPropertyToDelete, &propertyToDelete); return S_OK; } /********************************************************************* * * Internal Method * * Finds a placeholder for the StgProperty within the Storage * */ static HRESULT findPlaceholder( StorageImpl *storage, ULONG propertyIndexToStore, ULONG storePropertyIndex, INT typeOfRelation) { StgProperty storeProperty; HRESULT hr = S_OK; BOOL res = TRUE; /* * Read the storage property */ res = StorageImpl_ReadProperty( storage->ancestorStorage, storePropertyIndex, &storeProperty); if(! res) { return E_FAIL; } if (typeOfRelation == PROPERTY_RELATION_PREVIOUS) { if (storeProperty.previousProperty != PROPERTY_NULL) { return findPlaceholder( storage, propertyIndexToStore, storeProperty.previousProperty, typeOfRelation); } else { storeProperty.previousProperty = propertyIndexToStore; } } else if (typeOfRelation == PROPERTY_RELATION_NEXT) { if (storeProperty.nextProperty != PROPERTY_NULL) { return findPlaceholder( storage, propertyIndexToStore, storeProperty.nextProperty, typeOfRelation); } else { storeProperty.nextProperty = propertyIndexToStore; } } else if (typeOfRelation == PROPERTY_RELATION_DIR) { if (storeProperty.dirProperty != PROPERTY_NULL) { return findPlaceholder( storage, propertyIndexToStore, storeProperty.dirProperty, typeOfRelation); } else { storeProperty.dirProperty = propertyIndexToStore; } } hr = StorageImpl_WriteProperty( storage->ancestorStorage, storePropertyIndex, &storeProperty); if(! hr) { return E_FAIL; } return S_OK; } /************************************************************************* * * Internal Method * * This method takes the previous and the next property link of a property * to be deleted and find them a place in the Storage. */ static HRESULT adjustPropertyChain( StorageImpl *This, StgProperty propertyToDelete, StgProperty parentProperty, ULONG parentPropertyId, INT typeOfRelation) { ULONG newLinkProperty = PROPERTY_NULL; BOOL needToFindAPlaceholder = FALSE; ULONG storeNode = PROPERTY_NULL; ULONG toStoreNode = PROPERTY_NULL; INT relationType = 0; HRESULT hr = S_OK; BOOL res = TRUE; if (typeOfRelation == PROPERTY_RELATION_PREVIOUS) { if (propertyToDelete.previousProperty != PROPERTY_NULL) { /* * Set the parent previous to the property to delete previous */ newLinkProperty = propertyToDelete.previousProperty; if (propertyToDelete.nextProperty != PROPERTY_NULL) { /* * We also need to find a storage for the other link, setup variables * to do this at the end... */ needToFindAPlaceholder = TRUE; storeNode = propertyToDelete.previousProperty; toStoreNode = propertyToDelete.nextProperty; relationType = PROPERTY_RELATION_NEXT; } } else if (propertyToDelete.nextProperty != PROPERTY_NULL) { /* * Set the parent previous to the property to delete next */ newLinkProperty = propertyToDelete.nextProperty; } /* * Link it for real... */ parentProperty.previousProperty = newLinkProperty; } else if (typeOfRelation == PROPERTY_RELATION_NEXT) { if (propertyToDelete.previousProperty != PROPERTY_NULL) { /* * Set the parent next to the property to delete next previous */ newLinkProperty = propertyToDelete.previousProperty; if (propertyToDelete.nextProperty != PROPERTY_NULL) { /* * We also need to find a storage for the other link, setup variables * to do this at the end... */ needToFindAPlaceholder = TRUE; storeNode = propertyToDelete.previousProperty; toStoreNode = propertyToDelete.nextProperty; relationType = PROPERTY_RELATION_NEXT; } } else if (propertyToDelete.nextProperty != PROPERTY_NULL) { /* * Set the parent next to the property to delete next */ newLinkProperty = propertyToDelete.nextProperty; } /* * Link it for real... */ parentProperty.nextProperty = newLinkProperty; } else /* (typeOfRelation == PROPERTY_RELATION_DIR) */ { if (propertyToDelete.previousProperty != PROPERTY_NULL) { /* * Set the parent dir to the property to delete previous */ newLinkProperty = propertyToDelete.previousProperty; if (propertyToDelete.nextProperty != PROPERTY_NULL) { /* * We also need to find a storage for the other link, setup variables * to do this at the end... */ needToFindAPlaceholder = TRUE; storeNode = propertyToDelete.previousProperty; toStoreNode = propertyToDelete.nextProperty; relationType = PROPERTY_RELATION_NEXT; } } else if (propertyToDelete.nextProperty != PROPERTY_NULL) { /* * Set the parent dir to the property to delete next */ newLinkProperty = propertyToDelete.nextProperty; } /* * Link it for real... */ parentProperty.dirProperty = newLinkProperty; } /* * Write back the parent property */ res = StorageImpl_WriteProperty( This->ancestorStorage, parentPropertyId, &parentProperty); if(! res) { return E_FAIL; } /* * If a placeholder is required for the other link, then, find one and * get out of here... */ if (needToFindAPlaceholder) { hr = findPlaceholder( This, toStoreNode, storeNode, relationType); } return hr; } /****************************************************************************** * SetElementTimes (IStorage) */ HRESULT WINAPI StorageImpl_SetElementTimes( IStorage* iface, const OLECHAR *pwcsName,/* [string][in] */ const FILETIME *pctime, /* [in] */ const FILETIME *patime, /* [in] */ const FILETIME *pmtime) /* [in] */ { FIXME("not implemented!\n"); return E_NOTIMPL; } /****************************************************************************** * SetStateBits (IStorage) */ HRESULT WINAPI StorageImpl_SetStateBits( IStorage* iface, DWORD grfStateBits,/* [in] */ DWORD grfMask) /* [in] */ { FIXME("not implemented!\n"); return E_NOTIMPL; } HRESULT StorageImpl_Construct( StorageImpl* This, HANDLE hFile, ILockBytes* pLkbyt, DWORD openFlags, BOOL fileBased, BOOL fileCreate) { HRESULT hr = S_OK; StgProperty currentProperty; BOOL readSuccessful; ULONG currentPropertyIndex; if ( FAILED( validateSTGM(openFlags) )) return STG_E_INVALIDFLAG; memset(This, 0, sizeof(StorageImpl)); /* * Initialize the virtual fgunction table. */ ICOM_VTBL(This) = &Storage32Impl_Vtbl; This->v_destructor = &StorageImpl_Destroy; /* * This is the top-level storage so initialize the ancester pointer * to this. */ This->ancestorStorage = This; /* * Initialize the physical support of the storage. */ This->hFile = hFile; /* * Initialize the big block cache. */ This->bigBlockSize = DEF_BIG_BLOCK_SIZE; This->smallBlockSize = DEF_SMALL_BLOCK_SIZE; This->bigBlockFile = BIGBLOCKFILE_Construct(hFile, pLkbyt, openFlags, This->bigBlockSize, fileBased); if (This->bigBlockFile == 0) return E_FAIL; if (fileCreate) { ULARGE_INTEGER size; BYTE* bigBlockBuffer; /* * Initialize all header variables: * - The big block depot consists of one block and it is at block 0 * - The properties start at block 1 * - There is no small block depot */ memset( This->bigBlockDepotStart, BLOCK_UNUSED, sizeof(This->bigBlockDepotStart)); This->bigBlockDepotCount = 1; This->bigBlockDepotStart[0] = 0; This->rootStartBlock = 1; This->smallBlockDepotStart = BLOCK_END_OF_CHAIN; This->bigBlockSizeBits = DEF_BIG_BLOCK_SIZE_BITS; This->smallBlockSizeBits = DEF_SMALL_BLOCK_SIZE_BITS; This->extBigBlockDepotStart = BLOCK_END_OF_CHAIN; This->extBigBlockDepotCount = 0; StorageImpl_SaveFileHeader(This); /* * Add one block for the big block depot and one block for the properties */ size.s.HighPart = 0; size.s.LowPart = This->bigBlockSize * 3; BIGBLOCKFILE_SetSize(This->bigBlockFile, size); /* * Initialize the big block depot */ bigBlockBuffer = StorageImpl_GetBigBlock(This, 0); memset(bigBlockBuffer, BLOCK_UNUSED, This->bigBlockSize); StorageUtl_WriteDWord(bigBlockBuffer, 0, BLOCK_SPECIAL); StorageUtl_WriteDWord(bigBlockBuffer, sizeof(ULONG), BLOCK_END_OF_CHAIN); StorageImpl_ReleaseBigBlock(This, bigBlockBuffer); } else { /* * Load the header for the file. */ hr = StorageImpl_LoadFileHeader(This); if (FAILED(hr)) { BIGBLOCKFILE_Destructor(This->bigBlockFile); return hr; } } /* * There is no block depot cached yet. */ This->indexBlockDepotCached = 0xFFFFFFFF; /* * Start searching for free blocks with block 0. */ This->prevFreeBlock = 0; /* * Create the block chain abstractions. */ This->rootBlockChain = BlockChainStream_Construct(This, &This->rootStartBlock, PROPERTY_NULL); This->smallBlockDepotChain = BlockChainStream_Construct( This, &This->smallBlockDepotStart, PROPERTY_NULL); /* * Write the root property */ if (fileCreate) { StgProperty rootProp; /* * Initialize the property chain */ memset(&rootProp, 0, sizeof(rootProp)); lstrcpyAtoW(rootProp.name, rootPropertyName); rootProp.sizeOfNameString = (lstrlenW(rootProp.name)+1) * sizeof(WCHAR); rootProp.propertyType = PROPTYPE_ROOT; rootProp.previousProperty = PROPERTY_NULL; rootProp.nextProperty = PROPERTY_NULL; rootProp.dirProperty = PROPERTY_NULL; rootProp.startingBlock = BLOCK_END_OF_CHAIN; rootProp.size.s.HighPart = 0; rootProp.size.s.LowPart = 0; StorageImpl_WriteProperty(This, 0, &rootProp); } /* * Find the ID of the root int he property sets. */ currentPropertyIndex = 0; do { readSuccessful = StorageImpl_ReadProperty( This, currentPropertyIndex, ¤tProperty); if (readSuccessful) { if ( (currentProperty.sizeOfNameString != 0 ) && (currentProperty.propertyType == PROPTYPE_ROOT) ) { This->rootPropertySetIndex = currentPropertyIndex; } } currentPropertyIndex++; } while (readSuccessful && (This->rootPropertySetIndex == PROPERTY_NULL) ); if (!readSuccessful) { /* TODO CLEANUP */ return E_FAIL; } /* * Create the block chain abstraction for the small block root chain. */ This->smallBlockRootChain = BlockChainStream_Construct( This, NULL, This->rootPropertySetIndex); return hr; } void StorageImpl_Destroy( StorageImpl* This) { TRACE("(%p)\n", This); BlockChainStream_Destroy(This->smallBlockRootChain); BlockChainStream_Destroy(This->rootBlockChain); BlockChainStream_Destroy(This->smallBlockDepotChain); BIGBLOCKFILE_Destructor(This->bigBlockFile); return; } /****************************************************************************** * Storage32Impl_GetNextFreeBigBlock * * Returns the index of the next free big block. * If the big block depot is filled, this method will enlarge it. * */ ULONG StorageImpl_GetNextFreeBigBlock( StorageImpl* This) { ULONG depotBlockIndexPos; void *depotBuffer; ULONG depotBlockOffset; ULONG blocksPerDepot = This->bigBlockSize / sizeof(ULONG); ULONG nextBlockIndex = BLOCK_SPECIAL; int depotIndex = 0; ULONG freeBlock = BLOCK_UNUSED; depotIndex = This->prevFreeBlock / blocksPerDepot; depotBlockOffset = (This->prevFreeBlock % blocksPerDepot) * sizeof(ULONG); /* * Scan the entire big block depot until we find a block marked free */ while (nextBlockIndex != BLOCK_UNUSED) { if (depotIndex < COUNT_BBDEPOTINHEADER) { depotBlockIndexPos = This->bigBlockDepotStart[depotIndex]; /* * Grow the primary depot. */ if (depotBlockIndexPos == BLOCK_UNUSED) { depotBlockIndexPos = depotIndex*blocksPerDepot; /* * Add a block depot. */ Storage32Impl_AddBlockDepot(This, depotBlockIndexPos); This->bigBlockDepotCount++; This->bigBlockDepotStart[depotIndex] = depotBlockIndexPos; /* * Flag it as a block depot. */ StorageImpl_SetNextBlockInChain(This, depotBlockIndexPos, BLOCK_SPECIAL); /* Save new header information. */ StorageImpl_SaveFileHeader(This); } } else { depotBlockIndexPos = Storage32Impl_GetExtDepotBlock(This, depotIndex); if (depotBlockIndexPos == BLOCK_UNUSED) { /* * Grow the extended depot. */ ULONG extIndex = BLOCK_UNUSED; ULONG numExtBlocks = depotIndex - COUNT_BBDEPOTINHEADER; ULONG extBlockOffset = numExtBlocks % (blocksPerDepot - 1); if (extBlockOffset == 0) { /* We need an extended block. */ extIndex = Storage32Impl_AddExtBlockDepot(This); This->extBigBlockDepotCount++; depotBlockIndexPos = extIndex + 1; } else depotBlockIndexPos = depotIndex * blocksPerDepot; /* * Add a block depot and mark it in the extended block. */ Storage32Impl_AddBlockDepot(This, depotBlockIndexPos); This->bigBlockDepotCount++; Storage32Impl_SetExtDepotBlock(This, depotIndex, depotBlockIndexPos); /* Flag the block depot. */ StorageImpl_SetNextBlockInChain(This, depotBlockIndexPos, BLOCK_SPECIAL); /* If necessary, flag the extended depot block. */ if (extIndex != BLOCK_UNUSED) StorageImpl_SetNextBlockInChain(This, extIndex, BLOCK_EXTBBDEPOT); /* Save header information. */ StorageImpl_SaveFileHeader(This); } } depotBuffer = StorageImpl_GetROBigBlock(This, depotBlockIndexPos); if (depotBuffer != 0) { while ( ( (depotBlockOffset/sizeof(ULONG) ) < blocksPerDepot) && ( nextBlockIndex != BLOCK_UNUSED)) { StorageUtl_ReadDWord(depotBuffer, depotBlockOffset, &nextBlockIndex); if (nextBlockIndex == BLOCK_UNUSED) { freeBlock = (depotIndex * blocksPerDepot) + (depotBlockOffset/sizeof(ULONG)); } depotBlockOffset += sizeof(ULONG); } StorageImpl_ReleaseBigBlock(This, depotBuffer); } depotIndex++; depotBlockOffset = 0; } This->prevFreeBlock = freeBlock; return freeBlock; } /****************************************************************************** * Storage32Impl_AddBlockDepot * * This will create a depot block, essentially it is a block initialized * to BLOCK_UNUSEDs. */ void Storage32Impl_AddBlockDepot(StorageImpl* This, ULONG blockIndex) { BYTE* blockBuffer; blockBuffer = StorageImpl_GetBigBlock(This, blockIndex); /* * Initialize blocks as free */ memset(blockBuffer, BLOCK_UNUSED, This->bigBlockSize); StorageImpl_ReleaseBigBlock(This, blockBuffer); } /****************************************************************************** * Storage32Impl_GetExtDepotBlock * * Returns the index of the block that corresponds to the specified depot * index. This method is only for depot indexes equal or greater than * COUNT_BBDEPOTINHEADER. */ ULONG Storage32Impl_GetExtDepotBlock(StorageImpl* This, ULONG depotIndex) { ULONG depotBlocksPerExtBlock = (This->bigBlockSize / sizeof(ULONG)) - 1; ULONG numExtBlocks = depotIndex - COUNT_BBDEPOTINHEADER; ULONG extBlockCount = numExtBlocks / depotBlocksPerExtBlock; ULONG extBlockOffset = numExtBlocks % depotBlocksPerExtBlock; ULONG blockIndex = BLOCK_UNUSED; ULONG extBlockIndex = This->extBigBlockDepotStart; assert(depotIndex >= COUNT_BBDEPOTINHEADER); if (This->extBigBlockDepotStart == BLOCK_END_OF_CHAIN) return BLOCK_UNUSED; while (extBlockCount > 0) { extBlockIndex = Storage32Impl_GetNextExtendedBlock(This, extBlockIndex); extBlockCount--; } if (extBlockIndex != BLOCK_UNUSED) { BYTE* depotBuffer; depotBuffer = StorageImpl_GetROBigBlock(This, extBlockIndex); if (depotBuffer != 0) { StorageUtl_ReadDWord(depotBuffer, extBlockOffset * sizeof(ULONG), &blockIndex); StorageImpl_ReleaseBigBlock(This, depotBuffer); } } return blockIndex; } /****************************************************************************** * Storage32Impl_SetExtDepotBlock * * Associates the specified block index to the specified depot index. * This method is only for depot indexes equal or greater than * COUNT_BBDEPOTINHEADER. */ void Storage32Impl_SetExtDepotBlock(StorageImpl* This, ULONG depotIndex, ULONG blockIndex) { ULONG depotBlocksPerExtBlock = (This->bigBlockSize / sizeof(ULONG)) - 1; ULONG numExtBlocks = depotIndex - COUNT_BBDEPOTINHEADER; ULONG extBlockCount = numExtBlocks / depotBlocksPerExtBlock; ULONG extBlockOffset = numExtBlocks % depotBlocksPerExtBlock; ULONG extBlockIndex = This->extBigBlockDepotStart; assert(depotIndex >= COUNT_BBDEPOTINHEADER); while (extBlockCount > 0) { extBlockIndex = Storage32Impl_GetNextExtendedBlock(This, extBlockIndex); extBlockCount--; } if (extBlockIndex != BLOCK_UNUSED) { BYTE* depotBuffer; depotBuffer = StorageImpl_GetBigBlock(This, extBlockIndex); if (depotBuffer != 0) { StorageUtl_WriteDWord(depotBuffer, extBlockOffset * sizeof(ULONG), blockIndex); StorageImpl_ReleaseBigBlock(This, depotBuffer); } } } /****************************************************************************** * Storage32Impl_AddExtBlockDepot * * Creates an extended depot block. */ ULONG Storage32Impl_AddExtBlockDepot(StorageImpl* This) { ULONG numExtBlocks = This->extBigBlockDepotCount; ULONG nextExtBlock = This->extBigBlockDepotStart; BYTE* depotBuffer = NULL; ULONG index = BLOCK_UNUSED; ULONG nextBlockOffset = This->bigBlockSize - sizeof(ULONG); ULONG blocksPerDepotBlock = This->bigBlockSize / sizeof(ULONG); ULONG depotBlocksPerExtBlock = blocksPerDepotBlock - 1; index = (COUNT_BBDEPOTINHEADER + (numExtBlocks * depotBlocksPerExtBlock)) * blocksPerDepotBlock; if ((numExtBlocks == 0) && (nextExtBlock == BLOCK_END_OF_CHAIN)) { /* * The first extended block. */ This->extBigBlockDepotStart = index; } else { int i; /* * Follow the chain to the last one. */ for (i = 0; i < (numExtBlocks - 1); i++) { nextExtBlock = Storage32Impl_GetNextExtendedBlock(This, nextExtBlock); } /* * Add the new extended block to the chain. */ depotBuffer = StorageImpl_GetBigBlock(This, nextExtBlock); StorageUtl_WriteDWord(depotBuffer, nextBlockOffset, index); StorageImpl_ReleaseBigBlock(This, depotBuffer); } /* * Initialize this block. */ depotBuffer = StorageImpl_GetBigBlock(This, index); memset(depotBuffer, BLOCK_UNUSED, This->bigBlockSize); StorageImpl_ReleaseBigBlock(This, depotBuffer); return index; } /****************************************************************************** * Storage32Impl_FreeBigBlock * * This method will flag the specified block as free in the big block depot. */ void StorageImpl_FreeBigBlock( StorageImpl* This, ULONG blockIndex) { StorageImpl_SetNextBlockInChain(This, blockIndex, BLOCK_UNUSED); if (blockIndex < This->prevFreeBlock) This->prevFreeBlock = blockIndex; } /************************************************************************ * Storage32Impl_GetNextBlockInChain * * This method will retrieve the block index of the next big block in * in the chain. * * Params: This - Pointer to the Storage object. * blockIndex - Index of the block to retrieve the chain * for. * * Returns: This method returns the index of the next block in the chain. * It will return the constants: * BLOCK_SPECIAL - If the block given was not part of a * chain. * BLOCK_END_OF_CHAIN - If the block given was the last in * a chain. * BLOCK_UNUSED - If the block given was not past of a chain * and is available. * BLOCK_EXTBBDEPOT - This block is part of the extended * big block depot. * * See Windows documentation for more details on IStorage methods. */ ULONG StorageImpl_GetNextBlockInChain( StorageImpl* This, ULONG blockIndex) { ULONG offsetInDepot = blockIndex * sizeof (ULONG); ULONG depotBlockCount = offsetInDepot / This->bigBlockSize; ULONG depotBlockOffset = offsetInDepot % This->bigBlockSize; ULONG nextBlockIndex = BLOCK_SPECIAL; void* depotBuffer; ULONG depotBlockIndexPos; assert(depotBlockCount < This->bigBlockDepotCount); /* * Cache the currently accessed depot block. */ if (depotBlockCount != This->indexBlockDepotCached) { This->indexBlockDepotCached = depotBlockCount; if (depotBlockCount < COUNT_BBDEPOTINHEADER) { depotBlockIndexPos = This->bigBlockDepotStart[depotBlockCount]; } else { /* * We have to look in the extended depot. */ depotBlockIndexPos = Storage32Impl_GetExtDepotBlock(This, depotBlockCount); } depotBuffer = StorageImpl_GetROBigBlock(This, depotBlockIndexPos); if (depotBuffer!=0) { int index; for (index = 0; index < NUM_BLOCKS_PER_DEPOT_BLOCK; index++) { StorageUtl_ReadDWord(depotBuffer, index*sizeof(ULONG), &nextBlockIndex); This->blockDepotCached[index] = nextBlockIndex; } StorageImpl_ReleaseBigBlock(This, depotBuffer); } } nextBlockIndex = This->blockDepotCached[depotBlockOffset/sizeof(ULONG)]; return nextBlockIndex; } /****************************************************************************** * Storage32Impl_GetNextExtendedBlock * * Given an extended block this method will return the next extended block. * * NOTES: * The last ULONG of an extended block is the block index of the next * extended block. Extended blocks are marked as BLOCK_EXTBBDEPOT in the * depot. * * Return values: * - The index of the next extended block * - BLOCK_UNUSED: there is no next extended block. * - Any other return values denotes failure. */ ULONG Storage32Impl_GetNextExtendedBlock(StorageImpl* This, ULONG blockIndex) { ULONG nextBlockIndex = BLOCK_SPECIAL; ULONG depotBlockOffset = This->bigBlockSize - sizeof(ULONG); void* depotBuffer; depotBuffer = StorageImpl_GetROBigBlock(This, blockIndex); if (depotBuffer!=0) { StorageUtl_ReadDWord(depotBuffer, depotBlockOffset, &nextBlockIndex); StorageImpl_ReleaseBigBlock(This, depotBuffer); } return nextBlockIndex; } /****************************************************************************** * Storage32Impl_SetNextBlockInChain * * This method will write the index of the specified block's next block * in the big block depot. * * For example: to create the chain 3 -> 1 -> 7 -> End of Chain * do the following * * Storage32Impl_SetNextBlockInChain(This, 3, 1); * Storage32Impl_SetNextBlockInChain(This, 1, 7); * Storage32Impl_SetNextBlockInChain(This, 7, BLOCK_END_OF_CHAIN); * */ void StorageImpl_SetNextBlockInChain( StorageImpl* This, ULONG blockIndex, ULONG nextBlock) { ULONG offsetInDepot = blockIndex * sizeof (ULONG); ULONG depotBlockCount = offsetInDepot / This->bigBlockSize; ULONG depotBlockOffset = offsetInDepot % This->bigBlockSize; ULONG depotBlockIndexPos; void* depotBuffer; assert(depotBlockCount < This->bigBlockDepotCount); assert(blockIndex != nextBlock); if (depotBlockCount < COUNT_BBDEPOTINHEADER) { depotBlockIndexPos = This->bigBlockDepotStart[depotBlockCount]; } else { /* * We have to look in the extended depot. */ depotBlockIndexPos = Storage32Impl_GetExtDepotBlock(This, depotBlockCount); } depotBuffer = StorageImpl_GetBigBlock(This, depotBlockIndexPos); if (depotBuffer!=0) { StorageUtl_WriteDWord(depotBuffer, depotBlockOffset, nextBlock); StorageImpl_ReleaseBigBlock(This, depotBuffer); } /* * Update the cached block depot, if necessary. */ if (depotBlockCount == This->indexBlockDepotCached) { This->blockDepotCached[depotBlockOffset/sizeof(ULONG)] = nextBlock; } } /****************************************************************************** * Storage32Impl_LoadFileHeader * * This method will read in the file header, i.e. big block index -1. */ HRESULT StorageImpl_LoadFileHeader( StorageImpl* This) { HRESULT hr = STG_E_FILENOTFOUND; void* headerBigBlock = NULL; int index; /* * Get a pointer to the big block of data containing the header. */ headerBigBlock = StorageImpl_GetROBigBlock(This, -1); /* * Extract the information from the header. */ if (headerBigBlock!=0) { /* * Check for the "magic number" signature and return an error if it is not * found. */ if (memcmp(headerBigBlock, STORAGE_oldmagic, sizeof(STORAGE_oldmagic))==0) { StorageImpl_ReleaseBigBlock(This, headerBigBlock); return STG_E_OLDFORMAT; } if (memcmp(headerBigBlock, STORAGE_magic, sizeof(STORAGE_magic))!=0) { StorageImpl_ReleaseBigBlock(This, headerBigBlock); return STG_E_INVALIDHEADER; } StorageUtl_ReadWord( headerBigBlock, OFFSET_BIGBLOCKSIZEBITS, &This->bigBlockSizeBits); StorageUtl_ReadWord( headerBigBlock, OFFSET_SMALLBLOCKSIZEBITS, &This->smallBlockSizeBits); StorageUtl_ReadDWord( headerBigBlock, OFFSET_BBDEPOTCOUNT, &This->bigBlockDepotCount); StorageUtl_ReadDWord( headerBigBlock, OFFSET_ROOTSTARTBLOCK, &This->rootStartBlock); StorageUtl_ReadDWord( headerBigBlock, OFFSET_SBDEPOTSTART, &This->smallBlockDepotStart); StorageUtl_ReadDWord( headerBigBlock, OFFSET_EXTBBDEPOTSTART, &This->extBigBlockDepotStart); StorageUtl_ReadDWord( headerBigBlock, OFFSET_EXTBBDEPOTCOUNT, &This->extBigBlockDepotCount); for (index = 0; index < COUNT_BBDEPOTINHEADER; index ++) { StorageUtl_ReadDWord( headerBigBlock, OFFSET_BBDEPOTSTART + (sizeof(ULONG)*index), &(This->bigBlockDepotStart[index])); } /* * Make the bitwise arithmetic to get the size of the blocks in bytes. */ if ((1 << 2) == 4) { This->bigBlockSize = 0x000000001 << (DWORD)This->bigBlockSizeBits; This->smallBlockSize = 0x000000001 << (DWORD)This->smallBlockSizeBits; } else { This->bigBlockSize = 0x000000001 >> (DWORD)This->bigBlockSizeBits; This->smallBlockSize = 0x000000001 >> (DWORD)This->smallBlockSizeBits; } /* * Right now, the code is making some assumptions about the size of the * blocks, just make sure they are what we're expecting. */ assert( (This->bigBlockSize==DEF_BIG_BLOCK_SIZE) && (This->smallBlockSize==DEF_SMALL_BLOCK_SIZE)); /* * Release the block. */ StorageImpl_ReleaseBigBlock(This, headerBigBlock); hr = S_OK; } return hr; } /****************************************************************************** * Storage32Impl_SaveFileHeader * * This method will save to the file the header, i.e. big block -1. */ void StorageImpl_SaveFileHeader( StorageImpl* This) { BYTE headerBigBlock[BIG_BLOCK_SIZE]; int index; BOOL success; /* * Get a pointer to the big block of data containing the header. */ success = StorageImpl_ReadBigBlock(This, -1, headerBigBlock); /* * If the block read failed, the file is probably new. */ if (!success) { /* * Initialize for all unknown fields. */ memset(headerBigBlock, 0, BIG_BLOCK_SIZE); /* * Initialize the magic number. */ memcpy(headerBigBlock, STORAGE_magic, sizeof(STORAGE_magic)); /* * And a bunch of things we don't know what they mean */ StorageUtl_WriteWord(headerBigBlock, 0x18, 0x3b); StorageUtl_WriteWord(headerBigBlock, 0x1a, 0x3); StorageUtl_WriteWord(headerBigBlock, 0x1c, (WORD)-2); StorageUtl_WriteDWord(headerBigBlock, 0x38, (DWORD)0x1000); StorageUtl_WriteDWord(headerBigBlock, 0x40, (DWORD)0x0001); } /* * Write the information to the header. */ if (headerBigBlock!=0) { StorageUtl_WriteWord( headerBigBlock, OFFSET_BIGBLOCKSIZEBITS, This->bigBlockSizeBits); StorageUtl_WriteWord( headerBigBlock, OFFSET_SMALLBLOCKSIZEBITS, This->smallBlockSizeBits); StorageUtl_WriteDWord( headerBigBlock, OFFSET_BBDEPOTCOUNT, This->bigBlockDepotCount); StorageUtl_WriteDWord( headerBigBlock, OFFSET_ROOTSTARTBLOCK, This->rootStartBlock); StorageUtl_WriteDWord( headerBigBlock, OFFSET_SBDEPOTSTART, This->smallBlockDepotStart); StorageUtl_WriteDWord( headerBigBlock, OFFSET_EXTBBDEPOTSTART, This->extBigBlockDepotStart); StorageUtl_WriteDWord( headerBigBlock, OFFSET_EXTBBDEPOTCOUNT, This->extBigBlockDepotCount); for (index = 0; index < COUNT_BBDEPOTINHEADER; index ++) { StorageUtl_WriteDWord( headerBigBlock, OFFSET_BBDEPOTSTART + (sizeof(ULONG)*index), (This->bigBlockDepotStart[index])); } } /* * Write the big block back to the file. */ StorageImpl_WriteBigBlock(This, -1, headerBigBlock); } /****************************************************************************** * Storage32Impl_ReadProperty * * This method will read the specified property from the property chain. */ BOOL StorageImpl_ReadProperty( StorageImpl* This, ULONG index, StgProperty* buffer) { BYTE currentProperty[PROPSET_BLOCK_SIZE]; ULARGE_INTEGER offsetInPropSet; BOOL readSuccessful; ULONG bytesRead; offsetInPropSet.s.HighPart = 0; offsetInPropSet.s.LowPart = index * PROPSET_BLOCK_SIZE; readSuccessful = BlockChainStream_ReadAt( This->rootBlockChain, offsetInPropSet, PROPSET_BLOCK_SIZE, currentProperty, &bytesRead); if (readSuccessful) { memset(buffer->name, 0, sizeof(buffer->name)); memcpy( buffer->name, currentProperty+OFFSET_PS_NAME, PROPERTY_NAME_BUFFER_LEN ); memcpy(&buffer->propertyType, currentProperty + OFFSET_PS_PROPERTYTYPE, 1); StorageUtl_ReadWord( currentProperty, OFFSET_PS_NAMELENGTH, &buffer->sizeOfNameString); StorageUtl_ReadDWord( currentProperty, OFFSET_PS_PREVIOUSPROP, &buffer->previousProperty); StorageUtl_ReadDWord( currentProperty, OFFSET_PS_NEXTPROP, &buffer->nextProperty); StorageUtl_ReadDWord( currentProperty, OFFSET_PS_DIRPROP, &buffer->dirProperty); StorageUtl_ReadGUID( currentProperty, OFFSET_PS_GUID, &buffer->propertyUniqueID); StorageUtl_ReadDWord( currentProperty, OFFSET_PS_TSS1, &buffer->timeStampS1); StorageUtl_ReadDWord( currentProperty, OFFSET_PS_TSD1, &buffer->timeStampD1); StorageUtl_ReadDWord( currentProperty, OFFSET_PS_TSS2, &buffer->timeStampS2); StorageUtl_ReadDWord( currentProperty, OFFSET_PS_TSD2, &buffer->timeStampD2); StorageUtl_ReadDWord( currentProperty, OFFSET_PS_STARTBLOCK, &buffer->startingBlock); StorageUtl_ReadDWord( currentProperty, OFFSET_PS_SIZE, &buffer->size.s.LowPart); buffer->size.s.HighPart = 0; } return readSuccessful; } /********************************************************************* * Write the specified property into the property chain */ BOOL StorageImpl_WriteProperty( StorageImpl* This, ULONG index, StgProperty* buffer) { BYTE currentProperty[PROPSET_BLOCK_SIZE]; ULARGE_INTEGER offsetInPropSet; BOOL writeSuccessful; ULONG bytesWritten; offsetInPropSet.s.HighPart = 0; offsetInPropSet.s.LowPart = index * PROPSET_BLOCK_SIZE; memset(currentProperty, 0, PROPSET_BLOCK_SIZE); memcpy( currentProperty + OFFSET_PS_NAME, buffer->name, PROPERTY_NAME_BUFFER_LEN ); memcpy(currentProperty + OFFSET_PS_PROPERTYTYPE, &buffer->propertyType, 1); StorageUtl_WriteWord( currentProperty, OFFSET_PS_NAMELENGTH, buffer->sizeOfNameString); StorageUtl_WriteDWord( currentProperty, OFFSET_PS_PREVIOUSPROP, buffer->previousProperty); StorageUtl_WriteDWord( currentProperty, OFFSET_PS_NEXTPROP, buffer->nextProperty); StorageUtl_WriteDWord( currentProperty, OFFSET_PS_DIRPROP, buffer->dirProperty); StorageUtl_WriteGUID( currentProperty, OFFSET_PS_GUID, &buffer->propertyUniqueID); StorageUtl_WriteDWord( currentProperty, OFFSET_PS_TSS1, buffer->timeStampS1); StorageUtl_WriteDWord( currentProperty, OFFSET_PS_TSD1, buffer->timeStampD1); StorageUtl_WriteDWord( currentProperty, OFFSET_PS_TSS2, buffer->timeStampS2); StorageUtl_WriteDWord( currentProperty, OFFSET_PS_TSD2, buffer->timeStampD2); StorageUtl_WriteDWord( currentProperty, OFFSET_PS_STARTBLOCK, buffer->startingBlock); StorageUtl_WriteDWord( currentProperty, OFFSET_PS_SIZE, buffer->size.s.LowPart); writeSuccessful = BlockChainStream_WriteAt(This->rootBlockChain, offsetInPropSet, PROPSET_BLOCK_SIZE, currentProperty, &bytesWritten); return writeSuccessful; } BOOL StorageImpl_ReadBigBlock( StorageImpl* This, ULONG blockIndex, void* buffer) { void* bigBlockBuffer; bigBlockBuffer = StorageImpl_GetROBigBlock(This, blockIndex); if (bigBlockBuffer!=0) { memcpy(buffer, bigBlockBuffer, This->bigBlockSize); StorageImpl_ReleaseBigBlock(This, bigBlockBuffer); return TRUE; } return FALSE; } BOOL StorageImpl_WriteBigBlock( StorageImpl* This, ULONG blockIndex, void* buffer) { void* bigBlockBuffer; bigBlockBuffer = StorageImpl_GetBigBlock(This, blockIndex); if (bigBlockBuffer!=0) { memcpy(bigBlockBuffer, buffer, This->bigBlockSize); StorageImpl_ReleaseBigBlock(This, bigBlockBuffer); return TRUE; } return FALSE; } void* StorageImpl_GetROBigBlock( StorageImpl* This, ULONG blockIndex) { return BIGBLOCKFILE_GetROBigBlock(This->bigBlockFile, blockIndex); } void* StorageImpl_GetBigBlock( StorageImpl* This, ULONG blockIndex) { return BIGBLOCKFILE_GetBigBlock(This->bigBlockFile, blockIndex); } void StorageImpl_ReleaseBigBlock( StorageImpl* This, void* pBigBlock) { BIGBLOCKFILE_ReleaseBigBlock(This->bigBlockFile, pBigBlock); } /****************************************************************************** * Storage32Impl_SmallBlocksToBigBlocks * * This method will convert a small block chain to a big block chain. * The small block chain will be destroyed. */ BlockChainStream* Storage32Impl_SmallBlocksToBigBlocks( StorageImpl* This, SmallBlockChainStream** ppsbChain) { ULONG bbHeadOfChain = BLOCK_END_OF_CHAIN; ULARGE_INTEGER size, offset; ULONG cbRead, cbWritten, cbTotalRead, cbTotalWritten; ULONG propertyIndex; BOOL successRead, successWrite; StgProperty chainProperty; BYTE *buffer; BlockChainStream *bbTempChain = NULL; BlockChainStream *bigBlockChain = NULL; /* * Create a temporary big block chain that doesn't have * an associated property. This temporary chain will be * used to copy data from small blocks to big blocks. */ bbTempChain = BlockChainStream_Construct(This, &bbHeadOfChain, PROPERTY_NULL); /* * Grow the big block chain. */ size = SmallBlockChainStream_GetSize(*ppsbChain); BlockChainStream_SetSize(bbTempChain, size); /* * Copy the contents of the small block chain to the big block chain * by small block size increments. */ offset.s.LowPart = 0; offset.s.HighPart = 0; cbTotalRead = 0; cbTotalWritten = 0; buffer = (BYTE *) HeapAlloc(GetProcessHeap(),0,DEF_SMALL_BLOCK_SIZE); do { successRead = SmallBlockChainStream_ReadAt(*ppsbChain, offset, DEF_SMALL_BLOCK_SIZE, buffer, &cbRead); cbTotalRead += cbRead; successWrite = BlockChainStream_WriteAt(bbTempChain, offset, cbRead, buffer, &cbWritten); cbTotalWritten += cbWritten; offset.s.LowPart += This->smallBlockSize; } while (successRead && successWrite); HeapFree(GetProcessHeap(),0,buffer); assert(cbTotalRead == cbTotalWritten); /* * Destroy the small block chain. */ propertyIndex = (*ppsbChain)->ownerPropertyIndex; size.s.HighPart = 0; size.s.LowPart = 0; SmallBlockChainStream_SetSize(*ppsbChain, size); SmallBlockChainStream_Destroy(*ppsbChain); *ppsbChain = 0; /* * Change the property information. This chain is now a big block chain * and it doesn't reside in the small blocks chain anymore. */ StorageImpl_ReadProperty(This, propertyIndex, &chainProperty); chainProperty.startingBlock = bbHeadOfChain; StorageImpl_WriteProperty(This, propertyIndex, &chainProperty); /* * Destroy the temporary propertyless big block chain. * Create a new big block chain associated with this property. */ BlockChainStream_Destroy(bbTempChain); bigBlockChain = BlockChainStream_Construct(This, NULL, propertyIndex); return bigBlockChain; } /****************************************************************************** ** Storage32InternalImpl implementation */ StorageInternalImpl* StorageInternalImpl_Construct( StorageImpl* ancestorStorage, ULONG rootPropertyIndex) { StorageInternalImpl* newStorage; /* * Allocate space for the new storage object */ newStorage = HeapAlloc(GetProcessHeap(), 0, sizeof(StorageInternalImpl)); if (newStorage!=0) { memset(newStorage, 0, sizeof(StorageInternalImpl)); /* * Initialize the virtual function table. */ ICOM_VTBL(newStorage) = &Storage32InternalImpl_Vtbl; newStorage->v_destructor = &StorageInternalImpl_Destroy; /* * Keep the ancestor storage pointer and nail a reference to it. */ newStorage->ancestorStorage = ancestorStorage; StorageBaseImpl_AddRef((IStorage*)(newStorage->ancestorStorage)); /* * Keep the index of the root property set for this storage, */ newStorage->rootPropertySetIndex = rootPropertyIndex; return newStorage; } return 0; } void StorageInternalImpl_Destroy( StorageInternalImpl* This) { StorageBaseImpl_Release((IStorage*)This->ancestorStorage); HeapFree(GetProcessHeap(), 0, This); } /****************************************************************************** ** ** Storage32InternalImpl_Commit ** ** The non-root storages cannot be opened in transacted mode thus this function ** does nothing. */ HRESULT WINAPI StorageInternalImpl_Commit( IStorage* iface, DWORD grfCommitFlags) /* [in] */ { return S_OK; } /****************************************************************************** ** ** Storage32InternalImpl_Revert ** ** The non-root storages cannot be opened in transacted mode thus this function ** does nothing. */ HRESULT WINAPI StorageInternalImpl_Revert( IStorage* iface) { return S_OK; } /****************************************************************************** ** IEnumSTATSTGImpl implementation */ IEnumSTATSTGImpl* IEnumSTATSTGImpl_Construct( StorageImpl* parentStorage, ULONG firstPropertyNode) { IEnumSTATSTGImpl* newEnumeration; newEnumeration = HeapAlloc(GetProcessHeap(), 0, sizeof(IEnumSTATSTGImpl)); if (newEnumeration!=0) { /* * Set-up the virtual function table and reference count. */ ICOM_VTBL(newEnumeration) = &IEnumSTATSTGImpl_Vtbl; newEnumeration->ref = 0; /* * We want to nail-down the reference to the storage in case the * enumeration out-lives the storage in the client application. */ newEnumeration->parentStorage = parentStorage; IStorage_AddRef((IStorage*)newEnumeration->parentStorage); newEnumeration->firstPropertyNode = firstPropertyNode; /* * Initialize the search stack */ newEnumeration->stackSize = 0; newEnumeration->stackMaxSize = ENUMSTATSGT_SIZE_INCREMENT; newEnumeration->stackToVisit = HeapAlloc(GetProcessHeap(), 0, sizeof(ULONG)*ENUMSTATSGT_SIZE_INCREMENT); /* * Make sure the current node of the iterator is the first one. */ IEnumSTATSTGImpl_Reset((IEnumSTATSTG*)newEnumeration); } return newEnumeration; } void IEnumSTATSTGImpl_Destroy(IEnumSTATSTGImpl* This) { IStorage_Release((IStorage*)This->parentStorage); HeapFree(GetProcessHeap(), 0, This->stackToVisit); HeapFree(GetProcessHeap(), 0, This); } HRESULT WINAPI IEnumSTATSTGImpl_QueryInterface( IEnumSTATSTG* iface, REFIID riid, void** ppvObject) { IEnumSTATSTGImpl* const This=(IEnumSTATSTGImpl*)iface; /* * Perform a sanity check on the parameters. */ if (ppvObject==0) return E_INVALIDARG; /* * Initialize the return parameter. */ *ppvObject = 0; /* * Compare the riid with the interface IDs implemented by this object. */ if (memcmp(&IID_IUnknown, riid, sizeof(IID_IUnknown)) == 0) { *ppvObject = (IEnumSTATSTG*)This; } else if (memcmp(&IID_IStorage, riid, sizeof(IID_IEnumSTATSTG)) == 0) { *ppvObject = (IEnumSTATSTG*)This; } /* * Check that we obtained an interface. */ if ((*ppvObject)==0) return E_NOINTERFACE; /* * Query Interface always increases the reference count by one when it is * successful */ IEnumSTATSTGImpl_AddRef((IEnumSTATSTG*)This); return S_OK; } ULONG WINAPI IEnumSTATSTGImpl_AddRef( IEnumSTATSTG* iface) { IEnumSTATSTGImpl* const This=(IEnumSTATSTGImpl*)iface; This->ref++; return This->ref; } ULONG WINAPI IEnumSTATSTGImpl_Release( IEnumSTATSTG* iface) { IEnumSTATSTGImpl* const This=(IEnumSTATSTGImpl*)iface; ULONG newRef; This->ref--; newRef = This->ref; /* * If the reference count goes down to 0, perform suicide. */ if (newRef==0) { IEnumSTATSTGImpl_Destroy(This); } return newRef;; } HRESULT WINAPI IEnumSTATSTGImpl_Next( IEnumSTATSTG* iface, ULONG celt, STATSTG* rgelt, ULONG* pceltFetched) { IEnumSTATSTGImpl* const This=(IEnumSTATSTGImpl*)iface; StgProperty currentProperty; STATSTG* currentReturnStruct = rgelt; ULONG objectFetched = 0; ULONG currentSearchNode; /* * Perform a sanity check on the parameters. */ if ( (rgelt==0) || ( (celt!=1) && (pceltFetched==0) ) ) return E_INVALIDARG; /* * To avoid the special case, get another pointer to a ULONG value if * the caller didn't supply one. */ if (pceltFetched==0) pceltFetched = &objectFetched; /* * Start the iteration, we will iterate until we hit the end of the * linked list or until we hit the number of items to iterate through */ *pceltFetched = 0; /* * Start with the node at the top of the stack. */ currentSearchNode = IEnumSTATSTGImpl_PopSearchNode(This, FALSE); while ( ( *pceltFetched < celt) && ( currentSearchNode!=PROPERTY_NULL) ) { /* * Remove the top node from the stack */ IEnumSTATSTGImpl_PopSearchNode(This, TRUE); /* * Read the property from the storage. */ StorageImpl_ReadProperty(This->parentStorage, currentSearchNode, ¤tProperty); /* * Copy the information to the return buffer. */ StorageUtl_CopyPropertyToSTATSTG(currentReturnStruct, ¤tProperty, STATFLAG_DEFAULT); /* * Step to the next item in the iteration */ (*pceltFetched)++; currentReturnStruct++; /* * Push the next search node in the search stack. */ IEnumSTATSTGImpl_PushSearchNode(This, currentProperty.nextProperty); /* * continue the iteration. */ currentSearchNode = IEnumSTATSTGImpl_PopSearchNode(This, FALSE); } if (*pceltFetched == celt) return S_OK; return S_FALSE; } HRESULT WINAPI IEnumSTATSTGImpl_Skip( IEnumSTATSTG* iface, ULONG celt) { IEnumSTATSTGImpl* const This=(IEnumSTATSTGImpl*)iface; StgProperty currentProperty; ULONG objectFetched = 0; ULONG currentSearchNode; /* * Start with the node at the top of the stack. */ currentSearchNode = IEnumSTATSTGImpl_PopSearchNode(This, FALSE); while ( (objectFetched < celt) && (currentSearchNode!=PROPERTY_NULL) ) { /* * Remove the top node from the stack */ IEnumSTATSTGImpl_PopSearchNode(This, TRUE); /* * Read the property from the storage. */ StorageImpl_ReadProperty(This->parentStorage, currentSearchNode, ¤tProperty); /* * Step to the next item in the iteration */ objectFetched++; /* * Push the next search node in the search stack. */ IEnumSTATSTGImpl_PushSearchNode(This, currentProperty.nextProperty); /* * continue the iteration. */ currentSearchNode = IEnumSTATSTGImpl_PopSearchNode(This, FALSE); } if (objectFetched == celt) return S_OK; return S_FALSE; } HRESULT WINAPI IEnumSTATSTGImpl_Reset( IEnumSTATSTG* iface) { IEnumSTATSTGImpl* const This=(IEnumSTATSTGImpl*)iface; StgProperty rootProperty; BOOL readSuccessful; /* * Re-initialize the search stack to an empty stack */ This->stackSize = 0; /* * Read the root property from the storage. */ readSuccessful = StorageImpl_ReadProperty( This->parentStorage, This->firstPropertyNode, &rootProperty); if (readSuccessful) { assert(rootProperty.sizeOfNameString!=0); /* * Push the search node in the search stack. */ IEnumSTATSTGImpl_PushSearchNode(This, rootProperty.dirProperty); } return S_OK; } HRESULT WINAPI IEnumSTATSTGImpl_Clone( IEnumSTATSTG* iface, IEnumSTATSTG** ppenum) { IEnumSTATSTGImpl* const This=(IEnumSTATSTGImpl*)iface; IEnumSTATSTGImpl* newClone; /* * Perform a sanity check on the parameters. */ if (ppenum==0) return E_INVALIDARG; newClone = IEnumSTATSTGImpl_Construct(This->parentStorage, This->firstPropertyNode); /* * The new clone enumeration must point to the same current node as * the ole one. */ newClone->stackSize = This->stackSize ; newClone->stackMaxSize = This->stackMaxSize ; newClone->stackToVisit = HeapAlloc(GetProcessHeap(), 0, sizeof(ULONG) * newClone->stackMaxSize); memcpy( newClone->stackToVisit, This->stackToVisit, sizeof(ULONG) * newClone->stackSize); *ppenum = (IEnumSTATSTG*)newClone; /* * Don't forget to nail down a reference to the clone before * returning it. */ IEnumSTATSTGImpl_AddRef(*ppenum); return S_OK; } INT IEnumSTATSTGImpl_FindParentProperty( IEnumSTATSTGImpl *This, ULONG childProperty, StgProperty *currentProperty, ULONG *thisNodeId) { ULONG currentSearchNode; ULONG foundNode; /* * To avoid the special case, get another pointer to a ULONG value if * the caller didn't supply one. */ if (thisNodeId==0) thisNodeId = &foundNode; /* * Start with the node at the top of the stack. */ currentSearchNode = IEnumSTATSTGImpl_PopSearchNode(This, FALSE); while (currentSearchNode!=PROPERTY_NULL) { /* * Store the current node in the returned parameters */ *thisNodeId = currentSearchNode; /* * Remove the top node from the stack */ IEnumSTATSTGImpl_PopSearchNode(This, TRUE); /* * Read the property from the storage. */ StorageImpl_ReadProperty( This->parentStorage, currentSearchNode, currentProperty); if (currentProperty->previousProperty == childProperty) return PROPERTY_RELATION_PREVIOUS; else if (currentProperty->nextProperty == childProperty) return PROPERTY_RELATION_NEXT; else if (currentProperty->dirProperty == childProperty) return PROPERTY_RELATION_DIR; /* * Push the next search node in the search stack. */ IEnumSTATSTGImpl_PushSearchNode(This, currentProperty->nextProperty); /* * continue the iteration. */ currentSearchNode = IEnumSTATSTGImpl_PopSearchNode(This, FALSE); } return PROPERTY_NULL; } ULONG IEnumSTATSTGImpl_FindProperty( IEnumSTATSTGImpl* This, const OLECHAR* lpszPropName, StgProperty* currentProperty) { ULONG currentSearchNode; /* * Start with the node at the top of the stack. */ currentSearchNode = IEnumSTATSTGImpl_PopSearchNode(This, FALSE); while (currentSearchNode!=PROPERTY_NULL) { /* * Remove the top node from the stack */ IEnumSTATSTGImpl_PopSearchNode(This, TRUE); /* * Read the property from the storage. */ StorageImpl_ReadProperty(This->parentStorage, currentSearchNode, currentProperty); if ( propertyNameCmp( (OLECHAR*)currentProperty->name, (OLECHAR*)lpszPropName) == 0) return currentSearchNode; /* * Push the next search node in the search stack. */ IEnumSTATSTGImpl_PushSearchNode(This, currentProperty->nextProperty); /* * continue the iteration. */ currentSearchNode = IEnumSTATSTGImpl_PopSearchNode(This, FALSE); } return PROPERTY_NULL; } void IEnumSTATSTGImpl_PushSearchNode( IEnumSTATSTGImpl* This, ULONG nodeToPush) { StgProperty rootProperty; BOOL readSuccessful; /* * First, make sure we're not trying to push an unexisting node. */ if (nodeToPush==PROPERTY_NULL) return; /* * First push the node to the stack */ if (This->stackSize == This->stackMaxSize) { This->stackMaxSize += ENUMSTATSGT_SIZE_INCREMENT; This->stackToVisit = HeapReAlloc( GetProcessHeap(), 0, This->stackToVisit, sizeof(ULONG) * This->stackMaxSize); } This->stackToVisit[This->stackSize] = nodeToPush; This->stackSize++; /* * Read the root property from the storage. */ readSuccessful = StorageImpl_ReadProperty( This->parentStorage, nodeToPush, &rootProperty); if (readSuccessful) { assert(rootProperty.sizeOfNameString!=0); /* * Push the previous search node in the search stack. */ IEnumSTATSTGImpl_PushSearchNode(This, rootProperty.previousProperty); } } ULONG IEnumSTATSTGImpl_PopSearchNode( IEnumSTATSTGImpl* This, BOOL remove) { ULONG topNode; if (This->stackSize == 0) return PROPERTY_NULL; topNode = This->stackToVisit[This->stackSize-1]; if (remove) This->stackSize--; return topNode; } /****************************************************************************** ** StorageUtl implementation */ void StorageUtl_ReadWord(void* buffer, ULONG offset, WORD* value) { memcpy(value, (BYTE*)buffer+offset, sizeof(WORD)); } void StorageUtl_WriteWord(void* buffer, ULONG offset, WORD value) { memcpy((BYTE*)buffer+offset, &value, sizeof(WORD)); } void StorageUtl_ReadDWord(void* buffer, ULONG offset, DWORD* value) { memcpy(value, (BYTE*)buffer+offset, sizeof(DWORD)); } void StorageUtl_WriteDWord(void* buffer, ULONG offset, DWORD value) { memcpy((BYTE*)buffer+offset, &value, sizeof(DWORD)); } void StorageUtl_ReadGUID(void* buffer, ULONG offset, GUID* value) { StorageUtl_ReadDWord(buffer, offset, &(value->Data1)); StorageUtl_ReadWord(buffer, offset+4, &(value->Data2)); StorageUtl_ReadWord(buffer, offset+6, &(value->Data3)); memcpy(value->Data4, (BYTE*)buffer+offset+8, sizeof(value->Data4)); } void StorageUtl_WriteGUID(void* buffer, ULONG offset, GUID* value) { StorageUtl_WriteDWord(buffer, offset, value->Data1); StorageUtl_WriteWord(buffer, offset+4, value->Data2); StorageUtl_WriteWord(buffer, offset+6, value->Data3); memcpy((BYTE*)buffer+offset+8, value->Data4, sizeof(value->Data4)); } void StorageUtl_CopyPropertyToSTATSTG( STATSTG* destination, StgProperty* source, int statFlags) { /* * The copy of the string occurs only when the flag is not set */ if ((statFlags & STATFLAG_NONAME) != 0) { destination->pwcsName = 0; } else { destination->pwcsName = CoTaskMemAlloc((lstrlenW(source->name)+1)*sizeof(WCHAR)); lstrcpyW((LPWSTR)destination->pwcsName, source->name); } switch (source->propertyType) { case PROPTYPE_STORAGE: case PROPTYPE_ROOT: destination->type = STGTY_STORAGE; break; case PROPTYPE_STREAM: destination->type = STGTY_STREAM; break; default: destination->type = STGTY_STREAM; break; } destination->cbSize = source->size; /* currentReturnStruct->mtime = {0}; TODO currentReturnStruct->ctime = {0}; currentReturnStruct->atime = {0}; */ destination->grfMode = 0; destination->grfLocksSupported = 0; destination->clsid = source->propertyUniqueID; destination->grfStateBits = 0; destination->reserved = 0; } /****************************************************************************** ** BlockChainStream implementation */ BlockChainStream* BlockChainStream_Construct( StorageImpl* parentStorage, ULONG* headOfStreamPlaceHolder, ULONG propertyIndex) { BlockChainStream* newStream; ULONG blockIndex; newStream = HeapAlloc(GetProcessHeap(), 0, sizeof(BlockChainStream)); newStream->parentStorage = parentStorage; newStream->headOfStreamPlaceHolder = headOfStreamPlaceHolder; newStream->ownerPropertyIndex = propertyIndex; newStream->lastBlockNoInSequence = 0xFFFFFFFF; newStream->tailIndex = BLOCK_END_OF_CHAIN; newStream->numBlocks = 0; blockIndex = BlockChainStream_GetHeadOfChain(newStream); while (blockIndex != BLOCK_END_OF_CHAIN) { newStream->numBlocks++; newStream->tailIndex = blockIndex; blockIndex = StorageImpl_GetNextBlockInChain( parentStorage, blockIndex); } return newStream; } void BlockChainStream_Destroy(BlockChainStream* This) { HeapFree(GetProcessHeap(), 0, This); } /****************************************************************************** * BlockChainStream_GetHeadOfChain * * Returns the head of this stream chain. * Some special chains don't have properties, their heads are kept in * This->headOfStreamPlaceHolder. * */ ULONG BlockChainStream_GetHeadOfChain(BlockChainStream* This) { StgProperty chainProperty; BOOL readSuccessful; if (This->headOfStreamPlaceHolder != 0) return *(This->headOfStreamPlaceHolder); if (This->ownerPropertyIndex != PROPERTY_NULL) { readSuccessful = StorageImpl_ReadProperty( This->parentStorage, This->ownerPropertyIndex, &chainProperty); if (readSuccessful) { return chainProperty.startingBlock; } } return BLOCK_END_OF_CHAIN; } /****************************************************************************** * BlockChainStream_GetCount * * Returns the number of blocks that comprises this chain. * This is not the size of the stream as the last block may not be full! * */ ULONG BlockChainStream_GetCount(BlockChainStream* This) { ULONG blockIndex; ULONG count = 0; blockIndex = BlockChainStream_GetHeadOfChain(This); while (blockIndex != BLOCK_END_OF_CHAIN) { count++; blockIndex = StorageImpl_GetNextBlockInChain( This->parentStorage, blockIndex); } return count; } /****************************************************************************** * BlockChainStream_ReadAt * * Reads a specified number of bytes from this chain at the specified offset. * bytesRead may be NULL. * Failure will be returned if the specified number of bytes has not been read. */ BOOL BlockChainStream_ReadAt(BlockChainStream* This, ULARGE_INTEGER offset, ULONG size, void* buffer, ULONG* bytesRead) { ULONG blockNoInSequence = offset.s.LowPart / This->parentStorage->bigBlockSize; ULONG offsetInBlock = offset.s.LowPart % This->parentStorage->bigBlockSize; ULONG bytesToReadInBuffer; ULONG blockIndex; BYTE* bufferWalker; BYTE* bigBlockBuffer; /* * Find the first block in the stream that contains part of the buffer. */ if ( (This->lastBlockNoInSequence == 0xFFFFFFFF) || (This->lastBlockNoInSequenceIndex == BLOCK_END_OF_CHAIN) || (blockNoInSequence < This->lastBlockNoInSequence) ) { blockIndex = BlockChainStream_GetHeadOfChain(This); This->lastBlockNoInSequence = blockNoInSequence; } else { ULONG temp = blockNoInSequence; blockIndex = This->lastBlockNoInSequenceIndex; blockNoInSequence -= This->lastBlockNoInSequence; This->lastBlockNoInSequence = temp; } while ( (blockNoInSequence > 0) && (blockIndex != BLOCK_END_OF_CHAIN)) { blockIndex = StorageImpl_GetNextBlockInChain(This->parentStorage, blockIndex); blockNoInSequence--; } This->lastBlockNoInSequenceIndex = blockIndex; /* * Start reading the buffer. */ *bytesRead = 0; bufferWalker = buffer; while ( (size > 0) && (blockIndex != BLOCK_END_OF_CHAIN) ) { /* * Calculate how many bytes we can copy from this big block. */ bytesToReadInBuffer = min(This->parentStorage->bigBlockSize - offsetInBlock, size); /* * Copy those bytes to the buffer */ bigBlockBuffer = StorageImpl_GetROBigBlock(This->parentStorage, blockIndex); memcpy(bufferWalker, bigBlockBuffer + offsetInBlock, bytesToReadInBuffer); StorageImpl_ReleaseBigBlock(This->parentStorage, bigBlockBuffer); /* * Step to the next big block. */ blockIndex = StorageImpl_GetNextBlockInChain(This->parentStorage, blockIndex); bufferWalker += bytesToReadInBuffer; size -= bytesToReadInBuffer; *bytesRead += bytesToReadInBuffer; offsetInBlock = 0; /* There is no offset on the next block */ } return (size == 0); } /****************************************************************************** * BlockChainStream_WriteAt * * Writes the specified number of bytes to this chain at the specified offset. * bytesWritten may be NULL. * Will fail if not all specified number of bytes have been written. */ BOOL BlockChainStream_WriteAt(BlockChainStream* This, ULARGE_INTEGER offset, ULONG size, const void* buffer, ULONG* bytesWritten) { ULONG blockNoInSequence = offset.s.LowPart / This->parentStorage->bigBlockSize; ULONG offsetInBlock = offset.s.LowPart % This->parentStorage->bigBlockSize; ULONG bytesToWrite; ULONG blockIndex; BYTE* bufferWalker; BYTE* bigBlockBuffer; /* * Find the first block in the stream that contains part of the buffer. */ if ( (This->lastBlockNoInSequence == 0xFFFFFFFF) || (This->lastBlockNoInSequenceIndex == BLOCK_END_OF_CHAIN) || (blockNoInSequence < This->lastBlockNoInSequence) ) { blockIndex = BlockChainStream_GetHeadOfChain(This); This->lastBlockNoInSequence = blockNoInSequence; } else { ULONG temp = blockNoInSequence; blockIndex = This->lastBlockNoInSequenceIndex; blockNoInSequence -= This->lastBlockNoInSequence; This->lastBlockNoInSequence = temp; } while ( (blockNoInSequence > 0) && (blockIndex != BLOCK_END_OF_CHAIN)) { blockIndex = StorageImpl_GetNextBlockInChain(This->parentStorage, blockIndex); blockNoInSequence--; } This->lastBlockNoInSequenceIndex = blockIndex; /* * Here, I'm casting away the constness on the buffer variable * This is OK since we don't intend to modify that buffer. */ *bytesWritten = 0; bufferWalker = (BYTE*)buffer; while ( (size > 0) && (blockIndex != BLOCK_END_OF_CHAIN) ) { /* * Calculate how many bytes we can copy from this big block. */ bytesToWrite = min(This->parentStorage->bigBlockSize - offsetInBlock, size); /* * Copy those bytes to the buffer */ bigBlockBuffer = StorageImpl_GetBigBlock(This->parentStorage, blockIndex); memcpy(bigBlockBuffer + offsetInBlock, bufferWalker, bytesToWrite); StorageImpl_ReleaseBigBlock(This->parentStorage, bigBlockBuffer); /* * Step to the next big block. */ blockIndex = StorageImpl_GetNextBlockInChain(This->parentStorage, blockIndex); bufferWalker += bytesToWrite; size -= bytesToWrite; *bytesWritten += bytesToWrite; offsetInBlock = 0; /* There is no offset on the next block */ } return (size == 0); } /****************************************************************************** * BlockChainStream_Shrink * * Shrinks this chain in the big block depot. */ BOOL BlockChainStream_Shrink(BlockChainStream* This, ULARGE_INTEGER newSize) { ULONG blockIndex, extraBlock; ULONG numBlocks; ULONG count = 1; /* * Reset the last accessed block cache. */ This->lastBlockNoInSequence = 0xFFFFFFFF; This->lastBlockNoInSequenceIndex = BLOCK_END_OF_CHAIN; /* * Figure out how many blocks are needed to contain the new size */ numBlocks = newSize.s.LowPart / This->parentStorage->bigBlockSize; if ((newSize.s.LowPart % This->parentStorage->bigBlockSize) != 0) numBlocks++; blockIndex = BlockChainStream_GetHeadOfChain(This); /* * Go to the new end of chain */ while (count < numBlocks) { blockIndex = StorageImpl_GetNextBlockInChain(This->parentStorage, blockIndex); count++; } /* Get the next block before marking the new end */ extraBlock = StorageImpl_GetNextBlockInChain(This->parentStorage, blockIndex); /* Mark the new end of chain */ StorageImpl_SetNextBlockInChain( This->parentStorage, blockIndex, BLOCK_END_OF_CHAIN); This->tailIndex = blockIndex; This->numBlocks = numBlocks; /* * Mark the extra blocks as free */ while (extraBlock != BLOCK_END_OF_CHAIN) { blockIndex = StorageImpl_GetNextBlockInChain(This->parentStorage, extraBlock); StorageImpl_FreeBigBlock(This->parentStorage, extraBlock); extraBlock = blockIndex; } return TRUE; } /****************************************************************************** * BlockChainStream_Enlarge * * Grows this chain in the big block depot. */ BOOL BlockChainStream_Enlarge(BlockChainStream* This, ULARGE_INTEGER newSize) { ULONG blockIndex, currentBlock; ULONG newNumBlocks; ULONG oldNumBlocks = 0; blockIndex = BlockChainStream_GetHeadOfChain(This); /* * Empty chain. Create the head. */ if (blockIndex == BLOCK_END_OF_CHAIN) { blockIndex = StorageImpl_GetNextFreeBigBlock(This->parentStorage); StorageImpl_SetNextBlockInChain(This->parentStorage, blockIndex, BLOCK_END_OF_CHAIN); if (This->headOfStreamPlaceHolder != 0) { *(This->headOfStreamPlaceHolder) = blockIndex; } else { StgProperty chainProp; assert(This->ownerPropertyIndex != PROPERTY_NULL); StorageImpl_ReadProperty( This->parentStorage, This->ownerPropertyIndex, &chainProp); chainProp.startingBlock = blockIndex; StorageImpl_WriteProperty( This->parentStorage, This->ownerPropertyIndex, &chainProp); } This->tailIndex = blockIndex; This->numBlocks = 1; } /* * Figure out how many blocks are needed to contain this stream */ newNumBlocks = newSize.s.LowPart / This->parentStorage->bigBlockSize; if ((newSize.s.LowPart % This->parentStorage->bigBlockSize) != 0) newNumBlocks++; /* * Go to the current end of chain */ if (This->tailIndex == BLOCK_END_OF_CHAIN) { currentBlock = blockIndex; while (blockIndex != BLOCK_END_OF_CHAIN) { This->numBlocks++; currentBlock = blockIndex; blockIndex = StorageImpl_GetNextBlockInChain(This->parentStorage, currentBlock); } This->tailIndex = currentBlock; } currentBlock = This->tailIndex; oldNumBlocks = This->numBlocks; /* * Add new blocks to the chain */ if (oldNumBlocks < newNumBlocks) { while (oldNumBlocks < newNumBlocks) { blockIndex = StorageImpl_GetNextFreeBigBlock(This->parentStorage); StorageImpl_SetNextBlockInChain( This->parentStorage, currentBlock, blockIndex); StorageImpl_SetNextBlockInChain( This->parentStorage, blockIndex, BLOCK_END_OF_CHAIN); currentBlock = blockIndex; oldNumBlocks++; } This->tailIndex = blockIndex; This->numBlocks = newNumBlocks; } return TRUE; } /****************************************************************************** * BlockChainStream_SetSize * * Sets the size of this stream. The big block depot will be updated. * The file will grow if we grow the chain. * * TODO: Free the actual blocks in the file when we shrink the chain. * Currently, the blocks are still in the file. So the file size * doesn't shrink even if we shrink streams. */ BOOL BlockChainStream_SetSize( BlockChainStream* This, ULARGE_INTEGER newSize) { ULARGE_INTEGER size = BlockChainStream_GetSize(This); if (newSize.s.LowPart == size.s.LowPart) return TRUE; if (newSize.s.LowPart < size.s.LowPart) { BlockChainStream_Shrink(This, newSize); } else { ULARGE_INTEGER fileSize = BIGBLOCKFILE_GetSize(This->parentStorage->bigBlockFile); ULONG diff = newSize.s.LowPart - size.s.LowPart; /* * Make sure the file stays a multiple of blocksize */ if ((diff % This->parentStorage->bigBlockSize) != 0) diff += (This->parentStorage->bigBlockSize - (diff % This->parentStorage->bigBlockSize) ); fileSize.s.LowPart += diff; BIGBLOCKFILE_SetSize(This->parentStorage->bigBlockFile, fileSize); BlockChainStream_Enlarge(This, newSize); } return TRUE; } /****************************************************************************** * BlockChainStream_GetSize * * Returns the size of this chain. * Will return the block count if this chain doesn't have a property. */ ULARGE_INTEGER BlockChainStream_GetSize(BlockChainStream* This) { StgProperty chainProperty; if(This->headOfStreamPlaceHolder == NULL) { /* * This chain is a data stream read the property and return * the appropriate size */ StorageImpl_ReadProperty( This->parentStorage, This->ownerPropertyIndex, &chainProperty); return chainProperty.size; } else { /* * this chain is a chain that does not have a property, figure out the * size by making the product number of used blocks times the * size of them */ ULARGE_INTEGER result; result.s.HighPart = 0; result.s.LowPart = BlockChainStream_GetCount(This) * This->parentStorage->bigBlockSize; return result; } } /****************************************************************************** ** SmallBlockChainStream implementation */ SmallBlockChainStream* SmallBlockChainStream_Construct( StorageImpl* parentStorage, ULONG propertyIndex) { SmallBlockChainStream* newStream; newStream = HeapAlloc(GetProcessHeap(), 0, sizeof(SmallBlockChainStream)); newStream->parentStorage = parentStorage; newStream->ownerPropertyIndex = propertyIndex; return newStream; } void SmallBlockChainStream_Destroy( SmallBlockChainStream* This) { HeapFree(GetProcessHeap(), 0, This); } /****************************************************************************** * SmallBlockChainStream_GetHeadOfChain * * Returns the head of this chain of small blocks. */ ULONG SmallBlockChainStream_GetHeadOfChain( SmallBlockChainStream* This) { StgProperty chainProperty; BOOL readSuccessful; if (This->ownerPropertyIndex) { readSuccessful = StorageImpl_ReadProperty( This->parentStorage, This->ownerPropertyIndex, &chainProperty); if (readSuccessful) { return chainProperty.startingBlock; } } return BLOCK_END_OF_CHAIN; } /****************************************************************************** * SmallBlockChainStream_GetNextBlockInChain * * Returns the index of the next small block in this chain. * * Return Values: * - BLOCK_END_OF_CHAIN: end of this chain * - BLOCK_UNUSED: small block 'blockIndex' is free */ ULONG SmallBlockChainStream_GetNextBlockInChain( SmallBlockChainStream* This, ULONG blockIndex) { ULARGE_INTEGER offsetOfBlockInDepot; DWORD buffer; ULONG nextBlockInChain = BLOCK_END_OF_CHAIN; ULONG bytesRead; BOOL success; offsetOfBlockInDepot.s.HighPart = 0; offsetOfBlockInDepot.s.LowPart = blockIndex * sizeof(ULONG); /* * Read those bytes in the buffer from the small block file. */ success = BlockChainStream_ReadAt( This->parentStorage->smallBlockDepotChain, offsetOfBlockInDepot, sizeof(DWORD), &buffer, &bytesRead); if (success) { StorageUtl_ReadDWord(&buffer, 0, &nextBlockInChain); } return nextBlockInChain; } /****************************************************************************** * SmallBlockChainStream_SetNextBlockInChain * * Writes the index of the next block of the specified block in the small * block depot. * To set the end of chain use BLOCK_END_OF_CHAIN as nextBlock. * To flag a block as free use BLOCK_UNUSED as nextBlock. */ void SmallBlockChainStream_SetNextBlockInChain( SmallBlockChainStream* This, ULONG blockIndex, ULONG nextBlock) { ULARGE_INTEGER offsetOfBlockInDepot; DWORD buffer; ULONG bytesWritten; offsetOfBlockInDepot.s.HighPart = 0; offsetOfBlockInDepot.s.LowPart = blockIndex * sizeof(ULONG); StorageUtl_WriteDWord(&buffer, 0, nextBlock); /* * Read those bytes in the buffer from the small block file. */ BlockChainStream_WriteAt( This->parentStorage->smallBlockDepotChain, offsetOfBlockInDepot, sizeof(DWORD), &buffer, &bytesWritten); } /****************************************************************************** * SmallBlockChainStream_FreeBlock * * Flag small block 'blockIndex' as free in the small block depot. */ void SmallBlockChainStream_FreeBlock( SmallBlockChainStream* This, ULONG blockIndex) { SmallBlockChainStream_SetNextBlockInChain(This, blockIndex, BLOCK_UNUSED); } /****************************************************************************** * SmallBlockChainStream_GetNextFreeBlock * * Returns the index of a free small block. The small block depot will be * enlarged if necessary. The small block chain will also be enlarged if * necessary. */ ULONG SmallBlockChainStream_GetNextFreeBlock( SmallBlockChainStream* This) { ULARGE_INTEGER offsetOfBlockInDepot; DWORD buffer; ULONG bytesRead; ULONG blockIndex = 0; ULONG nextBlockIndex = BLOCK_END_OF_CHAIN; BOOL success = TRUE; ULONG smallBlocksPerBigBlock; offsetOfBlockInDepot.s.HighPart = 0; /* * Scan the small block depot for a free block */ while (nextBlockIndex != BLOCK_UNUSED) { offsetOfBlockInDepot.s.LowPart = blockIndex * sizeof(ULONG); success = BlockChainStream_ReadAt( This->parentStorage->smallBlockDepotChain, offsetOfBlockInDepot, sizeof(DWORD), &buffer, &bytesRead); /* * If we run out of space for the small block depot, enlarge it */ if (success) { StorageUtl_ReadDWord(&buffer, 0, &nextBlockIndex); if (nextBlockIndex != BLOCK_UNUSED) blockIndex++; } else { ULONG count = BlockChainStream_GetCount(This->parentStorage->smallBlockDepotChain); ULONG sbdIndex = This->parentStorage->smallBlockDepotStart; ULONG nextBlock, newsbdIndex; BYTE* smallBlockDepot; nextBlock = sbdIndex; while (nextBlock != BLOCK_END_OF_CHAIN) { sbdIndex = nextBlock; nextBlock = StorageImpl_GetNextBlockInChain(This->parentStorage, sbdIndex); } newsbdIndex = StorageImpl_GetNextFreeBigBlock(This->parentStorage); if (sbdIndex != BLOCK_END_OF_CHAIN) StorageImpl_SetNextBlockInChain( This->parentStorage, sbdIndex, newsbdIndex); StorageImpl_SetNextBlockInChain( This->parentStorage, newsbdIndex, BLOCK_END_OF_CHAIN); /* * Initialize all the small blocks to free */ smallBlockDepot = StorageImpl_GetBigBlock(This->parentStorage, newsbdIndex); memset(smallBlockDepot, BLOCK_UNUSED, This->parentStorage->bigBlockSize); StorageImpl_ReleaseBigBlock(This->parentStorage, smallBlockDepot); if (count == 0) { /* * We have just created the small block depot. */ StgProperty rootProp; ULONG sbStartIndex; /* * Save it in the header */ This->parentStorage->smallBlockDepotStart = newsbdIndex; StorageImpl_SaveFileHeader(This->parentStorage); /* * And allocate the first big block that will contain small blocks */ sbStartIndex = StorageImpl_GetNextFreeBigBlock(This->parentStorage); StorageImpl_SetNextBlockInChain( This->parentStorage, sbStartIndex, BLOCK_END_OF_CHAIN); StorageImpl_ReadProperty( This->parentStorage, This->parentStorage->rootPropertySetIndex, &rootProp); rootProp.startingBlock = sbStartIndex; rootProp.size.s.HighPart = 0; rootProp.size.s.LowPart = This->parentStorage->bigBlockSize; StorageImpl_WriteProperty( This->parentStorage, This->parentStorage->rootPropertySetIndex, &rootProp); } } } smallBlocksPerBigBlock = This->parentStorage->bigBlockSize / This->parentStorage->smallBlockSize; /* * Verify if we have to allocate big blocks to contain small blocks */ if (blockIndex % smallBlocksPerBigBlock == 0) { StgProperty rootProp; ULONG blocksRequired = (blockIndex / smallBlocksPerBigBlock) + 1; StorageImpl_ReadProperty( This->parentStorage, This->parentStorage->rootPropertySetIndex, &rootProp); if (rootProp.size.s.LowPart < (blocksRequired * This->parentStorage->bigBlockSize)) { rootProp.size.s.LowPart += This->parentStorage->bigBlockSize; BlockChainStream_SetSize( This->parentStorage->smallBlockRootChain, rootProp.size); StorageImpl_WriteProperty( This->parentStorage, This->parentStorage->rootPropertySetIndex, &rootProp); } } return blockIndex; } /****************************************************************************** * SmallBlockChainStream_ReadAt * * Reads a specified number of bytes from this chain at the specified offset. * bytesRead may be NULL. * Failure will be returned if the specified number of bytes has not been read. */ BOOL SmallBlockChainStream_ReadAt( SmallBlockChainStream* This, ULARGE_INTEGER offset, ULONG size, void* buffer, ULONG* bytesRead) { ULARGE_INTEGER offsetInBigBlockFile; ULONG blockNoInSequence = offset.s.LowPart / This->parentStorage->smallBlockSize; ULONG offsetInBlock = offset.s.LowPart % This->parentStorage->smallBlockSize; ULONG bytesToReadInBuffer; ULONG blockIndex; ULONG bytesReadFromBigBlockFile; BYTE* bufferWalker; /* * This should never happen on a small block file. */ assert(offset.s.HighPart==0); /* * Find the first block in the stream that contains part of the buffer. */ blockIndex = SmallBlockChainStream_GetHeadOfChain(This); while ( (blockNoInSequence > 0) && (blockIndex != BLOCK_END_OF_CHAIN)) { blockIndex = SmallBlockChainStream_GetNextBlockInChain(This, blockIndex); blockNoInSequence--; } /* * Start reading the buffer. */ *bytesRead = 0; bufferWalker = buffer; while ( (size > 0) && (blockIndex != BLOCK_END_OF_CHAIN) ) { /* * Calculate how many bytes we can copy from this small block. */ bytesToReadInBuffer = min(This->parentStorage->smallBlockSize - offsetInBlock, size); /* * Calculate the offset of the small block in the small block file. */ offsetInBigBlockFile.s.HighPart = 0; offsetInBigBlockFile.s.LowPart = blockIndex * This->parentStorage->smallBlockSize; offsetInBigBlockFile.s.LowPart += offsetInBlock; /* * Read those bytes in the buffer from the small block file. */ BlockChainStream_ReadAt(This->parentStorage->smallBlockRootChain, offsetInBigBlockFile, bytesToReadInBuffer, bufferWalker, &bytesReadFromBigBlockFile); assert(bytesReadFromBigBlockFile == bytesToReadInBuffer); /* * Step to the next big block. */ blockIndex = SmallBlockChainStream_GetNextBlockInChain(This, blockIndex); bufferWalker += bytesToReadInBuffer; size -= bytesToReadInBuffer; *bytesRead += bytesToReadInBuffer; offsetInBlock = 0; /* There is no offset on the next block */ } return (size == 0); } /****************************************************************************** * SmallBlockChainStream_WriteAt * * Writes the specified number of bytes to this chain at the specified offset. * bytesWritten may be NULL. * Will fail if not all specified number of bytes have been written. */ BOOL SmallBlockChainStream_WriteAt( SmallBlockChainStream* This, ULARGE_INTEGER offset, ULONG size, const void* buffer, ULONG* bytesWritten) { ULARGE_INTEGER offsetInBigBlockFile; ULONG blockNoInSequence = offset.s.LowPart / This->parentStorage->smallBlockSize; ULONG offsetInBlock = offset.s.LowPart % This->parentStorage->smallBlockSize; ULONG bytesToWriteInBuffer; ULONG blockIndex; ULONG bytesWrittenFromBigBlockFile; BYTE* bufferWalker; /* * This should never happen on a small block file. */ assert(offset.s.HighPart==0); /* * Find the first block in the stream that contains part of the buffer. */ blockIndex = SmallBlockChainStream_GetHeadOfChain(This); while ( (blockNoInSequence > 0) && (blockIndex != BLOCK_END_OF_CHAIN)) { blockIndex = SmallBlockChainStream_GetNextBlockInChain(This, blockIndex); blockNoInSequence--; } /* * Start writing the buffer. * * Here, I'm casting away the constness on the buffer variable * This is OK since we don't intend to modify that buffer. */ *bytesWritten = 0; bufferWalker = (BYTE*)buffer; while ( (size > 0) && (blockIndex != BLOCK_END_OF_CHAIN) ) { /* * Calculate how many bytes we can copy to this small block. */ bytesToWriteInBuffer = min(This->parentStorage->smallBlockSize - offsetInBlock, size); /* * Calculate the offset of the small block in the small block file. */ offsetInBigBlockFile.s.HighPart = 0; offsetInBigBlockFile.s.LowPart = blockIndex * This->parentStorage->smallBlockSize; offsetInBigBlockFile.s.LowPart += offsetInBlock; /* * Write those bytes in the buffer to the small block file. */ BlockChainStream_WriteAt(This->parentStorage->smallBlockRootChain, offsetInBigBlockFile, bytesToWriteInBuffer, bufferWalker, &bytesWrittenFromBigBlockFile); assert(bytesWrittenFromBigBlockFile == bytesToWriteInBuffer); /* * Step to the next big block. */ blockIndex = SmallBlockChainStream_GetNextBlockInChain(This, blockIndex); bufferWalker += bytesToWriteInBuffer; size -= bytesToWriteInBuffer; *bytesWritten += bytesToWriteInBuffer; offsetInBlock = 0; /* There is no offset on the next block */ } return (size == 0); } /****************************************************************************** * SmallBlockChainStream_Shrink * * Shrinks this chain in the small block depot. */ BOOL SmallBlockChainStream_Shrink( SmallBlockChainStream* This, ULARGE_INTEGER newSize) { ULONG blockIndex, extraBlock; ULONG numBlocks; ULONG count = 0; numBlocks = newSize.s.LowPart / This->parentStorage->smallBlockSize; if ((newSize.s.LowPart % This->parentStorage->smallBlockSize) != 0) numBlocks++; blockIndex = SmallBlockChainStream_GetHeadOfChain(This); /* * Go to the new end of chain */ while (count < numBlocks) { blockIndex = SmallBlockChainStream_GetNextBlockInChain(This, blockIndex); count++; } /* * If the count is 0, we have a special case, the head of the chain was * just freed. */ if (count == 0) { StgProperty chainProp; StorageImpl_ReadProperty(This->parentStorage, This->ownerPropertyIndex, &chainProp); chainProp.startingBlock = BLOCK_END_OF_CHAIN; StorageImpl_WriteProperty(This->parentStorage, This->ownerPropertyIndex, &chainProp); /* * We start freeing the chain at the head block. */ extraBlock = blockIndex; } else { /* Get the next block before marking the new end */ extraBlock = SmallBlockChainStream_GetNextBlockInChain(This, blockIndex); /* Mark the new end of chain */ SmallBlockChainStream_SetNextBlockInChain( This, blockIndex, BLOCK_END_OF_CHAIN); } /* * Mark the extra blocks as free */ while (extraBlock != BLOCK_END_OF_CHAIN) { blockIndex = SmallBlockChainStream_GetNextBlockInChain(This, extraBlock); SmallBlockChainStream_FreeBlock(This, extraBlock); extraBlock = blockIndex; } return TRUE; } /****************************************************************************** * SmallBlockChainStream_Enlarge * * Grows this chain in the small block depot. */ BOOL SmallBlockChainStream_Enlarge( SmallBlockChainStream* This, ULARGE_INTEGER newSize) { ULONG blockIndex, currentBlock; ULONG newNumBlocks; ULONG oldNumBlocks = 0; blockIndex = SmallBlockChainStream_GetHeadOfChain(This); /* * Empty chain */ if (blockIndex == BLOCK_END_OF_CHAIN) { StgProperty chainProp; StorageImpl_ReadProperty(This->parentStorage, This->ownerPropertyIndex, &chainProp); chainProp.startingBlock = SmallBlockChainStream_GetNextFreeBlock(This); StorageImpl_WriteProperty(This->parentStorage, This->ownerPropertyIndex, &chainProp); blockIndex = chainProp.startingBlock; SmallBlockChainStream_SetNextBlockInChain( This, blockIndex, BLOCK_END_OF_CHAIN); } currentBlock = blockIndex; /* * Figure out how many blocks are needed to contain this stream */ newNumBlocks = newSize.s.LowPart / This->parentStorage->smallBlockSize; if ((newSize.s.LowPart % This->parentStorage->smallBlockSize) != 0) newNumBlocks++; /* * Go to the current end of chain */ while (blockIndex != BLOCK_END_OF_CHAIN) { oldNumBlocks++; currentBlock = blockIndex; blockIndex = SmallBlockChainStream_GetNextBlockInChain(This, currentBlock); } /* * Add new blocks to the chain */ while (oldNumBlocks < newNumBlocks) { blockIndex = SmallBlockChainStream_GetNextFreeBlock(This); SmallBlockChainStream_SetNextBlockInChain(This, currentBlock, blockIndex); SmallBlockChainStream_SetNextBlockInChain( This, blockIndex, BLOCK_END_OF_CHAIN); currentBlock = blockIndex; oldNumBlocks++; } return TRUE; } /****************************************************************************** * SmallBlockChainStream_GetCount * * Returns the number of blocks that comprises this chain. * This is not the size of this chain as the last block may not be full! */ ULONG SmallBlockChainStream_GetCount(SmallBlockChainStream* This) { ULONG blockIndex; ULONG count = 0; blockIndex = SmallBlockChainStream_GetHeadOfChain(This); while (blockIndex != BLOCK_END_OF_CHAIN) { count++; blockIndex = SmallBlockChainStream_GetNextBlockInChain(This, blockIndex); } return count; } /****************************************************************************** * SmallBlockChainStream_SetSize * * Sets the size of this stream. * The file will grow if we grow the chain. * * TODO: Free the actual blocks in the file when we shrink the chain. * Currently, the blocks are still in the file. So the file size * doesn't shrink even if we shrink streams. */ BOOL SmallBlockChainStream_SetSize( SmallBlockChainStream* This, ULARGE_INTEGER newSize) { ULARGE_INTEGER size = SmallBlockChainStream_GetSize(This); if (newSize.s.LowPart == size.s.LowPart) return TRUE; if (newSize.s.LowPart < size.s.LowPart) { SmallBlockChainStream_Shrink(This, newSize); } else { SmallBlockChainStream_Enlarge(This, newSize); } return TRUE; } /****************************************************************************** * SmallBlockChainStream_GetSize * * Returns the size of this chain. */ ULARGE_INTEGER SmallBlockChainStream_GetSize(SmallBlockChainStream* This) { StgProperty chainProperty; StorageImpl_ReadProperty( This->parentStorage, This->ownerPropertyIndex, &chainProperty); return chainProperty.size; } /****************************************************************************** * StgCreateDocfile [OLE32.144] */ HRESULT WINAPI StgCreateDocfile( LPCOLESTR pwcsName, DWORD grfMode, DWORD reserved, IStorage **ppstgOpen) { StorageImpl* newStorage = 0; HANDLE hFile = INVALID_HANDLE_VALUE; HRESULT hr = S_OK; DWORD shareMode; DWORD accessMode; DWORD creationMode; DWORD fileAttributes; WCHAR tempFileName[MAX_PATH]; TRACE("(%s, %lx, %ld, %p)\n", debugstr_w(pwcsName), grfMode, reserved, ppstgOpen); /* * Validate the parameters */ if (ppstgOpen == 0) return STG_E_INVALIDPOINTER; /* * Validate the STGM flags */ if ( FAILED( validateSTGM(grfMode) )) return STG_E_INVALIDFLAG; /* * Generate a unique name. */ if (pwcsName == 0) { WCHAR tempPath[MAX_PATH]; WCHAR prefix[] = { 'S', 'T', 'O', 0 }; memset(tempPath, 0, sizeof(tempPath)); memset(tempFileName, 0, sizeof(tempFileName)); if ((GetTempPathW(MAX_PATH, tempPath)) == 0 ) tempPath[0] = '.'; if (GetTempFileNameW(tempPath, prefix, 0, tempFileName) != 0) pwcsName = tempFileName; else return STG_E_INSUFFICIENTMEMORY; } /* * Interpret the STGM value grfMode */ shareMode = GetShareModeFromSTGM(grfMode); accessMode = GetAccessModeFromSTGM(grfMode); creationMode = GetCreationModeFromSTGM(grfMode); if (grfMode & STGM_DELETEONRELEASE) fileAttributes = FILE_FLAG_RANDOM_ACCESS | FILE_FLAG_DELETE_ON_CLOSE; else fileAttributes = FILE_ATTRIBUTE_NORMAL | FILE_FLAG_RANDOM_ACCESS; if (grfMode & STGM_TRANSACTED) FIXME("Transacted mode not implemented.\n"); /* * Initialize the "out" parameter. */ *ppstgOpen = 0; hFile = CreateFileW(pwcsName, accessMode, shareMode, NULL, creationMode, fileAttributes, 0); if (hFile == INVALID_HANDLE_VALUE) { return E_FAIL; } /* * Allocate and initialize the new IStorage32object. */ newStorage = HeapAlloc(GetProcessHeap(), 0, sizeof(StorageImpl)); if (newStorage == 0) return STG_E_INSUFFICIENTMEMORY; hr = StorageImpl_Construct( newStorage, hFile, NULL, grfMode, TRUE, TRUE); if (FAILED(hr)) { HeapFree(GetProcessHeap(), 0, newStorage); return hr; } /* * Get an "out" pointer for the caller. */ hr = StorageBaseImpl_QueryInterface( (IStorage*)newStorage, (REFIID)&IID_IStorage, (void**)ppstgOpen); return hr; } /****************************************************************************** * StgOpenStorage [OLE32.148] */ HRESULT WINAPI StgOpenStorage( const OLECHAR *pwcsName, IStorage *pstgPriority, DWORD grfMode, SNB snbExclude, DWORD reserved, IStorage **ppstgOpen) { StorageImpl* newStorage = 0; HRESULT hr = S_OK; HANDLE hFile = 0; DWORD shareMode; DWORD accessMode; TRACE("(%s, %p, %lx, %p, %ld, %p)\n", debugstr_w(pwcsName), pstgPriority, grfMode, snbExclude, reserved, ppstgOpen); /* * Perform a sanity check */ if (( pwcsName == 0) || (ppstgOpen == 0) ) return STG_E_INVALIDPOINTER; /* * Validate the STGM flags */ if ( FAILED( validateSTGM(grfMode) )) return STG_E_INVALIDFLAG; /* * Interpret the STGM value grfMode */ shareMode = GetShareModeFromSTGM(grfMode); accessMode = GetAccessModeFromSTGM(grfMode); /* * Initialize the "out" parameter. */ *ppstgOpen = 0; hFile = CreateFileW( pwcsName, accessMode, shareMode, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL | FILE_FLAG_RANDOM_ACCESS, 0); if (hFile==INVALID_HANDLE_VALUE) { HRESULT hr = E_FAIL; DWORD last_error = GetLastError(); switch (last_error) { case ERROR_FILE_NOT_FOUND: hr = STG_E_FILENOTFOUND; break; case ERROR_PATH_NOT_FOUND: hr = STG_E_PATHNOTFOUND; break; case ERROR_ACCESS_DENIED: case ERROR_WRITE_PROTECT: hr = STG_E_ACCESSDENIED; break; case ERROR_SHARING_VIOLATION: hr = STG_E_SHAREVIOLATION; break; default: hr = E_FAIL; } return hr; } /* * Allocate and initialize the new IStorage32object. */ newStorage = HeapAlloc(GetProcessHeap(), 0, sizeof(StorageImpl)); if (newStorage == 0) return STG_E_INSUFFICIENTMEMORY; hr = StorageImpl_Construct( newStorage, hFile, NULL, grfMode, TRUE, FALSE); if (FAILED(hr)) { HeapFree(GetProcessHeap(), 0, newStorage); return hr; } /* * Get an "out" pointer for the caller. */ hr = StorageBaseImpl_QueryInterface( (IStorage*)newStorage, (REFIID)&IID_IStorage, (void**)ppstgOpen); return hr; } /****************************************************************************** * StgCreateDocfileOnILockBytes [OLE32.145] */ HRESULT WINAPI StgCreateDocfileOnILockBytes( ILockBytes *plkbyt, DWORD grfMode, DWORD reserved, IStorage** ppstgOpen) { StorageImpl* newStorage = 0; HRESULT hr = S_OK; /* * Validate the parameters */ if ((ppstgOpen == 0) || (plkbyt == 0)) return STG_E_INVALIDPOINTER; /* * Allocate and initialize the new IStorage object. */ newStorage = HeapAlloc(GetProcessHeap(), 0, sizeof(StorageImpl)); if (newStorage == 0) return STG_E_INSUFFICIENTMEMORY; hr = StorageImpl_Construct( newStorage, 0, plkbyt, grfMode, FALSE, TRUE); if (FAILED(hr)) { HeapFree(GetProcessHeap(), 0, newStorage); return hr; } /* * Get an "out" pointer for the caller. */ hr = StorageBaseImpl_QueryInterface( (IStorage*)newStorage, (REFIID)&IID_IStorage, (void**)ppstgOpen); return hr; } /****************************************************************************** * StgOpenStorageOnILockBytes [OLE32.149] */ HRESULT WINAPI StgOpenStorageOnILockBytes( ILockBytes *plkbyt, IStorage *pstgPriority, DWORD grfMode, SNB snbExclude, DWORD reserved, IStorage **ppstgOpen) { StorageImpl* newStorage = 0; HRESULT hr = S_OK; /* * Perform a sanity check */ if ((plkbyt == 0) || (ppstgOpen == 0)) return STG_E_INVALIDPOINTER; /* * Validate the STGM flags */ if ( FAILED( validateSTGM(grfMode) )) return STG_E_INVALIDFLAG; /* * Initialize the "out" parameter. */ *ppstgOpen = 0; /* * Allocate and initialize the new IStorage object. */ newStorage = HeapAlloc(GetProcessHeap(), 0, sizeof(StorageImpl)); if (newStorage == 0) return STG_E_INSUFFICIENTMEMORY; hr = StorageImpl_Construct( newStorage, 0, plkbyt, grfMode, FALSE, FALSE); if (FAILED(hr)) { HeapFree(GetProcessHeap(), 0, newStorage); return hr; } /* * Get an "out" pointer for the caller. */ hr = StorageBaseImpl_QueryInterface( (IStorage*)newStorage, (REFIID)&IID_IStorage, (void**)ppstgOpen); return hr; } /****************************************************************************** * StgSetTimes [ole32.150] * * */ HRESULT WINAPI StgSetTimes(WCHAR * str, FILETIME * a, FILETIME * b, FILETIME *c ) { FIXME("(%p, %p, %p, %p),stub!\n", str, a, b, c); return FALSE; } /****************************************************************************** * StgIsStorageILockBytes [OLE32.147] * * Determines if the ILockBytes contains a storage object. */ HRESULT WINAPI StgIsStorageILockBytes(ILockBytes *plkbyt) { BYTE sig[8]; ULARGE_INTEGER offset; offset.s.HighPart = 0; offset.s.LowPart = 0; ILockBytes_ReadAt(plkbyt, offset, sig, sizeof(sig), NULL); if (memcmp(sig, STORAGE_magic, sizeof(STORAGE_magic)) == 0) return S_OK; return S_FALSE; } /****************************************************************************** * WriteClassStg [OLE32.158] * * This method will store the specified CLSID in the specified storage object */ HRESULT WINAPI WriteClassStg(IStorage* pStg, REFCLSID rclsid) { HRESULT hRes; assert(pStg != 0); hRes = IStorage_SetClass(pStg, rclsid); return hRes; } /*********************************************************************** * ReadClassStg * * This method reads the CLSID previously written to a storage object with the WriteClassStg. */ HRESULT WINAPI ReadClassStg(IStorage *pstg,CLSID *pclsid){ STATSTG pstatstg; HRESULT hRes; TRACE("()\n"); if(pclsid==NULL) return E_POINTER; /* * read a STATSTG structure (contains the clsid) from the storage */ hRes=IStorage_Stat(pstg,&pstatstg,STATFLAG_DEFAULT); if(SUCCEEDED(hRes)) *pclsid=pstatstg.clsid; return hRes; } /*********************************************************************** * OleLoadFromStream * * This function loads an object from stream */ HRESULT WINAPI OleLoadFromStream(IStream *pStm,REFIID iidInterface,void** ppvObj) { CLSID clsid; HRESULT res; FIXME("(),stub!\n"); res=ReadClassStm(pStm,&clsid); if (SUCCEEDED(res)){ res=CoCreateInstance(&clsid,NULL,CLSCTX_INPROC_SERVER,iidInterface,ppvObj); if (SUCCEEDED(res)) res=IPersistStream_Load((IPersistStream*)ppvObj,pStm); } return res; } /*********************************************************************** * OleSaveToStream * * This function saves an object with the IPersistStream interface on it * to the specified stream. */ HRESULT WINAPI OleSaveToStream(IPersistStream *pPStm,IStream *pStm) { CLSID clsid; HRESULT res; TRACE("(%p,%p)\n",pPStm,pStm); res=IPersistStream_GetClassID(pPStm,&clsid); if (SUCCEEDED(res)){ res=WriteClassStm(pStm,&clsid); if (SUCCEEDED(res)) res=IPersistStream_Save(pPStm,pStm,TRUE); } TRACE("Finished Save\n"); return res; } /**************************************************************************** * This method validate a STGM parameter that can contain the values below * * STGM_DIRECT 0x00000000 * STGM_TRANSACTED 0x00010000 * STGM_SIMPLE 0x08000000 * * STGM_READ 0x00000000 * STGM_WRITE 0x00000001 * STGM_READWRITE 0x00000002 * * STGM_SHARE_DENY_NONE 0x00000040 * STGM_SHARE_DENY_READ 0x00000030 * STGM_SHARE_DENY_WRITE 0x00000020 * STGM_SHARE_EXCLUSIVE 0x00000010 * * STGM_PRIORITY 0x00040000 * STGM_DELETEONRELEASE 0x04000000 * * STGM_CREATE 0x00001000 * STGM_CONVERT 0x00020000 * STGM_FAILIFTHERE 0x00000000 * * STGM_NOSCRATCH 0x00100000 * STGM_NOSNAPSHOT 0x00200000 */ static HRESULT validateSTGM(DWORD stgm) { BOOL bSTGM_TRANSACTED = ((stgm & STGM_TRANSACTED) == STGM_TRANSACTED); BOOL bSTGM_SIMPLE = ((stgm & STGM_SIMPLE) == STGM_SIMPLE); BOOL bSTGM_DIRECT = ! (bSTGM_TRANSACTED || bSTGM_SIMPLE); BOOL bSTGM_WRITE = ((stgm & STGM_WRITE) == STGM_WRITE); BOOL bSTGM_READWRITE = ((stgm & STGM_READWRITE) == STGM_READWRITE); BOOL bSTGM_READ = ! (bSTGM_WRITE || bSTGM_READWRITE); BOOL bSTGM_SHARE_DENY_NONE = ((stgm & STGM_SHARE_DENY_NONE) == STGM_SHARE_DENY_NONE); BOOL bSTGM_SHARE_DENY_READ = ((stgm & STGM_SHARE_DENY_READ) == STGM_SHARE_DENY_READ); BOOL bSTGM_SHARE_DENY_WRITE = ((stgm & STGM_SHARE_DENY_WRITE) == STGM_SHARE_DENY_WRITE); BOOL bSTGM_SHARE_EXCLUSIVE = ((stgm & STGM_SHARE_EXCLUSIVE) == STGM_SHARE_EXCLUSIVE); BOOL bSTGM_CREATE = ((stgm & STGM_CREATE) == STGM_CREATE); BOOL bSTGM_CONVERT = ((stgm & STGM_CONVERT) == STGM_CONVERT); BOOL bSTGM_NOSCRATCH = ((stgm & STGM_NOSCRATCH) == STGM_NOSCRATCH); BOOL bSTGM_NOSNAPSHOT = ((stgm & STGM_NOSNAPSHOT) == STGM_NOSNAPSHOT); /* * STGM_DIRECT | STGM_TRANSACTED | STGM_SIMPLE */ if ( ! bSTGM_DIRECT ) if( bSTGM_TRANSACTED && bSTGM_SIMPLE ) return E_FAIL; /* * STGM_WRITE | STGM_READWRITE | STGM_READ */ if ( ! bSTGM_READ ) if( bSTGM_WRITE && bSTGM_READWRITE ) return E_FAIL; /* * STGM_SHARE_DENY_NONE | others * (I assume here that DENY_READ implies DENY_WRITE) */ if ( bSTGM_SHARE_DENY_NONE ) if ( bSTGM_SHARE_DENY_READ || bSTGM_SHARE_DENY_WRITE || bSTGM_SHARE_EXCLUSIVE) return E_FAIL; /* * STGM_CREATE | STGM_CONVERT * if both are false, STGM_FAILIFTHERE is set to TRUE */ if ( bSTGM_CREATE && bSTGM_CONVERT ) return E_FAIL; /* * STGM_NOSCRATCH requires STGM_TRANSACTED */ if ( bSTGM_NOSCRATCH && ! bSTGM_TRANSACTED ) return E_FAIL; /* * STGM_NOSNAPSHOT requires STGM_TRANSACTED and * not STGM_SHARE_EXCLUSIVE or STGM_SHARE_DENY_WRITE` */ if (bSTGM_NOSNAPSHOT) { if ( ! ( bSTGM_TRANSACTED && !(bSTGM_SHARE_EXCLUSIVE || bSTGM_SHARE_DENY_WRITE)) ) return E_FAIL; } return S_OK; } /**************************************************************************** * GetShareModeFromSTGM * * This method will return a share mode flag from a STGM value. * The STGM value is assumed valid. */ static DWORD GetShareModeFromSTGM(DWORD stgm) { DWORD dwShareMode = 0; BOOL bSTGM_SHARE_DENY_NONE = ((stgm & STGM_SHARE_DENY_NONE) == STGM_SHARE_DENY_NONE); BOOL bSTGM_SHARE_DENY_READ = ((stgm & STGM_SHARE_DENY_READ) == STGM_SHARE_DENY_READ); BOOL bSTGM_SHARE_DENY_WRITE = ((stgm & STGM_SHARE_DENY_WRITE) == STGM_SHARE_DENY_WRITE); BOOL bSTGM_SHARE_EXCLUSIVE = ((stgm & STGM_SHARE_EXCLUSIVE) == STGM_SHARE_EXCLUSIVE); if ((bSTGM_SHARE_EXCLUSIVE) || (bSTGM_SHARE_DENY_READ)) dwShareMode = 0; if (bSTGM_SHARE_DENY_NONE) dwShareMode = FILE_SHARE_READ | FILE_SHARE_WRITE; if (bSTGM_SHARE_DENY_WRITE) dwShareMode = FILE_SHARE_READ; return dwShareMode; } /**************************************************************************** * GetAccessModeFromSTGM * * This method will return an access mode flag from a STGM value. * The STGM value is assumed valid. */ static DWORD GetAccessModeFromSTGM(DWORD stgm) { DWORD dwDesiredAccess = GENERIC_READ; BOOL bSTGM_WRITE = ((stgm & STGM_WRITE) == STGM_WRITE); BOOL bSTGM_READWRITE = ((stgm & STGM_READWRITE) == STGM_READWRITE); BOOL bSTGM_READ = ! (bSTGM_WRITE || bSTGM_READWRITE); if (bSTGM_READ) dwDesiredAccess = GENERIC_READ; if (bSTGM_WRITE) dwDesiredAccess |= GENERIC_WRITE; if (bSTGM_READWRITE) dwDesiredAccess = GENERIC_READ | GENERIC_WRITE; return dwDesiredAccess; } /**************************************************************************** * GetCreationModeFromSTGM * * This method will return a creation mode flag from a STGM value. * The STGM value is assumed valid. */ static DWORD GetCreationModeFromSTGM(DWORD stgm) { if ( stgm & STGM_CREATE) return CREATE_ALWAYS; if (stgm & STGM_CONVERT) { FIXME("STGM_CONVERT not implemented!\n"); return CREATE_NEW; } /* All other cases */ if (stgm & ~ (STGM_CREATE|STGM_CONVERT)) FIXME("unhandled storage mode : 0x%08lx\n",stgm & ~ (STGM_CREATE|STGM_CONVERT)); return CREATE_NEW; } /************************************************************************* * OLECONVERT_LoadOLE10 [Internal] * * Loads the OLE10 STREAM to memory * * PARAMS * pOleStream [I] The OLESTREAM * pData [I] Data Structure for the OLESTREAM Data * * RETURNS * Success: S_OK * Failure: CONVERT10_E_OLESTREAM_GET for invalid Get * CONVERT10_E_OLESTREAM_FMT if the OLEID is invalide * * NOTES * This function is used by OleConvertOLESTREAMToIStorage only. * * Memory allocated for pData must be freed by the caller */ HRESULT OLECONVERT_LoadOLE10(LPOLESTREAM pOleStream, OLECONVERT_OLESTREAM_DATA *pData, BOOL bStrem1) { DWORD dwSize; HRESULT hRes = S_OK; int nTryCnt=0; int max_try = 6; pData->pData = NULL; pData->pstrOleObjFileName = (CHAR *) NULL; for( nTryCnt=0;nTryCnt < max_try; nTryCnt++) { /* Get the OleID */ dwSize = pOleStream->lpstbl->Get(pOleStream, (void *)&(pData->dwOleID), sizeof(pData->dwOleID)); if(dwSize != sizeof(pData->dwOleID)) { hRes = CONVERT10_E_OLESTREAM_GET; } else if(pData->dwOleID != OLESTREAM_ID) { hRes = CONVERT10_E_OLESTREAM_FMT; } else { hRes = S_OK; break; } } if(hRes == S_OK) { /* Get the TypeID...more info needed for this field */ dwSize = pOleStream->lpstbl->Get(pOleStream, (void *)&(pData->dwTypeID), sizeof(pData->dwTypeID)); if(dwSize != sizeof(pData->dwTypeID)) { hRes = CONVERT10_E_OLESTREAM_GET; } } if(hRes == S_OK) { if(pData->dwTypeID != 0) { /* Get the lenght of the OleTypeName */ dwSize = pOleStream->lpstbl->Get(pOleStream, (void *) &(pData->dwOleTypeNameLength), sizeof(pData->dwOleTypeNameLength)); if(dwSize != sizeof(pData->dwOleTypeNameLength)) { hRes = CONVERT10_E_OLESTREAM_GET; } if(hRes == S_OK) { if(pData->dwOleTypeNameLength > 0) { /* Get the OleTypeName */ dwSize = pOleStream->lpstbl->Get(pOleStream, (void *)pData->strOleTypeName, pData->dwOleTypeNameLength); if(dwSize != pData->dwOleTypeNameLength) { hRes = CONVERT10_E_OLESTREAM_GET; } } } if(bStrem1) { dwSize = pOleStream->lpstbl->Get(pOleStream, (void *)&(pData->dwOleObjFileNameLength), sizeof(pData->dwOleObjFileNameLength)); if(dwSize != sizeof(pData->dwOleObjFileNameLength)) { hRes = CONVERT10_E_OLESTREAM_GET; } if(hRes == S_OK) { if(pData->dwOleObjFileNameLength < 1) /* there is no file name exist */ pData->dwOleObjFileNameLength = sizeof(pData->dwOleObjFileNameLength); pData->pstrOleObjFileName = (CHAR *)malloc(pData->dwOleObjFileNameLength); if(pData->pstrOleObjFileName) { dwSize = pOleStream->lpstbl->Get(pOleStream, (void *)(pData->pstrOleObjFileName),pData->dwOleObjFileNameLength); if(dwSize != pData->dwOleObjFileNameLength) { hRes = CONVERT10_E_OLESTREAM_GET; } } else hRes = CONVERT10_E_OLESTREAM_GET; } } else { /* Get the Width of the Metafile */ dwSize = pOleStream->lpstbl->Get(pOleStream, (void *)&(pData->dwMetaFileWidth), sizeof(pData->dwMetaFileWidth)); if(dwSize != sizeof(pData->dwMetaFileWidth)) { hRes = CONVERT10_E_OLESTREAM_GET; } if(hRes == S_OK) { /* Get the Height of the Metafile */ dwSize = pOleStream->lpstbl->Get(pOleStream, (void *)&(pData->dwMetaFileHeight), sizeof(pData->dwMetaFileHeight)); if(dwSize != sizeof(pData->dwMetaFileHeight)) { hRes = CONVERT10_E_OLESTREAM_GET; } } } if(hRes == S_OK) { /* Get the Lenght of the Data */ dwSize = pOleStream->lpstbl->Get(pOleStream, (void *)&(pData->dwDataLength), sizeof(pData->dwDataLength)); if(dwSize != sizeof(pData->dwDataLength)) { hRes = CONVERT10_E_OLESTREAM_GET; } } if(hRes == S_OK) /* I don't know what is this 8 byts information is we have to figure out */ { if(!bStrem1) /* if it is a second OLE stream data */ { pData->dwDataLength -= 8; dwSize = pOleStream->lpstbl->Get(pOleStream, (void *)(pData->strUnknown), sizeof(pData->strUnknown)); if(dwSize != sizeof(pData->strUnknown)) { hRes = CONVERT10_E_OLESTREAM_GET; } } } if(hRes == S_OK) { if(pData->dwDataLength > 0) { pData->pData = (BYTE *)HeapAlloc(GetProcessHeap(),0,pData->dwDataLength); /* Get Data (ex. IStorage, Metafile, or BMP) */ if(pData->pData) { dwSize = pOleStream->lpstbl->Get(pOleStream, (void *)pData->pData, pData->dwDataLength); if(dwSize != pData->dwDataLength) { hRes = CONVERT10_E_OLESTREAM_GET; } } else { hRes = CONVERT10_E_OLESTREAM_GET; } } } } } return hRes; } /************************************************************************* * OLECONVERT_SaveOLE10 [Internal] * * Saves the OLE10 STREAM From memory * * PARAMS * pData [I] Data Structure for the OLESTREAM Data * pOleStream [I] The OLESTREAM to save * * RETURNS * Success: S_OK * Failure: CONVERT10_E_OLESTREAM_PUT for invalid Put * * NOTES * This function is used by OleConvertIStorageToOLESTREAM only. * */ HRESULT OLECONVERT_SaveOLE10(OLECONVERT_OLESTREAM_DATA *pData, LPOLESTREAM pOleStream) { DWORD dwSize; HRESULT hRes = S_OK; /* Set the OleID */ dwSize = pOleStream->lpstbl->Put(pOleStream, (void *)&(pData->dwOleID), sizeof(pData->dwOleID)); if(dwSize != sizeof(pData->dwOleID)) { hRes = CONVERT10_E_OLESTREAM_PUT; } if(hRes == S_OK) { /* Set the TypeID */ dwSize = pOleStream->lpstbl->Put(pOleStream, (void *)&(pData->dwTypeID), sizeof(pData->dwTypeID)); if(dwSize != sizeof(pData->dwTypeID)) { hRes = CONVERT10_E_OLESTREAM_PUT; } } if(pData->dwOleID == OLESTREAM_ID && pData->dwTypeID != 0 && hRes == S_OK) { /* Set the Lenght of the OleTypeName */ dwSize = pOleStream->lpstbl->Put(pOleStream, (void *)&(pData->dwOleTypeNameLength), sizeof(pData->dwOleTypeNameLength)); if(dwSize != sizeof(pData->dwOleTypeNameLength)) { hRes = CONVERT10_E_OLESTREAM_PUT; } if(hRes == S_OK) { if(pData->dwOleTypeNameLength > 0) { /* Set the OleTypeName */ dwSize = pOleStream->lpstbl->Put(pOleStream, (void *) pData->strOleTypeName, pData->dwOleTypeNameLength); if(dwSize != pData->dwOleTypeNameLength) { hRes = CONVERT10_E_OLESTREAM_PUT; } } } if(hRes == S_OK) { /* Set the width of the Metafile */ dwSize = pOleStream->lpstbl->Put(pOleStream, (void *)&(pData->dwMetaFileWidth), sizeof(pData->dwMetaFileWidth)); if(dwSize != sizeof(pData->dwMetaFileWidth)) { hRes = CONVERT10_E_OLESTREAM_PUT; } } if(hRes == S_OK) { /* Set the height of the Metafile */ dwSize = pOleStream->lpstbl->Put(pOleStream, (void *)&(pData->dwMetaFileHeight), sizeof(pData->dwMetaFileHeight)); if(dwSize != sizeof(pData->dwMetaFileHeight)) { hRes = CONVERT10_E_OLESTREAM_PUT; } } if(hRes == S_OK) { /* Set the lenght of the Data */ dwSize = pOleStream->lpstbl->Put(pOleStream, (void *)&(pData->dwDataLength), sizeof(pData->dwDataLength)); if(dwSize != sizeof(pData->dwDataLength)) { hRes = CONVERT10_E_OLESTREAM_PUT; } } if(hRes == S_OK) { if(pData->dwDataLength > 0) { /* Set the Data (eg. IStorage, Metafile, Bitmap) */ dwSize = pOleStream->lpstbl->Put(pOleStream, (void *) pData->pData, pData->dwDataLength); if(dwSize != pData->dwDataLength) { hRes = CONVERT10_E_OLESTREAM_PUT; } } } } return hRes; } /************************************************************************* * OLECONVERT_GetOLE20FromOLE10[Internal] * * This function copies OLE10 Data (the IStorage in the OLESTREAM) to disk, * opens it, and copies the content to the dest IStorage for * OleConvertOLESTREAMToIStorage * * * PARAMS * pDestStorage [I] The IStorage to copy the data to * pBuffer [I] Buffer that contains the IStorage from the OLESTREAM * nBufferLength [I] The size of the buffer * * RETURNS * Nothing * * NOTES * * */ void OLECONVERT_GetOLE20FromOLE10(LPSTORAGE pDestStorage, BYTE *pBuffer, DWORD nBufferLength) { HRESULT hRes; HANDLE hFile; IStorage *pTempStorage; DWORD dwNumOfBytesWritten; WCHAR wstrTempDir[MAX_PATH], wstrTempFile[MAX_PATH]; WCHAR wstrPrefix[] = {'s', 'i', 's', 0}; /* Create a temp File */ GetTempPathW(MAX_PATH, wstrTempDir); GetTempFileNameW(wstrTempDir, wstrPrefix, 0, wstrTempFile); hFile = CreateFileW(wstrTempFile, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0); if(hFile != INVALID_HANDLE_VALUE) { /* Write IStorage Data to File */ WriteFile(hFile, pBuffer, nBufferLength, &dwNumOfBytesWritten, NULL); CloseHandle(hFile); /* Open and copy temp storage to the Dest Storage */ hRes = StgOpenStorage(wstrTempFile, NULL, STGM_READ, NULL, 0, &pTempStorage); if(hRes == S_OK) { hRes = StorageImpl_CopyTo(pTempStorage, 0, NULL, NULL, pDestStorage); StorageBaseImpl_Release(pTempStorage); } DeleteFileW(wstrTempFile); } } /************************************************************************* * OLECONVERT_WriteOLE20ToBuffer [Internal] * * Saves the OLE10 STREAM From memory * * PARAMS * pStorage [I] The Src IStorage to copy * pData [I] The Dest Memory to write to. * * RETURNS * The size in bytes allocated for pData * * NOTES * Memory allocated for pData must be freed by the caller * * Used by OleConvertIStorageToOLESTREAM only. * */ DWORD OLECONVERT_WriteOLE20ToBuffer(LPSTORAGE pStorage, BYTE **pData) { HANDLE hFile; HRESULT hRes; DWORD nDataLength = 0; IStorage *pTempStorage; WCHAR wstrTempDir[MAX_PATH], wstrTempFile[MAX_PATH]; WCHAR wstrPrefix[] = {'s', 'i', 's', 0}; *pData = NULL; /* Create temp Storage */ GetTempPathW(MAX_PATH, wstrTempDir); GetTempFileNameW(wstrTempDir, wstrPrefix, 0, wstrTempFile); hRes = StgCreateDocfile(wstrTempFile, STGM_CREATE | STGM_READWRITE | STGM_SHARE_EXCLUSIVE, 0, &pTempStorage); if(hRes == S_OK) { /* Copy Src Storage to the Temp Storage */ StorageImpl_CopyTo(pStorage, 0, NULL, NULL, pTempStorage); StorageBaseImpl_Release(pTempStorage); /* Open Temp Storage as a file and copy to memory */ hFile = CreateFileW(wstrTempFile, GENERIC_READ, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0); if(hFile != INVALID_HANDLE_VALUE) { nDataLength = GetFileSize(hFile, NULL); *pData = (BYTE *) HeapAlloc(GetProcessHeap(),0,nDataLength); ReadFile(hFile, *pData, nDataLength, &nDataLength, 0); CloseHandle(hFile); } DeleteFileW(wstrTempFile); } return nDataLength; } /************************************************************************* * OLECONVERT_CreateOleStream [Internal] * * Creates the "\001OLE" stream in the IStorage if neccessary. * * PARAMS * pStorage [I] Dest storage to create the stream in * * RETURNS * Nothing * * NOTES * This function is used by OleConvertOLESTREAMToIStorage only. * * This stream is still unknown, MS Word seems to have extra data * but since the data is stored in the OLESTREAM there should be * no need to recreate the stream. If the stream is manually * deleted it will create it with this default data. * */ void OLECONVERT_CreateOleStream(LPSTORAGE pStorage) { HRESULT hRes; IStream *pStream; WCHAR wstrStreamName[] = {1,'O', 'l', 'e', 0}; BYTE pOleStreamHeader [] = { 0x01, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 }; /* Create stream if not present */ hRes = IStorage_CreateStream(pStorage, wstrStreamName, STGM_WRITE | STGM_SHARE_EXCLUSIVE, 0, 0, &pStream ); if(hRes == S_OK) { /* Write default Data */ hRes = IStream_Write(pStream, pOleStreamHeader, sizeof(pOleStreamHeader), NULL); IStream_Release(pStream); } } /************************************************************************* * OLECONVERT_CreateCompObjStream [Internal] * * Creates a "\001CompObj" is the destination IStorage if necessary. * * PARAMS * pStorage [I] The dest IStorage to create the CompObj Stream * if necessary. * strOleTypeName [I] The ProgID * * RETURNS * Success: S_OK * Failure: REGDB_E_CLASSNOTREG if cannot reconstruct the stream * * NOTES * This function is used by OleConvertOLESTREAMToIStorage only. * * The stream data is stored in the OLESTREAM and there should be * no need to recreate the stream. If the stream is manually * deleted it will attempt to create it by querying the registry. * * */ HRESULT OLECONVERT_CreateCompObjStream(LPSTORAGE pStorage, LPCSTR strOleTypeName) { IStream *pStream; HRESULT hStorageRes, hRes = S_OK; OLECONVERT_ISTORAGE_COMPOBJ IStorageCompObj; WCHAR wstrStreamName[] = {1,'C', 'o', 'm', 'p', 'O', 'b', 'j', 0}; BYTE pCompObjUnknown1[] = {0x01, 0x00, 0xFE, 0xFF, 0x03, 0x0A, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0xFF}; BYTE pCompObjUnknown2[] = {0xF4, 0x39, 0xB2, 0x71}; /* Initialize the CompObj structure */ memset(&IStorageCompObj, 0, sizeof(IStorageCompObj)); memcpy(&(IStorageCompObj.byUnknown1), pCompObjUnknown1, sizeof(pCompObjUnknown1)); memcpy(&(IStorageCompObj.byUnknown2), pCompObjUnknown2, sizeof(pCompObjUnknown2)); /* Create a CompObj stream if it doesn't exist */ hStorageRes = IStorage_CreateStream(pStorage, wstrStreamName, STGM_WRITE | STGM_SHARE_EXCLUSIVE, 0, 0, &pStream ); if(hStorageRes == S_OK) { /* copy the OleTypeName to the compobj struct */ IStorageCompObj.dwOleTypeNameLength = strlen(strOleTypeName)+1; strcpy(IStorageCompObj.strOleTypeName, strOleTypeName); /* copy the OleTypeName to the compobj struct */ /* Note: in the test made, these where Identical */ IStorageCompObj.dwProgIDNameLength = strlen(strOleTypeName)+1; strcpy(IStorageCompObj.strProgIDName, strOleTypeName); /* Get the CLSID */ hRes = CLSIDFromProgID16(IStorageCompObj.strProgIDName, &(IStorageCompObj.clsid)); if(hRes != S_OK) { hRes = REGDB_E_CLASSNOTREG; } else { HKEY hKey; LONG hErr; /* Get the CLSID Default Name from the Registry */ hErr = RegOpenKeyA(HKEY_CLASSES_ROOT, IStorageCompObj.strProgIDName, &hKey); if(hErr == ERROR_SUCCESS) { char strTemp[OLESTREAM_MAX_STR_LEN]; IStorageCompObj.dwCLSIDNameLength = OLESTREAM_MAX_STR_LEN; hErr = RegQueryValueA(hKey, NULL, strTemp, &(IStorageCompObj.dwCLSIDNameLength)); if(hErr == ERROR_SUCCESS) { strcpy(IStorageCompObj.strCLSIDName, strTemp); } RegCloseKey(hKey); } if(hErr != ERROR_SUCCESS) { hRes = REGDB_E_CLASSNOTREG; } } if(hRes == S_OK ) { /* Write CompObj Structure to stream */ hRes = IStream_Write(pStream, IStorageCompObj.byUnknown1, sizeof(IStorageCompObj.byUnknown1), NULL); hRes = IStream_Write(pStream, &(IStorageCompObj.clsid) , sizeof(IStorageCompObj.clsid ), NULL); hRes = IStream_Write(pStream, &(IStorageCompObj.dwCLSIDNameLength), sizeof(IStorageCompObj.dwCLSIDNameLength), NULL); if(IStorageCompObj.dwCLSIDNameLength > 0) { hRes = IStream_Write(pStream, IStorageCompObj.strCLSIDName, IStorageCompObj.dwCLSIDNameLength, NULL); } hRes = IStream_Write(pStream, &(IStorageCompObj.dwOleTypeNameLength) , sizeof(IStorageCompObj.dwOleTypeNameLength), NULL); if(IStorageCompObj.dwOleTypeNameLength > 0) { hRes = IStream_Write(pStream, IStorageCompObj.strOleTypeName , IStorageCompObj.dwOleTypeNameLength, NULL); } hRes = IStream_Write(pStream, &(IStorageCompObj.dwProgIDNameLength) , sizeof(IStorageCompObj.dwProgIDNameLength), NULL); if(IStorageCompObj.dwProgIDNameLength > 0) { hRes = IStream_Write(pStream, IStorageCompObj.strProgIDName , IStorageCompObj.dwProgIDNameLength, NULL); } hRes = IStream_Write(pStream, IStorageCompObj.byUnknown2 , sizeof(IStorageCompObj.byUnknown2), NULL); } IStream_Release(pStream); } return hRes; } /************************************************************************* * OLECONVERT_CreateOlePresStream[Internal] * * Creates the "\002OlePres000" Stream with the Metafile data * * PARAMS * pStorage [I] The dest IStorage to create \002OLEPres000 stream in. * dwExtentX [I] Width of the Metafile * dwExtentY [I] Height of the Metafile * pData [I] Metafile data * dwDataLength [I] Size of the Metafile data * * RETURNS * Success: S_OK * Failure: CONVERT10_E_OLESTREAM_PUT for invalid Put * * NOTES * This function is used by OleConvertOLESTREAMToIStorage only. * */ void OLECONVERT_CreateOlePresStream(LPSTORAGE pStorage, DWORD dwExtentX, DWORD dwExtentY , BYTE *pData, DWORD dwDataLength) { HRESULT hRes; IStream *pStream; WCHAR wstrStreamName[] = {2, 'O', 'l', 'e', 'P', 'r', 'e', 's', '0', '0', '0', 0}; BYTE pOlePresStreamHeader [] = { 0xFF, 0xFF, 0xFF, 0xFF, 0x03, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0xFF, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 }; BYTE pOlePresStreamHeaderEmpty [] = { 0x00, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0xFF, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 }; /* Create the OlePres000 Stream */ hRes = IStorage_CreateStream(pStorage, wstrStreamName, STGM_CREATE | STGM_WRITE | STGM_SHARE_EXCLUSIVE, 0, 0, &pStream ); if(hRes == S_OK) { DWORD nHeaderSize; OLECONVERT_ISTORAGE_OLEPRES OlePres; memset(&OlePres, 0, sizeof(OlePres)); /* Do we have any metafile data to save */ if(dwDataLength > 0) { memcpy(OlePres.byUnknown1, pOlePresStreamHeader, sizeof(pOlePresStreamHeader)); nHeaderSize = sizeof(pOlePresStreamHeader); } else { memcpy(OlePres.byUnknown1, pOlePresStreamHeaderEmpty, sizeof(pOlePresStreamHeaderEmpty)); nHeaderSize = sizeof(pOlePresStreamHeaderEmpty); } /* Set width and height of the metafile */ OlePres.dwExtentX = dwExtentX; OlePres.dwExtentY = -dwExtentY; /* Set Data and Lenght */ if(dwDataLength > sizeof(METAFILEPICT16)) { OlePres.dwSize = dwDataLength - sizeof(METAFILEPICT16); OlePres.pData = &(pData[8]); } /* Save OlePres000 Data to Stream */ hRes = IStream_Write(pStream, OlePres.byUnknown1, nHeaderSize, NULL); hRes = IStream_Write(pStream, &(OlePres.dwExtentX), sizeof(OlePres.dwExtentX), NULL); hRes = IStream_Write(pStream, &(OlePres.dwExtentY), sizeof(OlePres.dwExtentY), NULL); hRes = IStream_Write(pStream, &(OlePres.dwSize), sizeof(OlePres.dwSize), NULL); if(OlePres.dwSize > 0) { hRes = IStream_Write(pStream, OlePres.pData, OlePres.dwSize, NULL); } IStream_Release(pStream); } } /************************************************************************* * OLECONVERT_CreateOle10NativeStream [Internal] * * Creates the "\001Ole10Native" Stream (should contain a BMP) * * PARAMS * pStorage [I] Dest storage to create the stream in * pData [I] Ole10 Native Data (ex. bmp) * dwDataLength [I] Size of the Ole10 Native Data * * RETURNS * Nothing * * NOTES * This function is used by OleConvertOLESTREAMToIStorage only. * * Might need to verify the data and return appropriate error message * */ void OLECONVERT_CreateOle10NativeStream(LPSTORAGE pStorage, BYTE *pData, DWORD dwDataLength) { HRESULT hRes; IStream *pStream; WCHAR wstrStreamName[] = {1, 'O', 'l', 'e', '1', '0', 'N', 'a', 't', 'i', 'v', 'e', 0}; /* Create the Ole10Native Stream */ hRes = IStorage_CreateStream(pStorage, wstrStreamName, STGM_CREATE | STGM_WRITE | STGM_SHARE_EXCLUSIVE, 0, 0, &pStream ); if(hRes == S_OK) { /* Write info to stream */ hRes = IStream_Write(pStream, &dwDataLength, sizeof(dwDataLength), NULL); hRes = IStream_Write(pStream, pData, dwDataLength, NULL); IStream_Release(pStream); } } /************************************************************************* * OLECONVERT_GetOLE10ProgID [Internal] * * Finds the ProgID (or OleTypeID) from the IStorage * * PARAMS * pStorage [I] The Src IStorage to get the ProgID * strProgID [I] the ProgID string to get * dwSize [I] the size of the string * * RETURNS * Success: S_OK * Failure: REGDB_E_CLASSNOTREG if cannot reconstruct the stream * * NOTES * This function is used by OleConvertIStorageToOLESTREAM only. * * */ HRESULT OLECONVERT_GetOLE10ProgID(LPSTORAGE pStorage, char *strProgID, DWORD *dwSize) { HRESULT hRes; IStream *pStream; LARGE_INTEGER iSeekPos; OLECONVERT_ISTORAGE_COMPOBJ CompObj; WCHAR wstrStreamName[] = {1,'C', 'o', 'm', 'p', 'O', 'b', 'j', 0}; /* Open the CompObj Stream */ hRes = IStorage_OpenStream(pStorage, wstrStreamName, NULL, STGM_READ | STGM_SHARE_EXCLUSIVE, 0, &pStream ); if(hRes == S_OK) { /*Get the OleType from the CompObj Stream */ iSeekPos.s.LowPart = sizeof(CompObj.byUnknown1) + sizeof(CompObj.clsid); iSeekPos.s.HighPart = 0; IStream_Seek(pStream, iSeekPos, STREAM_SEEK_SET, NULL); IStream_Read(pStream, &CompObj.dwCLSIDNameLength, sizeof(CompObj.dwCLSIDNameLength), NULL); iSeekPos.s.LowPart = CompObj.dwCLSIDNameLength; IStream_Seek(pStream, iSeekPos, STREAM_SEEK_CUR , NULL); IStream_Read(pStream, &CompObj.dwOleTypeNameLength, sizeof(CompObj.dwOleTypeNameLength), NULL); iSeekPos.s.LowPart = CompObj.dwOleTypeNameLength; IStream_Seek(pStream, iSeekPos, STREAM_SEEK_CUR , NULL); IStream_Read(pStream, dwSize, sizeof(*dwSize), NULL); if(*dwSize > 0) { IStream_Read(pStream, strProgID, *dwSize, NULL); } IStream_Release(pStream); } else { STATSTG stat; LPOLESTR wstrProgID; /* Get the OleType from the registry */ REFCLSID clsid = &(stat.clsid); IStorage_Stat(pStorage, &stat, STATFLAG_NONAME); hRes = ProgIDFromCLSID(clsid, &wstrProgID); if(hRes == S_OK) { *dwSize = WideCharToMultiByte(CP_ACP, 0, wstrProgID, -1, strProgID, *dwSize, NULL, FALSE); } } return hRes; } /************************************************************************* * OLECONVERT_GetOle10PresData [Internal] * * Converts IStorage "/001Ole10Native" stream to a OLE10 Stream * * PARAMS * pStorage [I] Src IStroage * pOleStream [I] Dest OleStream Mem Struct * * RETURNS * Nothing * * NOTES * This function is used by OleConvertIStorageToOLESTREAM only. * * Memory allocated for pData must be freed by the caller * * */ void OLECONVERT_GetOle10PresData(LPSTORAGE pStorage, OLECONVERT_OLESTREAM_DATA *pOleStreamData) { HRESULT hRes; IStream *pStream; WCHAR wstrStreamName[] = {1, 'O', 'l', 'e', '1', '0', 'N', 'a', 't', 'i', 'v', 'e', 0}; /* Initialize Default data for OLESTREAM */ pOleStreamData[0].dwOleID = OLESTREAM_ID; pOleStreamData[0].dwTypeID = 2; pOleStreamData[1].dwOleID = OLESTREAM_ID; pOleStreamData[1].dwTypeID = 0; pOleStreamData[0].dwMetaFileWidth = 0; pOleStreamData[0].dwMetaFileHeight = 0; pOleStreamData[0].pData = NULL; pOleStreamData[1].pData = NULL; /* Open Ole10Native Stream */ hRes = IStorage_OpenStream(pStorage, wstrStreamName, NULL, STGM_READ | STGM_SHARE_EXCLUSIVE, 0, &pStream ); if(hRes == S_OK) { /* Read Size and Data */ IStream_Read(pStream, &(pOleStreamData->dwDataLength), sizeof(pOleStreamData->dwDataLength), NULL); if(pOleStreamData->dwDataLength > 0) { pOleStreamData->pData = (LPSTR) HeapAlloc(GetProcessHeap(),0,pOleStreamData->dwDataLength); IStream_Read(pStream, pOleStreamData->pData, pOleStreamData->dwDataLength, NULL); } IStream_Release(pStream); } } /************************************************************************* * OLECONVERT_GetOle20PresData[Internal] * * Converts IStorage "/002OlePres000" stream to a OLE10 Stream * * PARAMS * pStorage [I] Src IStroage * pOleStreamData [I] Dest OleStream Mem Struct * * RETURNS * Nothing * * NOTES * This function is used by OleConvertIStorageToOLESTREAM only. * * Memory allocated for pData must be freed by the caller */ void OLECONVERT_GetOle20PresData(LPSTORAGE pStorage, OLECONVERT_OLESTREAM_DATA *pOleStreamData) { HRESULT hRes; IStream *pStream; OLECONVERT_ISTORAGE_OLEPRES olePress; WCHAR wstrStreamName[] = {2, 'O', 'l', 'e', 'P', 'r', 'e', 's', '0', '0', '0', 0}; /* Initialize Default data for OLESTREAM */ pOleStreamData[0].dwOleID = OLESTREAM_ID; pOleStreamData[0].dwTypeID = 2; pOleStreamData[0].dwMetaFileWidth = 0; pOleStreamData[0].dwMetaFileHeight = 0; pOleStreamData[0].dwDataLength = OLECONVERT_WriteOLE20ToBuffer(pStorage, &(pOleStreamData[0].pData)); pOleStreamData[1].dwOleID = OLESTREAM_ID; pOleStreamData[1].dwTypeID = 0; pOleStreamData[1].dwOleTypeNameLength = 0; pOleStreamData[1].strOleTypeName[0] = 0; pOleStreamData[1].dwMetaFileWidth = 0; pOleStreamData[1].dwMetaFileHeight = 0; pOleStreamData[1].pData = NULL; pOleStreamData[1].dwDataLength = 0; /* Open OlePress000 stream */ hRes = IStorage_OpenStream(pStorage, wstrStreamName, NULL, STGM_READ | STGM_SHARE_EXCLUSIVE, 0, &pStream ); if(hRes == S_OK) { LARGE_INTEGER iSeekPos; METAFILEPICT16 MetaFilePict; char strMetafilePictName[] = "METAFILEPICT"; /* Set the TypeID for a Metafile */ pOleStreamData[1].dwTypeID = 5; /* Set the OleTypeName to Metafile */ pOleStreamData[1].dwOleTypeNameLength = strlen(strMetafilePictName) +1; strcpy(pOleStreamData[1].strOleTypeName, strMetafilePictName); iSeekPos.s.HighPart = 0; iSeekPos.s.LowPart = sizeof(olePress.byUnknown1); /* Get Presentation Data */ IStream_Seek(pStream, iSeekPos, STREAM_SEEK_SET, NULL); IStream_Read(pStream, &(olePress.dwExtentX), sizeof(olePress.dwExtentX), NULL); IStream_Read(pStream, &(olePress.dwExtentY), sizeof(olePress.dwExtentY), NULL); IStream_Read(pStream, &(olePress.dwSize), sizeof(olePress.dwSize), NULL); /*Set width and Height */ pOleStreamData[1].dwMetaFileWidth = olePress.dwExtentX; pOleStreamData[1].dwMetaFileHeight = -olePress.dwExtentY; if(olePress.dwSize > 0) { /* Set Length */ pOleStreamData[1].dwDataLength = olePress.dwSize + sizeof(METAFILEPICT16); /* Set MetaFilePict struct */ MetaFilePict.mm = 8; MetaFilePict.xExt = olePress.dwExtentX; MetaFilePict.yExt = olePress.dwExtentY; MetaFilePict.hMF = 0; /* Get Metafile Data */ pOleStreamData[1].pData = (BYTE *) HeapAlloc(GetProcessHeap(),0,pOleStreamData[1].dwDataLength); memcpy(pOleStreamData[1].pData, &MetaFilePict, sizeof(MetaFilePict)); IStream_Read(pStream, &(pOleStreamData[1].pData[sizeof(MetaFilePict)]), pOleStreamData[1].dwDataLength-sizeof(METAFILEPICT16), NULL); } IStream_Release(pStream); } } /************************************************************************* * OleConvertOLESTREAMToIStorage [OLE32.87] * * Read info on MSDN * * TODO * DVTARGETDEVICE paramenter is not handled * Still unsure of some mem fields for OLE 10 Stream * Still some unknowns for the IStorage: "\002OlePres000", "\001CompObj", * and "\001OLE" streams * */ HRESULT WINAPI OleConvertOLESTREAMToIStorage ( LPOLESTREAM pOleStream, LPSTORAGE pstg, const DVTARGETDEVICE* ptd) { int i; HRESULT hRes=S_OK; OLECONVERT_OLESTREAM_DATA pOleStreamData[2]; memset(pOleStreamData, 0, sizeof(pOleStreamData)); if(ptd != NULL) { FIXME("DVTARGETDEVICE is not NULL, unhandled parameter\n"); } if(pstg == NULL || pOleStream == NULL) { hRes = E_INVALIDARG; } if(hRes == S_OK) { /* Load the OLESTREAM to Memory */ hRes = OLECONVERT_LoadOLE10(pOleStream, &pOleStreamData[0], TRUE); } if(hRes == S_OK) { /* Load the OLESTREAM to Memory (part 2)*/ hRes = OLECONVERT_LoadOLE10(pOleStream, &pOleStreamData[1], FALSE); } if(hRes == S_OK) { if(pOleStreamData[0].dwDataLength > sizeof(STORAGE_magic)) { /* Do we have the IStorage Data in the OLESTREAM */ if(memcmp(pOleStreamData[0].pData, STORAGE_magic, sizeof(STORAGE_magic)) ==0) { OLECONVERT_GetOLE20FromOLE10(pstg, pOleStreamData[0].pData, pOleStreamData[0].dwDataLength); OLECONVERT_CreateOlePresStream(pstg, pOleStreamData[1].dwMetaFileWidth, pOleStreamData[1].dwMetaFileHeight, pOleStreamData[1].pData, pOleStreamData[1].dwDataLength); } else { /* It must be an original OLE 1.0 source */ OLECONVERT_CreateOle10NativeStream(pstg, pOleStreamData[0].pData, pOleStreamData[0].dwDataLength); } } else { /* It must be an original OLE 1.0 source */ OLECONVERT_CreateOle10NativeStream(pstg, pOleStreamData[0].pData, pOleStreamData[0].dwDataLength); } /* Create CompObj Stream if necessary */ hRes = OLECONVERT_CreateCompObjStream(pstg, pOleStreamData[0].strOleTypeName); if(hRes == S_OK) { /*Create the Ole Stream if necessary */ OLECONVERT_CreateOleStream(pstg); } } /* Free allocated memory */ for(i=0; i < 2; i++) { if(pOleStreamData[i].pData != NULL) { HeapFree(GetProcessHeap(),0,pOleStreamData[i].pData); } if(pOleStreamData[i].pstrOleObjFileName != NULL) { HeapFree(GetProcessHeap(),0,pOleStreamData[i].pstrOleObjFileName); pOleStreamData[i].pstrOleObjFileName = NULL; } } return hRes; } /************************************************************************* * OleConvertIStorageToOLESTREAM [OLE32.85] * * Read info on MSDN * * Read info on MSDN * * TODO * Still unsure of some mem fields for OLE 10 Stream * Still some unknowns for the IStorage: "\002OlePres000", "\001CompObj", * and "\001OLE" streams. * */ HRESULT WINAPI OleConvertIStorageToOLESTREAM ( LPSTORAGE pstg, LPOLESTREAM pOleStream) { int i; HRESULT hRes = S_OK; IStream *pStream; OLECONVERT_OLESTREAM_DATA pOleStreamData[2]; WCHAR wstrStreamName[] = {1, 'O', 'l', 'e', '1', '0', 'N', 'a', 't', 'i', 'v', 'e', 0}; memset(pOleStreamData, 0, sizeof(pOleStreamData)); if(pstg == NULL || pOleStream == NULL) { hRes = E_INVALIDARG; } if(hRes == S_OK) { /* Get the ProgID */ pOleStreamData[0].dwOleTypeNameLength = OLESTREAM_MAX_STR_LEN; hRes = OLECONVERT_GetOLE10ProgID(pstg, pOleStreamData[0].strOleTypeName, &(pOleStreamData[0].dwOleTypeNameLength)); } if(hRes == S_OK) { /*Was it originaly Ole10 */ hRes = IStorage_OpenStream(pstg, wstrStreamName, 0, STGM_READ | STGM_SHARE_EXCLUSIVE, 0, &pStream); if(hRes == S_OK) { IStream_Release(pStream); /*Get Presentation Data for Ole10Native */ OLECONVERT_GetOle10PresData(pstg, pOleStreamData); } else { /*Get Presentation Data (OLE20)*/ OLECONVERT_GetOle20PresData(pstg, pOleStreamData); } /* Save OLESTREAM */ hRes = OLECONVERT_SaveOLE10(&(pOleStreamData[0]), pOleStream); if(hRes == S_OK) { hRes = OLECONVERT_SaveOLE10(&(pOleStreamData[1]), pOleStream); } } /* Free allocated memory */ for(i=0; i < 2; i++) { if(pOleStreamData[i].pData != NULL) { HeapFree(GetProcessHeap(),0,pOleStreamData[i].pData); } } return hRes; } wine-20000526/dlls/ole32/storage32.h0100644000175000001440000006505707066755706016345 0ustar julliardusers/* * Compound Storage (32 bit version) * * Implemented using the documentation of the LAOLA project at * * (Thanks to Martin Schwartz ) * * This include file contains definitions of types and function * prototypes that are used in the many files implementing the * storage functionality * * Copyright 1998,1999 Francis Beaudet * Copyright 1998,1999 Thuy Nguyen */ #ifndef __STORAGE32_H__ #define __STORAGE32_H__ #include "wtypes.h" #include "winnt.h" #include "wine/obj_storage.h" /* * Definitions for the file format offsets. */ static const ULONG OFFSET_BIGBLOCKSIZEBITS = 0x0000001e; static const ULONG OFFSET_SMALLBLOCKSIZEBITS = 0x00000020; static const ULONG OFFSET_BBDEPOTCOUNT = 0x0000002C; static const ULONG OFFSET_ROOTSTARTBLOCK = 0x00000030; static const ULONG OFFSET_SBDEPOTSTART = 0x0000003C; static const ULONG OFFSET_EXTBBDEPOTSTART = 0x00000044; static const ULONG OFFSET_EXTBBDEPOTCOUNT = 0x00000048; static const ULONG OFFSET_BBDEPOTSTART = 0x0000004C; static const ULONG OFFSET_PS_NAME = 0x00000000; static const ULONG OFFSET_PS_NAMELENGTH = 0x00000040; static const ULONG OFFSET_PS_PROPERTYTYPE = 0x00000042; static const ULONG OFFSET_PS_PREVIOUSPROP = 0x00000044; static const ULONG OFFSET_PS_NEXTPROP = 0x00000048; static const ULONG OFFSET_PS_DIRPROP = 0x0000004C; static const ULONG OFFSET_PS_GUID = 0x00000050; static const ULONG OFFSET_PS_TSS1 = 0x00000064; static const ULONG OFFSET_PS_TSD1 = 0x00000068; static const ULONG OFFSET_PS_TSS2 = 0x0000006C; static const ULONG OFFSET_PS_TSD2 = 0x00000070; static const ULONG OFFSET_PS_STARTBLOCK = 0x00000074; static const ULONG OFFSET_PS_SIZE = 0x00000078; static const WORD DEF_BIG_BLOCK_SIZE_BITS = 0x0009; static const WORD DEF_SMALL_BLOCK_SIZE_BITS = 0x0006; static const WORD DEF_BIG_BLOCK_SIZE = 0x0200; static const WORD DEF_SMALL_BLOCK_SIZE = 0x0040; static const ULONG BLOCK_EXTBBDEPOT = 0xFFFFFFFC; static const ULONG BLOCK_SPECIAL = 0xFFFFFFFD; static const ULONG BLOCK_END_OF_CHAIN = 0xFFFFFFFE; static const ULONG BLOCK_UNUSED = 0xFFFFFFFF; static const ULONG PROPERTY_NULL = 0xFFFFFFFF; #define PROPERTY_NAME_MAX_LEN 0x20 #define PROPERTY_NAME_BUFFER_LEN 0x40 #define PROPSET_BLOCK_SIZE 0x00000080 /* * Property type of relation */ #define PROPERTY_RELATION_PREVIOUS 0 #define PROPERTY_RELATION_NEXT 1 #define PROPERTY_RELATION_DIR 2 /* * Property type constants */ #define PROPTYPE_STORAGE 0x01 #define PROPTYPE_STREAM 0x02 #define PROPTYPE_ROOT 0x05 /* * These defines assume a hardcoded blocksize. The code will assert * if the blocksize is different. Some changes will have to be done if it * becomes the case. */ #define BIG_BLOCK_SIZE 0x200 #define COUNT_BBDEPOTINHEADER 109 #define LIMIT_TO_USE_SMALL_BLOCK 0x1000 #define NUM_BLOCKS_PER_DEPOT_BLOCK 128 /* * These are signatures to detect the type of Document file. */ static const BYTE STORAGE_magic[8] ={0xd0,0xcf,0x11,0xe0,0xa1,0xb1,0x1a,0xe1}; static const BYTE STORAGE_oldmagic[8] ={0xd0,0xcf,0x11,0xe0,0x0e,0x11,0xfc,0x0d}; /* * Forward declarations of all the structures used by the storage * module. */ typedef struct StorageBaseImpl StorageBaseImpl; typedef struct StorageImpl StorageImpl; typedef struct StorageInternalImpl StorageInternalImpl; typedef struct BlockChainStream BlockChainStream; typedef struct SmallBlockChainStream SmallBlockChainStream; typedef struct IEnumSTATSTGImpl IEnumSTATSTGImpl; typedef struct StgProperty StgProperty; typedef struct StgStreamImpl StgStreamImpl; /* * This utility structure is used to read/write the information in a storage * property. */ struct StgProperty { WCHAR name[PROPERTY_NAME_MAX_LEN]; WORD sizeOfNameString; BYTE propertyType; ULONG previousProperty; ULONG nextProperty; ULONG dirProperty; GUID propertyUniqueID; ULONG timeStampS1; ULONG timeStampD1; ULONG timeStampS2; ULONG timeStampD2; ULONG startingBlock; ULARGE_INTEGER size; }; /************************************************************************* * Big Block File support * * The big block file is an abstraction of a flat file separated in * same sized blocks. The implementation for the methods described in * this section appear in stg_bigblockfile.c */ /* * Declaration of the data structures */ typedef struct BigBlockFile BigBlockFile,*LPBIGBLOCKFILE; typedef struct MappedPage MappedPage,*LPMAPPEDPAGE; struct BigBlockFile { BOOL fileBased; ULARGE_INTEGER filesize; ULONG blocksize; HANDLE hfile; HANDLE hfilemap; DWORD flProtect; MappedPage *maplist; MappedPage *victimhead, *victimtail; ULONG num_victim_pages; ILockBytes *pLkbyt; HGLOBAL hbytearray; LPVOID pbytearray; }; /* * Declaration of the functions used to manipulate the BigBlockFile * data structure. */ BigBlockFile* BIGBLOCKFILE_Construct(HANDLE hFile, ILockBytes* pLkByt, DWORD openFlags, ULONG blocksize, BOOL fileBased); void BIGBLOCKFILE_Destructor(LPBIGBLOCKFILE This); void* BIGBLOCKFILE_GetBigBlock(LPBIGBLOCKFILE This, ULONG index); void* BIGBLOCKFILE_GetROBigBlock(LPBIGBLOCKFILE This, ULONG index); void BIGBLOCKFILE_ReleaseBigBlock(LPBIGBLOCKFILE This, void *pBlock); void BIGBLOCKFILE_SetSize(LPBIGBLOCKFILE This, ULARGE_INTEGER newSize); ULARGE_INTEGER BIGBLOCKFILE_GetSize(LPBIGBLOCKFILE This); /************************************************************************* * Ole Convert support */ void OLECONVERT_CreateOleStream(LPSTORAGE pStorage); HRESULT OLECONVERT_CreateCompObjStream(LPSTORAGE pStorage, LPCSTR strOleTypeName); /**************************************************************************** * Storage32BaseImpl definitions. * * This stucture defines the base information contained in all implementations * of IStorage32 contained in this filee storage implementation. * * In OOP terms, this is the base class for all the IStorage32 implementations * contained in this file. */ struct StorageBaseImpl { ICOM_VFIELD(IStorage); /* Needs to be the first item in the stuct * since we want to cast this in a Storage32 pointer */ /* * Reference count of this object */ ULONG ref; /* * Ancestor storage (top level) */ StorageImpl* ancestorStorage; /* * Index of the property for the root of * this storage */ ULONG rootPropertySetIndex; /* * virtual Destructor method. */ void (*v_destructor)(StorageBaseImpl*); }; /* * Prototypes for the methods of the Storage32BaseImpl class. */ HRESULT WINAPI StorageBaseImpl_QueryInterface( IStorage* iface, REFIID riid, void** ppvObject); ULONG WINAPI StorageBaseImpl_AddRef( IStorage* iface); ULONG WINAPI StorageBaseImpl_Release( IStorage* iface); HRESULT WINAPI StorageBaseImpl_OpenStream( IStorage* iface, const OLECHAR* pwcsName, /* [string][in] */ void* reserved1, /* [unique][in] */ DWORD grfMode, /* [in] */ DWORD reserved2, /* [in] */ IStream** ppstm); /* [out] */ HRESULT WINAPI StorageBaseImpl_OpenStorage( IStorage* iface, const OLECHAR* pwcsName, /* [string][unique][in] */ IStorage* pstgPriority, /* [unique][in] */ DWORD grfMode, /* [in] */ SNB snbExclude, /* [unique][in] */ DWORD reserved, /* [in] */ IStorage** ppstg); /* [out] */ HRESULT WINAPI StorageBaseImpl_EnumElements( IStorage* iface, DWORD reserved1, /* [in] */ void* reserved2, /* [size_is][unique][in] */ DWORD reserved3, /* [in] */ IEnumSTATSTG** ppenum); /* [out] */ HRESULT WINAPI StorageBaseImpl_Stat( IStorage* iface, STATSTG* pstatstg, /* [out] */ DWORD grfStatFlag); /* [in] */ HRESULT WINAPI StorageBaseImpl_RenameElement( IStorage* iface, const OLECHAR* pwcsOldName, /* [string][in] */ const OLECHAR* pwcsNewName); /* [string][in] */ HRESULT WINAPI StorageBaseImpl_CreateStream( IStorage* iface, const OLECHAR* pwcsName, /* [string][in] */ DWORD grfMode, /* [in] */ DWORD reserved1, /* [in] */ DWORD reserved2, /* [in] */ IStream** ppstm); /* [out] */ HRESULT WINAPI StorageBaseImpl_SetClass( IStorage* iface, REFCLSID clsid); /* [in] */ /**************************************************************************** * Storage32Impl definitions. * * This implementation of the IStorage32 interface represents a root * storage. Basically, a document file. */ struct StorageImpl { ICOM_VFIELD(IStorage); /* Needs to be the first item in the stuct * since we want to cast this in a Storage32 pointer */ /* * Declare the member of the Storage32BaseImpl class to allow * casting as a Storage32BaseImpl */ ULONG ref; struct StorageImpl* ancestorStorage; ULONG rootPropertySetIndex; void (*v_destructor)(struct StorageImpl*); /* * The following data members are specific to the Storage32Impl * class */ HANDLE hFile; /* Physical support for the Docfile */ /* * File header */ WORD bigBlockSizeBits; WORD smallBlockSizeBits; ULONG bigBlockSize; ULONG smallBlockSize; ULONG bigBlockDepotCount; ULONG rootStartBlock; ULONG smallBlockDepotStart; ULONG extBigBlockDepotStart; ULONG extBigBlockDepotCount; ULONG bigBlockDepotStart[COUNT_BBDEPOTINHEADER]; ULONG blockDepotCached[NUM_BLOCKS_PER_DEPOT_BLOCK]; ULONG indexBlockDepotCached; ULONG prevFreeBlock; /* * Abstraction of the big block chains for the chains of the header. */ BlockChainStream* rootBlockChain; BlockChainStream* smallBlockDepotChain; BlockChainStream* smallBlockRootChain; /* * Pointer to the big block file abstraction */ BigBlockFile* bigBlockFile; }; /* * Method declaration for the Storage32Impl class */ HRESULT WINAPI StorageImpl_CreateStorage( IStorage* iface, const OLECHAR* pwcsName, /* [string][in] */ DWORD grfMode, /* [in] */ DWORD dwStgFmt, /* [in] */ DWORD reserved2, /* [in] */ IStorage** ppstg); /* [out] */ HRESULT WINAPI StorageImpl_CopyTo( IStorage* iface, DWORD ciidExclude, /* [in] */ const IID* rgiidExclude, /* [size_is][unique][in] */ SNB snbExclude, /* [unique][in] */ IStorage* pstgDest); /* [unique][in] */ HRESULT WINAPI StorageImpl_MoveElementTo( IStorage* iface, const OLECHAR* pwcsName, /* [string][in] */ IStorage* pstgDest, /* [unique][in] */ const OLECHAR* pwcsNewName, /* [string][in] */ DWORD grfFlags); /* [in] */ HRESULT WINAPI StorageImpl_Commit( IStorage* iface, DWORD grfCommitFlags); /* [in] */ HRESULT WINAPI StorageImpl_Revert( IStorage* iface); HRESULT WINAPI StorageImpl_DestroyElement( IStorage* iface, const OLECHAR* pwcsName); /* [string][in] */ HRESULT WINAPI StorageImpl_SetElementTimes( IStorage* iface, const OLECHAR* pwcsName, /* [string][in] */ const FILETIME* pctime, /* [in] */ const FILETIME* patime, /* [in] */ const FILETIME* pmtime); /* [in] */ HRESULT WINAPI StorageImpl_SetStateBits( IStorage* iface, DWORD grfStateBits, /* [in] */ DWORD grfMask); /* [in] */ void StorageImpl_Destroy( StorageImpl* This); HRESULT StorageImpl_Construct( StorageImpl* This, HANDLE hFile, ILockBytes* pLkbyt, DWORD openFlags, BOOL fileBased, BOOL fileCreate); BOOL StorageImpl_ReadBigBlock( StorageImpl* This, ULONG blockIndex, void* buffer); BOOL StorageImpl_WriteBigBlock( StorageImpl* This, ULONG blockIndex, void* buffer); void* StorageImpl_GetROBigBlock( StorageImpl* This, ULONG blockIndex); void* StorageImpl_GetBigBlock( StorageImpl* This, ULONG blockIndex); void StorageImpl_ReleaseBigBlock( StorageImpl* This, void* pBigBlock); ULONG StorageImpl_GetNextFreeBigBlock( StorageImpl* This); void StorageImpl_FreeBigBlock( StorageImpl* This, ULONG blockIndex); ULONG StorageImpl_GetNextBlockInChain( StorageImpl* This, ULONG blockIndex); void StorageImpl_SetNextBlockInChain( StorageImpl* This, ULONG blockIndex, ULONG nextBlock); HRESULT StorageImpl_LoadFileHeader( StorageImpl* This); void StorageImpl_SaveFileHeader( StorageImpl* This); BOOL StorageImpl_ReadProperty( StorageImpl* This, ULONG index, StgProperty* buffer); BOOL StorageImpl_WriteProperty( StorageImpl* This, ULONG index, StgProperty* buffer); BlockChainStream* Storage32Impl_SmallBlocksToBigBlocks( StorageImpl* This, SmallBlockChainStream** ppsbChain); ULONG Storage32Impl_GetNextExtendedBlock(StorageImpl* This, ULONG blockIndex); void Storage32Impl_AddBlockDepot(StorageImpl* This, ULONG blockIndex); ULONG Storage32Impl_AddExtBlockDepot(StorageImpl* This); ULONG Storage32Impl_GetExtDepotBlock(StorageImpl* This, ULONG depotIndex); void Storage32Impl_SetExtDepotBlock(StorageImpl* This, ULONG depotIndex, ULONG blockIndex); /**************************************************************************** * Storage32InternalImpl definitions. * * Definition of the implementation structure for the IStorage32 interface. * This one implements the IStorage32 interface for storage that are * inside another storage. */ struct StorageInternalImpl { ICOM_VFIELD(IStorage); /* Needs to be the first item in the stuct * since we want to cast this in a Storage32 pointer */ /* * Declare the member of the Storage32BaseImpl class to allow * casting as a Storage32BaseImpl */ ULONG ref; struct StorageImpl* ancestorStorage; ULONG rootPropertySetIndex; void (*v_destructor)(struct StorageInternalImpl*); /* * There is no specific data for this class. */ }; /* * Method definitions for the Storage32InternalImpl class. */ StorageInternalImpl* StorageInternalImpl_Construct( StorageImpl* ancestorStorage, ULONG rootTropertyIndex); void StorageInternalImpl_Destroy( StorageInternalImpl* This); HRESULT WINAPI StorageInternalImpl_Commit( IStorage* iface, DWORD grfCommitFlags); /* [in] */ HRESULT WINAPI StorageInternalImpl_Revert( IStorage* iface); /**************************************************************************** * IEnumSTATSTGImpl definitions. * * Definition of the implementation structure for the IEnumSTATSTGImpl interface. * This class allows iterating through the content of a storage and to find * specific items inside it. */ struct IEnumSTATSTGImpl { ICOM_VFIELD(IEnumSTATSTG); /* Needs to be the first item in the stuct * since we want to cast this in a IEnumSTATSTG pointer */ ULONG ref; /* Reference count */ StorageImpl* parentStorage; /* Reference to the parent storage */ ULONG firstPropertyNode; /* Index of the root of the storage to enumerate */ /* * The current implementation of the IEnumSTATSTGImpl class uses a stack * to walk the property sets to get the content of a storage. This stack * is implemented by the following 3 data members */ ULONG stackSize; ULONG stackMaxSize; ULONG* stackToVisit; #define ENUMSTATSGT_SIZE_INCREMENT 10 }; /* * Method definitions for the IEnumSTATSTGImpl class. */ HRESULT WINAPI IEnumSTATSTGImpl_QueryInterface( IEnumSTATSTG* iface, REFIID riid, void** ppvObject); ULONG WINAPI IEnumSTATSTGImpl_AddRef( IEnumSTATSTG* iface); ULONG WINAPI IEnumSTATSTGImpl_Release( IEnumSTATSTG* iface); HRESULT WINAPI IEnumSTATSTGImpl_Next( IEnumSTATSTG* iface, ULONG celt, STATSTG* rgelt, ULONG* pceltFetched); HRESULT WINAPI IEnumSTATSTGImpl_Skip( IEnumSTATSTG* iface, ULONG celt); HRESULT WINAPI IEnumSTATSTGImpl_Reset( IEnumSTATSTG* iface); HRESULT WINAPI IEnumSTATSTGImpl_Clone( IEnumSTATSTG* iface, IEnumSTATSTG** ppenum); IEnumSTATSTGImpl* IEnumSTATSTGImpl_Construct( StorageImpl* This, ULONG firstPropertyNode); void IEnumSTATSTGImpl_Destroy( IEnumSTATSTGImpl* This); void IEnumSTATSTGImpl_PushSearchNode( IEnumSTATSTGImpl* This, ULONG nodeToPush); ULONG IEnumSTATSTGImpl_PopSearchNode( IEnumSTATSTGImpl* This, BOOL remove); ULONG IEnumSTATSTGImpl_FindProperty( IEnumSTATSTGImpl* This, const OLECHAR* lpszPropName, StgProperty* buffer); INT IEnumSTATSTGImpl_FindParentProperty( IEnumSTATSTGImpl *This, ULONG childProperty, StgProperty *currentProperty, ULONG *propertyId); /**************************************************************************** * StgStreamImpl definitions. * * This class imlements the IStream32 inteface and represents a stream * located inside a storage object. */ struct StgStreamImpl { ICOM_VFIELD(IStream); /* Needs to be the first item in the stuct * since we want to cast this in a IStream pointer */ /* * Reference count */ ULONG ref; /* * Storage that is the parent(owner) of the stream */ StorageBaseImpl* parentStorage; /* * Access mode of this stream. */ DWORD grfMode; /* * Index of the property that owns (points to) this stream. */ ULONG ownerProperty; /* * Helper variable that contains the size of the stream */ ULARGE_INTEGER streamSize; /* * This is the current position of the cursor in the stream */ ULARGE_INTEGER currentPosition; /* * The information in the stream is represented by a chain of small blocks * or a chain of large blocks. Depending on the case, one of the two * following variabled points to that information. */ BlockChainStream* bigBlockChain; SmallBlockChainStream* smallBlockChain; }; /* * Method definition for the StgStreamImpl class. */ StgStreamImpl* StgStreamImpl_Construct( StorageBaseImpl* parentStorage, DWORD grfMode, ULONG ownerProperty); void StgStreamImpl_Destroy( StgStreamImpl* This); void StgStreamImpl_OpenBlockChain( StgStreamImpl* This); HRESULT WINAPI StgStreamImpl_QueryInterface( IStream* iface, REFIID riid, /* [in] */ void** ppvObject); /* [iid_is][out] */ ULONG WINAPI StgStreamImpl_AddRef( IStream* iface); ULONG WINAPI StgStreamImpl_Release( IStream* iface); HRESULT WINAPI StgStreamImpl_Read( IStream* iface, void* pv, /* [length_is][size_is][out] */ ULONG cb, /* [in] */ ULONG* pcbRead); /* [out] */ HRESULT WINAPI StgStreamImpl_Write( IStream* iface, const void* pv, /* [size_is][in] */ ULONG cb, /* [in] */ ULONG* pcbWritten); /* [out] */ HRESULT WINAPI StgStreamImpl_Seek( IStream* iface, LARGE_INTEGER dlibMove, /* [in] */ DWORD dwOrigin, /* [in] */ ULARGE_INTEGER* plibNewPosition); /* [out] */ HRESULT WINAPI StgStreamImpl_SetSize( IStream* iface, ULARGE_INTEGER libNewSize); /* [in] */ HRESULT WINAPI StgStreamImpl_CopyTo( IStream* iface, IStream* pstm, /* [unique][in] */ ULARGE_INTEGER cb, /* [in] */ ULARGE_INTEGER* pcbRead, /* [out] */ ULARGE_INTEGER* pcbWritten); /* [out] */ HRESULT WINAPI StgStreamImpl_Commit( IStream* iface, DWORD grfCommitFlags); /* [in] */ HRESULT WINAPI StgStreamImpl_Revert( IStream* iface); HRESULT WINAPI StgStreamImpl_LockRegion( IStream* iface, ULARGE_INTEGER libOffset, /* [in] */ ULARGE_INTEGER cb, /* [in] */ DWORD dwLockType); /* [in] */ HRESULT WINAPI StgStreamImpl_UnlockRegion( IStream* iface, ULARGE_INTEGER libOffset, /* [in] */ ULARGE_INTEGER cb, /* [in] */ DWORD dwLockType); /* [in] */ HRESULT WINAPI StgStreamImpl_Stat( IStream* iface, STATSTG* pstatstg, /* [out] */ DWORD grfStatFlag); /* [in] */ HRESULT WINAPI StgStreamImpl_Clone( IStream* iface, IStream** ppstm); /* [out] */ /******************************************************************************** * The StorageUtl_ functions are miscelaneous utility functions. Most of which are * abstractions used to read values from file buffers without having to worry * about bit order */ void StorageUtl_ReadWord(void* buffer, ULONG offset, WORD* value); void StorageUtl_WriteWord(void* buffer, ULONG offset, WORD value); void StorageUtl_ReadDWord(void* buffer, ULONG offset, DWORD* value); void StorageUtl_WriteDWord(void* buffer, ULONG offset, DWORD value); void StorageUtl_ReadGUID(void* buffer, ULONG offset, GUID* value); void StorageUtl_WriteGUID(void* buffer, ULONG offset, GUID* value); void StorageUtl_CopyPropertyToSTATSTG(STATSTG* destination, StgProperty* source, int statFlags); /**************************************************************************** * BlockChainStream definitions. * * The BlockChainStream class is a utility class that is used to create an * abstraction of the big block chains in the storage file. */ struct BlockChainStream { StorageImpl* parentStorage; ULONG* headOfStreamPlaceHolder; ULONG ownerPropertyIndex; ULONG lastBlockNoInSequence; ULONG lastBlockNoInSequenceIndex; ULONG tailIndex; ULONG numBlocks; }; /* * Methods for the BlockChainStream class. */ BlockChainStream* BlockChainStream_Construct( StorageImpl* parentStorage, ULONG* headOfStreamPlaceHolder, ULONG propertyIndex); void BlockChainStream_Destroy( BlockChainStream* This); ULONG BlockChainStream_GetHeadOfChain( BlockChainStream* This); BOOL BlockChainStream_ReadAt( BlockChainStream* This, ULARGE_INTEGER offset, ULONG size, void* buffer, ULONG* bytesRead); BOOL BlockChainStream_WriteAt( BlockChainStream* This, ULARGE_INTEGER offset, ULONG size, const void* buffer, ULONG* bytesWritten); BOOL BlockChainStream_SetSize( BlockChainStream* This, ULARGE_INTEGER newSize); ULARGE_INTEGER BlockChainStream_GetSize( BlockChainStream* This); ULONG BlockChainStream_GetCount( BlockChainStream* This); /**************************************************************************** * SmallBlockChainStream definitions. * * The SmallBlockChainStream class is a utility class that is used to create an * abstraction of the small block chains in the storage file. */ struct SmallBlockChainStream { StorageImpl* parentStorage; ULONG ownerPropertyIndex; }; /* * Methods of the SmallBlockChainStream class. */ SmallBlockChainStream* SmallBlockChainStream_Construct( StorageImpl* parentStorage, ULONG propertyIndex); void SmallBlockChainStream_Destroy( SmallBlockChainStream* This); ULONG SmallBlockChainStream_GetHeadOfChain( SmallBlockChainStream* This); ULONG SmallBlockChainStream_GetNextBlockInChain( SmallBlockChainStream* This, ULONG blockIndex); void SmallBlockChainStream_SetNextBlockInChain( SmallBlockChainStream* This, ULONG blockIndex, ULONG nextBlock); void SmallBlockChainStream_FreeBlock( SmallBlockChainStream* This, ULONG blockIndex); ULONG SmallBlockChainStream_GetNextFreeBlock( SmallBlockChainStream* This); BOOL SmallBlockChainStream_ReadAt( SmallBlockChainStream* This, ULARGE_INTEGER offset, ULONG size, void* buffer, ULONG* bytesRead); BOOL SmallBlockChainStream_WriteAt( SmallBlockChainStream* This, ULARGE_INTEGER offset, ULONG size, const void* buffer, ULONG* bytesWritten); BOOL SmallBlockChainStream_SetSize( SmallBlockChainStream* This, ULARGE_INTEGER newSize); ULARGE_INTEGER SmallBlockChainStream_GetSize( SmallBlockChainStream* This); ULONG SmallBlockChainStream_GetCount( SmallBlockChainStream* This); #endif /* __STORAGE32_H__ */ wine-20000526/dlls/oleaut32/0040755000175000001440000000000007113604204015036 5ustar julliarduserswine-20000526/dlls/oleaut32/.cvsignore0100644000175000001440000000006307045213573017043 0ustar julliardusers*.spec.c *.spec.glue.s Makefile liboleaut32.so.1.0 wine-20000526/dlls/oleaut32/Makefile.in0100644000175000001440000000060007077362067017115 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = oleaut32 SOVERSION = 1.0 ALTNAMES = ole2disp typelib IMPORTS = ole32 comctl32 SPEC_SRCS = oleaut32.spec ole2disp.spec typelib.spec C_SRCS = \ ole2disp.c \ oleaut.c \ olefont.c \ parsedt.c \ safearray.c \ stubs.c \ typelib.c \ variant.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/oleaut32/ole2disp.c0100644000175000001440000002610607070212245016727 0ustar julliardusers/* * OLE2DISP library * * Copyright 1995 Martin von Loewis */ #include #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "winerror.h" #include "olectl.h" #include "oleauto.h" #include "heap.h" #include "ldt.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ole); /* This implementation of the BSTR API is 16-bit only. It represents BSTR as a 16:16 far pointer, and the strings as ISO-8859 */ /****************************************************************************** * BSTR_AllocBytes [Internal] */ static BSTR16 BSTR_AllocBytes(int n) { void *ptr = SEGPTR_ALLOC(n); return (BSTR16)SEGPTR_GET(ptr); } /****************************************************************************** * BSTR_Free [INTERNAL] */ static void BSTR_Free(BSTR16 in) { SEGPTR_FREE( PTR_SEG_TO_LIN(in) ); } /****************************************************************************** * BSTR_GetAddr [INTERNAL] */ static void* BSTR_GetAddr(BSTR16 in) { return in ? PTR_SEG_TO_LIN(in) : 0; } /****************************************************************************** * SysAllocString16 [OLE2DISP.2] */ BSTR16 WINAPI SysAllocString16(LPCOLESTR16 in) { BSTR16 out=BSTR_AllocBytes(strlen(in)+1); if(!out)return 0; strcpy(BSTR_GetAddr(out),in); return out; } /****************************************************************************** * SysAllocString [OLEAUT32.2] */ BSTR WINAPI SysAllocString(LPCOLESTR in) { /* Delegate this to the SysAllocStringLen32 method. */ return SysAllocStringLen(in, lstrlenW(in)); } /****************************************************************************** * SysReAllocString16 [OLE2DISP.3] */ INT16 WINAPI SysReAllocString16(LPBSTR16 old,LPCOLESTR16 in) { BSTR16 new=SysAllocString16(in); BSTR_Free(*old); *old=new; return 1; } /****************************************************************************** * SysReAllocString [OLEAUT32.3] */ INT WINAPI SysReAllocString(LPBSTR old,LPCOLESTR in) { /* * Sanity check */ if (old==NULL) return 0; /* * Make sure we free the old string. */ if (*old!=NULL) SysFreeString(*old); /* * Allocate the new string */ *old = SysAllocString(in); return 1; } /****************************************************************************** * SysAllocStringLen16 [OLE2DISP.4] */ BSTR16 WINAPI SysAllocStringLen16(const char *in, int len) { BSTR16 out=BSTR_AllocBytes(len+1); if (!out) return 0; /* * Copy the information in the buffer. * Since it is valid to pass a NULL pointer here, we'll initialize the * buffer to nul if it is the case. */ if (in != 0) strcpy(BSTR_GetAddr(out),in); else memset(BSTR_GetAddr(out), 0, len+1); return out; } /****************************************************************************** * SysAllocStringLen [OLEAUT32.4] * * In "Inside OLE, second edition" by Kraig Brockshmidt. In the Automation * section, he describes the DWORD value placed before the BSTR data type. * he describes it as a "DWORD count of characters". By experimenting with * a windows application, this count seems to be a DWORD count of bytes in * the string. Meaning that the count is double the number of wide * characters in the string. */ BSTR WINAPI SysAllocStringLen(const OLECHAR *in, unsigned int len) { DWORD bufferSize; DWORD* newBuffer; WCHAR* stringBuffer; /* * Find the lenth of the buffer passed-in in bytes. */ bufferSize = len * sizeof (WCHAR); /* * Allocate a new buffer to hold the string. * dont't forget to keep an empty spot at the begining of the * buffer for the character count and an extra character at the * end for the NULL. */ newBuffer = (DWORD*)HeapAlloc(GetProcessHeap(), 0, bufferSize + sizeof(WCHAR) + sizeof(DWORD)); /* * If the memory allocation failed, return a null pointer. */ if (newBuffer==0) return 0; /* * Copy the length of the string in the placeholder. */ *newBuffer = bufferSize; /* * Skip the byte count. */ newBuffer++; /* * Copy the information in the buffer. * Since it is valid to pass a NULL pointer here, we'll initialize the * buffer to nul if it is the case. */ if (in != 0) memcpy(newBuffer, in, bufferSize); else memset(newBuffer, 0, bufferSize); /* * Make sure that there is a nul character at the end of the * string. */ stringBuffer = (WCHAR*)newBuffer; stringBuffer[len] = L'\0'; return (LPWSTR)stringBuffer; } /****************************************************************************** * SysReAllocStringLen16 [OLE2DISP.5] */ int WINAPI SysReAllocStringLen16(BSTR16 *old,const char *in,int len) { BSTR16 new=SysAllocStringLen16(in,len); BSTR_Free(*old); *old=new; return 1; } /****************************************************************************** * SysReAllocStringLen [OLEAUT32.5] */ int WINAPI SysReAllocStringLen(BSTR* old, const OLECHAR* in, unsigned int len) { /* * Sanity check */ if (old==NULL) return 0; /* * Make sure we free the old string. */ if (*old!=NULL) SysFreeString(*old); /* * Allocate the new string */ *old = SysAllocStringLen(in, len); return 1; } /****************************************************************************** * SysFreeString16 [OLE2DISP.6] */ void WINAPI SysFreeString16(BSTR16 in) { BSTR_Free(in); } /****************************************************************************** * SysFreeString [OLEAUT32.6] */ void WINAPI SysFreeString(BSTR in) { DWORD* bufferPointer; /* NULL is a valid parameter */ if(!in) return; /* * We have to be careful when we free a BSTR pointer, it points to * the beginning of the string but it skips the byte count contained * before the string. */ bufferPointer = (DWORD*)in; bufferPointer--; /* * Free the memory from it's "real" origin. */ HeapFree(GetProcessHeap(), 0, bufferPointer); } /****************************************************************************** * SysStringLen16 [OLE2DISP.7] */ int WINAPI SysStringLen16(BSTR16 str) { return strlen(BSTR_GetAddr(str)); } /****************************************************************************** * SysStringLen [OLEAUT32.7] * * The Windows documentation states that the length returned by this function * is not necessarely the same as the length returned by the _lstrlenW method. * It is the same number that was passed in as the "len" parameter if the * string was allocated with a SysAllocStringLen method call. */ int WINAPI SysStringLen(BSTR str) { DWORD* bufferPointer; if (!str) return 0; /* * The length of the string (in bytes) is contained in a DWORD placed * just before the BSTR pointer */ bufferPointer = (DWORD*)str; bufferPointer--; return (int)(*bufferPointer/sizeof(WCHAR)); } /****************************************************************************** * SysStringByteLen [OLEAUT32.149] * * The Windows documentation states that the length returned by this function * is not necessarely the same as the length returned by the _lstrlenW method. * It is the same number that was passed in as the "len" parameter if the * string was allocated with a SysAllocStringLen method call. */ int WINAPI SysStringByteLen(BSTR str) { return SysStringLen(str)*sizeof(WCHAR); } /****************************************************************************** * CreateDispTypeInfo [OLE2DISP.31] */ HRESULT WINAPI CreateDispTypeInfo16( INTERFACEDATA *pidata, LCID lcid, ITypeInfo **pptinfo ) { FIXME("(%p,%ld,%p),stub\n",pidata,lcid,pptinfo); return 0; } /****************************************************************************** * RegisterActiveObject [OLE2DISP.35] */ HRESULT WINAPI RegisterActiveObject16( IUnknown *punk, REFCLSID rclsid, DWORD dwFlags, unsigned long *pdwRegister ) { FIXME("(%p,%s,0x%08lx,%p):stub\n",punk,debugstr_guid(rclsid),dwFlags,pdwRegister); return 0; } /****************************************************************************** * OleTranslateColor [OLEAUT32.421] * * Converts an OLE_COLOR to a COLORREF. * See the documentation for conversion rules. * pColorRef can be NULL. In that case the user only wants to test the * conversion. */ HRESULT WINAPI OleTranslateColor( OLE_COLOR clr, HPALETTE hpal, COLORREF* pColorRef) { COLORREF colorref; BYTE b = HIBYTE(HIWORD(clr)); TRACE("(%08lx, %d, %p):stub\n", clr, hpal, pColorRef); /* * In case pColorRef is NULL, provide our own to simplify the code. */ if (pColorRef == NULL) pColorRef = &colorref; switch (b) { case 0x00: { if (hpal != 0) *pColorRef = PALETTERGB(GetRValue(clr), GetGValue(clr), GetBValue(clr)); else *pColorRef = clr; break; } case 0x01: { if (hpal != 0) { PALETTEENTRY pe; /* * Validate the palette index. */ if (GetPaletteEntries(hpal, LOWORD(clr), 1, &pe) == 0) return E_INVALIDARG; } *pColorRef = clr; break; } case 0x02: *pColorRef = clr; break; case 0x80: { int index = LOBYTE(LOWORD(clr)); /* * Validate GetSysColor index. */ if ((index < COLOR_SCROLLBAR) || (index > COLOR_GRADIENTINACTIVECAPTION)) return E_INVALIDARG; *pColorRef = GetSysColor(index); break; } default: return E_INVALIDARG; } return S_OK; } /****************************************************************************** * SysAllocStringByteLen [OLEAUT32.150] * */ BSTR WINAPI SysAllocStringByteLen(char *in, int len) { DWORD* newBuffer; char* stringBuffer; /* * Allocate a new buffer to hold the string. * dont't forget to keep an empty spot at the begining of the * buffer for the character count and an extra character at the * end for the NULL. */ newBuffer = (DWORD*)HeapAlloc(GetProcessHeap(), 0, len + sizeof(WCHAR) + sizeof(DWORD)); /* * If the memory allocation failed, return a null pointer. */ if (newBuffer==0) return 0; /* * Copy the length of the string in the placeholder. */ *newBuffer = len; /* * Skip the byte count. */ newBuffer++; /* * Copy the information in the buffer. * Since it is valid to pass a NULL pointer here, we'll initialize the * buffer to nul if it is the case. */ if (in != 0) memcpy(newBuffer, in, len); /* * Make sure that there is a nul character at the end of the * string. */ stringBuffer = (char *)newBuffer; stringBuffer[len] = 0; stringBuffer[len+1] = 0; return (LPWSTR)stringBuffer; } wine-20000526/dlls/oleaut32/ole2disp.spec0100644000175000001440000000655006771226505017453 0ustar julliardusersname ole2disp type win16 1 stub DLLGETCLASSOBJECT 2 pascal SysAllocString(str) SysAllocString16 3 pascal SysReallocString(ptr str) SysReAllocString16 4 pascal SysAllocStringLen(str word) SysAllocStringLen16 5 pascal SysReAllocStringLen(ptr str word) SysReAllocStringLen16 6 pascal SysFreeString(segstr) SysFreeString16 7 pascal SysStringLen(segstr) SysStringLen16 8 stub VARIANTINIT 9 stub VARIANTCLEAR 10 stub VARIANTCOPY 11 stub VARIANTCOPYIND 12 stub VARIANTCHANGETYPE 13 stub VARIANTTIMETODOSDATETIME 14 stub DOSDATETIMETOVARIANTTIME 15 stub SAFEARRAYCREATE 16 stub SAFEARRAYDESTROY 17 stub SAFEARRAYGETDIM 18 stub SAFEARRAYGETELEMSIZE 19 stub SAFEARRAYGETUBOUND 20 stub SAFEARRAYGETLBOUND 21 stub SAFEARRAYLOCK 22 stub SAFEARRAYUNLOCK 23 stub SAFEARRAYACCESSDATA 24 stub SAFEARRAYUNACCESSDATA 25 stub SAFEARRAYGETELEMENT 26 stub SAFEARRAYPUTELEMENT 27 stub SAFEARRAYCOPY 28 stub DISPGETPARAM 29 stub DISPGETIDSOFNAMES 30 stub DISPINVOKE 31 pascal CreateDispTypeInfo(ptr long ptr) CreateDispTypeInfo16 32 stub CREATESTDDISPATCH 33 stub _IID_IDISPATCH 34 stub _IID_IENUMVARIANT 35 pascal RegisterActiveObject(ptr ptr long ptr) RegisterActiveObject16 36 stub REVOKEACTIVEOBJECT 37 stub GETACTIVEOBJECT 38 stub SAFEARRAYALLOCDESCRIPTOR 39 stub SAFEARRAYALLOCDATA 40 stub SAFEARRAYDESTROYDESCRIPTOR 41 stub SAFEARRAYDESTROYDATA 42 stub SAFEARRAYREDIM 43 stub VARI2FROMI4 44 stub VARI2FROMR4 45 stub VARI2FROMR8 46 stub VARI2FROMCY 47 stub VARI2FROMDATE 48 stub VARI2FROMSTR 49 stub VARI2FROMDISP 50 stub VARI2FROMBOOL 51 stub VARI4FROMI2 52 stub VARI4FROMR4 53 stub VARI4FROMR8 54 stub VARI4FROMCY 55 stub VARI4FROMDATE 56 stub VARI4FROMSTR 57 stub VARI4FROMDISP 58 stub VARI4FROMBOOL 59 stub VARR4FROMI2 60 stub VARR4FROMI4 61 stub VARR4FROMR8 62 stub VARR4FROMCY 63 stub VARR4FROMDATE 64 stub VARR4FROMSTR 65 stub VARR4FROMDISP 66 stub VARR4FROMBOOL 67 stub VARR8FROMI2 68 stub VARR8FROMI4 69 stub VARR8FROMR4 70 stub VARR8FROMCY 71 stub VARR8FROMDATE 72 stub VARR8FROMSTR 73 stub VARR8FROMDISP 74 stub VARR8FROMBOOL 75 stub VARDATEFROMI2 76 stub VARDATEFROMI4 77 stub VARDATEFROMR4 78 stub VARDATEFROMR8 79 stub VARDATEFROMCY 80 stub VARDATEFROMSTR 81 stub VARDATEFROMDISP 82 stub VARDATEFROMBOOL 83 stub VARCYFROMI2 84 stub VARCYFROMI4 85 stub VARCYFROMR4 86 stub VARCYFROMR8 87 stub VARCYFROMDATE 88 stub VARCYFROMSTR 89 stub VARCYFROMDISP 90 stub VARCYFROMBOOL 91 stub VARBSTRFROMI2 92 stub VARBSTRFROMI4 93 stub VARBSTRFROMR4 94 stub VARBSTRFROMR8 95 stub VARBSTRFROMCY 96 stub VARBSTRFROMDATE 97 stub VARBSTRFROMDISP 98 stub VARBSTRFROMBOOL 99 stub VARBOOLFROMI2 100 stub VARBOOLFROMI4 101 stub VARBOOLFROMR4 102 stub VARBOOLFROMR8 103 stub VARBOOLFROMDATE 104 stub VARBOOLFROMCY 105 stub VARBOOLFROMSTR 106 stub VARBOOLFROMDISP 107 stub DOINVOKEMETHOD 108 stub VARIANTCHANGETYPEEX 109 stub SAFEARRAYPTROFINDEX 110 stub SETERRORINFO 111 stub GETERRORINFO 112 stub CREATEERRORINFO 113 stub _IID_IERRORINFO 114 stub _IID_ICREATEERRORINFO 115 stub _IID_ISUPPORTERRORINFO 116 stub VARUI1FROMI2 117 stub VARUI1FROMI4 118 stub VARUI1FROMR4 119 stub VARUI1FROMR8 120 stub VARUI1FROMCY 121 stub VARUI1FROMDATE 122 stub VARUI1FROMSTR 123 stub VARUI1FROMDISP 124 stub VARUI1FROMBOOL 125 stub VARI2FROMUI1 126 stub VARI4FROMUI1 127 stub VARR4FROMUI1 128 stub VARR8FROMUI1 129 stub VARDATEFROMUI1 130 stub VARCYFROMUI1 131 stub VARBSTRFROMUI1 132 stub VARBOOLFROMUI1 133 stub DLLCANUNLOADNOW #134 stub WEP #135 stub ___EXPORTEDSTUB wine-20000526/dlls/oleaut32/oleaut.c0100644000175000001440000000720207070212245016473 0ustar julliardusers/* * OLEAUT32 * */ #include #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "winerror.h" #include "winversion.h" #include "oleauto.h" #include "wine/obj_base.h" #include "wine/obj_moniker.h" #include "heap.h" #include "ldt.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ole); static WCHAR _delimiter[2] = {'!',0}; /* default delimiter apparently */ static WCHAR *pdelimiter = &_delimiter[0]; /*********************************************************************** * RegisterActiveObject */ HRESULT WINAPI RegisterActiveObject( LPUNKNOWN punk,REFCLSID rcid,DWORD dwFlags,LPDWORD pdwRegister ) { WCHAR guidbuf[80]; HRESULT ret; LPRUNNINGOBJECTTABLE runobtable; LPMONIKER moniker; StringFromGUID2(rcid,guidbuf,39); ret = CreateItemMoniker(pdelimiter,guidbuf,&moniker); if (FAILED(ret)) return ret; ret = GetRunningObjectTable(0,&runobtable); if (FAILED(ret)) { IMoniker_Release(moniker); return ret; } ret = IRunningObjectTable_Register(runobtable,dwFlags,punk,moniker,pdwRegister); IRunningObjectTable_Release(runobtable); IMoniker_Release(moniker); return ret; } /*********************************************************************** * RevokeActiveObject */ HRESULT WINAPI RevokeActiveObject(DWORD xregister,LPVOID reserved) { LPRUNNINGOBJECTTABLE runobtable; HRESULT ret; ret = GetRunningObjectTable(0,&runobtable); if (FAILED(ret)) return ret; ret = IRunningObjectTable_Revoke(runobtable,xregister); if (SUCCEEDED(ret)) ret = S_OK; IRunningObjectTable_Release(runobtable); return ret; } /*********************************************************************** * GetActiveObject */ HRESULT WINAPI GetActiveObject(REFCLSID rcid,LPVOID preserved,LPUNKNOWN *ppunk) { WCHAR guidbuf[80]; HRESULT ret; LPRUNNINGOBJECTTABLE runobtable; LPMONIKER moniker; StringFromGUID2(rcid,guidbuf,39); ret = CreateItemMoniker(pdelimiter,guidbuf,&moniker); if (FAILED(ret)) return ret; ret = GetRunningObjectTable(0,&runobtable); if (FAILED(ret)) { IMoniker_Release(moniker); return ret; } ret = IRunningObjectTable_GetObject(runobtable,moniker,ppunk); IRunningObjectTable_Release(runobtable); IMoniker_Release(moniker); return ret; } /*********************************************************************** * OaBuildVersion [OLEAUT32.170] * * known OLEAUT32.DLL versions: * OLE 2.1 NT 1993-95 10 3023 * OLE 2.1 10 3027 * OLE 2.20 W95/NT 1993-96 20 4112 * OLE 2.20 W95/NT 1993-96 20 4118 * OLE 2.20 W95/NT 1993-96 20 4122 * OLE 2.30 W95/NT 1993-98 30 4265 * OLE 2.40 NT?? 1993-98 40 4267 * OLE 2.40 W98 SE orig. file 1993-98 40 4275 */ UINT WINAPI OaBuildVersion() { FIXME("Please report to a.mohr@mailto.de if you get version error messages !\n"); switch(VERSION_GetVersion()) { case WIN31: return MAKELONG(4049, 20); /* from Win32s 1.1e */ case WIN95: return MAKELONG(4265, 30); case WIN98: return MAKELONG(4275, 40); /* value of W98 SE; orig. W98 AFAIK has 4265, 30 just as W95 */ case NT351: return MAKELONG(4265, 30); /* value borrowed from Win95 */ case NT40: return MAKELONG(4122, 20); /* ouch ! Quite old, I guess */ default: ERR("Version value not known yet. Please investigate it !\n"); return 0x0; } } /*********************************************************************** * DllRegisterServer */ HRESULT WINAPI OLEAUT32_DllRegisterServer() { FIXME("stub!\n"); return S_OK; } /*********************************************************************** * DllUnregisterServer */ HRESULT WINAPI OLEAUT32_DllUnregisterServer() { FIXME("stub!\n"); return S_OK; } wine-20000526/dlls/oleaut32/oleaut32.spec0100644000175000001440000003066507077362252017374 0ustar julliardusersname oleaut32 type win32 import ole32.dll 1 stub DllGetClassObject 2 stdcall SysAllocString(wstr) SysAllocString 3 stdcall SysReAllocString(ptr wstr) SysReAllocString 4 stdcall SysAllocStringLen(wstr long) SysAllocStringLen 5 stdcall SysReAllocStringLen(ptr ptr long) SysReAllocStringLen 6 stdcall SysFreeString(wstr) SysFreeString 7 stdcall SysStringLen(wstr) SysStringLen 8 stdcall VariantInit(ptr) VariantInit 9 stdcall VariantClear(ptr) VariantClear 10 stdcall VariantCopy(ptr ptr) VariantCopy 11 stdcall VariantCopyInd(ptr ptr) VariantCopyInd 12 stdcall VariantChangeType(ptr ptr long long) VariantChangeType 13 stub VariantTimeToDosDateTime 14 stdcall DosDateTimeToVariantTime(long long ptr) DosDateTimeToVariantTime 15 stdcall SafeArrayCreate(long long ptr) SafeArrayCreate 16 stdcall SafeArrayDestroy(ptr) SafeArrayDestroy 17 stdcall SafeArrayGetDim(ptr) SafeArrayGetDim 18 stdcall SafeArrayGetElemsize(ptr) SafeArrayGetElemsize 19 stdcall SafeArrayGetUBound(ptr long long) SafeArrayGetUBound 20 stdcall SafeArrayGetLBound(ptr long long) SafeArrayGetLBound 21 stdcall SafeArrayLock(ptr) SafeArrayLock 22 stdcall SafeArrayUnlock(ptr) SafeArrayUnlock 23 stdcall SafeArrayAccessData(ptr ptr) SafeArrayAccessData 24 stdcall SafeArrayUnaccessData(ptr) SafeArrayUnaccessData 25 stdcall SafeArrayGetElement(ptr ptr ptr) SafeArrayGetElement 26 stdcall SafeArrayPutElement(ptr ptr ptr) SafeArrayPutElement 27 stdcall SafeArrayCopy(ptr ptr) SafeArrayCopy 28 stub DispGetParam 29 stub DispGetIDsOfNames 30 stub DispInvoke 31 stub CreateDispTypeInfo 32 stub CreateStdDispatch 33 stdcall RegisterActiveObject(ptr ptr long ptr) RegisterActiveObject 34 stdcall RevokeActiveObject(long ptr) RevokeActiveObject 35 stdcall GetActiveObject(ptr ptr ptr) GetActiveObject 36 stdcall SafeArrayAllocDescriptor(long ptr) SafeArrayAllocDescriptor 37 stdcall SafeArrayAllocData(ptr) SafeArrayAllocData 38 stdcall SafeArrayDestroyDescriptor(ptr) SafeArrayDestroyDescriptor 39 stdcall SafeArrayDestroyData(ptr) SafeArrayDestroyData 40 stdcall SafeArrayRedim(ptr ptr) SafeArrayRedim 41 stub OACreateTypeLib2 46 stub VarParseNumFromStr 47 stub VarNumFromParseNum 48 stdcall VarI2FromUI1(long ptr) VarI2FromUI1 49 stdcall VarI2FromI4(long ptr) VarI2FromI4 50 stdcall VarI2FromR4(long ptr) VarI2FromR4 51 stdcall VarI2FromR8(double ptr) VarI2FromR8 52 stdcall VarI2FromCy(double ptr) VarI2FromCy 53 stdcall VarI2FromDate(long ptr) VarI2FromDate 54 stdcall VarI2FromStr(wstr long long ptr) VarI2FromStr 55 stub VarI2FromDisp 56 stdcall VarI2FromBool(long ptr) VarI2FromBool 58 stdcall VarI4FromUI1(long ptr) VarI4FromUI1 59 stdcall VarI4FromI2(long ptr) VarI4FromI2 60 stdcall VarI4FromR4(long ptr) VarI4FromR4 61 stdcall VarI4FromR8(double ptr) VarI4FromR8 62 stdcall VarI4FromCy(double ptr) VarI4FromCy 63 stdcall VarI4FromDate(long ptr) VarI4FromDate 64 stdcall VarI4FromStr(wstr long long ptr) VarI4FromStr 65 stub VarI4FromDisp 66 stdcall VarI4FromBool(long ptr) VarI4FromBool 68 stdcall VarR4FromUI1(long ptr) VarR4FromUI1 69 stdcall VarR4FromI2(long ptr) VarR4FromI2 70 stdcall VarR4FromI4(long ptr) VarR4FromI4 71 stdcall VarR4FromR8(double ptr) VarR4FromR8 72 stdcall VarR4FromCy(double ptr) VarR4FromCy 73 stdcall VarR4FromDate(long ptr) VarR4FromDate 74 stdcall VarR4FromStr(wstr long long ptr) VarR4FromStr 75 stub VarR4FromDisp 76 stdcall VarR4FromBool(long ptr) VarR4FromBool 78 stdcall VarR8FromUI1(long ptr) VarR8FromUI1 79 stdcall VarR8FromI2(long ptr) VarR8FromI2 80 stdcall VarR8FromI4(long ptr) VarR8FromI4 81 stdcall VarR8FromR4(long ptr) VarR8FromR4 82 stdcall VarR8FromCy(double ptr) VarR8FromCy 83 stdcall VarR8FromDate(long ptr) VarR8FromDate 84 stdcall VarR8FromStr(wstr long long ptr) VarR8FromStr 85 stub VarR8FromDisp 86 stdcall VarR8FromBool(long ptr) VarR8FromBool 88 stdcall VarDateFromUI1(long ptr) VarDateFromUI1 89 stdcall VarDateFromI2(long ptr) VarDateFromI2 90 stdcall VarDateFromI4(long ptr) VarDateFromI4 91 stdcall VarDateFromR4(long ptr) VarDateFromR4 92 stdcall VarDateFromR8(double ptr) VarDateFromR8 93 stdcall VarDateFromCy(double ptr) VarDateFromCy 94 stdcall VarDateFromStr(wstr long long ptr) VarDateFromStr 95 stub VarDateFromDisp 96 stdcall VarDateFromBool(long ptr) VarDateFromBool 98 stdcall VarCyFromUI1(long ptr) VarCyFromUI1 99 stdcall VarCyFromI2(long ptr) VarCyFromI2 100 stdcall VarCyFromI4(long ptr) VarCyFromI4 101 stdcall VarCyFromR4(long ptr) VarCyFromR4 102 stdcall VarCyFromR8(double ptr) VarCyFromR8 103 stdcall VarCyFromDate(double ptr) VarCyFromDate 104 stdcall VarCyFromStr(ptr long long ptr) VarCyFromStr 105 stub VarCyFromDisp 106 stdcall VarCyFromBool(long ptr) VarCyFromBool 108 stdcall VarBstrFromUI1(long long long ptr) VarBstrFromUI1 109 stdcall VarBstrFromI2(long long long ptr) VarBstrFromI2 110 stdcall VarBstrFromI4(long long long ptr) VarBstrFromI4 111 stdcall VarBstrFromR4(long long long ptr) VarBstrFromR4 112 stdcall VarBstrFromR8(double long long ptr) VarBstrFromR8 113 stdcall VarBstrFromCy(double long long ptr) VarBstrFromCy 114 stdcall VarBstrFromDate(long long long ptr) VarBstrFromDate 115 stub VarBstrFromDisp 116 stdcall VarBstrFromBool(long long long ptr) VarBstrFromBool 118 stdcall VarBoolFromUI1(long ptr) VarBoolFromUI1 119 stdcall VarBoolFromI2(long ptr) VarBoolFromI2 120 stdcall VarBoolFromI4(long ptr) VarBoolFromI4 121 stdcall VarBoolFromR4(long ptr) VarBoolFromR4 122 stdcall VarBoolFromR8(double ptr) VarBoolFromR8 123 stdcall VarBoolFromDate(long ptr) VarBoolFromDate 124 stdcall VarBoolFromCy(double ptr) VarBoolFromCy 125 stdcall VarBoolFromStr(wstr long long ptr) VarBoolFromStr 126 stub VarBoolFromDisp 130 stdcall VarUI1FromI2(long ptr) VarUI1FromI2 131 stdcall VarUI1FromI4(long ptr) VarUI1FromI4 132 stdcall VarUI1FromR4(long ptr) VarUI1FromR4 133 stdcall VarUI1FromR8(double ptr) VarUI1FromR8 134 stdcall VarUI1FromCy(double ptr) VarUI1FromCy 135 stdcall VarUI1FromDate(long ptr) VarUI1FromDate 136 stdcall VarUI1FromStr(wstr long long ptr) VarUI1FromStr 137 stub VarUI1FromDisp 138 stdcall VarUI1FromBool(long ptr) VarUI1FromBool 146 stub DispCallFunc 147 stdcall VariantChangeTypeEx(ptr ptr long long long) VariantChangeTypeEx 148 stdcall SafeArrayPtrOfIndex(ptr ptr ptr) SafeArrayPtrOfIndex 149 stdcall SysStringByteLen(ptr) SysStringByteLen 150 stdcall SysAllocStringByteLen(ptr long) SysAllocStringByteLen 160 stub CreateTypeLib 161 stdcall LoadTypeLib (ptr ptr) LoadTypeLib 162 stdcall LoadRegTypeLib (ptr long long long ptr) LoadRegTypeLib 163 stdcall RegisterTypeLib(ptr str str) RegisterTypeLib 164 stdcall QueryPathOfRegTypeLib(ptr long long long ptr) QueryPathOfRegTypeLib 165 stub LHashValOfNameSys 166 stub LHashValOfNameSysA 170 stdcall OaBuildVersion() OaBuildVersion 171 stub ClearCustData 180 stub CreateTypeLib2 183 stdcall LoadTypeLibEx (ptr long ptr) LoadTypeLibEx 184 stub SystemTimeToVariantTime 185 stub VariantTimeToSystemTime 186 stdcall UnRegisterTypeLib (ptr long long long long) UnRegisterTypeLib 190 stub VarDecFromUI1 191 stub VarDecFromI2 192 stub VarDecFromI4 193 stub VarDecFromR4 194 stub VarDecFromR8 195 stub VarDecFromDate 196 stub VarDecFromCy 197 stub VarDecFromStr 198 stub VarDecFromDisp 199 stub VarDecFromBool 200 stdcall GetErrorInfo(long ptr) GetErrorInfo 201 stdcall SetErrorInfo(long ptr ) SetErrorInfo 202 stdcall CreateErrorInfo(ptr) CreateErrorInfo 205 stdcall VarI2FromI1(long ptr) VarI2FromI1 206 stdcall VarI2FromUI2(long ptr) VarI2FromUI2 207 stdcall VarI2FromUI4(long ptr) VarI2FromUI4 208 stub VarI2FromDec 209 stdcall VarI4FromI1(long ptr) VarI4FromI1 210 stdcall VarI4FromUI2(long ptr) VarI4FromUI2 211 stdcall VarI4FromUI4(long ptr) VarI4FromUI4 212 stub VarI4FromDec 213 stdcall VarR4FromI1(long ptr) VarR4FromI1 214 stdcall VarR4FromUI2(long ptr) VarR4FromUI2 215 stdcall VarR4FromUI4(long ptr) VarR4FromUI4 216 stub VarR4FromDec 217 stdcall VarR8FromI1(long ptr) VarR8FromI1 218 stdcall VarR8FromUI2(long ptr) VarR8FromUI2 219 stdcall VarR8FromUI4(long ptr) VarR8FromUI4 220 stub VarR8FromDec 221 stdcall VarDateFromI1(long ptr) VarDateFromI1 222 stdcall VarDateFromUI2(long ptr) VarDateFromUI2 223 stdcall VarDateFromUI4(long ptr) VarDateFromUI4 224 stub VarDateFromDec 225 stdcall VarCyFromI1(long ptr) VarCyFromI1 226 stdcall VarCyFromUI2(long ptr) VarCyFromUI2 227 stdcall VarCyFromUI4(long ptr) VarCyFromUI4 228 stub VarCyFromDec 229 stdcall VarBstrFromI1(long long long ptr) VarBstrFromI1 230 stdcall VarBstrFromUI2(long long long ptr) VarBstrFromUI2 231 stdcall VarBstrFromUI4(long long long ptr) VarBstrFromUI4 232 stub VarBstrFromDec 233 stdcall VarBoolFromI1(long ptr) VarBoolFromI1 234 stdcall VarBoolFromUI2(long ptr) VarBoolFromUI2 235 stdcall VarBoolFromUI4(long ptr) VarBoolFromUI4 236 stub VarBoolFromDec 237 stdcall VarUI1FromI1(long ptr) VarUI1FromI1 238 stdcall VarUI1FromUI2(long ptr) VarUI1FromUI2 239 stdcall VarUI1FromUI4(long ptr) VarUI1FromUI4 240 stub VarUI1FromDec 241 stub VarDecFromI1 242 stub VarDecFromUI2 243 stub VarDecFromUI4 244 stdcall VarI1FromUI1(long ptr) VarI1FromUI1 245 stdcall VarI1FromI2(long ptr) VarI1FromI2 246 stdcall VarI1FromI4(long ptr) VarI1FromI4 247 stdcall VarI1FromR4(long ptr) VarI1FromR4 248 stdcall VarI1FromR8(double ptr) VarI1FromR8 249 stdcall VarI1FromDate(long ptr) VarI1FromDate 250 stdcall VarI1FromCy(double ptr) VarI1FromCy 251 stdcall VarI1FromStr(wstr long long ptr) VarI1FromStr 252 stub VarI1FromDisp 253 stdcall VarI1FromBool(long ptr) VarI1FromBool 254 stdcall VarI1FromUI2(long ptr) VarI1FromUI2 255 stdcall VarI1FromUI4(long ptr) VarI1FromUI4 256 stub VarI1FromDec 257 stdcall VarUI2FromUI1(long ptr) VarUI2FromUI1 258 stdcall VarUI2FromI2(long ptr) VarUI2FromI2 259 stdcall VarUI2FromI4(long ptr) VarUI2FromI4 260 stdcall VarUI2FromR4(long ptr) VarUI2FromR4 261 stdcall VarUI2FromR8(double ptr) VarUI2FromR8 262 stdcall VarUI2FromDate(long ptr) VarUI2FromDate 263 stdcall VarUI2FromCy(double ptr) VarUI2FromCy 264 stdcall VarUI2FromStr(wstr long long ptr) VarUI2FromStr 265 stub VarUI2FromDisp 266 stdcall VarUI2FromBool(long ptr) VarUI2FromBool 267 stdcall VarUI2FromI1(long ptr) VarUI2FromI1 268 stdcall VarUI2FromUI4(long ptr) VarUI2FromUI4 269 stub VarUI2FromDec 270 stdcall VarUI4FromUI1(long ptr) VarUI4FromUI1 271 stdcall VarUI4FromI2(long ptr) VarUI4FromI2 272 stdcall VarUI4FromI4(long ptr) VarUI4FromI4 273 stdcall VarUI4FromR4(long ptr) VarUI4FromR4 274 stdcall VarUI4FromR8(double ptr) VarUI4FromR8 275 stdcall VarUI4FromDate(long ptr) VarUI4FromDate 276 stdcall VarUI4FromCy(double ptr) VarUI4FromCy 277 stdcall VarUI4FromStr(wstr long long ptr) VarUI4FromStr 278 stub VarUI4FromDisp 279 stdcall VarUI4FromBool(long ptr) VarUI4FromBool 280 stdcall VarUI4FromI1(long ptr) VarUI4FromI1 281 stdcall VarUI4FromUI2(long ptr) VarUI4FromUI2 282 stub VarUI4FromDec 283 stub BSTR_UserSize 284 stub BSTR_UserMarshal 285 stub BSTR_UserUnmarshal 286 stub BSTR_UserFree 287 stub VARIANT_UserSize 288 stub VARIANT_UserMarshal 289 stub VARIANT_UserUnmarshal 290 stub VARIANT_UserFree 291 stub LPSAFEARRAY_UserSize 292 stub LPSAFEARRAY_UserMarshal 293 stub LPSAFEARRAY_UserUnmarshal 294 stub LPSAFEARRAY_UserFree 295 stub LPSAFEARRAY_Size 296 stub LPSAFEARRAY_Marshal 297 stub LPSAFEARRAY_Unmarshal 320 stdcall DllRegisterServer() OLEAUT32_DllRegisterServer 321 stdcall DllUnregisterServer() OLEAUT32_DllUnregisterServer 330 stub VarDateFromUdate 331 stub VarUdateFromDate 332 stub GetAltMonthNames 380 stub UserHWND_from_local 381 stub UserHWND_to_local 382 stub UserHWND_free_inst 383 stub UserHWND_free_local 384 stub UserBSTR_from_local 385 stub UserBSTR_to_local 386 stub UserBSTR_free_inst 387 stub UserBSTR_free_local 388 stub UserVARIANT_from_local 389 stub UserVARIANT_to_local 390 stub UserVARIANT_free_inst 391 stub UserVARIANT_free_local 392 stub UserEXCEPINFO_from_local 393 stub UserEXCEPINFO_to_local 394 stub UserEXCEPINFO_free_inst 395 stub UserEXCEPINFO_free_local 396 stub UserMSG_from_local 397 stub UserMSG_to_local 398 stub UserMSG_free_inst 399 stub UserMSG_free_local 410 stub DllCanUnloadNow 411 stdcall SafeArrayCreateVector(long long long) SafeArrayCreateVector 412 stdcall SafeArrayCopyData(ptr ptr) SafeArrayCopyData 413 stub VectorFromBstr 414 stub BstrFromVector 415 stdcall OleIconToCursor(long long) OleIconToCursor 416 stdcall OleCreatePropertyFrameIndirect(ptr) OleCreatePropertyFrameIndirect 417 stdcall OleCreatePropertyFrame(ptr long long ptr long ptr long ptr ptr long ptr) OleCreatePropertyFrame 418 stdcall OleLoadPicture(ptr long long ptr ptr) OleLoadPicture 419 stdcall OleCreatePictureIndirect(ptr ptr long ptr) OleCreatePictureIndirect 420 stdcall OleCreateFontIndirect(ptr ptr ptr) OleCreateFontIndirect 421 stdcall OleTranslateColor(long long long) OleTranslateColor 422 stub OleLoadPictureFile 423 stub OleSavePictureFile 424 stub OleLoadPicturePath wine-20000526/dlls/oleaut32/olefont.c0100644000175000001440000010635307047571165016674 0ustar julliardusers/* * OLE Font encapsulation implementation * * This file contains an implementation of the IFont * interface and the OleCreateFontIndirect API call. * * Copyright 1999 Francis Beaudet */ #include #include #include "winerror.h" #include "oleauto.h" /* for SysAllocString(....) */ #include "wine/obj_olefont.h" #include "wine/obj_storage.h" #include "olectl.h" #include "debugtools.h" #include "heap.h" DEFAULT_DEBUG_CHANNEL(ole) /*********************************************************************** * Declaration of constants used when serializing the font object. */ #define FONTPERSIST_ITALIC 0x02 #define FONTPERSIST_UNDERLINE 0x04 #define FONTPERSIST_STRIKETHROUGH 0x08 /*********************************************************************** * Declaration of the implementation class for the IFont interface */ typedef struct OLEFontImpl OLEFontImpl; struct OLEFontImpl { /* * This class supports many interfaces. IUnknown, IFont, * IDispatch, IDispFont and IPersistStream. The first two are * supported by the first vtablem the next two are supported by * the second table and the last one has it's own. */ ICOM_VTABLE(IFont)* lpvtbl1; ICOM_VTABLE(IDispatch)* lpvtbl2; ICOM_VTABLE(IPersistStream)* lpvtbl3; /* * Reference count for that instance of the class. */ ULONG ref; /* * This structure contains the description of the class. */ FONTDESC description; /* * Contain the font associated with this object. */ HFONT gdiFont; /* * Font lock count. */ DWORD fontLock; /* * Size ratio */ long cyLogical; long cyHimetric; }; /* * Here, I define utility macros to help with the casting of the * "this" parameter. * There is a version to accomodate all of the VTables implemented * by this object. */ #define _ICOM_THIS(class,name) class* this = (class*)name; #define _ICOM_THIS_From_IDispatch(class, name) class* this = (class*)(((char*)name)-sizeof(void*)); #define _ICOM_THIS_From_IPersistStream(class, name) class* this = (class*)(((char*)name)-2*sizeof(void*)); /*********************************************************************** * Prototypes for the implementation functions for the IFont * interface */ static OLEFontImpl* OLEFontImpl_Construct(LPFONTDESC fontDesc); static void OLEFontImpl_Destroy(OLEFontImpl* fontDesc); static HRESULT WINAPI OLEFontImpl_QueryInterface(IFont* iface, REFIID riid, VOID** ppvoid); static ULONG WINAPI OLEFontImpl_AddRef(IFont* iface); static ULONG WINAPI OLEFontImpl_Release(IFont* iface); static HRESULT WINAPI OLEFontImpl_get_Name(IFont* iface, BSTR* pname); static HRESULT WINAPI OLEFontImpl_put_Name(IFont* iface, BSTR name); static HRESULT WINAPI OLEFontImpl_get_Size(IFont* iface, CY* psize); static HRESULT WINAPI OLEFontImpl_put_Size(IFont* iface, CY size); static HRESULT WINAPI OLEFontImpl_get_Bold(IFont* iface, BOOL* pbold); static HRESULT WINAPI OLEFontImpl_put_Bold(IFont* iface, BOOL bold); static HRESULT WINAPI OLEFontImpl_get_Italic(IFont* iface, BOOL* pitalic); static HRESULT WINAPI OLEFontImpl_put_Italic(IFont* iface, BOOL italic); static HRESULT WINAPI OLEFontImpl_get_Underline(IFont* iface, BOOL* punderline); static HRESULT WINAPI OLEFontImpl_put_Underline(IFont* iface, BOOL underline); static HRESULT WINAPI OLEFontImpl_get_Strikethrough(IFont* iface, BOOL* pstrikethrough); static HRESULT WINAPI OLEFontImpl_put_Strikethrough(IFont* iface, BOOL strikethrough); static HRESULT WINAPI OLEFontImpl_get_Weight(IFont* iface, short* pweight); static HRESULT WINAPI OLEFontImpl_put_Weight(IFont* iface, short weight); static HRESULT WINAPI OLEFontImpl_get_Charset(IFont* iface, short* pcharset); static HRESULT WINAPI OLEFontImpl_put_Charset(IFont* iface, short charset); static HRESULT WINAPI OLEFontImpl_get_hFont(IFont* iface, HFONT* phfont); static HRESULT WINAPI OLEFontImpl_Clone(IFont* iface, IFont** ppfont); static HRESULT WINAPI OLEFontImpl_IsEqual(IFont* iface, IFont* pFontOther); static HRESULT WINAPI OLEFontImpl_SetRatio(IFont* iface, long cyLogical, long cyHimetric); static HRESULT WINAPI OLEFontImpl_QueryTextMetrics(IFont* iface, TEXTMETRICOLE* ptm); static HRESULT WINAPI OLEFontImpl_AddRefHfont(IFont* iface, HFONT hfont); static HRESULT WINAPI OLEFontImpl_ReleaseHfont(IFont* iface, HFONT hfont); static HRESULT WINAPI OLEFontImpl_SetHdc(IFont* iface, HDC hdc); /*********************************************************************** * Prototypes for the implementation functions for the IDispatch * interface */ static HRESULT WINAPI OLEFontImpl_IDispatch_QueryInterface(IDispatch* iface, REFIID riid, VOID** ppvoid); static ULONG WINAPI OLEFontImpl_IDispatch_AddRef(IDispatch* iface); static ULONG WINAPI OLEFontImpl_IDispatch_Release(IDispatch* iface); static HRESULT WINAPI OLEFontImpl_GetTypeInfoCount(IDispatch* iface, unsigned int* pctinfo); static HRESULT WINAPI OLEFontImpl_GetTypeInfo(IDispatch* iface, UINT iTInfo, LCID lcid, ITypeInfo** ppTInfo); static HRESULT WINAPI OLEFontImpl_GetIDsOfNames(IDispatch* iface, REFIID riid, LPOLESTR* rgszNames, UINT cNames, LCID lcid, DISPID* rgDispId); static HRESULT WINAPI OLEFontImpl_Invoke(IDispatch* iface, DISPID dispIdMember, REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS* pDispParams, VARIANT* pVarResult, EXCEPINFO* pExepInfo, UINT* puArgErr); /*********************************************************************** * Prototypes for the implementation functions for the IPersistStream * interface */ static HRESULT WINAPI OLEFontImpl_IPersistStream_QueryInterface(IPersistStream* iface, REFIID riid, VOID** ppvoid); static ULONG WINAPI OLEFontImpl_IPersistStream_AddRef(IPersistStream* iface); static ULONG WINAPI OLEFontImpl_IPersistStream_Release(IPersistStream* iface); static HRESULT WINAPI OLEFontImpl_GetClassID(IPersistStream* iface, CLSID* pClassID); static HRESULT WINAPI OLEFontImpl_IsDirty(IPersistStream* iface); static HRESULT WINAPI OLEFontImpl_Load(IPersistStream* iface, IStream* pLoadStream); static HRESULT WINAPI OLEFontImpl_Save(IPersistStream* iface, IStream* pOutStream, BOOL fClearDirty); static HRESULT WINAPI OLEFontImpl_GetSizeMax(IPersistStream* iface, ULARGE_INTEGER* pcbSize); /* * Virtual function tables for the OLEFontImpl class. */ static ICOM_VTABLE(IFont) OLEFontImpl_VTable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE OLEFontImpl_QueryInterface, OLEFontImpl_AddRef, OLEFontImpl_Release, OLEFontImpl_get_Name, OLEFontImpl_put_Name, OLEFontImpl_get_Size, OLEFontImpl_put_Size, OLEFontImpl_get_Bold, OLEFontImpl_put_Bold, OLEFontImpl_get_Italic, OLEFontImpl_put_Italic, OLEFontImpl_get_Underline, OLEFontImpl_put_Underline, OLEFontImpl_get_Strikethrough, OLEFontImpl_put_Strikethrough, OLEFontImpl_get_Weight, OLEFontImpl_put_Weight, OLEFontImpl_get_Charset, OLEFontImpl_put_Charset, OLEFontImpl_get_hFont, OLEFontImpl_Clone, OLEFontImpl_IsEqual, OLEFontImpl_SetRatio, OLEFontImpl_QueryTextMetrics, OLEFontImpl_AddRefHfont, OLEFontImpl_ReleaseHfont, OLEFontImpl_SetHdc }; static ICOM_VTABLE(IDispatch) OLEFontImpl_IDispatch_VTable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE OLEFontImpl_IDispatch_QueryInterface, OLEFontImpl_IDispatch_AddRef, OLEFontImpl_IDispatch_Release, OLEFontImpl_GetTypeInfoCount, OLEFontImpl_GetTypeInfo, OLEFontImpl_GetIDsOfNames, OLEFontImpl_Invoke }; static ICOM_VTABLE(IPersistStream) OLEFontImpl_IPersistStream_VTable = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE OLEFontImpl_IPersistStream_QueryInterface, OLEFontImpl_IPersistStream_AddRef, OLEFontImpl_IPersistStream_Release, OLEFontImpl_GetClassID, OLEFontImpl_IsDirty, OLEFontImpl_Load, OLEFontImpl_Save, OLEFontImpl_GetSizeMax }; /****************************************************************************** * OleCreateFontIndirect [OLEAUT32.420] */ HRESULT WINAPI OleCreateFontIndirect( LPFONTDESC lpFontDesc, REFIID riid, LPVOID* ppvObj) { OLEFontImpl* newFont = 0; HRESULT hr = S_OK; /* * Sanity check */ if (ppvObj==0) return E_POINTER; *ppvObj = 0; /* * Try to construct a new instance of the class. */ newFont = OLEFontImpl_Construct(lpFontDesc); if (newFont == 0) return E_OUTOFMEMORY; /* * Make sure it supports the interface required by the caller. */ hr = IFont_QueryInterface((IFont*)newFont, riid, ppvObj); /* * Release the reference obtained in the constructor. If * the QueryInterface was unsuccessful, it will free the class. */ IFont_Release((IFont*)newFont); return hr; } /*********************************************************************** * Implementation of the OLEFontImpl class. */ /************************************************************************ * OLEFontImpl_Construct * * This method will construct a new instance of the OLEFontImpl * class. * * The caller of this method must release the object when it's * done with it. */ static OLEFontImpl* OLEFontImpl_Construct(LPFONTDESC fontDesc) { OLEFontImpl* newObject = 0; /* * Allocate space for the object. */ newObject = HeapAlloc(GetProcessHeap(), 0, sizeof(OLEFontImpl)); if (newObject==0) return newObject; /* * Initialize the virtual function table. */ newObject->lpvtbl1 = &OLEFontImpl_VTable; newObject->lpvtbl2 = &OLEFontImpl_IDispatch_VTable; newObject->lpvtbl3 = &OLEFontImpl_IPersistStream_VTable; /* * Start with one reference count. The caller of this function * must release the interface pointer when it is done. */ newObject->ref = 1; /* * Copy the description of the font in the object. */ assert(fontDesc->cbSizeofstruct >= sizeof(FONTDESC)); newObject->description.cbSizeofstruct = sizeof(FONTDESC); newObject->description.lpstrName = HeapAlloc(GetProcessHeap(), 0, (lstrlenW(fontDesc->lpstrName)+1) * sizeof(WCHAR)); lstrcpyW(newObject->description.lpstrName, fontDesc->lpstrName); newObject->description.cySize = fontDesc->cySize; newObject->description.sWeight = fontDesc->sWeight; newObject->description.sCharset = fontDesc->sCharset; newObject->description.fItalic = fontDesc->fItalic; newObject->description.fUnderline = fontDesc->fUnderline; newObject->description.fStrikethrough = fontDesc->fStrikethrough; /* * Initializing all the other members. */ newObject->gdiFont = 0; newObject->fontLock = 0; newObject->cyHimetric = 1; newObject->cyLogical = 1; return newObject; } /************************************************************************ * OLEFontImpl_Construct * * This method is called by the Release method when the reference * count goes doen to 0. it will free all resources used by * this object. */ static void OLEFontImpl_Destroy(OLEFontImpl* fontDesc) { if (fontDesc->description.lpstrName!=0) HeapFree(GetProcessHeap(), 0, fontDesc->description.lpstrName); if (fontDesc->gdiFont!=0) DeleteObject(fontDesc->gdiFont); HeapFree(GetProcessHeap(), 0, fontDesc); } /************************************************************************ * OLEFontImpl_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ HRESULT WINAPI OLEFontImpl_QueryInterface( IFont* iface, REFIID riid, void** ppvObject) { _ICOM_THIS(OLEFontImpl, iface); /* * Perform a sanity check on the parameters. */ if ( (this==0) || (ppvObject==0) ) return E_INVALIDARG; /* * Initialize the return parameter. */ *ppvObject = 0; /* * Compare the riid with the interface IDs implemented by this object. */ if (memcmp(&IID_IUnknown, riid, sizeof(IID_IUnknown)) == 0) { *ppvObject = (IFont*)this; } else if (memcmp(&IID_IFont, riid, sizeof(IID_IFont)) == 0) { *ppvObject = (IFont*)this; } else if (memcmp(&IID_IDispatch, riid, sizeof(IID_IDispatch)) == 0) { *ppvObject = (IDispatch*)&(this->lpvtbl2); } else if (memcmp(&IID_IFontDisp, riid, sizeof(IID_IFontDisp)) == 0) { *ppvObject = (IDispatch*)&(this->lpvtbl2); } else if (memcmp(&IID_IPersistStream, riid, sizeof(IID_IPersistStream)) == 0) { *ppvObject = (IPersistStream*)&(this->lpvtbl3); } /* * Check that we obtained an interface. */ if ((*ppvObject)==0) { WARN("() : asking for un supported interface %s\n",debugstr_guid(riid)); return E_NOINTERFACE; } /* * Query Interface always increases the reference count by one when it is * successful */ OLEFontImpl_AddRef((IFont*)this); return S_OK;; } /************************************************************************ * OLEFontImpl_AddRef (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ ULONG WINAPI OLEFontImpl_AddRef( IFont* iface) { _ICOM_THIS(OLEFontImpl, iface); this->ref++; return this->ref; } /************************************************************************ * OLEFontImpl_Release (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ ULONG WINAPI OLEFontImpl_Release( IFont* iface) { _ICOM_THIS(OLEFontImpl, iface); /* * Decrease the reference count on this object. */ this->ref--; /* * If the reference count goes down to 0, perform suicide. */ if (this->ref==0) { OLEFontImpl_Destroy(this); return 0; } return this->ref; } /************************************************************************ * OLEFontImpl_get_Name (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_get_Name( IFont* iface, BSTR* pname) { _ICOM_THIS(OLEFontImpl, iface); /* * Sanity check. */ if (pname==0) return E_POINTER; if (this->description.lpstrName!=0) *pname = SysAllocString(this->description.lpstrName); else *pname = 0; return S_OK; } /************************************************************************ * OLEFontImpl_put_Name (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_put_Name( IFont* iface, BSTR name) { _ICOM_THIS(OLEFontImpl, iface); if (this->description.lpstrName==0) { this->description.lpstrName = HeapAlloc(GetProcessHeap(), 0, (lstrlenW(name)+1) * sizeof(WCHAR)); } else { this->description.lpstrName = HeapReAlloc(GetProcessHeap(), 0, this->description.lpstrName, (lstrlenW(name)+1) * sizeof(WCHAR)); } if (this->description.lpstrName==0) return E_OUTOFMEMORY; lstrcpyW(this->description.lpstrName, name); return S_OK; } /************************************************************************ * OLEFontImpl_get_Size (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_get_Size( IFont* iface, CY* psize) { _ICOM_THIS(OLEFontImpl, iface); /* * Sanity check */ if (psize==0) return E_POINTER; psize->s.Hi = 0; psize->s.Lo = this->description.cySize.s.Lo; return S_OK; } /************************************************************************ * OLEFontImpl_put_Size (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_put_Size( IFont* iface, CY size) { _ICOM_THIS(OLEFontImpl, iface); this->description.cySize.s.Hi = 0; this->description.cySize.s.Lo = this->description.cySize.s.Lo; return S_OK; } /************************************************************************ * OLEFontImpl_get_Bold (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_get_Bold( IFont* iface, BOOL* pbold) { FIXME("():Stub\n"); return E_NOTIMPL; } /************************************************************************ * OLEFontImpl_put_Bold (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_put_Bold( IFont* iface, BOOL bold) { FIXME("():Stub\n"); return E_NOTIMPL; } /************************************************************************ * OLEFontImpl_get_Italic (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_get_Italic( IFont* iface, BOOL* pitalic) { _ICOM_THIS(OLEFontImpl, iface); /* * Sanity check */ if (pitalic==0) return E_POINTER; *pitalic = this->description.fItalic; return S_OK; } /************************************************************************ * OLEFontImpl_put_Italic (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_put_Italic( IFont* iface, BOOL italic) { _ICOM_THIS(OLEFontImpl, iface); this->description.fItalic = italic; return S_OK; } /************************************************************************ * OLEFontImpl_get_Underline (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_get_Underline( IFont* iface, BOOL* punderline) { _ICOM_THIS(OLEFontImpl, iface); /* * Sanity check */ if (punderline==0) return E_POINTER; *punderline = this->description.fUnderline; return S_OK; } /************************************************************************ * OLEFontImpl_put_Underline (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_put_Underline( IFont* iface, BOOL underline) { _ICOM_THIS(OLEFontImpl, iface); this->description.fUnderline = underline; return S_OK; } /************************************************************************ * OLEFontImpl_get_Strikethrough (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_get_Strikethrough( IFont* iface, BOOL* pstrikethrough) { _ICOM_THIS(OLEFontImpl, iface); /* * Sanity check */ if (pstrikethrough==0) return E_POINTER; *pstrikethrough = this->description.fStrikethrough; return S_OK; } /************************************************************************ * OLEFontImpl_put_Strikethrough (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_put_Strikethrough( IFont* iface, BOOL strikethrough) { _ICOM_THIS(OLEFontImpl, iface); this->description.fStrikethrough = strikethrough; return S_OK; } /************************************************************************ * OLEFontImpl_get_Weight (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_get_Weight( IFont* iface, short* pweight) { _ICOM_THIS(OLEFontImpl, iface); /* * Sanity check */ if (pweight==0) return E_POINTER; *pweight = this->description.sWeight; return S_OK; } /************************************************************************ * OLEFontImpl_put_Weight (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_put_Weight( IFont* iface, short weight) { _ICOM_THIS(OLEFontImpl, iface); this->description.sWeight = weight; return S_OK; } /************************************************************************ * OLEFontImpl_get_Charset (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_get_Charset( IFont* iface, short* pcharset) { _ICOM_THIS(OLEFontImpl, iface); /* * Sanity check */ if (pcharset==0) return E_POINTER; *pcharset = this->description.sCharset; return S_OK; } /************************************************************************ * OLEFontImpl_put_Charset (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_put_Charset( IFont* iface, short charset) { _ICOM_THIS(OLEFontImpl, iface); this->description.sCharset = charset; return S_OK; } /************************************************************************ * OLEFontImpl_get_hFont (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_get_hFont( IFont* iface, HFONT* phfont) { _ICOM_THIS(OLEFontImpl, iface); if (phfont==NULL) return E_POINTER; /* * Realize the font if necessary */ if (this->gdiFont==0) { LOGFONTW logFont; INT fontHeight; CY cySize; /* * The height of the font returned by the get_Size property is the * height of the font in points multiplied by 10000... Using some * simple conversions and the ratio given by the application, it can * be converted to a height in pixels. */ IFont_get_Size(iface, &cySize); fontHeight = MulDiv(cySize.s.Lo, 2540L, 72L); fontHeight = MulDiv(fontHeight, this->cyLogical,this->cyHimetric); memset(&logFont, 0, sizeof(LOGFONTW)); logFont.lfHeight = ((fontHeight%10000L)>5000L) ? (-fontHeight/10000L)-1 : (-fontHeight/10000L); logFont.lfItalic = this->description.fItalic; logFont.lfUnderline = this->description.fUnderline; logFont.lfStrikeOut = this->description.fStrikethrough; logFont.lfWeight = this->description.sWeight; logFont.lfCharSet = this->description.sCharset; logFont.lfOutPrecision = OUT_CHARACTER_PRECIS; logFont.lfClipPrecision = CLIP_DEFAULT_PRECIS; logFont.lfQuality = DEFAULT_QUALITY; logFont.lfPitchAndFamily = DEFAULT_PITCH; lstrcpyW(logFont.lfFaceName,this->description.lpstrName); this->gdiFont = CreateFontIndirectW(&logFont); } *phfont = this->gdiFont; return S_OK; } /************************************************************************ * OLEFontImpl_Clone (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_Clone( IFont* iface, IFont** ppfont) { OLEFontImpl* newObject = 0; _ICOM_THIS(OLEFontImpl, iface); if (ppfont == NULL) return E_POINTER; *ppfont = NULL; /* * Allocate space for the object. */ newObject = HeapAlloc(GetProcessHeap(), 0, sizeof(OLEFontImpl)); if (newObject==NULL) return E_OUTOFMEMORY; *newObject = *this; /* * That new object starts with a reference count of 1 */ newObject->ref = 1; *ppfont = (IFont*)newObject; return S_OK; } /************************************************************************ * OLEFontImpl_IsEqual (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_IsEqual( IFont* iface, IFont* pFontOther) { FIXME("():Stub\n"); return E_NOTIMPL; } /************************************************************************ * OLEFontImpl_SetRatio (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_SetRatio( IFont* iface, long cyLogical, long cyHimetric) { _ICOM_THIS(OLEFontImpl, iface); this->cyLogical = cyLogical; this->cyHimetric = cyHimetric; return S_OK; } /************************************************************************ * OLEFontImpl_QueryTextMetrics (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_QueryTextMetrics( IFont* iface, TEXTMETRICOLE* ptm) { FIXME("():Stub\n"); return E_NOTIMPL; } /************************************************************************ * OLEFontImpl_AddRefHfont (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_AddRefHfont( IFont* iface, HFONT hfont) { _ICOM_THIS(OLEFontImpl, iface); if ( (hfont == 0) || (hfont != this->gdiFont) ) return E_INVALIDARG; this->fontLock++; return S_OK; } /************************************************************************ * OLEFontImpl_ReleaseHfont (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_ReleaseHfont( IFont* iface, HFONT hfont) { _ICOM_THIS(OLEFontImpl, iface); if ( (hfont == 0) || (hfont != this->gdiFont) ) return E_INVALIDARG; this->fontLock--; /* * If we just released our last font reference, destroy it. */ if (this->fontLock==0) { DeleteObject(this->gdiFont); this->gdiFont = 0; } return S_OK; } /************************************************************************ * OLEFontImpl_SetHdc (IFont) * * See Windows documentation for more details on IFont methods. */ static HRESULT WINAPI OLEFontImpl_SetHdc( IFont* iface, HDC hdc) { FIXME("():Stub\n"); return E_NOTIMPL; } /************************************************************************ * OLEFontImpl_IDispatch_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static HRESULT WINAPI OLEFontImpl_IDispatch_QueryInterface( IDispatch* iface, REFIID riid, VOID** ppvoid) { _ICOM_THIS_From_IDispatch(IFont, iface); return IFont_QueryInterface(this, riid, ppvoid); } /************************************************************************ * OLEFontImpl_IDispatch_Release (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI OLEFontImpl_IDispatch_Release( IDispatch* iface) { _ICOM_THIS_From_IDispatch(IFont, iface); return IFont_Release(this); } /************************************************************************ * OLEFontImpl_IDispatch_AddRef (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI OLEFontImpl_IDispatch_AddRef( IDispatch* iface) { _ICOM_THIS_From_IDispatch(IFont, iface); return IFont_AddRef(this); } /************************************************************************ * OLEFontImpl_GetTypeInfoCount (IDispatch) * * See Windows documentation for more details on IDispatch methods. */ static HRESULT WINAPI OLEFontImpl_GetTypeInfoCount( IDispatch* iface, unsigned int* pctinfo) { FIXME("():Stub\n"); return E_NOTIMPL; } /************************************************************************ * OLEFontImpl_GetTypeInfo (IDispatch) * * See Windows documentation for more details on IDispatch methods. */ static HRESULT WINAPI OLEFontImpl_GetTypeInfo( IDispatch* iface, UINT iTInfo, LCID lcid, ITypeInfo** ppTInfo) { FIXME("():Stub\n"); return E_NOTIMPL; } /************************************************************************ * OLEFontImpl_GetIDsOfNames (IDispatch) * * See Windows documentation for more details on IDispatch methods. */ static HRESULT WINAPI OLEFontImpl_GetIDsOfNames( IDispatch* iface, REFIID riid, LPOLESTR* rgszNames, UINT cNames, LCID lcid, DISPID* rgDispId) { FIXME("():Stub\n"); return E_NOTIMPL; } /************************************************************************ * OLEFontImpl_Invoke (IDispatch) * * See Windows documentation for more details on IDispatch methods. */ static HRESULT WINAPI OLEFontImpl_Invoke( IDispatch* iface, DISPID dispIdMember, REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS* pDispParams, VARIANT* pVarResult, EXCEPINFO* pExepInfo, UINT* puArgErr) { FIXME("():Stub\n"); return E_NOTIMPL; } /************************************************************************ * OLEFontImpl_IPersistStream_QueryInterface (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static HRESULT WINAPI OLEFontImpl_IPersistStream_QueryInterface( IPersistStream* iface, REFIID riid, VOID** ppvoid) { _ICOM_THIS_From_IPersistStream(IFont, iface); return IFont_QueryInterface(this, riid, ppvoid); } /************************************************************************ * OLEFontImpl_IPersistStream_Release (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI OLEFontImpl_IPersistStream_Release( IPersistStream* iface) { _ICOM_THIS_From_IPersistStream(IFont, iface); return IFont_Release(this); } /************************************************************************ * OLEFontImpl_IPersistStream_AddRef (IUnknown) * * See Windows documentation for more details on IUnknown methods. */ static ULONG WINAPI OLEFontImpl_IPersistStream_AddRef( IPersistStream* iface) { _ICOM_THIS_From_IPersistStream(IFont, iface); return IFont_AddRef(this); } /************************************************************************ * OLEFontImpl_GetClassID (IPersistStream) * * See Windows documentation for more details on IPersistStream methods. */ static HRESULT WINAPI OLEFontImpl_GetClassID( IPersistStream* iface, CLSID* pClassID) { if (pClassID==0) return E_POINTER; memcpy(pClassID, &CLSID_StdFont, sizeof(CLSID_StdFont)); return S_OK; } /************************************************************************ * OLEFontImpl_IsDirty (IPersistStream) * * See Windows documentation for more details on IPersistStream methods. */ static HRESULT WINAPI OLEFontImpl_IsDirty( IPersistStream* iface) { return S_OK; } /************************************************************************ * OLEFontImpl_Load (IPersistStream) * * See Windows documentation for more details on IPersistStream methods. * * This is the format of the standard font serialization as far as I * know * * Offset Type Value Comment * 0x0000 Byte Unknown Probably a version number, contains 0x01 * 0x0001 Short Charset Charset value from the FONTDESC structure * 0x0003 Byte Attributes Flags defined as follows: * 00000010 - Italic * 00000100 - Underline * 00001000 - Strikethrough * 0x0004 Short Weight Weight value from FONTDESC structure * 0x0006 DWORD size "Low" portion of the cySize member of the FONTDESC * structure/ * 0x000A Byte name length Length of the font name string (no null character) * 0x000B String name Name of the font (ASCII, no nul character) */ static HRESULT WINAPI OLEFontImpl_Load( IPersistStream* iface, IStream* pLoadStream) { char readBuffer[0x100]; ULONG cbRead; BYTE bVersion; BYTE bAttributes; BYTE bStringSize; _ICOM_THIS_From_IPersistStream(OLEFontImpl, iface); /* * Read the version byte */ IStream_Read(pLoadStream, &bVersion, 1, &cbRead); if ( (cbRead!=1) || (bVersion!=0x01) ) return E_FAIL; /* * Charset */ IStream_Read(pLoadStream, &this->description.sCharset, 2, &cbRead); if (cbRead!=2) return E_FAIL; /* * Attributes */ IStream_Read(pLoadStream, &bAttributes, 1, &cbRead); if (cbRead!=1) return E_FAIL; this->description.fItalic = (bAttributes & FONTPERSIST_ITALIC) != 0; this->description.fStrikethrough = (bAttributes & FONTPERSIST_STRIKETHROUGH) != 0; this->description.fUnderline = (bAttributes & FONTPERSIST_UNDERLINE) != 0; /* * Weight */ IStream_Read(pLoadStream, &this->description.sWeight, 2, &cbRead); if (cbRead!=2) return E_FAIL; /* * Size */ IStream_Read(pLoadStream, &this->description.cySize.s.Lo, 4, &cbRead); if (cbRead!=4) return E_FAIL; this->description.cySize.s.Hi = 0; /* * FontName */ IStream_Read(pLoadStream, &bStringSize, 1, &cbRead); if (cbRead!=1) return E_FAIL; memset(readBuffer, 0, 0x100); IStream_Read(pLoadStream, readBuffer, bStringSize, &cbRead); if (cbRead!=bStringSize) return E_FAIL; if (this->description.lpstrName!=0) HeapFree(GetProcessHeap(), 0, this->description.lpstrName); this->description.lpstrName = HEAP_strdupAtoW(GetProcessHeap(), HEAP_ZERO_MEMORY, readBuffer); return S_OK; } /************************************************************************ * OLEFontImpl_Save (IPersistStream) * * See Windows documentation for more details on IPersistStream methods. */ static HRESULT WINAPI OLEFontImpl_Save( IPersistStream* iface, IStream* pOutStream, BOOL fClearDirty) { char* writeBuffer = NULL; ULONG cbWritten; BYTE bVersion = 0x01; BYTE bAttributes; BYTE bStringSize; _ICOM_THIS_From_IPersistStream(OLEFontImpl, iface); /* * Read the version byte */ IStream_Write(pOutStream, &bVersion, 1, &cbWritten); if (cbWritten!=1) return E_FAIL; /* * Charset */ IStream_Write(pOutStream, &this->description.sCharset, 2, &cbWritten); if (cbWritten!=2) return E_FAIL; /* * Attributes */ bAttributes = 0; if (this->description.fItalic) bAttributes |= FONTPERSIST_ITALIC; if (this->description.fStrikethrough) bAttributes |= FONTPERSIST_STRIKETHROUGH; if (this->description.fUnderline) bAttributes |= FONTPERSIST_UNDERLINE; IStream_Write(pOutStream, &bAttributes, 1, &cbWritten); if (cbWritten!=1) return E_FAIL; /* * Weight */ IStream_Write(pOutStream, &this->description.sWeight, 2, &cbWritten); if (cbWritten!=2) return E_FAIL; /* * Size */ IStream_Write(pOutStream, &this->description.cySize.s.Lo, 4, &cbWritten); if (cbWritten!=4) return E_FAIL; /* * FontName */ if (this->description.lpstrName!=0) bStringSize = lstrlenW(this->description.lpstrName); else bStringSize = 0; IStream_Write(pOutStream, &bStringSize, 1, &cbWritten); if (cbWritten!=1) return E_FAIL; if (bStringSize!=0) { writeBuffer = HEAP_strdupWtoA(GetProcessHeap(), HEAP_ZERO_MEMORY, this->description.lpstrName); if (writeBuffer==0) return E_OUTOFMEMORY; IStream_Write(pOutStream, writeBuffer, bStringSize, &cbWritten); HeapFree(GetProcessHeap(), 0, writeBuffer); if (cbWritten!=bStringSize) return E_FAIL; } return S_OK; } /************************************************************************ * OLEFontImpl_GetSizeMax (IPersistStream) * * See Windows documentation for more details on IPersistStream methods. */ static HRESULT WINAPI OLEFontImpl_GetSizeMax( IPersistStream* iface, ULARGE_INTEGER* pcbSize) { _ICOM_THIS_From_IPersistStream(OLEFontImpl, iface); if (pcbSize==NULL) return E_POINTER; pcbSize->s.HighPart = 0; pcbSize->s.LowPart = 0; pcbSize->s.LowPart += sizeof(BYTE); /* Version */ pcbSize->s.LowPart += sizeof(WORD); /* Lang code */ pcbSize->s.LowPart += sizeof(BYTE); /* Flags */ pcbSize->s.LowPart += sizeof(WORD); /* Weight */ pcbSize->s.LowPart += sizeof(DWORD); /* Size */ pcbSize->s.LowPart += sizeof(BYTE); /* StrLength */ if (this->description.lpstrName!=0) pcbSize->s.LowPart += lstrlenW(this->description.lpstrName); return S_OK; } wine-20000526/dlls/oleaut32/parsedt.c0100644000175000001440000007501407037005216016653 0ustar julliardusers/* PostgreSQL Data Base Management System (formerly known as Postgres, then as Postgres95). Copyright (c) 1994-7 Regents of the University of California Permission to use, copy, modify, and distribute this software and its documentation for any purpose, without fee, and without a written agreement is hereby granted, provided that the above copyright notice and this paragraph and the following two paragraphs appear in all copies. IN NO EVENT SHALL THE UNIVERSITY OF CALIFORNIA BE LIABLE TO ANY PARTY FOR DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES, INCLUDING LOST PROFITS, ARISING OUT OF THE USE OF THIS SOFTWARE AND ITS DOCUMENTATION, EVEN IF THE UNIVERSITY OF CALIFORNIA HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. THE UNIVERSITY OF CALIFORNIA SPECIFICALLY DISCLAIMS ANY WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE SOFTWARE PROVIDED HEREUNDER IS ON AN "AS IS" BASIS, AND THE UNIVERSITY OF CALIFORNIA HAS NO OBLIGATIONS TO PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS. */ /*------------------------------------------------------------------------- * * dt.c-- * Functions for the built-in type "dt". * * Copyright (c) 1994, Regents of the University of California * * *------------------------------------------------------------------------- */ #include #include #include #include #include #include #include #include #include #include "parsedt.h" static datetkn *datebsearch(char *key, datetkn *base, unsigned int nel); static int DecodeDate(char *str, int fmask, int *tmask, struct tm * tm); static int DecodeNumber(int flen, char *field, int fmask, int *tmask, struct tm * tm, double *fsec); static int DecodeNumberField(int len, char *str, int fmask, int *tmask, struct tm * tm, double *fsec); static int DecodeSpecial(int field, char *lowtoken, int *val); static int DecodeTime(char *str, int fmask, int *tmask, struct tm * tm, double *fsec); static int DecodeTimezone(char *str, int *tzp); #define USE_DATE_CACHE 1 #define ROUND_ALL 0 static const int mdays[] = {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31, 0}; static const char * const months[] = {"Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec", NULL}; static const char * const days[] = {"Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday", NULL}; /* those three vars are useless, and not even initialized, so * I'd rather remove them all (EPP) */ int DateStyle; bool EuroDates; int CTimeZone; #define UTIME_MINYEAR (1901) #define UTIME_MINMONTH (12) #define UTIME_MINDAY (14) #define UTIME_MAXYEAR (2038) #define UTIME_MAXMONTH (01) #define UTIME_MAXDAY (18) #define IS_VALID_UTIME(y,m,d) (((y > UTIME_MINYEAR) \ || ((y == UTIME_MINYEAR) && ((m > UTIME_MINMONTH) \ || ((m == UTIME_MINMONTH) && (d >= UTIME_MINDAY))))) \ && ((y < UTIME_MAXYEAR) \ || ((y == UTIME_MAXYEAR) && ((m < UTIME_MAXMONTH) \ || ((m == UTIME_MAXMONTH) && (d <= UTIME_MAXDAY)))))) /***************************************************************************** * PRIVATE ROUTINES * *****************************************************************************/ /* definitions for squeezing values into "value" */ #define ABS_SIGNBIT (char) 0200 #define VALMASK (char) 0177 #define NEG(n) ((n)|ABS_SIGNBIT) #define SIGNEDCHAR(c) ((c)&ABS_SIGNBIT? -((c)&VALMASK): (c)) #define FROMVAL(tp) (-SIGNEDCHAR((tp)->value) * 10) /* uncompress */ #define TOVAL(tp, v) ((tp)->value = ((v) < 0? NEG((-(v))/10): (v)/10)) /* * to keep this table reasonably small, we divide the lexval for TZ and DTZ * entries by 10 and truncate the text field at MAXTOKLEN characters. * the text field is not guaranteed to be NULL-terminated. */ static datetkn datetktbl[] = { /* text token lexval */ {EARLY, RESERV, DTK_EARLY}, /* "-infinity" reserved for "early time" */ {"acsst", DTZ, 63}, /* Cent. Australia */ {"acst", TZ, 57}, /* Cent. Australia */ {DA_D, ADBC, AD}, /* "ad" for years >= 0 */ {"abstime", IGNOREFIELD, 0}, /* "abstime" for pre-v6.1 "Invalid * Abstime" */ {"adt", DTZ, NEG(18)}, /* Atlantic Daylight Time */ {"aesst", DTZ, 66}, /* E. Australia */ {"aest", TZ, 60}, /* Australia Eastern Std Time */ {"ahst", TZ, 60}, /* Alaska-Hawaii Std Time */ {"allballs", RESERV, DTK_ZULU}, /* 00:00:00 */ {"am", AMPM, AM}, {"apr", MONTH, 4}, {"april", MONTH, 4}, {"ast", TZ, NEG(24)}, /* Atlantic Std Time (Canada) */ {"at", IGNOREFIELD, 0}, /* "at" (throwaway) */ {"aug", MONTH, 8}, {"august", MONTH, 8}, {"awsst", DTZ, 54}, /* W. Australia */ {"awst", TZ, 48}, /* W. Australia */ {DB_C, ADBC, BC}, /* "bc" for years < 0 */ {"bst", TZ, 6}, /* British Summer Time */ {"bt", TZ, 18}, /* Baghdad Time */ {"cadt", DTZ, 63}, /* Central Australian DST */ {"cast", TZ, 57}, /* Central Australian ST */ {"cat", TZ, NEG(60)}, /* Central Alaska Time */ {"cct", TZ, 48}, /* China Coast */ {"cdt", DTZ, NEG(30)}, /* Central Daylight Time */ {"cet", TZ, 6}, /* Central European Time */ {"cetdst", DTZ, 12}, /* Central European Dayl.Time */ {"cst", TZ, NEG(36)}, /* Central Standard Time */ {DCURRENT, RESERV, DTK_CURRENT}, /* "current" is always now */ {"dec", MONTH, 12}, {"december", MONTH, 12}, {"dnt", TZ, 6}, /* Dansk Normal Tid */ {"dow", RESERV, DTK_DOW}, /* day of week */ {"doy", RESERV, DTK_DOY}, /* day of year */ {"dst", DTZMOD, 6}, {"east", TZ, NEG(60)}, /* East Australian Std Time */ {"edt", DTZ, NEG(24)}, /* Eastern Daylight Time */ {"eet", TZ, 12}, /* East. Europe, USSR Zone 1 */ {"eetdst", DTZ, 18}, /* Eastern Europe */ {EPOCH, RESERV, DTK_EPOCH}, /* "epoch" reserved for system epoch time */ #if USE_AUSTRALIAN_RULES {"est", TZ, 60}, /* Australia Eastern Std Time */ #else {"est", TZ, NEG(30)}, /* Eastern Standard Time */ #endif {"feb", MONTH, 2}, {"february", MONTH, 2}, {"fri", DOW, 5}, {"friday", DOW, 5}, {"fst", TZ, 6}, /* French Summer Time */ {"fwt", DTZ, 12}, /* French Winter Time */ {"gmt", TZ, 0}, /* Greenwish Mean Time */ {"gst", TZ, 60}, /* Guam Std Time, USSR Zone 9 */ {"hdt", DTZ, NEG(54)}, /* Hawaii/Alaska */ {"hmt", DTZ, 18}, /* Hellas ? ? */ {"hst", TZ, NEG(60)}, /* Hawaii Std Time */ {"idle", TZ, 72}, /* Intl. Date Line, East */ {"idlw", TZ, NEG(72)}, /* Intl. Date Line,, est */ {LATE, RESERV, DTK_LATE}, /* "infinity" reserved for "late time" */ {INVALID, RESERV, DTK_INVALID}, /* "invalid" reserved for invalid * time */ {"ist", TZ, 12}, /* Israel */ {"it", TZ, 22}, /* Iran Time */ {"jan", MONTH, 1}, {"january", MONTH, 1}, {"jst", TZ, 54}, /* Japan Std Time,USSR Zone 8 */ {"jt", TZ, 45}, /* Java Time */ {"jul", MONTH, 7}, {"july", MONTH, 7}, {"jun", MONTH, 6}, {"june", MONTH, 6}, {"kst", TZ, 54}, /* Korea Standard Time */ {"ligt", TZ, 60}, /* From Melbourne, Australia */ {"mar", MONTH, 3}, {"march", MONTH, 3}, {"may", MONTH, 5}, {"mdt", DTZ, NEG(36)}, /* Mountain Daylight Time */ {"mest", DTZ, 12}, /* Middle Europe Summer Time */ {"met", TZ, 6}, /* Middle Europe Time */ {"metdst", DTZ, 12}, /* Middle Europe Daylight Time */ {"mewt", TZ, 6}, /* Middle Europe Winter Time */ {"mez", TZ, 6}, /* Middle Europe Zone */ {"mon", DOW, 1}, {"monday", DOW, 1}, {"mst", TZ, NEG(42)}, /* Mountain Standard Time */ {"mt", TZ, 51}, /* Moluccas Time */ {"ndt", DTZ, NEG(15)}, /* Nfld. Daylight Time */ {"nft", TZ, NEG(21)}, /* Newfoundland Standard Time */ {"nor", TZ, 6}, /* Norway Standard Time */ {"nov", MONTH, 11}, {"november", MONTH, 11}, {NOW, RESERV, DTK_NOW}, /* current transaction time */ {"nst", TZ, NEG(21)}, /* Nfld. Standard Time */ {"nt", TZ, NEG(66)}, /* Nome Time */ {"nzdt", DTZ, 78}, /* New Zealand Daylight Time */ {"nzst", TZ, 72}, /* New Zealand Standard Time */ {"nzt", TZ, 72}, /* New Zealand Time */ {"oct", MONTH, 10}, {"october", MONTH, 10}, {"on", IGNOREFIELD, 0}, /* "on" (throwaway) */ {"pdt", DTZ, NEG(42)}, /* Pacific Daylight Time */ {"pm", AMPM, PM}, {"pst", TZ, NEG(48)}, /* Pacific Standard Time */ {"sadt", DTZ, 63}, /* S. Australian Dayl. Time */ {"sast", TZ, 57}, /* South Australian Std Time */ {"sat", DOW, 6}, {"saturday", DOW, 6}, {"sep", MONTH, 9}, {"sept", MONTH, 9}, {"september", MONTH, 9}, {"set", TZ, NEG(6)}, /* Seychelles Time ?? */ {"sst", DTZ, 12}, /* Swedish Summer Time */ {"sun", DOW, 0}, {"sunday", DOW, 0}, {"swt", TZ, 6}, /* Swedish Winter Time */ {"thu", DOW, 4}, {"thur", DOW, 4}, {"thurs", DOW, 4}, {"thursday", DOW, 4}, {TODAY, RESERV, DTK_TODAY}, /* midnight */ {TOMORROW, RESERV, DTK_TOMORROW}, /* tomorrow midnight */ {"tue", DOW, 2}, {"tues", DOW, 2}, {"tuesday", DOW, 2}, {"undefined", RESERV, DTK_INVALID}, /* "undefined" pre-v6.1 invalid * time */ {"ut", TZ, 0}, {"utc", TZ, 0}, {"wadt", DTZ, 48}, /* West Australian DST */ {"wast", TZ, 42}, /* West Australian Std Time */ {"wat", TZ, NEG(6)}, /* West Africa Time */ {"wdt", DTZ, 54}, /* West Australian DST */ {"wed", DOW, 3}, {"wednesday", DOW, 3}, {"weds", DOW, 3}, {"wet", TZ, 0}, /* Western Europe */ {"wetdst", DTZ, 6}, /* Western Europe */ {"wst", TZ, 48}, /* West Australian Std Time */ {"ydt", DTZ, NEG(48)}, /* Yukon Daylight Time */ {YESTERDAY, RESERV, DTK_YESTERDAY}, /* yesterday midnight */ {"yst", TZ, NEG(54)}, /* Yukon Standard Time */ {"zp4", TZ, NEG(24)}, /* GMT +4 hours. */ {"zp5", TZ, NEG(30)}, /* GMT +5 hours. */ {"zp6", TZ, NEG(36)}, /* GMT +6 hours. */ {"z", RESERV, DTK_ZULU}, /* 00:00:00 */ {ZULU, RESERV, DTK_ZULU}, /* 00:00:00 */ }; static unsigned int szdatetktbl = sizeof datetktbl / sizeof datetktbl[0]; #if USE_DATE_CACHE datetkn *datecache[MAXDATEFIELDS] = {NULL}; datetkn *deltacache[MAXDATEFIELDS] = {NULL}; #endif /* * Calendar time to Julian date conversions. * Julian date is commonly used in astronomical applications, * since it is numerically accurate and computationally simple. * The algorithms here will accurately convert between Julian day * and calendar date for all non-negative Julian days * (i.e. from Nov 23, -4713 on). * * Ref: Explanatory Supplement to the Astronomical Almanac, 1992. * University Science Books, 20 Edgehill Rd. Mill Valley CA 94941. * * Use the algorithm by Henry Fliegel, a former NASA/JPL colleague * now at Aerospace Corp. (hi, Henry!) * * These routines will be used by other date/time packages - tgl 97/02/25 */ /* Set the minimum year to one greater than the year of the first valid day * to avoid having to check year and day both. - tgl 97/05/08 */ #define JULIAN_MINYEAR (-4713) #define JULIAN_MINMONTH (11) #define JULIAN_MINDAY (23) #define IS_VALID_JULIAN(y,m,d) ((y > JULIAN_MINYEAR) \ || ((y == JULIAN_MINYEAR) && ((m > JULIAN_MINMONTH) \ || ((m == JULIAN_MINMONTH) && (d >= JULIAN_MINDAY))))) int date2j(int y, int m, int d) { int m12 = (m - 14) / 12; return ((1461 * (y + 4800 + m12)) / 4 + (367 * (m - 2 - 12 * (m12))) / 12 - (3 * ((y + 4900 + m12) / 100)) / 4 + d - 32075); } /* date2j() */ void j2date(int jd, int *year, int *month, int *day) { int j, y, m, d; int i, l, n; l = jd + 68569; n = (4 * l) / 146097; l -= (146097 * n + 3) / 4; i = (4000 * (l + 1)) / 1461001; l += 31 - (1461 * i) / 4; j = (80 * l) / 2447; d = l - (2447 * j) / 80; l = j / 11; m = (j + 2) - (12 * l); y = 100 * (n - 49) + i + l; *year = y; *month = m; *day = d; return; } /* j2date() */ /* * parse and convert date in timestr (the normal interface) * * Returns the number of seconds since epoch (J2000) */ /* ParseDateTime() * Break string into tokens based on a date/time context. */ int ParseDateTime(char *timestr, char *lowstr, char **field, int *ftype, int maxfields, int *numfields) { int nf = 0; char *cp = timestr; char *lp = lowstr; #ifdef DATEDEBUG printf("ParseDateTime- input string is %s\n", timestr); #endif /* outer loop through fields */ while (*cp != '\0') { field[nf] = lp; /* leading digit? then date or time */ if (isdigit(*cp) || (*cp == '.')) { *lp++ = *cp++; while (isdigit(*cp)) *lp++ = *cp++; /* time field? */ if (*cp == ':') { ftype[nf] = DTK_TIME; while (isdigit(*cp) || (*cp == ':') || (*cp == '.')) *lp++ = *cp++; } /* date field? allow embedded text month */ else if ((*cp == '-') || (*cp == '/') || (*cp == '.')) { ftype[nf] = DTK_DATE; while (isalnum(*cp) || (*cp == '-') || (*cp == '/') || (*cp == '.')) *lp++ = tolower(*cp++); } /* * otherwise, number only and will determine year, month, or * day later */ else ftype[nf] = DTK_NUMBER; } /* * text? then date string, month, day of week, special, or * timezone */ else if (isalpha(*cp)) { ftype[nf] = DTK_STRING; *lp++ = tolower(*cp++); while (isalpha(*cp)) *lp++ = tolower(*cp++); /* full date string with leading text month? */ if ((*cp == '-') || (*cp == '/') || (*cp == '.')) { ftype[nf] = DTK_DATE; while (isdigit(*cp) || (*cp == '-') || (*cp == '/') || (*cp == '.')) *lp++ = tolower(*cp++); } /* skip leading spaces */ } else if (isspace(*cp)) { cp++; continue; /* sign? then special or numeric timezone */ } else if ((*cp == '+') || (*cp == '-')) { *lp++ = *cp++; /* soak up leading whitespace */ while (isspace(*cp)) cp++; /* numeric timezone? */ if (isdigit(*cp)) { ftype[nf] = DTK_TZ; *lp++ = *cp++; while (isdigit(*cp) || (*cp == ':')) *lp++ = *cp++; /* special? */ } else if (isalpha(*cp)) { ftype[nf] = DTK_SPECIAL; *lp++ = tolower(*cp++); while (isalpha(*cp)) *lp++ = tolower(*cp++); /* otherwise something wrong... */ } else return -1; /* ignore punctuation but use as delimiter */ } else if (ispunct(*cp)) { cp++; continue; } else return -1; /* force in a delimiter */ *lp++ = '\0'; nf++; if (nf > MAXDATEFIELDS) return -1; #ifdef DATEDEBUG printf("ParseDateTime- set field[%d] to %s type %d\n", (nf - 1), field[nf - 1], ftype[nf - 1]); #endif } *numfields = nf; return 0; } /* ParseDateTime() */ /* DecodeDateTime() * Interpret previously parsed fields for general date and time. * Return 0 if full date, 1 if only time, and -1 if problems. * External format(s): * " -- ::" * "Fri Feb-7-1997 15:23:27" * "Feb-7-1997 15:23:27" * "2-7-1997 15:23:27" * "1997-2-7 15:23:27" * "1997.038 15:23:27" (day of year 1-366) * Also supports input in compact time: * "970207 152327" * "97038 152327" * * Use the system-provided functions to get the current time zone * if not specified in the input string. * If the date is outside the time_t system-supported time range, * then assume GMT time zone. - tgl 97/05/27 */ int DecodeDateTime(char **field, int *ftype, int nf, int *dtype, struct tm * tm, double *fsec, int *tzp) { int fmask = 0, tmask, type; int i; int flen, val; int mer = HR24; int bc = FALSE; *dtype = DTK_DATE; tm->tm_hour = 0; tm->tm_min = 0; tm->tm_sec = 0; *fsec = 0; tm->tm_isdst = -1; /* don't know daylight savings time status * apriori */ if (tzp != NULL) *tzp = 0; for (i = 0; i < nf; i++) { #ifdef DATEDEBUG printf("DecodeDateTime- field[%d] is %s (type %d)\n", i, field[i], ftype[i]); #endif switch (ftype[i]) { case DTK_DATE: if (DecodeDate(field[i], fmask, &tmask, tm) != 0) return -1; break; case DTK_TIME: if (DecodeTime(field[i], fmask, &tmask, tm, fsec) != 0) return -1; /* * check upper limit on hours; other limits checked in * DecodeTime() */ if (tm->tm_hour > 23) return -1; break; case DTK_TZ: if (tzp == NULL) return -1; if (DecodeTimezone(field[i], tzp) != 0) return -1; tmask = DTK_M(TZ); break; case DTK_NUMBER: flen = strlen(field[i]); if (flen > 4) { if (DecodeNumberField(flen, field[i], fmask, &tmask, tm, fsec) != 0) return -1; } else { if (DecodeNumber(flen, field[i], fmask, &tmask, tm, fsec) != 0) return -1; } break; case DTK_STRING: case DTK_SPECIAL: type = DecodeSpecial(i, field[i], &val); #ifdef DATEDEBUG printf("DecodeDateTime- special field[%d] %s type=%d value=%d\n", i, field[i], type, val); #endif if (type == IGNOREFIELD) continue; tmask = DTK_M(type); switch (type) { case RESERV: #ifdef DATEDEBUG printf("DecodeDateTime- RESERV field %s value is %d\n", field[i], val); #endif switch (val) { default: *dtype = val; } break; case MONTH: #ifdef DATEDEBUG printf("DecodeDateTime- month field %s value is %d\n", field[i], val); #endif tm->tm_mon = val; break; /* * daylight savings time modifier (solves "MET * DST" syntax) */ case DTZMOD: tmask |= DTK_M(DTZ); tm->tm_isdst = 1; if (tzp == NULL) return -1; *tzp += val * 60; break; case DTZ: /* * set mask for TZ here _or_ check for DTZ later * when getting default timezone */ tmask |= DTK_M(TZ); tm->tm_isdst = 1; if (tzp == NULL) return -1; *tzp = val * 60; break; case TZ: tm->tm_isdst = 0; if (tzp == NULL) return -1; *tzp = val * 60; break; case IGNOREFIELD: break; case AMPM: mer = val; break; case ADBC: bc = (val == BC); break; case DOW: tm->tm_wday = val; break; default: return -1; } break; default: return -1; } #ifdef DATEDEBUG printf("DecodeDateTime- field[%d] %s (%08x/%08x) value is %d\n", i, field[i], fmask, tmask, val); #endif if (tmask & fmask) return -1; fmask |= tmask; } /* there is no year zero in AD/BC notation; i.e. "1 BC" == year 0 */ if (bc) tm->tm_year = -(tm->tm_year - 1); if ((mer != HR24) && (tm->tm_hour > 12)) return -1; if ((mer == AM) && (tm->tm_hour == 12)) tm->tm_hour = 0; else if ((mer == PM) && (tm->tm_hour != 12)) tm->tm_hour += 12; #ifdef DATEDEBUG printf("DecodeDateTime- mask %08x (%08x)", fmask, DTK_DATE_M); printf(" set y%04d m%02d d%02d", tm->tm_year, tm->tm_mon, tm->tm_mday); printf(" %02d:%02d:%02d\n", tm->tm_hour, tm->tm_min, tm->tm_sec); #endif if ((*dtype == DTK_DATE) && ((fmask & DTK_DATE_M) != DTK_DATE_M)) return ((fmask & DTK_TIME_M) == DTK_TIME_M) ? 1 : -1; /* timezone not specified? then find local timezone if possible */ if ((*dtype == DTK_DATE) && ((fmask & DTK_DATE_M) == DTK_DATE_M) && (tzp != NULL) && (!(fmask & DTK_M(TZ)))) { /* * daylight savings time modifier but no standard timezone? then * error */ if (fmask & DTK_M(DTZMOD)) return -1; if (IS_VALID_UTIME(tm->tm_year, tm->tm_mon, tm->tm_mday)) { #ifdef USE_POSIX_TIME tm->tm_year -= 1900; tm->tm_mon -= 1; tm->tm_isdst = -1; mktime(tm); tm->tm_year += 1900; tm->tm_mon += 1; #ifdef HAVE_INT_TIMEZONE *tzp = ((tm->tm_isdst > 0) ? (timezone - 3600) : timezone); #else /* !HAVE_INT_TIMEZONE */ *tzp = -(tm->tm_gmtoff); /* tm_gmtoff is Sun/DEC-ism */ #endif #else /* !USE_POSIX_TIME */ *tzp = CTimeZone; #endif } else { tm->tm_isdst = 0; *tzp = 0; } } return 0; } /* DecodeDateTime() */ /* DecodeTimeOnly() * Interpret parsed string as time fields only. */ int DecodeTimeOnly(char **field, int *ftype, int nf, int *dtype, struct tm * tm, double *fsec) { int fmask, tmask, type; int i; int flen, val; int mer = HR24; *dtype = DTK_TIME; tm->tm_hour = 0; tm->tm_min = 0; tm->tm_sec = 0; tm->tm_isdst = -1; /* don't know daylight savings time status * apriori */ *fsec = 0; fmask = DTK_DATE_M; for (i = 0; i < nf; i++) { #ifdef DATEDEBUG printf("DecodeTimeOnly- field[%d] is %s (type %d)\n", i, field[i], ftype[i]); #endif switch (ftype[i]) { case DTK_TIME: if (DecodeTime(field[i], fmask, &tmask, tm, fsec) != 0) return -1; break; case DTK_NUMBER: flen = strlen(field[i]); if (DecodeNumberField(flen, field[i], fmask, &tmask, tm, fsec) != 0) return -1; break; case DTK_STRING: case DTK_SPECIAL: type = DecodeSpecial(i, field[i], &val); #ifdef DATEDEBUG printf("DecodeTimeOnly- special field[%d] %s type=%d value=%d\n", i, field[i], type, val); #endif if (type == IGNOREFIELD) continue; tmask = DTK_M(type); switch (type) { case RESERV: #ifdef DATEDEBUG printf("DecodeTimeOnly- RESERV field %s value is %d\n", field[i], val); #endif switch (val) { default: return -1; } break; case IGNOREFIELD: break; case AMPM: mer = val; break; default: return -1; } break; default: return -1; } if (tmask & fmask) return -1; fmask |= tmask; #ifdef DATEDEBUG printf("DecodeTimeOnly- field[%d] %s value is %d\n", i, field[i], val); #endif } #ifdef DATEDEBUG printf("DecodeTimeOnly- mask %08x (%08x)", fmask, DTK_TIME_M); printf(" %02d:%02d:%02d (%f)\n", tm->tm_hour, tm->tm_min, tm->tm_sec, *fsec); #endif if ((mer != HR24) && (tm->tm_hour > 12)) return -1; if ((mer == AM) && (tm->tm_hour == 12)) tm->tm_hour = 0; else if ((mer == PM) && (tm->tm_hour != 12)) tm->tm_hour += 12; if ((fmask & DTK_TIME_M) != DTK_TIME_M) return -1; return 0; } /* DecodeTimeOnly() */ /* DecodeDate() * Decode date string which includes delimiters. * Insist on a complete set of fields. */ static int DecodeDate(char *str, int fmask, int *tmask, struct tm * tm) { double fsec; int nf = 0; int i, len; int type, val, dmask = 0; char *field[MAXDATEFIELDS]; /* parse this string... */ while ((*str != '\0') && (nf < MAXDATEFIELDS)) { /* skip field separators */ while (!isalnum(*str)) str++; field[nf] = str; if (isdigit(*str)) { while (isdigit(*str)) str++; } else if (isalpha(*str)) { while (isalpha(*str)) str++; } if (*str != '\0') *str++ = '\0'; nf++; } /* don't allow too many fields */ if (nf > 3) return -1; *tmask = 0; /* look first for text fields, since that will be unambiguous month */ for (i = 0; i < nf; i++) { if (isalpha(*field[i])) { type = DecodeSpecial(i, field[i], &val); if (type == IGNOREFIELD) continue; dmask = DTK_M(type); switch (type) { case MONTH: #ifdef DATEDEBUG printf("DecodeDate- month field %s value is %d\n", field[i], val); #endif tm->tm_mon = val; break; default: #ifdef DATEDEBUG printf("DecodeDate- illegal field %s value is %d\n", field[i], val); #endif return -1; } if (fmask & dmask) return -1; fmask |= dmask; *tmask |= dmask; /* mark this field as being completed */ field[i] = NULL; } } /* now pick up remaining numeric fields */ for (i = 0; i < nf; i++) { if (field[i] == NULL) continue; if ((len = strlen(field[i])) <= 0) return -1; if (DecodeNumber(len, field[i], fmask, &dmask, tm, &fsec) != 0) return -1; if (fmask & dmask) return -1; fmask |= dmask; *tmask |= dmask; } return 0; } /* DecodeDate() */ /* DecodeTime() * Decode time string which includes delimiters. * Only check the lower limit on hours, since this same code * can be used to represent time spans. */ static int DecodeTime(char *str, int fmask, int *tmask, struct tm * tm, double *fsec) { char *cp; *tmask = DTK_TIME_M; tm->tm_hour = strtol(str, &cp, 10); if (*cp != ':') return -1; str = cp + 1; tm->tm_min = strtol(str, &cp, 10); if (*cp == '\0') { tm->tm_sec = 0; *fsec = 0; } else if (*cp != ':') { return -1; } else { str = cp + 1; tm->tm_sec = strtol(str, &cp, 10); if (*cp == '\0') *fsec = 0; else if (*cp == '.') { str = cp; *fsec = strtod(str, &cp); if (cp == str) return -1; } else return -1; } /* do a sanity check */ if ((tm->tm_hour < 0) || (tm->tm_min < 0) || (tm->tm_min > 59) || (tm->tm_sec < 0) || (tm->tm_sec > 59)) return -1; return 0; } /* DecodeTime() */ /* DecodeNumber() * Interpret numeric field as a date value in context. */ static int DecodeNumber(int flen, char *str, int fmask, int *tmask, struct tm * tm, double *fsec) { int val; char *cp; *tmask = 0; val = strtol(str, &cp, 10); if (cp == str) return -1; if (*cp == '.') { *fsec = strtod(cp, &cp); if (*cp != '\0') return -1; } #ifdef DATEDEBUG printf("DecodeNumber- %s is %d fmask=%08x tmask=%08x\n", str, val, fmask, *tmask); #endif /* enough digits to be unequivocal year? */ if (flen == 4) { #ifdef DATEDEBUG printf("DecodeNumber- match %d (%s) as year\n", val, str); #endif *tmask = DTK_M(YEAR); /* already have a year? then see if we can substitute... */ if (fmask & DTK_M(YEAR)) { if ((!(fmask & DTK_M(DAY))) && ((tm->tm_year >= 1) && (tm->tm_year <= 31))) { #ifdef DATEDEBUG printf("DecodeNumber- misidentified year previously; swap with day %d\n", tm->tm_mday); #endif tm->tm_mday = tm->tm_year; *tmask = DTK_M(DAY); } } tm->tm_year = val; /* special case day of year? */ } else if ((flen == 3) && (fmask & DTK_M(YEAR)) && ((val >= 1) && (val <= 366))) { *tmask = (DTK_M(DOY) | DTK_M(MONTH) | DTK_M(DAY)); tm->tm_yday = val; j2date((date2j(tm->tm_year, 1, 1) + tm->tm_yday - 1), &tm->tm_year, &tm->tm_mon, &tm->tm_mday); /* already have year? then could be month */ } else if ((fmask & DTK_M(YEAR)) && (!(fmask & DTK_M(MONTH))) && ((val >= 1) && (val <= 12))) { #ifdef DATEDEBUG printf("DecodeNumber- match %d (%s) as month\n", val, str); #endif *tmask = DTK_M(MONTH); tm->tm_mon = val; /* no year and EuroDates enabled? then could be day */ } else if ((EuroDates || (fmask & DTK_M(MONTH))) && (!(fmask & DTK_M(YEAR)) && !(fmask & DTK_M(DAY))) && ((val >= 1) && (val <= 31))) { #ifdef DATEDEBUG printf("DecodeNumber- match %d (%s) as day\n", val, str); #endif *tmask = DTK_M(DAY); tm->tm_mday = val; } else if ((!(fmask & DTK_M(MONTH))) && ((val >= 1) && (val <= 12))) { #ifdef DATEDEBUG printf("DecodeNumber- (2) match %d (%s) as month\n", val, str); #endif *tmask = DTK_M(MONTH); tm->tm_mon = val; } else if ((!(fmask & DTK_M(DAY))) && ((val >= 1) && (val <= 31))) { #ifdef DATEDEBUG printf("DecodeNumber- (2) match %d (%s) as day\n", val, str); #endif *tmask = DTK_M(DAY); tm->tm_mday = val; } else if (!(fmask & DTK_M(YEAR))) { #ifdef DATEDEBUG printf("DecodeNumber- (2) match %d (%s) as year\n", val, str); #endif *tmask = DTK_M(YEAR); tm->tm_year = val; if (tm->tm_year < 70) tm->tm_year += 2000; else if (tm->tm_year < 100) tm->tm_year += 1900; } else return -1; return 0; } /* DecodeNumber() */ /* DecodeNumberField() * Interpret numeric string as a concatenated date field. */ static int DecodeNumberField(int len, char *str, int fmask, int *tmask, struct tm * tm, double *fsec) { char *cp; /* yyyymmdd? */ if (len == 8) { #ifdef DATEDEBUG printf("DecodeNumberField- %s is 8 character date fmask=%08x tmask=%08x\n", str, fmask, *tmask); #endif *tmask = DTK_DATE_M; tm->tm_mday = atoi(str + 6); *(str + 6) = '\0'; tm->tm_mon = atoi(str + 4); *(str + 4) = '\0'; tm->tm_year = atoi(str + 0); /* yymmdd or hhmmss? */ } else if (len == 6) { #ifdef DATEDEBUG printf("DecodeNumberField- %s is 6 characters fmask=%08x tmask=%08x\n", str, fmask, *tmask); #endif if (fmask & DTK_DATE_M) { #ifdef DATEDEBUG printf("DecodeNumberField- %s is time field fmask=%08x tmask=%08x\n", str, fmask, *tmask); #endif *tmask = DTK_TIME_M; tm->tm_sec = atoi(str + 4); *(str + 4) = '\0'; tm->tm_min = atoi(str + 2); *(str + 2) = '\0'; tm->tm_hour = atoi(str + 0); } else { #ifdef DATEDEBUG printf("DecodeNumberField- %s is date field fmask=%08x tmask=%08x\n", str, fmask, *tmask); #endif *tmask = DTK_DATE_M; tm->tm_mday = atoi(str + 4); *(str + 4) = '\0'; tm->tm_mon = atoi(str + 2); *(str + 2) = '\0'; tm->tm_year = atoi(str + 0); } } else if (strchr(str, '.') != NULL) { #ifdef DATEDEBUG printf("DecodeNumberField- %s is time field fmask=%08x tmask=%08x\n", str, fmask, *tmask); #endif *tmask = DTK_TIME_M; tm->tm_sec = strtod((str + 4), &cp); if (cp == (str + 4)) return -1; if (*cp == '.') *fsec = strtod(cp, NULL); *(str + 4) = '\0'; tm->tm_min = strtod((str + 2), &cp); *(str + 2) = '\0'; tm->tm_hour = strtod((str + 0), &cp); } else return -1; return 0; } /* DecodeNumberField() */ /* DecodeTimezone() * Interpret string as a numeric timezone. */ static int DecodeTimezone(char *str, int *tzp) { int tz; int hr, min; char *cp; int len; /* assume leading character is "+" or "-" */ hr = strtol((str + 1), &cp, 10); /* explicit delimiter? */ if (*cp == ':') { min = strtol((cp + 1), &cp, 10); /* otherwise, might have run things together... */ } else if ((*cp == '\0') && ((len = strlen(str)) > 3)) { min = strtol((str + len - 2), &cp, 10); *(str + len - 2) = '\0'; hr = strtol((str + 1), &cp, 10); } else min = 0; tz = (hr * 60 + min) * 60; if (*str == '-') tz = -tz; *tzp = -tz; return *cp != '\0'; } /* DecodeTimezone() */ /* DecodeSpecial() * Decode text string using lookup table. * Implement a cache lookup since it is likely that dates * will be related in format. */ static int DecodeSpecial(int field, char *lowtoken, int *val) { int type; datetkn *tp; #if USE_DATE_CACHE if ((datecache[field] != NULL) && (strncmp(lowtoken, datecache[field]->token, TOKMAXLEN) == 0)) tp = datecache[field]; else { #endif tp = datebsearch(lowtoken, datetktbl, szdatetktbl); #if USE_DATE_CACHE } datecache[field] = tp; #endif if (tp == NULL) { type = IGNOREFIELD; *val = 0; } else { type = tp->type; switch (type) { case TZ: case DTZ: case DTZMOD: *val = FROMVAL(tp); break; default: *val = tp->value; break; } } return type; } /* DecodeSpecial() */ /* datebsearch() * Binary search -- from Knuth (6.2.1) Algorithm B. Special case like this * is WAY faster than the generic bsearch(). */ static datetkn * datebsearch(char *key, datetkn *base, unsigned int nel) { datetkn *last = base + nel - 1, *position; int result; while (last >= base) { position = base + ((last - base) >> 1); result = key[0] - position->token[0]; if (result == 0) { result = strncmp(key, position->token, TOKMAXLEN); if (result == 0) return position; } if (result < 0) last = position - 1; else base = position + 1; } return NULL; } wine-20000526/dlls/oleaut32/parsedt.h0100644000175000001440000002274406771226506016675 0ustar julliardusers/* PostgreSQL Data Base Management System (formerly known as Postgres, then as Postgres95). Copyright (c) 1994-7 Regents of the University of California Permission to use, copy, modify, and distribute this software and its documentation for any purpose, without fee, and without a written agreement is hereby granted, provided that the above copyright notice and this paragraph and the following two paragraphs appear in all copies. IN NO EVENT SHALL THE UNIVERSITY OF CALIFORNIA BE LIABLE TO ANY PARTY FOR DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES, INCLUDING LOST PROFITS, ARISING OUT OF THE USE OF THIS SOFTWARE AND ITS DOCUMENTATION, EVEN IF THE UNIVERSITY OF CALIFORNIA HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. THE UNIVERSITY OF CALIFORNIA SPECIFICALLY DISCLAIMS ANY WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE SOFTWARE PROVIDED HEREUNDER IS ON AN "AS IS" BASIS, AND THE UNIVERSITY OF CALIFORNIA HAS NO OBLIGATIONS TO PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS. */ /*------------------------------------------------------------------------- * * dt.h-- * Definitions for the date/time and other date/time support code. * The support code is shared with other date data types, * including abstime, reltime, date, and time. * * * Copyright (c) 1994, Regents of the University of California * * $Id: parsedt.h,v 1.1 1999/09/19 18:36:54 julliard Exp $ * *------------------------------------------------------------------------- */ #ifndef DT_H #define DT_H #include #include /* We have to include stdlib.h here because it defines many of these macros on some platforms, and we only want our definitions used if stdlib.h doesn't have its own. */ #include /* ---------------------------------------------------------------- * Section 1: bool, true, false, TRUE, FALSE * ---------------------------------------------------------------- */ /* * bool -- * Boolean value, either true or false. * */ #define false ((char) 0) #define true ((char) 1) #ifndef __cplusplus #ifndef bool typedef char bool; #endif /* ndef bool */ #endif /* not C++ */ typedef bool *BoolPtr; #ifndef TRUE #define TRUE 1 #endif /* TRUE */ #ifndef FALSE #define FALSE 0 #endif /* FALSE */ /* ---------------------------------------------------------------- * Section 3: standard system types * ---------------------------------------------------------------- */ /* * intN -- * Signed integer, EXACTLY N BITS IN SIZE, * used for numerical computations and the * frontend/backend protocol. */ typedef signed char int8; /* == 8 bits */ typedef signed short int16; /* == 16 bits */ typedef signed int int32; /* == 32 bits */ /* * uintN -- * Unsigned integer, EXACTLY N BITS IN SIZE, * used for numerical computations and the * frontend/backend protocol. */ typedef unsigned char uint8; /* == 8 bits */ typedef unsigned short uint16; /* == 16 bits */ typedef unsigned int uint32; /* == 32 bits */ /* * floatN -- * Floating point number, AT LEAST N BITS IN SIZE, * used for numerical computations. * * Since sizeof(floatN) may be > sizeof(char *), always pass * floatN by reference. */ typedef float float32data; typedef double float64data; typedef float *float32; typedef double *float64; /* * boolN -- * Boolean value, AT LEAST N BITS IN SIZE. */ typedef uint8 bool8; /* >= 8 bits */ typedef uint16 bool16; /* >= 16 bits */ typedef uint32 bool32; /* >= 32 bits */ /* Date/Time Configuration * * Constants to pass info from runtime environment: * USE_POSTGRES_DATES specifies traditional postgres format for output. * USE_ISO_DATES specifies ISO-compliant format for output. * USE_SQL_DATES specified Oracle/Ingres-compliant format for output. * USE_GERMAN_DATES specifies German-style dd.mm/yyyy date format. * * DateStyle specifies preference for date formatting for output. * EuroDates if client prefers dates interpreted and written w/European conventions. * * HasCTZSet if client timezone is specified by client. * CDayLight is the apparent daylight savings time status. * CTimeZone is the timezone offset in seconds. * CTZName is the timezone label. */ #define USE_POSTGRES_DATES 0 #define USE_ISO_DATES 1 #define USE_SQL_DATES 2 #define USE_GERMAN_DATES 3 extern int DateStyle; extern bool EuroDates; extern int CTimeZone; typedef double float8; struct varlena { int vl_len; char vl_dat[1]; }; typedef struct varlena text; typedef int AbsoluteTime; typedef int RelativeTime; /* * Note a leap year is one that is a multiple of 4 * but not of a 100. Except if it is a multiple of * 400 then it is a leap year. */ #define isleap(y) (((y % 4) == 0) && (((y % 100) != 0) || ((y % 400) == 0))) /* * DateTime represents absolute time. * TimeSpan represents delta time. Keep track of months (and years) * separately since the elapsed time spanned is unknown until instantiated * relative to an absolute time. * * Note that Postgres uses "time interval" to mean a bounded interval, * consisting of a beginning and ending time, not a time span - thomas 97/03/20 */ typedef double DateTime; typedef struct { double time; /* all time units other than months and * years */ int month; /* months and years, after time for * alignment */ } TimeSpan; /* ---------------------------------------------------------------- * time types + support macros * * String definitions for standard time quantities. * * These strings are the defaults used to form output time strings. * Other alternate forms are hardcoded into token tables in dt.c. * ---------------------------------------------------------------- */ #define DAGO "ago" #define DCURRENT "current" #define EPOCH "epoch" #define INVALID "invalid" #define EARLY "-infinity" #define LATE "infinity" #define NOW "now" #define TODAY "today" #define TOMORROW "tomorrow" #define YESTERDAY "yesterday" #define ZULU "zulu" #define DMICROSEC "usecond" #define DMILLISEC "msecond" #define DSECOND "second" #define DMINUTE "minute" #define DHOUR "hour" #define DDAY "day" #define DWEEK "week" #define DMONTH "month" #define DQUARTER "quarter" #define DYEAR "year" #define DDECADE "decade" #define DCENTURY "century" #define DMILLENIUM "millenium" #define DA_D "ad" #define DB_C "bc" #define DTIMEZONE "timezone" /* * Fundamental time field definitions for parsing. * * Meridian: am, pm, or 24-hour style. * Millenium: ad, bc */ #define AM 0 #define PM 1 #define HR24 2 #define AD 0 #define BC 1 /* * Fields for time decoding. * Can't have more of these than there are bits in an unsigned int * since these are turned into bit masks during parsing and decoding. */ #define RESERV 0 #define MONTH 1 #define YEAR 2 #define DAY 3 #define TIMES 4 /* not used - thomas 1997-07-14 */ #define TZ 5 #define DTZ 6 #define DTZMOD 7 #define IGNOREFIELD 8 #define AMPM 9 #define HOUR 10 #define MINUTE 11 #define SECOND 12 #define DOY 13 #define DOW 14 #define UNITS 15 #define ADBC 16 /* these are only for relative dates */ #define AGO 17 #define ABS_BEFORE 18 #define ABS_AFTER 19 /* * Token field definitions for time parsing and decoding. * These need to fit into the datetkn table type. * At the moment, that means keep them within [-127,127]. * These are also used for bit masks in DecodeDateDelta() * so actually restrict them to within [0,31] for now. * - thomas 97/06/19 * Not all of these fields are used for masks in DecodeDateDelta * so allow some larger than 31. - thomas 1997-11-17 */ #define DTK_NUMBER 0 #define DTK_STRING 1 #define DTK_DATE 2 #define DTK_TIME 3 #define DTK_TZ 4 #define DTK_AGO 5 #define DTK_SPECIAL 6 #define DTK_INVALID 7 #define DTK_CURRENT 8 #define DTK_EARLY 9 #define DTK_LATE 10 #define DTK_EPOCH 11 #define DTK_NOW 12 #define DTK_YESTERDAY 13 #define DTK_TODAY 14 #define DTK_TOMORROW 15 #define DTK_ZULU 16 #define DTK_DELTA 17 #define DTK_SECOND 18 #define DTK_MINUTE 19 #define DTK_HOUR 20 #define DTK_DAY 21 #define DTK_WEEK 22 #define DTK_MONTH 23 #define DTK_QUARTER 24 #define DTK_YEAR 25 #define DTK_DECADE 26 #define DTK_CENTURY 27 #define DTK_MILLENIUM 28 #define DTK_MILLISEC 29 #define DTK_MICROSEC 30 #define DTK_DOW 32 #define DTK_DOY 33 #define DTK_TZ_HOUR 34 #define DTK_TZ_MINUTE 35 /* * Bit mask definitions for time parsing. */ #define DTK_M(t) (0x01 << (t)) #define DTK_DATE_M (DTK_M(YEAR) | DTK_M(MONTH) | DTK_M(DAY)) #define DTK_TIME_M (DTK_M(HOUR) | DTK_M(MINUTE) | DTK_M(SECOND)) #define MAXDATELEN 47 /* maximum possible length of an input * date string */ #define MAXDATEFIELDS 25 /* maximum possible number of fields in a * date string */ #define TOKMAXLEN 10 /* only this many chars are stored in * datetktbl */ /* keep this struct small; it gets used a lot */ typedef struct { #if defined(_AIX) char *token; #else char token[TOKMAXLEN]; #endif /* _AIX */ char type; char value; /* this may be unsigned, alas */ } datetkn; /* * dt.c prototypes */ void j2date(int jd, int *year, int *month, int *day); int date2j(int year, int month, int day); int ParseDateTime(char *timestr, char *lowstr, char **field, int *ftype, int maxfields, int *numfields); int DecodeDateTime(char **field, int *ftype, int nf, int *dtype, struct tm * tm, double *fsec, int *tzp); int DecodeTimeOnly(char **field, int *ftype, int nf, int *dtype, struct tm * tm, double *fsec); #endif /* DT_H */ wine-20000526/dlls/oleaut32/safearray.c0100644000175000001440000007367707066752016017214 0ustar julliardusers/************************************************************************* * OLE Automation * SafeArray Implementation * * This file contains the implementation of the SafeArray interface. * * Copyright 1999 Sylvain St-Germain */ #include #include #include "windef.h" #include "winerror.h" #include "winbase.h" #include "oleauto.h" #include "wine/obj_base.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ole) /* Localy used methods */ static INT endOfDim(LONG *coor, SAFEARRAYBOUND *mat, LONG dim, LONG realDim); static ULONG calcDisplacement(LONG *coor, SAFEARRAYBOUND *mat, LONG dim); static BOOL isPointer(USHORT feature); static INT getFeatures(VARTYPE vt); static BOOL validCoordinate(LONG *coor, SAFEARRAY *psa); static BOOL resizeSafeArray(SAFEARRAY *psa, LONG lDelta); static BOOL validArg(SAFEARRAY *psa); static ULONG getArraySize(SAFEARRAY *psa); static HRESULT duplicateData(SAFEARRAY *psa, SAFEARRAY **ppsaOut); /* Association between VARTYPE and their size. A size of zero is defined for the unsupported types. */ #define VARTYPE_NOT_SUPPORTED 0 const static ULONG VARTYPE_SIZE[] = { /* this is taken from wtypes.h. Only [S]es are supported by the SafeArray */ VARTYPE_NOT_SUPPORTED, /* VT_EMPTY [V] [P] nothing */ VARTYPE_NOT_SUPPORTED, /* VT_NULL [V] [P] SQL style Nul */ 2, /* VT_I2 [V][T][P][S] 2 byte signed int */ 4, /* VT_I4 [V][T][P][S] 4 byte signed int */ 4, /* VT_R4 [V][T][P][S] 4 byte real */ 8, /* VT_R8 [V][T][P][S] 8 byte real */ 8, /* VT_CY [V][T][P][S] currency */ 8, /* VT_DATE [V][T][P][S] date */ 4, /* VT_BSTR [V][T][P][S] OLE Automation string*/ 4, /* VT_DISPATCH [V][T][P][S] IDispatch * */ 4, /* VT_ERROR [V][T] [S] SCODE */ 4, /* VT_BOOL [V][T][P][S] True=-1, False=0*/ 24, /* VT_VARIANT [V][T][P][S] VARIANT * */ 4, /* VT_UNKNOWN [V][T] [S] IUnknown * */ 16, /* VT_DECIMAL [V][T] [S] 16 byte fixed point */ VARTYPE_NOT_SUPPORTED, /* no VARTYPE here..... */ VARTYPE_NOT_SUPPORTED, /* VT_I1 [T] signed char */ 1, /* VT_UI1 [V][T][P][S] unsigned char */ VARTYPE_NOT_SUPPORTED, /* VT_UI2 [T][P] unsigned short */ VARTYPE_NOT_SUPPORTED, /* VT_UI4 [T][P] unsigned short */ VARTYPE_NOT_SUPPORTED, /* VT_I8 [T][P] signed 64-bit int */ VARTYPE_NOT_SUPPORTED, /* VT_UI8 [T][P] unsigned 64-bit int */ VARTYPE_NOT_SUPPORTED, /* VT_INT [T] signed machine int */ VARTYPE_NOT_SUPPORTED, /* VT_UINT [T] unsigned machine int */ VARTYPE_NOT_SUPPORTED, /* VT_VOID [T] C style void */ VARTYPE_NOT_SUPPORTED, /* VT_HRESULT [T] Standard return type */ VARTYPE_NOT_SUPPORTED, /* VT_PTR [T] pointer type */ VARTYPE_NOT_SUPPORTED, /* VT_SAFEARRAY [T] (use VT_ARRAY in VARIANT)*/ VARTYPE_NOT_SUPPORTED, /* VT_CARRAY [T] C style array */ VARTYPE_NOT_SUPPORTED, /* VT_USERDEFINED [T] user defined type */ VARTYPE_NOT_SUPPORTED, /* VT_LPSTR [T][P] null terminated string */ VARTYPE_NOT_SUPPORTED, /* VT_LPWSTR [T][P] wide null term string */ VARTYPE_NOT_SUPPORTED, /* VT_FILETIME [P] FILETIME */ VARTYPE_NOT_SUPPORTED, /* VT_BLOB [P] Length prefixed bytes */ VARTYPE_NOT_SUPPORTED, /* VT_STREAM [P] Name of stream follows */ VARTYPE_NOT_SUPPORTED, /* VT_STORAGE [P] Name of storage follows */ VARTYPE_NOT_SUPPORTED, /* VT_STREAMED_OBJECT[P] Stream contains an object*/ VARTYPE_NOT_SUPPORTED, /* VT_STORED_OBJECT [P] Storage contains object*/ VARTYPE_NOT_SUPPORTED, /* VT_BLOB_OBJECT [P] Blob contains an object*/ VARTYPE_NOT_SUPPORTED, /* VT_CF [P] Clipboard format */ VARTYPE_NOT_SUPPORTED, /* VT_CLSID [P] A Class ID */ VARTYPE_NOT_SUPPORTED, /* VT_VECTOR [P] simple counted array */ VARTYPE_NOT_SUPPORTED, /* VT_ARRAY [V] SAFEARRAY* */ VARTYPE_NOT_SUPPORTED /* VT_BYREF [V] void* for local use */ }; const static int LAST_VARTYPE = sizeof(VARTYPE_SIZE)/sizeof(ULONG); /************************************************************************* * SafeArrayAllocDescriptor * Allocate the appropriate amount of memory for the SafeArray descriptor */ HRESULT WINAPI SafeArrayAllocDescriptor( UINT cDims, SAFEARRAY **ppsaOut) { SAFEARRAYBOUND *sab; LONG allocSize = 0; /* SAFEARRAY + SAFEARRAYBOUND * (cDims -1) ( -1 because there is already one ( in SAFEARRAY struct */ allocSize = sizeof(**ppsaOut) + (sizeof(*sab) * (cDims-1)); /* Allocate memory for SAFEARRAY struc */ if(( (*ppsaOut)=HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, allocSize)) == NULL){ return(E_UNEXPECTED); } TRACE("SafeArray: %lu bytes allocated for descriptor.\n", allocSize); return(S_OK); } /************************************************************************* * SafeArrayAllocData * Allocate the appropriate amount of data for the SafeArray data */ HRESULT WINAPI SafeArrayAllocData( SAFEARRAY *psa) { ULONG ulWholeArraySize; /* to store the size of the whole thing */ if(! validArg(psa)) return E_INVALIDARG; ulWholeArraySize = getArraySize(psa); /* Allocate memory for the data itself */ if((psa->pvData = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, psa->cbElements*ulWholeArraySize)) == NULL) return(E_UNEXPECTED); TRACE("SafeArray: %lu bytes allocated for data at %p (%lu objects).\n", psa->cbElements*ulWholeArraySize, psa->pvData, ulWholeArraySize); return(S_OK); } /************************************************************************* * SafeArrayCreate * Create a SafeArray object by encapsulating AllocDescriptor and AllocData */ SAFEARRAY* WINAPI SafeArrayCreate( VARTYPE vt, UINT cDims, SAFEARRAYBOUND *rgsabound) { SAFEARRAY *psa; HRESULT hRes; USHORT cDim; /* Validate supported VARTYPE */ if ( (vt >= LAST_VARTYPE) || ( VARTYPE_SIZE[vt] == VARTYPE_NOT_SUPPORTED ) ) return NULL; /* Allocate memory for the array descriptor */ if( FAILED( hRes = SafeArrayAllocDescriptor(cDims, &psa))) return NULL; /* setup data members... */ psa->cDims = cDims; psa->fFeatures = getFeatures(vt); psa->cLocks = 0; psa->pvData = NULL; psa->cbElements= VARTYPE_SIZE[vt]; /* Invert the bounds ... */ for(cDim=0; cDim < psa->cDims; cDim++) { psa->rgsabound[cDim].cElements = rgsabound[psa->cDims-cDim-1].cElements; psa->rgsabound[cDim].lLbound = rgsabound[psa->cDims-cDim-1].lLbound; } /* allocate memory for the data... */ if( FAILED( hRes = SafeArrayAllocData(psa))) { SafeArrayDestroyDescriptor(psa); ERR("() : Failed to allocate the Safe Array data\n"); return NULL; } return(psa); } /************************************************************************* * SafeArrayDestroyDescriptor * Frees the memory associated with the descriptor. */ HRESULT WINAPI SafeArrayDestroyDescriptor( SAFEARRAY *psa) { /* Check for lockness before to free... */ if(psa->cLocks > 0) return DISP_E_ARRAYISLOCKED; /* The array is unlocked, then, deallocate memory */ if(HeapFree( GetProcessHeap(), 0, psa) == FALSE) return E_UNEXPECTED; return(S_OK); } /************************************************************************* * SafeArrayLock * Increment the lock counter * * Doc says (MSDN Library ) that psa->pvData should be made available (!= NULL) * only when psa->cLocks is > 0... I don't get it since pvData is allocated * before the array is locked, therefore */ HRESULT WINAPI SafeArrayLock( SAFEARRAY *psa) { if(! validArg(psa)) return E_INVALIDARG; psa->cLocks++; return(S_OK); } /************************************************************************* * SafeArrayUnlock * Decrement the lock counter */ HRESULT WINAPI SafeArrayUnlock( SAFEARRAY *psa) { if(! validArg(psa)) return E_INVALIDARG; if (psa->cLocks > 0) psa->cLocks--; return(S_OK); } /************************************************************************* * SafeArrayPutElement * Set the data at the given coordinate */ HRESULT WINAPI SafeArrayPutElement( SAFEARRAY *psa, LONG *rgIndices, void *pv) { ULONG stepCountInSAData = 0; /* Number of array item to skip to get to the desired one... */ PVOID elementStorageAddress = NULL; /* Adress to store the data */ BSTR pbstrReAllocStr = NULL; /* BSTR reallocated */ /* Validate the index given */ if(! validCoordinate(rgIndices, psa)) return DISP_E_BADINDEX; if(! validArg(psa)) return E_INVALIDARG; if( SafeArrayLock(psa) == S_OK) { /* Figure out the number of items to skip */ stepCountInSAData = calcDisplacement(rgIndices, psa->rgsabound, psa->cDims); /* Figure out the number of byte to skip ... */ elementStorageAddress = (char *) psa->pvData+(stepCountInSAData*psa->cbElements); if(isPointer(psa->fFeatures)) { /* increment ref count for this pointer */ *((VOID**)elementStorageAddress) = *(VOID**)pv; IUnknown_AddRef( *(IUnknown**)pv); } else { if(psa->fFeatures == FADF_BSTR) { /* Create a new object */ if((pbstrReAllocStr = SysAllocString( (OLECHAR*)pv )) == NULL) { SafeArrayUnlock(psa); return E_OUTOFMEMORY; } else *((BSTR*)elementStorageAddress) = pbstrReAllocStr; } else /* dupplicate the memory */ memcpy(elementStorageAddress, pv, SafeArrayGetElemsize(psa) ); } } else { ERR("SafeArray: Cannot lock array....\n"); return E_UNEXPECTED; /* UNDOC error condition */ } TRACE("SafeArray: item put at adress %p.\n",elementStorageAddress); return SafeArrayUnlock(psa); } /************************************************************************* * SafeArrayGetElement * Return the data element corresponding the the given coordinate */ HRESULT WINAPI SafeArrayGetElement( SAFEARRAY *psa, LONG *rgIndices, void *pv) { ULONG stepCountInSAData = 0; /* Number of array item to skip to get to the desired one... */ PVOID elementStorageAddress = NULL; /* Adress to store the data */ BSTR pbstrReturnedStr = NULL; /* BSTR reallocated */ if(! validArg(psa)) return E_INVALIDARG; if(! validCoordinate(rgIndices, psa)) /* Validate the index given */ return(DISP_E_BADINDEX); if( SafeArrayLock(psa) == S_OK) { /* Figure out the number of items to skip */ stepCountInSAData = calcDisplacement(rgIndices, psa->rgsabound, psa->cDims); /* Figure out the number of byte to skip ... */ elementStorageAddress = (char *) psa->pvData+(stepCountInSAData*psa->cbElements); if( psa->fFeatures == FADF_BSTR) { /* reallocate the obj */ if( (pbstrReturnedStr = SysAllocString( *(OLECHAR**)elementStorageAddress )) == NULL) { SafeArrayUnlock(psa); return E_OUTOFMEMORY; } else *((BSTR*)pv) = pbstrReturnedStr; } else if( isPointer(psa->fFeatures) ) /* simply copy the pointer */ pv = *((PVOID*)elementStorageAddress); else /* copy the bytes */ memcpy(pv, elementStorageAddress, SafeArrayGetElemsize(psa) ); } else { ERR("SafeArray: Cannot lock array....\n"); return E_UNEXPECTED; /* UNDOC error condition */ } return( SafeArrayUnlock(psa) ); } /************************************************************************* * SafeArrayGetUBound * return the UP bound for a given array dimension */ HRESULT WINAPI SafeArrayGetUBound( SAFEARRAY *psa, UINT nDim, LONG *plUbound) { if(! validArg(psa)) return E_INVALIDARG; if(nDim > psa->cDims) return DISP_E_BADINDEX; *plUbound = psa->rgsabound[nDim-1].lLbound + psa->rgsabound[nDim-1].cElements - 1; return S_OK; } /************************************************************************* * SafeArrayGetLBound * Return the LO bound for a given array dimension */ HRESULT WINAPI SafeArrayGetLBound( SAFEARRAY *psa, UINT nDim, LONG *plLbound) { if(! validArg(psa)) return E_INVALIDARG; if(nDim > psa->cDims) return DISP_E_BADINDEX; *plLbound = psa->rgsabound[nDim-1].lLbound; return S_OK; } /************************************************************************* * SafeArrayGetDim * returns the number of dimension in the array */ UINT WINAPI SafeArrayGetDim( SAFEARRAY * psa) { /* * A quick test in Windows shows that the behavior here for an invalid * pointer is to return 0. */ if(! validArg(psa)) return 0; return psa->cDims; } /************************************************************************* * SafeArrayGetElemsize * Return the size of the element in the array */ UINT WINAPI SafeArrayGetElemsize( SAFEARRAY * psa) { /* * A quick test in Windows shows that the behavior here for an invalid * pointer is to return 0. */ if(! validArg(psa)) return 0; return psa->cbElements; } /************************************************************************* * SafeArrayAccessData * increment the access count and return the data */ HRESULT WINAPI SafeArrayAccessData( SAFEARRAY *psa, void **ppvData) { HRESULT hRes; if(! validArg(psa)) return E_INVALIDARG; hRes = SafeArrayLock(psa); switch (hRes) { case S_OK: (*ppvData) = psa->pvData; break; case E_INVALIDARG: (*ppvData) = NULL; return E_INVALIDARG; } return S_OK; } /************************************************************************* * SafeArrayUnaccessData * Decrement the access count */ HRESULT WINAPI SafeArrayUnaccessData( SAFEARRAY * psa) { if(! validArg(psa)) return E_INVALIDARG; return(SafeArrayUnlock(psa)); } /************************************************************************ * SafeArrayPtrOfIndex * Return a pointer to the element at rgIndices */ HRESULT WINAPI SafeArrayPtrOfIndex( SAFEARRAY *psa, LONG *rgIndices, void **ppvData) { ULONG stepCountInSAData = 0; /* Number of array item to skip to get to the desired one... */ if(! validArg(psa)) return E_INVALIDARG; if(! validCoordinate(rgIndices, psa)) return DISP_E_BADINDEX; /* Figure out the number of items to skip */ stepCountInSAData = calcDisplacement(rgIndices, psa->rgsabound, psa->cDims); *ppvData = (char *) psa->pvData+(stepCountInSAData*psa->cbElements); return S_OK; } /************************************************************************ * SafeArrayDestroyData * Frees the memory data bloc */ HRESULT WINAPI SafeArrayDestroyData( SAFEARRAY *psa) { HRESULT hRes; ULONG ulWholeArraySize; /* count spot in array */ ULONG ulDataIter; /* to iterate the data space */ IUnknown *punk; BSTR bstr; if(! validArg(psa)) return E_INVALIDARG; if(psa->cLocks > 0) return DISP_E_ARRAYISLOCKED; ulWholeArraySize = getArraySize(psa); if(isPointer(psa->fFeatures)) { /* release the pointers */ for(ulDataIter=0; ulDataIter < ulWholeArraySize; ulDataIter++) { punk = *(IUnknown**)((char *) psa->pvData+(ulDataIter*(psa->cbElements))); if( punk != NULL) IUnknown_Release(punk); } } else if(psa->fFeatures & FADF_BSTR) { /* deallocate the obj */ for(ulDataIter=0; ulDataIter < ulWholeArraySize; ulDataIter++) { bstr = *(BSTR*)((char *) psa->pvData+(ulDataIter*(psa->cbElements))); if( bstr != NULL) SysFreeString( bstr ); } } /* check if this array is a Vector, in which case do not free the data block since it has been allocated by AllocDescriptor and therefore deserve to be freed by DestroyDescriptor */ if(!(psa->fFeatures & FADF_FIXEDSIZE)) { /* Set when we do CreateVector */ /* free the whole chunk */ if((hRes = HeapFree( GetProcessHeap(), 0, psa->pvData)) == 0) /*falied*/ return E_UNEXPECTED; /* UNDOC error condition */ psa->pvData = NULL; } return S_OK; } /************************************************************************ * SafeArrayCopyData * Copy the psaSource's data block into psaTarget if dimension and size * permits it. */ HRESULT WINAPI SafeArrayCopyData( SAFEARRAY *psaSource, SAFEARRAY **psaTarget) { USHORT cDimCount; /* looper */ LONG lDelta; /* looper */ IUnknown *punk; ULONG ulWholeArraySize; /* Number of item in SA */ BSTR bstr; if(! (validArg(psaSource) && validArg(*psaTarget)) ) return E_INVALIDARG; if(SafeArrayGetDim(psaSource) != SafeArrayGetDim(*psaTarget)) return E_INVALIDARG; ulWholeArraySize = getArraySize(psaSource); /* The two arrays boundaries must be of same lenght */ for(cDimCount=0;cDimCount < psaSource->cDims; cDimCount++) if( psaSource->rgsabound[cDimCount].cElements != (*psaTarget)->rgsabound[cDimCount].cElements) return E_INVALIDARG; if( isPointer((*psaTarget)->fFeatures) ) { /* the target contains ptr that must be released */ for(lDelta=0;lDelta < ulWholeArraySize; lDelta++) { punk = *(IUnknown**) ((char *) (*psaTarget)->pvData + (lDelta * (*psaTarget)->cbElements)); if( punk != NULL) IUnknown_Release(punk); } } else if( (*psaTarget)->fFeatures & FADF_BSTR) { /* the target contain BSTR that must be freed */ for(lDelta=0;lDelta < ulWholeArraySize; lDelta++) { bstr = *(BSTR*)((char *) (*psaTarget)->pvData + (lDelta * (*psaTarget)->cbElements)); if( bstr != NULL) SysFreeString( bstr ); } } return duplicateData(psaSource, psaTarget); } /************************************************************************ * SafeArrayDestroy * Deallocates all memory reserved for the SafeArray */ HRESULT WINAPI SafeArrayDestroy( SAFEARRAY * psa) { HRESULT hRes; if(! validArg(psa)) return E_INVALIDARG; if(psa->cLocks > 0) return DISP_E_ARRAYISLOCKED; if((hRes = SafeArrayDestroyData( psa )) == S_OK) if((hRes = SafeArrayDestroyDescriptor( psa )) == S_OK) return S_OK; return E_UNEXPECTED; /* UNDOC error condition */ } /************************************************************************ * SafeArrayCopy * Make a dupplicate of a SafeArray */ HRESULT WINAPI SafeArrayCopy( SAFEARRAY *psa, SAFEARRAY **ppsaOut) { HRESULT hRes; DWORD dAllocSize; if(! validArg(psa)) return E_INVALIDARG; if((hRes=SafeArrayAllocDescriptor(psa->cDims, ppsaOut)) == S_OK){ /* Duplicate the SAFEARRAY struc */ memcpy(*ppsaOut, psa, sizeof(*psa)+(sizeof(*(psa->rgsabound))*(psa->cDims-1))); (*ppsaOut)->pvData = NULL; /* do not point to the same data area */ /* Get the allocated memory size for source and allocate it for target */ dAllocSize = HeapSize(GetProcessHeap(), 0, psa->pvData); (*ppsaOut)->pvData = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, dAllocSize); if( (*ppsaOut)->pvData != NULL) { /* HeapAlloc succeed */ if( (hRes=duplicateData(psa, ppsaOut)) != S_OK) { /* E_OUTOFMEMORY */ HeapFree(GetProcessHeap(), 0, (*ppsaOut)->pvData); (*ppsaOut)->pvData = NULL; SafeArrayDestroyDescriptor(*ppsaOut); return hRes; } } else { /* failed to allocate or dupplicate... */ SafeArrayDestroyDescriptor(*ppsaOut); return E_UNEXPECTED; /* UNDOC error condition */ } } else { /* failed to allocate mem for descriptor */ return E_OUTOFMEMORY; /* UNDOC error condiftion */ } return S_OK; } /************************************************************************ * SafeArrayCreateVector * Creates a one dimension safearray where the data is next to the * SAFEARRAY structure. */ SAFEARRAY* WINAPI SafeArrayCreateVector( VARTYPE vt, LONG lLbound, ULONG cElements) { SAFEARRAY *psa; /* Validate supported VARTYPE */ if ( (vt >= LAST_VARTYPE) || ( VARTYPE_SIZE[vt] == VARTYPE_NOT_SUPPORTED ) ) return NULL; /* Allocate memory for the array descriptor and data contiguously */ if( FAILED( psa = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, (sizeof(*psa) + (VARTYPE_SIZE[vt] * cElements))))) { return NULL; } /* setup data members... */ psa->cDims = 1; /* always and forever */ psa->fFeatures = getFeatures(vt) | FADF_FIXEDSIZE; psa->cLocks = 0; psa->pvData = psa+sizeof(*psa); psa->cbElements = VARTYPE_SIZE[vt]; psa->rgsabound[0].cElements = cElements; psa->rgsabound[0].lLbound = lLbound; return(psa); } /************************************************************************ * SafeArrayRedim * Changes the caracteristics of the last dimension of the SafeArray */ HRESULT WINAPI SafeArrayRedim( SAFEARRAY *psa, SAFEARRAYBOUND *psaboundNew) { LONG lDelta; /* hold difference in size */ USHORT cDims=1; /* dims counter */ if( !validArg(psa) ) return E_INVALIDARG; if( psa->cLocks > 0 ) return DISP_E_ARRAYISLOCKED; if( psa->fFeatures & FADF_FIXEDSIZE ) return E_INVALIDARG; if( SafeArrayLock(psa)==E_UNEXPECTED ) return E_UNEXPECTED;/* UNDOC error condition */ /* find the delta in number of array spot to apply to the new array */ lDelta = psaboundNew->cElements - psa->rgsabound[0].cElements; for(; cDims < psa->cDims; cDims++) /* delta in number of spot implied by modifying the last dimension */ lDelta *= psa->rgsabound[cDims].cElements; if (lDelta == 0) { ;/* same size, maybe a change of lLbound, just set it */ } else /* need to enlarge (lDelta +) reduce (lDelta -) */ if(! resizeSafeArray(psa, lDelta)) return E_UNEXPECTED; /* UNDOC error condition */ /* the only modifyable dimension sits in [0] as the dimensions were reversed at array creation time... */ psa->rgsabound[0].cElements = psaboundNew->cElements; psa->rgsabound[0].lLbound = psaboundNew->lLbound; return SafeArrayUnlock(psa); } /************************************************************************ * NOT WINDOWS API - SafeArray* Utility functions ************************************************************************/ /************************************************************************ * Used to validate the SAFEARRAY type of arg */ static BOOL validArg( SAFEARRAY *psa) { SAFEARRAYBOUND *sab; LONG psaSize = 0; LONG descSize = 0; LONG fullSize = 0; /* * Let's check for the null pointer just in case. */ if (psa == NULL) return FALSE; /* Check whether the size of the chunk make sens... That's the only thing I can think of now... */ psaSize = HeapSize(GetProcessHeap(), 0, psa); /* size of the descriptor when the SA is not created with CreateVector */ descSize = sizeof(*psa) + (sizeof(*sab) * (psa->cDims-1)); /* size of the descriptor + data when created with CreateVector */ fullSize = sizeof(*psa) + (psa->cbElements * psa->rgsabound[0].cElements); return((psaSize >= descSize) || (psaSize >= fullSize)); } /************************************************************************ * Used to reallocate memory */ static BOOL resizeSafeArray( SAFEARRAY *psa, LONG lDelta) { ULONG ulWholeArraySize; /* use as multiplicator */ PVOID pvNewBlock = NULL; IUnknown *punk; BSTR bstr; ulWholeArraySize = getArraySize(psa); if(lDelta < 0) { /* array needs to be shorthen */ if( isPointer(psa->fFeatures)) /* ptr that need to be released */ for(;lDelta < 0; lDelta++) { punk = *(IUnknown**) ((char *) psa->pvData+((ulWholeArraySize+lDelta)*psa->cbElements)); if( punk != NULL ) IUnknown_Release(punk); } else if(psa->fFeatures & FADF_BSTR) /* BSTR that need to be freed */ for(;lDelta < 0; lDelta++) { bstr = *(BSTR*) ((char *) psa->pvData+((ulWholeArraySize+lDelta)*psa->cbElements)); if( bstr != NULL ) SysFreeString( bstr ); } } /* Ok now, if we are enlarging the array, we *MUST* move the whole block pointed to by pvData. If we are shorthening the array, this move is optional but we do it anyway becuase the benefit is that we are releasing to the system the unused memory */ if((pvNewBlock = HeapReAlloc(GetProcessHeap(), 0, psa->pvData, (ulWholeArraySize + lDelta) * psa->cbElements)) == NULL) return FALSE; /* TODO If we get here it means: SHRINK situation : we've deleted the undesired data and did not release the memory GROWING situation: we've been unable to grow the array */ /* reassign to the new block of data */ psa->pvData = pvNewBlock; return TRUE; } /************************************************************************ * Used to set the fFeatures data member of the SAFEARRAY structure. */ static INT getFeatures( VARTYPE vt) { switch(vt) { case VT_UNKNOWN: return FADF_UNKNOWN; case VT_DISPATCH: return FADF_DISPATCH; case VT_BSTR: return FADF_BSTR; } return 0; } /************************************************************************ * Used to figure out if the fFeatures data member of the SAFEARRAY * structure contain any information about the type of data stored... */ static BOOL isPointer( USHORT feature) { switch(feature) { case FADF_UNKNOWN: return TRUE; /* those are pointers */ case FADF_DISPATCH: return TRUE; } return FALSE; } /************************************************************************ * Used to calculate the displacement when accessing or modifying * safearray data set. * * Parameters: - LONG *coor is the desired location in the multidimension * table. Ex for a 3 dim table: coor[] = {1,2,3}; * - ULONG *mat is the format of the table. Ex for a 3 dim * table mat[] = {4,4,4}; * - USHORT dim is the number of dimension of the SafeArray */ static ULONG calcDisplacement( LONG *coor, SAFEARRAYBOUND *mat, LONG dim) { ULONG res = 0; LONG iterDim; for(iterDim=0; iterDimcDims; iter++) { if((hRes = SafeArrayGetLBound(psa, iter, &lLBound)) != S_OK) return FALSE; if((hRes = SafeArrayGetUBound(psa, iter, &lUBound)) != S_OK) return FALSE; if(lLBound == lUBound) return FALSE; if((coor[iter] >= lLBound) && (coor[iter] <= lUBound)) return TRUE; else return FALSE; } return FALSE; } /************************************************************************ * Method used to calculate the number of cells of the SA */ static ULONG getArraySize( SAFEARRAY *psa) { USHORT cCount; ULONG ulWholeArraySize = 1; for(cCount=0; cCount < psa->cDims; cCount++) /* foreach dimensions... */ ulWholeArraySize *= psa->rgsabound[cCount].cElements; return ulWholeArraySize; } /************************************************************************ * Method used to handle data space dupplication for Copy32 and CopyData32 */ static HRESULT duplicateData( SAFEARRAY *psa, SAFEARRAY **ppsaOut) { ULONG ulWholeArraySize; /* size of the thing */ LONG lDelta; IUnknown *punk; BSTR pbstrReAllocStr = NULL; /* BSTR reallocated */ ulWholeArraySize = getArraySize(psa); /* Number of item in SA */ SafeArrayLock(*ppsaOut); if( isPointer(psa->fFeatures) ) { /* If datatype is object increment object's reference count */ for(lDelta=0; lDelta < ulWholeArraySize; lDelta++) { punk = *(IUnknown**)((char *) psa->pvData+(lDelta * psa->cbElements)); if( punk != NULL) IUnknown_AddRef(punk); } /* Copy the source array data into target array */ memcpy((*ppsaOut)->pvData, psa->pvData, ulWholeArraySize*psa->cbElements); } else if( psa->fFeatures & FADF_BSTR ) { /* if datatype is BSTR allocate the BSTR in the new array */ for(lDelta=0; lDelta < ulWholeArraySize; lDelta++) { if(( pbstrReAllocStr = SysAllocString( *(BSTR*)((char *) psa->pvData+(lDelta * psa->cbElements)))) == NULL) { SafeArrayUnlock(*ppsaOut); return E_OUTOFMEMORY; } *((BSTR*)((char *) (*ppsaOut)->pvData+(lDelta * psa->cbElements))) = pbstrReAllocStr; } } else { /* Simply copy the source array data into target array */ memcpy((*ppsaOut)->pvData, psa->pvData, ulWholeArraySize*psa->cbElements); } SafeArrayUnlock(*ppsaOut); return S_OK; } wine-20000526/dlls/oleaut32/stubs.c0100644000175000001440000000354607073170674016365 0ustar julliardusers/* * OlePro32 Stubs * * Copyright 1999 Corel Corporation * * Sean Langley */ #include "windef.h" #include "debugtools.h" #include "olectl.h" DEFAULT_DEBUG_CHANNEL(ole); /*********************************************************************** * OleIconToCursor */ HCURSOR WINAPI OleIconToCursor( HINSTANCE hinstExe, HICON hicon) { FIXME("(%x,%x), not implemented (olepro32.dll)\n",hinstExe,hicon); return S_OK; } /*********************************************************************** * OleCreatePropertyFrameIndirect */ HRESULT WINAPI OleCreatePropertyFrameIndirect( LPOCPFIPARAMS lpParams) { FIXME("(%p), not implemented (olepro32.dll)\n",lpParams); return S_OK; } /*********************************************************************** * OleCreatePropertyFrame */ HRESULT WINAPI OleCreatePropertyFrame( HWND hwndOwner, UINT x, UINT y, LPCOLESTR lpszCaption,ULONG cObjects, LPUNKNOWN* ppUnk, ULONG cPages, LPCLSID pPageClsID, LCID lcid, DWORD dwReserved, LPVOID pvReserved ) { FIXME("(%x,%d,%d,%p,%ld,%p,%ld,%p,%x,%ld,%p), not implemented (olepro32.dll)\n", hwndOwner,x,y,lpszCaption,cObjects,ppUnk,cPages,pPageClsID, (int)lcid,dwReserved,pvReserved); return S_OK; } /*********************************************************************** * OleLoadPicture */ HRESULT WINAPI OleLoadPicture( LPSTREAM lpstream, LONG lSize, BOOL fRunmode, REFIID reed, LPVOID *lplpvObj ) { FIXME("(%p,%ld,%d,%p,%p), not implemented (olepro32.dll) \n", lpstream,lSize,fRunmode,reed,lplpvObj ); return S_OK; } /*********************************************************************** * OleCreatePictureIndirect */ HRESULT WINAPI OleCreatePictureIndirect(LPPICTDESC lpPictDesc, REFIID riid, BOOL fOwn, LPVOID * lplpvObj ) { FIXME("(%p,%p,%d,%p), not implemented (olepro32.dll)\n", lpPictDesc,riid,fOwn,lplpvObj ); return S_OK; } wine-20000526/dlls/oleaut32/typelib.c0100644000175000001440000025350307055751204016667 0ustar julliardusers/* * TYPELIB * * Copyright 1997 Marcus Meissner * 1999 Rein Klazes * there is much left to do here before it can be useful for real world * programs * know problems: * -. Only one format of typelibs is supported * -. All testing so far is done using special written windows programs * -. Data structures are straightforward, but slow for look-ups. * -. (related) nothing is hashed * -. a typelib is always read in its entirety into memory and never released. * -. there are a number of stubs in ITypeLib and ITypeInfo interfaces. Most * of them I don't know yet how to implement them. * -. Most error return values are just guessed not checked with windows * behaviour. * -. all locale stuff ignored * -. move stuff to wine/dlls * -. didn't bother with a c++ interface * -. lousy fatal error handling * -. some methods just return pointers to internal data structures, this is * partly laziness, partly I want to check how windows does it. * */ #include #include #include #include #include "winerror.h" #include "winreg.h" /* for HKEY_LOCAL_MACHINE */ #include "winnls.h" /* for PRIMARYLANGID */ #include "wine/winbase16.h" /* for RegQueryValue16(HKEY,LPSTR,LPSTR,LPDWORD) */ #include "heap.h" #include "wine/obj_base.h" #include "debugtools.h" #include "winversion.h" /* FIXME: get rid of these */ typedef struct ITypeInfoVtbl ITypeLib_VTable, *LPTYPEINFO_VTABLE ; typedef struct ITypeLibVtbl *LPTYPELIB_VTABLE ; #include "typelib.h" typedef struct tagTLBContext { unsigned int oStart; /* start of TLB in file */ unsigned int pos; /* current pos */ unsigned int length; /* total length */ void *mapping; /* memory mapping */ TLBSegDir * pTblDir; TLBLibInfo* pLibInfo; } TLBContext; DEFAULT_DEBUG_CHANNEL(ole); DECLARE_DEBUG_CHANNEL(typelib); /**************************************************************************** * QueryPathOfRegTypeLib16 [TYPELIB.14] * * the path is "Classes\Typelib\\.\\win16\" * RETURNS * path of typelib */ HRESULT WINAPI QueryPathOfRegTypeLib16( REFGUID guid, /* [in] referenced guid */ WORD wMaj, /* [in] major version */ WORD wMin, /* [in] minor version */ LCID lcid, /* [in] locale id */ LPBSTR16 path /* [out] path of typelib */ ) { char xguid[80]; char typelibkey[100],pathname[260]; DWORD plen; if (HIWORD(guid)) { WINE_StringFromCLSID(guid,xguid); sprintf(typelibkey,"SOFTWARE\\Classes\\Typelib\\%s\\%d.%d\\%lx\\win16", xguid,wMaj,wMin,lcid ); } else { sprintf(xguid,"",(DWORD)guid); FIXME("(%s,%d,%d,0x%04lx,%p),can't handle non-string guids.\n",xguid,wMaj,wMin,(DWORD)lcid,path); return E_FAIL; } plen = sizeof(pathname); if (RegQueryValue16(HKEY_LOCAL_MACHINE,typelibkey,pathname,&plen)) { /* try again without lang specific id */ if (SUBLANGID(lcid)) return QueryPathOfRegTypeLib16(guid,wMaj,wMin,PRIMARYLANGID(lcid),path); FIXME("key %s not found\n",typelibkey); return E_FAIL; } *path = SysAllocString16(pathname); return S_OK; } /**************************************************************************** * QueryPathOfRegTypeLib [OLEAUT32.164] * RETURNS * path of typelib */ HRESULT WINAPI QueryPathOfRegTypeLib( REFGUID guid, /* [in] referenced guid */ WORD wMaj, /* [in] major version */ WORD wMin, /* [in] minor version */ LCID lcid, /* [in] locale id */ LPBSTR path /* [out] path of typelib */ ) { char xguid[80]; char typelibkey[100],pathname[260]; DWORD plen; if (HIWORD(guid)) { WINE_StringFromCLSID(guid,xguid); sprintf(typelibkey,"SOFTWARE\\Classes\\Typelib\\%s\\%d.%d\\%lx\\win32", xguid,wMaj,wMin,lcid ); } else { sprintf(xguid,"",(DWORD)guid); FIXME("(%s,%d,%d,0x%04lx,%p),stub!\n",xguid,wMaj,wMin,(DWORD)lcid,path); return E_FAIL; } plen = sizeof(pathname); if (RegQueryValue16(HKEY_LOCAL_MACHINE,typelibkey,pathname,&plen)) { /* try again without lang specific id */ if (SUBLANGID(lcid)) return QueryPathOfRegTypeLib(guid,wMaj,wMin,PRIMARYLANGID(lcid),path); FIXME("key %s not found\n",typelibkey); return E_FAIL; } *path = HEAP_strdupAtoW(GetProcessHeap(),0,pathname); return S_OK; } /****************************************************************************** * LoadTypeLib [TYPELIB.3] Loads and registers a type library * NOTES * Docs: OLECHAR FAR* szFile * Docs: iTypeLib FAR* FAR* pptLib * * RETURNS * Success: S_OK * Failure: Status */ HRESULT WINAPI LoadTypeLib16( LPOLESTR szFile, /* [in] Name of file to load from */ void * *pptLib) /* [out] Pointer to pointer to loaded type library */ { FIXME("('%s',%p): stub\n",debugstr_w((LPWSTR)szFile),pptLib); if (pptLib!=0) *pptLib=0; return E_FAIL; } /****************************************************************************** * LoadTypeLib [OLEAUT32.161] * Loads and registers a type library * NOTES * Docs: OLECHAR FAR* szFile * Docs: iTypeLib FAR* FAR* pptLib * * RETURNS * Success: S_OK * Failure: Status */ int TLB_ReadTypeLib(PCHAR file, ITypeLib **ppTypelib); HRESULT WINAPI LoadTypeLib( OLECHAR *szFile, /* [in] Name of file to load from */ ITypeLib * *pptLib) /* [out] Pointer to pointer to loaded type library */ { return LoadTypeLibEx(szFile, REGKIND_DEFAULT, pptLib); } /****************************************************************************** * LoadTypeLibEx [OLEAUT32.183] * Loads and optionally registers a type library * * RETURNS * Success: S_OK * Failure: Status */ HRESULT WINAPI LoadTypeLibEx( LPOLESTR szFile, /* [in] Name of file to load from */ REGKIND regkind, /* specify kind of registration */ ITypeLib **pptLib) /* [out] Pointer to pointer to loaded type library */ { LPSTR p; HRESULT res; TRACE("('%s',%d,%p)\n",debugstr_w(szFile), regkind, pptLib); p=HEAP_strdupWtoA(GetProcessHeap(),0,szFile); if(regkind != REGKIND_NONE) FIXME ("registration of typelibs not supported yet!\n"); res= TLB_ReadTypeLib(p, pptLib); /* XXX need to free p ?? */ TRACE(" returns %ld\n",res); return res; } /****************************************************************************** * LoadRegTypeLib [OLEAUT32.162] */ HRESULT WINAPI LoadRegTypeLib( REFGUID rguid, /* [in] referenced guid */ WORD wVerMajor, /* [in] major version */ WORD wVerMinor, /* [in] minor version */ LCID lcid, /* [in] locale id */ ITypeLib **ppTLib /* [out] path of typelib */ ) { BSTR bstr=NULL; HRESULT res=QueryPathOfRegTypeLib( rguid, wVerMajor, wVerMinor, lcid, &bstr); if(SUCCEEDED(res)){ res= LoadTypeLib(bstr, ppTLib); SysFreeString(bstr); } if(TRACE_ON(typelib)){ char xriid[50]; WINE_StringFromCLSID((LPCLSID)rguid,xriid); TRACE("(IID: %s) load %s (%p)\n",xriid, SUCCEEDED(res)? "SUCCESS":"FAILED", *ppTLib); } return res; } /****************************************************************************** * RegisterTypeLib [OLEAUT32.163] * Adds information about a type library to the System Registry * NOTES * Docs: ITypeLib FAR * ptlib * Docs: OLECHAR FAR* szFullPath * Docs: OLECHAR FAR* szHelpDir * * RETURNS * Success: S_OK * Failure: Status */ HRESULT WINAPI RegisterTypeLib( ITypeLib * ptlib, /*[in] Pointer to the library*/ OLECHAR * szFullPath, /*[in] full Path of the library*/ OLECHAR * szHelpDir) /*[in] dir to the helpfile for the library, may be NULL*/ { FIXME("(%p,%s,%s): stub\n",ptlib, debugstr_w(szFullPath),debugstr_w(szHelpDir)); return S_OK; /* FIXME: pretend everything is OK */ } /****************************************************************************** * UnRegisterTypeLib [OLEAUT32.186] * Removes information about a type library from the System Registry * NOTES * * RETURNS * Success: S_OK * Failure: Status */ HRESULT WINAPI UnRegisterTypeLib( REFGUID libid, /* [in] Guid of the library */ WORD wVerMajor, /* [in] major version */ WORD wVerMinor, /* [in] minor version */ LCID lcid, /* [in] locale id */ SYSKIND syskind) { char xriid[50]; WINE_StringFromCLSID((LPCLSID)libid,xriid); TRACE("(IID: %s): stub\n",xriid); return S_OK; /* FIXME: pretend everything is OK */ } /**************************************************************************** * OaBuildVersion (TYPELIB.15) * * known TYPELIB.DLL versions: * * OLE 2.01 no OaBuildVersion() avail 1993 -- --- * OLE 2.02 1993-94 02 3002 * OLE 2.03 23 730 * OLE 2.03 03 3025 * OLE 2.03 W98 SE orig. file !! 1993-95 10 3024 * OLE 2.1 NT 1993-95 ?? ??? * OLE 2.3.1 W95 23 700 */ DWORD WINAPI OaBuildVersion16(void) { FIXME("Please report to a.mohr@mailto.de if you get version error messages !\n"); switch(VERSION_GetVersion()) { case WIN31: return MAKELONG(3027, 3); /* WfW 3.11 */ case WIN95: return MAKELONG(700, 23); /* Win95A */ case WIN98: return MAKELONG(3024, 10); /* W98 SE */ default: FIXME_(ole)("Version value not known yet. Please investigate it !"); return 0; } } /* for better debugging info leave the static out for the time being */ #define static /*=======================Itypelib methods ===============================*/ /* ITypeLib methods */ static HRESULT WINAPI ITypeLib_fnQueryInterface( LPTYPELIB This, REFIID riid, VOID **ppvObject); static ULONG WINAPI ITypeLib_fnAddRef( LPTYPELIB This); static ULONG WINAPI ITypeLib_fnRelease( LPTYPELIB This); static UINT WINAPI ITypeLib_fnGetTypeInfoCount( LPTYPELIB This); static HRESULT WINAPI ITypeLib_fnGetTypeInfo( LPTYPELIB This, UINT index, ITypeInfo **ppTInfo); static HRESULT WINAPI ITypeLib_fnGetTypeInfoType( LPTYPELIB This, UINT index, TYPEKIND *pTKind); static HRESULT WINAPI ITypeLib_fnGetTypeInfoOfGuid( LPTYPELIB This, REFGUID guid, ITypeInfo **ppTinfo); static HRESULT WINAPI ITypeLib_fnGetLibAttr( LPTYPELIB This, LPTLIBATTR *ppTLibAttr); static HRESULT WINAPI ITypeLib_fnGetTypeComp( LPTYPELIB This, ITypeComp **ppTComp); static HRESULT WINAPI ITypeLib_fnGetDocumentation( LPTYPELIB This, INT index, BSTR *pBstrName, BSTR *pBstrDocString, DWORD *pdwHelpContext, BSTR *pBstrHelpFile); static HRESULT WINAPI ITypeLib_fnIsName( LPTYPELIB This, LPOLESTR szNameBuf, ULONG lHashVal, BOOL *pfName); static HRESULT WINAPI ITypeLib_fnFindName( LPTYPELIB This, LPOLESTR szNameBuf, ULONG lHashVal, ITypeInfo **ppTInfo, MEMBERID *rgMemId, UINT16 *pcFound); static VOID WINAPI ITypeLib_fnReleaseTLibAttr( LPTYPELIB This, TLIBATTR *pTLibAttr); static HRESULT WINAPI ITypeLib2_fnGetCustData( ITypeLib * This, REFGUID guid, VARIANT *pVarVal); static HRESULT WINAPI ITypeLib2_fnGetLibStatistics( ITypeLib * This, UINT *pcUniqueNames, UINT *pcchUniqueNames); static HRESULT WINAPI ITypeLib2_fnGetDocumentation2( ITypeLib * This, INT index, LCID lcid, BSTR *pbstrHelpString, INT *pdwHelpStringContext, BSTR *pbstrHelpStringDll); static HRESULT WINAPI ITypeLib2_fnGetAllCustData( ITypeLib * This, CUSTDATA *pCustData); static ICOM_VTABLE(ITypeLib) tlbvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE ITypeLib_fnQueryInterface, ITypeLib_fnAddRef, ITypeLib_fnRelease, ITypeLib_fnGetTypeInfoCount, ITypeLib_fnGetTypeInfo, ITypeLib_fnGetTypeInfoType, ITypeLib_fnGetTypeInfoOfGuid, ITypeLib_fnGetLibAttr, ITypeLib_fnGetTypeComp, ITypeLib_fnGetDocumentation, ITypeLib_fnIsName, ITypeLib_fnFindName, ITypeLib_fnReleaseTLibAttr, ITypeLib2_fnGetCustData, ITypeLib2_fnGetLibStatistics, ITypeLib2_fnGetDocumentation2, ITypeLib2_fnGetAllCustData }; /* TypeInfo Methods */ static HRESULT WINAPI ITypeInfo_fnQueryInterface( LPTYPEINFO This, REFIID riid, VOID **ppvObject); static ULONG WINAPI ITypeInfo_fnAddRef( LPTYPEINFO This); static ULONG WINAPI ITypeInfo_fnRelease( LPTYPEINFO This); static HRESULT WINAPI ITypeInfo_fnGetTypeAttr( LPTYPEINFO This, LPTYPEATTR *ppTypeAttr); static HRESULT WINAPI ITypeInfo_fnGetTypeComp( LPTYPEINFO This, ITypeComp * *ppTComp); static HRESULT WINAPI ITypeInfo_fnGetFuncDesc( LPTYPEINFO This, UINT index, LPFUNCDESC *ppFuncDesc); static HRESULT WINAPI ITypeInfo_fnGetVarDesc( LPTYPEINFO This, UINT index, LPVARDESC *ppVarDesc); static HRESULT WINAPI ITypeInfo_fnGetNames( LPTYPEINFO This, MEMBERID memid, BSTR *rgBstrNames, UINT cMaxNames, UINT *pcNames); static HRESULT WINAPI ITypeInfo_fnGetRefTypeOfImplType( LPTYPEINFO This, UINT index, HREFTYPE *pRefType); static HRESULT WINAPI ITypeInfo_fnGetImplTypeFlags( LPTYPEINFO This, UINT index, INT *pImplTypeFlags); static HRESULT WINAPI ITypeInfo_fnGetIDsOfNames( LPTYPEINFO This, LPOLESTR *rgszNames, UINT cNames, MEMBERID *pMemId); static HRESULT WINAPI ITypeInfo_fnInvoke( LPTYPEINFO This, VOID *pIUnk, MEMBERID memid, UINT16 dwFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *pArgErr); static HRESULT WINAPI ITypeInfo_fnGetDocumentation( LPTYPEINFO This, MEMBERID memid, BSTR *pBstrName, BSTR *pBstrDocString, DWORD *pdwHelpContext, BSTR *pBstrHelpFile); static HRESULT WINAPI ITypeInfo_fnGetDllEntry( LPTYPEINFO This, MEMBERID memid, INVOKEKIND invKind, BSTR *pBstrDllName, BSTR *pBstrName, WORD *pwOrdinal); static HRESULT WINAPI ITypeInfo_fnGetRefTypeInfo( LPTYPEINFO This, HREFTYPE hRefType, ITypeInfo * *ppTInfo); static HRESULT WINAPI ITypeInfo_fnAddressOfMember( LPTYPEINFO This, MEMBERID memid, INVOKEKIND invKind, PVOID *ppv); static HRESULT WINAPI ITypeInfo_fnCreateInstance( LPTYPEINFO This, IUnknown *pUnk, REFIID riid, VOID * *ppvObj); static HRESULT WINAPI ITypeInfo_fnGetMops( LPTYPEINFO This, MEMBERID memid, BSTR *pBstrMops); static HRESULT WINAPI ITypeInfo_fnGetContainingTypeLib( LPTYPEINFO This, ITypeLib * *ppTLib, UINT *pIndex); static HRESULT WINAPI ITypeInfo_fnReleaseTypeAttr( LPTYPEINFO This, TYPEATTR *pTypeAttr); static HRESULT WINAPI ITypeInfo_fnReleaseFuncDesc( LPTYPEINFO This, FUNCDESC *pFuncDesc); static HRESULT WINAPI ITypeInfo_fnReleaseVarDesc( LPTYPEINFO This, VARDESC *pVarDesc); /* itypeinfo2 methods */ static HRESULT WINAPI ITypeInfo2_fnGetTypeKind( ITypeInfo * This, TYPEKIND *pTypeKind); static HRESULT WINAPI ITypeInfo2_fnGetTypeFlags( ITypeInfo * This, UINT *pTypeFlags); static HRESULT WINAPI ITypeInfo2_fnGetFuncIndexOfMemId( ITypeInfo * This, MEMBERID memid, INVOKEKIND invKind, UINT *pFuncIndex); static HRESULT WINAPI ITypeInfo2_fnGetVarIndexOfMemId( ITypeInfo * This, MEMBERID memid, UINT *pVarIndex); static HRESULT WINAPI ITypeInfo2_fnGetCustData( ITypeInfo * This, REFGUID guid, VARIANT *pVarVal); static HRESULT WINAPI ITypeInfo2_fnGetFuncCustData( ITypeInfo * This, UINT index, REFGUID guid, VARIANT *pVarVal); static HRESULT WINAPI ITypeInfo2_fnGetParamCustData( ITypeInfo * This, UINT indexFunc, UINT indexParam, REFGUID guid, VARIANT *pVarVal); static HRESULT WINAPI ITypeInfo2_fnGetVarCustData( ITypeInfo * This, UINT index, REFGUID guid, VARIANT *pVarVal); static HRESULT WINAPI ITypeInfo2_fnGetImplTypeCustData( ITypeInfo * This, UINT index, REFGUID guid, VARIANT *pVarVal); static HRESULT WINAPI ITypeInfo2_fnGetDocumentation2( ITypeInfo * This, MEMBERID memid, LCID lcid, BSTR *pbstrHelpString, INT *pdwHelpStringContext, BSTR *pbstrHelpStringDll); static HRESULT WINAPI ITypeInfo2_fnGetAllCustData( ITypeInfo * This, CUSTDATA *pCustData); static HRESULT WINAPI ITypeInfo2_fnGetAllFuncCustData( ITypeInfo * This, UINT index, CUSTDATA *pCustData); static HRESULT WINAPI ITypeInfo2_fnGetAllParamCustData( ITypeInfo * This, UINT indexFunc, UINT indexParam, CUSTDATA *pCustData); static HRESULT WINAPI ITypeInfo2_fnGetAllVarCustData( ITypeInfo * This, UINT index, CUSTDATA *pCustData); static HRESULT WINAPI ITypeInfo2_fnGetAllImplTypeCustData( ITypeInfo * This, UINT index, CUSTDATA *pCustData); static ICOM_VTABLE(ITypeInfo) tinfvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE ITypeInfo_fnQueryInterface, ITypeInfo_fnAddRef, ITypeInfo_fnRelease, ITypeInfo_fnGetTypeAttr, ITypeInfo_fnGetTypeComp, ITypeInfo_fnGetFuncDesc, ITypeInfo_fnGetVarDesc, ITypeInfo_fnGetNames, ITypeInfo_fnGetRefTypeOfImplType, ITypeInfo_fnGetImplTypeFlags, ITypeInfo_fnGetIDsOfNames, ITypeInfo_fnInvoke, ITypeInfo_fnGetDocumentation, ITypeInfo_fnGetDllEntry, ITypeInfo_fnGetRefTypeInfo, ITypeInfo_fnAddressOfMember, ITypeInfo_fnCreateInstance, ITypeInfo_fnGetMops, ITypeInfo_fnGetContainingTypeLib, ITypeInfo_fnReleaseTypeAttr, ITypeInfo_fnReleaseFuncDesc, ITypeInfo_fnReleaseVarDesc, ITypeInfo2_fnGetTypeKind, ITypeInfo2_fnGetTypeFlags, ITypeInfo2_fnGetFuncIndexOfMemId, ITypeInfo2_fnGetVarIndexOfMemId, ITypeInfo2_fnGetCustData, ITypeInfo2_fnGetFuncCustData, ITypeInfo2_fnGetParamCustData, ITypeInfo2_fnGetVarCustData, ITypeInfo2_fnGetImplTypeCustData, ITypeInfo2_fnGetDocumentation2, ITypeInfo2_fnGetAllCustData, ITypeInfo2_fnGetAllFuncCustData, ITypeInfo2_fnGetAllParamCustData, ITypeInfo2_fnGetAllVarCustData, ITypeInfo2_fnGetAllImplTypeCustData, }; static TYPEDESC stndTypeDesc[VT_LPWSTR+1]={/* VT_LPWSTR is largest type that */ /* may appear in type description*/ {{0}, 0},{{0}, 1},{{0}, 2},{{0}, 3},{{0}, 4}, {{0}, 5},{{0}, 6},{{0}, 7},{{0}, 8},{{0}, 9}, {{0},10},{{0},11},{{0},12},{{0},13},{{0},14}, {{0},15},{{0},16},{{0},17},{{0},18},{{0},19}, {{0},20},{{0},21},{{0},22},{{0},23},{{0},24}, {{0},25},{{0},26},{{0},27},{{0},28},{{0},29}, {{0},30},{{0},31}}; static void TLB_abort() { DebugBreak(); } static void * TLB_Alloc(unsigned size) { void * ret; if((ret=HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,size))==NULL){ /* FIXME */ ERR("cannot allocate memory\n"); } return ret; } /* candidate for a more global appearance... */ static BSTR TLB_DupAtoBstr(PCHAR Astr) { int len; BSTR bstr; DWORD *pdw ; if(!Astr) return NULL; len=strlen(Astr); pdw =TLB_Alloc((len+3)*sizeof(OLECHAR)); pdw[0]=(len)*sizeof(OLECHAR); bstr=(BSTR)&( pdw[1]); lstrcpyAtoW( bstr, Astr); TRACE("copying %s to (%p)\n", Astr, bstr); return bstr; } static void TLB_Free(void * ptr) { HeapFree(GetProcessHeap(), 0, ptr); } /* read function */ DWORD TLB_Read(void *buffer, DWORD count, TLBContext *pcx, long where ) { if (where != DO_NOT_SEEK) { where += pcx->oStart; if (where > pcx->length) { /* FIXME */ ERR("seek beyond end (%ld/%d)\n", where, pcx->length ); TLB_abort(); } pcx->pos = where; } if (pcx->pos + count > pcx->length) count = pcx->length - pcx->pos; memcpy( buffer, (char *)pcx->mapping + pcx->pos, count ); pcx->pos += count; return count; } static void TLB_ReadGuid( GUID *pGuid, int offset, TLBContext *pcx) { if(offset<0 || pcx->pTblDir->pGuidTab.offset <0){ memset(pGuid,0, sizeof(GUID)); return; } TLB_Read(pGuid, sizeof(GUID), pcx, pcx->pTblDir->pGuidTab.offset+offset ); } PCHAR TLB_ReadName( TLBContext *pcx, int offset) { char * name; TLBNameIntro niName; TLB_Read(&niName, sizeof(niName), pcx, pcx->pTblDir->pNametab.offset+offset); niName.namelen &= 0xFF; /* FIXME: correct ? */ name=TLB_Alloc((niName.namelen & 0xff) +1); TLB_Read(name, (niName.namelen & 0xff), pcx, DO_NOT_SEEK); name[niName.namelen & 0xff]='\0'; return name; } PCHAR TLB_ReadString( TLBContext *pcx, int offset) { char * string; INT16 length; if(offset<0) return NULL; TLB_Read(&length, sizeof(INT16), pcx, pcx->pTblDir->pStringtab.offset+offset); if(length <= 0) return 0; string=TLB_Alloc(length +1); TLB_Read(string, length, pcx, DO_NOT_SEEK); string[length]='\0'; return string; } /* * read a value and fill a VARIANT structure */ static void TLB_ReadValue( VARIANT * pVar, int offset, TLBContext *pcx ) { int size; if(offset <0) { /* data is packed in here */ pVar->vt = (offset & 0x7c000000 )>> 26; V_UNION(pVar, iVal) = offset & 0xffff; return; } TLB_Read(&(pVar->vt), sizeof(VARTYPE), pcx, pcx->pTblDir->pCustData.offset + offset ); switch(pVar->vt){ case VT_EMPTY: /* FIXME: is this right? */ case VT_NULL: /* FIXME: is this right? */ case VT_I2 : /* this should not happen */ case VT_I4 : case VT_R4 : case VT_ERROR : case VT_BOOL : case VT_I1 : case VT_UI1 : case VT_UI2 : case VT_UI4 : case VT_INT : case VT_UINT : case VT_VOID : /* FIXME: is this right? */ case VT_HRESULT : size=4; break; case VT_R8 : case VT_CY : case VT_DATE : case VT_I8 : case VT_UI8 : case VT_DECIMAL : /* FIXME: is this right? */ case VT_FILETIME : size=8;break; /* pointer types with known behaviour */ case VT_BSTR :{ char * ptr; TLB_Read(&size, sizeof(INT), pcx, DO_NOT_SEEK ); ptr=TLB_Alloc(size);/* allocate temp buffer */ TLB_Read(ptr, size, pcx, DO_NOT_SEEK ); /* read string (ANSI) */ V_UNION(pVar, bstrVal)=SysAllocStringLen(NULL,size); /* FIXME: do we need a AtoW conversion here? */ V_UNION(pVar, bstrVal[size])=L'\0'; while(size--) V_UNION(pVar, bstrVal[size])=ptr[size]; TLB_Free(ptr); } size=-4; break; /* FIXME: this will not work AT ALL when the variant contains a pointer */ case VT_DISPATCH : case VT_VARIANT : case VT_UNKNOWN : case VT_PTR : case VT_SAFEARRAY : case VT_CARRAY : case VT_USERDEFINED : case VT_LPSTR : case VT_LPWSTR : case VT_BLOB : case VT_STREAM : case VT_STORAGE : case VT_STREAMED_OBJECT : case VT_STORED_OBJECT : case VT_BLOB_OBJECT : case VT_CF : case VT_CLSID : default: size=0; FIXME("VARTYPE %d is not supported, setting pointer to NULL\n", pVar->vt); } if(size>0) /* (big|small) endian correct? */ TLB_Read(&(V_UNION(pVar, iVal)), size, pcx, DO_NOT_SEEK ); return ; } /* * create a linked list with custom data */ static int TLB_CustData( TLBContext *pcx, int offset, TLBCustData** ppCustData ) { TLBCDGuid entry; TLBCustData* pNew; int count=0; while(offset >=0){ count++; pNew=TLB_Alloc(sizeof(TLBCustData)); TLB_Read(&entry, sizeof(entry), pcx, pcx->pTblDir->pCDGuids.offset+offset); TLB_ReadGuid(&(pNew->guid), entry.GuidOffset , pcx); TLB_ReadValue(&(pNew->data), entry.DataOffset, pcx); /* add new custom data at head of the list */ pNew->next=*ppCustData; *ppCustData=pNew; offset = entry.next; } return count; } static void TLB_GetTdesc(TLBContext *pcx, INT type,TYPEDESC * pTd ) { if(type <0) pTd->vt=type & VT_TYPEMASK; else *pTd=pcx->pLibInfo->pTypeDesc[type/(2*sizeof(INT))]; } static void TLB_DoFuncs(TLBContext *pcx, int cFuncs, int cVars, int offset, TLBFuncDesc ** pptfd) { /* * member information is stored in a data structure at offset * indicated by the memoffset field of the typeinfo structure * There are several distinctive parts. * the first part starts with a field that holds the total length * of this (first) part excluding this field. Then follow the records, * for each member there is one record. * * First entry is always the length of the record (excluding this * length word). * Rest of the record depends on the type of the member. If there is * a field indicating the member type (function variable intereface etc) * I have not found it yet. At this time we depend on the information * in the type info and the usual order how things are stored. * * Second follows an array sized nrMEM*sizeof(INT) with a memeber id * for each member; * * Third is a equal sized array with file offsets to the name entry * of each member. * * Forth and last (?) part is an array with offsets to the records in the * first part of this file segment. */ int infolen, nameoffset, reclength, nrattributes; char recbuf[512]; TLBFuncRecord * pFuncRec=(TLBFuncRecord *) recbuf; int i, j; int recoffset=offset+sizeof(INT); TLB_Read(&infolen,sizeof(INT), pcx, offset); for(i=0;iName=TLB_ReadName(pcx, nameoffset); /* read the function information record */ TLB_Read(&reclength, sizeof(INT), pcx, recoffset); reclength &=0x1ff; TLB_Read(pFuncRec, reclength - sizeof(INT), pcx, DO_NOT_SEEK) ; /* do the attributes */ nrattributes=(reclength-pFuncRec->nrargs*3*sizeof(int)-0x18) /sizeof(int); if(nrattributes>0){ (*pptfd)->helpcontext = pFuncRec->OptAttr[0] ; if(nrattributes>1){ (*pptfd)->HelpString = TLB_ReadString(pcx, pFuncRec->OptAttr[1]) ; if(nrattributes>2){ if(pFuncRec->FKCCIC & 0x2000) (*pptfd)->Entry = (char *) pFuncRec->OptAttr[2] ; else (*pptfd)->Entry = TLB_ReadString(pcx, pFuncRec->OptAttr[2]); if(nrattributes>5 ) (*pptfd)->HelpStringContext = pFuncRec->OptAttr[5] ; if(nrattributes>6 && pFuncRec->FKCCIC & 0x80){ TLB_CustData(pcx, pFuncRec->OptAttr[6], &(*pptfd)->pCustData); } } } } /* fill the FuncDesc Structure */ TLB_Read(&(*pptfd)->funcdesc.memid, sizeof(INT), pcx, offset + infolen + ( i + 1) * sizeof(INT)); (*pptfd)->funcdesc.funckind = (pFuncRec->FKCCIC) & 0x7; (*pptfd)->funcdesc.invkind = ((pFuncRec->FKCCIC) >>3) & 0xF; (*pptfd)->funcdesc.callconv = (pFuncRec->FKCCIC) >>8 & 0xF; (*pptfd)->funcdesc.cParams = pFuncRec->nrargs ; (*pptfd)->funcdesc.cParamsOpt = pFuncRec->nroargs ; (*pptfd)->funcdesc.oVft = pFuncRec->VtableOffset ; (*pptfd)->funcdesc.wFuncFlags = LOWORD(pFuncRec->Flags) ; TLB_GetTdesc(pcx, pFuncRec->DataType, &(*pptfd)->funcdesc.elemdescFunc.tdesc) ; /* do the parameters/arguments */ if(pFuncRec->nrargs){ TLBParameterInfo paraminfo; (*pptfd)->funcdesc.lprgelemdescParam= TLB_Alloc(pFuncRec->nrargs * sizeof(ELEMDESC)); (*pptfd)->pParamDesc=TLB_Alloc(pFuncRec->nrargs * sizeof(TLBParDesc)); TLB_Read(¶minfo,sizeof(paraminfo), pcx, recoffset+reclength - pFuncRec->nrargs * sizeof(TLBParameterInfo)); for(j=0;jnrargs;j++){ TLB_GetTdesc(pcx, paraminfo.DataType, &(*pptfd)->funcdesc.lprgelemdescParam[j].tdesc) ; V_UNION(&((*pptfd)->funcdesc.lprgelemdescParam[j]), paramdesc.wParamFlags) = paraminfo.Flags; (*pptfd)->pParamDesc[j].Name=(void *)paraminfo.oName; TLB_Read(¶minfo,sizeof(TLBParameterInfo), pcx, DO_NOT_SEEK); } /* second time around */ for(j=0;jnrargs;j++){ /* name */ (*pptfd)->pParamDesc[j].Name= TLB_ReadName(pcx, (int)(*pptfd)->pParamDesc[j].Name); /* default value */ if((PARAMFLAG_FHASDEFAULT & V_UNION(&((*pptfd)->funcdesc. lprgelemdescParam[j]),paramdesc.wParamFlags)) && ((pFuncRec->FKCCIC) & 0x1000)){ INT *pInt=(INT *)((char *)pFuncRec + reclength - (pFuncRec->nrargs * 4 + 1) * sizeof(INT) ); PARAMDESC * pParamDesc= &V_UNION(&((*pptfd)->funcdesc. lprgelemdescParam[j]),paramdesc); pParamDesc->pparamdescex = TLB_Alloc(sizeof(PARAMDESCEX)); pParamDesc->pparamdescex->cBytes= sizeof(PARAMDESCEX); TLB_ReadValue(&(pParamDesc->pparamdescex->varDefaultValue), pInt[j], pcx); } /* custom info */ if(nrattributes>7+j && pFuncRec->FKCCIC & 0x80) TLB_CustData(pcx, pFuncRec->OptAttr[7+j], &(*pptfd)->pParamDesc[j].pCustData); } } /* scode is not used: archaic win16 stuff FIXME: right? */ (*pptfd)->funcdesc.cScodes = 0 ; (*pptfd)->funcdesc.lprgscode = NULL ; pptfd=&((*pptfd)->next); recoffset += reclength; } } static void TLB_DoVars(TLBContext *pcx, int cFuncs, int cVars, int offset, TLBVarDesc ** pptvd) { int infolen, nameoffset, reclength; char recbuf[256]; TLBVarRecord * pVarRec=(TLBVarRecord *) recbuf; int i; int recoffset; TLB_Read(&infolen,sizeof(INT), pcx, offset); TLB_Read(&recoffset,sizeof(INT), pcx, offset + infolen + ((cFuncs+cVars)*2+cFuncs + 1)*sizeof(INT)); recoffset += offset+sizeof(INT); for(i=0;iName=TLB_ReadName(pcx, nameoffset); /* read the variable information record */ TLB_Read(&reclength, sizeof(INT), pcx, recoffset); reclength &=0xff; TLB_Read(pVarRec, reclength - sizeof(INT), pcx, DO_NOT_SEEK) ; /* Optional data */ if(reclength >(6*sizeof(INT)) ) (*pptvd)->HelpContext=pVarRec->HelpContext; if(reclength >(7*sizeof(INT)) ) (*pptvd)->HelpString = TLB_ReadString(pcx, pVarRec->oHelpString) ; if(reclength >(8*sizeof(INT)) ) if(reclength >(9*sizeof(INT)) ) (*pptvd)->HelpStringContext=pVarRec->HelpStringContext; /* fill the VarDesc Structure */ TLB_Read(&(*pptvd)->vardesc.memid, sizeof(INT), pcx, offset + infolen + ( i + 1) * sizeof(INT)); (*pptvd)->vardesc.varkind = pVarRec->VarKind; (*pptvd)->vardesc.wVarFlags = pVarRec->Flags; TLB_GetTdesc(pcx, pVarRec->DataType, &(*pptvd)->vardesc.elemdescVar.tdesc) ; /* (*pptvd)->vardesc.lpstrSchema; is reserved (SDK) fixme?? */ if(pVarRec->VarKind == VAR_CONST ){ V_UNION(&((*pptvd)->vardesc),lpvarValue)=TLB_Alloc(sizeof(VARIANT)); TLB_ReadValue(V_UNION(&((*pptvd)->vardesc),lpvarValue), pVarRec->OffsValue, pcx); }else V_UNION(&((*pptvd)->vardesc),oInst)=pVarRec->OffsValue; pptvd=&((*pptvd)->next); recoffset += reclength; } } /* fill in data for a hreftype (offset). When the refernced type is contained * in the typelib, its just an (file) offset in the type info base dir. * If comes fom import, its an offset+1 in the ImpInfo table * */ static void TLB_DoRefType(TLBContext *pcx, int offset, TLBRefType ** pprtd) { int j; if(!HREFTYPE_INTHISFILE( offset)) { /* external typelib */ TLBImpInfo impinfo; TLBImpLib *pImpLib=(pcx->pLibInfo->pImpLibs); TLB_Read(&impinfo, sizeof(impinfo), pcx, pcx->pTblDir->pImpInfo.offset + (offset & 0xfffffffc)); for(j=0;pImpLib;j++){ /* search the known offsets of all import libraries */ if(pImpLib->offset==impinfo.oImpFile) break; pImpLib=pImpLib->next; } if(pImpLib){ (*pprtd)->reference=offset; (*pprtd)->pImpTLInfo=pImpLib; TLB_ReadGuid(&(*pprtd)->guid, impinfo.oGuid, pcx); }else{ ERR("Cannot find a reference\n"); (*pprtd)->reference=-1; (*pprtd)->pImpTLInfo=(void *)-1; } }else{ /* in this typelib */ (*pprtd)->reference=offset; (*pprtd)->pImpTLInfo=(void *)-2; } } /* process Implemented Interfaces of a com class */ static void TLB_DoImplTypes(TLBContext *pcx, int count, int offset, TLBRefType ** pprtd) { int i; TLBRefRecord refrec; for(i=0;ipTblDir->pRefTab.offset); TLB_DoRefType(pcx, refrec.reftype, pprtd); (*pprtd)->flags=refrec.flags; (*pprtd)->ctCustData= TLB_CustData(pcx, refrec.oCustData, &(*pprtd)->pCustData); offset=refrec.onext; pprtd=&((*pprtd)->next); } } /* * process a typeinfo record */ TLBTypeInfo * TLB_DoTypeInfo(TLBContext *pcx, int count, TLBLibInfo* pLibInfo) { TLBTypeInfoBase tiBase; TLBTypeInfo *ptiRet; ptiRet=TLB_Alloc(sizeof(TLBTypeInfo)); ptiRet->lpvtbl = &tinfvt; ptiRet->ref=1; TLB_Read(&tiBase, sizeof(tiBase) ,pcx , pcx->pTblDir->pTypeInfoTab.offset+count*sizeof(tiBase)); /* this where we are coming from */ ptiRet->pTypeLib=pLibInfo; ptiRet->index=count; /* fill in the typeattr fields */ TLB_ReadGuid(&ptiRet->TypeAttr.guid, tiBase.posguid, pcx); ptiRet->TypeAttr.lcid=pLibInfo->LibAttr.lcid; /* FIXME: correct? */ ptiRet->TypeAttr.memidConstructor=MEMBERID_NIL ;/* FIXME */ ptiRet->TypeAttr.memidDestructor=MEMBERID_NIL ; /* FIXME */ ptiRet->TypeAttr.lpstrSchema=NULL; /* reserved */ ptiRet->TypeAttr.cbSizeInstance=tiBase.size; ptiRet->TypeAttr.typekind=tiBase.typekind & 0xF; ptiRet->TypeAttr.cFuncs=LOWORD(tiBase.cElement); ptiRet->TypeAttr.cVars=HIWORD(tiBase.cElement); ptiRet->TypeAttr.cbAlignment=(tiBase.typekind >> 11 )& 0x1F; /* there are more flags there */ ptiRet->TypeAttr.wTypeFlags=tiBase.flags; ptiRet->TypeAttr.wMajorVerNum=LOWORD(tiBase.version); ptiRet->TypeAttr.wMinorVerNum=HIWORD(tiBase.version); ptiRet->TypeAttr.cImplTypes=tiBase.cImplTypes; ptiRet->TypeAttr.cbSizeVft=tiBase.cbSizeVft; /* FIXME: this is only the non inherited part */ if(ptiRet->TypeAttr.typekind == TKIND_ALIAS) TLB_GetTdesc(pcx, tiBase.datatype1, &ptiRet->TypeAttr.tdescAlias) ; /* FIXME: */ /* IDLDESC idldescType; *//* never saw this one != zero */ /* name, eventually add to a hash table */ ptiRet->Name=TLB_ReadName(pcx, tiBase.NameOffset); TRACE("reading %s\n", ptiRet->Name); /* help info */ ptiRet->DocString=TLB_ReadString(pcx, tiBase.docstringoffs); ptiRet->dwHelpStringContext=tiBase.helpstringcontext; ptiRet->dwHelpContext=tiBase.helpcontext; /* note: InfoType's Help file and HelpStringDll come from the containing * library. Further HelpString and Docstring appear to be the same thing :( */ /* functions */ if(ptiRet->TypeAttr.cFuncs >0 ) TLB_DoFuncs(pcx, ptiRet->TypeAttr.cFuncs ,ptiRet->TypeAttr.cVars, tiBase.memoffset, & ptiRet->funclist); /* variables */ if(ptiRet->TypeAttr.cVars >0 ) TLB_DoVars(pcx, ptiRet->TypeAttr.cFuncs ,ptiRet->TypeAttr.cVars, tiBase.memoffset, & ptiRet->varlist); if(ptiRet->TypeAttr.cImplTypes >0 ){ if(ptiRet->TypeAttr.typekind == TKIND_COCLASS) TLB_DoImplTypes(pcx, ptiRet->TypeAttr.cImplTypes , tiBase.datatype1, & ptiRet->impltypelist); else if(ptiRet->TypeAttr.typekind != TKIND_DISPATCH){ ptiRet->impltypelist=TLB_Alloc(sizeof(TLBRefType)); TLB_DoRefType(pcx, tiBase.datatype1, & ptiRet->impltypelist); } } ptiRet->ctCustData= TLB_CustData(pcx, tiBase.oCustData, &ptiRet->pCustData); return ptiRet; } long TLB_FindTlb(TLBContext *pcx) {/* FIXME: should parse the file properly * hack to find our tlb data */ #define TLBBUFSZ 1024 char buff[TLBBUFSZ+1]; /* room for a trailing '\0' */ long ret=0,found=0; int count; char *pChr; #define LOOK_FOR_MAGIC(magic) \ count=TLB_Read(buff, TLBBUFSZ, pcx, 0); \ do { \ buff[count]='\0'; \ pChr = buff; \ while (pChr) { \ pChr = memchr(pChr,magic[0],count-(pChr-buff));\ if (pChr) { \ if (!memcmp(pChr,magic,4)) { \ ret+= pChr-buff; \ found = 1; \ break; \ } \ pChr++; \ } \ } \ if (found) break; \ ret+=count; \ count=TLB_Read(buff, TLBBUFSZ, pcx, DO_NOT_SEEK);\ } while(count>0); LOOK_FOR_MAGIC(TLBMAGIC2); if(count) return ret; LOOK_FOR_MAGIC(TLBMAGIC1); if(count) ERR("type library format not (yet) implemented\n"); else ERR("not type library found in this file\n"); return -1; } #undef LOOK_FOR_MAGIC int TLB_ReadTypeLib(PCHAR file, ITypeLib **ppTypeLib) { TLBContext cx; OFSTRUCT ofStruct; long oStart,lPSegDir; TLBLibInfo* pLibInfo=NULL; TLB2Header tlbHeader; TLBSegDir tlbSegDir; HANDLE hFile, hMap; if((hFile=OpenFile(file, &ofStruct, OF_READ))==HFILE_ERROR) { ERR("cannot open %s error 0x%lx\n",file, GetLastError()); return E_FAIL; } cx.length = SetFilePointer( hFile, 0, NULL, FILE_END ); if (!(hMap = CreateFileMappingA( hFile, NULL, PAGE_READONLY, 0, 0, NULL ))) { CloseHandle( hFile ); ERR("cannot map %s error 0x%lx\n",file, GetLastError()); return E_FAIL; } CloseHandle( hFile ); cx.mapping = MapViewOfFile( hMap, FILE_MAP_READ, 0, 0, 0 ); CloseHandle( hMap ); if (!cx.mapping) { ERR("cannot map view of %s error 0x%lx\n",file, GetLastError()); return E_FAIL; } /* get pointer to beginning of typelib data */ cx.pos = 0; cx.oStart=0; if((oStart=TLB_FindTlb(&cx))<0){ if(oStart==-1) ERR("cannot locate typelib in %s\n",file); else ERR("unsupported typelib format in %s\n",file); UnmapViewOfFile( cx.mapping ); return E_FAIL; } cx.oStart=oStart; pLibInfo=HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(TLBLibInfo)); if (!pLibInfo){ UnmapViewOfFile( cx.mapping ); return E_OUTOFMEMORY; } pLibInfo->lpvtbl = &tlbvt; pLibInfo->ref=1; cx.pLibInfo=pLibInfo; /* read header */ TLB_Read((void*)&tlbHeader, sizeof(tlbHeader), &cx, 0); /* there is a small number of information here until the next important * part: * the segment directory . Try to calculate the amount of data */ lPSegDir=sizeof(tlbHeader)+ (tlbHeader.nrtypeinfos)*4+ (tlbHeader.varflags & HELPDLLFLAG? 4 :0); /* now read the segment directory */ TLB_Read((void*)&tlbSegDir, sizeof(tlbSegDir), &cx, lPSegDir); cx.pTblDir=&tlbSegDir; /* just check two entries */ if ( tlbSegDir.pTypeInfoTab.res0c != 0x0F || tlbSegDir.pImpInfo.res0c != 0x0F ) { ERR("cannot find the table directory, ptr=0x%lx\n",lPSegDir); UnmapViewOfFile( cx.mapping ); return E_FAIL; } /* now fill our internal data */ /* TLIBATTR fields */ TLB_ReadGuid(&pLibInfo->LibAttr.guid, tlbHeader.posguid, &cx); pLibInfo->LibAttr.lcid=tlbHeader.lcid; pLibInfo->LibAttr.syskind=tlbHeader.varflags & 0x0f; /* check the mask */ pLibInfo->LibAttr.wMajorVerNum=LOWORD(tlbHeader.version); pLibInfo->LibAttr.wMinorVerNum=HIWORD(tlbHeader.version); pLibInfo->LibAttr.wLibFlags=(WORD) tlbHeader.flags & 0xffff;/* check mask */ /* name, eventually add to a hash table */ pLibInfo->Name=TLB_ReadName(&cx, tlbHeader.NameOffset); /* help info */ pLibInfo->DocString=TLB_ReadString(&cx, tlbHeader.helpstring); pLibInfo->HelpFile=TLB_ReadString(&cx, tlbHeader.helpfile); if( tlbHeader.varflags & HELPDLLFLAG){ int offset; TLB_Read(&offset, sizeof(offset), &cx, sizeof(tlbHeader)); pLibInfo->HelpStringDll=TLB_ReadString(&cx, offset); } pLibInfo->dwHelpContext=tlbHeader.helpstringcontext; /* custom data */ if(tlbHeader.CustomDataOffset >= 0) { pLibInfo->ctCustData= TLB_CustData(&cx, tlbHeader.CustomDataOffset, &pLibInfo->pCustData); } /* fill in typedescriptions */ if(tlbSegDir.pTypdescTab.length >0){ int i, j, cTD=tlbSegDir.pTypdescTab.length / (2*sizeof(INT)); INT16 td[4]; pLibInfo->pTypeDesc= TLB_Alloc( cTD * sizeof(TYPEDESC)); TLB_Read(td, sizeof(td), &cx, tlbSegDir.pTypdescTab.offset); for(i=0;ipTypeDesc[i].vt=td[0] & VT_TYPEMASK; if(td[0]==VT_PTR ||td[0]==VT_SAFEARRAY){/* FIXME: check safearray */ if(td[3]<0) V_UNION(&(pLibInfo->pTypeDesc[i]),lptdesc)= & stndTypeDesc[td[2]]; else V_UNION(&(pLibInfo->pTypeDesc[i]),lptdesc)= & pLibInfo->pTypeDesc[td[3]/8]; }else if(td[0]==VT_CARRAY) V_UNION(&(pLibInfo->pTypeDesc[i]),lpadesc)= (void *)((int) td[2]); /* temp store offset in*/ /* array descr table here */ else if(td[0]==VT_USERDEFINED) V_UNION(&(pLibInfo->pTypeDesc[i]),hreftype)=MAKELONG(td[2],td[3]); if(++ipTypeDesc[i].vt != VT_CARRAY) continue; if(tlbSegDir.pArrayDescriptions.offset>0){ TLB_Read(td, sizeof(td), &cx, tlbSegDir.pArrayDescriptions.offset + (int) V_UNION(&(pLibInfo->pTypeDesc[i]),lpadesc)); V_UNION(&(pLibInfo->pTypeDesc[i]),lpadesc)= TLB_Alloc(sizeof(ARRAYDESC)+sizeof(SAFEARRAYBOUND)*(td[3]-1)); if(td[1]<0) V_UNION(&(pLibInfo->pTypeDesc[i]),lpadesc)->tdescElem.vt=td[0] & VT_TYPEMASK; else V_UNION(&(pLibInfo->pTypeDesc[i]),lpadesc)->tdescElem=stndTypeDesc[td[0]/8]; V_UNION(&(pLibInfo->pTypeDesc[i]),lpadesc)->cDims=td[2]; for(j=0;jpTypeDesc[i]),lpadesc)->rgbounds[j].cElements, sizeof(INT), &cx, DO_NOT_SEEK); TLB_Read(& V_UNION(&(pLibInfo->pTypeDesc[i]),lpadesc) ->rgbounds[j].lLbound, sizeof(INT), &cx, DO_NOT_SEEK); } }else{ V_UNION(&(pLibInfo->pTypeDesc[i]),lpadesc)=NULL; ERR("didn't find array description data\n"); } } } /* imported type libs */ if(tlbSegDir.pImpFiles.offset>0){ TLBImpLib **ppImpLib=&(pLibInfo->pImpLibs); int offset=tlbSegDir.pImpFiles.offset; int oGuid; UINT16 size; while(offset < tlbSegDir.pImpFiles.offset +tlbSegDir.pImpFiles.length){ *ppImpLib=TLB_Alloc(sizeof(TLBImpLib)); (*ppImpLib)->offset=offset - tlbSegDir.pImpFiles.offset; TLB_Read(&oGuid, sizeof(INT), &cx, offset); TLB_ReadGuid(&(*ppImpLib)->guid, oGuid, &cx); /* we are skipping some unknown info here */ TLB_Read(& size,sizeof(UINT16), &cx, offset+3*(sizeof(INT))); size >>=2; (*ppImpLib)->name=TLB_Alloc(size+1); TLB_Read((*ppImpLib)->name,size, &cx, DO_NOT_SEEK); offset=(offset+3*(sizeof(INT))+sizeof(UINT16)+size+3) & 0xfffffffc; ppImpLib=&(*ppImpLib)->next; } } /* type info's */ if(tlbHeader.nrtypeinfos >=0 ){ /*pLibInfo->TypeInfoCount=tlbHeader.nrtypeinfos; */ TLBTypeInfo **ppTI=&(pLibInfo->pTypeInfo); int i; for(i=0;i<(int)tlbHeader.nrtypeinfos;i++){ *ppTI=TLB_DoTypeInfo(&cx, i, pLibInfo); ppTI=&((*ppTI)->next); (pLibInfo->TypeInfoCount)++; } } UnmapViewOfFile( cx.mapping ); *ppTypeLib=(LPTYPELIB)pLibInfo; return S_OK; } /*================== ITypeLib(2) Methods ===================================*/ /* ITypeLib::QueryInterface */ static HRESULT WINAPI ITypeLib_fnQueryInterface( LPTYPELIB This, REFIID riid, VOID **ppvObject) { if(TRACE_ON(typelib)){ char xriid[50]; WINE_StringFromCLSID((LPCLSID)riid,xriid); TRACE("(%p)->(IID: %s)\n",This,xriid); } *ppvObject=NULL; if(IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid,&IID_ITypeLib)|| IsEqualIID(riid,&IID_ITypeLib2)) *ppvObject = This; if(*ppvObject){ ITypeLib_AddRef(This); TRACE("-- Interface: (%p)->(%p)\n",ppvObject,*ppvObject); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } /* ITypeLib::AddRef */ static ULONG WINAPI ITypeLib_fnAddRef( LPTYPELIB iface) { ICOM_THIS( TLBLibInfo, iface); TRACE("(%p)->ref is %u\n",This, This->ref); return ++(This->ref); } /* ITypeLib::Release */ static ULONG WINAPI ITypeLib_fnRelease( LPTYPELIB iface) { ICOM_THIS( TLBLibInfo, iface); FIXME("(%p)->ref is %u: stub\n",This, This->ref); (This->ref)--; return S_OK; } /* ITypeLib::GetTypeInfoCount * * Returns the number of type descriptions in the type library */ static UINT WINAPI ITypeLib_fnGetTypeInfoCount( LPTYPELIB iface) { ICOM_THIS( TLBLibInfo, iface); TRACE("(%p)->count is %d\n",This, This->TypeInfoCount); return This->TypeInfoCount; } /* ITypeLib::GetTypeInfo * *etrieves the specified type description in the library. */ static HRESULT WINAPI ITypeLib_fnGetTypeInfo( LPTYPELIB iface, UINT index, ITypeInfo **ppTInfo) { int i; ICOM_THIS( TLBLibInfo, iface); TLBTypeInfo **ppTLBTInfo=(TLBTypeInfo **)ppTInfo; TRACE("(%p) index %d \n",This, index); for(i=0,*ppTLBTInfo=This->pTypeInfo;*ppTLBTInfo && i != index;i++) *ppTLBTInfo=(*ppTLBTInfo)->next; if(*ppTLBTInfo){ (*ppTLBTInfo)->lpvtbl->fnAddRef(*ppTInfo); TRACE("-- found (%p)->(%p)\n",ppTLBTInfo,*ppTLBTInfo); return S_OK; } TRACE("-- element not found\n"); return TYPE_E_ELEMENTNOTFOUND; } /* ITypeLibs::GetTypeInfoType * * Retrieves the type of a type description. */ static HRESULT WINAPI ITypeLib_fnGetTypeInfoType( LPTYPELIB iface, UINT index, TYPEKIND *pTKind) { int i; TLBTypeInfo *pTInfo; ICOM_THIS( TLBLibInfo, iface); TRACE("(%p) index %d \n",This, index); for(i=0,pTInfo=This->pTypeInfo;pTInfo && i != index;i++) pTInfo=(pTInfo)->next; if(pTInfo){ *pTKind=pTInfo->TypeAttr.typekind; TRACE("-- found Type (%p)->%d\n",pTKind,*pTKind); return S_OK; } TRACE("-- element not found\n"); return TYPE_E_ELEMENTNOTFOUND; } /* ITypeLib::GetTypeInfoOfGuid * * Retrieves the type description that corresponds to the specified GUID. * */ static HRESULT WINAPI ITypeLib_fnGetTypeInfoOfGuid( LPTYPELIB iface, REFGUID guid, ITypeInfo **ppTInfo) { int i; ICOM_THIS( TLBLibInfo, iface); TLBTypeInfo **ppTLBTInfo=(TLBTypeInfo **)ppTInfo; if(TRACE_ON(typelib)){ char xriid[50]; WINE_StringFromCLSID((LPCLSID)guid,xriid); TRACE("(%p) guid %sx)\n",This,xriid); } for(i=0,*ppTLBTInfo=This->pTypeInfo;*ppTLBTInfo && !IsEqualIID(guid,&(*ppTLBTInfo)->TypeAttr.guid);i++) *ppTLBTInfo=(*ppTLBTInfo)->next; if(*ppTLBTInfo){ (*ppTLBTInfo)->lpvtbl->fnAddRef(*ppTInfo); TRACE("-- found (%p)->(%p)\n",ppTLBTInfo,*ppTLBTInfo); return S_OK; } TRACE("-- element not found\n"); return TYPE_E_ELEMENTNOTFOUND; } /* ITypeLib::GetLibAttr * * Retrieves the structure that contains the library's attributes. * */ static HRESULT WINAPI ITypeLib_fnGetLibAttr( LPTYPELIB iface, LPTLIBATTR *ppTLibAttr) { ICOM_THIS( TLBLibInfo, iface); TRACE("(%p)\n",This); /* FIXME: must do a copy here */ *ppTLibAttr=&This->LibAttr; return S_OK; } /* ITypeLib::GetTypeComp * * Enables a client compiler to bind to a library's types, variables, * constants, and global functions. * */ static HRESULT WINAPI ITypeLib_fnGetTypeComp( LPTYPELIB iface, ITypeComp **ppTComp) { ICOM_THIS( TLBLibInfo, iface); FIXME("(%p): stub!\n",This); return E_NOTIMPL; } /* ITypeLib::GetDocumentation * * Retrieves the library's documentation string, the complete Help file name * and path, and the context identifier for the library Help topic in the Help * file. * */ static HRESULT WINAPI ITypeLib_fnGetDocumentation( LPTYPELIB iface, INT index, BSTR *pBstrName, BSTR *pBstrDocString, DWORD *pdwHelpContext, BSTR *pBstrHelpFile) { ICOM_THIS( TLBLibInfo, iface); HRESULT result; ITypeInfo *pTInfo; TRACE("(%p) index %d Name(%p) DocString(%p)" " HelpContext(%p) HelpFile(%p)\n", This, index, pBstrName, pBstrDocString, pdwHelpContext, pBstrHelpFile); if(index<0){ /* documentation for the typelib */ if(pBstrName) *pBstrName=TLB_DupAtoBstr(This->Name); if(pBstrDocString) *pBstrName=TLB_DupAtoBstr(This->DocString); if(pdwHelpContext) *pdwHelpContext=This->dwHelpContext; if(pBstrHelpFile) *pBstrName=TLB_DupAtoBstr(This->HelpFile); }else {/* for a typeinfo */ result=ITypeLib_fnGetTypeInfo(iface, index, &pTInfo); if(SUCCEEDED(result)){ result=ITypeInfo_GetDocumentation(pTInfo, MEMBERID_NIL, pBstrName, pBstrDocString, pdwHelpContext, pBstrHelpFile); ITypeInfo_Release(pTInfo); } if(!SUCCEEDED(result)) return result; } return S_OK; } /* ITypeLib::IsName * * Indicates whether a passed-in string contains the name of a type or member * described in the library. * */ static HRESULT WINAPI ITypeLib_fnIsName( LPTYPELIB iface, LPOLESTR szNameBuf, ULONG lHashVal, BOOL *pfName) { ICOM_THIS( TLBLibInfo, iface); TLBTypeInfo *pTInfo; TLBFuncDesc *pFInfo; TLBVarDesc *pVInfo; int i; PCHAR astr= HEAP_strdupWtoA( GetProcessHeap(), 0, szNameBuf ); *pfName=TRUE; if(!strcmp(astr,This->Name)) goto ITypeLib_fnIsName_exit; for(pTInfo=This->pTypeInfo;pTInfo;pTInfo=pTInfo->next){ if(!strcmp(astr,pTInfo->Name)) goto ITypeLib_fnIsName_exit; for(pFInfo=pTInfo->funclist;pFInfo;pFInfo=pFInfo->next) { if(!strcmp(astr,pFInfo->Name)) goto ITypeLib_fnIsName_exit; for(i=0;ifuncdesc.cParams;i++) if(!strcmp(astr,pFInfo->pParamDesc[i].Name)) goto ITypeLib_fnIsName_exit; } for(pVInfo=pTInfo->varlist;pVInfo;pVInfo=pVInfo->next) ; if(!strcmp(astr,pVInfo->Name)) goto ITypeLib_fnIsName_exit; } *pfName=FALSE; ITypeLib_fnIsName_exit: TRACE("(%p)slow! search for %s: %s found!\n", This, debugstr_a(astr), *pfName?"NOT":""); HeapFree( GetProcessHeap(), 0, astr ); return S_OK; } /* ITypeLib::FindName * * Finds occurrences of a type description in a type library. This may be used * to quickly verify that a name exists in a type library. * */ static HRESULT WINAPI ITypeLib_fnFindName( LPTYPELIB iface, LPOLESTR szNameBuf, ULONG lHashVal, ITypeInfo **ppTInfo, MEMBERID *rgMemId, UINT16 *pcFound) { ICOM_THIS( TLBLibInfo, iface); TLBTypeInfo *pTInfo; TLBFuncDesc *pFInfo; TLBVarDesc *pVInfo; int i,j = 0; PCHAR astr= HEAP_strdupWtoA( GetProcessHeap(), 0, szNameBuf ); for(pTInfo=This->pTypeInfo;pTInfo && j<*pcFound; pTInfo=pTInfo->next){ if(!strcmp(astr,pTInfo->Name)) goto ITypeLib_fnFindName_exit; for(pFInfo=pTInfo->funclist;pFInfo;pFInfo=pFInfo->next) { if(!strcmp(astr,pFInfo->Name)) goto ITypeLib_fnFindName_exit; for(i=0;ifuncdesc.cParams;i++) if(!strcmp(astr,pFInfo->pParamDesc[i].Name)) goto ITypeLib_fnFindName_exit; } for(pVInfo=pTInfo->varlist;pVInfo;pVInfo=pVInfo->next) ; if(!strcmp(astr,pVInfo->Name)) goto ITypeLib_fnFindName_exit; continue; ITypeLib_fnFindName_exit: pTInfo->lpvtbl->fnAddRef((LPTYPEINFO)pTInfo); ppTInfo[j]=(LPTYPEINFO)pTInfo; j++; } TRACE("(%p)slow! search for %d with %s: found %d TypeInfo's!\n", This, *pcFound, debugstr_a(astr), j); *pcFound=j; HeapFree( GetProcessHeap(), 0, astr ); return S_OK; } /* ITypeLib::ReleaseTLibAttr * * Releases the TLIBATTR originally obtained from ITypeLib::GetLibAttr. * */ static VOID WINAPI ITypeLib_fnReleaseTLibAttr( LPTYPELIB iface, TLIBATTR *pTLibAttr) { ICOM_THIS( TLBLibInfo, iface); TRACE("freeing (%p)\n",This); /* nothing to do */ } /* ITypeLib2::GetCustData * * gets the custom data */ static HRESULT WINAPI ITypeLib2_fnGetCustData( ITypeLib * iface, REFGUID guid, VARIANT *pVarVal) { ICOM_THIS( TLBLibInfo, iface); TLBCustData *pCData; for(pCData=This->pCustData; pCData; pCData = pCData->next) if( IsEqualIID(guid, &pCData->guid)) break; if(TRACE_ON(typelib)){ char xriid[50]; WINE_StringFromCLSID((LPCLSID)guid,xriid); TRACE("(%p) guid %s %s found!x)\n", This, xriid, pCData? "" : "NOT"); } if(pCData){ VariantInit( pVarVal); VariantCopy( pVarVal, &pCData->data); return S_OK; } return E_INVALIDARG; /* FIXME: correct? */ } /* ITypeLib2::GetLibStatistics * * Returns statistics about a type library that are required for efficient * sizing of hash tables. * */ static HRESULT WINAPI ITypeLib2_fnGetLibStatistics( ITypeLib * iface, UINT *pcUniqueNames, UINT *pcchUniqueNames) { ICOM_THIS( TLBLibInfo, iface); FIXME("(%p): stub!\n", This); if(pcUniqueNames) *pcUniqueNames=1; if(pcchUniqueNames) *pcchUniqueNames=1; return S_OK; } /* ITypeLib2::GetDocumentation2 * * Retrieves the library's documentation string, the complete Help file name * and path, the localization context to use, and the context ID for the * library Help topic in the Help file. * */ static HRESULT WINAPI ITypeLib2_fnGetDocumentation2( ITypeLib * iface, INT index, LCID lcid, BSTR *pbstrHelpString, INT *pdwHelpStringContext, BSTR *pbstrHelpStringDll) { ICOM_THIS( TLBLibInfo, iface); HRESULT result; ITypeInfo *pTInfo; FIXME("(%p) index %d lcid %ld half implemented stub!\n", This, index, lcid); /* the help string should be obtained from the helpstringdll, * using the _DLLGetDocumentation function, based on the supplied * lcid. Nice to do sometime... */ if(index<0){ /* documentation for the typelib */ if(pbstrHelpString) *pbstrHelpString=TLB_DupAtoBstr(This->DocString); if(pdwHelpStringContext) *pdwHelpStringContext=This->dwHelpContext; if(pbstrHelpStringDll) *pbstrHelpStringDll=TLB_DupAtoBstr(This->HelpStringDll); }else {/* for a typeinfo */ result=ITypeLib_fnGetTypeInfo(iface, index, &pTInfo); if(SUCCEEDED(result)){ result=ITypeInfo2_fnGetDocumentation2(pTInfo, MEMBERID_NIL, lcid, pbstrHelpString, pdwHelpStringContext, pbstrHelpStringDll); ITypeInfo_Release(pTInfo); } if(!SUCCEEDED(result)) return result; } return S_OK; } /* ITypeLib2::GetAllCustData * * Gets all custom data items for the library. * */ static HRESULT WINAPI ITypeLib2_fnGetAllCustData( ITypeLib * iface, CUSTDATA *pCustData) { ICOM_THIS( TLBLibInfo, iface); TLBCustData *pCData; int i; TRACE("(%p) returning %d items\n", This, This->ctCustData); pCustData->prgCustData = TLB_Alloc(This->ctCustData * sizeof(CUSTDATAITEM)); if(pCustData->prgCustData ){ pCustData->cCustData=This->ctCustData; for(i=0, pCData=This->pCustData; pCData; i++, pCData = pCData->next){ pCustData->prgCustData[i].guid=pCData->guid; VariantCopy(& pCustData->prgCustData[i].varValue, & pCData->data); } }else{ ERR(" OUT OF MEMORY! \n"); return E_OUTOFMEMORY; } return S_OK; } /*================== ITypeInfo(2) Methods ===================================*/ /* ITypeInfo::QueryInterface */ static HRESULT WINAPI ITypeInfo_fnQueryInterface( LPTYPEINFO iface, REFIID riid, VOID **ppvObject) { ICOM_THIS( TLBTypeInfo, iface); if(TRACE_ON(typelib)){ char xriid[50]; WINE_StringFromCLSID((LPCLSID)riid,xriid); TRACE("(%p)->(IID: %s)\n",This,xriid); } *ppvObject=NULL; if(IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid,&IID_ITypeInfo)|| IsEqualIID(riid,&IID_ITypeInfo2)) *ppvObject = This; if(*ppvObject){ ITypeInfo_AddRef(iface); TRACE("-- Interface: (%p)->(%p)\n",ppvObject,*ppvObject); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } /* ITypeInfo::AddRef */ static ULONG WINAPI ITypeInfo_fnAddRef( LPTYPEINFO iface) { ICOM_THIS( TLBTypeInfo, iface); TRACE("(%p)->ref is %u\n",This, This->ref); (This->pTypeLib->ref)++; return ++(This->ref); } /* ITypeInfo::Release */ static ULONG WINAPI ITypeInfo_fnRelease( LPTYPEINFO iface) { ICOM_THIS( TLBTypeInfo, iface); FIXME("(%p)->ref is %u: stub\n",This, This->ref); (This->ref)--; (This->pTypeLib->ref)--; return S_OK; } /* ITypeInfo::GetTypeAttr * * Retrieves a TYPEATTR structure that contains the attributes of the type * description. * */ static HRESULT WINAPI ITypeInfo_fnGetTypeAttr( LPTYPEINFO iface, LPTYPEATTR *ppTypeAttr) { ICOM_THIS( TLBTypeInfo, iface); TRACE("(%p)\n",This); /* FIXME: must do a copy here */ *ppTypeAttr=&This->TypeAttr; return S_OK; } /* ITypeInfo::GetTypeComp * * Retrieves the ITypeComp interface for the type description, which enables a * client compiler to bind to the type description's members. * */ static HRESULT WINAPI ITypeInfo_fnGetTypeComp( LPTYPEINFO iface, ITypeComp * *ppTComp) { ICOM_THIS( TLBTypeInfo, iface); FIXME("(%p) stub!\n", This); return S_OK; } /* ITypeInfo::GetFuncDesc * * Retrieves the FUNCDESC structure that contains information about a * specified function. * */ static HRESULT WINAPI ITypeInfo_fnGetFuncDesc( LPTYPEINFO iface, UINT index, LPFUNCDESC *ppFuncDesc) { ICOM_THIS( TLBTypeInfo, iface); int i; TLBFuncDesc * pFDesc; TRACE("(%p) index %d\n", This, index); for(i=0, pFDesc=This->funclist; i!=index && pFDesc; i++, pFDesc=pFDesc->next) ; if(pFDesc){ /* FIXME: must do a copy here */ *ppFuncDesc=&pFDesc->funcdesc; return S_OK; } return E_INVALIDARG; } /* ITypeInfo::GetVarDesc * * Retrieves a VARDESC structure that describes the specified variable. * */ static HRESULT WINAPI ITypeInfo_fnGetVarDesc( LPTYPEINFO iface, UINT index, LPVARDESC *ppVarDesc) { ICOM_THIS( TLBTypeInfo, iface); int i; TLBVarDesc * pVDesc; TRACE("(%p) index %d\n", This, index); for(i=0, pVDesc=This->varlist; i!=index && pVDesc; i++, pVDesc=pVDesc->next) ; if(pVDesc){ /* FIXME: must do a copy here */ *ppVarDesc=&pVDesc->vardesc; return S_OK; } return E_INVALIDARG; } /* ITypeInfo_GetNames * * Retrieves the variable with the specified member ID (or the name of the * property or method and its parameters) that correspond to the specified * function ID. */ static HRESULT WINAPI ITypeInfo_fnGetNames( LPTYPEINFO iface, MEMBERID memid, BSTR *rgBstrNames, UINT cMaxNames, UINT *pcNames) { ICOM_THIS( TLBTypeInfo, iface); TLBFuncDesc * pFDesc; TLBVarDesc * pVDesc; int i; TRACE("(%p) memid=0x%08lx Maxname=%d\n", This, memid, cMaxNames); for(pFDesc=This->funclist; pFDesc->funcdesc.memid != memid && pFDesc; pFDesc=pFDesc->next) ; if(pFDesc){ /* function found, now return function and parameter names */ for(i=0; ifuncdesc.cParams; i++){ if(!i) *rgBstrNames=TLB_DupAtoBstr(pFDesc->Name); else rgBstrNames[i]=TLB_DupAtoBstr(pFDesc->pParamDesc[i-1].Name); } *pcNames=i; }else{ for(pVDesc=This->varlist; pVDesc->vardesc.memid != memid && pVDesc; pVDesc=pVDesc->next) ; if(pVDesc){ *rgBstrNames=TLB_DupAtoBstr(pFDesc->Name); *pcNames=1; }else{ if(This->TypeAttr.typekind==TKIND_INTERFACE && This->TypeAttr.cImplTypes ){ /* recursive search */ ITypeInfo *pTInfo; HRESULT result; result=This->lpvtbl->fnGetRefTypeInfo(iface, This->impltypelist->reference, &pTInfo); if(SUCCEEDED(result)){ result=ITypeInfo_GetNames(pTInfo, memid, rgBstrNames, cMaxNames, pcNames); ITypeInfo_Release(pTInfo); return result; } WARN("Could not search inherited interface!\n"); } else WARN("no names found\n"); *pcNames=0; return TYPE_E_ELEMENTNOTFOUND; } } return S_OK; } /* ITypeInfo::GetRefTypeOfImplType * * If a type description describes a COM class, it retrieves the type * description of the implemented interface types. For an interface, * GetRefTypeOfImplType returns the type information for inherited interfaces, * if any exist. * */ static HRESULT WINAPI ITypeInfo_fnGetRefTypeOfImplType( LPTYPEINFO iface, UINT index, HREFTYPE *pRefType) { ICOM_THIS( TLBTypeInfo, iface); int(i); TLBRefType *pIref; TRACE("(%p) index %d\n", This, index); for(i=0, pIref=This->impltypelist; inext) ; if(i==index){ *pRefType=pIref->reference; return S_OK; } return TYPE_E_ELEMENTNOTFOUND; } /* ITypeInfo::GetImplTypeFlags * * Retrieves the IMPLTYPEFLAGS enumeration for one implemented interface * or base interface in a type description. */ static HRESULT WINAPI ITypeInfo_fnGetImplTypeFlags( LPTYPEINFO iface, UINT index, INT *pImplTypeFlags) { ICOM_THIS( TLBTypeInfo, iface); int(i); TLBRefType *pIref; TRACE("(%p) index %d\n", This, index); for(i=0, pIref=This->impltypelist; inext) ; if(i==index && pIref){ *pImplTypeFlags=pIref->flags; return S_OK; } *pImplTypeFlags=0; return TYPE_E_ELEMENTNOTFOUND; } /* GetIDsOfNames * Maps between member names and member IDs, and parameter names and * parameter IDs. */ static HRESULT WINAPI ITypeInfo_fnGetIDsOfNames( LPTYPEINFO iface, LPOLESTR *rgszNames, UINT cNames, MEMBERID *pMemId) { ICOM_THIS( TLBTypeInfo, iface); TLBFuncDesc * pFDesc; TLBVarDesc * pVDesc; HRESULT ret=S_OK; PCHAR aszName= HEAP_strdupWtoA( GetProcessHeap(), 0, *rgszNames); TRACE("(%p) Name %s cNames %d\n", This, debugstr_a(aszName), cNames); for(pFDesc=This->funclist; pFDesc; pFDesc=pFDesc->next) { int i, j; if( !strcmp(aszName, pFDesc->Name)) { if(cNames) *pMemId=pFDesc->funcdesc.memid; for(i=1; i < cNames; i++){ PCHAR aszPar= HEAP_strdupWtoA( GetProcessHeap(), 0, rgszNames[i]); for(j=0; jfuncdesc.cParams; j++) if(strcmp(aszPar,pFDesc->pParamDesc[j].Name)) break; if( jfuncdesc.cParams) pMemId[i]=j; else ret=DISP_E_UNKNOWNNAME; HeapFree( GetProcessHeap(), 0, aszPar); }; HeapFree (GetProcessHeap(), 0, aszName); return ret; } } for(pVDesc=This->varlist; pVDesc; pVDesc=pVDesc->next) { if( !strcmp(aszName, pVDesc->Name)) { if(cNames) *pMemId=pVDesc->vardesc.memid; HeapFree (GetProcessHeap(), 0, aszName); return ret; } } /* not found, see if this is and interface with an inheritance */ if(This->TypeAttr.typekind==TKIND_INTERFACE && This->TypeAttr.cImplTypes ){ /* recursive search */ ITypeInfo *pTInfo; ret=ITypeInfo_GetRefTypeInfo(iface, This->impltypelist->reference, &pTInfo); if(SUCCEEDED(ret)){ ret=ITypeInfo_GetIDsOfNames(pTInfo, rgszNames, cNames, pMemId ); ITypeInfo_Release(pTInfo); return ret; } WARN("Could not search inherited interface!\n"); } else WARN("no names found\n"); return DISP_E_UNKNOWNNAME; } /* ITypeInfo::Invoke * * Invokes a method, or accesses a property of an object, that implements the * interface described by the type description. */ static HRESULT WINAPI ITypeInfo_fnInvoke( LPTYPEINFO iface, VOID *pIUnk, MEMBERID memid, UINT16 dwFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *pArgErr) { ICOM_THIS( TLBTypeInfo, iface); FIXME("(%p) stub!", This); return S_OK; } /* ITypeInfo::GetDocumentation * * Retrieves the documentation string, the complete Help file name and path, * and the context ID for the Help topic for a specified type description. */ static HRESULT WINAPI ITypeInfo_fnGetDocumentation( LPTYPEINFO iface, MEMBERID memid, BSTR *pBstrName, BSTR *pBstrDocString, DWORD *pdwHelpContext, BSTR *pBstrHelpFile) { ICOM_THIS( TLBTypeInfo, iface); TLBFuncDesc * pFDesc; TLBVarDesc * pVDesc; TRACE("(%p) memid %ld Name(%p) DocString(%p)" " HelpContext(%p) HelpFile(%p)\n", This, memid, pBstrName, pBstrDocString, pdwHelpContext, pBstrHelpFile); if(memid==MEMBERID_NIL){ /* documentation for the typeinfo */ if(pBstrName) *pBstrName=TLB_DupAtoBstr(This->Name); if(pBstrDocString) *pBstrDocString=TLB_DupAtoBstr(This->DocString); if(pdwHelpContext) *pdwHelpContext=This->dwHelpContext; if(pBstrHelpFile) *pBstrHelpFile=TLB_DupAtoBstr(This->DocString);/* FIXME */ return S_OK; }else {/* for a member */ for(pFDesc=This->funclist; pFDesc; pFDesc=pFDesc->next) if(pFDesc->funcdesc.memid==memid){ return S_OK; } for(pVDesc=This->varlist; pVDesc; pVDesc=pVDesc->next) if(pVDesc->vardesc.memid==memid){ return S_OK; } } return TYPE_E_ELEMENTNOTFOUND; } /* ITypeInfo::GetDllEntry * * Retrieves a description or specification of an entry point for a function * in a DLL. */ static HRESULT WINAPI ITypeInfo_fnGetDllEntry( LPTYPEINFO iface, MEMBERID memid, INVOKEKIND invKind, BSTR *pBstrDllName, BSTR *pBstrName, WORD *pwOrdinal) { ICOM_THIS( TLBTypeInfo, iface); FIXME("(%p) stub!\n", This); return E_FAIL; } /* ITypeInfo::GetRefTypeInfo * * If a type description references other type descriptions, it retrieves * the referenced type descriptions. */ static HRESULT WINAPI ITypeInfo_fnGetRefTypeInfo( LPTYPEINFO iface, HREFTYPE hRefType, ITypeInfo * *ppTInfo) { ICOM_THIS( TLBTypeInfo, iface); HRESULT result; if(HREFTYPE_INTHISFILE(hRefType)){ ITypeLib *pTLib; int Index; result=This->lpvtbl->fnGetContainingTypeLib(iface, &pTLib, &Index); if(SUCCEEDED(result)){ result=ITypeLib_GetTypeInfo(pTLib, HREFTYPE_INDEX(hRefType), ppTInfo); ITypeLib_Release(pTLib ); } } else{ /* imported type lib */ TLBRefType * pRefType; TLBLibInfo *pTypeLib; for( pRefType=This->impltypelist; pRefType && pRefType->reference != hRefType; pRefType=pRefType->next) ; if(!pRefType) return TYPE_E_ELEMENTNOTFOUND; /* FIXME : correct? */ pTypeLib=pRefType->pImpTLInfo->pImpTypeLib; if(pTypeLib) /* typelib already loaded */ result=ITypeLib_GetTypeInfoOfGuid( (LPTYPELIB)pTypeLib, &pRefType->guid, ppTInfo); else{ result=LoadRegTypeLib( &pRefType->pImpTLInfo->guid, 0,0,0, /* FIXME */ (LPTYPELIB *)&pTypeLib); if(!SUCCEEDED(result)){ BSTR libnam=TLB_DupAtoBstr(pRefType->pImpTLInfo->name); result=LoadTypeLib(libnam, (LPTYPELIB *)&pTypeLib); SysFreeString(libnam); } if(SUCCEEDED(result)){ result=ITypeLib_GetTypeInfoOfGuid( (LPTYPELIB)pTypeLib, &pRefType->guid, ppTInfo); pRefType->pImpTLInfo->pImpTypeLib=pTypeLib; } } } TRACE("(%p) hreftype 0x%04lx loaded %s (%p)\n", This, hRefType, SUCCEEDED(result)? "SUCCESS":"FAILURE", *ppTInfo); return result; } /* ITypeInfo::AddressOfMember * * Retrieves the addresses of static functions or variables, such as those * defined in a DLL. */ static HRESULT WINAPI ITypeInfo_fnAddressOfMember( LPTYPEINFO iface, MEMBERID memid, INVOKEKIND invKind, PVOID *ppv) { ICOM_THIS( TLBTypeInfo, iface); FIXME("(%p) stub!\n", This); return S_OK; } /* ITypeInfo::CreateInstance * * Creates a new instance of a type that describes a component object class * (coclass). */ static HRESULT WINAPI ITypeInfo_fnCreateInstance( LPTYPEINFO iface, IUnknown *pUnk, REFIID riid, VOID **ppvObj) { ICOM_THIS( TLBTypeInfo, iface); FIXME("(%p) stub!\n", This); return S_OK; } /* ITypeInfo::GetMops * * Retrieves marshaling information. */ static HRESULT WINAPI ITypeInfo_fnGetMops( LPTYPEINFO iface, MEMBERID memid, BSTR *pBstrMops) { ICOM_THIS( TLBTypeInfo, iface); FIXME("(%p) stub!\n", This); return S_OK; } /* ITypeInfo::GetContainingTypeLib * * Retrieves the containing type library and the index of the type description * within that type library. */ static HRESULT WINAPI ITypeInfo_fnGetContainingTypeLib( LPTYPEINFO iface, ITypeLib * *ppTLib, UINT *pIndex) { ICOM_THIS( TLBTypeInfo, iface); *ppTLib=(LPTYPELIB )(This->pTypeLib); *pIndex=This->index; ITypeLib_AddRef(*ppTLib); TRACE("(%p) returns (%p) index %d!\n", This, *ppTLib, *pIndex); return S_OK; } /* ITypeInfo::ReleaseTypeAttr * * Releases a TYPEATTR previously returned by GetTypeAttr. * */ static HRESULT WINAPI ITypeInfo_fnReleaseTypeAttr( LPTYPEINFO iface, TYPEATTR* pTypeAttr) { ICOM_THIS( TLBTypeInfo, iface); TRACE("(%p)->(%p)\n", This, pTypeAttr); return S_OK; } /* ITypeInfo::ReleaseFuncDesc * * Releases a FUNCDESC previously returned by GetFuncDesc. * */ static HRESULT WINAPI ITypeInfo_fnReleaseFuncDesc( LPTYPEINFO iface, FUNCDESC *pFuncDesc) { ICOM_THIS( TLBTypeInfo, iface); TRACE("(%p)->(%p)\n", This, pFuncDesc); return S_OK; } /* ITypeInfo::ReleaseVarDesc * * Releases a VARDESC previously returned by GetVarDesc. */ static HRESULT WINAPI ITypeInfo_fnReleaseVarDesc( LPTYPEINFO iface, VARDESC *pVarDesc) { ICOM_THIS( TLBTypeInfo, iface); TRACE("(%p)->(%p)\n", This, pVarDesc); return S_OK; } /* ITypeInfo2::GetTypeKind * * Returns the TYPEKIND enumeration quickly, without doing any allocations. * */ static HRESULT WINAPI ITypeInfo2_fnGetTypeKind( ITypeInfo * iface, TYPEKIND *pTypeKind) { ICOM_THIS( TLBTypeInfo, iface); *pTypeKind=This->TypeAttr.typekind; TRACE("(%p) type 0x%0x\n", This,*pTypeKind); return S_OK; } /* ITypeInfo2::GetTypeFlags * * Returns the type flags without any allocations. This returns a DWORD type * flag, which expands the type flags without growing the TYPEATTR (type * attribute). * */ static HRESULT WINAPI ITypeInfo2_fnGetTypeFlags( ITypeInfo * iface, UINT *pTypeFlags) { ICOM_THIS( TLBTypeInfo, iface); *pTypeFlags=This->TypeAttr.wTypeFlags; TRACE("(%p) flags 0x%04x\n", This,*pTypeFlags); return S_OK; } /* ITypeInfo2::GetFuncIndexOfMemId * Binds to a specific member based on a known DISPID, where the member name * is not known (for example, when binding to a default member). * */ static HRESULT WINAPI ITypeInfo2_fnGetFuncIndexOfMemId( ITypeInfo * iface, MEMBERID memid, INVOKEKIND invKind, UINT *pFuncIndex) { ICOM_THIS( TLBTypeInfo, iface); TLBFuncDesc *pFuncInfo; int i; HRESULT result; /* FIXME: should check for invKind??? */ for(i=0, pFuncInfo=This->funclist;pFuncInfo && memid != pFuncInfo->funcdesc.memid; i++, pFuncInfo=pFuncInfo->next); if(pFuncInfo){ *pFuncIndex=i; result= S_OK; }else{ *pFuncIndex=0; result=E_INVALIDARG; } TRACE("(%p) memid 0x%08lx invKind 0x%04x -> %s\n", This, memid, invKind, SUCCEEDED(result)? "SUCCES":"FAILED"); return result; } /* TypeInfo2::GetVarIndexOfMemId * * Binds to a specific member based on a known DISPID, where the member name * is not known (for example, when binding to a default member). * */ static HRESULT WINAPI ITypeInfo2_fnGetVarIndexOfMemId( ITypeInfo * iface, MEMBERID memid, UINT *pVarIndex) { ICOM_THIS( TLBTypeInfo, iface); TLBVarDesc *pVarInfo; int i; HRESULT result; for(i=0, pVarInfo=This->varlist; pVarInfo && memid != pVarInfo->vardesc.memid; i++, pVarInfo=pVarInfo->next) ; if(pVarInfo){ *pVarIndex=i; result= S_OK; }else{ *pVarIndex=0; result=E_INVALIDARG; } TRACE("(%p) memid 0x%08lx -> %s\n", This, memid, SUCCEEDED(result)? "SUCCES":"FAILED"); return result; } /* ITypeInfo2::GetCustData * * Gets the custom data */ static HRESULT WINAPI ITypeInfo2_fnGetCustData( ITypeInfo * iface, REFGUID guid, VARIANT *pVarVal) { ICOM_THIS( TLBTypeInfo, iface); TLBCustData *pCData; for(pCData=This->pCustData; pCData; pCData = pCData->next) if( IsEqualIID(guid, &pCData->guid)) break; if(TRACE_ON(typelib)){ char xriid[50]; WINE_StringFromCLSID((LPCLSID)guid,xriid); TRACE("(%p) guid %s %s found!x)\n", This, xriid, pCData? "" : "NOT"); } if(pCData){ VariantInit( pVarVal); VariantCopy( pVarVal, &pCData->data); return S_OK; } return E_INVALIDARG; /* FIXME: correct? */ } /* ITypeInfo2::GetFuncCustData * * Gets the custom data */ static HRESULT WINAPI ITypeInfo2_fnGetFuncCustData( ITypeInfo * iface, UINT index, REFGUID guid, VARIANT *pVarVal) { ICOM_THIS( TLBTypeInfo, iface); TLBCustData *pCData=NULL; TLBFuncDesc * pFDesc; int i; for(i=0, pFDesc=This->funclist; i!=index && pFDesc; i++, pFDesc=pFDesc->next) ; if(pFDesc) for(pCData=pFDesc->pCustData; pCData; pCData = pCData->next) if( IsEqualIID(guid, &pCData->guid)) break; if(TRACE_ON(typelib)){ char xriid[50]; WINE_StringFromCLSID((LPCLSID)guid,xriid); TRACE("(%p) guid %s %s found!x)\n", This, xriid, pCData? "" : "NOT"); } if(pCData){ VariantInit( pVarVal); VariantCopy( pVarVal, &pCData->data); return S_OK; } return E_INVALIDARG; /* FIXME: correct? */ } /* ITypeInfo2::GetParamCustData * * Gets the custom data */ static HRESULT WINAPI ITypeInfo2_fnGetParamCustData( ITypeInfo * iface, UINT indexFunc, UINT indexParam, REFGUID guid, VARIANT *pVarVal) { ICOM_THIS( TLBTypeInfo, iface); TLBCustData *pCData=NULL; TLBFuncDesc * pFDesc; int i; for(i=0, pFDesc=This->funclist; i!=indexFunc && pFDesc; i++, pFDesc=pFDesc->next) ; if(pFDesc && indexParam >=0 && indexParamfuncdesc.cParams) for(pCData=pFDesc->pParamDesc[indexParam].pCustData; pCData; pCData = pCData->next) if( IsEqualIID(guid, &pCData->guid)) break; if(TRACE_ON(typelib)){ char xriid[50]; WINE_StringFromCLSID((LPCLSID)guid,xriid); TRACE("(%p) guid %s %s found!x)\n", This, xriid, pCData? "" : "NOT"); } if(pCData){ VariantInit( pVarVal); VariantCopy( pVarVal, &pCData->data); return S_OK; } return E_INVALIDARG; /* FIXME: correct? */ } /* ITypeInfo2::GetVarcCustData * * Gets the custom data */ static HRESULT WINAPI ITypeInfo2_fnGetVarCustData( ITypeInfo * iface, UINT index, REFGUID guid, VARIANT *pVarVal) { ICOM_THIS( TLBTypeInfo, iface); TLBCustData *pCData=NULL; TLBVarDesc * pVDesc; int i; for(i=0, pVDesc=This->varlist; i!=index && pVDesc; i++, pVDesc=pVDesc->next) ; if(pVDesc) for(pCData=pVDesc->pCustData; pCData; pCData = pCData->next) if( IsEqualIID(guid, &pCData->guid)) break; if(TRACE_ON(typelib)){ char xriid[50]; WINE_StringFromCLSID((LPCLSID)guid,xriid); TRACE("(%p) guid %s %s found!x)\n", This, xriid, pCData? "" : "NOT"); } if(pCData){ VariantInit( pVarVal); VariantCopy( pVarVal, &pCData->data); return S_OK; } return E_INVALIDARG; /* FIXME: correct? */ } /* ITypeInfo2::GetImplcCustData * * Gets the custom data */ static HRESULT WINAPI ITypeInfo2_fnGetImplTypeCustData( ITypeInfo * iface, UINT index, REFGUID guid, VARIANT *pVarVal) { ICOM_THIS( TLBTypeInfo, iface); TLBCustData *pCData=NULL; TLBRefType * pRDesc; int i; for(i=0, pRDesc=This->impltypelist; i!=index && pRDesc; i++, pRDesc=pRDesc->next) ; if(pRDesc) for(pCData=pRDesc->pCustData; pCData; pCData = pCData->next) if( IsEqualIID(guid, &pCData->guid)) break; if(TRACE_ON(typelib)){ char xriid[50]; WINE_StringFromCLSID((LPCLSID)guid,xriid); TRACE("(%p) guid %s %s found!x)\n", This, xriid, pCData? "" : "NOT"); } if(pCData){ VariantInit( pVarVal); VariantCopy( pVarVal, &pCData->data); return S_OK; } return E_INVALIDARG; /* FIXME: correct? */ } /* ITypeInfo2::GetDocumentation2 * * Retrieves the documentation string, the complete Help file name and path, * the localization context to use, and the context ID for the library Help * topic in the Help file. * */ static HRESULT WINAPI ITypeInfo2_fnGetDocumentation2( ITypeInfo * iface, MEMBERID memid, LCID lcid, BSTR *pbstrHelpString, INT *pdwHelpStringContext, BSTR *pbstrHelpStringDll) { ICOM_THIS( TLBTypeInfo, iface); TLBFuncDesc * pFDesc; TLBVarDesc * pVDesc; TRACE("(%p) memid %ld lcid(0x%lx) HelpString(%p) " "HelpStringContext(%p) HelpStringDll(%p)\n", This, memid, lcid, pbstrHelpString, pdwHelpStringContext, pbstrHelpStringDll ); /* the help string should be obtained from the helpstringdll, * using the _DLLGetDocumentation function, based on the supplied * lcid. Nice to do sometime... */ if(memid==MEMBERID_NIL){ /* documentation for the typeinfo */ if(pbstrHelpString) *pbstrHelpString=TLB_DupAtoBstr(This->Name); if(pdwHelpStringContext) *pdwHelpStringContext=This->dwHelpStringContext; if(pbstrHelpStringDll) *pbstrHelpStringDll= TLB_DupAtoBstr(This->pTypeLib->HelpStringDll);/* FIXME */ return S_OK; }else {/* for a member */ for(pFDesc=This->funclist; pFDesc; pFDesc=pFDesc->next) if(pFDesc->funcdesc.memid==memid){ if(pbstrHelpString) *pbstrHelpString=TLB_DupAtoBstr(pFDesc->HelpString); if(pdwHelpStringContext) *pdwHelpStringContext=pFDesc->HelpStringContext; if(pbstrHelpStringDll) *pbstrHelpStringDll= TLB_DupAtoBstr(This->pTypeLib->HelpStringDll);/* FIXME */ return S_OK; } for(pVDesc=This->varlist; pVDesc; pVDesc=pVDesc->next) if(pVDesc->vardesc.memid==memid){ if(pbstrHelpString) *pbstrHelpString=TLB_DupAtoBstr(pVDesc->HelpString); if(pdwHelpStringContext) *pdwHelpStringContext=pVDesc->HelpStringContext; if(pbstrHelpStringDll) *pbstrHelpStringDll= TLB_DupAtoBstr(This->pTypeLib->HelpStringDll);/* FIXME */ return S_OK; } } return TYPE_E_ELEMENTNOTFOUND; } /* ITypeInfo2::GetAllCustData * * Gets all custom data items for the Type info. * */ static HRESULT WINAPI ITypeInfo2_fnGetAllCustData( ITypeInfo * iface, CUSTDATA *pCustData) { ICOM_THIS( TLBTypeInfo, iface); TLBCustData *pCData; int i; TRACE("(%p) returning %d items\n", This, This->ctCustData); pCustData->prgCustData = TLB_Alloc(This->ctCustData * sizeof(CUSTDATAITEM)); if(pCustData->prgCustData ){ pCustData->cCustData=This->ctCustData; for(i=0, pCData=This->pCustData; pCData; i++, pCData = pCData->next){ pCustData->prgCustData[i].guid=pCData->guid; VariantCopy(& pCustData->prgCustData[i].varValue, & pCData->data); } }else{ ERR(" OUT OF MEMORY! \n"); return E_OUTOFMEMORY; } return S_OK; } /* ITypeInfo2::GetAllFuncCustData * * Gets all custom data items for the specified Function * */ static HRESULT WINAPI ITypeInfo2_fnGetAllFuncCustData( ITypeInfo * iface, UINT index, CUSTDATA *pCustData) { ICOM_THIS( TLBTypeInfo, iface); TLBCustData *pCData; TLBFuncDesc * pFDesc; int i; TRACE("(%p) index %d\n", This, index); for(i=0, pFDesc=This->funclist; i!=index && pFDesc; i++, pFDesc=pFDesc->next) ; if(pFDesc){ pCustData->prgCustData = TLB_Alloc(pFDesc->ctCustData * sizeof(CUSTDATAITEM)); if(pCustData->prgCustData ){ pCustData->cCustData=pFDesc->ctCustData; for(i=0, pCData=pFDesc->pCustData; pCData; i++, pCData = pCData->next){ pCustData->prgCustData[i].guid=pCData->guid; VariantCopy(& pCustData->prgCustData[i].varValue, & pCData->data); } }else{ ERR(" OUT OF MEMORY! \n"); return E_OUTOFMEMORY; } return S_OK; } return TYPE_E_ELEMENTNOTFOUND; } /* ITypeInfo2::GetAllParamCustData * * Gets all custom data items for the Functions * */ static HRESULT WINAPI ITypeInfo2_fnGetAllParamCustData( ITypeInfo * iface, UINT indexFunc, UINT indexParam, CUSTDATA *pCustData) { ICOM_THIS( TLBTypeInfo, iface); TLBCustData *pCData=NULL; TLBFuncDesc * pFDesc; int i; TRACE("(%p) index %d\n", This, indexFunc); for(i=0, pFDesc=This->funclist; i!=indexFunc && pFDesc; i++, pFDesc=pFDesc->next) ; if(pFDesc && indexParam >=0 && indexParamfuncdesc.cParams){ pCustData->prgCustData = TLB_Alloc(pFDesc->pParamDesc[indexParam].ctCustData * sizeof(CUSTDATAITEM)); if(pCustData->prgCustData ){ pCustData->cCustData=pFDesc->pParamDesc[indexParam].ctCustData; for(i=0, pCData=pFDesc->pParamDesc[indexParam].pCustData; pCData; i++, pCData = pCData->next){ pCustData->prgCustData[i].guid=pCData->guid; VariantCopy(& pCustData->prgCustData[i].varValue, & pCData->data); } }else{ ERR(" OUT OF MEMORY! \n"); return E_OUTOFMEMORY; } return S_OK; } return TYPE_E_ELEMENTNOTFOUND; } /* ITypeInfo2::GetAllVarCustData * * Gets all custom data items for the specified Variable * */ static HRESULT WINAPI ITypeInfo2_fnGetAllVarCustData( ITypeInfo * iface, UINT index, CUSTDATA *pCustData) { ICOM_THIS( TLBTypeInfo, iface); TLBCustData *pCData; TLBVarDesc * pVDesc; int i; TRACE("(%p) index %d\n", This, index); for(i=0, pVDesc=This->varlist; i!=index && pVDesc; i++, pVDesc=pVDesc->next) ; if(pVDesc){ pCustData->prgCustData = TLB_Alloc(pVDesc->ctCustData * sizeof(CUSTDATAITEM)); if(pCustData->prgCustData ){ pCustData->cCustData=pVDesc->ctCustData; for(i=0, pCData=pVDesc->pCustData; pCData; i++, pCData = pCData->next){ pCustData->prgCustData[i].guid=pCData->guid; VariantCopy(& pCustData->prgCustData[i].varValue, & pCData->data); } }else{ ERR(" OUT OF MEMORY! \n"); return E_OUTOFMEMORY; } return S_OK; } return TYPE_E_ELEMENTNOTFOUND; } /* ITypeInfo2::GetAllImplCustData * * Gets all custom data items for the specified implementation type * */ static HRESULT WINAPI ITypeInfo2_fnGetAllImplTypeCustData( ITypeInfo * iface, UINT index, CUSTDATA *pCustData) { ICOM_THIS( TLBTypeInfo, iface); TLBCustData *pCData; TLBRefType * pRDesc; int i; TRACE("(%p) index %d\n", This, index); for(i=0, pRDesc=This->impltypelist; i!=index && pRDesc; i++, pRDesc=pRDesc->next) ; if(pRDesc){ pCustData->prgCustData = TLB_Alloc(pRDesc->ctCustData * sizeof(CUSTDATAITEM)); if(pCustData->prgCustData ){ pCustData->cCustData=pRDesc->ctCustData; for(i=0, pCData=pRDesc->pCustData; pCData; i++, pCData = pCData->next){ pCustData->prgCustData[i].guid=pCData->guid; VariantCopy(& pCustData->prgCustData[i].varValue, & pCData->data); } }else{ ERR(" OUT OF MEMORY! \n"); return E_OUTOFMEMORY; } return S_OK; } return TYPE_E_ELEMENTNOTFOUND; } wine-20000526/dlls/oleaut32/typelib.h0100644000175000001440000003333707053314270016671 0ustar julliardusers/* * typelib.h internal wine data structures * used to decode typelib's * * Copyright 1999 Rein KLazes * */ #ifndef _WINE_TYPELIB_H #define _WINE_TYPELIB_H #include "oleauto.h" #define TLBMAGIC2 "MSFT" #define TLBMAGIC1 "SLTG" #define HELPDLLFLAG (0x0100) #define DO_NOT_SEEK (-1) #define HREFTYPE_INTHISFILE(href) (!((href) & 3)) #define HREFTYPE_INDEX(href) ((href) /sizeof(TLBTypeInfoBase)) typedef struct tagTLBCustData { GUID guid; VARIANT data; struct tagTLBCustData* next; } TLBCustData; /* internal Parameter data */ typedef struct tagTLBParDesc{ PCHAR Name; int ctCustData; TLBCustData * pCustData; /* linked list to cust data; */ } TLBParDesc; /* internal Function data */ typedef struct tagTLBFuncDesc{ FUNCDESC funcdesc; /* lots of info on the function and its attributes. */ PCHAR Name; /* the name of this function */ TLBParDesc *pParamDesc; /* array with name and custom data */ int helpcontext; int HelpStringContext; PCHAR HelpString; PCHAR Entry; /* if its Hiword==0, it numeric; -1 is not present*/ int ctCustData; TLBCustData * pCustData; /* linked list to cust data; */ struct tagTLBFuncDesc * next; } TLBFuncDesc; /* internal Variable data */ typedef struct tagTLBVarDesc{ VARDESC vardesc; /* lots of info on the variable and its attributes. */ PCHAR Name; /* the name of this variable */ int HelpContext; int HelpStringContext; /* fixme: where? */ PCHAR HelpString; int ctCustData; TLBCustData * pCustData;/* linked list to cust data; */ struct tagTLBVarDesc * next; } TLBVarDesc; /* data for refernced types in a coclass, or an inherited interface */ typedef struct tagTLBRefType { GUID guid; /* guid of the referenced type */ /* (important if its a imported type) */ HREFTYPE reference; int flags; int ctCustData; TLBCustData * pCustData;/* linked list to custom data; */ struct tagTLBImpLib *pImpTLInfo; struct tagTLBRefType * next; }TLBRefType; /* internal TypeInfo data */ typedef struct tagTYPEINFO { LPTYPEINFO_VTABLE lpvtbl; UINT ref; TYPEATTR TypeAttr ; /* _lots_ of type information. */ struct tagTYPELIB * pTypeLib; /* back pointer to typelib */ int index; /* index in this typelib; */ /* type libs seem to store the doc strings in ascii * so why should we do it in unicode? */ PCHAR Name; PCHAR DocString; unsigned long dwHelpContext; unsigned long dwHelpStringContext; /* functions */ TLBFuncDesc * funclist; /* linked list with function descriptions */ /* variables */ TLBVarDesc * varlist; /* linked list with variable descriptions */ /* Implemented Interfaces */ TLBRefType * impltypelist; int ctCustData; TLBCustData * pCustData; /* linked list to cust data; */ struct tagTYPEINFO * next; } TLBTypeInfo; /* data structure for import typelibs */ typedef struct tagTLBImpLib { int offset; /* offset in the file */ GUID guid; /* libid */ PCHAR name; /* name; */ struct tagTYPELIB *pImpTypeLib; /* pointer to loaded typelib */ struct tagTLBImpLib * next; } TLBImpLib; /* internal TypeLib data */ typedef struct tagTYPELIB { LPTYPELIB_VTABLE lpvtbl; UINT ref; TLIBATTR LibAttr; /* guid,lcid,syskind,version,flags */ /* type libs seem to store the doc strings in ascii * so why should we do it in unicode? */ PCHAR Name; PCHAR DocString; PCHAR HelpFile; PCHAR HelpStringDll; unsigned long dwHelpContext; int TypeInfoCount; /* nr of typeinfo's in librarry */ TLBTypeInfo *pTypeInfo; /* linked list of type info data */ int ctCustData; /* number of items in cust data list */ TLBCustData * pCustData; /* linked list to cust data; */ TLBImpLib * pImpLibs; /* linked list to all imported typelibs */ TYPEDESC * pTypeDesc; /* array of TypeDescriptions found in the libary */ } TLBLibInfo; /*-------------------------FILE STRUCTURES-----------------------------------*/ /* * structure of the typelib type2 header * it is at the beginning of a type lib file * */ typedef struct tagTLB2Header { /*0x00*/INT magic1; /* 0x5446534D "MSFT" */ INT magic2; /* 0x00010002 version nr? */ INT posguid; /* position of libid in guid table */ /* (should be, else -1) */ INT lcid; /* locale id */ /*0x10*/INT lcid2; INT varflags; /* (largely) unknown flags ,seems to be always 41 */ /* becomes 0x51 with a helpfile defined */ /* if help dll defined its 0x151 */ /* update : the lower nibble is syskind */ INT version; /* set with SetVersion() */ INT flags; /* set with SetFlags() */ /*0x20*/INT nrtypeinfos; /* number of typeinfo's (till so far) */ INT helpstring; /* position of help string in stringtable */ INT helpstringcontext; INT helpcontext; /*0x30*/INT nametablecount; /* number of names in name table */ INT nametablechars; /* nr of characters in name table */ INT NameOffset; /* offset of name in name table */ INT helpfile; /* position of helpfile in stringtable */ /*0x40*/INT CustomDataOffset; /* if -1 no custom data, else it is offset */ /* in customer data/guid offset table */ INT res44; /* unknown always: 0x20 */ INT res48; /* unknown always: 0x80 */ INT dispatchpos; /* gets a value (1+n*0x0c) with Idispatch interfaces */ /*0x50*/INT res50; /* is zero becomes one when an interface is derived */ } TLB2Header; /* segments in the type lib file have a structure like this: */ typedef struct _tptag { INT offset; /* absolute offset in file */ INT length; /* length of segment */ INT res08; /* unknown always -1 */ INT res0c; /* unknown always 0x0f in the header */ /* 0x03 in the typeinfo_data */ } pSeg; /* layout of the main segment directory */ typedef struct tagTLBSegDir { /*1*/pSeg pTypeInfoTab; /* each type info get an entry of 0x64 bytes */ /* (25 ints) */ /*2*/pSeg pImpInfo; /* table with info for imported types */ /*3*/pSeg pImpFiles; /* import libaries */ /*4*/pSeg pRefTab; /* References table */ /*5*/pSeg pLibtab; /* always exists, alway same size (0x80) */ /* hash table w offsets to guid????? */ /*6*/pSeg pGuidTab; /* all guids are stored here together with */ /* offset in some table???? */ /*7*/pSeg res07; /* always created, alway same size (0x200) */ /* purpose largely unknown */ /*8*/pSeg pNametab; /* name tables */ /*9*/pSeg pStringtab; /*string table */ /*A*/pSeg pTypdescTab; /* table with type descriptors */ /*B*/pSeg pArrayDescriptions; /*C*/pSeg pCustData; /* data table, used for custom data and default */ /* parameter values */ /*D*/pSeg pCDGuids; /* table with offsets for the guids and into the customer data table */ /*E*/pSeg res0e; /* unknown */ /*F*/pSeg res0f; /* unknown */ } TLBSegDir; /* base type info data */ typedef struct tagTLBTypeInfoBase { /*000*/ INT typekind; /* it is the TKIND_xxx */ /* some byte alignment stuf */ INT memoffset; /* points past the file, if no elements */ INT res2; /* zero if no element, N*0x40 */ INT res3; /* -1 if no lement, (N-1)*0x38 */ /*010*/ INT res4; /* always? 3 */ INT res5; /* always? zero */ INT cElement; /* counts elements, HI=cVars, LO=cFuncs */ INT res7; /* always? zero */ /*020*/ INT res8; /* always? zero */ INT res9; /* always? zero */ INT resA; /* always? zero */ INT posguid; /* position in guid table */ /*030*/ INT flags; /* Typeflags */ INT NameOffset; /* offset in name table */ INT version; /* element version */ INT docstringoffs; /* offset of docstring in string tab */ /*040*/ INT helpstringcontext; /* */ INT helpcontext; /* */ INT oCustData; /* offset in customer data table */ INT16 cImplTypes; /* nr of implemented interfaces */ INT16 cbSizeVft; /* virtual table size, not including inherits */ /*050*/ INT size; /* size in bytes, at least for structures */ /* fixme: name of this field */ INT datatype1; /* position in type description table */ /* or in base intefaces */ /* if coclass: offset in reftable */ /* if interface: reference to inherited if */ INT datatype2; /* if 0x8000, entry above is valid */ /* actually dunno */ /* else it is zero? */ INT res18; /* always? 0 */ /*060*/ INT res19; /* always? -1 */ } TLBTypeInfoBase; /* layout of an entry with information on imported types */ typedef struct tagTLBImpInfo { INT res0; /* unknown */ INT oImpFile; /* offset inthe Import File table */ INT oGuid; /* offset in Guid table */ } TLBImpInfo; /* function description data */ typedef struct { /* INT recsize; record size including some xtra stuff */ INT DataType; /* data type of the memeber, eg return of function */ INT Flags; /* something to do with attribute flags (LOWORD) */ INT16 VtableOffset; /* offset in vtable */ INT16 res3; /* some offset into dunno what */ INT FKCCIC; /* bit string with the following */ /* meaning (bit 0 is the msb): */ /* bit 2 indicates that oEntry is numeric */ /* bit 3 that parameter has default values */ /* calling convention (bits 4-7 ) */ /* bit 8 indicates that custom data is present */ /* Invokation kind (bits 9-12 ) */ /* function kind (eg virtual), bits 13-15 */ INT16 nrargs; /* number of arguments (including optional ????) */ INT16 nroargs; /* nr of optional arguments */ /* optional attribute fields, the number of them is variable */ INT OptAttr[1]; /* 0* INT helpcontext; 1* INT oHelpString; 2* INT oEntry; // either offset in string table or numeric as it is // 3* INT res9; // unknown (-1) // 4* INT resA; // unknown (-1) // 5* INT HelpStringContext; // these are controlled by a bit set in the FKCCIC field // 6* INT oCustData; // custom data for function // 7* INT oArgCustData[1]; // custom data per argument // */ } TLBFuncRecord; /* after this may follow an array with default value pointers if the * appropriate bit in the FKCCIC field has been set: * INT oDefautlValue[nrargs]; */ /* Parameter info one per argument*/ typedef struct { INT DataType; INT oName; INT Flags; } TLBParameterInfo; /* Variable description data */ typedef struct { /* INT recsize; // record size including some xtra stuff */ INT DataType; /* data type of the variable */ INT Flags; /* VarFlags (LOWORD) */ INT16 VarKind; /* VarKind */ INT16 res3; /* some offset into dunno what */ INT OffsValue; /* value of the variable or the offset */ /* in the data structure */ /* optional attribute fields, the number of them is variable */ /* controlled by record length */ INT HelpContext; INT oHelpString; INT res9; /* unknown (-1) */ INT oCustData; /* custom data for variable */ INT HelpStringContext; } TLBVarRecord; /* Structure of the reference data */ typedef struct { INT reftype; /* either offset in type info table, then its */ /* a multiple of 64 */ /* or offset in the external reference table */ /* with an offset of 1 */ INT flags; INT oCustData; /* custom data */ INT onext; /* next offset, -1 if last */ } TLBRefRecord; /* this is how a guid is stored */ typedef struct { GUID guid; INT unk10; /* differntiate with libid, classid etc? */ /* its -2 for a libary */ /* it's 0 for an interface */ INT unk14; /* always? -1 */ } TLBGuidEntry; /* some data preceding entries in the name table */ typedef struct { INT unk00; /* sometimes -1 (lib, parameter) , sometimes 0 (interface, func) */ INT unk10; /* sometimes -1 (lib) , sometimes 0 (interface, func), sometime 0x10 (par) */ INT namelen; /* only lower 8 bits are valid */ } TLBNameIntro; /* the custom data table directory has enties like this */ typedef struct { INT GuidOffset; INT DataOffset; INT next; /* next offset in the table, -1 if its the last */ } TLBCDGuid; /*---------------------------END--------------------------------------------*/ #endif wine-20000526/dlls/oleaut32/typelib.spec0100644000175000001440000000104707022575330017367 0ustar julliardusersname typelib type win16 2 stub CREATETYPELIB 3 pascal LoadTypeLib(ptr ptr) LoadTypeLib16 4 stub LHASHVALOFNAMESYS 5 stub _IID_ICREATETYPEINFO 6 stub _IID_ICREATETYPELIB 7 stub _IID_ITYPECOMP 8 stub _IID_ITYPEINFO 9 stub _IID_ITYPELIB 10 stub REGISTERTYPELIB 11 stub LOADREGTYPELIB 14 pascal QueryPathOfRegTypeLib(ptr word word word ptr) QueryPathOfRegTypeLib16 15 pascal OaBuildVersion() OaBuildVersion16 wine-20000526/dlls/oleaut32/variant.c0100644000175000001440000031654207070212245016660 0ustar julliardusers/* * VARIANT * * Copyright 1998 Jean-Claude Cote * * NOTES * This implements the low-level and hi-level APIs for manipulating VARIANTs. * The low-level APIs are used to do data coercion between different data types. * The hi-level APIs are built on top of these low-level APIs and handle * initialization, copying, destroying and changing the type of VARIANTs. * * TODO: * - The Variant APIs do not support international languages, currency * types, number formating and calendar. They only support U.S. English format. * - The Variant APIs do not the following types: IUknown, IDispatch, DECIMAL and SafeArray. * The prototypes for these are commented out in the oleauto.h file. They need * to be implemented and cases need to be added to the switches of the existing APIs. * - The parsing of date for the VarDateFromStr is not complete. * - The date manipulations do not support date prior to 1900. * - The parsing does not accept has many formats has the Windows implementation. */ #include "config.h" #include #include #include #include #include #ifdef HAVE_FLOAT_H # include #endif #include "windef.h" #include "oleauto.h" #include "heap.h" #include "debugtools.h" #include "winerror.h" #include "parsedt.h" DEFAULT_DEBUG_CHANNEL(ole); #ifndef FLT_MAX # ifdef MAXFLOAT # define FLT_MAX MAXFLOAT # else # error "Can't find #define for MAXFLOAT/FLT_MAX" # endif #endif #undef CHAR_MAX #undef CHAR_MIN static const char CHAR_MAX = 127; static const char CHAR_MIN = -128; static const BYTE UI1_MAX = 255; static const BYTE UI1_MIN = 0; static const unsigned short UI2_MAX = 65535; static const unsigned short UI2_MIN = 0; static const short I2_MAX = 32767; static const short I2_MIN = -32768; static const unsigned long UI4_MAX = 4294967295U; static const unsigned long UI4_MIN = 0; static const long I4_MAX = 2147483647; static const long I4_MIN = -(2147483648U); static const DATE DATE_MIN = -657434; static const DATE DATE_MAX = 2958465; /* This mask is used to set a flag in wReserved1 of * the VARIANTARG structure. The flag indicates if * the API function is using an inner variant or not. */ #define PROCESSING_INNER_VARIANT 0x0001 /* General use buffer. */ #define BUFFER_MAX 1024 static char pBuffer[BUFFER_MAX]; /* * Note a leap year is one that is a multiple of 4 * but not of a 100. Except if it is a multiple of * 400 then it is a leap year. */ /* According to postgeSQL date parsing functions there is * a leap year when this expression is true. * (((y % 4) == 0) && (((y % 100) != 0) || ((y % 400) == 0))) * So according to this there is 365.2515 days in one year. * One + every four years: 1/4 -> 365.25 * One - every 100 years: 1/100 -> 365.01 * One + every 400 years: 1/400 -> 365.0025 */ /* static const double DAYS_IN_ONE_YEAR = 365.2515; * * ^^ Might this be the key to an easy way to factor large prime numbers? * Let's try using arithmetic. 7 Mar 2000 */ static const double DAYS_IN_ONE_YEAR = 365.2425; /****************************************************************************** * DateTimeStringToTm [INTERNAL] * * Converts a string representation of a date and/or time to a tm structure. * * Note this function uses the postgresql date parsing functions found * in the parsedt.c file. * * Returns TRUE if successfull. * * Note: This function does not parse the day of the week, * daylight savings time. It will only fill the followin fields in * the tm struct, tm_sec, tm_min, tm_hour, tm_year, tm_day, tm_mon. * ******************************************************************************/ static BOOL DateTimeStringToTm( OLECHAR* strIn, LCID lcid, struct tm* pTm ) { BOOL res = FALSE; double fsec; int tzp; int dtype; int nf; char *field[MAXDATEFIELDS]; int ftype[MAXDATEFIELDS]; char lowstr[MAXDATELEN + 1]; char* strDateTime = NULL; /* Convert the string to ASCII since this is the only format * postgesql can handle. */ strDateTime = HEAP_strdupWtoA( GetProcessHeap(), 0, strIn ); if( strDateTime != NULL ) { /* Make sure we don't go over the maximum length * accepted by postgesql. */ if( strlen( strDateTime ) <= MAXDATELEN ) { if( ParseDateTime( strDateTime, lowstr, field, ftype, MAXDATEFIELDS, &nf) == 0 ) { if( lcid & VAR_DATEVALUEONLY ) { /* Get the date information. * It returns 0 if date information was * present and 1 if only time information was present. * -1 if an error occures. */ if( DecodeDateTime(field, ftype, nf, &dtype, pTm, &fsec, &tzp) == 0 ) { /* Eliminate the time information since we * were asked to get date information only. */ pTm->tm_sec = 0; pTm->tm_min = 0; pTm->tm_hour = 0; res = TRUE; } } if( lcid & VAR_TIMEVALUEONLY ) { /* Get time information only. */ if( DecodeTimeOnly(field, ftype, nf, &dtype, pTm, &fsec) == 0 ) { res = TRUE; } } else { /* Get both date and time information. * It returns 0 if date information was * present and 1 if only time information was present. * -1 if an error occures. */ if( DecodeDateTime(field, ftype, nf, &dtype, pTm, &fsec, &tzp) != -1 ) { res = TRUE; } } } } HeapFree( GetProcessHeap(), 0, strDateTime ); } return res; } /****************************************************************************** * TmToDATE [INTERNAL] * * The date is implemented using an 8 byte floating-point number. * Days are represented by whole numbers increments starting with 0.00 has * being December 30 1899, midnight. * The hours are expressed as the fractional part of the number. * December 30 1899 at midnight = 0.00 * January 1 1900 at midnight = 2.00 * January 4 1900 at 6 AM = 5.25 * January 4 1900 at noon = 5.50 * December 29 1899 at midnight = -1.00 * December 18 1899 at midnight = -12.00 * December 18 1899 at 6AM = -12.25 * December 18 1899 at 6PM = -12.75 * December 19 1899 at midnight = -11.00 * The tm structure is as follows: * struct tm { * int tm_sec; seconds after the minute - [0,59] * int tm_min; minutes after the hour - [0,59] * int tm_hour; hours since midnight - [0,23] * int tm_mday; day of the month - [1,31] * int tm_mon; months since January - [0,11] * int tm_year; years * int tm_wday; days since Sunday - [0,6] * int tm_yday; days since January 1 - [0,365] * int tm_isdst; daylight savings time flag * }; * * Note: This function does not use the tm_wday, tm_yday, tm_wday, * and tm_isdst fields of the tm structure. And only converts years * after 1900. * * Returns TRUE if successfull. */ static BOOL TmToDATE( struct tm* pTm, DATE *pDateOut ) { if( (pTm->tm_year - 1900) >= 0 ) { int leapYear = 0; /* Start at 1. This is the way DATE is defined. * January 1, 1900 at Midnight is 1.00. * January 1, 1900 at 6AM is 1.25. * and so on. */ *pDateOut = 1; /* Add the number of days corresponding to * tm_year. */ *pDateOut += (pTm->tm_year - 1900) * 365; /* Add the leap days in the previous years between now and 1900. * Note a leap year is one that is a multiple of 4 * but not of a 100. Except if it is a multiple of * 400 then it is a leap year. */ *pDateOut += ( (pTm->tm_year - 1) / 4 ) - ( 1900 / 4 ); *pDateOut -= ( (pTm->tm_year - 1) / 100 ) - ( 1900 / 100 ); *pDateOut += ( (pTm->tm_year - 1) / 400 ) - ( 1900 / 400 ); /* Set the leap year flag if the * current year specified by tm_year is a * leap year. This will be used to add a day * to the day count. */ if( isleap( pTm->tm_year ) ) leapYear = 1; /* Add the number of days corresponding to * the month. */ switch( pTm->tm_mon ) { case 2: *pDateOut += 31; break; case 3: *pDateOut += ( 59 + leapYear ); break; case 4: *pDateOut += ( 90 + leapYear ); break; case 5: *pDateOut += ( 120 + leapYear ); break; case 6: *pDateOut += ( 151 + leapYear ); break; case 7: *pDateOut += ( 181 + leapYear ); break; case 8: *pDateOut += ( 212 + leapYear ); break; case 9: *pDateOut += ( 243 + leapYear ); break; case 10: *pDateOut += ( 273 + leapYear ); break; case 11: *pDateOut += ( 304 + leapYear ); break; case 12: *pDateOut += ( 334 + leapYear ); break; } /* Add the number of days in this month. */ *pDateOut += pTm->tm_mday; /* Add the number of seconds, minutes, and hours * to the DATE. Note these are the fracionnal part * of the DATE so seconds / number of seconds in a day. */ *pDateOut += pTm->tm_hour / 24.0; *pDateOut += pTm->tm_min / 1440.0; *pDateOut += pTm->tm_sec / 86400.0; return TRUE; } return FALSE; } /****************************************************************************** * DateToTm [INTERNAL] * * This function converst a windows DATE to a tm structure. * * It does not fill all the fields of the tm structure. * Here is a list of the fields that are filled: * tm_sec, tm_min, tm_hour, tm_year, tm_day, tm_mon. * * Note this function does not support dates before the January 1, 1900 * or ( dateIn < 2.0 ). * * Returns TRUE if successfull. */ static BOOL DateToTm( DATE dateIn, LCID lcid, struct tm* pTm ) { /* Do not process dates smaller than January 1, 1900. * Which corresponds to 2.0 in the windows DATE format. */ if( dateIn >= 2.0 ) { double decimalPart = 0.0; double wholePart = 0.0; memset(pTm,0,sizeof(*pTm)); /* Because of the nature of DATE format witch * associates 2.0 to January 1, 1900. We will * remove 1.0 from the whole part of the DATE * so that in the following code 1.0 * will correspond to January 1, 1900. * This simplyfies the processing of the DATE value. */ dateIn -= 1.0; wholePart = (double) floor( dateIn ); decimalPart = fmod( dateIn, wholePart ); if( !(lcid & VAR_TIMEVALUEONLY) ) { int nDay = 0; int leapYear = 0; double yearsSince1900 = 0; /* Start at 1900, this where the DATE time 0.0 starts. */ pTm->tm_year = 1900; /* find in what year the day in the "wholePart" falls into. * add the value to the year field. */ yearsSince1900 = floor( (wholePart / DAYS_IN_ONE_YEAR) + 0.001 ); pTm->tm_year += yearsSince1900; /* determine if this is a leap year. */ if( isleap( pTm->tm_year ) ) { leapYear = 1; wholePart++; } /* find what day of that year does the "wholePart" corresponds to. * Note: nDay is in [1-366] format */ nDay = (int) ( wholePart - floor( yearsSince1900 * DAYS_IN_ONE_YEAR ) ); /* Set the tm_yday value. * Note: The day is must be converted from [1-366] to [0-365] */ /*pTm->tm_yday = nDay - 1;*/ /* find which mount this day corresponds to. */ if( nDay <= 31 ) { pTm->tm_mday = nDay; pTm->tm_mon = 0; } else if( nDay <= ( 59 + leapYear ) ) { pTm->tm_mday = nDay - 31; pTm->tm_mon = 1; } else if( nDay <= ( 90 + leapYear ) ) { pTm->tm_mday = nDay - ( 59 + leapYear ); pTm->tm_mon = 2; } else if( nDay <= ( 120 + leapYear ) ) { pTm->tm_mday = nDay - ( 90 + leapYear ); pTm->tm_mon = 3; } else if( nDay <= ( 151 + leapYear ) ) { pTm->tm_mday = nDay - ( 120 + leapYear ); pTm->tm_mon = 4; } else if( nDay <= ( 181 + leapYear ) ) { pTm->tm_mday = nDay - ( 151 + leapYear ); pTm->tm_mon = 5; } else if( nDay <= ( 212 + leapYear ) ) { pTm->tm_mday = nDay - ( 181 + leapYear ); pTm->tm_mon = 6; } else if( nDay <= ( 243 + leapYear ) ) { pTm->tm_mday = nDay - ( 212 + leapYear ); pTm->tm_mon = 7; } else if( nDay <= ( 273 + leapYear ) ) { pTm->tm_mday = nDay - ( 243 + leapYear ); pTm->tm_mon = 8; } else if( nDay <= ( 304 + leapYear ) ) { pTm->tm_mday = nDay - ( 273 + leapYear ); pTm->tm_mon = 9; } else if( nDay <= ( 334 + leapYear ) ) { pTm->tm_mday = nDay - ( 304 + leapYear ); pTm->tm_mon = 10; } else if( nDay <= ( 365 + leapYear ) ) { pTm->tm_mday = nDay - ( 334 + leapYear ); pTm->tm_mon = 11; } } if( !(lcid & VAR_DATEVALUEONLY) ) { /* find the number of seconds in this day. * fractional part times, hours, minutes, seconds. */ pTm->tm_hour = (int) ( decimalPart * 24 ); pTm->tm_min = (int) ( ( ( decimalPart * 24 ) - pTm->tm_hour ) * 60 ); pTm->tm_sec = (int) ( ( ( decimalPart * 24 * 60 ) - ( pTm->tm_hour * 60 ) - pTm->tm_min ) * 60 ); } return TRUE; } return FALSE; } /****************************************************************************** * SizeOfVariantData [INTERNAL] * * This function finds the size of the data referenced by a Variant based * the type "vt" of the Variant. */ static int SizeOfVariantData( VARIANT* parg ) { int size = 0; switch( parg->vt & VT_TYPEMASK ) { case( VT_I2 ): size = sizeof(short); break; case( VT_INT ): size = sizeof(int); break; case( VT_I4 ): size = sizeof(long); break; case( VT_UI1 ): size = sizeof(BYTE); break; case( VT_UI2 ): size = sizeof(unsigned short); break; case( VT_UINT ): size = sizeof(unsigned int); break; case( VT_UI4 ): size = sizeof(unsigned long); break; case( VT_R4 ): size = sizeof(float); break; case( VT_R8 ): size = sizeof(double); break; case( VT_DATE ): size = sizeof(DATE); break; case( VT_BOOL ): size = sizeof(VARIANT_BOOL); break; case( VT_BSTR ): size = sizeof(void*); break; case( VT_CY ): case( VT_DISPATCH ): case( VT_UNKNOWN ): case( VT_DECIMAL ): default: FIXME("Add size information for type vt=%d\n", parg->vt & VT_TYPEMASK ); break; } return size; } /****************************************************************************** * StringDupAtoBstr [INTERNAL] * */ static BSTR StringDupAtoBstr( char* strIn ) { BSTR bstr = NULL; OLECHAR* pNewString = NULL; pNewString = HEAP_strdupAtoW( GetProcessHeap(), 0, strIn ); bstr = SysAllocString( pNewString ); HeapFree( GetProcessHeap(), 0, pNewString ); return bstr; } /****************************************************************************** * round [INTERNAL] * * Round the double value to the nearest integer value. */ static double round( double d ) { double decimals = 0.0, integerValue = 0.0, roundedValue = 0.0; BOOL bEvenNumber = FALSE; int nSign = 0; /* Save the sign of the number */ nSign = (d >= 0.0) ? 1 : -1; d = fabs( d ); /* Remove the decimals. */ integerValue = floor( d ); /* Set the Even flag. This is used to round the number when * the decimals are exactly 1/2. If the integer part is * odd the number is rounded up. If the integer part * is even the number is rounded down. Using this method * numbers are rounded up|down half the time. */ bEvenNumber = (((short)fmod(integerValue, 2)) == 0) ? TRUE : FALSE; /* Remove the integral part of the number. */ decimals = d - integerValue; /* Note: Ceil returns the smallest integer that is greater that x. * and floor returns the largest integer that is less than or equal to x. */ if( decimals > 0.5 ) { /* If the decimal part is greater than 1/2 */ roundedValue = ceil( d ); } else if( decimals < 0.5 ) { /* If the decimal part is smaller than 1/2 */ roundedValue = floor( d ); } else { /* the decimals are exactly 1/2 so round according to * the bEvenNumber flag. */ if( bEvenNumber ) { roundedValue = floor( d ); } else { roundedValue = ceil( d ); } } return roundedValue * nSign; } /****************************************************************************** * RemoveCharacterFromString [INTERNAL] * * Removes any of the characters in "strOfCharToRemove" from the "str" argument. */ static void RemoveCharacterFromString( LPSTR str, LPSTR strOfCharToRemove ) { LPSTR pNewString = NULL; LPSTR strToken = NULL; /* Check if we have a valid argument */ if( str != NULL ) { pNewString = strdup( str ); str[0] = '\0'; strToken = strtok( pNewString, strOfCharToRemove ); while( strToken != NULL ) { strcat( str, strToken ); strToken = strtok( NULL, strOfCharToRemove ); } free( pNewString ); } return; } /****************************************************************************** * GetValidRealString [INTERNAL] * * Checks if the string is of proper format to be converted to a real value. */ static BOOL IsValidRealString( LPSTR strRealString ) { /* Real values that have a decimal point are required to either have * digits before or after the decimal point. We will assume that * we do not have any digits at either position. If we do encounter * some we will disable this flag. */ BOOL bDigitsRequired = TRUE; /* Processed fields in the string representation of the real number. */ BOOL bWhiteSpaceProcessed = FALSE; BOOL bFirstSignProcessed = FALSE; BOOL bFirstDigitsProcessed = FALSE; BOOL bDecimalPointProcessed = FALSE; BOOL bSecondDigitsProcessed = FALSE; BOOL bExponentProcessed = FALSE; BOOL bSecondSignProcessed = FALSE; BOOL bThirdDigitsProcessed = FALSE; /* Assume string parameter "strRealString" is valid and try to disprove it. */ BOOL bValidRealString = TRUE; /* Used to count the number of tokens in the "strRealString". */ LPSTR strToken = NULL; int nTokens = 0; LPSTR pChar = NULL; /* Check if we have a valid argument */ if( strRealString == NULL ) { bValidRealString = FALSE; } if( bValidRealString == TRUE ) { /* Make sure we only have ONE token in the string. */ strToken = strtok( strRealString, " " ); while( strToken != NULL ) { nTokens++; strToken = strtok( NULL, " " ); } if( nTokens != 1 ) { bValidRealString = FALSE; } } /* Make sure this token contains only valid characters. * The string argument to atof has the following form: * [whitespace] [sign] [digits] [.digits] [ {d | D | e | E }[sign]digits] * Whitespace consists of space and|or characters, which are ignored. * Sign is either plus '+' or minus '-'. * Digits are one or more decimal digits. * Note: If no digits appear before the decimal point, at least one must * appear after the decimal point. * The decimal digits may be followed by an exponent. * An Exponent consists of an introductory letter ( D, d, E, or e) and * an optionally signed decimal integer. */ pChar = strRealString; while( bValidRealString == TRUE && *pChar != '\0' ) { switch( *pChar ) { /* If whitespace... */ case ' ': case '\t': if( bWhiteSpaceProcessed || bFirstSignProcessed || bFirstDigitsProcessed || bDecimalPointProcessed || bSecondDigitsProcessed || bExponentProcessed || bSecondSignProcessed || bThirdDigitsProcessed ) { bValidRealString = FALSE; } break; /* If sign... */ case '+': case '-': if( bFirstSignProcessed == FALSE ) { if( bFirstDigitsProcessed || bDecimalPointProcessed || bSecondDigitsProcessed || bExponentProcessed || bSecondSignProcessed || bThirdDigitsProcessed ) { bValidRealString = FALSE; } bWhiteSpaceProcessed = TRUE; bFirstSignProcessed = TRUE; } else if( bSecondSignProcessed == FALSE ) { /* Note: The exponent must be present in * order to accept the second sign... */ if( bExponentProcessed == FALSE || bThirdDigitsProcessed || bDigitsRequired ) { bValidRealString = FALSE; } bFirstSignProcessed = TRUE; bWhiteSpaceProcessed = TRUE; bFirstDigitsProcessed = TRUE; bDecimalPointProcessed = TRUE; bSecondDigitsProcessed = TRUE; bSecondSignProcessed = TRUE; } break; /* If decimals... */ case '0': case '1': case '2': case '3': case '4': case '5': case '6': case '7': case '8': case '9': if( bFirstDigitsProcessed == FALSE ) { if( bDecimalPointProcessed || bSecondDigitsProcessed || bExponentProcessed || bSecondSignProcessed || bThirdDigitsProcessed ) { bValidRealString = FALSE; } bFirstSignProcessed = TRUE; bWhiteSpaceProcessed = TRUE; /* We have found some digits before the decimal point * so disable the "Digits required" flag. */ bDigitsRequired = FALSE; } else if( bSecondDigitsProcessed == FALSE ) { if( bExponentProcessed || bSecondSignProcessed || bThirdDigitsProcessed ) { bValidRealString = FALSE; } bFirstSignProcessed = TRUE; bWhiteSpaceProcessed = TRUE; bFirstDigitsProcessed = TRUE; bDecimalPointProcessed = TRUE; /* We have found some digits after the decimal point * so disable the "Digits required" flag. */ bDigitsRequired = FALSE; } else if( bThirdDigitsProcessed == FALSE ) { /* Getting here means everything else should be processed. * If we get anything else than a decimal following this * digit it will be flagged by the other cases, so * we do not really need to do anything in here. */ } break; /* If DecimalPoint... */ case '.': if( bDecimalPointProcessed || bSecondDigitsProcessed || bExponentProcessed || bSecondSignProcessed || bThirdDigitsProcessed ) { bValidRealString = FALSE; } bFirstSignProcessed = TRUE; bWhiteSpaceProcessed = TRUE; bFirstDigitsProcessed = TRUE; bDecimalPointProcessed = TRUE; break; /* If Exponent... */ case 'e': case 'E': case 'd': case 'D': if( bExponentProcessed || bSecondSignProcessed || bThirdDigitsProcessed || bDigitsRequired ) { bValidRealString = FALSE; } bFirstSignProcessed = TRUE; bWhiteSpaceProcessed = TRUE; bFirstDigitsProcessed = TRUE; bDecimalPointProcessed = TRUE; bSecondDigitsProcessed = TRUE; bExponentProcessed = TRUE; break; default: bValidRealString = FALSE; break; } /* Process next character. */ pChar++; } /* If the required digits were not present we have an invalid * string representation of a real number. */ if( bDigitsRequired == TRUE ) { bValidRealString = FALSE; } return bValidRealString; } /****************************************************************************** * Coerce [INTERNAL] * * This function dispatches execution to the proper conversion API * to do the necessary coercion. */ static HRESULT Coerce( VARIANTARG* pd, LCID lcid, ULONG dwFlags, VARIANTARG* ps, VARTYPE vt ) { HRESULT res = S_OK; unsigned short vtFrom = 0; vtFrom = ps->vt & VT_TYPEMASK; /* Note: Since "long" and "int" values both have 4 bytes and are * both signed integers "int" will be treated as "long" in the * following code. * The same goes for their unsigned versions. */ /* Trivial Case: If the coercion is from two types that are * identical then we can blindly copy from one argument to another.*/ if ((vt==vtFrom)) { return VariantCopy(pd,ps); } /* Cases requiring thought*/ switch( vt ) { case( VT_EMPTY ): res = VariantClear( pd ); break; case( VT_NULL ): res = VariantClear( pd ); if( res == S_OK ) { pd->vt = VT_NULL; } break; case( VT_I1 ): switch( vtFrom ) { case( VT_I1 ): res = VariantCopy( pd, ps ); break; case( VT_I2 ): res = VarI1FromI2( ps->u.iVal, &(pd->u.cVal) ); break; case( VT_INT ): case( VT_I4 ): res = VarI1FromI4( ps->u.lVal, &(pd->u.cVal) ); break; case( VT_UI1 ): res = VarI1FromUI1( ps->u.bVal, &(pd->u.cVal) ); break; case( VT_UI2 ): res = VarI1FromUI2( ps->u.uiVal, &(pd->u.cVal) ); break; case( VT_UINT ): case( VT_UI4 ): res = VarI1FromUI4( ps->u.ulVal, &(pd->u.cVal) ); break; case( VT_R4 ): res = VarI1FromR4( ps->u.fltVal, &(pd->u.cVal) ); break; case( VT_R8 ): res = VarI1FromR8( ps->u.dblVal, &(pd->u.cVal) ); break; case( VT_DATE ): res = VarI1FromDate( ps->u.date, &(pd->u.cVal) ); break; case( VT_BOOL ): res = VarI1FromBool( ps->u.boolVal, &(pd->u.cVal) ); break; case( VT_BSTR ): res = VarI1FromStr( ps->u.bstrVal, lcid, dwFlags, &(pd->u.cVal) ); break; case( VT_CY ): res = VarI1FromCy( ps->u.cyVal, &(pd->u.cVal) ); case( VT_DISPATCH ): /*res = VarI1FromDisp32( ps->u.pdispVal, lcid, &(pd->u.cVal) );*/ case( VT_UNKNOWN ): /*res = VarI1From32( ps->u.lVal, &(pd->u.cVal) );*/ case( VT_DECIMAL ): /*res = VarI1FromDec32( ps->u.decVal, &(pd->u.cVal) );*/ default: res = DISP_E_TYPEMISMATCH; FIXME("Coercion from %d to %d\n", vtFrom, vt ); break; } break; case( VT_I2 ): switch( vtFrom ) { case( VT_I1 ): res = VarI2FromI1( ps->u.cVal, &(pd->u.iVal) ); break; case( VT_I2 ): res = VariantCopy( pd, ps ); break; case( VT_INT ): case( VT_I4 ): res = VarI2FromI4( ps->u.lVal, &(pd->u.iVal) ); break; case( VT_UI1 ): res = VarI2FromUI1( ps->u.bVal, &(pd->u.iVal) ); break; case( VT_UI2 ): res = VarI2FromUI2( ps->u.uiVal, &(pd->u.iVal) ); break; case( VT_UINT ): case( VT_UI4 ): res = VarI2FromUI4( ps->u.ulVal, &(pd->u.iVal) ); break; case( VT_R4 ): res = VarI2FromR4( ps->u.fltVal, &(pd->u.iVal) ); break; case( VT_R8 ): res = VarI2FromR8( ps->u.dblVal, &(pd->u.iVal) ); break; case( VT_DATE ): res = VarI2FromDate( ps->u.date, &(pd->u.iVal) ); break; case( VT_BOOL ): res = VarI2FromBool( ps->u.boolVal, &(pd->u.iVal) ); break; case( VT_BSTR ): res = VarI2FromStr( ps->u.bstrVal, lcid, dwFlags, &(pd->u.iVal) ); break; case( VT_CY ): res = VarI2FromCy( ps->u.cyVal, &(pd->u.iVal) ); case( VT_DISPATCH ): /*res = VarI2FromDisp32( ps->u.pdispVal, lcid, &(pd->u.iVal) );*/ case( VT_UNKNOWN ): /*res = VarI2From32( ps->u.lVal, &(pd->u.iVal) );*/ case( VT_DECIMAL ): /*res = VarI2FromDec32( ps->u.deiVal, &(pd->u.iVal) );*/ default: res = DISP_E_TYPEMISMATCH; FIXME("Coercion from %d to %d\n", vtFrom, vt ); break; } break; case( VT_INT ): case( VT_I4 ): switch( vtFrom ) { case( VT_I1 ): res = VarI4FromI1( ps->u.cVal, &(pd->u.lVal) ); break; case( VT_I2 ): res = VarI4FromI2( ps->u.iVal, &(pd->u.lVal) ); break; case( VT_INT ): case( VT_I4 ): res = VariantCopy( pd, ps ); break; case( VT_UI1 ): res = VarI4FromUI1( ps->u.bVal, &(pd->u.lVal) ); break; case( VT_UI2 ): res = VarI4FromUI2( ps->u.uiVal, &(pd->u.lVal) ); break; case( VT_UINT ): case( VT_UI4 ): res = VarI4FromUI4( ps->u.ulVal, &(pd->u.lVal) ); break; case( VT_R4 ): res = VarI4FromR4( ps->u.fltVal, &(pd->u.lVal) ); break; case( VT_R8 ): res = VarI4FromR8( ps->u.dblVal, &(pd->u.lVal) ); break; case( VT_DATE ): res = VarI4FromDate( ps->u.date, &(pd->u.lVal) ); break; case( VT_BOOL ): res = VarI4FromBool( ps->u.boolVal, &(pd->u.lVal) ); break; case( VT_BSTR ): res = VarI4FromStr( ps->u.bstrVal, lcid, dwFlags, &(pd->u.lVal) ); break; case( VT_CY ): res = VarI4FromCy( ps->u.cyVal, &(pd->u.lVal) ); case( VT_DISPATCH ): /*res = VarI4FromDisp32( ps->u.pdispVal, lcid, &(pd->u.lVal) );*/ case( VT_UNKNOWN ): /*res = VarI4From32( ps->u.lVal, &(pd->u.lVal) );*/ case( VT_DECIMAL ): /*res = VarI4FromDec32( ps->u.deiVal, &(pd->u.lVal) );*/ default: res = DISP_E_TYPEMISMATCH; FIXME("Coercion from %d to %d\n", vtFrom, vt ); break; } break; case( VT_UI1 ): switch( vtFrom ) { case( VT_I1 ): res = VarUI1FromI1( ps->u.cVal, &(pd->u.bVal) ); break; case( VT_I2 ): res = VarUI1FromI2( ps->u.iVal, &(pd->u.bVal) ); break; case( VT_INT ): case( VT_I4 ): res = VarUI1FromI4( ps->u.lVal, &(pd->u.bVal) ); break; case( VT_UI1 ): res = VariantCopy( pd, ps ); break; case( VT_UI2 ): res = VarUI1FromUI2( ps->u.uiVal, &(pd->u.bVal) ); break; case( VT_UINT ): case( VT_UI4 ): res = VarUI1FromUI4( ps->u.ulVal, &(pd->u.bVal) ); break; case( VT_R4 ): res = VarUI1FromR4( ps->u.fltVal, &(pd->u.bVal) ); break; case( VT_R8 ): res = VarUI1FromR8( ps->u.dblVal, &(pd->u.bVal) ); break; case( VT_DATE ): res = VarUI1FromDate( ps->u.date, &(pd->u.bVal) ); break; case( VT_BOOL ): res = VarUI1FromBool( ps->u.boolVal, &(pd->u.bVal) ); break; case( VT_BSTR ): res = VarUI1FromStr( ps->u.bstrVal, lcid, dwFlags, &(pd->u.bVal) ); break; case( VT_CY ): res = VarUI1FromCy( ps->u.cyVal, &(pd->u.bVal) ); case( VT_DISPATCH ): /*res = VarUI1FromDisp32( ps->u.pdispVal, lcid, &(pd->u.bVal) );*/ case( VT_UNKNOWN ): /*res = VarUI1From32( ps->u.lVal, &(pd->u.bVal) );*/ case( VT_DECIMAL ): /*res = VarUI1FromDec32( ps->u.deiVal, &(pd->u.bVal) );*/ default: res = DISP_E_TYPEMISMATCH; FIXME("Coercion from %d to %d\n", vtFrom, vt ); break; } break; case( VT_UI2 ): switch( vtFrom ) { case( VT_I1 ): res = VarUI2FromI1( ps->u.cVal, &(pd->u.uiVal) ); break; case( VT_I2 ): res = VarUI2FromI2( ps->u.iVal, &(pd->u.uiVal) ); break; case( VT_INT ): case( VT_I4 ): res = VarUI2FromI4( ps->u.lVal, &(pd->u.uiVal) ); break; case( VT_UI1 ): res = VarUI2FromUI1( ps->u.bVal, &(pd->u.uiVal) ); break; case( VT_UI2 ): res = VariantCopy( pd, ps ); break; case( VT_UINT ): case( VT_UI4 ): res = VarUI2FromUI4( ps->u.ulVal, &(pd->u.uiVal) ); break; case( VT_R4 ): res = VarUI2FromR4( ps->u.fltVal, &(pd->u.uiVal) ); break; case( VT_R8 ): res = VarUI2FromR8( ps->u.dblVal, &(pd->u.uiVal) ); break; case( VT_DATE ): res = VarUI2FromDate( ps->u.date, &(pd->u.uiVal) ); break; case( VT_BOOL ): res = VarUI2FromBool( ps->u.boolVal, &(pd->u.uiVal) ); break; case( VT_BSTR ): res = VarUI2FromStr( ps->u.bstrVal, lcid, dwFlags, &(pd->u.uiVal) ); break; case( VT_CY ): res = VarUI2FromCy( ps->u.cyVal, &(pd->u.uiVal) ); case( VT_DISPATCH ): /*res = VarUI2FromDisp32( ps->u.pdispVal, lcid, &(pd->u.uiVal) );*/ case( VT_UNKNOWN ): /*res = VarUI2From32( ps->u.lVal, &(pd->u.uiVal) );*/ case( VT_DECIMAL ): /*res = VarUI2FromDec32( ps->u.deiVal, &(pd->u.uiVal) );*/ default: res = DISP_E_TYPEMISMATCH; FIXME("Coercion from %d to %d\n", vtFrom, vt ); break; } break; case( VT_UINT ): case( VT_UI4 ): switch( vtFrom ) { case( VT_I1 ): res = VarUI4FromI1( ps->u.cVal, &(pd->u.ulVal) ); break; case( VT_I2 ): res = VarUI4FromI2( ps->u.iVal, &(pd->u.ulVal) ); break; case( VT_INT ): case( VT_I4 ): res = VarUI4FromI4( ps->u.lVal, &(pd->u.ulVal) ); break; case( VT_UI1 ): res = VarUI4FromUI1( ps->u.bVal, &(pd->u.ulVal) ); break; case( VT_UI2 ): res = VarUI4FromUI2( ps->u.uiVal, &(pd->u.ulVal) ); break; case( VT_UI4 ): res = VariantCopy( pd, ps ); break; case( VT_R4 ): res = VarUI4FromR4( ps->u.fltVal, &(pd->u.ulVal) ); break; case( VT_R8 ): res = VarUI4FromR8( ps->u.dblVal, &(pd->u.ulVal) ); break; case( VT_DATE ): res = VarUI4FromDate( ps->u.date, &(pd->u.ulVal) ); break; case( VT_BOOL ): res = VarUI4FromBool( ps->u.boolVal, &(pd->u.ulVal) ); break; case( VT_BSTR ): res = VarUI4FromStr( ps->u.bstrVal, lcid, dwFlags, &(pd->u.ulVal) ); break; case( VT_CY ): res = VarUI4FromCy( ps->u.cyVal, &(pd->u.ulVal) ); case( VT_DISPATCH ): /*res = VarUI4FromDisp32( ps->u.pdispVal, lcid, &(pd->u.ulVal) );*/ case( VT_UNKNOWN ): /*res = VarUI4From32( ps->u.lVal, &(pd->u.ulVal) );*/ case( VT_DECIMAL ): /*res = VarUI4FromDec32( ps->u.deiVal, &(pd->u.ulVal) );*/ default: res = DISP_E_TYPEMISMATCH; FIXME("Coercion from %d to %d\n", vtFrom, vt ); break; } break; case( VT_R4 ): switch( vtFrom ) { case( VT_I1 ): res = VarR4FromI1( ps->u.cVal, &(pd->u.fltVal) ); break; case( VT_I2 ): res = VarR4FromI2( ps->u.iVal, &(pd->u.fltVal) ); break; case( VT_INT ): case( VT_I4 ): res = VarR4FromI4( ps->u.lVal, &(pd->u.fltVal) ); break; case( VT_UI1 ): res = VarR4FromUI1( ps->u.bVal, &(pd->u.fltVal) ); break; case( VT_UI2 ): res = VarR4FromUI2( ps->u.uiVal, &(pd->u.fltVal) ); break; case( VT_UINT ): case( VT_UI4 ): res = VarR4FromUI4( ps->u.ulVal, &(pd->u.fltVal) ); break; case( VT_R4 ): res = VariantCopy( pd, ps ); break; case( VT_R8 ): res = VarR4FromR8( ps->u.dblVal, &(pd->u.fltVal) ); break; case( VT_DATE ): res = VarR4FromDate( ps->u.date, &(pd->u.fltVal) ); break; case( VT_BOOL ): res = VarR4FromBool( ps->u.boolVal, &(pd->u.fltVal) ); break; case( VT_BSTR ): res = VarR4FromStr( ps->u.bstrVal, lcid, dwFlags, &(pd->u.fltVal) ); break; case( VT_CY ): res = VarR4FromCy( ps->u.cyVal, &(pd->u.fltVal) ); case( VT_DISPATCH ): /*res = VarR4FromDisp32( ps->u.pdispVal, lcid, &(pd->u.fltVal) );*/ case( VT_UNKNOWN ): /*res = VarR4From32( ps->u.lVal, &(pd->u.fltVal) );*/ case( VT_DECIMAL ): /*res = VarR4FromDec32( ps->u.deiVal, &(pd->u.fltVal) );*/ default: res = DISP_E_TYPEMISMATCH; FIXME("Coercion from %d to %d\n", vtFrom, vt ); break; } break; case( VT_R8 ): switch( vtFrom ) { case( VT_I1 ): res = VarR8FromI1( ps->u.cVal, &(pd->u.dblVal) ); break; case( VT_I2 ): res = VarR8FromI2( ps->u.iVal, &(pd->u.dblVal) ); break; case( VT_INT ): case( VT_I4 ): res = VarR8FromI4( ps->u.lVal, &(pd->u.dblVal) ); break; case( VT_UI1 ): res = VarR8FromUI1( ps->u.bVal, &(pd->u.dblVal) ); break; case( VT_UI2 ): res = VarR8FromUI2( ps->u.uiVal, &(pd->u.dblVal) ); break; case( VT_UINT ): case( VT_UI4 ): res = VarR8FromUI4( ps->u.ulVal, &(pd->u.dblVal) ); break; case( VT_R4 ): res = VarR8FromR4( ps->u.fltVal, &(pd->u.dblVal) ); break; case( VT_R8 ): res = VariantCopy( pd, ps ); break; case( VT_DATE ): res = VarR8FromDate( ps->u.date, &(pd->u.dblVal) ); break; case( VT_BOOL ): res = VarR8FromBool( ps->u.boolVal, &(pd->u.dblVal) ); break; case( VT_BSTR ): res = VarR8FromStr( ps->u.bstrVal, lcid, dwFlags, &(pd->u.dblVal) ); break; case( VT_CY ): res = VarR8FromCy( ps->u.cyVal, &(pd->u.dblVal) ); case( VT_DISPATCH ): /*res = VarR8FromDisp32( ps->u.pdispVal, lcid, &(pd->u.dblVal) );*/ case( VT_UNKNOWN ): /*res = VarR8From32( ps->u.lVal, &(pd->u.dblVal) );*/ case( VT_DECIMAL ): /*res = VarR8FromDec32( ps->u.deiVal, &(pd->u.dblVal) );*/ default: res = DISP_E_TYPEMISMATCH; FIXME("Coercion from %d to %d\n", vtFrom, vt ); break; } break; case( VT_DATE ): switch( vtFrom ) { case( VT_I1 ): res = VarDateFromI1( ps->u.cVal, &(pd->u.date) ); break; case( VT_I2 ): res = VarDateFromI2( ps->u.iVal, &(pd->u.date) ); break; case( VT_INT ): res = VarDateFromInt( ps->u.intVal, &(pd->u.date) ); break; case( VT_I4 ): res = VarDateFromI4( ps->u.lVal, &(pd->u.date) ); break; case( VT_UI1 ): res = VarDateFromUI1( ps->u.bVal, &(pd->u.date) ); break; case( VT_UI2 ): res = VarDateFromUI2( ps->u.uiVal, &(pd->u.date) ); break; case( VT_UINT ): res = VarDateFromUint( ps->u.uintVal, &(pd->u.date) ); break; case( VT_UI4 ): res = VarDateFromUI4( ps->u.ulVal, &(pd->u.date) ); break; case( VT_R4 ): res = VarDateFromR4( ps->u.fltVal, &(pd->u.date) ); break; case( VT_R8 ): res = VarDateFromR8( ps->u.dblVal, &(pd->u.date) ); break; case( VT_DATE ): res = VariantCopy( pd, ps ); break; case( VT_BOOL ): res = VarDateFromBool( ps->u.boolVal, &(pd->u.date) ); break; case( VT_BSTR ): res = VarDateFromStr( ps->u.bstrVal, lcid, dwFlags, &(pd->u.date) ); break; case( VT_CY ): res = VarDateFromCy( ps->u.cyVal, &(pd->u.date) ); case( VT_DISPATCH ): /*res = VarDateFromDisp32( ps->u.pdispVal, lcid, &(pd->u.date) );*/ case( VT_UNKNOWN ): /*res = VarDateFrom32( ps->u.lVal, &(pd->u.date) );*/ case( VT_DECIMAL ): /*res = VarDateFromDec32( ps->u.deiVal, &(pd->u.date) );*/ default: res = DISP_E_TYPEMISMATCH; FIXME("Coercion from %d to %d\n", vtFrom, vt ); break; } break; case( VT_BOOL ): switch( vtFrom ) { case( VT_I1 ): res = VarBoolFromI1( ps->u.cVal, &(pd->u.boolVal) ); break; case( VT_I2 ): res = VarBoolFromI2( ps->u.iVal, &(pd->u.boolVal) ); break; case( VT_INT ): res = VarBoolFromInt( ps->u.intVal, &(pd->u.boolVal) ); break; case( VT_I4 ): res = VarBoolFromI4( ps->u.lVal, &(pd->u.boolVal) ); break; case( VT_UI1 ): res = VarBoolFromUI1( ps->u.bVal, &(pd->u.boolVal) ); break; case( VT_UI2 ): res = VarBoolFromUI2( ps->u.uiVal, &(pd->u.boolVal) ); break; case( VT_UINT ): res = VarBoolFromUint( ps->u.uintVal, &(pd->u.boolVal) ); break; case( VT_UI4 ): res = VarBoolFromUI4( ps->u.ulVal, &(pd->u.boolVal) ); break; case( VT_R4 ): res = VarBoolFromR4( ps->u.fltVal, &(pd->u.boolVal) ); break; case( VT_R8 ): res = VarBoolFromR8( ps->u.dblVal, &(pd->u.boolVal) ); break; case( VT_DATE ): res = VarBoolFromDate( ps->u.date, &(pd->u.boolVal) ); break; case( VT_BOOL ): res = VariantCopy( pd, ps ); break; case( VT_BSTR ): res = VarBoolFromStr( ps->u.bstrVal, lcid, dwFlags, &(pd->u.boolVal) ); break; case( VT_CY ): res = VarBoolFromCy( ps->u.cyVal, &(pd->u.boolVal) ); case( VT_DISPATCH ): /*res = VarBoolFromDisp32( ps->u.pdispVal, lcid, &(pd->u.boolVal) );*/ case( VT_UNKNOWN ): /*res = VarBoolFrom32( ps->u.lVal, &(pd->u.boolVal) );*/ case( VT_DECIMAL ): /*res = VarBoolFromDec32( ps->u.deiVal, &(pd->u.boolVal) );*/ default: res = DISP_E_TYPEMISMATCH; FIXME("Coercion from %d to %d\n", vtFrom, vt ); break; } break; case( VT_BSTR ): switch( vtFrom ) { case( VT_I1 ): res = VarBstrFromI1( ps->u.cVal, lcid, dwFlags, &(pd->u.bstrVal) ); break; case( VT_I2 ): res = VarBstrFromI2( ps->u.iVal, lcid, dwFlags, &(pd->u.bstrVal) ); break; case( VT_INT ): res = VarBstrFromInt( ps->u.intVal, lcid, dwFlags, &(pd->u.bstrVal) ); break; case( VT_I4 ): res = VarBstrFromI4( ps->u.lVal, lcid, dwFlags, &(pd->u.bstrVal) ); break; case( VT_UI1 ): res = VarBstrFromUI1( ps->u.bVal, lcid, dwFlags, &(pd->u.bstrVal) ); break; case( VT_UI2 ): res = VarBstrFromUI2( ps->u.uiVal, lcid, dwFlags, &(pd->u.bstrVal) ); break; case( VT_UINT ): res = VarBstrFromUint( ps->u.uintVal, lcid, dwFlags, &(pd->u.bstrVal) ); break; case( VT_UI4 ): res = VarBstrFromUI4( ps->u.ulVal, lcid, dwFlags, &(pd->u.bstrVal) ); break; case( VT_R4 ): res = VarBstrFromR4( ps->u.fltVal, lcid, dwFlags, &(pd->u.bstrVal) ); break; case( VT_R8 ): res = VarBstrFromR8( ps->u.dblVal, lcid, dwFlags, &(pd->u.bstrVal) ); break; case( VT_DATE ): res = VarBstrFromDate( ps->u.date, lcid, dwFlags, &(pd->u.bstrVal) ); break; case( VT_BOOL ): res = VarBstrFromBool( ps->u.boolVal, lcid, dwFlags, &(pd->u.bstrVal) ); break; case( VT_BSTR ): res = VariantCopy( pd, ps ); break; case( VT_CY ): /*res = VarBstrFromCy32( ps->u.cyVal, lcid, dwFlags, &(pd->u.bstrVal) );*/ case( VT_DISPATCH ): /*res = VarBstrFromDisp32( ps->u.pdispVal, lcid, lcid, dwFlags, &(pd->u.bstrVal) );*/ case( VT_UNKNOWN ): /*res = VarBstrFrom32( ps->u.lVal, lcid, dwFlags, &(pd->u.bstrVal) );*/ case( VT_DECIMAL ): /*res = VarBstrFromDec32( ps->u.deiVal, lcid, dwFlags, &(pd->u.bstrVal) );*/ default: res = DISP_E_TYPEMISMATCH; FIXME("Coercion from %d to %d\n", vtFrom, vt ); break; } break; case( VT_CY ): switch( vtFrom ) { case( VT_I1 ): res = VarCyFromI1( ps->u.cVal, &(pd->u.cyVal) ); break; case( VT_I2 ): res = VarCyFromI2( ps->u.iVal, &(pd->u.cyVal) ); break; case( VT_INT ): res = VarCyFromInt( ps->u.intVal, &(pd->u.cyVal) ); break; case( VT_I4 ): res = VarCyFromI4( ps->u.lVal, &(pd->u.cyVal) ); break; case( VT_UI1 ): res = VarCyFromUI1( ps->u.bVal, &(pd->u.cyVal) ); break; case( VT_UI2 ): res = VarCyFromUI2( ps->u.uiVal, &(pd->u.cyVal) ); break; case( VT_UINT ): res = VarCyFromUint( ps->u.uintVal, &(pd->u.cyVal) ); break; case( VT_UI4 ): res = VarCyFromUI4( ps->u.ulVal, &(pd->u.cyVal) ); break; case( VT_R4 ): res = VarCyFromR4( ps->u.fltVal, &(pd->u.cyVal) ); break; case( VT_R8 ): res = VarCyFromR8( ps->u.dblVal, &(pd->u.cyVal) ); break; case( VT_DATE ): res = VarCyFromDate( ps->u.date, &(pd->u.cyVal) ); break; case( VT_BOOL ): res = VarCyFromBool( ps->u.date, &(pd->u.cyVal) ); break; case( VT_CY ): res = VariantCopy( pd, ps ); break; case( VT_BSTR ): /*res = VarCyFromStr32( ps->u.bstrVal, lcid, dwFlags, &(pd->u.cyVal) );*/ case( VT_DISPATCH ): /*res = VarCyFromDisp32( ps->u.pdispVal, lcid, &(pd->u.boolVal) );*/ case( VT_UNKNOWN ): /*res = VarCyFrom32( ps->u.lVal, &(pd->u.boolVal) );*/ case( VT_DECIMAL ): /*res = VarCyFromDec32( ps->u.deiVal, &(pd->u.boolVal) );*/ default: res = DISP_E_TYPEMISMATCH; FIXME("Coercion from %d to %d\n", vtFrom, vt ); break; } break; default: res = DISP_E_TYPEMISMATCH; FIXME("Coercion from %d to %d\n", vtFrom, vt ); break; } return res; } /****************************************************************************** * ValidateVtRange [INTERNAL] * * Used internally by the hi-level Variant API to determine * if the vartypes are valid. */ static HRESULT WINAPI ValidateVtRange( VARTYPE vt ) { /* if by value we must make sure it is in the * range of the valid types. */ if( ( vt & VT_TYPEMASK ) > VT_MAXVALIDTYPE ) { return DISP_E_BADVARTYPE; } return S_OK; } /****************************************************************************** * ValidateVartype [INTERNAL] * * Used internally by the hi-level Variant API to determine * if the vartypes are valid. */ static HRESULT WINAPI ValidateVariantType( VARTYPE vt ) { HRESULT res = S_OK; /* check if we have a valid argument. */ if( vt & VT_BYREF ) { /* if by reference check that the type is in * the valid range and that it is not of empty or null type */ if( ( vt & VT_TYPEMASK ) == VT_EMPTY || ( vt & VT_TYPEMASK ) == VT_NULL || ( vt & VT_TYPEMASK ) > VT_MAXVALIDTYPE ) { res = E_INVALIDARG; } } else { res = ValidateVtRange( vt ); } return res; } /****************************************************************************** * ValidateVt [INTERNAL] * * Used internally by the hi-level Variant API to determine * if the vartypes are valid. */ static HRESULT WINAPI ValidateVt( VARTYPE vt ) { HRESULT res = S_OK; /* check if we have a valid argument. */ if( vt & VT_BYREF ) { /* if by reference check that the type is in * the valid range and that it is not of empty or null type */ if( ( vt & VT_TYPEMASK ) == VT_EMPTY || ( vt & VT_TYPEMASK ) == VT_NULL || ( vt & VT_TYPEMASK ) > VT_MAXVALIDTYPE ) { res = DISP_E_BADVARTYPE; } } else { res = ValidateVtRange( vt ); } return res; } /****************************************************************************** * VariantInit [OLEAUT32.8] * * Initializes the Variant. Unlike VariantClear it does not interpret the current * contents of the Variant. */ void WINAPI VariantInit(VARIANTARG* pvarg) { TRACE("(%p),stub\n",pvarg); memset(pvarg, 0, sizeof (VARIANTARG)); pvarg->vt = VT_EMPTY; return; } /****************************************************************************** * VariantClear [OLEAUT32.9] * * This function clears the VARIANT by setting the vt field to VT_EMPTY. It also * sets the wReservedX field to 0. The current contents of the VARIANT are * freed. If the vt is VT_BSTR the string is freed. If VT_DISPATCH the object is * released. If VT_ARRAY the array is freed. */ HRESULT WINAPI VariantClear(VARIANTARG* pvarg) { HRESULT res = S_OK; TRACE("(%p)\n",pvarg); res = ValidateVariantType( pvarg->vt ); if( res == S_OK ) { if( !( pvarg->vt & VT_BYREF ) ) { /* * The VT_ARRAY flag is a special case of a safe array. */ if ( (pvarg->vt & VT_ARRAY) != 0) { SafeArrayDestroy(pvarg->u.parray); } else { switch( pvarg->vt & VT_TYPEMASK ) { case( VT_BSTR ): SysFreeString( pvarg->u.bstrVal ); break; case( VT_DISPATCH ): if(pvarg->u.pdispVal!=NULL) ICOM_CALL(Release,pvarg->u.pdispVal); break; case( VT_VARIANT ): VariantClear(pvarg->u.pvarVal); break; case( VT_UNKNOWN ): if(pvarg->u.punkVal!=NULL) ICOM_CALL(Release,pvarg->u.punkVal); break; case( VT_SAFEARRAY ): SafeArrayDestroy(pvarg->u.parray); break; default: break; } } } /* * Empty all the fields and mark the type as empty. */ memset(pvarg, 0, sizeof (VARIANTARG)); pvarg->vt = VT_EMPTY; } return res; } /****************************************************************************** * VariantCopy [OLEAUT32.10] * * Frees up the designation variant and makes a copy of the source. */ HRESULT WINAPI VariantCopy(VARIANTARG* pvargDest, VARIANTARG* pvargSrc) { HRESULT res = S_OK; TRACE("(%p, %p)\n", pvargDest, pvargSrc); res = ValidateVariantType( pvargSrc->vt ); /* If the pointer are to the same variant we don't need * to do anything. */ if( pvargDest != pvargSrc && res == S_OK ) { res = VariantClear( pvargDest ); if( res == S_OK ) { if( pvargSrc->vt & VT_BYREF ) { /* In the case of byreference we only need * to copy the pointer. */ pvargDest->u = pvargSrc->u; pvargDest->vt = pvargSrc->vt; } else { /* * The VT_ARRAY flag is another way to designate a safe array. */ if (pvargSrc->vt & VT_ARRAY) { SafeArrayCopy(pvargSrc->u.parray, &pvargDest->u.parray); } else { /* In the case of by value we need to * copy the actuall value. In the case of * VT_BSTR a copy of the string is made, * if VT_DISPATCH or VT_IUNKNOWN AddReff is * called to increment the object's reference count. */ switch( pvargSrc->vt & VT_TYPEMASK ) { case( VT_BSTR ): pvargDest->u.bstrVal = SysAllocString( pvargSrc->u.bstrVal ); break; case( VT_DISPATCH ): pvargDest->u.pdispVal = pvargSrc->u.pdispVal; if (pvargDest->u.pdispVal!=NULL) ICOM_CALL(AddRef,pvargDest->u.pdispVal); break; case( VT_VARIANT ): VariantCopy(pvargDest->u.pvarVal,pvargSrc->u.pvarVal); break; case( VT_UNKNOWN ): pvargDest->u.punkVal = pvargSrc->u.punkVal; if (pvargDest->u.pdispVal!=NULL) ICOM_CALL(AddRef,pvargDest->u.punkVal); break; case( VT_SAFEARRAY ): SafeArrayCopy(pvargSrc->u.parray, &pvargDest->u.parray); break; default: pvargDest->u = pvargSrc->u; break; } } pvargDest->vt = pvargSrc->vt; } } } return res; } /****************************************************************************** * VariantCopyInd [OLEAUT32.11] * * Frees up the destination variant and makes a copy of the source. If * the source is of type VT_BYREF it performs the necessary indirections. */ HRESULT WINAPI VariantCopyInd(VARIANT* pvargDest, VARIANTARG* pvargSrc) { HRESULT res = S_OK; TRACE("(%p, %p)\n", pvargDest, pvargSrc); res = ValidateVariantType( pvargSrc->vt ); if( res != S_OK ) return res; if( pvargSrc->vt & VT_BYREF ) { VARIANTARG varg; VariantInit( &varg ); /* handle the in place copy. */ if( pvargDest == pvargSrc ) { /* we will use a copy of the source instead. */ res = VariantCopy( &varg, pvargSrc ); pvargSrc = &varg; } if( res == S_OK ) { res = VariantClear( pvargDest ); if( res == S_OK ) { /* * The VT_ARRAY flag is another way to designate a safearray variant. */ if ( pvargSrc->vt & VT_ARRAY) { SafeArrayCopy(*pvargSrc->u.pparray, &pvargDest->u.parray); } else { /* In the case of by reference we need * to copy the date pointed to by the variant. */ /* Get the variant type. */ switch( pvargSrc->vt & VT_TYPEMASK ) { case( VT_BSTR ): pvargDest->u.bstrVal = SysAllocString( *(pvargSrc->u.pbstrVal) ); break; case( VT_DISPATCH ): break; case( VT_VARIANT ): { /* Prevent from cycling. According to tests on * VariantCopyInd in Windows and the documentation * this API dereferences the inner Variants to only one depth. * If the inner Variant itself contains an * other inner variant the E_INVALIDARG error is * returned. */ if( pvargSrc->wReserved1 & PROCESSING_INNER_VARIANT ) { /* If we get here we are attempting to deference * an inner variant that that is itself contained * in an inner variant so report E_INVALIDARG error. */ res = E_INVALIDARG; } else { /* Set the processing inner variant flag. * We will set this flag in the inner variant * that will be passed to the VariantCopyInd function. */ (pvargSrc->u.pvarVal)->wReserved1 |= PROCESSING_INNER_VARIANT; /* Dereference the inner variant. */ res = VariantCopyInd( pvargDest, pvargSrc->u.pvarVal ); /* We must also copy its type, I think. */ pvargSrc->vt = pvargSrc->u.pvarVal->vt; } } break; case( VT_UNKNOWN ): break; case( VT_SAFEARRAY ): SafeArrayCopy(*pvargSrc->u.pparray, &pvargDest->u.parray); break; default: /* This is a by reference Variant which means that the union * part of the Variant contains a pointer to some data of * type "pvargSrc->vt & VT_TYPEMASK". * We will deference this data in a generic fashion using * the void pointer "Variant.u.byref". * We will copy this data into the union of the destination * Variant. */ memcpy( &pvargDest->u, pvargSrc->u.byref, SizeOfVariantData( pvargSrc ) ); break; } } pvargDest->vt = pvargSrc->vt & VT_TYPEMASK; } } /* this should not fail. */ VariantClear( &varg ); } else { res = VariantCopy( pvargDest, pvargSrc ); } return res; } /****************************************************************************** * VariantChangeType [OLEAUT32.12] */ HRESULT WINAPI VariantChangeType(VARIANTARG* pvargDest, VARIANTARG* pvargSrc, USHORT wFlags, VARTYPE vt) { return VariantChangeTypeEx( pvargDest, pvargSrc, 0, wFlags, vt ); } /****************************************************************************** * VariantChangeTypeEx [OLEAUT32.147] */ HRESULT WINAPI VariantChangeTypeEx(VARIANTARG* pvargDest, VARIANTARG* pvargSrc, LCID lcid, USHORT wFlags, VARTYPE vt) { HRESULT res = S_OK; VARIANTARG varg; VariantInit( &varg ); TRACE("(%p, %p, %ld, %u, %u),stub\n", pvargDest, pvargSrc, lcid, wFlags, vt); /* validate our source argument. */ res = ValidateVariantType( pvargSrc->vt ); /* validate the vartype. */ if( res == S_OK ) { res = ValidateVt( vt ); } /* if we are doing an in-place conversion make a copy of the source. */ if( res == S_OK && pvargDest == pvargSrc ) { res = VariantCopy( &varg, pvargSrc ); pvargSrc = &varg; } if( res == S_OK ) { /* free up the destination variant. */ res = VariantClear( pvargDest ); } if( res == S_OK ) { if( pvargSrc->vt & VT_BYREF ) { /* Convert the source variant to a "byvalue" variant. */ VARIANTARG Variant; VariantInit( &Variant ); res = VariantCopyInd( &Variant, pvargSrc ); if( res == S_OK ) { res = Coerce( pvargDest, lcid, wFlags, &Variant, vt ); /* this should not fail. */ VariantClear( &Variant ); } } else { /* Use the current "byvalue" source variant. */ res = Coerce( pvargDest, lcid, wFlags, pvargSrc, vt ); } } /* this should not fail. */ VariantClear( &varg ); /* set the type of the destination */ if ( res == S_OK ) pvargDest->vt = vt; return res; } /****************************************************************************** * VarUI1FromI2 [OLEAUT32.130] */ HRESULT WINAPI VarUI1FromI2(short sIn, BYTE* pbOut) { TRACE("( %d, %p ), stub\n", sIn, pbOut ); /* Check range of value. */ if( sIn < UI1_MIN || sIn > UI1_MAX ) { return DISP_E_OVERFLOW; } *pbOut = (BYTE) sIn; return S_OK; } /****************************************************************************** * VarUI1FromI4 [OLEAUT32.131] */ HRESULT WINAPI VarUI1FromI4(LONG lIn, BYTE* pbOut) { TRACE("( %ld, %p ), stub\n", lIn, pbOut ); /* Check range of value. */ if( lIn < UI1_MIN || lIn > UI1_MAX ) { return DISP_E_OVERFLOW; } *pbOut = (BYTE) lIn; return S_OK; } /****************************************************************************** * VarUI1FromR4 [OLEAUT32.132] */ HRESULT WINAPI VarUI1FromR4(FLOAT fltIn, BYTE* pbOut) { TRACE("( %f, %p ), stub\n", fltIn, pbOut ); /* Check range of value. */ fltIn = round( fltIn ); if( fltIn < UI1_MIN || fltIn > UI1_MAX ) { return DISP_E_OVERFLOW; } *pbOut = (BYTE) fltIn; return S_OK; } /****************************************************************************** * VarUI1FromR8 [OLEAUT32.133] */ HRESULT WINAPI VarUI1FromR8(double dblIn, BYTE* pbOut) { TRACE("( %f, %p ), stub\n", dblIn, pbOut ); /* Check range of value. */ dblIn = round( dblIn ); if( dblIn < UI1_MIN || dblIn > UI1_MAX ) { return DISP_E_OVERFLOW; } *pbOut = (BYTE) dblIn; return S_OK; } /****************************************************************************** * VarUI1FromDate [OLEAUT32.135] */ HRESULT WINAPI VarUI1FromDate(DATE dateIn, BYTE* pbOut) { TRACE("( %f, %p ), stub\n", dateIn, pbOut ); /* Check range of value. */ dateIn = round( dateIn ); if( dateIn < UI1_MIN || dateIn > UI1_MAX ) { return DISP_E_OVERFLOW; } *pbOut = (BYTE) dateIn; return S_OK; } /****************************************************************************** * VarUI1FromBool [OLEAUT32.138] */ HRESULT WINAPI VarUI1FromBool(VARIANT_BOOL boolIn, BYTE* pbOut) { TRACE("( %d, %p ), stub\n", boolIn, pbOut ); *pbOut = (BYTE) boolIn; return S_OK; } /****************************************************************************** * VarUI1FromI1 [OLEAUT32.237] */ HRESULT WINAPI VarUI1FromI1(CHAR cIn, BYTE* pbOut) { TRACE("( %c, %p ), stub\n", cIn, pbOut ); *pbOut = cIn; return S_OK; } /****************************************************************************** * VarUI1FromUI2 [OLEAUT32.238] */ HRESULT WINAPI VarUI1FromUI2(USHORT uiIn, BYTE* pbOut) { TRACE("( %d, %p ), stub\n", uiIn, pbOut ); /* Check range of value. */ if( uiIn > UI1_MAX ) { return DISP_E_OVERFLOW; } *pbOut = (BYTE) uiIn; return S_OK; } /****************************************************************************** * VarUI1FromUI4 [OLEAUT32.239] */ HRESULT WINAPI VarUI1FromUI4(ULONG ulIn, BYTE* pbOut) { TRACE("( %ld, %p ), stub\n", ulIn, pbOut ); /* Check range of value. */ if( ulIn > UI1_MAX ) { return DISP_E_OVERFLOW; } *pbOut = (BYTE) ulIn; return S_OK; } /****************************************************************************** * VarUI1FromStr [OLEAUT32.54] */ HRESULT WINAPI VarUI1FromStr(OLECHAR* strIn, LCID lcid, ULONG dwFlags, BYTE* pbOut) { double dValue = 0.0; LPSTR pNewString = NULL; TRACE("( %p, 0x%08lx, 0x%08lx, %p ), stub\n", strIn, lcid, dwFlags, pbOut ); /* Check if we have a valid argument */ pNewString = HEAP_strdupWtoA( GetProcessHeap(), 0, strIn ); RemoveCharacterFromString( pNewString, "," ); if( IsValidRealString( pNewString ) == FALSE ) { return DISP_E_TYPEMISMATCH; } /* Convert the valid string to a floating point number. */ dValue = atof( pNewString ); /* We don't need the string anymore so free it. */ HeapFree( GetProcessHeap(), 0 , pNewString ); /* Check range of value. */ dValue = round( dValue ); if( dValue < UI1_MIN || dValue > UI1_MAX ) { return DISP_E_OVERFLOW; } *pbOut = (BYTE) dValue; return S_OK; } /********************************************************************** * VarUI1FromCy [OLEAUT32.134] * Convert currency to unsigned char */ HRESULT WINAPI VarUI1FromCy(CY cyIn, BYTE* pbOut) { double t = round((((double)cyIn.s.Hi * 4294967296.0) + (double)cyIn.s.Lo) / 10000); if (t > UI1_MAX || t < UI1_MIN) return DISP_E_OVERFLOW; *pbOut = (BYTE)t; return S_OK; } /****************************************************************************** * VarI2FromUI1 [OLEAUT32.48] */ HRESULT WINAPI VarI2FromUI1(BYTE bIn, short* psOut) { TRACE("( 0x%08x, %p ), stub\n", bIn, psOut ); *psOut = (short) bIn; return S_OK; } /****************************************************************************** * VarI2FromI4 [OLEAUT32.49] */ HRESULT WINAPI VarI2FromI4(LONG lIn, short* psOut) { TRACE("( %lx, %p ), stub\n", lIn, psOut ); /* Check range of value. */ if( lIn < I2_MIN || lIn > I2_MAX ) { return DISP_E_OVERFLOW; } *psOut = (short) lIn; return S_OK; } /****************************************************************************** * VarI2FromR4 [OLEAUT32.50] */ HRESULT WINAPI VarI2FromR4(FLOAT fltIn, short* psOut) { TRACE("( %f, %p ), stub\n", fltIn, psOut ); /* Check range of value. */ fltIn = round( fltIn ); if( fltIn < I2_MIN || fltIn > I2_MAX ) { return DISP_E_OVERFLOW; } *psOut = (short) fltIn; return S_OK; } /****************************************************************************** * VarI2FromR8 [OLEAUT32.51] */ HRESULT WINAPI VarI2FromR8(double dblIn, short* psOut) { TRACE("( %f, %p ), stub\n", dblIn, psOut ); /* Check range of value. */ dblIn = round( dblIn ); if( dblIn < I2_MIN || dblIn > I2_MAX ) { return DISP_E_OVERFLOW; } *psOut = (short) dblIn; return S_OK; } /****************************************************************************** * VarI2FromDate [OLEAUT32.53] */ HRESULT WINAPI VarI2FromDate(DATE dateIn, short* psOut) { TRACE("( %f, %p ), stub\n", dateIn, psOut ); /* Check range of value. */ dateIn = round( dateIn ); if( dateIn < I2_MIN || dateIn > I2_MAX ) { return DISP_E_OVERFLOW; } *psOut = (short) dateIn; return S_OK; } /****************************************************************************** * VarI2FromBool [OLEAUT32.56] */ HRESULT WINAPI VarI2FromBool(VARIANT_BOOL boolIn, short* psOut) { TRACE("( %d, %p ), stub\n", boolIn, psOut ); *psOut = (short) boolIn; return S_OK; } /****************************************************************************** * VarI2FromI1 [OLEAUT32.48] */ HRESULT WINAPI VarI2FromI1(CHAR cIn, short* psOut) { TRACE("( %c, %p ), stub\n", cIn, psOut ); *psOut = (short) cIn; return S_OK; } /****************************************************************************** * VarI2FromUI2 [OLEAUT32.206] */ HRESULT WINAPI VarI2FromUI2(USHORT uiIn, short* psOut) { TRACE("( %d, %p ), stub\n", uiIn, psOut ); /* Check range of value. */ if( uiIn > I2_MAX ) { return DISP_E_OVERFLOW; } *psOut = (short) uiIn; return S_OK; } /****************************************************************************** * VarI2FromUI4 [OLEAUT32.49] */ HRESULT WINAPI VarI2FromUI4(ULONG ulIn, short* psOut) { TRACE("( %lx, %p ), stub\n", ulIn, psOut ); /* Check range of value. */ if( ulIn < I2_MIN || ulIn > I2_MAX ) { return DISP_E_OVERFLOW; } *psOut = (short) ulIn; return S_OK; } /****************************************************************************** * VarI2FromStr [OLEAUT32.54] */ HRESULT WINAPI VarI2FromStr(OLECHAR* strIn, LCID lcid, ULONG dwFlags, short* psOut) { double dValue = 0.0; LPSTR pNewString = NULL; TRACE("( %p, 0x%08lx, 0x%08lx, %p ), stub\n", strIn, lcid, dwFlags, psOut ); /* Check if we have a valid argument */ pNewString = HEAP_strdupWtoA( GetProcessHeap(), 0, strIn ); RemoveCharacterFromString( pNewString, "," ); if( IsValidRealString( pNewString ) == FALSE ) { return DISP_E_TYPEMISMATCH; } /* Convert the valid string to a floating point number. */ dValue = atof( pNewString ); /* We don't need the string anymore so free it. */ HeapFree( GetProcessHeap(), 0, pNewString ); /* Check range of value. */ dValue = round( dValue ); if( dValue < I2_MIN || dValue > I2_MAX ) { return DISP_E_OVERFLOW; } *psOut = (short) dValue; return S_OK; } /********************************************************************** * VarI2FromCy [OLEAUT32.52] * Convert currency to signed short */ HRESULT WINAPI VarI2FromCy(CY cyIn, short* psOut) { double t = round((((double)cyIn.s.Hi * 4294967296.0) + (double)cyIn.s.Lo) / 10000); if (t > I2_MAX || t < I2_MIN) return DISP_E_OVERFLOW; *psOut = (SHORT)t; return S_OK; } /****************************************************************************** * VarI4FromUI1 [OLEAUT32.58] */ HRESULT WINAPI VarI4FromUI1(BYTE bIn, LONG* plOut) { TRACE("( %X, %p ), stub\n", bIn, plOut ); *plOut = (LONG) bIn; return S_OK; } /****************************************************************************** * VarI4FromR4 [OLEAUT32.60] */ HRESULT WINAPI VarI4FromR4(FLOAT fltIn, LONG* plOut) { TRACE("( %f, %p ), stub\n", fltIn, plOut ); /* Check range of value. */ fltIn = round( fltIn ); if( fltIn < I4_MIN || fltIn > I4_MAX ) { return DISP_E_OVERFLOW; } *plOut = (LONG) fltIn; return S_OK; } /****************************************************************************** * VarI4FromR8 [OLEAUT32.61] */ HRESULT WINAPI VarI4FromR8(double dblIn, LONG* plOut) { TRACE("( %f, %p ), stub\n", dblIn, plOut ); /* Check range of value. */ dblIn = round( dblIn ); if( dblIn < I4_MIN || dblIn > I4_MAX ) { return DISP_E_OVERFLOW; } *plOut = (LONG) dblIn; return S_OK; } /****************************************************************************** * VarI4FromDate [OLEAUT32.63] */ HRESULT WINAPI VarI4FromDate(DATE dateIn, LONG* plOut) { TRACE("( %f, %p ), stub\n", dateIn, plOut ); /* Check range of value. */ dateIn = round( dateIn ); if( dateIn < I4_MIN || dateIn > I4_MAX ) { return DISP_E_OVERFLOW; } *plOut = (LONG) dateIn; return S_OK; } /****************************************************************************** * VarI4FromBool [OLEAUT32.66] */ HRESULT WINAPI VarI4FromBool(VARIANT_BOOL boolIn, LONG* plOut) { TRACE("( %d, %p ), stub\n", boolIn, plOut ); *plOut = (LONG) boolIn; return S_OK; } /****************************************************************************** * VarI4FromI1 [OLEAUT32.209] */ HRESULT WINAPI VarI4FromI1(CHAR cIn, LONG* plOut) { TRACE("( %c, %p ), stub\n", cIn, plOut ); *plOut = (LONG) cIn; return S_OK; } /****************************************************************************** * VarI4FromUI2 [OLEAUT32.210] */ HRESULT WINAPI VarI4FromUI2(USHORT uiIn, LONG* plOut) { TRACE("( %d, %p ), stub\n", uiIn, plOut ); *plOut = (LONG) uiIn; return S_OK; } /****************************************************************************** * VarI4FromUI4 [OLEAUT32.211] */ HRESULT WINAPI VarI4FromUI4(ULONG ulIn, LONG* plOut) { TRACE("( %lx, %p ), stub\n", ulIn, plOut ); /* Check range of value. */ if( ulIn < I4_MIN || ulIn > I4_MAX ) { return DISP_E_OVERFLOW; } *plOut = (LONG) ulIn; return S_OK; } /****************************************************************************** * VarI4FromI2 [OLEAUT32.59] */ HRESULT WINAPI VarI4FromI2(short sIn, LONG* plOut) { TRACE("( %d, %p ), stub\n", sIn, plOut ); *plOut = (LONG) sIn; return S_OK; } /****************************************************************************** * VarI4FromStr [OLEAUT32.64] */ HRESULT WINAPI VarI4FromStr(OLECHAR* strIn, LCID lcid, ULONG dwFlags, LONG* plOut) { double dValue = 0.0; LPSTR pNewString = NULL; TRACE("( %p, 0x%08lx, 0x%08lx, %p ), stub\n", strIn, lcid, dwFlags, plOut ); /* Check if we have a valid argument */ pNewString = HEAP_strdupWtoA( GetProcessHeap(), 0, strIn ); RemoveCharacterFromString( pNewString, "," ); if( IsValidRealString( pNewString ) == FALSE ) { return DISP_E_TYPEMISMATCH; } /* Convert the valid string to a floating point number. */ dValue = atof( pNewString ); /* We don't need the string anymore so free it. */ HeapFree( GetProcessHeap(), 0, pNewString ); /* Check range of value. */ dValue = round( dValue ); if( dValue < I4_MIN || dValue > I4_MAX ) { return DISP_E_OVERFLOW; } *plOut = (LONG) dValue; return S_OK; } /********************************************************************** * VarI4FromCy [OLEAUT32.62] * Convert currency to signed long */ HRESULT WINAPI VarI4FromCy(CY cyIn, LONG* plOut) { double t = round((((double)cyIn.s.Hi * 4294967296.0) + (double)cyIn.s.Lo) / 10000); if (t > I4_MAX || t < I4_MIN) return DISP_E_OVERFLOW; *plOut = (LONG)t; return S_OK; } /****************************************************************************** * VarR4FromUI1 [OLEAUT32.68] */ HRESULT WINAPI VarR4FromUI1(BYTE bIn, FLOAT* pfltOut) { TRACE("( %X, %p ), stub\n", bIn, pfltOut ); *pfltOut = (FLOAT) bIn; return S_OK; } /****************************************************************************** * VarR4FromI2 [OLEAUT32.69] */ HRESULT WINAPI VarR4FromI2(short sIn, FLOAT* pfltOut) { TRACE("( %d, %p ), stub\n", sIn, pfltOut ); *pfltOut = (FLOAT) sIn; return S_OK; } /****************************************************************************** * VarR4FromI4 [OLEAUT32.70] */ HRESULT WINAPI VarR4FromI4(LONG lIn, FLOAT* pfltOut) { TRACE("( %lx, %p ), stub\n", lIn, pfltOut ); *pfltOut = (FLOAT) lIn; return S_OK; } /****************************************************************************** * VarR4FromR8 [OLEAUT32.71] */ HRESULT WINAPI VarR4FromR8(double dblIn, FLOAT* pfltOut) { TRACE("( %f, %p ), stub\n", dblIn, pfltOut ); /* Check range of value. */ if( dblIn < -(FLT_MAX) || dblIn > FLT_MAX ) { return DISP_E_OVERFLOW; } *pfltOut = (FLOAT) dblIn; return S_OK; } /****************************************************************************** * VarR4FromDate [OLEAUT32.73] */ HRESULT WINAPI VarR4FromDate(DATE dateIn, FLOAT* pfltOut) { TRACE("( %f, %p ), stub\n", dateIn, pfltOut ); /* Check range of value. */ if( dateIn < -(FLT_MAX) || dateIn > FLT_MAX ) { return DISP_E_OVERFLOW; } *pfltOut = (FLOAT) dateIn; return S_OK; } /****************************************************************************** * VarR4FromBool [OLEAUT32.76] */ HRESULT WINAPI VarR4FromBool(VARIANT_BOOL boolIn, FLOAT* pfltOut) { TRACE("( %d, %p ), stub\n", boolIn, pfltOut ); *pfltOut = (FLOAT) boolIn; return S_OK; } /****************************************************************************** * VarR4FromI1 [OLEAUT32.213] */ HRESULT WINAPI VarR4FromI1(CHAR cIn, FLOAT* pfltOut) { TRACE("( %c, %p ), stub\n", cIn, pfltOut ); *pfltOut = (FLOAT) cIn; return S_OK; } /****************************************************************************** * VarR4FromUI2 [OLEAUT32.214] */ HRESULT WINAPI VarR4FromUI2(USHORT uiIn, FLOAT* pfltOut) { TRACE("( %d, %p ), stub\n", uiIn, pfltOut ); *pfltOut = (FLOAT) uiIn; return S_OK; } /****************************************************************************** * VarR4FromUI4 [OLEAUT32.215] */ HRESULT WINAPI VarR4FromUI4(ULONG ulIn, FLOAT* pfltOut) { TRACE("( %ld, %p ), stub\n", ulIn, pfltOut ); *pfltOut = (FLOAT) ulIn; return S_OK; } /****************************************************************************** * VarR4FromStr [OLEAUT32.74] */ HRESULT WINAPI VarR4FromStr(OLECHAR* strIn, LCID lcid, ULONG dwFlags, FLOAT* pfltOut) { double dValue = 0.0; LPSTR pNewString = NULL; TRACE("( %p, %ld, %ld, %p ), stub\n", strIn, lcid, dwFlags, pfltOut ); /* Check if we have a valid argument */ pNewString = HEAP_strdupWtoA( GetProcessHeap(), 0, strIn ); RemoveCharacterFromString( pNewString, "," ); if( IsValidRealString( pNewString ) == FALSE ) { return DISP_E_TYPEMISMATCH; } /* Convert the valid string to a floating point number. */ dValue = atof( pNewString ); /* We don't need the string anymore so free it. */ HeapFree( GetProcessHeap(), 0, pNewString ); /* Check range of value. */ if( dValue < -(FLT_MAX) || dValue > FLT_MAX ) { return DISP_E_OVERFLOW; } *pfltOut = (FLOAT) dValue; return S_OK; } /********************************************************************** * VarR4FromCy [OLEAUT32.72] * Convert currency to float */ HRESULT WINAPI VarR4FromCy(CY cyIn, FLOAT* pfltOut) { *pfltOut = (FLOAT)((((double)cyIn.s.Hi * 4294967296.0) + (double)cyIn.s.Lo) / 10000); return S_OK; } /****************************************************************************** * VarR8FromUI1 [OLEAUT32.68] */ HRESULT WINAPI VarR8FromUI1(BYTE bIn, double* pdblOut) { TRACE("( %d, %p ), stub\n", bIn, pdblOut ); *pdblOut = (double) bIn; return S_OK; } /****************************************************************************** * VarR8FromI2 [OLEAUT32.69] */ HRESULT WINAPI VarR8FromI2(short sIn, double* pdblOut) { TRACE("( %d, %p ), stub\n", sIn, pdblOut ); *pdblOut = (double) sIn; return S_OK; } /****************************************************************************** * VarR8FromI4 [OLEAUT32.70] */ HRESULT WINAPI VarR8FromI4(LONG lIn, double* pdblOut) { TRACE("( %ld, %p ), stub\n", lIn, pdblOut ); *pdblOut = (double) lIn; return S_OK; } /****************************************************************************** * VarR8FromR4 [OLEAUT32.81] */ HRESULT WINAPI VarR8FromR4(FLOAT fltIn, double* pdblOut) { TRACE("( %f, %p ), stub\n", fltIn, pdblOut ); *pdblOut = (double) fltIn; return S_OK; } /****************************************************************************** * VarR8FromDate [OLEAUT32.83] */ HRESULT WINAPI VarR8FromDate(DATE dateIn, double* pdblOut) { TRACE("( %f, %p ), stub\n", dateIn, pdblOut ); *pdblOut = (double) dateIn; return S_OK; } /****************************************************************************** * VarR8FromBool [OLEAUT32.86] */ HRESULT WINAPI VarR8FromBool(VARIANT_BOOL boolIn, double* pdblOut) { TRACE("( %d, %p ), stub\n", boolIn, pdblOut ); *pdblOut = (double) boolIn; return S_OK; } /****************************************************************************** * VarR8FromI1 [OLEAUT32.217] */ HRESULT WINAPI VarR8FromI1(CHAR cIn, double* pdblOut) { TRACE("( %c, %p ), stub\n", cIn, pdblOut ); *pdblOut = (double) cIn; return S_OK; } /****************************************************************************** * VarR8FromUI2 [OLEAUT32.218] */ HRESULT WINAPI VarR8FromUI2(USHORT uiIn, double* pdblOut) { TRACE("( %d, %p ), stub\n", uiIn, pdblOut ); *pdblOut = (double) uiIn; return S_OK; } /****************************************************************************** * VarR8FromUI4 [OLEAUT32.219] */ HRESULT WINAPI VarR8FromUI4(ULONG ulIn, double* pdblOut) { TRACE("( %ld, %p ), stub\n", ulIn, pdblOut ); *pdblOut = (double) ulIn; return S_OK; } /****************************************************************************** * VarR8FromStr [OLEAUT32.84] */ HRESULT WINAPI VarR8FromStr(OLECHAR* strIn, LCID lcid, ULONG dwFlags, double* pdblOut) { double dValue = 0.0; LPSTR pNewString = NULL; TRACE("( %p, %ld, %ld, %p ), stub\n", strIn, lcid, dwFlags, pdblOut ); /* Check if we have a valid argument */ pNewString = HEAP_strdupWtoA( GetProcessHeap(), 0, strIn ); RemoveCharacterFromString( pNewString, "," ); if( IsValidRealString( pNewString ) == FALSE ) { return DISP_E_TYPEMISMATCH; } /* Convert the valid string to a floating point number. */ dValue = atof( pNewString ); /* We don't need the string anymore so free it. */ HeapFree( GetProcessHeap(), 0, pNewString ); *pdblOut = dValue; return S_OK; } /********************************************************************** * VarR8FromCy [OLEAUT32.82] * Convert currency to double */ HRESULT WINAPI VarR8FromCy(CY cyIn, double* pdblOut) { *pdblOut = (double)((((double)cyIn.s.Hi * 4294967296.0) + (double)cyIn.s.Lo) / 10000); return S_OK; } /****************************************************************************** * VarDateFromUI1 [OLEAUT32.] */ HRESULT WINAPI VarDateFromUI1(BYTE bIn, DATE* pdateOut) { TRACE("( %d, %p ), stub\n", bIn, pdateOut ); *pdateOut = (DATE) bIn; return S_OK; } /****************************************************************************** * VarDateFromI2 [OLEAUT32.222] */ HRESULT WINAPI VarDateFromI2(short sIn, DATE* pdateOut) { TRACE("( %d, %p ), stub\n", sIn, pdateOut ); *pdateOut = (DATE) sIn; return S_OK; } /****************************************************************************** * VarDateFromI4 [OLEAUT32.90] */ HRESULT WINAPI VarDateFromI4(LONG lIn, DATE* pdateOut) { TRACE("( %ld, %p ), stub\n", lIn, pdateOut ); if( lIn < DATE_MIN || lIn > DATE_MAX ) { return DISP_E_OVERFLOW; } *pdateOut = (DATE) lIn; return S_OK; } /****************************************************************************** * VarDateFromR4 [OLEAUT32.91] */ HRESULT WINAPI VarDateFromR4(FLOAT fltIn, DATE* pdateOut) { TRACE("( %f, %p ), stub\n", fltIn, pdateOut ); if( ceil(fltIn) < DATE_MIN || floor(fltIn) > DATE_MAX ) { return DISP_E_OVERFLOW; } *pdateOut = (DATE) fltIn; return S_OK; } /****************************************************************************** * VarDateFromR8 [OLEAUT32.92] */ HRESULT WINAPI VarDateFromR8(double dblIn, DATE* pdateOut) { TRACE("( %f, %p ), stub\n", dblIn, pdateOut ); if( ceil(dblIn) < DATE_MIN || floor(dblIn) > DATE_MAX ) { return DISP_E_OVERFLOW; } *pdateOut = (DATE) dblIn; return S_OK; } /****************************************************************************** * VarDateFromStr [OLEAUT32.94] * The string representing the date is composed of two parts, a date and time. * * The format of the time is has follows: * hh[:mm][:ss][AM|PM] * Whitespace can be inserted anywhere between these tokens. A whitespace consists * of space and/or tab characters, which are ignored. * * The formats for the date part are has follows: * mm/[dd/][yy]yy * [dd/]mm/[yy]yy * [yy]yy/mm/dd * January dd[,] [yy]yy * dd January [yy]yy * [yy]yy January dd * Whitespace can be inserted anywhere between these tokens. * * The formats for the date and time string are has follows. * date[whitespace][time] * [time][whitespace]date * * These are the only characters allowed in a string representing a date and time: * [A-Z] [a-z] [0-9] ':' '-' '/' ',' ' ' '\t' */ HRESULT WINAPI VarDateFromStr(OLECHAR* strIn, LCID lcid, ULONG dwFlags, DATE* pdateOut) { HRESULT ret = S_OK; struct tm TM = { 0,0,0,0,0,0,0,0,0 }; TRACE("( %p, %lx, %lx, %p ), stub\n", strIn, lcid, dwFlags, pdateOut ); if( DateTimeStringToTm( strIn, lcid, &TM ) ) { if( TmToDATE( &TM, pdateOut ) == FALSE ) { ret = E_INVALIDARG; } } else { ret = DISP_E_TYPEMISMATCH; } return ret; } /****************************************************************************** * VarDateFromI1 [OLEAUT32.221] */ HRESULT WINAPI VarDateFromI1(CHAR cIn, DATE* pdateOut) { TRACE("( %c, %p ), stub\n", cIn, pdateOut ); *pdateOut = (DATE) cIn; return S_OK; } /****************************************************************************** * VarDateFromUI2 [OLEAUT32.222] */ HRESULT WINAPI VarDateFromUI2(USHORT uiIn, DATE* pdateOut) { TRACE("( %d, %p ), stub\n", uiIn, pdateOut ); if( uiIn > DATE_MAX ) { return DISP_E_OVERFLOW; } *pdateOut = (DATE) uiIn; return S_OK; } /****************************************************************************** * VarDateFromUI4 [OLEAUT32.223] */ HRESULT WINAPI VarDateFromUI4(ULONG ulIn, DATE* pdateOut) { TRACE("( %ld, %p ), stub\n", ulIn, pdateOut ); if( ulIn < DATE_MIN || ulIn > DATE_MAX ) { return DISP_E_OVERFLOW; } *pdateOut = (DATE) ulIn; return S_OK; } /****************************************************************************** * VarDateFromBool [OLEAUT32.96] */ HRESULT WINAPI VarDateFromBool(VARIANT_BOOL boolIn, DATE* pdateOut) { TRACE("( %d, %p ), stub\n", boolIn, pdateOut ); *pdateOut = (DATE) boolIn; return S_OK; } /********************************************************************** * VarDateFromCy [OLEAUT32.93] * Convert currency to date */ HRESULT WINAPI VarDateFromCy(CY cyIn, DATE* pdateOut) { *pdateOut = (DATE)((((double)cyIn.s.Hi * 4294967296.0) + (double)cyIn.s.Lo) / 10000); if (*pdateOut > DATE_MAX || *pdateOut < DATE_MIN) return DISP_E_TYPEMISMATCH; return S_OK; } /****************************************************************************** * VarBstrFromUI1 [OLEAUT32.108] */ HRESULT WINAPI VarBstrFromUI1(BYTE bVal, LCID lcid, ULONG dwFlags, BSTR* pbstrOut) { TRACE("( %d, %ld, %ld, %p ), stub\n", bVal, lcid, dwFlags, pbstrOut ); sprintf( pBuffer, "%d", bVal ); *pbstrOut = StringDupAtoBstr( pBuffer ); return S_OK; } /****************************************************************************** * VarBstrFromI2 [OLEAUT32.109] */ HRESULT WINAPI VarBstrFromI2(short iVal, LCID lcid, ULONG dwFlags, BSTR* pbstrOut) { TRACE("( %d, %ld, %ld, %p ), stub\n", iVal, lcid, dwFlags, pbstrOut ); sprintf( pBuffer, "%d", iVal ); *pbstrOut = StringDupAtoBstr( pBuffer ); return S_OK; } /****************************************************************************** * VarBstrFromI4 [OLEAUT32.110] */ HRESULT WINAPI VarBstrFromI4(LONG lIn, LCID lcid, ULONG dwFlags, BSTR* pbstrOut) { TRACE("( %ld, %ld, %ld, %p ), stub\n", lIn, lcid, dwFlags, pbstrOut ); sprintf( pBuffer, "%ld", lIn ); *pbstrOut = StringDupAtoBstr( pBuffer ); return S_OK; } /****************************************************************************** * VarBstrFromR4 [OLEAUT32.111] */ HRESULT WINAPI VarBstrFromR4(FLOAT fltIn, LCID lcid, ULONG dwFlags, BSTR* pbstrOut) { TRACE("( %f, %ld, %ld, %p ), stub\n", fltIn, lcid, dwFlags, pbstrOut ); sprintf( pBuffer, "%.7g", fltIn ); *pbstrOut = StringDupAtoBstr( pBuffer ); return S_OK; } /****************************************************************************** * VarBstrFromR8 [OLEAUT32.112] */ HRESULT WINAPI VarBstrFromR8(double dblIn, LCID lcid, ULONG dwFlags, BSTR* pbstrOut) { TRACE("( %f, %ld, %ld, %p ), stub\n", dblIn, lcid, dwFlags, pbstrOut ); sprintf( pBuffer, "%.15g", dblIn ); *pbstrOut = StringDupAtoBstr( pBuffer ); return S_OK; } /****************************************************************************** * VarBstrFromCy [OLEAUT32.113] */ HRESULT WINAPI VarBstrFromCy(CY cyIn, LCID lcid, ULONG dwFlags, BSTR *pbstrOut) { /* FIXME */ return E_NOTIMPL; } /****************************************************************************** * VarBstrFromDate [OLEAUT32.114] * * The date is implemented using an 8 byte floating-point number. * Days are represented by whole numbers increments starting with 0.00 has * being December 30 1899, midnight. * The hours are expressed as the fractional part of the number. * December 30 1899 at midnight = 0.00 * January 1 1900 at midnight = 2.00 * January 4 1900 at 6 AM = 5.25 * January 4 1900 at noon = 5.50 * December 29 1899 at midnight = -1.00 * December 18 1899 at midnight = -12.00 * December 18 1899 at 6AM = -12.25 * December 18 1899 at 6PM = -12.75 * December 19 1899 at midnight = -11.00 * The tm structure is as follows: * struct tm { * int tm_sec; seconds after the minute - [0,59] * int tm_min; minutes after the hour - [0,59] * int tm_hour; hours since midnight - [0,23] * int tm_mday; day of the month - [1,31] * int tm_mon; months since January - [0,11] * int tm_year; years * int tm_wday; days since Sunday - [0,6] * int tm_yday; days since January 1 - [0,365] * int tm_isdst; daylight savings time flag * }; */ HRESULT WINAPI VarBstrFromDate(DATE dateIn, LCID lcid, ULONG dwFlags, BSTR* pbstrOut) { struct tm TM = {0,0,0,0,0,0,0,0,0}; TRACE("( %f, %ld, %ld, %p ), stub\n", dateIn, lcid, dwFlags, pbstrOut ); if( DateToTm( dateIn, lcid, &TM ) == FALSE ) { return E_INVALIDARG; } if( dwFlags & VAR_DATEVALUEONLY ) strftime( pBuffer, BUFFER_MAX, "%x", &TM ); else if( dwFlags & VAR_TIMEVALUEONLY ) strftime( pBuffer, BUFFER_MAX, "%X", &TM ); else strftime( pBuffer, BUFFER_MAX, "%x %X", &TM ); *pbstrOut = StringDupAtoBstr( pBuffer ); return S_OK; } /****************************************************************************** * VarBstrFromBool [OLEAUT32.116] */ HRESULT WINAPI VarBstrFromBool(VARIANT_BOOL boolIn, LCID lcid, ULONG dwFlags, BSTR* pbstrOut) { TRACE("( %d, %ld, %ld, %p ), stub\n", boolIn, lcid, dwFlags, pbstrOut ); if( boolIn == VARIANT_FALSE ) { sprintf( pBuffer, "False" ); } else { sprintf( pBuffer, "True" ); } *pbstrOut = StringDupAtoBstr( pBuffer ); return S_OK; } /****************************************************************************** * VarBstrFromI1 [OLEAUT32.229] */ HRESULT WINAPI VarBstrFromI1(CHAR cIn, LCID lcid, ULONG dwFlags, BSTR* pbstrOut) { TRACE("( %c, %ld, %ld, %p ), stub\n", cIn, lcid, dwFlags, pbstrOut ); sprintf( pBuffer, "%d", cIn ); *pbstrOut = StringDupAtoBstr( pBuffer ); return S_OK; } /****************************************************************************** * VarBstrFromUI2 [OLEAUT32.230] */ HRESULT WINAPI VarBstrFromUI2(USHORT uiIn, LCID lcid, ULONG dwFlags, BSTR* pbstrOut) { TRACE("( %d, %ld, %ld, %p ), stub\n", uiIn, lcid, dwFlags, pbstrOut ); sprintf( pBuffer, "%d", uiIn ); *pbstrOut = StringDupAtoBstr( pBuffer ); return S_OK; } /****************************************************************************** * VarBstrFromUI4 [OLEAUT32.231] */ HRESULT WINAPI VarBstrFromUI4(ULONG ulIn, LCID lcid, ULONG dwFlags, BSTR* pbstrOut) { TRACE("( %ld, %ld, %ld, %p ), stub\n", ulIn, lcid, dwFlags, pbstrOut ); sprintf( pBuffer, "%ld", ulIn ); *pbstrOut = StringDupAtoBstr( pBuffer ); return S_OK; } /****************************************************************************** * VarBoolFromUI1 [OLEAUT32.118] */ HRESULT WINAPI VarBoolFromUI1(BYTE bIn, VARIANT_BOOL* pboolOut) { TRACE("( %d, %p ), stub\n", bIn, pboolOut ); if( bIn == 0 ) { *pboolOut = VARIANT_FALSE; } else { *pboolOut = VARIANT_TRUE; } return S_OK; } /****************************************************************************** * VarBoolFromI2 [OLEAUT32.119] */ HRESULT WINAPI VarBoolFromI2(short sIn, VARIANT_BOOL* pboolOut) { TRACE("( %d, %p ), stub\n", sIn, pboolOut ); if( sIn == 0 ) { *pboolOut = VARIANT_FALSE; } else { *pboolOut = VARIANT_TRUE; } return S_OK; } /****************************************************************************** * VarBoolFromI4 [OLEAUT32.120] */ HRESULT WINAPI VarBoolFromI4(LONG lIn, VARIANT_BOOL* pboolOut) { TRACE("( %ld, %p ), stub\n", lIn, pboolOut ); if( lIn == 0 ) { *pboolOut = VARIANT_FALSE; } else { *pboolOut = VARIANT_TRUE; } return S_OK; } /****************************************************************************** * VarBoolFromR4 [OLEAUT32.121] */ HRESULT WINAPI VarBoolFromR4(FLOAT fltIn, VARIANT_BOOL* pboolOut) { TRACE("( %f, %p ), stub\n", fltIn, pboolOut ); if( fltIn == 0.0 ) { *pboolOut = VARIANT_FALSE; } else { *pboolOut = VARIANT_TRUE; } return S_OK; } /****************************************************************************** * VarBoolFromR8 [OLEAUT32.122] */ HRESULT WINAPI VarBoolFromR8(double dblIn, VARIANT_BOOL* pboolOut) { TRACE("( %f, %p ), stub\n", dblIn, pboolOut ); if( dblIn == 0.0 ) { *pboolOut = VARIANT_FALSE; } else { *pboolOut = VARIANT_TRUE; } return S_OK; } /****************************************************************************** * VarBoolFromDate [OLEAUT32.123] */ HRESULT WINAPI VarBoolFromDate(DATE dateIn, VARIANT_BOOL* pboolOut) { TRACE("( %f, %p ), stub\n", dateIn, pboolOut ); if( dateIn == 0.0 ) { *pboolOut = VARIANT_FALSE; } else { *pboolOut = VARIANT_TRUE; } return S_OK; } /****************************************************************************** * VarBoolFromStr [OLEAUT32.125] */ HRESULT WINAPI VarBoolFromStr(OLECHAR* strIn, LCID lcid, ULONG dwFlags, VARIANT_BOOL* pboolOut) { HRESULT ret = S_OK; char* pNewString = NULL; TRACE("( %p, %ld, %ld, %p ), stub\n", strIn, lcid, dwFlags, pboolOut ); pNewString = HEAP_strdupWtoA( GetProcessHeap(), 0, strIn ); if( pNewString == NULL || strlen( pNewString ) == 0 ) { ret = DISP_E_TYPEMISMATCH; } if( ret == S_OK ) { if( strncasecmp( pNewString, "True", strlen( pNewString ) ) == 0 ) { *pboolOut = VARIANT_TRUE; } else if( strncasecmp( pNewString, "False", strlen( pNewString ) ) == 0 ) { *pboolOut = VARIANT_FALSE; } else { /* Try converting the string to a floating point number. */ double dValue = 0.0; HRESULT res = VarR8FromStr( strIn, lcid, dwFlags, &dValue ); if( res != S_OK ) { ret = DISP_E_TYPEMISMATCH; } else if( dValue == 0.0 ) { *pboolOut = VARIANT_FALSE; } else { *pboolOut = VARIANT_TRUE; } } } HeapFree( GetProcessHeap(), 0, pNewString ); return ret; } /****************************************************************************** * VarBoolFromI1 [OLEAUT32.233] */ HRESULT WINAPI VarBoolFromI1(CHAR cIn, VARIANT_BOOL* pboolOut) { TRACE("( %c, %p ), stub\n", cIn, pboolOut ); if( cIn == 0 ) { *pboolOut = VARIANT_FALSE; } else { *pboolOut = VARIANT_TRUE; } return S_OK; } /****************************************************************************** * VarBoolFromUI2 [OLEAUT32.234] */ HRESULT WINAPI VarBoolFromUI2(USHORT uiIn, VARIANT_BOOL* pboolOut) { TRACE("( %d, %p ), stub\n", uiIn, pboolOut ); if( uiIn == 0 ) { *pboolOut = VARIANT_FALSE; } else { *pboolOut = VARIANT_TRUE; } return S_OK; } /****************************************************************************** * VarBoolFromUI4 [OLEAUT32.235] */ HRESULT WINAPI VarBoolFromUI4(ULONG ulIn, VARIANT_BOOL* pboolOut) { TRACE("( %ld, %p ), stub\n", ulIn, pboolOut ); if( ulIn == 0 ) { *pboolOut = VARIANT_FALSE; } else { *pboolOut = VARIANT_TRUE; } return S_OK; } /********************************************************************** * VarBoolFromCy [OLEAUT32.124] * Convert currency to boolean */ HRESULT WINAPI VarBoolFromCy(CY cyIn, VARIANT_BOOL* pboolOut) { if (cyIn.s.Hi || cyIn.s.Lo) *pboolOut = -1; else *pboolOut = 0; return S_OK; } /****************************************************************************** * VarI1FromUI1 [OLEAUT32.244] */ HRESULT WINAPI VarI1FromUI1(BYTE bIn, CHAR* pcOut) { TRACE("( %d, %p ), stub\n", bIn, pcOut ); /* Check range of value. */ if( bIn > CHAR_MAX ) { return DISP_E_OVERFLOW; } *pcOut = (CHAR) bIn; return S_OK; } /****************************************************************************** * VarI1FromI2 [OLEAUT32.245] */ HRESULT WINAPI VarI1FromI2(short uiIn, CHAR* pcOut) { TRACE("( %d, %p ), stub\n", uiIn, pcOut ); if( uiIn > CHAR_MAX ) { return DISP_E_OVERFLOW; } *pcOut = (CHAR) uiIn; return S_OK; } /****************************************************************************** * VarI1FromI4 [OLEAUT32.246] */ HRESULT WINAPI VarI1FromI4(LONG lIn, CHAR* pcOut) { TRACE("( %ld, %p ), stub\n", lIn, pcOut ); if( lIn < CHAR_MIN || lIn > CHAR_MAX ) { return DISP_E_OVERFLOW; } *pcOut = (CHAR) lIn; return S_OK; } /****************************************************************************** * VarI1FromR4 [OLEAUT32.247] */ HRESULT WINAPI VarI1FromR4(FLOAT fltIn, CHAR* pcOut) { TRACE("( %f, %p ), stub\n", fltIn, pcOut ); fltIn = round( fltIn ); if( fltIn < CHAR_MIN || fltIn > CHAR_MAX ) { return DISP_E_OVERFLOW; } *pcOut = (CHAR) fltIn; return S_OK; } /****************************************************************************** * VarI1FromR8 [OLEAUT32.248] */ HRESULT WINAPI VarI1FromR8(double dblIn, CHAR* pcOut) { TRACE("( %f, %p ), stub\n", dblIn, pcOut ); dblIn = round( dblIn ); if( dblIn < CHAR_MIN || dblIn > CHAR_MAX ) { return DISP_E_OVERFLOW; } *pcOut = (CHAR) dblIn; return S_OK; } /****************************************************************************** * VarI1FromDate [OLEAUT32.249] */ HRESULT WINAPI VarI1FromDate(DATE dateIn, CHAR* pcOut) { TRACE("( %f, %p ), stub\n", dateIn, pcOut ); dateIn = round( dateIn ); if( dateIn < CHAR_MIN || dateIn > CHAR_MAX ) { return DISP_E_OVERFLOW; } *pcOut = (CHAR) dateIn; return S_OK; } /****************************************************************************** * VarI1FromStr [OLEAUT32.251] */ HRESULT WINAPI VarI1FromStr(OLECHAR* strIn, LCID lcid, ULONG dwFlags, CHAR* pcOut) { double dValue = 0.0; LPSTR pNewString = NULL; TRACE("( %p, %ld, %ld, %p ), stub\n", strIn, lcid, dwFlags, pcOut ); /* Check if we have a valid argument */ pNewString = HEAP_strdupWtoA( GetProcessHeap(), 0, strIn ); RemoveCharacterFromString( pNewString, "," ); if( IsValidRealString( pNewString ) == FALSE ) { return DISP_E_TYPEMISMATCH; } /* Convert the valid string to a floating point number. */ dValue = atof( pNewString ); /* We don't need the string anymore so free it. */ HeapFree( GetProcessHeap(), 0, pNewString ); /* Check range of value. */ dValue = round( dValue ); if( dValue < CHAR_MIN || dValue > CHAR_MAX ) { return DISP_E_OVERFLOW; } *pcOut = (CHAR) dValue; return S_OK; } /****************************************************************************** * VarI1FromBool [OLEAUT32.253] */ HRESULT WINAPI VarI1FromBool(VARIANT_BOOL boolIn, CHAR* pcOut) { TRACE("( %d, %p ), stub\n", boolIn, pcOut ); *pcOut = (CHAR) boolIn; return S_OK; } /****************************************************************************** * VarI1FromUI2 [OLEAUT32.254] */ HRESULT WINAPI VarI1FromUI2(USHORT uiIn, CHAR* pcOut) { TRACE("( %d, %p ), stub\n", uiIn, pcOut ); if( uiIn > CHAR_MAX ) { return DISP_E_OVERFLOW; } *pcOut = (CHAR) uiIn; return S_OK; } /****************************************************************************** * VarI1FromUI4 [OLEAUT32.255] */ HRESULT WINAPI VarI1FromUI4(ULONG ulIn, CHAR* pcOut) { TRACE("( %ld, %p ), stub\n", ulIn, pcOut ); if( ulIn > CHAR_MAX ) { return DISP_E_OVERFLOW; } *pcOut = (CHAR) ulIn; return S_OK; } /********************************************************************** * VarI1FromCy [OLEAUT32.250] * Convert currency to signed char */ HRESULT WINAPI VarI1FromCy(CY cyIn, CHAR* pcOut) { double t = round((((double)cyIn.s.Hi * 4294967296.0) + (double)cyIn.s.Lo) / 10000); if (t > CHAR_MAX || t < CHAR_MIN) return DISP_E_OVERFLOW; *pcOut = (CHAR)t; return S_OK; } /****************************************************************************** * VarUI2FromUI1 [OLEAUT32.257] */ HRESULT WINAPI VarUI2FromUI1(BYTE bIn, USHORT* puiOut) { TRACE("( %d, %p ), stub\n", bIn, puiOut ); *puiOut = (USHORT) bIn; return S_OK; } /****************************************************************************** * VarUI2FromI2 [OLEAUT32.258] */ HRESULT WINAPI VarUI2FromI2(short uiIn, USHORT* puiOut) { TRACE("( %d, %p ), stub\n", uiIn, puiOut ); if( uiIn < UI2_MIN ) { return DISP_E_OVERFLOW; } *puiOut = (USHORT) uiIn; return S_OK; } /****************************************************************************** * VarUI2FromI4 [OLEAUT32.259] */ HRESULT WINAPI VarUI2FromI4(LONG lIn, USHORT* puiOut) { TRACE("( %ld, %p ), stub\n", lIn, puiOut ); if( lIn < UI2_MIN || lIn > UI2_MAX ) { return DISP_E_OVERFLOW; } *puiOut = (USHORT) lIn; return S_OK; } /****************************************************************************** * VarUI2FromR4 [OLEAUT32.260] */ HRESULT WINAPI VarUI2FromR4(FLOAT fltIn, USHORT* puiOut) { TRACE("( %f, %p ), stub\n", fltIn, puiOut ); fltIn = round( fltIn ); if( fltIn < UI2_MIN || fltIn > UI2_MAX ) { return DISP_E_OVERFLOW; } *puiOut = (USHORT) fltIn; return S_OK; } /****************************************************************************** * VarUI2FromR8 [OLEAUT32.261] */ HRESULT WINAPI VarUI2FromR8(double dblIn, USHORT* puiOut) { TRACE("( %f, %p ), stub\n", dblIn, puiOut ); dblIn = round( dblIn ); if( dblIn < UI2_MIN || dblIn > UI2_MAX ) { return DISP_E_OVERFLOW; } *puiOut = (USHORT) dblIn; return S_OK; } /****************************************************************************** * VarUI2FromDate [OLEAUT32.262] */ HRESULT WINAPI VarUI2FromDate(DATE dateIn, USHORT* puiOut) { TRACE("( %f, %p ), stub\n", dateIn, puiOut ); dateIn = round( dateIn ); if( dateIn < UI2_MIN || dateIn > UI2_MAX ) { return DISP_E_OVERFLOW; } *puiOut = (USHORT) dateIn; return S_OK; } /****************************************************************************** * VarUI2FromStr [OLEAUT32.264] */ HRESULT WINAPI VarUI2FromStr(OLECHAR* strIn, LCID lcid, ULONG dwFlags, USHORT* puiOut) { double dValue = 0.0; LPSTR pNewString = NULL; TRACE("( %p, %ld, %ld, %p ), stub\n", strIn, lcid, dwFlags, puiOut ); /* Check if we have a valid argument */ pNewString = HEAP_strdupWtoA( GetProcessHeap(), 0, strIn ); RemoveCharacterFromString( pNewString, "," ); if( IsValidRealString( pNewString ) == FALSE ) { return DISP_E_TYPEMISMATCH; } /* Convert the valid string to a floating point number. */ dValue = atof( pNewString ); /* We don't need the string anymore so free it. */ HeapFree( GetProcessHeap(), 0, pNewString ); /* Check range of value. */ dValue = round( dValue ); if( dValue < UI2_MIN || dValue > UI2_MAX ) { return DISP_E_OVERFLOW; } *puiOut = (USHORT) dValue; return S_OK; } /****************************************************************************** * VarUI2FromBool [OLEAUT32.266] */ HRESULT WINAPI VarUI2FromBool(VARIANT_BOOL boolIn, USHORT* puiOut) { TRACE("( %d, %p ), stub\n", boolIn, puiOut ); *puiOut = (USHORT) boolIn; return S_OK; } /****************************************************************************** * VarUI2FromI1 [OLEAUT32.267] */ HRESULT WINAPI VarUI2FromI1(CHAR cIn, USHORT* puiOut) { TRACE("( %c, %p ), stub\n", cIn, puiOut ); *puiOut = (USHORT) cIn; return S_OK; } /****************************************************************************** * VarUI2FromUI4 [OLEAUT32.268] */ HRESULT WINAPI VarUI2FromUI4(ULONG ulIn, USHORT* puiOut) { TRACE("( %ld, %p ), stub\n", ulIn, puiOut ); if( ulIn < UI2_MIN || ulIn > UI2_MAX ) { return DISP_E_OVERFLOW; } *puiOut = (USHORT) ulIn; return S_OK; } /****************************************************************************** * VarUI4FromStr [OLEAUT32.277] */ HRESULT WINAPI VarUI4FromStr(OLECHAR* strIn, LCID lcid, ULONG dwFlags, ULONG* pulOut) { double dValue = 0.0; LPSTR pNewString = NULL; TRACE("( %p, %ld, %ld, %p ), stub\n", strIn, lcid, dwFlags, pulOut ); /* Check if we have a valid argument */ pNewString = HEAP_strdupWtoA( GetProcessHeap(), 0, strIn ); RemoveCharacterFromString( pNewString, "," ); if( IsValidRealString( pNewString ) == FALSE ) { return DISP_E_TYPEMISMATCH; } /* Convert the valid string to a floating point number. */ dValue = atof( pNewString ); /* We don't need the string anymore so free it. */ HeapFree( GetProcessHeap(), 0, pNewString ); /* Check range of value. */ dValue = round( dValue ); if( dValue < UI4_MIN || dValue > UI4_MAX ) { return DISP_E_OVERFLOW; } *pulOut = (ULONG) dValue; return S_OK; } /********************************************************************** * VarUI2FromCy [OLEAUT32.263] * Convert currency to unsigned short */ HRESULT WINAPI VarUI2FromCy(CY cyIn, USHORT* pusOut) { double t = round((((double)cyIn.s.Hi * 4294967296.0) + (double)cyIn.s.Lo) / 10000); if (t > UI2_MAX || t < UI2_MIN) return DISP_E_OVERFLOW; *pusOut = (USHORT)t; return S_OK; } /****************************************************************************** * VarUI4FromUI1 [OLEAUT32.270] */ HRESULT WINAPI VarUI4FromUI1(BYTE bIn, ULONG* pulOut) { TRACE("( %d, %p ), stub\n", bIn, pulOut ); *pulOut = (USHORT) bIn; return S_OK; } /****************************************************************************** * VarUI4FromI2 [OLEAUT32.271] */ HRESULT WINAPI VarUI4FromI2(short uiIn, ULONG* pulOut) { TRACE("( %d, %p ), stub\n", uiIn, pulOut ); if( uiIn < UI4_MIN ) { return DISP_E_OVERFLOW; } *pulOut = (ULONG) uiIn; return S_OK; } /****************************************************************************** * VarUI4FromI4 [OLEAUT32.272] */ HRESULT WINAPI VarUI4FromI4(LONG lIn, ULONG* pulOut) { TRACE("( %ld, %p ), stub\n", lIn, pulOut ); if( lIn < UI4_MIN ) { return DISP_E_OVERFLOW; } *pulOut = (ULONG) lIn; return S_OK; } /****************************************************************************** * VarUI4FromR4 [OLEAUT32.273] */ HRESULT WINAPI VarUI4FromR4(FLOAT fltIn, ULONG* pulOut) { fltIn = round( fltIn ); if( fltIn < UI4_MIN || fltIn > UI4_MAX ) { return DISP_E_OVERFLOW; } *pulOut = (ULONG) fltIn; return S_OK; } /****************************************************************************** * VarUI4FromR8 [OLEAUT32.274] */ HRESULT WINAPI VarUI4FromR8(double dblIn, ULONG* pulOut) { TRACE("( %f, %p ), stub\n", dblIn, pulOut ); dblIn = round( dblIn ); if( dblIn < UI4_MIN || dblIn > UI4_MAX ) { return DISP_E_OVERFLOW; } *pulOut = (ULONG) dblIn; return S_OK; } /****************************************************************************** * VarUI4FromDate [OLEAUT32.275] */ HRESULT WINAPI VarUI4FromDate(DATE dateIn, ULONG* pulOut) { TRACE("( %f, %p ), stub\n", dateIn, pulOut ); dateIn = round( dateIn ); if( dateIn < UI4_MIN || dateIn > UI4_MAX ) { return DISP_E_OVERFLOW; } *pulOut = (ULONG) dateIn; return S_OK; } /****************************************************************************** * VarUI4FromBool [OLEAUT32.279] */ HRESULT WINAPI VarUI4FromBool(VARIANT_BOOL boolIn, ULONG* pulOut) { TRACE("( %d, %p ), stub\n", boolIn, pulOut ); *pulOut = (ULONG) boolIn; return S_OK; } /****************************************************************************** * VarUI4FromI1 [OLEAUT32.280] */ HRESULT WINAPI VarUI4FromI1(CHAR cIn, ULONG* pulOut) { TRACE("( %c, %p ), stub\n", cIn, pulOut ); *pulOut = (ULONG) cIn; return S_OK; } /****************************************************************************** * VarUI4FromUI2 [OLEAUT32.281] */ HRESULT WINAPI VarUI4FromUI2(USHORT uiIn, ULONG* pulOut) { TRACE("( %d, %p ), stub\n", uiIn, pulOut ); *pulOut = (ULONG) uiIn; return S_OK; } /********************************************************************** * VarUI4FromCy [OLEAUT32.276] * Convert currency to unsigned long */ HRESULT WINAPI VarUI4FromCy(CY cyIn, ULONG* pulOut) { double t = round((((double)cyIn.s.Hi * 4294967296.0) + (double)cyIn.s.Lo) / 10000); if (t > UI4_MAX || t < UI4_MIN) return DISP_E_OVERFLOW; *pulOut = (ULONG)t; return S_OK; } /********************************************************************** * VarCyFromUI1 [OLEAUT32.98] * Convert unsigned char to currency */ HRESULT WINAPI VarCyFromUI1(BYTE bIn, CY* pcyOut) { pcyOut->s.Hi = 0; pcyOut->s.Lo = ((ULONG)bIn) * 10000; return S_OK; } /********************************************************************** * VarCyFromI2 [OLEAUT32.99] * Convert signed short to currency */ HRESULT WINAPI VarCyFromI2(short sIn, CY* pcyOut) { if (sIn < 0) pcyOut->s.Hi = -1; else pcyOut->s.Hi = 0; pcyOut->s.Lo = ((ULONG)sIn) * 10000; return S_OK; } /********************************************************************** * VarCyFromI4 [OLEAUT32.100] * Convert signed long to currency */ HRESULT WINAPI VarCyFromI4(LONG lIn, CY* pcyOut) { double t = (double)lIn * (double)10000; pcyOut->s.Hi = (LONG)(t / (double)4294967296.0); pcyOut->s.Lo = (ULONG)fmod(t, (double)4294967296.0); if (lIn < 0) pcyOut->s.Hi--; return S_OK; } /********************************************************************** * VarCyFromR4 [OLEAUT32.101] * Convert float to currency */ HRESULT WINAPI VarCyFromR4(FLOAT fltIn, CY* pcyOut) { double t = round((double)fltIn * (double)10000); pcyOut->s.Hi = (LONG)(t / (double)4294967296.0); pcyOut->s.Lo = (ULONG)fmod(t, (double)4294967296.0); if (fltIn < 0) pcyOut->s.Hi--; return S_OK; } /********************************************************************** * VarCyFromR8 [OLEAUT32.102] * Convert double to currency */ HRESULT WINAPI VarCyFromR8(double dblIn, CY* pcyOut) { double t = round(dblIn * (double)10000); pcyOut->s.Hi = (LONG)(t / (double)4294967296.0); pcyOut->s.Lo = (ULONG)fmod(t, (double)4294967296.0); if (dblIn < 0) pcyOut->s.Hi--; return S_OK; } /********************************************************************** * VarCyFromDate [OLEAUT32.103] * Convert date to currency */ HRESULT WINAPI VarCyFromDate(DATE dateIn, CY* pcyOut) { double t = round((double)dateIn * (double)10000); pcyOut->s.Hi = (LONG)(t / (double)4294967296.0); pcyOut->s.Lo = (ULONG)fmod(t, (double)4294967296.0); if (dateIn < 0) pcyOut->s.Hi--; return S_OK; } /********************************************************************** * VarCyFromStr [OLEAUT32.104] */ HRESULT WINAPI VarCyFromStr(OLECHAR *strIn, LCID lcid, ULONG dwFlags, CY *pcyOut) { /* FIXME */ return E_NOTIMPL; } /********************************************************************** * VarCyFromBool [OLEAUT32.106] * Convert boolean to currency */ HRESULT WINAPI VarCyFromBool(VARIANT_BOOL boolIn, CY* pcyOut) { if (boolIn < 0) pcyOut->s.Hi = -1; else pcyOut->s.Hi = 0; pcyOut->s.Lo = (ULONG)boolIn * (ULONG)10000; return S_OK; } /********************************************************************** * VarCyFromI1 [OLEAUT32.225] * Convert signed char to currency */ HRESULT WINAPI VarCyFromI1(CHAR cIn, CY* pcyOut) { if (cIn < 0) pcyOut->s.Hi = -1; else pcyOut->s.Hi = 0; pcyOut->s.Lo = (ULONG)cIn * (ULONG)10000; return S_OK; } /********************************************************************** * VarCyFromUI2 [OLEAUT32.226] * Convert unsigned short to currency */ HRESULT WINAPI VarCyFromUI2(USHORT usIn, CY* pcyOut) { pcyOut->s.Hi = 0; pcyOut->s.Lo = (ULONG)usIn * (ULONG)10000; return S_OK; } /********************************************************************** * VarCyFromUI4 [OLEAUT32.227] * Convert unsigned long to currency */ HRESULT WINAPI VarCyFromUI4(ULONG ulIn, CY* pcyOut) { double t = (double)ulIn * (double)10000; pcyOut->s.Hi = (LONG)(t / (double)4294967296.0); pcyOut->s.Lo = (ULONG)fmod(t, (double)4294967296.0); return S_OK; } /********************************************************************** * DosDateTimeToVariantTime [OLEAUT32.14] * Convert dos representation of time to the date and time representation * stored in a variant. */ INT WINAPI DosDateTimeToVariantTime(USHORT wDosDate, USHORT wDosTime, DATE *pvtime) { struct tm t; TRACE("( 0x%x, 0x%x, 0x%p ), stub\n", wDosDate, wDosTime, pvtime ); t.tm_sec = (wDosTime & 0x001f) * 2; t.tm_min = (wDosTime & 0x07e0) >> 5; t.tm_hour = (wDosTime & 0xf800) >> 11; t.tm_mday = (wDosDate & 0x001f); t.tm_mon = (wDosDate & 0x01e0) >> 5; t.tm_year = ((wDosDate & 0xfe00) >> 9) + 1980; return TmToDATE( &t, pvtime ); } wine-20000526/dlls/olecli/0040755000175000001440000000000007113604205014650 5ustar julliarduserswine-20000526/dlls/olecli/.cvsignore0100644000175000001440000000006307045213573016654 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libolecli32.so.1.0 wine-20000526/dlls/olecli/Makefile.in0100644000175000001440000000042007060456112016711 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = olecli32 SOVERSION = 1.0 ALTNAMES = olecli IMPORTS = olesvr32 ole32 SPEC_SRCS = olecli32.spec olecli.spec C_SRCS = \ olecli_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/olecli/olecli.spec0100644000175000001440000001062606771226506017012 0ustar julliardusersname olecli type win16 #1 WEP 2 stub OLEDELETE 3 stub OLESAVETOSTREAM 4 stub OLELOADFROMSTREAM 6 stub OLECLONE 7 stub OLECOPYFROMLINK 8 stub OLEEQUAL 9 pascal16 OleQueryLinkFromClip(segstr word word) OleQueryLinkFromClip16 10 pascal16 OleQueryCreateFromClip(segstr word word) OleQueryCreateFromClip16 11 pascal16 OleCreateLinkFromClip (segstr segptr long segstr long word word) OleCreateLinkFromClip16 12 pascal16 OleCreateFromClip(segstr segptr long segstr long word word) OleCreateFromClip16 13 stub OLECOPYTOCLIPBOARD 14 pascal16 OleQueryType(segptr segptr) OleQueryType16 15 stub OLESETHOSTNAMES 16 stub OLESETTARGETDEVICE 17 stub OLESETBOUNDS 18 stub OLEQUERYBOUNDS 19 stub OLEDRAW 20 stub OLEQUERYOPEN 21 stub OLEACTIVATE 22 stub OLEUPDATE 23 stub OLERECONNECT 24 stub OLEGETLINKUPDATEOPTIONS 25 stub OLESETLINKUPDATEOPTIONS 26 stub OLEENUMFORMATS 27 stub OLECLOSE 28 stub OLEGETDATA 29 stub OLESETDATA 30 stub OLEQUERYPROTOCOL 31 stub OLEQUERYOUTOFDATE 32 stub OLEOBJECTCONVERT 33 stub OLECREATEFROMTEMPLATE 34 stub OLECREATE 35 stub OLEQUERYRELEASESTATUS 36 stub OLEQUERYRELEASEERROR 37 stub OLEQUERYRELEASEMETHOD 38 stub OLECREATEFROMFILE 39 stub OLECREATELINKFROMFILE 40 stub OLERELEASE 41 pascal OleRegisterClientDoc(ptr ptr long ptr) OleRegisterClientDoc16 42 pascal OleRevokeClientDoc(long) OleRevokeClientDoc16 43 pascal OleRenameClientDoc(long ptr) OleRenameClientDoc16 44 pascal16 OleRevertClientDoc(long) OleRevertClientDoc16 45 stub OLESAVEDCLIENTDOC 46 stub OLERENAME 47 pascal16 OleEnumObjects(long segptr) OleEnumObjects16 48 stub OLEQUERYNAME 49 stub OLESETCOLORSCHEME 50 stub OLEREQUESTDATA 54 stub OLELOCKSERVER 55 stub OLEUNLOCKSERVER 56 stub OLEQUERYSIZE 57 stub OLEEXECUTE 58 stub OLECREATEINVISIBLE 59 stub OLEQUERYCLIENTVERSION 60 pascal16 OleIsDcMeta(word) OleIsDcMeta16 100 stub DOCWNDPROC 101 stub SRVRWNDPROC 102 stub MFCALLBACKFUNC 110 stub DEFLOADFROMSTREAM 111 stub DEFCREATEFROMCLIP 112 stub DEFCREATELINKFROMCLIP 113 stub DEFCREATEFROMTEMPLATE 114 stub DEFCREATE 115 stub DEFCREATEFROMFILE 116 stub DEFCREATELINKFROMFILE 117 stub DEFCREATEINVISIBLE 200 stub LERELEASE 201 stub LESHOW 202 stub LEGETDATA 203 stub LESETDATA 204 stub LESETHOSTNAMES 205 stub LESETTARGETDEVICE 206 stub LESETBOUNDS 207 stub LESAVETOSTREAM 208 stub LECLONE 209 stub LECOPYFROMLINK 210 stub LEEQUAL 211 stub LECOPY 212 stub LEQUERYTYPE 213 stub LEQUERYBOUNDS 214 stub LEDRAW 215 stub LEQUERYOPEN 216 stub LEACTIVATE 218 stub LEUPDATE 219 stub LERECONNECT 220 stub LEENUMFORMAT 221 stub LEQUERYPROTOCOL 222 stub LEQUERYOUTOFDATE 223 stub LEOBJECTCONVERT 224 stub LECHANGEDATA 225 stub LECLOSE 226 stub LEGETUPDATEOPTIONS 227 stub LESETUPDATEOPTIONS 228 stub LEEXECUTE 229 stub LEOBJECTLONG 230 stub LECREATEINVISIBLE 300 stub MFRELEASE 301 stub MFGETDATA 302 stub MFSAVETOSTREAM 303 stub MFCLONE 304 stub MFEQUAL 305 stub MFCOPY 307 stub MFQUERYBOUNDS 308 stub MFDRAW 309 stub MFENUMFORMAT 310 stub MFCHANGEDATA 400 stub BMRELEASE 401 stub BMGETDATA 402 stub BMSAVETOSTREAM 403 stub BMCLONE 404 stub BMEQUAL 405 stub BMCOPY 407 stub BMQUERYBOUNDS 408 stub BMDRAW 409 stub BMENUMFORMAT 410 stub BMCHANGEDATA 500 stub DIBRELEASE 501 stub DIBGETDATA 502 stub DIBSAVETOSTREAM 503 stub DIBCLONE 504 stub DIBEQUAL 505 stub DIBCOPY 507 stub DIBQUERYBOUNDS 508 stub DIBDRAW 509 stub DIBENUMFORMAT 510 stub DIBCHANGEDATA 600 stub GENRELEASE 601 stub GENGETDATA 602 stub GENSETDATA 603 stub GENSAVETOSTREAM 604 stub GENCLONE 605 stub GENEQUAL 606 stub GENCOPY 608 stub GENQUERYBOUNDS 609 stub GENDRAW 610 stub GENENUMFORMAT 611 stub GENCHANGEDATA 701 stub ERRSHOW 702 stub ERRSETDATA 703 stub ERRSETHOSTNAMES 704 stub ERRSETTARGETDEVICE 705 stub ERRSETBOUNDS 706 stub ERRCOPYFROMLINK 707 stub ERRQUERYOPEN 708 stub ERRACTIVATE 709 stub ERRCLOSE 710 stub ERRUPDATE 711 stub ERRRECONNECT 712 stub ERRQUERYPROTOCOL 713 stub ERRQUERYOUTOFDATE 714 stub ERROBJECTCONVERT 715 stub ERRGETUPDATEOPTIONS 716 stub ERRSETUPDATEOPTIONS 717 stub ERREXECUTE 718 stub ERROBJECTLONG 800 stub PBLOADFROMSTREAM 801 stub PBCREATEFROMCLIP 802 stub PBCREATELINKFROMCLIP 803 stub PBCREATEFROMTEMPLATE 804 stub PBCREATE 805 stub PBDRAW 806 stub PBQUERYBOUNDS 807 stub PBCOPYTOCLIPBOARD 808 stub PBCREATEFROMFILE 809 stub PBCREATELINKFROMFILE 810 stub PBENUMFORMATS 811 stub PBGETDATA 812 stub PBCREATEINVISIBLE 910 stub OBJQUERYNAME 911 stub OBJRENAME 912 stub OBJQUERYTYPE 913 stub OBJQUERYSIZE 950 stub CONNECTDLGPROC 951 stub SETNETNAME 952 stub CHECKNETDRIVE 953 stub SETNEXTNETDRIVE 954 stub GETTASKVISIBLEWINDOW wine-20000526/dlls/olecli/olecli32.spec0100644000175000001440000000376707077362252017166 0ustar julliardusersname olecli32 type win32 import ole32.dll import olesvr32.dll 1 stub WEP 2 stub OleDelete 3 stdcall OleSaveToStream(ptr ptr) OleSaveToStream 4 stdcall OleLoadFromStream(ptr ptr ptr) OleLoadFromStream 6 stub OleClone 7 stub OleCopyFromLink 8 stub OleEqual 9 stdcall OleQueryLinkFromClip(str long long) OleQueryLinkFromClip 10 stdcall OleQueryCreateFromClip(str long long) OleQueryCreateFromClip 11 stdcall OleCreateLinkFromClip(str ptr long str ptr long long) OleCreateLinkFromClip 12 stdcall OleCreateFromClip(str ptr long str ptr long long) OleCreateFromClip 13 stub OleCopyToClipboard 14 stdcall OleQueryType(ptr ptr) OleQueryType 15 stdcall OleSetHostNames(ptr str str) OleSetHostNames 16 stub OleSetTargetDevice 17 stub OleSetBounds 18 stub OleQueryBounds 19 stub OleDraw 20 stub OleQueryOpen 21 stub OleActivate 22 stub OleUpdate 23 stub OleReconnect 24 stub OleGetLinkUpdateOptions 25 stub OleSetLinkUpdateOptions 26 stub OleEnumFormats 27 stub OleClose 28 stub OleGetData 29 stub OleSetData 30 stub OleQueryProtocol 31 stub OleQueryOutOfDate 32 stub OleObjectConvert 33 stub OleCreateFromTemplate 34 stdcall OleCreate(ptr ptr long ptr ptr ptr ptr) OleCreate 35 stub OleQueryReleaseStatus 36 stub OleQueryReleaseError 37 stub OleQueryReleaseMethod 38 stdcall OleCreateFromFile(ptr ptr ptr long ptr ptr ptr ptr) OleCreateFromFile 39 stub OleCreateLinkFromFile 40 stub OleRelease 41 stdcall OleRegisterClientDoc(str str long ptr) OleRegisterClientDoc 42 stdcall OleRevokeClientDoc(long) OleRevokeClientDoc 43 stdcall OleRenameClientDoc(long str) OleRenameClientDoc 44 stub OleRevertClientDoc 45 stub OleSavedClientDoc 46 stub OleRename 47 stub OleEnumObjects 48 stub OleQueryName 49 stub OleSetColorScheme 50 stub OleRequestData 54 stub OleLockServer 55 stub OleUnlockServer 56 stub OleQuerySize 57 stub OleExecute 58 stub OleCreateInvisible 59 stub OleQueryClientVersion 60 stdcall OleIsDcMeta(long) OleIsDcMeta wine-20000526/dlls/olecli/olecli_main.c0100644000175000001440000001643507070212245017276 0ustar julliardusers/* * OLECLI library * * Copyright 1995 Martin von Loewis */ /* At the moment, these are only empty stubs. */ #include "windef.h" #include "wingdi.h" #include "wtypes.h" #include "ole.h" #include "gdi.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ole); extern LONG OLE_current_handle; /****************************************************************************** * OleRegisterClientDoc16 [OLECLI.41] */ OLESTATUS WINAPI OleRegisterClientDoc16(LPCSTR classname, LPCSTR docname, LONG reserved, LHCLIENTDOC *hRet ) { FIXME("(%s,%s,...): stub\n",classname,docname); *hRet=++OLE_current_handle; return OLE_OK; } /****************************************************************************** * OleRegisterClientDoc [OLECLI32.41] */ OLESTATUS WINAPI OleRegisterClientDoc(LPCSTR classname, LPCSTR docname, LONG reserved, LHCLIENTDOC *hRet ) { FIXME("(%s,%s,...): stub\n",classname,docname); *hRet=++OLE_current_handle; return OLE_OK; } /****************************************************************************** * OleRenameClientDoc16 [OLECLI.43] */ OLESTATUS WINAPI OleRenameClientDoc16(LHCLIENTDOC hDoc, LPCSTR newName) { FIXME("(%ld,%s,...): stub\n",hDoc, newName); return OLE_OK; } /****************************************************************************** * OleRenameClientDoc [OLECLI32.43] */ OLESTATUS WINAPI OleRenameClientDoc(LHCLIENTDOC hDoc, LPCSTR newName) { FIXME("(%ld,%s,...): stub\n",hDoc, newName); return OLE_OK; } /****************************************************************************** * OleRevokeClientDoc16 [OLECLI.42] */ OLESTATUS WINAPI OleRevokeClientDoc16(LHCLIENTDOC hServerDoc) { FIXME("(%ld): stub\n",hServerDoc); return OLE_OK; } /****************************************************************************** * OleRevokeClientDoc [OLECLI32.42] */ OLESTATUS WINAPI OleRevokeClientDoc(LHCLIENTDOC hServerDoc) { FIXME("(%ld): stub\n",hServerDoc); return OLE_OK; } /****************************************************************************** * OleRevertClientDoc16 [OLECLI.44] */ OLESTATUS WINAPI OleRevertClientDoc16(LHCLIENTDOC hServerDoc) { FIXME("(%ld): stub\n", hServerDoc); return OLE_OK; } /****************************************************************************** * OleEnumObjects16 [OLECLI.47] */ OLESTATUS WINAPI OleEnumObjects16(LHCLIENTDOC hServerDoc, SEGPTR data) { FIXME("(%ld, %04x:%04x): stub\n", hServerDoc, HIWORD(data), LOWORD(data)); return OLE_OK; } /****************************************************************************** * OleCreateLinkFromClip16 [OLECLI.11] */ OLESTATUS WINAPI OleCreateLinkFromClip16( LPCSTR name, LPOLECLIENT olecli, LHCLIENTDOC hclientdoc, LPCSTR xname, LPOLEOBJECT *lpoleob, UINT16 render, UINT16 clipformat ) { FIXME("(%s, %04x:%04x, %ld, %s, %04x:%04x, %d, %d): stub!\n", (char *)PTR_SEG_TO_LIN(name), HIWORD(olecli), LOWORD(olecli), hclientdoc, (char *)PTR_SEG_TO_LIN(xname), HIWORD(lpoleob), LOWORD(lpoleob), render, clipformat); return OLE_OK; } /****************************************************************************** * OleCreateLinkFromClip [OLECLI32.11] */ OLESTATUS WINAPI OleCreateLinkFromClip( LPCSTR name,LPOLECLIENT olecli,LHCLIENTDOC hclientdoc,LPCSTR xname, LPOLEOBJECT *lpoleob,OLEOPT_RENDER render,OLECLIPFORMAT clipformat ) { FIXME("(%s,%p,%08lx,%s,%p,%d,%ld): stub!\n", name,olecli,hclientdoc,xname,lpoleob,render,clipformat); return OLE_OK; } /****************************************************************************** * OleQueryLinkFromClip16 [OLECLI.9] */ OLESTATUS WINAPI OleQueryLinkFromClip16(LPCSTR name, UINT16 render, UINT16 clipformat) { FIXME("(%s, %d, %d): stub!\n", (char*)(PTR_SEG_TO_LIN(name)), render, clipformat); return OLE_OK; } /****************************************************************************** * OleQueryLinkFromClip [OLECLI32.9] */ OLESTATUS WINAPI OleQueryLinkFromClip(LPCSTR name,OLEOPT_RENDER render,OLECLIPFORMAT clipformat) { FIXME("(%s,%d,%ld): stub!\n",name,render,clipformat); return OLE_OK; } /****************************************************************************** * OleQueryCreateFromClip16 [OLECLI.10] */ OLESTATUS WINAPI OleQueryCreateFromClip16(LPCSTR name, UINT16 render, UINT16 clipformat) { FIXME("(%s, %d, %d): stub!\n", (char*)(PTR_SEG_TO_LIN(name)), render, clipformat); return OLE_OK; } /****************************************************************************** * OleQueryCreateFromClip [OLECLI32.10] */ OLESTATUS WINAPI OleQueryCreateFromClip(LPCSTR name,OLEOPT_RENDER render,OLECLIPFORMAT clipformat) { FIXME("(%s,%d,%ld): stub!\n",name,render,clipformat); return OLE_OK; } /****************************************************************************** * OleIsDcMeta16 [OLECLI.60] */ BOOL16 WINAPI OleIsDcMeta16(HDC16 hdc) { TRACE("(%04x)\n",hdc); if (GDI_GetObjPtr( hdc, METAFILE_DC_MAGIC ) != 0) { GDI_HEAP_UNLOCK( hdc ); return TRUE; } return FALSE; } /****************************************************************************** * OleIsDcMeta [OLECLI32.60] */ BOOL WINAPI OleIsDcMeta(HDC hdc) { TRACE("(%04x)\n",hdc); if (GDI_GetObjPtr( hdc, METAFILE_DC_MAGIC ) != 0) { GDI_HEAP_UNLOCK( hdc ); return TRUE; } return FALSE; } /****************************************************************************** * OleSetHostNames [OLECLI32.15] */ OLESTATUS WINAPI OleSetHostNames(LPOLEOBJECT oleob,LPCSTR name1,LPCSTR name2) { FIXME("(%p,%s,%s): stub\n",oleob,name1,name2); return OLE_OK; } /****************************************************************************** * OleQueryType16 [OLECLI.14] */ OLESTATUS WINAPI OleQueryType16(LPOLEOBJECT oleob, SEGPTR xlong) { FIXME("(%p, %p): stub!\n", PTR_SEG_TO_LIN(oleob), PTR_SEG_TO_LIN(xlong)); return OLE_OK; } /****************************************************************************** * OleQueryType [OLECLI32.14] */ OLESTATUS WINAPI OleQueryType(LPOLEOBJECT oleob,LONG*xlong) { FIXME("(%p,%p): stub!\n",oleob,xlong); if (!oleob) return 0x10; TRACE("Calling OLEOBJECT.QueryType (%p) (%p,%p)\n", oleob->lpvtbl->QueryType,oleob,xlong); return oleob->lpvtbl->QueryType(oleob,xlong); } /****************************************************************************** * OleCreateFromClip16 [OLECLI.12] */ OLESTATUS WINAPI OleCreateFromClip16( LPCSTR name, LPOLECLIENT olecli, LHCLIENTDOC hclientdoc, LPCSTR xname, LPOLEOBJECT *lpoleob, UINT16 render, UINT16 clipformat ) { FIXME("(%s, %04x:%04x, %ld, %s, %04x:%04x, %d, %d): stub!\n", (char *)PTR_SEG_TO_LIN(name), HIWORD(olecli), LOWORD(olecli), hclientdoc, (char *)PTR_SEG_TO_LIN(xname), HIWORD(lpoleob), LOWORD(lpoleob), render, clipformat); return OLE_OK; } /****************************************************************************** * OleCreateFromClip [OLECLI32.12] */ OLESTATUS WINAPI OleCreateFromClip( LPCSTR name,LPOLECLIENT olecli,LHCLIENTDOC hclientdoc,LPCSTR xname, LPOLEOBJECT *lpoleob,OLEOPT_RENDER render, OLECLIPFORMAT clipformat ) { FIXME("(%s,%p,%08lx,%s,%p,%d,%ld): stub!\n", name,olecli,hclientdoc,xname,lpoleob,render,clipformat); /* clipb type, object kreieren entsprechend etc. */ return OLE_OK; } wine-20000526/dlls/oledlg/0040755000175000001440000000000007113604205014647 5ustar julliarduserswine-20000526/dlls/oledlg/.cvsignore0100644000175000001440000000006107045213573016651 0ustar julliardusers*.spec.c *.spec.glue.s Makefile liboledlg.so.1.0 wine-20000526/dlls/oledlg/Makefile.in0100644000175000001440000000032207060307302016705 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = oledlg SOVERSION = 1.0 SPEC_SRCS = oledlg.spec C_SRCS = \ oledlg_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/oledlg/oledlg.spec0100644000175000001440000000242006774364565017014 0ustar julliardusersname oledlg type win32 1 stdcall OleUIAddVerbMenuA(ptr str long long long long long long ptr) OleUIAddVerbMenuA 2 stdcall OleUICanConvertOrActivateAs(ptr long long) OleUICanConvertOrActivateAs 3 stdcall OleUIInsertObjectA(ptr) OleUIInsertObjectA 4 stdcall OleUIPasteSpecialA(ptr) OleUIPasteSpecialA 5 stdcall OleUIEditLinksA(ptr) OleUIEditLinksA 6 stdcall OleUIChangeIconA(ptr) OleUIChangeIconA 7 stdcall OleUIConvertA(ptr) OleUIConvertA 8 stdcall OleUIBusyA(ptr) OleUIBusyA 9 stdcall OleUIUpdateLinksA(ptr long str long) OleUIUpdateLinksA 10 varargs OleUIPromptUserA(long long) OleUIPromptUserA 11 stdcall OleUIObjectPropertiesA(ptr) OleUIObjectPropertiesA 12 stdcall OleUIChangeSourceA(ptr) OleUIChangeSourceA 13 varargs OleUIPromptUserW(long long) OleUIPromptUserW 14 stdcall OleUIAddVerbMenuW(ptr wstr long long long long long long ptr) OleUIAddVerbMenuW 15 stdcall OleUIBusyW(ptr) OleUIBusyW 16 stdcall OleUIChangeIconW(ptr) OleUIChangeIconW 17 stdcall OleUIChangeSourceW(ptr) OleUIChangeSourceW 18 stdcall OleUIConvertW(ptr) OleUIConvertW 19 stdcall OleUIEditLinksW(ptr) OleUIEditLinksW 20 stdcall OleUIInsertObjectW(ptr) OleUIInsertObjectW 21 stdcall OleUIObjectPropertiesW(ptr) OleUIObjectPropertiesW 22 stdcall OleUIPasteSpecialW(ptr) OleUIPasteSpecialW wine-20000526/dlls/oledlg/oledlg_main.c0100644000175000001440000001766507070212245017302 0ustar julliardusers/* * OLEDLG library * * Copyright 1998 Patrik Stridvall */ #include "windef.h" #include "winbase.h" #include "winerror.h" #include "oledlg.h" #include "debugtools.h" #include "ole2.h" DEFAULT_DEBUG_CHANNEL(ole) /*********************************************************************** * OleUIAddVerbMenuA (OLEDLG.1) */ BOOL WINAPI OleUIAddVerbMenuA( LPOLEOBJECT lpOleObj, LPCSTR lpszShortType, HMENU hMenu, UINT uPos, UINT uIDVerbMin, UINT uIDVerbMax, BOOL bAddConvert, UINT idConvert, HMENU *lphMenu) { FIXME("(%p, %s, 0x%08x, %d, %d, %d, %d, %d, %p): stub\n", lpOleObj, debugstr_a(lpszShortType), hMenu, uPos, uIDVerbMin, uIDVerbMax, bAddConvert, idConvert, lphMenu ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * OleUIAddVerbMenuW (OLEDLG.14) */ BOOL WINAPI OleUIAddVerbMenuW( LPOLEOBJECT lpOleObj, LPCWSTR lpszShortType, HMENU hMenu, UINT uPos, UINT uIDVerbMin, UINT uIDVerbMax, BOOL bAddConvert, UINT idConvert, HMENU *lphMenu) { FIXME("(%p, %s, 0x%08x, %d, %d, %d, %d, %d, %p): stub\n", lpOleObj, debugstr_w(lpszShortType), hMenu, uPos, uIDVerbMin, uIDVerbMax, bAddConvert, idConvert, lphMenu ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * OleUICanConvertOrActivateAs (OLEDLG.2) */ BOOL WINAPI OleUICanConvertOrActivateAs( REFCLSID rClsid, BOOL fIsLinkedObject, WORD wFormat) { FIXME("(%p, %d, %hd): stub\n", rClsid, fIsLinkedObject, wFormat ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * OleUIInsertObjectA (OLEDLG.3) */ UINT WINAPI OleUIInsertObjectA(LPOLEUIINSERTOBJECTA lpOleUIInsertObject) { FIXME("(%p): stub\n", lpOleUIInsertObject); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIInsertObjectW (OLEDLG.20) */ UINT WINAPI OleUIInsertObjectW(LPOLEUIINSERTOBJECTW lpOleUIInsertObject) { FIXME("(%p): stub\n", lpOleUIInsertObject); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIPasteSpecialA (OLEDLG.4) */ UINT WINAPI OleUIPasteSpecialA(LPOLEUIPASTESPECIALA lpOleUIPasteSpecial) { FIXME("(%p): stub\n", lpOleUIPasteSpecial); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIPasteSpecialW (OLEDLG.22) */ UINT WINAPI OleUIPasteSpecialW(LPOLEUIPASTESPECIALW lpOleUIPasteSpecial) { FIXME("(%p): stub\n", lpOleUIPasteSpecial); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIEditLinksA (OLEDLG.5) */ UINT WINAPI OleUIEditLinksA(LPOLEUIEDITLINKSA lpOleUIEditLinks) { FIXME("(%p): stub\n", lpOleUIEditLinks); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIEditLinksW (OLEDLG.19) */ UINT WINAPI OleUIEditLinksW(LPOLEUIEDITLINKSW lpOleUIEditLinks) { FIXME("(%p): stub\n", lpOleUIEditLinks); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIChangeIconA (OLEDLG.6) */ UINT WINAPI OleUIChangeIconA( LPOLEUICHANGEICONA lpOleUIChangeIcon) { FIXME("(%p): stub\n", lpOleUIChangeIcon); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIChangeIconW (OLEDLG.16) */ UINT WINAPI OleUIChangeIconW( LPOLEUICHANGEICONW lpOleUIChangeIcon) { FIXME("(%p): stub\n", lpOleUIChangeIcon); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIConvertA (OLEDLG.7) */ UINT WINAPI OleUIConvertA(LPOLEUICONVERTA lpOleUIConvert) { FIXME("(%p): stub\n", lpOleUIConvert); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIConvertW (OLEDLG.18) */ UINT WINAPI OleUIConvertW(LPOLEUICONVERTW lpOleUIConvert) { FIXME("(%p): stub\n", lpOleUIConvert); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIBusyA (OLEDLG.8) */ UINT WINAPI OleUIBusyA(LPOLEUIBUSYA lpOleUIBusy) { FIXME("(%p): stub\n", lpOleUIBusy); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIBusyW (OLEDLG.15) */ UINT WINAPI OleUIBusyW(LPOLEUIBUSYW lpOleUIBusy) { FIXME("(%p): stub\n", lpOleUIBusy); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIUpdateLinksA (OLEDLG.9) */ BOOL WINAPI OleUIUpdateLinksA( LPOLEUILINKCONTAINERA lpOleUILinkCntr, HWND hwndParent, LPSTR lpszTitle, INT cLinks) { FIXME("(%p, 0x%08x, %s, %d): stub\n", lpOleUILinkCntr, hwndParent, debugstr_a(lpszTitle), cLinks ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * OleUIUpdateLinksW (OLEDLG.?) * FIXME * I haven't been able to find the ordinal for this function, * This means it can't be called from outside the DLL. */ BOOL WINAPI OleUIUpdateLinksW( LPOLEUILINKCONTAINERW lpOleUILinkCntr, HWND hwndParent, LPWSTR lpszTitle, INT cLinks) { FIXME("(%p, 0x%08x, %s, %d): stub\n", lpOleUILinkCntr, hwndParent, debugstr_w(lpszTitle), cLinks ); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return FALSE; } /*********************************************************************** * OleUIPromptUserA (OLEDLG.10) */ INT __cdecl OleUIPromptUserA( INT nTemplate, HWND hwndParent, ...) { FIXME("(%d, 0x%08x, ...): stub\n", nTemplate, hwndParent); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIPromptUserW (OLEDLG.13) */ INT __cdecl OleUIPromptUserW( INT nTemplate, HWND hwndParent, ...) { FIXME("(%d, 0x%08x, ...): stub\n", nTemplate, hwndParent); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIObjectPropertiesA (OLEDLG.11) */ UINT WINAPI OleUIObjectPropertiesA( LPOLEUIOBJECTPROPSA lpOleUIObjectProps) { FIXME("(%p): stub\n", lpOleUIObjectProps); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIObjectPropertiesW (OLEDLG.21) */ UINT WINAPI OleUIObjectPropertiesW( LPOLEUIOBJECTPROPSW lpOleUIObjectProps) { FIXME("(%p): stub\n", lpOleUIObjectProps); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIChangeSourceA (OLEDLG.12) */ UINT WINAPI OleUIChangeSourceA( LPOLEUICHANGESOURCEA lpOleUIChangeSource) { FIXME("(%p): stub\n", lpOleUIChangeSource); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } /*********************************************************************** * OleUIChangeSourceW (OLEDLG.17) */ UINT WINAPI OleUIChangeSourceW( LPOLEUICHANGESOURCEW lpOleUIChangeSource) { FIXME("(%p): stub\n", lpOleUIChangeSource); SetLastError(ERROR_CALL_NOT_IMPLEMENTED); return OLEUI_FALSE; } wine-20000526/dlls/olepro32/0040755000175000001440000000000007113604205015046 5ustar julliarduserswine-20000526/dlls/olepro32/.cvsignore0100644000175000001440000000004507047571120017047 0ustar julliardusers*.spec.c Makefile libolepro32.so.1.0 wine-20000526/dlls/olepro32/Makefile.in0100644000175000001440000000035707060307302017114 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = olepro32 SOVERSION = 1.0 IMPORTS = oleaut32 ole32 SPEC_SRCS = olepro32.spec C_SRCS = olepro32stubs.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/olepro32/README0100644000175000001440000000062607047571120015734 0ustar julliardusers29Nov99 Sean Langley This library (OLEPRO32.DLL) is basically a sub-set of what is in OLEAUT32.DLL. The main difference under Win32 is that OLEPRO32.DLL can be used as a type library. There are two functions in this DLL which are already implemented in Wine. They are OleCreateFontIndirect, and OleTranslateColor. The spec file for both of these functions points to the functions in the OLEAUT32.DLL. wine-20000526/dlls/olepro32/olepro32.spec0100644000175000001440000000132207073170674017377 0ustar julliardusersname olepro32 type win32 import oleaut32.dll @ forward OleIconToCursor OLEAUT32.OleIconToCursor @ forward OleCreatePropertyFrameIndirect OLEAUT32.OleCreatePropertyFrameIndirect @ forward OleCreatePropertyFrame OLEAUT32.OleCreatePropertyFrame @ forward OleLoadPicture OLEAUT32.OleLoadPicture @ forward OleCreatePictureIndirect OLEAUT32.OleCreatePictureIndirect @ forward OleCreateFontIndirect OLEAUT32.OleCreateFontIndirect @ forward OleTranslateColor OLEAUT32.OleTranslateColor @ stdcall DllCanUnloadNow() OLEPRO32_DllCanUnloadNow @ stdcall DllGetClassObject( ptr ptr ptr ) OLEPRO32_DllGetClassObject @ stdcall DllRegisterServer() OLEPRO32_DllRegisterServer @ stdcall DllUnregisterServer() OLEPRO32_DllUnregisterServer wine-20000526/dlls/olepro32/olepro32stubs.c0100644000175000001440000000207307066752016017752 0ustar julliardusers/* * OlePro32 Stubs * * Copyright 1999 Corel Corporation * * Sean Langley */ #include "debugtools.h" #include "ole2.h" #include "windef.h" DEFAULT_DEBUG_CHANNEL(ole); /*********************************************************************** * OLEPRO32_DllUnregisterServer */ HRESULT WINAPI OLEPRO32_DllUnregisterServer() { FIXME("not implemented (olepro32.dll) \n"); return S_OK; } /*********************************************************************** * OLEPRO32_DllRegisterServer */ HRESULT WINAPI OLEPRO32_DllRegisterServer() { FIXME("not implemented (olepro32.dll) \n"); return S_OK; } /*********************************************************************** * OLEPRO32_DllCanUnloadNow */ HRESULT WINAPI OLEPRO32_DllCanUnloadNow( ) { FIXME("not implemented (olepro32.dll) \n"); return S_OK; } /*********************************************************************** * OLEPRO32_DllGetClassObject */ HRESULT WINAPI OLEPRO32_DllGetClassObject( REFCLSID rclsid, REFIID riid, LPVOID* ppv ) { FIXME("not implemented (olepro32.dll) \n"); return S_OK; } wine-20000526/dlls/olesvr/0040755000175000001440000000000007113604205014713 5ustar julliarduserswine-20000526/dlls/olesvr/.cvsignore0100644000175000001440000000006307045213574016720 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libolesvr32.so.1.0 wine-20000526/dlls/olesvr/Makefile.in0100644000175000001440000000036507060456112016764 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = olesvr32 SOVERSION = 1.0 ALTNAMES = olesvr SPEC_SRCS = olesvr32.spec olesvr.spec C_SRCS = \ olesvr_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/olesvr/olesvr.spec0100644000175000001440000000137106771226506017115 0ustar julliardusersname olesvr type win16 #1 WEP 2 pascal OleRegisterServer(str ptr ptr word word) OleRegisterServer16 3 pascal OleRevokeServer(long) OleRevokeServer16 4 pascal OleBlockServer(long) OleBlockServer16 5 pascal OleUnblockServer(long ptr) OleUnblockServer16 6 pascal OleRegisterServerDoc(long str ptr ptr) OleRegisterServerDoc16 7 pascal OleRevokeServerDoc(long) OleRevokeServerDoc16 8 stub OLERENAMESERVERDOC 9 stub OLEREVERTSERVERDOC 10 stub OLESAVEDSERVERDOC 11 stub OLEREVOKEOBJECT 12 stub OLEQUERYSERVERVERSION 21 stub SRVRWNDPROC 22 stub DOCWNDPROC 23 stub ITEMWNDPROC 24 stub SENDDATAMSG 25 stub FINDITEMWND 26 stub ITEMCALLBACK 27 stub TERMINATECLIENTS 28 stub TERMINATEDOCCLIENTS 29 stub DELETECLIENTINFO 30 stub SENDRENAMEMSG 31 stub ENUMFORTERMINATE wine-20000526/dlls/olesvr/olesvr32.spec0100644000175000001440000000101506771226506017255 0ustar julliardusersname olesvr32 type win32 1 stub WEP 2 stdcall OleRegisterServer(str ptr ptr long long) OleRegisterServer 3 stub OleRevokeServer 4 stdcall OleBlockServer(long) OleBlockServer 5 stdcall OleUnblockServer(long ptr) OleUnblockServer 6 stdcall OleRegisterServerDoc(ptr str ptr ptr) OleRegisterServerDoc 7 stdcall OleRevokeServerDoc(long) OleRevokeServerDoc 8 stdcall OleRenameServerDoc(long str) OleRenameServerDoc 9 stub OleRevertServerDoc 10 stub OleSavedServerDoc 11 stub OleRevokeObject 12 stub OleQueryServerVersion wine-20000526/dlls/olesvr/olesvr_main.c0100644000175000001440000000765307070212245017406 0ustar julliardusers/* * OLESVR library * * Copyright 1995 Martin von Loewis */ /* At the moment, these are only empty stubs. */ #include "windef.h" #include "wingdi.h" #include "wtypes.h" #include "ole.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ole); LONG OLE_current_handle; /****************************************************************************** * OleRegisterServer16 [OLESVR.2] */ OLESTATUS WINAPI OleRegisterServer16( LPCSTR name, LPOLESERVER serverStruct, LHSERVER *hRet, HINSTANCE16 hServer, OLE_SERVER_USE use ) { FIXME("(%s,...): stub\n",name); *hRet=++OLE_current_handle; /* return OLE_ERROR_MEMORY, OLE_ERROR_PROTECT_ONLY if you want it fail*/ return OLE_OK; } /****************************************************************************** * OleBlockServer16 [OLESVR.4] */ OLESTATUS WINAPI OleBlockServer16(LHSERVER hServer) { FIXME("(%ld): stub\n",hServer); return OLE_OK; } /****************************************************************************** * OleBlockServer [OLESVR32.4] */ OLESTATUS WINAPI OleBlockServer(LHSERVER hServer) { FIXME("(%ld): stub\n",hServer); return OLE_OK; } /****************************************************************************** * OleUnblockServer16 [OLESVR.5] */ OLESTATUS WINAPI OleUnblockServer16(LHSERVER hServer, BOOL16 *block) { FIXME("(%ld): stub\n",hServer); /* no more blocked messages :) */ *block=FALSE; return OLE_OK; } /****************************************************************************** * OleUnblockServer [OLESVR32.5] */ OLESTATUS WINAPI OleUnblockServer(LHSERVER hServer, BOOL *block) { FIXME("(%ld): stub\n",hServer); /* no more blocked messages :) */ *block=FALSE; return OLE_OK; } /*********************************************************************** * OleRegisterServerDoc16 [OLESVR.6] */ OLESTATUS WINAPI OleRegisterServerDoc16( LHSERVER hServer, LPCSTR docname, LPOLESERVERDOC document, LHSERVERDOC *hRet) { FIXME("(%ld,%s): stub\n",hServer, docname); *hRet=++OLE_current_handle; return OLE_OK; } /****************************************************************************** * OleRevokeServerDoc16 [OLESVR.7] */ OLESTATUS WINAPI OleRevokeServerDoc16(LHSERVERDOC hServerDoc) { FIXME("%ld - stub\n",hServerDoc); return OLE_OK; } /****************************************************************************** * OleRevokeServerDoc [OLESVR32.7] */ OLESTATUS WINAPI OleRevokeServerDoc(LHSERVERDOC hServerDoc) { FIXME("(%ld): stub\n",hServerDoc); return OLE_OK; } /****************************************************************************** * OleRevokeServer [OLESVR.3] */ OLESTATUS WINAPI OleRevokeServer16(LHSERVER hServer) { FIXME("%ld - stub\n",hServer); return OLE_OK; } /****************************************************************************** * OleRegisterServer [OLESVR32.2] */ OLESTATUS WINAPI OleRegisterServer(LPCSTR svrname,LPOLESERVER olesvr,LHSERVER* hRet,HINSTANCE hinst,OLE_SERVER_USE osu) { FIXME("(%s,%p,%p,%08x,%d): stub!\n",svrname,olesvr,hRet,hinst,osu); *hRet=++OLE_current_handle; return OLE_OK; } /****************************************************************************** * OleRegisterServerDoc [OLESVR32.6] */ OLESTATUS WINAPI OleRegisterServerDoc( LHSERVER hServer, LPCSTR docname, LPOLESERVERDOC document, LHSERVERDOC *hRet) { FIXME("(%ld,%s): stub\n", hServer, docname); *hRet=++OLE_current_handle; return OLE_OK; } /****************************************************************************** * OleRenameServerDoc [OLESVR32.8] * */ OLESTATUS WINAPI OleRenameServerDoc(LHSERVERDOC hDoc, LPCSTR newName) { FIXME("(%ld,%s): stub.\n",hDoc, newName); return OLE_OK; } wine-20000526/dlls/opengl32/0040755000175000001440000000000007113604205015032 5ustar julliarduserswine-20000526/dlls/opengl32/.cvsignore0100644000175000001440000000004507107063407017034 0ustar julliardusers*.spec.c Makefile libopengl32.so.1.0 wine-20000526/dlls/opengl32/Makefile.in0100644000175000001440000000041507107063407017102 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = opengl32 SOVERSION = 1.0 IMPORTS = \ x11drv \ gdi32 SPEC_SRCS = opengl32.spec C_SRCS = \ wgl.c \ opengl_norm.c \ opengl_ext.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/opengl32/make_opengl_ext0100755000175000001440000000624507107063407020133 0ustar julliardusers#!/usr/bin/perl -w print " /* Auto-generated file... Do not edit ! */ #include \"config.h\" #include \"wine_gl.h\" #include \"opengl_ext.h\" "; # # First, create a hash-table with all function defined in opengl32.spec # %opengl_std = (); open(SPEC, "dlls/opengl32/opengl32.spec") || die "Could not open spec file"; foreach () { if (($_ =~ /@/) && ($_ !~ /wgl/)) { ($name) = ($_ =~ /stdcall (\w*)\(/); $opengl_std{$name} = 1; } } close(SPEC); # # Now, the functions from the include file # %opengl_ext = (); open(INC, "/home/ulmer/OpenGL/glext_proto.h") || die "Could not open GL/glext.h"; while ($line = ) { if ($line =~ /extern.*APIENTRY/) { # Start of a function declaration ($ret, $name, $args) = ($line =~ /extern (\w*) APIENTRY *(\w*) *\((.*)\)/); # Now, remove all function already defined in opengl32.spec if ($opengl_std{$name}) { # Do nothing as we already have these functions } else { # Now, get the typedef name (the line after) ($typedef_name) = ( =~ /\(APIENTRY *\* *(\w*) *\)/); # After that, parse the arguments @args = split /,/, $args; $args_ref = []; foreach (@args) { push @$args_ref, $_; } $opengl_ext{$name} = [ $ret, $typedef_name, $args_ref ]; } } } close(INC); # # After that, generate the file itself.... # print "/* These will be filled during a wglGetProcAddress call */\n"; $num = 0; foreach $name (sort keys(%opengl_ext)) { $ref = $opengl_ext{$name}; $arg_ref = $$ref[2]; @larg = @$arg_ref; print "$$ref[0] (*func_$name)("; $farg = shift @larg; print "$farg"; foreach (@larg) { print ", $_"; } print ") = (void *) 0xdeadbeef;\n"; $num++; } print "\n"; print "/* The function prototypes */\n"; foreach $name (sort keys(%opengl_ext)) { $ref = $opengl_ext{$name}; $arg_ref = $$ref[2]; @larg = @$arg_ref; print "$$ref[0] WINAPI wine_$name("; $farg = shift @larg; print "$farg"; foreach (@larg) { print ", $_"; } print ") ;\n"; } print "\n"; print "/* The table giving the correspondance between names and functions */\n"; print "int extension_registry_size = $num;\n"; print "OpenGL_extension extension_registry[] = {\n"; foreach $name (sort keys(%opengl_ext)) { $num--; print " { \"$name\", (void *) wine_$name, (void **) (&func_$name) }"; if ($num) { print ","; } print "\n"; } print "};\n"; print "\n"; print "/* Now, the function declarations */\n"; foreach $name (sort keys(%opengl_ext)) { $ref = $opengl_ext{$name}; $arg_ref = $$ref[2]; print "$$ref[0] WINAPI wine_$name("; $farg = shift @$arg_ref; $num = 0; if ($farg !~ /void/) { print "$farg arg_0"; $num++; foreach (@$arg_ref) { print ", $_ arg_$num"; $num++; } } print ") {\n"; if ($$ref[0] !~ /void/) { print " $$ref[0] ret;\n" } print " ENTER_GL();\n"; print " "; if ($$ref[0] !~ /void/) { print " ret = "; } print "func_$name("; if ($num > 0) { print "arg_0"; for ($i = 1; $i < $num; $i++) { print ", arg_$i"; } } print ");\n"; print " LEAVE_GL();\n"; if ($$ref[0] !~ /void/) { print " return ret;\n" } print "}\n\n"; } wine-20000526/dlls/opengl32/make_opengl_norm0100755000175000001440000000353307110632131020271 0ustar julliardusers#!/usr/bin/perl -w print " /* Auto-generated file... Do not edit ! */ #include \"config.h\" #include \"wine_gl.h\" "; # # Now, the functions from the include file # open(INC, "/usr/X11R6/include/GL/gl.h") || die "Could not open GL/gl.h"; while ($line = ) { if ($line =~ /GLAPI.*GLAPIENTRY/) { # Start of a function declaration ($ret, $name, $args) = ($line =~ /GLAPI (.*) GLAPIENTRY *(.*)\((.*)/); # Remove all extensions except the multitexture one (see OpenGL ABI) if (($name !~ /(MESA|PGI|ARB|EXT)/) || ($name =~ /MultiTexCoord/) || ($name =~ /ActiveTextureARB/)) { print "/***********************************************************************\n"; print " *\t\t$name\n"; print " */\n"; print "$ret WINAPI wine_$name("; @rargs = (); @names = (); # Now, get the parameters while (1) { @args = split /,|\)/, $args; foreach (@args) { if ($_ =~ /[a-z,A-Z]/) { ($a) = ($_ =~ /^\s*(.*)\s*$/); if ($a =~ /\*\*/) { ($var) = ($a =~ /\*\*(\w*)/); } elsif ($a =~ /\*/) { ($var) = ($a =~ /\*(\w*)/); } else { ($var) = ($a =~ /\s(\w*)/); } @rargs = (@rargs, $a); if ($var !~ /void/) { @names = (@names, $var); } } } if ($args !~ /\)/) { $args = ; } else { last; } } print shift @rargs; foreach (@rargs) { print ", $_"; } print ") {\n"; if ($ret !~ /void/) { print " $ret ret;\n"; } print " ENTER_GL();\n"; if ($ret !~ /void/) { print " ret = "; } else { print " "; } print "$name("; $farg = shift @names; if ($farg) { print "$farg"; foreach (@names) { print ", $_"; } } print ");\n"; print " LEAVE_GL();\n"; if ($ret !~ /void/) { print " return ret;\n"; } print "}\n\n"; } } } close(INC); wine-20000526/dlls/opengl32/make_opengl_spec0100755000175000001440000000502107112572332020252 0ustar julliardusers#!/usr/bin/perl -w # # First, the basics and the wgl functions # print " name opengl32 type win32 @ stdcall wglCreateContext(long) wglCreateContext @ stdcall wglCreateLayerContext(long long) wglCreateLayerContext @ stdcall wglCopyContext(long long long) wglCopyContext @ stdcall wglDeleteContext(long) wglDeleteContext @ stdcall wglDescribeLayerPlane(long long long long ptr) wglDescribeLayerPlane @ stdcall wglGetCurrentContext() wglGetCurrentContext @ stdcall wglGetCurrentDC() wglGetCurrentDC @ stdcall wglGetLayerPaletteEntries(long long long long ptr) wglGetLayerPaletteEntries @ stdcall wglGetProcAddress(str) wglGetProcAddress @ stdcall wglMakeCurrent(long long) wglMakeCurrent @ stdcall wglRealizeLayerPalette(long long long) wglRealizeLayerPalette @ stdcall wglSetLayerPaletteEntries(long long long long ptr) wglSetLayerPaletteEntries @ stdcall wglShareLists(long long) wglShareLists @ stdcall wglSwapLayerBuffers(long long) wglSwapLayerBuffers @ stdcall wglUseFontBitmapsA(long long long long) wglUseFontBitmapsA @ stdcall wglUseFontOutlinesA(long long long long long long long ptr) wglUseFontOutlinesA @ stub glGetLevelParameterfv @ stub glGetLevelParameteriv @ stub wglUseFontBitmapsW @ stub wglUseFontOutlinesW @ forward wglChoosePixelFormat GDI32.ChoosePixelFormat @ forward wglDescribePixelFormat GDI32.DescribePixelFormat @ forward wglGetPixelFormat GDI32.GetPixelFormat @ forward wglSetPixelFormat GDI32.SetPixelFormat @ forward wglSwapBuffers GDI32.SwapBuffers "; # # Now, the functions from the include file # open(INC, "/usr/X11R6/include/GL/gl.h") || die "Could not open GL/gl.h"; while ($line = ) { if ($line =~ /GLAPI.*GLAPIENTRY/) { # Start of a function declaration ($name, $args) = ($line =~ /GLAPIENTRY *(.*)\((.*)/); # Remove all extensions except the multitexture one (see OpenGL ABI) if (($name !~ /(MESA|PGI|ARB|EXT)/) || ($name =~ /MultiTexCoord/) || ($name =~ /ActiveTextureARB/)) { print "@ stdcall $name("; # Now, get the parameters while (1) { @args = split /,/, $args; foreach (@args) { if ($_ =~ /\)/) { ($_) = ($_ =~ /(.*)\)/); } if ($_ =~ /\*/) { print "ptr "; } elsif ($_ =~ /[a-zA-Z]/) { ($type) = ($_ =~ /^ *(.*) +.*/); if (($type =~ /double/) || ($type =~ /clampd/)) { print "double "; } elsif ($type !~ /void/) { print "long "; } } } if ($args !~ /\)/) { $args = ; } else { last; } } print ") wine_$name\n"; } } } close(INC); wine-20000526/dlls/opengl32/opengl32.spec0100644000175000001440000006170207112572332017346 0ustar julliardusers name opengl32 type win32 @ stdcall wglCreateContext(long) wglCreateContext @ stdcall wglCreateLayerContext(long long) wglCreateLayerContext @ stdcall wglCopyContext(long long long) wglCopyContext @ stdcall wglDeleteContext(long) wglDeleteContext @ stdcall wglDescribeLayerPlane(long long long long ptr) wglDescribeLayerPlane @ stdcall wglGetCurrentContext() wglGetCurrentContext @ stdcall wglGetCurrentDC() wglGetCurrentDC @ stdcall wglGetLayerPaletteEntries(long long long long ptr) wglGetLayerPaletteEntries @ stdcall wglGetProcAddress(str) wglGetProcAddress @ stdcall wglMakeCurrent(long long) wglMakeCurrent @ stdcall wglRealizeLayerPalette(long long long) wglRealizeLayerPalette @ stdcall wglSetLayerPaletteEntries(long long long long ptr) wglSetLayerPaletteEntries @ stdcall wglShareLists(long long) wglShareLists @ stdcall wglSwapLayerBuffers(long long) wglSwapLayerBuffers @ stdcall wglUseFontBitmapsA(long long long long) wglUseFontBitmapsA @ stdcall wglUseFontOutlinesA(long long long long long long long ptr) wglUseFontOutlinesA @ stub glGetLevelParameterfv @ stub glGetLevelParameteriv @ stub wglUseFontBitmapsW @ stub wglUseFontOutlinesW @ forward wglChoosePixelFormat GDI32.ChoosePixelFormat @ forward wglDescribePixelFormat GDI32.DescribePixelFormat @ forward wglGetPixelFormat GDI32.GetPixelFormat @ forward wglSetPixelFormat GDI32.SetPixelFormat @ forward wglSwapBuffers GDI32.SwapBuffers @ stdcall glClearIndex(long ) wine_glClearIndex @ stdcall glClearColor(long long long long ) wine_glClearColor @ stdcall glClear(long ) wine_glClear @ stdcall glIndexMask(long ) wine_glIndexMask @ stdcall glColorMask(long long long long ) wine_glColorMask @ stdcall glAlphaFunc(long long ) wine_glAlphaFunc @ stdcall glBlendFunc(long long ) wine_glBlendFunc @ stdcall glLogicOp(long ) wine_glLogicOp @ stdcall glCullFace(long ) wine_glCullFace @ stdcall glFrontFace(long ) wine_glFrontFace @ stdcall glPointSize(long ) wine_glPointSize @ stdcall glLineWidth(long ) wine_glLineWidth @ stdcall glLineStipple(long long ) wine_glLineStipple @ stdcall glPolygonMode(long long ) wine_glPolygonMode @ stdcall glPolygonOffset(long long ) wine_glPolygonOffset @ stdcall glPolygonStipple(ptr ) wine_glPolygonStipple @ stdcall glGetPolygonStipple(ptr ) wine_glGetPolygonStipple @ stdcall glEdgeFlag(long ) wine_glEdgeFlag @ stdcall glEdgeFlagv(ptr ) wine_glEdgeFlagv @ stdcall glScissor(long long long long ) wine_glScissor @ stdcall glClipPlane(long ptr ) wine_glClipPlane @ stdcall glGetClipPlane(long ptr ) wine_glGetClipPlane @ stdcall glDrawBuffer(long ) wine_glDrawBuffer @ stdcall glReadBuffer(long ) wine_glReadBuffer @ stdcall glEnable(long ) wine_glEnable @ stdcall glDisable(long ) wine_glDisable @ stdcall glIsEnabled(long ) wine_glIsEnabled @ stdcall glEnableClientState(long ) wine_glEnableClientState @ stdcall glDisableClientState(long ) wine_glDisableClientState @ stdcall glGetBooleanv(long ptr ) wine_glGetBooleanv @ stdcall glGetDoublev(long ptr ) wine_glGetDoublev @ stdcall glGetFloatv(long ptr ) wine_glGetFloatv @ stdcall glGetIntegerv(long ptr ) wine_glGetIntegerv @ stdcall glPushAttrib(long ) wine_glPushAttrib @ stdcall glPopAttrib() wine_glPopAttrib @ stdcall glPushClientAttrib(long ) wine_glPushClientAttrib @ stdcall glPopClientAttrib() wine_glPopClientAttrib @ stdcall glRenderMode(long ) wine_glRenderMode @ stdcall glGetError() wine_glGetError @ stdcall glGetString(long ) wine_glGetString @ stdcall glFinish() wine_glFinish @ stdcall glFlush() wine_glFlush @ stdcall glHint(long long ) wine_glHint @ stdcall glClearDepth(double ) wine_glClearDepth @ stdcall glDepthFunc(long ) wine_glDepthFunc @ stdcall glDepthMask(long ) wine_glDepthMask @ stdcall glDepthRange(double double ) wine_glDepthRange @ stdcall glClearAccum(long long long long ) wine_glClearAccum @ stdcall glAccum(long long ) wine_glAccum @ stdcall glMatrixMode(long ) wine_glMatrixMode @ stdcall glOrtho(double double double double double double ) wine_glOrtho @ stdcall glFrustum(double double double double double double ) wine_glFrustum @ stdcall glViewport(long long long long ) wine_glViewport @ stdcall glPushMatrix() wine_glPushMatrix @ stdcall glPopMatrix() wine_glPopMatrix @ stdcall glLoadIdentity() wine_glLoadIdentity @ stdcall glLoadMatrixd(ptr ) wine_glLoadMatrixd @ stdcall glLoadMatrixf(ptr ) wine_glLoadMatrixf @ stdcall glMultMatrixd(ptr ) wine_glMultMatrixd @ stdcall glMultMatrixf(ptr ) wine_glMultMatrixf @ stdcall glRotated(double double double double ) wine_glRotated @ stdcall glRotatef(long long long long ) wine_glRotatef @ stdcall glScaled(double double double ) wine_glScaled @ stdcall glScalef(long long long ) wine_glScalef @ stdcall glTranslated(double double double ) wine_glTranslated @ stdcall glTranslatef(long long long ) wine_glTranslatef @ stdcall glIsList(long ) wine_glIsList @ stdcall glDeleteLists(long long ) wine_glDeleteLists @ stdcall glGenLists(long ) wine_glGenLists @ stdcall glNewList(long long ) wine_glNewList @ stdcall glEndList() wine_glEndList @ stdcall glCallList(long ) wine_glCallList @ stdcall glCallLists(long long ptr ) wine_glCallLists @ stdcall glListBase(long ) wine_glListBase @ stdcall glBegin(long ) wine_glBegin @ stdcall glEnd() wine_glEnd @ stdcall glVertex2d(double double ) wine_glVertex2d @ stdcall glVertex2f(long long ) wine_glVertex2f @ stdcall glVertex2i(long long ) wine_glVertex2i @ stdcall glVertex2s(long long ) wine_glVertex2s @ stdcall glVertex3d(double double double ) wine_glVertex3d @ stdcall glVertex3f(long long long ) wine_glVertex3f @ stdcall glVertex3i(long long long ) wine_glVertex3i @ stdcall glVertex3s(long long long ) wine_glVertex3s @ stdcall glVertex4d(double double double double ) wine_glVertex4d @ stdcall glVertex4f(long long long long ) wine_glVertex4f @ stdcall glVertex4i(long long long long ) wine_glVertex4i @ stdcall glVertex4s(long long long long ) wine_glVertex4s @ stdcall glVertex2dv(ptr ) wine_glVertex2dv @ stdcall glVertex2fv(ptr ) wine_glVertex2fv @ stdcall glVertex2iv(ptr ) wine_glVertex2iv @ stdcall glVertex2sv(ptr ) wine_glVertex2sv @ stdcall glVertex3dv(ptr ) wine_glVertex3dv @ stdcall glVertex3fv(ptr ) wine_glVertex3fv @ stdcall glVertex3iv(ptr ) wine_glVertex3iv @ stdcall glVertex3sv(ptr ) wine_glVertex3sv @ stdcall glVertex4dv(ptr ) wine_glVertex4dv @ stdcall glVertex4fv(ptr ) wine_glVertex4fv @ stdcall glVertex4iv(ptr ) wine_glVertex4iv @ stdcall glVertex4sv(ptr ) wine_glVertex4sv @ stdcall glNormal3b(long long long ) wine_glNormal3b @ stdcall glNormal3d(double double double ) wine_glNormal3d @ stdcall glNormal3f(long long long ) wine_glNormal3f @ stdcall glNormal3i(long long long ) wine_glNormal3i @ stdcall glNormal3s(long long long ) wine_glNormal3s @ stdcall glNormal3bv(ptr ) wine_glNormal3bv @ stdcall glNormal3dv(ptr ) wine_glNormal3dv @ stdcall glNormal3fv(ptr ) wine_glNormal3fv @ stdcall glNormal3iv(ptr ) wine_glNormal3iv @ stdcall glNormal3sv(ptr ) wine_glNormal3sv @ stdcall glIndexd(double ) wine_glIndexd @ stdcall glIndexf(long ) wine_glIndexf @ stdcall glIndexi(long ) wine_glIndexi @ stdcall glIndexs(long ) wine_glIndexs @ stdcall glIndexub(long ) wine_glIndexub @ stdcall glIndexdv(ptr ) wine_glIndexdv @ stdcall glIndexfv(ptr ) wine_glIndexfv @ stdcall glIndexiv(ptr ) wine_glIndexiv @ stdcall glIndexsv(ptr ) wine_glIndexsv @ stdcall glIndexubv(ptr ) wine_glIndexubv @ stdcall glColor3b(long long long ) wine_glColor3b @ stdcall glColor3d(double double double ) wine_glColor3d @ stdcall glColor3f(long long long ) wine_glColor3f @ stdcall glColor3i(long long long ) wine_glColor3i @ stdcall glColor3s(long long long ) wine_glColor3s @ stdcall glColor3ub(long long long ) wine_glColor3ub @ stdcall glColor3ui(long long long ) wine_glColor3ui @ stdcall glColor3us(long long long ) wine_glColor3us @ stdcall glColor4b(long long long long ) wine_glColor4b @ stdcall glColor4d(double double double double ) wine_glColor4d @ stdcall glColor4f(long long long long ) wine_glColor4f @ stdcall glColor4i(long long long long ) wine_glColor4i @ stdcall glColor4s(long long long long ) wine_glColor4s @ stdcall glColor4ub(long long long long ) wine_glColor4ub @ stdcall glColor4ui(long long long long ) wine_glColor4ui @ stdcall glColor4us(long long long long ) wine_glColor4us @ stdcall glColor3bv(ptr ) wine_glColor3bv @ stdcall glColor3dv(ptr ) wine_glColor3dv @ stdcall glColor3fv(ptr ) wine_glColor3fv @ stdcall glColor3iv(ptr ) wine_glColor3iv @ stdcall glColor3sv(ptr ) wine_glColor3sv @ stdcall glColor3ubv(ptr ) wine_glColor3ubv @ stdcall glColor3uiv(ptr ) wine_glColor3uiv @ stdcall glColor3usv(ptr ) wine_glColor3usv @ stdcall glColor4bv(ptr ) wine_glColor4bv @ stdcall glColor4dv(ptr ) wine_glColor4dv @ stdcall glColor4fv(ptr ) wine_glColor4fv @ stdcall glColor4iv(ptr ) wine_glColor4iv @ stdcall glColor4sv(ptr ) wine_glColor4sv @ stdcall glColor4ubv(ptr ) wine_glColor4ubv @ stdcall glColor4uiv(ptr ) wine_glColor4uiv @ stdcall glColor4usv(ptr ) wine_glColor4usv @ stdcall glTexCoord1d(double ) wine_glTexCoord1d @ stdcall glTexCoord1f(long ) wine_glTexCoord1f @ stdcall glTexCoord1i(long ) wine_glTexCoord1i @ stdcall glTexCoord1s(long ) wine_glTexCoord1s @ stdcall glTexCoord2d(double double ) wine_glTexCoord2d @ stdcall glTexCoord2f(long long ) wine_glTexCoord2f @ stdcall glTexCoord2i(long long ) wine_glTexCoord2i @ stdcall glTexCoord2s(long long ) wine_glTexCoord2s @ stdcall glTexCoord3d(double double double ) wine_glTexCoord3d @ stdcall glTexCoord3f(long long long ) wine_glTexCoord3f @ stdcall glTexCoord3i(long long long ) wine_glTexCoord3i @ stdcall glTexCoord3s(long long long ) wine_glTexCoord3s @ stdcall glTexCoord4d(double double double double ) wine_glTexCoord4d @ stdcall glTexCoord4f(long long long long ) wine_glTexCoord4f @ stdcall glTexCoord4i(long long long long ) wine_glTexCoord4i @ stdcall glTexCoord4s(long long long long ) wine_glTexCoord4s @ stdcall glTexCoord1dv(ptr ) wine_glTexCoord1dv @ stdcall glTexCoord1fv(ptr ) wine_glTexCoord1fv @ stdcall glTexCoord1iv(ptr ) wine_glTexCoord1iv @ stdcall glTexCoord1sv(ptr ) wine_glTexCoord1sv @ stdcall glTexCoord2dv(ptr ) wine_glTexCoord2dv @ stdcall glTexCoord2fv(ptr ) wine_glTexCoord2fv @ stdcall glTexCoord2iv(ptr ) wine_glTexCoord2iv @ stdcall glTexCoord2sv(ptr ) wine_glTexCoord2sv @ stdcall glTexCoord3dv(ptr ) wine_glTexCoord3dv @ stdcall glTexCoord3fv(ptr ) wine_glTexCoord3fv @ stdcall glTexCoord3iv(ptr ) wine_glTexCoord3iv @ stdcall glTexCoord3sv(ptr ) wine_glTexCoord3sv @ stdcall glTexCoord4dv(ptr ) wine_glTexCoord4dv @ stdcall glTexCoord4fv(ptr ) wine_glTexCoord4fv @ stdcall glTexCoord4iv(ptr ) wine_glTexCoord4iv @ stdcall glTexCoord4sv(ptr ) wine_glTexCoord4sv @ stdcall glRasterPos2d(double double ) wine_glRasterPos2d @ stdcall glRasterPos2f(long long ) wine_glRasterPos2f @ stdcall glRasterPos2i(long long ) wine_glRasterPos2i @ stdcall glRasterPos2s(long long ) wine_glRasterPos2s @ stdcall glRasterPos3d(double double double ) wine_glRasterPos3d @ stdcall glRasterPos3f(long long long ) wine_glRasterPos3f @ stdcall glRasterPos3i(long long long ) wine_glRasterPos3i @ stdcall glRasterPos3s(long long long ) wine_glRasterPos3s @ stdcall glRasterPos4d(double double double double ) wine_glRasterPos4d @ stdcall glRasterPos4f(long long long long ) wine_glRasterPos4f @ stdcall glRasterPos4i(long long long long ) wine_glRasterPos4i @ stdcall glRasterPos4s(long long long long ) wine_glRasterPos4s @ stdcall glRasterPos2dv(ptr ) wine_glRasterPos2dv @ stdcall glRasterPos2fv(ptr ) wine_glRasterPos2fv @ stdcall glRasterPos2iv(ptr ) wine_glRasterPos2iv @ stdcall glRasterPos2sv(ptr ) wine_glRasterPos2sv @ stdcall glRasterPos3dv(ptr ) wine_glRasterPos3dv @ stdcall glRasterPos3fv(ptr ) wine_glRasterPos3fv @ stdcall glRasterPos3iv(ptr ) wine_glRasterPos3iv @ stdcall glRasterPos3sv(ptr ) wine_glRasterPos3sv @ stdcall glRasterPos4dv(ptr ) wine_glRasterPos4dv @ stdcall glRasterPos4fv(ptr ) wine_glRasterPos4fv @ stdcall glRasterPos4iv(ptr ) wine_glRasterPos4iv @ stdcall glRasterPos4sv(ptr ) wine_glRasterPos4sv @ stdcall glRectd(double double double double ) wine_glRectd @ stdcall glRectf(long long long long ) wine_glRectf @ stdcall glRecti(long long long long ) wine_glRecti @ stdcall glRects(long long long long ) wine_glRects @ stdcall glRectdv(ptr ptr ) wine_glRectdv @ stdcall glRectfv(ptr ptr ) wine_glRectfv @ stdcall glRectiv(ptr ptr ) wine_glRectiv @ stdcall glRectsv(ptr ptr ) wine_glRectsv @ stdcall glVertexPointer(long long long ptr ) wine_glVertexPointer @ stdcall glNormalPointer(long long ptr ) wine_glNormalPointer @ stdcall glColorPointer(long long long ptr ) wine_glColorPointer @ stdcall glIndexPointer(long long ptr ) wine_glIndexPointer @ stdcall glTexCoordPointer(long long long ptr ) wine_glTexCoordPointer @ stdcall glEdgeFlagPointer(long ptr ) wine_glEdgeFlagPointer @ stdcall glGetPointerv(long ptr ) wine_glGetPointerv @ stdcall glArrayElement(long ) wine_glArrayElement @ stdcall glDrawArrays(long long long ) wine_glDrawArrays @ stdcall glDrawElements(long long long ptr ) wine_glDrawElements @ stdcall glInterleavedArrays(long long ptr ) wine_glInterleavedArrays @ stdcall glShadeModel(long ) wine_glShadeModel @ stdcall glLightf(long long long ) wine_glLightf @ stdcall glLighti(long long long ) wine_glLighti @ stdcall glLightfv(long long ptr ) wine_glLightfv @ stdcall glLightiv(long long ptr ) wine_glLightiv @ stdcall glGetLightfv(long long ptr ) wine_glGetLightfv @ stdcall glGetLightiv(long long ptr ) wine_glGetLightiv @ stdcall glLightModelf(long long ) wine_glLightModelf @ stdcall glLightModeli(long long ) wine_glLightModeli @ stdcall glLightModelfv(long ptr ) wine_glLightModelfv @ stdcall glLightModeliv(long ptr ) wine_glLightModeliv @ stdcall glMaterialf(long long long ) wine_glMaterialf @ stdcall glMateriali(long long long ) wine_glMateriali @ stdcall glMaterialfv(long long ptr ) wine_glMaterialfv @ stdcall glMaterialiv(long long ptr ) wine_glMaterialiv @ stdcall glGetMaterialfv(long long ptr ) wine_glGetMaterialfv @ stdcall glGetMaterialiv(long long ptr ) wine_glGetMaterialiv @ stdcall glColorMaterial(long long ) wine_glColorMaterial @ stdcall glPixelZoom(long long ) wine_glPixelZoom @ stdcall glPixelStoref(long long ) wine_glPixelStoref @ stdcall glPixelStorei(long long ) wine_glPixelStorei @ stdcall glPixelTransferf(long long ) wine_glPixelTransferf @ stdcall glPixelTransferi(long long ) wine_glPixelTransferi @ stdcall glPixelMapfv(long long ptr ) wine_glPixelMapfv @ stdcall glPixelMapuiv(long long ptr ) wine_glPixelMapuiv @ stdcall glPixelMapusv(long long ptr ) wine_glPixelMapusv @ stdcall glGetPixelMapfv(long ptr ) wine_glGetPixelMapfv @ stdcall glGetPixelMapuiv(long ptr ) wine_glGetPixelMapuiv @ stdcall glGetPixelMapusv(long ptr ) wine_glGetPixelMapusv @ stdcall glBitmap(long long long long long long ptr ) wine_glBitmap @ stdcall glReadPixels(long long long long long long ptr ) wine_glReadPixels @ stdcall glDrawPixels(long long long long ptr ) wine_glDrawPixels @ stdcall glCopyPixels(long long long long long ) wine_glCopyPixels @ stdcall glStencilFunc(long long long ) wine_glStencilFunc @ stdcall glStencilMask(long ) wine_glStencilMask @ stdcall glStencilOp(long long long ) wine_glStencilOp @ stdcall glClearStencil(long ) wine_glClearStencil @ stdcall glTexGend(long long double ) wine_glTexGend @ stdcall glTexGenf(long long long ) wine_glTexGenf @ stdcall glTexGeni(long long long ) wine_glTexGeni @ stdcall glTexGendv(long long ptr ) wine_glTexGendv @ stdcall glTexGenfv(long long ptr ) wine_glTexGenfv @ stdcall glTexGeniv(long long ptr ) wine_glTexGeniv @ stdcall glGetTexGendv(long long ptr ) wine_glGetTexGendv @ stdcall glGetTexGenfv(long long ptr ) wine_glGetTexGenfv @ stdcall glGetTexGeniv(long long ptr ) wine_glGetTexGeniv @ stdcall glTexEnvf(long long long ) wine_glTexEnvf @ stdcall glTexEnvi(long long long ) wine_glTexEnvi @ stdcall glTexEnvfv(long long ptr ) wine_glTexEnvfv @ stdcall glTexEnviv(long long ptr ) wine_glTexEnviv @ stdcall glGetTexEnvfv(long long ptr ) wine_glGetTexEnvfv @ stdcall glGetTexEnviv(long long ptr ) wine_glGetTexEnviv @ stdcall glTexParameterf(long long long ) wine_glTexParameterf @ stdcall glTexParameteri(long long long ) wine_glTexParameteri @ stdcall glTexParameterfv(long long ptr ) wine_glTexParameterfv @ stdcall glTexParameteriv(long long ptr ) wine_glTexParameteriv @ stdcall glGetTexParameterfv(long long ptr ) wine_glGetTexParameterfv @ stdcall glGetTexParameteriv(long long ptr ) wine_glGetTexParameteriv @ stdcall glGetTexLevelParameterfv(long long long ptr ) wine_glGetTexLevelParameterfv @ stdcall glGetTexLevelParameteriv(long long long ptr ) wine_glGetTexLevelParameteriv @ stdcall glTexImage1D(long long long long long long long ptr ) wine_glTexImage1D @ stdcall glTexImage2D(long long long long long long long long ptr ) wine_glTexImage2D @ stdcall glGetTexImage(long long long long ptr ) wine_glGetTexImage @ stdcall glGenTextures(long ptr ) wine_glGenTextures @ stdcall glDeleteTextures(long ptr ) wine_glDeleteTextures @ stdcall glBindTexture(long long ) wine_glBindTexture @ stdcall glPrioritizeTextures(long ptr ptr ) wine_glPrioritizeTextures @ stdcall glAreTexturesResident(long ptr ptr ) wine_glAreTexturesResident @ stdcall glIsTexture(long ) wine_glIsTexture @ stdcall glTexSubImage1D(long long long long long long ptr ) wine_glTexSubImage1D @ stdcall glTexSubImage2D(long long long long long long long long ptr ) wine_glTexSubImage2D @ stdcall glCopyTexImage1D(long long long long long long long ) wine_glCopyTexImage1D @ stdcall glCopyTexImage2D(long long long long long long long long ) wine_glCopyTexImage2D @ stdcall glCopyTexSubImage1D(long long long long long long ) wine_glCopyTexSubImage1D @ stdcall glCopyTexSubImage2D(long long long long long long long long ) wine_glCopyTexSubImage2D @ stdcall glMap1d(long double double long long ptr ) wine_glMap1d @ stdcall glMap1f(long long long long long ptr ) wine_glMap1f @ stdcall glMap2d(long double double long long double double long long ptr ) wine_glMap2d @ stdcall glMap2f(long long long long long long long long long ptr ) wine_glMap2f @ stdcall glGetMapdv(long long ptr ) wine_glGetMapdv @ stdcall glGetMapfv(long long ptr ) wine_glGetMapfv @ stdcall glGetMapiv(long long ptr ) wine_glGetMapiv @ stdcall glEvalCoord1d(double ) wine_glEvalCoord1d @ stdcall glEvalCoord1f(long ) wine_glEvalCoord1f @ stdcall glEvalCoord1dv(ptr ) wine_glEvalCoord1dv @ stdcall glEvalCoord1fv(ptr ) wine_glEvalCoord1fv @ stdcall glEvalCoord2d(double double ) wine_glEvalCoord2d @ stdcall glEvalCoord2f(long long ) wine_glEvalCoord2f @ stdcall glEvalCoord2dv(ptr ) wine_glEvalCoord2dv @ stdcall glEvalCoord2fv(ptr ) wine_glEvalCoord2fv @ stdcall glMapGrid1d(long double double ) wine_glMapGrid1d @ stdcall glMapGrid1f(long long long ) wine_glMapGrid1f @ stdcall glMapGrid2d(long double double long double double ) wine_glMapGrid2d @ stdcall glMapGrid2f(long long long long long long ) wine_glMapGrid2f @ stdcall glEvalPoint1(long ) wine_glEvalPoint1 @ stdcall glEvalPoint2(long long ) wine_glEvalPoint2 @ stdcall glEvalMesh1(long long long ) wine_glEvalMesh1 @ stdcall glEvalMesh2(long long long long long ) wine_glEvalMesh2 @ stdcall glFogf(long long ) wine_glFogf @ stdcall glFogi(long long ) wine_glFogi @ stdcall glFogfv(long ptr ) wine_glFogfv @ stdcall glFogiv(long ptr ) wine_glFogiv @ stdcall glFeedbackBuffer(long long ptr ) wine_glFeedbackBuffer @ stdcall glPassThrough(long ) wine_glPassThrough @ stdcall glSelectBuffer(long ptr ) wine_glSelectBuffer @ stdcall glInitNames() wine_glInitNames @ stdcall glLoadName(long ) wine_glLoadName @ stdcall glPushName(long ) wine_glPushName @ stdcall glPopName() wine_glPopName @ stdcall glDrawRangeElements(long long long long long ptr ) wine_glDrawRangeElements @ stdcall glTexImage3D(long long long long long long long long long ptr ) wine_glTexImage3D @ stdcall glTexSubImage3D(long long long long long long long long long long ptr ) wine_glTexSubImage3D @ stdcall glCopyTexSubImage3D(long long long long long long long long long ) wine_glCopyTexSubImage3D @ stdcall glColorTable(long long long long long ptr ) wine_glColorTable @ stdcall glColorSubTable(long long long long long ptr ) wine_glColorSubTable @ stdcall glColorTableParameteriv(long long ptr ) wine_glColorTableParameteriv @ stdcall glColorTableParameterfv(long long ptr ) wine_glColorTableParameterfv @ stdcall glCopyColorSubTable(long long long long long ) wine_glCopyColorSubTable @ stdcall glCopyColorTable(long long long long long ) wine_glCopyColorTable @ stdcall glGetColorTable(long long long ptr ) wine_glGetColorTable @ stdcall glGetColorTableParameterfv(long long ptr ) wine_glGetColorTableParameterfv @ stdcall glGetColorTableParameteriv(long long ptr ) wine_glGetColorTableParameteriv @ stdcall glBlendEquation(long ) wine_glBlendEquation @ stdcall glBlendColor(long long long long ) wine_glBlendColor @ stdcall glHistogram(long long long long ) wine_glHistogram @ stdcall glResetHistogram(long ) wine_glResetHistogram @ stdcall glGetHistogram(long long long long ptr ) wine_glGetHistogram @ stdcall glGetHistogramParameterfv(long long ptr ) wine_glGetHistogramParameterfv @ stdcall glGetHistogramParameteriv(long long ptr ) wine_glGetHistogramParameteriv @ stdcall glMinmax(long long long ) wine_glMinmax @ stdcall glResetMinmax(long ) wine_glResetMinmax @ stdcall glGetMinmax(long long long long ptr ) wine_glGetMinmax @ stdcall glGetMinmaxParameterfv(long long ptr ) wine_glGetMinmaxParameterfv @ stdcall glGetMinmaxParameteriv(long long ptr ) wine_glGetMinmaxParameteriv @ stdcall glConvolutionFilter1D(long long long long long ptr ) wine_glConvolutionFilter1D @ stdcall glConvolutionFilter2D(long long long long long long ptr ) wine_glConvolutionFilter2D @ stdcall glConvolutionParameterf(long long long ) wine_glConvolutionParameterf @ stdcall glConvolutionParameterfv(long long ptr ) wine_glConvolutionParameterfv @ stdcall glConvolutionParameteri(long long long ) wine_glConvolutionParameteri @ stdcall glConvolutionParameteriv(long long ptr ) wine_glConvolutionParameteriv @ stdcall glCopyConvolutionFilter1D(long long long long long ) wine_glCopyConvolutionFilter1D @ stdcall glCopyConvolutionFilter2D(long long long long long long ) wine_glCopyConvolutionFilter2D @ stdcall glGetConvolutionFilter(long long long ptr ) wine_glGetConvolutionFilter @ stdcall glGetConvolutionParameterfv(long long ptr ) wine_glGetConvolutionParameterfv @ stdcall glGetConvolutionParameteriv(long long ptr ) wine_glGetConvolutionParameteriv @ stdcall glSeparableFilter2D(long long long long long long ptr ptr ) wine_glSeparableFilter2D @ stdcall glGetSeparableFilter(long long long ptr ptr ptr ) wine_glGetSeparableFilter @ stdcall glActiveTextureARB(long ) wine_glActiveTextureARB @ stdcall glClientActiveTextureARB(long ) wine_glClientActiveTextureARB @ stdcall glMultiTexCoord1dARB(long double ) wine_glMultiTexCoord1dARB @ stdcall glMultiTexCoord1dvARB(long ptr ) wine_glMultiTexCoord1dvARB @ stdcall glMultiTexCoord1fARB(long long ) wine_glMultiTexCoord1fARB @ stdcall glMultiTexCoord1fvARB(long ptr ) wine_glMultiTexCoord1fvARB @ stdcall glMultiTexCoord1iARB(long long ) wine_glMultiTexCoord1iARB @ stdcall glMultiTexCoord1ivARB(long ptr ) wine_glMultiTexCoord1ivARB @ stdcall glMultiTexCoord1sARB(long long ) wine_glMultiTexCoord1sARB @ stdcall glMultiTexCoord1svARB(long ptr ) wine_glMultiTexCoord1svARB @ stdcall glMultiTexCoord2dARB(long double double ) wine_glMultiTexCoord2dARB @ stdcall glMultiTexCoord2dvARB(long ptr ) wine_glMultiTexCoord2dvARB @ stdcall glMultiTexCoord2fARB(long long long ) wine_glMultiTexCoord2fARB @ stdcall glMultiTexCoord2fvARB(long ptr ) wine_glMultiTexCoord2fvARB @ stdcall glMultiTexCoord2iARB(long long long ) wine_glMultiTexCoord2iARB @ stdcall glMultiTexCoord2ivARB(long ptr ) wine_glMultiTexCoord2ivARB @ stdcall glMultiTexCoord2sARB(long long long ) wine_glMultiTexCoord2sARB @ stdcall glMultiTexCoord2svARB(long ptr ) wine_glMultiTexCoord2svARB @ stdcall glMultiTexCoord3dARB(long double double double ) wine_glMultiTexCoord3dARB @ stdcall glMultiTexCoord3dvARB(long ptr ) wine_glMultiTexCoord3dvARB @ stdcall glMultiTexCoord3fARB(long long long long ) wine_glMultiTexCoord3fARB @ stdcall glMultiTexCoord3fvARB(long ptr ) wine_glMultiTexCoord3fvARB @ stdcall glMultiTexCoord3iARB(long long long long ) wine_glMultiTexCoord3iARB @ stdcall glMultiTexCoord3ivARB(long ptr ) wine_glMultiTexCoord3ivARB @ stdcall glMultiTexCoord3sARB(long long long long ) wine_glMultiTexCoord3sARB @ stdcall glMultiTexCoord3svARB(long ptr ) wine_glMultiTexCoord3svARB @ stdcall glMultiTexCoord4dARB(long double double double double ) wine_glMultiTexCoord4dARB @ stdcall glMultiTexCoord4dvARB(long ptr ) wine_glMultiTexCoord4dvARB @ stdcall glMultiTexCoord4fARB(long long long long long ) wine_glMultiTexCoord4fARB @ stdcall glMultiTexCoord4fvARB(long ptr ) wine_glMultiTexCoord4fvARB @ stdcall glMultiTexCoord4iARB(long long long long long ) wine_glMultiTexCoord4iARB @ stdcall glMultiTexCoord4ivARB(long ptr ) wine_glMultiTexCoord4ivARB @ stdcall glMultiTexCoord4sARB(long long long long long ) wine_glMultiTexCoord4sARB @ stdcall glMultiTexCoord4svARB(long ptr ) wine_glMultiTexCoord4svARB wine-20000526/dlls/opengl32/opengl_ext.c0100644000175000001440000044636007107063407017362 0ustar julliardusers /* Auto-generated file... Do not edit ! */ #include "config.h" #include "wine_gl.h" #include "opengl_ext.h" /* These will be filled during a wglGetProcAddress call */ void (*func_glApplyTextureEXT)(GLenum) = (void *) 0xdeadbeef; GLboolean (*func_glAreTexturesResidentEXT)(GLsizei, const GLuint *, GLboolean *) = (void *) 0xdeadbeef; void (*func_glArrayElementEXT)(GLint) = (void *) 0xdeadbeef; void (*func_glBindTextureEXT)(GLenum, GLuint) = (void *) 0xdeadbeef; void (*func_glBinormal3b)(GLbyte, GLbyte, GLbyte) = (void *) 0xdeadbeef; void (*func_glBinormal3bv)(const GLbyte *) = (void *) 0xdeadbeef; void (*func_glBinormal3d)(GLdouble, GLdouble, GLdouble) = (void *) 0xdeadbeef; void (*func_glBinormal3dv)(const GLdouble *) = (void *) 0xdeadbeef; void (*func_glBinormal3f)(GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glBinormal3fv)(const GLfloat *) = (void *) 0xdeadbeef; void (*func_glBinormal3i)(GLint, GLint, GLint) = (void *) 0xdeadbeef; void (*func_glBinormal3iv)(const GLint *) = (void *) 0xdeadbeef; void (*func_glBinormal3s)(GLshort, GLshort, GLshort) = (void *) 0xdeadbeef; void (*func_glBinormal3sv)(const GLshort *) = (void *) 0xdeadbeef; void (*func_glBinormalPointerEXT)(GLenum, GLsizei, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glBlendColorEXT)(GLclampf, GLclampf, GLclampf, GLclampf) = (void *) 0xdeadbeef; void (*func_glBlendEquationEXT)(GLenum) = (void *) 0xdeadbeef; void (*func_glBlendFuncSeparateEXT)(GLenum, GLenum, GLenum, GLenum) = (void *) 0xdeadbeef; void (*func_glColor3fVertex3fSUN)(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glColor3fVertex3fvSUN)(const GLfloat *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glColor4fNormal3fVertex3fSUN)(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glColor4fNormal3fVertex3fvSUN)(const GLfloat *, const GLfloat *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glColor4ubVertex2fSUN)(GLubyte, GLubyte, GLubyte, GLubyte, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glColor4ubVertex2fvSUN)(const GLubyte *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glColor4ubVertex3fSUN)(GLubyte, GLubyte, GLubyte, GLubyte, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glColor4ubVertex3fvSUN)(const GLubyte *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glColorPointerEXT)(GLint, GLenum, GLsizei, GLsizei, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glColorPointerListIBM)(GLint, GLenum, GLint, const GLvoid* *, GLint) = (void *) 0xdeadbeef; void (*func_glColorPointervINTEL)(GLint, GLenum, const GLvoid* *) = (void *) 0xdeadbeef; void (*func_glColorSubTableEXT)(GLenum, GLsizei, GLsizei, GLenum, GLenum, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glColorTableEXT)(GLenum, GLenum, GLsizei, GLenum, GLenum, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glColorTableParameterfvSGI)(GLenum, GLenum, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glColorTableParameterivSGI)(GLenum, GLenum, const GLint *) = (void *) 0xdeadbeef; void (*func_glColorTableSGI)(GLenum, GLenum, GLsizei, GLenum, GLenum, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glCombinerInputNV)(GLenum, GLenum, GLenum, GLenum, GLenum, GLenum) = (void *) 0xdeadbeef; void (*func_glCombinerOutputNV)(GLenum, GLenum, GLenum, GLenum, GLenum, GLenum, GLenum, GLboolean, GLboolean, GLboolean) = (void *) 0xdeadbeef; void (*func_glCombinerParameterfNV)(GLenum, GLfloat) = (void *) 0xdeadbeef; void (*func_glCombinerParameterfvNV)(GLenum, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glCombinerParameteriNV)(GLenum, GLint) = (void *) 0xdeadbeef; void (*func_glCombinerParameterivNV)(GLenum, const GLint *) = (void *) 0xdeadbeef; void (*func_glCompressedTexImage1DARB)(GLenum, GLint, GLenum, GLsizei, GLint, GLsizei, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glCompressedTexImage2DARB)(GLenum, GLint, GLenum, GLsizei, GLsizei, GLint, GLsizei, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glCompressedTexImage3DARB)(GLenum, GLint, GLenum, GLsizei, GLsizei, GLsizei, GLint, GLsizei, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glCompressedTexSubImage1DARB)(GLenum, GLint, GLint, GLsizei, GLenum, GLsizei, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glCompressedTexSubImage2DARB)(GLenum, GLint, GLint, GLint, GLsizei, GLsizei, GLenum, GLsizei, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glCompressedTexSubImage3DARB)(GLenum, GLint, GLint, GLint, GLint, GLsizei, GLsizei, GLsizei, GLenum, GLsizei, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glConvolutionFilter1DEXT)(GLenum, GLenum, GLsizei, GLenum, GLenum, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glConvolutionFilter2DEXT)(GLenum, GLenum, GLsizei, GLsizei, GLenum, GLenum, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glConvolutionParameterfEXT)(GLenum, GLenum, GLfloat) = (void *) 0xdeadbeef; void (*func_glConvolutionParameterfvEXT)(GLenum, GLenum, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glConvolutionParameteriEXT)(GLenum, GLenum, GLint) = (void *) 0xdeadbeef; void (*func_glConvolutionParameterivEXT)(GLenum, GLenum, const GLint *) = (void *) 0xdeadbeef; void (*func_glCopyColorSubTableEXT)(GLenum, GLsizei, GLint, GLint, GLsizei) = (void *) 0xdeadbeef; void (*func_glCopyColorTableSGI)(GLenum, GLenum, GLint, GLint, GLsizei) = (void *) 0xdeadbeef; void (*func_glCopyConvolutionFilter1DEXT)(GLenum, GLenum, GLint, GLint, GLsizei) = (void *) 0xdeadbeef; void (*func_glCopyConvolutionFilter2DEXT)(GLenum, GLenum, GLint, GLint, GLsizei, GLsizei) = (void *) 0xdeadbeef; void (*func_glCopyTexImage1DEXT)(GLenum, GLint, GLenum, GLint, GLint, GLsizei, GLint) = (void *) 0xdeadbeef; void (*func_glCopyTexImage2DEXT)(GLenum, GLint, GLenum, GLint, GLint, GLsizei, GLsizei, GLint) = (void *) 0xdeadbeef; void (*func_glCopyTexSubImage1DEXT)(GLenum, GLint, GLint, GLint, GLint, GLsizei) = (void *) 0xdeadbeef; void (*func_glCopyTexSubImage2DEXT)(GLenum, GLint, GLint, GLint, GLint, GLint, GLsizei, GLsizei) = (void *) 0xdeadbeef; void (*func_glCopyTexSubImage3DEXT)(GLenum, GLint, GLint, GLint, GLint, GLint, GLint, GLsizei, GLsizei) = (void *) 0xdeadbeef; void (*func_glCullParameterdvEXT)(GLenum, GLdouble *) = (void *) 0xdeadbeef; void (*func_glCullParameterfvEXT)(GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glDeleteTexturesEXT)(GLsizei, const GLuint *) = (void *) 0xdeadbeef; void (*func_glDetailTexFuncSGIS)(GLenum, GLsizei, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glDrawArraysEXT)(GLenum, GLint, GLsizei) = (void *) 0xdeadbeef; void (*func_glDrawRangeElementsEXT)(GLenum, GLuint, GLuint, GLsizei, GLenum, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glEdgeFlagPointerEXT)(GLsizei, GLsizei, const GLboolean *) = (void *) 0xdeadbeef; void (*func_glEdgeFlagPointerListIBM)(GLint, const GLboolean* *, GLint) = (void *) 0xdeadbeef; void (*func_glFinalCombinerInputNV)(GLenum, GLenum, GLenum, GLenum) = (void *) 0xdeadbeef; void (*func_glFinishTextureSUNX)(void) = (void *) 0xdeadbeef; void (*func_glFlushRasterSGIX)(void) = (void *) 0xdeadbeef; void (*func_glFlushVertexArrayRangeNV)(void) = (void *) 0xdeadbeef; void (*func_glFogCoordPointerEXT)(GLenum, GLsizei, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glFogCoordPointerListIBM)(GLenum, GLint, const GLvoid* *, GLint) = (void *) 0xdeadbeef; void (*func_glFogCoorddEXT)(GLdouble) = (void *) 0xdeadbeef; void (*func_glFogCoorddvEXT)(const GLdouble *) = (void *) 0xdeadbeef; void (*func_glFogCoordfEXT)(GLfloat) = (void *) 0xdeadbeef; void (*func_glFogCoordfvEXT)(const GLfloat *) = (void *) 0xdeadbeef; void (*func_glFogFuncSGIS)(GLsizei, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glFragmentColorMaterialSGIX)(GLenum, GLenum) = (void *) 0xdeadbeef; void (*func_glFragmentLightModelfSGIX)(GLenum, GLfloat) = (void *) 0xdeadbeef; void (*func_glFragmentLightModelfvSGIX)(GLenum, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glFragmentLightModeliSGIX)(GLenum, GLint) = (void *) 0xdeadbeef; void (*func_glFragmentLightModelivSGIX)(GLenum, const GLint *) = (void *) 0xdeadbeef; void (*func_glFragmentLightfSGIX)(GLenum, GLenum, GLfloat) = (void *) 0xdeadbeef; void (*func_glFragmentLightfvSGIX)(GLenum, GLenum, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glFragmentLightiSGIX)(GLenum, GLenum, GLint) = (void *) 0xdeadbeef; void (*func_glFragmentLightivSGIX)(GLenum, GLenum, const GLint *) = (void *) 0xdeadbeef; void (*func_glFragmentMaterialfSGIX)(GLenum, GLenum, GLfloat) = (void *) 0xdeadbeef; void (*func_glFragmentMaterialfvSGIX)(GLenum, GLenum, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glFragmentMaterialiSGIX)(GLenum, GLenum, GLint) = (void *) 0xdeadbeef; void (*func_glFragmentMaterialivSGIX)(GLenum, GLenum, const GLint *) = (void *) 0xdeadbeef; void (*func_glFrameZoomSGIX)(GLint) = (void *) 0xdeadbeef; void (*func_glGenTexturesEXT)(GLsizei, GLuint *) = (void *) 0xdeadbeef; void (*func_glGetColorTableEXT)(GLenum, GLenum, GLenum, GLvoid *) = (void *) 0xdeadbeef; void (*func_glGetColorTableParameterfvEXT)(GLenum, GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glGetColorTableParameterfvSGI)(GLenum, GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glGetColorTableParameterivEXT)(GLenum, GLenum, GLint *) = (void *) 0xdeadbeef; void (*func_glGetColorTableParameterivSGI)(GLenum, GLenum, GLint *) = (void *) 0xdeadbeef; void (*func_glGetColorTableSGI)(GLenum, GLenum, GLenum, GLvoid *) = (void *) 0xdeadbeef; void (*func_glGetCombinerInputParameterfvNV)(GLenum, GLenum, GLenum, GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glGetCombinerInputParameterivNV)(GLenum, GLenum, GLenum, GLenum, GLint *) = (void *) 0xdeadbeef; void (*func_glGetCombinerOutputParameterfvNV)(GLenum, GLenum, GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glGetCombinerOutputParameterivNV)(GLenum, GLenum, GLenum, GLint *) = (void *) 0xdeadbeef; void (*func_glGetCompressedTexImageARB)(GLenum, GLint, void *) = (void *) 0xdeadbeef; void (*func_glGetConvolutionFilterEXT)(GLenum, GLenum, GLenum, GLvoid *) = (void *) 0xdeadbeef; void (*func_glGetConvolutionParameterfvEXT)(GLenum, GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glGetConvolutionParameterivEXT)(GLenum, GLenum, GLint *) = (void *) 0xdeadbeef; void (*func_glGetDetailTexFuncSGIS)(GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glGetFinalCombinerInputParameterfvNV)(GLenum, GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glGetFinalCombinerInputParameterivNV)(GLenum, GLenum, GLint *) = (void *) 0xdeadbeef; void (*func_glGetFogFuncSGIS)(const GLfloat *) = (void *) 0xdeadbeef; void (*func_glGetFragmentLightfvSGIX)(GLenum, GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glGetFragmentLightivSGIX)(GLenum, GLenum, GLint *) = (void *) 0xdeadbeef; void (*func_glGetFragmentMaterialfvSGIX)(GLenum, GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glGetFragmentMaterialivSGIX)(GLenum, GLenum, GLint *) = (void *) 0xdeadbeef; void (*func_glGetHistogramEXT)(GLenum, GLboolean, GLenum, GLenum, GLvoid *) = (void *) 0xdeadbeef; void (*func_glGetHistogramParameterfvEXT)(GLenum, GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glGetHistogramParameterivEXT)(GLenum, GLenum, GLint *) = (void *) 0xdeadbeef; void (*func_glGetImageTransformParameterfvHP)(GLenum, GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glGetImageTransformParameterivHP)(GLenum, GLenum, GLint *) = (void *) 0xdeadbeef; GLint (*func_glGetInstrumentsSGIX)(void) = (void *) 0xdeadbeef; void (*func_glGetListParameterfvSGIX)(GLuint, GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glGetListParameterivSGIX)(GLuint, GLenum, GLint *) = (void *) 0xdeadbeef; void (*func_glGetMinmaxEXT)(GLenum, GLboolean, GLenum, GLenum, GLvoid *) = (void *) 0xdeadbeef; void (*func_glGetMinmaxParameterfvEXT)(GLenum, GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glGetMinmaxParameterivEXT)(GLenum, GLenum, GLint *) = (void *) 0xdeadbeef; void (*func_glGetPixelTexGenParameterfvSGIS)(GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glGetPixelTexGenParameterivSGIS)(GLenum, GLint *) = (void *) 0xdeadbeef; void (*func_glGetPointervEXT)(GLenum, GLvoid* *) = (void *) 0xdeadbeef; void (*func_glGetSeparableFilterEXT)(GLenum, GLenum, GLenum, GLvoid *, GLvoid *, GLvoid *) = (void *) 0xdeadbeef; void (*func_glGetSharpenTexFuncSGIS)(GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glGetTexFilterFuncSGIS)(GLenum, GLenum, GLfloat *) = (void *) 0xdeadbeef; void (*func_glGlobalAlphaFactorbSUN)(GLbyte) = (void *) 0xdeadbeef; void (*func_glGlobalAlphaFactordSUN)(GLdouble) = (void *) 0xdeadbeef; void (*func_glGlobalAlphaFactorfSUN)(GLfloat) = (void *) 0xdeadbeef; void (*func_glGlobalAlphaFactoriSUN)(GLint) = (void *) 0xdeadbeef; void (*func_glGlobalAlphaFactorsSUN)(GLshort) = (void *) 0xdeadbeef; void (*func_glGlobalAlphaFactorubSUN)(GLubyte) = (void *) 0xdeadbeef; void (*func_glGlobalAlphaFactoruiSUN)(GLuint) = (void *) 0xdeadbeef; void (*func_glGlobalAlphaFactorusSUN)(GLushort) = (void *) 0xdeadbeef; void (*func_glHintPGI)(GLenum, GLint) = (void *) 0xdeadbeef; void (*func_glHistogramEXT)(GLenum, GLsizei, GLenum, GLboolean) = (void *) 0xdeadbeef; void (*func_glImageTransformParameterfHP)(GLenum, GLenum, GLfloat) = (void *) 0xdeadbeef; void (*func_glImageTransformParameterfvHP)(GLenum, GLenum, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glImageTransformParameteriHP)(GLenum, GLenum, GLint) = (void *) 0xdeadbeef; void (*func_glImageTransformParameterivHP)(GLenum, GLenum, const GLint *) = (void *) 0xdeadbeef; void (*func_glIndexFuncEXT)(GLenum, GLclampf) = (void *) 0xdeadbeef; void (*func_glIndexMaterialEXT)(GLenum, GLenum) = (void *) 0xdeadbeef; void (*func_glIndexPointerEXT)(GLenum, GLsizei, GLsizei, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glIndexPointerListIBM)(GLenum, GLint, const GLvoid* *, GLint) = (void *) 0xdeadbeef; void (*func_glInstrumentsBufferSGIX)(GLsizei, GLint *) = (void *) 0xdeadbeef; GLboolean (*func_glIsTextureEXT)(GLuint) = (void *) 0xdeadbeef; void (*func_glLightEnviSGIX)(GLenum, GLint) = (void *) 0xdeadbeef; void (*func_glListParameterfSGIX)(GLuint, GLenum, GLfloat) = (void *) 0xdeadbeef; void (*func_glListParameterfvSGIX)(GLuint, GLenum, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glListParameteriSGIX)(GLuint, GLenum, GLint) = (void *) 0xdeadbeef; void (*func_glListParameterivSGIX)(GLuint, GLenum, const GLint *) = (void *) 0xdeadbeef; void (*func_glLoadTransposeMatrixdARB)(const GLdouble *) = (void *) 0xdeadbeef; void (*func_glLoadTransposeMatrixfARB)(const GLfloat *) = (void *) 0xdeadbeef; void (*func_glLockArraysEXT)(GLint, GLsizei) = (void *) 0xdeadbeef; void (*func_glMinmaxEXT)(GLenum, GLenum, GLboolean) = (void *) 0xdeadbeef; void (*func_glMultTransposeMatrixdARB)(const GLdouble *) = (void *) 0xdeadbeef; void (*func_glMultTransposeMatrixfARB)(const GLfloat *) = (void *) 0xdeadbeef; void (*func_glMultiDrawArraysEXT)(GLenum, GLint *, GLsizei *, GLsizei) = (void *) 0xdeadbeef; void (*func_glMultiDrawElementsEXT)(GLenum, const GLsizei *, GLenum, const GLvoid* *, GLsizei) = (void *) 0xdeadbeef; void (*func_glMultiModeDrawArraysIBM)(GLenum, const GLint *, const GLsizei *, GLsizei, GLint) = (void *) 0xdeadbeef; void (*func_glMultiModeDrawElementsIBM)(const GLenum *, const GLsizei *, GLenum, const GLvoid* *, GLsizei, GLint) = (void *) 0xdeadbeef; void (*func_glNormal3fVertex3fSUN)(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glNormal3fVertex3fvSUN)(const GLfloat *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glNormalPointerEXT)(GLenum, GLsizei, GLsizei, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glNormalPointerListIBM)(GLenum, GLint, const GLvoid* *, GLint) = (void *) 0xdeadbeef; void (*func_glNormalPointervINTEL)(GLenum, const GLvoid* *) = (void *) 0xdeadbeef; void (*func_glPixelTexGenParameterfSGIS)(GLenum, GLfloat) = (void *) 0xdeadbeef; void (*func_glPixelTexGenParameterfvSGIS)(GLenum, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glPixelTexGenParameteriSGIS)(GLenum, GLint) = (void *) 0xdeadbeef; void (*func_glPixelTexGenParameterivSGIS)(GLenum, const GLint *) = (void *) 0xdeadbeef; void (*func_glPixelTexGenSGIX)(GLenum) = (void *) 0xdeadbeef; void (*func_glPixelTransformParameterfEXT)(GLenum, GLenum, GLfloat) = (void *) 0xdeadbeef; void (*func_glPixelTransformParameterfvEXT)(GLenum, GLenum, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glPixelTransformParameteriEXT)(GLenum, GLenum, GLint) = (void *) 0xdeadbeef; void (*func_glPixelTransformParameterivEXT)(GLenum, GLenum, const GLint *) = (void *) 0xdeadbeef; void (*func_glPointParameterfEXT)(GLenum, GLfloat) = (void *) 0xdeadbeef; void (*func_glPointParameterfSGIS)(GLenum, GLfloat) = (void *) 0xdeadbeef; void (*func_glPointParameterfvEXT)(GLenum, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glPointParameterfvSGIS)(GLenum, const GLfloat *) = (void *) 0xdeadbeef; GLint (*func_glPollInstrumentsSGIX)(GLint *) = (void *) 0xdeadbeef; void (*func_glPolygonOffsetEXT)(GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glPrioritizeTexturesEXT)(GLsizei, const GLuint *, const GLclampf *) = (void *) 0xdeadbeef; void (*func_glReadInstrumentsSGIX)(GLint) = (void *) 0xdeadbeef; void (*func_glReferencePlaneSGIX)(const GLdouble *) = (void *) 0xdeadbeef; void (*func_glReplacementCodePointer)(GLenum, GLsizei, const GLvoid* *) = (void *) 0xdeadbeef; void (*func_glReplacementCodeubSUN)(GLubyte) = (void *) 0xdeadbeef; void (*func_glReplacementCodeubvSUN)(const GLubyte *) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiColor3fVertex3fSUN)(GLenum, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiColor3fVertex3fvSUN)(const GLenum *, const GLfloat *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiColor4fNormal3fVertex3fSUN)(GLenum, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiColor4fNormal3fVertex3fvSUN)(const GLenum *, const GLfloat *, const GLfloat *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiColor4ubVertex3fSUN)(GLenum, GLubyte, GLubyte, GLubyte, GLubyte, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiColor4ubVertex3fvSUN)(const GLenum *, const GLubyte *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiNormal3fVertex3fSUN)(GLenum, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiNormal3fVertex3fvSUN)(const GLenum *, const GLfloat *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiSUN)(GLuint) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fSUN)(GLenum, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fvSUN)(const GLenum *, const GLfloat *, const GLfloat *, const GLfloat *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiTexCoord2fNormal3fVertex3fSUN)(GLenum, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiTexCoord2fNormal3fVertex3fvSUN)(const GLenum *, const GLfloat *, const GLfloat *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiTexCoord2fVertex3fSUN)(GLenum, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiTexCoord2fVertex3fvSUN)(const GLenum *, const GLfloat *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiVertex3fSUN)(GLenum, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuiVertex3fvSUN)(const GLenum *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glReplacementCodeuivSUN)(const GLuint *) = (void *) 0xdeadbeef; void (*func_glReplacementCodeusSUN)(GLushort) = (void *) 0xdeadbeef; void (*func_glReplacementCodeusvSUN)(const GLushort *) = (void *) 0xdeadbeef; void (*func_glResetHistogramEXT)(GLenum) = (void *) 0xdeadbeef; void (*func_glResetMinmaxEXT)(GLenum) = (void *) 0xdeadbeef; void (*func_glResizeBuffersMESA)(void) = (void *) 0xdeadbeef; void (*func_glSampleCoverageARB)(GLclampf, GLboolean) = (void *) 0xdeadbeef; void (*func_glSampleMaskEXT)(GLclampf, GLboolean) = (void *) 0xdeadbeef; void (*func_glSampleMaskSGIS)(GLclampf, GLboolean) = (void *) 0xdeadbeef; void (*func_glSamplePassARB)(GLenum) = (void *) 0xdeadbeef; void (*func_glSamplePatternEXT)(GLenum) = (void *) 0xdeadbeef; void (*func_glSamplePatternSGIS)(GLenum) = (void *) 0xdeadbeef; void (*func_glSecondaryColor3bEXT)(GLbyte, GLbyte, GLbyte) = (void *) 0xdeadbeef; void (*func_glSecondaryColor3bvEXT)(const GLbyte *) = (void *) 0xdeadbeef; void (*func_glSecondaryColor3dEXT)(GLdouble, GLdouble, GLdouble) = (void *) 0xdeadbeef; void (*func_glSecondaryColor3dvEXT)(const GLdouble *) = (void *) 0xdeadbeef; void (*func_glSecondaryColor3fEXT)(GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glSecondaryColor3fvEXT)(const GLfloat *) = (void *) 0xdeadbeef; void (*func_glSecondaryColor3iEXT)(GLint, GLint, GLint) = (void *) 0xdeadbeef; void (*func_glSecondaryColor3ivEXT)(const GLint *) = (void *) 0xdeadbeef; void (*func_glSecondaryColor3sEXT)(GLshort, GLshort, GLshort) = (void *) 0xdeadbeef; void (*func_glSecondaryColor3svEXT)(const GLshort *) = (void *) 0xdeadbeef; void (*func_glSecondaryColor3ubEXT)(GLubyte, GLubyte, GLubyte) = (void *) 0xdeadbeef; void (*func_glSecondaryColor3ubvEXT)(const GLubyte *) = (void *) 0xdeadbeef; void (*func_glSecondaryColor3uiEXT)(GLuint, GLuint, GLuint) = (void *) 0xdeadbeef; void (*func_glSecondaryColor3uivEXT)(const GLuint *) = (void *) 0xdeadbeef; void (*func_glSecondaryColor3usEXT)(GLushort, GLushort, GLushort) = (void *) 0xdeadbeef; void (*func_glSecondaryColor3usvEXT)(const GLushort *) = (void *) 0xdeadbeef; void (*func_glSecondaryColorPointerEXT)(GLint, GLenum, GLsizei, GLvoid *) = (void *) 0xdeadbeef; void (*func_glSecondaryColorPointerListIBM)(GLint, GLenum, GLint, const GLvoid* *, GLint) = (void *) 0xdeadbeef; void (*func_glSeparableFilter2DEXT)(GLenum, GLenum, GLsizei, GLsizei, GLenum, GLenum, const GLvoid *, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glSharpenTexFuncSGIS)(GLenum, GLsizei, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glSpriteParameterfSGIX)(GLenum, GLfloat) = (void *) 0xdeadbeef; void (*func_glSpriteParameterfvSGIX)(GLenum, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glSpriteParameteriSGIX)(GLenum, GLint) = (void *) 0xdeadbeef; void (*func_glSpriteParameterivSGIX)(GLenum, const GLint *) = (void *) 0xdeadbeef; void (*func_glStartInstrumentsSGIX)(void) = (void *) 0xdeadbeef; void (*func_glStopInstrumentsSGIX)(GLint) = (void *) 0xdeadbeef; void (*func_glTagSampleBufferSGIX)(void) = (void *) 0xdeadbeef; void (*func_glTangent3b)(GLbyte, GLbyte, GLbyte) = (void *) 0xdeadbeef; void (*func_glTangent3bv)(const GLbyte *) = (void *) 0xdeadbeef; void (*func_glTangent3d)(GLdouble, GLdouble, GLdouble) = (void *) 0xdeadbeef; void (*func_glTangent3dv)(const GLdouble *) = (void *) 0xdeadbeef; void (*func_glTangent3f)(GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glTangent3fv)(const GLfloat *) = (void *) 0xdeadbeef; void (*func_glTangent3i)(GLint, GLint, GLint) = (void *) 0xdeadbeef; void (*func_glTangent3iv)(const GLint *) = (void *) 0xdeadbeef; void (*func_glTangent3s)(GLshort, GLshort, GLshort) = (void *) 0xdeadbeef; void (*func_glTangent3sv)(const GLshort *) = (void *) 0xdeadbeef; void (*func_glTangentPointerEXT)(GLenum, GLsizei, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glTbufferMask3DFX)(GLuint) = (void *) 0xdeadbeef; void (*func_glTexCoord2fColor3fVertex3fSUN)(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glTexCoord2fColor3fVertex3fvSUN)(const GLfloat *, const GLfloat *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glTexCoord2fColor4fNormal3fVertex3fSUN)(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glTexCoord2fColor4fNormal3fVertex3fvSUN)(const GLfloat *, const GLfloat *, const GLfloat *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glTexCoord2fColor4ubVertex3fSUN)(GLfloat, GLfloat, GLubyte, GLubyte, GLubyte, GLubyte, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glTexCoord2fColor4ubVertex3fvSUN)(const GLfloat *, const GLubyte *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glTexCoord2fNormal3fVertex3fSUN)(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glTexCoord2fNormal3fVertex3fvSUN)(const GLfloat *, const GLfloat *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glTexCoord2fVertex3fSUN)(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glTexCoord2fVertex3fvSUN)(const GLfloat *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glTexCoord4fColor4fNormal3fVertex4fSUN)(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glTexCoord4fColor4fNormal3fVertex4fvSUN)(const GLfloat *, const GLfloat *, const GLfloat *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glTexCoord4fVertex4fSUN)(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glTexCoord4fVertex4fvSUN)(const GLfloat *, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glTexCoordPointerEXT)(GLint, GLenum, GLsizei, GLsizei, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glTexCoordPointerListIBM)(GLint, GLenum, GLint, const GLvoid* *, GLint) = (void *) 0xdeadbeef; void (*func_glTexCoordPointervINTEL)(GLint, GLenum, const GLvoid* *) = (void *) 0xdeadbeef; void (*func_glTexFilterFuncSGIS)(GLenum, GLenum, GLsizei, const GLfloat *) = (void *) 0xdeadbeef; void (*func_glTexImage3DEXT)(GLenum, GLint, GLenum, GLsizei, GLsizei, GLsizei, GLint, GLenum, GLenum, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glTexImage4DSGIS)(GLenum, GLint, GLenum, GLsizei, GLsizei, GLsizei, GLsizei, GLint, GLenum, GLenum, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glTexSubImage1DEXT)(GLenum, GLint, GLint, GLsizei, GLenum, GLenum, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glTexSubImage2DEXT)(GLenum, GLint, GLint, GLint, GLsizei, GLsizei, GLenum, GLenum, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glTexSubImage3DEXT)(GLenum, GLint, GLint, GLint, GLint, GLsizei, GLsizei, GLsizei, GLenum, GLenum, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glTexSubImage4DSGIS)(GLenum, GLint, GLint, GLint, GLint, GLint, GLsizei, GLsizei, GLsizei, GLsizei, GLenum, GLenum, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glTextureLightEXT)(GLenum) = (void *) 0xdeadbeef; void (*func_glTextureMaterialEXT)(GLenum, GLenum) = (void *) 0xdeadbeef; void (*func_glTextureNormalEXT)(GLenum) = (void *) 0xdeadbeef; void (*func_glUnlockArraysEXT)(void) = (void *) 0xdeadbeef; void (*func_glVertexArrayRangeNV)(GLsizei, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glVertexPointerEXT)(GLint, GLenum, GLsizei, GLsizei, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glVertexPointerListIBM)(GLint, GLenum, GLint, const GLvoid* *, GLint) = (void *) 0xdeadbeef; void (*func_glVertexPointervINTEL)(GLint, GLenum, const GLvoid* *) = (void *) 0xdeadbeef; void (*func_glVertexWeightPointerEXT)(GLsizei, GLenum, GLsizei, const GLvoid *) = (void *) 0xdeadbeef; void (*func_glVertexWeightfEXT)(GLfloat) = (void *) 0xdeadbeef; void (*func_glVertexWeightfvEXT)(const GLfloat *) = (void *) 0xdeadbeef; void (*func_glWindowPos2dMESA)(GLdouble, GLdouble) = (void *) 0xdeadbeef; void (*func_glWindowPos2dvMESA)(const GLdouble *) = (void *) 0xdeadbeef; void (*func_glWindowPos2fMESA)(GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glWindowPos2fvMESA)(const GLfloat *) = (void *) 0xdeadbeef; void (*func_glWindowPos2iMESA)(GLint, GLint) = (void *) 0xdeadbeef; void (*func_glWindowPos2ivMESA)(const GLint *) = (void *) 0xdeadbeef; void (*func_glWindowPos2sMESA)(GLshort, GLshort) = (void *) 0xdeadbeef; void (*func_glWindowPos2svMESA)(const GLshort *) = (void *) 0xdeadbeef; void (*func_glWindowPos3dMESA)(GLdouble, GLdouble, GLdouble) = (void *) 0xdeadbeef; void (*func_glWindowPos3dvMESA)(const GLdouble *) = (void *) 0xdeadbeef; void (*func_glWindowPos3fMESA)(GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glWindowPos3fvMESA)(const GLfloat *) = (void *) 0xdeadbeef; void (*func_glWindowPos3iMESA)(GLint, GLint, GLint) = (void *) 0xdeadbeef; void (*func_glWindowPos3ivMESA)(const GLint *) = (void *) 0xdeadbeef; void (*func_glWindowPos3sMESA)(GLshort, GLshort, GLshort) = (void *) 0xdeadbeef; void (*func_glWindowPos3svMESA)(const GLshort *) = (void *) 0xdeadbeef; void (*func_glWindowPos4dMESA)(GLdouble, GLdouble, GLdouble, GLdouble) = (void *) 0xdeadbeef; void (*func_glWindowPos4dvMESA)(const GLdouble *) = (void *) 0xdeadbeef; void (*func_glWindowPos4fMESA)(GLfloat, GLfloat, GLfloat, GLfloat) = (void *) 0xdeadbeef; void (*func_glWindowPos4fvMESA)(const GLfloat *) = (void *) 0xdeadbeef; void (*func_glWindowPos4iMESA)(GLint, GLint, GLint, GLint) = (void *) 0xdeadbeef; void (*func_glWindowPos4ivMESA)(const GLint *) = (void *) 0xdeadbeef; void (*func_glWindowPos4sMESA)(GLshort, GLshort, GLshort, GLshort) = (void *) 0xdeadbeef; void (*func_glWindowPos4svMESA)(const GLshort *) = (void *) 0xdeadbeef; /* The function prototypes */ void WINAPI wine_glApplyTextureEXT(GLenum) ; GLboolean WINAPI wine_glAreTexturesResidentEXT(GLsizei, const GLuint *, GLboolean *) ; void WINAPI wine_glArrayElementEXT(GLint) ; void WINAPI wine_glBindTextureEXT(GLenum, GLuint) ; void WINAPI wine_glBinormal3b(GLbyte, GLbyte, GLbyte) ; void WINAPI wine_glBinormal3bv(const GLbyte *) ; void WINAPI wine_glBinormal3d(GLdouble, GLdouble, GLdouble) ; void WINAPI wine_glBinormal3dv(const GLdouble *) ; void WINAPI wine_glBinormal3f(GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glBinormal3fv(const GLfloat *) ; void WINAPI wine_glBinormal3i(GLint, GLint, GLint) ; void WINAPI wine_glBinormal3iv(const GLint *) ; void WINAPI wine_glBinormal3s(GLshort, GLshort, GLshort) ; void WINAPI wine_glBinormal3sv(const GLshort *) ; void WINAPI wine_glBinormalPointerEXT(GLenum, GLsizei, const GLvoid *) ; void WINAPI wine_glBlendColorEXT(GLclampf, GLclampf, GLclampf, GLclampf) ; void WINAPI wine_glBlendEquationEXT(GLenum) ; void WINAPI wine_glBlendFuncSeparateEXT(GLenum, GLenum, GLenum, GLenum) ; void WINAPI wine_glColor3fVertex3fSUN(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glColor3fVertex3fvSUN(const GLfloat *, const GLfloat *) ; void WINAPI wine_glColor4fNormal3fVertex3fSUN(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glColor4fNormal3fVertex3fvSUN(const GLfloat *, const GLfloat *, const GLfloat *) ; void WINAPI wine_glColor4ubVertex2fSUN(GLubyte, GLubyte, GLubyte, GLubyte, GLfloat, GLfloat) ; void WINAPI wine_glColor4ubVertex2fvSUN(const GLubyte *, const GLfloat *) ; void WINAPI wine_glColor4ubVertex3fSUN(GLubyte, GLubyte, GLubyte, GLubyte, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glColor4ubVertex3fvSUN(const GLubyte *, const GLfloat *) ; void WINAPI wine_glColorPointerEXT(GLint, GLenum, GLsizei, GLsizei, const GLvoid *) ; void WINAPI wine_glColorPointerListIBM(GLint, GLenum, GLint, const GLvoid* *, GLint) ; void WINAPI wine_glColorPointervINTEL(GLint, GLenum, const GLvoid* *) ; void WINAPI wine_glColorSubTableEXT(GLenum, GLsizei, GLsizei, GLenum, GLenum, const GLvoid *) ; void WINAPI wine_glColorTableEXT(GLenum, GLenum, GLsizei, GLenum, GLenum, const GLvoid *) ; void WINAPI wine_glColorTableParameterfvSGI(GLenum, GLenum, const GLfloat *) ; void WINAPI wine_glColorTableParameterivSGI(GLenum, GLenum, const GLint *) ; void WINAPI wine_glColorTableSGI(GLenum, GLenum, GLsizei, GLenum, GLenum, const GLvoid *) ; void WINAPI wine_glCombinerInputNV(GLenum, GLenum, GLenum, GLenum, GLenum, GLenum) ; void WINAPI wine_glCombinerOutputNV(GLenum, GLenum, GLenum, GLenum, GLenum, GLenum, GLenum, GLboolean, GLboolean, GLboolean) ; void WINAPI wine_glCombinerParameterfNV(GLenum, GLfloat) ; void WINAPI wine_glCombinerParameterfvNV(GLenum, const GLfloat *) ; void WINAPI wine_glCombinerParameteriNV(GLenum, GLint) ; void WINAPI wine_glCombinerParameterivNV(GLenum, const GLint *) ; void WINAPI wine_glCompressedTexImage1DARB(GLenum, GLint, GLenum, GLsizei, GLint, GLsizei, const GLvoid *) ; void WINAPI wine_glCompressedTexImage2DARB(GLenum, GLint, GLenum, GLsizei, GLsizei, GLint, GLsizei, const GLvoid *) ; void WINAPI wine_glCompressedTexImage3DARB(GLenum, GLint, GLenum, GLsizei, GLsizei, GLsizei, GLint, GLsizei, const GLvoid *) ; void WINAPI wine_glCompressedTexSubImage1DARB(GLenum, GLint, GLint, GLsizei, GLenum, GLsizei, const GLvoid *) ; void WINAPI wine_glCompressedTexSubImage2DARB(GLenum, GLint, GLint, GLint, GLsizei, GLsizei, GLenum, GLsizei, const GLvoid *) ; void WINAPI wine_glCompressedTexSubImage3DARB(GLenum, GLint, GLint, GLint, GLint, GLsizei, GLsizei, GLsizei, GLenum, GLsizei, const GLvoid *) ; void WINAPI wine_glConvolutionFilter1DEXT(GLenum, GLenum, GLsizei, GLenum, GLenum, const GLvoid *) ; void WINAPI wine_glConvolutionFilter2DEXT(GLenum, GLenum, GLsizei, GLsizei, GLenum, GLenum, const GLvoid *) ; void WINAPI wine_glConvolutionParameterfEXT(GLenum, GLenum, GLfloat) ; void WINAPI wine_glConvolutionParameterfvEXT(GLenum, GLenum, const GLfloat *) ; void WINAPI wine_glConvolutionParameteriEXT(GLenum, GLenum, GLint) ; void WINAPI wine_glConvolutionParameterivEXT(GLenum, GLenum, const GLint *) ; void WINAPI wine_glCopyColorSubTableEXT(GLenum, GLsizei, GLint, GLint, GLsizei) ; void WINAPI wine_glCopyColorTableSGI(GLenum, GLenum, GLint, GLint, GLsizei) ; void WINAPI wine_glCopyConvolutionFilter1DEXT(GLenum, GLenum, GLint, GLint, GLsizei) ; void WINAPI wine_glCopyConvolutionFilter2DEXT(GLenum, GLenum, GLint, GLint, GLsizei, GLsizei) ; void WINAPI wine_glCopyTexImage1DEXT(GLenum, GLint, GLenum, GLint, GLint, GLsizei, GLint) ; void WINAPI wine_glCopyTexImage2DEXT(GLenum, GLint, GLenum, GLint, GLint, GLsizei, GLsizei, GLint) ; void WINAPI wine_glCopyTexSubImage1DEXT(GLenum, GLint, GLint, GLint, GLint, GLsizei) ; void WINAPI wine_glCopyTexSubImage2DEXT(GLenum, GLint, GLint, GLint, GLint, GLint, GLsizei, GLsizei) ; void WINAPI wine_glCopyTexSubImage3DEXT(GLenum, GLint, GLint, GLint, GLint, GLint, GLint, GLsizei, GLsizei) ; void WINAPI wine_glCullParameterdvEXT(GLenum, GLdouble *) ; void WINAPI wine_glCullParameterfvEXT(GLenum, GLfloat *) ; void WINAPI wine_glDeleteTexturesEXT(GLsizei, const GLuint *) ; void WINAPI wine_glDetailTexFuncSGIS(GLenum, GLsizei, const GLfloat *) ; void WINAPI wine_glDrawArraysEXT(GLenum, GLint, GLsizei) ; void WINAPI wine_glDrawRangeElementsEXT(GLenum, GLuint, GLuint, GLsizei, GLenum, const GLvoid *) ; void WINAPI wine_glEdgeFlagPointerEXT(GLsizei, GLsizei, const GLboolean *) ; void WINAPI wine_glEdgeFlagPointerListIBM(GLint, const GLboolean* *, GLint) ; void WINAPI wine_glFinalCombinerInputNV(GLenum, GLenum, GLenum, GLenum) ; void WINAPI wine_glFinishTextureSUNX(void) ; void WINAPI wine_glFlushRasterSGIX(void) ; void WINAPI wine_glFlushVertexArrayRangeNV(void) ; void WINAPI wine_glFogCoordPointerEXT(GLenum, GLsizei, const GLvoid *) ; void WINAPI wine_glFogCoordPointerListIBM(GLenum, GLint, const GLvoid* *, GLint) ; void WINAPI wine_glFogCoorddEXT(GLdouble) ; void WINAPI wine_glFogCoorddvEXT(const GLdouble *) ; void WINAPI wine_glFogCoordfEXT(GLfloat) ; void WINAPI wine_glFogCoordfvEXT(const GLfloat *) ; void WINAPI wine_glFogFuncSGIS(GLsizei, const GLfloat *) ; void WINAPI wine_glFragmentColorMaterialSGIX(GLenum, GLenum) ; void WINAPI wine_glFragmentLightModelfSGIX(GLenum, GLfloat) ; void WINAPI wine_glFragmentLightModelfvSGIX(GLenum, const GLfloat *) ; void WINAPI wine_glFragmentLightModeliSGIX(GLenum, GLint) ; void WINAPI wine_glFragmentLightModelivSGIX(GLenum, const GLint *) ; void WINAPI wine_glFragmentLightfSGIX(GLenum, GLenum, GLfloat) ; void WINAPI wine_glFragmentLightfvSGIX(GLenum, GLenum, const GLfloat *) ; void WINAPI wine_glFragmentLightiSGIX(GLenum, GLenum, GLint) ; void WINAPI wine_glFragmentLightivSGIX(GLenum, GLenum, const GLint *) ; void WINAPI wine_glFragmentMaterialfSGIX(GLenum, GLenum, GLfloat) ; void WINAPI wine_glFragmentMaterialfvSGIX(GLenum, GLenum, const GLfloat *) ; void WINAPI wine_glFragmentMaterialiSGIX(GLenum, GLenum, GLint) ; void WINAPI wine_glFragmentMaterialivSGIX(GLenum, GLenum, const GLint *) ; void WINAPI wine_glFrameZoomSGIX(GLint) ; void WINAPI wine_glGenTexturesEXT(GLsizei, GLuint *) ; void WINAPI wine_glGetColorTableEXT(GLenum, GLenum, GLenum, GLvoid *) ; void WINAPI wine_glGetColorTableParameterfvEXT(GLenum, GLenum, GLfloat *) ; void WINAPI wine_glGetColorTableParameterfvSGI(GLenum, GLenum, GLfloat *) ; void WINAPI wine_glGetColorTableParameterivEXT(GLenum, GLenum, GLint *) ; void WINAPI wine_glGetColorTableParameterivSGI(GLenum, GLenum, GLint *) ; void WINAPI wine_glGetColorTableSGI(GLenum, GLenum, GLenum, GLvoid *) ; void WINAPI wine_glGetCombinerInputParameterfvNV(GLenum, GLenum, GLenum, GLenum, GLfloat *) ; void WINAPI wine_glGetCombinerInputParameterivNV(GLenum, GLenum, GLenum, GLenum, GLint *) ; void WINAPI wine_glGetCombinerOutputParameterfvNV(GLenum, GLenum, GLenum, GLfloat *) ; void WINAPI wine_glGetCombinerOutputParameterivNV(GLenum, GLenum, GLenum, GLint *) ; void WINAPI wine_glGetCompressedTexImageARB(GLenum, GLint, void *) ; void WINAPI wine_glGetConvolutionFilterEXT(GLenum, GLenum, GLenum, GLvoid *) ; void WINAPI wine_glGetConvolutionParameterfvEXT(GLenum, GLenum, GLfloat *) ; void WINAPI wine_glGetConvolutionParameterivEXT(GLenum, GLenum, GLint *) ; void WINAPI wine_glGetDetailTexFuncSGIS(GLenum, GLfloat *) ; void WINAPI wine_glGetFinalCombinerInputParameterfvNV(GLenum, GLenum, GLfloat *) ; void WINAPI wine_glGetFinalCombinerInputParameterivNV(GLenum, GLenum, GLint *) ; void WINAPI wine_glGetFogFuncSGIS(const GLfloat *) ; void WINAPI wine_glGetFragmentLightfvSGIX(GLenum, GLenum, GLfloat *) ; void WINAPI wine_glGetFragmentLightivSGIX(GLenum, GLenum, GLint *) ; void WINAPI wine_glGetFragmentMaterialfvSGIX(GLenum, GLenum, GLfloat *) ; void WINAPI wine_glGetFragmentMaterialivSGIX(GLenum, GLenum, GLint *) ; void WINAPI wine_glGetHistogramEXT(GLenum, GLboolean, GLenum, GLenum, GLvoid *) ; void WINAPI wine_glGetHistogramParameterfvEXT(GLenum, GLenum, GLfloat *) ; void WINAPI wine_glGetHistogramParameterivEXT(GLenum, GLenum, GLint *) ; void WINAPI wine_glGetImageTransformParameterfvHP(GLenum, GLenum, GLfloat *) ; void WINAPI wine_glGetImageTransformParameterivHP(GLenum, GLenum, GLint *) ; GLint WINAPI wine_glGetInstrumentsSGIX(void) ; void WINAPI wine_glGetListParameterfvSGIX(GLuint, GLenum, GLfloat *) ; void WINAPI wine_glGetListParameterivSGIX(GLuint, GLenum, GLint *) ; void WINAPI wine_glGetMinmaxEXT(GLenum, GLboolean, GLenum, GLenum, GLvoid *) ; void WINAPI wine_glGetMinmaxParameterfvEXT(GLenum, GLenum, GLfloat *) ; void WINAPI wine_glGetMinmaxParameterivEXT(GLenum, GLenum, GLint *) ; void WINAPI wine_glGetPixelTexGenParameterfvSGIS(GLenum, GLfloat *) ; void WINAPI wine_glGetPixelTexGenParameterivSGIS(GLenum, GLint *) ; void WINAPI wine_glGetPointervEXT(GLenum, GLvoid* *) ; void WINAPI wine_glGetSeparableFilterEXT(GLenum, GLenum, GLenum, GLvoid *, GLvoid *, GLvoid *) ; void WINAPI wine_glGetSharpenTexFuncSGIS(GLenum, GLfloat *) ; void WINAPI wine_glGetTexFilterFuncSGIS(GLenum, GLenum, GLfloat *) ; void WINAPI wine_glGlobalAlphaFactorbSUN(GLbyte) ; void WINAPI wine_glGlobalAlphaFactordSUN(GLdouble) ; void WINAPI wine_glGlobalAlphaFactorfSUN(GLfloat) ; void WINAPI wine_glGlobalAlphaFactoriSUN(GLint) ; void WINAPI wine_glGlobalAlphaFactorsSUN(GLshort) ; void WINAPI wine_glGlobalAlphaFactorubSUN(GLubyte) ; void WINAPI wine_glGlobalAlphaFactoruiSUN(GLuint) ; void WINAPI wine_glGlobalAlphaFactorusSUN(GLushort) ; void WINAPI wine_glHintPGI(GLenum, GLint) ; void WINAPI wine_glHistogramEXT(GLenum, GLsizei, GLenum, GLboolean) ; void WINAPI wine_glImageTransformParameterfHP(GLenum, GLenum, GLfloat) ; void WINAPI wine_glImageTransformParameterfvHP(GLenum, GLenum, const GLfloat *) ; void WINAPI wine_glImageTransformParameteriHP(GLenum, GLenum, GLint) ; void WINAPI wine_glImageTransformParameterivHP(GLenum, GLenum, const GLint *) ; void WINAPI wine_glIndexFuncEXT(GLenum, GLclampf) ; void WINAPI wine_glIndexMaterialEXT(GLenum, GLenum) ; void WINAPI wine_glIndexPointerEXT(GLenum, GLsizei, GLsizei, const GLvoid *) ; void WINAPI wine_glIndexPointerListIBM(GLenum, GLint, const GLvoid* *, GLint) ; void WINAPI wine_glInstrumentsBufferSGIX(GLsizei, GLint *) ; GLboolean WINAPI wine_glIsTextureEXT(GLuint) ; void WINAPI wine_glLightEnviSGIX(GLenum, GLint) ; void WINAPI wine_glListParameterfSGIX(GLuint, GLenum, GLfloat) ; void WINAPI wine_glListParameterfvSGIX(GLuint, GLenum, const GLfloat *) ; void WINAPI wine_glListParameteriSGIX(GLuint, GLenum, GLint) ; void WINAPI wine_glListParameterivSGIX(GLuint, GLenum, const GLint *) ; void WINAPI wine_glLoadTransposeMatrixdARB(const GLdouble *) ; void WINAPI wine_glLoadTransposeMatrixfARB(const GLfloat *) ; void WINAPI wine_glLockArraysEXT(GLint, GLsizei) ; void WINAPI wine_glMinmaxEXT(GLenum, GLenum, GLboolean) ; void WINAPI wine_glMultTransposeMatrixdARB(const GLdouble *) ; void WINAPI wine_glMultTransposeMatrixfARB(const GLfloat *) ; void WINAPI wine_glMultiDrawArraysEXT(GLenum, GLint *, GLsizei *, GLsizei) ; void WINAPI wine_glMultiDrawElementsEXT(GLenum, const GLsizei *, GLenum, const GLvoid* *, GLsizei) ; void WINAPI wine_glMultiModeDrawArraysIBM(GLenum, const GLint *, const GLsizei *, GLsizei, GLint) ; void WINAPI wine_glMultiModeDrawElementsIBM(const GLenum *, const GLsizei *, GLenum, const GLvoid* *, GLsizei, GLint) ; void WINAPI wine_glNormal3fVertex3fSUN(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glNormal3fVertex3fvSUN(const GLfloat *, const GLfloat *) ; void WINAPI wine_glNormalPointerEXT(GLenum, GLsizei, GLsizei, const GLvoid *) ; void WINAPI wine_glNormalPointerListIBM(GLenum, GLint, const GLvoid* *, GLint) ; void WINAPI wine_glNormalPointervINTEL(GLenum, const GLvoid* *) ; void WINAPI wine_glPixelTexGenParameterfSGIS(GLenum, GLfloat) ; void WINAPI wine_glPixelTexGenParameterfvSGIS(GLenum, const GLfloat *) ; void WINAPI wine_glPixelTexGenParameteriSGIS(GLenum, GLint) ; void WINAPI wine_glPixelTexGenParameterivSGIS(GLenum, const GLint *) ; void WINAPI wine_glPixelTexGenSGIX(GLenum) ; void WINAPI wine_glPixelTransformParameterfEXT(GLenum, GLenum, GLfloat) ; void WINAPI wine_glPixelTransformParameterfvEXT(GLenum, GLenum, const GLfloat *) ; void WINAPI wine_glPixelTransformParameteriEXT(GLenum, GLenum, GLint) ; void WINAPI wine_glPixelTransformParameterivEXT(GLenum, GLenum, const GLint *) ; void WINAPI wine_glPointParameterfEXT(GLenum, GLfloat) ; void WINAPI wine_glPointParameterfSGIS(GLenum, GLfloat) ; void WINAPI wine_glPointParameterfvEXT(GLenum, const GLfloat *) ; void WINAPI wine_glPointParameterfvSGIS(GLenum, const GLfloat *) ; GLint WINAPI wine_glPollInstrumentsSGIX(GLint *) ; void WINAPI wine_glPolygonOffsetEXT(GLfloat, GLfloat) ; void WINAPI wine_glPrioritizeTexturesEXT(GLsizei, const GLuint *, const GLclampf *) ; void WINAPI wine_glReadInstrumentsSGIX(GLint) ; void WINAPI wine_glReferencePlaneSGIX(const GLdouble *) ; void WINAPI wine_glReplacementCodePointer(GLenum, GLsizei, const GLvoid* *) ; void WINAPI wine_glReplacementCodeubSUN(GLubyte) ; void WINAPI wine_glReplacementCodeubvSUN(const GLubyte *) ; void WINAPI wine_glReplacementCodeuiColor3fVertex3fSUN(GLenum, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glReplacementCodeuiColor3fVertex3fvSUN(const GLenum *, const GLfloat *, const GLfloat *) ; void WINAPI wine_glReplacementCodeuiColor4fNormal3fVertex3fSUN(GLenum, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glReplacementCodeuiColor4fNormal3fVertex3fvSUN(const GLenum *, const GLfloat *, const GLfloat *, const GLfloat *) ; void WINAPI wine_glReplacementCodeuiColor4ubVertex3fSUN(GLenum, GLubyte, GLubyte, GLubyte, GLubyte, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glReplacementCodeuiColor4ubVertex3fvSUN(const GLenum *, const GLubyte *, const GLfloat *) ; void WINAPI wine_glReplacementCodeuiNormal3fVertex3fSUN(GLenum, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glReplacementCodeuiNormal3fVertex3fvSUN(const GLenum *, const GLfloat *, const GLfloat *) ; void WINAPI wine_glReplacementCodeuiSUN(GLuint) ; void WINAPI wine_glReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fSUN(GLenum, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fvSUN(const GLenum *, const GLfloat *, const GLfloat *, const GLfloat *, const GLfloat *) ; void WINAPI wine_glReplacementCodeuiTexCoord2fNormal3fVertex3fSUN(GLenum, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glReplacementCodeuiTexCoord2fNormal3fVertex3fvSUN(const GLenum *, const GLfloat *, const GLfloat *, const GLfloat *) ; void WINAPI wine_glReplacementCodeuiTexCoord2fVertex3fSUN(GLenum, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glReplacementCodeuiTexCoord2fVertex3fvSUN(const GLenum *, const GLfloat *, const GLfloat *) ; void WINAPI wine_glReplacementCodeuiVertex3fSUN(GLenum, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glReplacementCodeuiVertex3fvSUN(const GLenum *, const GLfloat *) ; void WINAPI wine_glReplacementCodeuivSUN(const GLuint *) ; void WINAPI wine_glReplacementCodeusSUN(GLushort) ; void WINAPI wine_glReplacementCodeusvSUN(const GLushort *) ; void WINAPI wine_glResetHistogramEXT(GLenum) ; void WINAPI wine_glResetMinmaxEXT(GLenum) ; void WINAPI wine_glResizeBuffersMESA(void) ; void WINAPI wine_glSampleCoverageARB(GLclampf, GLboolean) ; void WINAPI wine_glSampleMaskEXT(GLclampf, GLboolean) ; void WINAPI wine_glSampleMaskSGIS(GLclampf, GLboolean) ; void WINAPI wine_glSamplePassARB(GLenum) ; void WINAPI wine_glSamplePatternEXT(GLenum) ; void WINAPI wine_glSamplePatternSGIS(GLenum) ; void WINAPI wine_glSecondaryColor3bEXT(GLbyte, GLbyte, GLbyte) ; void WINAPI wine_glSecondaryColor3bvEXT(const GLbyte *) ; void WINAPI wine_glSecondaryColor3dEXT(GLdouble, GLdouble, GLdouble) ; void WINAPI wine_glSecondaryColor3dvEXT(const GLdouble *) ; void WINAPI wine_glSecondaryColor3fEXT(GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glSecondaryColor3fvEXT(const GLfloat *) ; void WINAPI wine_glSecondaryColor3iEXT(GLint, GLint, GLint) ; void WINAPI wine_glSecondaryColor3ivEXT(const GLint *) ; void WINAPI wine_glSecondaryColor3sEXT(GLshort, GLshort, GLshort) ; void WINAPI wine_glSecondaryColor3svEXT(const GLshort *) ; void WINAPI wine_glSecondaryColor3ubEXT(GLubyte, GLubyte, GLubyte) ; void WINAPI wine_glSecondaryColor3ubvEXT(const GLubyte *) ; void WINAPI wine_glSecondaryColor3uiEXT(GLuint, GLuint, GLuint) ; void WINAPI wine_glSecondaryColor3uivEXT(const GLuint *) ; void WINAPI wine_glSecondaryColor3usEXT(GLushort, GLushort, GLushort) ; void WINAPI wine_glSecondaryColor3usvEXT(const GLushort *) ; void WINAPI wine_glSecondaryColorPointerEXT(GLint, GLenum, GLsizei, GLvoid *) ; void WINAPI wine_glSecondaryColorPointerListIBM(GLint, GLenum, GLint, const GLvoid* *, GLint) ; void WINAPI wine_glSeparableFilter2DEXT(GLenum, GLenum, GLsizei, GLsizei, GLenum, GLenum, const GLvoid *, const GLvoid *) ; void WINAPI wine_glSharpenTexFuncSGIS(GLenum, GLsizei, const GLfloat *) ; void WINAPI wine_glSpriteParameterfSGIX(GLenum, GLfloat) ; void WINAPI wine_glSpriteParameterfvSGIX(GLenum, const GLfloat *) ; void WINAPI wine_glSpriteParameteriSGIX(GLenum, GLint) ; void WINAPI wine_glSpriteParameterivSGIX(GLenum, const GLint *) ; void WINAPI wine_glStartInstrumentsSGIX(void) ; void WINAPI wine_glStopInstrumentsSGIX(GLint) ; void WINAPI wine_glTagSampleBufferSGIX(void) ; void WINAPI wine_glTangent3b(GLbyte, GLbyte, GLbyte) ; void WINAPI wine_glTangent3bv(const GLbyte *) ; void WINAPI wine_glTangent3d(GLdouble, GLdouble, GLdouble) ; void WINAPI wine_glTangent3dv(const GLdouble *) ; void WINAPI wine_glTangent3f(GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glTangent3fv(const GLfloat *) ; void WINAPI wine_glTangent3i(GLint, GLint, GLint) ; void WINAPI wine_glTangent3iv(const GLint *) ; void WINAPI wine_glTangent3s(GLshort, GLshort, GLshort) ; void WINAPI wine_glTangent3sv(const GLshort *) ; void WINAPI wine_glTangentPointerEXT(GLenum, GLsizei, const GLvoid *) ; void WINAPI wine_glTbufferMask3DFX(GLuint) ; void WINAPI wine_glTexCoord2fColor3fVertex3fSUN(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glTexCoord2fColor3fVertex3fvSUN(const GLfloat *, const GLfloat *, const GLfloat *) ; void WINAPI wine_glTexCoord2fColor4fNormal3fVertex3fSUN(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glTexCoord2fColor4fNormal3fVertex3fvSUN(const GLfloat *, const GLfloat *, const GLfloat *, const GLfloat *) ; void WINAPI wine_glTexCoord2fColor4ubVertex3fSUN(GLfloat, GLfloat, GLubyte, GLubyte, GLubyte, GLubyte, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glTexCoord2fColor4ubVertex3fvSUN(const GLfloat *, const GLubyte *, const GLfloat *) ; void WINAPI wine_glTexCoord2fNormal3fVertex3fSUN(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glTexCoord2fNormal3fVertex3fvSUN(const GLfloat *, const GLfloat *, const GLfloat *) ; void WINAPI wine_glTexCoord2fVertex3fSUN(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glTexCoord2fVertex3fvSUN(const GLfloat *, const GLfloat *) ; void WINAPI wine_glTexCoord4fColor4fNormal3fVertex4fSUN(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glTexCoord4fColor4fNormal3fVertex4fvSUN(const GLfloat *, const GLfloat *, const GLfloat *, const GLfloat *) ; void WINAPI wine_glTexCoord4fVertex4fSUN(GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glTexCoord4fVertex4fvSUN(const GLfloat *, const GLfloat *) ; void WINAPI wine_glTexCoordPointerEXT(GLint, GLenum, GLsizei, GLsizei, const GLvoid *) ; void WINAPI wine_glTexCoordPointerListIBM(GLint, GLenum, GLint, const GLvoid* *, GLint) ; void WINAPI wine_glTexCoordPointervINTEL(GLint, GLenum, const GLvoid* *) ; void WINAPI wine_glTexFilterFuncSGIS(GLenum, GLenum, GLsizei, const GLfloat *) ; void WINAPI wine_glTexImage3DEXT(GLenum, GLint, GLenum, GLsizei, GLsizei, GLsizei, GLint, GLenum, GLenum, const GLvoid *) ; void WINAPI wine_glTexImage4DSGIS(GLenum, GLint, GLenum, GLsizei, GLsizei, GLsizei, GLsizei, GLint, GLenum, GLenum, const GLvoid *) ; void WINAPI wine_glTexSubImage1DEXT(GLenum, GLint, GLint, GLsizei, GLenum, GLenum, const GLvoid *) ; void WINAPI wine_glTexSubImage2DEXT(GLenum, GLint, GLint, GLint, GLsizei, GLsizei, GLenum, GLenum, const GLvoid *) ; void WINAPI wine_glTexSubImage3DEXT(GLenum, GLint, GLint, GLint, GLint, GLsizei, GLsizei, GLsizei, GLenum, GLenum, const GLvoid *) ; void WINAPI wine_glTexSubImage4DSGIS(GLenum, GLint, GLint, GLint, GLint, GLint, GLsizei, GLsizei, GLsizei, GLsizei, GLenum, GLenum, const GLvoid *) ; void WINAPI wine_glTextureLightEXT(GLenum) ; void WINAPI wine_glTextureMaterialEXT(GLenum, GLenum) ; void WINAPI wine_glTextureNormalEXT(GLenum) ; void WINAPI wine_glUnlockArraysEXT(void) ; void WINAPI wine_glVertexArrayRangeNV(GLsizei, const GLvoid *) ; void WINAPI wine_glVertexPointerEXT(GLint, GLenum, GLsizei, GLsizei, const GLvoid *) ; void WINAPI wine_glVertexPointerListIBM(GLint, GLenum, GLint, const GLvoid* *, GLint) ; void WINAPI wine_glVertexPointervINTEL(GLint, GLenum, const GLvoid* *) ; void WINAPI wine_glVertexWeightPointerEXT(GLsizei, GLenum, GLsizei, const GLvoid *) ; void WINAPI wine_glVertexWeightfEXT(GLfloat) ; void WINAPI wine_glVertexWeightfvEXT(const GLfloat *) ; void WINAPI wine_glWindowPos2dMESA(GLdouble, GLdouble) ; void WINAPI wine_glWindowPos2dvMESA(const GLdouble *) ; void WINAPI wine_glWindowPos2fMESA(GLfloat, GLfloat) ; void WINAPI wine_glWindowPos2fvMESA(const GLfloat *) ; void WINAPI wine_glWindowPos2iMESA(GLint, GLint) ; void WINAPI wine_glWindowPos2ivMESA(const GLint *) ; void WINAPI wine_glWindowPos2sMESA(GLshort, GLshort) ; void WINAPI wine_glWindowPos2svMESA(const GLshort *) ; void WINAPI wine_glWindowPos3dMESA(GLdouble, GLdouble, GLdouble) ; void WINAPI wine_glWindowPos3dvMESA(const GLdouble *) ; void WINAPI wine_glWindowPos3fMESA(GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glWindowPos3fvMESA(const GLfloat *) ; void WINAPI wine_glWindowPos3iMESA(GLint, GLint, GLint) ; void WINAPI wine_glWindowPos3ivMESA(const GLint *) ; void WINAPI wine_glWindowPos3sMESA(GLshort, GLshort, GLshort) ; void WINAPI wine_glWindowPos3svMESA(const GLshort *) ; void WINAPI wine_glWindowPos4dMESA(GLdouble, GLdouble, GLdouble, GLdouble) ; void WINAPI wine_glWindowPos4dvMESA(const GLdouble *) ; void WINAPI wine_glWindowPos4fMESA(GLfloat, GLfloat, GLfloat, GLfloat) ; void WINAPI wine_glWindowPos4fvMESA(const GLfloat *) ; void WINAPI wine_glWindowPos4iMESA(GLint, GLint, GLint, GLint) ; void WINAPI wine_glWindowPos4ivMESA(const GLint *) ; void WINAPI wine_glWindowPos4sMESA(GLshort, GLshort, GLshort, GLshort) ; void WINAPI wine_glWindowPos4svMESA(const GLshort *) ; /* The table giving the correspondance between names and functions */ int extension_registry_size = 322; OpenGL_extension extension_registry[] = { { "glApplyTextureEXT", (void *) wine_glApplyTextureEXT, (void **) (&func_glApplyTextureEXT) }, { "glAreTexturesResidentEXT", (void *) wine_glAreTexturesResidentEXT, (void **) (&func_glAreTexturesResidentEXT) }, { "glArrayElementEXT", (void *) wine_glArrayElementEXT, (void **) (&func_glArrayElementEXT) }, { "glBindTextureEXT", (void *) wine_glBindTextureEXT, (void **) (&func_glBindTextureEXT) }, { "glBinormal3b", (void *) wine_glBinormal3b, (void **) (&func_glBinormal3b) }, { "glBinormal3bv", (void *) wine_glBinormal3bv, (void **) (&func_glBinormal3bv) }, { "glBinormal3d", (void *) wine_glBinormal3d, (void **) (&func_glBinormal3d) }, { "glBinormal3dv", (void *) wine_glBinormal3dv, (void **) (&func_glBinormal3dv) }, { "glBinormal3f", (void *) wine_glBinormal3f, (void **) (&func_glBinormal3f) }, { "glBinormal3fv", (void *) wine_glBinormal3fv, (void **) (&func_glBinormal3fv) }, { "glBinormal3i", (void *) wine_glBinormal3i, (void **) (&func_glBinormal3i) }, { "glBinormal3iv", (void *) wine_glBinormal3iv, (void **) (&func_glBinormal3iv) }, { "glBinormal3s", (void *) wine_glBinormal3s, (void **) (&func_glBinormal3s) }, { "glBinormal3sv", (void *) wine_glBinormal3sv, (void **) (&func_glBinormal3sv) }, { "glBinormalPointerEXT", (void *) wine_glBinormalPointerEXT, (void **) (&func_glBinormalPointerEXT) }, { "glBlendColorEXT", (void *) wine_glBlendColorEXT, (void **) (&func_glBlendColorEXT) }, { "glBlendEquationEXT", (void *) wine_glBlendEquationEXT, (void **) (&func_glBlendEquationEXT) }, { "glBlendFuncSeparateEXT", (void *) wine_glBlendFuncSeparateEXT, (void **) (&func_glBlendFuncSeparateEXT) }, { "glColor3fVertex3fSUN", (void *) wine_glColor3fVertex3fSUN, (void **) (&func_glColor3fVertex3fSUN) }, { "glColor3fVertex3fvSUN", (void *) wine_glColor3fVertex3fvSUN, (void **) (&func_glColor3fVertex3fvSUN) }, { "glColor4fNormal3fVertex3fSUN", (void *) wine_glColor4fNormal3fVertex3fSUN, (void **) (&func_glColor4fNormal3fVertex3fSUN) }, { "glColor4fNormal3fVertex3fvSUN", (void *) wine_glColor4fNormal3fVertex3fvSUN, (void **) (&func_glColor4fNormal3fVertex3fvSUN) }, { "glColor4ubVertex2fSUN", (void *) wine_glColor4ubVertex2fSUN, (void **) (&func_glColor4ubVertex2fSUN) }, { "glColor4ubVertex2fvSUN", (void *) wine_glColor4ubVertex2fvSUN, (void **) (&func_glColor4ubVertex2fvSUN) }, { "glColor4ubVertex3fSUN", (void *) wine_glColor4ubVertex3fSUN, (void **) (&func_glColor4ubVertex3fSUN) }, { "glColor4ubVertex3fvSUN", (void *) wine_glColor4ubVertex3fvSUN, (void **) (&func_glColor4ubVertex3fvSUN) }, { "glColorPointerEXT", (void *) wine_glColorPointerEXT, (void **) (&func_glColorPointerEXT) }, { "glColorPointerListIBM", (void *) wine_glColorPointerListIBM, (void **) (&func_glColorPointerListIBM) }, { "glColorPointervINTEL", (void *) wine_glColorPointervINTEL, (void **) (&func_glColorPointervINTEL) }, { "glColorSubTableEXT", (void *) wine_glColorSubTableEXT, (void **) (&func_glColorSubTableEXT) }, { "glColorTableEXT", (void *) wine_glColorTableEXT, (void **) (&func_glColorTableEXT) }, { "glColorTableParameterfvSGI", (void *) wine_glColorTableParameterfvSGI, (void **) (&func_glColorTableParameterfvSGI) }, { "glColorTableParameterivSGI", (void *) wine_glColorTableParameterivSGI, (void **) (&func_glColorTableParameterivSGI) }, { "glColorTableSGI", (void *) wine_glColorTableSGI, (void **) (&func_glColorTableSGI) }, { "glCombinerInputNV", (void *) wine_glCombinerInputNV, (void **) (&func_glCombinerInputNV) }, { "glCombinerOutputNV", (void *) wine_glCombinerOutputNV, (void **) (&func_glCombinerOutputNV) }, { "glCombinerParameterfNV", (void *) wine_glCombinerParameterfNV, (void **) (&func_glCombinerParameterfNV) }, { "glCombinerParameterfvNV", (void *) wine_glCombinerParameterfvNV, (void **) (&func_glCombinerParameterfvNV) }, { "glCombinerParameteriNV", (void *) wine_glCombinerParameteriNV, (void **) (&func_glCombinerParameteriNV) }, { "glCombinerParameterivNV", (void *) wine_glCombinerParameterivNV, (void **) (&func_glCombinerParameterivNV) }, { "glCompressedTexImage1DARB", (void *) wine_glCompressedTexImage1DARB, (void **) (&func_glCompressedTexImage1DARB) }, { "glCompressedTexImage2DARB", (void *) wine_glCompressedTexImage2DARB, (void **) (&func_glCompressedTexImage2DARB) }, { "glCompressedTexImage3DARB", (void *) wine_glCompressedTexImage3DARB, (void **) (&func_glCompressedTexImage3DARB) }, { "glCompressedTexSubImage1DARB", (void *) wine_glCompressedTexSubImage1DARB, (void **) (&func_glCompressedTexSubImage1DARB) }, { "glCompressedTexSubImage2DARB", (void *) wine_glCompressedTexSubImage2DARB, (void **) (&func_glCompressedTexSubImage2DARB) }, { "glCompressedTexSubImage3DARB", (void *) wine_glCompressedTexSubImage3DARB, (void **) (&func_glCompressedTexSubImage3DARB) }, { "glConvolutionFilter1DEXT", (void *) wine_glConvolutionFilter1DEXT, (void **) (&func_glConvolutionFilter1DEXT) }, { "glConvolutionFilter2DEXT", (void *) wine_glConvolutionFilter2DEXT, (void **) (&func_glConvolutionFilter2DEXT) }, { "glConvolutionParameterfEXT", (void *) wine_glConvolutionParameterfEXT, (void **) (&func_glConvolutionParameterfEXT) }, { "glConvolutionParameterfvEXT", (void *) wine_glConvolutionParameterfvEXT, (void **) (&func_glConvolutionParameterfvEXT) }, { "glConvolutionParameteriEXT", (void *) wine_glConvolutionParameteriEXT, (void **) (&func_glConvolutionParameteriEXT) }, { "glConvolutionParameterivEXT", (void *) wine_glConvolutionParameterivEXT, (void **) (&func_glConvolutionParameterivEXT) }, { "glCopyColorSubTableEXT", (void *) wine_glCopyColorSubTableEXT, (void **) (&func_glCopyColorSubTableEXT) }, { "glCopyColorTableSGI", (void *) wine_glCopyColorTableSGI, (void **) (&func_glCopyColorTableSGI) }, { "glCopyConvolutionFilter1DEXT", (void *) wine_glCopyConvolutionFilter1DEXT, (void **) (&func_glCopyConvolutionFilter1DEXT) }, { "glCopyConvolutionFilter2DEXT", (void *) wine_glCopyConvolutionFilter2DEXT, (void **) (&func_glCopyConvolutionFilter2DEXT) }, { "glCopyTexImage1DEXT", (void *) wine_glCopyTexImage1DEXT, (void **) (&func_glCopyTexImage1DEXT) }, { "glCopyTexImage2DEXT", (void *) wine_glCopyTexImage2DEXT, (void **) (&func_glCopyTexImage2DEXT) }, { "glCopyTexSubImage1DEXT", (void *) wine_glCopyTexSubImage1DEXT, (void **) (&func_glCopyTexSubImage1DEXT) }, { "glCopyTexSubImage2DEXT", (void *) wine_glCopyTexSubImage2DEXT, (void **) (&func_glCopyTexSubImage2DEXT) }, { "glCopyTexSubImage3DEXT", (void *) wine_glCopyTexSubImage3DEXT, (void **) (&func_glCopyTexSubImage3DEXT) }, { "glCullParameterdvEXT", (void *) wine_glCullParameterdvEXT, (void **) (&func_glCullParameterdvEXT) }, { "glCullParameterfvEXT", (void *) wine_glCullParameterfvEXT, (void **) (&func_glCullParameterfvEXT) }, { "glDeleteTexturesEXT", (void *) wine_glDeleteTexturesEXT, (void **) (&func_glDeleteTexturesEXT) }, { "glDetailTexFuncSGIS", (void *) wine_glDetailTexFuncSGIS, (void **) (&func_glDetailTexFuncSGIS) }, { "glDrawArraysEXT", (void *) wine_glDrawArraysEXT, (void **) (&func_glDrawArraysEXT) }, { "glDrawRangeElementsEXT", (void *) wine_glDrawRangeElementsEXT, (void **) (&func_glDrawRangeElementsEXT) }, { "glEdgeFlagPointerEXT", (void *) wine_glEdgeFlagPointerEXT, (void **) (&func_glEdgeFlagPointerEXT) }, { "glEdgeFlagPointerListIBM", (void *) wine_glEdgeFlagPointerListIBM, (void **) (&func_glEdgeFlagPointerListIBM) }, { "glFinalCombinerInputNV", (void *) wine_glFinalCombinerInputNV, (void **) (&func_glFinalCombinerInputNV) }, { "glFinishTextureSUNX", (void *) wine_glFinishTextureSUNX, (void **) (&func_glFinishTextureSUNX) }, { "glFlushRasterSGIX", (void *) wine_glFlushRasterSGIX, (void **) (&func_glFlushRasterSGIX) }, { "glFlushVertexArrayRangeNV", (void *) wine_glFlushVertexArrayRangeNV, (void **) (&func_glFlushVertexArrayRangeNV) }, { "glFogCoordPointerEXT", (void *) wine_glFogCoordPointerEXT, (void **) (&func_glFogCoordPointerEXT) }, { "glFogCoordPointerListIBM", (void *) wine_glFogCoordPointerListIBM, (void **) (&func_glFogCoordPointerListIBM) }, { "glFogCoorddEXT", (void *) wine_glFogCoorddEXT, (void **) (&func_glFogCoorddEXT) }, { "glFogCoorddvEXT", (void *) wine_glFogCoorddvEXT, (void **) (&func_glFogCoorddvEXT) }, { "glFogCoordfEXT", (void *) wine_glFogCoordfEXT, (void **) (&func_glFogCoordfEXT) }, { "glFogCoordfvEXT", (void *) wine_glFogCoordfvEXT, (void **) (&func_glFogCoordfvEXT) }, { "glFogFuncSGIS", (void *) wine_glFogFuncSGIS, (void **) (&func_glFogFuncSGIS) }, { "glFragmentColorMaterialSGIX", (void *) wine_glFragmentColorMaterialSGIX, (void **) (&func_glFragmentColorMaterialSGIX) }, { "glFragmentLightModelfSGIX", (void *) wine_glFragmentLightModelfSGIX, (void **) (&func_glFragmentLightModelfSGIX) }, { "glFragmentLightModelfvSGIX", (void *) wine_glFragmentLightModelfvSGIX, (void **) (&func_glFragmentLightModelfvSGIX) }, { "glFragmentLightModeliSGIX", (void *) wine_glFragmentLightModeliSGIX, (void **) (&func_glFragmentLightModeliSGIX) }, { "glFragmentLightModelivSGIX", (void *) wine_glFragmentLightModelivSGIX, (void **) (&func_glFragmentLightModelivSGIX) }, { "glFragmentLightfSGIX", (void *) wine_glFragmentLightfSGIX, (void **) (&func_glFragmentLightfSGIX) }, { "glFragmentLightfvSGIX", (void *) wine_glFragmentLightfvSGIX, (void **) (&func_glFragmentLightfvSGIX) }, { "glFragmentLightiSGIX", (void *) wine_glFragmentLightiSGIX, (void **) (&func_glFragmentLightiSGIX) }, { "glFragmentLightivSGIX", (void *) wine_glFragmentLightivSGIX, (void **) (&func_glFragmentLightivSGIX) }, { "glFragmentMaterialfSGIX", (void *) wine_glFragmentMaterialfSGIX, (void **) (&func_glFragmentMaterialfSGIX) }, { "glFragmentMaterialfvSGIX", (void *) wine_glFragmentMaterialfvSGIX, (void **) (&func_glFragmentMaterialfvSGIX) }, { "glFragmentMaterialiSGIX", (void *) wine_glFragmentMaterialiSGIX, (void **) (&func_glFragmentMaterialiSGIX) }, { "glFragmentMaterialivSGIX", (void *) wine_glFragmentMaterialivSGIX, (void **) (&func_glFragmentMaterialivSGIX) }, { "glFrameZoomSGIX", (void *) wine_glFrameZoomSGIX, (void **) (&func_glFrameZoomSGIX) }, { "glGenTexturesEXT", (void *) wine_glGenTexturesEXT, (void **) (&func_glGenTexturesEXT) }, { "glGetColorTableEXT", (void *) wine_glGetColorTableEXT, (void **) (&func_glGetColorTableEXT) }, { "glGetColorTableParameterfvEXT", (void *) wine_glGetColorTableParameterfvEXT, (void **) (&func_glGetColorTableParameterfvEXT) }, { "glGetColorTableParameterfvSGI", (void *) wine_glGetColorTableParameterfvSGI, (void **) (&func_glGetColorTableParameterfvSGI) }, { "glGetColorTableParameterivEXT", (void *) wine_glGetColorTableParameterivEXT, (void **) (&func_glGetColorTableParameterivEXT) }, { "glGetColorTableParameterivSGI", (void *) wine_glGetColorTableParameterivSGI, (void **) (&func_glGetColorTableParameterivSGI) }, { "glGetColorTableSGI", (void *) wine_glGetColorTableSGI, (void **) (&func_glGetColorTableSGI) }, { "glGetCombinerInputParameterfvNV", (void *) wine_glGetCombinerInputParameterfvNV, (void **) (&func_glGetCombinerInputParameterfvNV) }, { "glGetCombinerInputParameterivNV", (void *) wine_glGetCombinerInputParameterivNV, (void **) (&func_glGetCombinerInputParameterivNV) }, { "glGetCombinerOutputParameterfvNV", (void *) wine_glGetCombinerOutputParameterfvNV, (void **) (&func_glGetCombinerOutputParameterfvNV) }, { "glGetCombinerOutputParameterivNV", (void *) wine_glGetCombinerOutputParameterivNV, (void **) (&func_glGetCombinerOutputParameterivNV) }, { "glGetCompressedTexImageARB", (void *) wine_glGetCompressedTexImageARB, (void **) (&func_glGetCompressedTexImageARB) }, { "glGetConvolutionFilterEXT", (void *) wine_glGetConvolutionFilterEXT, (void **) (&func_glGetConvolutionFilterEXT) }, { "glGetConvolutionParameterfvEXT", (void *) wine_glGetConvolutionParameterfvEXT, (void **) (&func_glGetConvolutionParameterfvEXT) }, { "glGetConvolutionParameterivEXT", (void *) wine_glGetConvolutionParameterivEXT, (void **) (&func_glGetConvolutionParameterivEXT) }, { "glGetDetailTexFuncSGIS", (void *) wine_glGetDetailTexFuncSGIS, (void **) (&func_glGetDetailTexFuncSGIS) }, { "glGetFinalCombinerInputParameterfvNV", (void *) wine_glGetFinalCombinerInputParameterfvNV, (void **) (&func_glGetFinalCombinerInputParameterfvNV) }, { "glGetFinalCombinerInputParameterivNV", (void *) wine_glGetFinalCombinerInputParameterivNV, (void **) (&func_glGetFinalCombinerInputParameterivNV) }, { "glGetFogFuncSGIS", (void *) wine_glGetFogFuncSGIS, (void **) (&func_glGetFogFuncSGIS) }, { "glGetFragmentLightfvSGIX", (void *) wine_glGetFragmentLightfvSGIX, (void **) (&func_glGetFragmentLightfvSGIX) }, { "glGetFragmentLightivSGIX", (void *) wine_glGetFragmentLightivSGIX, (void **) (&func_glGetFragmentLightivSGIX) }, { "glGetFragmentMaterialfvSGIX", (void *) wine_glGetFragmentMaterialfvSGIX, (void **) (&func_glGetFragmentMaterialfvSGIX) }, { "glGetFragmentMaterialivSGIX", (void *) wine_glGetFragmentMaterialivSGIX, (void **) (&func_glGetFragmentMaterialivSGIX) }, { "glGetHistogramEXT", (void *) wine_glGetHistogramEXT, (void **) (&func_glGetHistogramEXT) }, { "glGetHistogramParameterfvEXT", (void *) wine_glGetHistogramParameterfvEXT, (void **) (&func_glGetHistogramParameterfvEXT) }, { "glGetHistogramParameterivEXT", (void *) wine_glGetHistogramParameterivEXT, (void **) (&func_glGetHistogramParameterivEXT) }, { "glGetImageTransformParameterfvHP", (void *) wine_glGetImageTransformParameterfvHP, (void **) (&func_glGetImageTransformParameterfvHP) }, { "glGetImageTransformParameterivHP", (void *) wine_glGetImageTransformParameterivHP, (void **) (&func_glGetImageTransformParameterivHP) }, { "glGetInstrumentsSGIX", (void *) wine_glGetInstrumentsSGIX, (void **) (&func_glGetInstrumentsSGIX) }, { "glGetListParameterfvSGIX", (void *) wine_glGetListParameterfvSGIX, (void **) (&func_glGetListParameterfvSGIX) }, { "glGetListParameterivSGIX", (void *) wine_glGetListParameterivSGIX, (void **) (&func_glGetListParameterivSGIX) }, { "glGetMinmaxEXT", (void *) wine_glGetMinmaxEXT, (void **) (&func_glGetMinmaxEXT) }, { "glGetMinmaxParameterfvEXT", (void *) wine_glGetMinmaxParameterfvEXT, (void **) (&func_glGetMinmaxParameterfvEXT) }, { "glGetMinmaxParameterivEXT", (void *) wine_glGetMinmaxParameterivEXT, (void **) (&func_glGetMinmaxParameterivEXT) }, { "glGetPixelTexGenParameterfvSGIS", (void *) wine_glGetPixelTexGenParameterfvSGIS, (void **) (&func_glGetPixelTexGenParameterfvSGIS) }, { "glGetPixelTexGenParameterivSGIS", (void *) wine_glGetPixelTexGenParameterivSGIS, (void **) (&func_glGetPixelTexGenParameterivSGIS) }, { "glGetPointervEXT", (void *) wine_glGetPointervEXT, (void **) (&func_glGetPointervEXT) }, { "glGetSeparableFilterEXT", (void *) wine_glGetSeparableFilterEXT, (void **) (&func_glGetSeparableFilterEXT) }, { "glGetSharpenTexFuncSGIS", (void *) wine_glGetSharpenTexFuncSGIS, (void **) (&func_glGetSharpenTexFuncSGIS) }, { "glGetTexFilterFuncSGIS", (void *) wine_glGetTexFilterFuncSGIS, (void **) (&func_glGetTexFilterFuncSGIS) }, { "glGlobalAlphaFactorbSUN", (void *) wine_glGlobalAlphaFactorbSUN, (void **) (&func_glGlobalAlphaFactorbSUN) }, { "glGlobalAlphaFactordSUN", (void *) wine_glGlobalAlphaFactordSUN, (void **) (&func_glGlobalAlphaFactordSUN) }, { "glGlobalAlphaFactorfSUN", (void *) wine_glGlobalAlphaFactorfSUN, (void **) (&func_glGlobalAlphaFactorfSUN) }, { "glGlobalAlphaFactoriSUN", (void *) wine_glGlobalAlphaFactoriSUN, (void **) (&func_glGlobalAlphaFactoriSUN) }, { "glGlobalAlphaFactorsSUN", (void *) wine_glGlobalAlphaFactorsSUN, (void **) (&func_glGlobalAlphaFactorsSUN) }, { "glGlobalAlphaFactorubSUN", (void *) wine_glGlobalAlphaFactorubSUN, (void **) (&func_glGlobalAlphaFactorubSUN) }, { "glGlobalAlphaFactoruiSUN", (void *) wine_glGlobalAlphaFactoruiSUN, (void **) (&func_glGlobalAlphaFactoruiSUN) }, { "glGlobalAlphaFactorusSUN", (void *) wine_glGlobalAlphaFactorusSUN, (void **) (&func_glGlobalAlphaFactorusSUN) }, { "glHintPGI", (void *) wine_glHintPGI, (void **) (&func_glHintPGI) }, { "glHistogramEXT", (void *) wine_glHistogramEXT, (void **) (&func_glHistogramEXT) }, { "glImageTransformParameterfHP", (void *) wine_glImageTransformParameterfHP, (void **) (&func_glImageTransformParameterfHP) }, { "glImageTransformParameterfvHP", (void *) wine_glImageTransformParameterfvHP, (void **) (&func_glImageTransformParameterfvHP) }, { "glImageTransformParameteriHP", (void *) wine_glImageTransformParameteriHP, (void **) (&func_glImageTransformParameteriHP) }, { "glImageTransformParameterivHP", (void *) wine_glImageTransformParameterivHP, (void **) (&func_glImageTransformParameterivHP) }, { "glIndexFuncEXT", (void *) wine_glIndexFuncEXT, (void **) (&func_glIndexFuncEXT) }, { "glIndexMaterialEXT", (void *) wine_glIndexMaterialEXT, (void **) (&func_glIndexMaterialEXT) }, { "glIndexPointerEXT", (void *) wine_glIndexPointerEXT, (void **) (&func_glIndexPointerEXT) }, { "glIndexPointerListIBM", (void *) wine_glIndexPointerListIBM, (void **) (&func_glIndexPointerListIBM) }, { "glInstrumentsBufferSGIX", (void *) wine_glInstrumentsBufferSGIX, (void **) (&func_glInstrumentsBufferSGIX) }, { "glIsTextureEXT", (void *) wine_glIsTextureEXT, (void **) (&func_glIsTextureEXT) }, { "glLightEnviSGIX", (void *) wine_glLightEnviSGIX, (void **) (&func_glLightEnviSGIX) }, { "glListParameterfSGIX", (void *) wine_glListParameterfSGIX, (void **) (&func_glListParameterfSGIX) }, { "glListParameterfvSGIX", (void *) wine_glListParameterfvSGIX, (void **) (&func_glListParameterfvSGIX) }, { "glListParameteriSGIX", (void *) wine_glListParameteriSGIX, (void **) (&func_glListParameteriSGIX) }, { "glListParameterivSGIX", (void *) wine_glListParameterivSGIX, (void **) (&func_glListParameterivSGIX) }, { "glLoadTransposeMatrixdARB", (void *) wine_glLoadTransposeMatrixdARB, (void **) (&func_glLoadTransposeMatrixdARB) }, { "glLoadTransposeMatrixfARB", (void *) wine_glLoadTransposeMatrixfARB, (void **) (&func_glLoadTransposeMatrixfARB) }, { "glLockArraysEXT", (void *) wine_glLockArraysEXT, (void **) (&func_glLockArraysEXT) }, { "glMinmaxEXT", (void *) wine_glMinmaxEXT, (void **) (&func_glMinmaxEXT) }, { "glMultTransposeMatrixdARB", (void *) wine_glMultTransposeMatrixdARB, (void **) (&func_glMultTransposeMatrixdARB) }, { "glMultTransposeMatrixfARB", (void *) wine_glMultTransposeMatrixfARB, (void **) (&func_glMultTransposeMatrixfARB) }, { "glMultiDrawArraysEXT", (void *) wine_glMultiDrawArraysEXT, (void **) (&func_glMultiDrawArraysEXT) }, { "glMultiDrawElementsEXT", (void *) wine_glMultiDrawElementsEXT, (void **) (&func_glMultiDrawElementsEXT) }, { "glMultiModeDrawArraysIBM", (void *) wine_glMultiModeDrawArraysIBM, (void **) (&func_glMultiModeDrawArraysIBM) }, { "glMultiModeDrawElementsIBM", (void *) wine_glMultiModeDrawElementsIBM, (void **) (&func_glMultiModeDrawElementsIBM) }, { "glNormal3fVertex3fSUN", (void *) wine_glNormal3fVertex3fSUN, (void **) (&func_glNormal3fVertex3fSUN) }, { "glNormal3fVertex3fvSUN", (void *) wine_glNormal3fVertex3fvSUN, (void **) (&func_glNormal3fVertex3fvSUN) }, { "glNormalPointerEXT", (void *) wine_glNormalPointerEXT, (void **) (&func_glNormalPointerEXT) }, { "glNormalPointerListIBM", (void *) wine_glNormalPointerListIBM, (void **) (&func_glNormalPointerListIBM) }, { "glNormalPointervINTEL", (void *) wine_glNormalPointervINTEL, (void **) (&func_glNormalPointervINTEL) }, { "glPixelTexGenParameterfSGIS", (void *) wine_glPixelTexGenParameterfSGIS, (void **) (&func_glPixelTexGenParameterfSGIS) }, { "glPixelTexGenParameterfvSGIS", (void *) wine_glPixelTexGenParameterfvSGIS, (void **) (&func_glPixelTexGenParameterfvSGIS) }, { "glPixelTexGenParameteriSGIS", (void *) wine_glPixelTexGenParameteriSGIS, (void **) (&func_glPixelTexGenParameteriSGIS) }, { "glPixelTexGenParameterivSGIS", (void *) wine_glPixelTexGenParameterivSGIS, (void **) (&func_glPixelTexGenParameterivSGIS) }, { "glPixelTexGenSGIX", (void *) wine_glPixelTexGenSGIX, (void **) (&func_glPixelTexGenSGIX) }, { "glPixelTransformParameterfEXT", (void *) wine_glPixelTransformParameterfEXT, (void **) (&func_glPixelTransformParameterfEXT) }, { "glPixelTransformParameterfvEXT", (void *) wine_glPixelTransformParameterfvEXT, (void **) (&func_glPixelTransformParameterfvEXT) }, { "glPixelTransformParameteriEXT", (void *) wine_glPixelTransformParameteriEXT, (void **) (&func_glPixelTransformParameteriEXT) }, { "glPixelTransformParameterivEXT", (void *) wine_glPixelTransformParameterivEXT, (void **) (&func_glPixelTransformParameterivEXT) }, { "glPointParameterfEXT", (void *) wine_glPointParameterfEXT, (void **) (&func_glPointParameterfEXT) }, { "glPointParameterfSGIS", (void *) wine_glPointParameterfSGIS, (void **) (&func_glPointParameterfSGIS) }, { "glPointParameterfvEXT", (void *) wine_glPointParameterfvEXT, (void **) (&func_glPointParameterfvEXT) }, { "glPointParameterfvSGIS", (void *) wine_glPointParameterfvSGIS, (void **) (&func_glPointParameterfvSGIS) }, { "glPollInstrumentsSGIX", (void *) wine_glPollInstrumentsSGIX, (void **) (&func_glPollInstrumentsSGIX) }, { "glPolygonOffsetEXT", (void *) wine_glPolygonOffsetEXT, (void **) (&func_glPolygonOffsetEXT) }, { "glPrioritizeTexturesEXT", (void *) wine_glPrioritizeTexturesEXT, (void **) (&func_glPrioritizeTexturesEXT) }, { "glReadInstrumentsSGIX", (void *) wine_glReadInstrumentsSGIX, (void **) (&func_glReadInstrumentsSGIX) }, { "glReferencePlaneSGIX", (void *) wine_glReferencePlaneSGIX, (void **) (&func_glReferencePlaneSGIX) }, { "glReplacementCodePointer", (void *) wine_glReplacementCodePointer, (void **) (&func_glReplacementCodePointer) }, { "glReplacementCodeubSUN", (void *) wine_glReplacementCodeubSUN, (void **) (&func_glReplacementCodeubSUN) }, { "glReplacementCodeubvSUN", (void *) wine_glReplacementCodeubvSUN, (void **) (&func_glReplacementCodeubvSUN) }, { "glReplacementCodeuiColor3fVertex3fSUN", (void *) wine_glReplacementCodeuiColor3fVertex3fSUN, (void **) (&func_glReplacementCodeuiColor3fVertex3fSUN) }, { "glReplacementCodeuiColor3fVertex3fvSUN", (void *) wine_glReplacementCodeuiColor3fVertex3fvSUN, (void **) (&func_glReplacementCodeuiColor3fVertex3fvSUN) }, { "glReplacementCodeuiColor4fNormal3fVertex3fSUN", (void *) wine_glReplacementCodeuiColor4fNormal3fVertex3fSUN, (void **) (&func_glReplacementCodeuiColor4fNormal3fVertex3fSUN) }, { "glReplacementCodeuiColor4fNormal3fVertex3fvSUN", (void *) wine_glReplacementCodeuiColor4fNormal3fVertex3fvSUN, (void **) (&func_glReplacementCodeuiColor4fNormal3fVertex3fvSUN) }, { "glReplacementCodeuiColor4ubVertex3fSUN", (void *) wine_glReplacementCodeuiColor4ubVertex3fSUN, (void **) (&func_glReplacementCodeuiColor4ubVertex3fSUN) }, { "glReplacementCodeuiColor4ubVertex3fvSUN", (void *) wine_glReplacementCodeuiColor4ubVertex3fvSUN, (void **) (&func_glReplacementCodeuiColor4ubVertex3fvSUN) }, { "glReplacementCodeuiNormal3fVertex3fSUN", (void *) wine_glReplacementCodeuiNormal3fVertex3fSUN, (void **) (&func_glReplacementCodeuiNormal3fVertex3fSUN) }, { "glReplacementCodeuiNormal3fVertex3fvSUN", (void *) wine_glReplacementCodeuiNormal3fVertex3fvSUN, (void **) (&func_glReplacementCodeuiNormal3fVertex3fvSUN) }, { "glReplacementCodeuiSUN", (void *) wine_glReplacementCodeuiSUN, (void **) (&func_glReplacementCodeuiSUN) }, { "glReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fSUN", (void *) wine_glReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fSUN, (void **) (&func_glReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fSUN) }, { "glReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fvSUN", (void *) wine_glReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fvSUN, (void **) (&func_glReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fvSUN) }, { "glReplacementCodeuiTexCoord2fNormal3fVertex3fSUN", (void *) wine_glReplacementCodeuiTexCoord2fNormal3fVertex3fSUN, (void **) (&func_glReplacementCodeuiTexCoord2fNormal3fVertex3fSUN) }, { "glReplacementCodeuiTexCoord2fNormal3fVertex3fvSUN", (void *) wine_glReplacementCodeuiTexCoord2fNormal3fVertex3fvSUN, (void **) (&func_glReplacementCodeuiTexCoord2fNormal3fVertex3fvSUN) }, { "glReplacementCodeuiTexCoord2fVertex3fSUN", (void *) wine_glReplacementCodeuiTexCoord2fVertex3fSUN, (void **) (&func_glReplacementCodeuiTexCoord2fVertex3fSUN) }, { "glReplacementCodeuiTexCoord2fVertex3fvSUN", (void *) wine_glReplacementCodeuiTexCoord2fVertex3fvSUN, (void **) (&func_glReplacementCodeuiTexCoord2fVertex3fvSUN) }, { "glReplacementCodeuiVertex3fSUN", (void *) wine_glReplacementCodeuiVertex3fSUN, (void **) (&func_glReplacementCodeuiVertex3fSUN) }, { "glReplacementCodeuiVertex3fvSUN", (void *) wine_glReplacementCodeuiVertex3fvSUN, (void **) (&func_glReplacementCodeuiVertex3fvSUN) }, { "glReplacementCodeuivSUN", (void *) wine_glReplacementCodeuivSUN, (void **) (&func_glReplacementCodeuivSUN) }, { "glReplacementCodeusSUN", (void *) wine_glReplacementCodeusSUN, (void **) (&func_glReplacementCodeusSUN) }, { "glReplacementCodeusvSUN", (void *) wine_glReplacementCodeusvSUN, (void **) (&func_glReplacementCodeusvSUN) }, { "glResetHistogramEXT", (void *) wine_glResetHistogramEXT, (void **) (&func_glResetHistogramEXT) }, { "glResetMinmaxEXT", (void *) wine_glResetMinmaxEXT, (void **) (&func_glResetMinmaxEXT) }, { "glResizeBuffersMESA", (void *) wine_glResizeBuffersMESA, (void **) (&func_glResizeBuffersMESA) }, { "glSampleCoverageARB", (void *) wine_glSampleCoverageARB, (void **) (&func_glSampleCoverageARB) }, { "glSampleMaskEXT", (void *) wine_glSampleMaskEXT, (void **) (&func_glSampleMaskEXT) }, { "glSampleMaskSGIS", (void *) wine_glSampleMaskSGIS, (void **) (&func_glSampleMaskSGIS) }, { "glSamplePassARB", (void *) wine_glSamplePassARB, (void **) (&func_glSamplePassARB) }, { "glSamplePatternEXT", (void *) wine_glSamplePatternEXT, (void **) (&func_glSamplePatternEXT) }, { "glSamplePatternSGIS", (void *) wine_glSamplePatternSGIS, (void **) (&func_glSamplePatternSGIS) }, { "glSecondaryColor3bEXT", (void *) wine_glSecondaryColor3bEXT, (void **) (&func_glSecondaryColor3bEXT) }, { "glSecondaryColor3bvEXT", (void *) wine_glSecondaryColor3bvEXT, (void **) (&func_glSecondaryColor3bvEXT) }, { "glSecondaryColor3dEXT", (void *) wine_glSecondaryColor3dEXT, (void **) (&func_glSecondaryColor3dEXT) }, { "glSecondaryColor3dvEXT", (void *) wine_glSecondaryColor3dvEXT, (void **) (&func_glSecondaryColor3dvEXT) }, { "glSecondaryColor3fEXT", (void *) wine_glSecondaryColor3fEXT, (void **) (&func_glSecondaryColor3fEXT) }, { "glSecondaryColor3fvEXT", (void *) wine_glSecondaryColor3fvEXT, (void **) (&func_glSecondaryColor3fvEXT) }, { "glSecondaryColor3iEXT", (void *) wine_glSecondaryColor3iEXT, (void **) (&func_glSecondaryColor3iEXT) }, { "glSecondaryColor3ivEXT", (void *) wine_glSecondaryColor3ivEXT, (void **) (&func_glSecondaryColor3ivEXT) }, { "glSecondaryColor3sEXT", (void *) wine_glSecondaryColor3sEXT, (void **) (&func_glSecondaryColor3sEXT) }, { "glSecondaryColor3svEXT", (void *) wine_glSecondaryColor3svEXT, (void **) (&func_glSecondaryColor3svEXT) }, { "glSecondaryColor3ubEXT", (void *) wine_glSecondaryColor3ubEXT, (void **) (&func_glSecondaryColor3ubEXT) }, { "glSecondaryColor3ubvEXT", (void *) wine_glSecondaryColor3ubvEXT, (void **) (&func_glSecondaryColor3ubvEXT) }, { "glSecondaryColor3uiEXT", (void *) wine_glSecondaryColor3uiEXT, (void **) (&func_glSecondaryColor3uiEXT) }, { "glSecondaryColor3uivEXT", (void *) wine_glSecondaryColor3uivEXT, (void **) (&func_glSecondaryColor3uivEXT) }, { "glSecondaryColor3usEXT", (void *) wine_glSecondaryColor3usEXT, (void **) (&func_glSecondaryColor3usEXT) }, { "glSecondaryColor3usvEXT", (void *) wine_glSecondaryColor3usvEXT, (void **) (&func_glSecondaryColor3usvEXT) }, { "glSecondaryColorPointerEXT", (void *) wine_glSecondaryColorPointerEXT, (void **) (&func_glSecondaryColorPointerEXT) }, { "glSecondaryColorPointerListIBM", (void *) wine_glSecondaryColorPointerListIBM, (void **) (&func_glSecondaryColorPointerListIBM) }, { "glSeparableFilter2DEXT", (void *) wine_glSeparableFilter2DEXT, (void **) (&func_glSeparableFilter2DEXT) }, { "glSharpenTexFuncSGIS", (void *) wine_glSharpenTexFuncSGIS, (void **) (&func_glSharpenTexFuncSGIS) }, { "glSpriteParameterfSGIX", (void *) wine_glSpriteParameterfSGIX, (void **) (&func_glSpriteParameterfSGIX) }, { "glSpriteParameterfvSGIX", (void *) wine_glSpriteParameterfvSGIX, (void **) (&func_glSpriteParameterfvSGIX) }, { "glSpriteParameteriSGIX", (void *) wine_glSpriteParameteriSGIX, (void **) (&func_glSpriteParameteriSGIX) }, { "glSpriteParameterivSGIX", (void *) wine_glSpriteParameterivSGIX, (void **) (&func_glSpriteParameterivSGIX) }, { "glStartInstrumentsSGIX", (void *) wine_glStartInstrumentsSGIX, (void **) (&func_glStartInstrumentsSGIX) }, { "glStopInstrumentsSGIX", (void *) wine_glStopInstrumentsSGIX, (void **) (&func_glStopInstrumentsSGIX) }, { "glTagSampleBufferSGIX", (void *) wine_glTagSampleBufferSGIX, (void **) (&func_glTagSampleBufferSGIX) }, { "glTangent3b", (void *) wine_glTangent3b, (void **) (&func_glTangent3b) }, { "glTangent3bv", (void *) wine_glTangent3bv, (void **) (&func_glTangent3bv) }, { "glTangent3d", (void *) wine_glTangent3d, (void **) (&func_glTangent3d) }, { "glTangent3dv", (void *) wine_glTangent3dv, (void **) (&func_glTangent3dv) }, { "glTangent3f", (void *) wine_glTangent3f, (void **) (&func_glTangent3f) }, { "glTangent3fv", (void *) wine_glTangent3fv, (void **) (&func_glTangent3fv) }, { "glTangent3i", (void *) wine_glTangent3i, (void **) (&func_glTangent3i) }, { "glTangent3iv", (void *) wine_glTangent3iv, (void **) (&func_glTangent3iv) }, { "glTangent3s", (void *) wine_glTangent3s, (void **) (&func_glTangent3s) }, { "glTangent3sv", (void *) wine_glTangent3sv, (void **) (&func_glTangent3sv) }, { "glTangentPointerEXT", (void *) wine_glTangentPointerEXT, (void **) (&func_glTangentPointerEXT) }, { "glTbufferMask3DFX", (void *) wine_glTbufferMask3DFX, (void **) (&func_glTbufferMask3DFX) }, { "glTexCoord2fColor3fVertex3fSUN", (void *) wine_glTexCoord2fColor3fVertex3fSUN, (void **) (&func_glTexCoord2fColor3fVertex3fSUN) }, { "glTexCoord2fColor3fVertex3fvSUN", (void *) wine_glTexCoord2fColor3fVertex3fvSUN, (void **) (&func_glTexCoord2fColor3fVertex3fvSUN) }, { "glTexCoord2fColor4fNormal3fVertex3fSUN", (void *) wine_glTexCoord2fColor4fNormal3fVertex3fSUN, (void **) (&func_glTexCoord2fColor4fNormal3fVertex3fSUN) }, { "glTexCoord2fColor4fNormal3fVertex3fvSUN", (void *) wine_glTexCoord2fColor4fNormal3fVertex3fvSUN, (void **) (&func_glTexCoord2fColor4fNormal3fVertex3fvSUN) }, { "glTexCoord2fColor4ubVertex3fSUN", (void *) wine_glTexCoord2fColor4ubVertex3fSUN, (void **) (&func_glTexCoord2fColor4ubVertex3fSUN) }, { "glTexCoord2fColor4ubVertex3fvSUN", (void *) wine_glTexCoord2fColor4ubVertex3fvSUN, (void **) (&func_glTexCoord2fColor4ubVertex3fvSUN) }, { "glTexCoord2fNormal3fVertex3fSUN", (void *) wine_glTexCoord2fNormal3fVertex3fSUN, (void **) (&func_glTexCoord2fNormal3fVertex3fSUN) }, { "glTexCoord2fNormal3fVertex3fvSUN", (void *) wine_glTexCoord2fNormal3fVertex3fvSUN, (void **) (&func_glTexCoord2fNormal3fVertex3fvSUN) }, { "glTexCoord2fVertex3fSUN", (void *) wine_glTexCoord2fVertex3fSUN, (void **) (&func_glTexCoord2fVertex3fSUN) }, { "glTexCoord2fVertex3fvSUN", (void *) wine_glTexCoord2fVertex3fvSUN, (void **) (&func_glTexCoord2fVertex3fvSUN) }, { "glTexCoord4fColor4fNormal3fVertex4fSUN", (void *) wine_glTexCoord4fColor4fNormal3fVertex4fSUN, (void **) (&func_glTexCoord4fColor4fNormal3fVertex4fSUN) }, { "glTexCoord4fColor4fNormal3fVertex4fvSUN", (void *) wine_glTexCoord4fColor4fNormal3fVertex4fvSUN, (void **) (&func_glTexCoord4fColor4fNormal3fVertex4fvSUN) }, { "glTexCoord4fVertex4fSUN", (void *) wine_glTexCoord4fVertex4fSUN, (void **) (&func_glTexCoord4fVertex4fSUN) }, { "glTexCoord4fVertex4fvSUN", (void *) wine_glTexCoord4fVertex4fvSUN, (void **) (&func_glTexCoord4fVertex4fvSUN) }, { "glTexCoordPointerEXT", (void *) wine_glTexCoordPointerEXT, (void **) (&func_glTexCoordPointerEXT) }, { "glTexCoordPointerListIBM", (void *) wine_glTexCoordPointerListIBM, (void **) (&func_glTexCoordPointerListIBM) }, { "glTexCoordPointervINTEL", (void *) wine_glTexCoordPointervINTEL, (void **) (&func_glTexCoordPointervINTEL) }, { "glTexFilterFuncSGIS", (void *) wine_glTexFilterFuncSGIS, (void **) (&func_glTexFilterFuncSGIS) }, { "glTexImage3DEXT", (void *) wine_glTexImage3DEXT, (void **) (&func_glTexImage3DEXT) }, { "glTexImage4DSGIS", (void *) wine_glTexImage4DSGIS, (void **) (&func_glTexImage4DSGIS) }, { "glTexSubImage1DEXT", (void *) wine_glTexSubImage1DEXT, (void **) (&func_glTexSubImage1DEXT) }, { "glTexSubImage2DEXT", (void *) wine_glTexSubImage2DEXT, (void **) (&func_glTexSubImage2DEXT) }, { "glTexSubImage3DEXT", (void *) wine_glTexSubImage3DEXT, (void **) (&func_glTexSubImage3DEXT) }, { "glTexSubImage4DSGIS", (void *) wine_glTexSubImage4DSGIS, (void **) (&func_glTexSubImage4DSGIS) }, { "glTextureLightEXT", (void *) wine_glTextureLightEXT, (void **) (&func_glTextureLightEXT) }, { "glTextureMaterialEXT", (void *) wine_glTextureMaterialEXT, (void **) (&func_glTextureMaterialEXT) }, { "glTextureNormalEXT", (void *) wine_glTextureNormalEXT, (void **) (&func_glTextureNormalEXT) }, { "glUnlockArraysEXT", (void *) wine_glUnlockArraysEXT, (void **) (&func_glUnlockArraysEXT) }, { "glVertexArrayRangeNV", (void *) wine_glVertexArrayRangeNV, (void **) (&func_glVertexArrayRangeNV) }, { "glVertexPointerEXT", (void *) wine_glVertexPointerEXT, (void **) (&func_glVertexPointerEXT) }, { "glVertexPointerListIBM", (void *) wine_glVertexPointerListIBM, (void **) (&func_glVertexPointerListIBM) }, { "glVertexPointervINTEL", (void *) wine_glVertexPointervINTEL, (void **) (&func_glVertexPointervINTEL) }, { "glVertexWeightPointerEXT", (void *) wine_glVertexWeightPointerEXT, (void **) (&func_glVertexWeightPointerEXT) }, { "glVertexWeightfEXT", (void *) wine_glVertexWeightfEXT, (void **) (&func_glVertexWeightfEXT) }, { "glVertexWeightfvEXT", (void *) wine_glVertexWeightfvEXT, (void **) (&func_glVertexWeightfvEXT) }, { "glWindowPos2dMESA", (void *) wine_glWindowPos2dMESA, (void **) (&func_glWindowPos2dMESA) }, { "glWindowPos2dvMESA", (void *) wine_glWindowPos2dvMESA, (void **) (&func_glWindowPos2dvMESA) }, { "glWindowPos2fMESA", (void *) wine_glWindowPos2fMESA, (void **) (&func_glWindowPos2fMESA) }, { "glWindowPos2fvMESA", (void *) wine_glWindowPos2fvMESA, (void **) (&func_glWindowPos2fvMESA) }, { "glWindowPos2iMESA", (void *) wine_glWindowPos2iMESA, (void **) (&func_glWindowPos2iMESA) }, { "glWindowPos2ivMESA", (void *) wine_glWindowPos2ivMESA, (void **) (&func_glWindowPos2ivMESA) }, { "glWindowPos2sMESA", (void *) wine_glWindowPos2sMESA, (void **) (&func_glWindowPos2sMESA) }, { "glWindowPos2svMESA", (void *) wine_glWindowPos2svMESA, (void **) (&func_glWindowPos2svMESA) }, { "glWindowPos3dMESA", (void *) wine_glWindowPos3dMESA, (void **) (&func_glWindowPos3dMESA) }, { "glWindowPos3dvMESA", (void *) wine_glWindowPos3dvMESA, (void **) (&func_glWindowPos3dvMESA) }, { "glWindowPos3fMESA", (void *) wine_glWindowPos3fMESA, (void **) (&func_glWindowPos3fMESA) }, { "glWindowPos3fvMESA", (void *) wine_glWindowPos3fvMESA, (void **) (&func_glWindowPos3fvMESA) }, { "glWindowPos3iMESA", (void *) wine_glWindowPos3iMESA, (void **) (&func_glWindowPos3iMESA) }, { "glWindowPos3ivMESA", (void *) wine_glWindowPos3ivMESA, (void **) (&func_glWindowPos3ivMESA) }, { "glWindowPos3sMESA", (void *) wine_glWindowPos3sMESA, (void **) (&func_glWindowPos3sMESA) }, { "glWindowPos3svMESA", (void *) wine_glWindowPos3svMESA, (void **) (&func_glWindowPos3svMESA) }, { "glWindowPos4dMESA", (void *) wine_glWindowPos4dMESA, (void **) (&func_glWindowPos4dMESA) }, { "glWindowPos4dvMESA", (void *) wine_glWindowPos4dvMESA, (void **) (&func_glWindowPos4dvMESA) }, { "glWindowPos4fMESA", (void *) wine_glWindowPos4fMESA, (void **) (&func_glWindowPos4fMESA) }, { "glWindowPos4fvMESA", (void *) wine_glWindowPos4fvMESA, (void **) (&func_glWindowPos4fvMESA) }, { "glWindowPos4iMESA", (void *) wine_glWindowPos4iMESA, (void **) (&func_glWindowPos4iMESA) }, { "glWindowPos4ivMESA", (void *) wine_glWindowPos4ivMESA, (void **) (&func_glWindowPos4ivMESA) }, { "glWindowPos4sMESA", (void *) wine_glWindowPos4sMESA, (void **) (&func_glWindowPos4sMESA) }, { "glWindowPos4svMESA", (void *) wine_glWindowPos4svMESA, (void **) (&func_glWindowPos4svMESA) } }; /* Now, the function declarations */ void WINAPI wine_glApplyTextureEXT(GLenum arg_0) { ENTER_GL(); func_glApplyTextureEXT(arg_0); LEAVE_GL(); } GLboolean WINAPI wine_glAreTexturesResidentEXT(GLsizei arg_0, const GLuint * arg_1, GLboolean * arg_2) { GLboolean ret; ENTER_GL(); ret = func_glAreTexturesResidentEXT(arg_0, arg_1, arg_2); LEAVE_GL(); return ret; } void WINAPI wine_glArrayElementEXT(GLint arg_0) { ENTER_GL(); func_glArrayElementEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glBindTextureEXT(GLenum arg_0, GLuint arg_1) { ENTER_GL(); func_glBindTextureEXT(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glBinormal3b(GLbyte arg_0, GLbyte arg_1, GLbyte arg_2) { ENTER_GL(); func_glBinormal3b(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glBinormal3bv(const GLbyte * arg_0) { ENTER_GL(); func_glBinormal3bv(arg_0); LEAVE_GL(); } void WINAPI wine_glBinormal3d(GLdouble arg_0, GLdouble arg_1, GLdouble arg_2) { ENTER_GL(); func_glBinormal3d(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glBinormal3dv(const GLdouble * arg_0) { ENTER_GL(); func_glBinormal3dv(arg_0); LEAVE_GL(); } void WINAPI wine_glBinormal3f(GLfloat arg_0, GLfloat arg_1, GLfloat arg_2) { ENTER_GL(); func_glBinormal3f(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glBinormal3fv(const GLfloat * arg_0) { ENTER_GL(); func_glBinormal3fv(arg_0); LEAVE_GL(); } void WINAPI wine_glBinormal3i(GLint arg_0, GLint arg_1, GLint arg_2) { ENTER_GL(); func_glBinormal3i(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glBinormal3iv(const GLint * arg_0) { ENTER_GL(); func_glBinormal3iv(arg_0); LEAVE_GL(); } void WINAPI wine_glBinormal3s(GLshort arg_0, GLshort arg_1, GLshort arg_2) { ENTER_GL(); func_glBinormal3s(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glBinormal3sv(const GLshort * arg_0) { ENTER_GL(); func_glBinormal3sv(arg_0); LEAVE_GL(); } void WINAPI wine_glBinormalPointerEXT(GLenum arg_0, GLsizei arg_1, const GLvoid * arg_2) { ENTER_GL(); func_glBinormalPointerEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glBlendColorEXT(GLclampf arg_0, GLclampf arg_1, GLclampf arg_2, GLclampf arg_3) { ENTER_GL(); func_glBlendColorEXT(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glBlendEquationEXT(GLenum arg_0) { ENTER_GL(); func_glBlendEquationEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glBlendFuncSeparateEXT(GLenum arg_0, GLenum arg_1, GLenum arg_2, GLenum arg_3) { ENTER_GL(); func_glBlendFuncSeparateEXT(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glColor3fVertex3fSUN(GLfloat arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3, GLfloat arg_4, GLfloat arg_5) { ENTER_GL(); func_glColor3fVertex3fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5); LEAVE_GL(); } void WINAPI wine_glColor3fVertex3fvSUN(const GLfloat * arg_0, const GLfloat * arg_1) { ENTER_GL(); func_glColor3fVertex3fvSUN(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glColor4fNormal3fVertex3fSUN(GLfloat arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3, GLfloat arg_4, GLfloat arg_5, GLfloat arg_6, GLfloat arg_7, GLfloat arg_8, GLfloat arg_9) { ENTER_GL(); func_glColor4fNormal3fVertex3fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8, arg_9); LEAVE_GL(); } void WINAPI wine_glColor4fNormal3fVertex3fvSUN(const GLfloat * arg_0, const GLfloat * arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glColor4fNormal3fVertex3fvSUN(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glColor4ubVertex2fSUN(GLubyte arg_0, GLubyte arg_1, GLubyte arg_2, GLubyte arg_3, GLfloat arg_4, GLfloat arg_5) { ENTER_GL(); func_glColor4ubVertex2fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5); LEAVE_GL(); } void WINAPI wine_glColor4ubVertex2fvSUN(const GLubyte * arg_0, const GLfloat * arg_1) { ENTER_GL(); func_glColor4ubVertex2fvSUN(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glColor4ubVertex3fSUN(GLubyte arg_0, GLubyte arg_1, GLubyte arg_2, GLubyte arg_3, GLfloat arg_4, GLfloat arg_5, GLfloat arg_6) { ENTER_GL(); func_glColor4ubVertex3fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6); LEAVE_GL(); } void WINAPI wine_glColor4ubVertex3fvSUN(const GLubyte * arg_0, const GLfloat * arg_1) { ENTER_GL(); func_glColor4ubVertex3fvSUN(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glColorPointerEXT(GLint arg_0, GLenum arg_1, GLsizei arg_2, GLsizei arg_3, const GLvoid * arg_4) { ENTER_GL(); func_glColorPointerEXT(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glColorPointerListIBM(GLint arg_0, GLenum arg_1, GLint arg_2, const GLvoid* * arg_3, GLint arg_4) { ENTER_GL(); func_glColorPointerListIBM(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glColorPointervINTEL(GLint arg_0, GLenum arg_1, const GLvoid* * arg_2) { ENTER_GL(); func_glColorPointervINTEL(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glColorSubTableEXT(GLenum arg_0, GLsizei arg_1, GLsizei arg_2, GLenum arg_3, GLenum arg_4, const GLvoid * arg_5) { ENTER_GL(); func_glColorSubTableEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5); LEAVE_GL(); } void WINAPI wine_glColorTableEXT(GLenum arg_0, GLenum arg_1, GLsizei arg_2, GLenum arg_3, GLenum arg_4, const GLvoid * arg_5) { ENTER_GL(); func_glColorTableEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5); LEAVE_GL(); } void WINAPI wine_glColorTableParameterfvSGI(GLenum arg_0, GLenum arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glColorTableParameterfvSGI(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glColorTableParameterivSGI(GLenum arg_0, GLenum arg_1, const GLint * arg_2) { ENTER_GL(); func_glColorTableParameterivSGI(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glColorTableSGI(GLenum arg_0, GLenum arg_1, GLsizei arg_2, GLenum arg_3, GLenum arg_4, const GLvoid * arg_5) { ENTER_GL(); func_glColorTableSGI(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5); LEAVE_GL(); } void WINAPI wine_glCombinerInputNV(GLenum arg_0, GLenum arg_1, GLenum arg_2, GLenum arg_3, GLenum arg_4, GLenum arg_5) { ENTER_GL(); func_glCombinerInputNV(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5); LEAVE_GL(); } void WINAPI wine_glCombinerOutputNV(GLenum arg_0, GLenum arg_1, GLenum arg_2, GLenum arg_3, GLenum arg_4, GLenum arg_5, GLenum arg_6, GLboolean arg_7, GLboolean arg_8, GLboolean arg_9) { ENTER_GL(); func_glCombinerOutputNV(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8, arg_9); LEAVE_GL(); } void WINAPI wine_glCombinerParameterfNV(GLenum arg_0, GLfloat arg_1) { ENTER_GL(); func_glCombinerParameterfNV(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glCombinerParameterfvNV(GLenum arg_0, const GLfloat * arg_1) { ENTER_GL(); func_glCombinerParameterfvNV(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glCombinerParameteriNV(GLenum arg_0, GLint arg_1) { ENTER_GL(); func_glCombinerParameteriNV(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glCombinerParameterivNV(GLenum arg_0, const GLint * arg_1) { ENTER_GL(); func_glCombinerParameterivNV(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glCompressedTexImage1DARB(GLenum arg_0, GLint arg_1, GLenum arg_2, GLsizei arg_3, GLint arg_4, GLsizei arg_5, const GLvoid * arg_6) { ENTER_GL(); func_glCompressedTexImage1DARB(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6); LEAVE_GL(); } void WINAPI wine_glCompressedTexImage2DARB(GLenum arg_0, GLint arg_1, GLenum arg_2, GLsizei arg_3, GLsizei arg_4, GLint arg_5, GLsizei arg_6, const GLvoid * arg_7) { ENTER_GL(); func_glCompressedTexImage2DARB(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7); LEAVE_GL(); } void WINAPI wine_glCompressedTexImage3DARB(GLenum arg_0, GLint arg_1, GLenum arg_2, GLsizei arg_3, GLsizei arg_4, GLsizei arg_5, GLint arg_6, GLsizei arg_7, const GLvoid * arg_8) { ENTER_GL(); func_glCompressedTexImage3DARB(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8); LEAVE_GL(); } void WINAPI wine_glCompressedTexSubImage1DARB(GLenum arg_0, GLint arg_1, GLint arg_2, GLsizei arg_3, GLenum arg_4, GLsizei arg_5, const GLvoid * arg_6) { ENTER_GL(); func_glCompressedTexSubImage1DARB(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6); LEAVE_GL(); } void WINAPI wine_glCompressedTexSubImage2DARB(GLenum arg_0, GLint arg_1, GLint arg_2, GLint arg_3, GLsizei arg_4, GLsizei arg_5, GLenum arg_6, GLsizei arg_7, const GLvoid * arg_8) { ENTER_GL(); func_glCompressedTexSubImage2DARB(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8); LEAVE_GL(); } void WINAPI wine_glCompressedTexSubImage3DARB(GLenum arg_0, GLint arg_1, GLint arg_2, GLint arg_3, GLint arg_4, GLsizei arg_5, GLsizei arg_6, GLsizei arg_7, GLenum arg_8, GLsizei arg_9, const GLvoid * arg_10) { ENTER_GL(); func_glCompressedTexSubImage3DARB(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8, arg_9, arg_10); LEAVE_GL(); } void WINAPI wine_glConvolutionFilter1DEXT(GLenum arg_0, GLenum arg_1, GLsizei arg_2, GLenum arg_3, GLenum arg_4, const GLvoid * arg_5) { ENTER_GL(); func_glConvolutionFilter1DEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5); LEAVE_GL(); } void WINAPI wine_glConvolutionFilter2DEXT(GLenum arg_0, GLenum arg_1, GLsizei arg_2, GLsizei arg_3, GLenum arg_4, GLenum arg_5, const GLvoid * arg_6) { ENTER_GL(); func_glConvolutionFilter2DEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6); LEAVE_GL(); } void WINAPI wine_glConvolutionParameterfEXT(GLenum arg_0, GLenum arg_1, GLfloat arg_2) { ENTER_GL(); func_glConvolutionParameterfEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glConvolutionParameterfvEXT(GLenum arg_0, GLenum arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glConvolutionParameterfvEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glConvolutionParameteriEXT(GLenum arg_0, GLenum arg_1, GLint arg_2) { ENTER_GL(); func_glConvolutionParameteriEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glConvolutionParameterivEXT(GLenum arg_0, GLenum arg_1, const GLint * arg_2) { ENTER_GL(); func_glConvolutionParameterivEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glCopyColorSubTableEXT(GLenum arg_0, GLsizei arg_1, GLint arg_2, GLint arg_3, GLsizei arg_4) { ENTER_GL(); func_glCopyColorSubTableEXT(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glCopyColorTableSGI(GLenum arg_0, GLenum arg_1, GLint arg_2, GLint arg_3, GLsizei arg_4) { ENTER_GL(); func_glCopyColorTableSGI(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glCopyConvolutionFilter1DEXT(GLenum arg_0, GLenum arg_1, GLint arg_2, GLint arg_3, GLsizei arg_4) { ENTER_GL(); func_glCopyConvolutionFilter1DEXT(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glCopyConvolutionFilter2DEXT(GLenum arg_0, GLenum arg_1, GLint arg_2, GLint arg_3, GLsizei arg_4, GLsizei arg_5) { ENTER_GL(); func_glCopyConvolutionFilter2DEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5); LEAVE_GL(); } void WINAPI wine_glCopyTexImage1DEXT(GLenum arg_0, GLint arg_1, GLenum arg_2, GLint arg_3, GLint arg_4, GLsizei arg_5, GLint arg_6) { ENTER_GL(); func_glCopyTexImage1DEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6); LEAVE_GL(); } void WINAPI wine_glCopyTexImage2DEXT(GLenum arg_0, GLint arg_1, GLenum arg_2, GLint arg_3, GLint arg_4, GLsizei arg_5, GLsizei arg_6, GLint arg_7) { ENTER_GL(); func_glCopyTexImage2DEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7); LEAVE_GL(); } void WINAPI wine_glCopyTexSubImage1DEXT(GLenum arg_0, GLint arg_1, GLint arg_2, GLint arg_3, GLint arg_4, GLsizei arg_5) { ENTER_GL(); func_glCopyTexSubImage1DEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5); LEAVE_GL(); } void WINAPI wine_glCopyTexSubImage2DEXT(GLenum arg_0, GLint arg_1, GLint arg_2, GLint arg_3, GLint arg_4, GLint arg_5, GLsizei arg_6, GLsizei arg_7) { ENTER_GL(); func_glCopyTexSubImage2DEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7); LEAVE_GL(); } void WINAPI wine_glCopyTexSubImage3DEXT(GLenum arg_0, GLint arg_1, GLint arg_2, GLint arg_3, GLint arg_4, GLint arg_5, GLint arg_6, GLsizei arg_7, GLsizei arg_8) { ENTER_GL(); func_glCopyTexSubImage3DEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8); LEAVE_GL(); } void WINAPI wine_glCullParameterdvEXT(GLenum arg_0, GLdouble * arg_1) { ENTER_GL(); func_glCullParameterdvEXT(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glCullParameterfvEXT(GLenum arg_0, GLfloat * arg_1) { ENTER_GL(); func_glCullParameterfvEXT(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glDeleteTexturesEXT(GLsizei arg_0, const GLuint * arg_1) { ENTER_GL(); func_glDeleteTexturesEXT(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glDetailTexFuncSGIS(GLenum arg_0, GLsizei arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glDetailTexFuncSGIS(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glDrawArraysEXT(GLenum arg_0, GLint arg_1, GLsizei arg_2) { ENTER_GL(); func_glDrawArraysEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glDrawRangeElementsEXT(GLenum arg_0, GLuint arg_1, GLuint arg_2, GLsizei arg_3, GLenum arg_4, const GLvoid * arg_5) { ENTER_GL(); func_glDrawRangeElementsEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5); LEAVE_GL(); } void WINAPI wine_glEdgeFlagPointerEXT(GLsizei arg_0, GLsizei arg_1, const GLboolean * arg_2) { ENTER_GL(); func_glEdgeFlagPointerEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glEdgeFlagPointerListIBM(GLint arg_0, const GLboolean* * arg_1, GLint arg_2) { ENTER_GL(); func_glEdgeFlagPointerListIBM(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glFinalCombinerInputNV(GLenum arg_0, GLenum arg_1, GLenum arg_2, GLenum arg_3) { ENTER_GL(); func_glFinalCombinerInputNV(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glFinishTextureSUNX() { ENTER_GL(); func_glFinishTextureSUNX(); LEAVE_GL(); } void WINAPI wine_glFlushRasterSGIX() { ENTER_GL(); func_glFlushRasterSGIX(); LEAVE_GL(); } void WINAPI wine_glFlushVertexArrayRangeNV() { ENTER_GL(); func_glFlushVertexArrayRangeNV(); LEAVE_GL(); } void WINAPI wine_glFogCoordPointerEXT(GLenum arg_0, GLsizei arg_1, const GLvoid * arg_2) { ENTER_GL(); func_glFogCoordPointerEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glFogCoordPointerListIBM(GLenum arg_0, GLint arg_1, const GLvoid* * arg_2, GLint arg_3) { ENTER_GL(); func_glFogCoordPointerListIBM(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glFogCoorddEXT(GLdouble arg_0) { ENTER_GL(); func_glFogCoorddEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glFogCoorddvEXT(const GLdouble * arg_0) { ENTER_GL(); func_glFogCoorddvEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glFogCoordfEXT(GLfloat arg_0) { ENTER_GL(); func_glFogCoordfEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glFogCoordfvEXT(const GLfloat * arg_0) { ENTER_GL(); func_glFogCoordfvEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glFogFuncSGIS(GLsizei arg_0, const GLfloat * arg_1) { ENTER_GL(); func_glFogFuncSGIS(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glFragmentColorMaterialSGIX(GLenum arg_0, GLenum arg_1) { ENTER_GL(); func_glFragmentColorMaterialSGIX(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glFragmentLightModelfSGIX(GLenum arg_0, GLfloat arg_1) { ENTER_GL(); func_glFragmentLightModelfSGIX(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glFragmentLightModelfvSGIX(GLenum arg_0, const GLfloat * arg_1) { ENTER_GL(); func_glFragmentLightModelfvSGIX(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glFragmentLightModeliSGIX(GLenum arg_0, GLint arg_1) { ENTER_GL(); func_glFragmentLightModeliSGIX(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glFragmentLightModelivSGIX(GLenum arg_0, const GLint * arg_1) { ENTER_GL(); func_glFragmentLightModelivSGIX(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glFragmentLightfSGIX(GLenum arg_0, GLenum arg_1, GLfloat arg_2) { ENTER_GL(); func_glFragmentLightfSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glFragmentLightfvSGIX(GLenum arg_0, GLenum arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glFragmentLightfvSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glFragmentLightiSGIX(GLenum arg_0, GLenum arg_1, GLint arg_2) { ENTER_GL(); func_glFragmentLightiSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glFragmentLightivSGIX(GLenum arg_0, GLenum arg_1, const GLint * arg_2) { ENTER_GL(); func_glFragmentLightivSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glFragmentMaterialfSGIX(GLenum arg_0, GLenum arg_1, GLfloat arg_2) { ENTER_GL(); func_glFragmentMaterialfSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glFragmentMaterialfvSGIX(GLenum arg_0, GLenum arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glFragmentMaterialfvSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glFragmentMaterialiSGIX(GLenum arg_0, GLenum arg_1, GLint arg_2) { ENTER_GL(); func_glFragmentMaterialiSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glFragmentMaterialivSGIX(GLenum arg_0, GLenum arg_1, const GLint * arg_2) { ENTER_GL(); func_glFragmentMaterialivSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glFrameZoomSGIX(GLint arg_0) { ENTER_GL(); func_glFrameZoomSGIX(arg_0); LEAVE_GL(); } void WINAPI wine_glGenTexturesEXT(GLsizei arg_0, GLuint * arg_1) { ENTER_GL(); func_glGenTexturesEXT(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glGetColorTableEXT(GLenum arg_0, GLenum arg_1, GLenum arg_2, GLvoid * arg_3) { ENTER_GL(); func_glGetColorTableEXT(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glGetColorTableParameterfvEXT(GLenum arg_0, GLenum arg_1, GLfloat * arg_2) { ENTER_GL(); func_glGetColorTableParameterfvEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetColorTableParameterfvSGI(GLenum arg_0, GLenum arg_1, GLfloat * arg_2) { ENTER_GL(); func_glGetColorTableParameterfvSGI(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetColorTableParameterivEXT(GLenum arg_0, GLenum arg_1, GLint * arg_2) { ENTER_GL(); func_glGetColorTableParameterivEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetColorTableParameterivSGI(GLenum arg_0, GLenum arg_1, GLint * arg_2) { ENTER_GL(); func_glGetColorTableParameterivSGI(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetColorTableSGI(GLenum arg_0, GLenum arg_1, GLenum arg_2, GLvoid * arg_3) { ENTER_GL(); func_glGetColorTableSGI(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glGetCombinerInputParameterfvNV(GLenum arg_0, GLenum arg_1, GLenum arg_2, GLenum arg_3, GLfloat * arg_4) { ENTER_GL(); func_glGetCombinerInputParameterfvNV(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glGetCombinerInputParameterivNV(GLenum arg_0, GLenum arg_1, GLenum arg_2, GLenum arg_3, GLint * arg_4) { ENTER_GL(); func_glGetCombinerInputParameterivNV(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glGetCombinerOutputParameterfvNV(GLenum arg_0, GLenum arg_1, GLenum arg_2, GLfloat * arg_3) { ENTER_GL(); func_glGetCombinerOutputParameterfvNV(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glGetCombinerOutputParameterivNV(GLenum arg_0, GLenum arg_1, GLenum arg_2, GLint * arg_3) { ENTER_GL(); func_glGetCombinerOutputParameterivNV(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glGetCompressedTexImageARB(GLenum arg_0, GLint arg_1, void * arg_2) { ENTER_GL(); func_glGetCompressedTexImageARB(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetConvolutionFilterEXT(GLenum arg_0, GLenum arg_1, GLenum arg_2, GLvoid * arg_3) { ENTER_GL(); func_glGetConvolutionFilterEXT(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glGetConvolutionParameterfvEXT(GLenum arg_0, GLenum arg_1, GLfloat * arg_2) { ENTER_GL(); func_glGetConvolutionParameterfvEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetConvolutionParameterivEXT(GLenum arg_0, GLenum arg_1, GLint * arg_2) { ENTER_GL(); func_glGetConvolutionParameterivEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetDetailTexFuncSGIS(GLenum arg_0, GLfloat * arg_1) { ENTER_GL(); func_glGetDetailTexFuncSGIS(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glGetFinalCombinerInputParameterfvNV(GLenum arg_0, GLenum arg_1, GLfloat * arg_2) { ENTER_GL(); func_glGetFinalCombinerInputParameterfvNV(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetFinalCombinerInputParameterivNV(GLenum arg_0, GLenum arg_1, GLint * arg_2) { ENTER_GL(); func_glGetFinalCombinerInputParameterivNV(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetFogFuncSGIS(const GLfloat * arg_0) { ENTER_GL(); func_glGetFogFuncSGIS(arg_0); LEAVE_GL(); } void WINAPI wine_glGetFragmentLightfvSGIX(GLenum arg_0, GLenum arg_1, GLfloat * arg_2) { ENTER_GL(); func_glGetFragmentLightfvSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetFragmentLightivSGIX(GLenum arg_0, GLenum arg_1, GLint * arg_2) { ENTER_GL(); func_glGetFragmentLightivSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetFragmentMaterialfvSGIX(GLenum arg_0, GLenum arg_1, GLfloat * arg_2) { ENTER_GL(); func_glGetFragmentMaterialfvSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetFragmentMaterialivSGIX(GLenum arg_0, GLenum arg_1, GLint * arg_2) { ENTER_GL(); func_glGetFragmentMaterialivSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetHistogramEXT(GLenum arg_0, GLboolean arg_1, GLenum arg_2, GLenum arg_3, GLvoid * arg_4) { ENTER_GL(); func_glGetHistogramEXT(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glGetHistogramParameterfvEXT(GLenum arg_0, GLenum arg_1, GLfloat * arg_2) { ENTER_GL(); func_glGetHistogramParameterfvEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetHistogramParameterivEXT(GLenum arg_0, GLenum arg_1, GLint * arg_2) { ENTER_GL(); func_glGetHistogramParameterivEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetImageTransformParameterfvHP(GLenum arg_0, GLenum arg_1, GLfloat * arg_2) { ENTER_GL(); func_glGetImageTransformParameterfvHP(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetImageTransformParameterivHP(GLenum arg_0, GLenum arg_1, GLint * arg_2) { ENTER_GL(); func_glGetImageTransformParameterivHP(arg_0, arg_1, arg_2); LEAVE_GL(); } GLint WINAPI wine_glGetInstrumentsSGIX() { GLint ret; ENTER_GL(); ret = func_glGetInstrumentsSGIX(); LEAVE_GL(); return ret; } void WINAPI wine_glGetListParameterfvSGIX(GLuint arg_0, GLenum arg_1, GLfloat * arg_2) { ENTER_GL(); func_glGetListParameterfvSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetListParameterivSGIX(GLuint arg_0, GLenum arg_1, GLint * arg_2) { ENTER_GL(); func_glGetListParameterivSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetMinmaxEXT(GLenum arg_0, GLboolean arg_1, GLenum arg_2, GLenum arg_3, GLvoid * arg_4) { ENTER_GL(); func_glGetMinmaxEXT(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glGetMinmaxParameterfvEXT(GLenum arg_0, GLenum arg_1, GLfloat * arg_2) { ENTER_GL(); func_glGetMinmaxParameterfvEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetMinmaxParameterivEXT(GLenum arg_0, GLenum arg_1, GLint * arg_2) { ENTER_GL(); func_glGetMinmaxParameterivEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGetPixelTexGenParameterfvSGIS(GLenum arg_0, GLfloat * arg_1) { ENTER_GL(); func_glGetPixelTexGenParameterfvSGIS(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glGetPixelTexGenParameterivSGIS(GLenum arg_0, GLint * arg_1) { ENTER_GL(); func_glGetPixelTexGenParameterivSGIS(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glGetPointervEXT(GLenum arg_0, GLvoid* * arg_1) { ENTER_GL(); func_glGetPointervEXT(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glGetSeparableFilterEXT(GLenum arg_0, GLenum arg_1, GLenum arg_2, GLvoid * arg_3, GLvoid * arg_4, GLvoid * arg_5) { ENTER_GL(); func_glGetSeparableFilterEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5); LEAVE_GL(); } void WINAPI wine_glGetSharpenTexFuncSGIS(GLenum arg_0, GLfloat * arg_1) { ENTER_GL(); func_glGetSharpenTexFuncSGIS(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glGetTexFilterFuncSGIS(GLenum arg_0, GLenum arg_1, GLfloat * arg_2) { ENTER_GL(); func_glGetTexFilterFuncSGIS(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glGlobalAlphaFactorbSUN(GLbyte arg_0) { ENTER_GL(); func_glGlobalAlphaFactorbSUN(arg_0); LEAVE_GL(); } void WINAPI wine_glGlobalAlphaFactordSUN(GLdouble arg_0) { ENTER_GL(); func_glGlobalAlphaFactordSUN(arg_0); LEAVE_GL(); } void WINAPI wine_glGlobalAlphaFactorfSUN(GLfloat arg_0) { ENTER_GL(); func_glGlobalAlphaFactorfSUN(arg_0); LEAVE_GL(); } void WINAPI wine_glGlobalAlphaFactoriSUN(GLint arg_0) { ENTER_GL(); func_glGlobalAlphaFactoriSUN(arg_0); LEAVE_GL(); } void WINAPI wine_glGlobalAlphaFactorsSUN(GLshort arg_0) { ENTER_GL(); func_glGlobalAlphaFactorsSUN(arg_0); LEAVE_GL(); } void WINAPI wine_glGlobalAlphaFactorubSUN(GLubyte arg_0) { ENTER_GL(); func_glGlobalAlphaFactorubSUN(arg_0); LEAVE_GL(); } void WINAPI wine_glGlobalAlphaFactoruiSUN(GLuint arg_0) { ENTER_GL(); func_glGlobalAlphaFactoruiSUN(arg_0); LEAVE_GL(); } void WINAPI wine_glGlobalAlphaFactorusSUN(GLushort arg_0) { ENTER_GL(); func_glGlobalAlphaFactorusSUN(arg_0); LEAVE_GL(); } void WINAPI wine_glHintPGI(GLenum arg_0, GLint arg_1) { ENTER_GL(); func_glHintPGI(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glHistogramEXT(GLenum arg_0, GLsizei arg_1, GLenum arg_2, GLboolean arg_3) { ENTER_GL(); func_glHistogramEXT(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glImageTransformParameterfHP(GLenum arg_0, GLenum arg_1, GLfloat arg_2) { ENTER_GL(); func_glImageTransformParameterfHP(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glImageTransformParameterfvHP(GLenum arg_0, GLenum arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glImageTransformParameterfvHP(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glImageTransformParameteriHP(GLenum arg_0, GLenum arg_1, GLint arg_2) { ENTER_GL(); func_glImageTransformParameteriHP(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glImageTransformParameterivHP(GLenum arg_0, GLenum arg_1, const GLint * arg_2) { ENTER_GL(); func_glImageTransformParameterivHP(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glIndexFuncEXT(GLenum arg_0, GLclampf arg_1) { ENTER_GL(); func_glIndexFuncEXT(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glIndexMaterialEXT(GLenum arg_0, GLenum arg_1) { ENTER_GL(); func_glIndexMaterialEXT(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glIndexPointerEXT(GLenum arg_0, GLsizei arg_1, GLsizei arg_2, const GLvoid * arg_3) { ENTER_GL(); func_glIndexPointerEXT(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glIndexPointerListIBM(GLenum arg_0, GLint arg_1, const GLvoid* * arg_2, GLint arg_3) { ENTER_GL(); func_glIndexPointerListIBM(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glInstrumentsBufferSGIX(GLsizei arg_0, GLint * arg_1) { ENTER_GL(); func_glInstrumentsBufferSGIX(arg_0, arg_1); LEAVE_GL(); } GLboolean WINAPI wine_glIsTextureEXT(GLuint arg_0) { GLboolean ret; ENTER_GL(); ret = func_glIsTextureEXT(arg_0); LEAVE_GL(); return ret; } void WINAPI wine_glLightEnviSGIX(GLenum arg_0, GLint arg_1) { ENTER_GL(); func_glLightEnviSGIX(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glListParameterfSGIX(GLuint arg_0, GLenum arg_1, GLfloat arg_2) { ENTER_GL(); func_glListParameterfSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glListParameterfvSGIX(GLuint arg_0, GLenum arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glListParameterfvSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glListParameteriSGIX(GLuint arg_0, GLenum arg_1, GLint arg_2) { ENTER_GL(); func_glListParameteriSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glListParameterivSGIX(GLuint arg_0, GLenum arg_1, const GLint * arg_2) { ENTER_GL(); func_glListParameterivSGIX(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glLoadTransposeMatrixdARB(const GLdouble * arg_0) { ENTER_GL(); func_glLoadTransposeMatrixdARB(arg_0); LEAVE_GL(); } void WINAPI wine_glLoadTransposeMatrixfARB(const GLfloat * arg_0) { ENTER_GL(); func_glLoadTransposeMatrixfARB(arg_0); LEAVE_GL(); } void WINAPI wine_glLockArraysEXT(GLint arg_0, GLsizei arg_1) { ENTER_GL(); func_glLockArraysEXT(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glMinmaxEXT(GLenum arg_0, GLenum arg_1, GLboolean arg_2) { ENTER_GL(); func_glMinmaxEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glMultTransposeMatrixdARB(const GLdouble * arg_0) { ENTER_GL(); func_glMultTransposeMatrixdARB(arg_0); LEAVE_GL(); } void WINAPI wine_glMultTransposeMatrixfARB(const GLfloat * arg_0) { ENTER_GL(); func_glMultTransposeMatrixfARB(arg_0); LEAVE_GL(); } void WINAPI wine_glMultiDrawArraysEXT(GLenum arg_0, GLint * arg_1, GLsizei * arg_2, GLsizei arg_3) { ENTER_GL(); func_glMultiDrawArraysEXT(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glMultiDrawElementsEXT(GLenum arg_0, const GLsizei * arg_1, GLenum arg_2, const GLvoid* * arg_3, GLsizei arg_4) { ENTER_GL(); func_glMultiDrawElementsEXT(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glMultiModeDrawArraysIBM(GLenum arg_0, const GLint * arg_1, const GLsizei * arg_2, GLsizei arg_3, GLint arg_4) { ENTER_GL(); func_glMultiModeDrawArraysIBM(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glMultiModeDrawElementsIBM(const GLenum * arg_0, const GLsizei * arg_1, GLenum arg_2, const GLvoid* * arg_3, GLsizei arg_4, GLint arg_5) { ENTER_GL(); func_glMultiModeDrawElementsIBM(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5); LEAVE_GL(); } void WINAPI wine_glNormal3fVertex3fSUN(GLfloat arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3, GLfloat arg_4, GLfloat arg_5) { ENTER_GL(); func_glNormal3fVertex3fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5); LEAVE_GL(); } void WINAPI wine_glNormal3fVertex3fvSUN(const GLfloat * arg_0, const GLfloat * arg_1) { ENTER_GL(); func_glNormal3fVertex3fvSUN(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glNormalPointerEXT(GLenum arg_0, GLsizei arg_1, GLsizei arg_2, const GLvoid * arg_3) { ENTER_GL(); func_glNormalPointerEXT(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glNormalPointerListIBM(GLenum arg_0, GLint arg_1, const GLvoid* * arg_2, GLint arg_3) { ENTER_GL(); func_glNormalPointerListIBM(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glNormalPointervINTEL(GLenum arg_0, const GLvoid* * arg_1) { ENTER_GL(); func_glNormalPointervINTEL(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glPixelTexGenParameterfSGIS(GLenum arg_0, GLfloat arg_1) { ENTER_GL(); func_glPixelTexGenParameterfSGIS(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glPixelTexGenParameterfvSGIS(GLenum arg_0, const GLfloat * arg_1) { ENTER_GL(); func_glPixelTexGenParameterfvSGIS(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glPixelTexGenParameteriSGIS(GLenum arg_0, GLint arg_1) { ENTER_GL(); func_glPixelTexGenParameteriSGIS(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glPixelTexGenParameterivSGIS(GLenum arg_0, const GLint * arg_1) { ENTER_GL(); func_glPixelTexGenParameterivSGIS(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glPixelTexGenSGIX(GLenum arg_0) { ENTER_GL(); func_glPixelTexGenSGIX(arg_0); LEAVE_GL(); } void WINAPI wine_glPixelTransformParameterfEXT(GLenum arg_0, GLenum arg_1, GLfloat arg_2) { ENTER_GL(); func_glPixelTransformParameterfEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glPixelTransformParameterfvEXT(GLenum arg_0, GLenum arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glPixelTransformParameterfvEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glPixelTransformParameteriEXT(GLenum arg_0, GLenum arg_1, GLint arg_2) { ENTER_GL(); func_glPixelTransformParameteriEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glPixelTransformParameterivEXT(GLenum arg_0, GLenum arg_1, const GLint * arg_2) { ENTER_GL(); func_glPixelTransformParameterivEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glPointParameterfEXT(GLenum arg_0, GLfloat arg_1) { ENTER_GL(); func_glPointParameterfEXT(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glPointParameterfSGIS(GLenum arg_0, GLfloat arg_1) { ENTER_GL(); func_glPointParameterfSGIS(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glPointParameterfvEXT(GLenum arg_0, const GLfloat * arg_1) { ENTER_GL(); func_glPointParameterfvEXT(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glPointParameterfvSGIS(GLenum arg_0, const GLfloat * arg_1) { ENTER_GL(); func_glPointParameterfvSGIS(arg_0, arg_1); LEAVE_GL(); } GLint WINAPI wine_glPollInstrumentsSGIX(GLint * arg_0) { GLint ret; ENTER_GL(); ret = func_glPollInstrumentsSGIX(arg_0); LEAVE_GL(); return ret; } void WINAPI wine_glPolygonOffsetEXT(GLfloat arg_0, GLfloat arg_1) { ENTER_GL(); func_glPolygonOffsetEXT(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glPrioritizeTexturesEXT(GLsizei arg_0, const GLuint * arg_1, const GLclampf * arg_2) { ENTER_GL(); func_glPrioritizeTexturesEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glReadInstrumentsSGIX(GLint arg_0) { ENTER_GL(); func_glReadInstrumentsSGIX(arg_0); LEAVE_GL(); } void WINAPI wine_glReferencePlaneSGIX(const GLdouble * arg_0) { ENTER_GL(); func_glReferencePlaneSGIX(arg_0); LEAVE_GL(); } void WINAPI wine_glReplacementCodePointer(GLenum arg_0, GLsizei arg_1, const GLvoid* * arg_2) { ENTER_GL(); func_glReplacementCodePointer(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glReplacementCodeubSUN(GLubyte arg_0) { ENTER_GL(); func_glReplacementCodeubSUN(arg_0); LEAVE_GL(); } void WINAPI wine_glReplacementCodeubvSUN(const GLubyte * arg_0) { ENTER_GL(); func_glReplacementCodeubvSUN(arg_0); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiColor3fVertex3fSUN(GLenum arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3, GLfloat arg_4, GLfloat arg_5, GLfloat arg_6) { ENTER_GL(); func_glReplacementCodeuiColor3fVertex3fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiColor3fVertex3fvSUN(const GLenum * arg_0, const GLfloat * arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glReplacementCodeuiColor3fVertex3fvSUN(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiColor4fNormal3fVertex3fSUN(GLenum arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3, GLfloat arg_4, GLfloat arg_5, GLfloat arg_6, GLfloat arg_7, GLfloat arg_8, GLfloat arg_9, GLfloat arg_10) { ENTER_GL(); func_glReplacementCodeuiColor4fNormal3fVertex3fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8, arg_9, arg_10); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiColor4fNormal3fVertex3fvSUN(const GLenum * arg_0, const GLfloat * arg_1, const GLfloat * arg_2, const GLfloat * arg_3) { ENTER_GL(); func_glReplacementCodeuiColor4fNormal3fVertex3fvSUN(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiColor4ubVertex3fSUN(GLenum arg_0, GLubyte arg_1, GLubyte arg_2, GLubyte arg_3, GLubyte arg_4, GLfloat arg_5, GLfloat arg_6, GLfloat arg_7) { ENTER_GL(); func_glReplacementCodeuiColor4ubVertex3fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiColor4ubVertex3fvSUN(const GLenum * arg_0, const GLubyte * arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glReplacementCodeuiColor4ubVertex3fvSUN(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiNormal3fVertex3fSUN(GLenum arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3, GLfloat arg_4, GLfloat arg_5, GLfloat arg_6) { ENTER_GL(); func_glReplacementCodeuiNormal3fVertex3fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiNormal3fVertex3fvSUN(const GLenum * arg_0, const GLfloat * arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glReplacementCodeuiNormal3fVertex3fvSUN(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiSUN(GLuint arg_0) { ENTER_GL(); func_glReplacementCodeuiSUN(arg_0); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fSUN(GLenum arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3, GLfloat arg_4, GLfloat arg_5, GLfloat arg_6, GLfloat arg_7, GLfloat arg_8, GLfloat arg_9, GLfloat arg_10, GLfloat arg_11, GLfloat arg_12) { ENTER_GL(); func_glReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8, arg_9, arg_10, arg_11, arg_12); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fvSUN(const GLenum * arg_0, const GLfloat * arg_1, const GLfloat * arg_2, const GLfloat * arg_3, const GLfloat * arg_4) { ENTER_GL(); func_glReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fvSUN(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiTexCoord2fNormal3fVertex3fSUN(GLenum arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3, GLfloat arg_4, GLfloat arg_5, GLfloat arg_6, GLfloat arg_7, GLfloat arg_8) { ENTER_GL(); func_glReplacementCodeuiTexCoord2fNormal3fVertex3fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiTexCoord2fNormal3fVertex3fvSUN(const GLenum * arg_0, const GLfloat * arg_1, const GLfloat * arg_2, const GLfloat * arg_3) { ENTER_GL(); func_glReplacementCodeuiTexCoord2fNormal3fVertex3fvSUN(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiTexCoord2fVertex3fSUN(GLenum arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3, GLfloat arg_4, GLfloat arg_5) { ENTER_GL(); func_glReplacementCodeuiTexCoord2fVertex3fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiTexCoord2fVertex3fvSUN(const GLenum * arg_0, const GLfloat * arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glReplacementCodeuiTexCoord2fVertex3fvSUN(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiVertex3fSUN(GLenum arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3) { ENTER_GL(); func_glReplacementCodeuiVertex3fSUN(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuiVertex3fvSUN(const GLenum * arg_0, const GLfloat * arg_1) { ENTER_GL(); func_glReplacementCodeuiVertex3fvSUN(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glReplacementCodeuivSUN(const GLuint * arg_0) { ENTER_GL(); func_glReplacementCodeuivSUN(arg_0); LEAVE_GL(); } void WINAPI wine_glReplacementCodeusSUN(GLushort arg_0) { ENTER_GL(); func_glReplacementCodeusSUN(arg_0); LEAVE_GL(); } void WINAPI wine_glReplacementCodeusvSUN(const GLushort * arg_0) { ENTER_GL(); func_glReplacementCodeusvSUN(arg_0); LEAVE_GL(); } void WINAPI wine_glResetHistogramEXT(GLenum arg_0) { ENTER_GL(); func_glResetHistogramEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glResetMinmaxEXT(GLenum arg_0) { ENTER_GL(); func_glResetMinmaxEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glResizeBuffersMESA() { ENTER_GL(); func_glResizeBuffersMESA(); LEAVE_GL(); } void WINAPI wine_glSampleCoverageARB(GLclampf arg_0, GLboolean arg_1) { ENTER_GL(); func_glSampleCoverageARB(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glSampleMaskEXT(GLclampf arg_0, GLboolean arg_1) { ENTER_GL(); func_glSampleMaskEXT(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glSampleMaskSGIS(GLclampf arg_0, GLboolean arg_1) { ENTER_GL(); func_glSampleMaskSGIS(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glSamplePassARB(GLenum arg_0) { ENTER_GL(); func_glSamplePassARB(arg_0); LEAVE_GL(); } void WINAPI wine_glSamplePatternEXT(GLenum arg_0) { ENTER_GL(); func_glSamplePatternEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glSamplePatternSGIS(GLenum arg_0) { ENTER_GL(); func_glSamplePatternSGIS(arg_0); LEAVE_GL(); } void WINAPI wine_glSecondaryColor3bEXT(GLbyte arg_0, GLbyte arg_1, GLbyte arg_2) { ENTER_GL(); func_glSecondaryColor3bEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glSecondaryColor3bvEXT(const GLbyte * arg_0) { ENTER_GL(); func_glSecondaryColor3bvEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glSecondaryColor3dEXT(GLdouble arg_0, GLdouble arg_1, GLdouble arg_2) { ENTER_GL(); func_glSecondaryColor3dEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glSecondaryColor3dvEXT(const GLdouble * arg_0) { ENTER_GL(); func_glSecondaryColor3dvEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glSecondaryColor3fEXT(GLfloat arg_0, GLfloat arg_1, GLfloat arg_2) { ENTER_GL(); func_glSecondaryColor3fEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glSecondaryColor3fvEXT(const GLfloat * arg_0) { ENTER_GL(); func_glSecondaryColor3fvEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glSecondaryColor3iEXT(GLint arg_0, GLint arg_1, GLint arg_2) { ENTER_GL(); func_glSecondaryColor3iEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glSecondaryColor3ivEXT(const GLint * arg_0) { ENTER_GL(); func_glSecondaryColor3ivEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glSecondaryColor3sEXT(GLshort arg_0, GLshort arg_1, GLshort arg_2) { ENTER_GL(); func_glSecondaryColor3sEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glSecondaryColor3svEXT(const GLshort * arg_0) { ENTER_GL(); func_glSecondaryColor3svEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glSecondaryColor3ubEXT(GLubyte arg_0, GLubyte arg_1, GLubyte arg_2) { ENTER_GL(); func_glSecondaryColor3ubEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glSecondaryColor3ubvEXT(const GLubyte * arg_0) { ENTER_GL(); func_glSecondaryColor3ubvEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glSecondaryColor3uiEXT(GLuint arg_0, GLuint arg_1, GLuint arg_2) { ENTER_GL(); func_glSecondaryColor3uiEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glSecondaryColor3uivEXT(const GLuint * arg_0) { ENTER_GL(); func_glSecondaryColor3uivEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glSecondaryColor3usEXT(GLushort arg_0, GLushort arg_1, GLushort arg_2) { ENTER_GL(); func_glSecondaryColor3usEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glSecondaryColor3usvEXT(const GLushort * arg_0) { ENTER_GL(); func_glSecondaryColor3usvEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glSecondaryColorPointerEXT(GLint arg_0, GLenum arg_1, GLsizei arg_2, GLvoid * arg_3) { ENTER_GL(); func_glSecondaryColorPointerEXT(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glSecondaryColorPointerListIBM(GLint arg_0, GLenum arg_1, GLint arg_2, const GLvoid* * arg_3, GLint arg_4) { ENTER_GL(); func_glSecondaryColorPointerListIBM(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glSeparableFilter2DEXT(GLenum arg_0, GLenum arg_1, GLsizei arg_2, GLsizei arg_3, GLenum arg_4, GLenum arg_5, const GLvoid * arg_6, const GLvoid * arg_7) { ENTER_GL(); func_glSeparableFilter2DEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7); LEAVE_GL(); } void WINAPI wine_glSharpenTexFuncSGIS(GLenum arg_0, GLsizei arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glSharpenTexFuncSGIS(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glSpriteParameterfSGIX(GLenum arg_0, GLfloat arg_1) { ENTER_GL(); func_glSpriteParameterfSGIX(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glSpriteParameterfvSGIX(GLenum arg_0, const GLfloat * arg_1) { ENTER_GL(); func_glSpriteParameterfvSGIX(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glSpriteParameteriSGIX(GLenum arg_0, GLint arg_1) { ENTER_GL(); func_glSpriteParameteriSGIX(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glSpriteParameterivSGIX(GLenum arg_0, const GLint * arg_1) { ENTER_GL(); func_glSpriteParameterivSGIX(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glStartInstrumentsSGIX() { ENTER_GL(); func_glStartInstrumentsSGIX(); LEAVE_GL(); } void WINAPI wine_glStopInstrumentsSGIX(GLint arg_0) { ENTER_GL(); func_glStopInstrumentsSGIX(arg_0); LEAVE_GL(); } void WINAPI wine_glTagSampleBufferSGIX() { ENTER_GL(); func_glTagSampleBufferSGIX(); LEAVE_GL(); } void WINAPI wine_glTangent3b(GLbyte arg_0, GLbyte arg_1, GLbyte arg_2) { ENTER_GL(); func_glTangent3b(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glTangent3bv(const GLbyte * arg_0) { ENTER_GL(); func_glTangent3bv(arg_0); LEAVE_GL(); } void WINAPI wine_glTangent3d(GLdouble arg_0, GLdouble arg_1, GLdouble arg_2) { ENTER_GL(); func_glTangent3d(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glTangent3dv(const GLdouble * arg_0) { ENTER_GL(); func_glTangent3dv(arg_0); LEAVE_GL(); } void WINAPI wine_glTangent3f(GLfloat arg_0, GLfloat arg_1, GLfloat arg_2) { ENTER_GL(); func_glTangent3f(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glTangent3fv(const GLfloat * arg_0) { ENTER_GL(); func_glTangent3fv(arg_0); LEAVE_GL(); } void WINAPI wine_glTangent3i(GLint arg_0, GLint arg_1, GLint arg_2) { ENTER_GL(); func_glTangent3i(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glTangent3iv(const GLint * arg_0) { ENTER_GL(); func_glTangent3iv(arg_0); LEAVE_GL(); } void WINAPI wine_glTangent3s(GLshort arg_0, GLshort arg_1, GLshort arg_2) { ENTER_GL(); func_glTangent3s(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glTangent3sv(const GLshort * arg_0) { ENTER_GL(); func_glTangent3sv(arg_0); LEAVE_GL(); } void WINAPI wine_glTangentPointerEXT(GLenum arg_0, GLsizei arg_1, const GLvoid * arg_2) { ENTER_GL(); func_glTangentPointerEXT(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glTbufferMask3DFX(GLuint arg_0) { ENTER_GL(); func_glTbufferMask3DFX(arg_0); LEAVE_GL(); } void WINAPI wine_glTexCoord2fColor3fVertex3fSUN(GLfloat arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3, GLfloat arg_4, GLfloat arg_5, GLfloat arg_6, GLfloat arg_7) { ENTER_GL(); func_glTexCoord2fColor3fVertex3fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7); LEAVE_GL(); } void WINAPI wine_glTexCoord2fColor3fVertex3fvSUN(const GLfloat * arg_0, const GLfloat * arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glTexCoord2fColor3fVertex3fvSUN(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glTexCoord2fColor4fNormal3fVertex3fSUN(GLfloat arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3, GLfloat arg_4, GLfloat arg_5, GLfloat arg_6, GLfloat arg_7, GLfloat arg_8, GLfloat arg_9, GLfloat arg_10, GLfloat arg_11) { ENTER_GL(); func_glTexCoord2fColor4fNormal3fVertex3fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8, arg_9, arg_10, arg_11); LEAVE_GL(); } void WINAPI wine_glTexCoord2fColor4fNormal3fVertex3fvSUN(const GLfloat * arg_0, const GLfloat * arg_1, const GLfloat * arg_2, const GLfloat * arg_3) { ENTER_GL(); func_glTexCoord2fColor4fNormal3fVertex3fvSUN(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glTexCoord2fColor4ubVertex3fSUN(GLfloat arg_0, GLfloat arg_1, GLubyte arg_2, GLubyte arg_3, GLubyte arg_4, GLubyte arg_5, GLfloat arg_6, GLfloat arg_7, GLfloat arg_8) { ENTER_GL(); func_glTexCoord2fColor4ubVertex3fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8); LEAVE_GL(); } void WINAPI wine_glTexCoord2fColor4ubVertex3fvSUN(const GLfloat * arg_0, const GLubyte * arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glTexCoord2fColor4ubVertex3fvSUN(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glTexCoord2fNormal3fVertex3fSUN(GLfloat arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3, GLfloat arg_4, GLfloat arg_5, GLfloat arg_6, GLfloat arg_7) { ENTER_GL(); func_glTexCoord2fNormal3fVertex3fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7); LEAVE_GL(); } void WINAPI wine_glTexCoord2fNormal3fVertex3fvSUN(const GLfloat * arg_0, const GLfloat * arg_1, const GLfloat * arg_2) { ENTER_GL(); func_glTexCoord2fNormal3fVertex3fvSUN(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glTexCoord2fVertex3fSUN(GLfloat arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3, GLfloat arg_4) { ENTER_GL(); func_glTexCoord2fVertex3fSUN(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glTexCoord2fVertex3fvSUN(const GLfloat * arg_0, const GLfloat * arg_1) { ENTER_GL(); func_glTexCoord2fVertex3fvSUN(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glTexCoord4fColor4fNormal3fVertex4fSUN(GLfloat arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3, GLfloat arg_4, GLfloat arg_5, GLfloat arg_6, GLfloat arg_7, GLfloat arg_8, GLfloat arg_9, GLfloat arg_10, GLfloat arg_11, GLfloat arg_12, GLfloat arg_13, GLfloat arg_14) { ENTER_GL(); func_glTexCoord4fColor4fNormal3fVertex4fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8, arg_9, arg_10, arg_11, arg_12, arg_13, arg_14); LEAVE_GL(); } void WINAPI wine_glTexCoord4fColor4fNormal3fVertex4fvSUN(const GLfloat * arg_0, const GLfloat * arg_1, const GLfloat * arg_2, const GLfloat * arg_3) { ENTER_GL(); func_glTexCoord4fColor4fNormal3fVertex4fvSUN(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glTexCoord4fVertex4fSUN(GLfloat arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3, GLfloat arg_4, GLfloat arg_5, GLfloat arg_6, GLfloat arg_7) { ENTER_GL(); func_glTexCoord4fVertex4fSUN(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7); LEAVE_GL(); } void WINAPI wine_glTexCoord4fVertex4fvSUN(const GLfloat * arg_0, const GLfloat * arg_1) { ENTER_GL(); func_glTexCoord4fVertex4fvSUN(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glTexCoordPointerEXT(GLint arg_0, GLenum arg_1, GLsizei arg_2, GLsizei arg_3, const GLvoid * arg_4) { ENTER_GL(); func_glTexCoordPointerEXT(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glTexCoordPointerListIBM(GLint arg_0, GLenum arg_1, GLint arg_2, const GLvoid* * arg_3, GLint arg_4) { ENTER_GL(); func_glTexCoordPointerListIBM(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glTexCoordPointervINTEL(GLint arg_0, GLenum arg_1, const GLvoid* * arg_2) { ENTER_GL(); func_glTexCoordPointervINTEL(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glTexFilterFuncSGIS(GLenum arg_0, GLenum arg_1, GLsizei arg_2, const GLfloat * arg_3) { ENTER_GL(); func_glTexFilterFuncSGIS(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glTexImage3DEXT(GLenum arg_0, GLint arg_1, GLenum arg_2, GLsizei arg_3, GLsizei arg_4, GLsizei arg_5, GLint arg_6, GLenum arg_7, GLenum arg_8, const GLvoid * arg_9) { ENTER_GL(); func_glTexImage3DEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8, arg_9); LEAVE_GL(); } void WINAPI wine_glTexImage4DSGIS(GLenum arg_0, GLint arg_1, GLenum arg_2, GLsizei arg_3, GLsizei arg_4, GLsizei arg_5, GLsizei arg_6, GLint arg_7, GLenum arg_8, GLenum arg_9, const GLvoid * arg_10) { ENTER_GL(); func_glTexImage4DSGIS(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8, arg_9, arg_10); LEAVE_GL(); } void WINAPI wine_glTexSubImage1DEXT(GLenum arg_0, GLint arg_1, GLint arg_2, GLsizei arg_3, GLenum arg_4, GLenum arg_5, const GLvoid * arg_6) { ENTER_GL(); func_glTexSubImage1DEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6); LEAVE_GL(); } void WINAPI wine_glTexSubImage2DEXT(GLenum arg_0, GLint arg_1, GLint arg_2, GLint arg_3, GLsizei arg_4, GLsizei arg_5, GLenum arg_6, GLenum arg_7, const GLvoid * arg_8) { ENTER_GL(); func_glTexSubImage2DEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8); LEAVE_GL(); } void WINAPI wine_glTexSubImage3DEXT(GLenum arg_0, GLint arg_1, GLint arg_2, GLint arg_3, GLint arg_4, GLsizei arg_5, GLsizei arg_6, GLsizei arg_7, GLenum arg_8, GLenum arg_9, const GLvoid * arg_10) { ENTER_GL(); func_glTexSubImage3DEXT(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8, arg_9, arg_10); LEAVE_GL(); } void WINAPI wine_glTexSubImage4DSGIS(GLenum arg_0, GLint arg_1, GLint arg_2, GLint arg_3, GLint arg_4, GLint arg_5, GLsizei arg_6, GLsizei arg_7, GLsizei arg_8, GLsizei arg_9, GLenum arg_10, GLenum arg_11, const GLvoid * arg_12) { ENTER_GL(); func_glTexSubImage4DSGIS(arg_0, arg_1, arg_2, arg_3, arg_4, arg_5, arg_6, arg_7, arg_8, arg_9, arg_10, arg_11, arg_12); LEAVE_GL(); } void WINAPI wine_glTextureLightEXT(GLenum arg_0) { ENTER_GL(); func_glTextureLightEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glTextureMaterialEXT(GLenum arg_0, GLenum arg_1) { ENTER_GL(); func_glTextureMaterialEXT(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glTextureNormalEXT(GLenum arg_0) { ENTER_GL(); func_glTextureNormalEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glUnlockArraysEXT() { ENTER_GL(); func_glUnlockArraysEXT(); LEAVE_GL(); } void WINAPI wine_glVertexArrayRangeNV(GLsizei arg_0, const GLvoid * arg_1) { ENTER_GL(); func_glVertexArrayRangeNV(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glVertexPointerEXT(GLint arg_0, GLenum arg_1, GLsizei arg_2, GLsizei arg_3, const GLvoid * arg_4) { ENTER_GL(); func_glVertexPointerEXT(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glVertexPointerListIBM(GLint arg_0, GLenum arg_1, GLint arg_2, const GLvoid* * arg_3, GLint arg_4) { ENTER_GL(); func_glVertexPointerListIBM(arg_0, arg_1, arg_2, arg_3, arg_4); LEAVE_GL(); } void WINAPI wine_glVertexPointervINTEL(GLint arg_0, GLenum arg_1, const GLvoid* * arg_2) { ENTER_GL(); func_glVertexPointervINTEL(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glVertexWeightPointerEXT(GLsizei arg_0, GLenum arg_1, GLsizei arg_2, const GLvoid * arg_3) { ENTER_GL(); func_glVertexWeightPointerEXT(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glVertexWeightfEXT(GLfloat arg_0) { ENTER_GL(); func_glVertexWeightfEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glVertexWeightfvEXT(const GLfloat * arg_0) { ENTER_GL(); func_glVertexWeightfvEXT(arg_0); LEAVE_GL(); } void WINAPI wine_glWindowPos2dMESA(GLdouble arg_0, GLdouble arg_1) { ENTER_GL(); func_glWindowPos2dMESA(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glWindowPos2dvMESA(const GLdouble * arg_0) { ENTER_GL(); func_glWindowPos2dvMESA(arg_0); LEAVE_GL(); } void WINAPI wine_glWindowPos2fMESA(GLfloat arg_0, GLfloat arg_1) { ENTER_GL(); func_glWindowPos2fMESA(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glWindowPos2fvMESA(const GLfloat * arg_0) { ENTER_GL(); func_glWindowPos2fvMESA(arg_0); LEAVE_GL(); } void WINAPI wine_glWindowPos2iMESA(GLint arg_0, GLint arg_1) { ENTER_GL(); func_glWindowPos2iMESA(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glWindowPos2ivMESA(const GLint * arg_0) { ENTER_GL(); func_glWindowPos2ivMESA(arg_0); LEAVE_GL(); } void WINAPI wine_glWindowPos2sMESA(GLshort arg_0, GLshort arg_1) { ENTER_GL(); func_glWindowPos2sMESA(arg_0, arg_1); LEAVE_GL(); } void WINAPI wine_glWindowPos2svMESA(const GLshort * arg_0) { ENTER_GL(); func_glWindowPos2svMESA(arg_0); LEAVE_GL(); } void WINAPI wine_glWindowPos3dMESA(GLdouble arg_0, GLdouble arg_1, GLdouble arg_2) { ENTER_GL(); func_glWindowPos3dMESA(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glWindowPos3dvMESA(const GLdouble * arg_0) { ENTER_GL(); func_glWindowPos3dvMESA(arg_0); LEAVE_GL(); } void WINAPI wine_glWindowPos3fMESA(GLfloat arg_0, GLfloat arg_1, GLfloat arg_2) { ENTER_GL(); func_glWindowPos3fMESA(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glWindowPos3fvMESA(const GLfloat * arg_0) { ENTER_GL(); func_glWindowPos3fvMESA(arg_0); LEAVE_GL(); } void WINAPI wine_glWindowPos3iMESA(GLint arg_0, GLint arg_1, GLint arg_2) { ENTER_GL(); func_glWindowPos3iMESA(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glWindowPos3ivMESA(const GLint * arg_0) { ENTER_GL(); func_glWindowPos3ivMESA(arg_0); LEAVE_GL(); } void WINAPI wine_glWindowPos3sMESA(GLshort arg_0, GLshort arg_1, GLshort arg_2) { ENTER_GL(); func_glWindowPos3sMESA(arg_0, arg_1, arg_2); LEAVE_GL(); } void WINAPI wine_glWindowPos3svMESA(const GLshort * arg_0) { ENTER_GL(); func_glWindowPos3svMESA(arg_0); LEAVE_GL(); } void WINAPI wine_glWindowPos4dMESA(GLdouble arg_0, GLdouble arg_1, GLdouble arg_2, GLdouble arg_3) { ENTER_GL(); func_glWindowPos4dMESA(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glWindowPos4dvMESA(const GLdouble * arg_0) { ENTER_GL(); func_glWindowPos4dvMESA(arg_0); LEAVE_GL(); } void WINAPI wine_glWindowPos4fMESA(GLfloat arg_0, GLfloat arg_1, GLfloat arg_2, GLfloat arg_3) { ENTER_GL(); func_glWindowPos4fMESA(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glWindowPos4fvMESA(const GLfloat * arg_0) { ENTER_GL(); func_glWindowPos4fvMESA(arg_0); LEAVE_GL(); } void WINAPI wine_glWindowPos4iMESA(GLint arg_0, GLint arg_1, GLint arg_2, GLint arg_3) { ENTER_GL(); func_glWindowPos4iMESA(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glWindowPos4ivMESA(const GLint * arg_0) { ENTER_GL(); func_glWindowPos4ivMESA(arg_0); LEAVE_GL(); } void WINAPI wine_glWindowPos4sMESA(GLshort arg_0, GLshort arg_1, GLshort arg_2, GLshort arg_3) { ENTER_GL(); func_glWindowPos4sMESA(arg_0, arg_1, arg_2, arg_3); LEAVE_GL(); } void WINAPI wine_glWindowPos4svMESA(const GLshort * arg_0) { ENTER_GL(); func_glWindowPos4svMESA(arg_0); LEAVE_GL(); } wine-20000526/dlls/opengl32/opengl_ext.h0100644000175000001440000000077407107063407017362 0ustar julliardusers/* Typedefs for extensions loading Copyright (c) 2000 Lionel Ulmer */ #ifndef __DLLS_OPENGL32_OPENGL_EXT_H #define __DLLS_OPENGL32_OPENGL_EXT_H typedef struct { char *name; /* name of the extension */ void *func; /* pointer to the Wine function for this extension */ void **func_ptr; /* where to store the value of glXGetProcAddressARB */ } OpenGL_extension; extern OpenGL_extension extension_registry[]; extern int extension_registry_size; #endif /* __DLLS_OPENGL32_OPENGL_EXT_H */ wine-20000526/dlls/opengl32/opengl_norm.c0100644000175000001440000026742307110632131017524 0ustar julliardusers /* Auto-generated file... Do not edit ! */ #include "config.h" #include "wine_gl.h" /*********************************************************************** * glClearIndex */ void WINAPI wine_glClearIndex(GLfloat c ) { ENTER_GL(); glClearIndex(c); LEAVE_GL(); } /*********************************************************************** * glClearColor */ void WINAPI wine_glClearColor(GLclampf red, GLclampf green, GLclampf blue, GLclampf alpha ) { ENTER_GL(); glClearColor(red, green, blue, alpha); LEAVE_GL(); } /*********************************************************************** * glClear */ void WINAPI wine_glClear(GLbitfield mask ) { ENTER_GL(); glClear(mask); LEAVE_GL(); } /*********************************************************************** * glIndexMask */ void WINAPI wine_glIndexMask(GLuint mask ) { ENTER_GL(); glIndexMask(mask); LEAVE_GL(); } /*********************************************************************** * glColorMask */ void WINAPI wine_glColorMask(GLboolean red, GLboolean green, GLboolean blue, GLboolean alpha ) { ENTER_GL(); glColorMask(red, green, blue, alpha); LEAVE_GL(); } /*********************************************************************** * glAlphaFunc */ void WINAPI wine_glAlphaFunc(GLenum func, GLclampf ref ) { ENTER_GL(); glAlphaFunc(func, ref); LEAVE_GL(); } /*********************************************************************** * glBlendFunc */ void WINAPI wine_glBlendFunc(GLenum sfactor, GLenum dfactor ) { ENTER_GL(); glBlendFunc(sfactor, dfactor); LEAVE_GL(); } /*********************************************************************** * glLogicOp */ void WINAPI wine_glLogicOp(GLenum opcode ) { ENTER_GL(); glLogicOp(opcode); LEAVE_GL(); } /*********************************************************************** * glCullFace */ void WINAPI wine_glCullFace(GLenum mode ) { ENTER_GL(); glCullFace(mode); LEAVE_GL(); } /*********************************************************************** * glFrontFace */ void WINAPI wine_glFrontFace(GLenum mode ) { ENTER_GL(); glFrontFace(mode); LEAVE_GL(); } /*********************************************************************** * glPointSize */ void WINAPI wine_glPointSize(GLfloat size ) { ENTER_GL(); glPointSize(size); LEAVE_GL(); } /*********************************************************************** * glLineWidth */ void WINAPI wine_glLineWidth(GLfloat width ) { ENTER_GL(); glLineWidth(width); LEAVE_GL(); } /*********************************************************************** * glLineStipple */ void WINAPI wine_glLineStipple(GLint factor, GLushort pattern ) { ENTER_GL(); glLineStipple(factor, pattern); LEAVE_GL(); } /*********************************************************************** * glPolygonMode */ void WINAPI wine_glPolygonMode(GLenum face, GLenum mode ) { ENTER_GL(); glPolygonMode(face, mode); LEAVE_GL(); } /*********************************************************************** * glPolygonOffset */ void WINAPI wine_glPolygonOffset(GLfloat factor, GLfloat units ) { ENTER_GL(); glPolygonOffset(factor, units); LEAVE_GL(); } /*********************************************************************** * glPolygonStipple */ void WINAPI wine_glPolygonStipple(const GLubyte *mask ) { ENTER_GL(); glPolygonStipple(mask); LEAVE_GL(); } /*********************************************************************** * glGetPolygonStipple */ void WINAPI wine_glGetPolygonStipple(GLubyte *mask ) { ENTER_GL(); glGetPolygonStipple(mask); LEAVE_GL(); } /*********************************************************************** * glEdgeFlag */ void WINAPI wine_glEdgeFlag(GLboolean flag ) { ENTER_GL(); glEdgeFlag(flag); LEAVE_GL(); } /*********************************************************************** * glEdgeFlagv */ void WINAPI wine_glEdgeFlagv(const GLboolean *flag ) { ENTER_GL(); glEdgeFlagv(flag); LEAVE_GL(); } /*********************************************************************** * glScissor */ void WINAPI wine_glScissor(GLint x, GLint y, GLsizei width, GLsizei height) { ENTER_GL(); glScissor(x, y, width, height); LEAVE_GL(); } /*********************************************************************** * glClipPlane */ void WINAPI wine_glClipPlane(GLenum plane, const GLdouble *equation ) { ENTER_GL(); glClipPlane(plane, equation); LEAVE_GL(); } /*********************************************************************** * glGetClipPlane */ void WINAPI wine_glGetClipPlane(GLenum plane, GLdouble *equation ) { ENTER_GL(); glGetClipPlane(plane, equation); LEAVE_GL(); } /*********************************************************************** * glDrawBuffer */ void WINAPI wine_glDrawBuffer(GLenum mode ) { ENTER_GL(); glDrawBuffer(mode); LEAVE_GL(); } /*********************************************************************** * glReadBuffer */ void WINAPI wine_glReadBuffer(GLenum mode ) { ENTER_GL(); glReadBuffer(mode); LEAVE_GL(); } /*********************************************************************** * glEnable */ void WINAPI wine_glEnable(GLenum cap ) { ENTER_GL(); glEnable(cap); LEAVE_GL(); } /*********************************************************************** * glDisable */ void WINAPI wine_glDisable(GLenum cap ) { ENTER_GL(); glDisable(cap); LEAVE_GL(); } /*********************************************************************** * glIsEnabled */ GLboolean WINAPI wine_glIsEnabled(GLenum cap ) { GLboolean ret; ENTER_GL(); ret = glIsEnabled(cap); LEAVE_GL(); return ret; } /*********************************************************************** * glEnableClientState */ void WINAPI wine_glEnableClientState(GLenum cap ) { ENTER_GL(); glEnableClientState(cap); LEAVE_GL(); } /*********************************************************************** * glDisableClientState */ void WINAPI wine_glDisableClientState(GLenum cap ) { ENTER_GL(); glDisableClientState(cap); LEAVE_GL(); } /*********************************************************************** * glGetBooleanv */ void WINAPI wine_glGetBooleanv(GLenum pname, GLboolean *params ) { ENTER_GL(); glGetBooleanv(pname, params); LEAVE_GL(); } /*********************************************************************** * glGetDoublev */ void WINAPI wine_glGetDoublev(GLenum pname, GLdouble *params ) { ENTER_GL(); glGetDoublev(pname, params); LEAVE_GL(); } /*********************************************************************** * glGetFloatv */ void WINAPI wine_glGetFloatv(GLenum pname, GLfloat *params ) { ENTER_GL(); glGetFloatv(pname, params); LEAVE_GL(); } /*********************************************************************** * glGetIntegerv */ void WINAPI wine_glGetIntegerv(GLenum pname, GLint *params ) { ENTER_GL(); glGetIntegerv(pname, params); LEAVE_GL(); } /*********************************************************************** * glPushAttrib */ void WINAPI wine_glPushAttrib(GLbitfield mask ) { ENTER_GL(); glPushAttrib(mask); LEAVE_GL(); } /*********************************************************************** * glPopAttrib */ void WINAPI wine_glPopAttrib(void ) { ENTER_GL(); glPopAttrib(); LEAVE_GL(); } /*********************************************************************** * glPushClientAttrib */ void WINAPI wine_glPushClientAttrib(GLbitfield mask ) { ENTER_GL(); glPushClientAttrib(mask); LEAVE_GL(); } /*********************************************************************** * glPopClientAttrib */ void WINAPI wine_glPopClientAttrib(void ) { ENTER_GL(); glPopClientAttrib(); LEAVE_GL(); } /*********************************************************************** * glRenderMode */ GLint WINAPI wine_glRenderMode(GLenum mode ) { GLint ret; ENTER_GL(); ret = glRenderMode(mode); LEAVE_GL(); return ret; } /*********************************************************************** * glGetError */ GLenum WINAPI wine_glGetError(void ) { GLenum ret; ENTER_GL(); ret = glGetError(); LEAVE_GL(); return ret; } /*********************************************************************** * glGetString */ const GLubyte* WINAPI wine_glGetString(GLenum name ) { const GLubyte* ret; ENTER_GL(); ret = glGetString(name); LEAVE_GL(); return ret; } /*********************************************************************** * glFinish */ void WINAPI wine_glFinish(void ) { ENTER_GL(); glFinish(); LEAVE_GL(); } /*********************************************************************** * glFlush */ void WINAPI wine_glFlush(void ) { ENTER_GL(); glFlush(); LEAVE_GL(); } /*********************************************************************** * glHint */ void WINAPI wine_glHint(GLenum target, GLenum mode ) { ENTER_GL(); glHint(target, mode); LEAVE_GL(); } /*********************************************************************** * glClearDepth */ void WINAPI wine_glClearDepth(GLclampd depth ) { ENTER_GL(); glClearDepth(depth); LEAVE_GL(); } /*********************************************************************** * glDepthFunc */ void WINAPI wine_glDepthFunc(GLenum func ) { ENTER_GL(); glDepthFunc(func); LEAVE_GL(); } /*********************************************************************** * glDepthMask */ void WINAPI wine_glDepthMask(GLboolean flag ) { ENTER_GL(); glDepthMask(flag); LEAVE_GL(); } /*********************************************************************** * glDepthRange */ void WINAPI wine_glDepthRange(GLclampd near_val, GLclampd far_val ) { ENTER_GL(); glDepthRange(near_val, far_val); LEAVE_GL(); } /*********************************************************************** * glClearAccum */ void WINAPI wine_glClearAccum(GLfloat red, GLfloat green, GLfloat blue, GLfloat alpha ) { ENTER_GL(); glClearAccum(red, green, blue, alpha); LEAVE_GL(); } /*********************************************************************** * glAccum */ void WINAPI wine_glAccum(GLenum op, GLfloat value ) { ENTER_GL(); glAccum(op, value); LEAVE_GL(); } /*********************************************************************** * glMatrixMode */ void WINAPI wine_glMatrixMode(GLenum mode ) { ENTER_GL(); glMatrixMode(mode); LEAVE_GL(); } /*********************************************************************** * glOrtho */ void WINAPI wine_glOrtho(GLdouble left, GLdouble right, GLdouble bottom, GLdouble top, GLdouble near_val, GLdouble far_val ) { ENTER_GL(); glOrtho(left, right, bottom, top, near_val, far_val); LEAVE_GL(); } /*********************************************************************** * glFrustum */ void WINAPI wine_glFrustum(GLdouble left, GLdouble right, GLdouble bottom, GLdouble top, GLdouble near_val, GLdouble far_val ) { ENTER_GL(); glFrustum(left, right, bottom, top, near_val, far_val); LEAVE_GL(); } /*********************************************************************** * glViewport */ void WINAPI wine_glViewport(GLint x, GLint y, GLsizei width, GLsizei height ) { ENTER_GL(); glViewport(x, y, width, height); LEAVE_GL(); } /*********************************************************************** * glPushMatrix */ void WINAPI wine_glPushMatrix(void ) { ENTER_GL(); glPushMatrix(); LEAVE_GL(); } /*********************************************************************** * glPopMatrix */ void WINAPI wine_glPopMatrix(void ) { ENTER_GL(); glPopMatrix(); LEAVE_GL(); } /*********************************************************************** * glLoadIdentity */ void WINAPI wine_glLoadIdentity(void ) { ENTER_GL(); glLoadIdentity(); LEAVE_GL(); } /*********************************************************************** * glLoadMatrixd */ void WINAPI wine_glLoadMatrixd(const GLdouble *m ) { ENTER_GL(); glLoadMatrixd(m); LEAVE_GL(); } /*********************************************************************** * glLoadMatrixf */ void WINAPI wine_glLoadMatrixf(const GLfloat *m ) { ENTER_GL(); glLoadMatrixf(m); LEAVE_GL(); } /*********************************************************************** * glMultMatrixd */ void WINAPI wine_glMultMatrixd(const GLdouble *m ) { ENTER_GL(); glMultMatrixd(m); LEAVE_GL(); } /*********************************************************************** * glMultMatrixf */ void WINAPI wine_glMultMatrixf(const GLfloat *m ) { ENTER_GL(); glMultMatrixf(m); LEAVE_GL(); } /*********************************************************************** * glRotated */ void WINAPI wine_glRotated(GLdouble angle, GLdouble x, GLdouble y, GLdouble z ) { ENTER_GL(); glRotated(angle, x, y, z); LEAVE_GL(); } /*********************************************************************** * glRotatef */ void WINAPI wine_glRotatef(GLfloat angle, GLfloat x, GLfloat y, GLfloat z ) { ENTER_GL(); glRotatef(angle, x, y, z); LEAVE_GL(); } /*********************************************************************** * glScaled */ void WINAPI wine_glScaled(GLdouble x, GLdouble y, GLdouble z ) { ENTER_GL(); glScaled(x, y, z); LEAVE_GL(); } /*********************************************************************** * glScalef */ void WINAPI wine_glScalef(GLfloat x, GLfloat y, GLfloat z ) { ENTER_GL(); glScalef(x, y, z); LEAVE_GL(); } /*********************************************************************** * glTranslated */ void WINAPI wine_glTranslated(GLdouble x, GLdouble y, GLdouble z ) { ENTER_GL(); glTranslated(x, y, z); LEAVE_GL(); } /*********************************************************************** * glTranslatef */ void WINAPI wine_glTranslatef(GLfloat x, GLfloat y, GLfloat z ) { ENTER_GL(); glTranslatef(x, y, z); LEAVE_GL(); } /*********************************************************************** * glIsList */ GLboolean WINAPI wine_glIsList(GLuint list ) { GLboolean ret; ENTER_GL(); ret = glIsList(list); LEAVE_GL(); return ret; } /*********************************************************************** * glDeleteLists */ void WINAPI wine_glDeleteLists(GLuint list, GLsizei range ) { ENTER_GL(); glDeleteLists(list, range); LEAVE_GL(); } /*********************************************************************** * glGenLists */ GLuint WINAPI wine_glGenLists(GLsizei range ) { GLuint ret; ENTER_GL(); ret = glGenLists(range); LEAVE_GL(); return ret; } /*********************************************************************** * glNewList */ void WINAPI wine_glNewList(GLuint list, GLenum mode ) { ENTER_GL(); glNewList(list, mode); LEAVE_GL(); } /*********************************************************************** * glEndList */ void WINAPI wine_glEndList(void ) { ENTER_GL(); glEndList(); LEAVE_GL(); } /*********************************************************************** * glCallList */ void WINAPI wine_glCallList(GLuint list ) { ENTER_GL(); glCallList(list); LEAVE_GL(); } /*********************************************************************** * glCallLists */ void WINAPI wine_glCallLists(GLsizei n, GLenum type, const GLvoid *lists ) { ENTER_GL(); glCallLists(n, type, lists); LEAVE_GL(); } /*********************************************************************** * glListBase */ void WINAPI wine_glListBase(GLuint base ) { ENTER_GL(); glListBase(base); LEAVE_GL(); } /*********************************************************************** * glBegin */ void WINAPI wine_glBegin(GLenum mode ) { ENTER_GL(); glBegin(mode); LEAVE_GL(); } /*********************************************************************** * glEnd */ void WINAPI wine_glEnd(void ) { ENTER_GL(); glEnd(); LEAVE_GL(); } /*********************************************************************** * glVertex2d */ void WINAPI wine_glVertex2d(GLdouble x, GLdouble y ) { ENTER_GL(); glVertex2d(x, y); LEAVE_GL(); } /*********************************************************************** * glVertex2f */ void WINAPI wine_glVertex2f(GLfloat x, GLfloat y ) { ENTER_GL(); glVertex2f(x, y); LEAVE_GL(); } /*********************************************************************** * glVertex2i */ void WINAPI wine_glVertex2i(GLint x, GLint y ) { ENTER_GL(); glVertex2i(x, y); LEAVE_GL(); } /*********************************************************************** * glVertex2s */ void WINAPI wine_glVertex2s(GLshort x, GLshort y ) { ENTER_GL(); glVertex2s(x, y); LEAVE_GL(); } /*********************************************************************** * glVertex3d */ void WINAPI wine_glVertex3d(GLdouble x, GLdouble y, GLdouble z ) { ENTER_GL(); glVertex3d(x, y, z); LEAVE_GL(); } /*********************************************************************** * glVertex3f */ void WINAPI wine_glVertex3f(GLfloat x, GLfloat y, GLfloat z ) { ENTER_GL(); glVertex3f(x, y, z); LEAVE_GL(); } /*********************************************************************** * glVertex3i */ void WINAPI wine_glVertex3i(GLint x, GLint y, GLint z ) { ENTER_GL(); glVertex3i(x, y, z); LEAVE_GL(); } /*********************************************************************** * glVertex3s */ void WINAPI wine_glVertex3s(GLshort x, GLshort y, GLshort z ) { ENTER_GL(); glVertex3s(x, y, z); LEAVE_GL(); } /*********************************************************************** * glVertex4d */ void WINAPI wine_glVertex4d(GLdouble x, GLdouble y, GLdouble z, GLdouble w ) { ENTER_GL(); glVertex4d(x, y, z, w); LEAVE_GL(); } /*********************************************************************** * glVertex4f */ void WINAPI wine_glVertex4f(GLfloat x, GLfloat y, GLfloat z, GLfloat w ) { ENTER_GL(); glVertex4f(x, y, z, w); LEAVE_GL(); } /*********************************************************************** * glVertex4i */ void WINAPI wine_glVertex4i(GLint x, GLint y, GLint z, GLint w ) { ENTER_GL(); glVertex4i(x, y, z, w); LEAVE_GL(); } /*********************************************************************** * glVertex4s */ void WINAPI wine_glVertex4s(GLshort x, GLshort y, GLshort z, GLshort w ) { ENTER_GL(); glVertex4s(x, y, z, w); LEAVE_GL(); } /*********************************************************************** * glVertex2dv */ void WINAPI wine_glVertex2dv(const GLdouble *v ) { ENTER_GL(); glVertex2dv(v); LEAVE_GL(); } /*********************************************************************** * glVertex2fv */ void WINAPI wine_glVertex2fv(const GLfloat *v ) { ENTER_GL(); glVertex2fv(v); LEAVE_GL(); } /*********************************************************************** * glVertex2iv */ void WINAPI wine_glVertex2iv(const GLint *v ) { ENTER_GL(); glVertex2iv(v); LEAVE_GL(); } /*********************************************************************** * glVertex2sv */ void WINAPI wine_glVertex2sv(const GLshort *v ) { ENTER_GL(); glVertex2sv(v); LEAVE_GL(); } /*********************************************************************** * glVertex3dv */ void WINAPI wine_glVertex3dv(const GLdouble *v ) { ENTER_GL(); glVertex3dv(v); LEAVE_GL(); } /*********************************************************************** * glVertex3fv */ void WINAPI wine_glVertex3fv(const GLfloat *v ) { ENTER_GL(); glVertex3fv(v); LEAVE_GL(); } /*********************************************************************** * glVertex3iv */ void WINAPI wine_glVertex3iv(const GLint *v ) { ENTER_GL(); glVertex3iv(v); LEAVE_GL(); } /*********************************************************************** * glVertex3sv */ void WINAPI wine_glVertex3sv(const GLshort *v ) { ENTER_GL(); glVertex3sv(v); LEAVE_GL(); } /*********************************************************************** * glVertex4dv */ void WINAPI wine_glVertex4dv(const GLdouble *v ) { ENTER_GL(); glVertex4dv(v); LEAVE_GL(); } /*********************************************************************** * glVertex4fv */ void WINAPI wine_glVertex4fv(const GLfloat *v ) { ENTER_GL(); glVertex4fv(v); LEAVE_GL(); } /*********************************************************************** * glVertex4iv */ void WINAPI wine_glVertex4iv(const GLint *v ) { ENTER_GL(); glVertex4iv(v); LEAVE_GL(); } /*********************************************************************** * glVertex4sv */ void WINAPI wine_glVertex4sv(const GLshort *v ) { ENTER_GL(); glVertex4sv(v); LEAVE_GL(); } /*********************************************************************** * glNormal3b */ void WINAPI wine_glNormal3b(GLbyte nx, GLbyte ny, GLbyte nz ) { ENTER_GL(); glNormal3b(nx, ny, nz); LEAVE_GL(); } /*********************************************************************** * glNormal3d */ void WINAPI wine_glNormal3d(GLdouble nx, GLdouble ny, GLdouble nz ) { ENTER_GL(); glNormal3d(nx, ny, nz); LEAVE_GL(); } /*********************************************************************** * glNormal3f */ void WINAPI wine_glNormal3f(GLfloat nx, GLfloat ny, GLfloat nz ) { ENTER_GL(); glNormal3f(nx, ny, nz); LEAVE_GL(); } /*********************************************************************** * glNormal3i */ void WINAPI wine_glNormal3i(GLint nx, GLint ny, GLint nz ) { ENTER_GL(); glNormal3i(nx, ny, nz); LEAVE_GL(); } /*********************************************************************** * glNormal3s */ void WINAPI wine_glNormal3s(GLshort nx, GLshort ny, GLshort nz ) { ENTER_GL(); glNormal3s(nx, ny, nz); LEAVE_GL(); } /*********************************************************************** * glNormal3bv */ void WINAPI wine_glNormal3bv(const GLbyte *v ) { ENTER_GL(); glNormal3bv(v); LEAVE_GL(); } /*********************************************************************** * glNormal3dv */ void WINAPI wine_glNormal3dv(const GLdouble *v ) { ENTER_GL(); glNormal3dv(v); LEAVE_GL(); } /*********************************************************************** * glNormal3fv */ void WINAPI wine_glNormal3fv(const GLfloat *v ) { ENTER_GL(); glNormal3fv(v); LEAVE_GL(); } /*********************************************************************** * glNormal3iv */ void WINAPI wine_glNormal3iv(const GLint *v ) { ENTER_GL(); glNormal3iv(v); LEAVE_GL(); } /*********************************************************************** * glNormal3sv */ void WINAPI wine_glNormal3sv(const GLshort *v ) { ENTER_GL(); glNormal3sv(v); LEAVE_GL(); } /*********************************************************************** * glIndexd */ void WINAPI wine_glIndexd(GLdouble c ) { ENTER_GL(); glIndexd(c); LEAVE_GL(); } /*********************************************************************** * glIndexf */ void WINAPI wine_glIndexf(GLfloat c ) { ENTER_GL(); glIndexf(c); LEAVE_GL(); } /*********************************************************************** * glIndexi */ void WINAPI wine_glIndexi(GLint c ) { ENTER_GL(); glIndexi(c); LEAVE_GL(); } /*********************************************************************** * glIndexs */ void WINAPI wine_glIndexs(GLshort c ) { ENTER_GL(); glIndexs(c); LEAVE_GL(); } /*********************************************************************** * glIndexub */ void WINAPI wine_glIndexub(GLubyte c ) { ENTER_GL(); glIndexub(c); LEAVE_GL(); } /*********************************************************************** * glIndexdv */ void WINAPI wine_glIndexdv(const GLdouble *c ) { ENTER_GL(); glIndexdv(c); LEAVE_GL(); } /*********************************************************************** * glIndexfv */ void WINAPI wine_glIndexfv(const GLfloat *c ) { ENTER_GL(); glIndexfv(c); LEAVE_GL(); } /*********************************************************************** * glIndexiv */ void WINAPI wine_glIndexiv(const GLint *c ) { ENTER_GL(); glIndexiv(c); LEAVE_GL(); } /*********************************************************************** * glIndexsv */ void WINAPI wine_glIndexsv(const GLshort *c ) { ENTER_GL(); glIndexsv(c); LEAVE_GL(); } /*********************************************************************** * glIndexubv */ void WINAPI wine_glIndexubv(const GLubyte *c ) { ENTER_GL(); glIndexubv(c); LEAVE_GL(); } /*********************************************************************** * glColor3b */ void WINAPI wine_glColor3b(GLbyte red, GLbyte green, GLbyte blue ) { ENTER_GL(); glColor3b(red, green, blue); LEAVE_GL(); } /*********************************************************************** * glColor3d */ void WINAPI wine_glColor3d(GLdouble red, GLdouble green, GLdouble blue ) { ENTER_GL(); glColor3d(red, green, blue); LEAVE_GL(); } /*********************************************************************** * glColor3f */ void WINAPI wine_glColor3f(GLfloat red, GLfloat green, GLfloat blue ) { ENTER_GL(); glColor3f(red, green, blue); LEAVE_GL(); } /*********************************************************************** * glColor3i */ void WINAPI wine_glColor3i(GLint red, GLint green, GLint blue ) { ENTER_GL(); glColor3i(red, green, blue); LEAVE_GL(); } /*********************************************************************** * glColor3s */ void WINAPI wine_glColor3s(GLshort red, GLshort green, GLshort blue ) { ENTER_GL(); glColor3s(red, green, blue); LEAVE_GL(); } /*********************************************************************** * glColor3ub */ void WINAPI wine_glColor3ub(GLubyte red, GLubyte green, GLubyte blue ) { ENTER_GL(); glColor3ub(red, green, blue); LEAVE_GL(); } /*********************************************************************** * glColor3ui */ void WINAPI wine_glColor3ui(GLuint red, GLuint green, GLuint blue ) { ENTER_GL(); glColor3ui(red, green, blue); LEAVE_GL(); } /*********************************************************************** * glColor3us */ void WINAPI wine_glColor3us(GLushort red, GLushort green, GLushort blue ) { ENTER_GL(); glColor3us(red, green, blue); LEAVE_GL(); } /*********************************************************************** * glColor4b */ void WINAPI wine_glColor4b(GLbyte red, GLbyte green, GLbyte blue, GLbyte alpha ) { ENTER_GL(); glColor4b(red, green, blue, alpha); LEAVE_GL(); } /*********************************************************************** * glColor4d */ void WINAPI wine_glColor4d(GLdouble red, GLdouble green, GLdouble blue, GLdouble alpha ) { ENTER_GL(); glColor4d(red, green, blue, alpha); LEAVE_GL(); } /*********************************************************************** * glColor4f */ void WINAPI wine_glColor4f(GLfloat red, GLfloat green, GLfloat blue, GLfloat alpha ) { ENTER_GL(); glColor4f(red, green, blue, alpha); LEAVE_GL(); } /*********************************************************************** * glColor4i */ void WINAPI wine_glColor4i(GLint red, GLint green, GLint blue, GLint alpha ) { ENTER_GL(); glColor4i(red, green, blue, alpha); LEAVE_GL(); } /*********************************************************************** * glColor4s */ void WINAPI wine_glColor4s(GLshort red, GLshort green, GLshort blue, GLshort alpha ) { ENTER_GL(); glColor4s(red, green, blue, alpha); LEAVE_GL(); } /*********************************************************************** * glColor4ub */ void WINAPI wine_glColor4ub(GLubyte red, GLubyte green, GLubyte blue, GLubyte alpha ) { ENTER_GL(); glColor4ub(red, green, blue, alpha); LEAVE_GL(); } /*********************************************************************** * glColor4ui */ void WINAPI wine_glColor4ui(GLuint red, GLuint green, GLuint blue, GLuint alpha ) { ENTER_GL(); glColor4ui(red, green, blue, alpha); LEAVE_GL(); } /*********************************************************************** * glColor4us */ void WINAPI wine_glColor4us(GLushort red, GLushort green, GLushort blue, GLushort alpha ) { ENTER_GL(); glColor4us(red, green, blue, alpha); LEAVE_GL(); } /*********************************************************************** * glColor3bv */ void WINAPI wine_glColor3bv(const GLbyte *v ) { ENTER_GL(); glColor3bv(v); LEAVE_GL(); } /*********************************************************************** * glColor3dv */ void WINAPI wine_glColor3dv(const GLdouble *v ) { ENTER_GL(); glColor3dv(v); LEAVE_GL(); } /*********************************************************************** * glColor3fv */ void WINAPI wine_glColor3fv(const GLfloat *v ) { ENTER_GL(); glColor3fv(v); LEAVE_GL(); } /*********************************************************************** * glColor3iv */ void WINAPI wine_glColor3iv(const GLint *v ) { ENTER_GL(); glColor3iv(v); LEAVE_GL(); } /*********************************************************************** * glColor3sv */ void WINAPI wine_glColor3sv(const GLshort *v ) { ENTER_GL(); glColor3sv(v); LEAVE_GL(); } /*********************************************************************** * glColor3ubv */ void WINAPI wine_glColor3ubv(const GLubyte *v ) { ENTER_GL(); glColor3ubv(v); LEAVE_GL(); } /*********************************************************************** * glColor3uiv */ void WINAPI wine_glColor3uiv(const GLuint *v ) { ENTER_GL(); glColor3uiv(v); LEAVE_GL(); } /*********************************************************************** * glColor3usv */ void WINAPI wine_glColor3usv(const GLushort *v ) { ENTER_GL(); glColor3usv(v); LEAVE_GL(); } /*********************************************************************** * glColor4bv */ void WINAPI wine_glColor4bv(const GLbyte *v ) { ENTER_GL(); glColor4bv(v); LEAVE_GL(); } /*********************************************************************** * glColor4dv */ void WINAPI wine_glColor4dv(const GLdouble *v ) { ENTER_GL(); glColor4dv(v); LEAVE_GL(); } /*********************************************************************** * glColor4fv */ void WINAPI wine_glColor4fv(const GLfloat *v ) { ENTER_GL(); glColor4fv(v); LEAVE_GL(); } /*********************************************************************** * glColor4iv */ void WINAPI wine_glColor4iv(const GLint *v ) { ENTER_GL(); glColor4iv(v); LEAVE_GL(); } /*********************************************************************** * glColor4sv */ void WINAPI wine_glColor4sv(const GLshort *v ) { ENTER_GL(); glColor4sv(v); LEAVE_GL(); } /*********************************************************************** * glColor4ubv */ void WINAPI wine_glColor4ubv(const GLubyte *v ) { ENTER_GL(); glColor4ubv(v); LEAVE_GL(); } /*********************************************************************** * glColor4uiv */ void WINAPI wine_glColor4uiv(const GLuint *v ) { ENTER_GL(); glColor4uiv(v); LEAVE_GL(); } /*********************************************************************** * glColor4usv */ void WINAPI wine_glColor4usv(const GLushort *v ) { ENTER_GL(); glColor4usv(v); LEAVE_GL(); } /*********************************************************************** * glTexCoord1d */ void WINAPI wine_glTexCoord1d(GLdouble s ) { ENTER_GL(); glTexCoord1d(s); LEAVE_GL(); } /*********************************************************************** * glTexCoord1f */ void WINAPI wine_glTexCoord1f(GLfloat s ) { ENTER_GL(); glTexCoord1f(s); LEAVE_GL(); } /*********************************************************************** * glTexCoord1i */ void WINAPI wine_glTexCoord1i(GLint s ) { ENTER_GL(); glTexCoord1i(s); LEAVE_GL(); } /*********************************************************************** * glTexCoord1s */ void WINAPI wine_glTexCoord1s(GLshort s ) { ENTER_GL(); glTexCoord1s(s); LEAVE_GL(); } /*********************************************************************** * glTexCoord2d */ void WINAPI wine_glTexCoord2d(GLdouble s, GLdouble t ) { ENTER_GL(); glTexCoord2d(s, t); LEAVE_GL(); } /*********************************************************************** * glTexCoord2f */ void WINAPI wine_glTexCoord2f(GLfloat s, GLfloat t ) { ENTER_GL(); glTexCoord2f(s, t); LEAVE_GL(); } /*********************************************************************** * glTexCoord2i */ void WINAPI wine_glTexCoord2i(GLint s, GLint t ) { ENTER_GL(); glTexCoord2i(s, t); LEAVE_GL(); } /*********************************************************************** * glTexCoord2s */ void WINAPI wine_glTexCoord2s(GLshort s, GLshort t ) { ENTER_GL(); glTexCoord2s(s, t); LEAVE_GL(); } /*********************************************************************** * glTexCoord3d */ void WINAPI wine_glTexCoord3d(GLdouble s, GLdouble t, GLdouble r ) { ENTER_GL(); glTexCoord3d(s, t, r); LEAVE_GL(); } /*********************************************************************** * glTexCoord3f */ void WINAPI wine_glTexCoord3f(GLfloat s, GLfloat t, GLfloat r ) { ENTER_GL(); glTexCoord3f(s, t, r); LEAVE_GL(); } /*********************************************************************** * glTexCoord3i */ void WINAPI wine_glTexCoord3i(GLint s, GLint t, GLint r ) { ENTER_GL(); glTexCoord3i(s, t, r); LEAVE_GL(); } /*********************************************************************** * glTexCoord3s */ void WINAPI wine_glTexCoord3s(GLshort s, GLshort t, GLshort r ) { ENTER_GL(); glTexCoord3s(s, t, r); LEAVE_GL(); } /*********************************************************************** * glTexCoord4d */ void WINAPI wine_glTexCoord4d(GLdouble s, GLdouble t, GLdouble r, GLdouble q ) { ENTER_GL(); glTexCoord4d(s, t, r, q); LEAVE_GL(); } /*********************************************************************** * glTexCoord4f */ void WINAPI wine_glTexCoord4f(GLfloat s, GLfloat t, GLfloat r, GLfloat q ) { ENTER_GL(); glTexCoord4f(s, t, r, q); LEAVE_GL(); } /*********************************************************************** * glTexCoord4i */ void WINAPI wine_glTexCoord4i(GLint s, GLint t, GLint r, GLint q ) { ENTER_GL(); glTexCoord4i(s, t, r, q); LEAVE_GL(); } /*********************************************************************** * glTexCoord4s */ void WINAPI wine_glTexCoord4s(GLshort s, GLshort t, GLshort r, GLshort q ) { ENTER_GL(); glTexCoord4s(s, t, r, q); LEAVE_GL(); } /*********************************************************************** * glTexCoord1dv */ void WINAPI wine_glTexCoord1dv(const GLdouble *v ) { ENTER_GL(); glTexCoord1dv(v); LEAVE_GL(); } /*********************************************************************** * glTexCoord1fv */ void WINAPI wine_glTexCoord1fv(const GLfloat *v ) { ENTER_GL(); glTexCoord1fv(v); LEAVE_GL(); } /*********************************************************************** * glTexCoord1iv */ void WINAPI wine_glTexCoord1iv(const GLint *v ) { ENTER_GL(); glTexCoord1iv(v); LEAVE_GL(); } /*********************************************************************** * glTexCoord1sv */ void WINAPI wine_glTexCoord1sv(const GLshort *v ) { ENTER_GL(); glTexCoord1sv(v); LEAVE_GL(); } /*********************************************************************** * glTexCoord2dv */ void WINAPI wine_glTexCoord2dv(const GLdouble *v ) { ENTER_GL(); glTexCoord2dv(v); LEAVE_GL(); } /*********************************************************************** * glTexCoord2fv */ void WINAPI wine_glTexCoord2fv(const GLfloat *v ) { ENTER_GL(); glTexCoord2fv(v); LEAVE_GL(); } /*********************************************************************** * glTexCoord2iv */ void WINAPI wine_glTexCoord2iv(const GLint *v ) { ENTER_GL(); glTexCoord2iv(v); LEAVE_GL(); } /*********************************************************************** * glTexCoord2sv */ void WINAPI wine_glTexCoord2sv(const GLshort *v ) { ENTER_GL(); glTexCoord2sv(v); LEAVE_GL(); } /*********************************************************************** * glTexCoord3dv */ void WINAPI wine_glTexCoord3dv(const GLdouble *v ) { ENTER_GL(); glTexCoord3dv(v); LEAVE_GL(); } /*********************************************************************** * glTexCoord3fv */ void WINAPI wine_glTexCoord3fv(const GLfloat *v ) { ENTER_GL(); glTexCoord3fv(v); LEAVE_GL(); } /*********************************************************************** * glTexCoord3iv */ void WINAPI wine_glTexCoord3iv(const GLint *v ) { ENTER_GL(); glTexCoord3iv(v); LEAVE_GL(); } /*********************************************************************** * glTexCoord3sv */ void WINAPI wine_glTexCoord3sv(const GLshort *v ) { ENTER_GL(); glTexCoord3sv(v); LEAVE_GL(); } /*********************************************************************** * glTexCoord4dv */ void WINAPI wine_glTexCoord4dv(const GLdouble *v ) { ENTER_GL(); glTexCoord4dv(v); LEAVE_GL(); } /*********************************************************************** * glTexCoord4fv */ void WINAPI wine_glTexCoord4fv(const GLfloat *v ) { ENTER_GL(); glTexCoord4fv(v); LEAVE_GL(); } /*********************************************************************** * glTexCoord4iv */ void WINAPI wine_glTexCoord4iv(const GLint *v ) { ENTER_GL(); glTexCoord4iv(v); LEAVE_GL(); } /*********************************************************************** * glTexCoord4sv */ void WINAPI wine_glTexCoord4sv(const GLshort *v ) { ENTER_GL(); glTexCoord4sv(v); LEAVE_GL(); } /*********************************************************************** * glRasterPos2d */ void WINAPI wine_glRasterPos2d(GLdouble x, GLdouble y ) { ENTER_GL(); glRasterPos2d(x, y); LEAVE_GL(); } /*********************************************************************** * glRasterPos2f */ void WINAPI wine_glRasterPos2f(GLfloat x, GLfloat y ) { ENTER_GL(); glRasterPos2f(x, y); LEAVE_GL(); } /*********************************************************************** * glRasterPos2i */ void WINAPI wine_glRasterPos2i(GLint x, GLint y ) { ENTER_GL(); glRasterPos2i(x, y); LEAVE_GL(); } /*********************************************************************** * glRasterPos2s */ void WINAPI wine_glRasterPos2s(GLshort x, GLshort y ) { ENTER_GL(); glRasterPos2s(x, y); LEAVE_GL(); } /*********************************************************************** * glRasterPos3d */ void WINAPI wine_glRasterPos3d(GLdouble x, GLdouble y, GLdouble z ) { ENTER_GL(); glRasterPos3d(x, y, z); LEAVE_GL(); } /*********************************************************************** * glRasterPos3f */ void WINAPI wine_glRasterPos3f(GLfloat x, GLfloat y, GLfloat z ) { ENTER_GL(); glRasterPos3f(x, y, z); LEAVE_GL(); } /*********************************************************************** * glRasterPos3i */ void WINAPI wine_glRasterPos3i(GLint x, GLint y, GLint z ) { ENTER_GL(); glRasterPos3i(x, y, z); LEAVE_GL(); } /*********************************************************************** * glRasterPos3s */ void WINAPI wine_glRasterPos3s(GLshort x, GLshort y, GLshort z ) { ENTER_GL(); glRasterPos3s(x, y, z); LEAVE_GL(); } /*********************************************************************** * glRasterPos4d */ void WINAPI wine_glRasterPos4d(GLdouble x, GLdouble y, GLdouble z, GLdouble w ) { ENTER_GL(); glRasterPos4d(x, y, z, w); LEAVE_GL(); } /*********************************************************************** * glRasterPos4f */ void WINAPI wine_glRasterPos4f(GLfloat x, GLfloat y, GLfloat z, GLfloat w ) { ENTER_GL(); glRasterPos4f(x, y, z, w); LEAVE_GL(); } /*********************************************************************** * glRasterPos4i */ void WINAPI wine_glRasterPos4i(GLint x, GLint y, GLint z, GLint w ) { ENTER_GL(); glRasterPos4i(x, y, z, w); LEAVE_GL(); } /*********************************************************************** * glRasterPos4s */ void WINAPI wine_glRasterPos4s(GLshort x, GLshort y, GLshort z, GLshort w ) { ENTER_GL(); glRasterPos4s(x, y, z, w); LEAVE_GL(); } /*********************************************************************** * glRasterPos2dv */ void WINAPI wine_glRasterPos2dv(const GLdouble *v ) { ENTER_GL(); glRasterPos2dv(v); LEAVE_GL(); } /*********************************************************************** * glRasterPos2fv */ void WINAPI wine_glRasterPos2fv(const GLfloat *v ) { ENTER_GL(); glRasterPos2fv(v); LEAVE_GL(); } /*********************************************************************** * glRasterPos2iv */ void WINAPI wine_glRasterPos2iv(const GLint *v ) { ENTER_GL(); glRasterPos2iv(v); LEAVE_GL(); } /*********************************************************************** * glRasterPos2sv */ void WINAPI wine_glRasterPos2sv(const GLshort *v ) { ENTER_GL(); glRasterPos2sv(v); LEAVE_GL(); } /*********************************************************************** * glRasterPos3dv */ void WINAPI wine_glRasterPos3dv(const GLdouble *v ) { ENTER_GL(); glRasterPos3dv(v); LEAVE_GL(); } /*********************************************************************** * glRasterPos3fv */ void WINAPI wine_glRasterPos3fv(const GLfloat *v ) { ENTER_GL(); glRasterPos3fv(v); LEAVE_GL(); } /*********************************************************************** * glRasterPos3iv */ void WINAPI wine_glRasterPos3iv(const GLint *v ) { ENTER_GL(); glRasterPos3iv(v); LEAVE_GL(); } /*********************************************************************** * glRasterPos3sv */ void WINAPI wine_glRasterPos3sv(const GLshort *v ) { ENTER_GL(); glRasterPos3sv(v); LEAVE_GL(); } /*********************************************************************** * glRasterPos4dv */ void WINAPI wine_glRasterPos4dv(const GLdouble *v ) { ENTER_GL(); glRasterPos4dv(v); LEAVE_GL(); } /*********************************************************************** * glRasterPos4fv */ void WINAPI wine_glRasterPos4fv(const GLfloat *v ) { ENTER_GL(); glRasterPos4fv(v); LEAVE_GL(); } /*********************************************************************** * glRasterPos4iv */ void WINAPI wine_glRasterPos4iv(const GLint *v ) { ENTER_GL(); glRasterPos4iv(v); LEAVE_GL(); } /*********************************************************************** * glRasterPos4sv */ void WINAPI wine_glRasterPos4sv(const GLshort *v ) { ENTER_GL(); glRasterPos4sv(v); LEAVE_GL(); } /*********************************************************************** * glRectd */ void WINAPI wine_glRectd(GLdouble x1, GLdouble y1, GLdouble x2, GLdouble y2 ) { ENTER_GL(); glRectd(x1, y1, x2, y2); LEAVE_GL(); } /*********************************************************************** * glRectf */ void WINAPI wine_glRectf(GLfloat x1, GLfloat y1, GLfloat x2, GLfloat y2 ) { ENTER_GL(); glRectf(x1, y1, x2, y2); LEAVE_GL(); } /*********************************************************************** * glRecti */ void WINAPI wine_glRecti(GLint x1, GLint y1, GLint x2, GLint y2 ) { ENTER_GL(); glRecti(x1, y1, x2, y2); LEAVE_GL(); } /*********************************************************************** * glRects */ void WINAPI wine_glRects(GLshort x1, GLshort y1, GLshort x2, GLshort y2 ) { ENTER_GL(); glRects(x1, y1, x2, y2); LEAVE_GL(); } /*********************************************************************** * glRectdv */ void WINAPI wine_glRectdv(const GLdouble *v1, const GLdouble *v2 ) { ENTER_GL(); glRectdv(v1, v2); LEAVE_GL(); } /*********************************************************************** * glRectfv */ void WINAPI wine_glRectfv(const GLfloat *v1, const GLfloat *v2 ) { ENTER_GL(); glRectfv(v1, v2); LEAVE_GL(); } /*********************************************************************** * glRectiv */ void WINAPI wine_glRectiv(const GLint *v1, const GLint *v2 ) { ENTER_GL(); glRectiv(v1, v2); LEAVE_GL(); } /*********************************************************************** * glRectsv */ void WINAPI wine_glRectsv(const GLshort *v1, const GLshort *v2 ) { ENTER_GL(); glRectsv(v1, v2); LEAVE_GL(); } /*********************************************************************** * glVertexPointer */ void WINAPI wine_glVertexPointer(GLint size, GLenum type, GLsizei stride, const GLvoid *ptr ) { ENTER_GL(); glVertexPointer(size, type, stride, ptr); LEAVE_GL(); } /*********************************************************************** * glNormalPointer */ void WINAPI wine_glNormalPointer(GLenum type, GLsizei stride, const GLvoid *ptr ) { ENTER_GL(); glNormalPointer(type, stride, ptr); LEAVE_GL(); } /*********************************************************************** * glColorPointer */ void WINAPI wine_glColorPointer(GLint size, GLenum type, GLsizei stride, const GLvoid *ptr ) { ENTER_GL(); glColorPointer(size, type, stride, ptr); LEAVE_GL(); } /*********************************************************************** * glIndexPointer */ void WINAPI wine_glIndexPointer(GLenum type, GLsizei stride, const GLvoid *ptr ) { ENTER_GL(); glIndexPointer(type, stride, ptr); LEAVE_GL(); } /*********************************************************************** * glTexCoordPointer */ void WINAPI wine_glTexCoordPointer(GLint size, GLenum type, GLsizei stride, const GLvoid *ptr ) { ENTER_GL(); glTexCoordPointer(size, type, stride, ptr); LEAVE_GL(); } /*********************************************************************** * glEdgeFlagPointer */ void WINAPI wine_glEdgeFlagPointer(GLsizei stride, const GLvoid *ptr ) { ENTER_GL(); glEdgeFlagPointer(stride, ptr); LEAVE_GL(); } /*********************************************************************** * glGetPointerv */ void WINAPI wine_glGetPointerv(GLenum pname, void **params ) { ENTER_GL(); glGetPointerv(pname, params); LEAVE_GL(); } /*********************************************************************** * glArrayElement */ void WINAPI wine_glArrayElement(GLint i ) { ENTER_GL(); glArrayElement(i); LEAVE_GL(); } /*********************************************************************** * glDrawArrays */ void WINAPI wine_glDrawArrays(GLenum mode, GLint first, GLsizei count ) { ENTER_GL(); glDrawArrays(mode, first, count); LEAVE_GL(); } /*********************************************************************** * glDrawElements */ void WINAPI wine_glDrawElements(GLenum mode, GLsizei count, GLenum type, const GLvoid *indices ) { ENTER_GL(); glDrawElements(mode, count, type, indices); LEAVE_GL(); } /*********************************************************************** * glInterleavedArrays */ void WINAPI wine_glInterleavedArrays(GLenum format, GLsizei stride, const GLvoid *pointer ) { ENTER_GL(); glInterleavedArrays(format, stride, pointer); LEAVE_GL(); } /*********************************************************************** * glShadeModel */ void WINAPI wine_glShadeModel(GLenum mode ) { ENTER_GL(); glShadeModel(mode); LEAVE_GL(); } /*********************************************************************** * glLightf */ void WINAPI wine_glLightf(GLenum light, GLenum pname, GLfloat param ) { ENTER_GL(); glLightf(light, pname, param); LEAVE_GL(); } /*********************************************************************** * glLighti */ void WINAPI wine_glLighti(GLenum light, GLenum pname, GLint param ) { ENTER_GL(); glLighti(light, pname, param); LEAVE_GL(); } /*********************************************************************** * glLightfv */ void WINAPI wine_glLightfv(GLenum light, GLenum pname, const GLfloat *params ) { ENTER_GL(); glLightfv(light, pname, params); LEAVE_GL(); } /*********************************************************************** * glLightiv */ void WINAPI wine_glLightiv(GLenum light, GLenum pname, const GLint *params ) { ENTER_GL(); glLightiv(light, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetLightfv */ void WINAPI wine_glGetLightfv(GLenum light, GLenum pname, GLfloat *params ) { ENTER_GL(); glGetLightfv(light, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetLightiv */ void WINAPI wine_glGetLightiv(GLenum light, GLenum pname, GLint *params ) { ENTER_GL(); glGetLightiv(light, pname, params); LEAVE_GL(); } /*********************************************************************** * glLightModelf */ void WINAPI wine_glLightModelf(GLenum pname, GLfloat param ) { ENTER_GL(); glLightModelf(pname, param); LEAVE_GL(); } /*********************************************************************** * glLightModeli */ void WINAPI wine_glLightModeli(GLenum pname, GLint param ) { ENTER_GL(); glLightModeli(pname, param); LEAVE_GL(); } /*********************************************************************** * glLightModelfv */ void WINAPI wine_glLightModelfv(GLenum pname, const GLfloat *params ) { ENTER_GL(); glLightModelfv(pname, params); LEAVE_GL(); } /*********************************************************************** * glLightModeliv */ void WINAPI wine_glLightModeliv(GLenum pname, const GLint *params ) { ENTER_GL(); glLightModeliv(pname, params); LEAVE_GL(); } /*********************************************************************** * glMaterialf */ void WINAPI wine_glMaterialf(GLenum face, GLenum pname, GLfloat param ) { ENTER_GL(); glMaterialf(face, pname, param); LEAVE_GL(); } /*********************************************************************** * glMateriali */ void WINAPI wine_glMateriali(GLenum face, GLenum pname, GLint param ) { ENTER_GL(); glMateriali(face, pname, param); LEAVE_GL(); } /*********************************************************************** * glMaterialfv */ void WINAPI wine_glMaterialfv(GLenum face, GLenum pname, const GLfloat *params ) { ENTER_GL(); glMaterialfv(face, pname, params); LEAVE_GL(); } /*********************************************************************** * glMaterialiv */ void WINAPI wine_glMaterialiv(GLenum face, GLenum pname, const GLint *params ) { ENTER_GL(); glMaterialiv(face, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetMaterialfv */ void WINAPI wine_glGetMaterialfv(GLenum face, GLenum pname, GLfloat *params ) { ENTER_GL(); glGetMaterialfv(face, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetMaterialiv */ void WINAPI wine_glGetMaterialiv(GLenum face, GLenum pname, GLint *params ) { ENTER_GL(); glGetMaterialiv(face, pname, params); LEAVE_GL(); } /*********************************************************************** * glColorMaterial */ void WINAPI wine_glColorMaterial(GLenum face, GLenum mode ) { ENTER_GL(); glColorMaterial(face, mode); LEAVE_GL(); } /*********************************************************************** * glPixelZoom */ void WINAPI wine_glPixelZoom(GLfloat xfactor, GLfloat yfactor ) { ENTER_GL(); glPixelZoom(xfactor, yfactor); LEAVE_GL(); } /*********************************************************************** * glPixelStoref */ void WINAPI wine_glPixelStoref(GLenum pname, GLfloat param ) { ENTER_GL(); glPixelStoref(pname, param); LEAVE_GL(); } /*********************************************************************** * glPixelStorei */ void WINAPI wine_glPixelStorei(GLenum pname, GLint param ) { ENTER_GL(); glPixelStorei(pname, param); LEAVE_GL(); } /*********************************************************************** * glPixelTransferf */ void WINAPI wine_glPixelTransferf(GLenum pname, GLfloat param ) { ENTER_GL(); glPixelTransferf(pname, param); LEAVE_GL(); } /*********************************************************************** * glPixelTransferi */ void WINAPI wine_glPixelTransferi(GLenum pname, GLint param ) { ENTER_GL(); glPixelTransferi(pname, param); LEAVE_GL(); } /*********************************************************************** * glPixelMapfv */ void WINAPI wine_glPixelMapfv(GLenum map, GLint mapsize, const GLfloat *values ) { ENTER_GL(); glPixelMapfv(map, mapsize, values); LEAVE_GL(); } /*********************************************************************** * glPixelMapuiv */ void WINAPI wine_glPixelMapuiv(GLenum map, GLint mapsize, const GLuint *values ) { ENTER_GL(); glPixelMapuiv(map, mapsize, values); LEAVE_GL(); } /*********************************************************************** * glPixelMapusv */ void WINAPI wine_glPixelMapusv(GLenum map, GLint mapsize, const GLushort *values ) { ENTER_GL(); glPixelMapusv(map, mapsize, values); LEAVE_GL(); } /*********************************************************************** * glGetPixelMapfv */ void WINAPI wine_glGetPixelMapfv(GLenum map, GLfloat *values ) { ENTER_GL(); glGetPixelMapfv(map, values); LEAVE_GL(); } /*********************************************************************** * glGetPixelMapuiv */ void WINAPI wine_glGetPixelMapuiv(GLenum map, GLuint *values ) { ENTER_GL(); glGetPixelMapuiv(map, values); LEAVE_GL(); } /*********************************************************************** * glGetPixelMapusv */ void WINAPI wine_glGetPixelMapusv(GLenum map, GLushort *values ) { ENTER_GL(); glGetPixelMapusv(map, values); LEAVE_GL(); } /*********************************************************************** * glBitmap */ void WINAPI wine_glBitmap(GLsizei width, GLsizei height, GLfloat xorig, GLfloat yorig, GLfloat xmove, GLfloat ymove, const GLubyte *bitmap ) { ENTER_GL(); glBitmap(width, height, xorig, yorig, xmove, ymove, bitmap); LEAVE_GL(); } /*********************************************************************** * glReadPixels */ void WINAPI wine_glReadPixels(GLint x, GLint y, GLsizei width, GLsizei height, GLenum format, GLenum type, GLvoid *pixels ) { ENTER_GL(); glReadPixels(x, y, width, height, format, type, pixels); LEAVE_GL(); } /*********************************************************************** * glDrawPixels */ void WINAPI wine_glDrawPixels(GLsizei width, GLsizei height, GLenum format, GLenum type, const GLvoid *pixels ) { ENTER_GL(); glDrawPixels(width, height, format, type, pixels); LEAVE_GL(); } /*********************************************************************** * glCopyPixels */ void WINAPI wine_glCopyPixels(GLint x, GLint y, GLsizei width, GLsizei height, GLenum type ) { ENTER_GL(); glCopyPixels(x, y, width, height, type); LEAVE_GL(); } /*********************************************************************** * glStencilFunc */ void WINAPI wine_glStencilFunc(GLenum func, GLint ref, GLuint mask ) { ENTER_GL(); glStencilFunc(func, ref, mask); LEAVE_GL(); } /*********************************************************************** * glStencilMask */ void WINAPI wine_glStencilMask(GLuint mask ) { ENTER_GL(); glStencilMask(mask); LEAVE_GL(); } /*********************************************************************** * glStencilOp */ void WINAPI wine_glStencilOp(GLenum fail, GLenum zfail, GLenum zpass ) { ENTER_GL(); glStencilOp(fail, zfail, zpass); LEAVE_GL(); } /*********************************************************************** * glClearStencil */ void WINAPI wine_glClearStencil(GLint s ) { ENTER_GL(); glClearStencil(s); LEAVE_GL(); } /*********************************************************************** * glTexGend */ void WINAPI wine_glTexGend(GLenum coord, GLenum pname, GLdouble param ) { ENTER_GL(); glTexGend(coord, pname, param); LEAVE_GL(); } /*********************************************************************** * glTexGenf */ void WINAPI wine_glTexGenf(GLenum coord, GLenum pname, GLfloat param ) { ENTER_GL(); glTexGenf(coord, pname, param); LEAVE_GL(); } /*********************************************************************** * glTexGeni */ void WINAPI wine_glTexGeni(GLenum coord, GLenum pname, GLint param ) { ENTER_GL(); glTexGeni(coord, pname, param); LEAVE_GL(); } /*********************************************************************** * glTexGendv */ void WINAPI wine_glTexGendv(GLenum coord, GLenum pname, const GLdouble *params ) { ENTER_GL(); glTexGendv(coord, pname, params); LEAVE_GL(); } /*********************************************************************** * glTexGenfv */ void WINAPI wine_glTexGenfv(GLenum coord, GLenum pname, const GLfloat *params ) { ENTER_GL(); glTexGenfv(coord, pname, params); LEAVE_GL(); } /*********************************************************************** * glTexGeniv */ void WINAPI wine_glTexGeniv(GLenum coord, GLenum pname, const GLint *params ) { ENTER_GL(); glTexGeniv(coord, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetTexGendv */ void WINAPI wine_glGetTexGendv(GLenum coord, GLenum pname, GLdouble *params ) { ENTER_GL(); glGetTexGendv(coord, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetTexGenfv */ void WINAPI wine_glGetTexGenfv(GLenum coord, GLenum pname, GLfloat *params ) { ENTER_GL(); glGetTexGenfv(coord, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetTexGeniv */ void WINAPI wine_glGetTexGeniv(GLenum coord, GLenum pname, GLint *params ) { ENTER_GL(); glGetTexGeniv(coord, pname, params); LEAVE_GL(); } /*********************************************************************** * glTexEnvf */ void WINAPI wine_glTexEnvf(GLenum target, GLenum pname, GLfloat param ) { ENTER_GL(); glTexEnvf(target, pname, param); LEAVE_GL(); } /*********************************************************************** * glTexEnvi */ void WINAPI wine_glTexEnvi(GLenum target, GLenum pname, GLint param ) { ENTER_GL(); glTexEnvi(target, pname, param); LEAVE_GL(); } /*********************************************************************** * glTexEnvfv */ void WINAPI wine_glTexEnvfv(GLenum target, GLenum pname, const GLfloat *params ) { ENTER_GL(); glTexEnvfv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glTexEnviv */ void WINAPI wine_glTexEnviv(GLenum target, GLenum pname, const GLint *params ) { ENTER_GL(); glTexEnviv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetTexEnvfv */ void WINAPI wine_glGetTexEnvfv(GLenum target, GLenum pname, GLfloat *params ) { ENTER_GL(); glGetTexEnvfv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetTexEnviv */ void WINAPI wine_glGetTexEnviv(GLenum target, GLenum pname, GLint *params ) { ENTER_GL(); glGetTexEnviv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glTexParameterf */ void WINAPI wine_glTexParameterf(GLenum target, GLenum pname, GLfloat param ) { ENTER_GL(); glTexParameterf(target, pname, param); LEAVE_GL(); } /*********************************************************************** * glTexParameteri */ void WINAPI wine_glTexParameteri(GLenum target, GLenum pname, GLint param ) { ENTER_GL(); glTexParameteri(target, pname, param); LEAVE_GL(); } /*********************************************************************** * glTexParameterfv */ void WINAPI wine_glTexParameterfv(GLenum target, GLenum pname, const GLfloat *params ) { ENTER_GL(); glTexParameterfv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glTexParameteriv */ void WINAPI wine_glTexParameteriv(GLenum target, GLenum pname, const GLint *params ) { ENTER_GL(); glTexParameteriv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetTexParameterfv */ void WINAPI wine_glGetTexParameterfv(GLenum target, GLenum pname, GLfloat *params) { ENTER_GL(); glGetTexParameterfv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetTexParameteriv */ void WINAPI wine_glGetTexParameteriv(GLenum target, GLenum pname, GLint *params ) { ENTER_GL(); glGetTexParameteriv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetTexLevelParameterfv */ void WINAPI wine_glGetTexLevelParameterfv(GLenum target, GLint level, GLenum pname, GLfloat *params ) { ENTER_GL(); glGetTexLevelParameterfv(target, level, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetTexLevelParameteriv */ void WINAPI wine_glGetTexLevelParameteriv(GLenum target, GLint level, GLenum pname, GLint *params ) { ENTER_GL(); glGetTexLevelParameteriv(target, level, pname, params); LEAVE_GL(); } /*********************************************************************** * glTexImage1D */ void WINAPI wine_glTexImage1D(GLenum target, GLint level, GLint internalFormat, GLsizei width, GLint border, GLenum format, GLenum type, const GLvoid *pixels ) { ENTER_GL(); glTexImage1D(target, level, internalFormat, width, border, format, type, pixels); LEAVE_GL(); } /*********************************************************************** * glTexImage2D */ void WINAPI wine_glTexImage2D(GLenum target, GLint level, GLint internalFormat, GLsizei width, GLsizei height, GLint border, GLenum format, GLenum type, const GLvoid *pixels ) { ENTER_GL(); glTexImage2D(target, level, internalFormat, width, height, border, format, type, pixels); LEAVE_GL(); } /*********************************************************************** * glGetTexImage */ void WINAPI wine_glGetTexImage(GLenum target, GLint level, GLenum format, GLenum type, GLvoid *pixels ) { ENTER_GL(); glGetTexImage(target, level, format, type, pixels); LEAVE_GL(); } /*********************************************************************** * glGenTextures */ void WINAPI wine_glGenTextures(GLsizei n, GLuint *textures ) { ENTER_GL(); glGenTextures(n, textures); LEAVE_GL(); } /*********************************************************************** * glDeleteTextures */ void WINAPI wine_glDeleteTextures(GLsizei n, const GLuint *textures) { ENTER_GL(); glDeleteTextures(n, textures); LEAVE_GL(); } /*********************************************************************** * glBindTexture */ void WINAPI wine_glBindTexture(GLenum target, GLuint texture ) { ENTER_GL(); glBindTexture(target, texture); LEAVE_GL(); } /*********************************************************************** * glPrioritizeTextures */ void WINAPI wine_glPrioritizeTextures(GLsizei n, const GLuint *textures, const GLclampf *priorities ) { ENTER_GL(); glPrioritizeTextures(n, textures, priorities); LEAVE_GL(); } /*********************************************************************** * glAreTexturesResident */ GLboolean WINAPI wine_glAreTexturesResident(GLsizei n, const GLuint *textures, GLboolean *residences ) { GLboolean ret; ENTER_GL(); ret = glAreTexturesResident(n, textures, residences); LEAVE_GL(); return ret; } /*********************************************************************** * glIsTexture */ GLboolean WINAPI wine_glIsTexture(GLuint texture ) { GLboolean ret; ENTER_GL(); ret = glIsTexture(texture); LEAVE_GL(); return ret; } /*********************************************************************** * glTexSubImage1D */ void WINAPI wine_glTexSubImage1D(GLenum target, GLint level, GLint xoffset, GLsizei width, GLenum format, GLenum type, const GLvoid *pixels ) { ENTER_GL(); glTexSubImage1D(target, level, xoffset, width, format, type, pixels); LEAVE_GL(); } /*********************************************************************** * glTexSubImage2D */ void WINAPI wine_glTexSubImage2D(GLenum target, GLint level, GLint xoffset, GLint yoffset, GLsizei width, GLsizei height, GLenum format, GLenum type, const GLvoid *pixels ) { ENTER_GL(); glTexSubImage2D(target, level, xoffset, yoffset, width, height, format, type, pixels); LEAVE_GL(); } /*********************************************************************** * glCopyTexImage1D */ void WINAPI wine_glCopyTexImage1D(GLenum target, GLint level, GLenum internalformat, GLint x, GLint y, GLsizei width, GLint border ) { ENTER_GL(); glCopyTexImage1D(target, level, internalformat, x, y, width, border); LEAVE_GL(); } /*********************************************************************** * glCopyTexImage2D */ void WINAPI wine_glCopyTexImage2D(GLenum target, GLint level, GLenum internalformat, GLint x, GLint y, GLsizei width, GLsizei height, GLint border ) { ENTER_GL(); glCopyTexImage2D(target, level, internalformat, x, y, width, height, border); LEAVE_GL(); } /*********************************************************************** * glCopyTexSubImage1D */ void WINAPI wine_glCopyTexSubImage1D(GLenum target, GLint level, GLint xoffset, GLint x, GLint y, GLsizei width ) { ENTER_GL(); glCopyTexSubImage1D(target, level, xoffset, x, y, width); LEAVE_GL(); } /*********************************************************************** * glCopyTexSubImage2D */ void WINAPI wine_glCopyTexSubImage2D(GLenum target, GLint level, GLint xoffset, GLint yoffset, GLint x, GLint y, GLsizei width, GLsizei height ) { ENTER_GL(); glCopyTexSubImage2D(target, level, xoffset, yoffset, x, y, width, height); LEAVE_GL(); } /*********************************************************************** * glMap1d */ void WINAPI wine_glMap1d(GLenum target, GLdouble u1, GLdouble u2, GLint stride, GLint order, const GLdouble *points ) { ENTER_GL(); glMap1d(target, u1, u2, stride, order, points); LEAVE_GL(); } /*********************************************************************** * glMap1f */ void WINAPI wine_glMap1f(GLenum target, GLfloat u1, GLfloat u2, GLint stride, GLint order, const GLfloat *points ) { ENTER_GL(); glMap1f(target, u1, u2, stride, order, points); LEAVE_GL(); } /*********************************************************************** * glMap2d */ void WINAPI wine_glMap2d(GLenum target, GLdouble u1, GLdouble u2, GLint ustride, GLint uorder, GLdouble v1, GLdouble v2, GLint vstride, GLint vorder, const GLdouble *points ) { ENTER_GL(); glMap2d(target, u1, u2, ustride, uorder, v1, v2, vstride, vorder, points); LEAVE_GL(); } /*********************************************************************** * glMap2f */ void WINAPI wine_glMap2f(GLenum target, GLfloat u1, GLfloat u2, GLint ustride, GLint uorder, GLfloat v1, GLfloat v2, GLint vstride, GLint vorder, const GLfloat *points ) { ENTER_GL(); glMap2f(target, u1, u2, ustride, uorder, v1, v2, vstride, vorder, points); LEAVE_GL(); } /*********************************************************************** * glGetMapdv */ void WINAPI wine_glGetMapdv(GLenum target, GLenum query, GLdouble *v ) { ENTER_GL(); glGetMapdv(target, query, v); LEAVE_GL(); } /*********************************************************************** * glGetMapfv */ void WINAPI wine_glGetMapfv(GLenum target, GLenum query, GLfloat *v ) { ENTER_GL(); glGetMapfv(target, query, v); LEAVE_GL(); } /*********************************************************************** * glGetMapiv */ void WINAPI wine_glGetMapiv(GLenum target, GLenum query, GLint *v ) { ENTER_GL(); glGetMapiv(target, query, v); LEAVE_GL(); } /*********************************************************************** * glEvalCoord1d */ void WINAPI wine_glEvalCoord1d(GLdouble u ) { ENTER_GL(); glEvalCoord1d(u); LEAVE_GL(); } /*********************************************************************** * glEvalCoord1f */ void WINAPI wine_glEvalCoord1f(GLfloat u ) { ENTER_GL(); glEvalCoord1f(u); LEAVE_GL(); } /*********************************************************************** * glEvalCoord1dv */ void WINAPI wine_glEvalCoord1dv(const GLdouble *u ) { ENTER_GL(); glEvalCoord1dv(u); LEAVE_GL(); } /*********************************************************************** * glEvalCoord1fv */ void WINAPI wine_glEvalCoord1fv(const GLfloat *u ) { ENTER_GL(); glEvalCoord1fv(u); LEAVE_GL(); } /*********************************************************************** * glEvalCoord2d */ void WINAPI wine_glEvalCoord2d(GLdouble u, GLdouble v ) { ENTER_GL(); glEvalCoord2d(u, v); LEAVE_GL(); } /*********************************************************************** * glEvalCoord2f */ void WINAPI wine_glEvalCoord2f(GLfloat u, GLfloat v ) { ENTER_GL(); glEvalCoord2f(u, v); LEAVE_GL(); } /*********************************************************************** * glEvalCoord2dv */ void WINAPI wine_glEvalCoord2dv(const GLdouble *u ) { ENTER_GL(); glEvalCoord2dv(u); LEAVE_GL(); } /*********************************************************************** * glEvalCoord2fv */ void WINAPI wine_glEvalCoord2fv(const GLfloat *u ) { ENTER_GL(); glEvalCoord2fv(u); LEAVE_GL(); } /*********************************************************************** * glMapGrid1d */ void WINAPI wine_glMapGrid1d(GLint un, GLdouble u1, GLdouble u2 ) { ENTER_GL(); glMapGrid1d(un, u1, u2); LEAVE_GL(); } /*********************************************************************** * glMapGrid1f */ void WINAPI wine_glMapGrid1f(GLint un, GLfloat u1, GLfloat u2 ) { ENTER_GL(); glMapGrid1f(un, u1, u2); LEAVE_GL(); } /*********************************************************************** * glMapGrid2d */ void WINAPI wine_glMapGrid2d(GLint un, GLdouble u1, GLdouble u2, GLint vn, GLdouble v1, GLdouble v2 ) { ENTER_GL(); glMapGrid2d(un, u1, u2, vn, v1, v2); LEAVE_GL(); } /*********************************************************************** * glMapGrid2f */ void WINAPI wine_glMapGrid2f(GLint un, GLfloat u1, GLfloat u2, GLint vn, GLfloat v1, GLfloat v2 ) { ENTER_GL(); glMapGrid2f(un, u1, u2, vn, v1, v2); LEAVE_GL(); } /*********************************************************************** * glEvalPoint1 */ void WINAPI wine_glEvalPoint1(GLint i ) { ENTER_GL(); glEvalPoint1(i); LEAVE_GL(); } /*********************************************************************** * glEvalPoint2 */ void WINAPI wine_glEvalPoint2(GLint i, GLint j ) { ENTER_GL(); glEvalPoint2(i, j); LEAVE_GL(); } /*********************************************************************** * glEvalMesh1 */ void WINAPI wine_glEvalMesh1(GLenum mode, GLint i1, GLint i2 ) { ENTER_GL(); glEvalMesh1(mode, i1, i2); LEAVE_GL(); } /*********************************************************************** * glEvalMesh2 */ void WINAPI wine_glEvalMesh2(GLenum mode, GLint i1, GLint i2, GLint j1, GLint j2 ) { ENTER_GL(); glEvalMesh2(mode, i1, i2, j1, j2); LEAVE_GL(); } /*********************************************************************** * glFogf */ void WINAPI wine_glFogf(GLenum pname, GLfloat param ) { ENTER_GL(); glFogf(pname, param); LEAVE_GL(); } /*********************************************************************** * glFogi */ void WINAPI wine_glFogi(GLenum pname, GLint param ) { ENTER_GL(); glFogi(pname, param); LEAVE_GL(); } /*********************************************************************** * glFogfv */ void WINAPI wine_glFogfv(GLenum pname, const GLfloat *params ) { ENTER_GL(); glFogfv(pname, params); LEAVE_GL(); } /*********************************************************************** * glFogiv */ void WINAPI wine_glFogiv(GLenum pname, const GLint *params ) { ENTER_GL(); glFogiv(pname, params); LEAVE_GL(); } /*********************************************************************** * glFeedbackBuffer */ void WINAPI wine_glFeedbackBuffer(GLsizei size, GLenum type, GLfloat *buffer ) { ENTER_GL(); glFeedbackBuffer(size, type, buffer); LEAVE_GL(); } /*********************************************************************** * glPassThrough */ void WINAPI wine_glPassThrough(GLfloat token ) { ENTER_GL(); glPassThrough(token); LEAVE_GL(); } /*********************************************************************** * glSelectBuffer */ void WINAPI wine_glSelectBuffer(GLsizei size, GLuint *buffer ) { ENTER_GL(); glSelectBuffer(size, buffer); LEAVE_GL(); } /*********************************************************************** * glInitNames */ void WINAPI wine_glInitNames(void ) { ENTER_GL(); glInitNames(); LEAVE_GL(); } /*********************************************************************** * glLoadName */ void WINAPI wine_glLoadName(GLuint name ) { ENTER_GL(); glLoadName(name); LEAVE_GL(); } /*********************************************************************** * glPushName */ void WINAPI wine_glPushName(GLuint name ) { ENTER_GL(); glPushName(name); LEAVE_GL(); } /*********************************************************************** * glPopName */ void WINAPI wine_glPopName(void ) { ENTER_GL(); glPopName(); LEAVE_GL(); } /*********************************************************************** * glDrawRangeElements */ void WINAPI wine_glDrawRangeElements(GLenum mode, GLuint start, GLuint end, GLsizei count, GLenum type, const GLvoid *indices ) { ENTER_GL(); glDrawRangeElements(mode, start, end, count, type, indices); LEAVE_GL(); } /*********************************************************************** * glTexImage3D */ void WINAPI wine_glTexImage3D(GLenum target, GLint level, GLint internalFormat, GLsizei width, GLsizei height, GLsizei depth, GLint border, GLenum format, GLenum type, const GLvoid *pixels ) { ENTER_GL(); glTexImage3D(target, level, internalFormat, width, height, depth, border, format, type, pixels); LEAVE_GL(); } /*********************************************************************** * glTexSubImage3D */ void WINAPI wine_glTexSubImage3D(GLenum target, GLint level, GLint xoffset, GLint yoffset, GLint zoffset, GLsizei width, GLsizei height, GLsizei depth, GLenum format, GLenum type, const GLvoid *pixels) { ENTER_GL(); glTexSubImage3D(target, level, xoffset, yoffset, zoffset, width, height, depth, format, type, pixels); LEAVE_GL(); } /*********************************************************************** * glCopyTexSubImage3D */ void WINAPI wine_glCopyTexSubImage3D(GLenum target, GLint level, GLint xoffset, GLint yoffset, GLint zoffset, GLint x, GLint y, GLsizei width, GLsizei height ) { ENTER_GL(); glCopyTexSubImage3D(target, level, xoffset, yoffset, zoffset, x, y, width, height); LEAVE_GL(); } /*********************************************************************** * glColorTable */ void WINAPI wine_glColorTable(GLenum target, GLenum internalformat, GLsizei width, GLenum format, GLenum type, const GLvoid *table ) { ENTER_GL(); glColorTable(target, internalformat, width, format, type, table); LEAVE_GL(); } /*********************************************************************** * glColorSubTable */ void WINAPI wine_glColorSubTable(GLenum target, GLsizei start, GLsizei count, GLenum format, GLenum type, const GLvoid *data ) { ENTER_GL(); glColorSubTable(target, start, count, format, type, data); LEAVE_GL(); } /*********************************************************************** * glColorTableParameteriv */ void WINAPI wine_glColorTableParameteriv(GLenum target, GLenum pname, const GLint *params) { ENTER_GL(); glColorTableParameteriv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glColorTableParameterfv */ void WINAPI wine_glColorTableParameterfv(GLenum target, GLenum pname, const GLfloat *params) { ENTER_GL(); glColorTableParameterfv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glCopyColorSubTable */ void WINAPI wine_glCopyColorSubTable(GLenum target, GLsizei start, GLint x, GLint y, GLsizei width ) { ENTER_GL(); glCopyColorSubTable(target, start, x, y, width); LEAVE_GL(); } /*********************************************************************** * glCopyColorTable */ void WINAPI wine_glCopyColorTable(GLenum target, GLenum internalformat, GLint x, GLint y, GLsizei width ) { ENTER_GL(); glCopyColorTable(target, internalformat, x, y, width); LEAVE_GL(); } /*********************************************************************** * glGetColorTable */ void WINAPI wine_glGetColorTable(GLenum target, GLenum format, GLenum type, GLvoid *table ) { ENTER_GL(); glGetColorTable(target, format, type, table); LEAVE_GL(); } /*********************************************************************** * glGetColorTableParameterfv */ void WINAPI wine_glGetColorTableParameterfv(GLenum target, GLenum pname, GLfloat *params ) { ENTER_GL(); glGetColorTableParameterfv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetColorTableParameteriv */ void WINAPI wine_glGetColorTableParameteriv(GLenum target, GLenum pname, GLint *params ) { ENTER_GL(); glGetColorTableParameteriv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glBlendEquation */ void WINAPI wine_glBlendEquation(GLenum mode ) { ENTER_GL(); glBlendEquation(mode); LEAVE_GL(); } /*********************************************************************** * glBlendColor */ void WINAPI wine_glBlendColor(GLclampf red, GLclampf green, GLclampf blue, GLclampf alpha ) { ENTER_GL(); glBlendColor(red, green, blue, alpha); LEAVE_GL(); } /*********************************************************************** * glHistogram */ void WINAPI wine_glHistogram(GLenum target, GLsizei width, GLenum internalformat, GLboolean sink ) { ENTER_GL(); glHistogram(target, width, internalformat, sink); LEAVE_GL(); } /*********************************************************************** * glResetHistogram */ void WINAPI wine_glResetHistogram(GLenum target ) { ENTER_GL(); glResetHistogram(target); LEAVE_GL(); } /*********************************************************************** * glGetHistogram */ void WINAPI wine_glGetHistogram(GLenum target, GLboolean reset, GLenum format, GLenum type, GLvoid *values ) { ENTER_GL(); glGetHistogram(target, reset, format, type, values); LEAVE_GL(); } /*********************************************************************** * glGetHistogramParameterfv */ void WINAPI wine_glGetHistogramParameterfv(GLenum target, GLenum pname, GLfloat *params ) { ENTER_GL(); glGetHistogramParameterfv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetHistogramParameteriv */ void WINAPI wine_glGetHistogramParameteriv(GLenum target, GLenum pname, GLint *params ) { ENTER_GL(); glGetHistogramParameteriv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glMinmax */ void WINAPI wine_glMinmax(GLenum target, GLenum internalformat, GLboolean sink ) { ENTER_GL(); glMinmax(target, internalformat, sink); LEAVE_GL(); } /*********************************************************************** * glResetMinmax */ void WINAPI wine_glResetMinmax(GLenum target ) { ENTER_GL(); glResetMinmax(target); LEAVE_GL(); } /*********************************************************************** * glGetMinmax */ void WINAPI wine_glGetMinmax(GLenum target, GLboolean reset, GLenum format, GLenum types, GLvoid *values ) { ENTER_GL(); glGetMinmax(target, reset, format, types, values); LEAVE_GL(); } /*********************************************************************** * glGetMinmaxParameterfv */ void WINAPI wine_glGetMinmaxParameterfv(GLenum target, GLenum pname, GLfloat *params ) { ENTER_GL(); glGetMinmaxParameterfv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetMinmaxParameteriv */ void WINAPI wine_glGetMinmaxParameteriv(GLenum target, GLenum pname, GLint *params ) { ENTER_GL(); glGetMinmaxParameteriv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glConvolutionFilter1D */ void WINAPI wine_glConvolutionFilter1D(GLenum target, GLenum internalformat, GLsizei width, GLenum format, GLenum type, const GLvoid *image ) { ENTER_GL(); glConvolutionFilter1D(target, internalformat, width, format, type, image); LEAVE_GL(); } /*********************************************************************** * glConvolutionFilter2D */ void WINAPI wine_glConvolutionFilter2D(GLenum target, GLenum internalformat, GLsizei width, GLsizei height, GLenum format, GLenum type, const GLvoid *image ) { ENTER_GL(); glConvolutionFilter2D(target, internalformat, width, height, format, type, image); LEAVE_GL(); } /*********************************************************************** * glConvolutionParameterf */ void WINAPI wine_glConvolutionParameterf(GLenum target, GLenum pname, GLfloat params ) { ENTER_GL(); glConvolutionParameterf(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glConvolutionParameterfv */ void WINAPI wine_glConvolutionParameterfv(GLenum target, GLenum pname, const GLfloat *params ) { ENTER_GL(); glConvolutionParameterfv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glConvolutionParameteri */ void WINAPI wine_glConvolutionParameteri(GLenum target, GLenum pname, GLint params ) { ENTER_GL(); glConvolutionParameteri(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glConvolutionParameteriv */ void WINAPI wine_glConvolutionParameteriv(GLenum target, GLenum pname, const GLint *params ) { ENTER_GL(); glConvolutionParameteriv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glCopyConvolutionFilter1D */ void WINAPI wine_glCopyConvolutionFilter1D(GLenum target, GLenum internalformat, GLint x, GLint y, GLsizei width ) { ENTER_GL(); glCopyConvolutionFilter1D(target, internalformat, x, y, width); LEAVE_GL(); } /*********************************************************************** * glCopyConvolutionFilter2D */ void WINAPI wine_glCopyConvolutionFilter2D(GLenum target, GLenum internalformat, GLint x, GLint y, GLsizei width, GLsizei height) { ENTER_GL(); glCopyConvolutionFilter2D(target, internalformat, x, y, width, height); LEAVE_GL(); } /*********************************************************************** * glGetConvolutionFilter */ void WINAPI wine_glGetConvolutionFilter(GLenum target, GLenum format, GLenum type, GLvoid *image ) { ENTER_GL(); glGetConvolutionFilter(target, format, type, image); LEAVE_GL(); } /*********************************************************************** * glGetConvolutionParameterfv */ void WINAPI wine_glGetConvolutionParameterfv(GLenum target, GLenum pname, GLfloat *params ) { ENTER_GL(); glGetConvolutionParameterfv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glGetConvolutionParameteriv */ void WINAPI wine_glGetConvolutionParameteriv(GLenum target, GLenum pname, GLint *params ) { ENTER_GL(); glGetConvolutionParameteriv(target, pname, params); LEAVE_GL(); } /*********************************************************************** * glSeparableFilter2D */ void WINAPI wine_glSeparableFilter2D(GLenum target, GLenum internalformat, GLsizei width, GLsizei height, GLenum format, GLenum type, const GLvoid *row, const GLvoid *column ) { ENTER_GL(); glSeparableFilter2D(target, internalformat, width, height, format, type, row, column); LEAVE_GL(); } /*********************************************************************** * glGetSeparableFilter */ void WINAPI wine_glGetSeparableFilter(GLenum target, GLenum format, GLenum type, GLvoid *row, GLvoid *column, GLvoid *span ) { ENTER_GL(); glGetSeparableFilter(target, format, type, row, column, span); LEAVE_GL(); } /*********************************************************************** * glActiveTextureARB */ void WINAPI wine_glActiveTextureARB(GLenum texture) { ENTER_GL(); glActiveTextureARB(texture); LEAVE_GL(); } /*********************************************************************** * glClientActiveTextureARB */ void WINAPI wine_glClientActiveTextureARB(GLenum texture) { ENTER_GL(); glClientActiveTextureARB(texture); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord1dARB */ void WINAPI wine_glMultiTexCoord1dARB(GLenum target, GLdouble s) { ENTER_GL(); glMultiTexCoord1dARB(target, s); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord1dvARB */ void WINAPI wine_glMultiTexCoord1dvARB(GLenum target, const GLdouble *v) { ENTER_GL(); glMultiTexCoord1dvARB(target, v); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord1fARB */ void WINAPI wine_glMultiTexCoord1fARB(GLenum target, GLfloat s) { ENTER_GL(); glMultiTexCoord1fARB(target, s); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord1fvARB */ void WINAPI wine_glMultiTexCoord1fvARB(GLenum target, const GLfloat *v) { ENTER_GL(); glMultiTexCoord1fvARB(target, v); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord1iARB */ void WINAPI wine_glMultiTexCoord1iARB(GLenum target, GLint s) { ENTER_GL(); glMultiTexCoord1iARB(target, s); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord1ivARB */ void WINAPI wine_glMultiTexCoord1ivARB(GLenum target, const GLint *v) { ENTER_GL(); glMultiTexCoord1ivARB(target, v); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord1sARB */ void WINAPI wine_glMultiTexCoord1sARB(GLenum target, GLshort s) { ENTER_GL(); glMultiTexCoord1sARB(target, s); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord1svARB */ void WINAPI wine_glMultiTexCoord1svARB(GLenum target, const GLshort *v) { ENTER_GL(); glMultiTexCoord1svARB(target, v); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord2dARB */ void WINAPI wine_glMultiTexCoord2dARB(GLenum target, GLdouble s, GLdouble t) { ENTER_GL(); glMultiTexCoord2dARB(target, s, t); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord2dvARB */ void WINAPI wine_glMultiTexCoord2dvARB(GLenum target, const GLdouble *v) { ENTER_GL(); glMultiTexCoord2dvARB(target, v); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord2fARB */ void WINAPI wine_glMultiTexCoord2fARB(GLenum target, GLfloat s, GLfloat t) { ENTER_GL(); glMultiTexCoord2fARB(target, s, t); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord2fvARB */ void WINAPI wine_glMultiTexCoord2fvARB(GLenum target, const GLfloat *v) { ENTER_GL(); glMultiTexCoord2fvARB(target, v); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord2iARB */ void WINAPI wine_glMultiTexCoord2iARB(GLenum target, GLint s, GLint t) { ENTER_GL(); glMultiTexCoord2iARB(target, s, t); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord2ivARB */ void WINAPI wine_glMultiTexCoord2ivARB(GLenum target, const GLint *v) { ENTER_GL(); glMultiTexCoord2ivARB(target, v); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord2sARB */ void WINAPI wine_glMultiTexCoord2sARB(GLenum target, GLshort s, GLshort t) { ENTER_GL(); glMultiTexCoord2sARB(target, s, t); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord2svARB */ void WINAPI wine_glMultiTexCoord2svARB(GLenum target, const GLshort *v) { ENTER_GL(); glMultiTexCoord2svARB(target, v); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord3dARB */ void WINAPI wine_glMultiTexCoord3dARB(GLenum target, GLdouble s, GLdouble t, GLdouble r) { ENTER_GL(); glMultiTexCoord3dARB(target, s, t, r); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord3dvARB */ void WINAPI wine_glMultiTexCoord3dvARB(GLenum target, const GLdouble *v) { ENTER_GL(); glMultiTexCoord3dvARB(target, v); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord3fARB */ void WINAPI wine_glMultiTexCoord3fARB(GLenum target, GLfloat s, GLfloat t, GLfloat r) { ENTER_GL(); glMultiTexCoord3fARB(target, s, t, r); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord3fvARB */ void WINAPI wine_glMultiTexCoord3fvARB(GLenum target, const GLfloat *v) { ENTER_GL(); glMultiTexCoord3fvARB(target, v); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord3iARB */ void WINAPI wine_glMultiTexCoord3iARB(GLenum target, GLint s, GLint t, GLint r) { ENTER_GL(); glMultiTexCoord3iARB(target, s, t, r); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord3ivARB */ void WINAPI wine_glMultiTexCoord3ivARB(GLenum target, const GLint *v) { ENTER_GL(); glMultiTexCoord3ivARB(target, v); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord3sARB */ void WINAPI wine_glMultiTexCoord3sARB(GLenum target, GLshort s, GLshort t, GLshort r) { ENTER_GL(); glMultiTexCoord3sARB(target, s, t, r); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord3svARB */ void WINAPI wine_glMultiTexCoord3svARB(GLenum target, const GLshort *v) { ENTER_GL(); glMultiTexCoord3svARB(target, v); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord4dARB */ void WINAPI wine_glMultiTexCoord4dARB(GLenum target, GLdouble s, GLdouble t, GLdouble r, GLdouble q) { ENTER_GL(); glMultiTexCoord4dARB(target, s, t, r, q); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord4dvARB */ void WINAPI wine_glMultiTexCoord4dvARB(GLenum target, const GLdouble *v) { ENTER_GL(); glMultiTexCoord4dvARB(target, v); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord4fARB */ void WINAPI wine_glMultiTexCoord4fARB(GLenum target, GLfloat s, GLfloat t, GLfloat r, GLfloat q) { ENTER_GL(); glMultiTexCoord4fARB(target, s, t, r, q); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord4fvARB */ void WINAPI wine_glMultiTexCoord4fvARB(GLenum target, const GLfloat *v) { ENTER_GL(); glMultiTexCoord4fvARB(target, v); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord4iARB */ void WINAPI wine_glMultiTexCoord4iARB(GLenum target, GLint s, GLint t, GLint r, GLint q) { ENTER_GL(); glMultiTexCoord4iARB(target, s, t, r, q); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord4ivARB */ void WINAPI wine_glMultiTexCoord4ivARB(GLenum target, const GLint *v) { ENTER_GL(); glMultiTexCoord4ivARB(target, v); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord4sARB */ void WINAPI wine_glMultiTexCoord4sARB(GLenum target, GLshort s, GLshort t, GLshort r, GLshort q) { ENTER_GL(); glMultiTexCoord4sARB(target, s, t, r, q); LEAVE_GL(); } /*********************************************************************** * glMultiTexCoord4svARB */ void WINAPI wine_glMultiTexCoord4svARB(GLenum target, const GLshort *v) { ENTER_GL(); glMultiTexCoord4svARB(target, v); LEAVE_GL(); } wine-20000526/dlls/opengl32/wgl.c0100644000175000001440000002202007112613170015760 0ustar julliardusers/* Window-specific OpenGL functions implementation. Copyright (c) 1999 Lionel Ulmer */ #include #include "wine/exception.h" #include "config.h" #include "debugtools.h" #include "gdi.h" #include "dc.h" #include "windef.h" #include "winerror.h" #include "wine_gl.h" #include "x11drv.h" #include "x11font.h" #include "wgl.h" #include "opengl_ext.h" DEFAULT_DEBUG_CHANNEL(opengl); static int XGLErrorFlag = 0; static int XGLErrorHandler(Display *dpy, XErrorEvent *event) { XGLErrorFlag = 1; return 0; } /* filter for page-fault exceptions */ static WINE_EXCEPTION_FILTER(page_fault) { return EXCEPTION_EXECUTE_HANDLER; } /*********************************************************************** * wglCreateContext */ HGLRC WINAPI wglCreateContext(HDC hdc) { DC * dc = DC_GetDCPtr( hdc ); X11DRV_PDEVICE *physDev; XVisualInfo *vis; GLXContext ret; TRACE("(%08x)\n", hdc); if (dc == NULL) { ERR("Null DC !!!\n"); return NULL; } physDev = (X11DRV_PDEVICE *)dc->physDev; /* First, get the visual for the choosen pixel format */ vis = physDev->visuals[physDev->current_pf - 1]; if (vis == NULL) { ERR("NULL visual !!!\n"); /* Need to set errors here */ return NULL; } ENTER_GL(); ret = glXCreateContext(display, vis, NULL, True); LEAVE_GL(); return (HGLRC) ret; } /*********************************************************************** * wglCreateLayerContext */ HGLRC WINAPI wglCreateLayerContext(HDC hdc, int iLayerPlane) { FIXME("(%08x,%d): stub !\n", hdc, iLayerPlane); return NULL; } /*********************************************************************** * wglCopyContext */ BOOL WINAPI wglCopyContext(HGLRC hglrcSrc, HGLRC hglrcDst, UINT mask) { FIXME("(%p,%p,%d)\n", hglrcSrc, hglrcDst, mask); return FALSE; } /*********************************************************************** * wglDeleteContext */ BOOL WINAPI wglDeleteContext(HGLRC hglrc) { int (*WineXHandler)(Display *, XErrorEvent *); BOOL ret = TRUE; TRACE("(%p)\n", hglrc); ENTER_GL(); /* A game (Half Life not to name it) deletes twice the same context. To prevent crashes, run with our own error function enabled */ XSync(display, False); XGLErrorFlag = 0; WineXHandler = XSetErrorHandler(XGLErrorHandler); __TRY { glXDestroyContext(display, (GLXContext) hglrc); XSync(display, False); XFlush(display); } __EXCEPT(page_fault) { XGLErrorFlag = 1; } __ENDTRY XSetErrorHandler(WineXHandler); if (XGLErrorFlag) { TRACE("Error deleting context !\n"); SetLastError(ERROR_INVALID_HANDLE); ret = FALSE; } LEAVE_GL(); return ret; } /*********************************************************************** * wglDescribeLayerPlane */ BOOL WINAPI wglDescribeLayerPlane(HDC hdc, int iPixelFormat, int iLayerPlane, UINT nBytes, LPLAYERPLANEDESCRIPTOR plpd) { FIXME("(%08x,%d,%d,%d,%p)\n", hdc, iPixelFormat, iLayerPlane, nBytes, plpd); return FALSE; } /*********************************************************************** * wglGetCurrentContext */ HGLRC WINAPI wglGetCurrentContext(void) { GLXContext ret; TRACE("()\n"); ENTER_GL(); ret = glXGetCurrentContext(); LEAVE_GL(); TRACE(" returning %p\n", ret); return ret; } /*********************************************************************** * wglGetCurrentDC */ HDC WINAPI wglGetCurrentDC(void) { GLXContext ret; ENTER_GL(); ret = glXGetCurrentContext(); LEAVE_GL(); if (ret == NULL) { TRACE("() no current context -> returning NULL\n"); return 0; } else { FIXME("()\n"); return 0; } } /*********************************************************************** * wglGetLayerPaletteEntries */ int WINAPI wglGetLayerPaletteEntries(HDC hdc, int iLayerPlane, int iStart, int cEntries, const COLORREF *pcr) { FIXME("(): stub !\n"); return 0; } static int compar(const void *elt_a, const void *elt_b) { return strcmp(((OpenGL_extension *) elt_a)->name, ((OpenGL_extension *) elt_b)->name); } /*********************************************************************** * wglGetProcAddress */ void* WINAPI wglGetProcAddress(LPCSTR lpszProc) { void *local_func; static HMODULE hm = 0; TRACE("(%s)\n", lpszProc); if (hm == 0) hm = GetModuleHandleA("opengl32"); /* First, look if it's not already defined in the 'standard' OpenGL functions */ if ((local_func = GetProcAddress(hm, lpszProc)) != NULL) { TRACE("Found function in 'standard' OpenGL functions (%p)\n", local_func); return local_func; } /* After that, look at the extensions defined in the Linux OpenGL library */ if ((local_func = glXGetProcAddressARB(lpszProc)) == NULL) { char buf[256]; void *ret = NULL; /* Remove the 3 last letters (EXT, ARB, ...). I know that some extensions have more than 3 letters (MESA, NV, INTEL, ...), but this is only a stop-gap measure to fix buggy OpenGL drivers (moreover, it is only useful for old 1.0 apps that query the glBindTextureEXT extension). */ strncpy(buf, lpszProc, strlen(lpszProc) - 3); buf[strlen(lpszProc) - 3] = '\0'; TRACE("Extension not found in the Linux OpenGL library, checking against libGL bug with %s..\n", buf); ret = GetProcAddress(hm, buf); if (ret != NULL) { TRACE("Found function in main OpenGL library (%p) !\n", ret); } return ret; } else { OpenGL_extension ext; OpenGL_extension *ret; ext.name = (char *) lpszProc; ret = (OpenGL_extension *) bsearch(&ext, extension_registry, extension_registry_size, sizeof(OpenGL_extension), compar); if (ret != NULL) { TRACE("Returning function (%p)\n", ret->func); *(ret->func_ptr) = local_func; return ret->func; } else { ERR("Extension defined in the OpenGL library but NOT in opengl_ext.c... Please report (lionel.ulmer@free.fr) !\n"); return NULL; } } } /*********************************************************************** * wglMakeCurrent */ BOOL WINAPI wglMakeCurrent(HDC hdc, HGLRC hglrc) { BOOL ret; TRACE("(%08x,%p)\n", hdc, hglrc); if (hglrc == NULL) { ENTER_GL(); ret = glXMakeCurrent(display, None, NULL); LEAVE_GL(); } else { DC * dc = DC_GetDCPtr( hdc ); if (dc == NULL) { ERR("Null DC !!!\n"); ret = FALSE; } else { X11DRV_PDEVICE *physDev; physDev =(X11DRV_PDEVICE *)dc->physDev; ENTER_GL(); ret = glXMakeCurrent(display, physDev->drawable, (GLXContext) hglrc); LEAVE_GL(); } } TRACE("Returning %s\n", (ret ? "True" : "False")); return ret; } /*********************************************************************** * wglRealizeLayerPalette */ BOOL WINAPI wglRealizeLayerPalette(HDC hdc, int iLayerPlane, BOOL bRealize) { FIXME("()\n"); return FALSE; } /*********************************************************************** * wglSetLayerPaletteEntries */ int WINAPI wglSetLayerPaletteEntries(HDC hdc, int iLayerPlane, int iStart, int cEntries, const COLORREF *pcr) { FIXME("(): stub !\n"); return 0; } /*********************************************************************** * wglShareLists */ BOOL WINAPI wglShareLists(HGLRC hglrc1, HGLRC hglrc2) { FIXME("(): stub !\n"); return FALSE; } /*********************************************************************** * wglSwapLayerBuffers */ BOOL WINAPI wglSwapLayerBuffers(HDC hdc, UINT fuPlanes) { FIXME("(): stub !\n"); return FALSE; } /*********************************************************************** * wglUseFontBitmapsA */ BOOL WINAPI wglUseFontBitmapsA(HDC hdc, DWORD first, DWORD count, DWORD listBase) { DC * dc = DC_GetDCPtr( hdc ); X11DRV_PDEVICE *physDev = (X11DRV_PDEVICE *)dc->physDev; fontObject* pfo = XFONT_GetFontObject( physDev->font ); Font fid = pfo->fs->fid; TRACE("(%08x, %ld, %ld, %ld)\n", hdc, first, count, listBase); ENTER_GL(); /* I assume that the glyphs are at the same position for X and for Windows */ glXUseXFont(fid, first, count, listBase); LEAVE_GL(); return TRUE; } /*********************************************************************** * wglUseFontOutlinesA */ BOOL WINAPI wglUseFontOutlinesA(HDC hdc, DWORD first, DWORD count, DWORD listBase, FLOAT deviation, FLOAT extrusion, int format, LPGLYPHMETRICSFLOAT lpgmf) { FIXME("(): stub !\n"); return FALSE; } /* This is for brain-dead applications that use OpenGL functions before even creating a rendering context.... */ DECL_GLOBAL_CONSTRUCTOR(OpenGL_create_default_context) { int num; XVisualInfo template; XVisualInfo *vis; GLXContext cx; ENTER_GL(); template.visualid = XVisualIDFromVisual(visual); vis = XGetVisualInfo(display, VisualIDMask, &template, &num); cx=glXCreateContext(display, vis, 0, GL_TRUE); glXMakeCurrent(display, X11DRV_GetXRootWindow(), cx); LEAVE_GL(); } wine-20000526/dlls/opengl32/wgl.h0100644000175000001440000000500107107063407015773 0ustar julliardusers/* Window-specific OpenGL functions implementation. Copyright (c) 2000 Lionel Ulmer */ #ifndef __DLLS_OPENGL32_WGL_H #define __DLLS_OPENGL32_WGL_H #include "gdi.h" typedef void *HGLRC; typedef struct { WORD nSize; WORD nVersion; DWORD dwFlags; BYTE iPixelType; BYTE cColorBits; BYTE cRedBits; BYTE cRedShift; BYTE cGreenBits; BYTE cGreenShift; BYTE cBlueBits; BYTE cBlueShift; BYTE cAlphaBits; BYTE cAlphaShift; BYTE cAccumBits; BYTE cAccumRedBits; BYTE cAccumGreenBits; BYTE cAccumBlueBits; BYTE cAccumAlphaBits; BYTE cDepthBits; BYTE cStencilBits; BYTE cAuxBuffers; BYTE iLayerPlane; BYTE bReserved; COLORREF crTransparent; } LAYERPLANEDESCRIPTOR; typedef LAYERPLANEDESCRIPTOR* LPLAYERPLANEDESCRIPTOR; typedef struct { FLOAT x; FLOAT y; } POINTFLOAT; typedef struct { FLOAT gmfBlackBoxX; FLOAT gmfBlackBoxY; POINTFLOAT gmfptGlyphOrigin; FLOAT gmfCellIncX; FLOAT gmfCellIncY; } GLYPHMETRICSFLOAT; typedef GLYPHMETRICSFLOAT *LPGLYPHMETRICSFLOAT; HGLRC WINAPI wglCreateContext(HDC hdc) ; HGLRC WINAPI wglCreateLayerContext(HDC hdc, int iLayerPlane) ; BOOL WINAPI wglCopyContext(HGLRC hglrcSrc, HGLRC hglrcDst, UINT mask) ; BOOL WINAPI wglDeleteContext(HGLRC hglrc) ; BOOL WINAPI wglDescribeLayerPlane(HDC hdc, int iPixelFormat, int iLayerPlane, UINT nBytes, LPLAYERPLANEDESCRIPTOR plpd) ; HGLRC WINAPI wglGetCurrentContext(void) ; HDC WINAPI wglGetCurrentDC(void) ; int WINAPI wglGetLayerPaletteEntries(HDC hdc, int iLayerPlane, int iStart, int cEntries, const COLORREF *pcr) ; void * WINAPI wglGetProcAddress(LPCSTR lpszProc) ; BOOL WINAPI wglMakeCurrent(HDC hdc, HGLRC hglrc) ; BOOL WINAPI wglRealizeLayerPalette(HDC hdc, int iLayerPlane, BOOL bRealize) ; int WINAPI wglSetLayerPaletteEntries(HDC hdc, int iLayerPlane, int iStart, int cEntries, const COLORREF *pcr) ; BOOL WINAPI wglShareLists(HGLRC hglrc1, HGLRC hglrc2) ; BOOL WINAPI wglSwapLayerBuffers(HDC hdc, UINT fuPlanes); BOOL WINAPI wglUseFontBitmaps(HDC hdc, DWORD first, DWORD count, DWORD listBase) ; BOOL WINAPI wglUseFontOutlines(HDC hdc, DWORD first, DWORD count, DWORD listBase, FLOAT deviation, FLOAT extrusion, int format, LPGLYPHMETRICSFLOAT lpgmf) ; #endif /* __DLLS_OPENGL32_WGL_H */ wine-20000526/dlls/psapi/0040755000175000001440000000000007113604205014515 5ustar julliarduserswine-20000526/dlls/psapi/.cvsignore0100644000175000001440000000006007045213574016517 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libpsapi.so.1.0 wine-20000526/dlls/psapi/Makefile.in0100644000175000001440000000031707060307302016557 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = psapi SOVERSION = 1.0 SPEC_SRCS = psapi.spec C_SRCS = \ psapi_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/psapi/psapi.spec0100644000175000001440000000232207033475134016511 0ustar julliardusersname psapi type win32 @ stdcall EmptyWorkingSet(long) EmptyWorkingSet @ stdcall EnumDeviceDrivers(ptr long ptr) EnumDeviceDrivers @ stdcall EnumProcessModules(long ptr long ptr) EnumProcessModules @ stdcall EnumProcesses(ptr long ptr) EnumProcesses @ stdcall GetDeviceDriverBaseNameA(ptr str long) GetDeviceDriverBaseNameA @ stdcall GetDeviceDriverBaseNameW(ptr wstr long) GetDeviceDriverBaseNameW @ stdcall GetDeviceDriverFileNameA(ptr str long) GetDeviceDriverFileNameA @ stdcall GetDeviceDriverFileNameW(ptr wstr long) GetDeviceDriverFileNameW @ stdcall GetMappedFileNameA(long ptr str long) GetMappedFileNameA @ stdcall GetMappedFileNameW(long ptr wstr long) GetMappedFileNameW @ stdcall GetModuleBaseNameA(long long str long) GetModuleBaseNameA @ stdcall GetModuleBaseNameW(long long wstr long) GetModuleBaseNameW @ stdcall GetModuleFileNameExA(long long str long) GetModuleFileNameExA @ stdcall GetModuleFileNameExW(long long wstr long) GetModuleFileNameExW @ stdcall GetModuleInformation(long long ptr long) GetModuleInformation @ stdcall GetProcessMemoryInfo(long ptr long) GetProcessMemoryInfo @ stdcall GetWsChanges(long ptr long) GetWsChanges @ stdcall InitializeProcessForWsWatch(long) InitializeProcessForWsWatch wine-20000526/dlls/psapi/psapi_main.c0100644000175000001440000001602607070212245017004 0ustar julliardusers/* * PSAPI library * * Copyright 1998 Patrik Stridvall */ #include "winbase.h" #include "windef.h" #include "winerror.h" #include "debugtools.h" #include "psapi.h" DEFAULT_DEBUG_CHANNEL(psapi) #include /*********************************************************************** * EmptyWorkingSet (PSAPI.1) */ BOOL WINAPI EmptyWorkingSet(HANDLE hProcess) { return SetProcessWorkingSetSize(hProcess, 0xFFFFFFFF, 0xFFFFFFFF); } /*********************************************************************** * EnumDeviceDrivers (PSAPI.2) */ BOOL WINAPI EnumDeviceDrivers( LPVOID *lpImageBase, DWORD cb, LPDWORD lpcbNeeded) { FIXME("(%p, %ld, %p): stub\n", lpImageBase, cb, lpcbNeeded); if(lpcbNeeded) *lpcbNeeded = 0; return TRUE; } /*********************************************************************** * EnumProcesses (PSAPI.3) */ BOOL WINAPI EnumProcesses(DWORD *lpidProcess, DWORD cb, DWORD *lpcbNeeded) { FIXME("(%p, %ld, %p): stub\n", lpidProcess,cb, lpcbNeeded); if(lpcbNeeded) *lpcbNeeded = 0; return TRUE; } /*********************************************************************** * EnumProcessModules (PSAPI.4) */ BOOL WINAPI EnumProcessModules( HANDLE hProcess, HMODULE *lphModule, DWORD cb, LPDWORD lpcbNeeded) { FIXME("(hProcess=0x%08x, %p, %ld, %p): stub\n", hProcess, lphModule, cb, lpcbNeeded ); if(lpcbNeeded) *lpcbNeeded = 0; return TRUE; } /*********************************************************************** * GetDeviceDriverBaseNameA (PSAPI.5) */ DWORD WINAPI GetDeviceDriverBaseNameA( LPVOID ImageBase, LPSTR lpBaseName, DWORD nSize) { FIXME("(%p, %s, %ld): stub\n", ImageBase, debugstr_a(lpBaseName), nSize ); if(lpBaseName && nSize) lpBaseName[0] = '\0'; return 0; } /*********************************************************************** * GetDeviceDriverBaseNameW (PSAPI.6) */ DWORD WINAPI GetDeviceDriverBaseNameW( LPVOID ImageBase, LPWSTR lpBaseName, DWORD nSize) { FIXME("(%p, %s, %ld): stub\n", ImageBase, debugstr_w(lpBaseName), nSize ); if(lpBaseName && nSize) lpBaseName[0] = '\0'; return 0; } /*********************************************************************** * GetDeviceDriverFileNameA (PSAPI.7) */ DWORD WINAPI GetDeviceDriverFileNameA( LPVOID ImageBase, LPSTR lpFilename, DWORD nSize) { FIXME("(%p, %s, %ld): stub\n", ImageBase, debugstr_a(lpFilename), nSize ); if(lpFilename && nSize) lpFilename[0] = '\0'; return 0; } /*********************************************************************** * GetDeviceDriverFileNameW (PSAPI.8) */ DWORD WINAPI GetDeviceDriverFileNameW( LPVOID ImageBase, LPWSTR lpFilename, DWORD nSize) { FIXME("(%p, %s, %ld): stub\n", ImageBase, debugstr_w(lpFilename), nSize ); if(lpFilename && nSize) lpFilename[0] = '\0'; return 0; } /*********************************************************************** * GetMappedFileNameA (PSAPI.9) */ DWORD WINAPI GetMappedFileNameA( HANDLE hProcess, LPVOID lpv, LPSTR lpFilename, DWORD nSize) { FIXME("(hProcess=0x%08x, %p, %s, %ld): stub\n", hProcess, lpv, debugstr_a(lpFilename), nSize ); if(lpFilename && nSize) lpFilename[0] = '\0'; return 0; } /*********************************************************************** * GetMappedFileNameW (PSAPI.10) */ DWORD WINAPI GetMappedFileNameW( HANDLE hProcess, LPVOID lpv, LPWSTR lpFilename, DWORD nSize) { FIXME("(hProcess=0x%08x, %p, %s, %ld): stub\n", hProcess, lpv, debugstr_w(lpFilename), nSize ); if(lpFilename && nSize) lpFilename[0] = '\0'; return 0; } /*********************************************************************** * GetModuleBaseNameA (PSAPI.11) */ DWORD WINAPI GetModuleBaseNameA( HANDLE hProcess, HMODULE hModule, LPSTR lpBaseName, DWORD nSize) { FIXME("(hProcess=0x%08x, hModule=0x%08x, %s, %ld): stub\n", hProcess, hModule, debugstr_a(lpBaseName), nSize ); if(lpBaseName && nSize) lpBaseName[0] = '\0'; return 0; } /*********************************************************************** * GetModuleBaseNameW (PSAPI.12) */ DWORD WINAPI GetModuleBaseNameW( HANDLE hProcess, HMODULE hModule, LPWSTR lpBaseName, DWORD nSize) { FIXME("(hProcess=0x%08x, hModule=0x%08x, %s, %ld): stub\n", hProcess, hModule, debugstr_w(lpBaseName), nSize); if(lpBaseName && nSize) lpBaseName[0] = '\0'; return 0; } /*********************************************************************** * GetModuleFileNameExA (PSAPI.13) */ DWORD WINAPI GetModuleFileNameExA( HANDLE hProcess, HMODULE hModule, LPSTR lpFilename, DWORD nSize) { FIXME("(hProcess=0x%08x,hModule=0x%08x, %s, %ld): stub\n", hProcess, hModule, debugstr_a(lpFilename), nSize ); if(lpFilename&&nSize) lpFilename[0]='\0'; return 0; } /*********************************************************************** * GetModuleFileNameExW (PSAPI.14) */ DWORD WINAPI GetModuleFileNameExW( HANDLE hProcess, HMODULE hModule, LPWSTR lpFilename, DWORD nSize) { FIXME("(hProcess=0x%08x,hModule=0x%08x, %s, %ld): stub\n", hProcess, hModule, debugstr_w(lpFilename), nSize ); if(lpFilename && nSize) lpFilename[0] = '\0'; return 0; } /*********************************************************************** * GetModuleInformation (PSAPI.15) */ BOOL WINAPI GetModuleInformation( HANDLE hProcess, HMODULE hModule, LPMODULEINFO lpmodinfo, DWORD cb) { FIXME("(hProcess=0x%08x, hModule=0x%08x, %p, %ld): stub\n", hProcess, hModule, lpmodinfo, cb ); memset(lpmodinfo, 0, cb); return TRUE; } /*********************************************************************** * GetProcessMemoryInfo (PSAPI.16) */ BOOL WINAPI GetProcessMemoryInfo( HANDLE Process, PPROCESS_MEMORY_COUNTERS ppsmemCounters, DWORD cb) { FIXME("(hProcess=0x%08x, %p, %ld): stub\n", Process, ppsmemCounters, cb ); memset(ppsmemCounters, 0, cb); return TRUE; } /*********************************************************************** * GetWsChanges (PSAPI.17) */ BOOL WINAPI GetWsChanges( HANDLE hProcess, PPSAPI_WS_WATCH_INFORMATION lpWatchInfo, DWORD cb) { FIXME("(hProcess=0x%08x, %p, %ld): stub\n", hProcess, lpWatchInfo, cb ); memset(lpWatchInfo, 0, cb); return TRUE; } /*********************************************************************** * InitializeProcessForWsWatch (PSAPI.18) */ BOOL WINAPI InitializeProcessForWsWatch(HANDLE hProcess) { FIXME("(hProcess=0x%08x): stub\n", hProcess); return TRUE; } /*********************************************************************** * QueryWorkingSet (PSAPI.?) * FIXME * I haven't been able to find the ordinal for this function, * This means it can't be called from outside the DLL. */ BOOL WINAPI QueryWorkingSet(HANDLE hProcess, LPVOID pv, DWORD cb) { FIXME("(hProcess=0x%08x, %p, %ld)", hProcess, pv, cb); if(pv && cb) ((DWORD *) pv)[0] = 0; /* Empty WorkingSet */ return TRUE; } wine-20000526/dlls/rasapi32/0040755000175000001440000000000007113604205015025 5ustar julliarduserswine-20000526/dlls/rasapi32/.cvsignore0100644000175000001440000000006307045213574017032 0ustar julliardusers*.spec.c *.spec.glue.s Makefile librasapi32.so.1.0 wine-20000526/dlls/rasapi32/Makefile.in0100644000175000001440000000036207060456112017073 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = rasapi32 SOVERSION = 1.0 ALTNAMES = rasapi16 SPEC_SRCS = rasapi32.spec rasapi16.spec C_SRCS = rasapi.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/rasapi32/rasapi.c0100644000175000001440000000242607070212245016452 0ustar julliardusers/* * RASAPI32 * * Copyright 1998 Marcus Meissner */ #include "windef.h" #include "ras.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ras) /************************************************************************** * RasEnumConnectionsA [RASAPI32.544] */ DWORD WINAPI RasEnumConnectionsA( LPRASCONNA rca, LPDWORD x, LPDWORD y) { /* Remote Access Service stuff is done by underlying OS anyway */ FIXME("(%p,%p,%p),stub!\n",rca,x,y); return 0; } /************************************************************************** * RasEnumEntriesA [RASAPI32.546] */ DWORD WINAPI RasEnumEntriesA( LPSTR Reserved, LPSTR lpszPhoneBook, LPRASENTRYNAME lpRasEntryName, LPDWORD lpcb, LPDWORD lpcEntries) { FIXME("(%p,%s,%p,%p,%p),stub!\n",Reserved,debugstr_a(lpszPhoneBook), lpRasEntryName,lpcb,lpcEntries); *lpcEntries = 0; return 0; } /************************************************************************** * RasGetEntryDialParamsA [RASAPI32.550] */ DWORD WINAPI RasGetEntryDialParamsA( LPSTR lpszPhoneBook, LPRASDIALPARAMS lpRasDialParams, LPBOOL lpfPassword) { FIXME("(%s,%p,%p),stub!\n",debugstr_a(lpszPhoneBook), lpRasDialParams,lpfPassword); return 0; } wine-20000526/dlls/rasapi32/rasapi16.spec0100644000175000001440000000034106752006277017337 0ustar julliardusersname rasapi16 type win16 #1 stub WEP #2 stub DLLENTRYPOINT 3 stub RNA1632_THUNKDATA16 4 stub RasGetErrorString 5 stub RasEnumConnections 6 stub RasHangUp 7 stub RasEnumEntries 8 stub RasGetConnectStatus 9 stub RasDial wine-20000526/dlls/rasapi32/rasapi32.spec0100644000175000001440000000373007011406274017330 0ustar julliardusersname rasapi32 type win32 500 stub RnaEngineRequest 501 stub DialEngineRequest 502 stub SuprvRequest 503 stub DialInMessage 504 stub RnaEnumConnEntries 505 stub RnaGetConnEntry 506 stub RnaFreeConnEntry 507 stub RnaSaveConnEntry 508 stub RnaDeleteConnEntry 509 stub RnaRenameConnEntry 510 stub RnaValidateEntryName 511 stub RnaEnumDevices 512 stub RnaGetDeviceInfo 513 stub RnaGetDefaultDevConfig 514 stub RnaBuildDevConfig 515 stub RnaDevConfigDlg 516 stub RnaFreeDevConfig 517 stub RnaActivateEngine 518 stub RnaDeactivateEngine 519 stub SuprvEnumAccessInfo 520 stub SuprvGetAccessInfo 521 stub SuprvSetAccessInfo 522 stub SuprvGetAdminConfig 523 stub SuprvInitialize 524 stub SuprvDeInitialize 525 stub RnaUIDial 526 stub RnaImplicitDial 527 stub RasDial16 528 stub RnaSMMInfoDialog 529 stub RnaEnumerateMacNames 530 stub RnaEnumCountryInfo 531 stub RnaGetAreaCodeList 532 stub RnaFindDriver 533 stub RnaInstallDriver 534 stub RnaGetDialSettings 535 stub RnaSetDialSettings 536 stub RnaGetIPInfo 537 stub RnaSetIPInfo 538 stub RasCreatePhonebookEntryA 539 stub RasCreatePhonebookEntryW 540 stub RasDialA 541 stub RasDialW 542 stub RasEditPhonebookEntryA 543 stub RasEditPhonebookEntryW 544 stdcall RasEnumConnectionsA(ptr ptr ptr) RasEnumConnectionsA 545 stub RasEnumConnectionsW 546 stdcall RasEnumEntriesA(str str ptr ptr ptr) RasEnumEntriesA 547 stub RasEnumEntriesW 548 stub RasGetConnectStatusA 549 stub RasGetConnectStatusW 550 stdcall RasGetEntryDialParamsA(str ptr ptr) RasGetEntryDialParamsA 551 stub RasGetEntryDialParamsW 552 stub RasGetErrorStringA 553 stub RasGetErrorStringW 554 stub RasGetProjectionInfoA 555 stub RasGetProjectionInfoW 556 stub RasHangUpA 557 stub RasHangUpW 558 stub RasSetEntryDialParamsA 559 stub RasSetEntryDialParamsW 560 stub RnaCloseMac 561 stub RnaComplete 562 stub RnaGetDevicePort 563 stub RnaGetUserProfile 564 stub RnaOpenMac 565 stub RnaSessInitialize 566 stub RnaStartCallback 567 stub RnaTerminate 568 stub RnaUICallbackDialog 569 stub RnaUIUsernamePassword wine-20000526/dlls/richedit/0040755000175000001440000000000007113604206015175 5ustar julliarduserswine-20000526/dlls/richedit/.cvsignore0100644000175000001440000000005407104066003017166 0ustar julliardusersMakefile libriched32.so.1.0 riched32.spec.c wine-20000526/dlls/richedit/Makefile.in0100644000175000001440000000043007105350315017234 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = riched32 SOVERSION = 1.0 WRCEXTRA = -s -p$(MODULE) SPEC_SRCS = riched32.spec C_SRCS = \ charlist.c \ reader.c \ text-writer.c \ richedit.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/richedit/ansi_gen.h0100644000175000001440000001170707105350315017134 0ustar julliardusers/* RTF ANSI character set (\ansi) general map These are taken from the ISO-Latin-1 (ISO-8859-1) encodings, with a few additions Field 1 is the standard character name which the character value in field 2 maps onto. (It doesn't mean "to produce the character in field 1, use the value in field 2.) The character value may be given either as a single character (which will be converted to the ASCII value of the character), or in numeric format, either in decimal or 0xyy as hex yy. Single or double quotes may be used to quote characters.*/ int ansi_gen[] = { rtfSC_formula ,0x06, rtfSC_nobrkhyphen ,0x1e, rtfSC_opthyphen ,0x1f, rtfSC_space ,' ', rtfSC_exclam ,'!', rtfSC_quotedbl ,'"', rtfSC_numbersign ,'#', rtfSC_dollar ,'$', rtfSC_percent ,'%', rtfSC_ampersand ,'&', rtfSC_quoteright ,'\\', rtfSC_parenleft ,'(', rtfSC_parenright ,')', rtfSC_asterisk ,'*', rtfSC_plus ,'+', rtfSC_comma ,',', rtfSC_hyphen ,'-', rtfSC_period ,'.', rtfSC_slash ,'/', rtfSC_zero ,'0', rtfSC_one ,'1', rtfSC_two ,'2', rtfSC_three ,'3', rtfSC_four ,'4', rtfSC_five ,'5', rtfSC_six ,'6', rtfSC_seven ,'7', rtfSC_eight ,'8', rtfSC_nine ,'9', rtfSC_colon ,':', rtfSC_semicolon ,';', rtfSC_less ,'<', rtfSC_equal ,'=', rtfSC_greater ,'>', rtfSC_question ,'?', rtfSC_at ,'@', rtfSC_A ,'A', rtfSC_B ,'B', rtfSC_C ,'C', rtfSC_D ,'D', rtfSC_E ,'E', rtfSC_F ,'F', rtfSC_G ,'G', rtfSC_H ,'H', rtfSC_I ,'I', rtfSC_J ,'J', rtfSC_K ,'K', rtfSC_L ,'L', rtfSC_M ,'M', rtfSC_N ,'N', rtfSC_O ,'O', rtfSC_P ,'P', rtfSC_Q ,'Q', rtfSC_R ,'R', rtfSC_S ,'S', rtfSC_T ,'T', rtfSC_U ,'U', rtfSC_V ,'V', rtfSC_W ,'W', rtfSC_X ,'X', rtfSC_Y ,'Y', rtfSC_Z ,'Z', rtfSC_bracketleft ,'[', rtfSC_backslash ,'\\', rtfSC_bracketright ,']', rtfSC_asciicircum ,'^', rtfSC_underscore ,'_', rtfSC_quoteleft ,'`', rtfSC_a ,'a', rtfSC_b ,'b', rtfSC_c ,'c', rtfSC_d ,'d', rtfSC_e ,'e', rtfSC_f ,'f', rtfSC_g ,'g', rtfSC_h ,'h', rtfSC_i ,'i', rtfSC_j ,'j', rtfSC_k ,'k', rtfSC_l ,'l', rtfSC_m ,'m', rtfSC_n ,'n', rtfSC_o ,'o', rtfSC_p ,'p', rtfSC_q ,'q', rtfSC_r ,'r', rtfSC_s ,'s', rtfSC_t ,'t', rtfSC_u ,'u', rtfSC_v ,'v', rtfSC_w ,'w', rtfSC_x ,'x', rtfSC_y ,'y', rtfSC_z ,'z', rtfSC_braceleft ,'{', rtfSC_bar ,'|', rtfSC_braceright ,'}', rtfSC_asciitilde ,'~', rtfSC_nobrkspace ,0xa0, rtfSC_exclamdown ,0xa1, rtfSC_cent ,0xa2, rtfSC_sterling ,0xa3, rtfSC_currency ,0xa4, rtfSC_yen ,0xa5, rtfSC_brokenbar ,0xa6, rtfSC_section ,0xa7, rtfSC_dieresis ,0xa8, rtfSC_copyright ,0xa9, rtfSC_ordfeminine ,0xaa, rtfSC_guillemotleft ,0xab, rtfSC_logicalnot ,0xac, rtfSC_opthyphen ,0xad, rtfSC_registered ,0xae, rtfSC_macron ,0xaf, rtfSC_degree ,0xb0, rtfSC_plusminus ,0xb1, rtfSC_twosuperior ,0xb2, rtfSC_threesuperior ,0xb3, rtfSC_acute ,0xb4, rtfSC_mu ,0xb5, rtfSC_paragraph ,0xb6, rtfSC_periodcentered ,0xb7, rtfSC_cedilla ,0xb8, rtfSC_onesuperior ,0xb9, rtfSC_ordmasculine ,0xba, rtfSC_guillemotright ,0xbb, rtfSC_onequarter ,0xbc, rtfSC_onehalf ,0xbd, rtfSC_threequarters ,0xbe, rtfSC_questiondown ,0xbf, rtfSC_Agrave ,0xc0, rtfSC_Aacute ,0xc1, rtfSC_Acircumflex ,0xc2, rtfSC_Atilde ,0xc3, rtfSC_Adieresis ,0xc4, rtfSC_Aring ,0xc5, rtfSC_AE ,0xc6, rtfSC_Ccedilla ,0xc7, rtfSC_Egrave ,0xc8, rtfSC_Eacute ,0xc9, rtfSC_Ecircumflex ,0xca, rtfSC_Edieresis ,0xcb, rtfSC_Igrave ,0xcc, rtfSC_Iacute ,0xcd, rtfSC_Icircumflex ,0xce, rtfSC_Idieresis ,0xcf, rtfSC_Eth ,0xd0, rtfSC_Ntilde ,0xd1, rtfSC_Ograve ,0xd2, rtfSC_Oacute ,0xd3, rtfSC_Ocircumflex ,0xd4, rtfSC_Otilde ,0xd5, rtfSC_Odieresis ,0xd6, rtfSC_multiply ,0xd7, rtfSC_Oslash ,0xd8, rtfSC_Ugrave ,0xd9, rtfSC_Uacute ,0xda, rtfSC_Ucircumflex ,0xdb, rtfSC_Udieresis ,0xdc, rtfSC_Yacute ,0xdd, rtfSC_Thorn ,0xde, rtfSC_germandbls ,0xdf, rtfSC_agrave ,0xe0, rtfSC_aacute ,0xe1, rtfSC_acircumflex ,0xe2, rtfSC_atilde ,0xe3, rtfSC_adieresis ,0xe4, rtfSC_aring ,0xe5, rtfSC_ae ,0xe6, rtfSC_ccedilla ,0xe7, rtfSC_egrave ,0xe8, rtfSC_eacute ,0xe9, rtfSC_ecircumflex ,0xea, rtfSC_edieresis ,0xeb, rtfSC_igrave ,0xec, rtfSC_iacute ,0xed, rtfSC_icircumflex ,0xee, rtfSC_idieresis ,0xef, rtfSC_eth ,0xf0, rtfSC_ntilde ,0xf1, rtfSC_ograve ,0xf2, rtfSC_oacute ,0xf3, rtfSC_ocircumflex ,0xf4, rtfSC_otilde ,0xf5, rtfSC_odieresis ,0xf6, rtfSC_divide ,0xf7, rtfSC_oslash ,0xf8, rtfSC_ugrave ,0xf9, rtfSC_uacute ,0xfa, rtfSC_ucircumflex ,0xfb, rtfSC_udieresis ,0xfc, rtfSC_yacute ,0xfd, rtfSC_thorn ,0xfe, rtfSC_ydieresis ,0xff }; wine-20000526/dlls/richedit/ansi_sym.h0100644000175000001440000000604207105350315017167 0ustar julliardusers/* * RTF ANSI character set (\ansi) Symbol font map * * Field 1 is the standard character name which the character value in * field 2 maps onto. (It doesn't mean "to produce the character in field 1, * use the value in field 2.) * * The character value may be given either as a single character (which will be * converted to the ASCII value of the character), or in numeric format, either * in decimal or 0xyy as hex yy. Single or double quotes may be used to quote * characters. * */ int ansi_sym[] = { rtfSC_formula ,0x06, rtfSC_nobrkhyphen ,0x1e, rtfSC_opthyphen ,0x1f, rtfSC_space ,' ', rtfSC_exclam ,'!', rtfSC_universal ,'"', rtfSC_mathnumbersign ,'#', rtfSC_existential ,'$', rtfSC_percent ,'%', rtfSC_ampersand ,'&', rtfSC_suchthat ,'\\', rtfSC_parenleft ,'(', rtfSC_parenright ,')', rtfSC_mathasterisk ,'*', rtfSC_mathplus ,'+', rtfSC_comma ,',', rtfSC_mathminus ,'-', rtfSC_period ,'.', rtfSC_slash ,'/', rtfSC_zero ,'0', rtfSC_one ,'1', rtfSC_two ,'2', rtfSC_three ,'3', rtfSC_four ,'4', rtfSC_five ,'5', rtfSC_six ,'6', rtfSC_seven ,'7', rtfSC_eight ,'8', rtfSC_nine ,'9', rtfSC_colon ,':', rtfSC_semicolon ,';', rtfSC_less ,'<', rtfSC_mathequal ,'=', rtfSC_greater ,'>', rtfSC_question ,'?', rtfSC_congruent ,'@', rtfSC_Alpha ,'A', rtfSC_Beta ,'B', rtfSC_Chi ,'C', rtfSC_Delta ,'D', rtfSC_Epsilon ,'E', rtfSC_Phi ,'F', rtfSC_Gamma ,'G', rtfSC_Eta ,'H', rtfSC_Iota ,'I', rtfSC_Kappa ,'K', rtfSC_Lambda ,'L', rtfSC_Mu ,'M', rtfSC_Nu ,'N', rtfSC_Omicron ,'O', rtfSC_Pi ,'P', rtfSC_Theta ,'Q', rtfSC_Rho ,'R', rtfSC_Sigma ,'S', rtfSC_Tau ,'T', rtfSC_Upsilon ,'U', rtfSC_varsigma ,'V', rtfSC_Omega ,'W', rtfSC_Xi ,'X', rtfSC_Psi ,'Y', rtfSC_Zeta ,'Z', rtfSC_bracketleft ,'[', rtfSC_backslash ,'\\', rtfSC_bracketright ,']', rtfSC_asciicircum ,'^', rtfSC_underscore ,'_', rtfSC_quoteleft ,'`', rtfSC_alpha ,'a', rtfSC_beta ,'b', rtfSC_chi ,'c', rtfSC_delta ,'d', rtfSC_epsilon ,'e', rtfSC_phi ,'f', rtfSC_gamma ,'g', rtfSC_eta ,'h', rtfSC_iota ,'i', rtfSC_kappa ,'k', rtfSC_lambda ,'l', rtfSC_mu ,'m', rtfSC_nu ,'n', rtfSC_omicron ,'o', rtfSC_pi ,'p', rtfSC_theta ,'q', rtfSC_rho ,'r', rtfSC_sigma ,'s', rtfSC_tau ,'t', rtfSC_upsilon ,'u', rtfSC_omega ,'w', rtfSC_xi ,'x', rtfSC_psi ,'y', rtfSC_zeta ,'z', rtfSC_braceleft ,'{', rtfSC_bar ,'|', rtfSC_braceright ,'}', rtfSC_mathtilde ,'~' }; wine-20000526/dlls/richedit/charlist.c0100644000175000001440000000472707105350315017161 0ustar julliardusers/* * * Character List * * Copyright (c) 2000 by Jean-Claude Batista * */ #include #include #include #include #include #include "charlist.h" #include "windows.h" extern HANDLE RICHED32_hHeap; void CHARLIST_Enqueue( CHARLIST* pCharList, char myChar ) { CHARLISTENTRY* pNewEntry = HeapAlloc(RICHED32_hHeap, 0,sizeof(CHARLISTENTRY)); pNewEntry->pNext = NULL; pNewEntry->myChar = myChar; if(pCharList->pTail == NULL) { pCharList->pHead = pCharList->pTail = pNewEntry; } else { CHARLISTENTRY* pCurrent = pCharList->pTail; pCharList->pTail = pCurrent->pNext = pNewEntry; } pCharList->nCount++; } void CHARLIST_Push( CHARLIST* pCharList, char myChar) { CHARLISTENTRY* pNewEntry = malloc(sizeof(CHARLISTENTRY)); pNewEntry->myChar = myChar; if(pCharList->pHead == NULL) { pCharList->pHead = pCharList->pTail = pNewEntry; pNewEntry->pNext = NULL; } else { pNewEntry->pNext = pCharList->pHead; pCharList->pHead = pNewEntry; } pCharList->nCount++; } char CHARLIST_Dequeue(CHARLIST* pCharList) { CHARLISTENTRY* pCurrent; char myChar; if(pCharList->nCount == 0) return 0; pCharList->nCount--; myChar = pCharList->pHead->myChar; pCurrent = pCharList->pHead->pNext; HeapFree(RICHED32_hHeap, 0,pCharList->pHead); if(pCharList->nCount == 0) { pCharList->pHead = pCharList->pTail = NULL; } else { pCharList->pHead = pCurrent; } return myChar; } int CHARLIST_GetNbItems(CHARLIST* pCharList) { return pCharList->nCount; } void CHARLIST_FreeList(CHARLIST* pCharList){ while(pCharList->nCount) CHARLIST_Dequeue(pCharList); } /* this function count the number of occurences of a caracter */ int CHARLIST_CountChar(CHARLIST* pCharList, char myChar) { CHARLISTENTRY *pCurrent; int nCount = 0; for(pCurrent =pCharList->pHead ;pCurrent;pCurrent=pCurrent->pNext) if(pCurrent->myChar == myChar) nCount++; return nCount; } int CHARLIST_toBuffer(CHARLIST* pCharList, char* pBuffer, int nBufferSize) { /* we add one to store a NULL caracter */ if(nBufferSize < pCharList->nCount + 1) return pCharList->nCount; for(;pCharList->nCount;pBuffer++) *pBuffer = CHARLIST_Dequeue(pCharList); *pBuffer = '\0'; return 0; } wine-20000526/dlls/richedit/charlist.h0100644000175000001440000000124207105350315017153 0ustar julliardusers#ifndef _CHARLIST #define _CHARLIST typedef struct _tagCHARLISTENTRY { struct _tagCHARLISTENTRY *pNext; char myChar; } CHARLISTENTRY; typedef struct _tagCHARLIST { unsigned int nCount; // Entries Count; CHARLISTENTRY *pHead; CHARLISTENTRY *pTail; } CHARLIST; void CHARLIST_Enqueue( CHARLIST* pCharList, char myChar); void CHARLIST_Push( CHARLIST* pCharList, char myChar); char CHARLIST_Dequeue(CHARLIST* pCharList); int CHARLIST_GetNbItems(CHARLIST* pCharList); void CHARLIST_FreeList(CHARLIST* pCharList); int CHARLIST_CountChar(CHARLIST* pCharList, char myChar); int CHARLIST_toBuffer(CHARLIST* pCharList, char* pBuffer, int nBufferSize); #endifwine-20000526/dlls/richedit/reader.c0100644000175000001440000023142607105350315016610 0ustar julliardusers/* * - Need to document error code meanings. * - Need to do something with \* on destinations. * - Make the parameter a long? * * reader.c - RTF file reader. Release 1.10. * * ASCII 10 (\n) and 13 (\r) are ignored and silently discarded. * Nulls are also discarded. * (although the read hook will still get a look at them.) * * "\:" is not a ":", it's a control symbol. But some versions of * Word seem to write "\:" for ":". This reader treats "\:" as a * plain text ":" * * 19 Mar 93 * - Add hack to skip "{\*\keycode ... }" group in stylesheet. * This is probably the wrong thing to do, but it's simple. * 13 Jul 93 * - Add THINK C awareness to malloc() declaration. Necessary so * compiler knows the malloc argument is 4 bytes. Ugh. * 07 Sep 93 * - Text characters are mapped onto standard codes, which are placed * in rtfMinor. * - Eliminated use of index() function. * 05 Mar 94 * - Added zillions of new symbols (those defined in RTF spec 1.2). * 14 Mar 94 * - Public functions RTFMsg() and RTFPanic() now take variable arguments. * This means RTFPanic() now is used in place of what was formerly the * internal function Error(). * - 8-bit characters are now legal, so they're not converted to \'xx * hex char representation now. * 01 Apr 94 * - Added public variables rtfLineNum and rtfLinePos. * - #include string.h or strings.h, avoiding strncmp() problem where * last argument is treated as zero when prototype isn't available. * 04 Apr 94 * - Treat style numbers 222 and 0 properly as "no style" and "normal". * * Author: Paul DuBois dubois@primate.wisc.edu * * This software may be redistributed without restriction and used for * any purpose whatsoever. */ # ifndef STRING_H # define STRING_H # endif # include # include # include STRING_H # ifdef STDARG # include # else # ifdef VARARGS # include # endif /* VARARGS */ # endif /* STDARG */ # define rtfInternal # include "rtf.h" # undef rtfInternal /* * include hard coded charsets */ #include "ansi_gen.h" #include "ansi_sym.h" #include "text_map.h" #include #include "charlist.h" #include "windows.h" extern HANDLE RICHED32_hHeap; /* * Return pointer to new element of type t, or NULL * if no memory available. */ # define New(t) ((t *) RTFAlloc ((int) sizeof (t))) /* maximum number of character values representable in a byte */ # define charSetSize 256 /* charset stack size */ # define maxCSStack 10 #ifndef THINK_C extern char *malloc (); #else extern void *malloc(size_t); #endif static int _RTFGetChar(); static void _RTFGetToken (); static void _RTFGetToken2 (); static int GetChar (); static void ReadFontTbl (); static void ReadColorTbl (); static void ReadStyleSheet (); static void ReadInfoGroup (); static void ReadPictGroup (); static void ReadObjGroup (); static void LookupInit (); static void Lookup (); static int Hash (); static void CharSetInit (); static void ReadCharSetMaps (); /* * Public variables (listed in rtf.h) */ int rtfClass; int rtfMajor; int rtfMinor; int rtfParam; char *rtfTextBuf = (char *) NULL; int rtfTextLen; long rtfLineNum; int rtfLinePos; /* * Private stuff */ static int pushedChar; /* pushback char if read too far */ static int pushedClass; /* pushed token info for RTFUngetToken() */ static int pushedMajor; static int pushedMinor; static int pushedParam; static char *pushedTextBuf = (char *) NULL; static int prevChar; static int bumpLine; static RTFFont *fontList = (RTFFont *) NULL; /* these lists MUST be */ static RTFColor *colorList = (RTFColor *) NULL; /* initialized to NULL */ static RTFStyle *styleList = (RTFStyle *) NULL; static char *inputName = (char *) NULL; static char *outputName = (char *) NULL; static EDITSTREAM editstream; static CHARLIST inputCharList = {0, NULL, NULL}; /* * This array is used to map standard character names onto their numeric codes. * The position of the name within the array is the code. * stdcharnames.h is generated in the ../h directory. */ static char *stdCharName[] = { # include "stdcharnames.h" (char *) NULL }; /* * These arrays are used to map RTF input character values onto the standard * character names represented by the values. Input character values are * used as indices into the arrays to produce standard character codes. */ static char *genCharSetFile = (char *) NULL; static int genCharCode[charSetSize]; /* general */ static int haveGenCharSet = 0; static char *symCharSetFile = (char *) NULL; static int symCharCode[charSetSize]; /* symbol */ static int haveSymCharSet = 0; static int curCharSet = rtfCSGeneral; static int *curCharCode = genCharCode; /* * By default, the reader is configured to handle charset mapping invisibly, * including reading the charset files and switching charset maps as necessary * for Symbol font. */ static int autoCharSetFlags; /* * Stack for keeping track of charset map on group begin/end. This is * necessary because group termination reverts the font to the previous * value, which may implicitly change it. */ static int csStack[maxCSStack]; static int csTop = 0; /* * Get a char from the charlist. The charlist is used to store characters * from the editstream. * */ int _RTFGetChar() { char myChar; if(CHARLIST_GetNbItems(&inputCharList) == 0) { char buff[10]; long pcb; editstream.pfnCallback(editstream.dwCookie, buff, 1, &pcb); if(pcb == 0) return EOF; else CHARLIST_Enqueue(&inputCharList, buff[0]); } myChar = CHARLIST_Dequeue(&inputCharList); return (int) myChar; } void RTFSetEditStream(EDITSTREAM *es) { editstream.dwCookie = es->dwCookie; editstream.dwError = es->dwError; editstream.pfnCallback = es->pfnCallback; } /* * Initialize the reader. This may be called multiple times, * to read multiple files. The only thing not reset is the input * stream; that must be done with RTFSetStream(). */ void RTFInit () { int i; RTFColor *cp; RTFFont *fp; RTFStyle *sp; RTFStyleElt *eltList, *ep; if (rtfTextBuf == (char *) NULL) /* initialize the text buffers */ { rtfTextBuf = RTFAlloc (rtfBufSiz); pushedTextBuf = RTFAlloc (rtfBufSiz); if (rtfTextBuf == (char *) NULL || pushedTextBuf == (char *) NULL) RTFPanic ("Cannot allocate text buffers."); rtfTextBuf[0] = pushedTextBuf[0] = '\0'; } RTFFree (inputName); RTFFree (outputName); inputName = outputName = (char *) NULL; /* initialize lookup table */ LookupInit (); for (i = 0; i < rtfMaxClass; i++) RTFSetClassCallback (i, (RTFFuncPtr) NULL); for (i = 0; i < rtfMaxDestination; i++) RTFSetDestinationCallback (i, (RTFFuncPtr) NULL); /* install built-in destination readers */ RTFSetDestinationCallback (rtfFontTbl, ReadFontTbl); RTFSetDestinationCallback (rtfColorTbl, ReadColorTbl); RTFSetDestinationCallback (rtfStyleSheet, ReadStyleSheet); RTFSetDestinationCallback (rtfInfo, ReadInfoGroup); RTFSetDestinationCallback (rtfPict, ReadPictGroup); RTFSetDestinationCallback (rtfObject, ReadObjGroup); RTFSetReadHook ((RTFFuncPtr) NULL); /* dump old lists if necessary */ while (fontList != (RTFFont *) NULL) { fp = fontList->rtfNextFont; RTFFree (fontList->rtfFName); RTFFree ((char *) fontList); fontList = fp; } while (colorList != (RTFColor *) NULL) { cp = colorList->rtfNextColor; RTFFree ((char *) colorList); colorList = cp; } while (styleList != (RTFStyle *) NULL) { sp = styleList->rtfNextStyle; eltList = styleList->rtfSSEList; while (eltList != (RTFStyleElt *) NULL) { ep = eltList->rtfNextSE; RTFFree (eltList->rtfSEText); RTFFree ((char *) eltList); eltList = ep; } RTFFree (styleList->rtfSName); RTFFree ((char *) styleList); styleList = sp; } rtfClass = -1; pushedClass = -1; pushedChar = EOF; rtfLineNum = 0; rtfLinePos = 0; prevChar = EOF; bumpLine = 0; CharSetInit (); csTop = 0; } /* * Set or get the input or output file name. These are never guaranteed * to be accurate, only insofar as the calling program makes them so. */ void RTFSetInputName (name) char *name; { if ((inputName = RTFStrSave (name)) == (char *) NULL) RTFPanic ("RTFSetInputName: out of memory"); } char * RTFGetInputName () { return (inputName); } void RTFSetOutputName (name) char *name; { if ((outputName = RTFStrSave (name)) == (char *) NULL) RTFPanic ("RTFSetOutputName: out of memory"); } char * RTFGetOutputName () { return (outputName); } /* ---------------------------------------------------------------------- */ /* * Callback table manipulation routines */ /* * Install or return a writer callback for a token class */ static RTFFuncPtr ccb[rtfMaxClass]; /* class callbacks */ void RTFSetClassCallback (class, callback) int class; RTFFuncPtr callback; { if (class >= 0 && class < rtfMaxClass) ccb[class] = callback; } RTFFuncPtr RTFGetClassCallback (class) int class; { if (class >= 0 && class < rtfMaxClass) return (ccb[class]); return ((RTFFuncPtr) NULL); } /* * Install or return a writer callback for a destination type */ static RTFFuncPtr dcb[rtfMaxDestination]; /* destination callbacks */ void RTFSetDestinationCallback (dest, callback) int dest; RTFFuncPtr callback; { if (dest >= 0 && dest < rtfMaxDestination) dcb[dest] = callback; } RTFFuncPtr RTFGetDestinationCallback (dest) int dest; { if (dest >= 0 && dest < rtfMaxDestination) return (dcb[dest]); return ((RTFFuncPtr) NULL); } /* ---------------------------------------------------------------------- */ /* * Token reading routines */ /* * Read the input stream, invoking the writer's callbacks * where appropriate. */ void RTFRead () { while (RTFGetToken () != rtfEOF) RTFRouteToken (); } /* * Route a token. If it's a destination for which a reader is * installed, process the destination internally, otherwise * pass the token to the writer's class callback. */ void RTFRouteToken () { RTFFuncPtr p; if (rtfClass < 0 || rtfClass >= rtfMaxClass) /* watchdog */ { RTFPanic ("Unknown class %d: %s (reader malfunction)", rtfClass, rtfTextBuf); } if (RTFCheckCM (rtfControl, rtfDestination)) { /* invoke destination-specific callback if there is one */ if ((p = RTFGetDestinationCallback (rtfMinor)) != (RTFFuncPtr) NULL) { (*p) (); return; } } /* invoke class callback if there is one */ if ((p = RTFGetClassCallback (rtfClass)) != (RTFFuncPtr) NULL) (*p) (); } /* * Skip to the end of the current group. When this returns, * writers that maintain a state stack may want to call their * state unstacker; global vars will still be set to the group's * closing brace. */ void RTFSkipGroup () { int level = 1; while (RTFGetToken () != rtfEOF) { if (rtfClass == rtfGroup) { if (rtfMajor == rtfBeginGroup) ++level; else if (rtfMajor == rtfEndGroup) { if (--level < 1) break; /* end of initial group */ } } } } /* * Read one token. Call the read hook if there is one. The * token class is the return value. Returns rtfEOF when there * are no more tokens. */ int RTFGetToken () { RTFFuncPtr p; for (;;) { _RTFGetToken (); if ((p = RTFGetReadHook ()) != (RTFFuncPtr) NULL) (*p) (); /* give read hook a look at token */ /* Silently discard newlines, carriage returns, nulls. */ if (!(rtfClass == rtfText && (rtfMajor == '\n' || rtfMajor == '\r' || rtfMajor == '\0'))) break; } return (rtfClass); } /* * Install or return a token reader hook. */ static RTFFuncPtr readHook; void RTFSetReadHook (f) RTFFuncPtr f; { readHook = f; } RTFFuncPtr RTFGetReadHook () { return (readHook); } void RTFUngetToken () { if (pushedClass >= 0) /* there's already an ungotten token */ RTFPanic ("cannot unget two tokens"); if (rtfClass < 0) RTFPanic ("no token to unget"); pushedClass = rtfClass; pushedMajor = rtfMajor; pushedMinor = rtfMinor; pushedParam = rtfParam; (void) strcpy (pushedTextBuf, rtfTextBuf); } int RTFPeekToken () { _RTFGetToken (); RTFUngetToken (); return (rtfClass); } static void _RTFGetToken () { RTFFont *fp; /* first check for pushed token from RTFUngetToken() */ if (pushedClass >= 0) { rtfClass = pushedClass; rtfMajor = pushedMajor; rtfMinor = pushedMinor; rtfParam = pushedParam; (void) strcpy (rtfTextBuf, pushedTextBuf); rtfTextLen = strlen (rtfTextBuf); pushedClass = -1; return; } /* * Beyond this point, no token is ever seen twice, which is * important, e.g., for making sure no "}" pops the font stack twice. */ _RTFGetToken2 (); if (rtfClass == rtfText) /* map RTF char to standard code */ rtfMinor = RTFMapChar (rtfMajor); /* * If auto-charset stuff is activated, see if anything needs doing, * like reading the charset maps or switching between them. */ if (autoCharSetFlags == 0) return; if ((autoCharSetFlags & rtfReadCharSet) && RTFCheckCM (rtfControl, rtfCharSet)) { ReadCharSetMaps (); } else if ((autoCharSetFlags & rtfSwitchCharSet) && RTFCheckCMM (rtfControl, rtfCharAttr, rtfFontNum)) { if ((fp = RTFGetFont (rtfParam)) != (RTFFont *) NULL) { if (strncmp (fp->rtfFName, "Symbol", 6) == 0) curCharSet = rtfCSSymbol; else curCharSet = rtfCSGeneral; RTFSetCharSet (curCharSet); } } else if ((autoCharSetFlags & rtfSwitchCharSet) && rtfClass == rtfGroup) { switch (rtfMajor) { case rtfBeginGroup: if (csTop >= maxCSStack) RTFPanic ("_RTFGetToken: stack overflow"); csStack[csTop++] = curCharSet; break; case rtfEndGroup: if (csTop <= 0) RTFPanic ("_RTFGetToken: stack underflow"); curCharSet = csStack[--csTop]; RTFSetCharSet (curCharSet); break; } } } /* this shouldn't be called anywhere but from _RTFGetToken() */ static void _RTFGetToken2 () { int sign; int c; /* initialize token vars */ rtfClass = rtfUnknown; rtfParam = rtfNoParam; rtfTextBuf[rtfTextLen = 0] = '\0'; /* get first character, which may be a pushback from previous token */ if (pushedChar != EOF) { c = pushedChar; rtfTextBuf[rtfTextLen++] = c; rtfTextBuf[rtfTextLen] = '\0'; pushedChar = EOF; } else if ((c = GetChar ()) == EOF) { rtfClass = rtfEOF; return; } if (c == '{') { rtfClass = rtfGroup; rtfMajor = rtfBeginGroup; return; } if (c == '}') { rtfClass = rtfGroup; rtfMajor = rtfEndGroup; return; } if (c != '\\') { /* * Two possibilities here: * 1) ASCII 9, effectively like \tab control symbol * 2) literal text char */ if (c == '\t') /* ASCII 9 */ { rtfClass = rtfControl; rtfMajor = rtfSpecialChar; rtfMinor = rtfTab; } else { rtfClass = rtfText; rtfMajor = c; } return; } if ((c = GetChar ()) == EOF) { /* early eof, whoops (class is rtfUnknown) */ return; } if (!isalpha (c)) { /* * Three possibilities here: * 1) hex encoded text char, e.g., \'d5, \'d3 * 2) special escaped text char, e.g., \{, \} * 3) control symbol, e.g., \_, \-, \|, \<10> */ if (c == '\'') /* hex char */ { int c2; if ((c = GetChar ()) != EOF && (c2 = GetChar ()) != EOF) { /* should do isxdigit check! */ rtfClass = rtfText; rtfMajor = RTFCharToHex (c) * 16 + RTFCharToHex (c2); return; } /* early eof, whoops (class is rtfUnknown) */ return; } /* escaped char */ /*if (index (":{}\\", c) != (char *) NULL)*/ /* escaped char */ if (c == ':' || c == '{' || c == '}' || c == '\\') { rtfClass = rtfText; rtfMajor = c; return; } /* control symbol */ Lookup (rtfTextBuf); /* sets class, major, minor */ return; } /* control word */ while (isalpha (c)) { if ((c = GetChar ()) == EOF) break; } /* * At this point, the control word is all collected, so the * major/minor numbers are determined before the parameter * (if any) is scanned. There will be one too many characters * in the buffer, though, so fix up before and restore after * looking up. */ if (c != EOF) rtfTextBuf[rtfTextLen-1] = '\0'; Lookup (rtfTextBuf); /* sets class, major, minor */ if (c != EOF) rtfTextBuf[rtfTextLen-1] = c; /* * Should be looking at first digit of parameter if there * is one, unless it's negative. In that case, next char * is '-', so need to gobble next char, and remember sign. */ sign = 1; if (c == '-') { sign = -1; c = GetChar (); } if (c != EOF && isdigit (c)) { rtfParam = 0; while (isdigit (c)) /* gobble parameter */ { rtfParam = rtfParam * 10 + c - '0'; if ((c = GetChar ()) == EOF) break; } rtfParam *= sign; } /* * If control symbol delimiter was a blank, gobble it. * Otherwise the character is first char of next token, so * push it back for next call. In either case, delete the * delimiter from the token buffer. */ if (c != EOF) { if (c != ' ') pushedChar = c; rtfTextBuf[--rtfTextLen] = '\0'; } } /* * Read the next character from the input. This handles setting the * current line and position-within-line variables. Those variable are * set correctly whether lines end with CR, LF, or CRLF (the last being * the tricky case). * * bumpLine indicates whether the line number should be incremented on * the *next* input character. */ static int GetChar () { int c; int oldBumpLine; if ((c = _RTFGetChar()) != EOF) { rtfTextBuf[rtfTextLen++] = c; rtfTextBuf[rtfTextLen] = '\0'; } if (prevChar == EOF) bumpLine = 1; oldBumpLine = bumpLine; /* non-zero if prev char was line ending */ bumpLine = 0; if (c == '\r') bumpLine = 1; else if (c == '\n') { bumpLine = 1; if (prevChar == '\r') /* oops, previous \r wasn't */ oldBumpLine = 0; /* really a line ending */ } ++rtfLinePos; if (oldBumpLine) /* were we supposed to increment the */ { /* line count on this char? */ ++rtfLineNum; rtfLinePos = 1; } prevChar = c; return (c); } /* * Synthesize a token by setting the global variables to the * values supplied. Typically this is followed with a call * to RTFRouteToken(). * * If a param value other than rtfNoParam is passed, it becomes * part of the token text. */ void RTFSetToken (class, major, minor, param, text) int class, major, minor, param; char *text; { rtfClass = class; rtfMajor = major; rtfMinor = minor; rtfParam = param; if (param == rtfNoParam) (void) strcpy (rtfTextBuf, text); else sprintf (rtfTextBuf, "%s%d", text, param); rtfTextLen = strlen (rtfTextBuf); } /* ---------------------------------------------------------------------- */ /* * Routines to handle mapping of RTF character sets * onto standard characters. * * RTFStdCharCode(name) given char name, produce numeric code * RTFStdCharName(code) given char code, return name * RTFMapChar(c) map input (RTF) char code to std code * RTFSetCharSet(id) select given charset map * RTFGetCharSet() get current charset map * * See ../h/README for more information about charset names and codes. */ /* * Initialize charset stuff. */ static void CharSetInit () { autoCharSetFlags = (rtfReadCharSet | rtfSwitchCharSet); RTFFree (genCharSetFile); genCharSetFile = (char *) NULL; haveGenCharSet = 0; RTFFree (symCharSetFile); symCharSetFile = (char *) NULL; haveSymCharSet = 0; curCharSet = rtfCSGeneral; curCharCode = genCharCode; } /* * Specify the name of a file to be read when auto-charset-file reading is * done. */ void RTFSetCharSetMap (name, csId) char *name; int csId; { if ((name = RTFStrSave (name)) == (char *) NULL) /* make copy */ RTFPanic ("RTFSetCharSetMap: out of memory"); switch (csId) { case rtfCSGeneral: RTFFree (genCharSetFile); /* free any previous value */ genCharSetFile = name; break; case rtfCSSymbol: RTFFree (symCharSetFile); /* free any previous value */ symCharSetFile = name; break; } } /* * Do auto-charset-file reading. * will always use the ansi charset no mater what the value * of the rtfTextBuf is. * * TODO: add support for other charset in the future. * */ static void ReadCharSetMaps () { char buf[rtfBufSiz]; if (genCharSetFile != (char *) NULL) (void) strcpy (buf, genCharSetFile); else sprintf (buf, "%s-gen", &rtfTextBuf[1]); if (RTFReadCharSetMap (rtfCSGeneral) == 0) RTFPanic ("ReadCharSetMaps: Cannot read charset map %s", buf); if (symCharSetFile != (char *) NULL) (void) strcpy (buf, symCharSetFile); else sprintf (buf, "%s-sym", &rtfTextBuf[1]); if (RTFReadCharSetMap (rtfCSSymbol) == 0) RTFPanic ("ReadCharSetMaps: Cannot read charset map %s", buf); } /* * Convert a CaracterSetMap (caracter_name, caracter) into * this form : array[caracter_ident] = caracter; */ int RTFReadCharSetMap (csId) int csId; { int *stdCodeArray; int i; switch (csId) { default: return (0); /* illegal charset id */ case rtfCSGeneral: haveGenCharSet = 1; stdCodeArray = genCharCode; for (i = 0; i < charSetSize; i++) { stdCodeArray[i] = rtfSC_nothing; } for ( i = 0 ; i< sizeof(ansi_gen)/(sizeof(int));i+=2) { stdCodeArray[ ansi_gen[i+1] ] = ansi_gen[i]; } break; case rtfCSSymbol: haveSymCharSet = 1; stdCodeArray = symCharCode; for (i = 0; i < charSetSize; i++) { stdCodeArray[i] = rtfSC_nothing; } for ( i = 0 ; i< sizeof(ansi_sym)/(sizeof(int));i+=2) { stdCodeArray[ ansi_sym[i+1] ] = ansi_sym[i]; } break; } return (1); } /* * Given a standard character name (a string), find its code (a number). * Return -1 if name is unknown. */ int RTFStdCharCode (name) char *name; { int i; for (i = 0; i < rtfSC_MaxChar; i++) { if (strcmp (name, stdCharName[i]) == 0) return (i); } return (-1); } /* * Given a standard character code (a number), find its name (a string). * Return NULL if code is unknown. */ char * RTFStdCharName (code) int code; { if (code < 0 || code >= rtfSC_MaxChar) return ((char *) NULL); return (stdCharName[code]); } /* * Given an RTF input character code, find standard character code. * The translator should read the appropriate charset maps when it finds a * charset control. However, the file might not contain one. In this * case, no map will be available. When the first attempt is made to * map a character under these circumstances, RTFMapChar() assumes ANSI * and reads the map as necessary. */ int RTFMapChar (c) int c; { switch (curCharSet) { case rtfCSGeneral: if (!haveGenCharSet) { if (RTFReadCharSetMap (rtfCSGeneral) == 0) RTFPanic ("RTFMapChar: cannot read ansi-gen"); } break; case rtfCSSymbol: if (!haveSymCharSet) { if (RTFReadCharSetMap (rtfCSSymbol) == 0) RTFPanic ("RTFMapChar: cannot read ansi-sym"); } break; } if (c < 0 || c >= charSetSize) return (rtfSC_nothing); return (curCharCode[c]); } /* * Set the current character set. If csId is illegal, uses general charset. */ void RTFSetCharSet (csId) int csId; { switch (csId) { default: /* use general if csId unknown */ case rtfCSGeneral: curCharCode = genCharCode; curCharSet = csId; break; case rtfCSSymbol: curCharCode = symCharCode; curCharSet = csId; break; } } int RTFGetCharSet () { return (curCharSet); } /* ---------------------------------------------------------------------- */ /* * Special destination readers. They gobble the destination so the * writer doesn't have to deal with them. That's wrong for any * translator that wants to process any of these itself. In that * case, these readers should be overridden by installing a different * destination callback. * * NOTE: The last token read by each of these reader will be the * destination's terminating '}', which will then be the current token. * That '}' token is passed to RTFRouteToken() - the writer has already * seen the '{' that began the destination group, and may have pushed a * state; it also needs to know at the end of the group that a state * should be popped. * * It's important that rtf.h and the control token lookup table list * as many symbols as possible, because these destination readers * unfortunately make strict assumptions about the input they expect, * and a token of class rtfUnknown will throw them off easily. */ /* * Read { \fonttbl ... } destination. Old font tables don't have * braces around each table entry; try to adjust for that. */ static void ReadFontTbl () { RTFFont *fp = NULL; char buf[rtfBufSiz], *bp; int old = -1; char *fn = "ReadFontTbl"; for (;;) { (void) RTFGetToken (); if (RTFCheckCM (rtfGroup, rtfEndGroup)) break; if (old < 0) /* first entry - determine tbl type */ { if (RTFCheckCMM (rtfControl, rtfCharAttr, rtfFontNum)) old = 1; /* no brace */ else if (RTFCheckCM (rtfGroup, rtfBeginGroup)) old = 0; /* brace */ else /* can't tell! */ RTFPanic ("%s: Cannot determine format", fn); } if (old == 0) /* need to find "{" here */ { if (!RTFCheckCM (rtfGroup, rtfBeginGroup)) RTFPanic ("%s: missing \"{\"", fn); (void) RTFGetToken (); /* yes, skip to next token */ } if ((fp = New (RTFFont)) == (RTFFont *) NULL) RTFPanic ("%s: cannot allocate font entry", fn); fp->rtfNextFont = fontList; fontList = fp; fp->rtfFName = (char *) NULL; fp->rtfFAltName = (char *) NULL; fp->rtfFNum = -1; fp->rtfFFamily = 0; fp->rtfFCharSet = 0; fp->rtfFPitch = 0; fp->rtfFType = 0; fp->rtfFCodePage = 0; while (rtfClass != rtfEOF && !RTFCheckCM (rtfText, ';') && !RTFCheckCM (rtfGroup, rtfEndGroup)) { if (rtfClass == rtfControl) { switch (rtfMajor) { default: /* ignore token but announce it */ RTFMsg ("%s: unknown token \"%s\"\n", fn, rtfTextBuf); case rtfFontFamily: fp->rtfFFamily = rtfMinor; break; case rtfCharAttr: switch (rtfMinor) { default: break; /* ignore unknown? */ case rtfFontNum: fp->rtfFNum = rtfParam; break; } break; case rtfFontAttr: switch (rtfMinor) { default: break; /* ignore unknown? */ case rtfFontCharSet: fp->rtfFCharSet = rtfParam; break; case rtfFontPitch: fp->rtfFPitch = rtfParam; break; case rtfFontCodePage: fp->rtfFCodePage = rtfParam; break; case rtfFTypeNil: case rtfFTypeTrueType: fp->rtfFType = rtfParam; break; } break; } } else if (RTFCheckCM (rtfGroup, rtfBeginGroup)) /* dest */ { RTFSkipGroup (); /* ignore for now */ } else if (rtfClass == rtfText) /* font name */ { bp = buf; while (rtfClass != rtfEOF && !RTFCheckCM (rtfText, ';') && !RTFCheckCM (rtfGroup, rtfEndGroup)) { *bp++ = rtfMajor; (void) RTFGetToken (); } /* FIX: in some cases the isn't finished with a semi-column */ if(RTFCheckCM (rtfGroup, rtfEndGroup)) { RTFUngetToken (); } *bp = '\0'; fp->rtfFName = RTFStrSave (buf); if (fp->rtfFName == (char *) NULL) RTFPanic ("%s: cannot allocate font name", fn); /* already have next token; don't read one */ /* at bottom of loop */ continue; } else { /* ignore token but announce it */ RTFMsg ("%s: unknown token \"%s\"\n", fn, rtfTextBuf); } (void) RTFGetToken (); } if (old == 0) /* need to see "}" here */ { (void) RTFGetToken (); if (!RTFCheckCM (rtfGroup, rtfEndGroup)) RTFPanic ("%s: missing \"}\"", fn); } } if (fp->rtfFNum == -1) RTFPanic ("%s: missing font number", fn); /* * Could check other pieces of structure here, too, I suppose. */ RTFRouteToken (); /* feed "}" back to router */ } /* * The color table entries have color values of -1 if * the default color should be used for the entry (only * a semi-colon is given in the definition, no color values). * There will be a problem if a partial entry (1 or 2 but * not 3 color values) is given. The possibility is ignored * here. */ static void ReadColorTbl () { RTFColor *cp; int cnum = 0; char *fn = "ReadColorTbl"; for (;;) { (void) RTFGetToken (); if (RTFCheckCM (rtfGroup, rtfEndGroup)) break; if ((cp = New (RTFColor)) == (RTFColor *) NULL) RTFPanic ("%s: cannot allocate color entry", fn); cp->rtfCNum = cnum++; cp->rtfCRed = cp->rtfCGreen = cp->rtfCBlue = -1; cp->rtfNextColor = colorList; colorList = cp; while (RTFCheckCM (rtfControl, rtfColorName)) { switch (rtfMinor) { case rtfRed: cp->rtfCRed = rtfParam; break; case rtfGreen: cp->rtfCGreen = rtfParam; break; case rtfBlue: cp->rtfCBlue = rtfParam; break; } RTFGetToken (); } if (!RTFCheckCM (rtfText, (int) ';')) RTFPanic ("%s: malformed entry", fn); } RTFRouteToken (); /* feed "}" back to router */ } /* * The "Normal" style definition doesn't contain any style number, * all others do. Normal style is given style rtfNormalStyleNum. */ static void ReadStyleSheet () { RTFStyle *sp; RTFStyleElt *sep, *sepLast; char buf[rtfBufSiz], *bp; char *fn = "ReadStyleSheet"; for (;;) { (void) RTFGetToken (); if (RTFCheckCM (rtfGroup, rtfEndGroup)) break; if ((sp = New (RTFStyle)) == (RTFStyle *) NULL) RTFPanic ("%s: cannot allocate stylesheet entry", fn); sp->rtfSName = (char *) NULL; sp->rtfSNum = -1; sp->rtfSType = rtfParStyle; sp->rtfSAdditive = 0; sp->rtfSBasedOn = rtfNoStyleNum; sp->rtfSNextPar = -1; sp->rtfSSEList = sepLast = (RTFStyleElt *) NULL; sp->rtfNextStyle = styleList; sp->rtfExpanding = 0; styleList = sp; if (!RTFCheckCM (rtfGroup, rtfBeginGroup)) RTFPanic ("%s: missing \"{\"", fn); for (;;) { (void) RTFGetToken (); if (rtfClass == rtfEOF || RTFCheckCM (rtfText, ';')) break; if (rtfClass == rtfControl) { if (RTFCheckMM (rtfSpecialChar, rtfOptDest)) continue; /* ignore "\*" */ if (RTFCheckMM (rtfParAttr, rtfStyleNum)) { sp->rtfSNum = rtfParam; sp->rtfSType = rtfParStyle; continue; } if (RTFCheckMM (rtfCharAttr, rtfCharStyleNum)) { sp->rtfSNum = rtfParam; sp->rtfSType = rtfCharStyle; continue; } if (RTFCheckMM (rtfSectAttr, rtfSectStyleNum)) { sp->rtfSNum = rtfParam; sp->rtfSType = rtfSectStyle; continue; } if (RTFCheckMM (rtfStyleAttr, rtfBasedOn)) { sp->rtfSBasedOn = rtfParam; continue; } if (RTFCheckMM (rtfStyleAttr, rtfAdditive)) { sp->rtfSAdditive = 1; continue; } if (RTFCheckMM (rtfStyleAttr, rtfNext)) { sp->rtfSNextPar = rtfParam; continue; } if ((sep = New (RTFStyleElt)) == (RTFStyleElt *) NULL) RTFPanic ("%s: cannot allocate style element", fn); sep->rtfSEClass = rtfClass; sep->rtfSEMajor = rtfMajor; sep->rtfSEMinor = rtfMinor; sep->rtfSEParam = rtfParam; if ((sep->rtfSEText = RTFStrSave (rtfTextBuf)) == (char *) NULL) RTFPanic ("%s: cannot allocate style element text", fn); if (sepLast == (RTFStyleElt *) NULL) sp->rtfSSEList = sep; /* first element */ else /* add to end */ sepLast->rtfNextSE = sep; sep->rtfNextSE = (RTFStyleElt *) NULL; sepLast = sep; } else if (RTFCheckCM (rtfGroup, rtfBeginGroup)) { /* * This passes over "{\*\keycode ... }, among * other things. A temporary (perhaps) hack. */ RTFSkipGroup (); continue; } else if (rtfClass == rtfText) /* style name */ { bp = buf; while (rtfClass == rtfText) { if (rtfMajor == ';') { /* put back for "for" loop */ (void) RTFUngetToken (); break; } *bp++ = rtfMajor; (void) RTFGetToken (); } *bp = '\0'; if ((sp->rtfSName = RTFStrSave (buf)) == (char *) NULL) RTFPanic ("%s: cannot allocate style name", fn); } else /* unrecognized */ { /* ignore token but announce it */ RTFMsg ("%s: unknown token \"%s\"\n", fn, rtfTextBuf); } } (void) RTFGetToken (); if (!RTFCheckCM (rtfGroup, rtfEndGroup)) RTFPanic ("%s: missing \"}\"", fn); /* * Check over the style structure. A name is a must. * If no style number was specified, check whether it's the * Normal style (in which case it's given style number * rtfNormalStyleNum). Note that some "normal" style names * just begin with "Normal" and can have other stuff following, * e.g., "Normal,Times 10 point". Ugh. * * Some German RTF writers use "Standard" instead of "Normal". */ if (sp->rtfSName == (char *) NULL) RTFPanic ("%s: missing style name", fn); if (sp->rtfSNum < 0) { if (strncmp (buf, "Normal", 6) != 0 && strncmp (buf, "Standard", 8) != 0) RTFPanic ("%s: missing style number", fn); sp->rtfSNum = rtfNormalStyleNum; } if (sp->rtfSNextPar == -1) /* if \snext not given, */ sp->rtfSNextPar = sp->rtfSNum; /* next is itself */ } RTFRouteToken (); /* feed "}" back to router */ } static void ReadInfoGroup () { RTFSkipGroup (); RTFRouteToken (); /* feed "}" back to router */ } static void ReadPictGroup () { RTFSkipGroup (); RTFRouteToken (); /* feed "}" back to router */ } static void ReadObjGroup () { RTFSkipGroup (); RTFRouteToken (); /* feed "}" back to router */ } /* ---------------------------------------------------------------------- */ /* * Routines to return pieces of stylesheet, or font or color tables. * References to style 0 are mapped onto the Normal style. */ RTFStyle * RTFGetStyle (num) int num; { RTFStyle *s; if (num == -1) return (styleList); for (s = styleList; s != (RTFStyle *) NULL; s = s->rtfNextStyle) { if (s->rtfSNum == num) break; } return (s); /* NULL if not found */ } RTFFont * RTFGetFont (num) int num; { RTFFont *f; if (num == -1) return (fontList); for (f = fontList; f != (RTFFont *) NULL; f = f->rtfNextFont) { if (f->rtfFNum == num) break; } return (f); /* NULL if not found */ } RTFColor * RTFGetColor (num) int num; { RTFColor *c; if (num == -1) return (colorList); for (c = colorList; c != (RTFColor *) NULL; c = c->rtfNextColor) { if (c->rtfCNum == num) break; } return (c); /* NULL if not found */ } /* ---------------------------------------------------------------------- */ /* * Expand style n, if there is such a style. */ void RTFExpandStyle (n) int n; { RTFStyle *s; RTFStyleElt *se; if (n == -1 || (s = RTFGetStyle (n)) == (RTFStyle *) NULL) return; if (s->rtfExpanding != 0) RTFPanic ("Style expansion loop, style %d", n); s->rtfExpanding = 1; /* set expansion flag for loop detection */ /* * Expand "based-on" style (unless it's the same as the current * style -- Normal style usually gives itself as its own based-on * style). Based-on style expansion is done by synthesizing * the token that the writer needs to see in order to trigger * another style expansion, and feeding to token back through * the router so the writer sees it. */ if (n != s->rtfSBasedOn) { RTFSetToken (rtfControl, rtfParAttr, rtfStyleNum, s->rtfSBasedOn, "\\s"); RTFRouteToken (); } /* * Now route the tokens unique to this style. RTFSetToken() * isn't used because it would add the param value to the end * of the token text, which already has it in. */ for (se = s->rtfSSEList; se != (RTFStyleElt *) NULL; se = se->rtfNextSE) { rtfClass = se->rtfSEClass; rtfMajor = se->rtfSEMajor; rtfMinor = se->rtfSEMinor; rtfParam = se->rtfSEParam; (void) strcpy (rtfTextBuf, se->rtfSEText); rtfTextLen = strlen (rtfTextBuf); RTFRouteToken (); } s->rtfExpanding = 0; /* done - clear expansion flag */ } /* ---------------------------------------------------------------------- */ /* * Control symbol lookup routines */ typedef struct RTFKey RTFKey; struct RTFKey { int rtfKMajor; /* major number */ int rtfKMinor; /* minor number */ char *rtfKStr; /* symbol name */ int rtfKHash; /* symbol name hash value */ }; /* * A minor number of -1 means the token has no minor number * (all valid minor numbers are >= 0). */ static RTFKey rtfKey[] = { /* * Special characters */ { rtfSpecialChar, rtfIIntVersion, "vern", 0 }, { rtfSpecialChar, rtfICreateTime, "creatim", 0 }, { rtfSpecialChar, rtfIRevisionTime, "revtim", 0 }, { rtfSpecialChar, rtfIPrintTime, "printim", 0 }, { rtfSpecialChar, rtfIBackupTime, "buptim", 0 }, { rtfSpecialChar, rtfIEditTime, "edmins", 0 }, { rtfSpecialChar, rtfIYear, "yr", 0 }, { rtfSpecialChar, rtfIMonth, "mo", 0 }, { rtfSpecialChar, rtfIDay, "dy", 0 }, { rtfSpecialChar, rtfIHour, "hr", 0 }, { rtfSpecialChar, rtfIMinute, "min", 0 }, { rtfSpecialChar, rtfISecond, "sec", 0 }, { rtfSpecialChar, rtfINPages, "nofpages", 0 }, { rtfSpecialChar, rtfINWords, "nofwords", 0 }, { rtfSpecialChar, rtfINChars, "nofchars", 0 }, { rtfSpecialChar, rtfIIntID, "id", 0 }, { rtfSpecialChar, rtfCurHeadDate, "chdate", 0 }, { rtfSpecialChar, rtfCurHeadDateLong, "chdpl", 0 }, { rtfSpecialChar, rtfCurHeadDateAbbrev, "chdpa", 0 }, { rtfSpecialChar, rtfCurHeadTime, "chtime", 0 }, { rtfSpecialChar, rtfCurHeadPage, "chpgn", 0 }, { rtfSpecialChar, rtfSectNum, "sectnum", 0 }, { rtfSpecialChar, rtfCurFNote, "chftn", 0 }, { rtfSpecialChar, rtfCurAnnotRef, "chatn", 0 }, { rtfSpecialChar, rtfFNoteSep, "chftnsep", 0 }, { rtfSpecialChar, rtfFNoteCont, "chftnsepc", 0 }, { rtfSpecialChar, rtfCell, "cell", 0 }, { rtfSpecialChar, rtfRow, "row", 0 }, { rtfSpecialChar, rtfPar, "par", 0 }, /* newline and carriage return are synonyms for */ /* \par when they are preceded by a \ character */ { rtfSpecialChar, rtfPar, "\n", 0 }, { rtfSpecialChar, rtfPar, "\r", 0 }, { rtfSpecialChar, rtfSect, "sect", 0 }, { rtfSpecialChar, rtfPage, "page", 0 }, { rtfSpecialChar, rtfColumn, "column", 0 }, { rtfSpecialChar, rtfLine, "line", 0 }, { rtfSpecialChar, rtfSoftPage, "softpage", 0 }, { rtfSpecialChar, rtfSoftColumn, "softcol", 0 }, { rtfSpecialChar, rtfSoftLine, "softline", 0 }, { rtfSpecialChar, rtfSoftLineHt, "softlheight", 0 }, { rtfSpecialChar, rtfTab, "tab", 0 }, { rtfSpecialChar, rtfEmDash, "emdash", 0 }, { rtfSpecialChar, rtfEnDash, "endash", 0 }, { rtfSpecialChar, rtfEmSpace, "emspace", 0 }, { rtfSpecialChar, rtfEnSpace, "enspace", 0 }, { rtfSpecialChar, rtfBullet, "bullet", 0 }, { rtfSpecialChar, rtfLQuote, "lquote", 0 }, { rtfSpecialChar, rtfRQuote, "rquote", 0 }, { rtfSpecialChar, rtfLDblQuote, "ldblquote", 0 }, { rtfSpecialChar, rtfRDblQuote, "rdblquote", 0 }, { rtfSpecialChar, rtfFormula, "|", 0 }, { rtfSpecialChar, rtfNoBrkSpace, "~", 0 }, { rtfSpecialChar, rtfNoReqHyphen, "-", 0 }, { rtfSpecialChar, rtfNoBrkHyphen, "_", 0 }, { rtfSpecialChar, rtfOptDest, "*", 0 }, { rtfSpecialChar, rtfLTRMark, "ltrmark", 0 }, { rtfSpecialChar, rtfRTLMark, "rtlmark", 0 }, { rtfSpecialChar, rtfNoWidthJoiner, "zwj", 0 }, { rtfSpecialChar, rtfNoWidthNonJoiner, "zwnj", 0 }, /* is this valid? */ { rtfSpecialChar, rtfCurHeadPict, "chpict", 0 }, /* * Character formatting attributes */ { rtfCharAttr, rtfPlain, "plain", 0 }, { rtfCharAttr, rtfBold, "b", 0 }, { rtfCharAttr, rtfAllCaps, "caps", 0 }, { rtfCharAttr, rtfDeleted, "deleted", 0 }, { rtfCharAttr, rtfSubScript, "dn", 0 }, { rtfCharAttr, rtfSubScrShrink, "sub", 0 }, { rtfCharAttr, rtfNoSuperSub, "nosupersub", 0 }, { rtfCharAttr, rtfExpand, "expnd", 0 }, { rtfCharAttr, rtfExpandTwips, "expndtw", 0 }, { rtfCharAttr, rtfKerning, "kerning", 0 }, { rtfCharAttr, rtfFontNum, "f", 0 }, { rtfCharAttr, rtfFontSize, "fs", 0 }, { rtfCharAttr, rtfItalic, "i", 0 }, { rtfCharAttr, rtfOutline, "outl", 0 }, { rtfCharAttr, rtfRevised, "revised", 0 }, { rtfCharAttr, rtfRevAuthor, "revauth", 0 }, { rtfCharAttr, rtfRevDTTM, "revdttm", 0 }, { rtfCharAttr, rtfSmallCaps, "scaps", 0 }, { rtfCharAttr, rtfShadow, "shad", 0 }, { rtfCharAttr, rtfStrikeThru, "strike", 0 }, { rtfCharAttr, rtfUnderline, "ul", 0 }, { rtfCharAttr, rtfDotUnderline, "uld", 0 }, { rtfCharAttr, rtfDbUnderline, "uldb", 0 }, { rtfCharAttr, rtfNoUnderline, "ulnone", 0 }, { rtfCharAttr, rtfWordUnderline, "ulw", 0 }, { rtfCharAttr, rtfSuperScript, "up", 0 }, { rtfCharAttr, rtfSuperScrShrink, "super", 0 }, { rtfCharAttr, rtfInvisible, "v", 0 }, { rtfCharAttr, rtfForeColor, "cf", 0 }, { rtfCharAttr, rtfBackColor, "cb", 0 }, { rtfCharAttr, rtfRTLChar, "rtlch", 0 }, { rtfCharAttr, rtfLTRChar, "ltrch", 0 }, { rtfCharAttr, rtfCharStyleNum, "cs", 0 }, { rtfCharAttr, rtfCharCharSet, "cchs", 0 }, { rtfCharAttr, rtfLanguage, "lang", 0 }, /* this has disappeared from spec 1.2 */ { rtfCharAttr, rtfGray, "gray", 0 }, /* * Paragraph formatting attributes */ { rtfParAttr, rtfParDef, "pard", 0 }, { rtfParAttr, rtfStyleNum, "s", 0 }, { rtfParAttr, rtfHyphenate, "hyphpar", 0 }, { rtfParAttr, rtfInTable, "intbl", 0 }, { rtfParAttr, rtfKeep, "keep", 0 }, { rtfParAttr, rtfNoWidowControl, "nowidctlpar", 0 }, { rtfParAttr, rtfKeepNext, "keepn", 0 }, { rtfParAttr, rtfOutlineLevel, "level", 0 }, { rtfParAttr, rtfNoLineNum, "noline", 0 }, { rtfParAttr, rtfPBBefore, "pagebb", 0 }, { rtfParAttr, rtfSideBySide, "sbys", 0 }, { rtfParAttr, rtfQuadLeft, "ql", 0 }, { rtfParAttr, rtfQuadRight, "qr", 0 }, { rtfParAttr, rtfQuadJust, "qj", 0 }, { rtfParAttr, rtfQuadCenter, "qc", 0 }, { rtfParAttr, rtfFirstIndent, "fi", 0 }, { rtfParAttr, rtfLeftIndent, "li", 0 }, { rtfParAttr, rtfRightIndent, "ri", 0 }, { rtfParAttr, rtfSpaceBefore, "sb", 0 }, { rtfParAttr, rtfSpaceAfter, "sa", 0 }, { rtfParAttr, rtfSpaceBetween, "sl", 0 }, { rtfParAttr, rtfSpaceMultiply, "slmult", 0 }, { rtfParAttr, rtfSubDocument, "subdocument", 0 }, { rtfParAttr, rtfRTLPar, "rtlpar", 0 }, { rtfParAttr, rtfLTRPar, "ltrpar", 0 }, { rtfParAttr, rtfTabPos, "tx", 0 }, /* * FrameMaker writes \tql (to mean left-justified tab, apparently) * although it's not in the spec. It's also redundant, since lj * tabs are the default. */ { rtfParAttr, rtfTabLeft, "tql", 0 }, { rtfParAttr, rtfTabRight, "tqr", 0 }, { rtfParAttr, rtfTabCenter, "tqc", 0 }, { rtfParAttr, rtfTabDecimal, "tqdec", 0 }, { rtfParAttr, rtfTabBar, "tb", 0 }, { rtfParAttr, rtfLeaderDot, "tldot", 0 }, { rtfParAttr, rtfLeaderHyphen, "tlhyph", 0 }, { rtfParAttr, rtfLeaderUnder, "tlul", 0 }, { rtfParAttr, rtfLeaderThick, "tlth", 0 }, { rtfParAttr, rtfLeaderEqual, "tleq", 0 }, { rtfParAttr, rtfParLevel, "pnlvl", 0 }, { rtfParAttr, rtfParBullet, "pnlvlblt", 0 }, { rtfParAttr, rtfParSimple, "pnlvlbody", 0 }, { rtfParAttr, rtfParNumCont, "pnlvlcont", 0 }, { rtfParAttr, rtfParNumOnce, "pnnumonce", 0 }, { rtfParAttr, rtfParNumAcross, "pnacross", 0 }, { rtfParAttr, rtfParHangIndent, "pnhang", 0 }, { rtfParAttr, rtfParNumRestart, "pnrestart", 0 }, { rtfParAttr, rtfParNumCardinal, "pncard", 0 }, { rtfParAttr, rtfParNumDecimal, "pndec", 0 }, { rtfParAttr, rtfParNumULetter, "pnucltr", 0 }, { rtfParAttr, rtfParNumURoman, "pnucrm", 0 }, { rtfParAttr, rtfParNumLLetter, "pnlcltr", 0 }, { rtfParAttr, rtfParNumLRoman, "pnlcrm", 0 }, { rtfParAttr, rtfParNumOrdinal, "pnord", 0 }, { rtfParAttr, rtfParNumOrdinalText, "pnordt", 0 }, { rtfParAttr, rtfParNumBold, "pnb", 0 }, { rtfParAttr, rtfParNumItalic, "pni", 0 }, { rtfParAttr, rtfParNumAllCaps, "pncaps", 0 }, { rtfParAttr, rtfParNumSmallCaps, "pnscaps", 0 }, { rtfParAttr, rtfParNumUnder, "pnul", 0 }, { rtfParAttr, rtfParNumDotUnder, "pnuld", 0 }, { rtfParAttr, rtfParNumDbUnder, "pnuldb", 0 }, { rtfParAttr, rtfParNumNoUnder, "pnulnone", 0 }, { rtfParAttr, rtfParNumWordUnder, "pnulw", 0 }, { rtfParAttr, rtfParNumStrikethru, "pnstrike", 0 }, { rtfParAttr, rtfParNumForeColor, "pncf", 0 }, { rtfParAttr, rtfParNumFont, "pnf", 0 }, { rtfParAttr, rtfParNumFontSize, "pnfs", 0 }, { rtfParAttr, rtfParNumIndent, "pnindent", 0 }, { rtfParAttr, rtfParNumSpacing, "pnsp", 0 }, { rtfParAttr, rtfParNumInclPrev, "pnprev", 0 }, { rtfParAttr, rtfParNumCenter, "pnqc", 0 }, { rtfParAttr, rtfParNumLeft, "pnql", 0 }, { rtfParAttr, rtfParNumRight, "pnqr", 0 }, { rtfParAttr, rtfParNumStartAt, "pnstart", 0 }, { rtfParAttr, rtfBorderTop, "brdrt", 0 }, { rtfParAttr, rtfBorderBottom, "brdrb", 0 }, { rtfParAttr, rtfBorderLeft, "brdrl", 0 }, { rtfParAttr, rtfBorderRight, "brdrr", 0 }, { rtfParAttr, rtfBorderBetween, "brdrbtw", 0 }, { rtfParAttr, rtfBorderBar, "brdrbar", 0 }, { rtfParAttr, rtfBorderBox, "box", 0 }, { rtfParAttr, rtfBorderSingle, "brdrs", 0 }, { rtfParAttr, rtfBorderThick, "brdrth", 0 }, { rtfParAttr, rtfBorderShadow, "brdrsh", 0 }, { rtfParAttr, rtfBorderDouble, "brdrdb", 0 }, { rtfParAttr, rtfBorderDot, "brdrdot", 0 }, { rtfParAttr, rtfBorderDot, "brdrdash", 0 }, { rtfParAttr, rtfBorderHair, "brdrhair", 0 }, { rtfParAttr, rtfBorderWidth, "brdrw", 0 }, { rtfParAttr, rtfBorderColor, "brdrcf", 0 }, { rtfParAttr, rtfBorderSpace, "brsp", 0 }, { rtfParAttr, rtfShading, "shading", 0 }, { rtfParAttr, rtfBgPatH, "bghoriz", 0 }, { rtfParAttr, rtfBgPatV, "bgvert", 0 }, { rtfParAttr, rtfFwdDiagBgPat, "bgfdiag", 0 }, { rtfParAttr, rtfBwdDiagBgPat, "bgbdiag", 0 }, { rtfParAttr, rtfHatchBgPat, "bgcross", 0 }, { rtfParAttr, rtfDiagHatchBgPat, "bgdcross", 0 }, { rtfParAttr, rtfDarkBgPatH, "bgdkhoriz", 0 }, { rtfParAttr, rtfDarkBgPatV, "bgdkvert", 0 }, { rtfParAttr, rtfFwdDarkBgPat, "bgdkfdiag", 0 }, { rtfParAttr, rtfBwdDarkBgPat, "bgdkbdiag", 0 }, { rtfParAttr, rtfDarkHatchBgPat, "bgdkcross", 0 }, { rtfParAttr, rtfDarkDiagHatchBgPat, "bgdkdcross", 0 }, { rtfParAttr, rtfBgPatLineColor, "cfpat", 0 }, { rtfParAttr, rtfBgPatColor, "cbpat", 0 }, /* * Section formatting attributes */ { rtfSectAttr, rtfSectDef, "sectd", 0 }, { rtfSectAttr, rtfENoteHere, "endnhere", 0 }, { rtfSectAttr, rtfPrtBinFirst, "binfsxn", 0 }, { rtfSectAttr, rtfPrtBin, "binsxn", 0 }, { rtfSectAttr, rtfSectStyleNum, "ds", 0 }, { rtfSectAttr, rtfNoBreak, "sbknone", 0 }, { rtfSectAttr, rtfColBreak, "sbkcol", 0 }, { rtfSectAttr, rtfPageBreak, "sbkpage", 0 }, { rtfSectAttr, rtfEvenBreak, "sbkeven", 0 }, { rtfSectAttr, rtfOddBreak, "sbkodd", 0 }, { rtfSectAttr, rtfColumns, "cols", 0 }, { rtfSectAttr, rtfColumnSpace, "colsx", 0 }, { rtfSectAttr, rtfColumnNumber, "colno", 0 }, { rtfSectAttr, rtfColumnSpRight, "colsr", 0 }, { rtfSectAttr, rtfColumnWidth, "colw", 0 }, { rtfSectAttr, rtfColumnLine, "linebetcol", 0 }, { rtfSectAttr, rtfLineModulus, "linemod", 0 }, { rtfSectAttr, rtfLineDist, "linex", 0 }, { rtfSectAttr, rtfLineStarts, "linestarts", 0 }, { rtfSectAttr, rtfLineRestart, "linerestart", 0 }, { rtfSectAttr, rtfLineRestartPg, "lineppage", 0 }, { rtfSectAttr, rtfLineCont, "linecont", 0 }, { rtfSectAttr, rtfSectPageWid, "pgwsxn", 0 }, { rtfSectAttr, rtfSectPageHt, "pghsxn", 0 }, { rtfSectAttr, rtfSectMarginLeft, "marglsxn", 0 }, { rtfSectAttr, rtfSectMarginRight, "margrsxn", 0 }, { rtfSectAttr, rtfSectMarginTop, "margtsxn", 0 }, { rtfSectAttr, rtfSectMarginBottom, "margbsxn", 0 }, { rtfSectAttr, rtfSectMarginGutter, "guttersxn", 0 }, { rtfSectAttr, rtfSectLandscape, "lndscpsxn", 0 }, { rtfSectAttr, rtfTitleSpecial, "titlepg", 0 }, { rtfSectAttr, rtfHeaderY, "headery", 0 }, { rtfSectAttr, rtfFooterY, "footery", 0 }, { rtfSectAttr, rtfPageStarts, "pgnstarts", 0 }, { rtfSectAttr, rtfPageCont, "pgncont", 0 }, { rtfSectAttr, rtfPageRestart, "pgnrestart", 0 }, { rtfSectAttr, rtfPageNumRight, "pgnx", 0 }, { rtfSectAttr, rtfPageNumTop, "pgny", 0 }, { rtfSectAttr, rtfPageDecimal, "pgndec", 0 }, { rtfSectAttr, rtfPageURoman, "pgnucrm", 0 }, { rtfSectAttr, rtfPageLRoman, "pgnlcrm", 0 }, { rtfSectAttr, rtfPageULetter, "pgnucltr", 0 }, { rtfSectAttr, rtfPageLLetter, "pgnlcltr", 0 }, { rtfSectAttr, rtfPageNumHyphSep, "pgnhnsh", 0 }, { rtfSectAttr, rtfPageNumSpaceSep, "pgnhnsp", 0 }, { rtfSectAttr, rtfPageNumColonSep, "pgnhnsc", 0 }, { rtfSectAttr, rtfPageNumEmdashSep, "pgnhnsm", 0 }, { rtfSectAttr, rtfPageNumEndashSep, "pgnhnsn", 0 }, { rtfSectAttr, rtfTopVAlign, "vertalt", 0 }, /* misspelled as "vertal" in specification 1.0 */ { rtfSectAttr, rtfBottomVAlign, "vertalb", 0 }, { rtfSectAttr, rtfCenterVAlign, "vertalc", 0 }, { rtfSectAttr, rtfJustVAlign, "vertalj", 0 }, { rtfSectAttr, rtfRTLSect, "rtlsect", 0 }, { rtfSectAttr, rtfLTRSect, "ltrsect", 0 }, /* I've seen these in an old spec, but not in real files... */ /*rtfSectAttr, rtfNoBreak, "nobreak", 0,*/ /*rtfSectAttr, rtfColBreak, "colbreak", 0,*/ /*rtfSectAttr, rtfPageBreak, "pagebreak", 0,*/ /*rtfSectAttr, rtfEvenBreak, "evenbreak", 0,*/ /*rtfSectAttr, rtfOddBreak, "oddbreak", 0,*/ /* * Document formatting attributes */ { rtfDocAttr, rtfDefTab, "deftab", 0 }, { rtfDocAttr, rtfHyphHotZone, "hyphhotz", 0 }, { rtfDocAttr, rtfHyphConsecLines, "hyphconsec", 0 }, { rtfDocAttr, rtfHyphCaps, "hyphcaps", 0 }, { rtfDocAttr, rtfHyphAuto, "hyphauto", 0 }, { rtfDocAttr, rtfLineStart, "linestart", 0 }, { rtfDocAttr, rtfFracWidth, "fracwidth", 0 }, /* \makeback was given in old version of spec, it's now */ /* listed as \makebackup */ { rtfDocAttr, rtfMakeBackup, "makeback", 0 }, { rtfDocAttr, rtfMakeBackup, "makebackup", 0 }, { rtfDocAttr, rtfRTFDefault, "defformat", 0 }, { rtfDocAttr, rtfPSOverlay, "psover", 0 }, { rtfDocAttr, rtfDocTemplate, "doctemp", 0 }, { rtfDocAttr, rtfDefLanguage, "deflang", 0 }, { rtfDocAttr, rtfFENoteType, "fet", 0 }, { rtfDocAttr, rtfFNoteEndSect, "endnotes", 0 }, { rtfDocAttr, rtfFNoteEndDoc, "enddoc", 0 }, { rtfDocAttr, rtfFNoteText, "ftntj", 0 }, { rtfDocAttr, rtfFNoteBottom, "ftnbj", 0 }, { rtfDocAttr, rtfENoteEndSect, "aendnotes", 0 }, { rtfDocAttr, rtfENoteEndDoc, "aenddoc", 0 }, { rtfDocAttr, rtfENoteText, "aftntj", 0 }, { rtfDocAttr, rtfENoteBottom, "aftnbj", 0 }, { rtfDocAttr, rtfFNoteStart, "ftnstart", 0 }, { rtfDocAttr, rtfENoteStart, "aftnstart", 0 }, { rtfDocAttr, rtfFNoteRestartPage, "ftnrstpg", 0 }, { rtfDocAttr, rtfFNoteRestart, "ftnrestart", 0 }, { rtfDocAttr, rtfFNoteRestartCont, "ftnrstcont", 0 }, { rtfDocAttr, rtfENoteRestart, "aftnrestart", 0 }, { rtfDocAttr, rtfENoteRestartCont, "aftnrstcont", 0 }, { rtfDocAttr, rtfFNoteNumArabic, "ftnnar", 0 }, { rtfDocAttr, rtfFNoteNumLLetter, "ftnnalc", 0 }, { rtfDocAttr, rtfFNoteNumULetter, "ftnnauc", 0 }, { rtfDocAttr, rtfFNoteNumLRoman, "ftnnrlc", 0 }, { rtfDocAttr, rtfFNoteNumURoman, "ftnnruc", 0 }, { rtfDocAttr, rtfFNoteNumChicago, "ftnnchi", 0 }, { rtfDocAttr, rtfENoteNumArabic, "aftnnar", 0 }, { rtfDocAttr, rtfENoteNumLLetter, "aftnnalc", 0 }, { rtfDocAttr, rtfENoteNumULetter, "aftnnauc", 0 }, { rtfDocAttr, rtfENoteNumLRoman, "aftnnrlc", 0 }, { rtfDocAttr, rtfENoteNumURoman, "aftnnruc", 0 }, { rtfDocAttr, rtfENoteNumChicago, "aftnnchi", 0 }, { rtfDocAttr, rtfPaperWidth, "paperw", 0 }, { rtfDocAttr, rtfPaperHeight, "paperh", 0 }, { rtfDocAttr, rtfPaperSize, "psz", 0 }, { rtfDocAttr, rtfLeftMargin, "margl", 0 }, { rtfDocAttr, rtfRightMargin, "margr", 0 }, { rtfDocAttr, rtfTopMargin, "margt", 0 }, { rtfDocAttr, rtfBottomMargin, "margb", 0 }, { rtfDocAttr, rtfFacingPage, "facingp", 0 }, { rtfDocAttr, rtfGutterWid, "gutter", 0 }, { rtfDocAttr, rtfMirrorMargin, "margmirror", 0 }, { rtfDocAttr, rtfLandscape, "landscape", 0 }, { rtfDocAttr, rtfPageStart, "pgnstart", 0 }, { rtfDocAttr, rtfWidowCtrl, "widowctrl", 0 }, { rtfDocAttr, rtfLinkStyles, "linkstyles", 0 }, { rtfDocAttr, rtfNoAutoTabIndent, "notabind", 0 }, { rtfDocAttr, rtfWrapSpaces, "wraptrsp", 0 }, { rtfDocAttr, rtfPrintColorsBlack, "prcolbl", 0 }, { rtfDocAttr, rtfNoExtraSpaceRL, "noextrasprl", 0 }, { rtfDocAttr, rtfNoColumnBalance, "nocolbal", 0 }, { rtfDocAttr, rtfCvtMailMergeQuote, "cvmme", 0 }, { rtfDocAttr, rtfSuppressTopSpace, "sprstsp", 0 }, { rtfDocAttr, rtfSuppressPreParSpace, "sprsspbf", 0 }, { rtfDocAttr, rtfCombineTblBorders, "otblrul", 0 }, { rtfDocAttr, rtfTranspMetafiles, "transmf", 0 }, { rtfDocAttr, rtfSwapBorders, "swpbdr", 0 }, { rtfDocAttr, rtfShowHardBreaks, "brkfrm", 0 }, { rtfDocAttr, rtfFormProtected, "formprot", 0 }, { rtfDocAttr, rtfAllProtected, "allprot", 0 }, { rtfDocAttr, rtfFormShading, "formshade", 0 }, { rtfDocAttr, rtfFormDisplay, "formdisp", 0 }, { rtfDocAttr, rtfPrintData, "printdata", 0 }, { rtfDocAttr, rtfRevProtected, "revprot", 0 }, { rtfDocAttr, rtfRevisions, "revisions", 0 }, { rtfDocAttr, rtfRevDisplay, "revprop", 0 }, { rtfDocAttr, rtfRevBar, "revbar", 0 }, { rtfDocAttr, rtfAnnotProtected, "annotprot", 0 }, { rtfDocAttr, rtfRTLDoc, "rtldoc", 0 }, { rtfDocAttr, rtfLTRDoc, "ltrdoc", 0 }, /* * Style attributes */ { rtfStyleAttr, rtfAdditive, "additive", 0 }, { rtfStyleAttr, rtfBasedOn, "sbasedon", 0 }, { rtfStyleAttr, rtfNext, "snext", 0 }, /* * Picture attributes */ { rtfPictAttr, rtfMacQD, "macpict", 0 }, { rtfPictAttr, rtfPMMetafile, "pmmetafile", 0 }, { rtfPictAttr, rtfWinMetafile, "wmetafile", 0 }, { rtfPictAttr, rtfDevIndBitmap, "dibitmap", 0 }, { rtfPictAttr, rtfWinBitmap, "wbitmap", 0 }, { rtfPictAttr, rtfPixelBits, "wbmbitspixel", 0 }, { rtfPictAttr, rtfBitmapPlanes, "wbmplanes", 0 }, { rtfPictAttr, rtfBitmapWid, "wbmwidthbytes", 0 }, { rtfPictAttr, rtfPicWid, "picw", 0 }, { rtfPictAttr, rtfPicHt, "pich", 0 }, { rtfPictAttr, rtfPicGoalWid, "picwgoal", 0 }, { rtfPictAttr, rtfPicGoalHt, "pichgoal", 0 }, /* these two aren't in the spec, but some writers emit them */ { rtfPictAttr, rtfPicGoalWid, "picwGoal", 0 }, { rtfPictAttr, rtfPicGoalHt, "pichGoal", 0 }, { rtfPictAttr, rtfPicScaleX, "picscalex", 0 }, { rtfPictAttr, rtfPicScaleY, "picscaley", 0 }, { rtfPictAttr, rtfPicScaled, "picscaled", 0 }, { rtfPictAttr, rtfPicCropTop, "piccropt", 0 }, { rtfPictAttr, rtfPicCropBottom, "piccropb", 0 }, { rtfPictAttr, rtfPicCropLeft, "piccropl", 0 }, { rtfPictAttr, rtfPicCropRight, "piccropr", 0 }, { rtfPictAttr, rtfPicMFHasBitmap, "picbmp", 0 }, { rtfPictAttr, rtfPicMFBitsPerPixel, "picbpp", 0 }, { rtfPictAttr, rtfPicBinary, "bin", 0 }, /* * NeXT graphic attributes */ { rtfNeXTGrAttr, rtfNeXTGWidth, "width", 0 }, { rtfNeXTGrAttr, rtfNeXTGHeight, "height", 0 }, /* * Destinations */ { rtfDestination, rtfFontTbl, "fonttbl", 0 }, { rtfDestination, rtfFontAltName, "falt", 0 }, { rtfDestination, rtfEmbeddedFont, "fonteb", 0 }, { rtfDestination, rtfFontFile, "fontfile", 0 }, { rtfDestination, rtfFileTbl, "filetbl", 0 }, { rtfDestination, rtfFileInfo, "file", 0 }, { rtfDestination, rtfColorTbl, "colortbl", 0 }, { rtfDestination, rtfStyleSheet, "stylesheet", 0 }, { rtfDestination, rtfKeyCode, "keycode", 0 }, { rtfDestination, rtfRevisionTbl, "revtbl", 0 }, { rtfDestination, rtfInfo, "info", 0 }, { rtfDestination, rtfITitle, "title", 0 }, { rtfDestination, rtfISubject, "subject", 0 }, { rtfDestination, rtfIAuthor, "author", 0 }, { rtfDestination, rtfIOperator, "operator", 0 }, { rtfDestination, rtfIKeywords, "keywords", 0 }, { rtfDestination, rtfIComment, "comment", 0 }, { rtfDestination, rtfIVersion, "version", 0 }, { rtfDestination, rtfIDoccomm, "doccomm", 0 }, /* \verscomm may not exist -- was seen in earlier spec version */ { rtfDestination, rtfIVerscomm, "verscomm", 0 }, { rtfDestination, rtfNextFile, "nextfile", 0 }, { rtfDestination, rtfTemplate, "template", 0 }, { rtfDestination, rtfFNSep, "ftnsep", 0 }, { rtfDestination, rtfFNContSep, "ftnsepc", 0 }, { rtfDestination, rtfFNContNotice, "ftncn", 0 }, { rtfDestination, rtfENSep, "aftnsep", 0 }, { rtfDestination, rtfENContSep, "aftnsepc", 0 }, { rtfDestination, rtfENContNotice, "aftncn", 0 }, { rtfDestination, rtfPageNumLevel, "pgnhn", 0 }, { rtfDestination, rtfParNumLevelStyle, "pnseclvl", 0 }, { rtfDestination, rtfHeader, "header", 0 }, { rtfDestination, rtfFooter, "footer", 0 }, { rtfDestination, rtfHeaderLeft, "headerl", 0 }, { rtfDestination, rtfHeaderRight, "headerr", 0 }, { rtfDestination, rtfHeaderFirst, "headerf", 0 }, { rtfDestination, rtfFooterLeft, "footerl", 0 }, { rtfDestination, rtfFooterRight, "footerr", 0 }, { rtfDestination, rtfFooterFirst, "footerf", 0 }, { rtfDestination, rtfParNumText, "pntext", 0 }, { rtfDestination, rtfParNumbering, "pn", 0 }, { rtfDestination, rtfParNumTextAfter, "pntexta", 0 }, { rtfDestination, rtfParNumTextBefore, "pntextb", 0 }, { rtfDestination, rtfBookmarkStart, "bkmkstart", 0 }, { rtfDestination, rtfBookmarkEnd, "bkmkend", 0 }, { rtfDestination, rtfPict, "pict", 0 }, { rtfDestination, rtfObject, "object", 0 }, { rtfDestination, rtfObjClass, "objclass", 0 }, { rtfDestination, rtfObjName, "objname", 0 }, { rtfObjAttr, rtfObjTime, "objtime", 0 }, { rtfDestination, rtfObjData, "objdata", 0 }, { rtfDestination, rtfObjAlias, "objalias", 0 }, { rtfDestination, rtfObjSection, "objsect", 0 }, /* objitem and objtopic aren't documented in the spec! */ { rtfDestination, rtfObjItem, "objitem", 0 }, { rtfDestination, rtfObjTopic, "objtopic", 0 }, { rtfDestination, rtfObjResult, "result", 0 }, { rtfDestination, rtfDrawObject, "do", 0 }, { rtfDestination, rtfFootnote, "footnote", 0 }, { rtfDestination, rtfAnnotRefStart, "atrfstart", 0 }, { rtfDestination, rtfAnnotRefEnd, "atrfend", 0 }, { rtfDestination, rtfAnnotID, "atnid", 0 }, { rtfDestination, rtfAnnotAuthor, "atnauthor", 0 }, { rtfDestination, rtfAnnotation, "annotation", 0 }, { rtfDestination, rtfAnnotRef, "atnref", 0 }, { rtfDestination, rtfAnnotTime, "atntime", 0 }, { rtfDestination, rtfAnnotIcon, "atnicn", 0 }, { rtfDestination, rtfField, "field", 0 }, { rtfDestination, rtfFieldInst, "fldinst", 0 }, { rtfDestination, rtfFieldResult, "fldrslt", 0 }, { rtfDestination, rtfDataField, "datafield", 0 }, { rtfDestination, rtfIndex, "xe", 0 }, { rtfDestination, rtfIndexText, "txe", 0 }, { rtfDestination, rtfIndexRange, "rxe", 0 }, { rtfDestination, rtfTOC, "tc", 0 }, { rtfDestination, rtfNeXTGraphic, "NeXTGraphic", 0 }, /* * Font families */ { rtfFontFamily, rtfFFNil, "fnil", 0 }, { rtfFontFamily, rtfFFRoman, "froman", 0 }, { rtfFontFamily, rtfFFSwiss, "fswiss", 0 }, { rtfFontFamily, rtfFFModern, "fmodern", 0 }, { rtfFontFamily, rtfFFScript, "fscript", 0 }, { rtfFontFamily, rtfFFDecor, "fdecor", 0 }, { rtfFontFamily, rtfFFTech, "ftech", 0 }, { rtfFontFamily, rtfFFBidirectional, "fbidi", 0 }, /* * Font attributes */ { rtfFontAttr, rtfFontCharSet, "fcharset", 0 }, { rtfFontAttr, rtfFontPitch, "fprq", 0 }, { rtfFontAttr, rtfFontCodePage, "cpg", 0 }, { rtfFontAttr, rtfFTypeNil, "ftnil", 0 }, { rtfFontAttr, rtfFTypeTrueType, "fttruetype", 0 }, /* * File table attributes */ { rtfFileAttr, rtfFileNum, "fid", 0 }, { rtfFileAttr, rtfFileRelPath, "frelative", 0 }, { rtfFileAttr, rtfFileOSNum, "fosnum", 0 }, /* * File sources */ { rtfFileSource, rtfSrcMacintosh, "fvalidmac", 0 }, { rtfFileSource, rtfSrcDOS, "fvaliddos", 0 }, { rtfFileSource, rtfSrcNTFS, "fvalidntfs", 0 }, { rtfFileSource, rtfSrcHPFS, "fvalidhpfs", 0 }, { rtfFileSource, rtfSrcNetwork, "fnetwork", 0 }, /* * Color names */ { rtfColorName, rtfRed, "red", 0 }, { rtfColorName, rtfGreen, "green", 0 }, { rtfColorName, rtfBlue, "blue", 0 }, /* * Charset names */ { rtfCharSet, rtfMacCharSet, "mac", 0 }, { rtfCharSet, rtfAnsiCharSet, "ansi", 0 }, { rtfCharSet, rtfPcCharSet, "pc", 0 }, { rtfCharSet, rtfPcaCharSet, "pca", 0 }, /* * Table attributes */ { rtfTblAttr, rtfRowDef, "trowd", 0 }, { rtfTblAttr, rtfRowGapH, "trgaph", 0 }, { rtfTblAttr, rtfCellPos, "cellx", 0 }, { rtfTblAttr, rtfMergeRngFirst, "clmgf", 0 }, { rtfTblAttr, rtfMergePrevious, "clmrg", 0 }, { rtfTblAttr, rtfRowLeft, "trql", 0 }, { rtfTblAttr, rtfRowRight, "trqr", 0 }, { rtfTblAttr, rtfRowCenter, "trqc", 0 }, { rtfTblAttr, rtfRowLeftEdge, "trleft", 0 }, { rtfTblAttr, rtfRowHt, "trrh", 0 }, { rtfTblAttr, rtfRowHeader, "trhdr", 0 }, { rtfTblAttr, rtfRowKeep, "trkeep", 0 }, { rtfTblAttr, rtfRTLRow, "rtlrow", 0 }, { rtfTblAttr, rtfLTRRow, "ltrrow", 0 }, { rtfTblAttr, rtfRowBordTop, "trbrdrt", 0 }, { rtfTblAttr, rtfRowBordLeft, "trbrdrl", 0 }, { rtfTblAttr, rtfRowBordBottom, "trbrdrb", 0 }, { rtfTblAttr, rtfRowBordRight, "trbrdrr", 0 }, { rtfTblAttr, rtfRowBordHoriz, "trbrdrh", 0 }, { rtfTblAttr, rtfRowBordVert, "trbrdrv", 0 }, { rtfTblAttr, rtfCellBordBottom, "clbrdrb", 0 }, { rtfTblAttr, rtfCellBordTop, "clbrdrt", 0 }, { rtfTblAttr, rtfCellBordLeft, "clbrdrl", 0 }, { rtfTblAttr, rtfCellBordRight, "clbrdrr", 0 }, { rtfTblAttr, rtfCellShading, "clshdng", 0 }, { rtfTblAttr, rtfCellBgPatH, "clbghoriz", 0 }, { rtfTblAttr, rtfCellBgPatV, "clbgvert", 0 }, { rtfTblAttr, rtfCellFwdDiagBgPat, "clbgfdiag", 0 }, { rtfTblAttr, rtfCellBwdDiagBgPat, "clbgbdiag", 0 }, { rtfTblAttr, rtfCellHatchBgPat, "clbgcross", 0 }, { rtfTblAttr, rtfCellDiagHatchBgPat, "clbgdcross", 0 }, /* * The spec lists "clbgdkhor", but the corresponding non-cell * control is "bgdkhoriz". At any rate Macintosh Word seems * to accept both "clbgdkhor" and "clbgdkhoriz". */ { rtfTblAttr, rtfCellDarkBgPatH, "clbgdkhoriz", 0 }, { rtfTblAttr, rtfCellDarkBgPatH, "clbgdkhor", 0 }, { rtfTblAttr, rtfCellDarkBgPatV, "clbgdkvert", 0 }, { rtfTblAttr, rtfCellFwdDarkBgPat, "clbgdkfdiag", 0 }, { rtfTblAttr, rtfCellBwdDarkBgPat, "clbgdkbdiag", 0 }, { rtfTblAttr, rtfCellDarkHatchBgPat, "clbgdkcross", 0 }, { rtfTblAttr, rtfCellDarkDiagHatchBgPat, "clbgdkdcross", 0 }, { rtfTblAttr, rtfCellBgPatLineColor, "clcfpat", 0 }, { rtfTblAttr, rtfCellBgPatColor, "clcbpat", 0 }, /* * Field attributes */ { rtfFieldAttr, rtfFieldDirty, "flddirty", 0 }, { rtfFieldAttr, rtfFieldEdited, "fldedit", 0 }, { rtfFieldAttr, rtfFieldLocked, "fldlock", 0 }, { rtfFieldAttr, rtfFieldPrivate, "fldpriv", 0 }, { rtfFieldAttr, rtfFieldAlt, "fldalt", 0 }, /* * Positioning attributes */ { rtfPosAttr, rtfAbsWid, "absw", 0 }, { rtfPosAttr, rtfAbsHt, "absh", 0 }, { rtfPosAttr, rtfRPosMargH, "phmrg", 0 }, { rtfPosAttr, rtfRPosPageH, "phpg", 0 }, { rtfPosAttr, rtfRPosColH, "phcol", 0 }, { rtfPosAttr, rtfPosX, "posx", 0 }, { rtfPosAttr, rtfPosNegX, "posnegx", 0 }, { rtfPosAttr, rtfPosXCenter, "posxc", 0 }, { rtfPosAttr, rtfPosXInside, "posxi", 0 }, { rtfPosAttr, rtfPosXOutSide, "posxo", 0 }, { rtfPosAttr, rtfPosXRight, "posxr", 0 }, { rtfPosAttr, rtfPosXLeft, "posxl", 0 }, { rtfPosAttr, rtfRPosMargV, "pvmrg", 0 }, { rtfPosAttr, rtfRPosPageV, "pvpg", 0 }, { rtfPosAttr, rtfRPosParaV, "pvpara", 0 }, { rtfPosAttr, rtfPosY, "posy", 0 }, { rtfPosAttr, rtfPosNegY, "posnegy", 0 }, { rtfPosAttr, rtfPosYInline, "posyil", 0 }, { rtfPosAttr, rtfPosYTop, "posyt", 0 }, { rtfPosAttr, rtfPosYCenter, "posyc", 0 }, { rtfPosAttr, rtfPosYBottom, "posyb", 0 }, { rtfPosAttr, rtfNoWrap, "nowrap", 0 }, { rtfPosAttr, rtfDistFromTextAll, "dxfrtext", 0 }, { rtfPosAttr, rtfDistFromTextX, "dfrmtxtx", 0 }, { rtfPosAttr, rtfDistFromTextY, "dfrmtxty", 0 }, /* \dyfrtext no longer exists in spec 1.2, apparently */ /* replaced by \dfrmtextx and \dfrmtexty. */ { rtfPosAttr, rtfTextDistY, "dyfrtext", 0 }, { rtfPosAttr, rtfDropCapLines, "dropcapli", 0 }, { rtfPosAttr, rtfDropCapType, "dropcapt", 0 }, /* * Object controls */ { rtfObjAttr, rtfObjEmb, "objemb", 0 }, { rtfObjAttr, rtfObjLink, "objlink", 0 }, { rtfObjAttr, rtfObjAutoLink, "objautlink", 0 }, { rtfObjAttr, rtfObjSubscriber, "objsub", 0 }, { rtfObjAttr, rtfObjPublisher, "objpub", 0 }, { rtfObjAttr, rtfObjICEmb, "objicemb", 0 }, { rtfObjAttr, rtfObjLinkSelf, "linkself", 0 }, { rtfObjAttr, rtfObjLock, "objupdate", 0 }, { rtfObjAttr, rtfObjUpdate, "objlock", 0 }, { rtfObjAttr, rtfObjHt, "objh", 0 }, { rtfObjAttr, rtfObjWid, "objw", 0 }, { rtfObjAttr, rtfObjSetSize, "objsetsize", 0 }, { rtfObjAttr, rtfObjAlign, "objalign", 0 }, { rtfObjAttr, rtfObjTransposeY, "objtransy", 0 }, { rtfObjAttr, rtfObjCropTop, "objcropt", 0 }, { rtfObjAttr, rtfObjCropBottom, "objcropb", 0 }, { rtfObjAttr, rtfObjCropLeft, "objcropl", 0 }, { rtfObjAttr, rtfObjCropRight, "objcropr", 0 }, { rtfObjAttr, rtfObjScaleX, "objscalex", 0 }, { rtfObjAttr, rtfObjScaleY, "objscaley", 0 }, { rtfObjAttr, rtfObjResRTF, "rsltrtf", 0 }, { rtfObjAttr, rtfObjResPict, "rsltpict", 0 }, { rtfObjAttr, rtfObjResBitmap, "rsltbmp", 0 }, { rtfObjAttr, rtfObjResText, "rslttxt", 0 }, { rtfObjAttr, rtfObjResMerge, "rsltmerge", 0 }, { rtfObjAttr, rtfObjBookmarkPubObj, "bkmkpub", 0 }, { rtfObjAttr, rtfObjPubAutoUpdate, "pubauto", 0 }, /* * Associated character formatting attributes */ { rtfACharAttr, rtfACBold, "ab", 0 }, { rtfACharAttr, rtfACAllCaps, "caps", 0 }, { rtfACharAttr, rtfACForeColor, "acf", 0 }, { rtfACharAttr, rtfACSubScript, "adn", 0 }, { rtfACharAttr, rtfACExpand, "aexpnd", 0 }, { rtfACharAttr, rtfACFontNum, "af", 0 }, { rtfACharAttr, rtfACFontSize, "afs", 0 }, { rtfACharAttr, rtfACItalic, "ai", 0 }, { rtfACharAttr, rtfACLanguage, "alang", 0 }, { rtfACharAttr, rtfACOutline, "aoutl", 0 }, { rtfACharAttr, rtfACSmallCaps, "ascaps", 0 }, { rtfACharAttr, rtfACShadow, "ashad", 0 }, { rtfACharAttr, rtfACStrikeThru, "astrike", 0 }, { rtfACharAttr, rtfACUnderline, "aul", 0 }, { rtfACharAttr, rtfACDotUnderline, "auld", 0 }, { rtfACharAttr, rtfACDbUnderline, "auldb", 0 }, { rtfACharAttr, rtfACNoUnderline, "aulnone", 0 }, { rtfACharAttr, rtfACWordUnderline, "aulw", 0 }, { rtfACharAttr, rtfACSuperScript, "aup", 0 }, /* * Footnote attributes */ { rtfFNoteAttr, rtfFNAlt, "ftnalt", 0 }, /* * Key code attributes */ { rtfKeyCodeAttr, rtfAltKey, "alt", 0 }, { rtfKeyCodeAttr, rtfShiftKey, "shift", 0 }, { rtfKeyCodeAttr, rtfControlKey, "ctrl", 0 }, { rtfKeyCodeAttr, rtfFunctionKey, "fn", 0 }, /* * Bookmark attributes */ { rtfBookmarkAttr, rtfBookmarkFirstCol, "bkmkcolf", 0 }, { rtfBookmarkAttr, rtfBookmarkLastCol, "bkmkcoll", 0 }, /* * Index entry attributes */ { rtfIndexAttr, rtfIndexNumber, "xef", 0 }, { rtfIndexAttr, rtfIndexBold, "bxe", 0 }, { rtfIndexAttr, rtfIndexItalic, "ixe", 0 }, /* * Table of contents attributes */ { rtfTOCAttr, rtfTOCType, "tcf", 0 }, { rtfTOCAttr, rtfTOCLevel, "tcl", 0 }, /* * Drawing object attributes */ { rtfDrawAttr, rtfDrawLock, "dolock", 0 }, { rtfDrawAttr, rtfDrawPageRelX, "doxpage", 0 }, { rtfDrawAttr, rtfDrawColumnRelX, "dobxcolumn", 0 }, { rtfDrawAttr, rtfDrawMarginRelX, "dobxmargin", 0 }, { rtfDrawAttr, rtfDrawPageRelY, "dobypage", 0 }, { rtfDrawAttr, rtfDrawColumnRelY, "dobycolumn", 0 }, { rtfDrawAttr, rtfDrawMarginRelY, "dobymargin", 0 }, { rtfDrawAttr, rtfDrawHeight, "dobhgt", 0 }, { rtfDrawAttr, rtfDrawBeginGroup, "dpgroup", 0 }, { rtfDrawAttr, rtfDrawGroupCount, "dpcount", 0 }, { rtfDrawAttr, rtfDrawEndGroup, "dpendgroup", 0 }, { rtfDrawAttr, rtfDrawArc, "dparc", 0 }, { rtfDrawAttr, rtfDrawCallout, "dpcallout", 0 }, { rtfDrawAttr, rtfDrawEllipse, "dpellipse", 0 }, { rtfDrawAttr, rtfDrawLine, "dpline", 0 }, { rtfDrawAttr, rtfDrawPolygon, "dppolygon", 0 }, { rtfDrawAttr, rtfDrawPolyLine, "dppolyline", 0 }, { rtfDrawAttr, rtfDrawRect, "dprect", 0 }, { rtfDrawAttr, rtfDrawTextBox, "dptxbx", 0 }, { rtfDrawAttr, rtfDrawOffsetX, "dpx", 0 }, { rtfDrawAttr, rtfDrawSizeX, "dpxsize", 0 }, { rtfDrawAttr, rtfDrawOffsetY, "dpy", 0 }, { rtfDrawAttr, rtfDrawSizeY, "dpysize", 0 }, { rtfDrawAttr, rtfCOAngle, "dpcoa", 0 }, { rtfDrawAttr, rtfCOAccentBar, "dpcoaccent", 0 }, { rtfDrawAttr, rtfCOBestFit, "dpcobestfit", 0 }, { rtfDrawAttr, rtfCOBorder, "dpcoborder", 0 }, { rtfDrawAttr, rtfCOAttachAbsDist, "dpcodabs", 0 }, { rtfDrawAttr, rtfCOAttachBottom, "dpcodbottom", 0 }, { rtfDrawAttr, rtfCOAttachCenter, "dpcodcenter", 0 }, { rtfDrawAttr, rtfCOAttachTop, "dpcodtop", 0 }, { rtfDrawAttr, rtfCOLength, "dpcolength", 0 }, { rtfDrawAttr, rtfCONegXQuadrant, "dpcominusx", 0 }, { rtfDrawAttr, rtfCONegYQuadrant, "dpcominusy", 0 }, { rtfDrawAttr, rtfCOOffset, "dpcooffset", 0 }, { rtfDrawAttr, rtfCOAttachSmart, "dpcosmarta", 0 }, { rtfDrawAttr, rtfCODoubleLine, "dpcotdouble", 0 }, { rtfDrawAttr, rtfCORightAngle, "dpcotright", 0 }, { rtfDrawAttr, rtfCOSingleLine, "dpcotsingle", 0 }, { rtfDrawAttr, rtfCOTripleLine, "dpcottriple", 0 }, { rtfDrawAttr, rtfDrawTextBoxMargin, "dptxbxmar", 0 }, { rtfDrawAttr, rtfDrawTextBoxText, "dptxbxtext", 0 }, { rtfDrawAttr, rtfDrawRoundRect, "dproundr", 0 }, { rtfDrawAttr, rtfDrawPointX, "dpptx", 0 }, { rtfDrawAttr, rtfDrawPointY, "dppty", 0 }, { rtfDrawAttr, rtfDrawPolyCount, "dppolycount", 0 }, { rtfDrawAttr, rtfDrawArcFlipX, "dparcflipx", 0 }, { rtfDrawAttr, rtfDrawArcFlipY, "dparcflipy", 0 }, { rtfDrawAttr, rtfDrawLineBlue, "dplinecob", 0 }, { rtfDrawAttr, rtfDrawLineGreen, "dplinecog", 0 }, { rtfDrawAttr, rtfDrawLineRed, "dplinecor", 0 }, { rtfDrawAttr, rtfDrawLinePalette, "dplinepal", 0 }, { rtfDrawAttr, rtfDrawLineDashDot, "dplinedado", 0 }, { rtfDrawAttr, rtfDrawLineDashDotDot, "dplinedadodo", 0 }, { rtfDrawAttr, rtfDrawLineDash, "dplinedash", 0 }, { rtfDrawAttr, rtfDrawLineDot, "dplinedot", 0 }, { rtfDrawAttr, rtfDrawLineGray, "dplinegray", 0 }, { rtfDrawAttr, rtfDrawLineHollow, "dplinehollow", 0 }, { rtfDrawAttr, rtfDrawLineSolid, "dplinesolid", 0 }, { rtfDrawAttr, rtfDrawLineWidth, "dplinew", 0 }, { rtfDrawAttr, rtfDrawHollowEndArrow, "dpaendhol", 0 }, { rtfDrawAttr, rtfDrawEndArrowLength, "dpaendl", 0 }, { rtfDrawAttr, rtfDrawSolidEndArrow, "dpaendsol", 0 }, { rtfDrawAttr, rtfDrawEndArrowWidth, "dpaendw", 0 }, { rtfDrawAttr, rtfDrawHollowStartArrow,"dpastarthol", 0 }, { rtfDrawAttr, rtfDrawStartArrowLength,"dpastartl", 0 }, { rtfDrawAttr, rtfDrawSolidStartArrow, "dpastartsol", 0 }, { rtfDrawAttr, rtfDrawStartArrowWidth, "dpastartw", 0 }, { rtfDrawAttr, rtfDrawBgFillBlue, "dpfillbgcb", 0 }, { rtfDrawAttr, rtfDrawBgFillGreen, "dpfillbgcg", 0 }, { rtfDrawAttr, rtfDrawBgFillRed, "dpfillbgcr", 0 }, { rtfDrawAttr, rtfDrawBgFillPalette, "dpfillbgpal", 0 }, { rtfDrawAttr, rtfDrawBgFillGray, "dpfillbggray", 0 }, { rtfDrawAttr, rtfDrawFgFillBlue, "dpfillfgcb", 0 }, { rtfDrawAttr, rtfDrawFgFillGreen, "dpfillfgcg", 0 }, { rtfDrawAttr, rtfDrawFgFillRed, "dpfillfgcr", 0 }, { rtfDrawAttr, rtfDrawFgFillPalette, "dpfillfgpal", 0 }, { rtfDrawAttr, rtfDrawFgFillGray, "dpfillfggray", 0 }, { rtfDrawAttr, rtfDrawFillPatIndex, "dpfillpat", 0 }, { rtfDrawAttr, rtfDrawShadow, "dpshadow", 0 }, { rtfDrawAttr, rtfDrawShadowXOffset, "dpshadx", 0 }, { rtfDrawAttr, rtfDrawShadowYOffset, "dpshady", 0 }, { rtfVersion, -1, "rtf", 0 }, { rtfDefFont, -1, "deff", 0 }, { 0, -1, (char *) NULL, 0 } }; /* * Initialize lookup table hash values. Only need to do this once. */ static void LookupInit () { static int inited = 0; RTFKey *rp; if (inited == 0) { for (rp = rtfKey; rp->rtfKStr != (char *) NULL; rp++) rp->rtfKHash = Hash (rp->rtfKStr); ++inited; } } /* * Determine major and minor number of control token. If it's * not found, the class turns into rtfUnknown. */ static void Lookup (s) char *s; { RTFKey *rp; int hash; ++s; /* skip over the leading \ character */ hash = Hash (s); for (rp = rtfKey; rp->rtfKStr != (char *) NULL; rp++) { if (hash == rp->rtfKHash && strcmp (s, rp->rtfKStr) == 0) { rtfClass = rtfControl; rtfMajor = rp->rtfKMajor; rtfMinor = rp->rtfKMinor; return; } } rtfClass = rtfUnknown; } /* * Compute hash value of symbol */ static int Hash (s) char *s; { char c; int val = 0; while ((c = *s++) != '\0') val += (int) c; return (val); } /* ---------------------------------------------------------------------- */ /* * Memory allocation routines */ /* * Return pointer to block of size bytes, or NULL if there's * not enough memory available. * * This is called through RTFAlloc(), a define which coerces the * argument to int. This avoids the persistent problem of allocation * failing under THINK C when a long is passed. */ char * _RTFAlloc (size) int size; { return HeapAlloc(RICHED32_hHeap, 0, size); } /* * Saves a string on the heap and returns a pointer to it. */ char * RTFStrSave (s) char *s; { char *p; if ((p = RTFAlloc ((int) (strlen (s) + 1))) == (char *) NULL) return ((char *) NULL); return (strcpy (p, s)); } void RTFFree (p) char *p; { if (p != (char *) NULL) HeapFree(RICHED32_hHeap, 0, p); } /* ---------------------------------------------------------------------- */ /* * Token comparison routines */ int RTFCheckCM (class, major) int class, major; { return (rtfClass == class && rtfMajor == major); } int RTFCheckCMM (class, major, minor) int class, major, minor; { return (rtfClass == class && rtfMajor == major && rtfMinor == minor); } int RTFCheckMM (major, minor) int major, minor; { return (rtfMajor == major && rtfMinor == minor); } /* ---------------------------------------------------------------------- */ int RTFCharToHex (c) char c; { if (isupper (c)) c = tolower (c); if (isdigit (c)) return (c - '0'); /* '0'..'9' */ return (c - 'a' + 10); /* 'a'..'f' */ } int RTFHexToChar (i) int i; { if (i < 10) return (i + '0'); return (i - 10 + 'a'); } /* ---------------------------------------------------------------------- */ /* * RTFReadOutputMap() -- Read output translation map */ /* * Read in an array describing the relation between the standard character set * and an RTF translator's corresponding output sequences. Each line consists * of a standard character name and the output sequence for that character. * * outMap is an array of strings into which the sequences should be placed. * It should be declared like this in the calling program: * * char *outMap[rtfSC_MaxChar]; * * reinit should be non-zero if outMap should be initialized * zero otherwise. * */ int RTFReadOutputMap (outMap, reinit) char *outMap[]; int reinit; { int i; int stdCode; char *name, *seq; if (reinit) { for (i = 0; i < rtfSC_MaxChar; i++) { outMap[i] = (char *) NULL; } } for (i=0 ;i< sizeof(text_map)/sizeof(char*); i+=2) { name = text_map[i]; seq = text_map[i+1]; stdCode = RTFStdCharCode( name ); outMap[stdCode] = seq; } return (1); } /* ---------------------------------------------------------------------- */ /* * Open a library file. */ static FILE *(*libFileOpen) () = NULL; void RTFSetOpenLibFileProc (proc) FILE *(*proc) (); { libFileOpen = proc; } FILE * RTFOpenLibFile (file, mode) char *file; char *mode; { if (libFileOpen == NULL) return ((FILE *) NULL); return ((*libFileOpen) (file, mode)); } /* ---------------------------------------------------------------------- */ /* * Print message. Default is to send message to stderr * but this may be overridden with RTFSetMsgProc(). * * Message should include linefeeds as necessary. If the default * function is overridden, the overriding function may want to * map linefeeds to another line ending character or sequence if * the host system doesn't use linefeeds. */ static void DefaultMsgProc (s) char *s; { fprintf (stderr, "%s", s); } static RTFFuncPtr msgProc = DefaultMsgProc; void RTFSetMsgProc (proc) RTFFuncPtr proc; { msgProc = proc; } # ifdef STDARG /* * This version is for systems with stdarg */ void RTFMsg (char *fmt, ...) { char buf[rtfBufSiz]; va_list args; va_start (args,fmt); vsprintf (buf, fmt, args); va_end (args); (*msgProc) (buf); } # else /* !STDARG */ # ifdef VARARGS /* * This version is for systems that have varargs. */ void RTFMsg (va_alist) va_dcl { va_list args; char *fmt; char buf[rtfBufSiz]; va_start (args); fmt = va_arg (args, char *); vsprintf (buf, fmt, args); va_end (args); (*msgProc) (buf); } # else /* !VARARGS */ /* * This version is for systems that don't have varargs. */ void RTFMsg (fmt, a1, a2, a3, a4, a5, a6, a7, a8, a9) char *fmt; char *a1, *a2, *a3, *a4, *a5, *a6, *a7, *a8, *a9; { char buf[rtfBufSiz]; sprintf (buf, fmt, a1, a2, a3, a4, a5, a6, a7, a8, a9); (*msgProc) (buf); } # endif /* !VARARGS */ # endif /* !STDARG */ /* ---------------------------------------------------------------------- */ /* * Process termination. Print error message and exit. Also prints * current token, and current input line number and position within * line if any input has been read from the current file. (No input * has been read if prevChar is EOF). */ static void DefaultPanicProc (s) char *s; { fprintf (stderr, "%s", s); /*exit (1);*/ } static RTFFuncPtr panicProc = DefaultPanicProc; void RTFSetPanicProc (proc) RTFFuncPtr proc; { panicProc = proc; } # ifdef STDARG /* * This version is for systems with stdarg */ void RTFPanic (char *fmt, ...) { char buf[rtfBufSiz]; va_list args; va_start (args,fmt); vsprintf (buf, fmt, args); va_end (args); (void) strcat (buf, "\n"); if (prevChar != EOF && rtfTextBuf != (char *) NULL) { sprintf (buf + strlen (buf), "Last token read was \"%s\" near line %ld, position %d.\n", rtfTextBuf, rtfLineNum, rtfLinePos); } (*panicProc) (buf); } # else /* !STDARG */ # ifdef VARARGS /* * This version is for systems that have varargs. */ void RTFPanic (va_alist) va_dcl { va_list args; char *fmt; char buf[rtfBufSiz]; va_start (args); fmt = va_arg (args, char *); vsprintf (buf, fmt, args); va_end (args); (void) strcat (buf, "\n"); if (prevChar != EOF && rtfTextBuf != (char *) NULL) { sprintf (buf + strlen (buf), "Last token read was \"%s\" near line %ld, position %d.\n", rtfTextBuf, rtfLineNum, rtfLinePos); } (*panicProc) (buf); } # else /* !VARARGS */ /* * This version is for systems that don't have varargs. */ void RTFPanic (fmt, a1, a2, a3, a4, a5, a6, a7, a8, a9) char *fmt; char *a1, *a2, *a3, *a4, *a5, *a6, *a7, *a8, *a9; { char buf[rtfBufSiz]; sprintf (buf, fmt, a1, a2, a3, a4, a5, a6, a7, a8, a9); (void) strcat (buf, "\n"); if (prevChar != EOF && rtfTextBuf != (char *) NULL) { sprintf (buf + strlen (buf), "Last token read was \"%s\" near line %ld, position %d.\n", rtfTextBuf, rtfLineNum, rtfLinePos); } (*panicProc) (buf); } # endif /* !VARARGS */ # endif /* !STDARG */ wine-20000526/dlls/richedit/riched32.h0100644000175000001440000000046307105350315016751 0ustar julliardusers/* * Ritch Edit 32 class extra info * * Copyright 2000 Jean-Clauyde Batista * */ #ifndef __WINE_RICHED32_H #define __WINE_RICHED32_H #include "richedit.h" extern HMODULE RICHED32_hModule; extern VOID RICHED32_Register (VOID); extern VOID RICHED32_Unregister (VOID); #endif /* __WINE_RICHED32_H */ wine-20000526/dlls/richedit/riched32.spec0100644000175000001440000000014507105350315017451 0ustar julliardusersname riched32 type win32 init RICHED32_LibMain 2 stdcall DllGetVersion (ptr) RICHED32_DllGetVersion wine-20000526/dlls/richedit/richedit.c0100644000175000001440000001345207106625114017141 0ustar julliardusers/* * RichEdit32 functions * * This module is a simple wrap-arround the edit controls. * At the point, it is good only for application who use the RICHEDIT control to * display RTF text. * * Copyright 2000 by Jean-Claude Batista * */ #include "windows.h" #include "winbase.h" #include "heap.h" #include "debugtools.h" #include "winerror.h" #include "riched32.h" #include "richedit.h" #include "charlist.h" #include "rtf.h" #include "rtf2text.h" #define ID_EDIT 1 DEFAULT_DEBUG_CHANNEL(richedit) HANDLE RICHED32_hHeap = (HANDLE)NULL; DWORD RICHED32_dwProcessesAttached = 0; /* LPSTR RICHED32_aSubclass = (LPSTR)NULL; */ HMODULE RICHED32_hModule = 0; /*********************************************************************** * RICHED32_LibMain [Internal] Initializes the internal 'RICHED32.DLL'. * * PARAMS * hinstDLL [I] handle to the 'dlls' instance * fdwReason [I] * lpvReserved [I] reserverd, must be NULL * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI RICHED32_LibMain (HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved) { switch (fdwReason) { case DLL_PROCESS_ATTACH: if (RICHED32_dwProcessesAttached == 0) { /* This will be wrong for any other process attching in this address-space! */ RICHED32_hModule = (HMODULE)hinstDLL; /* create private heap */ RICHED32_hHeap = HeapCreate (0, 0x10000, 0); } /* register the Rich Edit class */ RICHED32_Register (); RICHED32_dwProcessesAttached++; break; case DLL_PROCESS_DETACH: RICHED32_dwProcessesAttached--; /* unregister all common control classes */ RICHED32_Unregister (); if (RICHED32_dwProcessesAttached == 0) { HeapDestroy (RICHED32_hHeap); RICHED32_hHeap = (HANDLE)NULL; } break; } return TRUE; } /* * * DESCRIPTION: * Window procedure of the RichEdit control. * */ static LRESULT WINAPI RICHED32_WindowProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { int RTFToBuffer(char* pBuffer, int nBufferSize); LONG newstyle = 0; LONG style = 0; static HWND hwndEdit; static char* rtfBuffer; int rtfBufferSize; switch (uMsg) { case WM_CREATE : /* remove SCROLLBARS from the current window style */ newstyle = style = ((LPCREATESTRUCTA) lParam)->style; newstyle &= ~WS_HSCROLL; newstyle &= ~WS_VSCROLL; newstyle &= ~ES_AUTOHSCROLL; newstyle &= ~ES_AUTOVSCROLL; hwndEdit = CreateWindowA ("edit", ((LPCREATESTRUCTA) lParam)->lpszName, style, 0, 0, 0, 0, hwnd, (HMENU) ID_EDIT, ((LPCREATESTRUCTA) lParam)->hInstance, NULL) ; SetWindowLongA(hwnd,GWL_STYLE, newstyle); return 0 ; case WM_SETFOCUS : SetFocus (hwndEdit) ; return 0 ; case WM_SIZE : MoveWindow (hwndEdit, 0, 0, LOWORD (lParam), HIWORD (lParam), TRUE) ; return 0 ; case WM_COMMAND : if (LOWORD (wParam) == ID_EDIT) if (HIWORD (wParam) == EN_ERRSPACE || HIWORD (wParam) == EN_MAXTEXT) MessageBoxA (hwnd, "RichEdit control out of space.", "ERROR", MB_OK | MB_ICONSTOP) ; return 0 ; case EM_STREAMIN: /* setup the RTF parser */ RTFSetEditStream(( EDITSTREAM*)lParam); WriterInit(); RTFInit (); BeginFile(); /* do the parsing */ RTFRead (); rtfBufferSize = RTFToBuffer(NULL, 0); rtfBuffer = HeapAlloc(RICHED32_hHeap, 0,rtfBufferSize*sizeof(char)); if(rtfBuffer) { RTFToBuffer(rtfBuffer, rtfBufferSize); SetWindowTextA(hwndEdit,rtfBuffer); HeapFree(RICHED32_hHeap, 0,rtfBuffer); } else WARN("Not enough memory for a allocating rtfBuffer\n"); return 0; } /*return SendMessageA( hwndEdit,uMsg,wParam,lParam);*/ return DefWindowProcA( hwnd,uMsg,wParam,lParam); } /*********************************************************************** * DllGetVersion [COMCTL32.25] * * Retrieves version information of the 'COMCTL32.DLL' * * PARAMS * pdvi [O] pointer to version information structure. * * RETURNS * Success: S_OK * Failure: E_INVALIDARG * * NOTES * Returns version of a comctl32.dll from IE4.01 SP1. */ HRESULT WINAPI RICHED32_DllGetVersion (DLLVERSIONINFO *pdvi) { if (pdvi->cbSize != sizeof(DLLVERSIONINFO)) { return E_INVALIDARG; } pdvi->dwMajorVersion = 4; pdvi->dwMinorVersion = 0; pdvi->dwBuildNumber = 0; pdvi->dwPlatformID = 0; return S_OK; } /*** * DESCRIPTION: * Registers the window class. * * PARAMETER(S): * None * * RETURN: * None */ VOID RICHED32_Register(void) { WNDCLASSA wndClass; ZeroMemory(&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_HREDRAW | CS_VREDRAW | CS_GLOBALCLASS; wndClass.lpfnWndProc = (WNDPROC)RICHED32_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = 0; /*(sizeof(RICHED32_INFO *);*/ wndClass.hCursor = LoadCursorA(0, IDC_ARROWA); wndClass.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1); wndClass.lpszClassName = RICHEDIT_CLASS10A;//WC_RICHED32A; RegisterClassA (&wndClass); } /*** * DESCRIPTION: * Unregisters the window class. * * PARAMETER(S): * None * * RETURN: * None */ VOID RICHED32_Unregister(void) { UnregisterClassA(RICHEDIT_CLASS10A, (HINSTANCE)NULL); } wine-20000526/dlls/richedit/rtf.h0100644000175000001440000012474007105350315016146 0ustar julliardusers#ifndef _RTF #define _RTF #include #include #include void RTFSetEditStream(EDITSTREAM *es); /* The following defines are automatically generated. Do not edit. */ /* These must be sequential beginning from zero */ #define rtfSC_nothing 0 #define rtfSC_space 1 #define rtfSC_exclam 2 #define rtfSC_quotedbl 3 #define rtfSC_numbersign 4 #define rtfSC_dollar 5 #define rtfSC_percent 6 #define rtfSC_ampersand 7 #define rtfSC_quoteright 8 #define rtfSC_parenleft 9 #define rtfSC_parenright 10 #define rtfSC_asterisk 11 #define rtfSC_plus 12 #define rtfSC_comma 13 #define rtfSC_hyphen 14 #define rtfSC_period 15 #define rtfSC_slash 16 #define rtfSC_zero 17 #define rtfSC_one 18 #define rtfSC_two 19 #define rtfSC_three 20 #define rtfSC_four 21 #define rtfSC_five 22 #define rtfSC_six 23 #define rtfSC_seven 24 #define rtfSC_eight 25 #define rtfSC_nine 26 #define rtfSC_colon 27 #define rtfSC_semicolon 28 #define rtfSC_less 29 #define rtfSC_equal 30 #define rtfSC_greater 31 #define rtfSC_question 32 #define rtfSC_at 33 #define rtfSC_A 34 #define rtfSC_B 35 #define rtfSC_C 36 #define rtfSC_D 37 #define rtfSC_E 38 #define rtfSC_F 39 #define rtfSC_G 40 #define rtfSC_H 41 #define rtfSC_I 42 #define rtfSC_J 43 #define rtfSC_K 44 #define rtfSC_L 45 #define rtfSC_M 46 #define rtfSC_N 47 #define rtfSC_O 48 #define rtfSC_P 49 #define rtfSC_Q 50 #define rtfSC_R 51 #define rtfSC_S 52 #define rtfSC_T 53 #define rtfSC_U 54 #define rtfSC_V 55 #define rtfSC_W 56 #define rtfSC_X 57 #define rtfSC_Y 58 #define rtfSC_Z 59 #define rtfSC_bracketleft 60 #define rtfSC_backslash 61 #define rtfSC_bracketright 62 #define rtfSC_asciicircum 63 #define rtfSC_underscore 64 #define rtfSC_quoteleft 65 #define rtfSC_a 66 #define rtfSC_b 67 #define rtfSC_c 68 #define rtfSC_d 69 #define rtfSC_e 70 #define rtfSC_f 71 #define rtfSC_g 72 #define rtfSC_h 73 #define rtfSC_i 74 #define rtfSC_j 75 #define rtfSC_k 76 #define rtfSC_l 77 #define rtfSC_m 78 #define rtfSC_n 79 #define rtfSC_o 80 #define rtfSC_p 81 #define rtfSC_q 82 #define rtfSC_r 83 #define rtfSC_s 84 #define rtfSC_t 85 #define rtfSC_u 86 #define rtfSC_v 87 #define rtfSC_w 88 #define rtfSC_x 89 #define rtfSC_y 90 #define rtfSC_z 91 #define rtfSC_braceleft 92 #define rtfSC_bar 93 #define rtfSC_braceright 94 #define rtfSC_asciitilde 95 #define rtfSC_exclamdown 96 #define rtfSC_cent 97 #define rtfSC_sterling 98 #define rtfSC_fraction 99 #define rtfSC_yen 100 #define rtfSC_florin 101 #define rtfSC_section 102 #define rtfSC_currency 103 #define rtfSC_quotedblleft 104 #define rtfSC_guillemotleft 105 #define rtfSC_guilsinglleft 106 #define rtfSC_guilsinglright 107 #define rtfSC_fi 108 #define rtfSC_fl 109 #define rtfSC_endash 110 #define rtfSC_dagger 111 #define rtfSC_daggerdbl 112 #define rtfSC_periodcentered 113 #define rtfSC_paragraph 114 #define rtfSC_bullet 115 #define rtfSC_quotesinglbase 116 #define rtfSC_quotedblbase 117 #define rtfSC_quotedblright 118 #define rtfSC_guillemotright 119 #define rtfSC_ellipsis 120 #define rtfSC_perthousand 121 #define rtfSC_questiondown 122 #define rtfSC_grave 123 #define rtfSC_acute 124 #define rtfSC_circumflex 125 #define rtfSC_tilde 126 #define rtfSC_macron 127 #define rtfSC_breve 128 #define rtfSC_dotaccent 129 #define rtfSC_dieresis 130 #define rtfSC_ring 131 #define rtfSC_cedilla 132 #define rtfSC_hungarumlaut 133 #define rtfSC_ogonek 134 #define rtfSC_caron 135 #define rtfSC_emdash 136 #define rtfSC_AE 137 #define rtfSC_ordfeminine 138 #define rtfSC_Lslash 139 #define rtfSC_Oslash 140 #define rtfSC_OE 141 #define rtfSC_ordmasculine 142 #define rtfSC_ae 143 #define rtfSC_dotlessi 144 #define rtfSC_lslash 145 #define rtfSC_oslash 146 #define rtfSC_oe 147 #define rtfSC_germandbls 148 #define rtfSC_Aacute 149 #define rtfSC_Acircumflex 150 #define rtfSC_Adieresis 151 #define rtfSC_Agrave 152 #define rtfSC_Aring 153 #define rtfSC_Atilde 154 #define rtfSC_Ccedilla 155 #define rtfSC_Eacute 156 #define rtfSC_Ecircumflex 157 #define rtfSC_Edieresis 158 #define rtfSC_Egrave 159 #define rtfSC_Eth 160 #define rtfSC_Iacute 161 #define rtfSC_Icircumflex 162 #define rtfSC_Idieresis 163 #define rtfSC_Igrave 164 #define rtfSC_Ntilde 165 #define rtfSC_Oacute 166 #define rtfSC_Ocircumflex 167 #define rtfSC_Odieresis 168 #define rtfSC_Ograve 169 #define rtfSC_Otilde 170 #define rtfSC_Scaron 171 #define rtfSC_Thorn 172 #define rtfSC_Uacute 173 #define rtfSC_Ucircumflex 174 #define rtfSC_Udieresis 175 #define rtfSC_Ugrave 176 #define rtfSC_Yacute 177 #define rtfSC_Ydieresis 178 #define rtfSC_aacute 179 #define rtfSC_acircumflex 180 #define rtfSC_adieresis 181 #define rtfSC_agrave 182 #define rtfSC_aring 183 #define rtfSC_atilde 184 #define rtfSC_brokenbar 185 #define rtfSC_ccedilla 186 #define rtfSC_copyright 187 #define rtfSC_degree 188 #define rtfSC_divide 189 #define rtfSC_eacute 190 #define rtfSC_ecircumflex 191 #define rtfSC_edieresis 192 #define rtfSC_egrave 193 #define rtfSC_eth 194 #define rtfSC_iacute 195 #define rtfSC_icircumflex 196 #define rtfSC_idieresis 197 #define rtfSC_igrave 198 #define rtfSC_logicalnot 199 #define rtfSC_minus 200 #define rtfSC_multiply 201 #define rtfSC_ntilde 202 #define rtfSC_oacute 203 #define rtfSC_ocircumflex 204 #define rtfSC_odieresis 205 #define rtfSC_ograve 206 #define rtfSC_onehalf 207 #define rtfSC_onequarter 208 #define rtfSC_onesuperior 209 #define rtfSC_otilde 210 #define rtfSC_plusminus 211 #define rtfSC_registered 212 #define rtfSC_thorn 213 #define rtfSC_threequarters 214 #define rtfSC_threesuperior 215 #define rtfSC_trademark 216 #define rtfSC_twosuperior 217 #define rtfSC_uacute 218 #define rtfSC_ucircumflex 219 #define rtfSC_udieresis 220 #define rtfSC_ugrave 221 #define rtfSC_yacute 222 #define rtfSC_ydieresis 223 #define rtfSC_Alpha 224 #define rtfSC_Beta 225 #define rtfSC_Chi 226 #define rtfSC_Delta 227 #define rtfSC_Epsilon 228 #define rtfSC_Phi 229 #define rtfSC_Gamma 230 #define rtfSC_Eta 231 #define rtfSC_Iota 232 #define rtfSC_Kappa 233 #define rtfSC_Lambda 234 #define rtfSC_Mu 235 #define rtfSC_Nu 236 #define rtfSC_Omicron 237 #define rtfSC_Pi 238 #define rtfSC_Theta 239 #define rtfSC_Rho 240 #define rtfSC_Sigma 241 #define rtfSC_Tau 242 #define rtfSC_Upsilon 243 #define rtfSC_varUpsilon 244 #define rtfSC_Omega 245 #define rtfSC_Xi 246 #define rtfSC_Psi 247 #define rtfSC_Zeta 248 #define rtfSC_alpha 249 #define rtfSC_beta 250 #define rtfSC_chi 251 #define rtfSC_delta 252 #define rtfSC_epsilon 253 #define rtfSC_phi 254 #define rtfSC_varphi 255 #define rtfSC_gamma 256 #define rtfSC_eta 257 #define rtfSC_iota 258 #define rtfSC_kappa 259 #define rtfSC_lambda 260 #define rtfSC_mu 261 #define rtfSC_nu 262 #define rtfSC_omicron 263 #define rtfSC_pi 264 #define rtfSC_varpi 265 #define rtfSC_theta 266 #define rtfSC_vartheta 267 #define rtfSC_rho 268 #define rtfSC_sigma 269 #define rtfSC_varsigma 270 #define rtfSC_tau 271 #define rtfSC_upsilon 272 #define rtfSC_omega 273 #define rtfSC_xi 274 #define rtfSC_psi 275 #define rtfSC_zeta 276 #define rtfSC_nobrkspace 277 #define rtfSC_nobrkhyphen 278 #define rtfSC_lessequal 279 #define rtfSC_greaterequal 280 #define rtfSC_infinity 281 #define rtfSC_integral 282 #define rtfSC_notequal 283 #define rtfSC_radical 284 #define rtfSC_radicalex 285 #define rtfSC_approxequal 286 #define rtfSC_apple 287 #define rtfSC_partialdiff 288 #define rtfSC_opthyphen 289 #define rtfSC_formula 290 #define rtfSC_lozenge 291 #define rtfSC_universal 292 #define rtfSC_existential 293 #define rtfSC_suchthat 294 #define rtfSC_congruent 295 #define rtfSC_therefore 296 #define rtfSC_perpendicular 297 #define rtfSC_minute 298 #define rtfSC_club 299 #define rtfSC_diamond 300 #define rtfSC_heart 301 #define rtfSC_spade 302 #define rtfSC_arrowboth 303 #define rtfSC_arrowleft 304 #define rtfSC_arrowup 305 #define rtfSC_arrowright 306 #define rtfSC_arrowdown 307 #define rtfSC_second 308 #define rtfSC_proportional 309 #define rtfSC_equivalence 310 #define rtfSC_arrowvertex 311 #define rtfSC_arrowhorizex 312 #define rtfSC_carriagereturn 313 #define rtfSC_aleph 314 #define rtfSC_Ifraktur 315 #define rtfSC_Rfraktur 316 #define rtfSC_weierstrass 317 #define rtfSC_circlemultiply 318 #define rtfSC_circleplus 319 #define rtfSC_emptyset 320 #define rtfSC_intersection 321 #define rtfSC_union 322 #define rtfSC_propersuperset 323 #define rtfSC_reflexsuperset 324 #define rtfSC_notsubset 325 #define rtfSC_propersubset 326 #define rtfSC_reflexsubset 327 #define rtfSC_element 328 #define rtfSC_notelement 329 #define rtfSC_angle 330 #define rtfSC_gradient 331 #define rtfSC_product 332 #define rtfSC_logicaland 333 #define rtfSC_logicalor 334 #define rtfSC_arrowdblboth 335 #define rtfSC_arrowdblleft 336 #define rtfSC_arrowdblup 337 #define rtfSC_arrowdblright 338 #define rtfSC_arrowdbldown 339 #define rtfSC_angleleft 340 #define rtfSC_registersans 341 #define rtfSC_copyrightsans 342 #define rtfSC_trademarksans 343 #define rtfSC_angleright 344 #define rtfSC_mathplus 345 #define rtfSC_mathminus 346 #define rtfSC_mathasterisk 347 #define rtfSC_mathnumbersign 348 #define rtfSC_dotmath 349 #define rtfSC_mathequal 350 #define rtfSC_mathtilde 351 #define rtfSC_MaxChar 352 /* * rtf.h - RTF document processing stuff. Release 1.10. */ /* * Twentieths of a point (twips) per inch (Many RTF measurements * are in twips per inch (tpi) units). Assumes 72 points/inch. */ # define rtfTpi 1440 /* * RTF buffer size (avoids BUFSIZ, which differs across systems) */ # define rtfBufSiz 1024 /* * Tokens are associated with up to three classification numbers: * * Class number: Broadest (least detailed) breakdown. For programs * that only care about gross token distinctions. * Major/minor numbers: Within their class, tokens have a major * number, and may also have a minor number to further * distinquish tokens with the same major number. * * *** Class, major and minor token numbers are all >= 0 *** * * Tokens that can't be classified are put in the "unknown" class. * For such, the major and minor numbers are meaningless, although * rtfTextBuf may be of interest then. * * Text tokens are a single character, and the major number indicates * the character value (note: can be non-ascii, i.e., greater than 127). * There is no minor number. * * Control symbols may have a parameter value, which will be found in * rtfParam. If no parameter was given, rtfParam = rtfNoParam. * * RTFGetToken() return value is the class number, but it sets all the * global token vars. * * rtfEOF is a fake token used by the reader; the writer never sees * it (except in the token reader hook, if it installs one). */ /* * Information pertaining to last token read by RTFToken. The * text is exactly as it occurs in the input file, e.g., "\{" * will be found in rtfTextBuf as "\{", even though it means "{". * These variables are also set when styles are reprocessed. */ extern char *rtfTextBuf; /* text of token */ extern int rtfTextLen; /* length of token in rtfTextBuf */ extern int rtfClass; /* token class */ extern int rtfMajor; /* token major number */ extern int rtfMinor; /* token minor number */ extern int rtfParam; /* control symbol parameter */ # ifdef THINK_C # define rtfNoParam (-32768) /* 16-bit max. neg. value */ # endif # ifndef rtfNoParam # define rtfNoParam (-1000000) # endif extern long rtfLineNum; /* input line number */ extern int rtfLinePos; /* input line position */ /* * For some reason, the no-style number is 222 */ # define rtfNoStyleNum 222 # define rtfNormalStyleNum 0 /* * Token classes (must be zero-based and sequential) */ # define rtfUnknown 0 # define rtfGroup 1 # define rtfText 2 # define rtfControl 3 # define rtfEOF 4 # define rtfMaxClass 5 /* highest class + 1 */ /* * Group class major numbers */ # define rtfBeginGroup 0 # define rtfEndGroup 1 /* * Control class major and minor numbers. */ # define rtfVersion 0 # define rtfDefFont 1 # define rtfCharSet 2 # define rtfAnsiCharSet 0 # define rtfMacCharSet 1 # define rtfPcCharSet 2 # define rtfPcaCharSet 3 /* destination minor numbers should be zero-based and sequential */ # define rtfDestination 3 # define rtfFontTbl 0 # define rtfFontAltName 1 /* new in 1.10 */ # define rtfEmbeddedFont 2 /* new in 1.10 */ # define rtfFontFile 3 /* new in 1.10 */ # define rtfFileTbl 4 /* new in 1.10 */ # define rtfFileInfo 5 /* new in 1.10 */ # define rtfColorTbl 6 # define rtfStyleSheet 7 # define rtfKeyCode 8 # define rtfRevisionTbl 9 /* new in 1.10 */ # define rtfInfo 10 # define rtfITitle 11 # define rtfISubject 12 # define rtfIAuthor 13 # define rtfIOperator 14 # define rtfIKeywords 15 # define rtfIComment 16 # define rtfIVersion 17 # define rtfIDoccomm 18 # define rtfIVerscomm 19 # define rtfNextFile 20 /* reclassified in 1.10 */ # define rtfTemplate 21 /* reclassified in 1.10 */ # define rtfFNSep 22 # define rtfFNContSep 23 # define rtfFNContNotice 24 # define rtfENSep 25 /* new in 1.10 */ # define rtfENContSep 26 /* new in 1.10 */ # define rtfENContNotice 27 /* new in 1.10 */ # define rtfPageNumLevel 28 /* new in 1.10 */ # define rtfParNumLevelStyle 29 /* new in 1.10 */ # define rtfHeader 30 # define rtfFooter 31 # define rtfHeaderLeft 32 # define rtfHeaderRight 33 # define rtfHeaderFirst 34 # define rtfFooterLeft 35 # define rtfFooterRight 36 # define rtfFooterFirst 37 # define rtfParNumText 38 /* new in 1.10 */ # define rtfParNumbering 39 /* new in 1.10 */ # define rtfParNumTextAfter 40 /* new in 1.10 */ # define rtfParNumTextBefore 41 /* new in 1.10 */ # define rtfBookmarkStart 42 # define rtfBookmarkEnd 43 # define rtfPict 44 # define rtfObject 45 # define rtfObjClass 46 # define rtfObjName 47 # define rtfObjTime 48 /* new in 1.10 */ # define rtfObjData 49 # define rtfObjAlias 50 # define rtfObjSection 51 # define rtfObjResult 52 # define rtfObjItem 53 /* new in 1.10 */ # define rtfObjTopic 54 /* new in 1.10 */ # define rtfDrawObject 55 /* new in 1.10 */ # define rtfFootnote 56 # define rtfAnnotRefStart 57 /* new in 1.10 */ # define rtfAnnotRefEnd 58 /* new in 1.10 */ # define rtfAnnotID 59 /* reclassified in 1.10 */ # define rtfAnnotAuthor 60 /* new in 1.10 */ # define rtfAnnotation 61 /* reclassified in 1.10 */ # define rtfAnnotRef 62 /* new in 1.10 */ # define rtfAnnotTime 63 /* new in 1.10 */ # define rtfAnnotIcon 64 /* new in 1.10 */ # define rtfField 65 # define rtfFieldInst 66 # define rtfFieldResult 67 # define rtfDataField 68 /* new in 1.10 */ # define rtfIndex 69 # define rtfIndexText 70 # define rtfIndexRange 71 # define rtfTOC 72 # define rtfNeXTGraphic 73 # define rtfMaxDestination 74 /* highest dest + 1 */ # define rtfFontFamily 4 # define rtfFFNil 0 # define rtfFFRoman 1 # define rtfFFSwiss 2 # define rtfFFModern 3 # define rtfFFScript 4 # define rtfFFDecor 5 # define rtfFFTech 6 # define rtfFFBidirectional 7 /* new in 1.10 */ # define rtfColorName 5 # define rtfRed 0 # define rtfGreen 1 # define rtfBlue 2 # define rtfSpecialChar 6 /* special chars seen in \info destination */ # define rtfIIntVersion 0 # define rtfICreateTime 1 # define rtfIRevisionTime 2 # define rtfIPrintTime 3 # define rtfIBackupTime 4 # define rtfIEditTime 5 # define rtfIYear 6 # define rtfIMonth 7 # define rtfIDay 8 # define rtfIHour 9 # define rtfIMinute 10 # define rtfISecond 11 /* new in 1.10 */ # define rtfINPages 12 # define rtfINWords 13 # define rtfINChars 14 # define rtfIIntID 15 /* other special chars */ # define rtfCurHeadDate 16 # define rtfCurHeadDateLong 17 # define rtfCurHeadDateAbbrev 18 # define rtfCurHeadTime 19 # define rtfCurHeadPage 20 # define rtfSectNum 21 /* new in 1.10 */ # define rtfCurFNote 22 # define rtfCurAnnotRef 23 # define rtfFNoteSep 24 # define rtfFNoteCont 25 # define rtfCell 26 # define rtfRow 27 # define rtfPar 28 # define rtfSect 29 # define rtfPage 30 # define rtfColumn 31 # define rtfLine 32 # define rtfSoftPage 33 /* new in 1.10 */ # define rtfSoftColumn 34 /* new in 1.10 */ # define rtfSoftLine 35 /* new in 1.10 */ # define rtfSoftLineHt 36 /* new in 1.10 */ # define rtfTab 37 # define rtfEmDash 38 # define rtfEnDash 39 # define rtfEmSpace 40 /* new in 1.10 */ # define rtfEnSpace 41 /* new in 1.10 */ # define rtfBullet 42 # define rtfLQuote 43 # define rtfRQuote 44 # define rtfLDblQuote 45 # define rtfRDblQuote 46 # define rtfFormula 47 # define rtfNoBrkSpace 49 # define rtfNoReqHyphen 50 # define rtfNoBrkHyphen 51 # define rtfOptDest 52 # define rtfLTRMark 53 /* new in 1.10 */ # define rtfRTLMark 54 /* new in 1.10 */ # define rtfNoWidthJoiner 55 /* new in 1.10 */ # define rtfNoWidthNonJoiner 56 /* new in 1.10 */ # define rtfCurHeadPict 57 /* valid? */ /*# define rtfCurAnnot 58*/ /* apparently not used */ # define rtfStyleAttr 7 # define rtfAdditive 0 /* new in 1.10 */ # define rtfBasedOn 1 # define rtfNext 2 # define rtfDocAttr 8 # define rtfDefTab 0 # define rtfHyphHotZone 1 # define rtfHyphConsecLines 2 /* new in 1.10 */ # define rtfHyphCaps 3 /* new in 1.10 */ # define rtfHyphAuto 4 /* new in 1.10 */ # define rtfLineStart 5 # define rtfFracWidth 6 # define rtfMakeBackup 7 # define rtfRTFDefault 8 # define rtfPSOverlay 9 # define rtfDocTemplate 10 /* new in 1.10 */ # define rtfDefLanguage 11 # define rtfFENoteType 12 /* new in 1.10 */ # define rtfFNoteEndSect 13 # define rtfFNoteEndDoc 14 # define rtfFNoteText 15 # define rtfFNoteBottom 16 # define rtfENoteEndSect 17 /* new in 1.10 */ # define rtfENoteEndDoc 18 /* new in 1.10 */ # define rtfENoteText 19 /* new in 1.10 */ # define rtfENoteBottom 20 /* new in 1.10 */ # define rtfFNoteStart 21 # define rtfENoteStart 22 /* new in 1.10 */ # define rtfFNoteRestartPage 23 /* new in 1.10 */ # define rtfFNoteRestart 24 # define rtfFNoteRestartCont 25 /* new in 1.10 */ # define rtfENoteRestart 26 /* new in 1.10 */ # define rtfENoteRestartCont 27 /* new in 1.10 */ # define rtfFNoteNumArabic 28 /* new in 1.10 */ # define rtfFNoteNumLLetter 29 /* new in 1.10 */ # define rtfFNoteNumULetter 30 /* new in 1.10 */ # define rtfFNoteNumLRoman 31 /* new in 1.10 */ # define rtfFNoteNumURoman 32 /* new in 1.10 */ # define rtfFNoteNumChicago 33 /* new in 1.10 */ # define rtfENoteNumArabic 34 /* new in 1.10 */ # define rtfENoteNumLLetter 35 /* new in 1.10 */ # define rtfENoteNumULetter 36 /* new in 1.10 */ # define rtfENoteNumLRoman 37 /* new in 1.10 */ # define rtfENoteNumURoman 38 /* new in 1.10 */ # define rtfENoteNumChicago 39 /* new in 1.10 */ # define rtfPaperWidth 40 # define rtfPaperHeight 41 # define rtfPaperSize 42 /* new in 1.10 */ # define rtfLeftMargin 43 # define rtfRightMargin 44 # define rtfTopMargin 45 # define rtfBottomMargin 46 # define rtfFacingPage 47 # define rtfGutterWid 48 # define rtfMirrorMargin 49 # define rtfLandscape 50 # define rtfPageStart 51 # define rtfWidowCtrl 52 # define rtfLinkStyles 53 /* new in 1.10 */ # define rtfNoAutoTabIndent 54 /* new in 1.10 */ # define rtfWrapSpaces 55 /* new in 1.10 */ # define rtfPrintColorsBlack 56 /* new in 1.10 */ # define rtfNoExtraSpaceRL 57 /* new in 1.10 */ # define rtfNoColumnBalance 58 /* new in 1.10 */ # define rtfCvtMailMergeQuote 59 /* new in 1.10 */ # define rtfSuppressTopSpace 60 /* new in 1.10 */ # define rtfSuppressPreParSpace 61 /* new in 1.10 */ # define rtfCombineTblBorders 62 /* new in 1.10 */ # define rtfTranspMetafiles 63 /* new in 1.10 */ # define rtfSwapBorders 64 /* new in 1.10 */ # define rtfShowHardBreaks 65 /* new in 1.10 */ # define rtfFormProtected 66 /* new in 1.10 */ # define rtfAllProtected 67 /* new in 1.10 */ # define rtfFormShading 68 /* new in 1.10 */ # define rtfFormDisplay 69 /* new in 1.10 */ # define rtfPrintData 70 /* new in 1.10 */ # define rtfRevProtected 71 /* new in 1.10 */ # define rtfRevisions 72 # define rtfRevDisplay 73 # define rtfRevBar 74 # define rtfAnnotProtected 75 /* new in 1.10 */ # define rtfRTLDoc 76 /* new in 1.10 */ # define rtfLTRDoc 77 /* new in 1.10 */ # define rtfSectAttr 9 # define rtfSectDef 0 # define rtfENoteHere 1 # define rtfPrtBinFirst 2 # define rtfPrtBin 3 # define rtfSectStyleNum 4 /* new in 1.10 */ # define rtfNoBreak 5 # define rtfColBreak 6 # define rtfPageBreak 7 # define rtfEvenBreak 8 # define rtfOddBreak 9 # define rtfColumns 10 # define rtfColumnSpace 11 # define rtfColumnNumber 12 /* new in 1.10 */ # define rtfColumnSpRight 13 /* new in 1.10 */ # define rtfColumnWidth 14 /* new in 1.10 */ # define rtfColumnLine 15 # define rtfLineModulus 16 # define rtfLineDist 17 # define rtfLineStarts 18 # define rtfLineRestart 19 # define rtfLineRestartPg 20 # define rtfLineCont 21 # define rtfSectPageWid 22 # define rtfSectPageHt 23 # define rtfSectMarginLeft 24 # define rtfSectMarginRight 25 # define rtfSectMarginTop 26 # define rtfSectMarginBottom 27 # define rtfSectMarginGutter 28 # define rtfSectLandscape 29 # define rtfTitleSpecial 30 # define rtfHeaderY 31 # define rtfFooterY 32 # define rtfPageStarts 33 # define rtfPageCont 34 # define rtfPageRestart 35 # define rtfPageNumRight 36 /* renamed in 1.10 */ # define rtfPageNumTop 37 # define rtfPageDecimal 38 # define rtfPageURoman 39 # define rtfPageLRoman 40 # define rtfPageULetter 41 # define rtfPageLLetter 42 # define rtfPageNumHyphSep 43 /* new in 1.10 */ # define rtfPageNumSpaceSep 44 /* new in 1.10 */ # define rtfPageNumColonSep 45 /* new in 1.10 */ # define rtfPageNumEmdashSep 46 /* new in 1.10 */ # define rtfPageNumEndashSep 47 /* new in 1.10 */ # define rtfTopVAlign 48 # define rtfBottomVAlign 49 # define rtfCenterVAlign 50 # define rtfJustVAlign 51 # define rtfRTLSect 52 /* new in 1.10 */ # define rtfLTRSect 53 /* new in 1.10 */ # define rtfTblAttr 10 # define rtfRowDef 0 # define rtfRowGapH 1 # define rtfCellPos 2 # define rtfMergeRngFirst 3 # define rtfMergePrevious 4 # define rtfRowLeft 5 # define rtfRowRight 6 # define rtfRowCenter 7 # define rtfRowLeftEdge 8 # define rtfRowHt 9 # define rtfRowHeader 10 /* new in 1.10 */ # define rtfRowKeep 11 /* new in 1.10 */ # define rtfRTLRow 12 /* new in 1.10 */ # define rtfLTRRow 13 /* new in 1.10 */ # define rtfRowBordTop 14 /* new in 1.10 */ # define rtfRowBordLeft 15 /* new in 1.10 */ # define rtfRowBordBottom 16 /* new in 1.10 */ # define rtfRowBordRight 17 /* new in 1.10 */ # define rtfRowBordHoriz 18 /* new in 1.10 */ # define rtfRowBordVert 19 /* new in 1.10 */ # define rtfCellBordBottom 20 # define rtfCellBordTop 21 # define rtfCellBordLeft 22 # define rtfCellBordRight 23 # define rtfCellShading 24 # define rtfCellBgPatH 25 # define rtfCellBgPatV 26 # define rtfCellFwdDiagBgPat 27 # define rtfCellBwdDiagBgPat 28 # define rtfCellHatchBgPat 29 # define rtfCellDiagHatchBgPat 30 # define rtfCellDarkBgPatH 31 # define rtfCellDarkBgPatV 32 # define rtfCellFwdDarkBgPat 33 # define rtfCellBwdDarkBgPat 34 # define rtfCellDarkHatchBgPat 35 # define rtfCellDarkDiagHatchBgPat 36 # define rtfCellBgPatLineColor 37 # define rtfCellBgPatColor 38 # define rtfParAttr 11 # define rtfParDef 0 # define rtfStyleNum 1 # define rtfHyphenate 2 /* new in 1.10 */ # define rtfInTable 3 # define rtfKeep 4 # define rtfNoWidowControl 5 /* new in 1.10 */ # define rtfKeepNext 6 # define rtfOutlineLevel 7 /* new in 1.10 */ # define rtfNoLineNum 8 # define rtfPBBefore 9 # define rtfSideBySide 10 # define rtfQuadLeft 11 # define rtfQuadRight 12 # define rtfQuadJust 13 # define rtfQuadCenter 14 # define rtfFirstIndent 15 # define rtfLeftIndent 16 # define rtfRightIndent 17 # define rtfSpaceBefore 18 # define rtfSpaceAfter 19 # define rtfSpaceBetween 20 # define rtfSpaceMultiply 21 /* new in 1.10 */ # define rtfSubDocument 22 /* new in 1.10 */ # define rtfRTLPar 23 /* new in 1.10 */ # define rtfLTRPar 24 /* new in 1.10 */ # define rtfTabPos 25 # define rtfTabLeft 26 /* new in 1.10 */ # define rtfTabRight 27 # define rtfTabCenter 28 # define rtfTabDecimal 29 # define rtfTabBar 30 # define rtfLeaderDot 31 # define rtfLeaderHyphen 32 # define rtfLeaderUnder 33 # define rtfLeaderThick 34 # define rtfLeaderEqual 35 # define rtfParLevel 36 /* new in 1.10 */ # define rtfParBullet 37 /* new in 1.10 */ # define rtfParSimple 38 /* new in 1.10 */ # define rtfParNumCont 39 /* new in 1.10 */ # define rtfParNumOnce 40 /* new in 1.10 */ # define rtfParNumAcross 41 /* new in 1.10 */ # define rtfParHangIndent 42 /* new in 1.10 */ # define rtfParNumRestart 43 /* new in 1.10 */ # define rtfParNumCardinal 44 /* new in 1.10 */ # define rtfParNumDecimal 45 /* new in 1.10 */ # define rtfParNumULetter 46 /* new in 1.10 */ # define rtfParNumURoman 47 /* new in 1.10 */ # define rtfParNumLLetter 48 /* new in 1.10 */ # define rtfParNumLRoman 49 /* new in 1.10 */ # define rtfParNumOrdinal 50 /* new in 1.10 */ # define rtfParNumOrdinalText 51 /* new in 1.10 */ # define rtfParNumBold 52 /* new in 1.10 */ # define rtfParNumItalic 53 /* new in 1.10 */ # define rtfParNumAllCaps 54 /* new in 1.10 */ # define rtfParNumSmallCaps 55 /* new in 1.10 */ # define rtfParNumUnder 56 /* new in 1.10 */ # define rtfParNumDotUnder 57 /* new in 1.10 */ # define rtfParNumDbUnder 58 /* new in 1.10 */ # define rtfParNumNoUnder 59 /* new in 1.10 */ # define rtfParNumWordUnder 60 /* new in 1.10 */ # define rtfParNumStrikethru 61 /* new in 1.10 */ # define rtfParNumForeColor 62 /* new in 1.10 */ # define rtfParNumFont 63 /* new in 1.10 */ # define rtfParNumFontSize 64 /* new in 1.10 */ # define rtfParNumIndent 65 /* new in 1.10 */ # define rtfParNumSpacing 66 /* new in 1.10 */ # define rtfParNumInclPrev 67 /* new in 1.10 */ # define rtfParNumCenter 68 /* new in 1.10 */ # define rtfParNumLeft 69 /* new in 1.10 */ # define rtfParNumRight 70 /* new in 1.10 */ # define rtfParNumStartAt 71 /* new in 1.10 */ # define rtfBorderTop 72 # define rtfBorderBottom 73 # define rtfBorderLeft 74 # define rtfBorderRight 75 # define rtfBorderBetween 76 # define rtfBorderBar 77 # define rtfBorderBox 78 # define rtfBorderSingle 79 # define rtfBorderThick 80 # define rtfBorderShadow 81 # define rtfBorderDouble 82 # define rtfBorderDot 83 # define rtfBorderDash 84 /* new in 1.10 */ # define rtfBorderHair 85 # define rtfBorderWidth 86 # define rtfBorderColor 87 # define rtfBorderSpace 88 # define rtfShading 89 # define rtfBgPatH 90 # define rtfBgPatV 91 # define rtfFwdDiagBgPat 92 # define rtfBwdDiagBgPat 93 # define rtfHatchBgPat 94 # define rtfDiagHatchBgPat 95 # define rtfDarkBgPatH 96 # define rtfDarkBgPatV 97 # define rtfFwdDarkBgPat 98 # define rtfBwdDarkBgPat 99 # define rtfDarkHatchBgPat 100 # define rtfDarkDiagHatchBgPat 101 # define rtfBgPatLineColor 102 # define rtfBgPatColor 103 # define rtfCharAttr 12 # define rtfPlain 0 # define rtfBold 1 # define rtfAllCaps 2 # define rtfDeleted 3 # define rtfSubScript 4 # define rtfSubScrShrink 5 /* new in 1.10 */ # define rtfNoSuperSub 6 /* new in 1.10 */ # define rtfExpand 7 # define rtfExpandTwips 8 /* new in 1.10 */ # define rtfKerning 9 /* new in 1.10 */ # define rtfFontNum 10 # define rtfFontSize 11 # define rtfItalic 12 # define rtfOutline 13 # define rtfRevised 14 # define rtfRevAuthor 15 /* new in 1.10 */ # define rtfRevDTTM 16 /* new in 1.10 */ # define rtfSmallCaps 17 # define rtfShadow 18 # define rtfStrikeThru 19 # define rtfUnderline 20 # define rtfDotUnderline 21 /* renamed in 1.10 */ # define rtfDbUnderline 22 # define rtfNoUnderline 23 # define rtfWordUnderline 24 /* renamed in 1.10 */ # define rtfSuperScript 25 # define rtfSuperScrShrink 26 /* new in 1.10 */ # define rtfInvisible 27 # define rtfForeColor 28 # define rtfBackColor 29 # define rtfRTLChar 30 /* new in 1.10 */ # define rtfLTRChar 31 /* new in 1.10 */ # define rtfCharStyleNum 32 /* new in 1.10 */ # define rtfCharCharSet 33 /* new in 1.10 */ # define rtfLanguage 34 # define rtfGray 35 # define rtfPictAttr 13 # define rtfMacQD 0 # define rtfPMMetafile 1 # define rtfWinMetafile 2 # define rtfDevIndBitmap 3 # define rtfWinBitmap 4 # define rtfPixelBits 5 # define rtfBitmapPlanes 6 # define rtfBitmapWid 7 # define rtfPicWid 8 # define rtfPicHt 9 # define rtfPicGoalWid 10 # define rtfPicGoalHt 11 # define rtfPicScaleX 12 # define rtfPicScaleY 13 # define rtfPicScaled 14 # define rtfPicCropTop 15 # define rtfPicCropBottom 16 # define rtfPicCropLeft 17 # define rtfPicCropRight 18 # define rtfPicMFHasBitmap 19 /* new in 1.10 */ # define rtfPicMFBitsPerPixel 20 /* new in 1.10 */ # define rtfPicBinary 21 # define rtfBookmarkAttr 14 # define rtfBookmarkFirstCol 0 # define rtfBookmarkLastCol 1 # define rtfNeXTGrAttr 15 # define rtfNeXTGWidth 0 # define rtfNeXTGHeight 1 # define rtfFieldAttr 16 # define rtfFieldDirty 0 # define rtfFieldEdited 1 # define rtfFieldLocked 2 # define rtfFieldPrivate 3 # define rtfFieldAlt 4 /* new in 1.10 */ # define rtfTOCAttr 17 # define rtfTOCType 0 # define rtfTOCLevel 1 # define rtfPosAttr 18 # define rtfAbsWid 0 # define rtfAbsHt 1 # define rtfRPosMargH 2 # define rtfRPosPageH 3 # define rtfRPosColH 4 # define rtfPosX 5 # define rtfPosNegX 6 /* new in 1.10 */ # define rtfPosXCenter 7 # define rtfPosXInside 8 # define rtfPosXOutSide 9 # define rtfPosXRight 10 # define rtfPosXLeft 11 # define rtfRPosMargV 12 # define rtfRPosPageV 13 # define rtfRPosParaV 14 # define rtfPosY 15 # define rtfPosNegY 16 /* new in 1.10 */ # define rtfPosYInline 17 # define rtfPosYTop 18 # define rtfPosYCenter 19 # define rtfPosYBottom 20 # define rtfNoWrap 21 # define rtfDistFromTextAll 22 /* renamed in 1.10 */ # define rtfDistFromTextX 23 /* new in 1.10 */ # define rtfDistFromTextY 24 /* new in 1.10 */ # define rtfTextDistY 25 # define rtfDropCapLines 26 /* new in 1.10 */ # define rtfDropCapType 27 /* new in 1.10 */ # define rtfObjAttr 19 # define rtfObjEmb 0 # define rtfObjLink 1 # define rtfObjAutoLink 2 # define rtfObjSubscriber 3 # define rtfObjPublisher 4 /* new in 1.10 */ # define rtfObjICEmb 5 # define rtfObjLinkSelf 6 # define rtfObjLock 7 # define rtfObjUpdate 8 /* new in 1.10 */ # define rtfObjHt 9 # define rtfObjWid 10 # define rtfObjSetSize 11 # define rtfObjAlign 12 /* new in 1.10 */ # define rtfObjTransposeY 13 # define rtfObjCropTop 14 # define rtfObjCropBottom 15 # define rtfObjCropLeft 16 # define rtfObjCropRight 17 # define rtfObjScaleX 18 # define rtfObjScaleY 19 # define rtfObjResRTF 20 # define rtfObjResPict 21 # define rtfObjResBitmap 22 # define rtfObjResText 23 # define rtfObjResMerge 24 # define rtfObjBookmarkPubObj 25 # define rtfObjPubAutoUpdate 26 # define rtfFNoteAttr 20 /* new in 1.10 */ # define rtfFNAlt 0 /* new in 1.10 */ # define rtfKeyCodeAttr 21 /* new in 1.10 */ # define rtfAltKey 0 /* new in 1.10 */ # define rtfShiftKey 1 /* new in 1.10 */ # define rtfControlKey 2 /* new in 1.10 */ # define rtfFunctionKey 3 /* new in 1.10 */ # define rtfACharAttr 22 /* new in 1.10 */ # define rtfACBold 0 /* new in 1.10 */ # define rtfACAllCaps 1 /* new in 1.10 */ # define rtfACForeColor 2 /* new in 1.10 */ # define rtfACSubScript 3 /* new in 1.10 */ # define rtfACExpand 4 /* new in 1.10 */ # define rtfACFontNum 5 /* new in 1.10 */ # define rtfACFontSize 6 /* new in 1.10 */ # define rtfACItalic 7 /* new in 1.10 */ # define rtfACLanguage 8 /* new in 1.10 */ # define rtfACOutline 9 /* new in 1.10 */ # define rtfACSmallCaps 10 /* new in 1.10 */ # define rtfACShadow 11 /* new in 1.10 */ # define rtfACStrikeThru 12 /* new in 1.10 */ # define rtfACUnderline 13 /* new in 1.10 */ # define rtfACDotUnderline 14 /* new in 1.10 */ # define rtfACDbUnderline 15 /* new in 1.10 */ # define rtfACNoUnderline 16 /* new in 1.10 */ # define rtfACWordUnderline 17 /* new in 1.10 */ # define rtfACSuperScript 18 /* new in 1.10 */ # define rtfFontAttr 23 /* new in 1.10 */ # define rtfFontCharSet 0 /* new in 1.10 */ # define rtfFontPitch 1 /* new in 1.10 */ # define rtfFontCodePage 2 /* new in 1.10 */ # define rtfFTypeNil 3 /* new in 1.10 */ # define rtfFTypeTrueType 4 /* new in 1.10 */ # define rtfFileAttr 24 /* new in 1.10 */ # define rtfFileNum 0 /* new in 1.10 */ # define rtfFileRelPath 1 /* new in 1.10 */ # define rtfFileOSNum 2 /* new in 1.10 */ # define rtfFileSource 25 /* new in 1.10 */ # define rtfSrcMacintosh 0 /* new in 1.10 */ # define rtfSrcDOS 1 /* new in 1.10 */ # define rtfSrcNTFS 2 /* new in 1.10 */ # define rtfSrcHPFS 3 /* new in 1.10 */ # define rtfSrcNetwork 4 /* new in 1.10 */ /* * Drawing attributes */ # define rtfDrawAttr 26 /* new in 1.10 */ # define rtfDrawLock 0 /* new in 1.10 */ # define rtfDrawPageRelX 1 /* new in 1.10 */ # define rtfDrawColumnRelX 2 /* new in 1.10 */ # define rtfDrawMarginRelX 3 /* new in 1.10 */ # define rtfDrawPageRelY 4 /* new in 1.10 */ # define rtfDrawColumnRelY 5 /* new in 1.10 */ # define rtfDrawMarginRelY 6 /* new in 1.10 */ # define rtfDrawHeight 7 /* new in 1.10 */ # define rtfDrawBeginGroup 8 /* new in 1.10 */ # define rtfDrawGroupCount 9 /* new in 1.10 */ # define rtfDrawEndGroup 10 /* new in 1.10 */ # define rtfDrawArc 11 /* new in 1.10 */ # define rtfDrawCallout 12 /* new in 1.10 */ # define rtfDrawEllipse 13 /* new in 1.10 */ # define rtfDrawLine 14 /* new in 1.10 */ # define rtfDrawPolygon 15 /* new in 1.10 */ # define rtfDrawPolyLine 16 /* new in 1.10 */ # define rtfDrawRect 17 /* new in 1.10 */ # define rtfDrawTextBox 18 /* new in 1.10 */ # define rtfDrawOffsetX 19 /* new in 1.10 */ # define rtfDrawSizeX 20 /* new in 1.10 */ # define rtfDrawOffsetY 21 /* new in 1.10 */ # define rtfDrawSizeY 22 /* new in 1.10 */ # define rtfCOAngle 23 /* new in 1.10 */ # define rtfCOAccentBar 24 /* new in 1.10 */ # define rtfCOBestFit 25 /* new in 1.10 */ # define rtfCOBorder 26 /* new in 1.10 */ # define rtfCOAttachAbsDist 27 /* new in 1.10 */ # define rtfCOAttachBottom 28 /* new in 1.10 */ # define rtfCOAttachCenter 29 /* new in 1.10 */ # define rtfCOAttachTop 30 /* new in 1.10 */ # define rtfCOLength 31 /* new in 1.10 */ # define rtfCONegXQuadrant 32 /* new in 1.10 */ # define rtfCONegYQuadrant 33 /* new in 1.10 */ # define rtfCOOffset 34 /* new in 1.10 */ # define rtfCOAttachSmart 35 /* new in 1.10 */ # define rtfCODoubleLine 36 /* new in 1.10 */ # define rtfCORightAngle 37 /* new in 1.10 */ # define rtfCOSingleLine 38 /* new in 1.10 */ # define rtfCOTripleLine 39 /* new in 1.10 */ # define rtfDrawTextBoxMargin 40 /* new in 1.10 */ # define rtfDrawTextBoxText 41 /* new in 1.10 */ # define rtfDrawRoundRect 42 /* new in 1.10 */ # define rtfDrawPointX 43 /* new in 1.10 */ # define rtfDrawPointY 44 /* new in 1.10 */ # define rtfDrawPolyCount 45 /* new in 1.10 */ # define rtfDrawArcFlipX 46 /* new in 1.10 */ # define rtfDrawArcFlipY 47 /* new in 1.10 */ # define rtfDrawLineBlue 48 /* new in 1.10 */ # define rtfDrawLineGreen 49 /* new in 1.10 */ # define rtfDrawLineRed 50 /* new in 1.10 */ # define rtfDrawLinePalette 51 /* new in 1.10 */ # define rtfDrawLineDashDot 52 /* new in 1.10 */ # define rtfDrawLineDashDotDot 53 /* new in 1.10 */ # define rtfDrawLineDash 54 /* new in 1.10 */ # define rtfDrawLineDot 55 /* new in 1.10 */ # define rtfDrawLineGray 56 /* new in 1.10 */ # define rtfDrawLineHollow 57 /* new in 1.10 */ # define rtfDrawLineSolid 58 /* new in 1.10 */ # define rtfDrawLineWidth 59 /* new in 1.10 */ # define rtfDrawHollowEndArrow 60 /* new in 1.10 */ # define rtfDrawEndArrowLength 61 /* new in 1.10 */ # define rtfDrawSolidEndArrow 62 /* new in 1.10 */ # define rtfDrawEndArrowWidth 63 /* new in 1.10 */ # define rtfDrawHollowStartArrow 64 /* new in 1.10 */ # define rtfDrawStartArrowLength 65 /* new in 1.10 */ # define rtfDrawSolidStartArrow 66 /* new in 1.10 */ # define rtfDrawStartArrowWidth 67 /* new in 1.10 */ # define rtfDrawBgFillBlue 68 /* new in 1.10 */ # define rtfDrawBgFillGreen 69 /* new in 1.10 */ # define rtfDrawBgFillRed 70 /* new in 1.10 */ # define rtfDrawBgFillPalette 71 /* new in 1.10 */ # define rtfDrawBgFillGray 72 /* new in 1.10 */ # define rtfDrawFgFillBlue 73 /* new in 1.10 */ # define rtfDrawFgFillGreen 74 /* new in 1.10 */ # define rtfDrawFgFillRed 75 /* new in 1.10 */ # define rtfDrawFgFillPalette 76 /* new in 1.10 */ # define rtfDrawFgFillGray 77 /* new in 1.10 */ # define rtfDrawFillPatIndex 78 /* new in 1.10 */ # define rtfDrawShadow 79 /* new in 1.10 */ # define rtfDrawShadowXOffset 80 /* new in 1.10 */ # define rtfDrawShadowYOffset 81 /* new in 1.10 */ /* * index entry attributes */ # define rtfIndexAttr 27 /* new in 1.10 */ # define rtfIndexNumber 0 /* new in 1.10 */ # define rtfIndexBold 1 /* reclassified in 1.10 */ # define rtfIndexItalic 2 /* reclassified in 1.10 */ /* * \wmetafile argument values */ # define rtfWmMmText 1 # define rtfWmMmLometric 2 # define rtfWmMmHimetric 3 # define rtfWmMmLoenglish 4 # define rtfWmMmHienglish 5 # define rtfWmMmTwips 6 # define rtfWmMmIsotropic 7 # define rtfWmMmAnisotropic 8 /* * \pmmetafile argument values */ # define rtfPmPuArbitrary 4 # define rtfPmPuPels 8 # define rtfPmPuLometric 12 # define rtfPmPuHimetric 16 # define rtfPmPuLoenglish 20 # define rtfPmPuHienglish 24 # define rtfPmPuTwips 28 /* * \lang argument values */ # define rtfLangNoLang 0x0400 # define rtfLangAlbanian 0x041c # define rtfLangArabic 0x0401 # define rtfLangBahasa 0x0421 # define rtfLangBelgianDutch 0x0813 # define rtfLangBelgianFrench 0x080c # define rtfLangBrazilianPortuguese 0x0416 # define rtfLangBulgarian 0x0402 # define rtfLangCatalan 0x0403 # define rtfLangLatinCroatoSerbian 0x041a # define rtfLangCzech 0x0405 # define rtfLangDanish 0x0406 # define rtfLangDutch 0x0413 # define rtfLangAustralianEnglish 0x0c09 # define rtfLangUKEnglish 0x0809 # define rtfLangUSEnglish 0x0409 # define rtfLangFinnish 0x040b # define rtfLangFrench 0x040c # define rtfLangCanadianFrench 0x0c0c # define rtfLangGerman 0x0407 # define rtfLangGreek 0x0408 # define rtfLangHebrew 0x040d # define rtfLangHungarian 0x040e # define rtfLangIcelandic 0x040f # define rtfLangItalian 0x0410 # define rtfLangJapanese 0x0411 # define rtfLangKorean 0x0412 # define rtfLangBokmalNorwegian 0x0414 # define rtfLangNynorskNorwegian 0x0814 # define rtfLangPolish 0x0415 # define rtfLangPortuguese 0x0816 # define rtfLangRhaetoRomanic 0x0417 # define rtfLangRomanian 0x0418 # define rtfLangRussian 0x0419 # define rtfLangCyrillicSerboCroatian 0x081a # define rtfLangSimplifiedChinese 0x0804 # define rtfLangSlovak 0x041b # define rtfLangCastilianSpanish 0x040a # define rtfLangMexicanSpanish 0x080a # define rtfLangSwedish 0x041d # define rtfLangSwissFrench 0x100c # define rtfLangSwissGerman 0x0807 # define rtfLangSwissItalian 0x0810 # define rtfLangThai 0x041e # define rtfLangTraditionalChinese 0x0404 # define rtfLangTurkish 0x041f # define rtfLangUrdu 0x0420 /* * CharSet indices */ # define rtfCSGeneral 0 /* general (default) charset */ # define rtfCSSymbol 1 /* symbol charset */ /* * Flags for auto-charset-processing. Both are on by default. */ # define rtfReadCharSet 0x01 /* auto-read charset files */ # define rtfSwitchCharSet 0x02 /* auto-switch charset maps */ /* * Style types */ # define rtfParStyle 0 /* the default */ # define rtfCharStyle 1 # define rtfSectStyle 2 /* * RTF font, color and style structures. Used for font table, * color table, and stylesheet processing. */ typedef struct RTFFont RTFFont; typedef struct RTFColor RTFColor; typedef struct RTFStyle RTFStyle; typedef struct RTFStyleElt RTFStyleElt; struct RTFFont { char *rtfFName; /* font name */ char *rtfFAltName; /* font alternate name */ int rtfFNum; /* font number */ int rtfFFamily; /* font family */ int rtfFCharSet; /* font charset */ int rtfFPitch; /* font pitch */ int rtfFType; /* font type */ int rtfFCodePage; /* font code page */ RTFFont *rtfNextFont; /* next font in list */ }; /* * Color values are -1 if the default color for the the color * number should be used. The default color is writer-dependent. */ struct RTFColor { int rtfCNum; /* color number */ int rtfCRed; /* red value */ int rtfCGreen; /* green value */ int rtfCBlue; /* blue value */ RTFColor *rtfNextColor; /* next color in list */ }; struct RTFStyle { char *rtfSName; /* style name */ int rtfSType; /* style type */ int rtfSAdditive; /* whether or not style is additive */ int rtfSNum; /* style number */ int rtfSBasedOn; /* style this one's based on */ int rtfSNextPar; /* style next paragraph style */ RTFStyleElt *rtfSSEList; /* list of style words */ int rtfExpanding; /* non-zero = being expanded */ RTFStyle *rtfNextStyle; /* next style in style list */ }; struct RTFStyleElt { int rtfSEClass; /* token class */ int rtfSEMajor; /* token major number */ int rtfSEMinor; /* token minor number */ int rtfSEParam; /* control symbol parameter */ char *rtfSEText; /* text of symbol */ RTFStyleElt *rtfNextSE; /* next element in style */ }; typedef void (*RTFFuncPtr) (); /* generic function pointer */ /* * Public RTF reader routines */ void RTFInit (); void RTFSetInputName (); char *RTFGetInputName (); void RTFSetOutputName (); char *RTFGetOutputName (); void RTFSetClassCallback (); RTFFuncPtr RTFGetClassCallback (); void RTFSetDestinationCallback (); RTFFuncPtr RTFGetDestinationCallback (); void RTFRead (); int RTFGetToken (); /* writer should rarely need this */ void RTFUngetToken (); int RTFPeekToken (); void RTFSetToken (); void RTFSetReadHook (); RTFFuncPtr RTFGetReadHook (); void RTFRouteToken (); void RTFSkipGroup (); void RTFExpandStyle (); int RTFCheckCM (); int RTFCheckCMM (); int RTFCheckMM (); RTFFont *RTFGetFont (); RTFColor *RTFGetColor (); RTFStyle *RTFGetStyle (); # define RTFAlloc(size) _RTFAlloc ((int) size) char *_RTFAlloc (); char *RTFStrSave (); void RTFFree (); int RTFCharToHex (); int RTFHexToChar (); void RTFSetMsgProc (); void RTFSetPanicProc (); /* * The following messing around is used to allow RTFMsg() and RTFPanic() * to be variable-argument functions that are declared publicly but * without generating prototype-mismatch errors on systems that have * stdarg.h. */ # ifndef rtfInternal void RTFMsg (); void RTFPanic (); # else # ifdef STDARG void RTFMsg (char *fmt, ...); void RTFPanic (char *fmt, ...); # else void RTFMsg (); void RTFPanic (); # endif /* STDARG */ # endif /* rtfInternal */ int RTFReadOutputMap (); int RTFReadCharSetMap (); void RTFSetCharSetMap (); int RTFStdCharCode (); char *RTFStdCharName (); int RTFMapChar (); int RTFGetCharSet(); void RTFSetCharSet(); /*char *RTFGetLibPrefix();*/ void RTFSetOpenLibFileProc (); FILE *RTFOpenLibFile (); #endif wine-20000526/dlls/richedit/rtf2text.h0100644000175000001440000000004607105350315017125 0ustar julliardusersvoid WriterInit (); int BeginFile (); wine-20000526/dlls/richedit/stdcharnames.h0100644000175000001440000000771407105350315020030 0ustar julliardusers "nothing", "space", "exclam", "quotedbl", "numbersign", "dollar", "percent", "ampersand", "quoteright", "parenleft", "parenright", "asterisk", "plus", "comma", "hyphen", "period", "slash", "zero", "one", "two", "three", "four", "five", "six", "seven", "eight", "nine", "colon", "semicolon", "less", "equal", "greater", "question", "at", "A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z", "bracketleft", "backslash", "bracketright", "asciicircum", "underscore", "quoteleft", "a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "w", "x", "y", "z", "braceleft", "bar", "braceright", "asciitilde", "exclamdown", "cent", "sterling", "fraction", "yen", "florin", "section", "currency", "quotedblleft", "guillemotleft", "guilsinglleft", "guilsinglright", "fi", "fl", "endash", "dagger", "daggerdbl", "periodcentered", "paragraph", "bullet", "quotesinglbase", "quotedblbase", "quotedblright", "guillemotright", "ellipsis", "perthousand", "questiondown", "grave", "acute", "circumflex", "tilde", "macron", "breve", "dotaccent", "dieresis", "ring", "cedilla", "hungarumlaut", "ogonek", "caron", "emdash", "AE", "ordfeminine", "Lslash", "Oslash", "OE", "ordmasculine", "ae", "dotlessi", "lslash", "oslash", "oe", "germandbls", "Aacute", "Acircumflex", "Adieresis", "Agrave", "Aring", "Atilde", "Ccedilla", "Eacute", "Ecircumflex", "Edieresis", "Egrave", "Eth", "Iacute", "Icircumflex", "Idieresis", "Igrave", "Ntilde", "Oacute", "Ocircumflex", "Odieresis", "Ograve", "Otilde", "Scaron", "Thorn", "Uacute", "Ucircumflex", "Udieresis", "Ugrave", "Yacute", "Ydieresis", "aacute", "acircumflex", "adieresis", "agrave", "aring", "atilde", "brokenbar", "ccedilla", "copyright", "degree", "divide", "eacute", "ecircumflex", "edieresis", "egrave", "eth", "iacute", "icircumflex", "idieresis", "igrave", "logicalnot", "minus", "multiply", "ntilde", "oacute", "ocircumflex", "odieresis", "ograve", "onehalf", "onequarter", "onesuperior", "otilde", "plusminus", "registered", "thorn", "threequarters", "threesuperior", "trademark", "twosuperior", "uacute", "ucircumflex", "udieresis", "ugrave", "yacute", "ydieresis", "Alpha", "Beta", "Chi", "Delta", "Epsilon", "Phi", "Gamma", "Eta", "Iota", "Kappa", "Lambda", "Mu", "Nu", "Omicron", "Pi", "Theta", "Rho", "Sigma", "Tau", "Upsilon", "varUpsilon", "Omega", "Xi", "Psi", "Zeta", "alpha", "beta", "chi", "delta", "epsilon", "phi", "varphi", "gamma", "eta", "iota", "kappa", "lambda", "mu", "nu", "omicron", "pi", "varpi", "theta", "vartheta", "rho", "sigma", "varsigma", "tau", "upsilon", "omega", "xi", "psi", "zeta", "nobrkspace", "nobrkhyphen", "lessequal", "greaterequal", "infinity", "integral", "notequal", "radical", "radicalex", "approxequal", "apple", "partialdiff", "opthyphen", "formula", "lozenge", "universal", "existential", "suchthat", "congruent", "therefore", "perpendicular", "minute", "club", "diamond", "heart", "spade", "arrowboth", "arrowleft", "arrowup", "arrowright", "arrowdown", "second", "proportional", "equivalence", "arrowvertex", "arrowhorizex", "carriagereturn", "aleph", "Ifraktur", "Rfraktur", "weierstrass", "circlemultiply", "circleplus", "emptyset", "intersection", "union", "propersuperset", "reflexsuperset", "notsubset", "propersubset", "reflexsubset", "element", "notelement", "angle", "gradient", "product", "logicaland", "logicalor", "arrowdblboth", "arrowdblleft", "arrowdblup", "arrowdblright", "arrowdbldown", "angleleft", "registersans", "copyrightsans", "trademarksans", "angleright", "mathplus", "mathminus", "mathasterisk", "mathnumbersign", "dotmath", "mathequal", "mathtilde", wine-20000526/dlls/richedit/text-writer.c0100644000175000001440000001266307105350315017644 0ustar julliardusers/* * text-writer -- RTF-to-text translation writer code. * * Read RTF input, write text of document (text extraction). * * Wrapper must call WriterInit() once before processing any files, * then set up input and call BeginFile() for each input file. * * This installs callbacks for the text and control token classes. * The control class is necessary so that special characters such as * \par, \tab, \sect, etc. can be converted. * * It's problematic what to do with text in headers and footers, and * what to do about tables. * * This really is quite a stupid program, for instance, it could keep * track of the current leader character and dump that out when a tab * is encountered. * * 04 Feb 91 Paul DuBois dubois@primate.wisc.edu * * This software may be redistributed without restriction and used for * any purpose whatsoever. * * 04 Feb 91 * -Created. * 27 Feb 91 * - Updated for distribution 1.05. * 13 Jul 93 * - Updated to compile under THINK C 6.0. * 31 Aug 93 * - Added Mike Sendall's entries for Macintosh char map. * 07 Sep 93 * - Uses charset map and output sequence map for character translation. * 11 Mar 94 * - Updated for 1.10 distribution. */ # include # include "rtf.h" # include "rtf2text.h" # include "charlist.h" static void TextClass (); static void ControlClass (); static void Destination (); static void SpecialChar (); static void PutStdChar (); static void PutLitChar (); static void PutLitStr (); static char *outMap[rtfSC_MaxChar]; static CHARLIST charlist = {0, NULL, NULL}; int RTFToBuffer(char* pBuffer, int nBufferSize); int RTFToBuffer(char* pBuffer, int nBufferSize) { /* check if the buffer is big enough to hold all characters */ /* we require one more for the '\0' */ if(nBufferSize < charlist.nCount + 1) { return charlist.nCount + CHARLIST_CountChar(&charlist, '\n') + 1; } while(charlist.nCount) { *pBuffer = CHARLIST_Dequeue(&charlist); if(*pBuffer=='\n') { *pBuffer = '\r'; pBuffer++; *pBuffer = '\n'; } pBuffer++; } *pBuffer = '\0'; return 0; } /* * Initialize the writer. */ void WriterInit () { RTFReadOutputMap (outMap,1); } int BeginFile () { /* install class callbacks */ RTFSetClassCallback (rtfText, TextClass); RTFSetClassCallback (rtfControl, ControlClass); return (1); } /* * Write out a character. rtfMajor contains the input character, rtfMinor * contains the corresponding standard character code. * * If the input character isn't in the charset map, try to print some * representation of it. */ static void TextClass () { char buf[rtfBufSiz]; if (rtfMinor != rtfSC_nothing) PutStdChar (rtfMinor); else { if (rtfMajor < 128) /* in ASCII range */ sprintf (buf, "[[%c]]", rtfMajor); else sprintf (buf, "[[\\'%02x]]", rtfMajor); PutLitStr (buf); } } static void ControlClass () { switch (rtfMajor) { case rtfDestination: Destination (); break; case rtfSpecialChar: SpecialChar (); break; } } /* * This function notices destinations that should be ignored * and skips to their ends. This keeps, for instance, picture * data from being considered as plain text. */ static void Destination () { switch (rtfMinor) { case rtfPict: case rtfFNContSep: case rtfFNContNotice: case rtfInfo: case rtfIndexRange: case rtfITitle: case rtfISubject: case rtfIAuthor: case rtfIOperator: case rtfIKeywords: case rtfIComment: case rtfIVersion: case rtfIDoccomm: RTFSkipGroup (); break; } } /* * The reason these use the rtfSC_xxx thingies instead of just writing * out ' ', '-', '"', etc., is so that the mapping for these characters * can be controlled by the text-map file. */ void SpecialChar () { switch (rtfMinor) { case rtfPage: case rtfSect: case rtfRow: case rtfLine: case rtfPar: PutLitChar ('\n'); break; case rtfCell: PutStdChar (rtfSC_space); /* make sure cells are separated */ break; case rtfNoBrkSpace: PutStdChar (rtfSC_nobrkspace); break; case rtfTab: PutLitChar ('\t'); break; case rtfNoBrkHyphen: PutStdChar (rtfSC_nobrkhyphen); break; case rtfBullet: PutStdChar (rtfSC_bullet); break; case rtfEmDash: PutStdChar (rtfSC_emdash); break; case rtfEnDash: PutStdChar (rtfSC_endash); break; case rtfLQuote: PutStdChar (rtfSC_quoteleft); break; case rtfRQuote: PutStdChar (rtfSC_quoteright); break; case rtfLDblQuote: PutStdChar (rtfSC_quotedblleft); break; case rtfRDblQuote: PutStdChar (rtfSC_quotedblright); break; } } /* * Eventually this should keep track of the destination of the * current state and only write text when in the initial state. * * If the output sequence is unspecified in the output map, write * the character's standard name instead. This makes map deficiencies * obvious and provides incentive to fix it. :-) */ void PutStdChar (int stdCode) { char *oStr = (char *) NULL; char buf[rtfBufSiz]; /* if (stdCode == rtfSC_nothing) RTFPanic ("Unknown character code, logic error\n"); */ oStr = outMap[stdCode]; if (oStr == (char *) NULL) /* no output sequence in map */ { sprintf (buf, "[[%s]]", RTFStdCharName (stdCode)); oStr = buf; } PutLitStr (oStr); } void PutLitChar (int c) { CHARLIST_Enqueue(&charlist, (char) c); /* fputc (c, ostream); */ } static void PutLitStr (char *s) { for(;*s;s++) { CHARLIST_Enqueue(&charlist, *s); } /* fputs (s, ostream); */ } wine-20000526/dlls/richedit/text_map.h0100644000175000001440000000776107105350315017177 0ustar julliardusers/* * Output sequence map for rtf2text * * Field 1 is the standard character name. Field 2 is the output sequence * to produce for that character. * * The output sequence is simply a string of characters. If it contains * whitespace, it may be quoted. If it contains quotes, it may be quoted * with a different quote character. * * characters in ASCII range (32-127 */ char *text_map[] = { "space" ," ", "exclam" ,"!", "quotedbl" ,"\"", "numbersign" ,"#", "dollar" ,"$", "percent" ,"%", "ampersand" ,"&", "quoteright" ,"'", "parenleft" ,"(", "parenright" ,")", "asterisk" ,"*", "plus" ,"+", "comma" ,",", "hyphen" ,"-", "period" ,".", "slash" ,"/", "zero" ,"0", "one" ,"1", "two" ,"2", "three" ,"3", "four" ,"4", "five" ,"5", "six" ,"6", "seven" ,"7", "eight" ,"8", "nine" ,"9", "colon" ,":", "semicolon" ,";", "less" ,"<", "equal" ,"=", "greater" ,">", "question" ,"?", "at" ,"@", "A" ,"A", "B" ,"B", "C" ,"C", "D" ,"D", "E" ,"E", "F" ,"F", "G" ,"G", "H" ,"H", "I" ,"I", "J" ,"J", "K" ,"K", "L" ,"L", "M" ,"M", "N" ,"N", "O" ,"O", "P" ,"P", "Q" ,"Q", "R" ,"R", "S" ,"S", "T" ,"T", "U" ,"U", "V" ,"V", "W" ,"W", "X" ,"X", "Y" ,"Y", "Z" ,"Z", "bracketleft" ,"[", "backslash" ,"\\", "bracketright" ,"]", "asciicircum" ,"^", "underscore" ,"_", "quoteleft" ,"`", "a" ,"a", "b" ,"b", "c" ,"c", "d" ,"d", "e" ,"e", "f" ,"f", "g" ,"g", "h" ,"h", "i" ,"i", "j" ,"j", "k" ,"k", "l" ,"l", "m" ,"m", "n" ,"n", "o" ,"o", "p" ,"p", "q" ,"q", "r" ,"r", "s" ,"s", "t" ,"t", "u" ,"u", "v" ,"v", "w" ,"w", "x" ,"x", "y" ,"y", "z" ,"z", "braceleft" ,"{", "bar" ,"|", "braceright" ,"}", "asciitilde" ,"~", "AE" ,"AE", "OE" ,"OE", "acute" ,"'", "ae" ,"ae", "angleleft" ,"<", "angleright" ,">", "arrowboth" ,"<->", "arrowdblboth" ,"<=>", "arrowdblleft" ,"<=", "arrowdblright" ,"=>", "arrowleft" ,"<-", "arrowright" ,"->", "bullet" ,"o", "cent" ,"cent", "circumflex" ,"^", "copyright" ,"(c)", "copyrightsans" ,"(c)", "degree" ,"deg.", "divide" ,"/", "dotlessi" ,"i", "ellipsis" ,"...", "emdash" ,"--", "endash" ,"-", "fi" ,"fi", "fl" ,"fl", "fraction" ,"/", "germandbls" ,"ss", "grave" ,"`", "greaterequal" ,">=", "guillemotleft" ,"<<", "guillemotright" ,">>", "guilsinglleft" ,"<", "guilsinglright" ,">", "lessequal" ,"<=", "logicalnot" ,"~", "mathasterisk" ,"*", "mathequal" ,"=", "mathminus" ,"-", "mathnumbersign" ,"#", "mathplus" ,"+", "mathtilde" ,"~", "minus" ,"-", "mu" ,"u", "multiply" ,"x", "nobrkhyphen" ,"-", "nobrkspace" ," ", "notequal" ,"!=", "oe" ,"oe", "onehalf" ,"1/2", "onequarter" ,"1/4", "periodcentered" ,".", "plusminus" ,"+/-", "quotedblbase" ,",,", "quotedblleft" ,"\"", "quotedblright" ,"\"", "quotesinglbase" ,",", "registered" ,"reg.", "registersans" ,"reg.", "threequarters" ,"3/4", "tilde" ,"~", "trademark" ,"(TM)", "trademarksans" ,"(TM)" }; wine-20000526/dlls/setupx/0040755000175000001440000000000007113604206014732 5ustar julliarduserswine-20000526/dlls/setupx/.cvsignore0100644000175000001440000000006107045213574016734 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libsetupx.so.1.0 wine-20000526/dlls/setupx/Makefile.in0100644000175000001440000000032107060307302016766 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = setupx SOVERSION = 1.0 SPEC_SRCS = setupx.spec C_SRCS = \ setupx_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/setupx/setupx.spec0100644000175000001440000001470107044653356017153 0ustar julliardusersname setupx type win16 1 stub WEP 2 stub IPOPEN 3 stub IPOPENAPPEND 4 stub IPCLOSE 5 stub IPGETLONGFIELD 6 stub IPGETSTRINGFIELD 7 stub IPFINDFIRSTLINE 8 stub IPGETLINECOUNT 9 stub IPGETFIELDCOUNT 10 stub IPGETINTFIELD 11 stub IPFINDNEXTLINE 12 stub IPGETFILENAME 13 stub VCPQUEUECOPY 14 stub NOAUTORUNWNDPROC 15 stub __DEBUGMSG 16 stub __ASSERTMSG 17 stub VCPQUEUEDELETE 18 stub TPOPENFILE 19 stub TPCLOSEFILE 20 stub TPOPENSECTION 21 stub TPCLOSESECTION 22 stub TPCOMMITSECTION 23 stub TPGETLINE 24 stub TPGETNEXTLINE 25 stub TPINSERTLINE 26 stub TPREPLACELINE 27 stub TPDELETELINE 28 stub TPMOVELINE 29 stub TPGETLINECONTENTS 30 stub TPGETPRIVATEPROFILESTRING 31 stub TPWRITEPRIVATEPROFILESTRING 32 stub TPGETPROFILESTRING 33 stub CTLSETLDD 34 stub CTLGETLDD 35 stub CTLFINDLDD 36 stub CTLADDLDD 37 stub CTLDELLDD 38 stub CTLGETLDDPATH 39 stub SUREGCLOSEKEY 40 stub SUREGCREATEKEY 41 stub SUREGDELETEKEY 42 stub SUREGDELETEVALUE 43 stub SUREGENUMKEY 44 stub SUREGENUMVALUE 45 stub SUREGFLUSH 46 stub SUREGINIT 47 pascal SUregOpenKey(word str ptr) SURegOpenKey 48 stub SUREGQUERYVALUE 49 stub SUREGQUERYVALUE16 50 pascal SURegQueryValueEx(long str ptr ptr ptr ptr) SURegQueryValueEx 51 stub SUREGSETVALUE 52 stub SUREGSETVALUE16 53 stub SUREGSETVALUEEX 54 stub SUREGSAVEKEY 55 stub SUREGLOADKEY 56 stub SUREGUNLOADKEY 60 stub DISKINFOFROMLDID 61 stub SUERRORTOIDS 62 stub TPWRITEPROFILESTRING 63 stub SURPLSETUP 64 stub SUSTORELDIDPATH 65 stub WILDCARDSTRCMPI 101 stub GENINSTALL 102 stub GENWININITRENAME 103 stub GENFORMSTRWITHOUTPLACEHOLDERS 104 stub SETUPX 105 stub CFGSETUPMERGE 106 stub INITDEPENDANTLDIDS 107 stub CFGOBJFINDKEYCMD 108 stub GENSUREGSETVALUEEX 110 stub GENINSTALLEX 111 stub GENCOPYLOGCONFIG2REG 112 stub SUGETSETSETUPFLAGS 114 stub CFGPARSELINE 115 stub CFGSETAUTOPROCESS 116 stub CFGOBJTOSTR 117 stub CFGLNTOOBJ 118 stub MATCHCMDEXT 119 stub IPFINDNEXTMATCHLINE 120 stub P_SETDEFAULTOPTION 121 stub CFGCLEANBOOT 122 stub CFGMATCHCMDEXT 123 stub CFGWASFILEUPDATED 124 stub AUTOMATCHCMDEXT 125 stub P_VALIDATEOC 126 stub GENMAPROOTREGSTR2KEY 127 stub P_CDROMOC 128 stub P_MEDIAOC 130 stub _SUFORMATMESSAGE 131 stub SUVFORMATMESSAGE 132 stub _SUFORMATMESSAGEBOX 135 stub SUHELP 140 stub SUVERCONFLICT 141 stub SUVERCONFLICTINIT 142 stub SUVERCONFLICTTERM 143 stub SUCREATEEBD 144 stub SUCOPYTOEBD 145 stub SXISMSDOS7RUNNING 150 stub DS_INIT 151 stub DS_DESTROY 152 stub DS_SSYNCDRIVES 153 stub DS_GETDRIVEDATA 154 stub DS_ADDSECTION 155 stub DS_ENABLESECTION 156 stub DS_DISABLESECTION 157 stub DS_SETSWAPSIZE 158 stub DS_SETREQUIREDPAD 159 stub DS_SETAVAILABLEPAD 160 stub SXUPDATEDS 170 stub SUSETMEM 171 stub WRITEDMFBOOTDATA 200 stub VCPOPEN 201 stub VCPCLOSE 202 stub VCPDEFCALLBACKPROC 203 stub VCPENUMFILES 204 stub VCPQUEUERENAME 205 stub VSMGETSTRINGNAME 206 stub VSMSTRINGDELETE 207 stub VSMSTRINGADD 208 stub VSMGETSTRINGRAWNAME 209 stub IPSAVERESTOREPOSITION 210 stub IPGETPROFILESTRING 211 stub IPOPENEX 212 stub IPOPENAPPENDEX 213 stub VCPUICALLBACKPROC 214 stub VCPADDMRUPATH 300 stub DIBUILDCOMPATDRVLIST 301 stub DIBUILDCLASSDRVLIST 302 stub DIDESTROYDRIVERNODELIST 303 stub DICREATEDEVICEINFO 304 stub DIGETCLASSDEVS 305 stub DIDESTROYDEVICEINFOLIST 306 stub DIREMOVEDEVICE 308 stub DICALLCLASSINSTALLER 309 stub DICREATEDRIVERNODE 310 stub DIDRAWMINIICON 311 stub DIGETCLASSBITMAPINDEX 312 stub DISELECTDEVICE 313 stub DIINSTALLDEVICE 314 stub DILOADCLASSICON 315 stub DIASKFOROEMDISK 316 stub DISPLAY_SETMODE 317 stub DISPLAY_CLASSINSTALLER 318 stub DICREATEDEVREGKEY 319 stub DIOPENDEVREGKEY 320 stub DIINSTALLDRVSECTION 321 stub DIINSTALLCLASS 322 stub DIOPENCLASSREGKEY 323 stub DISPLAY_SETFONTSIZE 324 stub DISPLAY_OPENFONTSIZEKEY 325 stub DIBUILDCLASSDRVLISTFROMOLDINF 326 stub DIISTHERENEEDTOCOPY 333 stub DICHANGESTATE 340 stub GETFCTN 341 stub DIBUILDCLASSINFOLIST 342 stub DIDESTROYCLASSINFOLIST 343 stub DIGETDEVICECLASSINFO 344 stub DIDELETEDEVREGKEY 350 stub DISELECTOEMDRV 351 stub DIGETINFCLASS 360 stub GENINFLCTODEVNODE 361 stub GETDOSMESSAGE 362 stub MOUSE_CLASSINSTALLER 363 stub SXCOMPAREDOSAPPVER 365 stub FCEGETRESDESOFFSET 366 stub FCEGETALLOCVALUE 367 stub FCEADDRESDES 368 stub FCEDELETERESDES 369 stub FCEINIT 370 stub FCEGETRESDES 371 stub FCEGETFIRSTVALUE 372 stub FCEGETOTHERVALUE 373 stub FCEGETVALIDATEVALUE 374 stub FCEWRITETHISFORCEDCONFIGNOW 375 stub SUCREATEPROPERTYSHEETPAGE 376 stub SUDESTROYPROPERTYSHEETPAGE 377 stub SUPROPERTYSHEET 380 stub DIREADREGLOGCONF 381 stub DIREADREGCONF 390 stub DIBUILDPOTENTIALDUPLICATESLIST 395 stub INITSUBSTRDATA 396 stub GETFIRSTSUBSTR 397 stub GETNEXTSUBSTR 400 stub BISFILEINVMM32 401 stub DIINSTALLDRIVERFILES 405 stub DIBUILDCLASSINFOLISTEX 406 stub DIGETCLASSDEVSEX 407 stub DICOPYREGSUBKEYVALUE 410 stub IPGETVERSIONSTRING 411 stub VCPEXPLAIN 412 stub DIBUILDDRIVERINDEX 413 stub DIADDSINGLEINFTODRVIDX 414 stub FCEGETFLAGS 450 stub UIMAKEDLGNONBOLD 451 stub UIDELETENONBOLDFONT 500 stub SUEBDPAGE 501 stub SUOCPAGE 502 stub SXLISTSUBPROC 503 stub SXFILLLB 504 stub SXOCPAGEDLG 506 stub SXOCBATCHSETTINGS 507 stub SXOCFIXNEEDS 508 stub CTLSETLDDPATH 509 stub SXCALLOCPROC 520 stub DIBUILDCLASSDRVINFOLIST 521 stub DIBUILDCOMPATDRVINFOLIST 522 stub DIDESTROYDRVINFOLIST 523 stub DICONVERTDRIVERINFOTODRIVERNODE 525 stub FIRSTBOOTMOVETODOSSTART 526 stub DOSOPTENABLECURCFG 527 stub INSTALLHINFSECTION 528 stub SXMAKEUNCPATH 529 stub SXISSBSSERVERFILE 530 stub SXFINDBATCHFILES 600 stub PIDCONSTRUCT 601 stub PIDVALIDATE wine-20000526/dlls/setupx/setupx_main.c0100644000175000001440000000206307070212245017430 0ustar julliardusers/* * SETUPX library * * Copyright 1998 Andreas Mohr * * FIXME: Rather non-functional functions for now. */ #include "windows.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(setupx); /*********************************************************************** * SURegOpenKey */ DWORD WINAPI SURegOpenKey( HKEY hkey, LPCSTR lpszSubKey, LPHKEY retkey ) { FIXME("(%x,%s,%p), semi-stub.\n",hkey,debugstr_a(lpszSubKey),retkey); return RegOpenKeyA( hkey, lpszSubKey, retkey ); } /*********************************************************************** * SURegQueryValueEx */ DWORD WINAPI SURegQueryValueEx( HKEY hkey, LPSTR lpszValueName, LPDWORD lpdwReserved, LPDWORD lpdwType, LPBYTE lpbData, LPDWORD lpcbData ) { FIXME("(%x,%s,%p,%p,%p,%ld), semi-stub.\n",hkey,debugstr_a(lpszValueName), lpdwReserved,lpdwType,lpbData,lpcbData?*lpcbData:0); return RegQueryValueExA( hkey, lpszValueName, lpdwReserved, lpdwType, lpbData, lpcbData ); } wine-20000526/dlls/shell32/0040755000175000001440000000000007113604211014652 5ustar julliarduserswine-20000526/dlls/shell32/.cvsignore0100644000175000001440000000007207045213574016662 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libshell32.so.1.0 shres.s wine-20000526/dlls/shell32/Makefile.in0100644000175000001440000000134107102371335016721 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = shell32 SOVERSION = 1.0 ALTNAMES = shell shlwapi IMPORTS = ole32 WRCEXTRA = -s -p$(MODULE) SPEC_SRCS = \ shell.spec \ shell32.spec \ shlwapi.spec C_SRCS = \ brsfolder.c \ changenotify.c \ classes.c \ clipboard.c \ dataobject.c \ dialogs.c \ enumidlist.c \ folders.c \ iconcache.c \ memorystream.c \ pidl.c \ regstream.c \ shell32_main.c \ shell.c \ shellguid.c \ shelllink.c \ shlmenu.c \ shellole.c \ shellord.c \ shellpath.c \ shlfileop.c \ shlfolder.c \ shlview.c \ shpolicy.c \ shv_bg_cmenu.c \ shv_item_cmenu.c \ systray.c RC_SRCS= \ shres.rc @MAKE_DLL_RULES@ all: check_wrc ### Dependencies: wine-20000526/dlls/shell32/brsfolder.c0100644000175000001440000001630707106625254017020 0ustar julliardusers#include #include #include "winerror.h" #include "heap.h" #include "dlgs.h" #include "win.h" #include "sysmetrics.h" #include "debugtools.h" #include "winreg.h" #include "authors.h" #include "winnls.h" #include "commctrl.h" #include "spy.h" #include "wine/obj_base.h" #include "wine/obj_enumidlist.h" #include "wine/obj_shellfolder.h" #include "wine/undocshell.h" #include "pidl.h" #include "shell32_main.h" #include "shellapi.h" DEFAULT_DEBUG_CHANNEL(shell) #define IDD_TREEVIEW 99 static HWND hwndTreeView; static LPBROWSEINFOA lpBrowseInfo; static LPITEMIDLIST pidlRet; static void FillTreeView(LPSHELLFOLDER lpsf, LPITEMIDLIST lpifq, HTREEITEM hParent); static void InitializeTreeView(HWND hwndParent) { HIMAGELIST hImageList; IShellFolder * lpsf; HRESULT hr; hwndTreeView = GetDlgItem (hwndParent, IDD_TREEVIEW); Shell_GetImageList(NULL, &hImageList); TRACE("dlg=%x tree=%x\n", hwndParent, hwndTreeView ); if (hImageList && hwndTreeView) { TreeView_SetImageList(hwndTreeView, hImageList, 0); } hr = SHGetDesktopFolder(&lpsf); if (SUCCEEDED(hr) && hwndTreeView) { TreeView_DeleteAllItems(hwndTreeView); FillTreeView(lpsf, NULL, TVI_ROOT); } if (SUCCEEDED(hr)) { IShellFolder_Release(lpsf); } } static int GetIcon(LPITEMIDLIST lpi, UINT uFlags) { SHFILEINFOA sfi; SHGetFileInfoA((LPCSTR)lpi,0,&sfi, sizeof(SHFILEINFOA), uFlags); return sfi.iIcon; } static void GetNormalAndSelectedIcons(LPITEMIDLIST lpifq,LPTVITEMA lpTV_ITEM) { TRACE("%p %p\n",lpifq, lpTV_ITEM); lpTV_ITEM->iImage = GetIcon(lpifq, SHGFI_PIDL | SHGFI_SYSICONINDEX | SHGFI_SMALLICON); lpTV_ITEM->iSelectedImage = GetIcon(lpifq, SHGFI_PIDL | SHGFI_SYSICONINDEX | SHGFI_SMALLICON | SHGFI_OPENICON); return; } typedef struct tagID { LPSHELLFOLDER lpsfParent; LPITEMIDLIST lpi; LPITEMIDLIST lpifq; } TV_ITEMDATA, *LPTV_ITEMDATA; static BOOL GetName(LPSHELLFOLDER lpsf, LPITEMIDLIST lpi, DWORD dwFlags, LPSTR lpFriendlyName) { BOOL bSuccess=TRUE; STRRET str; TRACE("%p %p %lx %p\n", lpsf, lpi, dwFlags, lpFriendlyName); if (SUCCEEDED(IShellFolder_GetDisplayNameOf(lpsf, lpi, dwFlags, &str))) { if(FAILED(StrRetToStrNA (lpFriendlyName, MAX_PATH, &str, lpi))) { bSuccess = FALSE; } } else bSuccess = FALSE; TRACE("-- %s\n",lpFriendlyName); return bSuccess; } static void FillTreeView(IShellFolder * lpsf, LPITEMIDLIST pidl, HTREEITEM hParent) { TVITEMA tvi; TVINSERTSTRUCTA tvins; HTREEITEM hPrev = 0; LPENUMIDLIST lpe=0; LPITEMIDLIST pidlTemp=0; LPTV_ITEMDATA lptvid=0; ULONG ulFetched; HRESULT hr; char szBuff[256]; HWND hwnd=GetParent(hwndTreeView); TRACE("%p %p %x\n",lpsf, pidl, (INT)hParent); SetCapture(GetParent(hwndTreeView)); SetCursor(LoadCursorA(0, IDC_WAITA)); hr=IShellFolder_EnumObjects(lpsf,hwnd, SHCONTF_FOLDERS | SHCONTF_NONFOLDERS,&lpe); if (SUCCEEDED(hr)) { while (NOERROR == IEnumIDList_Next(lpe,1,&pidlTemp,&ulFetched)) { ULONG ulAttrs = SFGAO_HASSUBFOLDER | SFGAO_FOLDER; IShellFolder_GetAttributesOf(lpsf, 1, &pidlTemp, &ulAttrs); if (ulAttrs & (SFGAO_HASSUBFOLDER | SFGAO_FOLDER)) { if (ulAttrs & SFGAO_FOLDER) { tvi.mask = TVIF_TEXT | TVIF_IMAGE | TVIF_SELECTEDIMAGE | TVIF_PARAM; if (ulAttrs & SFGAO_HASSUBFOLDER) { tvi.cChildren=1; tvi.mask |= TVIF_CHILDREN; } if (!( lptvid = (LPTV_ITEMDATA)SHAlloc(sizeof(TV_ITEMDATA)))) goto Done; if (!GetName(lpsf, pidlTemp, SHGDN_NORMAL, szBuff)) goto Done; tvi.pszText = szBuff; tvi.cchTextMax = MAX_PATH; tvi.lParam = (LPARAM)lptvid; IShellFolder_AddRef(lpsf); lptvid->lpsfParent = lpsf; lptvid->lpi = ILClone(pidlTemp); lptvid->lpifq = ILCombine(pidl, pidlTemp); GetNormalAndSelectedIcons(lptvid->lpifq, &tvi); tvins.DUMMYUNIONNAME.item = tvi; tvins.hInsertAfter = hPrev; tvins.hParent = hParent; hPrev = (HTREEITEM)TreeView_InsertItemA (hwndTreeView, &tvins); } } SHFree(pidlTemp); /* Finally, free the pidl that the shell gave us... */ pidlTemp=0; } } Done: ReleaseCapture(); SetCursor(LoadCursorA(0, IDC_ARROWA)); if (lpe) IEnumIDList_Release(lpe); if (pidlTemp ) SHFree(pidlTemp); } static LRESULT MsgNotify(HWND hWnd, UINT CtlID, LPNMHDR lpnmh) { NMTREEVIEWA *pnmtv = (NMTREEVIEWA *)lpnmh; LPTV_ITEMDATA lptvid; /* Long pointer to TreeView item data */ IShellFolder * lpsf2=0; TRACE("%x %x %p msg=%x\n", hWnd, CtlID, lpnmh, pnmtv->hdr.code); switch (pnmtv->hdr.idFrom) { case IDD_TREEVIEW: switch (pnmtv->hdr.code) { case TVN_DELETEITEMA: { FIXME("TVN_DELETEITEMA\n"); lptvid=(LPTV_ITEMDATA)pnmtv->itemOld.lParam; IShellFolder_Release(lptvid->lpsfParent); SHFree(lptvid->lpi); SHFree(lptvid->lpifq); SHFree(lptvid); } break; case TVN_ITEMEXPANDINGA: { FIXME("TVN_ITEMEXPANDINGA\n"); if ((pnmtv->itemNew.state & TVIS_EXPANDEDONCE)) break; lptvid=(LPTV_ITEMDATA)pnmtv->itemNew.lParam; if (SUCCEEDED(IShellFolder_BindToObject(lptvid->lpsfParent, lptvid->lpi,0,(REFIID)&IID_IShellFolder,(LPVOID *)&lpsf2))) { FillTreeView( lpsf2, lptvid->lpifq, pnmtv->itemNew.hItem ); } TreeView_SortChildren(hwndTreeView, pnmtv->itemNew.hItem, FALSE); } break; case TVN_SELCHANGEDA: lptvid=(LPTV_ITEMDATA)pnmtv->itemNew.lParam; pidlRet = lptvid->lpifq; break; default: FIXME("unhandled\n"); break; } break; default: break; } return 0; } /************************************************************************* * BrsFolderDlgProc32 (not an exported API function) */ static BOOL WINAPI BrsFolderDlgProc( HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam ) { TRACE("hwnd=%i msg=%i 0x%08x 0x%08lx\n", hWnd, msg, wParam, lParam ); switch(msg) { case WM_INITDIALOG: pidlRet = NULL; lpBrowseInfo = (LPBROWSEINFOA) lParam; if (lpBrowseInfo->lpfn) FIXME("Callbacks not implemented\n"); if (lpBrowseInfo->ulFlags) FIXME("flag %x not implemented\n", lpBrowseInfo->ulFlags); if (lpBrowseInfo->lpszTitle) FIXME("title %s not displayed\n", lpBrowseInfo->lpszTitle); if ( lpBrowseInfo->pidlRoot ) FIXME("root is desktop\n"); InitializeTreeView ( hWnd); return 1; case WM_NOTIFY: MsgNotify( hWnd, (UINT)wParam, (LPNMHDR)lParam); break; case WM_COMMAND: switch (wParam) { case IDOK: pdump ( pidlRet ); SHGetPathFromIDListA(pidlRet, lpBrowseInfo->pszDisplayName); EndDialog(hWnd, (DWORD) ILClone(pidlRet)); return TRUE; case IDCANCEL: EndDialog(hWnd, 0); return TRUE; } break; } return 0; } /************************************************************************* * SHBrowseForFolderA [SHELL32.209] * */ LPITEMIDLIST WINAPI SHBrowseForFolderA (LPBROWSEINFOA lpbi) { TRACE("(%p{lpszTitle=%s})\n", lpbi, debugstr_a(lpbi->lpszTitle)); return (LPITEMIDLIST) DialogBoxParamA( shell32_hInstance, "SHBRSFORFOLDER_MSGBOX", lpbi->hwndOwner, BrsFolderDlgProc, (INT)lpbi ); } wine-20000526/dlls/shell32/changenotify.c0100644000175000001440000001667707073717476017541 0ustar julliardusers/* * shell change notification * * Juergen Schmied * */ #include #include "debugtools.h" #include "pidl.h" #include "shell32_main.h" #include "winversion.h" #include "wine/undocshell.h" DEFAULT_DEBUG_CHANNEL(shell); static CRITICAL_SECTION SHELL32_ChangenotifyCS = CRITICAL_SECTION_INIT; /* internal list of notification clients (internal) */ typedef struct _NOTIFICATIONLIST { struct _NOTIFICATIONLIST *next; struct _NOTIFICATIONLIST *prev; HWND hwnd; /* window to notify */ DWORD uMsg; /* message to send */ LPNOTIFYREGISTER apidl; /* array of entrys to watch*/ UINT cidl; /* number of pidls in array */ LONG wEventMask; /* subscribed events */ DWORD dwFlags; /* client flags */ } NOTIFICATIONLIST, *LPNOTIFICATIONLIST; static NOTIFICATIONLIST head; static NOTIFICATIONLIST tail; void InitChangeNotifications() { TRACE("head=%p tail=%p\n", &head, &tail); head.next = &tail; tail.prev = &head; } void FreeChangeNotifications() { LPNOTIFICATIONLIST ptr, item; TRACE("\n"); EnterCriticalSection(&SHELL32_ChangenotifyCS); ptr = head.next; while(ptr != &tail) { int i; item = ptr; ptr = ptr->next; TRACE("item=%p\n", item); /* free the item */ for (i=0; icidl;i++) SHFree(item->apidl[i].pidlPath); SHFree(item->apidl); SHFree(item); } head.next = NULL; tail.prev = NULL; LeaveCriticalSection(&SHELL32_ChangenotifyCS); DeleteCriticalSection(&SHELL32_ChangenotifyCS); } static BOOL AddNode(LPNOTIFICATIONLIST item) { LPNOTIFICATIONLIST last; EnterCriticalSection(&SHELL32_ChangenotifyCS); /* get last entry */ last = tail.prev; /* link items */ last->next = item; item->prev = last; item->next = &tail; tail.prev = item; TRACE("item=%p prev=%p next=%p\n", item, item->prev, item->next); LeaveCriticalSection(&SHELL32_ChangenotifyCS); return TRUE; } static BOOL DeleteNode(LPNOTIFICATIONLIST item) { LPNOTIFICATIONLIST ptr; int ret = FALSE; TRACE("item=%p\n", item); EnterCriticalSection(&SHELL32_ChangenotifyCS); ptr = head.next; while((ptr != &tail) && (ret == FALSE)) { TRACE("ptr=%p\n", ptr); if (ptr == item) { int i; TRACE("item=%p prev=%p next=%p\n", item, item->prev, item->next); /* remove item from list */ item->prev->next = item->next; item->next->prev = item->prev; /* free the item */ for (i=0; icidl;i++) SHFree(item->apidl[i].pidlPath); SHFree(item->apidl); SHFree(item); ret = TRUE; } ptr = ptr->next; } LeaveCriticalSection(&SHELL32_ChangenotifyCS); return ret; } /************************************************************************* * SHChangeNotifyRegister [SHELL32.2] * */ HANDLE WINAPI SHChangeNotifyRegister( HWND hwnd, LONG dwFlags, LONG wEventMask, DWORD uMsg, int cItems, LPCNOTIFYREGISTER lpItems) { LPNOTIFICATIONLIST item; int i; item = SHAlloc(sizeof(NOTIFICATIONLIST)); TRACE("(0x%04x,0x%08lx,0x%08lx,0x%08lx,0x%08x,%p) item=%p\n", hwnd,dwFlags,wEventMask,uMsg,cItems,lpItems,item); item->next = NULL; item->prev = NULL; item->cidl = cItems; item->apidl = SHAlloc(sizeof(NOTIFYREGISTER) * cItems); for(i=0;iapidl[i].pidlPath = ILClone(lpItems[i].pidlPath); item->apidl[i].bWatchSubtree = lpItems[i].bWatchSubtree; } item->hwnd = hwnd; item->uMsg = uMsg; item->wEventMask = wEventMask; item->dwFlags = dwFlags; AddNode(item); return (HANDLE)item; } /************************************************************************* * SHChangeNotifyDeregister [SHELL32.4] */ BOOL WINAPI SHChangeNotifyDeregister( HANDLE hNotify) { TRACE("(0x%08x)\n",hNotify); return DeleteNode((LPNOTIFICATIONLIST)hNotify);; } /************************************************************************* * SHChangeNotify [SHELL32.239] */ void WINAPI SHChangeNotifyW (LONG wEventId, UINT uFlags, LPCVOID dwItem1, LPCVOID dwItem2) { LPITEMIDLIST pidl1=(LPITEMIDLIST)dwItem1, pidl2=(LPITEMIDLIST)dwItem2; LPNOTIFICATIONLIST ptr; TRACE("(0x%08lx,0x%08x,%p,%p):stub.\n", wEventId,uFlags,dwItem1,dwItem2); /* convert paths in IDLists*/ if(uFlags & SHCNF_PATHA) { DWORD dummy; if (dwItem1) SHILCreateFromPathA((LPCSTR)dwItem1, &pidl1, &dummy); if (dwItem2) SHILCreateFromPathA((LPCSTR)dwItem2, &pidl2, &dummy); } EnterCriticalSection(&SHELL32_ChangenotifyCS); /* loop through the list */ ptr = head.next; while(ptr != &tail) { TRACE("trying %p\n", ptr); if(wEventId & ptr->wEventMask) { TRACE("notifying\n"); SendMessageA(ptr->hwnd, ptr->uMsg, (WPARAM)pidl1, (LPARAM)pidl2); } ptr = ptr->next; } LeaveCriticalSection(&SHELL32_ChangenotifyCS); if(uFlags & SHCNF_PATHA) { if (pidl1) SHFree(pidl1); if (pidl2) SHFree(pidl2); } } /************************************************************************* * SHChangeNotify [SHELL32.239] */ void WINAPI SHChangeNotifyA (LONG wEventId, UINT uFlags, LPCVOID dwItem1, LPCVOID dwItem2) { LPITEMIDLIST Pidls[2]; LPNOTIFICATIONLIST ptr; Pidls[0] = (LPITEMIDLIST)dwItem1; Pidls[1] = (LPITEMIDLIST)dwItem2; TRACE("(0x%08lx,0x%08x,%p,%p):stub.\n", wEventId,uFlags,dwItem1,dwItem2); /* convert paths in IDLists*/ if(uFlags & SHCNF_PATHA) { DWORD dummy; if (Pidls[0]) SHILCreateFromPathA((LPCSTR)dwItem1, &Pidls[0], &dummy); if (Pidls[1]) SHILCreateFromPathA((LPCSTR)dwItem2, &Pidls[1], &dummy); } EnterCriticalSection(&SHELL32_ChangenotifyCS); /* loop through the list */ ptr = head.next; while(ptr != &tail) { TRACE("trying %p\n", ptr); if(wEventId & ptr->wEventMask) { TRACE("notifying\n"); SendMessageA(ptr->hwnd, ptr->uMsg, (WPARAM)&Pidls, (LPARAM)wEventId); } ptr = ptr->next; } LeaveCriticalSection(&SHELL32_ChangenotifyCS); /* if we allocated it, free it */ if(uFlags & SHCNF_PATHA) { if (Pidls[0]) SHFree(Pidls[0]); if (Pidls[1]) SHFree(Pidls[1]); } } /************************************************************************* * SHChangeNotifyAW [SHELL32.239] */ void WINAPI SHChangeNotifyAW (LONG wEventId, UINT uFlags, LPCVOID dwItem1, LPCVOID dwItem2) { if(VERSION_OsIsUnicode()) SHChangeNotifyW (wEventId, uFlags, dwItem1, dwItem2); else SHChangeNotifyA (wEventId, uFlags, dwItem1, dwItem2); } /************************************************************************* * NTSHChangeNotifyRegister [SHELL32.640] * NOTES * Idlist is an array of structures and Count specifies how many items in the array * (usually just one I think). */ DWORD WINAPI NTSHChangeNotifyRegister( HWND hwnd, LONG events1, LONG events2, DWORD msg, int count, LPNOTIFYREGISTER idlist) { FIXME("(0x%04x,0x%08lx,0x%08lx,0x%08lx,0x%08x,%p):stub.\n", hwnd,events1,events2,msg,count,idlist); return 0; } /************************************************************************* * SHChangeNotification_Lock [SHELL32.644] */ HANDLE WINAPI SHChangeNotification_Lock( HANDLE hMemoryMap, DWORD dwProcessId, LPCITEMIDLIST **lppidls, LPLONG lpwEventId) { FIXME("\n"); return 0; } /************************************************************************* * SHChangeNotification_Unlock [SHELL32.645] */ BOOL WINAPI SHChangeNotification_Unlock ( HANDLE hLock) { FIXME("\n"); return 0; } /************************************************************************* * NTSHChangeNotifyDeregister [SHELL32.641] */ DWORD WINAPI NTSHChangeNotifyDeregister(LONG x1) { FIXME("(0x%08lx):stub.\n",x1); return 0; } wine-20000526/dlls/shell32/classes.c0100644000175000001440000001614407102371411016457 0ustar julliardusers/* * file type mapping * (HKEY_CLASSES_ROOT - Stuff) * * */ #include #include #include #include "debugtools.h" #include "winerror.h" #include "winreg.h" #include "wine/obj_queryassociations.h" #include "shlobj.h" #include "shell32_main.h" #include "shlguid.h" #include "shresdef.h" DEFAULT_DEBUG_CHANNEL(shell); #define MAX_EXTENSION_LENGTH 20 BOOL HCR_MapTypeToValue ( LPCSTR szExtension, LPSTR szFileType, DWORD len, BOOL bPrependDot) { HKEY hkey; char szTemp[MAX_EXTENSION_LENGTH + 2]; TRACE("%s %p\n",szExtension, szFileType ); if (bPrependDot) strcpy(szTemp, "."); lstrcpynA(szTemp+((bPrependDot)?1:0), szExtension, MAX_EXTENSION_LENGTH); if (RegOpenKeyExA(HKEY_CLASSES_ROOT,szTemp,0,0x02000000,&hkey)) { return FALSE; } if (RegQueryValueA(hkey,NULL,szFileType,&len)) { RegCloseKey(hkey); return FALSE; } RegCloseKey(hkey); TRACE("-- %s\n", szFileType ); return TRUE; } BOOL HCR_GetExecuteCommand ( LPCSTR szClass, LPCSTR szVerb, LPSTR szDest, DWORD len ) { HKEY hkey; char sTemp[256]; TRACE("%s %s\n",szClass, szVerb ); sprintf(sTemp, "%s\\shell\\%s\\command",szClass, szVerb); if (RegOpenKeyExA(HKEY_CLASSES_ROOT,sTemp,0,0x02000000,&hkey)) { return FALSE; } if (RegQueryValueA(hkey,NULL,szDest,&len)) { RegCloseKey(hkey); return FALSE; } RegCloseKey(hkey); TRACE("-- %s\n", szDest ); return TRUE; } /*************************************************************************************** * HCR_GetDefaultIcon [internal] * * Gets the icon for a filetype */ BOOL HCR_GetDefaultIcon (LPCSTR szClass, LPSTR szDest, DWORD len, LPDWORD dwNr) { HKEY hkey; char sTemp[256]; char sNum[5]; TRACE("%s\n",szClass ); sprintf(sTemp, "%s\\DefaultIcon",szClass); if (RegOpenKeyExA(HKEY_CLASSES_ROOT,sTemp,0,0x02000000,&hkey)) { return FALSE; } if (RegQueryValueA(hkey,NULL,szDest,&len)) { RegCloseKey(hkey); return FALSE; } RegCloseKey(hkey); if (ParseFieldA (szDest, 2, sNum, 5)) { *dwNr=atoi(sNum); } ParseFieldA (szDest, 1, szDest, len); TRACE("-- %s %li\n", szDest, *dwNr ); return TRUE; } /*************************************************************************************** * HCR_GetClassName [internal] * * Gets the name of a registred class */ BOOL HCR_GetClassName (REFIID riid, LPSTR szDest, DWORD len) { HKEY hkey; char xriid[50]; BOOL ret = FALSE; DWORD buflen = len; strcpy(xriid,"CLSID\\"); WINE_StringFromCLSID(riid,&xriid[strlen(xriid)]); TRACE("%s\n",xriid ); szDest[0] = 0; if (!RegOpenKeyExA(HKEY_CLASSES_ROOT,xriid,0,KEY_READ,&hkey)) { if (!RegQueryValueExA(hkey,"",0,NULL,szDest,&len)) { ret = TRUE; } RegCloseKey(hkey); } if (!ret || !szDest[0]) { if(IsEqualIID(riid, &CLSID_ShellDesktop)) { if (LoadStringA(shell32_hInstance, IDS_DESKTOP, szDest, buflen)) ret = TRUE; } else if (IsEqualIID(riid, &CLSID_MyComputer)) { if(LoadStringA(shell32_hInstance, IDS_MYCOMPUTER, szDest, buflen)) ret = TRUE; } } TRACE("-- %s\n", szDest); return ret; } /*************************************************************************************** * HCR_GetFolderAttributes [internal] * * gets the folder attributes of a class * * FIXME * verify the defaultvalue for *szDest */ BOOL HCR_GetFolderAttributes (REFIID riid, LPDWORD szDest) { HKEY hkey; char xriid[60]; DWORD attributes; DWORD len = 4; strcpy(xriid,"CLSID\\"); WINE_StringFromCLSID(riid,&xriid[strlen(xriid)]); TRACE("%s\n",xriid ); if (!szDest) return FALSE; *szDest = SFGAO_FOLDER|SFGAO_FILESYSTEM; strcat (xriid, "\\ShellFolder"); if (RegOpenKeyExA(HKEY_CLASSES_ROOT,xriid,0,KEY_READ,&hkey)) { return FALSE; } if (RegQueryValueExA(hkey,"Attributes",0,NULL,(LPBYTE)&attributes,&len)) { RegCloseKey(hkey); return FALSE; } RegCloseKey(hkey); TRACE("-- 0x%08lx\n", attributes); *szDest = attributes; return TRUE; } typedef struct { ICOM_VFIELD(IQueryAssociations); DWORD ref; } IQueryAssociationsImpl; static struct ICOM_VTABLE(IQueryAssociations) qavt; /************************************************************************** * IQueryAssociations_Constructor */ IQueryAssociations* IQueryAssociations_Constructor(void) { IQueryAssociationsImpl* ei; ei=(IQueryAssociationsImpl*)HeapAlloc(GetProcessHeap(),0,sizeof(IQueryAssociationsImpl)); ei->ref=1; ICOM_VTBL(ei) = &qavt; TRACE("(%p)\n",ei); shell32_ObjCount++; return (IQueryAssociations *)ei; } /************************************************************************** * IQueryAssociations_QueryInterface */ static HRESULT WINAPI IQueryAssociations_fnQueryInterface( IQueryAssociations * iface, REFIID riid, LPVOID *ppvObj) { ICOM_THIS(IQueryAssociationsImpl,iface); TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown)) /*IUnknown*/ { *ppvObj = This; } else if(IsEqualIID(riid, &IID_IQueryAssociations)) /*IExtractIcon*/ { *ppvObj = (IQueryAssociations*)This; } if(*ppvObj) { IQueryAssociations_AddRef((IQueryAssociations*) *ppvObj); TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } /************************************************************************** * IQueryAssociations_AddRef */ static ULONG WINAPI IQueryAssociations_fnAddRef(IQueryAssociations * iface) { ICOM_THIS(IQueryAssociationsImpl,iface); TRACE("(%p)->(count=%lu)\n",This, This->ref ); shell32_ObjCount++; return ++(This->ref); } /************************************************************************** * IQueryAssociations_Release */ static ULONG WINAPI IQueryAssociations_fnRelease(IQueryAssociations * iface) { ICOM_THIS(IQueryAssociationsImpl,iface); TRACE("(%p)->()\n",This); shell32_ObjCount--; if (!--(This->ref)) { TRACE(" destroying IExtractIcon(%p)\n",This); HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } static HRESULT WINAPI IQueryAssociations_fnInit( IQueryAssociations * iface, ASSOCF flags, LPCWSTR pszAssoc, HKEY hkProgid, HWND hwnd) { return E_NOTIMPL; } static HRESULT WINAPI IQueryAssociations_fnGetString( IQueryAssociations * iface, ASSOCF flags, ASSOCSTR str, LPCWSTR pszExtra, LPWSTR pszOut, DWORD *pcchOut) { return E_NOTIMPL; } static HRESULT WINAPI IQueryAssociations_fnGetKey( IQueryAssociations * iface, ASSOCF flags, ASSOCKEY key, LPCWSTR pszExtra, HKEY *phkeyOut) { return E_NOTIMPL; } static HRESULT WINAPI IQueryAssociations_fnGetData( IQueryAssociations * iface, ASSOCF flags, ASSOCDATA data, LPCWSTR pszExtra, LPVOID pvOut, DWORD *pcbOut) { return E_NOTIMPL; } static HRESULT WINAPI IQueryAssociations_fnGetEnum( IQueryAssociations * iface, ASSOCF flags, ASSOCENUM assocenum, LPCWSTR pszExtra, REFIID riid, LPVOID *ppvOut) { return E_NOTIMPL; } static struct ICOM_VTABLE(IQueryAssociations) qavt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IQueryAssociations_fnQueryInterface, IQueryAssociations_fnAddRef, IQueryAssociations_fnRelease, IQueryAssociations_fnInit, IQueryAssociations_fnGetString, IQueryAssociations_fnGetKey, IQueryAssociations_fnGetData, IQueryAssociations_fnGetEnum }; wine-20000526/dlls/shell32/clipboard.c0100644000175000001440000001370307054033204016760 0ustar julliardusers/* * clipboard helper functions * * Copyright 2000 Juergen Schmied * * For copy & paste functions within contextmenus does the shell use * the OLE clipboard functions in combination with dataobjects. * The OLE32.DLL gets loaded with LoadLibrary * * - a right mousebutton-copy sets the following formats: * classic: * Shell IDList Array * Prefered Drop Effect * Shell Object Offsets * HDROP * FileName * ole: * OlePrivateData (ClipboardDataObjectInterface) * */ #include #include "debugtools.h" #include "pidl.h" #include "wine/undocshell.h" #include "shell32_main.h" #include "shell.h" /* DROPFILESTRUCT */ DEFAULT_DEBUG_CHANNEL(shell) static int refClipCount = 0; static HINSTANCE hShellOle32 = 0; /************************************************************************** * InitShellOle * * */ void InitShellOle(void) { } /************************************************************************** * FreeShellOle * * unload OLE32.DLL */ void FreeShellOle(void) { if (!--refClipCount) { pOleUninitialize(); FreeLibrary(hShellOle32); } } /************************************************************************** * LoadShellOle * * make sure OLE32.DLL is loaded */ BOOL GetShellOle(void) { if(!refClipCount) { hShellOle32 = LoadLibraryA("ole32.dll"); if(hShellOle32) { pOleInitialize=(void*)GetProcAddress(hShellOle32,"OleInitialize"); pOleUninitialize=(void*)GetProcAddress(hShellOle32,"OleUninitialize"); pRegisterDragDrop=(void*)GetProcAddress(hShellOle32,"RegisterDragDrop"); pRevokeDragDrop=(void*)GetProcAddress(hShellOle32,"RevokeDragDrop"); pDoDragDrop=(void*)GetProcAddress(hShellOle32,"DoDragDrop"); pReleaseStgMedium=(void*)GetProcAddress(hShellOle32,"ReleaseStgMedium"); pOleSetClipboard=(void*)GetProcAddress(hShellOle32,"OleSetClipboard"); pOleGetClipboard=(void*)GetProcAddress(hShellOle32,"OleGetClipboard"); pOleInitialize(NULL); refClipCount++; } } return TRUE; } /************************************************************************** * RenderHDROP * * creates a CF_HDROP structure */ HGLOBAL RenderHDROP(LPITEMIDLIST pidlRoot, LPITEMIDLIST * apidl, UINT cidl) { int i; int rootsize = 0,size = 0; char szRootPath[MAX_PATH]; char szFileName[MAX_PATH]; HGLOBAL hGlobal; LPDROPFILESTRUCT pDropFiles; int offset; TRACE("(%p,%p,%u)\n", pidlRoot, apidl, cidl); /* get the size needed */ size = sizeof(DROPFILESTRUCT); SHGetPathFromIDListA(pidlRoot, szRootPath); PathAddBackslashA(szRootPath); rootsize = strlen(szRootPath); for (i=0; ilSize = sizeof(DROPFILESTRUCT); pDropFiles->fWideChar = FALSE; offset = pDropFiles->lSize; strcpy(szFileName, szRootPath); for (i=0; icidl = cidl; /* root pidl */ offset = sizeof(CIDA) + sizeof (UINT)*(cidl); pcida->aoffset[0] = offset; /* first element */ sizePidl = ILGetSize (pidlRoot); memcpy(((LPBYTE)pcida)+offset, pidlRoot, sizePidl); offset += sizePidl; for(i=0; iaoffset[i+1] = offset; sizePidl = ILGetSize(apidl[i]); memcpy(((LPBYTE)pcida)+offset, apidl[i], sizePidl); offset += sizePidl; } GlobalUnlock(hGlobal); return hGlobal; } HGLOBAL RenderSHELLIDLISTOFFSET (LPITEMIDLIST pidlRoot, LPITEMIDLIST * apidl, UINT cidl) { FIXME("\n"); return 0; } HGLOBAL RenderFILECONTENTS (LPITEMIDLIST pidlRoot, LPITEMIDLIST * apidl, UINT cidl) { FIXME("\n"); return 0; } HGLOBAL RenderFILEDESCRIPTOR (LPITEMIDLIST pidlRoot, LPITEMIDLIST * apidl, UINT cidl) { FIXME("\n"); return 0; } HGLOBAL RenderFILENAME (LPITEMIDLIST pidlRoot, LPITEMIDLIST * apidl, UINT cidl) { int len, size = 0; char szTemp[MAX_PATH], *szFileName; HGLOBAL hGlobal; TRACE("(%p,%p,%u)\n", pidlRoot, apidl, cidl); /* build name of first file */ SHGetPathFromIDListA(pidlRoot, szTemp); PathAddBackslashA(szTemp); len = strlen(szTemp); _ILSimpleGetText(apidl[0], szTemp+len, MAX_PATH - len); size = strlen(szTemp) + 1; /* fill the structure */ hGlobal = GlobalAlloc(GHND|GMEM_SHARE, size); if(!hGlobal) return hGlobal; szFileName = (char *)GlobalLock(hGlobal); GlobalUnlock(hGlobal); return hGlobal; } HGLOBAL RenderPREFEREDDROPEFFECT (DWORD dwFlags) { DWORD * pdwFlag; HGLOBAL hGlobal; TRACE("(0x%08lx)\n", dwFlags); hGlobal = GlobalAlloc(GHND|GMEM_SHARE, sizeof(DWORD)); if(!hGlobal) return hGlobal; pdwFlag = (DWORD*)GlobalLock(hGlobal); *pdwFlag = dwFlags; GlobalUnlock(hGlobal); return hGlobal; } /************************************************************************** * IsDataInClipboard * * checks if there is something in the clipboard we can use */ BOOL IsDataInClipboard (HWND hwnd) { BOOL ret = FALSE; if (OpenClipboard(hwnd)) { if (GetOpenClipboardWindow()) { ret = IsClipboardFormatAvailable(CF_TEXT); } CloseClipboard(); } return ret; } wine-20000526/dlls/shell32/dataobject.c0100644000175000001440000002601007054033411017114 0ustar julliardusers/* * IEnumFORMATETC, IDataObject * * selecting and droping objects within the shell and/or common dialogs * * Copyright 1998, 1999 */ #include #include "pidl.h" #include "winerror.h" #include "shell32_main.h" #include "debugtools.h" #include "wine/undocshell.h" #include "wine/obj_dataobject.h" DEFAULT_DEBUG_CHANNEL(shell) /*********************************************************************** * IEnumFORMATETC implementation */ typedef struct { /* IUnknown fields */ ICOM_VFIELD(IEnumFORMATETC); DWORD ref; /* IEnumFORMATETC fields */ UINT posFmt; UINT countFmt; LPFORMATETC pFmt; } IEnumFORMATETCImpl; static HRESULT WINAPI IEnumFORMATETC_fnQueryInterface(LPENUMFORMATETC iface, REFIID riid, LPVOID* ppvObj); static ULONG WINAPI IEnumFORMATETC_fnAddRef(LPENUMFORMATETC iface); static ULONG WINAPI IEnumFORMATETC_fnRelease(LPENUMFORMATETC iface); static HRESULT WINAPI IEnumFORMATETC_fnNext(LPENUMFORMATETC iface, ULONG celt, FORMATETC* rgelt, ULONG* pceltFethed); static HRESULT WINAPI IEnumFORMATETC_fnSkip(LPENUMFORMATETC iface, ULONG celt); static HRESULT WINAPI IEnumFORMATETC_fnReset(LPENUMFORMATETC iface); static HRESULT WINAPI IEnumFORMATETC_fnClone(LPENUMFORMATETC iface, LPENUMFORMATETC* ppenum); static struct ICOM_VTABLE(IEnumFORMATETC) efvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IEnumFORMATETC_fnQueryInterface, IEnumFORMATETC_fnAddRef, IEnumFORMATETC_fnRelease, IEnumFORMATETC_fnNext, IEnumFORMATETC_fnSkip, IEnumFORMATETC_fnReset, IEnumFORMATETC_fnClone }; LPENUMFORMATETC IEnumFORMATETC_Constructor(UINT cfmt, const FORMATETC afmt[]) { IEnumFORMATETCImpl* ef; DWORD size=cfmt * sizeof(FORMATETC); ef=(IEnumFORMATETCImpl*)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IEnumFORMATETCImpl)); if(ef) { ef->ref=1; ICOM_VTBL(ef)=&efvt; ef->countFmt = cfmt; ef->pFmt = SHAlloc (size); if (ef->pFmt) { memcpy(ef->pFmt, afmt, size); } shell32_ObjCount++; } TRACE("(%p)->(%u,%p)\n",ef, cfmt, afmt); return (LPENUMFORMATETC)ef; } static HRESULT WINAPI IEnumFORMATETC_fnQueryInterface(LPENUMFORMATETC iface, REFIID riid, LPVOID* ppvObj) { ICOM_THIS(IEnumFORMATETCImpl,iface); TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown)) { *ppvObj = This; } else if(IsEqualIID(riid, &IID_IEnumFORMATETC)) { *ppvObj = (IEnumFORMATETC*)This; } if(*ppvObj) { IUnknown_AddRef((IUnknown*)(*ppvObj)); TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } static ULONG WINAPI IEnumFORMATETC_fnAddRef(LPENUMFORMATETC iface) { ICOM_THIS(IEnumFORMATETCImpl,iface); TRACE("(%p)->(count=%lu)\n",This, This->ref); shell32_ObjCount++; return ++(This->ref); } static ULONG WINAPI IEnumFORMATETC_fnRelease(LPENUMFORMATETC iface) { ICOM_THIS(IEnumFORMATETCImpl,iface); TRACE("(%p)->()\n",This); shell32_ObjCount--; if (!--(This->ref)) { TRACE(" destroying IEnumFORMATETC(%p)\n",This); if (This->pFmt) { SHFree (This->pFmt); } HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } static HRESULT WINAPI IEnumFORMATETC_fnNext(LPENUMFORMATETC iface, ULONG celt, FORMATETC *rgelt, ULONG *pceltFethed) { ICOM_THIS(IEnumFORMATETCImpl,iface); int i; TRACE("(%p)->(%lu,%p)\n", This, celt, rgelt); if(!This->pFmt)return S_FALSE; if(!rgelt) return E_INVALIDARG; if (pceltFethed) *pceltFethed = 0; for(i = 0; This->posFmt < This->countFmt && celt > i; i++) { *rgelt++ = This->pFmt[This->posFmt++]; } if (pceltFethed) *pceltFethed = i; return ((i == celt) ? S_OK : S_FALSE); } static HRESULT WINAPI IEnumFORMATETC_fnSkip(LPENUMFORMATETC iface, ULONG celt) { ICOM_THIS(IEnumFORMATETCImpl,iface); TRACE("(%p)->(num=%lu)\n", This, celt); if((This->posFmt + celt) >= This->countFmt) return S_FALSE; This->posFmt += celt; return S_OK; } static HRESULT WINAPI IEnumFORMATETC_fnReset(LPENUMFORMATETC iface) { ICOM_THIS(IEnumFORMATETCImpl,iface); TRACE("(%p)->()\n", This); This->posFmt = 0; return S_OK; } static HRESULT WINAPI IEnumFORMATETC_fnClone(LPENUMFORMATETC iface, LPENUMFORMATETC* ppenum) { ICOM_THIS(IEnumFORMATETCImpl,iface); TRACE("(%p)->(ppenum=%p)\n", This, ppenum); if (!ppenum) return E_INVALIDARG; *ppenum = IEnumFORMATETC_Constructor(This->countFmt, This->pFmt); return S_OK; } /*********************************************************************** * IDataObject implementation */ /* number of supported formats */ #define MAX_FORMATS 3 typedef struct { /* IUnknown fields */ ICOM_VFIELD(IDataObject); DWORD ref; /* IDataObject fields */ LPITEMIDLIST pidl; LPITEMIDLIST * apidl; UINT cidl; FORMATETC pFormatEtc[MAX_FORMATS]; UINT cfShellIDList; UINT cfFileName; } IDataObjectImpl; static struct ICOM_VTABLE(IDataObject) dtovt; /************************************************************************** * IDataObject_Constructor */ LPDATAOBJECT IDataObject_Constructor(HWND hwndOwner, LPITEMIDLIST pMyPidl, LPITEMIDLIST * apidl, UINT cidl) { IDataObjectImpl* dto; dto = (IDataObjectImpl*)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDataObjectImpl)); if (dto) { dto->ref = 1; ICOM_VTBL(dto) = &dtovt; dto->pidl = ILClone(pMyPidl); dto->apidl = _ILCopyaPidl(apidl, cidl); dto->cidl = cidl; dto->cfShellIDList = RegisterClipboardFormatA(CFSTR_SHELLIDLIST); dto->cfFileName = RegisterClipboardFormatA(CFSTR_FILENAMEA); InitFormatEtc(dto->pFormatEtc[0], dto->cfShellIDList, TYMED_HGLOBAL); InitFormatEtc(dto->pFormatEtc[1], CF_HDROP, TYMED_HGLOBAL); InitFormatEtc(dto->pFormatEtc[2], dto->cfFileName, TYMED_HGLOBAL); shell32_ObjCount++; } TRACE("(%p)->(apidl=%p cidl=%u)\n",dto, apidl, cidl); return (LPDATAOBJECT)dto; } /*************************************************************************** * IDataObject_QueryInterface */ static HRESULT WINAPI IDataObject_fnQueryInterface(LPDATAOBJECT iface, REFIID riid, LPVOID * ppvObj) { ICOM_THIS(IDataObjectImpl,iface); TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown)) /*IUnknown*/ { *ppvObj = This; } else if(IsEqualIID(riid, &IID_IDataObject)) /*IDataObject*/ { *ppvObj = (IDataObject*)This; } if(*ppvObj) { IUnknown_AddRef((IUnknown*)*ppvObj); TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } /************************************************************************** * IDataObject_AddRef */ static ULONG WINAPI IDataObject_fnAddRef(LPDATAOBJECT iface) { ICOM_THIS(IDataObjectImpl,iface); TRACE("(%p)->(count=%lu)\n",This, This->ref); shell32_ObjCount++; return ++(This->ref); } /************************************************************************** * IDataObject_Release */ static ULONG WINAPI IDataObject_fnRelease(LPDATAOBJECT iface) { ICOM_THIS(IDataObjectImpl,iface); TRACE("(%p)->()\n",This); shell32_ObjCount--; if (!--(This->ref)) { TRACE(" destroying IDataObject(%p)\n",This); _ILFreeaPidl(This->apidl, This->cidl); HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } /************************************************************************** * IDataObject_fnGetData */ static HRESULT WINAPI IDataObject_fnGetData(LPDATAOBJECT iface, LPFORMATETC pformatetcIn, STGMEDIUM *pmedium) { ICOM_THIS(IDataObjectImpl,iface); char szTemp[256]; szTemp[0]=0; GetClipboardFormatNameA (pformatetcIn->cfFormat, szTemp, 256); TRACE("(%p)->(%p %p format=%s)\n", This, pformatetcIn, pmedium, szTemp); if (pformatetcIn->cfFormat == This->cfShellIDList) { if (This->cidl < 1) return(E_UNEXPECTED); pmedium->u.hGlobal = RenderSHELLIDLIST(This->pidl, This->apidl, This->cidl); } else if (pformatetcIn->cfFormat == CF_HDROP) { if (This->cidl < 1) return(E_UNEXPECTED); pmedium->u.hGlobal = RenderHDROP(This->pidl, This->apidl, This->cidl); } else if (pformatetcIn->cfFormat == This->cfFileName) { if (This->cidl < 1) return(E_UNEXPECTED); pmedium->u.hGlobal = RenderFILENAME(This->pidl, This->apidl, This->cidl); } else { FIXME("-- expected clipformat not implemented\n"); return (E_INVALIDARG); } if (pmedium->u.hGlobal) { pmedium->tymed = TYMED_HGLOBAL; pmedium->pUnkForRelease = NULL; return S_OK; } return E_OUTOFMEMORY; } static HRESULT WINAPI IDataObject_fnGetDataHere(LPDATAOBJECT iface, LPFORMATETC pformatetc, STGMEDIUM *pmedium) { ICOM_THIS(IDataObjectImpl,iface); FIXME("(%p)->()\n", This); return E_NOTIMPL; } static HRESULT WINAPI IDataObject_fnQueryGetData(LPDATAOBJECT iface, LPFORMATETC pformatetc) { ICOM_THIS(IDataObjectImpl,iface); UINT i; TRACE("(%p)->(fmt=0x%08x tym=0x%08lx)\n", This, pformatetc->cfFormat, pformatetc->tymed); if(!(DVASPECT_CONTENT & pformatetc->dwAspect)) return DV_E_DVASPECT; /* check our formats table what we have */ for (i=0; ipFormatEtc[i].cfFormat == pformatetc->cfFormat) && (This->pFormatEtc[i].tymed == pformatetc->tymed)) { return S_OK; } } return DV_E_TYMED; } static HRESULT WINAPI IDataObject_fnGetCanonicalFormatEtc(LPDATAOBJECT iface, LPFORMATETC pformatectIn, LPFORMATETC pformatetcOut) { ICOM_THIS(IDataObjectImpl,iface); FIXME("(%p)->()\n", This); return E_NOTIMPL; } static HRESULT WINAPI IDataObject_fnSetData(LPDATAOBJECT iface, LPFORMATETC pformatetc, STGMEDIUM *pmedium, BOOL fRelease) { ICOM_THIS(IDataObjectImpl,iface); FIXME("(%p)->()\n", This); return E_NOTIMPL; } static HRESULT WINAPI IDataObject_fnEnumFormatEtc(LPDATAOBJECT iface, DWORD dwDirection, IEnumFORMATETC **ppenumFormatEtc) { ICOM_THIS(IDataObjectImpl,iface); TRACE("(%p)->()\n", This); *ppenumFormatEtc=NULL; /* only get data */ if (DATADIR_GET == dwDirection) { *ppenumFormatEtc = IEnumFORMATETC_Constructor(MAX_FORMATS, This->pFormatEtc); return (*ppenumFormatEtc) ? S_OK : E_FAIL; } return E_NOTIMPL; } static HRESULT WINAPI IDataObject_fnDAdvise(LPDATAOBJECT iface, FORMATETC *pformatetc, DWORD advf, IAdviseSink *pAdvSink, DWORD *pdwConnection) { ICOM_THIS(IDataObjectImpl,iface); FIXME("(%p)->()\n", This); return E_NOTIMPL; } static HRESULT WINAPI IDataObject_fnDUnadvise(LPDATAOBJECT iface, DWORD dwConnection) { ICOM_THIS(IDataObjectImpl,iface); FIXME("(%p)->()\n", This); return E_NOTIMPL; } static HRESULT WINAPI IDataObject_fnEnumDAdvise(LPDATAOBJECT iface, IEnumSTATDATA **ppenumAdvise) { ICOM_THIS(IDataObjectImpl,iface); FIXME("(%p)->()\n", This); return E_NOTIMPL; } static struct ICOM_VTABLE(IDataObject) dtovt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDataObject_fnQueryInterface, IDataObject_fnAddRef, IDataObject_fnRelease, IDataObject_fnGetData, IDataObject_fnGetDataHere, IDataObject_fnQueryGetData, IDataObject_fnGetCanonicalFormatEtc, IDataObject_fnSetData, IDataObject_fnEnumFormatEtc, IDataObject_fnDAdvise, IDataObject_fnDUnadvise, IDataObject_fnEnumDAdvise }; wine-20000526/dlls/shell32/dialogs.c0100644000175000001440000000261207102371335016444 0ustar julliardusers/* * common shell dialogs */ #include #include #include "winerror.h" #include "debugtools.h" #include "shellapi.h" #include "shlobj.h" #include "shell32_main.h" #include "wine/undocshell.h" DEFAULT_DEBUG_CHANNEL(shell); /************************************************************************* * PickIconDlg [SHELL32.62] * */ BOOL WINAPI PickIconDlg( HWND hwndOwner, LPSTR lpstrFile, DWORD nMaxFile, LPDWORD lpdwIconIndex) { FIXME("(%08x,%s,%08lx,%p):stub.\n", hwndOwner, lpstrFile, nMaxFile,lpdwIconIndex); return 0xffffffff; } /************************************************************************* * RunFileDlg [SHELL32.61] * * NOTES * Original name: RunFileDlg (exported by ordinal) */ void WINAPI RunFileDlg( HWND hwndOwner, HICON hIcon, LPCSTR lpstrDirectory, LPCSTR lpstrTitle, LPCSTR lpstrDescription, UINT uFlags) { FIXME("(0x%04x 0x%04x %s %s %s 0x%08x):stub.\n", hwndOwner, hIcon, lpstrDirectory, lpstrTitle, lpstrDescription, uFlags); } /************************************************************************* * ExitWindowsDialog [SHELL32.60] * * NOTES * exported by ordinal */ void WINAPI ExitWindowsDialog (HWND hWndOwner) { TRACE("(0x%08x)\n", hWndOwner); if (MessageBoxA( hWndOwner, "Do you want to exit WINE?", "Shutdown", MB_YESNO|MB_ICONQUESTION) == IDOK) { SendMessageA ( hWndOwner, WM_QUIT, 0, 0); } } wine-20000526/dlls/shell32/enumidlist.c0100644000175000001440000002561507040772636017221 0ustar julliardusers/* * IEnumIDList * * Copyright 1998 Juergen Schmied */ #include #include #include "debugtools.h" #include "winreg.h" #include "wine/obj_base.h" #include "wine/obj_enumidlist.h" #include "wine/undocshell.h" #include "winerror.h" #include "pidl.h" #include "shlguid.h" #include "shell32_main.h" DEFAULT_DEBUG_CHANNEL(shell) typedef struct tagENUMLIST { struct tagENUMLIST *pNext; LPITEMIDLIST pidl; } ENUMLIST, *LPENUMLIST; typedef struct { ICOM_VFIELD(IEnumIDList); DWORD ref; LPENUMLIST mpFirst; LPENUMLIST mpLast; LPENUMLIST mpCurrent; } IEnumIDListImpl; static struct ICOM_VTABLE(IEnumIDList) eidlvt; /************************************************************************** * AddToEnumList() */ static BOOL AddToEnumList( IEnumIDList * iface, LPITEMIDLIST pidl) { ICOM_THIS(IEnumIDListImpl,iface); LPENUMLIST pNew; TRACE("(%p)->(pidl=%p)\n",This,pidl); pNew = (LPENUMLIST)SHAlloc(sizeof(ENUMLIST)); if(pNew) { /*set the next pointer */ pNew->pNext = NULL; pNew->pidl = pidl; /*is This the first item in the list? */ if(!This->mpFirst) { This->mpFirst = pNew; This->mpCurrent = pNew; } if(This->mpLast) { /*add the new item to the end of the list */ This->mpLast->pNext = pNew; } /*update the last item pointer */ This->mpLast = pNew; TRACE("-- (%p)->(first=%p, last=%p)\n",This,This->mpFirst,This->mpLast); return TRUE; } return FALSE; } /************************************************************************** * CreateFolderEnumList() */ static BOOL CreateFolderEnumList( IEnumIDList * iface, LPCSTR lpszPath, DWORD dwFlags) { ICOM_THIS(IEnumIDListImpl,iface); LPITEMIDLIST pidl=NULL; WIN32_FIND_DATAA stffile; HANDLE hFile; CHAR szPath[MAX_PATH]; TRACE("(%p)->(path=%s flags=0x%08lx) \n",This,debugstr_a(lpszPath),dwFlags); if(!lpszPath || !lpszPath[0]) return FALSE; strcpy(szPath, lpszPath); PathAddBackslashA(szPath); strcat(szPath,"*.*"); /*enumerate the folders*/ if(dwFlags & SHCONTF_FOLDERS) { TRACE("-- (%p)-> enumerate SHCONTF_FOLDERS of %s\n",This,debugstr_a(szPath)); hFile = FindFirstFileA(szPath,&stffile); if ( hFile != INVALID_HANDLE_VALUE ) { do { if ( (stffile.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) && strcmp (stffile.cFileName, ".") && strcmp (stffile.cFileName, "..")) { pidl = _ILCreateFolder (&stffile); if(pidl && AddToEnumList((IEnumIDList*)This, pidl)) { continue; } return FALSE; } } while( FindNextFileA(hFile,&stffile)); FindClose (hFile); } } /*enumerate the non-folder items (values) */ if(dwFlags & SHCONTF_NONFOLDERS) { TRACE("-- (%p)-> enumerate SHCONTF_NONFOLDERS of %s\n",This,debugstr_a(szPath)); hFile = FindFirstFileA(szPath,&stffile); if ( hFile != INVALID_HANDLE_VALUE ) { do { if (! (stffile.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) ) { pidl = _ILCreateValue(&stffile); if(pidl && AddToEnumList((IEnumIDList*)This, pidl)) { continue; } return FALSE; } } while( FindNextFileA(hFile,&stffile)); FindClose (hFile); } } return TRUE; } /************************************************************************** * CreateDesktopEnumList() */ static BOOL CreateDesktopEnumList( IEnumIDList * iface, DWORD dwFlags) { ICOM_THIS(IEnumIDListImpl,iface); LPITEMIDLIST pidl=NULL; HKEY hkey; char szPath[MAX_PATH]; TRACE("(%p)->(flags=0x%08lx) \n",This,dwFlags); /*enumerate the root folders */ if(dwFlags & SHCONTF_FOLDERS) { /*create the pidl for This item */ pidl = _ILCreateMyComputer(); if(pidl) { if(!AddToEnumList((IEnumIDList*)This, pidl)) return FALSE; } if (! RegOpenKeyExA(HKEY_LOCAL_MACHINE, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\explorer\\desktop\\NameSpace", 0, KEY_READ, &hkey)) { char iid[50]; int i=0; while (1) { DWORD size = sizeof (iid); if (ERROR_SUCCESS!=RegEnumKeyExA(hkey, i, iid, &size, 0, NULL, NULL, NULL)) break; pidl = _ILCreateSpecial(iid); if(pidl) AddToEnumList((IEnumIDList*)This, pidl); i++; } RegCloseKey(hkey); } } /*enumerate the elements in %windir%\desktop */ SHGetSpecialFolderPathA(0, szPath, CSIDL_DESKTOPDIRECTORY, FALSE); CreateFolderEnumList( (IEnumIDList*)This, szPath, dwFlags); return TRUE; } /************************************************************************** * CreateMyCompEnumList() */ static BOOL CreateMyCompEnumList( IEnumIDList * iface, DWORD dwFlags) { ICOM_THIS(IEnumIDListImpl,iface); LPITEMIDLIST pidl=NULL; DWORD dwDrivemap; CHAR szDriveName[4]; HKEY hkey; TRACE("(%p)->(flags=0x%08lx) \n",This,dwFlags); /*enumerate the folders*/ if(dwFlags & SHCONTF_FOLDERS) { dwDrivemap = GetLogicalDrives(); strcpy (szDriveName,"A:\\"); while (szDriveName[0]<='Z') { if(dwDrivemap & 0x00000001L) { pidl = _ILCreateDrive(szDriveName); if(pidl) { if(!AddToEnumList((IEnumIDList*)This, pidl)) return FALSE; } } szDriveName[0]++; dwDrivemap = dwDrivemap >> 1; } TRACE("-- (%p)-> enumerate (mycomputer shell extensions)\n",This); if (! RegOpenKeyExA(HKEY_LOCAL_MACHINE, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\explorer\\mycomputer\\NameSpace", 0, KEY_READ, &hkey)) { char iid[50]; int i=0; while (1) { DWORD size = sizeof (iid); if (ERROR_SUCCESS!=RegEnumKeyExA(hkey, i, iid, &size, 0, NULL, NULL, NULL)) break; pidl = _ILCreateSpecial(iid); if(pidl) AddToEnumList((IEnumIDList*)This, pidl); i++; } RegCloseKey(hkey); } } return TRUE; } /************************************************************************** * DeleteList() */ static BOOL DeleteList( IEnumIDList * iface) { ICOM_THIS(IEnumIDListImpl,iface); LPENUMLIST pDelete; TRACE("(%p)->()\n",This); while(This->mpFirst) { pDelete = This->mpFirst; This->mpFirst = pDelete->pNext; SHFree(pDelete->pidl); SHFree(pDelete); } This->mpFirst = This->mpLast = This->mpCurrent = NULL; return TRUE; } /************************************************************************** * IEnumIDList_Folder_Constructor * */ IEnumIDList * IEnumIDList_Constructor( LPCSTR lpszPath, DWORD dwFlags, DWORD dwKind) { IEnumIDListImpl* lpeidl; BOOL ret = FALSE; lpeidl = (IEnumIDListImpl*)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IEnumIDListImpl)); TRACE("(%p)->(%s flags=0x%08lx kind=0x%08lx)\n",lpeidl,debugstr_a(lpszPath),dwFlags, dwKind); if (lpeidl) { lpeidl->ref = 1; ICOM_VTBL(lpeidl) = &eidlvt; switch (dwKind) { case EIDL_DESK: ret = CreateDesktopEnumList((IEnumIDList*)lpeidl, dwFlags); break; case EIDL_MYCOMP: ret = CreateMyCompEnumList((IEnumIDList*)lpeidl, dwFlags); break; case EIDL_FILE: ret = CreateFolderEnumList((IEnumIDList*)lpeidl, lpszPath, dwFlags); break; } if(ret) { shell32_ObjCount++; } else { if (lpeidl) { HeapFree(GetProcessHeap(),0,lpeidl); } } } TRACE("-- (%p)->()\n",lpeidl); return (IEnumIDList*)lpeidl; } /************************************************************************** * EnumIDList_QueryInterface */ static HRESULT WINAPI IEnumIDList_fnQueryInterface( IEnumIDList * iface, REFIID riid, LPVOID *ppvObj) { ICOM_THIS(IEnumIDListImpl,iface); TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown)) /*IUnknown*/ { *ppvObj = This; } else if(IsEqualIID(riid, &IID_IEnumIDList)) /*IEnumIDList*/ { *ppvObj = (IEnumIDList*)This; } if(*ppvObj) { IEnumIDList_AddRef((IEnumIDList*)*ppvObj); TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } /****************************************************************************** * IEnumIDList_fnAddRef */ static ULONG WINAPI IEnumIDList_fnAddRef( IEnumIDList * iface) { ICOM_THIS(IEnumIDListImpl,iface); TRACE("(%p)->(%lu)\n",This,This->ref); shell32_ObjCount++; return ++(This->ref); } /****************************************************************************** * IEnumIDList_fnRelease */ static ULONG WINAPI IEnumIDList_fnRelease( IEnumIDList * iface) { ICOM_THIS(IEnumIDListImpl,iface); TRACE("(%p)->(%lu)\n",This,This->ref); shell32_ObjCount--; if (!--(This->ref)) { TRACE(" destroying IEnumIDList(%p)\n",This); DeleteList((IEnumIDList*)This); HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } /************************************************************************** * IEnumIDList_fnNext */ static HRESULT WINAPI IEnumIDList_fnNext( IEnumIDList * iface, ULONG celt, LPITEMIDLIST * rgelt, ULONG *pceltFetched) { ICOM_THIS(IEnumIDListImpl,iface); ULONG i; HRESULT hr = S_OK; LPITEMIDLIST temp; TRACE("(%p)->(%ld,%p, %p)\n",This,celt,rgelt,pceltFetched); /* It is valid to leave pceltFetched NULL when celt is 1. Some of explorer's * subsystems actually use it (and so may a third party browser) */ if(pceltFetched) *pceltFetched = 0; *rgelt=0; if(celt > 1 && !pceltFetched) { return E_INVALIDARG; } for(i = 0; i < celt; i++) { if(!(This->mpCurrent)) { hr = S_FALSE; break; } temp = ILClone(This->mpCurrent->pidl); rgelt[i] = temp; This->mpCurrent = This->mpCurrent->pNext; } if(pceltFetched) { *pceltFetched = i; } return hr; } /************************************************************************** * IEnumIDList_fnSkip */ static HRESULT WINAPI IEnumIDList_fnSkip( IEnumIDList * iface,ULONG celt) { ICOM_THIS(IEnumIDListImpl,iface); DWORD dwIndex; HRESULT hr = S_OK; TRACE("(%p)->(%lu)\n",This,celt); for(dwIndex = 0; dwIndex < celt; dwIndex++) { if(!This->mpCurrent) { hr = S_FALSE; break; } This->mpCurrent = This->mpCurrent->pNext; } return hr; } /************************************************************************** * IEnumIDList_fnReset */ static HRESULT WINAPI IEnumIDList_fnReset( IEnumIDList * iface) { ICOM_THIS(IEnumIDListImpl,iface); TRACE("(%p)\n",This); This->mpCurrent = This->mpFirst; return S_OK; } /************************************************************************** * IEnumIDList_fnClone */ static HRESULT WINAPI IEnumIDList_fnClone( IEnumIDList * iface,LPENUMIDLIST * ppenum) { ICOM_THIS(IEnumIDListImpl,iface); TRACE("(%p)->() to (%p)->() E_NOTIMPL\n",This,ppenum); return E_NOTIMPL; } /************************************************************************** * IEnumIDList_fnVTable */ static ICOM_VTABLE (IEnumIDList) eidlvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IEnumIDList_fnQueryInterface, IEnumIDList_fnAddRef, IEnumIDList_fnRelease, IEnumIDList_fnNext, IEnumIDList_fnSkip, IEnumIDList_fnReset, IEnumIDList_fnClone, }; wine-20000526/dlls/shell32/folders.c0100644000175000001440000002007707056017673016477 0ustar julliardusers/* * Copyright 1997 Marcus Meissner * Copyright 1998 Juergen Schmied * */ #include #include #include "wine/obj_base.h" #include "wine/obj_extracticon.h" #include "wine/undocshell.h" #include "debugtools.h" #include "winerror.h" #include "pidl.h" #include "shell32_main.h" DEFAULT_DEBUG_CHANNEL(shell) /*********************************************************************** * IExtractIconA implementation */ typedef struct { ICOM_VFIELD(IExtractIconA); DWORD ref; ICOM_VTABLE(IPersistFile)* lpvtblPersistFile; LPITEMIDLIST pidl; } IExtractIconAImpl; static struct ICOM_VTABLE(IExtractIconA) eivt; static struct ICOM_VTABLE(IPersistFile) pfvt; #define _IPersistFile_Offset ((int)(&(((IExtractIconAImpl*)0)->lpvtblPersistFile))) #define _ICOM_THIS_From_IPersistFile(class, name) class* This = (class*)(((char*)name)-_IPersistFile_Offset); /************************************************************************** * IExtractIconA_Constructor */ IExtractIconA* IExtractIconA_Constructor(LPCITEMIDLIST pidl) { IExtractIconAImpl* ei; ei=(IExtractIconAImpl*)HeapAlloc(GetProcessHeap(),0,sizeof(IExtractIconAImpl)); ei->ref=1; ICOM_VTBL(ei) = &eivt; ei->lpvtblPersistFile = &pfvt; ei->pidl=ILClone(pidl); pdump(pidl); TRACE("(%p)\n",ei); shell32_ObjCount++; return (IExtractIconA *)ei; } /************************************************************************** * IExtractIconA_QueryInterface */ static HRESULT WINAPI IExtractIconA_fnQueryInterface( IExtractIconA * iface, REFIID riid, LPVOID *ppvObj) { ICOM_THIS(IExtractIconAImpl,iface); TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown)) /*IUnknown*/ { *ppvObj = This; } else if(IsEqualIID(riid, &IID_IPersistFile)) /*IExtractIcon*/ { *ppvObj = (IPersistFile*)&(This->lpvtblPersistFile); } else if(IsEqualIID(riid, &IID_IExtractIconA)) /*IExtractIcon*/ { *ppvObj = (IExtractIconA*)This; } if(*ppvObj) { IExtractIconA_AddRef((IExtractIconA*) *ppvObj); TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } /************************************************************************** * IExtractIconA_AddRef */ static ULONG WINAPI IExtractIconA_fnAddRef(IExtractIconA * iface) { ICOM_THIS(IExtractIconAImpl,iface); TRACE("(%p)->(count=%lu)\n",This, This->ref ); shell32_ObjCount++; return ++(This->ref); } /************************************************************************** * IExtractIconA_Release */ static ULONG WINAPI IExtractIconA_fnRelease(IExtractIconA * iface) { ICOM_THIS(IExtractIconAImpl,iface); TRACE("(%p)->()\n",This); shell32_ObjCount--; if (!--(This->ref)) { TRACE(" destroying IExtractIcon(%p)\n",This); SHFree(This->pidl); HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } /************************************************************************** * IExtractIconA_GetIconLocation * * mapping filetype to icon */ static HRESULT WINAPI IExtractIconA_fnGetIconLocation( IExtractIconA * iface, UINT uFlags, LPSTR szIconFile, UINT cchMax, int * piIndex, UINT * pwFlags) { ICOM_THIS(IExtractIconAImpl,iface); char sTemp[MAX_PATH]; DWORD dwNr; GUID const * riid; LPITEMIDLIST pSimplePidl = ILFindLastID(This->pidl); TRACE("(%p) (flags=%u %p %u %p %p)\n", This, uFlags, szIconFile, cchMax, piIndex, pwFlags); if (pwFlags) *pwFlags = 0; if (_ILIsDesktop(pSimplePidl)) { lstrcpynA(szIconFile, "shell32.dll", cchMax); *piIndex = 34; } /* my computer and other shell extensions */ else if ( (riid = _ILGetGUIDPointer(pSimplePidl)) ) { char xriid[50]; strcpy(xriid,"CLSID\\"); WINE_StringFromCLSID((LPCLSID)riid,&xriid[strlen(xriid)]); if (HCR_GetDefaultIcon(xriid, sTemp, MAX_PATH, &dwNr)) { lstrcpynA(szIconFile, sTemp, cchMax); *piIndex = dwNr; } else { lstrcpynA(szIconFile, "shell32.dll", cchMax); *piIndex = 15; } } else if (_ILIsDrive (pSimplePidl)) { if (HCR_GetDefaultIcon("Drive", sTemp, MAX_PATH, &dwNr)) { lstrcpynA(szIconFile, sTemp, cchMax); *piIndex = dwNr; } else { lstrcpynA(szIconFile, "shell32.dll", cchMax); *piIndex = 8; } } else if (_ILIsFolder (pSimplePidl)) { if (HCR_GetDefaultIcon("Folder", sTemp, MAX_PATH, &dwNr)) { lstrcpynA(szIconFile, sTemp, cchMax); *piIndex = dwNr; } else { lstrcpynA(szIconFile, "shell32.dll", cchMax); *piIndex = (uFlags & GIL_OPENICON)? 4 : 3; } } else /* object is file */ { if (_ILGetExtension (pSimplePidl, sTemp, MAX_PATH) && HCR_MapTypeToValue(sTemp, sTemp, MAX_PATH, TRUE) && HCR_GetDefaultIcon(sTemp, sTemp, MAX_PATH, &dwNr)) { if (!strcmp("%1",sTemp)) /* icon is in the file */ { SHGetPathFromIDListA(This->pidl, sTemp); dwNr = 0; } lstrcpynA(szIconFile, sTemp, cchMax); *piIndex = dwNr; } else /* default icon */ { lstrcpynA(szIconFile, "shell32.dll", cchMax); *piIndex = 0; } } TRACE("-- %s %x\n", szIconFile, *piIndex); return NOERROR; } /************************************************************************** * IExtractIconA_Extract */ static HRESULT WINAPI IExtractIconA_fnExtract(IExtractIconA * iface, LPCSTR pszFile, UINT nIconIndex, HICON *phiconLarge, HICON *phiconSmall, UINT nIconSize) { ICOM_THIS(IExtractIconAImpl,iface); FIXME("(%p) (file=%p index=%u %p %p size=%u) semi-stub\n", This, pszFile, nIconIndex, phiconLarge, phiconSmall, nIconSize); if (phiconLarge) *phiconLarge = pImageList_GetIcon(ShellBigIconList, nIconIndex, ILD_TRANSPARENT); if (phiconSmall) *phiconSmall = pImageList_GetIcon(ShellSmallIconList, nIconIndex, ILD_TRANSPARENT); return S_OK; } static struct ICOM_VTABLE(IExtractIconA) eivt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IExtractIconA_fnQueryInterface, IExtractIconA_fnAddRef, IExtractIconA_fnRelease, IExtractIconA_fnGetIconLocation, IExtractIconA_fnExtract }; /************************************************************************ * IEIPersistFile_QueryInterface (IUnknown) */ static HRESULT WINAPI IEIPersistFile_fnQueryInterface( IPersistFile *iface, REFIID iid, LPVOID *ppvObj) { _ICOM_THIS_From_IPersistFile(IExtractIconA, iface); return IShellFolder_QueryInterface((IExtractIconA*)This, iid, ppvObj); } /************************************************************************ * IEIPersistFile_AddRef (IUnknown) */ static ULONG WINAPI IEIPersistFile_fnAddRef( IPersistFile *iface) { _ICOM_THIS_From_IPersistFile(IExtractIconA, iface); return IExtractIconA_AddRef((IExtractIconA*)This); } /************************************************************************ * IEIPersistFile_Release (IUnknown) */ static ULONG WINAPI IEIPersistFile_fnRelease( IPersistFile *iface) { _ICOM_THIS_From_IPersistFile(IExtractIconA, iface); return IExtractIconA_Release((IExtractIconA*)This); } /************************************************************************ * IEIPersistFile_GetClassID (IPersist) */ static HRESULT WINAPI IEIPersistFile_fnGetClassID( IPersistFile *iface, LPCLSID lpClassId) { CLSID StdFolderID = { 0x00000000, 0x0000, 0x0000, {0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00} }; if (lpClassId==NULL) return E_POINTER; memcpy(lpClassId, &StdFolderID, sizeof(StdFolderID)); return S_OK; } /************************************************************************ * IEIPersistFile_Load (IPersistFile) */ static HRESULT WINAPI IEIPersistFile_fnLoad(IPersistFile* iface, LPCOLESTR pszFileName, DWORD dwMode) { _ICOM_THIS_From_IPersistFile(IExtractIconA, iface); FIXME("%p\n", This); return E_NOTIMPL; } static struct ICOM_VTABLE(IPersistFile) pfvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IEIPersistFile_fnQueryInterface, IEIPersistFile_fnAddRef, IEIPersistFile_fnRelease, IEIPersistFile_fnGetClassID, (void *) 0xdeadbeef /* IEIPersistFile_fnIsDirty */, IEIPersistFile_fnLoad, (void *) 0xdeadbeef /* IEIPersistFile_fnSave */, (void *) 0xdeadbeef /* IEIPersistFile_fnSaveCompleted */, (void *) 0xdeadbeef /* IEIPersistFile_fnGetCurFile */ }; wine-20000526/dlls/shell32/iconcache.c0100644000175000001440000006445207102371007016744 0ustar julliardusers/* * shell icon cache (SIC) * */ #include #include #include #include "winbase.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "wine/winuser16.h" #include "wine/winbase16.h" #include "neexe.h" #include "cursoricon.h" #include "module.h" #include "heap.h" #include "debugtools.h" #include "winversion.h" #include "shellapi.h" #include "pidl.h" #include "shell32_main.h" #include "wine/undocshell.h" #include "shlwapi.h" DEFAULT_DEBUG_CHANNEL(shell) #include "pshpack1.h" typedef struct { BYTE bWidth; /* Width, in pixels, of the image */ BYTE bHeight; /* Height, in pixels, of the image */ BYTE bColorCount; /* Number of colors in image (0 if >=8bpp) */ BYTE bReserved; /* Reserved ( must be 0) */ WORD wPlanes; /* Color Planes */ WORD wBitCount; /* Bits per pixel */ DWORD dwBytesInRes; /* How many bytes in this resource? */ DWORD dwImageOffset; /* Where in the file is this image? */ } icoICONDIRENTRY, *LPicoICONDIRENTRY; typedef struct { WORD idReserved; /* Reserved (must be 0) */ WORD idType; /* Resource Type (RES_ICON or RES_CURSOR) */ WORD idCount; /* How many images */ icoICONDIRENTRY idEntries[1]; /* An entry for each image (idCount of 'em) */ } icoICONDIR, *LPicoICONDIR; #include "poppack.h" #if 0 static void dumpIcoDirEnty ( LPicoICONDIRENTRY entry ) { TRACE("width = 0x%08x height = 0x%08x\n", entry->bWidth, entry->bHeight); TRACE("colors = 0x%08x planes = 0x%08x\n", entry->bColorCount, entry->wPlanes); TRACE("bitcount = 0x%08x bytesinres = 0x%08lx offset = 0x%08lx\n", entry->wBitCount, entry->dwBytesInRes, entry->dwImageOffset); } static void dumpIcoDir ( LPicoICONDIR entry ) { TRACE("type = 0x%08x count = 0x%08x\n", entry->idType, entry->idCount); } #endif /************************************************************************* * SHELL_GetResourceTable */ static DWORD SHELL_GetResourceTable(HFILE hFile, LPBYTE *retptr) { IMAGE_DOS_HEADER mz_header; char magic[4]; int size; TRACE("0x%08x %p\n", hFile, retptr); *retptr = NULL; _llseek( hFile, 0, SEEK_SET ); if ((_lread(hFile,&mz_header,sizeof(mz_header)) != sizeof(mz_header)) || (mz_header.e_magic != IMAGE_DOS_SIGNATURE)) { if (mz_header.e_cblp == 1) /* .ICO file ? */ { *retptr = (LPBYTE)-1; /* ICONHEADER.idType, must be 1 */ return 1; } else return 0; /* failed */ } _llseek( hFile, mz_header.e_lfanew, SEEK_SET ); if (_lread( hFile, magic, sizeof(magic) ) != sizeof(magic)) return 0; _llseek( hFile, mz_header.e_lfanew, SEEK_SET); if (*(DWORD*)magic == IMAGE_NT_SIGNATURE) return IMAGE_NT_SIGNATURE; if (*(WORD*)magic == IMAGE_OS2_SIGNATURE) { IMAGE_OS2_HEADER ne_header; LPBYTE pTypeInfo = (LPBYTE)-1; if (_lread(hFile,&ne_header,sizeof(ne_header))!=sizeof(ne_header)) return 0; if (ne_header.ne_magic != IMAGE_OS2_SIGNATURE) return 0; size = ne_header.ne_restab - ne_header.ne_rsrctab; if( size > sizeof(NE_TYPEINFO) ) { pTypeInfo = (BYTE*)HeapAlloc( GetProcessHeap(), 0, size); if( pTypeInfo ) { _llseek(hFile, mz_header.e_lfanew+ne_header.ne_rsrctab, SEEK_SET); if( _lread( hFile, (char*)pTypeInfo, size) != size ) { HeapFree( GetProcessHeap(), 0, pTypeInfo); pTypeInfo = NULL; } } } *retptr = pTypeInfo; return IMAGE_OS2_SIGNATURE; } return 0; /* failed */ } /************************************************************************* * SHELL_LoadResource */ static BYTE * SHELL_LoadResource( HFILE hFile, NE_NAMEINFO* pNInfo, WORD sizeShift, ULONG *uSize) { BYTE* ptr; TRACE("0x%08x %p 0x%08x\n", hFile, pNInfo, sizeShift); *uSize = (DWORD)pNInfo->length << sizeShift; if( (ptr = (BYTE*)HeapAlloc(GetProcessHeap(),0, *uSize) )) { _llseek( hFile, (DWORD)pNInfo->offset << sizeShift, SEEK_SET); _lread( hFile, (char*)ptr, pNInfo->length << sizeShift); return ptr; } return 0; } /************************************************************************* * ICO_LoadIcon */ static BYTE * ICO_LoadIcon( HFILE hFile, LPicoICONDIRENTRY lpiIDE, ULONG *uSize) { BYTE* ptr; TRACE("0x%08x %p\n", hFile, lpiIDE); *uSize = lpiIDE->dwBytesInRes; if( (ptr = (BYTE*)HeapAlloc(GetProcessHeap(),0, *uSize)) ) { _llseek( hFile, lpiIDE->dwImageOffset, SEEK_SET); _lread( hFile, (char*)ptr, lpiIDE->dwBytesInRes); return ptr; } return 0; } /************************************************************************* * ICO_GetIconDirectory * * Reads .ico file and build phony ICONDIR struct * see http://www.microsoft.com/win32dev/ui/icons.htm */ #define HEADER_SIZE (sizeof(CURSORICONDIR) - sizeof (CURSORICONDIRENTRY)) #define HEADER_SIZE_FILE (sizeof(icoICONDIR) - sizeof (icoICONDIRENTRY)) static BYTE * ICO_GetIconDirectory( HFILE hFile, LPicoICONDIR* lplpiID, ULONG *uSize ) { CURSORICONDIR lpcid; /* icon resource in resource-dir format */ LPicoICONDIR lpiID; /* icon resource in file format */ int i; TRACE("0x%08x %p\n", hFile, lplpiID); _llseek( hFile, 0, SEEK_SET ); if( _lread(hFile,(char*)&lpcid, HEADER_SIZE_FILE) != HEADER_SIZE_FILE ) return 0; if( lpcid.idReserved || (lpcid.idType != 1) || (!lpcid.idCount) ) return 0; i = lpcid.idCount * sizeof(icoICONDIRENTRY); lpiID = (LPicoICONDIR)HeapAlloc( GetProcessHeap(), 0, HEADER_SIZE_FILE + i); if( _lread(hFile,(char*)lpiID->idEntries,i) == i ) { CURSORICONDIR * lpID; /* icon resource in resource format */ *uSize = lpcid.idCount * sizeof(CURSORICONDIRENTRY) + HEADER_SIZE; if( (lpID = (CURSORICONDIR*)HeapAlloc(GetProcessHeap(),0, *uSize) )) { /* copy the header */ lpID->idReserved = lpiID->idReserved = 0; lpID->idType = lpiID->idType = 1; lpID->idCount = lpiID->idCount = lpcid.idCount; /* copy the entrys */ for( i=0; i < lpiID->idCount; i++ ) { memcpy((void*)&(lpID->idEntries[i]),(void*)&(lpiID->idEntries[i]), sizeof(CURSORICONDIRENTRY) - 2); lpID->idEntries[i].wResId = i; } *lplpiID = lpiID; return (BYTE *)lpID; } } /* fail */ HeapFree( GetProcessHeap(), 0, lpiID); return 0; } /************************************************************************* * * returns * failure:0; success: icon handle or nr of icons (nIconIndex-1) */ HICON WINAPI ICO_ExtractIconEx(LPCSTR lpszExeFileName, HICON * RetPtr, INT nIconIndex, UINT n, UINT cxDesired, UINT cyDesired ) { HGLOBAL hRet = 0; LPBYTE pData; OFSTRUCT ofs; DWORD sig; HFILE hFile = OpenFile( lpszExeFileName, &ofs, OF_READ ); UINT16 iconDirCount = 0,iconCount = 0; LPBYTE peimage; HANDLE fmapping; ULONG uSize; TRACE("(file %s,start %d,extract %d\n", lpszExeFileName, nIconIndex, n); if( hFile == HFILE_ERROR || (nIconIndex!=-1 && !n) ) return hRet; sig = SHELL_GetResourceTable(hFile,&pData); /* ico file */ if( sig==IMAGE_OS2_SIGNATURE || sig==1 ) /* .ICO file */ { BYTE *pCIDir = 0; NE_TYPEINFO *pTInfo = (NE_TYPEINFO*)(pData + 2); NE_NAMEINFO *pIconStorage = NULL; NE_NAMEINFO *pIconDir = NULL; LPicoICONDIR lpiID = NULL; TRACE("-- OS2/icon Signature (0x%08lx)\n", sig); if( pData == (BYTE*)-1 ) { pCIDir = ICO_GetIconDirectory(hFile, &lpiID, &uSize); /* check for .ICO file */ if( pCIDir ) { iconDirCount = 1; iconCount = lpiID->idCount; TRACE("-- icon found %p 0x%08lx 0x%08x 0x%08x\n", pCIDir, uSize, iconDirCount, iconCount); } } else while( pTInfo->type_id && !(pIconStorage && pIconDir) ) { if( pTInfo->type_id == NE_RSCTYPE_GROUP_ICON ) /* find icon directory and icon repository */ { iconDirCount = pTInfo->count; pIconDir = ((NE_NAMEINFO*)(pTInfo + 1)); TRACE("\tfound directory - %i icon families\n", iconDirCount); } if( pTInfo->type_id == NE_RSCTYPE_ICON ) { iconCount = pTInfo->count; pIconStorage = ((NE_NAMEINFO*)(pTInfo + 1)); TRACE("\ttotal icons - %i\n", iconCount); } pTInfo = (NE_TYPEINFO *)((char*)(pTInfo+1)+pTInfo->count*sizeof(NE_NAMEINFO)); } if( (pIconStorage && pIconDir) || lpiID ) /* load resources and create icons */ { if( nIconIndex == (UINT16)-1 ) { RetPtr[0] = iconDirCount; } else if( nIconIndex < iconDirCount ) { UINT16 i, icon; if( n > iconDirCount - nIconIndex ) n = iconDirCount - nIconIndex; for( i = nIconIndex; i < nIconIndex + n; i++ ) { /* .ICO files have only one icon directory */ if( lpiID == NULL ) /* *.ico */ pCIDir = SHELL_LoadResource( hFile, pIconDir + i, *(WORD*)pData, &uSize ); RetPtr[i-nIconIndex] = pLookupIconIdFromDirectoryEx( pCIDir, TRUE, GetSystemMetrics(SM_CXICON), GetSystemMetrics(SM_CYICON), 0); HeapFree(GetProcessHeap(), 0, pCIDir); } for( icon = nIconIndex; icon < nIconIndex + n; icon++ ) { pCIDir = NULL; if( lpiID ) { pCIDir = ICO_LoadIcon( hFile, lpiID->idEntries + RetPtr[icon-nIconIndex], &uSize); } else { for( i = 0; i < iconCount; i++ ) { if( pIconStorage[i].id == (RetPtr[icon-nIconIndex] | 0x8000) ) { pCIDir = SHELL_LoadResource( hFile, pIconStorage + i,*(WORD*)pData, &uSize ); } } } if( pCIDir ) { RetPtr[icon-nIconIndex] = (HICON) pCreateIconFromResourceEx(pCIDir,uSize,TRUE,0x00030000, cxDesired, cyDesired, LR_DEFAULTCOLOR); } else { RetPtr[icon-nIconIndex] = 0; } } } } if( lpiID ) HeapFree( GetProcessHeap(), 0, lpiID); else HeapFree( GetProcessHeap(), 0, pData); } /* end ico file */ /* exe/dll */ if( sig == IMAGE_NT_SIGNATURE) { LPBYTE idata,igdata; PIMAGE_DOS_HEADER dheader; PIMAGE_NT_HEADERS pe_header; PIMAGE_SECTION_HEADER pe_sections; PIMAGE_RESOURCE_DIRECTORY rootresdir,iconresdir,icongroupresdir; PIMAGE_RESOURCE_DATA_ENTRY idataent,igdataent; PIMAGE_RESOURCE_DIRECTORY_ENTRY xresent; int i,j; if ( !(fmapping = CreateFileMappingA(hFile,NULL,PAGE_READONLY|SEC_COMMIT,0,0,NULL))) { WARN("failed to create filemap.\n"); /* FIXME, INVALID_HANDLE_VALUE? */ goto end_2; /* failure */ } if ( !(peimage = MapViewOfFile(fmapping,FILE_MAP_READ,0,0,0))) { WARN("failed to mmap filemap.\n"); goto end_2; /* failure */ } dheader = (PIMAGE_DOS_HEADER)peimage; pe_header = (PIMAGE_NT_HEADERS)(peimage+dheader->e_lfanew); /* it is a pe header, SHELL_GetResourceTable checked that */ pe_sections = (PIMAGE_SECTION_HEADER)(((char*)pe_header)+sizeof(*pe_header)); /* probably makes problems with short PE headers...*/ rootresdir = NULL; for (i=0;iFileHeader.NumberOfSections;i++) { if (pe_sections[i].Characteristics & IMAGE_SCN_CNT_UNINITIALIZED_DATA) continue; /* FIXME: doesn't work when the resources are not in a seperate section */ if (pe_sections[i].VirtualAddress == pe_header->OptionalHeader.DataDirectory[IMAGE_DIRECTORY_ENTRY_RESOURCE].VirtualAddress) { rootresdir = (PIMAGE_RESOURCE_DIRECTORY)((char*)peimage+pe_sections[i].PointerToRawData); break; } } if (!rootresdir) { WARN("haven't found section for resource directory.\n"); goto end_3; /* failure */ } /* search the group icon dir*/ if (!(icongroupresdir = GetResDirEntryW(rootresdir,RT_GROUP_ICONW, (DWORD)rootresdir,FALSE))) { WARN("No Icongroupresourcedirectory!\n"); goto end_3; /* failure */ } iconDirCount = icongroupresdir->NumberOfNamedEntries+icongroupresdir->NumberOfIdEntries; /* number of icons requested */ if( nIconIndex == -1 ) { hRet = iconDirCount; goto end_3; /* success */ } /* (nIconIndex < 0): extract the icon by resource id */ if( nIconIndex < 0 ) { int n = 0; int iId = abs(nIconIndex); PIMAGE_RESOURCE_DIRECTORY_ENTRY xprdeTmp = (PIMAGE_RESOURCE_DIRECTORY_ENTRY)(icongroupresdir+1); while(nu1.Id == iId) { nIconIndex = n; break; } n++; xprdeTmp++; } if (nIconIndex < 0) { WARN("resource id %d not found\n", iId); goto end_3; /* failure */ } } /* check nIconIndex to be in range */ if (nIconIndex >= iconDirCount) { WARN("nIconIndex %d is larger than iconDirCount %d\n",nIconIndex,iconDirCount); goto end_3; /* failure */ } xresent = (PIMAGE_RESOURCE_DIRECTORY_ENTRY)(icongroupresdir+1); /* caller just wanted the number of entries */ if( n > iconDirCount - nIconIndex ) /* assure we don't get too much ... */ { n = iconDirCount - nIconIndex; } xresent = xresent+nIconIndex; /* starting from specified index ... */ for (i=0;iu2.s.OffsetToDirectory)); /* default language (0) */ resdir = GetResDirEntryW(resdir,(LPWSTR)0,(DWORD)rootresdir,TRUE); igdataent = (PIMAGE_RESOURCE_DATA_ENTRY)resdir; /* lookup address in mapped image for virtual address */ igdata = NULL; for (j=0;jFileHeader.NumberOfSections;j++) { if (igdataent->OffsetToData < pe_sections[j].VirtualAddress) continue; if (igdataent->OffsetToData+igdataent->Size > pe_sections[j].VirtualAddress+pe_sections[j].SizeOfRawData) continue; igdata = peimage+(igdataent->OffsetToData-pe_sections[j].VirtualAddress+pe_sections[j].PointerToRawData); } if (!igdata) { WARN("no matching real address for icongroup!\n"); goto end_3; /* failure */ } RetPtr[i] = (HICON)pLookupIconIdFromDirectoryEx(igdata, TRUE, cxDesired, cyDesired, LR_DEFAULTCOLOR); } if (!(iconresdir=GetResDirEntryW(rootresdir,RT_ICONW,(DWORD)rootresdir,FALSE))) { WARN("No Iconresourcedirectory!\n"); goto end_3; /* failure */ } for (i=0;iFileHeader.NumberOfSections;j++) { if (idataent->OffsetToData < pe_sections[j].VirtualAddress) continue; if (idataent->OffsetToData+idataent->Size > pe_sections[j].VirtualAddress+pe_sections[j].SizeOfRawData) continue; idata = peimage+(idataent->OffsetToData-pe_sections[j].VirtualAddress+pe_sections[j].PointerToRawData); } if (!idata) { WARN("no matching real address found for icondata!\n"); RetPtr[i]=0; continue; } RetPtr[i] = (HICON) pCreateIconFromResourceEx(idata,idataent->Size,TRUE,0x00030000, cxDesired, cyDesired, LR_DEFAULTCOLOR); } hRet = RetPtr[0]; /* return first icon */ goto end_3; /* sucess */ } goto end_1; /* unknown filetype */ /* cleaning up (try & catch would be nicer:-) ) */ end_3: UnmapViewOfFile(peimage); /* success */ end_2: CloseHandle(fmapping); end_1: _lclose( hFile); return hRet; } /********************** THE ICON CACHE ********************************/ #define INVALID_INDEX -1 typedef struct { LPCSTR sSourceFile; /* file (not path!) containing the icon */ DWORD dwSourceIndex; /* index within the file, if it is a resoure ID it will be negated */ DWORD dwListIndex; /* index within the iconlist */ DWORD dwFlags; /* GIL_* flags */ DWORD dwAccessTime; } SIC_ENTRY, * LPSIC_ENTRY; static HDPA sic_hdpa = 0; static CRITICAL_SECTION SHELL32_SicCS = CRITICAL_SECTION_INIT; /***************************************************************************** * SIC_CompareEntrys [called by comctl32.dll] * * NOTES * Callback for DPA_Search */ INT CALLBACK SIC_CompareEntrys( LPVOID p1, LPVOID p2, LPARAM lparam) { TRACE("%p %p\n", p1, p2); if (((LPSIC_ENTRY)p1)->dwSourceIndex != ((LPSIC_ENTRY)p2)->dwSourceIndex) /* first the faster one*/ return 1; if (strcasecmp(((LPSIC_ENTRY)p1)->sSourceFile,((LPSIC_ENTRY)p2)->sSourceFile)) return 1; return 0; } /***************************************************************************** * SIC_IconAppend [internal] * * NOTES * appends a icon pair to the end of the cache */ static INT SIC_IconAppend (LPCSTR sSourceFile, INT dwSourceIndex, HICON hSmallIcon, HICON hBigIcon) { LPSIC_ENTRY lpsice; INT ret, index, index1; TRACE("%s %i %x %x\n", sSourceFile, dwSourceIndex, hSmallIcon ,hBigIcon); lpsice = (LPSIC_ENTRY) SHAlloc (sizeof (SIC_ENTRY)); lpsice->sSourceFile = HEAP_strdupA (GetProcessHeap(), 0, PathFindFileNameA(sSourceFile)); lpsice->dwSourceIndex = dwSourceIndex; EnterCriticalSection(&SHELL32_SicCS); index = pDPA_InsertPtr(sic_hdpa, 0x7fff, lpsice); if ( INVALID_INDEX == index ) { SHFree(lpsice); ret = INVALID_INDEX; } else { index = pImageList_AddIcon (ShellSmallIconList, hSmallIcon); index1= pImageList_AddIcon (ShellBigIconList, hBigIcon); if (index!=index1) { FIXME("iconlists out of sync 0x%x 0x%x\n", index, index1); } lpsice->dwListIndex = index; ret = lpsice->dwListIndex; } LeaveCriticalSection(&SHELL32_SicCS); return ret; } /**************************************************************************** * SIC_LoadIcon [internal] * * NOTES * gets small/big icon by number from a file */ static INT SIC_LoadIcon (LPCSTR sSourceFile, INT dwSourceIndex) { HICON hiconLarge=0; HICON hiconSmall=0; ICO_ExtractIconEx(sSourceFile, &hiconLarge, dwSourceIndex, 1, 32, 32 ); ICO_ExtractIconEx(sSourceFile, &hiconSmall, dwSourceIndex, 1, 16, 16 ); if ( !hiconLarge || !hiconSmall) { WARN("failure loading icon %i from %s (%x %x)\n", dwSourceIndex, sSourceFile, hiconLarge, hiconSmall); return -1; } return SIC_IconAppend (sSourceFile, dwSourceIndex, hiconSmall, hiconLarge); } /***************************************************************************** * SIC_GetIconIndex [internal] * * Parameters * sSourceFile [IN] filename of file containing the icon * index [IN] index/resID (negated) in this file * * NOTES * look in the cache for a proper icon. if not available the icon is taken * from the file and cached */ INT SIC_GetIconIndex (LPCSTR sSourceFile, INT dwSourceIndex ) { SIC_ENTRY sice; INT ret, index = INVALID_INDEX; TRACE("%s %i\n", sSourceFile, dwSourceIndex); sice.sSourceFile = PathFindFileNameA(sSourceFile); sice.dwSourceIndex = dwSourceIndex; EnterCriticalSection(&SHELL32_SicCS); if (NULL != pDPA_GetPtr (sic_hdpa, 0)) { index = pDPA_Search (sic_hdpa, &sice, -1L, SIC_CompareEntrys, 0, 0); } if ( INVALID_INDEX == index ) { ret = SIC_LoadIcon (sSourceFile, dwSourceIndex); } else { TRACE("-- found\n"); ret = ((LPSIC_ENTRY)pDPA_GetPtr(sic_hdpa, index))->dwListIndex; } LeaveCriticalSection(&SHELL32_SicCS); return ret; } /**************************************************************************** * SIC_LoadIcon [internal] * * NOTES * retrives the specified icon from the iconcache. if not found try's to load the icon */ static HICON WINE_UNUSED SIC_GetIcon (LPCSTR sSourceFile, INT dwSourceIndex, BOOL bSmallIcon ) { INT index; TRACE("%s %i\n", sSourceFile, dwSourceIndex); index = SIC_GetIconIndex(sSourceFile, dwSourceIndex); if (INVALID_INDEX == index) { return INVALID_INDEX; } if (bSmallIcon) return pImageList_GetIcon(ShellSmallIconList, index, ILD_NORMAL); return pImageList_GetIcon(ShellBigIconList, index, ILD_NORMAL); } /***************************************************************************** * SIC_Initialize [internal] * * NOTES * hack to load the resources from the shell32.dll under a different dll name * will be removed when the resource-compiler is ready */ BOOL SIC_Initialize(void) { HICON hSm, hLg; UINT index; TRACE("\n"); if (sic_hdpa) /* already initialized?*/ return TRUE; sic_hdpa = pDPA_Create(16); if (!sic_hdpa) { return(FALSE); } ShellSmallIconList = pImageList_Create(16,16,ILC_COLORDDB | ILC_MASK,0,0x20); ShellBigIconList = pImageList_Create(32,32,ILC_COLORDDB | ILC_MASK,0,0x20); pImageList_SetBkColor(ShellSmallIconList, GetSysColor(COLOR_WINDOW)); pImageList_SetBkColor(ShellBigIconList, GetSysColor(COLOR_WINDOW)); for (index=1; index<39; index++) { hSm = LoadImageA(shell32_hInstance, MAKEINTRESOURCEA(index), IMAGE_ICON, 16, 16,LR_SHARED); hLg = LoadImageA(shell32_hInstance, MAKEINTRESOURCEA(index), IMAGE_ICON, 32, 32,LR_SHARED); if(!hSm) { hSm = LoadImageA(shell32_hInstance, MAKEINTRESOURCEA(0), IMAGE_ICON, 16, 16,LR_SHARED); hLg = LoadImageA(shell32_hInstance, MAKEINTRESOURCEA(0), IMAGE_ICON, 32, 32,LR_SHARED); } SIC_IconAppend ("shell32.dll", index, hSm, hLg); } TRACE("hIconSmall=%p hIconBig=%p\n",ShellSmallIconList, ShellBigIconList); return TRUE; } /************************************************************************* * SIC_Destroy * * frees the cache */ void SIC_Destroy(void) { LPSIC_ENTRY lpsice; int i; TRACE("\n"); EnterCriticalSection(&SHELL32_SicCS); if (sic_hdpa && NULL != pDPA_GetPtr (sic_hdpa, 0)) { for (i=0; i < pDPA_GetPtrCount(sic_hdpa); ++i) { lpsice = pDPA_GetPtr(sic_hdpa, i); SHFree(lpsice); } pDPA_Destroy(sic_hdpa); } sic_hdpa = NULL; LeaveCriticalSection(&SHELL32_SicCS); DeleteCriticalSection(&SHELL32_SicCS); } /************************************************************************* * Shell_GetImageList [SHELL32.71] * * PARAMETERS * imglist[1|2] [OUT] pointer which recive imagelist handles * */ BOOL WINAPI Shell_GetImageList(HIMAGELIST * lpBigList, HIMAGELIST * lpSmallList) { TRACE("(%p,%p)\n",lpBigList,lpSmallList); if (lpBigList) { *lpBigList = ShellBigIconList; } if (lpSmallList) { *lpSmallList = ShellSmallIconList; } return TRUE; } /************************************************************************* * PidlToSicIndex [INTERNAL] * * PARAMETERS * sh [IN] IShellFolder * pidl [IN] * bBigIcon [IN] * uFlags [IN] GIL_* * pIndex [OUT] index within the SIC * */ BOOL PidlToSicIndex ( IShellFolder * sh, LPITEMIDLIST pidl, BOOL bBigIcon, UINT uFlags, UINT * pIndex) { IExtractIconA *ei; char szIconFile[MAX_PATH]; /* file containing the icon */ INT iSourceIndex; /* index or resID(negated) in this file */ BOOL ret = FALSE; UINT dwFlags = 0; TRACE("sf=%p pidl=%p %s\n", sh, pidl, bBigIcon?"Big":"Small"); if (SUCCEEDED (IShellFolder_GetUIObjectOf(sh, 0, 1, &pidl, &IID_IExtractIconA, 0, (void **)&ei))) { if (SUCCEEDED(IExtractIconA_GetIconLocation(ei, uFlags, szIconFile, MAX_PATH, &iSourceIndex, &dwFlags))) { *pIndex = SIC_GetIconIndex(szIconFile, iSourceIndex); ret = TRUE; } IExtractIconA_Release(ei); } if (INVALID_INDEX == *pIndex) /* default icon when failed */ *pIndex = 1; return ret; } /************************************************************************* * SHMapPIDLToSystemImageListIndex [SHELL32.77] * * PARAMETERS * sh [IN] pointer to an instance of IShellFolder * pidl [IN] * pIndex [OUT][OPTIONAL] SIC index for big icon * */ int WINAPI SHMapPIDLToSystemImageListIndex( LPSHELLFOLDER sh, LPCITEMIDLIST pidl, UINT * pIndex) { UINT Index; TRACE("(SF=%p,pidl=%p,%p)\n",sh,pidl,pIndex); pdump(pidl); if (pIndex) PidlToSicIndex ( sh, pidl, 1, 0, pIndex); PidlToSicIndex ( sh, pidl, 0, 0, &Index); return Index; } /************************************************************************* * Shell_GetCachedImageIndex [SHELL32.72] * */ INT WINAPI Shell_GetCachedImageIndexA(LPCSTR szPath, INT nIndex, BOOL bSimulateDoc) { WARN("(%s,%08x,%08x) semi-stub.\n",debugstr_a(szPath), nIndex, bSimulateDoc); return SIC_GetIconIndex(szPath, nIndex); } INT WINAPI Shell_GetCachedImageIndexW(LPCWSTR szPath, INT nIndex, BOOL bSimulateDoc) { INT ret; LPSTR sTemp = HEAP_strdupWtoA (GetProcessHeap(),0,szPath); WARN("(%s,%08x,%08x) semi-stub.\n",debugstr_w(szPath), nIndex, bSimulateDoc); ret = SIC_GetIconIndex(sTemp, nIndex); HeapFree(GetProcessHeap(),0,sTemp); return ret; } INT WINAPI Shell_GetCachedImageIndexAW(LPCVOID szPath, INT nIndex, BOOL bSimulateDoc) { if( VERSION_OsIsUnicode()) return Shell_GetCachedImageIndexW(szPath, nIndex, bSimulateDoc); return Shell_GetCachedImageIndexA(szPath, nIndex, bSimulateDoc); } /************************************************************************* * ExtractIconEx [shell32.189] */ HICON WINAPI ExtractIconExAW ( LPCVOID lpszFile, INT nIconIndex, HICON * phiconLarge, HICON * phiconSmall, UINT nIcons ) { if (VERSION_OsIsUnicode()) return ExtractIconExW ( lpszFile, nIconIndex, phiconLarge, phiconSmall, nIcons); return ExtractIconExA ( lpszFile, nIconIndex, phiconLarge, phiconSmall, nIcons); } /************************************************************************* * ExtractIconExA [shell32.190] * RETURNS * 0 no icon found * 1 file is not valid * HICON handle of a icon (phiconLarge/Small == NULL) */ HICON WINAPI ExtractIconExA ( LPCSTR lpszFile, INT nIconIndex, HICON * phiconLarge, HICON * phiconSmall, UINT nIcons ) { HICON ret=0; TRACE("file=%s idx=%i %p %p num=%i\n", lpszFile, nIconIndex, phiconLarge, phiconSmall, nIcons ); if (nIconIndex==-1) /* Number of icons requested */ return ICO_ExtractIconEx(lpszFile, NULL, -1, 0, 0, 0 ); if (phiconLarge) { ret = ICO_ExtractIconEx(lpszFile, phiconLarge, nIconIndex, nIcons, 32, 32 ); if ( nIcons==1) { ret = phiconLarge[0]; } } /* if no pointers given and one icon expected, return the handle directly*/ if (!phiconLarge && ! phiconSmall && nIcons==1 ) phiconSmall = &ret; if (phiconSmall) { ret = ICO_ExtractIconEx(lpszFile, phiconSmall, nIconIndex, nIcons, 16, 16 ); if ( nIcons==1 ) { ret = phiconSmall[0]; } } return ret; } /************************************************************************* * ExtractIconExW [shell32.191] */ HICON WINAPI ExtractIconExW ( LPCWSTR lpszFile, INT nIconIndex, HICON * phiconLarge, HICON * phiconSmall, UINT nIcons ) { LPSTR sFile; DWORD ret; TRACE("file=%s idx=%i %p %p num=%i\n", debugstr_w(lpszFile), nIconIndex, phiconLarge, phiconSmall, nIcons ); sFile = HEAP_strdupWtoA (GetProcessHeap(),0,lpszFile); ret = ExtractIconExA ( sFile, nIconIndex, phiconLarge, phiconSmall, nIcons); HeapFree(GetProcessHeap(),0,sFile); return ret; } wine-20000526/dlls/shell32/memorystream.c0100644000175000001440000001575107040772636017570 0ustar julliardusers/* * this class implements a pure IStream object * and can be used for many purposes * * the main reason for implementing this was * a cleaner implementation of IShellLink which * needs to be able to load lnk's from a IStream * interface so it was obvious to capsule the file * access in a IStream to. */ #include #include "wine/obj_storage.h" #include "heap.h" #include "winerror.h" #include "debugtools.h" #include "shell32_main.h" DEFAULT_DEBUG_CHANNEL(shell) static HRESULT WINAPI IStream_fnQueryInterface(IStream *iface, REFIID riid, LPVOID *ppvObj); static ULONG WINAPI IStream_fnAddRef(IStream *iface); static ULONG WINAPI IStream_fnRelease(IStream *iface); static HRESULT WINAPI IStream_fnRead (IStream * iface, void* pv, ULONG cb, ULONG* pcbRead); static HRESULT WINAPI IStream_fnWrite (IStream * iface, const void* pv, ULONG cb, ULONG* pcbWritten); static HRESULT WINAPI IStream_fnSeek (IStream * iface, LARGE_INTEGER dlibMove, DWORD dwOrigin, ULARGE_INTEGER* plibNewPosition); static HRESULT WINAPI IStream_fnSetSize (IStream * iface, ULARGE_INTEGER libNewSize); static HRESULT WINAPI IStream_fnCopyTo (IStream * iface, IStream* pstm, ULARGE_INTEGER cb, ULARGE_INTEGER* pcbRead, ULARGE_INTEGER* pcbWritten); static HRESULT WINAPI IStream_fnCommit (IStream * iface, DWORD grfCommitFlags); static HRESULT WINAPI IStream_fnRevert (IStream * iface); static HRESULT WINAPI IStream_fnLockRegion (IStream * iface, ULARGE_INTEGER libOffset, ULARGE_INTEGER cb, DWORD dwLockType); static HRESULT WINAPI IStream_fnUnlockRegion (IStream * iface, ULARGE_INTEGER libOffset, ULARGE_INTEGER cb, DWORD dwLockType); static HRESULT WINAPI IStream_fnStat (IStream * iface, STATSTG* pstatstg, DWORD grfStatFlag); static HRESULT WINAPI IStream_fnClone (IStream * iface, IStream** ppstm); static ICOM_VTABLE(IStream) stvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IStream_fnQueryInterface, IStream_fnAddRef, IStream_fnRelease, IStream_fnRead, IStream_fnWrite, IStream_fnSeek, IStream_fnSetSize, IStream_fnCopyTo, IStream_fnCommit, IStream_fnRevert, IStream_fnLockRegion, IStream_fnUnlockRegion, IStream_fnStat, IStream_fnClone }; typedef struct { ICOM_VTABLE(IStream) *lpvtst; DWORD ref; LPBYTE pImage; HANDLE hMapping; DWORD dwLength; DWORD dwPos; } ISHFileStream; /************************************************************************** * CreateStreamOnFile() * * similar to CreateStreamOnHGlobal */ HRESULT CreateStreamOnFile (LPCSTR pszFilename, IStream ** ppstm) { ISHFileStream* fstr; OFSTRUCT ofs; HFILE hFile = OpenFile( pszFilename, &ofs, OF_READ ); HRESULT ret = E_FAIL; fstr = (ISHFileStream*)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(ISHFileStream)); fstr->lpvtst=&stvt; fstr->ref = 1; fstr->dwLength = GetFileSize (hFile, NULL); shell32_ObjCount++; if (!(fstr->hMapping = CreateFileMappingA(hFile,NULL,PAGE_READONLY|SEC_COMMIT,0,0,NULL))) { WARN("failed to create filemap.\n"); goto end_2; } if (!(fstr->pImage = MapViewOfFile(fstr->hMapping,FILE_MAP_READ,0,0,0))) { WARN("failed to mmap filemap.\n"); goto end_3; } ret = S_OK; goto end_1; end_3: CloseHandle(fstr->hMapping); end_2: HeapFree(GetProcessHeap(), 0, fstr); fstr = NULL; end_1: _lclose(hFile); (*ppstm) = (IStream*)fstr; return ret; } /************************************************************************** * IStream_fnQueryInterface */ static HRESULT WINAPI IStream_fnQueryInterface(IStream *iface, REFIID riid, LPVOID *ppvObj) { ICOM_THIS(ISHFileStream, iface); TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid, &IID_IStream)) { *ppvObj = This; } if(*ppvObj) { IStream_AddRef((IStream*)*ppvObj); TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } /************************************************************************** * IStream_fnAddRef */ static ULONG WINAPI IStream_fnAddRef(IStream *iface) { ICOM_THIS(ISHFileStream, iface); TRACE("(%p)->(count=%lu)\n",This, This->ref); shell32_ObjCount++; return ++(This->ref); } /************************************************************************** * IStream_fnRelease */ static ULONG WINAPI IStream_fnRelease(IStream *iface) { ICOM_THIS(ISHFileStream, iface); TRACE("(%p)->()\n",This); shell32_ObjCount--; if (!--(This->ref)) { TRACE(" destroying SHFileStream (%p)\n",This); UnmapViewOfFile(This->pImage); CloseHandle(This->hMapping); HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } static HRESULT WINAPI IStream_fnRead (IStream * iface, void* pv, ULONG cb, ULONG* pcbRead) { ICOM_THIS(ISHFileStream, iface); DWORD dwBytesToRead, dwBytesLeft; TRACE("(%p)->(%p,0x%08lx,%p)\n",This, pv, cb, pcbRead); if ( !pv ) return STG_E_INVALIDPOINTER; dwBytesLeft = This->dwLength - This->dwPos; if ( 0 >= dwBytesLeft ) /* end of buffer */ return S_FALSE; dwBytesToRead = ( cb > dwBytesLeft) ? dwBytesLeft : cb; memmove ( pv, (This->pImage) + (This->dwPos), dwBytesToRead); This->dwPos += dwBytesToRead; /* adjust pointer */ if (pcbRead) *pcbRead = dwBytesToRead; return S_OK; } static HRESULT WINAPI IStream_fnWrite (IStream * iface, const void* pv, ULONG cb, ULONG* pcbWritten) { ICOM_THIS(ISHFileStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI IStream_fnSeek (IStream * iface, LARGE_INTEGER dlibMove, DWORD dwOrigin, ULARGE_INTEGER* plibNewPosition) { ICOM_THIS(ISHFileStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI IStream_fnSetSize (IStream * iface, ULARGE_INTEGER libNewSize) { ICOM_THIS(ISHFileStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI IStream_fnCopyTo (IStream * iface, IStream* pstm, ULARGE_INTEGER cb, ULARGE_INTEGER* pcbRead, ULARGE_INTEGER* pcbWritten) { ICOM_THIS(ISHFileStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI IStream_fnCommit (IStream * iface, DWORD grfCommitFlags) { ICOM_THIS(ISHFileStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI IStream_fnRevert (IStream * iface) { ICOM_THIS(ISHFileStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI IStream_fnLockRegion (IStream * iface, ULARGE_INTEGER libOffset, ULARGE_INTEGER cb, DWORD dwLockType) { ICOM_THIS(ISHFileStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI IStream_fnUnlockRegion (IStream * iface, ULARGE_INTEGER libOffset, ULARGE_INTEGER cb, DWORD dwLockType) { ICOM_THIS(ISHFileStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI IStream_fnStat (IStream * iface, STATSTG* pstatstg, DWORD grfStatFlag) { ICOM_THIS(ISHFileStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI IStream_fnClone (IStream * iface, IStream** ppstm) { ICOM_THIS(ISHFileStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } wine-20000526/dlls/shell32/pidl.c0100644000175000001440000012116507102371033015752 0ustar julliardusers/* * pidl Handling * * Copyright 1998 Juergen Schmied * * NOTES * a pidl == NULL means desktop and is legal * */ #include #include #include #include "winbase.h" #include "debugtools.h" #include "shell.h" #include "shlguid.h" #include "winerror.h" #include "winnls.h" #include "winversion.h" #include "shell32_main.h" #include "shellapi.h" #include "pidl.h" #include "wine/undocshell.h" DEFAULT_DEBUG_CHANNEL(pidl) DECLARE_DEBUG_CHANNEL(shell) void pdump (LPCITEMIDLIST pidl) { BOOL bIsShellDebug; LPITEMIDLIST pidltemp = pidl; if (!TRACE_ON(pidl)) return; /* silence the sub-functions */ bIsShellDebug = TRACE_ON(shell); __SET_DEBUGGING(__DBCL_TRACE, dbch_shell, FALSE); __SET_DEBUGGING(__DBCL_TRACE, dbch_pidl, FALSE); if (! pidltemp) { MESSAGE ("-------- pidl=NULL (Desktop)\n"); } else { MESSAGE ("-------- pidl=%p\n", pidl); if (pidltemp->mkid.cb) { do { DWORD dwAttrib = 0; LPPIDLDATA pData = _ILGetDataPointer(pidltemp); DWORD type = pData->type; LPSTR szLongName = _ILGetTextPointer(pidltemp); LPSTR szShortName = _ILGetSTextPointer(pidltemp); char szName[MAX_PATH]; _ILSimpleGetText(pidltemp, szName, MAX_PATH); if( PT_FOLDER == type) dwAttrib = pData->u.folder.uFileAttribs; else if( PT_VALUE == type) dwAttrib = pData->u.file.uFileAttribs; MESSAGE ("-- pidl=%p size=%u type=%lx attr=0x%08lx name=%s (%s,%s)\n", pidltemp, pidltemp->mkid.cb,type,dwAttrib,szName,debugstr_a(szLongName), debugstr_a(szShortName)); pidltemp = ILGetNext(pidltemp); } while (pidltemp->mkid.cb); } else { MESSAGE ("empty pidl (Desktop)\n"); } pcheck(pidl); } __SET_DEBUGGING(__DBCL_TRACE, dbch_shell, bIsShellDebug); __SET_DEBUGGING(__DBCL_TRACE, dbch_pidl, TRUE); } #define BYTES_PRINTED 32 BOOL pcheck (LPCITEMIDLIST pidl) { DWORD type, ret=TRUE; BOOL bIsPidlDebug; LPITEMIDLIST pidltemp = pidl; bIsPidlDebug = TRACE_ON(shell); __SET_DEBUGGING(__DBCL_TRACE, dbch_pidl, FALSE); if (pidltemp && pidltemp->mkid.cb) { do { type = _ILGetDataPointer(pidltemp)->type; switch (type) { case PT_DESKTOP: case PT_MYCOMP: case PT_SPECIAL: case PT_DRIVE: case PT_DRIVE1: case PT_DRIVE2: case PT_DRIVE3: case PT_FOLDER: case PT_VALUE: case PT_FOLDER1: case PT_WORKGRP: case PT_COMP: case PT_NETWORK: case PT_SHARE: case PT_IESPECIAL: break; default: { char szTemp[BYTES_PRINTED*4 + 1]; int i; unsigned char c; memset(szTemp, ' ', BYTES_PRINTED*4 + 1); for ( i = 0; (imkid.cb) && (i>4)>9)? (c>>4)+55 : (c>>4)+48; szTemp[i*3+1] = ((0x0F&c)>9)? (0x0F&c)+55 : (0x0F&c)+48; szTemp[i*3+2] = ' '; szTemp[i+BYTES_PRINTED*3] = (c>=0x20 && c <=0x80) ? c : '.'; } szTemp[BYTES_PRINTED*4] = 0x00; ERR("unknown IDLIST type size=%u type=%lx\n%s\n",pidltemp->mkid.cb,type, szTemp); ret = FALSE; } } pidltemp = ILGetNext(pidltemp); } while (pidltemp->mkid.cb); } __SET_DEBUGGING(__DBCL_TRACE, dbch_pidl, bIsPidlDebug); return ret; } /************************************************************************* * ILGetDisplayName [SHELL32.15] */ BOOL WINAPI ILGetDisplayName(LPCITEMIDLIST pidl,LPSTR path) { TRACE_(shell)("pidl=%p %p semi-stub\n",pidl,path); return SHGetPathFromIDListA(pidl, path); } /************************************************************************* * ILFindLastID [SHELL32.16] * * NOTES * observed: pidl=Desktop return=pidl */ LPITEMIDLIST WINAPI ILFindLastID(LPITEMIDLIST pidl) { LPITEMIDLIST pidlLast = pidl; TRACE("(pidl=%p)\n",pidl); while (pidl->mkid.cb) { pidlLast = pidl; pidl = ILGetNext(pidl); } return pidlLast; } /************************************************************************* * ILRemoveLastID [SHELL32.17] * * NOTES * when pidl=Desktop return=FALSE */ BOOL WINAPI ILRemoveLastID(LPCITEMIDLIST pidl) { TRACE_(shell)("pidl=%p\n",pidl); if (!pidl || !pidl->mkid.cb) return 0; ILFindLastID(pidl)->mkid.cb = 0; return 1; } /************************************************************************* * ILClone [SHELL32.18] * * NOTES * dupicate an idlist */ LPITEMIDLIST WINAPI ILClone (LPCITEMIDLIST pidl) { DWORD len; LPITEMIDLIST newpidl; if (!pidl) return NULL; len = ILGetSize(pidl); newpidl = (LPITEMIDLIST)SHAlloc(len); if (newpidl) memcpy(newpidl,pidl,len); TRACE("pidl=%p newpidl=%p\n",pidl, newpidl); pdump(pidl); return newpidl; } /************************************************************************* * ILCloneFirst [SHELL32.19] * * NOTES * duplicates the first idlist of a complex pidl */ LPITEMIDLIST WINAPI ILCloneFirst(LPCITEMIDLIST pidl) { DWORD len; LPITEMIDLIST pidlNew = NULL; TRACE("pidl=%p \n",pidl); pdump(pidl); if (pidl) { len = pidl->mkid.cb; pidlNew = (LPITEMIDLIST) SHAlloc (len+2); if (pidlNew) { memcpy(pidlNew,pidl,len+2); /* 2 -> mind a desktop pidl */ if (len) ILGetNext(pidlNew)->mkid.cb = 0x00; } } TRACE("-- newpidl=%p\n",pidlNew); return pidlNew; } /************************************************************************* * ILLoadFromStream * * NOTES * the first two bytes are the len, the pidl is following then */ HRESULT WINAPI ILLoadFromStream (IStream * pStream, LPITEMIDLIST * ppPidl) { WORD wLen = 0; DWORD dwBytesRead; HRESULT ret = E_FAIL; TRACE_(shell)("%p %p\n", pStream , ppPidl); if (*ppPidl) { SHFree(*ppPidl); *ppPidl = NULL; } IStream_AddRef (pStream); if (SUCCEEDED(IStream_Read(pStream, (LPVOID)&wLen, 2, &dwBytesRead))) { *ppPidl = SHAlloc (wLen); if (SUCCEEDED(IStream_Read(pStream, *ppPidl , wLen, &dwBytesRead))) { ret = S_OK; } else { SHFree(*ppPidl); *ppPidl = NULL; } } /* we are not jet fully compatible */ if (!pcheck(*ppPidl)) { SHFree(*ppPidl); *ppPidl = NULL; } IStream_Release (pStream); return ret; } /************************************************************************* * SHILCreateFromPath [SHELL32.28] * * NOTES * wraper for IShellFolder::ParseDisplayName() */ HRESULT WINAPI SHILCreateFromPathA (LPCSTR path, LPITEMIDLIST * ppidl, DWORD * attributes) { LPSHELLFOLDER sf; WCHAR lpszDisplayName[MAX_PATH]; DWORD pchEaten; HRESULT ret = E_FAIL; TRACE_(shell)("%s %p 0x%08lx\n",path,ppidl,attributes?*attributes:0); lstrcpynAtoW(lpszDisplayName, path, MAX_PATH); if (SUCCEEDED (SHGetDesktopFolder(&sf))) { ret = IShellFolder_ParseDisplayName(sf,0, NULL,lpszDisplayName,&pchEaten,ppidl,attributes); IShellFolder_Release(sf); } return ret; } HRESULT WINAPI SHILCreateFromPathW (LPCWSTR path, LPITEMIDLIST * ppidl, DWORD * attributes) { LPSHELLFOLDER sf; DWORD pchEaten; HRESULT ret = E_FAIL; TRACE_(shell)("%s %p 0x%08lx\n",debugstr_w(path),ppidl,attributes?*attributes:0); if (SUCCEEDED (SHGetDesktopFolder(&sf))) { ret = IShellFolder_ParseDisplayName(sf,0, NULL, (LPWSTR) path, &pchEaten, ppidl, attributes); IShellFolder_Release(sf); } return ret; } HRESULT WINAPI SHILCreateFromPathAW (LPCVOID path, LPITEMIDLIST * ppidl, DWORD * attributes) { if ( VERSION_OsIsUnicode()) return SHILCreateFromPathW (path, ppidl, attributes); return SHILCreateFromPathA (path, ppidl, attributes); } /************************************************************************* * SHCloneSpecialIDList [SHELL32.89] * * PARAMETERS * hwndOwner [in] * nFolder [in] CSIDL_xxxxx ?? * * RETURNS * pidl ?? * NOTES * exported by ordinal */ LPITEMIDLIST WINAPI SHCloneSpecialIDList(HWND hwndOwner,DWORD nFolder,DWORD x3) { LPITEMIDLIST ppidl; WARN_(shell)("(hwnd=0x%x,csidl=0x%lx,0x%lx):semi-stub.\n", hwndOwner,nFolder,x3); SHGetSpecialFolderLocation(hwndOwner, nFolder, &ppidl); return ppidl; } /************************************************************************* * ILGlobalClone [SHELL32.97] * */ LPITEMIDLIST WINAPI ILGlobalClone(LPCITEMIDLIST pidl) { DWORD len; LPITEMIDLIST newpidl; if (!pidl) return NULL; len = ILGetSize(pidl); newpidl = (LPITEMIDLIST)pCOMCTL32_Alloc(len); if (newpidl) memcpy(newpidl,pidl,len); TRACE("pidl=%p newpidl=%p\n",pidl, newpidl); pdump(pidl); return newpidl; } /************************************************************************* * ILIsEqual [SHELL32.21] * */ BOOL WINAPI ILIsEqual(LPCITEMIDLIST pidl1, LPCITEMIDLIST pidl2) { char szData1[MAX_PATH]; char szData2[MAX_PATH]; LPITEMIDLIST pidltemp1 = pidl1; LPITEMIDLIST pidltemp2 = pidl2; TRACE("pidl1=%p pidl2=%p\n",pidl1, pidl2); /* explorer reads from registry directly (StreamMRU), so we can only check here */ if ((!pcheck (pidl1)) || (!pcheck (pidl2))) return FALSE; pdump (pidl1); pdump (pidl2); if ( (!pidl1) || (!pidl2) ) return FALSE; while (pidltemp1->mkid.cb && pidltemp2->mkid.cb) { _ILSimpleGetText(pidltemp1, szData1, MAX_PATH); _ILSimpleGetText(pidltemp2, szData2, MAX_PATH); if (strcasecmp ( szData1, szData2 )!=0 ) return FALSE; pidltemp1 = ILGetNext(pidltemp1); pidltemp2 = ILGetNext(pidltemp2); } if (!pidltemp1->mkid.cb && !pidltemp2->mkid.cb) { return TRUE; } return FALSE; } /************************************************************************* * ILIsParent [SHELL32.23] * * parent=a/b child=a/b/c -> true, c is in folder a/b * child=a/b/c/d -> false if bImmediate is true, d is not in folder a/b * child=a/b/c/d -> true if bImmediate is false, d is in a subfolder of a/b */ BOOL WINAPI ILIsParent( LPCITEMIDLIST pidlParent, LPCITEMIDLIST pidlChild, BOOL bImmediate) { char szData1[MAX_PATH]; char szData2[MAX_PATH]; LPITEMIDLIST pParent = pidlParent; LPITEMIDLIST pChild = pidlChild; TRACE("%p %p %x\n", pidlParent, pidlChild, bImmediate); while (pParent->mkid.cb && pChild->mkid.cb) { _ILSimpleGetText(pParent, szData1, MAX_PATH); _ILSimpleGetText(pChild, szData2, MAX_PATH); if (strcasecmp ( szData1, szData2 )!=0 ) return FALSE; pParent = ILGetNext(pParent); pChild = ILGetNext(pChild); } if ( pParent->mkid.cb || ! pChild->mkid.cb) /* child shorter or has equal length to parent */ return FALSE; if ( ILGetNext(pChild)->mkid.cb && bImmediate) /* not immediate descent */ return FALSE; return TRUE; } /************************************************************************* * ILFindChild [SHELL32.24] * * NOTES * Compares elements from pidl1 and pidl2. * * pidl1 is desktop pidl2 * pidl1 shorter pidl2 pointer to first different element of pidl2 * if there was at least one equal element * pidl2 shorter pidl1 0 * pidl2 equal pidl1 pointer to last 0x00-element of pidl2 */ LPITEMIDLIST WINAPI ILFindChild(LPCITEMIDLIST pidl1,LPCITEMIDLIST pidl2) { char szData1[MAX_PATH]; char szData2[MAX_PATH]; LPITEMIDLIST pidltemp1 = pidl1; LPITEMIDLIST pidltemp2 = pidl2; LPITEMIDLIST ret=NULL; TRACE("pidl1=%p pidl2=%p\n",pidl1, pidl2); /* explorer reads from registry directly (StreamMRU), so we can only check here */ if ((!pcheck (pidl1)) || (!pcheck (pidl2))) return FALSE; pdump (pidl1); pdump (pidl2); if ( _ILIsDesktop(pidl1) ) { ret = pidl2; } else { while (pidltemp1->mkid.cb && pidltemp2->mkid.cb) { _ILSimpleGetText(pidltemp1, szData1, MAX_PATH); _ILSimpleGetText(pidltemp2, szData2, MAX_PATH); if (strcasecmp(szData1,szData2)) break; pidltemp1 = ILGetNext(pidltemp1); pidltemp2 = ILGetNext(pidltemp2); ret = pidltemp2; } if (pidltemp1->mkid.cb) { ret = NULL; /* elements of pidl1 left*/ } } TRACE_(shell)("--- %p\n", ret); return ret; /* pidl 1 is shorter */ } /************************************************************************* * ILCombine [SHELL32.25] * * NOTES * Concatenates two complex idlists. * The pidl is the first one, pidlsub the next one * Does not destroy the passed in idlists! */ LPITEMIDLIST WINAPI ILCombine(LPCITEMIDLIST pidl1,LPCITEMIDLIST pidl2) { DWORD len1,len2; LPITEMIDLIST pidlNew; TRACE("pidl=%p pidl=%p\n",pidl1,pidl2); if(!pidl1 && !pidl2) return NULL; pdump (pidl1); pdump (pidl2); if(!pidl1) { pidlNew = ILClone(pidl2); return pidlNew; } if(!pidl2) { pidlNew = ILClone(pidl1); return pidlNew; } len1 = ILGetSize(pidl1)-2; len2 = ILGetSize(pidl2); pidlNew = SHAlloc(len1+len2); if (pidlNew) { memcpy(pidlNew,pidl1,len1); memcpy(((BYTE *)pidlNew)+len1,pidl2,len2); } /* TRACE(pidl,"--new pidl=%p\n",pidlNew);*/ return pidlNew; } /************************************************************************* * SHGetRealIDL [SHELL32.98] * * NOTES */ LPITEMIDLIST WINAPI SHGetRealIDL(LPSHELLFOLDER lpsf, LPITEMIDLIST pidl, DWORD z) { FIXME("sf=%p pidl=%p 0x%04lx\n",lpsf,pidl,z); pdump (pidl); return 0; } /************************************************************************* * SHLogILFromFSIL [SHELL32.95] * * NOTES * pild = CSIDL_DESKTOP ret = 0 * pild = CSIDL_DRIVES ret = 0 */ LPITEMIDLIST WINAPI SHLogILFromFSIL(LPITEMIDLIST pidl) { FIXME("(pidl=%p)\n",pidl); pdump(pidl); return 0; } /************************************************************************* * ILGetSize [SHELL32.152] * gets the byte size of an idlist including zero terminator (pidl) * * PARAMETERS * pidl ITEMIDLIST * * RETURNS * size of pidl * * NOTES * exported by ordinal */ DWORD WINAPI ILGetSize(LPITEMIDLIST pidl) { LPSHITEMID si = &(pidl->mkid); DWORD len=0; if (pidl) { while (si->cb) { len += si->cb; si = (LPSHITEMID)(((LPBYTE)si)+si->cb); } len += 2; } TRACE("pidl=%p size=%lu\n",pidl, len); return len; } /************************************************************************* * ILGetNext [SHELL32.153] * gets the next simple pidl of a complex pidl * * observed return values: * null -> null * desktop -> null * simple pidl -> pointer to 0x0000 element * */ LPITEMIDLIST WINAPI ILGetNext(LPITEMIDLIST pidl) { WORD len; TRACE("(pidl=%p)\n",pidl); if(pidl) { len = pidl->mkid.cb; if (len) { pidl = (LPITEMIDLIST) (((LPBYTE)pidl)+len); return pidl; } } return NULL; } /************************************************************************* * ILAppend [SHELL32.154] * * NOTES * Adds the single item to the idlist indicated by pidl. * if bEnd is 0, adds the item to the front of the list, * otherwise adds the item to the end. (???) * Destroys the passed in idlist! (???) */ LPITEMIDLIST WINAPI ILAppend(LPITEMIDLIST pidl,LPCITEMIDLIST item,BOOL bEnd) { LPITEMIDLIST idlRet; WARN("(pidl=%p,pidl=%p,%08u)semi-stub\n",pidl,item,bEnd); pdump (pidl); pdump (item); if (_ILIsDesktop(pidl)) { idlRet = ILClone(item); if (pidl) SHFree (pidl); return idlRet; } if (bEnd) { idlRet=ILCombine(pidl,item); } else { idlRet=ILCombine(item,pidl); } SHFree(pidl); return idlRet; } /************************************************************************* * ILFree [SHELL32.155] * * NOTES * free_check_ptr - frees memory (if not NULL) * allocated by SHMalloc allocator * exported by ordinal */ DWORD WINAPI ILFree(LPITEMIDLIST pidl) { TRACE("(pidl=0x%08lx)\n",(DWORD)pidl); if(!pidl) return FALSE; SHFree(pidl); return TRUE; } /************************************************************************* * ILGlobalFree [SHELL32.156] * */ void WINAPI ILGlobalFree( LPCITEMIDLIST pidl) { TRACE("%p\n",pidl); if(!pidl) return; pCOMCTL32_Free(pidl); } /************************************************************************* * ILCreateFromPath [SHELL32.157] * */ LPITEMIDLIST WINAPI ILCreateFromPathA (LPCSTR path) { LPITEMIDLIST pidlnew; DWORD attributes = 0; TRACE_(shell)("%s\n",path); if (SUCCEEDED (SHILCreateFromPathA (path, &pidlnew, &attributes))) return pidlnew; return FALSE; } LPITEMIDLIST WINAPI ILCreateFromPathW (LPCWSTR path) { LPITEMIDLIST pidlnew; DWORD attributes = 0; TRACE_(shell)("%s\n",debugstr_w(path)); if (SUCCEEDED (SHILCreateFromPathW (path, &pidlnew, &attributes))) return pidlnew; return FALSE; } LPITEMIDLIST WINAPI ILCreateFromPathAW (LPCVOID path) { if ( VERSION_OsIsUnicode()) return ILCreateFromPathW (path); return ILCreateFromPathA (path); } /************************************************************************* * SHSimpleIDListFromPath [SHELL32.162] */ LPITEMIDLIST WINAPI SHSimpleIDListFromPathA (LPCSTR lpszPath) { LPITEMIDLIST pidl=NULL; HANDLE hFile; WIN32_FIND_DATAA stffile; TRACE("path=%s\n", lpszPath); if (!lpszPath) return NULL; hFile = FindFirstFileA(lpszPath, &stffile); if ( hFile != INVALID_HANDLE_VALUE ) { if (stffile.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) { pidl = _ILCreateFolder (&stffile); } else { pidl = _ILCreateValue (&stffile); } FindClose (hFile); } return pidl; } LPITEMIDLIST WINAPI SHSimpleIDListFromPathW (LPCWSTR lpszPath) { char lpszTemp[MAX_PATH]; TRACE("path=%s\n",debugstr_w(lpszPath)); lstrcpynWtoA(lpszTemp, lpszPath, MAX_PATH); return SHSimpleIDListFromPathA (lpszTemp); } LPITEMIDLIST WINAPI SHSimpleIDListFromPathAW (LPCVOID lpszPath) { if ( VERSION_OsIsUnicode()) return SHSimpleIDListFromPathW (lpszPath); return SHSimpleIDListFromPathA (lpszPath); } /************************************************************************* * SHGetSpecialFolderLocation [SHELL32.223] * * gets the folder locations from the registry and creates a pidl * creates missing reg keys and directorys * * PARAMS * hwndOwner [I] * nFolder [I] CSIDL_xxxxx * ppidl [O] PIDL of a special folder * */ HRESULT WINAPI SHGetSpecialFolderLocation( HWND hwndOwner, INT nFolder, LPITEMIDLIST * ppidl) { CHAR szPath[MAX_PATH]; HRESULT hr = E_INVALIDARG; TRACE_(shell)("(%04x,0x%x,%p)\n", hwndOwner,nFolder,ppidl); *ppidl = NULL; if (ppidl) { switch (nFolder) { case CSIDL_DESKTOP: *ppidl = _ILCreateDesktop(); hr = NOERROR; break; case CSIDL_DRIVES: *ppidl = _ILCreateMyComputer(); hr = NOERROR; break; case CSIDL_NETWORK: *ppidl = _ILCreateNetwork (); hr = NOERROR; break; case CSIDL_CONTROLS: *ppidl = _ILCreateControl (); hr = NOERROR; break; case CSIDL_PRINTERS: *ppidl = _ILCreatePrinter (); hr = NOERROR; break; case CSIDL_BITBUCKET: *ppidl = _ILCreateBitBucket (); hr = NOERROR; break; default: if (SHGetSpecialFolderPathA(hwndOwner, szPath, nFolder, TRUE)) { DWORD attributes=0; TRACE_(shell)("Value=%s\n",szPath); hr = SHILCreateFromPathA(szPath, ppidl, &attributes); } } } TRACE_(shell)("-- (new pidl %p)\n",*ppidl); return hr; } /************************************************************************* * SHGetDataFromIDListA [SHELL32.247] * * NOTES * the pidl can be a simple one. since we cant get the path out of the pidl * we have to take all data from the pidl */ HRESULT WINAPI SHGetDataFromIDListA(LPSHELLFOLDER psf, LPCITEMIDLIST pidl, int nFormat, LPVOID dest, int len) { TRACE_(shell)("sf=%p pidl=%p 0x%04x %p 0x%04x stub\n",psf,pidl,nFormat,dest,len); pdump(pidl); if (!psf || !dest ) return E_INVALIDARG; switch (nFormat) { case SHGDFIL_FINDDATA: { WIN32_FIND_DATAA * pfd = dest; if ( len < sizeof (WIN32_FIND_DATAA)) return E_INVALIDARG; ZeroMemory(pfd, sizeof (WIN32_FIND_DATAA)); _ILGetFileDateTime( pidl, &(pfd->ftLastWriteTime)); pfd->dwFileAttributes = _ILGetFileAttributes(pidl, NULL, 0); pfd->nFileSizeLow = _ILGetFileSize ( pidl, NULL, 0); lstrcpynA(pfd->cFileName,_ILGetTextPointer(pidl), MAX_PATH); lstrcpynA(pfd->cAlternateFileName,_ILGetSTextPointer(pidl), 14); } return NOERROR; case SHGDFIL_NETRESOURCE: case SHGDFIL_DESCRIPTIONID: FIXME_(shell)("SHGDFIL %i stub\n", nFormat); break; default: ERR_(shell)("Unknown SHGDFIL %i, please report\n", nFormat); } return E_INVALIDARG; } /************************************************************************* * SHGetDataFromIDListW [SHELL32.247] * */ HRESULT WINAPI SHGetDataFromIDListW(LPSHELLFOLDER psf, LPCITEMIDLIST pidl, int nFormat, LPVOID dest, int len) { TRACE_(shell)("sf=%p pidl=%p 0x%04x %p 0x%04x stub\n",psf,pidl,nFormat,dest,len); pdump(pidl); if (! psf || !dest ) return E_INVALIDARG; switch (nFormat) { case SHGDFIL_FINDDATA: { WIN32_FIND_DATAW * pfd = dest; if ( len < sizeof (WIN32_FIND_DATAW)) return E_INVALIDARG; ZeroMemory(pfd, sizeof (WIN32_FIND_DATAA)); _ILGetFileDateTime( pidl, &(pfd->ftLastWriteTime)); pfd->dwFileAttributes = _ILGetFileAttributes(pidl, NULL, 0); pfd->nFileSizeLow = _ILGetFileSize ( pidl, NULL, 0); lstrcpynAtoW(pfd->cFileName,_ILGetTextPointer(pidl), MAX_PATH); lstrcpynAtoW(pfd->cAlternateFileName,_ILGetSTextPointer(pidl), 14); } return NOERROR; case SHGDFIL_NETRESOURCE: case SHGDFIL_DESCRIPTIONID: FIXME_(shell)("SHGDFIL %i stub\n", nFormat); break; default: ERR_(shell)("Unknown SHGDFIL %i, please report\n", nFormat); } return E_INVALIDARG; } /************************************************************************* * SHGetPathFromIDListA [SHELL32.261][NT 4.0: SHELL32.220] * * PARAMETERS * pidl, [IN] pidl * pszPath [OUT] path * * RETURNS * path from a passed PIDL. * * NOTES * NULL returns FALSE * desktop pidl gives path to desktopdirectory back * special pidls returning FALSE * * FIXME * fnGetDisplayNameOf can return different types of OLEString */ BOOL WINAPI SHGetPathFromIDListA (LPCITEMIDLIST pidl,LPSTR pszPath) { STRRET str; LPSHELLFOLDER shellfolder; TRACE_(shell)("(pidl=%p,%p)\n",pidl,pszPath); if (!pidl) return FALSE; pdump(pidl); if(_ILIsDesktop(pidl)) { SHGetSpecialFolderPathA(0, pszPath, CSIDL_DESKTOPDIRECTORY, FALSE); } else if (_ILIsSpecialFolder(ILFindLastID(pidl))) { /* we are somewhere in a special folder */ return FALSE; } else { if (SHGetDesktopFolder(&shellfolder)==S_OK) { IShellFolder_GetDisplayNameOf(shellfolder,pidl,SHGDN_FORPARSING,&str); StrRetToStrNA (pszPath, MAX_PATH, &str, pidl); IShellFolder_Release(shellfolder); } } TRACE_(shell)("-- (%s)\n",pszPath); return TRUE; } /************************************************************************* * SHGetPathFromIDListW [SHELL32.262] */ BOOL WINAPI SHGetPathFromIDListW (LPCITEMIDLIST pidl,LPWSTR pszPath) { char sTemp[MAX_PATH]; TRACE_(shell)("(pidl=%p)\n", pidl); SHGetPathFromIDListA (pidl, sTemp); lstrcpyAtoW(pszPath, sTemp); TRACE_(shell)("-- (%s)\n",debugstr_w(pszPath)); return TRUE; } /************************************************************************* * SHBindToParent [shell version 5.0] */ HRESULT WINAPI SHBindToParent(LPCITEMIDLIST pidl, REFIID riid, LPVOID *ppv, LPCITEMIDLIST *ppidlLast) { IShellFolder * psf; LPITEMIDLIST pidlChild, pidlParent; HRESULT hr=E_FAIL; TRACE_(shell)("pidl=%p\n", pidl); pdump(pidl); *ppv = NULL; if (ppidlLast) *ppidlLast = NULL; if (_ILIsPidlSimple(pidl)) { /* we are on desktop level */ if (ppidlLast) *ppidlLast = ILClone(pidl); hr = SHGetDesktopFolder((IShellFolder**)ppv); } else { pidlChild = ILClone(ILFindLastID(pidl)); pidlParent = ILClone(pidl); ILRemoveLastID(pidlParent); hr = SHGetDesktopFolder(&psf); if (SUCCEEDED(hr)) hr = IShellFolder_BindToObject(psf, pidlParent, NULL, riid, ppv); if (SUCCEEDED(hr) && ppidlLast) *ppidlLast = pidlChild; else ILFree (pidlChild); SHFree (pidlParent); if (psf) IShellFolder_Release(psf); } TRACE_(shell)("-- psf=%p pidl=%p ret=0x%08lx\n", *ppv, (ppidlLast)?*ppidlLast:NULL, hr); return hr; } /************************************************************************* * SHGetPathFromIDListAW [SHELL32.221][NT 4.0: SHELL32.219] */ BOOL WINAPI SHGetPathFromIDListAW(LPCITEMIDLIST pidl,LPVOID pszPath) { TRACE_(shell)("(pidl=%p,%p)\n",pidl,pszPath); if (VERSION_OsIsUnicode()) return SHGetPathFromIDListW(pidl,pszPath); return SHGetPathFromIDListA(pidl,pszPath); } /************************************************************************** * * internal functions * * ### 1. section creating pidls ### * ************************************************************************* * _ILCreateDesktop() * _ILCreateIExplore() * _ILCreateMyComputer() * _ILCreateDrive() * _ILCreateFolder() * _ILCreateValue() */ LPITEMIDLIST _ILCreateDesktop() { TRACE("()\n"); return _ILCreate(PT_DESKTOP, NULL, 0); } LPITEMIDLIST _ILCreateMyComputer() { TRACE("()\n"); return _ILCreate(PT_MYCOMP, &CLSID_MyComputer, sizeof(GUID)); } LPITEMIDLIST _ILCreateIExplore() { TRACE("()\n"); return _ILCreate(PT_MYCOMP, &CLSID_Internet, sizeof(GUID)); } LPITEMIDLIST _ILCreateControl() { TRACE("()\n"); return _ILCreate(PT_SPECIAL, &CLSID_ControlPanel, sizeof(GUID)); } LPITEMIDLIST _ILCreatePrinter() { TRACE("()\n"); return _ILCreate(PT_SPECIAL, &CLSID_Printers, sizeof(GUID)); } LPITEMIDLIST _ILCreateNetwork() { TRACE("()\n"); return _ILCreate(PT_MYCOMP, &CLSID_NetworkPlaces, sizeof(GUID)); } LPITEMIDLIST _ILCreateBitBucket() { TRACE("()\n"); return _ILCreate(PT_MYCOMP, &CLSID_RecycleBin, sizeof(GUID)); } LPITEMIDLIST _ILCreateDrive( LPCSTR lpszNew) { char sTemp[4]; lstrcpynA (sTemp,lpszNew,4); sTemp[2]='\\'; sTemp[3]=0x00; TRACE("(%s)\n",sTemp); return _ILCreate(PT_DRIVE,(LPVOID)&sTemp[0],4); } LPITEMIDLIST _ILCreateFolder( WIN32_FIND_DATAA * stffile ) { char buff[MAX_PATH + 14 +1]; /* see WIN32_FIND_DATA */ char * pbuff = buff; ULONG len, len1; LPITEMIDLIST pidl; TRACE("(%s, %s)\n",stffile->cAlternateFileName, stffile->cFileName); /* prepare buffer with both names */ len = strlen (stffile->cFileName) + 1; memcpy (pbuff, stffile->cFileName, len); pbuff += len; if (stffile->cAlternateFileName) { len1 = strlen (stffile->cAlternateFileName)+1; memcpy (pbuff, stffile->cAlternateFileName, len1); } else { len1 = 1; *pbuff = 0x00; } pidl = _ILCreate(PT_FOLDER, (LPVOID)buff, len + len1); /* set attributes */ if (pidl) { LPPIDLDATA pData; pData = _ILGetDataPointer(pidl); FileTimeToDosDateTime(&(stffile->ftLastWriteTime),&pData->u.folder.uFileDate,&pData->u.folder.uFileTime); pData->u.folder.dwFileSize = stffile->nFileSizeLow; pData->u.folder.uFileAttribs=stffile->dwFileAttributes; } return pidl; } LPITEMIDLIST _ILCreateValue(WIN32_FIND_DATAA * stffile) { char buff[MAX_PATH + 14 +1]; /* see WIN32_FIND_DATA */ char * pbuff = buff; ULONG len, len1; LPITEMIDLIST pidl; TRACE("(%s, %s)\n",stffile->cAlternateFileName, stffile->cFileName); /* prepare buffer with both names */ len = strlen (stffile->cFileName) + 1; memcpy (pbuff, stffile->cFileName, len); pbuff += len; if (stffile->cAlternateFileName) { len1 = strlen (stffile->cAlternateFileName)+1; memcpy (pbuff, stffile->cAlternateFileName, len1); } else { len1 = 1; *pbuff = 0x00; } pidl = _ILCreate(PT_VALUE, (LPVOID)buff, len + len1); /* set attributes */ if (pidl) { LPPIDLDATA pData; pData = _ILGetDataPointer(pidl); FileTimeToDosDateTime(&(stffile->ftLastWriteTime),&pData->u.folder.uFileDate,&pData->u.folder.uFileTime); pData->u.folder.dwFileSize = stffile->nFileSizeLow; pData->u.folder.uFileAttribs=stffile->dwFileAttributes; } return pidl; } LPITEMIDLIST _ILCreateSpecial(LPCSTR szGUID) { IID iid; CLSIDFromString16(szGUID,&iid); return _ILCreate(PT_MYCOMP, &iid, sizeof(IID)); } /************************************************************************** * _ILCreate() * Creates a new PIDL * type = PT_DESKTOP | PT_DRIVE | PT_FOLDER | PT_VALUE * pIn = data * uInSize = size of data (raw) */ LPITEMIDLIST _ILCreate(PIDLTYPE type, LPCVOID pIn, UINT16 uInSize) { LPITEMIDLIST pidlOut = NULL, pidlTemp = NULL; LPPIDLDATA pData; UINT16 uSize = 0; LPSTR pszDest; TRACE("(0x%02x %p %i)\n",type,pIn,uInSize); switch (type) { case PT_DESKTOP: uSize = 0; pidlOut = SHAlloc(uSize + 2); pidlOut->mkid.cb = uSize; TRACE("- create Desktop\n"); break; case PT_MYCOMP: uSize = 2 + 2 + sizeof(GUID); pidlOut = SHAlloc(uSize + 2); ZeroMemory(pidlOut, uSize + 2); pidlOut->mkid.cb = uSize; pData =_ILGetDataPointer(pidlOut); pData->type = type; memcpy(&(pData->u.mycomp.guid), pIn, uInSize); TRACE("- create GUID-pidl\n"); break; case PT_DRIVE: uSize = 2 + 23; pidlOut = SHAlloc(uSize + 2); ZeroMemory(pidlOut, uSize + 2); pidlOut->mkid.cb = uSize; pData =_ILGetDataPointer(pidlOut); pData->type = type; pszDest = _ILGetTextPointer(pidlOut); memcpy(pszDest, pIn, uInSize); TRACE("- create Drive: %s\n",debugstr_a(pszDest)); break; case PT_FOLDER: case PT_VALUE: uSize = 2 + 12 + uInSize; pidlOut = SHAlloc(uSize + 2); ZeroMemory(pidlOut, uSize + 2); pidlOut->mkid.cb = uSize; pData =_ILGetDataPointer(pidlOut); pData->type = type; pszDest = _ILGetTextPointer(pidlOut); memcpy(pszDest, pIn, uInSize); TRACE("- create Value: %s\n",debugstr_a(pszDest)); break; } pidlTemp = ILGetNext(pidlOut); if (pidlTemp) pidlTemp->mkid.cb = 0x00; TRACE("-- (pidl=%p, size=%u)\n", pidlOut, uSize); return pidlOut; } /************************************************************************** * _ILGetDrive() * * Gets the text for the drive eg. 'c:\' * * RETURNS * strlen (lpszText) */ DWORD _ILGetDrive(LPCITEMIDLIST pidl,LPSTR pOut, UINT16 uSize) { TRACE("(%p,%p,%u)\n",pidl,pOut,uSize); if(_ILIsMyComputer(pidl)) pidl = ILGetNext(pidl); if (pidl && _ILIsDrive(pidl)) return _ILSimpleGetText(pidl, pOut, uSize); return 0; } /************************************************************************** * * ### 2. section testing pidls ### * ************************************************************************** * _ILIsDesktop() * _ILIsMyComputer() * _ILIsSpecialFolder() * _ILIsDrive() * _ILIsFolder() * _ILIsValue() * _ILIsPidlSimple() */ BOOL _ILIsDesktop(LPCITEMIDLIST pidl) { TRACE("(%p)\n",pidl); return ( !pidl || (pidl && pidl->mkid.cb == 0x00) ); } BOOL _ILIsMyComputer(LPCITEMIDLIST pidl) { REFIID iid = _ILGetGUIDPointer(pidl); TRACE("(%p)\n",pidl); if (iid) return IsEqualIID(iid, &CLSID_MyComputer); return FALSE; } BOOL _ILIsSpecialFolder (LPCITEMIDLIST pidl) { LPPIDLDATA lpPData = _ILGetDataPointer(pidl); TRACE("(%p)\n",pidl); return (pidl && ( (lpPData && (PT_MYCOMP== lpPData->type || PT_SPECIAL== lpPData->type)) || (pidl && pidl->mkid.cb == 0x00) )); } BOOL _ILIsDrive(LPCITEMIDLIST pidl) { LPPIDLDATA lpPData = _ILGetDataPointer(pidl); TRACE("(%p)\n",pidl); return (pidl && lpPData && (PT_DRIVE == lpPData->type || PT_DRIVE1 == lpPData->type || PT_DRIVE2 == lpPData->type || PT_DRIVE3 == lpPData->type)); } BOOL _ILIsFolder(LPCITEMIDLIST pidl) { LPPIDLDATA lpPData = _ILGetDataPointer(pidl); TRACE("(%p)\n",pidl); return (pidl && lpPData && (PT_FOLDER == lpPData->type || PT_FOLDER1 == lpPData->type)); } BOOL _ILIsValue(LPCITEMIDLIST pidl) { LPPIDLDATA lpPData = _ILGetDataPointer(pidl); TRACE("(%p)\n",pidl); return (pidl && lpPData && PT_VALUE == lpPData->type); } /************************************************************************** * _ILIsPidlSimple */ BOOL _ILIsPidlSimple ( LPCITEMIDLIST pidl) { BOOL ret = TRUE; if(! _ILIsDesktop(pidl)) /* pidl=NULL or mkid.cb=0 */ { WORD len = pidl->mkid.cb; LPCITEMIDLIST pidlnext = (LPCITEMIDLIST) (((LPBYTE)pidl) + len ); if (pidlnext->mkid.cb) ret = FALSE; } TRACE("%s\n", ret ? "Yes" : "No"); return ret; } /************************************************************************** * * ### 3. section getting values from pidls ### */ /************************************************************************** * _ILSimpleGetText * * gets the text for the first item in the pidl (eg. simple pidl) * * returns the lenght of the string */ DWORD _ILSimpleGetText (LPCITEMIDLIST pidl, LPSTR szOut, UINT uOutSize) { DWORD dwReturn=0; LPSTR szSrc; GUID const * riid; char szTemp[MAX_PATH]; TRACE("(%p %p %x)\n",pidl,szOut,uOutSize); if (!pidl) return 0; if (szOut) *szOut = 0; if (_ILIsDesktop(pidl)) { /* desktop */ if (HCR_GetClassName(&CLSID_ShellDesktop, szTemp, MAX_PATH)) { if (szOut) lstrcpynA(szOut, szTemp, uOutSize); dwReturn = strlen (szTemp); } } else if (( szSrc = _ILGetTextPointer(pidl) )) { /* filesystem */ if (szOut) lstrcpynA(szOut, szSrc, uOutSize); dwReturn = strlen(szSrc); } else if (( riid = _ILGetGUIDPointer(pidl) )) { /* special folder */ if ( HCR_GetClassName(riid, szTemp, MAX_PATH) ) { if (szOut) lstrcpynA(szOut, szTemp, uOutSize); dwReturn = strlen (szTemp); } } else { ERR("-- no text\n"); } TRACE("-- (%p=%s 0x%08lx)\n",szOut,(char*)szOut,dwReturn); return dwReturn; } /************************************************************************** * * ### 4. getting pointers to parts of pidls ### * ************************************************************************** * _ILGetDataPointer() */ LPPIDLDATA _ILGetDataPointer(LPITEMIDLIST pidl) { if(pidl && pidl->mkid.cb != 0x00) return (LPPIDLDATA) &(pidl->mkid.abID); return NULL; } /************************************************************************** * _ILGetTextPointer() * gets a pointer to the long filename string stored in the pidl */ LPSTR _ILGetTextPointer(LPCITEMIDLIST pidl) {/* TRACE(pidl,"(pidl%p)\n", pidl);*/ LPPIDLDATA pdata =_ILGetDataPointer(pidl); if (pdata) { switch (pdata->type) { case PT_MYCOMP: case PT_SPECIAL: return NULL; case PT_DRIVE: case PT_DRIVE1: case PT_DRIVE2: case PT_DRIVE3: return (LPSTR)&(pdata->u.drive.szDriveName); case PT_FOLDER: case PT_FOLDER1: case PT_VALUE: case PT_IESPECIAL: return (LPSTR)&(pdata->u.file.szNames); case PT_WORKGRP: case PT_COMP: case PT_NETWORK: case PT_SHARE: return (LPSTR)&(pdata->u.network.szNames); } } return NULL; } /************************************************************************** * _ILGetSTextPointer() * gets a pointer to the short filename string stored in the pidl */ LPSTR _ILGetSTextPointer(LPCITEMIDLIST pidl) {/* TRACE(pidl,"(pidl%p)\n", pidl);*/ LPPIDLDATA pdata =_ILGetDataPointer(pidl); if (pdata) { switch (pdata->type) { case PT_FOLDER: case PT_VALUE: case PT_IESPECIAL: return (LPSTR)(pdata->u.file.szNames + strlen (pdata->u.file.szNames) + 1); case PT_WORKGRP: return (LPSTR)(pdata->u.network.szNames + strlen (pdata->u.network.szNames) + 1); } } return NULL; } /************************************************************************** * _ILGetGUIDPointer() * * returns reference to guid stored in some pidls */ REFIID _ILGetGUIDPointer(LPCITEMIDLIST pidl) { LPPIDLDATA pdata =_ILGetDataPointer(pidl); if (pdata) { switch (pdata->type) { case PT_SPECIAL: case PT_MYCOMP: return (REFIID) &(pdata->u.mycomp.guid); } } return NULL; } /************************************************************************* * _ILGetFileDateTime * * Given the ItemIdList, get the FileTime * * PARAMS * pidl [I] The ItemIDList * pFt [I] the resulted FILETIME of the file * * RETURNS * True if Successful * * NOTES * */ BOOL _ILGetFileDateTime(LPCITEMIDLIST pidl, FILETIME *pFt) { LPPIDLDATA pdata =_ILGetDataPointer(pidl); if(! pdata) return FALSE; switch (pdata->type) { case PT_FOLDER: DosDateTimeToFileTime(pdata->u.folder.uFileDate, pdata->u.folder.uFileTime, pFt); break; case PT_VALUE: DosDateTimeToFileTime(pdata->u.file.uFileDate, pdata->u.file.uFileTime, pFt); break; default: return FALSE; } return TRUE; } BOOL _ILGetFileDate (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize) { FILETIME ft,lft; SYSTEMTIME time; if (! _ILGetFileDateTime( pidl, &ft )) return FALSE; FileTimeToLocalFileTime(&ft, &lft); FileTimeToSystemTime (&lft, &time); return GetDateFormatA(LOCALE_USER_DEFAULT,DATE_SHORTDATE,&time, NULL, pOut, uOutSize); } /************************************************************************* * _ILGetFileSize * * Given the ItemIdList, get the FileSize * * PARAMS * pidl [I] The ItemIDList * pOut [I] The buffer to save the result * uOutsize [I] The size of the buffer * * RETURNS * The FileSize * * NOTES * pOut can be null when no string is needed * */ DWORD _ILGetFileSize (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize) { LPPIDLDATA pdata =_ILGetDataPointer(pidl); DWORD dwSize; if(! pdata) return 0; switch (pdata->type) { case PT_VALUE: dwSize = pdata->u.file.dwFileSize; if (pOut) StrFormatByteSizeA(dwSize, pOut, uOutSize); return dwSize; } if (pOut) *pOut = 0x00; return 0; } BOOL _ILGetExtension (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize) { char szTemp[MAX_PATH]; const char * pPoint; LPITEMIDLIST pidlTemp=pidl; TRACE("pidl=%p\n",pidl); if (!pidl) return FALSE; pidlTemp = ILFindLastID(pidl); if (!_ILIsValue(pidlTemp)) return FALSE; if (!_ILSimpleGetText(pidlTemp, szTemp, MAX_PATH)) return FALSE; pPoint = PathFindExtensionA(szTemp); if (! *pPoint) return FALSE; pPoint++; lstrcpynA(pOut, pPoint, uOutSize); TRACE("%s\n",pOut); return TRUE; } /************************************************************************* * _ILGetFileType * * Given the ItemIdList, get the file type description * * PARAMS * pidl [I] The ItemIDList (simple) * pOut [I] The buffer to save the result * uOutsize [I] The size of the buffer * * RETURNS * nothing * * NOTES * This function copies as much as possible into the buffer. */ void _ILGetFileType(LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize) { if(_ILIsValue(pidl)) { char sTemp[64]; if(uOutSize > 0) { pOut[0] = 0; } if (_ILGetExtension (pidl, sTemp, 64)) { if (!( HCR_MapTypeToValue(sTemp, sTemp, 64, TRUE) && HCR_MapTypeToValue(sTemp, pOut, uOutSize, FALSE ))) { lstrcpynA (pOut, sTemp, uOutSize - 6); strcat (pOut, "-file"); } } } else { lstrcpynA(pOut, "Folder", uOutSize); } } /************************************************************************* * _ILGetFileAttributes * * Given the ItemIdList, get the Attrib string format * * PARAMS * pidl [I] The ItemIDList * pOut [I] The buffer to save the result * uOutsize [I] The size of the Buffer * * RETURNS * Attributes * * FIXME * return value 0 in case of error is a valid return value * */ DWORD _ILGetFileAttributes(LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize) { LPPIDLDATA pData =_ILGetDataPointer(pidl); WORD wAttrib = 0; int i; if(! pData) return 0; switch(pData->type) { case PT_FOLDER: wAttrib = pData->u.folder.uFileAttribs; break; case PT_VALUE: wAttrib = pData->u.file.uFileAttribs; break; } if(uOutSize >= 6) { i=0; if(wAttrib & FILE_ATTRIBUTE_READONLY) { pOut[i++] = 'R'; } if(wAttrib & FILE_ATTRIBUTE_HIDDEN) { pOut[i++] = 'H'; } if(wAttrib & FILE_ATTRIBUTE_SYSTEM) { pOut[i++] = 'S'; } if(wAttrib & FILE_ATTRIBUTE_ARCHIVE) { pOut[i++] = 'A'; } if(wAttrib & FILE_ATTRIBUTE_COMPRESSED) { pOut[i++] = 'C'; } pOut[i] = 0x00; } return wAttrib; } /************************************************************************* * ILFreeaPidl * * free a aPidl struct */ void _ILFreeaPidl(LPITEMIDLIST * apidl, UINT cidl) { int i; if(apidl) { for(i = 0; i < cidl; i++) SHFree(apidl[i]); SHFree(apidl); } } /************************************************************************* * ILCopyaPidl * * copys a aPidl struct */ LPITEMIDLIST * _ILCopyaPidl(LPITEMIDLIST * apidlsrc, UINT cidl) { int i; LPITEMIDLIST * apidldest = (LPITEMIDLIST*)SHAlloc(cidl * sizeof(LPITEMIDLIST)); if(!apidlsrc) return NULL; for(i = 0; i < cidl; i++) apidldest[i] = ILClone(apidlsrc[i]); return apidldest; } /************************************************************************* * _ILCopyCidaToaPidl * * creates aPidl from CIDA */ LPITEMIDLIST * _ILCopyCidaToaPidl(LPITEMIDLIST* pidl, LPCIDA cida) { int i; LPITEMIDLIST * dst = (LPITEMIDLIST*)SHAlloc(cida->cidl * sizeof(LPITEMIDLIST)); if(!dst) return NULL; if (pidl) *pidl = ILClone((LPITEMIDLIST)(&((LPBYTE)cida)[cida->aoffset[0]])); for(i = 0; i < cida->cidl; i++) dst[i] = ILClone((LPITEMIDLIST)(&((LPBYTE)cida)[cida->aoffset[i + 1]])); return dst; } wine-20000526/dlls/shell32/pidl.h0100644000175000001440000001230607056017760015767 0ustar julliardusers/* * internal pidl functions * 1998 * * DO NOT use this definitions outside the shell32.dll ! * * The contents of a pidl should never used from a application * directly. * * Undocumented: * MS says: the abID of SHITEMID should be treated as binary data and not * be interpreted by applications. Applies to everyone but MS itself. * Word95 interprets the contents of abID (Filesize/Date) so we have to go * for binary compatibility here. */ #ifndef __WINE_PIDL_H #define __WINE_PIDL_H #include "shlobj.h" /* * the pidl does cache fileattributes to speed up SHGetAttributes when * displaying a big number of files. * * a pidl of NULL means the desktop * * The structure of the pidl seems to be a union. The first byte of the * PIDLDATA desribes the type of pidl. * * object ! first byte / ! format ! living space * ! size * ---------------------------------------------------------------- * my computer 0x1F/20 mycomp (2) (usual) * network 0x1F mycomp * bitbucket 0x1F mycomp * drive 0x23/25 drive (usual) * drive 0x25/25 drive (lnk/persistant) * drive 0x29/25 drive * shell extension 0x2E mycomp * drive 0x2F drive (lnk/persistant) * folder/file 0x30 folder/file (1) (lnk/persistant) * folder 0x31 folder (usual) * value 0x32 file (usual) * workgroup 0x41 network (3) * computer 0x42 network (4) * whole network 0x47 network (5) * MSITStore 0x61 htmlhlp (7) * history/favorites 0xb1 file * share 0xc3 network (6) * * guess: the persistant elements are non tracking * * (1) dummy byte is used, attributes are empty * (2) IID_MyComputer = 20D04FE0L-3AEA-1069-A2D8-08002B30309D * (3) two strings "workgroup" "microsoft network" * (4) one string "\\sirius" * (5) one string "whole network" * (6) one string "\\sirius\c" * (7) contains string "mk:@MSITStore:C:\path\file.chm::/path/filename.htm" * GUID 871C5380-42A0-1069-A2EA-08002B30309D */ #define PT_DESKTOP 0x00 /* internal */ #define PT_MYCOMP 0x1F #define PT_DRIVE 0x23 #define PT_DRIVE2 0x25 #define PT_DRIVE3 0x29 #define PT_SPECIAL 0x2E #define PT_DRIVE1 0x2F #define PT_FOLDER1 0x30 #define PT_FOLDER 0x31 #define PT_VALUE 0x32 #define PT_WORKGRP 0x41 #define PT_COMP 0x42 #define PT_NETWORK 0x47 #define PT_IESPECIAL 0xb1 #define PT_SHARE 0xc3 #include "pshpack1.h" typedef BYTE PIDLTYPE; typedef struct tagPIDLDATA { PIDLTYPE type; /*00*/ union { struct { BYTE dummy; /*01*/ GUID guid; /*02*/ BYTE dummy1; /*18*/ } mycomp; struct { CHAR szDriveName[20]; /*01*/ DWORD dwUnknown; /*21*/ /* the drive seems to be 25 bytes every time */ } drive; struct { BYTE dummy; /*01 is 0x00 for files or dirs */ DWORD dwFileSize; /*02*/ WORD uFileDate; /*06*/ WORD uFileTime; /*08*/ WORD uFileAttribs; /*10*/ CHAR szNames[1]; /*12*/ /* Here are comming two strings. The first is the long name. The second the dos name when needed or just 0x00 */ } file, folder, generic; struct { WORD dummy; /*01*/ CHAR szNames[1]; /*03*/ } network; struct { WORD dummy; /*01*/ DWORD dummy1; /*02*/ CHAR szName[1]; /*06*/ /* teminated by 0x00 0x00 */ } htmlhelp; }u; } PIDLDATA, *LPPIDLDATA; #include "poppack.h" /* * getting special values from simple pidls */ DWORD _ILSimpleGetText (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize); BOOL _ILGetFileDate (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize); DWORD _ILGetFileSize (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize); BOOL _ILGetExtension (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize); void _ILGetFileType (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize); DWORD _ILGetFileAttributes (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize); BOOL _ILGetFileDateTime (LPCITEMIDLIST pidl, FILETIME *ft); DWORD _ILGetDrive (LPCITEMIDLIST, LPSTR, UINT16); /* * testing simple pidls */ BOOL _ILIsDesktop (LPCITEMIDLIST pidl); BOOL _ILIsMyComputer (LPCITEMIDLIST pidl); BOOL _ILIsDrive (LPCITEMIDLIST pidl); BOOL _ILIsFolder (LPCITEMIDLIST pidl); BOOL _ILIsValue (LPCITEMIDLIST pidl); BOOL _ILIsSpecialFolder (LPCITEMIDLIST pidl); BOOL _ILIsPidlSimple (LPCITEMIDLIST pidl); /* * simple pidls from strings */ LPITEMIDLIST _ILCreate (PIDLTYPE,LPCVOID,UINT16); LPITEMIDLIST _ILCreateDesktop (void); LPITEMIDLIST _ILCreateMyComputer (void); LPITEMIDLIST _ILCreateIExplore (void); LPITEMIDLIST _ILCreateControl (void); LPITEMIDLIST _ILCreatePrinter (void); LPITEMIDLIST _ILCreateNetwork (void); LPITEMIDLIST _ILCreateBitBucket (void); LPITEMIDLIST _ILCreateDrive (LPCSTR); LPITEMIDLIST _ILCreateFolder (WIN32_FIND_DATAA * stffile); LPITEMIDLIST _ILCreateValue (WIN32_FIND_DATAA * stffile); LPITEMIDLIST _ILCreateSpecial (LPCSTR szGUID); /* * helper functions (getting struct-pointer) */ LPPIDLDATA _ILGetDataPointer (LPCITEMIDLIST); LPSTR _ILGetTextPointer (LPCITEMIDLIST); LPSTR _ILGetSTextPointer (LPCITEMIDLIST); REFIID _ILGetGUIDPointer (LPCITEMIDLIST pidl); /* * debug helper */ void pdump (LPCITEMIDLIST pidl); BOOL pcheck (LPCITEMIDLIST pidl); /* * aPidl helper */ void _ILFreeaPidl(LPITEMIDLIST * apidl, UINT cidl); LPITEMIDLIST * _ILCopyaPidl(LPITEMIDLIST * apidlsrc, UINT cidl); LPITEMIDLIST * _ILCopyCidaToaPidl(LPITEMIDLIST* pidl, LPCIDA cida); #endif wine-20000526/dlls/shell32/regstream.c0100644000175000001440000001456007040772636017032 0ustar julliardusers/* * SHRegOpenStream */ #include #include "wine/obj_storage.h" #include "debugtools.h" #include "heap.h" #include "winerror.h" #include "winreg.h" #include "shell32_main.h" DEFAULT_DEBUG_CHANNEL(shell) typedef struct { ICOM_VFIELD(IStream); DWORD ref; HKEY hKey; LPSTR pszSubKey; LPSTR pszValue; LPBYTE pbBuffer; DWORD dwLength; DWORD dwPos; } ISHRegStream; static struct ICOM_VTABLE(IStream) rstvt; /************************************************************************** * IStream_Constructor() */ IStream *IStream_Constructor(HKEY hKey, LPCSTR pszSubKey, LPCSTR pszValue, DWORD grfMode) { ISHRegStream* rstr; DWORD dwType; rstr = (ISHRegStream*)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(ISHRegStream)); ICOM_VTBL(rstr)=&rstvt; rstr->ref = 1; if ( ERROR_SUCCESS == RegOpenKeyExA (hKey, pszSubKey, 0, KEY_READ, &(rstr->hKey))) { if ( ERROR_SUCCESS == RegQueryValueExA(rstr->hKey, (LPSTR)pszValue,0,0,0,&(rstr->dwLength))) { /* read the binary data into the buffer */ rstr->pbBuffer = HeapAlloc(GetProcessHeap(),0,rstr->dwLength); if (rstr->pbBuffer) { if ( ERROR_SUCCESS == RegQueryValueExA(rstr->hKey, (LPSTR)pszValue,0,&dwType,rstr->pbBuffer,&(rstr->dwLength))) { if (dwType == REG_BINARY ) { rstr->pszSubKey = HEAP_strdupA (GetProcessHeap(),0, pszSubKey); rstr->pszValue = HEAP_strdupA (GetProcessHeap(),0, pszValue); TRACE("(%p)->0x%08x,%s,%s,0x%08lx\n", rstr, hKey, pszSubKey, pszValue, grfMode); shell32_ObjCount++; return (IStream*)rstr; } } HeapFree (GetProcessHeap(),0,rstr->pbBuffer); } } RegCloseKey(rstr->hKey); } HeapFree (GetProcessHeap(),0,rstr); return NULL; } /************************************************************************** * IStream_fnQueryInterface */ static HRESULT WINAPI IStream_fnQueryInterface(IStream *iface, REFIID riid, LPVOID *ppvObj) { ICOM_THIS(ISHRegStream, iface); TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown)) /*IUnknown*/ { *ppvObj = This; } else if(IsEqualIID(riid, &IID_IStream)) /*IStream*/ { *ppvObj = This; } if(*ppvObj) { IStream_AddRef((IStream*)*ppvObj); TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } /************************************************************************** * IStream_fnAddRef */ static ULONG WINAPI IStream_fnAddRef(IStream *iface) { ICOM_THIS(ISHRegStream, iface); TRACE("(%p)->(count=%lu)\n",This, This->ref); shell32_ObjCount++; return ++(This->ref); } /************************************************************************** * IStream_fnRelease */ static ULONG WINAPI IStream_fnRelease(IStream *iface) { ICOM_THIS(ISHRegStream, iface); TRACE("(%p)->()\n",This); shell32_ObjCount--; if (!--(This->ref)) { TRACE(" destroying SHReg IStream (%p)\n",This); if (This->pszSubKey) HeapFree(GetProcessHeap(),0,This->pszSubKey); if (This->pszValue) HeapFree(GetProcessHeap(),0,This->pszValue); if (This->pbBuffer) HeapFree(GetProcessHeap(),0,This->pbBuffer); if (This->hKey) RegCloseKey(This->hKey); HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } HRESULT WINAPI IStream_fnRead (IStream * iface, void* pv, ULONG cb, ULONG* pcbRead) { ICOM_THIS(ISHRegStream, iface); DWORD dwBytesToRead, dwBytesLeft; TRACE("(%p)->(%p,0x%08lx,%p)\n",This, pv, cb, pcbRead); if ( !pv ) return STG_E_INVALIDPOINTER; dwBytesLeft = This->dwLength - This->dwPos; if ( 0 >= dwBytesLeft ) /* end of buffer */ return S_FALSE; dwBytesToRead = ( cb > dwBytesLeft) ? dwBytesLeft : cb; memmove ( pv, (This->pbBuffer) + (This->dwPos), dwBytesToRead); This->dwPos += dwBytesToRead; /* adjust pointer */ if (pcbRead) *pcbRead = dwBytesToRead; return S_OK; } HRESULT WINAPI IStream_fnWrite (IStream * iface, const void* pv, ULONG cb, ULONG* pcbWritten) { ICOM_THIS(ISHRegStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } HRESULT WINAPI IStream_fnSeek (IStream * iface, LARGE_INTEGER dlibMove, DWORD dwOrigin, ULARGE_INTEGER* plibNewPosition) { ICOM_THIS(ISHRegStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } HRESULT WINAPI IStream_fnSetSize (IStream * iface, ULARGE_INTEGER libNewSize) { ICOM_THIS(ISHRegStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } HRESULT WINAPI IStream_fnCopyTo (IStream * iface, IStream* pstm, ULARGE_INTEGER cb, ULARGE_INTEGER* pcbRead, ULARGE_INTEGER* pcbWritten) { ICOM_THIS(ISHRegStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } HRESULT WINAPI IStream_fnCommit (IStream * iface, DWORD grfCommitFlags) { ICOM_THIS(ISHRegStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } HRESULT WINAPI IStream_fnRevert (IStream * iface) { ICOM_THIS(ISHRegStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } HRESULT WINAPI IStream_fnLockRegion (IStream * iface, ULARGE_INTEGER libOffset, ULARGE_INTEGER cb, DWORD dwLockType) { ICOM_THIS(ISHRegStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } HRESULT WINAPI IStream_fnUnlockRegion (IStream * iface, ULARGE_INTEGER libOffset, ULARGE_INTEGER cb, DWORD dwLockType) { ICOM_THIS(ISHRegStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } HRESULT WINAPI IStream_fnStat (IStream * iface, STATSTG* pstatstg, DWORD grfStatFlag) { ICOM_THIS(ISHRegStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } HRESULT WINAPI IStream_fnClone (IStream * iface, IStream** ppstm) { ICOM_THIS(ISHRegStream, iface); TRACE("(%p)\n",This); return E_NOTIMPL; } static struct ICOM_VTABLE(IStream) rstvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IStream_fnQueryInterface, IStream_fnAddRef, IStream_fnRelease, IStream_fnRead, IStream_fnWrite, IStream_fnSeek, IStream_fnSetSize, IStream_fnCopyTo, IStream_fnCommit, IStream_fnRevert, IStream_fnLockRegion, IStream_fnUnlockRegion, IStream_fnStat, IStream_fnClone }; /************************************************************************* * OpenRegStream [SHELL32.85] * * NOTES * exported by ordinal */ IStream * WINAPI OpenRegStream(HKEY hkey, LPCSTR pszSubkey, LPCSTR pszValue, DWORD grfMode) { TRACE("(0x%08x,%s,%s,0x%08lx)\n",hkey, pszSubkey, pszValue, grfMode); return IStream_Constructor(hkey, pszSubkey, pszValue, grfMode); } wine-20000526/dlls/shell32/shell.c0100644000175000001440000010552107102371067016136 0ustar julliardusers/* * Shell Library Functions * * 1998 Marcus Meissner */ #include #include #include #include #include "windef.h" #include "wingdi.h" #include "wine/winuser16.h" #include "wine/winbase16.h" #include "wine/shell16.h" #include "winerror.h" #include "file.h" #include "heap.h" #include "ldt.h" #include "module.h" #include "neexe.h" #include "dlgs.h" #include "cursoricon.h" #include "shellapi.h" #include "shlobj.h" #include "debugtools.h" #include "winreg.h" #include "syslevel.h" #include "shlwapi.h" #include "imagelist.h" DEFAULT_DEBUG_CHANNEL(shell) DECLARE_DEBUG_CHANNEL(exec) /* .ICO file ICONDIR definitions */ #include "pshpack1.h" typedef struct { BYTE bWidth; /* Width, in pixels, of the image */ BYTE bHeight; /* Height, in pixels, of the image */ BYTE bColorCount; /* Number of colors in image (0 if >=8bpp) */ BYTE bReserved; /* Reserved ( must be 0) */ WORD wPlanes; /* Color Planes */ WORD wBitCount; /* Bits per pixel */ DWORD dwBytesInRes; /* How many bytes in this resource? */ DWORD dwImageOffset; /* Where in the file is this image? */ } icoICONDIRENTRY, *LPicoICONDIRENTRY; typedef struct { WORD idReserved; /* Reserved (must be 0) */ WORD idType; /* Resource Type (1 for icons) */ WORD idCount; /* How many images? */ icoICONDIRENTRY idEntries[1]; /* An entry for each image (idCount of 'em) */ } icoICONDIR, *LPicoICONDIR; #include "poppack.h" static const char* lpstrMsgWndCreated = "OTHERWINDOWCREATED"; static const char* lpstrMsgWndDestroyed = "OTHERWINDOWDESTROYED"; static const char* lpstrMsgShellActivate = "ACTIVATESHELLWINDOW"; static HWND16 SHELL_hWnd = 0; static HHOOK SHELL_hHook = 0; static UINT16 uMsgWndCreated = 0; static UINT16 uMsgWndDestroyed = 0; static UINT16 uMsgShellActivate = 0; HINSTANCE16 SHELL_hInstance = 0; HINSTANCE SHELL_hInstance32; static int SHELL_Attach = 0; /*********************************************************************** * SHELL_DllEntryPoint [SHELL.entry] * * Initialization code for shell.dll. Automatically loads the * 32-bit shell32.dll to allow thunking up to 32-bit code. * * RETURNS: */ BOOL WINAPI SHELL_DllEntryPoint(DWORD Reason, HINSTANCE16 hInst, WORD ds, WORD HeapSize, DWORD res1, WORD res2) { TRACE("(%08lx, %04x, %04x, %04x, %08lx, %04x)\n", Reason, hInst, ds, HeapSize, res1, res2); switch(Reason) { case DLL_PROCESS_ATTACH: SHELL_Attach++; if (SHELL_hInstance) { ERR("shell.dll instantiated twice!\n"); /* * We should return FALSE here, but that will break * most apps that use CreateProcess because we do * not yet support seperate address-spaces. */ return TRUE; } SHELL_hInstance = hInst; if(!SHELL_hInstance32) { if(!(SHELL_hInstance32 = LoadLibraryA("shell32.dll"))) { ERR("Could not load sibling shell32.dll\n"); return FALSE; } } break; case DLL_PROCESS_DETACH: if(!--SHELL_Attach) { SHELL_hInstance = 0; if(SHELL_hInstance32) FreeLibrary(SHELL_hInstance32); } break; } return TRUE; } /************************************************************************* * DragAcceptFiles16 [SHELL.9] */ void WINAPI DragAcceptFiles16(HWND16 hWnd, BOOL16 b) { DragAcceptFiles(hWnd, b); } /************************************************************************* * DragQueryFile16 [SHELL.11] */ UINT16 WINAPI DragQueryFile16( HDROP16 hDrop, WORD wFile, LPSTR lpszFile, WORD wLength) { LPSTR lpDrop; UINT i = 0; LPDROPFILESTRUCT16 lpDropFileStruct = (LPDROPFILESTRUCT16) GlobalLock16(hDrop); TRACE("(%04x, %x, %p, %u)\n", hDrop,wFile,lpszFile,wLength); if(!lpDropFileStruct) goto end; lpDrop = (LPSTR) lpDropFileStruct + lpDropFileStruct->wSize; wFile = (wFile==0xffff) ? 0xffffffff : wFile; while (i++ < wFile) { while (*lpDrop++); /* skip filename */ if (!*lpDrop) { i = (wFile == 0xFFFFFFFF) ? i : 0; goto end; } } i = lstrlenA(lpDrop); i++; if (!lpszFile ) goto end; /* needed buffer size */ i = (wLength > i) ? i : wLength; lstrcpynA (lpszFile, lpDrop, i); end: GlobalUnlock16(hDrop); return i; } /************************************************************************* * DragFinish16 [SHELL.12] */ void WINAPI DragFinish16(HDROP16 h) { TRACE("\n"); GlobalFree16((HGLOBAL16)h); } /************************************************************************* * DragQueryPoint16 [SHELL.13] */ BOOL16 WINAPI DragQueryPoint16(HDROP16 hDrop, POINT16 *p) { LPDROPFILESTRUCT16 lpDropFileStruct; BOOL16 bRet; TRACE("\n"); lpDropFileStruct = (LPDROPFILESTRUCT16) GlobalLock16(hDrop); memcpy(p,&lpDropFileStruct->ptMousePos,sizeof(POINT16)); bRet = lpDropFileStruct->fInNonClientArea; GlobalUnlock16(hDrop); return bRet; } /************************************************************************* * SHELL_FindExecutable [Internal] * * Utility for code sharing between FindExecutable and ShellExecute */ HINSTANCE SHELL_FindExecutable( LPCSTR lpFile, LPCSTR lpOperation, LPSTR lpResult) { char *extension = NULL; /* pointer to file extension */ char tmpext[5]; /* local copy to mung as we please */ char filetype[256]; /* registry name for this filetype */ LONG filetypelen=256; /* length of above */ char command[256]; /* command from registry */ LONG commandlen=256; /* This is the most DOS can handle :) */ char buffer[256]; /* Used to GetProfileString */ HINSTANCE retval=31; /* default - 'No association was found' */ char *tok; /* token pointer */ int i; /* random counter */ char xlpFile[256] = ""; /* result of SearchPath */ TRACE("%s\n", (lpFile != NULL?lpFile:"-") ); lpResult[0]='\0'; /* Start off with an empty return string */ /* trap NULL parameters on entry */ if (( lpFile == NULL ) || ( lpResult == NULL ) || ( lpOperation == NULL )) { WARN_(exec)("(lpFile=%s,lpResult=%s,lpOperation=%s): NULL parameter\n", lpFile, lpOperation, lpResult); return 2; /* File not found. Close enough, I guess. */ } if (SearchPathA( NULL, lpFile,".exe",sizeof(xlpFile),xlpFile,NULL)) { TRACE("SearchPathA returned non-zero\n"); lpFile = xlpFile; } /* First thing we need is the file's extension */ extension = strrchr( xlpFile, '.' ); /* Assume last "." is the one; */ /* File->Run in progman uses */ /* .\FILE.EXE :( */ TRACE("xlpFile=%s,extension=%s\n", xlpFile, extension); if ((extension == NULL) || (extension == &xlpFile[strlen(xlpFile)])) { WARN("Returning 31 - No association\n"); return 31; /* no association */ } /* Make local copy & lowercase it for reg & 'programs=' lookup */ lstrcpynA( tmpext, extension, 5 ); CharLowerA( tmpext ); TRACE("%s file\n", tmpext); /* Three places to check: */ /* 1. win.ini, [windows], programs (NB no leading '.') */ /* 2. Registry, HKEY_CLASS_ROOT\\shell\open\command */ /* 3. win.ini, [extensions], extension (NB no leading '.' */ /* All I know of the order is that registry is checked before */ /* extensions; however, it'd make sense to check the programs */ /* section first, so that's what happens here. */ /* See if it's a program - if GetProfileString fails, we skip this * section. Actually, if GetProfileString fails, we've probably * got a lot more to worry about than running a program... */ if ( GetProfileStringA("windows", "programs", "exe pif bat com", buffer, sizeof(buffer)) > 0 ) { for (i=0;i2)) { strcat( lpResult, &tok[2] ); } } retval=33; /* FIXME see above */ } } else /* Check win.ini */ { /* Toss the leading dot */ extension++; if ( GetProfileStringA( "extensions", extension, "", command, sizeof(command)) > 0) { if (strlen(command)!=0) { strcpy( lpResult, command ); tok=strstr( lpResult, "^" ); /* should be ^.extension? */ if (tok != NULL) { tok[0]='\0'; strcat( lpResult, xlpFile ); /* what if no dir in xlpFile? */ tok=strstr( command, "^" ); /* see above */ if ((tok != NULL) && (strlen(tok)>5)) { strcat( lpResult, &tok[5]); } } retval=33; /* FIXME - see above */ } } } TRACE("returning %s\n", lpResult); return retval; } /************************************************************************* * ShellExecute16 [SHELL.20] */ HINSTANCE16 WINAPI ShellExecute16( HWND16 hWnd, LPCSTR lpOperation, LPCSTR lpFile, LPCSTR lpParameters, LPCSTR lpDirectory, INT16 iShowCmd ) { HINSTANCE16 retval=31; char old_dir[1024]; char cmd[1024] = ""; TRACE("(%04x,'%s','%s','%s','%s',%x)\n", hWnd, lpOperation ? lpOperation:"", lpFile ? lpFile:"", lpParameters ? lpParameters : "", lpDirectory ? lpDirectory : "", iShowCmd); if (lpFile==NULL) return 0; /* should not happen */ if (lpOperation==NULL) /* default is open */ lpOperation="open"; if (lpDirectory) { GetCurrentDirectoryA( sizeof(old_dir), old_dir ); SetCurrentDirectoryA( lpDirectory ); } /* First try to execute lpFile with lpParameters directly */ strcpy(cmd,lpFile); strcat(cmd,lpParameters ? lpParameters : ""); SYSLEVEL_ReleaseWin16Lock(); retval = WinExec( cmd, iShowCmd ); SYSLEVEL_RestoreWin16Lock(); /* Unable to execute lpFile directly Check if we can match an application to lpFile */ if(retval < 31) { cmd[0] = '\0'; retval = SHELL_FindExecutable( lpFile, lpOperation, cmd ); if (retval > 32) /* Found */ { if (lpParameters) { strcat(cmd," "); strcat(cmd,lpParameters); } SYSLEVEL_ReleaseWin16Lock(); retval = WinExec( cmd, iShowCmd ); SYSLEVEL_RestoreWin16Lock(); } else if(PathIsURLA((LPSTR)lpFile)) /* File not found, check for URL */ { char lpstrProtocol[256]; LONG cmdlen = 512; LPSTR lpstrRes; INT iSize; lpstrRes = strchr(lpFile,':'); iSize = lpstrRes - lpFile; /* Looking for ...protocol\shell\lpOperation\command */ strncpy(lpstrProtocol,lpFile,iSize); lpstrProtocol[iSize]='\0'; strcat( lpstrProtocol, "\\shell\\" ); strcat( lpstrProtocol, lpOperation ); strcat( lpstrProtocol, "\\command" ); /* Remove File Protocol from lpFile */ /* In the case file://path/file */ if(!strncasecmp(lpFile,"file",iSize)) { lpFile += iSize; while(*lpFile == ':') lpFile++; } /* Get the application for the protocol and execute it */ if (RegQueryValue16( HKEY_CLASSES_ROOT, lpstrProtocol, cmd, &cmdlen ) == ERROR_SUCCESS ) { LPSTR tok; LPSTR tmp; char param[256] = ""; LONG paramlen = 256; /* Get the parameters needed by the application from the associated ddeexec key */ tmp = strstr(lpstrProtocol,"command"); tmp[0] = '\0'; strcat(lpstrProtocol,"ddeexec"); if(RegQueryValue16( HKEY_CLASSES_ROOT, lpstrProtocol, param,¶mlen ) == ERROR_SUCCESS) { strcat(cmd," "); strcat(cmd,param); cmdlen += paramlen; } /* Is there a replace() function anywhere? */ cmd[cmdlen]='\0'; tok=strstr( cmd, "%1" ); if (tok != NULL) { tok[0]='\0'; /* truncate string at the percent */ strcat( cmd, lpFile ); /* what if no dir in xlpFile? */ tok=strstr( cmd, "%1" ); if ((tok!=NULL) && (strlen(tok)>2)) { strcat( cmd, &tok[2] ); } } SYSLEVEL_ReleaseWin16Lock(); retval = WinExec( cmd, iShowCmd ); SYSLEVEL_RestoreWin16Lock(); } } /* Check if file specified is in the form www.??????.*** */ else if(!strncasecmp(lpFile,"www",3)) { /* if so, append lpFile http:// and call ShellExecute */ char lpstrTmpFile[256] = "http://" ; strcat(lpstrTmpFile,lpFile); retval = ShellExecuteA(hWnd,lpOperation,lpstrTmpFile,NULL,NULL,0); } } if (lpDirectory) SetCurrentDirectoryA( old_dir ); return retval; } /************************************************************************* * FindExecutable16 (SHELL.21) */ HINSTANCE16 WINAPI FindExecutable16( LPCSTR lpFile, LPCSTR lpDirectory, LPSTR lpResult ) { return (HINSTANCE16)FindExecutableA( lpFile, lpDirectory, lpResult ); } /************************************************************************* * AboutDlgProc16 (SHELL.33) */ BOOL16 WINAPI AboutDlgProc16( HWND16 hWnd, UINT16 msg, WPARAM16 wParam, LPARAM lParam ) { return AboutDlgProc( hWnd, msg, wParam, lParam ); } /************************************************************************* * ShellAbout16 (SHELL.22) */ BOOL16 WINAPI ShellAbout16( HWND16 hWnd, LPCSTR szApp, LPCSTR szOtherStuff, HICON16 hIcon ) { return ShellAboutA( hWnd, szApp, szOtherStuff, hIcon ); } /************************************************************************* * SHELL_GetResourceTable */ static DWORD SHELL_GetResourceTable(HFILE hFile,LPBYTE *retptr) { IMAGE_DOS_HEADER mz_header; char magic[4]; int size; TRACE("\n"); *retptr = NULL; _llseek( hFile, 0, SEEK_SET ); if ((_lread(hFile,&mz_header,sizeof(mz_header)) != sizeof(mz_header)) || (mz_header.e_magic != IMAGE_DOS_SIGNATURE)) { /* .ICO file ? */ if (mz_header.e_cblp == 1) { /* ICONHEADER.idType, must be 1 */ *retptr = (LPBYTE)-1; return 1; } else return 0; /* failed */ } _llseek( hFile, mz_header.e_lfanew, SEEK_SET ); if (_lread( hFile, magic, sizeof(magic) ) != sizeof(magic)) return 0; _llseek( hFile, mz_header.e_lfanew, SEEK_SET); if (*(DWORD*)magic == IMAGE_NT_SIGNATURE) return IMAGE_NT_SIGNATURE; if (*(WORD*)magic == IMAGE_OS2_SIGNATURE) { IMAGE_OS2_HEADER ne_header; LPBYTE pTypeInfo = (LPBYTE)-1; if (_lread(hFile,&ne_header,sizeof(ne_header))!=sizeof(ne_header)) return 0; if (ne_header.ne_magic != IMAGE_OS2_SIGNATURE) return 0; size = ne_header.ne_restab - ne_header.ne_rsrctab; if( size > sizeof(NE_TYPEINFO) ) { pTypeInfo = (BYTE*)HeapAlloc( GetProcessHeap(), 0, size); if( pTypeInfo ) { _llseek(hFile, mz_header.e_lfanew+ne_header.ne_rsrctab, SEEK_SET); if( _lread( hFile, (char*)pTypeInfo, size) != size ) { HeapFree( GetProcessHeap(), 0, pTypeInfo); pTypeInfo = NULL; } } } *retptr = pTypeInfo; return IMAGE_OS2_SIGNATURE; } return 0; /* failed */ } /************************************************************************* * SHELL_LoadResource */ static HGLOBAL16 SHELL_LoadResource(HINSTANCE16 hInst, HFILE hFile, NE_NAMEINFO* pNInfo, WORD sizeShift) { BYTE* ptr; HGLOBAL16 handle = DirectResAlloc16( hInst, 0x10, (DWORD)pNInfo->length << sizeShift); TRACE("\n"); if( (ptr = (BYTE*)GlobalLock16( handle )) ) { _llseek( hFile, (DWORD)pNInfo->offset << sizeShift, SEEK_SET); _lread( hFile, (char*)ptr, pNInfo->length << sizeShift); return handle; } return 0; } /************************************************************************* * ICO_LoadIcon */ static HGLOBAL16 ICO_LoadIcon(HINSTANCE16 hInst, HFILE hFile, LPicoICONDIRENTRY lpiIDE) { BYTE* ptr; HGLOBAL16 handle = DirectResAlloc16( hInst, 0x10, lpiIDE->dwBytesInRes); TRACE("\n"); if( (ptr = (BYTE*)GlobalLock16( handle )) ) { _llseek( hFile, lpiIDE->dwImageOffset, SEEK_SET); _lread( hFile, (char*)ptr, lpiIDE->dwBytesInRes); return handle; } return 0; } /************************************************************************* * ICO_GetIconDirectory * * Read .ico file and build phony ICONDIR struct for GetIconID */ static HGLOBAL16 ICO_GetIconDirectory(HINSTANCE16 hInst, HFILE hFile, LPicoICONDIR* lplpiID ) { WORD id[3]; /* idReserved, idType, idCount */ LPicoICONDIR lpiID; int i; TRACE("\n"); _llseek( hFile, 0, SEEK_SET ); if( _lread(hFile,(char*)id,sizeof(id)) != sizeof(id) ) return 0; /* check .ICO header * * - see http://www.microsoft.com/win32dev/ui/icons.htm */ if( id[0] || id[1] != 1 || !id[2] ) return 0; i = id[2]*sizeof(icoICONDIRENTRY) ; lpiID = (LPicoICONDIR)HeapAlloc( GetProcessHeap(), 0, i + sizeof(id)); if( _lread(hFile,(char*)lpiID->idEntries,i) == i ) { HGLOBAL16 handle = DirectResAlloc16( hInst, 0x10, id[2]*sizeof(CURSORICONDIRENTRY) + sizeof(id) ); if( handle ) { CURSORICONDIR* lpID = (CURSORICONDIR*)GlobalLock16( handle ); lpID->idReserved = lpiID->idReserved = id[0]; lpID->idType = lpiID->idType = id[1]; lpID->idCount = lpiID->idCount = id[2]; for( i=0; i < lpiID->idCount; i++ ) { memcpy((void*)(lpID->idEntries + i), (void*)(lpiID->idEntries + i), sizeof(CURSORICONDIRENTRY) - 2); lpID->idEntries[i].wResId = i; } *lplpiID = lpiID; return handle; } } /* fail */ HeapFree( GetProcessHeap(), 0, lpiID); return 0; } /************************************************************************* * InternalExtractIcon [SHELL.39] * * This abortion is called directly by Progman */ HGLOBAL16 WINAPI InternalExtractIcon16(HINSTANCE16 hInstance, LPCSTR lpszExeFileName, UINT16 nIconIndex, WORD n ) { HGLOBAL16 hRet = 0; HGLOBAL16* RetPtr = NULL; LPBYTE pData; OFSTRUCT ofs; DWORD sig; HFILE hFile = OpenFile( lpszExeFileName, &ofs, OF_READ ); UINT16 iconDirCount = 0,iconCount = 0; LPBYTE peimage; HANDLE fmapping; TRACE("(%04x,file %s,start %d,extract %d\n", hInstance, lpszExeFileName, nIconIndex, n); if( hFile == HFILE_ERROR || !n ) return 0; hRet = GlobalAlloc16( GMEM_FIXED | GMEM_ZEROINIT, sizeof(HICON16)*n); RetPtr = (HICON16*)GlobalLock16(hRet); *RetPtr = (n == 0xFFFF)? 0: 1; /* error return values */ sig = SHELL_GetResourceTable(hFile,&pData); if( sig==IMAGE_OS2_SIGNATURE || sig==1 ) /* .ICO file */ { HICON16 hIcon = 0; NE_TYPEINFO* pTInfo = (NE_TYPEINFO*)(pData + 2); NE_NAMEINFO* pIconStorage = NULL; NE_NAMEINFO* pIconDir = NULL; LPicoICONDIR lpiID = NULL; if( pData == (BYTE*)-1 ) { hIcon = ICO_GetIconDirectory(hInstance, hFile, &lpiID); /* check for .ICO file */ if( hIcon ) { iconDirCount = 1; iconCount = lpiID->idCount; } } else while( pTInfo->type_id && !(pIconStorage && pIconDir) ) { if( pTInfo->type_id == NE_RSCTYPE_GROUP_ICON ) /* find icon directory and icon repository */ { iconDirCount = pTInfo->count; pIconDir = ((NE_NAMEINFO*)(pTInfo + 1)); TRACE("\tfound directory - %i icon families\n", iconDirCount); } if( pTInfo->type_id == NE_RSCTYPE_ICON ) { iconCount = pTInfo->count; pIconStorage = ((NE_NAMEINFO*)(pTInfo + 1)); TRACE("\ttotal icons - %i\n", iconCount); } pTInfo = (NE_TYPEINFO *)((char*)(pTInfo+1)+pTInfo->count*sizeof(NE_NAMEINFO)); } /* load resources and create icons */ if( (pIconStorage && pIconDir) || lpiID ) { if( nIconIndex == (UINT16)-1 ) { RetPtr[0] = iconDirCount; } else if( nIconIndex < iconDirCount ) { UINT16 i, icon; if( n > iconDirCount - nIconIndex ) n = iconDirCount - nIconIndex; for( i = nIconIndex; i < nIconIndex + n; i++ ) { /* .ICO files have only one icon directory */ if( lpiID == NULL ) hIcon = SHELL_LoadResource( hInstance, hFile, pIconDir + i, *(WORD*)pData ); RetPtr[i-nIconIndex] = GetIconID16( hIcon, 3 ); GlobalFree16(hIcon); } for( icon = nIconIndex; icon < nIconIndex + n; icon++ ) { hIcon = 0; if( lpiID ) { hIcon = ICO_LoadIcon( hInstance, hFile, lpiID->idEntries + RetPtr[icon-nIconIndex]); } else { for( i = 0; i < iconCount; i++ ) { if( pIconStorage[i].id == (RetPtr[icon-nIconIndex] | 0x8000) ) { hIcon = SHELL_LoadResource( hInstance, hFile, pIconStorage + i,*(WORD*)pData ); } } } if( hIcon ) { RetPtr[icon-nIconIndex] = LoadIconHandler16( hIcon, TRUE ); FarSetOwner16( RetPtr[icon-nIconIndex], GetExePtr(hInstance) ); } else { RetPtr[icon-nIconIndex] = 0; } } } } if( lpiID ) HeapFree( GetProcessHeap(), 0, lpiID); else HeapFree( GetProcessHeap(), 0, pData); } if( sig == IMAGE_NT_SIGNATURE) { LPBYTE idata,igdata; PIMAGE_DOS_HEADER dheader; PIMAGE_NT_HEADERS pe_header; PIMAGE_SECTION_HEADER pe_sections; PIMAGE_RESOURCE_DIRECTORY rootresdir,iconresdir,icongroupresdir; PIMAGE_RESOURCE_DATA_ENTRY idataent,igdataent; int i,j; PIMAGE_RESOURCE_DIRECTORY_ENTRY xresent; CURSORICONDIR **cids; fmapping = CreateFileMappingA(hFile,NULL,PAGE_READONLY|SEC_COMMIT,0,0,NULL); if (fmapping == 0) { /* FIXME, INVALID_HANDLE_VALUE? */ WARN("failed to create filemap.\n"); hRet = 0; goto end_2; /* failure */ } peimage = MapViewOfFile(fmapping,FILE_MAP_READ,0,0,0); if (!peimage) { WARN("failed to mmap filemap.\n"); hRet = 0; goto end_2; /* failure */ } dheader = (PIMAGE_DOS_HEADER)peimage; /* it is a pe header, SHELL_GetResourceTable checked that */ pe_header = (PIMAGE_NT_HEADERS)(peimage+dheader->e_lfanew); /* probably makes problems with short PE headers... but I haven't seen * one yet... */ pe_sections = (PIMAGE_SECTION_HEADER)(((char*)pe_header)+sizeof(*pe_header)); rootresdir = NULL; for (i=0;iFileHeader.NumberOfSections;i++) { if (pe_sections[i].Characteristics & IMAGE_SCN_CNT_UNINITIALIZED_DATA) continue; /* FIXME: doesn't work when the resources are not in a seperate section */ if (pe_sections[i].VirtualAddress == pe_header->OptionalHeader.DataDirectory[IMAGE_DIRECTORY_ENTRY_RESOURCE].VirtualAddress) { rootresdir = (PIMAGE_RESOURCE_DIRECTORY)((char*)peimage+pe_sections[i].PointerToRawData); break; } } if (!rootresdir) { WARN("haven't found section for resource directory.\n"); goto end_4; /* failure */ } icongroupresdir = GetResDirEntryW(rootresdir,RT_GROUP_ICONW, (DWORD)rootresdir,FALSE); if (!icongroupresdir) { WARN("No Icongroupresourcedirectory!\n"); goto end_4; /* failure */ } iconDirCount = icongroupresdir->NumberOfNamedEntries+icongroupresdir->NumberOfIdEntries; if( nIconIndex == (UINT16)-1 ) { RetPtr[0] = iconDirCount; goto end_3; /* success */ } if (nIconIndex >= iconDirCount) { WARN("nIconIndex %d is larger than iconDirCount %d\n",nIconIndex,iconDirCount); GlobalFree16(hRet); goto end_4; /* failure */ } cids = (CURSORICONDIR**)HeapAlloc(GetProcessHeap(),0,n*sizeof(CURSORICONDIR*)); /* caller just wanted the number of entries */ xresent = (PIMAGE_RESOURCE_DIRECTORY_ENTRY)(icongroupresdir+1); /* assure we don't get too much ... */ if( n > iconDirCount - nIconIndex ) { n = iconDirCount - nIconIndex; } /* starting from specified index ... */ xresent = xresent+nIconIndex; for (i=0;iu2.s.OffsetToDirectory)); /* default language (0) */ resdir = GetResDirEntryW(resdir,(LPWSTR)0,(DWORD)rootresdir,TRUE); igdataent = (PIMAGE_RESOURCE_DATA_ENTRY)resdir; /* lookup address in mapped image for virtual address */ igdata = NULL; for (j=0;jFileHeader.NumberOfSections;j++) { if (igdataent->OffsetToData < pe_sections[j].VirtualAddress) continue; if (igdataent->OffsetToData+igdataent->Size > pe_sections[j].VirtualAddress+pe_sections[j].SizeOfRawData) continue; igdata = peimage+(igdataent->OffsetToData-pe_sections[j].VirtualAddress+pe_sections[j].PointerToRawData); } if (!igdata) { WARN("no matching real address for icongroup!\n"); goto end_4; /* failure */ } /* found */ cid = (CURSORICONDIR*)igdata; cids[i] = cid; RetPtr[i] = LookupIconIdFromDirectoryEx(igdata,TRUE,GetSystemMetrics(SM_CXICON),GetSystemMetrics(SM_CYICON),0); } iconresdir=GetResDirEntryW(rootresdir,RT_ICONW,(DWORD)rootresdir,FALSE); if (!iconresdir) { WARN("No Iconresourcedirectory!\n"); goto end_4; /* failure */ } for (i=0;iFileHeader.NumberOfSections;j++) { if (idataent->OffsetToData < pe_sections[j].VirtualAddress) continue; if (idataent->OffsetToData+idataent->Size > pe_sections[j].VirtualAddress+pe_sections[j].SizeOfRawData) continue; idata = peimage+(idataent->OffsetToData-pe_sections[j].VirtualAddress+pe_sections[j].PointerToRawData); } if (!idata) { WARN("no matching real address found for icondata!\n"); RetPtr[i]=0; continue; } RetPtr[i] = CreateIconFromResourceEx(idata,idataent->Size,TRUE,0x00030000,GetSystemMetrics(SM_CXICON),GetSystemMetrics(SM_CYICON),0); } goto end_3; /* sucess */ } goto end_1; /* return array with icon handles */ /* cleaning up (try & catch would be nicer) */ end_4: hRet = 0; /* failure */ end_3: UnmapViewOfFile(peimage); /* success */ end_2: CloseHandle(fmapping); end_1: _lclose( hFile); return hRet; } /************************************************************************* * ExtractIcon16 (SHELL.34) */ HICON16 WINAPI ExtractIcon16( HINSTANCE16 hInstance, LPCSTR lpszExeFileName, UINT16 nIconIndex ) { TRACE("\n"); return ExtractIconA( hInstance, lpszExeFileName, nIconIndex ); } /************************************************************************* * ExtractIconEx16 (SHELL.40) */ HICON16 WINAPI ExtractIconEx16( LPCSTR lpszFile, INT16 nIconIndex, HICON16 *phiconLarge, HICON16 *phiconSmall, UINT16 nIcons ) { HICON *ilarge,*ismall; UINT16 ret; int i; if (phiconLarge) ilarge = (HICON*)HeapAlloc(GetProcessHeap(),0,nIcons*sizeof(HICON)); else ilarge = NULL; if (phiconSmall) ismall = (HICON*)HeapAlloc(GetProcessHeap(),0,nIcons*sizeof(HICON)); else ismall = NULL; ret = ExtractIconExA(lpszFile,nIconIndex,ilarge,ismall,nIcons); if (ilarge) { for (i=0;i 32 && tempPath[0] ) { strcpy(lpIconPath,tempPath); hIcon = ExtractIcon16(hInst, lpIconPath, *lpiIcon); if( hIcon > 2 ) return hIcon; } else hIcon = 0; } if( hIcon == 1 ) *lpiIcon = 2; /* MSDOS icon - we found .exe but no icons in it */ else *lpiIcon = 6; /* generic icon - found nothing */ GetModuleFileName16(hInst, lpIconPath, 0x80); hIcon = LoadIcon16( hInst, MAKEINTRESOURCE16(*lpiIcon)); } return hIcon; } /************************************************************************* * FindEnvironmentString [SHELL.38] * * Returns a pointer into the DOS environment... Ugh. */ LPSTR SHELL_FindString(LPSTR lpEnv, LPCSTR entry) { UINT16 l; TRACE("\n"); l = strlen(entry); for( ; *lpEnv ; lpEnv+=strlen(lpEnv)+1 ) { if( lstrncmpiA(lpEnv, entry, l) ) continue; if( !*(lpEnv+l) ) return (lpEnv + l); /* empty entry */ else if ( *(lpEnv+l)== '=' ) return (lpEnv + l + 1); } return NULL; } SEGPTR WINAPI FindEnvironmentString16(LPSTR str) { SEGPTR spEnv; LPSTR lpEnv,lpString; TRACE("\n"); spEnv = GetDOSEnvironment16(); lpEnv = (LPSTR)PTR_SEG_TO_LIN(spEnv); lpString = (spEnv)?SHELL_FindString(lpEnv, str):NULL; if( lpString ) /* offset should be small enough */ return spEnv + (lpString - lpEnv); return (SEGPTR)NULL; } /************************************************************************* * DoEnvironmentSubst [SHELL.37] * * Replace %KEYWORD% in the str with the value of variable KEYWORD * from "DOS" environment. */ DWORD WINAPI DoEnvironmentSubst16(LPSTR str,WORD length) { LPSTR lpEnv = (LPSTR)PTR_SEG_TO_LIN(GetDOSEnvironment16()); LPSTR lpBuffer = (LPSTR)HeapAlloc( GetProcessHeap(), 0, length); LPSTR lpstr = str; LPSTR lpbstr = lpBuffer; CharToOemA(str,str); TRACE("accept %s\n", str); while( *lpstr && lpbstr - lpBuffer < length ) { LPSTR lpend = lpstr; if( *lpstr == '%' ) { do { lpend++; } while( *lpend && *lpend != '%' ); if( *lpend == '%' && lpend - lpstr > 1 ) /* found key */ { LPSTR lpKey; *lpend = '\0'; lpKey = SHELL_FindString(lpEnv, lpstr+1); if( lpKey ) /* found key value */ { int l = strlen(lpKey); if( l > length - (lpbstr - lpBuffer) - 1 ) { WARN("-- Env subst aborted - string too short\n"); *lpend = '%'; break; } strcpy(lpbstr, lpKey); lpbstr += l; } else break; *lpend = '%'; lpstr = lpend + 1; } else break; /* back off and whine */ continue; } *lpbstr++ = *lpstr++; } *lpbstr = '\0'; if( lpstr - str == strlen(str) ) { strncpy(str, lpBuffer, length); length = 1; } else length = 0; TRACE("-- return %s\n", str); OemToCharA(str,str); HeapFree( GetProcessHeap(), 0, lpBuffer); /* Return str length in the LOWORD * and 1 in HIWORD if subst was successful. */ return (DWORD)MAKELONG(strlen(str), length); } /************************************************************************* * ShellHookProc [SHELL.103] * System-wide WH_SHELL hook. */ LRESULT WINAPI ShellHookProc16(INT16 code, WPARAM16 wParam, LPARAM lParam) { TRACE("%i, %04x, %08x\n", code, wParam, (unsigned)lParam ); if( SHELL_hHook && SHELL_hWnd ) { UINT16 uMsg = 0; switch( code ) { case HSHELL_WINDOWCREATED: uMsg = uMsgWndCreated; break; case HSHELL_WINDOWDESTROYED: uMsg = uMsgWndDestroyed; break; case HSHELL_ACTIVATESHELLWINDOW: uMsg = uMsgShellActivate; } PostMessage16( SHELL_hWnd, uMsg, wParam, 0 ); } return CallNextHookEx16( WH_SHELL, code, wParam, lParam ); } /************************************************************************* * RegisterShellHook [SHELL.102] */ BOOL WINAPI RegisterShellHook16(HWND16 hWnd, UINT16 uAction) { TRACE("%04x [%u]\n", hWnd, uAction ); switch( uAction ) { case 2: /* register hWnd as a shell window */ if( !SHELL_hHook ) { HMODULE16 hShell = GetModuleHandle16( "SHELL" ); HOOKPROC16 hookProc = (HOOKPROC16)NE_GetEntryPoint( hShell, 103 ); SHELL_hHook = SetWindowsHookEx16( WH_SHELL, hookProc, hShell, 0 ); if ( SHELL_hHook ) { uMsgWndCreated = RegisterWindowMessageA( lpstrMsgWndCreated ); uMsgWndDestroyed = RegisterWindowMessageA( lpstrMsgWndDestroyed ); uMsgShellActivate = RegisterWindowMessageA( lpstrMsgShellActivate ); } else WARN("-- unable to install ShellHookProc()!\n"); } if ( SHELL_hHook ) return ((SHELL_hWnd = hWnd) != 0); break; default: WARN("-- unknown code %i\n", uAction ); SHELL_hWnd = 0; /* just in case */ } return FALSE; } wine-20000526/dlls/shell32/shell.spec0100644000175000001440000000353607016566756016670 0ustar julliardusersname shell type win16 1 pascal RegOpenKey(long str ptr) RegOpenKey16 2 pascal RegCreateKey(long str ptr) RegCreateKey16 3 pascal RegCloseKey(long) RegCloseKey16 4 pascal RegDeleteKey(long str) RegDeleteKey16 5 pascal RegSetValue(long str long str long) RegSetValue16 6 pascal RegQueryValue(long str ptr ptr) RegQueryValue16 7 pascal RegEnumKey(long long ptr long) RegEnumKey16 9 pascal16 DragAcceptFiles(word word) DragAcceptFiles16 11 pascal16 DragQueryFile(word s_word ptr s_word) DragQueryFile16 12 pascal16 DragFinish(word) DragFinish16 13 pascal16 DragQueryPoint(word ptr) DragQueryPoint16 20 pascal16 ShellExecute(word str str str str s_word) ShellExecute16 21 pascal16 FindExecutable(str str ptr) FindExecutable16 22 pascal16 ShellAbout(word ptr ptr word) ShellAbout16 33 pascal16 AboutDlgProc(word word word long) AboutDlgProc16 34 pascal16 ExtractIcon(word str s_word) ExtractIcon16 36 pascal16 ExtractAssociatedIcon(word ptr ptr) ExtractAssociatedIcon16 37 pascal DoEnvironmentSubst(ptr word) DoEnvironmentSubst16 38 pascal FindEnvironmentString(ptr) FindEnvironmentString16 39 pascal16 InternalExtractIcon(word ptr s_word word) InternalExtractIcon16 40 pascal16 ExtractIconEx(str word ptr ptr word) ExtractIconEx16 # 98 stub SHL3216_THUNKDATA16 # 99 stub SHL1632_THUNKDATA16 #100 4 0550 HERETHARBETYGARS exported, shared data #101 8 010e FINDEXEDLGPROC exported, shared data 101 pascal DllEntryPoint(long word word word long word) SHELL_DllEntryPoint 102 pascal16 RegisterShellHook(word word) RegisterShellHook16 103 pascal ShellHookProc(word word long) ShellHookProc16 157 stub RESTARTDIALOG # 166 PICKICONDLG 262 pascal16 DriveType(long) GetDriveType16 # 263 SH16TO32DRIVEIOCTL # 264 SH16TO32INT2526 # 300 SHGETFILEINFO # 400 SHFORMATDRIVE 401 stub SHCHECKDRIVE # 402 _RUNDLLCHECKDRIVE # 8 WEP #32 WCI wine-20000526/dlls/shell32/shell32.spec0100644000175000001440000004515507102570405017016 0ustar julliardusersname shell32 type win32 init Shell32LibMain rsrc shell32 import user32.dll import comctl32.dll # fixme: avoid this import import ole32.dll # Functions exported by the Win95 shell32.dll # (these need to have these exact ordinals, for some # win95 and winNT dlls import shell32.dll by ordinal) # This list was updated to dll version 4.72 2 stdcall SHChangeNotifyRegister(long long long long long long) SHChangeNotifyRegister 3 stub CheckEscapesA@8 4 stdcall SHChangeNotifyDeregister (long) SHChangeNotifyDeregister 5 stub SHChangeNotifyUpdateEntryList@16 6 stub CheckEscapesW@8 7 stdcall CommandLineToArgvW(wstr ptr) CommandLineToArgvW 8 stdcall Control_FillCache_RunDLL (long long long long) Control_FillCache_RunDLL 9 stub PifMgr_OpenProperties@16 10 stub PifMgr_GetProperties@20 11 stub PifMgr_SetProperties@20 12 stub Control_FillCache_RunDLLA@16 13 stub PifMgr_CloseProperties@8 14 stub Control_FillCache_RunDLLW@16 15 stdcall ILGetDisplayName(ptr ptr) ILGetDisplayName 16 stdcall ILFindLastID(ptr) ILFindLastID 17 stdcall ILRemoveLastID(ptr) ILRemoveLastID 18 stdcall ILClone(ptr) ILClone 19 stdcall ILCloneFirst (ptr) ILCloneFirst 20 stdcall ILGlobalClone (ptr) ILGlobalClone 21 stdcall ILIsEqual (ptr ptr) ILIsEqual 22 stdcall Control_RunDLL(long long long long) Control_RunDLL # exported by name 23 stdcall ILIsParent (long long long) ILIsParent 24 stdcall ILFindChild (long long) ILFindChild 25 stdcall ILCombine(ptr ptr) ILCombine 26 stdcall ILLoadFromStream (long long) ILLoadFromStream 27 stub ILSaveToStream@8 28 stdcall SHILCreateFromPath (long long long) SHILCreateFromPathAW 29 stdcall PathIsRoot(ptr) PathIsRootAW 30 stdcall PathBuildRoot(ptr long) PathBuildRootAW 31 stdcall PathFindExtension(ptr) PathFindExtensionAW 32 stdcall PathAddBackslash(ptr) PathAddBackslashAW 33 stdcall PathRemoveBlanks(ptr) PathRemoveBlanksAW 34 stdcall PathFindFileName(ptr) PathFindFileNameAW 35 stdcall PathRemoveFileSpec(ptr) PathRemoveFileSpecAW 36 stdcall PathAppend(ptr ptr) PathAppendAW 37 stdcall PathCombine(ptr ptr ptr) PathCombineAW 38 stdcall PathStripPath(ptr)PathStripPathAW 39 stdcall PathIsUNC (ptr) PathIsUNCAW 40 stdcall PathIsRelative (ptr) PathIsRelativeAW 41 stub Control_RunDLLA@16 42 stub Control_RunDLLW@16 43 stdcall PathIsExe (ptr) PathIsExeAW 44 stub DoEnvironmentSubstA@8 45 stdcall PathFileExists(ptr) PathFileExistsAW 46 stdcall PathMatchSpec (ptr ptr) PathMatchSpecAW 47 stdcall PathMakeUniqueName (ptr long ptr ptr ptr)PathMakeUniqueNameAW 48 stdcall PathSetDlgItemPath (long long ptr) PathSetDlgItemPathAW 49 stdcall PathQualify (ptr) PathQualifyAW 50 stdcall PathStripToRoot (ptr) PathStripToRootAW 51 stdcall PathResolve(str long long) PathResolveAW 52 stdcall PathGetArgs(str) PathGetArgsAW 53 stdcall DoEnvironmentSubst (long long) DoEnvironmentSubstAW 54 stdcall DragAcceptFiles(long long) DragAcceptFiles 55 stdcall PathQuoteSpaces (ptr) PathQuoteSpacesAW 56 stdcall PathUnquoteSpaces(str) PathUnquoteSpacesAW 57 stdcall PathGetDriveNumber (str) PathGetDriveNumberAW 58 stdcall ParseField(str long ptr long) ParseFieldAW 59 stub RestartDialog@12 60 stdcall ExitWindowsDialog(long) ExitWindowsDialog 61 stdcall RunFileDlg(long long long str str long) RunFileDlg 62 stdcall PickIconDlg(long long long long) PickIconDlg 63 stdcall GetFileNameFromBrowse(long long long long str str str) GetFileNameFromBrowse 64 stdcall DriveType (long) DriveType 65 stub InvalidateDriveType 66 stub IsNetDrive 67 stdcall Shell_MergeMenus (long long long long long long) Shell_MergeMenus 68 stdcall SHGetSettings(ptr long long) SHGetSettings 69 stub SHGetNetResource 70 stdcall SHCreateDefClassObject(long long long long long)SHCreateDefClassObject 71 stdcall Shell_GetImageList(ptr ptr) Shell_GetImageList 72 stdcall Shell_GetCachedImageIndex(ptr ptr long) Shell_GetCachedImageIndexAW 73 stdcall SHShellFolderView_Message(long long long) SHShellFolderView_Message 74 stub SHCreateStdEnumFmtEtc 75 stdcall PathYetAnotherMakeUniqueName(ptr ptr ptr ptr) PathYetAnotherMakeUniqueNameA 76 stub DragQueryInfo 77 stdcall SHMapPIDLToSystemImageListIndex(long long long) SHMapPIDLToSystemImageListIndex 78 stdcall OleStrToStrN(str long wstr long) OleStrToStrNAW 79 stdcall StrToOleStrN(wstr long str long) StrToOleStrNAW 80 stdcall DragFinish(long) DragFinish 81 stdcall DragQueryFile(long long ptr long) DragQueryFileA 82 stdcall DragQueryFileA(long long ptr long) DragQueryFileA 83 stub CIDLData_CreateFromIDArray 84 stub SHIsBadInterfacePtr 85 stdcall OpenRegStream(long long long long) OpenRegStream 86 stdcall SHRegisterDragDrop(long ptr) SHRegisterDragDrop 87 stdcall SHRevokeDragDrop(long) SHRevokeDragDrop 88 stdcall SHDoDragDrop(long long long long long) SHDoDragDrop 89 stdcall SHCloneSpecialIDList(long long long) SHCloneSpecialIDList 90 stub SHFindFiles 91 stub SHFindComputer 92 stdcall PathGetShortPath (ptr) PathGetShortPathAW 93 stub Win32CreateDirectory 94 stub Win32RemoveDirectory 95 stdcall SHLogILFromFSIL (ptr) SHLogILFromFSIL 96 stdcall StrRetToStrN (long long long long) StrRetToStrNAW 97 stdcall SHWaitForFileToOpen (long long long) SHWaitForFileToOpen 98 stdcall SHGetRealIDL (long long long) SHGetRealIDL 99 stdcall SetAppStartingCursor (long long) SetAppStartingCursor 100 stdcall SHRestricted(long) SHRestricted 101 stub DragQueryFileAorW # exported by name 102 stdcall SHCoCreateInstance(ptr ptr long ptr ptr) SHCoCreateInstance 103 stdcall SignalFileOpen(long) SignalFileOpen 104 stdcall FileMenu_DeleteAllItems(long)FileMenu_DeleteAllItems 105 stdcall FileMenu_DrawItem(long ptr)FileMenu_DrawItem 106 stdcall FileMenu_FindSubMenuByPidl(long ptr)FileMenu_FindSubMenuByPidl 107 stdcall FileMenu_GetLastSelectedItemPidls(long ptr ptr)FileMenu_GetLastSelectedItemPidls 108 stdcall FileMenu_HandleMenuChar(long long)FileMenu_HandleMenuChar 109 stdcall FileMenu_InitMenuPopup (long) FileMenu_InitMenuPopup 110 stdcall FileMenu_InsertUsingPidl (long long ptr long long ptr) FileMenu_InsertUsingPidl 111 stdcall FileMenu_Invalidate (long) FileMenu_Invalidate 112 stdcall FileMenu_MeasureItem(long ptr)FileMenu_MeasureItem 113 stdcall FileMenu_ReplaceUsingPidl (long long ptr long ptr) FileMenu_ReplaceUsingPidl 114 stdcall FileMenu_Create (long long long long long) FileMenu_Create 115 stdcall FileMenu_AppendItem (long ptr long long long long) FileMenu_AppendItemAW 116 stdcall FileMenu_TrackPopupMenuEx (long long long long long long) FileMenu_TrackPopupMenuEx 117 stdcall FileMenu_DeleteItemByCmd(long long)FileMenu_DeleteItemByCmd 118 stdcall FileMenu_Destroy (long) FileMenu_Destroy 119 stdcall IsLFNDrive(str) IsLFNDriveA 120 stdcall FileMenu_AbortInitMenu () FileMenu_AbortInitMenu 121 stdcall SHFlushClipboard () SHFlushClipboard 122 stdcall RunDLL_CallEntry16 (long long long long long) RunDLL_CallEntry16 #name wrong? 123 stdcall SHFreeUnusedLibraries () SHFreeUnusedLibraries 124 stdcall FileMenu_AppendFilesForPidl(long ptr long)FileMenu_AppendFilesForPidl 125 stdcall FileMenu_AddFilesForPidl(long long long ptr long long ptr)FileMenu_AddFilesForPidl 126 stdcall SHOutOfMemoryMessageBox (long long long) SHOutOfMemoryMessageBox 127 stdcall SHWinHelp (long long long long) SHWinHelp 128 stdcall DllGetClassObject(long long ptr) SHELL32_DllGetClassObject 129 stub DAD_AutoScroll 130 stub DAD_DragEnter 131 stub DAD_DragEnterEx 132 stub DAD_DragLeave 133 stdcall DragQueryFileW(long long ptr long) DragQueryFileW 134 stub DAD_DragMove 135 stdcall DragQueryPoint(long ptr) DragQueryPoint 136 stdcall DAD_SetDragImage(long long) DAD_SetDragImage 137 stdcall DAD_ShowDragImage (long) DAD_ShowDragImage 138 stub DuplicateIcon # exported by name 139 stub Desktop_UpdateBriefcaseOnEvent 140 stdcall FileMenu_DeleteItemByIndex(long long) FileMenu_DeleteItemByIndex 141 stdcall FileMenu_DeleteItemByFirstID(long long)FileMenu_DeleteItemByFirstID 142 stdcall FileMenu_DeleteSeparator(long)FileMenu_DeleteSeparator 143 stdcall FileMenu_EnableItemByCmd(long long long)FileMenu_EnableItemByCmd 144 stdcall FileMenu_GetItemExtent (long long) FileMenu_GetItemExtent 145 stdcall PathFindOnPath (ptr ptr) PathFindOnPathAW 146 stdcall RLBuildListOfPaths()RLBuildListOfPaths 147 stdcall SHCLSIDFromString(long long) SHCLSIDFromStringAW 148 stdcall ExtractAssociatedIconA(long ptr long) ExtractAssociatedIconA # exported by name 149 stdcall SHFind_InitMenuPopup(long long long long) SHFind_InitMenuPopup 150 stub ExtractAssociatedIconExA # exported by name 151 stdcall SHLoadOLE (long) SHLoadOLE 152 stdcall ILGetSize(ptr) ILGetSize 153 stdcall ILGetNext(ptr) ILGetNext 154 stdcall ILAppend (long long long) ILAppend 155 stdcall ILFree (ptr) ILFree 156 stdcall ILGlobalFree (ptr) ILGlobalFree 157 stdcall ILCreateFromPath (ptr) ILCreateFromPathAW 158 stdcall PathGetExtension(str) PathGetExtensionAW 159 stdcall PathIsDirectory(ptr)PathIsDirectoryAW 160 stub SHNetConnectionDialog 161 stdcall SHRunControlPanel (long long) SHRunControlPanel 162 stdcall SHSimpleIDListFromPath (ptr) SHSimpleIDListFromPathAW 163 stdcall StrToOleStr (wstr str) StrToOleStrAW 164 stdcall Win32DeleteFile(str) Win32DeleteFile 165 stdcall SHCreateDirectory(long long) SHCreateDirectory 166 stub CallCPLEntry16 167 stub SHAddFromPropSheetExtArray 168 stub SHCreatePropSheetExtArray 169 stub SHDestroyPropSheetExtArray 170 stub SHReplaceFromPropSheetExtArray 171 stdcall PathCleanupSpec(ptr ptr) PathCleanupSpecAW 172 stub SHCreateLinks 173 stdcall SHValidateUNC(long long long)SHValidateUNC 174 stdcall SHCreateShellFolderViewEx (ptr ptr) SHCreateShellFolderViewEx 175 stdcall SHGetSpecialFolderPath(long long long long) SHGetSpecialFolderPathAW 176 stdcall SHSetInstanceExplorer (long) SHSetInstanceExplorer 177 stub DAD_SetDragImageFromListView 178 stub SHObjectProperties 179 stub SHGetNewLinkInfoA 180 stub SHGetNewLinkInfoW 181 stdcall RegisterShellHook(long long) RegisterShellHook 182 varargs ShellMessageBoxW(long long long str long) ShellMessageBoxW 183 varargs ShellMessageBoxA(long long long str long) ShellMessageBoxA 184 stdcall ArrangeWindows(long long long long long) ArrangeWindows 185 stub SHHandleDiskFull 186 stub ExtractAssociatedIconExW # exported by name 187 stub ExtractAssociatedIconW # exported by name 188 stdcall ExtractIconA(long str long) ExtractIconA # exported by name 189 stdcall ExtractIconEx(ptr long ptr ptr long) ExtractIconExAW 190 stdcall ExtractIconExA(str long ptr ptr long) ExtractIconExA 191 stdcall ExtractIconExW(wstr long ptr ptr long) ExtractIconExW 192 stub ExtractIconResInfoA # exported by name 193 stub ExtractIconResInfoW # exported by name 194 stdcall ExtractIconW(long wstr long) ExtractIconW # exported by name 195 stdcall SHFree(ptr) SHFree 196 stdcall SHAlloc(long) SHAlloc 197 stub SHGlobalDefect 198 stdcall SHAbortInvokeCommand () SHAbortInvokeCommand 199 stub SHGetFileIcon 200 stub SHLocalAlloc 201 stub SHLocalFree 202 stub SHLocalReAlloc 203 stub AddCommasW 204 stub ShortSizeFormatW 205 stub Printer_LoadIconsW 206 stub Link_AddExtraDataSection 207 stub Link_ReadExtraDataSection 208 stub Link_RemoveExtraDataSection 209 stub Int64ToString 210 stub LargeIntegerToString 211 stub Printers_GetPidl 212 stub Printer_AddPrinterPropPages 213 stub Printers_RegisterWindowW 214 stub Printers_UnregisterWindow 215 stub SHStartNetConnectionDialog@12 216 stub ExtractVersionResource16W # exported by name 217 stub FindExeDlgProc # exported by name 218 stdcall FindExecutableA(ptr ptr ptr) FindExecutableA # exported by name 219 stdcall FindExecutableW(wstr wstr wstr) FindExecutableW # exported by name 220 stdcall FreeIconList(long) FreeIconList # exported by name 221 stub InternalExtractIconListA # exported by name 222 stub InternalExtractIconListW # exported by name 223 stub OpenAs_RunDLL # exported by name 224 stub OpenAs_RunDLLA # exported by name 225 stub OpenAs_RunDLLW # exported by name 226 stub PrintersGetCommand_RunDLL # exported by name 227 stub PrintersGetCommand_RunDLLA # exported by name 228 stub PrintersGetCommand_RunDLLW # exported by name 229 stub RealShellExecuteA # exported by name 230 stub RealShellExecuteExA # exported by name 231 stub RealShellExecuteExW # exported by name 232 stub RealShellExecuteW # exported by name 233 stub RegenerateUserEnvironment # exported by name 234 stdcall SHAddToRecentDocs (long ptr) SHAddToRecentDocs # exported by name 235 stdcall SHAppBarMessage(long ptr) SHAppBarMessage # exported by name 236 stdcall SHBrowseForFolder(ptr) SHBrowseForFolderA # exported by name 237 stdcall SHBrowseForFolderA(ptr) SHBrowseForFolderA # exported by name 238 stub SHBrowseForFolderW@4 # exported by name 239 stdcall SHChangeNotify (long long ptr ptr) SHChangeNotifyAW # exported by name 240 stub SHEmptyRecycleBinA@12 # exported by name 241 stub SHEmptyRecycleBinW@12 # exported by name @ stdcall SHFileOperation (ptr) SHFileOperationAW @ stdcall SHFileOperationA (ptr) SHFileOperationA @ stdcall SHFileOperationW (ptr) SHFileOperationW 243 stdcall shell32_243(long long) shell32_243 244 stdcall SHInitRestricted(ptr ptr) SHInitRestricted # win98+ only, by ordinal 245 stub SHFormatDrive@16 # exported by name 246 stub SHFreeNameMappings@4 # exported by name 247 stdcall SHGetDataFromIDListA (ptr ptr long ptr long) SHGetDataFromIDListA 248 stdcall SHGetDataFromIDListW (ptr ptr long ptr long) SHGetDataFromIDListW 249 stdcall PathParseIconLocation (ptr) PathParseIconLocationAW 250 stdcall PathRemoveExtension (ptr) PathRemoveExtensionAW 251 stdcall PathRemoveArgs (ptr) PathRemoveArgsAW @ stdcall SHGetDesktopFolder(ptr) SHGetDesktopFolder @ stdcall SHGetFileInfo(ptr long ptr long long) SHGetFileInfoAW @ stdcall SHGetFileInfoA(ptr long ptr long long) SHGetFileInfoA @ stdcall SHGetFileInfoW(ptr long ptr long long) SHGetFileInfoW @ stdcall SHGetInstanceExplorer (long) SHGetInstanceExplorer @ stdcall SHGetMalloc(ptr) SHGetMalloc @ stub SHGetNewLinkInfo@20 @ stdcall SHGetPathFromIDList(ptr ptr) SHGetPathFromIDListAW @ stdcall SHGetPathFromIDListA (long long) SHGetPathFromIDListA @ stdcall SHGetPathFromIDListW (long long) SHGetPathFromIDListW @ stdcall SHGetSpecialFolderLocation(long long ptr) SHGetSpecialFolderLocation # exported by name 264 stdcall SHHelpShortcuts_RunDLL(long long long long) SHHelpShortcuts_RunDLL # exported by name 265 stub SHHelpShortcuts_RunDLLA@16 # exported by name 266 stub SHHelpShortcuts_RunDLLW@16 # exported by name 267 stdcall SHLoadInProc(long) SHLoadInProc # exported by name 268 stub SHQueryRecycleBinA@8 # exported by name 269 stub SHQueryRecycleBinW@8 # exported by name 270 stub SHUpdateRecycleBinIcon@0 # exported by name 271 stub SheChangeDirA 272 stub SheChangeDirExA 273 stub SheChangeDirExW 274 stdcall SheChangeDirW(wstr) SheChangeDirW 275 stub SheConvertPathW 276 stub SheFullPathA 277 stub SheFullPathW 278 stub SheGetCurDrive 279 stub SheGetDirA@8 280 stub SheGetDirExW@12 281 stdcall SheGetDirW (long long) SheGetDirW 282 stub SheGetPathOffsetW 283 stub SheRemoveQuotesA 284 stub SheRemoveQuotesW 285 stub SheSetCurDrive 286 stub SheShortenPathA 287 stub SheShortenPathW 288 stdcall ShellAboutA(long str str long) ShellAboutA 289 stdcall ShellAboutW(long wstr wstr long) ShellAboutW 290 stdcall ShellExecuteA(long str str str str long) ShellExecuteA 291 stdcall ShellExecuteEx (long) ShellExecuteExAW 292 stdcall ShellExecuteExA (long) ShellExecuteExA 293 stdcall ShellExecuteExW (long) ShellExecuteExW 294 stdcall ShellExecuteW (long wstr wstr wstr wstr long) ShellExecuteW 295 stub ShellHookProc # exported by name 296 stdcall Shell_NotifyIcon(long ptr) Shell_NotifyIcon 297 stdcall Shell_NotifyIconA(long ptr) Shell_NotifyIconA 298 stdcall Shell_NotifyIconW(long ptr) Shell_NotifyIconW 299 stub Shl1632_ThunkData32 300 stub Shl3216_ThunkData32 301 stub StrChrA 302 stub StrChrIA 303 stub StrChrIW 304 stdcall StrChrW (wstr long) StrChrW 305 stub StrCmpNA 306 stub StrCmpNIA 307 stdcall StrCmpNIW (wstr wstr long) StrCmpNIW 308 stub StrCmpNW 309 stdcall StrCpyNA (ptr str long) lstrcpynA 310 stdcall StrCpyNW (ptr wstr long)lstrcpynW 311 stub StrNCmpA 312 stub StrNCmpIA 313 stub StrNCmpIW 314 stub StrNCmpW 315 stdcall StrNCpyA (ptr str long) lstrcpynA 316 stdcall StrNCpyW (ptr wstr long)lstrcpynW 317 stdcall StrRChrA (str str long) lstrrchr 318 stub StrRChrIA 319 stub StrRChrIW 320 stdcall StrRChrW (wstr wstr long) lstrrchrw 321 stub StrRStrA 322 stub StrRStrIA 323 stub StrRStrIW 324 stub StrRStrW 325 stub StrStrA 326 stub StrStrIA 327 stub StrStrIW 328 stub StrStrW 329 stub WOWShellExecute # proper ordinal unknown 505 stdcall SHRegCloseKey (long) SHRegCloseKey 506 stdcall SHRegOpenKeyA (long str long) SHRegOpenKeyA 507 stdcall SHRegOpenKeyW (long wstr long) SHRegOpenKeyW 508 stub SHRegQueryValueA@16 509 stdcall SHRegQueryValueExA(long str ptr ptr ptr ptr) SHRegQueryValueExA 510 stdcall SHRegQueryValueW (long long long long) SHRegQueryValueW 511 stdcall SHRegQueryValueExW (long wstr ptr ptr ptr ptr) SHRegQueryValueExW 512 stdcall SHRegDeleteKeyW (long wstr) SHRegDeleteKeyW 520 stdcall SHAllocShared (long long long) SHAllocShared 521 stdcall SHLockShared (long long) SHLockShared 522 stdcall SHUnlockShared (long) SHUnlockShared 523 stdcall SHFreeShared (long long) SHFreeShared 524 stub RealDriveType@8 525 stub RealDriveTypeFlags@8 640 stdcall NTSHChangeNotifyRegister (long long long long long long) NTSHChangeNotifyRegister 641 stdcall NTSHChangeNotifyDeregister (long) NTSHChangeNotifyDeregister 643 stub SHChangeNotifyReceive@16 644 stub SHChangeNotification_Lock@16 645 stub SHChangeNotification_Unlock@4 646 stub SHChangeRegistrationReceive@8 647 stub ReceiveAddToRecentDocs@8 648 stub SHWaitOp_Operate@8 650 stdcall PathIsSameRoot(ptr ptr)PathIsSameRootAW # nt40/win98 651 stdcall ReadCabinetState (long long) ReadCabinetState 652 stdcall WriteCabinetState (long) WriteCabinetState 653 stdcall PathProcessCommand (long long long long) PathProcessCommandAW # win98 654 stdcall shell32_654 (long long) shell32_654 660 stdcall FileIconInit (long) FileIconInit 680 stdcall IsUserAdmin () IsUserAdmin 1217 stub FOOBAR1217 # no joke! This is the real name!! # later additions ... FIXME: incorrect ordinals # win 98 uses 2...330, 505..511, 520..526, 640..654, 660, 680, 700..707, 711 1220 stdcall DllGetVersion (ptr) SHELL32_DllGetVersion # win98:201 1221 stdcall SHGetSpecialFolderPathA(long ptr long long) SHGetSpecialFolderPathA # win98:292 1222 stdcall DoEnvironmentSubstA (str str) DoEnvironmentSubstA # win98:293 1223 stdcall DoEnvironmentSubstW (wstr wstr) DoEnvironmentSubstW # win98:204 # by-name routines relocated in win98 @ stdcall DllInstall (long wstr) SHELL32_DllInstall wine-20000526/dlls/shell32/shell32_Ca.rc0100644000175000001440000000072007012671113017056 0ustar julliardusersLANGUAGE LANG_CATALAN, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "Quant a %s" FONT 10, "System" { DEFPUSHBUTTON "D'Acord", IDOK, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine ha estat construit per:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_Cs.rc0100644000175000001440000000071307012671113017102 0ustar julliardusersLANGUAGE LANG_CZECH, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "O aplikaci %s" FONT 10, "System" { DEFPUSHBUTTON "OK", IDOK, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine was brought to you by:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_Da.rc0100644000175000001440000000074307012671113017064 0ustar julliardusersLANGUAGE LANG_DANISH, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "Om %s" FONT 10, "System" { DEFPUSHBUTTON "OK", IDOK, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine havde ikke været mulig uden hjælp fra disse personer:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_De.rc0100644000175000001440000000137607013625243017077 0ustar julliardusersLANGUAGE LANG_GERMAN, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "Info über %s" FONT 10, "System" { DEFPUSHBUTTON "OK", IDOK, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine was brought to you by:", 98, 8, 55, 137, 10 } /* Namen der Header für die Shellviews */ STRINGTABLE LANGUAGE LANG_GERMAN, SUBLANG_NEUTRAL BEGIN IDS_SHV_COLUMN1 "Datei" IDS_SHV_COLUMN2 "Größe" IDS_SHV_COLUMN3 "Typ" IDS_SHV_COLUMN4 "Geändert" IDS_SHV_COLUMN5 "Attribute" IDS_SHV_COLUMN6 "Gesammtgröße" IDS_SHV_COLUMN7 "Freier Speicher" END wine-20000526/dlls/shell32/shell32_En.rc0100644000175000001440000000136307013625243017105 0ustar julliardusersLANGUAGE LANG_ENGLISH, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "About %s" FONT 10, "System" { DEFPUSHBUTTON "OK", IDOK, 153, 130, 50, 12, WS_TABSTOP LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine was brought to you by:", 98, 8, 55, 137, 10 } /* columns in the shellview */ STRINGTABLE LANGUAGE LANG_NEUTRAL, SUBLANG_NEUTRAL BEGIN IDS_SHV_COLUMN1 "File" IDS_SHV_COLUMN2 "Size" IDS_SHV_COLUMN3 "Type" IDS_SHV_COLUMN4 "Modified" IDS_SHV_COLUMN5 "Attributes" IDS_SHV_COLUMN6 "Size" IDS_SHV_COLUMN7 "Size avaiable" END wine-20000526/dlls/shell32/shell32_Eo.rc0100644000175000001440000000071106710660114017101 0ustar julliardusersLANGUAGE LANG_ESPERANTO, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "Pri %s" FONT 10, "System" { DEFPUSHBUTTON "Enorde", 1, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine was brought to you by:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_Es.rc0100644000175000001440000000072307012671113017105 0ustar julliardusersLANGUAGE LANG_SPANISH, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "Acerca de %s" FONT 10, "System" { DEFPUSHBUTTON "Aceptar", IDOK, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine es disponible gracias a:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_Fi.rc0100644000175000001440000000070407012671113017073 0ustar julliardusersLANGUAGE LANG_FINNISH, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "Tietoja: %s" FONT 10, "Järjestelmä" { DEFPUSHBUTTON "OK", IDOK, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine:n tekijät:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_Fr.rc0100644000175000001440000000071306710660114017107 0ustar julliardusersLANGUAGE LANG_FRENCH, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "A propos de %s" FONT 10, "System" { DEFPUSHBUTTON "OK", 1, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine est une réalisation de:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_Hu.rc0100644000175000001440000000071207012671113017110 0ustar julliardusersLANGUAGE LANG_HUNGARIAN, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "A %s-rõl" FONT 10, "System" { DEFPUSHBUTTON "OK", IDOK, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine was brought to you by:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_It.rc0100644000175000001440000000072207012671113017111 0ustar julliardusersLANGUAGE LANG_ITALIAN, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "Informazioni su %s" FONT 10, "System" { DEFPUSHBUTTON "OK", IDOK, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine was brought to you by:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_Ja.rc0100644000175000001440000000517607061520406017101 0ustar julliardusersLANGUAGE LANG_JAPANESE, SUBLANG_DEFAULT MENU_001 MENU DISCARDABLE BEGIN MENUITEM "‘å‚«‚ȱ²ºÝ(&G)", FCIDM_SHVIEW_BIGICON MENUITEM "¬‚³‚ȱ²ºÝ(&M)", FCIDM_SHVIEW_SMALLICON MENUITEM "ˆê——(&L)", FCIDM_SHVIEW_LISTVIEW MENUITEM "Ú×(&D)", FCIDM_SHVIEW_REPORTVIEW END MENU_002 MENU DISCARDABLE BEGIN POPUP"" BEGIN POPUP "•\\Ž¦(&V)" BEGIN MENUITEM "‘å‚«‚¢ƒAƒCƒRƒ“(&G)", FCIDM_SHVIEW_BIGICON MENUITEM "¬‚³‚¢ƒAƒCƒRƒ“(&M)", FCIDM_SHVIEW_SMALLICON MENUITEM "ˆê——(&L)", FCIDM_SHVIEW_LISTVIEW MENUITEM "Ú×(&D)", FCIDM_SHVIEW_REPORTVIEW END MENUITEM SEPARATOR POPUP "ƒAƒCƒRƒ“‚Ì®—ñ(&I)" BEGIN MENUITEM "–¼‘O‡(&N)", 0x30 /* column 0 */ MENUITEM "Ží—Þ‡(&T)", 0x32 /* column 2 */ MENUITEM "ƒTƒCƒY‡(&S)", 0x31 /* ... */ MENUITEM "“ú•t‡(&D)", 0x33 MENUITEM SEPARATOR MENUITEM "ƒAƒCƒRƒ“‚ÌŽ©“®®—ñ(&A)", FCIDM_SHVIEW_AUTOARRANGE END MENUITEM "“™ŠÔŠu‚É®—ñ", FCIDM_SHVIEW_SNAPTOGRID MENUITEM SEPARATOR MENUITEM "“\\‚è•t‚¯", FCIDM_SHVIEW_INSERT MENUITEM "ƒVƒ‡[ƒgƒJƒbƒg‚Ì“\\‚è•t‚¯", FCIDM_SHVIEW_INSERTLINK POPUP "V‹Kì¬" BEGIN MENUITEM "V‹KƒtƒHƒ‹ƒ_(&F)", 0x7053 MENUITEM "V‹KƒVƒ‡[ƒgƒJƒbƒg(&L)", 0x7052 MENUITEM SEPARATOR END MENUITEM "ƒvƒƒpƒeƒB", FCIDM_SHVIEW_PROPERTIES END END MENU_SHV_FILE MENU DISCARDABLE BEGIN POPUP"" BEGIN MENUITEM "Ø‚èŽæ‚è(&U)", FCIDM_SHVIEW_CUT MENUITEM "ƒRƒs[(&C)", FCIDM_SHVIEW_COPY MENUITEM SEPARATOR MENUITEM "ƒVƒ‡[ƒgƒJƒbƒg‚Ìì¬(&L)", 0x7051 MENUITEM "íœ(&D)", FCIDM_SHVIEW_DELETE MENUITEM "–¼‘O‚Ì•ÏX(&R)", 0x7050 MENUITEM SEPARATOR MENUITEM "ƒvƒƒpƒeƒB(&P)", FCIDM_SHVIEW_PROPERTIES END END /* special folders */ STRINGTABLE DISCARDABLE { IDS_DESKTOP "ÃÞ½¸Ä¯Ìß" IDS_MYCOMPUTER "ϲºÝËß­°À" } /* context menus */ STRINGTABLE DISCARDABLE { IDS_VIEW_LARGE "‘å‚«‚¢ƒAƒCƒRƒ“(&G)" IDS_VIEW_SMALL "¬‚³‚¢ƒAƒCƒRƒ“(&M)" IDS_VIEW_LIST "ˆê——(&L)" IDS_VIEW_DETAILS "Ú×(&D)" IDS_SELECT "‘I‘ð" IDS_OPEN "ŠJ‚­" } SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "%s ‚ɂ‚¢‚Ä" FONT 10, "System" { DEFPUSHBUTTON "OK", IDOK, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine was brought to you by:", 98, 8, 55, 137, 10 } /* columns in the shellview */ STRINGTABLE DISCARDABLE BEGIN IDS_SHV_COLUMN1 "–¼‘O" IDS_SHV_COLUMN2 "ƒTƒCƒY" IDS_SHV_COLUMN3 "ƒtƒ@ƒCƒ‹‚ÌŽí—Þ" IDS_SHV_COLUMN4 "XV“úŽž" IDS_SHV_COLUMN5 "‘®«" IDS_SHV_COLUMN6 "‡ŒvƒTƒCƒY" IDS_SHV_COLUMN7 "‹ó‚«—e—Ê" END wine-20000526/dlls/shell32/shell32_Ko.rc0100644000175000001440000000071106710660114017107 0ustar julliardusersLANGUAGE LANG_KOREAN, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "%s¿¡ °üÇÏ¿©" FONT 10, "System" { DEFPUSHBUTTON "È®ÀÎ", 1, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine was brought to you by:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_Nl.rc0100644000175000001440000000071607012671113017111 0ustar julliardusersLANGUAGE LANG_DUTCH, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "Info %s" FONT 10, "System" { DEFPUSHBUTTON "OK", IDOK, 153, 130, 50, 12, WS_TABSTOP LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine is geschreven door:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_No.rc0100644000175000001440000000070707012671113017114 0ustar julliardusersLANGUAGE LANG_NORWEGIAN, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "Om %s" FONT 10, "System" { DEFPUSHBUTTON "OK", IDOK, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine was brought to you by:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_Pl.rc0100644000175000001440000000070307012671113017107 0ustar julliardusersLANGUAGE LANG_POLISH, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "O %s" FONT 10, "System" { DEFPUSHBUTTON "OK", IDOK, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine was brought to you by:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_Pt.rc0100644000175000001440000000071607012671113017123 0ustar julliardusersLANGUAGE LANG_PORTUGUESE, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "Sobre %s" FONT 10, "System" { DEFPUSHBUTTON "OK", IDOK, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine foi disponibilizado por:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_Ru.rc0100644000175000001440000000071007012671113017120 0ustar julliardusersLANGUAGE LANG_RUSSIAN, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "Î %s" FONT 10, "System" { DEFPUSHBUTTON "OK", IDOK, 153, 130, 50, 12, WS_TABSTOP LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Ðàçðàáîò÷èêè Wine :", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_Sk.rc0100644000175000001440000000074307061521410017113 0ustar julliardusersLANGUAGE LANG_SLOVAK, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "O programe %s" FONT 10, "System" { DEFPUSHBUTTON "OK", IDOK, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine vám bol prinesený týmito ¾uïmi:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_Sv.rc0100644000175000001440000000073307012671113017127 0ustar julliardusersLANGUAGE LANG_SWEDISH, SUBLANG_DEFAULT SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "Om %s" FONT 10, "System" { DEFPUSHBUTTON "OK", IDOK, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine hade inte varit möjligt utan dessa personer:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_Wa.rc0100644000175000001440000000113507012671113017103 0ustar julliardusersLANGUAGE LANG_WALON, SUBLANG_DEFAULT /* * Si vos voloz aider avou li ratoûrnaedje des libes programes è walon, * vos poloz scrîre a l' adresse emile */ SHELL_ABOUT_MSGBOX DIALOG LOADONCALL MOVEABLE DISCARDABLE 15, 40, 210, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "Å dfait di %s" FONT 10, "System" { DEFPUSHBUTTON "I Va", IDOK, 153, 130, 50, 12 LISTBOX 99, 8, 65, 137, 82, LBS_NOTIFY | WS_VSCROLL | WS_BORDER ICON "", 1088, 189, 10, 14, 16 LTEXT "", 100, 8, 10, 137, 33 LTEXT "Wine a estu fwait par:", 98, 8, 55, 137, 10 } wine-20000526/dlls/shell32/shell32_main.c0100644000175000001440000006376007102370650017314 0ustar julliardusers/* * Shell basics * * 1998 Marcus Meissner * 1998 Juergen Schmied (jsch) * */ #include #include #include #include "windef.h" #include "wingdi.h" #include "wine/winuser16.h" #include "winerror.h" #include "heap.h" #include "dlgs.h" #include "ldt.h" #include "sysmetrics.h" #include "debugtools.h" #include "winreg.h" #include "authors.h" #include "winversion.h" #include "shellapi.h" #include "pidl.h" #include "shell32_main.h" #include "wine/undocshell.h" #include "shlobj.h" #include "shlguid.h" #include "shlwapi.h" DEFAULT_DEBUG_CHANNEL(shell); #define MORE_DEBUG 1 /************************************************************************* * CommandLineToArgvW [SHELL32.7] */ LPWSTR* WINAPI CommandLineToArgvW(LPWSTR cmdline,LPDWORD numargs) { LPWSTR *argv,s,t; int i; TRACE("\n"); /* to get writeable copy */ cmdline = HEAP_strdupW( GetProcessHeap(), 0, cmdline); s=cmdline;i=0; while (*s) { /* space */ if (*s==0x0020) { i++; s++; while (*s && *s==0x0020) s++; continue; } s++; } argv=(LPWSTR*)HeapAlloc( GetProcessHeap(), 0, sizeof(LPWSTR)*(i+1) ); s=t=cmdline; i=0; while (*s) { if (*s==0x0020) { *s=0; argv[i++]=HEAP_strdupW( GetProcessHeap(), 0, t ); *s=0x0020; while (*s && *s==0x0020) s++; if (*s) t=s+1; else t=s; continue; } s++; } if (*t) argv[i++]=(LPWSTR)HEAP_strdupW( GetProcessHeap(), 0, t ); HeapFree( GetProcessHeap(), 0, cmdline ); argv[i]=NULL; *numargs=i; return argv; } /************************************************************************* * Control_RunDLL [SHELL32.12] * * Wild speculation in the following! * * http://premium.microsoft.com/msdn/library/techart/msdn193.htm */ void WINAPI Control_RunDLL( HWND hwnd, LPCVOID code, LPCSTR cmd, DWORD arg4 ) { FIXME("(0x%08x, %p, %s, 0x%08lx): stub\n", hwnd, code, debugstr_a(cmd), arg4); } /************************************************************************* * SHGetFileInfoA [SHELL32.@] */ DWORD WINAPI SHGetFileInfoA(LPCSTR path,DWORD dwFileAttributes, SHFILEINFOA *psfi, UINT sizeofpsfi, UINT flags ) { char szLoaction[MAX_PATH]; int iIndex; DWORD ret = TRUE, dwAttributes = 0; IShellFolder * psfParent = NULL; IExtractIconA * pei = NULL; LPITEMIDLIST pidlLast = NULL, pidl = NULL; HRESULT hr = S_OK; TRACE("(%s fattr=0x%lx sfi=%p(attr=0x%08lx) size=0x%x flags=0x%x)\n", (flags & SHGFI_PIDL)? "pidl" : path, dwFileAttributes, psfi, psfi->dwAttributes, sizeofpsfi, flags); if ((flags & SHGFI_USEFILEATTRIBUTES) && (flags & (SHGFI_ATTRIBUTES|SHGFI_EXETYPE|SHGFI_PIDL))) return FALSE; /* translate the path into a pidl only when SHGFI_USEFILEATTRIBUTES in not specified the pidl functions fail on not existing file names */ if (flags & SHGFI_PIDL) { pidl = (LPCITEMIDLIST) path; if (!pidl ) { ERR("pidl is null!\n"); return FALSE; } } else if (!(flags & SHGFI_USEFILEATTRIBUTES)) { hr = SHILCreateFromPathA ( path, &pidl, &dwAttributes); /* note: the attributes in ISF::ParseDisplayName are not implemented */ } /* get the parent shellfolder */ if (pidl) { hr = SHBindToParent( pidl, &IID_IShellFolder, (LPVOID*)&psfParent, &pidlLast); } /* get the attributes of the child */ if (SUCCEEDED(hr) && (flags & SHGFI_ATTRIBUTES)) { if (!(flags & SHGFI_ATTR_SPECIFIED)) { psfi->dwAttributes = 0xffffffff; } IShellFolder_GetAttributesOf(psfParent, 1 , &pidlLast, &(psfi->dwAttributes)); } /* get the displayname */ if (SUCCEEDED(hr) && (flags & SHGFI_DISPLAYNAME)) { if (flags & SHGFI_USEFILEATTRIBUTES) { strcpy (psfi->szDisplayName, PathFindFileNameA(path)); } else { STRRET str; hr = IShellFolder_GetDisplayNameOf(psfParent, pidlLast, SHGDN_INFOLDER, &str); StrRetToStrNA (psfi->szDisplayName, MAX_PATH, &str, pidlLast); } } /* get the type name */ if (SUCCEEDED(hr) && (flags & SHGFI_TYPENAME)) { _ILGetFileType(pidlLast, psfi->szTypeName, 80); } /* ### icons ###*/ if (flags & SHGFI_LINKOVERLAY) FIXME("set icon to link, stub\n"); if (flags & SHGFI_SELECTED) FIXME("set icon to selected, stub\n"); if (flags & SHGFI_SHELLICONSIZE) FIXME("set icon to shell size, stub\n"); /* get the iconlocation */ if (SUCCEEDED(hr) && (flags & SHGFI_ICONLOCATION )) { UINT uDummy,uFlags; hr = IShellFolder_GetUIObjectOf(psfParent, 0, 1, &pidlLast, &IID_IExtractIconA, &uDummy, (LPVOID*)&pei); if (SUCCEEDED(hr)) { hr = IExtractIconA_GetIconLocation(pei, (flags & SHGFI_OPENICON)? GIL_OPENICON : 0,szLoaction, MAX_PATH, &iIndex, &uFlags); /* fixme what to do with the index? */ if(uFlags != GIL_NOTFILENAME) strcpy (psfi->szDisplayName, szLoaction); else ret = FALSE; IExtractIconA_Release(pei); } } /* get icon index (or load icon)*/ if (SUCCEEDED(hr) && (flags & (SHGFI_ICON | SHGFI_SYSICONINDEX))) { if (flags & SHGFI_USEFILEATTRIBUTES) { char sTemp [MAX_PATH]; char * szExt; DWORD dwNr=0; lstrcpynA(sTemp, path, MAX_PATH); szExt = (LPSTR) PathFindExtensionA(sTemp); if( szExt && HCR_MapTypeToValue(szExt, sTemp, MAX_PATH, TRUE) && HCR_GetDefaultIcon(sTemp, sTemp, MAX_PATH, &dwNr)) { if (!strcmp("%1",sTemp)) /* icon is in the file */ { strcpy(sTemp, path); } /* FIXME: if sTemp contains a valid filename, get the icon from there, index is in dwNr */ psfi->iIcon = 2; } else /* default icon */ { psfi->iIcon = 0; } } else { if (!(PidlToSicIndex(psfParent, pidlLast, (flags & SHGFI_LARGEICON), (flags & SHGFI_OPENICON)? GIL_OPENICON : 0, &(psfi->iIcon)))) { ret = FALSE; } } if (ret) { ret = (DWORD) ((flags & SHGFI_LARGEICON) ? ShellBigIconList : ShellSmallIconList); } } /* icon handle */ if (SUCCEEDED(hr) && (flags & SHGFI_ICON)) psfi->hIcon = pImageList_GetIcon((flags & SHGFI_LARGEICON) ? ShellBigIconList:ShellSmallIconList, psfi->iIcon, ILD_NORMAL); if (flags & SHGFI_EXETYPE) FIXME("type of executable, stub\n"); if (flags & (SHGFI_UNKNOWN1 | SHGFI_UNKNOWN2 | SHGFI_UNKNOWN3)) FIXME("unknown attribute!\n"); if (psfParent) IShellFolder_Release(psfParent); if (hr != S_OK) ret = FALSE; if(pidlLast) SHFree(pidlLast); #ifdef MORE_DEBUG TRACE ("icon=0x%08x index=0x%08x attr=0x%08lx name=%s type=%s ret=0x%08lx\n", psfi->hIcon, psfi->iIcon, psfi->dwAttributes, psfi->szDisplayName, psfi->szTypeName, ret); #endif return ret; } /************************************************************************* * SHGetFileInfoW [SHELL32.@] */ DWORD WINAPI SHGetFileInfoW(LPCWSTR path,DWORD dwFileAttributes, SHFILEINFOW *psfi, UINT sizeofpsfi, UINT flags ) { FIXME("(%s,0x%lx,%p,0x%x,0x%x)\n", debugstr_w(path),dwFileAttributes,psfi,sizeofpsfi,flags); return 0; } /************************************************************************* * SHGetFileInfoAW [SHELL32.@] */ DWORD WINAPI SHGetFileInfoAW( LPCVOID path, DWORD dwFileAttributes, LPVOID psfi, UINT sizeofpsfi, UINT flags) { if(VERSION_OsIsUnicode()) return SHGetFileInfoW(path, dwFileAttributes, psfi, sizeofpsfi, flags ); return SHGetFileInfoA(path, dwFileAttributes, psfi, sizeofpsfi, flags ); } /************************************************************************* * ExtractIconA [SHELL32.133] */ HICON WINAPI ExtractIconA( HINSTANCE hInstance, LPCSTR lpszExeFileName, UINT nIconIndex ) { HGLOBAL16 handle = InternalExtractIcon16(hInstance,lpszExeFileName,nIconIndex, 1); TRACE("\n"); if( handle ) { HICON16* ptr = (HICON16*)GlobalLock16(handle); HICON16 hIcon = *ptr; GlobalFree16(handle); return hIcon; } return 0; } /************************************************************************* * ExtractIconW [SHELL32.180] */ HICON WINAPI ExtractIconW( HINSTANCE hInstance, LPCWSTR lpszExeFileName, UINT nIconIndex ) { LPSTR exefn; HICON ret; TRACE("\n"); exefn = HEAP_strdupWtoA(GetProcessHeap(),0,lpszExeFileName); ret = ExtractIconA(hInstance,exefn,nIconIndex); HeapFree(GetProcessHeap(),0,exefn); return ret; } /************************************************************************* * FindExecutableA [SHELL32.184] */ HINSTANCE WINAPI FindExecutableA( LPCSTR lpFile, LPCSTR lpDirectory, LPSTR lpResult ) { HINSTANCE retval=31; /* default - 'No association was found' */ char old_dir[1024]; TRACE("File %s, Dir %s\n", (lpFile != NULL?lpFile:"-"), (lpDirectory != NULL?lpDirectory:"-")); lpResult[0]='\0'; /* Start off with an empty return string */ /* trap NULL parameters on entry */ if (( lpFile == NULL ) || ( lpResult == NULL )) { /* FIXME - should throw a warning, perhaps! */ return 2; /* File not found. Close enough, I guess. */ } if (lpDirectory) { GetCurrentDirectoryA( sizeof(old_dir), old_dir ); SetCurrentDirectoryA( lpDirectory ); } retval = SHELL_FindExecutable( lpFile, "open", lpResult ); TRACE("returning %s\n", lpResult); if (lpDirectory) SetCurrentDirectoryA( old_dir ); return retval; } /************************************************************************* * FindExecutableW [SHELL32.219] */ HINSTANCE WINAPI FindExecutableW(LPCWSTR lpFile, LPCWSTR lpDirectory, LPWSTR lpResult) { FIXME("(%p,%p,%p): stub\n", lpFile, lpDirectory, lpResult); return 31; /* default - 'No association was found' */ } typedef struct { LPCSTR szApp; LPCSTR szOtherStuff; HICON hIcon; } ABOUT_INFO; #define IDC_STATIC_TEXT 100 #define IDC_LISTBOX 99 #define IDC_WINE_TEXT 98 #define DROP_FIELD_TOP (-15) #define DROP_FIELD_HEIGHT 15 extern HICON hIconTitleFont; static BOOL __get_dropline( HWND hWnd, LPRECT lprect ) { HWND hWndCtl = GetDlgItem(hWnd, IDC_WINE_TEXT); if( hWndCtl ) { GetWindowRect( hWndCtl, lprect ); MapWindowPoints( 0, hWnd, (LPPOINT)lprect, 2 ); lprect->bottom = (lprect->top += DROP_FIELD_TOP); return TRUE; } return FALSE; } /************************************************************************* * SHAppBarMessage [SHELL32.207] */ UINT WINAPI SHAppBarMessage(DWORD msg, PAPPBARDATA data) { int width=data->rc.right - data->rc.left; int height=data->rc.bottom - data->rc.top; RECT rec=data->rc; switch (msg) { case ABM_GETSTATE: return ABS_ALWAYSONTOP | ABS_AUTOHIDE; case ABM_GETTASKBARPOS: GetWindowRect(data->hWnd, &rec); data->rc=rec; return TRUE; case ABM_ACTIVATE: SetActiveWindow(data->hWnd); return TRUE; case ABM_GETAUTOHIDEBAR: data->hWnd=GetActiveWindow(); return TRUE; case ABM_NEW: SetWindowPos(data->hWnd,HWND_TOP,rec.left,rec.top, width,height,SWP_SHOWWINDOW); return TRUE; case ABM_QUERYPOS: GetWindowRect(data->hWnd, &(data->rc)); return TRUE; case ABM_REMOVE: CloseHandle(data->hWnd); return TRUE; case ABM_SETAUTOHIDEBAR: SetWindowPos(data->hWnd,HWND_TOP,rec.left+1000,rec.top, width,height,SWP_SHOWWINDOW); return TRUE; case ABM_SETPOS: data->uEdge=(ABE_RIGHT | ABE_LEFT); SetWindowPos(data->hWnd,HWND_TOP,data->rc.left,data->rc.top, width,height,SWP_SHOWWINDOW); return TRUE; case ABM_WINDOWPOSCHANGED: SetWindowPos(data->hWnd,HWND_TOP,rec.left,rec.top, width,height,SWP_SHOWWINDOW); return TRUE; } return FALSE; } /************************************************************************* * SHHelpShortcuts_RunDLL [SHELL32.224] * */ DWORD WINAPI SHHelpShortcuts_RunDLL (DWORD dwArg1, DWORD dwArg2, DWORD dwArg3, DWORD dwArg4) { FIXME("(%lx, %lx, %lx, %lx) empty stub!\n", dwArg1, dwArg2, dwArg3, dwArg4); return 0; } /************************************************************************* * SHLoadInProc [SHELL32.225] * Create an instance of specified object class from within * the shell process and release it immediately */ DWORD WINAPI SHLoadInProc (REFCLSID rclsid) { IUnknown * pUnk = NULL; TRACE("%s\n", debugstr_guid(rclsid)); CoCreateInstance(rclsid, NULL, CLSCTX_INPROC_SERVER, &IID_IUnknown,(LPVOID*)pUnk); if(pUnk) { IUnknown_Release(pUnk); return NOERROR; } return DISP_E_MEMBERNOTFOUND; } /************************************************************************* * ShellExecuteA [SHELL32.245] */ HINSTANCE WINAPI ShellExecuteA( HWND hWnd, LPCSTR lpOperation, LPCSTR lpFile, LPCSTR lpParameters, LPCSTR lpDirectory, INT iShowCmd ) { TRACE("\n"); return ShellExecute16( hWnd, lpOperation, lpFile, lpParameters, lpDirectory, iShowCmd ); } /************************************************************************* * ShellExecuteW [SHELL32.294] * from shellapi.h * WINSHELLAPI HINSTANCE APIENTRY ShellExecuteW(HWND hwnd, LPCWSTR lpOperation, * LPCWSTR lpFile, LPCWSTR lpParameters, LPCWSTR lpDirectory, INT nShowCmd); */ HINSTANCE WINAPI ShellExecuteW( HWND hwnd, LPCWSTR lpOperation, LPCWSTR lpFile, LPCWSTR lpParameters, LPCWSTR lpDirectory, INT nShowCmd) { FIXME(": stub\n"); return 0; } /************************************************************************* * AboutDlgProc (internal) */ BOOL WINAPI AboutDlgProc( HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam ) { HWND hWndCtl; char Template[512], AppTitle[512]; TRACE("\n"); switch(msg) { case WM_INITDIALOG: { ABOUT_INFO *info = (ABOUT_INFO *)lParam; if (info) { const char* const *pstr = SHELL_People; SendDlgItemMessageA(hWnd, stc1, STM_SETICON,info->hIcon, 0); GetWindowTextA( hWnd, Template, sizeof(Template) ); sprintf( AppTitle, Template, info->szApp ); SetWindowTextA( hWnd, AppTitle ); SetWindowTextA( GetDlgItem(hWnd, IDC_STATIC_TEXT), info->szOtherStuff ); hWndCtl = GetDlgItem(hWnd, IDC_LISTBOX); SendMessageA( hWndCtl, WM_SETREDRAW, 0, 0 ); SendMessageA( hWndCtl, WM_SETFONT, hIconTitleFont, 0 ); while (*pstr) { SendMessageA( hWndCtl, LB_ADDSTRING, (WPARAM)-1, (LPARAM)*pstr ); pstr++; } SendMessageA( hWndCtl, WM_SETREDRAW, 1, 0 ); } } return 1; case WM_PAINT: { RECT rect; PAINTSTRUCT ps; HDC hDC = BeginPaint( hWnd, &ps ); if( __get_dropline( hWnd, &rect ) ) { SelectObject( hDC, GetStockObject( BLACK_PEN ) ); MoveToEx( hDC, rect.left, rect.top, NULL ); LineTo( hDC, rect.right, rect.bottom ); } EndPaint( hWnd, &ps ); } break; case WM_LBTRACKPOINT: hWndCtl = GetDlgItem(hWnd, IDC_LISTBOX); if( (INT16)GetKeyState16( VK_CONTROL ) < 0 ) { if( DragDetect( hWndCtl, *((LPPOINT)&lParam) ) ) { INT idx = SendMessageA( hWndCtl, LB_GETCURSEL, 0, 0 ); if( idx != -1 ) { INT length = SendMessageA( hWndCtl, LB_GETTEXTLEN, (WPARAM)idx, 0 ); HGLOBAL16 hMemObj = GlobalAlloc16( GMEM_MOVEABLE, length + 1 ); char* pstr = (char*)GlobalLock16( hMemObj ); if( pstr ) { HCURSOR16 hCursor = LoadCursor16( 0, MAKEINTRESOURCE16(OCR_DRAGOBJECT) ); SendMessageA( hWndCtl, LB_GETTEXT, (WPARAM)idx, (LPARAM)pstr ); SendMessageA( hWndCtl, LB_DELETESTRING, (WPARAM)idx, 0 ); UpdateWindow( hWndCtl ); if( !DragObject16((HWND16)hWnd, (HWND16)hWnd, DRAGOBJ_DATA, 0, (WORD)hMemObj, hCursor) ) SendMessageA( hWndCtl, LB_ADDSTRING, (WPARAM)-1, (LPARAM)pstr ); } if( hMemObj ) GlobalFree16( hMemObj ); } } } break; case WM_QUERYDROPOBJECT: if( wParam == 0 ) { LPDRAGINFO lpDragInfo = (LPDRAGINFO)PTR_SEG_TO_LIN((SEGPTR)lParam); if( lpDragInfo && lpDragInfo->wFlags == DRAGOBJ_DATA ) { RECT rect; if( __get_dropline( hWnd, &rect ) ) { POINT pt; pt.x=lpDragInfo->pt.x; pt.x=lpDragInfo->pt.y; rect.bottom += DROP_FIELD_HEIGHT; if( PtInRect( &rect, pt ) ) { SetWindowLongA( hWnd, DWL_MSGRESULT, 1 ); return TRUE; } } } } break; case WM_DROPOBJECT: if( wParam == hWnd ) { LPDRAGINFO lpDragInfo = (LPDRAGINFO)PTR_SEG_TO_LIN((SEGPTR)lParam); if( lpDragInfo && lpDragInfo->wFlags == DRAGOBJ_DATA && lpDragInfo->hList ) { char* pstr = (char*)GlobalLock16( (HGLOBAL16)(lpDragInfo->hList) ); if( pstr ) { static char __appendix_str[] = " with"; hWndCtl = GetDlgItem( hWnd, IDC_WINE_TEXT ); SendMessageA( hWndCtl, WM_GETTEXT, 512, (LPARAM)Template ); if( !strncmp( Template, "WINE", 4 ) ) SetWindowTextA( GetDlgItem(hWnd, IDC_STATIC_TEXT), Template ); else { char* pch = Template + strlen(Template) - strlen(__appendix_str); *pch = '\0'; SendMessageA( GetDlgItem(hWnd, IDC_LISTBOX), LB_ADDSTRING, (WPARAM)-1, (LPARAM)Template ); } strcpy( Template, pstr ); strcat( Template, __appendix_str ); SetWindowTextA( hWndCtl, Template ); SetWindowLongA( hWnd, DWL_MSGRESULT, 1 ); return TRUE; } } } break; case WM_COMMAND: if (wParam == IDOK) { EndDialog(hWnd, TRUE); return TRUE; } break; case WM_CLOSE: EndDialog(hWnd, TRUE); break; } return 0; } /************************************************************************* * ShellAboutA [SHELL32.243] */ BOOL WINAPI ShellAboutA( HWND hWnd, LPCSTR szApp, LPCSTR szOtherStuff, HICON hIcon ) { ABOUT_INFO info; HRSRC hRes; LPVOID template; TRACE("\n"); if(!(hRes = FindResourceA(shell32_hInstance, "SHELL_ABOUT_MSGBOX", RT_DIALOGA))) return FALSE; if(!(template = (LPVOID)LoadResource(shell32_hInstance, hRes))) return FALSE; info.szApp = szApp; info.szOtherStuff = szOtherStuff; info.hIcon = hIcon; if (!hIcon) info.hIcon = LoadIcon16( 0, MAKEINTRESOURCE16(OIC_WINEICON) ); return DialogBoxIndirectParamA( GetWindowLongA( hWnd, GWL_HINSTANCE ), template, hWnd, AboutDlgProc, (LPARAM)&info ); } /************************************************************************* * ShellAboutW [SHELL32.244] */ BOOL WINAPI ShellAboutW( HWND hWnd, LPCWSTR szApp, LPCWSTR szOtherStuff, HICON hIcon ) { BOOL ret; ABOUT_INFO info; HRSRC hRes; LPVOID template; TRACE("\n"); if(!(hRes = FindResourceA(shell32_hInstance, "SHELL_ABOUT_MSGBOX", RT_DIALOGA))) return FALSE; if(!(template = (LPVOID)LoadResource(shell32_hInstance, hRes))) return FALSE; info.szApp = HEAP_strdupWtoA( GetProcessHeap(), 0, szApp ); info.szOtherStuff = HEAP_strdupWtoA( GetProcessHeap(), 0, szOtherStuff ); info.hIcon = hIcon; if (!hIcon) info.hIcon = LoadIcon16( 0, MAKEINTRESOURCE16(OIC_WINEICON) ); ret = DialogBoxIndirectParamA( GetWindowLongA( hWnd, GWL_HINSTANCE ), template, hWnd, AboutDlgProc, (LPARAM)&info ); HeapFree( GetProcessHeap(), 0, (LPSTR)info.szApp ); HeapFree( GetProcessHeap(), 0, (LPSTR)info.szOtherStuff ); return ret; } /************************************************************************* * FreeIconList */ void WINAPI FreeIconList( DWORD dw ) { FIXME("(%lx): stub\n",dw); } /*********************************************************************** * DllGetVersion [COMCTL32.25] * * Retrieves version information of the 'SHELL32.DLL' * * PARAMS * pdvi [O] pointer to version information structure. * * RETURNS * Success: S_OK * Failure: E_INVALIDARG * * NOTES * Returns version of a shell32.dll from IE4.01 SP1. */ HRESULT WINAPI SHELL32_DllGetVersion (DLLVERSIONINFO *pdvi) { if (pdvi->cbSize != sizeof(DLLVERSIONINFO)) { WARN("wrong DLLVERSIONINFO size from app"); return E_INVALIDARG; } pdvi->dwMajorVersion = 4; pdvi->dwMinorVersion = 72; pdvi->dwBuildNumber = 3110; pdvi->dwPlatformID = 1; TRACE("%lu.%lu.%lu.%lu\n", pdvi->dwMajorVersion, pdvi->dwMinorVersion, pdvi->dwBuildNumber, pdvi->dwPlatformID); return S_OK; } /************************************************************************* * global variables of the shell32.dll * all are once per process * */ void (WINAPI* pDLLInitComctl)(LPVOID); INT (WINAPI* pImageList_AddIcon) (HIMAGELIST himl, HICON hIcon); INT (WINAPI* pImageList_ReplaceIcon) (HIMAGELIST, INT, HICON); HIMAGELIST (WINAPI * pImageList_Create) (INT,INT,UINT,INT,INT); BOOL (WINAPI* pImageList_Draw) (HIMAGELIST himl, int i, HDC hdcDest, int x, int y, UINT fStyle); HICON (WINAPI * pImageList_GetIcon) (HIMAGELIST, INT, UINT); INT (WINAPI* pImageList_GetImageCount)(HIMAGELIST); COLORREF (WINAPI *pImageList_SetBkColor)(HIMAGELIST, COLORREF); LPVOID (WINAPI* pCOMCTL32_Alloc) (INT); BOOL (WINAPI* pCOMCTL32_Free) (LPVOID); HDPA (WINAPI* pDPA_Create) (INT); INT (WINAPI* pDPA_InsertPtr) (const HDPA, INT, LPVOID); BOOL (WINAPI* pDPA_Sort) (const HDPA, PFNDPACOMPARE, LPARAM); LPVOID (WINAPI* pDPA_GetPtr) (const HDPA, INT); BOOL (WINAPI* pDPA_Destroy) (const HDPA); INT (WINAPI *pDPA_Search) (const HDPA, LPVOID, INT, PFNDPACOMPARE, LPARAM, UINT); LPVOID (WINAPI *pDPA_DeletePtr) (const HDPA hdpa, INT i); /* user32 */ HICON (WINAPI *pLookupIconIdFromDirectoryEx)(LPBYTE dir, BOOL bIcon, INT width, INT height, UINT cFlag); HICON (WINAPI *pCreateIconFromResourceEx)(LPBYTE bits,UINT cbSize, BOOL bIcon, DWORD dwVersion, INT width, INT height,UINT cFlag); static HINSTANCE hComctl32; static INT shell32_RefCount = 0; LONG shell32_ObjCount = 0; HINSTANCE shell32_hInstance; HIMAGELIST ShellSmallIconList = 0; HIMAGELIST ShellBigIconList = 0; /************************************************************************* * SHELL32 LibMain * * NOTES * calling oleinitialize here breaks sone apps. */ BOOL WINAPI Shell32LibMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID fImpLoad) { HMODULE hUser32; TRACE("0x%x 0x%lx %p\n", hinstDLL, fdwReason, fImpLoad); switch (fdwReason) { case DLL_PROCESS_ATTACH: shell32_RefCount++; if (shell32_hInstance) return TRUE; shell32_hInstance = hinstDLL; hComctl32 = GetModuleHandleA("COMCTL32.DLL"); hUser32 = GetModuleHandleA("USER32"); DisableThreadLibraryCalls(shell32_hInstance); if (!hComctl32 || !hUser32) { ERR("P A N I C SHELL32 loading failed\n"); return FALSE; } /* comctl32 */ pDLLInitComctl=(void*)GetProcAddress(hComctl32,"InitCommonControlsEx"); pImageList_Create=(void*)GetProcAddress(hComctl32,"ImageList_Create"); pImageList_AddIcon=(void*)GetProcAddress(hComctl32,"ImageList_AddIcon"); pImageList_ReplaceIcon=(void*)GetProcAddress(hComctl32,"ImageList_ReplaceIcon"); pImageList_GetIcon=(void*)GetProcAddress(hComctl32,"ImageList_GetIcon"); pImageList_GetImageCount=(void*)GetProcAddress(hComctl32,"ImageList_GetImageCount"); pImageList_Draw=(void*)GetProcAddress(hComctl32,"ImageList_Draw"); pImageList_SetBkColor=(void*)GetProcAddress(hComctl32,"ImageList_SetBkColor"); pCOMCTL32_Alloc=(void*)GetProcAddress(hComctl32, (LPCSTR)71L); pCOMCTL32_Free=(void*)GetProcAddress(hComctl32, (LPCSTR)73L); pDPA_Create=(void*)GetProcAddress(hComctl32, (LPCSTR)328L); pDPA_Destroy=(void*)GetProcAddress(hComctl32, (LPCSTR)329L); pDPA_GetPtr=(void*)GetProcAddress(hComctl32, (LPCSTR)332L); pDPA_InsertPtr=(void*)GetProcAddress(hComctl32, (LPCSTR)334L); pDPA_DeletePtr=(void*)GetProcAddress(hComctl32, (LPCSTR)336L); pDPA_Sort=(void*)GetProcAddress(hComctl32, (LPCSTR)338L); pDPA_Search=(void*)GetProcAddress(hComctl32, (LPCSTR)339L); /* user32 */ pLookupIconIdFromDirectoryEx=(void*)GetProcAddress(hUser32,"LookupIconIdFromDirectoryEx"); pCreateIconFromResourceEx=(void*)GetProcAddress(hUser32,"CreateIconFromResourceEx"); /* initialize the common controls */ if (pDLLInitComctl) { pDLLInitComctl(NULL); } SIC_Initialize(); SYSTRAY_Init(); InitChangeNotifications(); SHInitRestricted(NULL, NULL); break; case DLL_THREAD_ATTACH: shell32_RefCount++; break; case DLL_THREAD_DETACH: shell32_RefCount--; break; case DLL_PROCESS_DETACH: shell32_RefCount--; if ( !shell32_RefCount ) { shell32_hInstance = 0; if (pdesktopfolder) { IShellFolder_Release(pdesktopfolder); pdesktopfolder = NULL; } SIC_Destroy(); FreeChangeNotifications(); /* this one is here to check if AddRef/Release is balanced */ if (shell32_ObjCount) { WARN("leaving with %lu objects left (memory leak)\n", shell32_ObjCount); } } TRACE("refcount=%u objcount=%lu \n", shell32_RefCount, shell32_ObjCount); break; } return TRUE; } /************************************************************************* * DllInstall [SHELL32.202] * * PARAMETERS * * BOOL bInstall - TRUE for install, FALSE for uninstall * LPCWSTR pszCmdLine - command line (unused by shell32?) */ HRESULT WINAPI SHELL32_DllInstall(BOOL bInstall, LPCWSTR cmdline) { FIXME("(%s, %s): stub!\n", bInstall ? "TRUE":"FALSE", debugstr_w(cmdline)); return S_OK; /* indicate success */ } wine-20000526/dlls/shell32/shell32_main.h0100644000175000001440000001501707102370650017311 0ustar julliardusers/* * internal Shell32 Library definitions */ #ifndef __WINE_SHELL_MAIN_H #define __WINE_SHELL_MAIN_H #include "imagelist.h" #include "commctrl.h" #include "shell.h" #include "docobj.h" #include "wine/obj_shellfolder.h" #include "wine/obj_dataobject.h" #include "wine/obj_contextmenu.h" #include "wine/obj_shellview.h" #include "wine/obj_shelllink.h" #include "wine/obj_extracticon.h" /******************************************* * global SHELL32.DLL variables */ extern HINSTANCE shell32_hInstance; extern LONG shell32_ObjCount; extern HIMAGELIST ShellSmallIconList; extern HIMAGELIST ShellBigIconList; extern HDPA sic_hdpa; /******************************************* * pointer to functions dynamically loaded */ extern void (WINAPI* pDLLInitComctl)(LPVOID); extern INT (WINAPI* pImageList_AddIcon) (HIMAGELIST himl, HICON hIcon); extern INT (WINAPI* pImageList_ReplaceIcon) (HIMAGELIST, INT, HICON); extern HIMAGELIST (WINAPI* pImageList_Create) (INT,INT,UINT,INT,INT); extern BOOL (WINAPI* pImageList_Draw) (HIMAGELIST himl, int i, HDC hdcDest, int x, int y, UINT fStyle); extern HICON (WINAPI* pImageList_GetIcon) (HIMAGELIST, INT, UINT); extern INT (WINAPI* pImageList_GetImageCount)(HIMAGELIST); extern COLORREF (WINAPI *pImageList_SetBkColor)(HIMAGELIST, COLORREF); extern LPVOID (WINAPI* pCOMCTL32_Alloc) (INT); extern BOOL (WINAPI* pCOMCTL32_Free) (LPVOID); extern HDPA (WINAPI* pDPA_Create) (INT); extern INT (WINAPI* pDPA_InsertPtr) (const HDPA, INT, LPVOID); extern BOOL (WINAPI* pDPA_Sort) (const HDPA, PFNDPACOMPARE, LPARAM); extern LPVOID (WINAPI* pDPA_GetPtr) (const HDPA, INT); extern BOOL (WINAPI* pDPA_Destroy) (const HDPA); extern INT (WINAPI* pDPA_Search) (const HDPA, LPVOID, INT, PFNDPACOMPARE, LPARAM, UINT); extern LPVOID (WINAPI* pDPA_DeletePtr) (const HDPA hdpa, INT i); #define pDPA_GetPtrCount(hdpa) (*(INT*)(hdpa)) extern HICON (WINAPI *pLookupIconIdFromDirectoryEx)(LPBYTE dir, BOOL bIcon, INT width, INT height, UINT cFlag); extern HICON (WINAPI *pCreateIconFromResourceEx)(LPBYTE bits,UINT cbSize, BOOL bIcon, DWORD dwVersion, INT width, INT height,UINT cFlag); /* ole2 */ /* extern HRESULT (WINAPI* pOleInitialize)(LPVOID reserved); extern void (WINAPI* pOleUninitialize)(void); extern HRESULT (WINAPI* pDoDragDrop)(IDataObject* pDataObject, IDropSource * pDropSource, DWORD dwOKEffect, DWORD * pdwEffect); extern HRESULT (WINAPI* pRegisterDragDrop)(HWND hwnd, IDropTarget* pDropTarget); extern HRESULT (WINAPI* pRevokeDragDrop)(HWND hwnd); */ BOOL WINAPI Shell_GetImageList(HIMAGELIST * lpBigList, HIMAGELIST * lpSmallList); HRESULT WINAPI StrRetToStrNA (LPVOID dest, DWORD len, LPSTRRET src, LPITEMIDLIST pidl); HRESULT WINAPI StrRetToStrNW (LPVOID dest, DWORD len, LPSTRRET src, LPITEMIDLIST pidl); HRESULT WINAPI StrRetToStrN (LPVOID dest, DWORD len, LPSTRRET src, LPITEMIDLIST pidl); /* Iconcache */ #define INVALID_INDEX -1 BOOL SIC_Initialize(void); void SIC_Destroy(void); BOOL PidlToSicIndex (IShellFolder * sh, LPITEMIDLIST pidl, BOOL bBigIcon, UINT uFlags, UINT * pIndex); /* Classes Root */ BOOL HCR_MapTypeToValue ( LPCSTR szExtension, LPSTR szFileType, DWORD len, BOOL bPrependDot); BOOL HCR_GetExecuteCommand ( LPCSTR szClass, LPCSTR szVerb, LPSTR szDest, DWORD len ); BOOL HCR_GetDefaultIcon (LPCSTR szClass, LPSTR szDest, DWORD len, LPDWORD dwNr); BOOL HCR_GetClassName (REFIID riid, LPSTR szDest, DWORD len); BOOL HCR_GetFolderAttributes (REFIID riid, LPDWORD szDest); DWORD WINAPI ParseFieldA(LPCSTR src,DWORD field,LPSTR dst,DWORD len); /**************************************************************************** * Class constructors */ LPDATAOBJECT IDataObject_Constructor(HWND hwndOwner, LPITEMIDLIST myPidl, LPITEMIDLIST * apidl, UINT cidl); LPENUMFORMATETC IEnumFORMATETC_Constructor(UINT, const FORMATETC []); LPCLASSFACTORY IClassFactory_Constructor(REFCLSID); IContextMenu * ISvItemCm_Constructor(LPSHELLFOLDER pSFParent, LPCITEMIDLIST pidl, LPCITEMIDLIST *aPidls, UINT uItemCount); IContextMenu * ISvBgCm_Constructor(LPSHELLFOLDER pSFParent); LPSHELLVIEW IShellView_Constructor(LPSHELLFOLDER); LPSHELLLINK IShellLink_Constructor(BOOL); IShellFolder * ISF_Desktop_Constructor(void); /* kind of enumidlist */ #define EIDL_DESK 0 #define EIDL_MYCOMP 1 #define EIDL_FILE 2 LPENUMIDLIST IEnumIDList_Constructor(LPCSTR,DWORD,DWORD); LPEXTRACTICONA IExtractIconA_Constructor(LPITEMIDLIST); HRESULT CreateStreamOnFile (LPCSTR pszFilename, IStream ** ppstm); /* fixme: rename the functions when the shell32.dll has it's own exports namespace */ HRESULT WINAPI SHELL32_DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID * ppv); HRESULT WINAPI SHELL32_DllCanUnloadNow(void); /* fixme: move away */ #define ResultFromShort(i) MAKE_SCODE(SEVERITY_SUCCESS, 0, (USHORT)(i)) /* menu merging */ #define MM_ADDSEPARATOR 0x00000001L #define MM_SUBMENUSHAVEIDS 0x00000002L HRESULT WINAPI Shell_MergeMenus (HMENU hmDst, HMENU hmSrc, UINT uInsert, UINT uIDAdjust, UINT uIDAdjustMax, ULONG uFlags); /* initialisation for FORMATETC */ #define InitFormatEtc(fe, cf, med) \ {\ (fe).cfFormat=cf;\ (fe).dwAspect=DVASPECT_CONTENT;\ (fe).ptd=NULL;\ (fe).tymed=med;\ (fe).lindex=-1;\ }; #define KeyStateToDropEffect(kst)\ (((kst) & MK_CONTROL) ?\ (((kst) & MK_SHIFT) ? DROPEFFECT_LINK : DROPEFFECT_COPY):\ DROPEFFECT_MOVE) /* Systray */ BOOL SYSTRAY_Init(void); /* Clipboard */ void InitShellOle(void); void FreeShellOle(void); BOOL GetShellOle(void); HRESULT (WINAPI* pOleInitialize)(LPVOID reserved); void (WINAPI* pOleUninitialize)(void); HRESULT (WINAPI* pRegisterDragDrop)(HWND hwnd, IDropTarget* pDropTarget); HRESULT (WINAPI* pRevokeDragDrop)(HWND hwnd); HRESULT (WINAPI* pDoDragDrop)(LPDATAOBJECT,LPDROPSOURCE,DWORD,DWORD*); void (WINAPI* pReleaseStgMedium)(STGMEDIUM* pmedium); HRESULT (WINAPI* pOleSetClipboard)(IDataObject* pDataObj); HRESULT (WINAPI* pOleGetClipboard)(IDataObject** ppDataObj); HGLOBAL RenderHDROP(LPITEMIDLIST pidlRoot, LPITEMIDLIST * apidl, UINT cidl); HGLOBAL RenderSHELLIDLIST (LPITEMIDLIST pidlRoot, LPITEMIDLIST * apidl, UINT cidl); HGLOBAL RenderSHELLIDLISTOFFSET (LPITEMIDLIST pidlRoot, LPITEMIDLIST * apidl, UINT cidl); HGLOBAL RenderFILECONTENTS (LPITEMIDLIST pidlRoot, LPITEMIDLIST * apidl, UINT cidl); HGLOBAL RenderFILEDESCRIPTOR (LPITEMIDLIST pidlRoot, LPITEMIDLIST * apidl, UINT cidl); HGLOBAL RenderFILENAME (LPITEMIDLIST pidlRoot, LPITEMIDLIST * apidl, UINT cidl); HGLOBAL RenderPREFEREDDROPEFFECT (DWORD dwFlags); /* Change Notification */ void InitChangeNotifications(void); void FreeChangeNotifications(void); /* file operation */ BOOL SHELL_DeleteDirectoryA(LPCSTR pszDir, BOOL bShowUI); #endif wine-20000526/dlls/shell32/shell32_xx.rc0100644000175000001440000000016206710660114017175 0ustar julliardusers/* Language neutral resources. * Icons and bitmaps should go in here. */ LANGUAGE LANG_NEUTRAL, SUBLANG_NEUTRAL wine-20000526/dlls/shell32/shellfolder.h0100644000175000001440000000324207054032174017333 0ustar julliardusers/* * defines helperfunctions to manipulate the contents of a IShellFolder * */ #ifndef __WINE_SHELLFOLDER_HELP_H #define __WINE_SHELLFOLDER_HELP_H #include "winbase.h" #include "shell.h" #include "wine/obj_base.h" #include "wine/obj_shellfolder.h" /***************************************************************************** * Predeclare the interfaces */ DEFINE_GUID(IID_ISFHelper, 0x1fe68efbL, 0x1874, 0x9812, 0x56, 0xdc, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00); typedef struct ISFHelper ISFHelper, *LPISFHELPER; /***************************************************************************** * ISFHelper interface */ #define ICOM_INTERFACE ISFHelper #define ISFHelper_METHODS \ ICOM_METHOD2 (HRESULT, GetUniqueName, LPSTR, lpName, UINT, uLen) \ ICOM_METHOD3 (HRESULT, AddFolder, HWND, hwnd, LPCSTR, lpName, LPITEMIDLIST*, ppidlOut) \ ICOM_METHOD2 (HRESULT, DeleteItems, UINT, cidl, LPCITEMIDLIST*, apidl) \ ICOM_METHOD3 (HRESULT, CopyItems, IShellFolder*, pSFFrom, UINT, cidl, LPCITEMIDLIST*, apidl) #define ISFHelper_IMETHODS \ IUnknown_IMETHODS \ ISFHelper_METHODS ICOM_DEFINE(ISFHelper, IUnknown) #undef ICOM_INTERFACE /*** IUnknown methods ***/ #define ISFHelper_QueryInterface(p,a,b) ICOM_CALL2(QueryInterface,p,a,b) #define ISFHelper_AddRef(p) ICOM_CALL (AddRef,p) #define ISFHelper_Release(p) ICOM_CALL (Release,p) /*** ISFHelper methods ***/ #define ISFHelper_GetUniqueName(p,a,b) ICOM_CALL2(GetUniqueName,p,a,b) #define ISFHelper_AddFolder(p,a,b,c) ICOM_CALL3(AddFolder,p,a,b,c) #define ISFHelper_DeleteItems(p,a,b) ICOM_CALL2(DeleteItems,p,a,b) #define ISFHelper_CopyItems(p,a,b,c) ICOM_CALL3(CopyItems,p,a,b,c) #endif /* __WINE_SHELLFOLDER_HELP_H */ wine-20000526/dlls/shell32/shellguid.c0100644000175000001440000000133607102371522017002 0ustar julliardusers/* * Shell UID * * 1998 Juergen Schmied (jsch) * * * this in in a single file due to interfering definitions * */ #define INITGUID #include "shlwapi.h" /* #include "shlguid.h" */ /* * Francis Beaudet * * I moved the contents of this file to the ole/guid.c file. * * I know that the purpose of this file being here is that it would * separate the definitions reserved to the shell DLL into one place. * However, until the shell DLL is a real DLL, as long as it is * statically linked with the rest of wine, the initializer of it's * GUIDs will have to be in the same place as everybody else. This is * the same problem as with "real" Windows programs. */ wine-20000526/dlls/shell32/shelllink.c0100644000175000001440000005700007040772636017022 0ustar julliardusers/* * * Copyright 1997 Marcus Meissner * Copyright 1998 Juergen Schmied * */ #include #include "debugtools.h" #include "winerror.h" #include "wine/obj_base.h" #include "wine/obj_storage.h" #include "wine/obj_shelllink.h" #include "wine/undocshell.h" #include "heap.h" #include "winnls.h" #include "pidl.h" #include "shell32_main.h" #include "shlguid.h" DEFAULT_DEBUG_CHANNEL(shell) /* link file formats */ #include "pshpack1.h" /* flag1: lnk elements: simple link has 0x0B */ #define WORKDIR 0x10 #define ARGUMENT 0x20 #define ICON 0x40 #define UNC 0x80 /* fStartup */ #define NORMAL 0x01 #define MAXIMIZED 0x03 #define MINIMIZED 0x07 typedef struct _LINK_HEADER { DWORD MagicStr; /* 0x00 'L','\0','\0','\0' */ GUID MagicGuid; /* 0x04 is CLSID_ShellLink */ DWORD Flag1; /* 0x14 describes elements following */ DWORD Flag2; /* 0x18 */ FILETIME Time1; /* 0x1c */ FILETIME Time2; /* 0x24 */ FILETIME Time3; /* 0x2c */ DWORD Unknown1; /* 0x34 */ DWORD Unknown2; /* 0x38 icon number */ DWORD fStartup; /* 0x3c startup type */ DWORD wHotKey; /* 0x40 hotkey */ DWORD Unknown5; /* 0x44 */ DWORD Unknown6; /* 0x48 */ USHORT PidlSize; /* 0x4c */ ITEMIDLIST Pidl; /* 0x4e */ } LINK_HEADER, * PLINK_HEADER; #define LINK_HEADER_SIZE (sizeof(LINK_HEADER)-sizeof(ITEMIDLIST)) #include "poppack.h" static ICOM_VTABLE(IShellLink) slvt; static ICOM_VTABLE(IShellLinkW) slvtw; static ICOM_VTABLE(IPersistFile) pfvt; static ICOM_VTABLE(IPersistStream) psvt; /* IShellLink Implementation */ typedef struct { ICOM_VFIELD(IShellLink); DWORD ref; ICOM_VTABLE(IShellLinkW)* lpvtblw; ICOM_VTABLE(IPersistFile)* lpvtblPersistFile; ICOM_VTABLE(IPersistStream)* lpvtblPersistStream; /* internal stream of the IPersistFile interface */ IStream* lpFileStream; /* data structures according to the informations in the lnk */ LPSTR sPath; LPITEMIDLIST pPidl; WORD wHotKey; SYSTEMTIME time1; SYSTEMTIME time2; SYSTEMTIME time3; } IShellLinkImpl; #define _IShellLinkW_Offset ((int)(&(((IShellLinkImpl*)0)->lpvtblw))) #define _ICOM_THIS_From_IShellLinkW(class, name) class* This = (class*)(((char*)name)-_IShellLinkW_Offset); #define _IPersistFile_Offset ((int)(&(((IShellLinkImpl*)0)->lpvtblPersistFile))) #define _ICOM_THIS_From_IPersistFile(class, name) class* This = (class*)(((char*)name)-_IPersistFile_Offset); #define _IPersistStream_Offset ((int)(&(((IShellLinkImpl*)0)->lpvtblPersistStream))) #define _ICOM_THIS_From_IPersistStream(class, name) class* This = (class*)(((char*)name)-_IPersistStream_Offset); #define _IPersistStream_From_ICOM_THIS(class, name) class* StreamThis = (class*)(((char*)name)+_IPersistStream_Offset); /************************************************************************** * IPersistFile_QueryInterface */ static HRESULT WINAPI IPersistFile_fnQueryInterface( IPersistFile* iface, REFIID riid, LPVOID *ppvObj) { _ICOM_THIS_From_IPersistFile(IShellLinkImpl, iface) TRACE("(%p)\n",This); return IShellLink_QueryInterface((IShellLink*)This, riid, ppvObj); } /****************************************************************************** * IPersistFile_AddRef */ static ULONG WINAPI IPersistFile_fnAddRef(IPersistFile* iface) { _ICOM_THIS_From_IPersistFile(IShellLinkImpl, iface) TRACE("(%p)->(count=%lu)\n",This,This->ref); return IShellLink_AddRef((IShellLink*)This); } /****************************************************************************** * IPersistFile_Release */ static ULONG WINAPI IPersistFile_fnRelease(IPersistFile* iface) { _ICOM_THIS_From_IPersistFile(IShellLinkImpl, iface) TRACE("(%p)->(count=%lu)\n",This,This->ref); return IShellLink_Release((IShellLink*)This); } static HRESULT WINAPI IPersistFile_fnGetClassID(IPersistFile* iface, CLSID *pClassID) { _ICOM_THIS_From_IPersistFile(IShellLinkImpl, iface) FIXME("(%p)\n",This); return NOERROR; } static HRESULT WINAPI IPersistFile_fnIsDirty(IPersistFile* iface) { _ICOM_THIS_From_IPersistFile(IShellLinkImpl, iface) FIXME("(%p)\n",This); return NOERROR; } static HRESULT WINAPI IPersistFile_fnLoad(IPersistFile* iface, LPCOLESTR pszFileName, DWORD dwMode) { _ICOM_THIS_From_IPersistFile(IShellLinkImpl, iface) _IPersistStream_From_ICOM_THIS(IPersistStream, This) LPSTR sFile = HEAP_strdupWtoA ( GetProcessHeap(), 0, pszFileName); HRESULT hRet = E_FAIL; TRACE("(%p, %s)\n",This, sFile); if (This->lpFileStream) IStream_Release(This->lpFileStream); if SUCCEEDED(CreateStreamOnFile(sFile, &(This->lpFileStream))) { if SUCCEEDED (IPersistStream_Load(StreamThis, This->lpFileStream)) { return NOERROR; } } return hRet; } static HRESULT WINAPI IPersistFile_fnSave(IPersistFile* iface, LPCOLESTR pszFileName, BOOL fRemember) { _ICOM_THIS_From_IPersistFile(IShellLinkImpl, iface); FIXME("(%p)->(%s)\n",This,debugstr_w(pszFileName)); return NOERROR; } static HRESULT WINAPI IPersistFile_fnSaveCompleted(IPersistFile* iface, LPCOLESTR pszFileName) { _ICOM_THIS_From_IPersistFile(IShellLinkImpl, iface); FIXME("(%p)->(%s)\n",This,debugstr_w(pszFileName)); return NOERROR; } static HRESULT WINAPI IPersistFile_fnGetCurFile(IPersistFile* iface, LPOLESTR *ppszFileName) { _ICOM_THIS_From_IPersistFile(IShellLinkImpl, iface); FIXME("(%p)\n",This); return NOERROR; } static ICOM_VTABLE(IPersistFile) pfvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IPersistFile_fnQueryInterface, IPersistFile_fnAddRef, IPersistFile_fnRelease, IPersistFile_fnGetClassID, IPersistFile_fnIsDirty, IPersistFile_fnLoad, IPersistFile_fnSave, IPersistFile_fnSaveCompleted, IPersistFile_fnGetCurFile }; /************************************************************************ * IPersistStream_QueryInterface */ static HRESULT WINAPI IPersistStream_fnQueryInterface( IPersistStream* iface, REFIID riid, VOID** ppvoid) { _ICOM_THIS_From_IPersistStream(IShellLinkImpl, iface); TRACE("(%p)\n",This); return IShellLink_QueryInterface((IShellLink*)This, riid, ppvoid); } /************************************************************************ * IPersistStream_Release */ static ULONG WINAPI IPersistStream_fnRelease( IPersistStream* iface) { _ICOM_THIS_From_IPersistStream(IShellLinkImpl, iface); TRACE("(%p)\n",This); return IShellLink_Release((IShellLink*)This); } /************************************************************************ * IPersistStream_AddRef */ static ULONG WINAPI IPersistStream_fnAddRef( IPersistStream* iface) { _ICOM_THIS_From_IPersistStream(IShellLinkImpl, iface); TRACE("(%p)\n",This); return IShellLink_AddRef((IShellLink*)This); } /************************************************************************ * IPersistStream_GetClassID * */ static HRESULT WINAPI IPersistStream_fnGetClassID( IPersistStream* iface, CLSID* pClassID) { _ICOM_THIS_From_IPersistStream(IShellLinkImpl, iface); TRACE("(%p)\n", This); if (pClassID==0) return E_POINTER; /* memcpy(pClassID, &CLSID_???, sizeof(CLSID_???)); */ return S_OK; } /************************************************************************ * IPersistStream_IsDirty (IPersistStream) */ static HRESULT WINAPI IPersistStream_fnIsDirty( IPersistStream* iface) { _ICOM_THIS_From_IPersistStream(IShellLinkImpl, iface); TRACE("(%p)\n", This); return S_OK; } /************************************************************************ * IPersistStream_Load (IPersistStream) */ static HRESULT WINAPI IPersistStream_fnLoad( IPersistStream* iface, IStream* pLoadStream) { PLINK_HEADER lpLinkHeader = HeapAlloc(GetProcessHeap(), 0, LINK_HEADER_SIZE); ULONG dwBytesRead; DWORD ret = E_FAIL; char sTemp[MAX_PATH]; _ICOM_THIS_From_IPersistStream(IShellLinkImpl, iface); TRACE("(%p)(%p)\n", This, pLoadStream); if ( ! pLoadStream) { return STG_E_INVALIDPOINTER; } IStream_AddRef (pLoadStream); if(lpLinkHeader) { if (SUCCEEDED(IStream_Read(pLoadStream, lpLinkHeader, LINK_HEADER_SIZE, &dwBytesRead))) { if ((lpLinkHeader->MagicStr == 0x0000004CL) && IsEqualIID(&lpLinkHeader->MagicGuid, &CLSID_ShellLink)) { lpLinkHeader = HeapReAlloc(GetProcessHeap(), 0, lpLinkHeader, LINK_HEADER_SIZE+lpLinkHeader->PidlSize); if (lpLinkHeader) { if (SUCCEEDED(IStream_Read(pLoadStream, &(lpLinkHeader->Pidl), lpLinkHeader->PidlSize, &dwBytesRead))) { if (pcheck (&lpLinkHeader->Pidl)) { This->pPidl = ILClone (&lpLinkHeader->Pidl); SHGetPathFromIDListA(&lpLinkHeader->Pidl, sTemp); This->sPath = HEAP_strdupA ( GetProcessHeap(), 0, sTemp); } This->wHotKey = lpLinkHeader->wHotKey; FileTimeToSystemTime (&lpLinkHeader->Time1, &This->time1); FileTimeToSystemTime (&lpLinkHeader->Time2, &This->time2); FileTimeToSystemTime (&lpLinkHeader->Time3, &This->time3); #if 1 GetDateFormatA(LOCALE_USER_DEFAULT,DATE_SHORTDATE,&This->time1, NULL, sTemp, 256); TRACE("-- time1: %s\n", sTemp); GetDateFormatA(LOCALE_USER_DEFAULT,DATE_SHORTDATE,&This->time2, NULL, sTemp, 256); TRACE("-- time1: %s\n", sTemp); GetDateFormatA(LOCALE_USER_DEFAULT,DATE_SHORTDATE,&This->time3, NULL, sTemp, 256); TRACE("-- time1: %s\n", sTemp); pdump (This->pPidl); #endif ret = S_OK; } } } else { WARN("stream contains no link!\n"); } } } IStream_Release (pLoadStream); pdump(This->pPidl); HeapFree(GetProcessHeap(), 0, lpLinkHeader); return ret; } /************************************************************************ * IPersistStream_Save (IPersistStream) */ static HRESULT WINAPI IPersistStream_fnSave( IPersistStream* iface, IStream* pOutStream, BOOL fClearDirty) { _ICOM_THIS_From_IPersistStream(IShellLinkImpl, iface); TRACE("(%p) %p %x\n", This, pOutStream, fClearDirty); return E_NOTIMPL; } /************************************************************************ * IPersistStream_GetSizeMax (IPersistStream) */ static HRESULT WINAPI IPersistStream_fnGetSizeMax( IPersistStream* iface, ULARGE_INTEGER* pcbSize) { _ICOM_THIS_From_IPersistStream(IShellLinkImpl, iface); TRACE("(%p)\n", This); return E_NOTIMPL; } static ICOM_VTABLE(IPersistStream) psvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IPersistStream_fnQueryInterface, IPersistStream_fnAddRef, IPersistStream_fnRelease, IPersistStream_fnGetClassID, IPersistStream_fnIsDirty, IPersistStream_fnLoad, IPersistStream_fnSave, IPersistStream_fnGetSizeMax }; /************************************************************************** * IShellLink_Constructor */ IShellLink * IShellLink_Constructor(BOOL bUnicode) { IShellLinkImpl * sl; sl = (IShellLinkImpl *)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IShellLinkImpl)); sl->ref = 1; ICOM_VTBL(sl) = &slvt; sl->lpvtblw = &slvtw; sl->lpvtblPersistFile = &pfvt; sl->lpvtblPersistStream = &psvt; TRACE("(%p)->()\n",sl); shell32_ObjCount++; return bUnicode ? (IShellLink *) &(sl->lpvtblw) : (IShellLink *)sl; } /************************************************************************** * IShellLink_QueryInterface */ static HRESULT WINAPI IShellLink_fnQueryInterface( IShellLink * iface, REFIID riid, LPVOID *ppvObj) { ICOM_THIS(IShellLinkImpl, iface); TRACE("(%p)->(\n\tIID:\t%s)\n",This,debugstr_guid(riid)); *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid, &IID_IShellLink)) { *ppvObj = This; } else if(IsEqualIID(riid, &IID_IShellLinkW)) { *ppvObj = (IShellLinkW *)&(This->lpvtblw); } else if(IsEqualIID(riid, &IID_IPersistFile)) { *ppvObj = (IPersistFile *)&(This->lpvtblPersistFile); } else if(IsEqualIID(riid, &IID_IPersistStream)) { *ppvObj = (IPersistStream *)&(This->lpvtblPersistStream); } if(*ppvObj) { IUnknown_AddRef((IUnknown*)(*ppvObj)); TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } /****************************************************************************** * IShellLink_AddRef */ static ULONG WINAPI IShellLink_fnAddRef(IShellLink * iface) { ICOM_THIS(IShellLinkImpl, iface); TRACE("(%p)->(count=%lu)\n",This,This->ref); shell32_ObjCount++; return ++(This->ref); } /****************************************************************************** * IShellLink_Release */ static ULONG WINAPI IShellLink_fnRelease(IShellLink * iface) { ICOM_THIS(IShellLinkImpl, iface); TRACE("(%p)->(count=%lu)\n",This,This->ref); shell32_ObjCount--; if (!--(This->ref)) { TRACE("-- destroying IShellLink(%p)\n",This); if (This->sPath) HeapFree(GetProcessHeap(),0,This->sPath); if (This->pPidl) SHFree(This->pPidl); if (This->lpFileStream) IStream_Release(This->lpFileStream); HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } static HRESULT WINAPI IShellLink_fnGetPath(IShellLink * iface, LPSTR pszFile,INT cchMaxPath, WIN32_FIND_DATAA *pfd, DWORD fFlags) { ICOM_THIS(IShellLinkImpl, iface); TRACE("(%p)->(pfile=%p len=%u find_data=%p flags=%lu)(%s)\n",This, pszFile, cchMaxPath, pfd, fFlags, debugstr_a(This->sPath)); if (This->sPath) lstrcpynA(pszFile,This->sPath, cchMaxPath); else return E_FAIL; return NOERROR; } static HRESULT WINAPI IShellLink_fnGetIDList(IShellLink * iface, LPITEMIDLIST * ppidl) { ICOM_THIS(IShellLinkImpl, iface); TRACE("(%p)->(ppidl=%p)\n",This, ppidl); *ppidl = ILClone(This->pPidl); return NOERROR; } static HRESULT WINAPI IShellLink_fnSetIDList(IShellLink * iface, LPCITEMIDLIST pidl) { ICOM_THIS(IShellLinkImpl, iface); TRACE("(%p)->(pidl=%p)\n",This, pidl); if (This->pPidl) SHFree(This->pPidl); This->pPidl = ILClone (pidl); return NOERROR; } static HRESULT WINAPI IShellLink_fnGetDescription(IShellLink * iface, LPSTR pszName,INT cchMaxName) { ICOM_THIS(IShellLinkImpl, iface); FIXME("(%p)->(%p len=%u)\n",This, pszName, cchMaxName); lstrcpynA(pszName,"Description, FIXME",cchMaxName); return NOERROR; } static HRESULT WINAPI IShellLink_fnSetDescription(IShellLink * iface, LPCSTR pszName) { ICOM_THIS(IShellLinkImpl, iface); FIXME("(%p)->(desc=%s)\n",This, pszName); return NOERROR; } static HRESULT WINAPI IShellLink_fnGetWorkingDirectory(IShellLink * iface, LPSTR pszDir,INT cchMaxPath) { ICOM_THIS(IShellLinkImpl, iface); FIXME("(%p)->()\n",This); lstrcpynA(pszDir,"c:\\", cchMaxPath); return NOERROR; } static HRESULT WINAPI IShellLink_fnSetWorkingDirectory(IShellLink * iface, LPCSTR pszDir) { ICOM_THIS(IShellLinkImpl, iface); FIXME("(%p)->(dir=%s)\n",This, pszDir); return NOERROR; } static HRESULT WINAPI IShellLink_fnGetArguments(IShellLink * iface, LPSTR pszArgs,INT cchMaxPath) { ICOM_THIS(IShellLinkImpl, iface); FIXME("(%p)->(%p len=%u)\n",This, pszArgs, cchMaxPath); lstrcpynA(pszArgs, "", cchMaxPath); return NOERROR; } static HRESULT WINAPI IShellLink_fnSetArguments(IShellLink * iface, LPCSTR pszArgs) { ICOM_THIS(IShellLinkImpl, iface); FIXME("(%p)->(args=%s)\n",This, pszArgs); return NOERROR; } static HRESULT WINAPI IShellLink_fnGetHotkey(IShellLink * iface, WORD *pwHotkey) { ICOM_THIS(IShellLinkImpl, iface); TRACE("(%p)->(%p)(0x%08x)\n",This, pwHotkey, This->wHotKey); *pwHotkey = This->wHotKey; return NOERROR; } static HRESULT WINAPI IShellLink_fnSetHotkey(IShellLink * iface, WORD wHotkey) { ICOM_THIS(IShellLinkImpl, iface); TRACE("(%p)->(hotkey=%x)\n",This, wHotkey); This->wHotKey = wHotkey; return NOERROR; } static HRESULT WINAPI IShellLink_fnGetShowCmd(IShellLink * iface, INT *piShowCmd) { ICOM_THIS(IShellLinkImpl, iface); FIXME("(%p)->(%p)\n",This, piShowCmd); *piShowCmd=0; return NOERROR; } static HRESULT WINAPI IShellLink_fnSetShowCmd(IShellLink * iface, INT iShowCmd) { ICOM_THIS(IShellLinkImpl, iface); FIXME("(%p)->(showcmd=%x)\n",This, iShowCmd); return NOERROR; } static HRESULT WINAPI IShellLink_fnGetIconLocation(IShellLink * iface, LPSTR pszIconPath,INT cchIconPath,INT *piIcon) { ICOM_THIS(IShellLinkImpl, iface); FIXME("(%p)->(%p len=%u iicon=%p)\n",This, pszIconPath, cchIconPath, piIcon); lstrcpynA(pszIconPath,"shell32.dll",cchIconPath); *piIcon=1; return NOERROR; } static HRESULT WINAPI IShellLink_fnSetIconLocation(IShellLink * iface, LPCSTR pszIconPath,INT iIcon) { ICOM_THIS(IShellLinkImpl, iface); FIXME("(%p)->(path=%s iicon=%u)\n",This, pszIconPath, iIcon); return NOERROR; } static HRESULT WINAPI IShellLink_fnSetRelativePath(IShellLink * iface, LPCSTR pszPathRel, DWORD dwReserved) { ICOM_THIS(IShellLinkImpl, iface); FIXME("(%p)->(path=%s %lx)\n",This, pszPathRel, dwReserved); return NOERROR; } static HRESULT WINAPI IShellLink_fnResolve(IShellLink * iface, HWND hwnd, DWORD fFlags) { ICOM_THIS(IShellLinkImpl, iface); FIXME("(%p)->(hwnd=%x flags=%lx)\n",This, hwnd, fFlags); return NOERROR; } static HRESULT WINAPI IShellLink_fnSetPath(IShellLink * iface, LPCSTR pszFile) { ICOM_THIS(IShellLinkImpl, iface); FIXME("(%p)->(path=%s)\n",This, pszFile); return NOERROR; } /************************************************************************** * IShellLink Implementation */ static ICOM_VTABLE(IShellLink) slvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IShellLink_fnQueryInterface, IShellLink_fnAddRef, IShellLink_fnRelease, IShellLink_fnGetPath, IShellLink_fnGetIDList, IShellLink_fnSetIDList, IShellLink_fnGetDescription, IShellLink_fnSetDescription, IShellLink_fnGetWorkingDirectory, IShellLink_fnSetWorkingDirectory, IShellLink_fnGetArguments, IShellLink_fnSetArguments, IShellLink_fnGetHotkey, IShellLink_fnSetHotkey, IShellLink_fnGetShowCmd, IShellLink_fnSetShowCmd, IShellLink_fnGetIconLocation, IShellLink_fnSetIconLocation, IShellLink_fnSetRelativePath, IShellLink_fnResolve, IShellLink_fnSetPath }; /************************************************************************** * IShellLinkW_fnQueryInterface */ static HRESULT WINAPI IShellLinkW_fnQueryInterface( IShellLinkW * iface, REFIID riid, LPVOID *ppvObj) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); return IShellLink_QueryInterface((IShellLink*)This, riid, ppvObj); } /****************************************************************************** * IShellLinkW_fnAddRef */ static ULONG WINAPI IShellLinkW_fnAddRef(IShellLinkW * iface) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); TRACE("(%p)->(count=%lu)\n",This,This->ref); return IShellLink_AddRef((IShellLink*)This); } /****************************************************************************** * IShellLinkW_fnRelease */ static ULONG WINAPI IShellLinkW_fnRelease(IShellLinkW * iface) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); TRACE("(%p)->(count=%lu)\n",This,This->ref); return IShellLink_Release((IShellLink*)This); } static HRESULT WINAPI IShellLinkW_fnGetPath(IShellLinkW * iface, LPWSTR pszFile,INT cchMaxPath, WIN32_FIND_DATAA *pfd, DWORD fFlags) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(pfile=%p len=%u find_data=%p flags=%lu)\n",This, pszFile, cchMaxPath, pfd, fFlags); lstrcpynAtoW(pszFile,"c:\\foo.bar", cchMaxPath); return NOERROR; } static HRESULT WINAPI IShellLinkW_fnGetIDList(IShellLinkW * iface, LPITEMIDLIST * ppidl) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(ppidl=%p)\n",This, ppidl); *ppidl = _ILCreateDesktop(); return NOERROR; } static HRESULT WINAPI IShellLinkW_fnSetIDList(IShellLinkW * iface, LPCITEMIDLIST pidl) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(pidl=%p)\n",This, pidl); return NOERROR; } static HRESULT WINAPI IShellLinkW_fnGetDescription(IShellLinkW * iface, LPWSTR pszName,INT cchMaxName) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(%p len=%u)\n",This, pszName, cchMaxName); lstrcpynAtoW(pszName,"Description, FIXME",cchMaxName); return NOERROR; } static HRESULT WINAPI IShellLinkW_fnSetDescription(IShellLinkW * iface, LPCWSTR pszName) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(desc=%s)\n",This, debugstr_w(pszName)); return NOERROR; } static HRESULT WINAPI IShellLinkW_fnGetWorkingDirectory(IShellLinkW * iface, LPWSTR pszDir,INT cchMaxPath) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->()\n",This); lstrcpynAtoW(pszDir,"c:\\", cchMaxPath); return NOERROR; } static HRESULT WINAPI IShellLinkW_fnSetWorkingDirectory(IShellLinkW * iface, LPCWSTR pszDir) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(dir=%s)\n",This, debugstr_w(pszDir)); return NOERROR; } static HRESULT WINAPI IShellLinkW_fnGetArguments(IShellLinkW * iface, LPWSTR pszArgs,INT cchMaxPath) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(%p len=%u)\n",This, pszArgs, cchMaxPath); lstrcpynAtoW(pszArgs, "", cchMaxPath); return NOERROR; } static HRESULT WINAPI IShellLinkW_fnSetArguments(IShellLinkW * iface, LPCWSTR pszArgs) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(args=%s)\n",This, debugstr_w(pszArgs)); return NOERROR; } static HRESULT WINAPI IShellLinkW_fnGetHotkey(IShellLinkW * iface, WORD *pwHotkey) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(%p)\n",This, pwHotkey); *pwHotkey=0x0; return NOERROR; } static HRESULT WINAPI IShellLinkW_fnSetHotkey(IShellLinkW * iface, WORD wHotkey) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(hotkey=%x)\n",This, wHotkey); return NOERROR; } static HRESULT WINAPI IShellLinkW_fnGetShowCmd(IShellLinkW * iface, INT *piShowCmd) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(%p)\n",This, piShowCmd); *piShowCmd=0; return NOERROR; } static HRESULT WINAPI IShellLinkW_fnSetShowCmd(IShellLinkW * iface, INT iShowCmd) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(showcmd=%x)\n",This, iShowCmd); return NOERROR; } static HRESULT WINAPI IShellLinkW_fnGetIconLocation(IShellLinkW * iface, LPWSTR pszIconPath,INT cchIconPath,INT *piIcon) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(%p len=%u iicon=%p)\n",This, pszIconPath, cchIconPath, piIcon); lstrcpynAtoW(pszIconPath,"shell32.dll",cchIconPath); *piIcon=1; return NOERROR; } static HRESULT WINAPI IShellLinkW_fnSetIconLocation(IShellLinkW * iface, LPCWSTR pszIconPath,INT iIcon) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(path=%s iicon=%u)\n",This, debugstr_w(pszIconPath), iIcon); return NOERROR; } static HRESULT WINAPI IShellLinkW_fnSetRelativePath(IShellLinkW * iface, LPCWSTR pszPathRel, DWORD dwReserved) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(path=%s %lx)\n",This, debugstr_w(pszPathRel), dwReserved); return NOERROR; } static HRESULT WINAPI IShellLinkW_fnResolve(IShellLinkW * iface, HWND hwnd, DWORD fFlags) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(hwnd=%x flags=%lx)\n",This, hwnd, fFlags); return NOERROR; } static HRESULT WINAPI IShellLinkW_fnSetPath(IShellLinkW * iface, LPCWSTR pszFile) { _ICOM_THIS_From_IShellLinkW(IShellLinkImpl, iface); FIXME("(%p)->(path=%s)\n",This, debugstr_w(pszFile)); return NOERROR; } /************************************************************************** * IShellLinkW Implementation */ static ICOM_VTABLE(IShellLinkW) slvtw = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IShellLinkW_fnQueryInterface, IShellLinkW_fnAddRef, IShellLinkW_fnRelease, IShellLinkW_fnGetPath, IShellLinkW_fnGetIDList, IShellLinkW_fnSetIDList, IShellLinkW_fnGetDescription, IShellLinkW_fnSetDescription, IShellLinkW_fnGetWorkingDirectory, IShellLinkW_fnSetWorkingDirectory, IShellLinkW_fnGetArguments, IShellLinkW_fnSetArguments, IShellLinkW_fnGetHotkey, IShellLinkW_fnSetHotkey, IShellLinkW_fnGetShowCmd, IShellLinkW_fnSetShowCmd, IShellLinkW_fnGetIconLocation, IShellLinkW_fnSetIconLocation, IShellLinkW_fnSetRelativePath, IShellLinkW_fnResolve, IShellLinkW_fnSetPath }; wine-20000526/dlls/shell32/shellole.c0100644000175000001440000003724207102371067016642 0ustar julliardusers/* * handling of SHELL32.DLL OLE-Objects * * Copyright 1997 Marcus Meissner * Copyright 1998 Juergen Schmied * */ #include #include #include "wine/obj_base.h" #include "wine/obj_shelllink.h" #include "wine/obj_shellfolder.h" #include "wine/obj_shellbrowser.h" #include "wine/obj_contextmenu.h" #include "wine/obj_shellextinit.h" #include "wine/obj_extracticon.h" #include "shlguid.h" #include "winversion.h" #include "winreg.h" #include "winerror.h" #include "debugtools.h" #include "shell32_main.h" DEFAULT_DEBUG_CHANNEL(shell) DWORD WINAPI SHCLSIDFromStringA (LPSTR clsid, CLSID *id); extern IShellFolder * IShellFolder_Constructor( IShellFolder * psf, LPITEMIDLIST pidl); extern HRESULT IFSFolder_Constructor( IUnknown * pUnkOuter, REFIID riid, LPVOID * ppv); /************************************************************************* * SHCoCreateInstance [SHELL32.102] * * NOTES * exported by ordinal */ LRESULT WINAPI SHCoCreateInstance( LPSTR aclsid, REFCLSID clsid, IUnknown * unknownouter, REFIID refiid, LPVOID *ppv) { DWORD hres; IID iid; CLSID * myclsid = (CLSID*)clsid; if (!clsid) { if (!aclsid) return REGDB_E_CLASSNOTREG; SHCLSIDFromStringA(aclsid, &iid); myclsid = &iid; } TRACE("(%p,\n\tCLSID:\t%s, unk:%p\n\tIID:\t%s,%p)\n", aclsid,debugstr_guid(myclsid),unknownouter,debugstr_guid(refiid),ppv); if IsEqualCLSID(myclsid, &CLSID_ShellFSFolder) { hres = IFSFolder_Constructor(unknownouter, refiid, ppv); } else { hres = CoCreateInstance(myclsid, unknownouter, CLSCTX_INPROC_SERVER, refiid, ppv); } if(hres!=S_OK) { ERR("failed (0x%08lx) to create \n\tCLSID:\t%s\n\tIID:\t%s\n", hres, debugstr_guid(myclsid), debugstr_guid(refiid)); ERR("class not found in registry\n"); } TRACE("-- instance: %p\n",*ppv); return hres; } /************************************************************************* * SHELL32_DllGetClassObject [SHELL32.128] */ HRESULT WINAPI SHELL32_DllGetClassObject(REFCLSID rclsid, REFIID iid,LPVOID *ppv) { HRESULT hres = E_OUTOFMEMORY; LPCLASSFACTORY lpclf; TRACE("\n\tCLSID:\t%s,\n\tIID:\t%s\n",debugstr_guid(rclsid),debugstr_guid(iid)); *ppv = NULL; if(IsEqualCLSID(rclsid, &CLSID_ShellDesktop)|| IsEqualCLSID(rclsid, &CLSID_ShellLink)) { lpclf = IClassFactory_Constructor( rclsid ); if(lpclf) { hres = IClassFactory_QueryInterface(lpclf,iid, ppv); IClassFactory_Release(lpclf); } } else { WARN("-- CLSID not found\n"); hres = CLASS_E_CLASSNOTAVAILABLE; } TRACE("-- pointer to class factory: %p\n",*ppv); return hres; } /************************************************************************* * SHCLSIDFromString [SHELL32.147] * * NOTES * exported by ordinal */ DWORD WINAPI SHCLSIDFromStringA (LPSTR clsid, CLSID *id) { TRACE("(%p(%s) %p)\n", clsid, clsid, id); return CLSIDFromString16(clsid, id); } DWORD WINAPI SHCLSIDFromStringW (LPWSTR clsid, CLSID *id) { TRACE("(%p(%s) %p)\n", clsid, debugstr_w(clsid), id); return CLSIDFromString(clsid, id); } DWORD WINAPI SHCLSIDFromStringAW (LPVOID clsid, CLSID *id) { if (VERSION_OsIsUnicode()) return SHCLSIDFromStringW (clsid, id); return SHCLSIDFromStringA (clsid, id); } /************************************************************************* * SHGetMalloc [SHELL32.220] * returns the interface to shell malloc. * * [SDK header win95/shlobj.h: * equivalent to: #define SHGetMalloc(ppmem) CoGetMalloc(MEMCTX_TASK, ppmem) * ] * What we are currently doing is not very wrong, since we always use the same * heap (ProcessHeap). */ DWORD WINAPI SHGetMalloc(LPMALLOC *lpmal) { TRACE("(%p)\n", lpmal); return CoGetMalloc(0,lpmal); } /************************************************************************* * SHGetDesktopFolder [SHELL32.216] */ LPSHELLFOLDER pdesktopfolder=NULL; DWORD WINAPI SHGetDesktopFolder(IShellFolder **psf) { HRESULT hres = S_OK; LPCLASSFACTORY lpclf; TRACE("%p->(%p)\n",psf,*psf); *psf=NULL; if (!pdesktopfolder) { lpclf = IClassFactory_Constructor(&CLSID_ShellDesktop); if(lpclf) { hres = IClassFactory_CreateInstance(lpclf,NULL,(REFIID)&IID_IShellFolder, (void*)&pdesktopfolder); IClassFactory_Release(lpclf); } } if (pdesktopfolder) { /* even if we create the folder, add a ref so the application can´t destroy the folder*/ IShellFolder_AddRef(pdesktopfolder); *psf = pdesktopfolder; } TRACE("-- %p->(%p)\n",psf, *psf); return hres; } /************************************************************************** * IClassFactory Implementation */ typedef struct { /* IUnknown fields */ ICOM_VFIELD(IClassFactory); DWORD ref; CLSID *rclsid; } IClassFactoryImpl; static ICOM_VTABLE(IClassFactory) clfvt; /************************************************************************** * IClassFactory_Constructor */ LPCLASSFACTORY IClassFactory_Constructor(REFCLSID rclsid) { IClassFactoryImpl* lpclf; lpclf= (IClassFactoryImpl*)HeapAlloc(GetProcessHeap(),0,sizeof(IClassFactoryImpl)); lpclf->ref = 1; ICOM_VTBL(lpclf) = &clfvt; lpclf->rclsid = (CLSID*)rclsid; TRACE("(%p)->()\n",lpclf); InterlockedIncrement(&shell32_ObjCount); return (LPCLASSFACTORY)lpclf; } /************************************************************************** * IClassFactory_QueryInterface */ static HRESULT WINAPI IClassFactory_fnQueryInterface( LPCLASSFACTORY iface, REFIID riid, LPVOID *ppvObj) { ICOM_THIS(IClassFactoryImpl,iface); TRACE("(%p)->(\n\tIID:\t%s)\n",This,debugstr_guid(riid)); *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown)) /*IUnknown*/ { *ppvObj = This; } else if(IsEqualIID(riid, &IID_IClassFactory)) /*IClassFactory*/ { *ppvObj = (IClassFactory*)This; } if(*ppvObj) { IUnknown_AddRef((LPUNKNOWN)*ppvObj); TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj); return S_OK; } TRACE("-- Interface: %s E_NOINTERFACE\n", debugstr_guid(riid)); return E_NOINTERFACE; } /****************************************************************************** * IClassFactory_AddRef */ static ULONG WINAPI IClassFactory_fnAddRef(LPCLASSFACTORY iface) { ICOM_THIS(IClassFactoryImpl,iface); TRACE("(%p)->(count=%lu)\n",This,This->ref); InterlockedIncrement(&shell32_ObjCount); return InterlockedIncrement(&This->ref); } /****************************************************************************** * IClassFactory_Release */ static ULONG WINAPI IClassFactory_fnRelease(LPCLASSFACTORY iface) { ICOM_THIS(IClassFactoryImpl,iface); TRACE("(%p)->(count=%lu)\n",This,This->ref); InterlockedDecrement(&shell32_ObjCount); if (!InterlockedDecrement(&This->ref)) { TRACE("-- destroying IClassFactory(%p)\n",This); HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } /****************************************************************************** * IClassFactory_CreateInstance */ static HRESULT WINAPI IClassFactory_fnCreateInstance( LPCLASSFACTORY iface, LPUNKNOWN pUnknown, REFIID riid, LPVOID *ppObject) { ICOM_THIS(IClassFactoryImpl,iface); IUnknown *pObj = NULL; HRESULT hres; TRACE("%p->(%p,\n\tIID:\t%s,%p)\n",This,pUnknown,debugstr_guid(riid),ppObject); *ppObject = NULL; if(pUnknown) { return(CLASS_E_NOAGGREGATION); } if (IsEqualCLSID(This->rclsid, &CLSID_ShellDesktop)) { pObj = (IUnknown *)ISF_Desktop_Constructor(); } else if (IsEqualCLSID(This->rclsid, &CLSID_ShellLink)) { pObj = (IUnknown *)IShellLink_Constructor(FALSE); } else { ERR("unknown IID requested\n\tIID:\t%s\n",debugstr_guid(riid)); return(E_NOINTERFACE); } if (!pObj) { return(E_OUTOFMEMORY); } hres = IUnknown_QueryInterface(pObj,riid, ppObject); IUnknown_Release(pObj); TRACE("-- Object created: (%p)->%p\n",This,*ppObject); return hres; } /****************************************************************************** * IClassFactory_LockServer */ static HRESULT WINAPI IClassFactory_fnLockServer(LPCLASSFACTORY iface, BOOL fLock) { ICOM_THIS(IClassFactoryImpl,iface); TRACE("%p->(0x%x), not implemented\n",This, fLock); return E_NOTIMPL; } static ICOM_VTABLE(IClassFactory) clfvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IClassFactory_fnQueryInterface, IClassFactory_fnAddRef, IClassFactory_fnRelease, IClassFactory_fnCreateInstance, IClassFactory_fnLockServer }; /************************************************************************** * Default ClassFactory Implementation * * SHCreateDefClassObject * * NOTES * helper function for dll's without a own classfactory * a generic classfactory is returned * when the CreateInstance of the cf is called the callback is executed */ typedef HRESULT (CALLBACK * LPFNCREATEINSTANCE)(IUnknown* pUnkOuter, REFIID riid, LPVOID* ppvObject); typedef struct { ICOM_VFIELD(IClassFactory); DWORD ref; CLSID *rclsid; LPFNCREATEINSTANCE lpfnCI; const IID * riidInst; ULONG * pcRefDll; /* pointer to refcounter in external dll (ugrrr...) */ } IDefClFImpl; static ICOM_VTABLE(IClassFactory) dclfvt; /************************************************************************** * IDefClF_fnConstructor */ IClassFactory * IDefClF_fnConstructor(LPFNCREATEINSTANCE lpfnCI, PLONG pcRefDll, REFIID riidInst) { IDefClFImpl* lpclf; lpclf = (IDefClFImpl*)HeapAlloc(GetProcessHeap(),0,sizeof(IDefClFImpl)); lpclf->ref = 1; ICOM_VTBL(lpclf) = &dclfvt; lpclf->lpfnCI = lpfnCI; lpclf->pcRefDll = pcRefDll; if (pcRefDll) InterlockedIncrement(pcRefDll); lpclf->riidInst = riidInst; TRACE("(%p)\n\tIID:\t%s\n",lpclf, debugstr_guid(riidInst)); InterlockedIncrement(&shell32_ObjCount); return (LPCLASSFACTORY)lpclf; } /************************************************************************** * IDefClF_fnQueryInterface */ static HRESULT WINAPI IDefClF_fnQueryInterface( LPCLASSFACTORY iface, REFIID riid, LPVOID *ppvObj) { ICOM_THIS(IDefClFImpl,iface); TRACE("(%p)->(\n\tIID:\t%s)\n",This,debugstr_guid(riid)); *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown)) /*IUnknown*/ { *ppvObj = This; } else if(IsEqualIID(riid, &IID_IClassFactory)) /*IClassFactory*/ { *ppvObj = (IClassFactory*)This; } if(*ppvObj) { IUnknown_AddRef((LPUNKNOWN)*ppvObj); TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj); return S_OK; } TRACE("-- Interface: %s E_NOINTERFACE\n", debugstr_guid(riid)); return E_NOINTERFACE; } /****************************************************************************** * IDefClF_fnAddRef */ static ULONG WINAPI IDefClF_fnAddRef(LPCLASSFACTORY iface) { ICOM_THIS(IDefClFImpl,iface); TRACE("(%p)->(count=%lu)\n",This,This->ref); InterlockedIncrement(&shell32_ObjCount); return InterlockedIncrement(&This->ref); } /****************************************************************************** * IDefClF_fnRelease */ static ULONG WINAPI IDefClF_fnRelease(LPCLASSFACTORY iface) { ICOM_THIS(IDefClFImpl,iface); TRACE("(%p)->(count=%lu)\n",This,This->ref); InterlockedDecrement(&shell32_ObjCount); if (!InterlockedDecrement(&This->ref)) { if (This->pcRefDll) InterlockedDecrement(This->pcRefDll); TRACE("-- destroying IClassFactory(%p)\n",This); HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } /****************************************************************************** * IDefClF_fnCreateInstance */ static HRESULT WINAPI IDefClF_fnCreateInstance( LPCLASSFACTORY iface, LPUNKNOWN pUnkOuter, REFIID riid, LPVOID *ppvObject) { ICOM_THIS(IDefClFImpl,iface); TRACE("%p->(%p,\n\tIID:\t%s,%p)\n",This,pUnkOuter,debugstr_guid(riid),ppvObject); *ppvObject = NULL; if(pUnkOuter) return(CLASS_E_NOAGGREGATION); if ( This->riidInst==NULL || IsEqualCLSID(riid, This->riidInst) || IsEqualCLSID(riid, &IID_IUnknown) ) { return This->lpfnCI(pUnkOuter, riid, ppvObject); } ERR("unknown IID requested\n\tIID:\t%s\n",debugstr_guid(riid)); return E_NOINTERFACE; } /****************************************************************************** * IDefClF_fnLockServer */ static HRESULT WINAPI IDefClF_fnLockServer(LPCLASSFACTORY iface, BOOL fLock) { ICOM_THIS(IDefClFImpl,iface); TRACE("%p->(0x%x), not implemented\n",This, fLock); return E_NOTIMPL; } static ICOM_VTABLE(IClassFactory) dclfvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IDefClF_fnQueryInterface, IDefClF_fnAddRef, IDefClF_fnRelease, IDefClF_fnCreateInstance, IDefClF_fnLockServer }; /****************************************************************************** * SHCreateDefClassObject [SHELL32.70] */ HRESULT WINAPI SHCreateDefClassObject( REFIID riid, LPVOID* ppv, LPFNCREATEINSTANCE lpfnCI, /* create instance callback entry */ PLONG pcRefDll, /* ref count of the dll */ REFIID riidInst) /* optional interface to the instance */ { TRACE("\n\tIID:\t%s %p %p %p \n\tIIDIns:\t%s\n", debugstr_guid(riid), ppv, lpfnCI, pcRefDll, debugstr_guid(riidInst)); if ( IsEqualCLSID(riid, &IID_IClassFactory) ) { IClassFactory * pcf = IDefClF_fnConstructor(lpfnCI, pcRefDll, riidInst); if (pcf) { *ppv = pcf; return NOERROR; } return E_OUTOFMEMORY; } return E_NOINTERFACE; } /************************************************************************* * DragAcceptFiles [SHELL32.54] */ void WINAPI DragAcceptFiles(HWND hWnd, BOOL b) { LONG exstyle; if( !IsWindow(hWnd) ) return; exstyle = GetWindowLongA(hWnd,GWL_EXSTYLE); if (b) exstyle |= WS_EX_ACCEPTFILES; else exstyle &= ~WS_EX_ACCEPTFILES; SetWindowLongA(hWnd,GWL_EXSTYLE,exstyle); } /************************************************************************* * DragFinish [SHELL32.80] */ void WINAPI DragFinish(HDROP h) { TRACE("\n"); GlobalFree((HGLOBAL)h); } /************************************************************************* * DragQueryPoint [SHELL32.135] */ BOOL WINAPI DragQueryPoint(HDROP hDrop, POINT *p) { LPDROPFILESTRUCT lpDropFileStruct; BOOL bRet; TRACE("\n"); lpDropFileStruct = (LPDROPFILESTRUCT) GlobalLock(hDrop); memcpy(p,&lpDropFileStruct->ptMousePos,sizeof(POINT)); bRet = lpDropFileStruct->fInNonClientArea; GlobalUnlock(hDrop); return bRet; } /************************************************************************* * DragQueryFileA [SHELL32.81] [shell32.82] */ UINT WINAPI DragQueryFileA( HDROP hDrop, UINT lFile, LPSTR lpszFile, UINT lLength) { LPSTR lpDrop; UINT i = 0; LPDROPFILESTRUCT lpDropFileStruct = (LPDROPFILESTRUCT) GlobalLock(hDrop); TRACE("(%08x, %x, %p, %u)\n", hDrop,lFile,lpszFile,lLength); if(!lpDropFileStruct) goto end; lpDrop = (LPSTR) lpDropFileStruct + lpDropFileStruct->lSize; while (i++ < lFile) { while (*lpDrop++); /* skip filename */ if (!*lpDrop) { i = (lFile == 0xFFFFFFFF) ? i : 0; goto end; } } i = lstrlenA(lpDrop); i++; if (!lpszFile ) goto end; /* needed buffer size */ i = (lLength > i) ? i : lLength; lstrcpynA (lpszFile, lpDrop, i); end: GlobalUnlock(hDrop); return i; } /************************************************************************* * DragQueryFileW [shell32.133] */ UINT WINAPI DragQueryFileW( HDROP hDrop, UINT lFile, LPWSTR lpszwFile, UINT lLength) { LPWSTR lpwDrop; UINT i = 0; LPDROPFILESTRUCT lpDropFileStruct = (LPDROPFILESTRUCT) GlobalLock(hDrop); TRACE("(%08x, %x, %p, %u)\n", hDrop,lFile,lpszwFile,lLength); if(!lpDropFileStruct) goto end; lpwDrop = (LPWSTR) lpDropFileStruct + lpDropFileStruct->lSize; i = 0; while (i++ < lFile) { while (*lpwDrop++); /* skip filename */ if (!*lpwDrop) { i = (lFile == 0xFFFFFFFF) ? i : 0; goto end; } } i = lstrlenW(lpwDrop); i++; if ( !lpszwFile) goto end; /* needed buffer size */ i = (lLength > i) ? i : lLength; lstrcpynW (lpszwFile, lpwDrop, i); end: GlobalUnlock(hDrop); return i; } wine-20000526/dlls/shell32/shellord.c0100644000175000001440000011007207106625254016644 0ustar julliardusers/* * The parameters of many functions changes between different OS versions * (NT uses Unicode strings, 95 uses ASCII strings) * * Copyright 1997 Marcus Meissner * 1998 Jürgen Schmied */ #include #include #include "winerror.h" #include "winreg.h" #include "debugtools.h" #include "winnls.h" #include "winversion.h" #include "heap.h" #include "crtdll.h" #include "shellapi.h" #include "shlobj.h" #include "shell32_main.h" #include "wine/undocshell.h" DEFAULT_DEBUG_CHANNEL(shell); /************************************************************************* * ParseFieldA [internal] * * copys a field from a ',' delimited string * * first field is nField = 1 */ DWORD WINAPI ParseFieldA( LPCSTR src, DWORD nField, LPSTR dst, DWORD len) { WARN("('%s',0x%08lx,%p,%ld) semi-stub.\n",src,nField,dst,len); if (!src || !src[0] || !dst || !len) return 0; /* skip n fields delimited by ',' */ while (nField > 1) { if (*src=='\0') return FALSE; if (*(src++)==',') nField--; } /* copy part till the next ',' to dst */ while ( *src!='\0' && *src!=',' && (len--)>0 ) *(dst++)=*(src++); /* finalize the string */ *dst=0x0; return TRUE; } /************************************************************************* * ParseFieldW [internal] * * copys a field from a ',' delimited string * * first field is nField = 1 */ DWORD WINAPI ParseFieldW(LPCWSTR src, DWORD nField, LPWSTR dst, DWORD len) { FIXME("('%s',0x%08lx,%p,%ld) stub.\n", debugstr_w(src), nField, dst, len); return FALSE; } /************************************************************************* * ParseFieldAW [SHELL32.58] */ DWORD WINAPI ParseFieldAW(LPCVOID src, DWORD nField, LPVOID dst, DWORD len) { if (VERSION_OsIsUnicode()) return ParseFieldW(src, nField, dst, len); return ParseFieldA(src, nField, dst, len); } /************************************************************************* * GetFileNameFromBrowse [SHELL32.63] * */ BOOL WINAPI GetFileNameFromBrowse( HWND hwndOwner, LPSTR lpstrFile, DWORD nMaxFile, LPCSTR lpstrInitialDir, LPCSTR lpstrDefExt, LPCSTR lpstrFilter, LPCSTR lpstrTitle) { FIXME("(%04x,%s,%ld,%s,%s,%s,%s):stub.\n", hwndOwner, lpstrFile, nMaxFile, lpstrInitialDir, lpstrDefExt, lpstrFilter, lpstrTitle); /* puts up a Open Dialog and requests input into targetbuf */ /* OFN_HIDEREADONLY|OFN_NOCHANGEDIR|OFN_FILEMUSTEXIST|OFN_unknown */ lstrcpyA(lpstrFile,"x:\\dummy.exe"); return 1; } /************************************************************************* * SHGetSettings [SHELL32.68] * * NOTES * the registry path are for win98 (tested) * and possibly are the same in nt40 */ void WINAPI SHGetSettings(LPSHELLFLAGSTATE lpsfs, DWORD dwMask, DWORD dwx) { HKEY hKey; DWORD dwData; DWORD dwDataSize = sizeof (DWORD); TRACE("(%p 0x%08lx 0x%08lx)\n",lpsfs,dwMask, dwx); if (RegCreateKeyExA(HKEY_CURRENT_USER, "Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Advanced", 0, 0, 0, KEY_ALL_ACCESS, 0, &hKey, 0)) return; if ( (SSF_SHOWEXTENSIONS & dwMask) && !RegQueryValueExA(hKey, "HideFileExt", 0, 0, (LPBYTE)&dwData, &dwDataSize)) lpsfs->fShowExtensions = ((dwData == 0) ? 0 : 1); if ( (SSF_SHOWINFOTIP & dwMask) && !RegQueryValueExA(hKey, "ShowInfoTip", 0, 0, (LPBYTE)&dwData, &dwDataSize)) lpsfs->fShowInfoTip = ((dwData == 0) ? 0 : 1); if ( (SSF_DONTPRETTYPATH & dwMask) && !RegQueryValueExA(hKey, "DontPrettyPath", 0, 0, (LPBYTE)&dwData, &dwDataSize)) lpsfs->fDontPrettyPath = ((dwData == 0) ? 0 : 1); if ( (SSF_HIDEICONS & dwMask) && !RegQueryValueExA(hKey, "HideIcons", 0, 0, (LPBYTE)&dwData, &dwDataSize)) lpsfs->fHideIcons = ((dwData == 0) ? 0 : 1); if ( (SSF_MAPNETDRVBUTTON & dwMask) && !RegQueryValueExA(hKey, "MapNetDrvBtn", 0, 0, (LPBYTE)&dwData, &dwDataSize)) lpsfs->fMapNetDrvBtn = ((dwData == 0) ? 0 : 1); if ( (SSF_SHOWATTRIBCOL & dwMask) && !RegQueryValueExA(hKey, "ShowAttribCol", 0, 0, (LPBYTE)&dwData, &dwDataSize)) lpsfs->fShowAttribCol = ((dwData == 0) ? 0 : 1); if (((SSF_SHOWALLOBJECTS | SSF_SHOWSYSFILES) & dwMask) && !RegQueryValueExA(hKey, "Hidden", 0, 0, (LPBYTE)&dwData, &dwDataSize)) { if (dwData == 0) { if (SSF_SHOWALLOBJECTS & dwMask) lpsfs->fShowAllObjects = 0; if (SSF_SHOWSYSFILES & dwMask) lpsfs->fShowSysFiles = 0; } else if (dwData == 1) { if (SSF_SHOWALLOBJECTS & dwMask) lpsfs->fShowAllObjects = 1; if (SSF_SHOWSYSFILES & dwMask) lpsfs->fShowSysFiles = 0; } else if (dwData == 2) { if (SSF_SHOWALLOBJECTS & dwMask) lpsfs->fShowAllObjects = 0; if (SSF_SHOWSYSFILES & dwMask) lpsfs->fShowSysFiles = 1; } } RegCloseKey (hKey); TRACE("-- 0x%04x\n", *(WORD*)lpsfs); } /************************************************************************* * SHShellFolderView_Message [SHELL32.73] * * PARAMETERS * hwndCabinet defines the explorer cabinet window that contains the * shellview you need to communicate with * uMsg identifying the SFVM enum to perform * lParam * * NOTES * Message SFVM_REARRANGE = 1 * This message gets sent when a column gets clicked to instruct the * shell view to re-sort the item list. lParam identifies the column * that was clicked. */ int WINAPI SHShellFolderView_Message( HWND hwndCabinet, DWORD dwMessage, DWORD dwParam) { FIXME("%04x %08lx %08lx stub\n",hwndCabinet, dwMessage, dwParam); return 0; } /************************************************************************* * OleStrToStrN [SHELL32.78] */ BOOL WINAPI OleStrToStrNA (LPSTR lpStr, INT nStr, LPCWSTR lpOle, INT nOle) { TRACE("(%p, %x, %s, %x)\n", lpStr, nStr, debugstr_wn(lpOle,nOle), nOle); return WideCharToMultiByte (0, 0, lpOle, nOle, lpStr, nStr, NULL, NULL); } BOOL WINAPI OleStrToStrNW (LPWSTR lpwStr, INT nwStr, LPCWSTR lpOle, INT nOle) { TRACE("(%p, %x, %s, %x)\n", lpwStr, nwStr, debugstr_wn(lpOle,nOle), nOle); if (lstrcpynW ( lpwStr, lpOle, nwStr)) { return lstrlenW (lpwStr); } return 0; } BOOL WINAPI OleStrToStrNAW (LPVOID lpOut, INT nOut, LPCVOID lpIn, INT nIn) { if (VERSION_OsIsUnicode()) return OleStrToStrNW (lpOut, nOut, lpIn, nIn); return OleStrToStrNA (lpOut, nOut, lpIn, nIn); } /************************************************************************* * StrToOleStrN [SHELL32.79] * lpMulti, nMulti, nWide [IN] * lpWide [OUT] */ BOOL WINAPI StrToOleStrNA (LPWSTR lpWide, INT nWide, LPCSTR lpStrA, INT nStr) { TRACE("(%p, %x, %s, %x)\n", lpWide, nWide, debugstr_an(lpStrA,nStr), nStr); return MultiByteToWideChar (0, 0, lpStrA, nStr, lpWide, nWide); } BOOL WINAPI StrToOleStrNW (LPWSTR lpWide, INT nWide, LPCWSTR lpStrW, INT nStr) { TRACE("(%p, %x, %s, %x)\n", lpWide, nWide, debugstr_wn(lpStrW, nStr), nStr); if (lstrcpynW (lpWide, lpStrW, nWide)) { return lstrlenW (lpWide); } return 0; } BOOL WINAPI StrToOleStrNAW (LPWSTR lpWide, INT nWide, LPCVOID lpStr, INT nStr) { if (VERSION_OsIsUnicode()) return StrToOleStrNW (lpWide, nWide, lpStr, nStr); return StrToOleStrNA (lpWide, nWide, lpStr, nStr); } /************************************************************************* * RegisterShellHook [SHELL32.181] * * PARAMS * hwnd [I] window handle * y [I] flag ???? * * NOTES * exported by ordinal */ BOOL WINAPI RegisterShellHook( HWND hWnd, DWORD dwType) { FIXME("(0x%08x,0x%08lx):stub.\n",hWnd, dwType); return TRUE; } /************************************************************************* * ShellMessageBoxW [SHELL32.182] * * Format and output errormessage. * * idText resource ID of title or LPSTR * idTitle resource ID of title or LPSTR * * NOTES * exported by ordinal */ int WINAPIV ShellMessageBoxW( HINSTANCE hInstance, HWND hWnd, LPCWSTR lpText, LPCWSTR lpCaption, UINT uType, ...) { WCHAR szText[100],szTitle[100],szTemp[256]; LPCWSTR pszText = szText, pszTitle = szTitle; va_list args; va_start(args, uType); /* wvsprintfA(buf,fmt, args); */ TRACE("(%08lx,%08lx,%p,%p,%08x)\n", (DWORD)hInstance,(DWORD)hWnd,lpText,lpCaption,uType); if (!HIWORD(lpCaption)) LoadStringW(hInstance, (DWORD)lpCaption, szTitle, 100); else pszTitle = lpCaption; if (!HIWORD(lpText)) LoadStringW(hInstance, (DWORD)lpText, szText, 100); else pszText = lpText; FormatMessageW(FORMAT_MESSAGE_FROM_STRING | FORMAT_MESSAGE_ARGUMENT_ARRAY, szText, 0, 0, szTemp, 256, (LPDWORD) args); va_end(args); return MessageBoxW(hWnd,szTemp,szTitle,uType); } /************************************************************************* * ShellMessageBoxA [SHELL32.183] */ int WINAPIV ShellMessageBoxA( HINSTANCE hInstance, HWND hWnd, LPCSTR lpText, LPCSTR lpCaption, UINT uType, ...) { char szText[100],szTitle[100],szTemp[256]; LPCSTR pszText = szText, pszTitle = szTitle; va_list args; va_start(args, uType); /* wvsprintfA(buf,fmt, args); */ TRACE("(%08lx,%08lx,%p,%p,%08x)\n", (DWORD)hInstance,(DWORD)hWnd,lpText,lpCaption,uType); if (!HIWORD(lpCaption)) LoadStringA(hInstance, (DWORD)lpCaption, szTitle, 100); else pszTitle = lpCaption; if (!HIWORD(lpText)) LoadStringA(hInstance, (DWORD)lpText, szText, 100); else pszText = lpText; FormatMessageA(FORMAT_MESSAGE_FROM_STRING | FORMAT_MESSAGE_ARGUMENT_ARRAY, szText, 0, 0, szTemp, 256, (LPDWORD) args); va_end(args); return MessageBoxA(hWnd,szTemp,szTitle,uType); } /************************************************************************* * SHFree [SHELL32.195] * * NOTES * free_ptr() - frees memory using IMalloc * exported by ordinal */ #define MEM_DEBUG 1 void WINAPI SHFree(LPVOID x) { #if MEM_DEBUG WORD len = *(LPWORD)((LPBYTE)x-2); if ( *(LPWORD)((LPBYTE)x+len) != 0x7384) ERR("MAGIC2!\n"); if ( (*(LPWORD)((LPBYTE)x-4)) != 0x8271) ERR("MAGIC1!\n"); else memset((LPBYTE)x-4, 0xde, len+6); TRACE("%p len=%u\n",x, len); x = (LPBYTE) x - 4; #else TRACE("%p\n",x); #endif HeapFree(GetProcessHeap(), 0, x); } /************************************************************************* * SHAlloc [SHELL32.196] * * NOTES * void *task_alloc(DWORD len), uses SHMalloc allocator * exported by ordinal */ LPVOID WINAPI SHAlloc(DWORD len) { LPBYTE ret; #if MEM_DEBUG ret = (LPVOID) HeapAlloc(GetProcessHeap(),0,len+6); #else ret = (LPVOID) HeapAlloc(GetProcessHeap(),0,len); #endif #if MEM_DEBUG *(LPWORD)(ret) = 0x8271; *(LPWORD)(ret+2) = (WORD)len; *(LPWORD)(ret+4+len) = 0x7384; ret += 4; memset(ret, 0xdf, len); #endif TRACE("%lu bytes at %p\n",len, ret); return (LPVOID)ret; } /************************************************************************* * SHRegisterDragDrop [SHELL32.86] * * NOTES * exported by ordinal */ HRESULT WINAPI SHRegisterDragDrop( HWND hWnd, LPDROPTARGET pDropTarget) { FIXME("(0x%08x,%p):stub.\n", hWnd, pDropTarget); if (GetShellOle()) return pRegisterDragDrop(hWnd, pDropTarget); return 0; } /************************************************************************* * SHRevokeDragDrop [SHELL32.87] * * NOTES * exported by ordinal */ HRESULT WINAPI SHRevokeDragDrop(HWND hWnd) { FIXME("(0x%08x):stub.\n",hWnd); return 0; } /************************************************************************* * SHDoDragDrop [SHELL32.88] * * NOTES * exported by ordinal */ HRESULT WINAPI SHDoDragDrop( HWND hWnd, LPDATAOBJECT lpDataObject, LPDROPSOURCE lpDropSource, DWORD dwOKEffect, LPDWORD pdwEffect) { FIXME("(0x%04x %p %p 0x%08lx %p):stub.\n", hWnd, lpDataObject, lpDropSource, dwOKEffect, pdwEffect); return 0; } /************************************************************************* * ArrangeWindows [SHELL32.184] * */ WORD WINAPI ArrangeWindows( HWND hwndParent, DWORD dwReserved, LPCRECT lpRect, WORD cKids, CONST HWND * lpKids) { FIXME("(0x%08x 0x%08lx %p 0x%04x %p):stub.\n", hwndParent, dwReserved, lpRect, cKids, lpKids); return 0; } /************************************************************************* * SignalFileOpen [SHELL32.103] * * NOTES * exported by ordinal */ DWORD WINAPI SignalFileOpen (DWORD dwParam1) { FIXME("(0x%08lx):stub.\n", dwParam1); return 0; } /************************************************************************* * SHAddToRecentDocs [SHELL32.234] * * PARAMETERS * uFlags [IN] SHARD_PATH or SHARD_PIDL * pv [IN] string or pidl, NULL clears the list * * NOTES * exported by name */ DWORD WINAPI SHAddToRecentDocs (UINT uFlags,LPCVOID pv) { if (SHARD_PIDL==uFlags) { FIXME("(0x%08x,pidl=%p):stub.\n", uFlags,pv); } else { FIXME("(0x%08x,%s):stub.\n", uFlags,(char*)pv); } return 0; } /************************************************************************* * SHCreateShellFolderViewEx [SHELL32.174] * * NOTES * see IShellFolder::CreateViewObject */ HRESULT WINAPI SHCreateShellFolderViewEx( LPCSHELLFOLDERVIEWINFO psvcbi, /*[in ] shelltemplate struct*/ LPSHELLVIEW* ppv) /*[out] IShellView pointer*/ { IShellView * psf; HRESULT hRes; TRACE("sf=%p pidl=%p cb=%p mode=0x%08x parm=0x%08lx\n", psvcbi->pshf, psvcbi->pidlFolder, psvcbi->lpfnCallback, psvcbi->uViewMode, psvcbi->dwUser); psf = IShellView_Constructor(psvcbi->pshf); if (!psf) return E_OUTOFMEMORY; IShellView_AddRef(psf); hRes = IShellView_QueryInterface(psf, &IID_IShellView, (LPVOID *)ppv); IShellView_Release(psf); return hRes; } /************************************************************************* * SHWinHelp [SHELL32.127] * */ HRESULT WINAPI SHWinHelp (DWORD v, DWORD w, DWORD x, DWORD z) { FIXME("0x%08lx 0x%08lx 0x%08lx 0x%08lx stub\n",v,w,x,z); return 0; } /************************************************************************* * SHRunControlPanel [SHELL32.161] * */ HRESULT WINAPI SHRunControlPanel (DWORD x, DWORD z) { FIXME("0x%08lx 0x%08lx stub\n",x,z); return 0; } /************************************************************************* * ShellExecuteEx [SHELL32.291] * */ BOOL WINAPI ShellExecuteExAW (LPVOID sei) { if (VERSION_OsIsUnicode()) return ShellExecuteExW (sei); return ShellExecuteExA (sei); } /************************************************************************* * ShellExecuteExA [SHELL32.292] * * placeholder in the commandline: * %1 file * %2 printer * %3 driver * %4 port * %I adress of a global item ID (explorer switch /idlist) * %L ??? path/url/current file ??? * %S ??? * %* all following parameters (see batfile) */ #include "process.h" /* we can get rid of it hopefully */ #include "task.h" BOOL WINAPI ShellExecuteExA (LPSHELLEXECUTEINFOA sei) { CHAR szApplicationName[MAX_PATH],szCommandline[MAX_PATH],szPidl[20]; LPSTR pos; int gap, len; STARTUPINFOA startup; PROCESS_INFORMATION info; WARN("mask=0x%08lx hwnd=0x%04x verb=%s file=%s parm=%s dir=%s show=0x%08x class=%s incomplete\n", sei->fMask, sei->hwnd, sei->lpVerb, sei->lpFile, sei->lpParameters, sei->lpDirectory, sei->nShow, (sei->fMask & SEE_MASK_CLASSNAME) ? sei->lpClass : "not used"); ZeroMemory(szApplicationName,MAX_PATH); if (sei->lpFile) strcpy(szApplicationName, sei->lpFile); ZeroMemory(szCommandline,MAX_PATH); if (sei->lpParameters) strcpy(szCommandline, sei->lpParameters); if (sei->fMask & (SEE_MASK_CLASSKEY | SEE_MASK_INVOKEIDLIST | SEE_MASK_ICON | SEE_MASK_HOTKEY | SEE_MASK_CONNECTNETDRV | SEE_MASK_FLAG_DDEWAIT | SEE_MASK_DOENVSUBST | SEE_MASK_FLAG_NO_UI | SEE_MASK_UNICODE | SEE_MASK_NO_CONSOLE | SEE_MASK_ASYNCOK | SEE_MASK_HMONITOR )) { FIXME("flags ignored: 0x%08lx\n", sei->fMask); } /* launch a document by fileclass like 'Wordpad.Document.1' */ if (sei->fMask & SEE_MASK_CLASSNAME) { /* the commandline contains 'c:\Path\wordpad.exe "%1"' */ HCR_GetExecuteCommand(sei->lpClass, (sei->lpVerb) ? sei->lpVerb : "open", szCommandline, 256); /* fixme: get the extension of lpFile, check if it fits to the lpClass */ TRACE("SEE_MASK_CLASSNAME->'%s'\n", szCommandline); } /* process the IDList */ if ( (sei->fMask & SEE_MASK_INVOKEIDLIST) == SEE_MASK_INVOKEIDLIST) /*0x0c*/ { SHGetPathFromIDListA (sei->lpIDList,szApplicationName); TRACE("-- idlist=%p (%s)\n", sei->lpIDList, szApplicationName); } else { if (sei->fMask & SEE_MASK_IDLIST ) { pos = strstr(szCommandline, "%I"); if (pos) { LPVOID pv; HGLOBAL hmem = SHAllocShared ( sei->lpIDList, ILGetSize(sei->lpIDList), 0); pv = SHLockShared(hmem,0); sprintf(szPidl,":%p",pv ); SHUnlockShared(pv); gap = strlen(szPidl); len = strlen(pos)-2; memmove(pos+gap,pos+2,len); memcpy(pos,szPidl,gap); } } } TRACE("execute:'%s','%s'\n",szApplicationName, szCommandline); strcat(szApplicationName, " "); strcat(szApplicationName, szCommandline); ZeroMemory(&startup,sizeof(STARTUPINFOA)); startup.cb = sizeof(STARTUPINFOA); if (! CreateProcessA(NULL, szApplicationName, NULL, NULL, FALSE, 0, NULL, NULL, &startup, &info)) { sei->hInstApp = GetLastError(); return FALSE; } sei->hInstApp = 33; /* Give 30 seconds to the app to come up */ if ( WaitForInputIdle ( info.hProcess, 30000 ) == 0xFFFFFFFF ) ERR("WaitForInputIdle failed: Error %ld\n", GetLastError() ); if(sei->fMask & SEE_MASK_NOCLOSEPROCESS) sei->hProcess = info.hProcess; else CloseHandle( info.hProcess ); CloseHandle( info.hThread ); return TRUE; } /************************************************************************* * ShellExecuteExW [SHELL32.293] * */ BOOL WINAPI ShellExecuteExW (LPSHELLEXECUTEINFOW sei) { SHELLEXECUTEINFOA seiA; DWORD ret; TRACE("%p\n", sei); memcpy(&seiA, sei, sizeof(SHELLEXECUTEINFOA)); if (sei->lpVerb) seiA.lpVerb = HEAP_strdupWtoA( GetProcessHeap(), 0, sei->lpVerb); if (sei->lpFile) seiA.lpFile = HEAP_strdupWtoA( GetProcessHeap(), 0, sei->lpFile); if (sei->lpParameters) seiA.lpParameters = HEAP_strdupWtoA( GetProcessHeap(), 0, sei->lpParameters); if (sei->lpDirectory) seiA.lpDirectory = HEAP_strdupWtoA( GetProcessHeap(), 0, sei->lpDirectory); if ((sei->fMask & SEE_MASK_CLASSNAME) && sei->lpClass) seiA.lpClass = HEAP_strdupWtoA( GetProcessHeap(), 0, sei->lpClass); else seiA.lpClass = NULL; ret = ShellExecuteExA(&seiA); if (seiA.lpVerb) HeapFree( GetProcessHeap(), 0, (LPSTR) seiA.lpVerb ); if (seiA.lpFile) HeapFree( GetProcessHeap(), 0, (LPSTR) seiA.lpFile ); if (seiA.lpParameters) HeapFree( GetProcessHeap(), 0, (LPSTR) seiA.lpParameters ); if (seiA.lpDirectory) HeapFree( GetProcessHeap(), 0, (LPSTR) seiA.lpDirectory ); if (seiA.lpClass) HeapFree( GetProcessHeap(), 0, (LPSTR) seiA.lpClass ); return ret; } static LPUNKNOWN SHELL32_IExplorerInterface=0; /************************************************************************* * SHSetInstanceExplorer [SHELL32.176] * * NOTES * Sets the interface */ HRESULT WINAPI SHSetInstanceExplorer (LPUNKNOWN lpUnknown) { TRACE("%p\n", lpUnknown); SHELL32_IExplorerInterface = lpUnknown; return (HRESULT) lpUnknown; } /************************************************************************* * SHGetInstanceExplorer [SHELL32.256] * * NOTES * gets the interface pointer of the explorer and a reference */ HRESULT WINAPI SHGetInstanceExplorer (LPUNKNOWN * lpUnknown) { TRACE("%p\n", lpUnknown); *lpUnknown = SHELL32_IExplorerInterface; if (!SHELL32_IExplorerInterface) return E_FAIL; IUnknown_AddRef(SHELL32_IExplorerInterface); return NOERROR; } /************************************************************************* * SHFreeUnusedLibraries [SHELL32.123] * * NOTES * exported by name */ void WINAPI SHFreeUnusedLibraries (void) { FIXME("stub\n"); } /************************************************************************* * DAD_SetDragImage [SHELL32.136] * * NOTES * exported by name */ BOOL WINAPI DAD_SetDragImage( HIMAGELIST himlTrack, LPPOINT lppt) { FIXME("%p %p stub\n",himlTrack, lppt); return 0; } /************************************************************************* * DAD_ShowDragImage [SHELL32.137] * * NOTES * exported by name */ BOOL WINAPI DAD_ShowDragImage(BOOL bShow) { FIXME("0x%08x stub\n",bShow); return 0; } /************************************************************************* * SHRegCloseKey [NT4.0:SHELL32.505] * */ HRESULT WINAPI SHRegCloseKey (HKEY hkey) { TRACE("0x%04x\n",hkey); return RegCloseKey( hkey ); } /************************************************************************* * SHRegOpenKeyA [SHELL32.506] * */ HRESULT WINAPI SHRegOpenKeyA(HKEY hKey, LPSTR lpSubKey, LPHKEY phkResult) { TRACE("(0x%08x, %s, %p)\n", hKey, debugstr_a(lpSubKey), phkResult); return RegOpenKeyA(hKey, lpSubKey, phkResult); } /************************************************************************* * SHRegOpenKeyW [NT4.0:SHELL32.507] * */ HRESULT WINAPI SHRegOpenKeyW (HKEY hkey, LPCWSTR lpszSubKey, LPHKEY retkey) { WARN("0x%04x %s %p\n",hkey,debugstr_w(lpszSubKey),retkey); return RegOpenKeyW( hkey, lpszSubKey, retkey ); } /************************************************************************* * SHRegQueryValueExA [SHELL32.509] * */ HRESULT WINAPI SHRegQueryValueExA( HKEY hkey, LPSTR lpValueName, LPDWORD lpReserved, LPDWORD lpType, LPBYTE lpData, LPDWORD lpcbData) { TRACE("0x%04x %s %p %p %p %p\n", hkey, lpValueName, lpReserved, lpType, lpData, lpcbData); return RegQueryValueExA (hkey, lpValueName, lpReserved, lpType, lpData, lpcbData); } /************************************************************************* * SHRegQueryValueW [NT4.0:SHELL32.510] * */ HRESULT WINAPI SHRegQueryValueW (HKEY hkey, LPWSTR lpszSubKey, LPWSTR lpszData, LPDWORD lpcbData ) { WARN("0x%04x %s %p %p semi-stub\n", hkey, debugstr_w(lpszSubKey), lpszData, lpcbData); return RegQueryValueW( hkey, lpszSubKey, lpszData, lpcbData ); } /************************************************************************* * SHRegQueryValueExW [NT4.0:SHELL32.511] * * FIXME * if the datatype REG_EXPAND_SZ then expand the string and change * *pdwType to REG_SZ. */ HRESULT WINAPI SHRegQueryValueExW (HKEY hkey, LPWSTR pszValue, LPDWORD pdwReserved, LPDWORD pdwType, LPVOID pvData, LPDWORD pcbData) { DWORD ret; WARN("0x%04x %s %p %p %p %p semi-stub\n", hkey, debugstr_w(pszValue), pdwReserved, pdwType, pvData, pcbData); ret = RegQueryValueExW ( hkey, pszValue, pdwReserved, pdwType, pvData, pcbData); return ret; } /* SHGetValue: Gets a value from the registry */ /************************************************************************* * SHGetValueA * * Gets a value from the registry */ DWORD WINAPI SHGetValueA( HKEY hkey, LPCSTR pSubKey, LPCSTR pValue, LPDWORD pwType, LPVOID pvData, LPDWORD pbData ) { FIXME("(%p),stub!\n", pSubKey); return ERROR_SUCCESS; /* return success */ } /************************************************************************* * SHGetValueW * * Gets a value from the registry */ DWORD WINAPI SHGetValueW( HKEY hkey, LPCWSTR pSubKey, LPCWSTR pValue, LPDWORD pwType, LPVOID pvData, LPDWORD pbData ) { FIXME("(%p),stub!\n", pSubKey); return ERROR_SUCCESS; /* return success */ } /* gets a user-specific registry value. */ /************************************************************************* * SHRegGetUSValueA * * Gets a user-specific registry value */ LONG WINAPI SHRegGetUSValueA( LPCSTR pSubKey, LPCSTR pValue, LPDWORD pwType, LPVOID pvData, LPDWORD pbData, BOOL fIgnoreHKCU, LPVOID pDefaultData, DWORD wDefaultDataSize ) { FIXME("(%p),stub!\n", pSubKey); return ERROR_SUCCESS; /* return success */ } /************************************************************************* * SHRegGetUSValueW * * Gets a user-specific registry value */ LONG WINAPI SHRegGetUSValueW( LPCWSTR pSubKey, LPCWSTR pValue, LPDWORD pwType, LPVOID pvData, LPDWORD pbData, BOOL flagIgnoreHKCU, LPVOID pDefaultData, DWORD wDefaultDataSize ) { FIXME("(%p),stub!\n", pSubKey); return ERROR_SUCCESS; /* return success */ } /************************************************************************* * SHRegDeleteKeyA and SHDeleteKeyA */ HRESULT WINAPI SHRegDeleteKeyA(HKEY hkey, LPCSTR pszSubKey) { FIXME("hkey=0x%08x, %s\n", hkey, debugstr_a(pszSubKey)); return 0; } /************************************************************************* * SHRegDeleteKeyW and SHDeleteKeyA */ HRESULT WINAPI SHRegDeleteKeyW(HKEY hkey, LPCWSTR pszSubKey) { FIXME("hkey=0x%08x, %s\n", hkey, debugstr_w(pszSubKey)); return 0; } /************************************************************************* * ReadCabinetState [NT 4.0:SHELL32.651] * */ HRESULT WINAPI ReadCabinetState(DWORD u, DWORD v) { FIXME("0x%04lx 0x%04lx stub\n",u,v); return 0; } /************************************************************************* * WriteCabinetState [NT 4.0:SHELL32.652] * */ HRESULT WINAPI WriteCabinetState(DWORD u) { FIXME("0x%04lx stub\n",u); return 0; } /************************************************************************* * FileIconInit [SHELL32.660] * */ BOOL WINAPI FileIconInit(BOOL bFullInit) { FIXME("(%s)\n", bFullInit ? "true" : "false"); return 0; } /************************************************************************* * IsUserAdmin [NT 4.0:SHELL32.680] * */ HRESULT WINAPI IsUserAdmin(void) { FIXME("stub\n"); return TRUE; } /************************************************************************* * StrRetToBufA [SHLWAPI.@] * * converts a STRRET to a normal string * * NOTES * the pidl is for STRRET OFFSET */ HRESULT WINAPI StrRetToBufA (LPSTRRET src, LPITEMIDLIST pidl, LPSTR dest, DWORD len) { return StrRetToStrNA(dest, len, src, pidl); } /************************************************************************* * StrRetToBufW [SHLWAPI.@] * * converts a STRRET to a normal string * * NOTES * the pidl is for STRRET OFFSET */ HRESULT WINAPI StrRetToBufW (LPSTRRET src, LPITEMIDLIST pidl, LPWSTR dest, DWORD len) { return StrRetToStrNW(dest, len, src, pidl); } /************************************************************************* * StrRetToStrN [SHELL32.96] * * converts a STRRET to a normal string * * NOTES * the pidl is for STRRET OFFSET */ HRESULT WINAPI StrRetToStrNA (LPVOID dest, DWORD len, LPSTRRET src, LPITEMIDLIST pidl) { TRACE("dest=0x%p len=0x%lx strret=0x%p pidl=%p stub\n",dest,len,src,pidl); switch (src->uType) { case STRRET_WSTR: WideCharToMultiByte(CP_ACP, 0, src->u.pOleStr, -1, (LPSTR)dest, len, NULL, NULL); SHFree(src->u.pOleStr); break; case STRRET_CSTRA: lstrcpynA((LPSTR)dest, src->u.cStr, len); break; case STRRET_OFFSETA: lstrcpynA((LPSTR)dest, ((LPCSTR)&pidl->mkid)+src->u.uOffset, len); break; default: FIXME("unknown type!\n"); if (len) { *(LPSTR)dest = '\0'; } return(FALSE); } return S_OK; } HRESULT WINAPI StrRetToStrNW (LPVOID dest, DWORD len, LPSTRRET src, LPITEMIDLIST pidl) { TRACE("dest=0x%p len=0x%lx strret=0x%p pidl=%p stub\n",dest,len,src,pidl); switch (src->uType) { case STRRET_WSTR: lstrcpynW((LPWSTR)dest, src->u.pOleStr, len); SHFree(src->u.pOleStr); break; case STRRET_CSTRA: lstrcpynAtoW((LPWSTR)dest, src->u.cStr, len); break; case STRRET_OFFSETA: if (pidl) { lstrcpynAtoW((LPWSTR)dest, ((LPCSTR)&pidl->mkid)+src->u.uOffset, len); } break; default: FIXME("unknown type!\n"); if (len) { *(LPSTR)dest = '\0'; } return(FALSE); } return S_OK; } HRESULT WINAPI StrRetToStrNAW (LPVOID dest, DWORD len, LPSTRRET src, LPITEMIDLIST pidl) { if(VERSION_OsIsUnicode()) return StrRetToStrNW (dest, len, src, pidl); return StrRetToStrNA (dest, len, src, pidl); } /************************************************************************* * StrChrW [NT 4.0:SHELL32.651] * */ LPWSTR WINAPI StrChrW (LPWSTR str, WCHAR x ) { TRACE("%s 0x%04x\n",debugstr_w(str),x); return CRTDLL_wcschr(str, x); } /************************************************************************* * StrCmpNIW [NT 4.0:SHELL32.*] * */ INT WINAPI StrCmpNIW ( LPWSTR wstr1, LPWSTR wstr2, INT len) { TRACE("%s %s %i stub\n", debugstr_w(wstr1),debugstr_w(wstr2),len); return CRTDLL__wcsnicmp(wstr1, wstr2, len); } /************************************************************************* * SHAllocShared [SHELL32.520] * * NOTES * parameter1 is return value from HeapAlloc * parameter2 is equal to the size allocated with HeapAlloc * parameter3 is return value from GetCurrentProcessId * * the return value is posted as lParam with 0x402 (WM_USER+2) to somewhere * WM_USER+2 could be the undocumented CWM_SETPATH * the allocated memory contains a pidl */ HGLOBAL WINAPI SHAllocShared(LPVOID psrc, DWORD size, DWORD procID) { HGLOBAL hmem; LPVOID pmem; TRACE("ptr=%p size=0x%04lx procID=0x%04lx\n",psrc,size,procID); hmem = GlobalAlloc(GMEM_FIXED, size); if (!hmem) return 0; pmem = GlobalLock (hmem); if (! pmem) return 0; memcpy (pmem, psrc, size); GlobalUnlock(hmem); return hmem; } /************************************************************************* * SHLockShared [SHELL32.521] * * NOTES * parameter1 is return value from SHAllocShared * parameter2 is return value from GetCurrentProcessId * the receiver of (WM_USER+2) trys to lock the HANDLE (?) * the returnvalue seems to be a memoryadress */ LPVOID WINAPI SHLockShared(HANDLE hmem, DWORD procID) { TRACE("handle=0x%04x procID=0x%04lx\n",hmem,procID); return GlobalLock(hmem); } /************************************************************************* * SHUnlockShared [SHELL32.522] * * NOTES * parameter1 is return value from SHLockShared */ BOOL WINAPI SHUnlockShared(LPVOID pv) { TRACE("%p\n",pv); return GlobalUnlock((HANDLE)pv); } /************************************************************************* * SHFreeShared [SHELL32.523] * * NOTES * parameter1 is return value from SHAllocShared * parameter2 is return value from GetCurrentProcessId */ BOOL WINAPI SHFreeShared( HANDLE hMem, DWORD pid) { TRACE("handle=0x%04x 0x%04lx\n",hMem,pid); return GlobalFree(hMem); } /************************************************************************* * SetAppStartingCursor [SHELL32.99] */ HRESULT WINAPI SetAppStartingCursor(HWND u, DWORD v) { FIXME("hwnd=0x%04x 0x%04lx stub\n",u,v ); return 0; } /************************************************************************* * SHLoadOLE [SHELL32.151] * */ HRESULT WINAPI SHLoadOLE(DWORD u) { FIXME("0x%04lx stub\n",u); return S_OK; } /************************************************************************* * DriveType [SHELL32.64] * */ HRESULT WINAPI DriveType(DWORD u) { FIXME("0x%04lx stub\n",u); return 0; } /************************************************************************* * SHAbortInvokeCommand [SHELL32.198] * */ HRESULT WINAPI SHAbortInvokeCommand(void) { FIXME("stub\n"); return 1; } /************************************************************************* * SHOutOfMemoryMessageBox [SHELL32.126] * */ int WINAPI SHOutOfMemoryMessageBox( HWND hwndOwner, LPCSTR lpCaption, UINT uType) { FIXME("0x%04x %s 0x%08x stub\n",hwndOwner, lpCaption, uType); return 0; } /************************************************************************* * SHFlushClipboard [SHELL32.121] * */ HRESULT WINAPI SHFlushClipboard(void) { FIXME("stub\n"); return 1; } /************************************************************************* * StrFormatByteSizeA [SHLWAPI] */ LPSTR WINAPI StrFormatByteSizeA ( DWORD dw, LPSTR pszBuf, UINT cchBuf ) { char buf[64]; TRACE("%lx %p %i\n", dw, pszBuf, cchBuf); if ( dw<1024L ) { sprintf (buf,"%3.1f bytes", (FLOAT)dw); } else if ( dw<1048576L) { sprintf (buf,"%3.1f KB", (FLOAT)dw/1024); } else if ( dw < 1073741824L) { sprintf (buf,"%3.1f MB", (FLOAT)dw/1048576L); } else { sprintf (buf,"%3.1f GB", (FLOAT)dw/1073741824L); } lstrcpynA (pszBuf, buf, cchBuf); return pszBuf; } /************************************************************************* * StrFormatByteSizeW [SHLWAPI] */ LPWSTR WINAPI StrFormatByteSizeW ( DWORD dw, LPWSTR pszBuf, UINT cchBuf ) { char buf[64]; TRACE("%lx %p %i\n", dw, pszBuf, cchBuf); if ( dw<1024L ) { sprintf (buf,"%3.1f bytes", (FLOAT)dw); } else if ( dw<1048576L) { sprintf (buf,"%3.1f KB", (FLOAT)dw/1024); } else if ( dw < 1073741824L) { sprintf (buf,"%3.1f MB", (FLOAT)dw/1048576L); } else { sprintf (buf,"%3.1f GB", (FLOAT)dw/1073741824L); } lstrcpynAtoW (pszBuf, buf, cchBuf); return pszBuf; } /************************************************************************* * SHWaitForFileToOpen [SHELL32.97] * */ BOOL WINAPI SHWaitForFileToOpen( LPCITEMIDLIST pidl, DWORD dwFlags, DWORD dwTimeout) { FIXME("%p 0x%08lx 0x%08lx stub\n", pidl, dwFlags, dwTimeout); return 0; } /************************************************************************* * Control_FillCache_RunDLL [SHELL32.8] * */ HRESULT WINAPI Control_FillCache_RunDLL(HWND hWnd, HANDLE hModule, DWORD w, DWORD x) { FIXME("0x%04x 0x%04x 0x%04lx 0x%04lx stub\n",hWnd, hModule,w,x); return 0; } /************************************************************************* * RunDLL_CallEntry16 [SHELL32.122] * the name is propably wrong */ HRESULT WINAPI RunDLL_CallEntry16(DWORD v, DWORD w, DWORD x, DWORD y, DWORD z) { FIXME("0x%04lx 0x%04lx 0x%04lx 0x%04lx 0x%04lx stub\n",v,w,x,y,z); return 0; } /************************************************************************ * shell32_654 [SHELL32.654] * * NOTES: first parameter seems to be a pointer (same as passed to WriteCabinetState) * second one could be a size (0x0c). The size is the same as the structure saved to * HCU\Software\Microsoft\Windows\CurrentVersion\Explorer\CabinetState * I'm (js) guessing: this one is just ReadCabinetState ;-) */ HRESULT WINAPI shell32_654 (DWORD x, DWORD y) { FIXME("0x%08lx 0x%08lx stub\n",x,y); return 0; } /************************************************************************ * RLBuildListOfPaths [SHELL32.146] * * NOTES * builds a DPA */ DWORD WINAPI RLBuildListOfPaths (void) { FIXME("stub\n"); return 0; } /************************************************************************ * StrToOleStr [SHELL32.163] * */ int WINAPI StrToOleStrA (LPWSTR lpWideCharStr, LPCSTR lpMultiByteString) { TRACE("(%p, %p %s)\n", lpWideCharStr, lpMultiByteString, debugstr_a(lpMultiByteString)); return MultiByteToWideChar(0, 0, lpMultiByteString, -1, lpWideCharStr, MAX_PATH); } int WINAPI StrToOleStrW (LPWSTR lpWideCharStr, LPCWSTR lpWString) { TRACE("(%p, %p %s)\n", lpWideCharStr, lpWString, debugstr_w(lpWString)); if (lstrcpyW (lpWideCharStr, lpWString )) { return lstrlenW (lpWideCharStr); } return 0; } BOOL WINAPI StrToOleStrAW (LPWSTR lpWideCharStr, LPCVOID lpString) { if (VERSION_OsIsUnicode()) return StrToOleStrW (lpWideCharStr, lpString); return StrToOleStrA (lpWideCharStr, lpString); } /************************************************************************ * SHValidateUNC [SHELL32.173] * */ HRESULT WINAPI SHValidateUNC (DWORD x, DWORD y, DWORD z) { FIXME("0x%08lx 0x%08lx 0x%08lx stub\n",x,y,z); return 0; } /************************************************************************ * DoEnvironmentSubstA [SHELL32.1222] * */ HRESULT WINAPI DoEnvironmentSubstA(LPSTR x, LPSTR y) { FIXME("(%s, %s) stub\n", debugstr_a(x), debugstr_a(y)); return 0; } /************************************************************************ * DoEnvironmentSubstW [SHELL32.1223] * */ HRESULT WINAPI DoEnvironmentSubstW(LPWSTR x, LPWSTR y) { FIXME("(%s, %s): stub\n", debugstr_w(x), debugstr_w(y)); return 0; } /************************************************************************ * DoEnvironmentSubst [SHELL32.53] * */ HRESULT WINAPI DoEnvironmentSubstAW(LPVOID x, LPVOID y) { if (VERSION_OsIsUnicode()) return DoEnvironmentSubstW(x, y); return DoEnvironmentSubstA(x, y); } /************************************************************************* * shell32_243 [SHELL32.243] * * Win98+ by-ordinal routine. In Win98 this routine returns zero and * does nothing else. Possibly this does something in NT or SHELL32 5.0? * */ BOOL WINAPI shell32_243(DWORD a, DWORD b) { return FALSE; } wine-20000526/dlls/shell32/shellpath.c0100644000175000001440000014611007102371522017006 0ustar julliardusers/* * Path Functions * * Many of this functions are in SHLWAPI.DLL also * */ #include #include #include "debugtools.h" #include "winnls.h" #include "winversion.h" #include "winreg.h" #include "crtdll.h" #include "shlobj.h" #include "shell32_main.h" #include "windef.h" #include "options.h" #include "wine/undocshell.h" #include "shlwapi.h" DEFAULT_DEBUG_CHANNEL(shell) /* Combining and Constructing paths */ /************************************************************************* * PathAppendA [SHLWAPI.@] * * NOTES * concat path lpszPath2 onto lpszPath1 * * FIXME * the resulting path is also canonicalized */ LPSTR WINAPI PathAppendA( LPSTR lpszPath1, LPCSTR lpszPath2) { TRACE("%s %s\n",lpszPath1, lpszPath2); while (lpszPath2[0]=='\\') lpszPath2++; return PathCombineA(lpszPath1,lpszPath1,lpszPath2); } /************************************************************************* * PathAppendW [SHLWAPI.@] */ LPSTR WINAPI PathAppendW( LPWSTR lpszPath1, LPCWSTR lpszPath2) { FIXME("%s %s\n",debugstr_w(lpszPath1), debugstr_w(lpszPath2)); return NULL; } /************************************************************************* * PathAppendAW [SHELL32.36] */ LPVOID WINAPI PathAppendAW( LPVOID lpszPath1, LPCVOID lpszPath2) { if (VERSION_OsIsUnicode()) return PathAppendW(lpszPath1, lpszPath2); return PathAppendA(lpszPath1, lpszPath2); } /************************************************************************* * PathCombineA [SHLWAPI.@] * * NOTES * if lpszFile='.' skip it * szDest can be equal to lpszFile. Thats why we use sTemp * * FIXME * the resulting path is also canonicalized * If lpszSrcPath2 starts with a backslash it is appended * to the root of lpszSrcPath1. */ LPSTR WINAPI PathCombineA( LPSTR szDest, LPCSTR lpszDir, LPCSTR lpszFile) { char sTemp[MAX_PATH]; TRACE("%p %p->%s %p->%s\n",szDest, lpszDir, lpszDir, lpszFile, lpszFile); if (!lpszFile || !lpszFile[0] || (lpszFile[0]=='.' && !lpszFile[1]) ) { strcpy(szDest,lpszDir); return szDest; } /* if lpszFile is a complete path don't care about lpszDir */ if (PathIsRootA(lpszFile)) { strcpy(szDest,lpszFile); } else { strcpy(sTemp,lpszDir); PathAddBackslashA(sTemp); strcat(sTemp,lpszFile); strcpy(szDest,sTemp); } return szDest; } /************************************************************************* * PathCombineW [SHLWAPI.@] */ LPWSTR WINAPI PathCombineW( LPWSTR szDest, LPCWSTR lpszDir, LPCWSTR lpszFile) { WCHAR sTemp[MAX_PATH]; TRACE("%p %p->%s %p->%s\n",szDest, lpszDir, debugstr_w(lpszDir), lpszFile, debugstr_w(lpszFile)); if (!lpszFile || !lpszFile[0] || (lpszFile[0]==(WCHAR)'.' && !lpszFile[1]) ) { CRTDLL_wcscpy(szDest,lpszDir); return szDest; } /* if lpszFile is a complete path don't care about lpszDir */ if (PathIsRootW(lpszFile)) { CRTDLL_wcscpy(szDest,lpszFile); } else { CRTDLL_wcscpy(sTemp,lpszDir); PathAddBackslashW(sTemp); CRTDLL_wcscat(sTemp,lpszFile); CRTDLL_wcscpy(szDest,sTemp); } return szDest; } /************************************************************************* * PathCombineAW [SHELL32.37] */ LPVOID WINAPI PathCombineAW( LPVOID szDest, LPCVOID lpszDir, LPCVOID lpszFile) { if (VERSION_OsIsUnicode()) return PathCombineW( szDest, lpszDir, lpszFile ); return PathCombineA( szDest, lpszDir, lpszFile ); } /************************************************************************* * PathAddBackslashA [SHLWAPI.@] * * NOTES * append \ if there is none */ LPSTR WINAPI PathAddBackslashA(LPSTR lpszPath) { int len; TRACE("%p->%s\n",lpszPath,lpszPath); len = strlen(lpszPath); if (len && lpszPath[len-1]!='\\') { lpszPath[len] = '\\'; lpszPath[len+1]= 0x00; return lpszPath+len+1; } return lpszPath+len; } /************************************************************************* * PathAddBackslashW [SHLWAPI.@] */ LPWSTR WINAPI PathAddBackslashW(LPWSTR lpszPath) { int len; TRACE("%p->%s\n",lpszPath,debugstr_w(lpszPath)); len = CRTDLL_wcslen(lpszPath); if (len && lpszPath[len-1]!=(WCHAR)'\\') { lpszPath[len] = (WCHAR)'\\'; lpszPath[len+1]= 0x00; return lpszPath+len+1; } return lpszPath+len; } /************************************************************************* * PathAddBackslashAW [SHELL32.32] */ LPVOID WINAPI PathAddBackslashAW(LPVOID lpszPath) { if(VERSION_OsIsUnicode()) return PathAddBackslashW(lpszPath); return PathAddBackslashA(lpszPath); } /************************************************************************* * PathBuildRootA [SHLWAPI.@] */ LPSTR WINAPI PathBuildRootA(LPSTR lpszPath, int drive) { TRACE("%p %i\n",lpszPath, drive); strcpy(lpszPath,"A:\\"); lpszPath[0]+=drive; return lpszPath; } /************************************************************************* * PathBuildRootW [SHLWAPI.@] */ LPWSTR WINAPI PathBuildRootW(LPWSTR lpszPath, int drive) { TRACE("%p %i\n",debugstr_w(lpszPath), drive); lstrcpyAtoW(lpszPath,"A:\\"); lpszPath[0]+=drive; return lpszPath; } /************************************************************************* * PathBuildRootAW [SHELL32.30] */ LPVOID WINAPI PathBuildRootAW(LPVOID lpszPath, int drive) { if(VERSION_OsIsUnicode()) return PathBuildRootW(lpszPath, drive); return PathBuildRootA(lpszPath, drive); } /* Extracting Component Parts */ /************************************************************************* * PathFindFileNameA [SHLWAPI.@] */ LPSTR WINAPI PathFindFileNameA(LPCSTR lpszPath) { LPCSTR aslash; aslash = lpszPath; TRACE("%s\n",aslash); while (lpszPath[0]) { if (((lpszPath[0]=='\\') || (lpszPath[0]==':')) && lpszPath[1] && lpszPath[1]!='\\') aslash = lpszPath+1; lpszPath++; } return (LPSTR)aslash; } /************************************************************************* * PathFindFileNameW [SHLWAPI.@] */ LPWSTR WINAPI PathFindFileNameW(LPCWSTR lpszPath) { LPCWSTR wslash; wslash = lpszPath; TRACE("%s\n",debugstr_w(wslash)); while (lpszPath[0]) { if (((lpszPath[0]=='\\') || (lpszPath[0]==':')) && lpszPath[1] && lpszPath[1]!='\\') wslash = lpszPath+1; lpszPath++; } return (LPWSTR)wslash; } /************************************************************************* * PathFindFileNameAW [SHELL32.34] */ LPVOID WINAPI PathFindFileNameAW(LPCVOID lpszPath) { if(VERSION_OsIsUnicode()) return PathFindFileNameW(lpszPath); return PathFindFileNameA(lpszPath); } /************************************************************************* * PathFindExtensionA [SHLWAPI.@] * * NOTES * returns pointer to last . in last lpszPath component or at \0. */ LPSTR WINAPI PathFindExtensionA(LPCSTR lpszPath) { LPCSTR lastpoint = NULL; TRACE("%p %s\n",lpszPath,lpszPath); while (*lpszPath) { if (*lpszPath=='\\'||*lpszPath==' ') lastpoint=NULL; if (*lpszPath=='.') lastpoint=lpszPath; lpszPath++; } return (LPSTR)(lastpoint?lastpoint:lpszPath); } /************************************************************************* * PathFindExtensionW [SHLWAPI.@] */ LPWSTR WINAPI PathFindExtensionW(LPCWSTR lpszPath) { LPCWSTR lastpoint = NULL; TRACE("(%p %s)\n",lpszPath,debugstr_w(lpszPath)); while (*lpszPath) { if (*lpszPath==(WCHAR)'\\'||*lpszPath==(WCHAR)' ') lastpoint=NULL; if (*lpszPath==(WCHAR)'.') lastpoint=lpszPath; lpszPath++; } return (LPWSTR)(lastpoint?lastpoint:lpszPath); } /************************************************************************* * PathFindExtensionAW [SHELL32.31] */ LPVOID WINAPI PathFindExtensionAW(LPCVOID lpszPath) { if (VERSION_OsIsUnicode()) return PathFindExtensionW(lpszPath); return PathFindExtensionA(lpszPath); } /************************************************************************* * PathGetExtensionA [internal] * * NOTES * exported by ordinal * return value points to the first char after the dot */ LPSTR WINAPI PathGetExtensionA(LPCSTR lpszPath) { TRACE("(%s)\n",lpszPath); lpszPath = PathFindExtensionA(lpszPath); return (LPSTR)(*lpszPath?(lpszPath+1):lpszPath); } /************************************************************************* * PathGetExtensionW [internal] */ LPWSTR WINAPI PathGetExtensionW(LPCWSTR lpszPath) { TRACE("(%s)\n",debugstr_w(lpszPath)); lpszPath = PathFindExtensionW(lpszPath); return (LPWSTR)(*lpszPath?(lpszPath+1):lpszPath); } /************************************************************************* * PathGetExtensionAW [SHELL32.158] */ LPVOID WINAPI PathGetExtensionAW(LPCVOID lpszPath) { if (VERSION_OsIsUnicode()) return PathGetExtensionW(lpszPath); return PathGetExtensionA(lpszPath); } /************************************************************************* * PathGetArgsA [SHLWAPI.@] * * NOTES * look for next arg in string. handle "quoted" strings * returns pointer to argument *AFTER* the space. Or to the \0. * * FIXME * quoting by '\' */ LPSTR WINAPI PathGetArgsA(LPCSTR lpszPath) { BOOL qflag = FALSE; TRACE("%s\n",lpszPath); while (*lpszPath) { if ((*lpszPath==' ') && !qflag) return (LPSTR)lpszPath+1; if (*lpszPath=='"') qflag=!qflag; lpszPath++; } return (LPSTR)lpszPath; } /************************************************************************* * PathGetArgsW [SHLWAPI.@] */ LPWSTR WINAPI PathGetArgsW(LPCWSTR lpszPath) { BOOL qflag = FALSE; TRACE("%s\n",debugstr_w(lpszPath)); while (*lpszPath) { if ((*lpszPath==' ') && !qflag) return (LPWSTR)lpszPath+1; if (*lpszPath=='"') qflag=!qflag; lpszPath++; } return (LPWSTR)lpszPath; } /************************************************************************* * PathGetArgsAW [SHELL32.52] */ LPVOID WINAPI PathGetArgsAW(LPVOID lpszPath) { if (VERSION_OsIsUnicode()) return PathGetArgsW(lpszPath); return PathGetArgsA(lpszPath); } /************************************************************************* * PathGetDriveNumberA [SHLWAPI.@] */ int WINAPI PathGetDriveNumberA(LPCSTR lpszPath) { int chr = tolower(lpszPath[0]); TRACE ("%s\n",debugstr_a(lpszPath)); if (!lpszPath || lpszPath[1]!=':' || chr < 'a' || chr > 'z') return -1; return tolower(lpszPath[0]) - 'a' ; } /************************************************************************* * PathGetDriveNumberW [SHLWAPI.@] */ int WINAPI PathGetDriveNumberW(LPCWSTR lpszPath) { int chr = towlower(lpszPath[0]); TRACE ("%s\n",debugstr_w(lpszPath)); if (!lpszPath || lpszPath[1]!=':' || chr < 'a' || chr > 'z') return -1; return tolower(lpszPath[0]) - 'a' ; } /************************************************************************* * PathGetDriveNumber [SHELL32.57] */ int WINAPI PathGetDriveNumberAW(LPVOID lpszPath) { if (VERSION_OsIsUnicode()) return PathGetDriveNumberW(lpszPath); return PathGetDriveNumberA(lpszPath); } /************************************************************************* * PathRemoveFileSpecA [SHLWAPI.@] * * NOTES * truncates passed argument to a valid path * returns if the string was modified or not. * "\foo\xx\foo"-> "\foo\xx" * "\" -> "\" * "a:\foo" -> "a:\" */ BOOL WINAPI PathRemoveFileSpecA(LPSTR lpszPath) { LPSTR cutplace; TRACE("%s\n",lpszPath); if (!lpszPath[0]) return 0; cutplace = PathFindFileNameA(lpszPath); if (cutplace) { *cutplace='\0'; if (PathIsRootA(lpszPath)) { PathAddBackslashA(lpszPath); } else { PathRemoveBackslashA(lpszPath); } return TRUE; } return FALSE; } /************************************************************************* * PathRemoveFileSpecW [SHLWAPI.@] */ BOOL WINAPI PathRemoveFileSpecW(LPWSTR lpszPath) { LPWSTR cutplace; TRACE("%s\n",debugstr_w(lpszPath)); if (!lpszPath[0]) return 0; cutplace = PathFindFileNameW(lpszPath); if (cutplace) { *cutplace='\0'; if (PathIsRootW(lpszPath)) { PathAddBackslashW(lpszPath); } else { PathRemoveBackslashW(lpszPath); } return TRUE; } return FALSE; } /************************************************************************* * PathRemoveFileSpec [SHELL32.35] */ BOOL WINAPI PathRemoveFileSpecAW(LPVOID lpszPath) { if (VERSION_OsIsUnicode()) return PathRemoveFileSpecW(lpszPath); return PathRemoveFileSpecA(lpszPath); } /************************************************************************* * PathStripPathA [SHELLWAPI.@] * * NOTES * removes the path from the beginning of a filename */ void WINAPI PathStripPathA(LPSTR lpszPath) { LPSTR lpszFileName = PathFindFileNameA(lpszPath); TRACE("%s\n", lpszPath); if(lpszFileName) RtlMoveMemory(lpszPath, lpszFileName, strlen(lpszFileName)); } /************************************************************************* * PathStripPathW [SHELLWAPI.@] */ void WINAPI PathStripPathW(LPWSTR lpszPath) { LPWSTR lpszFileName = PathFindFileNameW(lpszPath); TRACE("%s\n", debugstr_w(lpszPath)); if(lpszFileName) RtlMoveMemory(lpszPath, lpszFileName, lstrlenW(lpszFileName)*sizeof(WCHAR)); } /************************************************************************* * PathStripPathAW [SHELL32.38] */ void WINAPI PathStripPathAW(LPVOID lpszPath) { if (VERSION_OsIsUnicode()) return PathStripPathW(lpszPath); return PathStripPathA(lpszPath); } /************************************************************************* * PathStripToRootA [SHLWAPI.@] */ BOOL WINAPI PathStripToRootA(LPSTR lpszPath) { TRACE("%s\n", lpszPath); /* X:\ */ if (lpszPath[1]==':' && lpszPath[2]=='\\') { lpszPath[3]='\0'; return TRUE; } /* "\" */ if (lpszPath[0]=='\\') { lpszPath[1]='\0'; return TRUE; } /* UNC "\\\" */ if (lpszPath[0]=='\\' && lpszPath[1]=='\\') { int foundbackslash = 0; lpszPath += 2; while (*lpszPath) { if (*lpszPath=='\\') foundbackslash++; if (foundbackslash==2) { *lpszPath = '\0'; return TRUE; } lpszPath++; } } return FALSE; } /************************************************************************* * PathStripToRootW [SHLWAPI.@] */ BOOL WINAPI PathStripToRootW(LPWSTR lpszPath) { TRACE("%s\n", debugstr_w(lpszPath)); /* X:\ */ if (lpszPath[1]==':' && lpszPath[2]=='\\') { lpszPath[3]='\0'; return TRUE; } /* "\" */ if (lpszPath[0]=='\\') { lpszPath[1]='\0'; return TRUE; } /* UNC "\\\" */ if (lpszPath[0]=='\\' && lpszPath[1]=='\\') { int foundbackslash = 0; lpszPath += 2; while (*lpszPath) { if (*lpszPath=='\\') foundbackslash++; if (foundbackslash==2) { *lpszPath = '\0'; return TRUE; } lpszPath++; } } return FALSE; } /************************************************************************* * PathStripToRootAW [SHELL32.50] */ BOOL WINAPI PathStripToRootAW(LPVOID lpszPath) { if (VERSION_OsIsUnicode()) return PathStripToRootW(lpszPath); return PathStripToRootA(lpszPath); } /************************************************************************* * PathRemoveArgsA [SHLWAPI.@] */ void WINAPI PathRemoveArgsA(LPSTR lpszPath) { LPSTR lpszArgs = PathGetArgsA(lpszPath); TRACE("%s\n", lpszPath); if (lpszArgs) *(--lpszArgs)='\0'; } /************************************************************************* * PathRemoveArgsW [SHLWAPI.@] */ void WINAPI PathRemoveArgsW(LPWSTR lpszPath) { LPWSTR lpszArgs = PathGetArgsW(lpszPath); TRACE("%s\n", debugstr_w(lpszPath)); if (lpszArgs) *(--lpszArgs)='\0'; } /************************************************************************* * PathRemoveArgsAW [SHELL32.251] */ void WINAPI PathRemoveArgsAW(LPVOID lpszPath) { if (VERSION_OsIsUnicode()) return PathRemoveArgsW(lpszPath); return PathRemoveArgsA(lpszPath); } /************************************************************************* * PathRemoveExtensionA [SHLWAPI.@] */ void WINAPI PathRemoveExtensionA(LPSTR lpszPath) { LPSTR lpszExtension = PathFindExtensionA(lpszPath); TRACE("%s\n", lpszPath); if (lpszExtension) *lpszExtension='\0'; } /************************************************************************* * PathRemoveExtensionW [SHLWAPI.@] */ void WINAPI PathRemoveExtensionW(LPWSTR lpszPath) { LPWSTR lpszExtension = PathFindExtensionW(lpszPath); TRACE("%s\n", debugstr_w(lpszPath)); if (lpszExtension) *lpszExtension='\0'; } /************************************************************************* * PathRemoveExtensionAW [SHELL32.250] */ void WINAPI PathRemoveExtensionAW(LPVOID lpszPath) { if (VERSION_OsIsUnicode()) return PathRemoveExtensionW(lpszPath); return PathRemoveExtensionA(lpszPath); } /************************************************************************* * PathRemoveBackslashA [SHLWAPI.@] * * If the path ends in a backslash it is replaced by a NULL * and the address of the NULL is returned * Otherwise * the address of the last character is returned. * */ LPSTR WINAPI PathRemoveBackslashA( LPSTR lpszPath ) { LPSTR p = lpszPath; while (*lpszPath) p = lpszPath++; if ( *p == (CHAR)'\\') *p = (CHAR)'\0'; return p; } /************************************************************************* * PathRemoveBackslashW [SHLWAPI.@] */ LPWSTR WINAPI PathRemoveBackslashW( LPWSTR lpszPath ) { LPWSTR p = lpszPath; while (*lpszPath); p = lpszPath++; if ( *p == (WCHAR)'\\') *p = (WCHAR)'\0'; return p; } /* Path Manipulations */ /************************************************************************* * PathGetShortPathA [internal] */ LPSTR WINAPI PathGetShortPathA(LPSTR lpszPath) { FIXME("%s stub\n", lpszPath); return NULL; } /************************************************************************* * PathGetShortPathW [internal] */ LPWSTR WINAPI PathGetShortPathW(LPWSTR lpszPath) { FIXME("%s stub\n", debugstr_w(lpszPath)); return NULL; } /************************************************************************* * PathGetShortPathAW [SHELL32.92] */ LPVOID WINAPI PathGetShortPathAW(LPVOID lpszPath) { if(VERSION_OsIsUnicode()) return PathGetShortPathW(lpszPath); return PathGetShortPathA(lpszPath); } /************************************************************************* * PathRemoveBlanksA [SHLWAPI.@] * * NOTES * remove spaces from beginning and end of passed string */ LPSTR WINAPI PathRemoveBlanksA(LPSTR str) { LPSTR x = str; TRACE("%s\n",str); while (*x==' ') x++; if (x!=str) strcpy(str,x); if (!*str) return str; x=str+strlen(str)-1; while (*x==' ') x--; if (*x==' ') *x='\0'; return x; } /************************************************************************* * PathRemoveBlanksW [SHLWAPI.@] */ LPWSTR WINAPI PathRemoveBlanksW(LPWSTR str) { LPWSTR x = str; TRACE("%s\n",debugstr_w(str)); while (*x==' ') x++; if (x!=str) CRTDLL_wcscpy(str,x); if (!*str) return str; x=str+CRTDLL_wcslen(str)-1; while (*x==' ') x--; if (*x==' ') *x='\0'; return x; } /************************************************************************* * PathRemoveBlanksAW [SHELL32.33] */ LPVOID WINAPI PathRemoveBlanksAW(LPVOID str) { if(VERSION_OsIsUnicode()) return PathRemoveBlanksW(str); return PathRemoveBlanksA(str); } /************************************************************************* * PathQuoteSpacesA [SHLWAPI.@] * * NOTES */ LPSTR WINAPI PathQuoteSpacesA(LPCSTR lpszPath) { FIXME("%s\n",lpszPath); return 0; } /************************************************************************* * PathQuoteSpacesW [SHLWAPI.@] */ LPWSTR WINAPI PathQuoteSpacesW(LPCWSTR lpszPath) { FIXME("%s\n",debugstr_w(lpszPath)); return 0; } /************************************************************************* * PathQuoteSpacesAW [SHELL32.55] */ LPVOID WINAPI PathQuoteSpacesAW (LPCVOID lpszPath) { if(VERSION_OsIsUnicode()) return PathQuoteSpacesW(lpszPath); return PathQuoteSpacesA(lpszPath); } /************************************************************************* * PathUnquoteSpacesA [SHLWAPI.@] * * NOTES * unquote string (remove ") */ VOID WINAPI PathUnquoteSpacesA(LPSTR str) { DWORD len = lstrlenA(str); TRACE("%s\n",str); if (*str!='"') return; if (str[len-1]!='"') return; str[len-1]='\0'; lstrcpyA(str,str+1); return; } /************************************************************************* * PathUnquoteSpacesW [SHLWAPI.@] */ VOID WINAPI PathUnquoteSpacesW(LPWSTR str) { DWORD len = CRTDLL_wcslen(str); TRACE("%s\n",debugstr_w(str)); if (*str!='"') return; if (str[len-1]!='"') return; str[len-1]='\0'; CRTDLL_wcscpy(str,str+1); return; } /************************************************************************* * PathUnquoteSpacesAW [SHELL32.56] */ VOID WINAPI PathUnquoteSpacesAW(LPVOID str) { if(VERSION_OsIsUnicode()) PathUnquoteSpacesW(str); else PathUnquoteSpacesA(str); } /************************************************************************* * PathParseIconLocationA [SHLWAPI.@] */ int WINAPI PathParseIconLocationA(LPSTR lpszPath) { LPSTR lpstrComma = strchr(lpszPath, ','); FIXME("%s stub\n", debugstr_a(lpszPath)); if (lpstrComma && lpstrComma[1]) { lpstrComma[0]='\0'; /* return atoi(&lpstrComma[1]); FIXME */ } return 0; } /************************************************************************* * PathParseIconLocationW [SHLWAPI.@] */ int WINAPI PathParseIconLocationW(LPWSTR lpszPath) { LPWSTR lpstrComma = CRTDLL_wcschr(lpszPath, ','); FIXME("%s stub\n", debugstr_w(lpszPath)); if (lpstrComma && lpstrComma[1]) { lpstrComma[0]='\0'; /* return _wtoi(&lpstrComma[1]); FIXME */ } return 0; } /************************************************************************* * PathParseIconLocationAW [SHELL32.249] */ int WINAPI PathParseIconLocationAW (LPVOID lpszPath) { if(VERSION_OsIsUnicode()) return PathParseIconLocationW(lpszPath); return PathParseIconLocationA(lpszPath); } /* Path Testing */ /************************************************************************* * PathIsUNCA [SHLWAPI.@] * * NOTES * PathIsUNC(char*path); */ BOOL WINAPI PathIsUNCA(LPCSTR lpszPath) { TRACE("%s\n",lpszPath); return (lpszPath && (lpszPath[0]=='\\') && (lpszPath[1]=='\\')); } /************************************************************************* * PathIsUNCW [SHLWAPI.@] */ BOOL WINAPI PathIsUNCW(LPCWSTR lpszPath) { TRACE("%s\n",debugstr_w(lpszPath)); return (lpszPath && (lpszPath[0]=='\\') && (lpszPath[1]=='\\')); } /************************************************************************* * PathIsUNCAW [SHELL32.39] */ BOOL WINAPI PathIsUNCAW (LPCVOID lpszPath) { if (VERSION_OsIsUnicode()) return PathIsUNCW( lpszPath ); return PathIsUNCA( lpszPath ); } /************************************************************************* * PathIsRelativeA [SHLWAPI.@] */ BOOL WINAPI PathIsRelativeA (LPCSTR lpszPath) { TRACE("lpszPath=%s\n",lpszPath); return (lpszPath && (lpszPath[0]!='\\' && lpszPath[1]!=':')); } /************************************************************************* * PathIsRelativeW [SHLWAPI.@] */ BOOL WINAPI PathIsRelativeW (LPCWSTR lpszPath) { TRACE("lpszPath=%s\n",debugstr_w(lpszPath)); return (lpszPath && (lpszPath[0]!='\\' && lpszPath[1]!=':')); } /************************************************************************* * PathIsRelativeAW [SHELL32.40] */ BOOL WINAPI PathIsRelativeAW (LPCVOID lpszPath) { if (VERSION_OsIsUnicode()) return PathIsRelativeW( lpszPath ); return PathIsRelativeA( lpszPath ); } /************************************************************************* * PathIsRootA [SHLWAPI.@] * * notes * TRUE if the path points to a root directory */ BOOL WINAPI PathIsRootA(LPCSTR lpszPath) { TRACE("%s\n",lpszPath); /* X:\ */ if (lpszPath[1]==':' && lpszPath[2]=='\\' && lpszPath[3]=='\0') return TRUE; /* "\" */ if (lpszPath[0]=='\\' && lpszPath[1]=='\0') return TRUE; /* UNC "\\\" */ if (lpszPath[0]=='\\' && lpszPath[1]=='\\') { int foundbackslash = 0; lpszPath += 2; while (*lpszPath) { if (*(lpszPath++)=='\\') foundbackslash++; } if (foundbackslash==1) return TRUE; } return FALSE; } /************************************************************************* * PathIsRootW [SHLWAPI.@] */ BOOL WINAPI PathIsRootW(LPCWSTR lpszPath) { TRACE("%s\n",debugstr_w(lpszPath)); /* X:\ */ if (lpszPath[1]==':' && lpszPath[2]=='\\' && lpszPath[3]=='\0') return TRUE; /* "\" */ if (lpszPath[0]=='\\' && lpszPath[1]=='\0') return TRUE; /* UNC "\\\" */ if (lpszPath[0]=='\\' && lpszPath[1]=='\\') { int foundbackslash = 0; lpszPath += 2; while (*lpszPath) { if (*(lpszPath++)=='\\') foundbackslash++; } if (foundbackslash==1) return TRUE; } return FALSE; } /************************************************************************* * PathIsRootAW [SHELL32.29] */ BOOL WINAPI PathIsRootAW(LPCVOID lpszPath) { if (VERSION_OsIsUnicode()) return PathIsRootW(lpszPath); return PathIsRootA(lpszPath); } /************************************************************************* * PathIsExeA [internal] */ BOOL WINAPI PathIsExeA (LPCSTR lpszPath) { LPCSTR lpszExtension = PathGetExtensionA(lpszPath); int i = 0; static char * lpszExtensions[6] = {"exe", "com", "pid", "cmd", "bat", NULL }; TRACE("path=%s\n",lpszPath); for(i=0; lpszExtensions[i]; i++) if (!strcasecmp(lpszExtension,lpszExtensions[i])) return TRUE; return FALSE; } /************************************************************************* * PathIsExeW [internal] */ BOOL WINAPI PathIsExeW (LPCWSTR lpszPath) { LPCWSTR lpszExtension = PathGetExtensionW(lpszPath); int i = 0; static WCHAR lpszExtensions[6][4] = {{'e','x','e','\0'}, {'c','o','m','\0'}, {'p','i','d','\0'}, {'c','m','d','\0'}, {'b','a','t','\0'}, {'\0'} }; TRACE("path=%s\n",debugstr_w(lpszPath)); for(i=0; lpszExtensions[i]; i++) if (!CRTDLL__wcsicmp(lpszExtension,lpszExtensions[i])) return TRUE; return FALSE; } /************************************************************************* * PathIsExeAW [SHELL32.43] */ BOOL WINAPI PathIsExeAW (LPCVOID path) { if (VERSION_OsIsUnicode()) return PathIsExeW (path); return PathIsExeA(path); } /************************************************************************* * PathIsDirectoryA [SHLWAPI.@] */ BOOL WINAPI PathIsDirectoryA(LPCSTR lpszPath) { HANDLE hFile; WIN32_FIND_DATAA stffile; TRACE("%s\n", debugstr_a(lpszPath)); hFile = FindFirstFileA(lpszPath, &stffile); if ( hFile != INVALID_HANDLE_VALUE ) { FindClose (hFile); return (stffile.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY); } return FALSE; } /************************************************************************* * PathIsDirectoryW [SHLWAPI.@] */ BOOL WINAPI PathIsDirectoryW(LPCWSTR lpszPath) { HANDLE hFile; WIN32_FIND_DATAW stffile; TRACE("%s\n", debugstr_w(lpszPath)); hFile = FindFirstFileW(lpszPath, &stffile); if ( hFile != INVALID_HANDLE_VALUE ) { FindClose (hFile); return (stffile.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY); } return FALSE; } /************************************************************************* * PathIsDirectoryAW [SHELL32.159] */ BOOL WINAPI PathIsDirectoryAW (LPCVOID lpszPath) { if (VERSION_OsIsUnicode()) return PathIsDirectoryW (lpszPath); return PathIsDirectoryA (lpszPath); } /************************************************************************* * PathFileExistsA [SHLWAPI.@] * * NOTES * file_exists(char *fn); */ BOOL WINAPI PathFileExistsA(LPCSTR lpszPath) { TRACE("%s\n",lpszPath); return (GetFileAttributesA(lpszPath)!=-1); } /************************************************************************* * PathFileExistsW [SHLWAPI.@] */ BOOL WINAPI PathFileExistsW(LPCWSTR lpszPath) { TRACE("%s\n",debugstr_w(lpszPath)); return (GetFileAttributesW(lpszPath)!=-1); } /************************************************************************* * PathFileExistsAW [SHELL32.45] */ BOOL WINAPI PathFileExistsAW (LPCVOID lpszPath) { if (VERSION_OsIsUnicode()) return PathFileExistsW (lpszPath); return PathFileExistsA (lpszPath); } /************************************************************************* * PathMatchSingleMaskA [internal] * * NOTES * internal (used by PathMatchSpec) */ static BOOL PathMatchSingleMaskA(LPCSTR name, LPCSTR mask) { while (*name && *mask && *mask!=';') { if (*mask=='*') { do { if (PathMatchSingleMaskA(name,mask+1)) return 1; /* try substrings */ } while (*name++); return 0; } if (toupper(*mask)!=toupper(*name) && *mask!='?') return 0; name++; mask++; } if (!*name) { while (*mask=='*') mask++; if (!*mask || *mask==';') return 1; } return 0; } /************************************************************************* * PathMatchSingleMaskW [internal] */ static BOOL PathMatchSingleMaskW(LPCWSTR name, LPCWSTR mask) { while (*name && *mask && *mask!=';') { if (*mask=='*') { do { if (PathMatchSingleMaskW(name,mask+1)) return 1; /* try substrings */ } while (*name++); return 0; } if (towupper(*mask)!=towupper(*name) && *mask!='?') return 0; name++; mask++; } if (!*name) { while (*mask=='*') mask++; if (!*mask || *mask==';') return 1; } return 0; } /************************************************************************* * PathMatchSpecA [SHLWAPI.@] * * NOTES * used from COMDLG32 */ BOOL WINAPI PathMatchSpecA(LPCSTR name, LPCSTR mask) { TRACE("%s %s\n",name,mask); if (!lstrcmpA( mask, "*.*" )) return 1; /* we don't require a period */ while (*mask) { if (PathMatchSingleMaskA(name,mask)) return 1; /* helper function */ while (*mask && *mask!=';') mask++; if (*mask==';') { mask++; while (*mask==' ') mask++; /* masks may be separated by "; " */ } } return 0; } /************************************************************************* * PathMatchSpecW [SHLWAPI.@] */ BOOL WINAPI PathMatchSpecW(LPCWSTR name, LPCWSTR mask) { WCHAR stemp[4]; TRACE("%s %s\n",debugstr_w(name),debugstr_w(mask)); lstrcpyAtoW(stemp,"*.*"); if (!lstrcmpW( mask, stemp )) return 1; /* we don't require a period */ while (*mask) { if (PathMatchSingleMaskW(name,mask)) return 1; /* helper function */ while (*mask && *mask!=';') mask++; if (*mask==';') { mask++; while (*mask==' ') mask++; /* masks may be separated by "; " */ } } return 0; } /************************************************************************* * PathMatchSpecAW [SHELL32.46] */ BOOL WINAPI PathMatchSpecAW(LPVOID name, LPVOID mask) { if (VERSION_OsIsUnicode()) return PathMatchSpecW( name, mask ); return PathMatchSpecA( name, mask ); } /************************************************************************* * PathIsSameRootA [SHLWAPI.@] * * FIXME * what to do with "\path" ?? */ BOOL WINAPI PathIsSameRootA(LPCSTR lpszPath1, LPCSTR lpszPath2) { TRACE("%s %s\n", lpszPath1, lpszPath2); if (PathIsRelativeA(lpszPath1) || PathIsRelativeA(lpszPath2)) return FALSE; /* usual path */ if ( toupper(lpszPath1[0])==toupper(lpszPath2[0]) && lpszPath1[1]==':' && lpszPath2[1]==':' && lpszPath1[2]=='\\' && lpszPath2[2]=='\\') return TRUE; /* UNC */ if (lpszPath1[0]=='\\' && lpszPath2[0]=='\\' && lpszPath1[1]=='\\' && lpszPath2[1]=='\\') { int pos=2, bsfound=0; while (lpszPath1[pos] && lpszPath2[pos] && (lpszPath1[pos] == lpszPath2[pos])) { if (lpszPath1[pos]=='\\') bsfound++; if (bsfound == 2) return TRUE; pos++; } return (lpszPath1[pos] == lpszPath2[pos]); } return FALSE; } /************************************************************************* * PathIsSameRootW [SHLWAPI.@] */ BOOL WINAPI PathIsSameRootW(LPCWSTR lpszPath1, LPCWSTR lpszPath2) { TRACE("%s %s\n", debugstr_w(lpszPath1), debugstr_w(lpszPath2)); if (PathIsRelativeW(lpszPath1) || PathIsRelativeW(lpszPath2)) return FALSE; /* usual path */ if ( towupper(lpszPath1[0])==towupper(lpszPath2[0]) && lpszPath1[1]==':' && lpszPath2[1]==':' && lpszPath1[2]=='\\' && lpszPath2[2]=='\\') return TRUE; /* UNC */ if (lpszPath1[0]=='\\' && lpszPath2[0]=='\\' && lpszPath1[1]=='\\' && lpszPath2[1]=='\\') { int pos=2, bsfound=0; while (lpszPath1[pos] && lpszPath2[pos] && (lpszPath1[pos] == lpszPath2[pos])) { if (lpszPath1[pos]=='\\') bsfound++; if (bsfound == 2) return TRUE; pos++; } return (lpszPath1[pos] == lpszPath2[pos]); } return FALSE; } /************************************************************************* * PathIsSameRootAW [SHELL32.650] */ BOOL WINAPI PathIsSameRootAW(LPCVOID lpszPath1, LPCVOID lpszPath2) { if (VERSION_OsIsUnicode()) return PathIsSameRootW(lpszPath1, lpszPath2); return PathIsSameRootA(lpszPath1, lpszPath2); } /************************************************************************* * PathIsURLA */ BOOL WINAPI PathIsURLA(LPCSTR lpstrPath) { LPSTR lpstrRes; int iSize, i=0; static LPSTR SupportedProtocol[] = {"http","https","ftp","gopher","file","mailto",NULL}; if(!lpstrPath) return FALSE; /* get protocol */ lpstrRes = strchr(lpstrPath,':'); if(!lpstrRes) return FALSE; iSize = lpstrRes - lpstrPath; while(SupportedProtocol[i]) { if (iSize == strlen(SupportedProtocol[i])) if(!strncasecmp(lpstrPath, SupportedProtocol[i], iSize)); return TRUE; i++; } return FALSE; } /************************************************************************* * PathIsURLW */ BOOL WINAPI PathIsURLW(LPCWSTR lpstrPath) { LPWSTR lpstrRes; int iSize, i=0; static WCHAR SupportedProtocol[7][7] = {{'h','t','t','p','\0'},{'h','t','t','p','s','\0'},{'f','t','p','\0'}, {'g','o','p','h','e','r','\0'},{'f','i','l','e','\0'}, {'m','a','i','l','t','o','\0'},{0}}; if(!lpstrPath) return FALSE; /* get protocol */ lpstrRes = CRTDLL_wcschr(lpstrPath,':'); if(!lpstrRes) return FALSE; iSize = lpstrRes - lpstrPath; while(SupportedProtocol[i]) { if (iSize == CRTDLL_wcslen(SupportedProtocol[i])) if(!CRTDLL__wcsnicmp(lpstrPath, SupportedProtocol[i], iSize)); return TRUE; i++; } return FALSE; } /************************************************************************* * IsLFNDriveA [SHELL32.119] * * NOTES * exported by ordinal Name */ BOOL WINAPI IsLFNDriveA(LPCSTR lpszPath) { DWORD fnlen; if (!GetVolumeInformationA(lpszPath,NULL,0,NULL,&fnlen,NULL,NULL,0)) return FALSE; return fnlen>12; } /* Creating Something Unique */ /************************************************************************* * PathMakeUniqueNameA [internal] */ BOOL WINAPI PathMakeUniqueNameA( LPSTR lpszBuffer, DWORD dwBuffSize, LPCSTR lpszShortName, LPCSTR lpszLongName, LPCSTR lpszPathName) { FIXME("%p %lu %s %s %s stub\n", lpszBuffer, dwBuffSize, debugstr_a(lpszShortName), debugstr_a(lpszLongName), debugstr_a(lpszPathName)); return TRUE; } /************************************************************************* * PathMakeUniqueNameW [internal] */ BOOL WINAPI PathMakeUniqueNameW( LPWSTR lpszBuffer, DWORD dwBuffSize, LPCWSTR lpszShortName, LPCWSTR lpszLongName, LPCWSTR lpszPathName) { FIXME("%p %lu %s %s %s stub\n", lpszBuffer, dwBuffSize, debugstr_w(lpszShortName), debugstr_w(lpszLongName), debugstr_w(lpszPathName)); return TRUE; } /************************************************************************* * PathMakeUniqueNameAW [SHELL32.47] */ BOOL WINAPI PathMakeUniqueNameAW( LPVOID lpszBuffer, DWORD dwBuffSize, LPCVOID lpszShortName, LPCVOID lpszLongName, LPCVOID lpszPathName) { if (VERSION_OsIsUnicode()) return PathMakeUniqueNameW(lpszBuffer,dwBuffSize, lpszShortName,lpszLongName,lpszPathName); return PathMakeUniqueNameA(lpszBuffer,dwBuffSize, lpszShortName,lpszLongName,lpszPathName); } /************************************************************************* * PathYetAnotherMakeUniqueNameA [SHELL32.75] * * NOTES * exported by ordinal */ BOOL WINAPI PathYetAnotherMakeUniqueNameA( LPSTR lpszBuffer, LPCSTR lpszPathName, LPCSTR lpszShortName, LPCSTR lpszLongName) { FIXME("(%p,%p, %p ,%p):stub.\n", lpszBuffer, lpszPathName, lpszShortName, lpszLongName); return TRUE; } /* cleaning and resolving paths */ /************************************************************************* * PathFindOnPathA [SHELL32.145] */ BOOL WINAPI PathFindOnPathA(LPSTR sFile, LPCSTR sOtherDirs) { FIXME("%s %s\n",sFile, sOtherDirs); return FALSE; } /************************************************************************* * PathFindOnPathW [SHELL32] */ BOOL WINAPI PathFindOnPathW(LPWSTR sFile, LPCWSTR sOtherDirs) { FIXME("%s %s\n",debugstr_w(sFile), debugstr_w(sOtherDirs)); return FALSE; } /************************************************************************* * PathFindOnPathAW [SHELL32] */ BOOL WINAPI PathFindOnPathAW(LPVOID sFile, LPCVOID sOtherDirs) { if (VERSION_OsIsUnicode()) return PathFindOnPathW(sFile, sOtherDirs); return PathFindOnPathA(sFile, sOtherDirs); } /************************************************************************* * PathCleanupSpecA [SHELL32.171] */ DWORD WINAPI PathCleanupSpecA(LPSTR x, LPSTR y) { FIXME("(%p %s, %p %s) stub\n",x,debugstr_a(x),y,debugstr_a(y)); return TRUE; } /************************************************************************* * PathCleanupSpecA [SHELL32] */ DWORD WINAPI PathCleanupSpecW(LPWSTR x, LPWSTR y) { FIXME("(%p %s, %p %s) stub\n",x,debugstr_w(x),y,debugstr_w(y)); return TRUE; } /************************************************************************* * PathCleanupSpecAW [SHELL32] */ DWORD WINAPI PathCleanupSpecAW (LPVOID x, LPVOID y) { if (VERSION_OsIsUnicode()) return PathCleanupSpecW(x,y); return PathCleanupSpecA(x,y); } /************************************************************************* * PathQualifyA [SHELL32] */ BOOL WINAPI PathQualifyA(LPCSTR pszPath) { FIXME("%s\n",pszPath); return 0; } /************************************************************************* * PathQualifyW [SHELL32] */ BOOL WINAPI PathQualifyW(LPCWSTR pszPath) { FIXME("%s\n",debugstr_w(pszPath)); return 0; } /************************************************************************* * PathQualifyAW [SHELL32] */ BOOL WINAPI PathQualifyAW(LPCVOID pszPath) { if (VERSION_OsIsUnicode()) return PathQualifyW(pszPath); return PathQualifyA(pszPath); } /************************************************************************* * PathResolveA [SHELL32.51] */ BOOL WINAPI PathResolveA( LPSTR lpszPath, LPCSTR *alpszPaths, DWORD dwFlags) { FIXME("(%s,%p,0x%08lx),stub!\n", lpszPath, *alpszPaths, dwFlags); return 0; } /************************************************************************* * PathResolveW [SHELL32] */ BOOL WINAPI PathResolveW( LPWSTR lpszPath, LPCWSTR *alpszPaths, DWORD dwFlags) { FIXME("(%s,%p,0x%08lx),stub!\n", debugstr_w(lpszPath), debugstr_w(*alpszPaths), dwFlags); return 0; } /************************************************************************* * PathResolveAW [SHELL32] */ BOOL WINAPI PathResolveAW( LPVOID lpszPath, LPCVOID *alpszPaths, DWORD dwFlags) { if (VERSION_OsIsUnicode()) return PathResolveW(lpszPath, (LPCWSTR*)alpszPaths, dwFlags); return PathResolveA(lpszPath, (LPCSTR*)alpszPaths, dwFlags); } /************************************************************************* * PathProcessCommandA [SHELL32.653] */ HRESULT WINAPI PathProcessCommandA ( LPCSTR lpszPath, LPSTR lpszBuff, DWORD dwBuffSize, DWORD dwFlags) { FIXME("%s %p 0x%04lx 0x%04lx stub\n", lpszPath, lpszBuff, dwBuffSize, dwFlags); lstrcpyA(lpszBuff, lpszPath); return 0; } /************************************************************************* * PathProcessCommandW */ HRESULT WINAPI PathProcessCommandW ( LPCWSTR lpszPath, LPWSTR lpszBuff, DWORD dwBuffSize, DWORD dwFlags) { FIXME("(%s, %p, 0x%04lx, 0x%04lx) stub\n", debugstr_w(lpszPath), lpszBuff, dwBuffSize, dwFlags); lstrcpyW(lpszBuff, lpszPath); return 0; } /************************************************************************* * PathProcessCommandAW */ HRESULT WINAPI PathProcessCommandAW ( LPCVOID lpszPath, LPVOID lpszBuff, DWORD dwBuffSize, DWORD dwFlags) { if (VERSION_OsIsUnicode()) return PathProcessCommandW(lpszPath, lpszBuff, dwBuffSize, dwFlags); return PathProcessCommandA(lpszPath, lpszBuff, dwBuffSize, dwFlags); } /* special */ /************************************************************************* * PathSetDlgItemPathA * * NOTES * use PathCompactPath to make sure, the path fits into the control */ BOOL WINAPI PathSetDlgItemPathA(HWND hDlg, int id, LPCSTR pszPath) { TRACE("%x %x %s\n",hDlg, id, pszPath); return SetDlgItemTextA(hDlg, id, pszPath); } /************************************************************************* * PathSetDlgItemPathW */ BOOL WINAPI PathSetDlgItemPathW(HWND hDlg, int id, LPCWSTR pszPath) { TRACE("%x %x %s\n",hDlg, id, debugstr_w(pszPath)); return SetDlgItemTextW(hDlg, id, pszPath); } /************************************************************************* * PathSetDlgItemPathAW */ BOOL WINAPI PathSetDlgItemPathAW(HWND hDlg, int id, LPCVOID pszPath) { if (VERSION_OsIsUnicode()) return PathSetDlgItemPathW(hDlg, id, pszPath); return PathSetDlgItemPathA(hDlg, id, pszPath); } /************************************************************************* * SHGetSpecialFolderPathA [SHELL32.175] * * converts csidl to path * */ static char * szSHFolders = "Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Shell Folders"; static char * szSHUserFolders = "Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\User Shell Folders"; BOOL WINAPI SHGetSpecialFolderPathA ( HWND hwndOwner, LPSTR szPath, DWORD csidl, BOOL bCreate) { CHAR szValueName[MAX_PATH], szDefaultPath[MAX_PATH]; HKEY hRootKey, hKey; BOOL bRelative = TRUE; DWORD dwType, dwDisp, dwPathLen = MAX_PATH; TRACE("0x%04x,%p,csidl=%lu,0x%04x\n", hwndOwner,szPath,csidl,bCreate); /* build default values */ switch(csidl) { case CSIDL_APPDATA: hRootKey = HKEY_CURRENT_USER; strcpy (szValueName, "AppData"); strcpy (szDefaultPath, "AppData"); break; case CSIDL_COOKIES: hRootKey = HKEY_CURRENT_USER; strcpy (szValueName, "Cookies"); strcpy(szDefaultPath, "Cookies"); break; case CSIDL_DESKTOPDIRECTORY: hRootKey = HKEY_CURRENT_USER; strcpy(szValueName, "Desktop"); strcpy(szDefaultPath, "Desktop"); break; case CSIDL_COMMON_DESKTOPDIRECTORY: hRootKey = HKEY_LOCAL_MACHINE; strcpy(szValueName, "Common Desktop"); strcpy(szDefaultPath, "Desktop"); break; case CSIDL_FAVORITES: hRootKey = HKEY_CURRENT_USER; strcpy(szValueName, "Favorites"); strcpy(szDefaultPath, "Favorites"); break; case CSIDL_FONTS: hRootKey = HKEY_CURRENT_USER; strcpy(szValueName, "Fonts"); strcpy(szDefaultPath, "Fonts"); break; case CSIDL_HISTORY: hRootKey = HKEY_CURRENT_USER; strcpy(szValueName, "History"); strcpy(szDefaultPath, "History"); break; case CSIDL_NETHOOD: hRootKey = HKEY_CURRENT_USER; strcpy(szValueName, "NetHood"); strcpy(szDefaultPath, "NetHood"); break; case CSIDL_INTERNET_CACHE: hRootKey = HKEY_CURRENT_USER; strcpy(szValueName, "Cache"); strcpy(szDefaultPath, "Temporary Internet Files"); break; case CSIDL_PERSONAL: hRootKey = HKEY_CURRENT_USER; strcpy(szValueName, "Personal"); strcpy(szDefaultPath, "My Own Files"); bRelative = FALSE; break; case CSIDL_PRINTHOOD: hRootKey = HKEY_CURRENT_USER; strcpy(szValueName, "PrintHood"); strcpy(szDefaultPath, "PrintHood"); break; case CSIDL_PROGRAMS: hRootKey = HKEY_CURRENT_USER; strcpy(szValueName, "Programs"); strcpy(szDefaultPath, "StartMenu\\Programs"); break; case CSIDL_COMMON_PROGRAMS: hRootKey = HKEY_LOCAL_MACHINE; strcpy(szValueName, "Common Programs"); strcpy(szDefaultPath, ""); break; case CSIDL_RECENT: hRootKey = HKEY_CURRENT_USER; strcpy(szValueName, "Recent"); strcpy(szDefaultPath, "Recent"); break; case CSIDL_SENDTO: hRootKey = HKEY_CURRENT_USER; strcpy(szValueName, "SendTo"); strcpy(szDefaultPath, "SendTo"); break; case CSIDL_STARTMENU: hRootKey = HKEY_CURRENT_USER; strcpy(szValueName, "StartMenu"); strcpy(szDefaultPath, "StartMenu"); break; case CSIDL_COMMON_STARTMENU: hRootKey = HKEY_LOCAL_MACHINE; strcpy(szValueName, "Common StartMenu"); strcpy(szDefaultPath, "StartMenu"); break; case CSIDL_STARTUP: hRootKey = HKEY_CURRENT_USER; strcpy(szValueName, "Startup"); strcpy(szDefaultPath, "StartMenu\\Programs\\Startup"); break; case CSIDL_COMMON_STARTUP: hRootKey = HKEY_LOCAL_MACHINE; strcpy(szValueName, "Common Startup"); strcpy(szDefaultPath, "StartMenu\\Programs\\Startup"); break; case CSIDL_TEMPLATES: hRootKey = HKEY_CURRENT_USER; strcpy(szValueName, "Templates"); strcpy(szDefaultPath, "ShellNew"); break; default: ERR("folder unknown or not allowed\n"); return FALSE; } /* user shell folders */ if (RegCreateKeyExA(hRootKey,szSHUserFolders,0,NULL,0,KEY_ALL_ACCESS,NULL,&hKey,&dwDisp)) return FALSE; if (RegQueryValueExA(hKey,szValueName,NULL,&dwType,(LPBYTE)szPath,&dwPathLen)) { RegCloseKey(hKey); /* shell folders */ if (RegCreateKeyExA(hRootKey,szSHFolders,0,NULL,0,KEY_ALL_ACCESS,NULL,&hKey,&dwDisp)) return FALSE; if (RegQueryValueExA(hKey,szValueName,NULL,&dwType,(LPBYTE)szPath,&dwPathLen)) { /* value not existing */ if (bRelative) { GetWindowsDirectoryA(szPath, MAX_PATH); PathAddBackslashA(szPath); strcat(szPath, szDefaultPath); } else { strcpy(szPath, "C:\\"); /* fixme ??? */ strcat(szPath, szDefaultPath); } RegSetValueExA(hKey,szValueName,0,REG_SZ,(LPBYTE)szPath,strlen(szPath)+1); } } RegCloseKey(hKey); if (bCreate && CreateDirectoryA(szPath,NULL)) { MESSAGE("Created not existing system directory '%s'\n", szPath); } return TRUE; } /************************************************************************* * SHGetSpecialFolderPathW */ BOOL WINAPI SHGetSpecialFolderPathW ( HWND hwndOwner, LPWSTR szPath, DWORD csidl, BOOL bCreate) { char szTemp[MAX_PATH]; if (SHGetSpecialFolderPathA(hwndOwner, szTemp, csidl, bCreate)) { lstrcpynAtoW(szPath, szTemp, MAX_PATH); } TRACE("0x%04x,%p,csidl=%lu,0x%04x\n", hwndOwner,szPath,csidl,bCreate); return TRUE; } /************************************************************************* * SHGetSpecialFolderPathAW */ BOOL WINAPI SHGetSpecialFolderPathAW ( HWND hwndOwner, LPVOID szPath, DWORD csidl, BOOL bCreate) { if (VERSION_OsIsUnicode()) return SHGetSpecialFolderPathW (hwndOwner, szPath, csidl, bCreate); return SHGetSpecialFolderPathA (hwndOwner, szPath, csidl, bCreate); } /************************************************************************* * PathCanonicalizeA * * FIXME * returnvalue */ BOOL WINAPI PathCanonicalizeA(LPSTR pszBuf, LPCSTR pszPath) { int OffsetMin = 0, OffsetSrc = 0, OffsetDst = 0, LenSrc = strlen(pszPath); BOOL bModifyed = FALSE; TRACE("%p %s\n", pszBuf, pszPath); pszBuf[OffsetDst]='\0'; /* keep the root of the path */ if( LenSrc && (pszPath[OffsetSrc]=='\\')) { pszBuf[OffsetDst++] = pszPath[OffsetSrc++]; OffsetMin++; LenSrc--; } else if ( (LenSrc >= 2) && (pszPath[OffsetSrc+1] == ':')) { pszBuf[OffsetDst++] = pszPath[OffsetSrc++]; OffsetMin++; LenSrc--; pszBuf[OffsetDst++] = pszPath[OffsetSrc++]; OffsetMin++; LenSrc--; if (LenSrc && (pszPath[OffsetSrc] == '\\')) { pszBuf[OffsetDst++] = pszPath[OffsetSrc++]; OffsetMin++; LenSrc--; if (LenSrc == 1 && pszPath[OffsetSrc]=='.') { /* C:\. */ OffsetSrc++; LenSrc--; bModifyed = TRUE; } else if (LenSrc == 2 && pszPath[OffsetSrc]=='.' && pszPath[OffsetSrc+1]=='.') { /* C:\.. */ OffsetSrc+=2; LenSrc-=2; bModifyed = TRUE; } } } /* ".\" at the beginning of the path */ if (LenSrc >= 2 && pszPath[OffsetSrc]=='.' && pszPath[OffsetSrc+1]=='\\') { OffsetSrc+=2; LenSrc-=2; bModifyed = TRUE; } while ( LenSrc ) { if((LenSrc>=3) && (pszPath[OffsetSrc]=='\\') && (pszPath[OffsetSrc+1]=='.') && (pszPath[OffsetSrc+2]=='.')) { /* "\.." found, go one deeper */ while((OffsetDst > OffsetMin) && (pszBuf[OffsetDst]!='\\')) OffsetDst--; OffsetSrc += 3; LenSrc -= 3; bModifyed = TRUE; if(OffsetDst == OffsetMin && pszPath[OffsetSrc]=='\\') OffsetSrc++; pszBuf[OffsetDst] = '\0'; /* important for \..\.. */ } else if(LenSrc>=2 && pszPath[OffsetSrc]=='\\' && pszPath[OffsetSrc+1]=='.' ) { /* "\." found, skip it */ OffsetSrc += 2; LenSrc-=2; bModifyed = TRUE; } else { pszBuf[OffsetDst++] = pszPath[OffsetSrc++]; LenSrc--; } } pszBuf[OffsetDst] = '\0'; TRACE("-- %s %u\n", pszBuf, bModifyed); return bModifyed; } /************************************************************************* * PathCanonicalizeW * * FIXME * returnvalue */ BOOL WINAPI PathCanonicalizeW(LPWSTR pszBuf, LPCWSTR pszPath) { int OffsetMin = 0, OffsetSrc = 0, OffsetDst = 0, LenSrc = lstrlenW(pszPath); BOOL bModifyed = FALSE; TRACE("%p %s\n", pszBuf, debugstr_w(pszPath)); pszBuf[OffsetDst]='\0'; /* keep the root of the path */ if( LenSrc && (pszPath[OffsetSrc]=='\\')) { pszBuf[OffsetDst++] = pszPath[OffsetSrc++]; OffsetMin++; LenSrc--; } else if ( (LenSrc >= 2) && (pszPath[OffsetSrc+1] == ':')) { pszBuf[OffsetDst++] = pszPath[OffsetSrc++]; OffsetMin++; LenSrc--; pszBuf[OffsetDst++] = pszPath[OffsetSrc++]; OffsetMin++; LenSrc--; if (LenSrc && (pszPath[OffsetSrc] == '\\')) { pszBuf[OffsetDst++] = pszPath[OffsetSrc++]; OffsetMin++; LenSrc--; if (LenSrc == 1 && pszPath[OffsetSrc]=='.') { /* C:\. */ OffsetSrc++; LenSrc--; bModifyed = TRUE; } else if (LenSrc == 2 && pszPath[OffsetSrc]=='.' && pszPath[OffsetSrc+1]=='.') { /* C:\.. */ OffsetSrc+=2; LenSrc-=2; bModifyed = TRUE; } } } /* ".\" at the beginning of the path */ if (LenSrc >= 2 && pszPath[OffsetSrc]=='.' && pszPath[OffsetSrc+1]=='\\') { OffsetSrc+=2; LenSrc-=2; bModifyed = TRUE; } while ( LenSrc ) { if((LenSrc>=3) && (pszPath[OffsetSrc]=='\\') && (pszPath[OffsetSrc+1]=='.') && (pszPath[OffsetSrc+2]=='.')) { /* "\.." found, go one deeper */ while((OffsetDst > OffsetMin) && (pszBuf[OffsetDst]!='\\')) OffsetDst--; OffsetSrc += 3; LenSrc -= 3; bModifyed = TRUE; if(OffsetDst == OffsetMin && pszPath[OffsetSrc]=='\\') OffsetSrc++; pszBuf[OffsetDst] = '\0'; /* important for \..\.. */ } else if(LenSrc>=2 && pszPath[OffsetSrc]=='\\' && pszPath[OffsetSrc+1]=='.' ) { /* "\." found, skip it */ OffsetSrc += 2; LenSrc-=2; bModifyed = TRUE; } else { pszBuf[OffsetDst++] = pszPath[OffsetSrc++]; LenSrc--; } } pszBuf[OffsetDst] = '\0'; TRACE("-- %s %u\n", debugstr_w(pszBuf), bModifyed); return bModifyed; } /************************************************************************* * PathFindNextComponentA */ LPSTR WINAPI PathFindNextComponentA(LPCSTR pszPath) { while( *pszPath ) { if(*pszPath++=='\\') return (LPSTR)((*pszPath)? pszPath : NULL); } return NULL; } /************************************************************************* * PathFindNextComponentW */ LPWSTR WINAPI PathFindNextComponentW(LPCWSTR pszPath) { while( *pszPath ) { if(*pszPath++=='\\') return (LPWSTR)((*pszPath)? pszPath : NULL); } return NULL; } wine-20000526/dlls/shell32/shlfileop.c0100644000175000001440000000755107102371522017014 0ustar julliardusers/* * SHFileOperation */ #include #include "debugtools.h" #include "shellapi.h" #include "shell32_main.h" #include "winversion.h" #include "shlobj.h" #include "shresdef.h" #include "wine/undocshell.h" DEFAULT_DEBUG_CHANNEL(shell); #define ASK_DELETE_FILE 1 #define ASK_DELETE_FOLDER 2 #define ASK_DELETE_MULTIPLE_FILE 3 static BOOL SHELL_WarnFolderDelete (int nKindOfDialog, LPCSTR szDir) { char szCaption[255], szText[255], szBuffer[256]; LoadStringA(shell32_hInstance, IDS_DELETEFOLDER_TEXT, szText, sizeof(szText)); LoadStringA(shell32_hInstance, IDS_DELETEFOLDER_CAPTION, szCaption, sizeof(szCaption)); FormatMessageA(FORMAT_MESSAGE_FROM_STRING, szText, 0,0, szBuffer, sizeof(szBuffer), (DWORD*)&szDir); return (IDOK == MessageBoxA(GetActiveWindow(),szText, szCaption, MB_OKCANCEL | MB_ICONEXCLAMATION)); } /************************************************************************** * SHELL_DeleteDirectoryA() * * like rm -r */ BOOL SHELL_DeleteDirectoryA(LPCSTR pszDir, BOOL bShowUI) { BOOL ret = FALSE; HANDLE hFind; WIN32_FIND_DATAA wfd; char szTemp[MAX_PATH]; strcpy(szTemp, pszDir); PathAddBackslashA(szTemp); strcat(szTemp, "*.*"); if (bShowUI && !SHELL_WarnFolderDelete(ASK_DELETE_FOLDER, pszDir)) return FALSE; if(INVALID_HANDLE_VALUE != (hFind = FindFirstFileA(szTemp, &wfd))) { do { if(strcasecmp(wfd.cFileName, ".") && strcasecmp(wfd.cFileName, "..")) { strcpy(szTemp, pszDir); PathAddBackslashA(szTemp); strcat(szTemp, wfd.cFileName); if(FILE_ATTRIBUTE_DIRECTORY & wfd.dwFileAttributes) SHELL_DeleteDirectoryA(szTemp, FALSE); else DeleteFileA(szTemp); } } while(FindNextFileA(hFind, &wfd)); FindClose(hFind); ret = RemoveDirectoryA(pszDir); } return ret; } /************************************************************************* * SHCreateDirectory [SHELL32.165] * * NOTES * exported by ordinal * not sure about LPSECURITY_ATTRIBUTES */ DWORD WINAPI SHCreateDirectory(LPSECURITY_ATTRIBUTES sec,LPCSTR path) { DWORD ret; TRACE("(%p,%s)\n",sec,path); if ((ret = CreateDirectoryA(path,sec))) { SHChangeNotifyA(SHCNE_MKDIR, SHCNF_PATHA, path, NULL); } return ret; } /************************************************************************ * Win32DeleteFile [SHELL32.164] * * Deletes a file. Also triggers a change notify if one exists. * * FIXME: * Verified on Win98 / IE 5 (SHELL32 4.72, March 1999 build) to be * ANSI. Is this Unicode on NT? * */ BOOL WINAPI Win32DeleteFile(LPSTR fName) { TRACE("%p(%s)\n", fName, fName); DeleteFileA(fName); SHChangeNotifyA(SHCNE_DELETE, SHCNF_PATHA, fName, NULL); return TRUE; } /************************************************************************* * SHFileOperationA [SHELL32.243] * * NOTES * exported by name */ DWORD WINAPI SHFileOperationA (LPSHFILEOPSTRUCTA lpFileOp) { FIXME("(%p):stub.\n", lpFileOp); return 1; } /************************************************************************* * SHFileOperationW [SHELL32.244] * * NOTES * exported by name */ DWORD WINAPI SHFileOperationW (LPSHFILEOPSTRUCTW lpFileOp) { FIXME("(%p):stub.\n", lpFileOp); return 1; } /************************************************************************* * SHFileOperation [SHELL32.242] * */ DWORD WINAPI SHFileOperationAW(LPVOID lpFileOp) { if (VERSION_OsIsUnicode()) return SHFileOperationW(lpFileOp); return SHFileOperationA(lpFileOp); } /************************************************************************* * SheGetDirW [SHELL32.281] * */ HRESULT WINAPI SheGetDirW(LPWSTR u, LPWSTR v) { FIXME("%p %p stub\n",u,v); return 0; } /************************************************************************* * SheChangeDirW [SHELL32.274] * */ HRESULT WINAPI SheChangeDirW(LPWSTR u) { FIXME("(%s),stub\n",debugstr_w(u)); return 0; } wine-20000526/dlls/shell32/shlfolder.c0100644000175000001440000021357307107062635017023 0ustar julliardusers/* * Shell Folder stuff * * Copyright 1997 Marcus Meissner * Copyright 1998, 1999 Juergen Schmied * * IShellFolder2 and related interfaces * */ #include #include #include #include "debugtools.h" #include "winerror.h" #include "oleidl.h" #include "shlguid.h" #include "pidl.h" #include "wine/obj_base.h" #include "wine/obj_dragdrop.h" #include "wine/obj_shellfolder.h" #include "wine/undocshell.h" #include "shell32_main.h" #include "shresdef.h" #include "shlwapi.h" #define INITGUID #include "initguid.h" #include "shellfolder.h" DEFAULT_DEBUG_CHANNEL(shell) /*************************************************************************** * debughelper: print out the return adress * helps especially to track down unbalanced AddRef/Release */ #define MEM_DEBUG 0 #if MEM_DEBUG #define _CALL_TRACE TRACE("called from: 0x%08x\n", *( ((UINT*)&iface)-1 )); #else #define _CALL_TRACE #endif typedef struct { int colnameid; int pcsFlags; int fmt; int cxChar; } shvheader; /*************************************************************************** * GetNextElement (internal function) * * gets a part of a string till the first backslash * * PARAMETERS * pszNext [IN] string to get the element from * pszOut [IN] pointer to buffer whitch receives string * dwOut [IN] length of pszOut * * RETURNS * LPSTR pointer to first, not yet parsed char */ static LPCWSTR GetNextElementW(LPCWSTR pszNext,LPWSTR pszOut,DWORD dwOut) { LPCWSTR pszTail = pszNext; DWORD dwCopy; TRACE("(%s %p 0x%08lx)\n",debugstr_w(pszNext),pszOut,dwOut); *pszOut=0x0000; if(!pszNext || !*pszNext) return NULL; while(*pszTail && (*pszTail != (WCHAR)'\\')) pszTail++; dwCopy = (WCHAR*)pszTail - (WCHAR*)pszNext + 1; lstrcpynW(pszOut, pszNext, (dwOut(pidl=%p 0x%08lx %p 0x%08lx)\n",psf,pidl,dwFlags,szOut, dwOutLen); pdump(pidl); if ((pidlFirst = ILCloneFirst(pidl))) { hr = IShellFolder_BindToObject(psf, pidlFirst, NULL, &IID_IShellFolder, (LPVOID*)&psfChild); if (SUCCEEDED(hr)) { pidlNext = ILGetNext(pidl); hr = IShellFolder_GetDisplayNameOf(psfChild, pidlNext, dwFlags | SHGDN_INFOLDER, &strTemp); if (SUCCEEDED(hr)) { hr = StrRetToStrNA(szOut, dwOutLen, &strTemp, pidlNext); } IShellFolder_Release(psfChild); } ILFree(pidlFirst); } TRACE("-- ret=0x%08lx %s\n", hr, szOut); return hr; } /*********************************************************************** * SHELL32_GetItemAttributes * * NOTES * observerd values: * folder: 0xE0000177 FILESYSTEM | HASSUBFOLDER | FOLDER * file: 0x40000177 FILESYSTEM * drive: 0xf0000144 FILESYSTEM | HASSUBFOLDER | FOLDER | FILESYSANCESTOR * mycomputer: 0xb0000154 HASSUBFOLDER | FOLDER | FILESYSANCESTOR * (seems to be default for shell extensions if no registry entry exists) * * This functions does not set flags!! It only resets flags when nessesary. */ static HRESULT SHELL32_GetItemAttributes( IShellFolder * psf, LPITEMIDLIST pidl, LPDWORD pdwAttributes) { GUID const * clsid; DWORD dwAttributes; TRACE("0x%08lx\n", *pdwAttributes); if (*pdwAttributes & (0xcff3fe88)) WARN("attribute 0x%08lx not implemented\n", *pdwAttributes); *pdwAttributes &= ~SFGAO_LINK; /* FIXME: for native filedialogs */ if (_ILIsDrive(pidl)) { *pdwAttributes &= 0xf0000144; } else if ((clsid=_ILGetGUIDPointer(pidl))) { if (HCR_GetFolderAttributes(clsid, &dwAttributes)) { *pdwAttributes &= dwAttributes; } else { *pdwAttributes &= 0xb0000154; } } else if (_ILGetDataPointer(pidl)) { dwAttributes = _ILGetFileAttributes(pidl, NULL, 0); *pdwAttributes &= ~SFGAO_FILESYSANCESTOR; if(( SFGAO_FOLDER & *pdwAttributes) && !(dwAttributes & FILE_ATTRIBUTE_DIRECTORY)) *pdwAttributes &= ~(SFGAO_FOLDER|SFGAO_HASSUBFOLDER); if(( SFGAO_HIDDEN & *pdwAttributes) && !(dwAttributes & FILE_ATTRIBUTE_HIDDEN)) *pdwAttributes &= ~SFGAO_HIDDEN; if(( SFGAO_READONLY & *pdwAttributes) && !(dwAttributes & FILE_ATTRIBUTE_READONLY)) *pdwAttributes &= ~SFGAO_READONLY; } else { *pdwAttributes &= 0xb0000154; } TRACE("-- 0x%08lx\n", *pdwAttributes); return S_OK; } /*********************************************************************** * IShellFolder implementation */ typedef struct { ICOM_VFIELD(IUnknown); DWORD ref; ICOM_VTABLE(IShellFolder2)* lpvtblShellFolder; ICOM_VTABLE(IPersistFolder2)* lpvtblPersistFolder2; ICOM_VTABLE(IDropTarget)* lpvtblDropTarget; ICOM_VTABLE(ISFHelper)* lpvtblSFHelper; IUnknown *pUnkOuter; /* used for aggregation */ CLSID* pclsid; LPSTR sMyPath; LPITEMIDLIST absPidl; /* complete pidl */ UINT cfShellIDList; /* clipboardformat for IDropTarget */ BOOL fAcceptFmt; /* flag for pending Drop */ } IGenericSFImpl; static struct ICOM_VTABLE(IUnknown) unkvt; static struct ICOM_VTABLE(IShellFolder2) sfvt; static struct ICOM_VTABLE(IPersistFolder2) psfvt; static struct ICOM_VTABLE(IDropTarget) dtvt; static struct ICOM_VTABLE(ISFHelper) shvt; static IShellFolder * ISF_MyComputer_Constructor(void); #define _IShellFolder2_Offset ((int)(&(((IGenericSFImpl*)0)->lpvtblShellFolder))) #define _ICOM_THIS_From_IShellFolder2(class, name) class* This = (class*)(((char*)name)-_IShellFolder2_Offset); #define _IPersistFolder_Offset ((int)(&(((IGenericSFImpl*)0)->lpvtblPersistFolder2))) #define _ICOM_THIS_From_IPersistFolder2(class, name) class* This = (class*)(((char*)name)-_IPersistFolder_Offset); #define _IDropTarget_Offset ((int)(&(((IGenericSFImpl*)0)->lpvtblDropTarget))) #define _ICOM_THIS_From_IDropTarget(class, name) class* This = (class*)(((char*)name)-_IDropTarget_Offset); #define _ISFHelper_Offset ((int)(&(((IGenericSFImpl*)0)->lpvtblSFHelper))) #define _ICOM_THIS_From_ISFHelper(class, name) class* This = (class*)(((char*)name)-_ISFHelper_Offset); /* converts This to a interface pointer */ #define _IUnknown_(This) (IUnknown*)&(This->lpVtbl) #define _IShellFolder_(This) (IShellFolder*)&(This->lpvtblShellFolder) #define _IShellFolder2_(This) (IShellFolder2*)&(This->lpvtblShellFolder) #define _IPersist_(This) (IPersist*)&(This->lpvtblPersistFolder2) #define _IPersistFolder_(This) (IPersistFolder*)&(This->lpvtblPersistFolder2) #define _IPersistFolder2_(This) (IPersistFolder2*)&(This->lpvtblPersistFolder2) #define _IDropTarget_(This) (IDropTarget*)&(This->lpvtblDropTarget) #define _ISFHelper_(This) (ISFHelper*)&(This->lpvtblSFHelper) /************************************************************************** * registers clipboardformat once */ static void SF_RegisterClipFmt (IGenericSFImpl * This) { TRACE("(%p)\n", This); if (!This->cfShellIDList) { This->cfShellIDList = RegisterClipboardFormatA(CFSTR_SHELLIDLIST); } } /************************************************************************** * we need a seperate IUnknown to handle aggregation * (inner IUnknown) */ static HRESULT WINAPI IUnknown_fnQueryInterface( IUnknown * iface, REFIID riid, LPVOID *ppvObj) { ICOM_THIS(IGenericSFImpl, iface); _CALL_TRACE TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown)) *ppvObj = _IUnknown_(This); else if(IsEqualIID(riid, &IID_IShellFolder)) *ppvObj = _IShellFolder_(This); else if(IsEqualIID(riid, &IID_IShellFolder2)) *ppvObj = _IShellFolder_(This); else if(IsEqualIID(riid, &IID_IPersist)) *ppvObj = _IPersist_(This); else if(IsEqualIID(riid, &IID_IPersistFolder)) *ppvObj = _IPersistFolder_(This); else if(IsEqualIID(riid, &IID_IPersistFolder2)) *ppvObj = _IPersistFolder2_(This); else if(IsEqualIID(riid, &IID_ISFHelper)) *ppvObj = _ISFHelper_(This); else if(IsEqualIID(riid, &IID_IDropTarget)) { *ppvObj = _IDropTarget_(This); SF_RegisterClipFmt(This); } if(*ppvObj) { IUnknown_AddRef((IUnknown*)(*ppvObj)); TRACE("-- Interface = %p\n", *ppvObj); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } static ULONG WINAPI IUnknown_fnAddRef(IUnknown * iface) { ICOM_THIS(IGenericSFImpl, iface); _CALL_TRACE TRACE("(%p)->(count=%lu)\n",This,This->ref); shell32_ObjCount++; return ++(This->ref); } static ULONG WINAPI IUnknown_fnRelease(IUnknown * iface) { ICOM_THIS(IGenericSFImpl, iface); _CALL_TRACE TRACE("(%p)->(count=%lu)\n",This,This->ref); shell32_ObjCount--; if (!--(This->ref)) { TRACE("-- destroying IShellFolder(%p)\n",This); if (pdesktopfolder == _IShellFolder_(This)) { pdesktopfolder=NULL; TRACE("-- destroyed IShellFolder(%p) was Desktopfolder\n",This); } if(This->absPidl) SHFree(This->absPidl); if(This->sMyPath) SHFree(This->sMyPath); HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } static ICOM_VTABLE(IUnknown) unkvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IUnknown_fnQueryInterface, IUnknown_fnAddRef, IUnknown_fnRelease, }; static shvheader GenericSFHeader [] = { { IDS_SHV_COLUMN1, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 15 }, { IDS_SHV_COLUMN2, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10 }, { IDS_SHV_COLUMN3, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10 }, { IDS_SHV_COLUMN4, SHCOLSTATE_TYPE_DATE | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 12 }, { IDS_SHV_COLUMN5, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 5 } }; #define GENERICSHELLVIEWCOLUMNS 5 /************************************************************************** * IShellFolder_Constructor * * NOTES * creating undocumented ShellFS_Folder as part of an aggregation * {F3364BA0-65B9-11CE-A9BA-00AA004AE837} * * FIXME * when pUnkOuter = 0 then rrid = IID_IShellFolder is returned */ HRESULT IFSFolder_Constructor( IUnknown * pUnkOuter, REFIID riid, LPVOID * ppv) { IGenericSFImpl * sf; HRESULT hr = S_OK; TRACE("unkOut=%p riid=%s\n",pUnkOuter, debugstr_guid(riid)); if(pUnkOuter && ! IsEqualIID(riid, &IID_IUnknown)) { hr = CLASS_E_NOAGGREGATION; /* forbidden by definition */ } else { sf=(IGenericSFImpl*)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IGenericSFImpl)); if (sf) { sf->ref=1; ICOM_VTBL(sf)=&unkvt; sf->lpvtblShellFolder=&sfvt; sf->lpvtblPersistFolder2=&psfvt; sf->lpvtblDropTarget=&dtvt; sf->lpvtblSFHelper=&shvt; sf->pclsid = (CLSID*)&CLSID_SFFile; sf->pUnkOuter = pUnkOuter ? pUnkOuter : _IUnknown_(sf); *ppv = _IUnknown_(sf); hr = S_OK; shell32_ObjCount++; } else { hr = E_OUTOFMEMORY; } } return hr; } /************************************************************************** * IShellFolder_Constructor * * NOTES * THIS points to the parent folder */ IShellFolder * IShellFolder_Constructor( IShellFolder2 * iface, LPITEMIDLIST pidl) { IGenericSFImpl * sf; DWORD dwSize=0; _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) sf=(IGenericSFImpl*)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IGenericSFImpl)); sf->ref=1; ICOM_VTBL(sf)=&unkvt; sf->lpvtblShellFolder=&sfvt; sf->lpvtblPersistFolder2=&psfvt; sf->lpvtblDropTarget=&dtvt; sf->lpvtblSFHelper=&shvt; sf->pclsid = (CLSID*)&CLSID_SFFile; sf->pUnkOuter = _IUnknown_(sf); TRACE("(%p)->(parent=%p, pidl=%p)\n",sf,This, pidl); pdump(pidl); if(pidl && iface) /* do we have a pidl? */ { int len; sf->absPidl = ILCombine(This->absPidl, pidl); /* build a absolute pidl */ if (!_ILIsSpecialFolder(pidl)) /* only file system paths */ { if(This->sMyPath) /* get the size of the parents path */ { dwSize += strlen(This->sMyPath) ; TRACE("-- (%p)->(parent's path=%s)\n",sf, debugstr_a(This->sMyPath)); } dwSize += _ILSimpleGetText(pidl,NULL,0); /* add the size of our name*/ sf->sMyPath = SHAlloc(dwSize + 2); /* '\0' and backslash */ if(!sf->sMyPath) return NULL; *(sf->sMyPath)=0x00; if(This->sMyPath) /* if the parent has a path, get it*/ { strcpy(sf->sMyPath, This->sMyPath); PathAddBackslashA (sf->sMyPath); } len = strlen(sf->sMyPath); _ILSimpleGetText(pidl, sf->sMyPath + len, dwSize+2 - len); } TRACE("-- (%p)->(my pidl=%p, my path=%s)\n",sf, sf->absPidl,debugstr_a(sf->sMyPath)); pdump (sf->absPidl); } shell32_ObjCount++; return _IShellFolder_(sf); } /************************************************************************** * IShellFolder_fnQueryInterface * * PARAMETERS * REFIID riid [in ] Requested InterfaceID * LPVOID* ppvObject [out] Interface* to hold the result */ static HRESULT WINAPI IShellFolder_fnQueryInterface( IShellFolder2 * iface, REFIID riid, LPVOID *ppvObj) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) _CALL_TRACE TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); return IUnknown_QueryInterface(This->pUnkOuter, riid, ppvObj); } /************************************************************************** * IShellFolder_AddRef */ static ULONG WINAPI IShellFolder_fnAddRef(IShellFolder2 * iface) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) _CALL_TRACE TRACE("(%p)->(count=%lu)\n",This,This->ref); return IUnknown_AddRef(This->pUnkOuter); } /************************************************************************** * IShellFolder_fnRelease */ static ULONG WINAPI IShellFolder_fnRelease(IShellFolder2 * iface) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) _CALL_TRACE TRACE("(%p)->(count=%lu)\n",This,This->ref); return IUnknown_Release(This->pUnkOuter); } /************************************************************************** * IShellFolder_fnParseDisplayName * PARAMETERS * HWND hwndOwner, //[in ] Parent window for any message's * LPBC pbc, //[in ] reserved * LPOLESTR lpszDisplayName,//[in ] "Unicode" displayname. * ULONG* pchEaten, //[out] (unicode) characters processed * LPITEMIDLIST* ppidl, //[out] complex pidl to item * ULONG* pdwAttributes //[out] items attributes * * NOTES * every folder trys to parse only it's own (the leftmost) pidl and creates a * subfolder to evaluate the remaining parts * now we can parse into namespaces implemented by shell extensions * * behaviour on win98: lpszDisplayName=NULL -> chrash * lpszDisplayName="" -> returns mycoputer-pidl * * FIXME: * pdwAttributes: not set * pchEaten: not set like in windows */ static HRESULT WINAPI IShellFolder_fnParseDisplayName( IShellFolder2 * iface, HWND hwndOwner, LPBC pbcReserved, LPOLESTR lpszDisplayName, DWORD *pchEaten, LPITEMIDLIST *ppidl, DWORD *pdwAttributes) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) HRESULT hr = E_OUTOFMEMORY; LPCWSTR szNext=NULL; WCHAR szElement[MAX_PATH]; CHAR szTempA[MAX_PATH], szPath[MAX_PATH]; LPITEMIDLIST pidlTemp=NULL; TRACE("(%p)->(HWND=0x%08x,%p,%p=%s,%p,pidl=%p,%p)\n", This,hwndOwner,pbcReserved,lpszDisplayName, debugstr_w(lpszDisplayName),pchEaten,ppidl,pdwAttributes); if (!lpszDisplayName || !ppidl) return E_INVALIDARG; if (pchEaten) *pchEaten = 0; /* strange but like the original */ if (*lpszDisplayName) { /* get the next element */ szNext = GetNextElementW(lpszDisplayName, szElement, MAX_PATH); /* build the full pathname to the element */ lstrcpynWtoA(szTempA, szElement, lstrlenW(szElement) + 1); strcpy(szPath, This->sMyPath); PathAddBackslashA(szPath); strcat(szPath, szTempA); /* get the pidl */ pidlTemp = SHSimpleIDListFromPathA(szPath); if (pidlTemp) { /* try to analyse the next element */ if (szNext && *szNext) { hr = SHELL32_ParseNextElement(hwndOwner, iface, &pidlTemp, (LPOLESTR)szNext, pchEaten, pdwAttributes); } else { if (pdwAttributes && *pdwAttributes) { SHELL32_GetItemAttributes(_IShellFolder_(This), pidlTemp, pdwAttributes); /* WIN32_FIND_DATAA fd; SHGetDataFromIDListA(_IShellFolder_(This), pidlTemp, SHGDFIL_FINDDATA, &fd, sizeof(fd)); if (!(FILE_ATTRIBUTE_DIRECTORY & fd.dwFileAttributes)) *pdwAttributes &= ~SFGAO_FOLDER; if (FILE_ATTRIBUTE_READONLY & fd.dwFileAttributes) *pdwAttributes &= ~(SFGAO_CANDELETE|SFGAO_CANMOVE|SFGAO_CANRENAME ); */ } hr = S_OK; } } } *ppidl = pidlTemp; TRACE("(%p)->(-- pidl=%p ret=0x%08lx)\n", This, ppidl? *ppidl:0, hr); return hr; } /************************************************************************** * IShellFolder_fnEnumObjects * PARAMETERS * HWND hwndOwner, //[in ] Parent Window * DWORD grfFlags, //[in ] SHCONTF enumeration mask * LPENUMIDLIST* ppenumIDList //[out] IEnumIDList interface */ static HRESULT WINAPI IShellFolder_fnEnumObjects( IShellFolder2 * iface, HWND hwndOwner, DWORD dwFlags, LPENUMIDLIST* ppEnumIDList) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) TRACE("(%p)->(HWND=0x%08x flags=0x%08lx pplist=%p)\n",This,hwndOwner,dwFlags,ppEnumIDList); *ppEnumIDList = NULL; *ppEnumIDList = IEnumIDList_Constructor (This->sMyPath, dwFlags, EIDL_FILE); TRACE("-- (%p)->(new ID List: %p)\n",This,*ppEnumIDList); if(!*ppEnumIDList) return E_OUTOFMEMORY; return S_OK; } /************************************************************************** * IShellFolder_fnBindToObject * PARAMETERS * LPCITEMIDLIST pidl, //[in ] relative pidl to open * LPBC pbc, //[in ] reserved * REFIID riid, //[in ] Initial Interface * LPVOID* ppvObject //[out] Interface* */ static HRESULT WINAPI IShellFolder_fnBindToObject( IShellFolder2 * iface, LPCITEMIDLIST pidl, LPBC pbcReserved, REFIID riid, LPVOID * ppvOut) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) GUID const * iid; IShellFolder *pShellFolder, *pSubFolder; IPersistFolder *pPersistFolder; LPITEMIDLIST absPidl; TRACE("(%p)->(pidl=%p,%p,\n\tIID:\t%s,%p)\n",This,pidl,pbcReserved,debugstr_guid(riid),ppvOut); if(!pidl || !ppvOut) return E_INVALIDARG; *ppvOut = NULL; if ((iid=_ILGetGUIDPointer(pidl))) { /* we have to create a alien folder */ if ( SUCCEEDED(SHCoCreateInstance(NULL, iid, NULL, riid, (LPVOID*)&pShellFolder)) && SUCCEEDED(IShellFolder_QueryInterface(pShellFolder, &IID_IPersistFolder, (LPVOID*)&pPersistFolder))) { absPidl = ILCombine (This->absPidl, pidl); IPersistFolder_Initialize(pPersistFolder, absPidl); IPersistFolder_Release(pPersistFolder); SHFree(absPidl); } else { return E_FAIL; } } else if(_ILIsFolder(pidl)) { LPITEMIDLIST pidltemp = ILCloneFirst(pidl); pShellFolder = IShellFolder_Constructor(iface, pidltemp); ILFree(pidltemp); } else { ERR("can't bind to a file\n"); return E_FAIL; } if (_ILIsPidlSimple(pidl)) { *ppvOut = pShellFolder; } else { IShellFolder_BindToObject(pShellFolder, ILGetNext(pidl), NULL, &IID_IShellFolder, (LPVOID)&pSubFolder); IShellFolder_Release(pShellFolder); *ppvOut = pSubFolder; } TRACE("-- (%p) returning (%p)\n",This, *ppvOut); return S_OK; } /************************************************************************** * IShellFolder_fnBindToStorage * PARAMETERS * LPCITEMIDLIST pidl, //[in ] complex pidl to store * LPBC pbc, //[in ] reserved * REFIID riid, //[in ] Initial storage interface * LPVOID* ppvObject //[out] Interface* returned */ static HRESULT WINAPI IShellFolder_fnBindToStorage( IShellFolder2 * iface, LPCITEMIDLIST pidl, LPBC pbcReserved, REFIID riid, LPVOID *ppvOut) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) FIXME("(%p)->(pidl=%p,%p,\n\tIID:%s,%p) stub\n", This,pidl,pbcReserved,debugstr_guid(riid),ppvOut); *ppvOut = NULL; return E_NOTIMPL; } /************************************************************************** * IShellFolder_fnCompareIDs * * PARMETERS * LPARAM lParam, //[in ] Column? * LPCITEMIDLIST pidl1, //[in ] simple pidl * LPCITEMIDLIST pidl2) //[in ] simple pidl * * NOTES * Special case - If one of the items is a Path and the other is a File, * always make the Path come before the File. * * NOTES * use SCODE_CODE() on the return value to get the result */ static HRESULT WINAPI IShellFolder_fnCompareIDs( IShellFolder2 * iface, LPARAM lParam, LPCITEMIDLIST pidl1, LPCITEMIDLIST pidl2) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) CHAR szTemp1[MAX_PATH]; CHAR szTemp2[MAX_PATH]; int nReturn; IShellFolder * psf; HRESULT hr = E_OUTOFMEMORY; LPCITEMIDLIST pidlTemp; PIDLTYPE pt1, pt2; TRACE("(%p)->(0x%08lx,pidl1=%p,pidl2=%p)\n",This,lParam,pidl1,pidl2); pdump (pidl1); pdump (pidl2); if (!pidl1 && !pidl2) { hr = ResultFromShort(0); } else if (!pidl1) { hr = ResultFromShort(-1); } else if (!pidl2) { hr = ResultFromShort(1); } else { LPPIDLDATA pd1, pd2; pd1 = _ILGetDataPointer(pidl1); pd2 = _ILGetDataPointer(pidl2); /* compate the types. sort order is the PT_* constant */ pt1 = ( pd1 ? pd1->type: PT_DESKTOP); pt2 = ( pd2 ? pd2->type: PT_DESKTOP); if (pt1 != pt2) { hr = ResultFromShort(pt1-pt2); } else /* same type of pidl */ { _ILSimpleGetText(pidl1, szTemp1, MAX_PATH); _ILSimpleGetText(pidl2, szTemp2, MAX_PATH); nReturn = strcasecmp(szTemp1, szTemp2); if (nReturn == 0) /* first pidl different ? */ { pidl1 = ILGetNext(pidl1); if (pidl1 && pidl1->mkid.cb) /* go deeper? */ { pidlTemp = ILCloneFirst(pidl1); pidl2 = ILGetNext(pidl2); hr = IShellFolder_BindToObject(iface, pidlTemp, NULL, &IID_IShellFolder, (LPVOID*)&psf); if (SUCCEEDED(hr)) { nReturn = IShellFolder_CompareIDs(psf, 0, pidl1, pidl2); IShellFolder_Release(psf); hr = ResultFromShort(nReturn); } ILFree(pidlTemp); } else { hr = ResultFromShort(nReturn); /* two equal simple pidls */ } } else { hr = ResultFromShort(nReturn); /* two different simple pidls */ } } } TRACE("-- res=0x%08lx\n", hr); return hr; } /************************************************************************** * IShellFolder_fnCreateViewObject */ static HRESULT WINAPI IShellFolder_fnCreateViewObject( IShellFolder2 * iface, HWND hwndOwner, REFIID riid, LPVOID *ppvOut) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) LPSHELLVIEW pShellView; HRESULT hr = E_INVALIDARG; TRACE("(%p)->(hwnd=0x%x,\n\tIID:\t%s,%p)\n",This,hwndOwner,debugstr_guid(riid),ppvOut); if(ppvOut) { *ppvOut = NULL; if(IsEqualIID(riid, &IID_IDropTarget)) { hr = IShellFolder_QueryInterface(iface, &IID_IDropTarget, ppvOut); } else if(IsEqualIID(riid, &IID_IContextMenu)) { FIXME("IContextMenu not implemented\n"); hr = E_NOTIMPL; } else if(IsEqualIID(riid, &IID_IShellView)) { pShellView = IShellView_Constructor((IShellFolder*)iface); if(pShellView) { hr = IShellView_QueryInterface(pShellView, riid, ppvOut); IShellView_Release(pShellView); } } } TRACE("-- (%p)->(interface=%p)\n",This, ppvOut); return hr; } /************************************************************************** * IShellFolder_fnGetAttributesOf * * PARAMETERS * UINT cidl, //[in ] num elements in pidl array * LPCITEMIDLIST* apidl, //[in ] simple pidl array * ULONG* rgfInOut) //[out] result array * */ static HRESULT WINAPI IShellFolder_fnGetAttributesOf( IShellFolder2 * iface, UINT cidl, LPCITEMIDLIST *apidl, DWORD *rgfInOut) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) HRESULT hr = S_OK; TRACE("(%p)->(cidl=%d apidl=%p mask=0x%08lx)\n",This,cidl,apidl,*rgfInOut); if ( (!cidl) || (!apidl) || (!rgfInOut)) return E_INVALIDARG; while (cidl > 0 && *apidl) { pdump (*apidl); SHELL32_GetItemAttributes(_IShellFolder_(This), *apidl, rgfInOut); apidl++; cidl--; } TRACE("-- result=0x%08lx\n",*rgfInOut); return hr; } /************************************************************************** * IShellFolder_fnGetUIObjectOf * * PARAMETERS * HWND hwndOwner, //[in ] Parent window for any output * UINT cidl, //[in ] array size * LPCITEMIDLIST* apidl, //[in ] simple pidl array * REFIID riid, //[in ] Requested Interface * UINT* prgfInOut, //[ ] reserved * LPVOID* ppvObject) //[out] Resulting Interface * * NOTES * This function gets asked to return "view objects" for one or more (multiple select) * items: * The viewobject typically is an COM object with one of the following interfaces: * IExtractIcon,IDataObject,IContextMenu * In order to support icon positions in the default Listview your DataObject * must implement the SetData method (in addition to GetData :) - the shell passes * a barely documented "Icon positions" structure to SetData when the drag starts, * and GetData's it if the drop is in another explorer window that needs the positions. */ static HRESULT WINAPI IShellFolder_fnGetUIObjectOf( IShellFolder2 * iface, HWND hwndOwner, UINT cidl, LPCITEMIDLIST * apidl, REFIID riid, UINT * prgfInOut, LPVOID * ppvOut) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) LPITEMIDLIST pidl; IUnknown* pObj = NULL; HRESULT hr = E_INVALIDARG; TRACE("(%p)->(0x%04x,%u,apidl=%p,\n\tIID:%s,%p,%p)\n", This,hwndOwner,cidl,apidl,debugstr_guid(riid),prgfInOut,ppvOut); if (ppvOut) { *ppvOut = NULL; if(IsEqualIID(riid, &IID_IContextMenu) && (cidl >= 1)) { pObj = (LPUNKNOWN)ISvItemCm_Constructor((IShellFolder*)iface, This->absPidl, apidl, cidl); hr = S_OK; } else if (IsEqualIID(riid, &IID_IDataObject) &&(cidl >= 1)) { pObj = (LPUNKNOWN)IDataObject_Constructor (hwndOwner, This->absPidl, apidl, cidl); hr = S_OK; } else if (IsEqualIID(riid, &IID_IExtractIconA) && (cidl == 1)) { pidl = ILCombine(This->absPidl,apidl[0]); pObj = (LPUNKNOWN)IExtractIconA_Constructor( pidl ); SHFree(pidl); hr = S_OK; } else if (IsEqualIID(riid, &IID_IDropTarget) && (cidl >= 1)) { hr = IShellFolder_QueryInterface(iface, &IID_IDropTarget, (LPVOID*)&pObj); } else { hr = E_NOINTERFACE; } if(!pObj) hr = E_OUTOFMEMORY; *ppvOut = pObj; } TRACE("(%p)->hr=0x%08lx\n",This, hr); return hr; } /************************************************************************** * IShellFolder_fnGetDisplayNameOf * Retrieves the display name for the specified file object or subfolder * * PARAMETERS * LPCITEMIDLIST pidl, //[in ] complex pidl to item * DWORD dwFlags, //[in ] SHGNO formatting flags * LPSTRRET lpName) //[out] Returned display name * * FIXME * if the name is in the pidl the ret value should be a STRRET_OFFSET */ #define GET_SHGDN_FOR(dwFlags) ((DWORD)dwFlags & (DWORD)0x0000FF00) #define GET_SHGDN_RELATION(dwFlags) ((DWORD)dwFlags & (DWORD)0x000000FF) static HRESULT WINAPI IShellFolder_fnGetDisplayNameOf( IShellFolder2 * iface, LPCITEMIDLIST pidl, DWORD dwFlags, LPSTRRET strRet) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) CHAR szPath[MAX_PATH]= ""; int len = 0; BOOL bSimplePidl; TRACE("(%p)->(pidl=%p,0x%08lx,%p)\n",This,pidl,dwFlags,strRet); pdump(pidl); if(!pidl || !strRet) return E_INVALIDARG; bSimplePidl = _ILIsPidlSimple(pidl); /* take names of special folders only if its only this folder */ if (_ILIsSpecialFolder(pidl)) { if ( bSimplePidl) { _ILSimpleGetText(pidl, szPath, MAX_PATH); /* append my own path */ } } else { if (!(dwFlags & SHGDN_INFOLDER) && (dwFlags & SHGDN_FORPARSING) && This->sMyPath) { strcpy (szPath, This->sMyPath); /* get path to root*/ PathAddBackslashA(szPath); len = strlen(szPath); } _ILSimpleGetText(pidl, szPath + len, MAX_PATH - len); /* append my own path */ } if ( (dwFlags & SHGDN_FORPARSING) && !bSimplePidl) /* go deeper if needed */ { PathAddBackslashA(szPath); len = strlen(szPath); if (!SUCCEEDED(SHELL32_GetDisplayNameOfChild(iface, pidl, dwFlags, szPath + len, MAX_PATH - len))) return E_OUTOFMEMORY; } strRet->uType = STRRET_CSTRA; lstrcpynA(strRet->u.cStr, szPath, MAX_PATH); TRACE("-- (%p)->(%s)\n", This, szPath); return S_OK; } /************************************************************************** * IShellFolder_fnSetNameOf * Changes the name of a file object or subfolder, possibly changing its item * identifier in the process. * * PARAMETERS * HWND hwndOwner, //[in ] Owner window for output * LPCITEMIDLIST pidl, //[in ] simple pidl of item to change * LPCOLESTR lpszName, //[in ] the items new display name * DWORD dwFlags, //[in ] SHGNO formatting flags * LPITEMIDLIST* ppidlOut) //[out] simple pidl returned */ static HRESULT WINAPI IShellFolder_fnSetNameOf( IShellFolder2 * iface, HWND hwndOwner, LPCITEMIDLIST pidl, /*simple pidl*/ LPCOLESTR lpName, DWORD dwFlags, LPITEMIDLIST *pPidlOut) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) char szSrc[MAX_PATH], szDest[MAX_PATH]; int len; BOOL bIsFolder = _ILIsFolder(ILFindLastID(pidl)); TRACE("(%p)->(%u,pidl=%p,%s,%lu,%p)\n", This,hwndOwner,pidl,debugstr_w(lpName),dwFlags,pPidlOut); /* build source path */ if (dwFlags & SHGDN_INFOLDER) { strcpy(szSrc, This->sMyPath); PathAddBackslashA(szSrc); len = strlen (szSrc); _ILSimpleGetText(pidl, szSrc+len, MAX_PATH-len); } else { SHGetPathFromIDListA(pidl, szSrc); } /* build destination path */ strcpy(szDest, This->sMyPath); PathAddBackslashA(szDest); len = strlen (szDest); lstrcpynWtoA(szDest+len, lpName, MAX_PATH-len); TRACE("src=%s dest=%s\n", szSrc, szDest); if ( MoveFileA(szSrc, szDest) ) { if (pPidlOut) *pPidlOut = SHSimpleIDListFromPathA(szDest); SHChangeNotifyA( bIsFolder?SHCNE_RENAMEFOLDER:SHCNE_RENAMEITEM, SHCNF_PATHA, szSrc, szDest); return S_OK; } return E_FAIL; } static HRESULT WINAPI IShellFolder_fnGetDefaultSearchGUID( IShellFolder2 * iface, GUID *pguid) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) FIXME("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI IShellFolder_fnEnumSearches( IShellFolder2 * iface, IEnumExtraSearch **ppenum) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) FIXME("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI IShellFolder_fnGetDefaultColumn( IShellFolder2 * iface, DWORD dwRes, ULONG *pSort, ULONG *pDisplay) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) TRACE("(%p)\n",This); if (pSort) *pSort = 0; if (pDisplay) *pDisplay = 0; return S_OK; } static HRESULT WINAPI IShellFolder_fnGetDefaultColumnState( IShellFolder2 * iface, UINT iColumn, DWORD *pcsFlags) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) TRACE("(%p)\n",This); if (!pcsFlags || iColumn >= GENERICSHELLVIEWCOLUMNS ) return E_INVALIDARG; *pcsFlags = GenericSFHeader[iColumn].pcsFlags; return S_OK; } static HRESULT WINAPI IShellFolder_fnGetDetailsEx( IShellFolder2 * iface, LPCITEMIDLIST pidl, const SHCOLUMNID *pscid, VARIANT *pv) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) FIXME("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI IShellFolder_fnGetDetailsOf( IShellFolder2 * iface, LPCITEMIDLIST pidl, UINT iColumn, SHELLDETAILS *psd) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) HRESULT hr = E_FAIL; TRACE("(%p)->(%p %i %p)\n",This, pidl, iColumn, psd); if (!psd || iColumn >= GENERICSHELLVIEWCOLUMNS ) return E_INVALIDARG; if (!pidl) { /* the header titles */ psd->fmt = GenericSFHeader[iColumn].fmt; psd->cxChar = GenericSFHeader[iColumn].cxChar; psd->str.uType = STRRET_CSTRA; LoadStringA(shell32_hInstance, GenericSFHeader[iColumn].colnameid, psd->str.u.cStr, MAX_PATH); return S_OK; } else { /* the data from the pidl */ switch(iColumn) { case 0: /* name */ hr = IShellFolder_GetDisplayNameOf(iface, pidl, SHGDN_NORMAL | SHGDN_INFOLDER, &psd->str); break; case 1: /* size */ _ILGetFileSize (pidl, psd->str.u.cStr, MAX_PATH); break; case 2: /* type */ _ILGetFileType(pidl, psd->str.u.cStr, MAX_PATH); break; case 3: /* date */ _ILGetFileDate(pidl, psd->str.u.cStr, MAX_PATH); break; case 4: /* attributes */ _ILGetFileAttributes(pidl, psd->str.u.cStr, MAX_PATH); break; } hr = S_OK; psd->str.uType = STRRET_CSTRA; } return hr; } static HRESULT WINAPI IShellFolder_fnMapNameToSCID( IShellFolder2 * iface, LPCWSTR pwszName, SHCOLUMNID *pscid) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) FIXME("(%p)\n",This); return E_NOTIMPL; } static ICOM_VTABLE(IShellFolder2) sfvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IShellFolder_fnQueryInterface, IShellFolder_fnAddRef, IShellFolder_fnRelease, IShellFolder_fnParseDisplayName, IShellFolder_fnEnumObjects, IShellFolder_fnBindToObject, IShellFolder_fnBindToStorage, IShellFolder_fnCompareIDs, IShellFolder_fnCreateViewObject, IShellFolder_fnGetAttributesOf, IShellFolder_fnGetUIObjectOf, IShellFolder_fnGetDisplayNameOf, IShellFolder_fnSetNameOf, /* ShellFolder2 */ IShellFolder_fnGetDefaultSearchGUID, IShellFolder_fnEnumSearches, IShellFolder_fnGetDefaultColumn, IShellFolder_fnGetDefaultColumnState, IShellFolder_fnGetDetailsEx, IShellFolder_fnGetDetailsOf, IShellFolder_fnMapNameToSCID }; /**************************************************************************** * ISFHelper for IShellFolder implementation */ static HRESULT WINAPI ISFHelper_fnQueryInterface( ISFHelper *iface, REFIID riid, LPVOID *ppvObj) { _ICOM_THIS_From_ISFHelper(IGenericSFImpl,iface); TRACE("(%p)\n", This); return IUnknown_QueryInterface(This->pUnkOuter, riid, ppvObj); } static ULONG WINAPI ISFHelper_fnAddRef( ISFHelper *iface) { _ICOM_THIS_From_ISFHelper(IGenericSFImpl,iface); TRACE("(%p)\n", This); return IUnknown_AddRef(This->pUnkOuter); } static ULONG WINAPI ISFHelper_fnRelease( ISFHelper *iface) { _ICOM_THIS_From_ISFHelper(IGenericSFImpl,iface); TRACE("(%p)\n", This); return IUnknown_Release(This->pUnkOuter); } /**************************************************************************** * ISFHelper_fnAddFolder * * creates a unique folder name */ static HRESULT WINAPI ISFHelper_fnGetUniqueName( ISFHelper *iface, LPSTR lpName, UINT uLen) { _ICOM_THIS_From_ISFHelper(IGenericSFImpl,iface) IEnumIDList * penum; HRESULT hr; char szText[MAX_PATH]; char * szNewFolder = "New Folder"; TRACE("(%p)(%s %u)\n", This, lpName, uLen); if (uLen < strlen(szNewFolder) + 4) return E_POINTER; strcpy(lpName, szNewFolder); hr = IShellFolder_fnEnumObjects(_IShellFolder2_(This), 0, SHCONTF_FOLDERS | SHCONTF_NONFOLDERS | SHCONTF_INCLUDEHIDDEN, &penum); if (penum) { LPITEMIDLIST pidl; DWORD dwFetched; int i=1; next: IEnumIDList_Reset(penum); while(S_OK == IEnumIDList_Next(penum, 1, &pidl, &dwFetched) && dwFetched) { _ILSimpleGetText(pidl, szText, MAX_PATH); if (0 == strcasecmp(szText, lpName)) { sprintf(lpName, "%s %d", szNewFolder, i++); if (i > 99) { hr = E_FAIL; break; } goto next; } } IEnumIDList_Release(penum); } return hr; } /**************************************************************************** * ISFHelper_fnAddFolder * * adds a new folder. */ static HRESULT WINAPI ISFHelper_fnAddFolder( ISFHelper *iface, HWND hwnd, LPCSTR lpName, LPITEMIDLIST* ppidlOut) { _ICOM_THIS_From_ISFHelper(IGenericSFImpl,iface) char lpstrNewDir[MAX_PATH]; DWORD bRes; HRESULT hres = E_FAIL; TRACE("(%p)(%s %p)\n", This, lpName, ppidlOut); strcpy(lpstrNewDir, This->sMyPath); PathAddBackslashA(lpstrNewDir); strcat(lpstrNewDir, lpName); bRes = CreateDirectoryA(lpstrNewDir, NULL); if (bRes) { LPITEMIDLIST pidl, pidlitem; pidlitem = SHSimpleIDListFromPathA(lpstrNewDir); pidl = ILCombine(This->absPidl, pidlitem); SHChangeNotifyA(SHCNE_MKDIR, SHCNF_IDLIST, pidl, NULL); SHFree(pidl); if (ppidlOut) *ppidlOut = pidlitem; hres = S_OK; } else { char lpstrText[128+MAX_PATH]; char lpstrTempText[128]; char lpstrCaption[256]; /* Cannot Create folder because of permissions */ LoadStringA(shell32_hInstance, IDS_CREATEFOLDER_DENIED, lpstrTempText, sizeof(lpstrTempText)); LoadStringA(shell32_hInstance, IDS_CREATEFOLDER_CAPTION, lpstrCaption, sizeof(lpstrCaption)); sprintf(lpstrText,lpstrTempText, lpstrNewDir); MessageBoxA(hwnd,lpstrText, lpstrCaption, MB_OK | MB_ICONEXCLAMATION); } return hres; } /**************************************************************************** * ISFHelper_fnDeleteItems * * deletes items in folder */ static HRESULT WINAPI ISFHelper_fnDeleteItems( ISFHelper *iface, UINT cidl, LPCITEMIDLIST* apidl) { _ICOM_THIS_From_ISFHelper(IGenericSFImpl,iface) int i; char szPath[MAX_PATH]; TRACE("(%p)(%u %p)\n", This, cidl, apidl); for(i=0; i< cidl; i++) { strcpy(szPath, This->sMyPath); PathAddBackslashA(szPath); _ILSimpleGetText(apidl[i], szPath+strlen(szPath), MAX_PATH); if (_ILIsFolder(apidl[i])) { LPITEMIDLIST pidl; MESSAGE("delete %s\n", szPath); if (! SHELL_DeleteDirectoryA(szPath, TRUE)) return E_FAIL; pidl = ILCombine(This->absPidl, apidl[i]); SHChangeNotifyA(SHCNE_RMDIR, SHCNF_IDLIST, pidl, NULL); SHFree(pidl); } else if (_ILIsValue(apidl[i])) { LPITEMIDLIST pidl; MESSAGE("delete %s\n", szPath); if (! DeleteFileA(szPath)) return E_FAIL; pidl = ILCombine(This->absPidl, apidl[i]); SHChangeNotifyA(SHCNE_DELETE, SHCNF_IDLIST, pidl, NULL); SHFree(pidl); } } return S_OK; } /**************************************************************************** * ISFHelper_fnCopyItems * * copys items to this folder */ static HRESULT WINAPI ISFHelper_fnCopyItems( ISFHelper *iface, IShellFolder* pSFFrom, UINT cidl, LPCITEMIDLIST *apidl) { int i; IPersistFolder2 * ppf2=NULL; char szSrcPath[MAX_PATH], szDstPath[MAX_PATH]; _ICOM_THIS_From_ISFHelper(IGenericSFImpl,iface); TRACE("(%p)->(%p,%u,%p)\n", This, pSFFrom, cidl, apidl); IShellFolder_QueryInterface(pSFFrom, &IID_IPersistFolder2, (LPVOID*)&ppf2); if (ppf2) { LPITEMIDLIST pidl; if (SUCCEEDED(IPersistFolder2_GetCurFolder(ppf2, &pidl))) { for (i=0; isMyPath); PathAddBackslashA(szDstPath); _ILSimpleGetText(apidl[i], szDstPath+strlen(szDstPath), MAX_PATH); MESSAGE("would copy %s to %s\n", szSrcPath, szDstPath); } SHFree(pidl); } IPersistFolder2_Release(ppf2); } return S_OK; } static ICOM_VTABLE(ISFHelper) shvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE ISFHelper_fnQueryInterface, ISFHelper_fnAddRef, ISFHelper_fnRelease, ISFHelper_fnGetUniqueName, ISFHelper_fnAddFolder, ISFHelper_fnDeleteItems, ISFHelper_fnCopyItems, }; /*********************************************************************** * [Desktopfolder] IShellFolder implementation */ static struct ICOM_VTABLE(IShellFolder2) sfdvt; static shvheader DesktopSFHeader [] = { { IDS_SHV_COLUMN1, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 15 }, { IDS_SHV_COLUMN2, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10 }, { IDS_SHV_COLUMN3, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10 }, { IDS_SHV_COLUMN4, SHCOLSTATE_TYPE_DATE | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 12 }, { IDS_SHV_COLUMN5, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 5 } }; #define DESKTOPSHELLVIEWCOLUMNS 5 /************************************************************************** * ISF_Desktop_Constructor * */ IShellFolder * ISF_Desktop_Constructor() { IGenericSFImpl * sf; sf=(IGenericSFImpl*)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IGenericSFImpl)); sf->ref=1; ICOM_VTBL(sf)=&unkvt; sf->lpvtblShellFolder=&sfdvt; sf->absPidl=_ILCreateDesktop(); /* my qualified pidl */ sf->pUnkOuter = (IUnknown *) &sf->lpVtbl; TRACE("(%p)\n",sf); shell32_ObjCount++; return _IShellFolder_(sf); } /************************************************************************** * ISF_Desktop_fnQueryInterface * * NOTES supports not IPersist/IPersistFolder */ static HRESULT WINAPI ISF_Desktop_fnQueryInterface( IShellFolder2 * iface, REFIID riid, LPVOID *ppvObj) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown)) /*IUnknown*/ { *ppvObj = _IUnknown_(This); } else if(IsEqualIID(riid, &IID_IShellFolder)) /*IShellFolder*/ { *ppvObj = _IShellFolder_(This); } else if(IsEqualIID(riid, &IID_IShellFolder2)) /*IShellFolder2*/ { *ppvObj = _IShellFolder_(This); } if(*ppvObj) { IUnknown_AddRef((IUnknown*)(*ppvObj)); TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } /************************************************************************** * ISF_Desktop_fnParseDisplayName * * NOTES * "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}" and "" binds * to MyComputer */ static HRESULT WINAPI ISF_Desktop_fnParseDisplayName( IShellFolder2 * iface, HWND hwndOwner, LPBC pbcReserved, LPOLESTR lpszDisplayName, DWORD *pchEaten, LPITEMIDLIST *ppidl, DWORD *pdwAttributes) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) LPCWSTR szNext=NULL; LPITEMIDLIST pidlTemp=NULL; HRESULT hr=E_OUTOFMEMORY; TRACE("(%p)->(HWND=0x%08x,%p,%p=%s,%p,pidl=%p,%p)\n", This,hwndOwner,pbcReserved,lpszDisplayName, debugstr_w(lpszDisplayName),pchEaten,ppidl,pdwAttributes); *ppidl = 0; if (pchEaten) *pchEaten = 0; /* strange but like the original */ /* fixme no real parsing implemented */ pidlTemp = _ILCreateMyComputer(); szNext = lpszDisplayName; if (szNext && *szNext) { hr = SHELL32_ParseNextElement(hwndOwner, iface, &pidlTemp, (LPOLESTR)szNext, pchEaten, pdwAttributes); } else { hr = S_OK; if (pdwAttributes && *pdwAttributes) { SHELL32_GetItemAttributes(_IShellFolder_(This), pidlTemp, pdwAttributes); } } *ppidl = pidlTemp; TRACE("(%p)->(-- ret=0x%08lx)\n", This, hr); return hr; } /************************************************************************** * ISF_Desktop_fnEnumObjects */ static HRESULT WINAPI ISF_Desktop_fnEnumObjects( IShellFolder2 * iface, HWND hwndOwner, DWORD dwFlags, LPENUMIDLIST* ppEnumIDList) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) TRACE("(%p)->(HWND=0x%08x flags=0x%08lx pplist=%p)\n",This,hwndOwner,dwFlags,ppEnumIDList); *ppEnumIDList = NULL; *ppEnumIDList = IEnumIDList_Constructor (NULL, dwFlags, EIDL_DESK); TRACE("-- (%p)->(new ID List: %p)\n",This,*ppEnumIDList); if(!*ppEnumIDList) return E_OUTOFMEMORY; return S_OK; } /************************************************************************** * ISF_Desktop_fnBindToObject */ static HRESULT WINAPI ISF_Desktop_fnBindToObject( IShellFolder2 * iface, LPCITEMIDLIST pidl, LPBC pbcReserved, REFIID riid, LPVOID * ppvOut) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) GUID const * clsid; IShellFolder *pShellFolder, *pSubFolder; TRACE("(%p)->(pidl=%p,%p,\n\tIID:\t%s,%p)\n", This,pidl,pbcReserved,debugstr_guid(riid),ppvOut); *ppvOut = NULL; if ((clsid=_ILGetGUIDPointer(pidl))) { if ( IsEqualIID(clsid, &CLSID_MyComputer)) { pShellFolder = ISF_MyComputer_Constructor(); } else { /* shell extension */ if (!SUCCEEDED(SHELL32_CoCreateInitSF (This->absPidl, pidl, clsid, riid, (LPVOID*)&pShellFolder))) { return E_INVALIDARG; } } } else { /* file system folder on the desktop */ LPITEMIDLIST deskpidl, firstpidl, completepidl; IPersistFolder * ppf; /* combine pidls */ SHGetSpecialFolderLocation(0, CSIDL_DESKTOPDIRECTORY, &deskpidl); firstpidl = ILCloneFirst(pidl); completepidl = ILCombine(deskpidl, firstpidl); pShellFolder = IShellFolder_Constructor(NULL, NULL); if (SUCCEEDED(IShellFolder_QueryInterface(pShellFolder, &IID_IPersistFolder, (LPVOID*)&ppf))) { IPersistFolder_Initialize(ppf, completepidl); IPersistFolder_Release(ppf); } ILFree(completepidl); ILFree(deskpidl); ILFree(firstpidl); } if (_ILIsPidlSimple(pidl)) /* no sub folders */ { *ppvOut = pShellFolder; } else /* go deeper */ { IShellFolder_BindToObject(pShellFolder, ILGetNext(pidl), NULL, riid, (LPVOID)&pSubFolder); IShellFolder_Release(pShellFolder); *ppvOut = pSubFolder; } TRACE("-- (%p) returning (%p)\n",This, *ppvOut); return S_OK; } /************************************************************************** * ISF_Desktop_fnCreateViewObject */ static HRESULT WINAPI ISF_Desktop_fnCreateViewObject( IShellFolder2 * iface, HWND hwndOwner, REFIID riid, LPVOID *ppvOut) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) LPSHELLVIEW pShellView; HRESULT hr = E_INVALIDARG; TRACE("(%p)->(hwnd=0x%x,\n\tIID:\t%s,%p)\n",This,hwndOwner,debugstr_guid(riid),ppvOut); if(ppvOut) { *ppvOut = NULL; if(IsEqualIID(riid, &IID_IDropTarget)) { FIXME("IDropTarget not implemented\n"); hr = E_NOTIMPL; } else if(IsEqualIID(riid, &IID_IContextMenu)) { FIXME("IContextMenu not implemented\n"); hr = E_NOTIMPL; } else if(IsEqualIID(riid, &IID_IShellView)) { pShellView = IShellView_Constructor((IShellFolder*)iface); if(pShellView) { hr = IShellView_QueryInterface(pShellView, riid, ppvOut); IShellView_Release(pShellView); } } } TRACE("-- (%p)->(interface=%p)\n",This, ppvOut); return hr; } /************************************************************************** * ISF_Desktop_fnGetAttributesOf */ static HRESULT WINAPI ISF_Desktop_fnGetAttributesOf( IShellFolder2 * iface, UINT cidl, LPCITEMIDLIST *apidl, DWORD *rgfInOut) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) HRESULT hr = S_OK; TRACE("(%p)->(cidl=%d apidl=%p mask=0x%08lx)\n",This,cidl,apidl, *rgfInOut); if ( (!cidl) || (!apidl) || (!rgfInOut)) return E_INVALIDARG; while (cidl > 0 && *apidl) { pdump (*apidl); SHELL32_GetItemAttributes(_IShellFolder_(This), *apidl, rgfInOut); apidl++; cidl--; } TRACE("-- result=0x%08lx\n",*rgfInOut); return hr; } /************************************************************************** * ISF_Desktop_fnGetDisplayNameOf * * NOTES * special case: pidl = null gives desktop-name back */ static HRESULT WINAPI ISF_Desktop_fnGetDisplayNameOf( IShellFolder2 * iface, LPCITEMIDLIST pidl, DWORD dwFlags, LPSTRRET strRet) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) CHAR szPath[MAX_PATH]= ""; TRACE("(%p)->(pidl=%p,0x%08lx,%p)\n",This,pidl,dwFlags,strRet); pdump(pidl); if(!strRet) return E_INVALIDARG; if(!pidl) { HCR_GetClassName(&CLSID_ShellDesktop, szPath, MAX_PATH); } else if ( _ILIsPidlSimple(pidl) ) { _ILSimpleGetText(pidl, szPath, MAX_PATH); } else { if (!SUCCEEDED(SHELL32_GetDisplayNameOfChild(iface, pidl, dwFlags, szPath, MAX_PATH))) return E_OUTOFMEMORY; } strRet->uType = STRRET_CSTRA; lstrcpynA(strRet->u.cStr, szPath, MAX_PATH); TRACE("-- (%p)->(%s)\n", This, szPath); return S_OK; } static HRESULT WINAPI ISF_Desktop_fnGetDefaultSearchGUID( IShellFolder2 * iface, GUID *pguid) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) FIXME("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI ISF_Desktop_fnEnumSearches( IShellFolder2 * iface, IEnumExtraSearch **ppenum) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) FIXME("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI ISF_Desktop_fnGetDefaultColumn( IShellFolder2 * iface, DWORD dwRes, ULONG *pSort, ULONG *pDisplay) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) TRACE("(%p)\n",This); if (pSort) *pSort = 0; if (pDisplay) *pDisplay = 0; return S_OK; } static HRESULT WINAPI ISF_Desktop_fnGetDefaultColumnState( IShellFolder2 * iface, UINT iColumn, DWORD *pcsFlags) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) TRACE("(%p)\n",This); if (!pcsFlags || iColumn >= DESKTOPSHELLVIEWCOLUMNS ) return E_INVALIDARG; *pcsFlags = DesktopSFHeader[iColumn].pcsFlags; return S_OK; } static HRESULT WINAPI ISF_Desktop_fnGetDetailsEx( IShellFolder2 * iface, LPCITEMIDLIST pidl, const SHCOLUMNID *pscid, VARIANT *pv) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) FIXME("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI ISF_Desktop_fnGetDetailsOf( IShellFolder2 * iface, LPCITEMIDLIST pidl, UINT iColumn, SHELLDETAILS *psd) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) HRESULT hr = E_FAIL;; TRACE("(%p)->(%p %i %p)\n",This, pidl, iColumn, psd); if (!psd || iColumn >= DESKTOPSHELLVIEWCOLUMNS ) return E_INVALIDARG; if (!pidl) { psd->fmt = DesktopSFHeader[iColumn].fmt; psd->cxChar = DesktopSFHeader[iColumn].cxChar; psd->str.uType = STRRET_CSTRA; LoadStringA(shell32_hInstance, DesktopSFHeader[iColumn].colnameid, psd->str.u.cStr, MAX_PATH); return S_OK; } else { /* the data from the pidl */ switch(iColumn) { case 0: /* name */ hr = IShellFolder_GetDisplayNameOf(iface, pidl, SHGDN_NORMAL | SHGDN_INFOLDER, &psd->str); break; case 1: /* size */ _ILGetFileSize (pidl, psd->str.u.cStr, MAX_PATH); break; case 2: /* type */ _ILGetFileType(pidl, psd->str.u.cStr, MAX_PATH); break; case 3: /* date */ _ILGetFileDate(pidl, psd->str.u.cStr, MAX_PATH); break; case 4: /* attributes */ _ILGetFileAttributes(pidl, psd->str.u.cStr, MAX_PATH); break; } hr = S_OK; psd->str.uType = STRRET_CSTRA; } return hr; } static HRESULT WINAPI ISF_Desktop_fnMapNameToSCID( IShellFolder2 * iface, LPCWSTR pwszName, SHCOLUMNID *pscid) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) FIXME("(%p)\n",This); return E_NOTIMPL; } static ICOM_VTABLE(IShellFolder2) sfdvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE ISF_Desktop_fnQueryInterface, IShellFolder_fnAddRef, IShellFolder_fnRelease, ISF_Desktop_fnParseDisplayName, ISF_Desktop_fnEnumObjects, ISF_Desktop_fnBindToObject, IShellFolder_fnBindToStorage, IShellFolder_fnCompareIDs, ISF_Desktop_fnCreateViewObject, ISF_Desktop_fnGetAttributesOf, IShellFolder_fnGetUIObjectOf, ISF_Desktop_fnGetDisplayNameOf, IShellFolder_fnSetNameOf, /* ShellFolder2 */ ISF_Desktop_fnGetDefaultSearchGUID, ISF_Desktop_fnEnumSearches, ISF_Desktop_fnGetDefaultColumn, ISF_Desktop_fnGetDefaultColumnState, ISF_Desktop_fnGetDetailsEx, ISF_Desktop_fnGetDetailsOf, ISF_Desktop_fnMapNameToSCID }; /*********************************************************************** * IShellFolder [MyComputer] implementation */ static struct ICOM_VTABLE(IShellFolder2) sfmcvt; static shvheader MyComputerSFHeader [] = { { IDS_SHV_COLUMN1, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 15 }, { IDS_SHV_COLUMN3, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10 }, { IDS_SHV_COLUMN6, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10 }, { IDS_SHV_COLUMN7, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10 }, }; #define MYCOMPUTERSHELLVIEWCOLUMNS 4 /************************************************************************** * ISF_MyComputer_Constructor */ static IShellFolder * ISF_MyComputer_Constructor(void) { IGenericSFImpl * sf; sf=(IGenericSFImpl*)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IGenericSFImpl)); sf->ref=1; ICOM_VTBL(sf)=&unkvt; sf->lpvtblShellFolder=&sfmcvt; sf->lpvtblPersistFolder2 = &psfvt; sf->pclsid = (CLSID*)&CLSID_SFMyComp; sf->absPidl=_ILCreateMyComputer(); /* my qualified pidl */ sf->pUnkOuter = (IUnknown *) &sf->lpVtbl; TRACE("(%p)\n",sf); shell32_ObjCount++; return _IShellFolder_(sf); } /************************************************************************** * ISF_MyComputer_fnParseDisplayName */ static HRESULT WINAPI ISF_MyComputer_fnParseDisplayName( IShellFolder2 * iface, HWND hwndOwner, LPBC pbcReserved, LPOLESTR lpszDisplayName, DWORD *pchEaten, LPITEMIDLIST *ppidl, DWORD *pdwAttributes) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) HRESULT hr = E_OUTOFMEMORY; LPCWSTR szNext=NULL; WCHAR szElement[MAX_PATH]; CHAR szTempA[MAX_PATH]; LPITEMIDLIST pidlTemp; TRACE("(%p)->(HWND=0x%08x,%p,%p=%s,%p,pidl=%p,%p)\n", This,hwndOwner,pbcReserved,lpszDisplayName, debugstr_w(lpszDisplayName),pchEaten,ppidl,pdwAttributes); *ppidl = 0; if (pchEaten) *pchEaten = 0; /* strange but like the original */ /* do we have an absolute path name ? */ if (PathGetDriveNumberW(lpszDisplayName) >= 0 && lpszDisplayName[2] == (WCHAR)'\\') { szNext = GetNextElementW(lpszDisplayName, szElement, MAX_PATH); lstrcpynWtoA(szTempA, szElement, lstrlenW(szElement) + 1); pidlTemp = _ILCreateDrive(szTempA); if (szNext && *szNext) { hr = SHELL32_ParseNextElement(hwndOwner, iface, &pidlTemp, (LPOLESTR)szNext, pchEaten, pdwAttributes); } else { if (pdwAttributes && *pdwAttributes) { SHELL32_GetItemAttributes(_IShellFolder_(This), pidlTemp, pdwAttributes); } hr = S_OK; } *ppidl = pidlTemp; } TRACE("(%p)->(-- ret=0x%08lx)\n", This, hr); return hr; } /************************************************************************** * ISF_MyComputer_fnEnumObjects */ static HRESULT WINAPI ISF_MyComputer_fnEnumObjects( IShellFolder2 * iface, HWND hwndOwner, DWORD dwFlags, LPENUMIDLIST* ppEnumIDList) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) TRACE("(%p)->(HWND=0x%08x flags=0x%08lx pplist=%p)\n",This,hwndOwner,dwFlags,ppEnumIDList); *ppEnumIDList = NULL; *ppEnumIDList = IEnumIDList_Constructor (NULL, dwFlags, EIDL_MYCOMP); TRACE("-- (%p)->(new ID List: %p)\n",This,*ppEnumIDList); if(!*ppEnumIDList) return E_OUTOFMEMORY; return S_OK; } /************************************************************************** * ISF_MyComputer_fnBindToObject */ static HRESULT WINAPI ISF_MyComputer_fnBindToObject( IShellFolder2 * iface, LPCITEMIDLIST pidl, LPBC pbcReserved, REFIID riid, LPVOID * ppvOut) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) GUID const * clsid; IShellFolder *pShellFolder, *pSubFolder; LPITEMIDLIST pidltemp; TRACE("(%p)->(pidl=%p,%p,\n\tIID:\t%s,%p)\n", This,pidl,pbcReserved,debugstr_guid(riid),ppvOut); if(!pidl || !ppvOut) return E_INVALIDARG; *ppvOut = NULL; if ((clsid=_ILGetGUIDPointer(pidl)) && !IsEqualIID(clsid, &CLSID_MyComputer)) { if (!SUCCEEDED(SHELL32_CoCreateInitSF (This->absPidl, pidl, clsid, riid, (LPVOID*)&pShellFolder))) { return E_FAIL; } } else { if (!_ILIsDrive(pidl)) return E_INVALIDARG; pidltemp = ILCloneFirst(pidl); pShellFolder = IShellFolder_Constructor(iface, pidltemp); ILFree(pidltemp); } if (_ILIsPidlSimple(pidl)) /* no sub folders */ { *ppvOut = pShellFolder; } else /* go deeper */ { IShellFolder_BindToObject(pShellFolder, ILGetNext(pidl), NULL, &IID_IShellFolder, (LPVOID)&pSubFolder); IShellFolder_Release(pShellFolder); *ppvOut = pSubFolder; } TRACE("-- (%p) returning (%p)\n",This, *ppvOut); return S_OK; } /************************************************************************** * ISF_MyComputer_fnCreateViewObject */ static HRESULT WINAPI ISF_MyComputer_fnCreateViewObject( IShellFolder2 * iface, HWND hwndOwner, REFIID riid, LPVOID *ppvOut) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) LPSHELLVIEW pShellView; HRESULT hr = E_INVALIDARG; TRACE("(%p)->(hwnd=0x%x,\n\tIID:\t%s,%p)\n",This,hwndOwner,debugstr_guid(riid),ppvOut); if(ppvOut) { *ppvOut = NULL; if(IsEqualIID(riid, &IID_IDropTarget)) { FIXME("IDropTarget not implemented\n"); hr = E_NOTIMPL; } else if(IsEqualIID(riid, &IID_IContextMenu)) { FIXME("IContextMenu not implemented\n"); hr = E_NOTIMPL; } else if(IsEqualIID(riid, &IID_IShellView)) { pShellView = IShellView_Constructor((IShellFolder*)iface); if(pShellView) { hr = IShellView_QueryInterface(pShellView, riid, ppvOut); IShellView_Release(pShellView); } } } TRACE("-- (%p)->(interface=%p)\n",This, ppvOut); return hr; } /************************************************************************** * ISF_MyComputer_fnGetAttributesOf */ static HRESULT WINAPI ISF_MyComputer_fnGetAttributesOf( IShellFolder2 * iface, UINT cidl, LPCITEMIDLIST *apidl, DWORD *rgfInOut) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) HRESULT hr = S_OK; TRACE("(%p)->(cidl=%d apidl=%p mask=0x%08lx)\n",This,cidl,apidl,*rgfInOut); if ( (!cidl) || (!apidl) || (!rgfInOut)) return E_INVALIDARG; while (cidl > 0 && *apidl) { pdump (*apidl); SHELL32_GetItemAttributes(_IShellFolder_(This), *apidl, rgfInOut); apidl++; cidl--; } TRACE("-- result=0x%08lx\n",*rgfInOut); return hr; } /************************************************************************** * ISF_MyComputer_fnGetDisplayNameOf * * NOTES * The desktopfolder creates only complete paths (SHGDN_FORPARSING). * SHGDN_INFOLDER makes no sense. */ static HRESULT WINAPI ISF_MyComputer_fnGetDisplayNameOf( IShellFolder2 * iface, LPCITEMIDLIST pidl, DWORD dwFlags, LPSTRRET strRet) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) char szPath[MAX_PATH], szDrive[18]; int len = 0; BOOL bSimplePidl; TRACE("(%p)->(pidl=%p,0x%08lx,%p)\n",This,pidl,dwFlags,strRet); pdump(pidl); if(!strRet) return E_INVALIDARG; szPath[0]=0x00; szDrive[0]=0x00; bSimplePidl = _ILIsPidlSimple(pidl); if (_ILIsSpecialFolder(pidl)) { /* take names of special folders only if its only this folder */ if ( bSimplePidl ) { _ILSimpleGetText(pidl, szPath, MAX_PATH); /* append my own path */ } } else { if (!_ILIsDrive(pidl)) { ERR("Wrong pidl type\n"); return E_INVALIDARG; } _ILSimpleGetText(pidl, szPath, MAX_PATH); /* append my own path */ /* long view "lw_name (C:)" */ if ( bSimplePidl && !(dwFlags & SHGDN_FORPARSING)) { DWORD dwVolumeSerialNumber,dwMaximumComponetLength,dwFileSystemFlags; GetVolumeInformationA(szPath,szDrive,12,&dwVolumeSerialNumber,&dwMaximumComponetLength,&dwFileSystemFlags,NULL,0); strcat (szDrive," ("); strncat (szDrive, szPath, 2); strcat (szDrive,")"); strcpy (szPath, szDrive); } } if (!bSimplePidl) /* go deeper if needed */ { PathAddBackslashA(szPath); len = strlen(szPath); if (!SUCCEEDED(SHELL32_GetDisplayNameOfChild(iface, pidl, dwFlags | SHGDN_FORPARSING, szPath + len, MAX_PATH - len))) return E_OUTOFMEMORY; } strRet->uType = STRRET_CSTRA; lstrcpynA(strRet->u.cStr, szPath, MAX_PATH); TRACE("-- (%p)->(%s)\n", This, szPath); return S_OK; } static HRESULT WINAPI ISF_MyComputer_fnGetDefaultSearchGUID( IShellFolder2 * iface, GUID *pguid) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) FIXME("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI ISF_MyComputer_fnEnumSearches( IShellFolder2 * iface, IEnumExtraSearch **ppenum) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) FIXME("(%p)\n",This); return E_NOTIMPL; } static HRESULT WINAPI ISF_MyComputer_fnGetDefaultColumn( IShellFolder2 * iface, DWORD dwRes, ULONG *pSort, ULONG *pDisplay) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) TRACE("(%p)\n",This); if (pSort) *pSort = 0; if (pDisplay) *pDisplay = 0; return S_OK; } static HRESULT WINAPI ISF_MyComputer_fnGetDefaultColumnState( IShellFolder2 * iface, UINT iColumn, DWORD *pcsFlags) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) TRACE("(%p)\n",This); if (!pcsFlags || iColumn >= MYCOMPUTERSHELLVIEWCOLUMNS ) return E_INVALIDARG; *pcsFlags = MyComputerSFHeader[iColumn].pcsFlags; return S_OK; } static HRESULT WINAPI ISF_MyComputer_fnGetDetailsEx( IShellFolder2 * iface, LPCITEMIDLIST pidl, const SHCOLUMNID *pscid, VARIANT *pv) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) FIXME("(%p)\n",This); return E_NOTIMPL; } /* fixme: drive size >4GB is rolling over */ static HRESULT WINAPI ISF_MyComputer_fnGetDetailsOf( IShellFolder2 * iface, LPCITEMIDLIST pidl, UINT iColumn, SHELLDETAILS *psd) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) HRESULT hr; TRACE("(%p)->(%p %i %p)\n",This, pidl, iColumn, psd); if (!psd || iColumn >= MYCOMPUTERSHELLVIEWCOLUMNS ) return E_INVALIDARG; if (!pidl) { psd->fmt = MyComputerSFHeader[iColumn].fmt; psd->cxChar = MyComputerSFHeader[iColumn].cxChar; psd->str.uType = STRRET_CSTRA; LoadStringA(shell32_hInstance, MyComputerSFHeader[iColumn].colnameid, psd->str.u.cStr, MAX_PATH); return S_OK; } else { char szPath[MAX_PATH]; ULARGE_INTEGER ulBytes; psd->str.u.cStr[0] = 0x00; psd->str.uType = STRRET_CSTRA; switch(iColumn) { case 0: /* name */ hr = IShellFolder_GetDisplayNameOf(iface, pidl, SHGDN_NORMAL | SHGDN_INFOLDER, &psd->str); break; case 1: /* type */ _ILGetFileType(pidl, psd->str.u.cStr, MAX_PATH); break; case 2: /* total size */ if (_ILIsDrive(pidl)) { _ILSimpleGetText(pidl, szPath, MAX_PATH); GetDiskFreeSpaceExA(szPath, NULL, &ulBytes, NULL); StrFormatByteSizeA(ulBytes.s.LowPart, psd->str.u.cStr, MAX_PATH); } break; case 3: /* free size */ if (_ILIsDrive(pidl)) { _ILSimpleGetText(pidl, szPath, MAX_PATH); GetDiskFreeSpaceExA(szPath, &ulBytes, NULL, NULL); StrFormatByteSizeA(ulBytes.s.LowPart, psd->str.u.cStr, MAX_PATH); } break; } hr = S_OK; } return hr; } static HRESULT WINAPI ISF_MyComputer_fnMapNameToSCID( IShellFolder2 * iface, LPCWSTR pwszName, SHCOLUMNID *pscid) { _ICOM_THIS_From_IShellFolder2(IGenericSFImpl, iface) FIXME("(%p)\n",This); return E_NOTIMPL; } static ICOM_VTABLE(IShellFolder2) sfmcvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IShellFolder_fnQueryInterface, IShellFolder_fnAddRef, IShellFolder_fnRelease, ISF_MyComputer_fnParseDisplayName, ISF_MyComputer_fnEnumObjects, ISF_MyComputer_fnBindToObject, IShellFolder_fnBindToStorage, IShellFolder_fnCompareIDs, ISF_MyComputer_fnCreateViewObject, ISF_MyComputer_fnGetAttributesOf, IShellFolder_fnGetUIObjectOf, ISF_MyComputer_fnGetDisplayNameOf, IShellFolder_fnSetNameOf, /* ShellFolder2 */ ISF_MyComputer_fnGetDefaultSearchGUID, ISF_MyComputer_fnEnumSearches, ISF_MyComputer_fnGetDefaultColumn, ISF_MyComputer_fnGetDefaultColumnState, ISF_MyComputer_fnGetDetailsEx, ISF_MyComputer_fnGetDetailsOf, ISF_MyComputer_fnMapNameToSCID }; /************************************************************************ * ISFPersistFolder_QueryInterface (IUnknown) * */ static HRESULT WINAPI ISFPersistFolder2_QueryInterface( IPersistFolder2 * iface, REFIID iid, LPVOID* ppvObj) { _ICOM_THIS_From_IPersistFolder2(IGenericSFImpl, iface); TRACE("(%p)\n", This); return IUnknown_QueryInterface(This->pUnkOuter, iid, ppvObj); } /************************************************************************ * ISFPersistFolder_AddRef (IUnknown) * */ static ULONG WINAPI ISFPersistFolder2_AddRef( IPersistFolder2 * iface) { _ICOM_THIS_From_IPersistFolder2(IGenericSFImpl, iface); TRACE("(%p)\n", This); return IUnknown_AddRef(This->pUnkOuter); } /************************************************************************ * ISFPersistFolder_Release (IUnknown) * */ static ULONG WINAPI ISFPersistFolder2_Release( IPersistFolder2 * iface) { _ICOM_THIS_From_IPersistFolder2(IGenericSFImpl, iface); TRACE("(%p)\n", This); return IUnknown_Release(This->pUnkOuter); } /************************************************************************ * ISFPersistFolder_GetClassID (IPersist) */ static HRESULT WINAPI ISFPersistFolder2_GetClassID( IPersistFolder2 * iface, CLSID * lpClassId) { _ICOM_THIS_From_IPersistFolder2(IGenericSFImpl, iface); TRACE("(%p)\n", This); if (!lpClassId) return E_POINTER; *lpClassId = *This->pclsid; return S_OK; } /************************************************************************ * ISFPersistFolder_Initialize (IPersistFolder) * * NOTES * sMyPath is not set. Don't know how to handle in a non rooted environment. */ static HRESULT WINAPI ISFPersistFolder2_Initialize( IPersistFolder2 * iface, LPCITEMIDLIST pidl) { char sTemp[MAX_PATH]; _ICOM_THIS_From_IPersistFolder2(IGenericSFImpl, iface); TRACE("(%p)->(%p)\n", This, pidl); /* free the old stuff */ if(This->absPidl) { SHFree(This->absPidl); This->absPidl = NULL; } if(This->sMyPath) { SHFree(This->sMyPath); This->sMyPath = NULL; } /* set my pidl */ This->absPidl = ILClone(pidl); /* set my path */ if (SHGetPathFromIDListA(pidl, sTemp)) { This->sMyPath = SHAlloc(strlen(sTemp)+1); strcpy(This->sMyPath, sTemp); } TRACE("--(%p)->(%s)\n", This, This->sMyPath); return S_OK; } /************************************************************************** * IPersistFolder2_fnGetCurFolder */ static HRESULT WINAPI ISFPersistFolder2_fnGetCurFolder( IPersistFolder2 * iface, LPITEMIDLIST * pidl) { _ICOM_THIS_From_IPersistFolder2(IGenericSFImpl, iface); TRACE("(%p)->(%p)\n",This, pidl); if (!pidl) return E_POINTER; *pidl = ILClone(This->absPidl); return S_OK; } static ICOM_VTABLE(IPersistFolder2) psfvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE ISFPersistFolder2_QueryInterface, ISFPersistFolder2_AddRef, ISFPersistFolder2_Release, ISFPersistFolder2_GetClassID, ISFPersistFolder2_Initialize, ISFPersistFolder2_fnGetCurFolder }; /**************************************************************************** * ISFDropTarget implementation */ static BOOL ISFDropTarget_QueryDrop( IDropTarget *iface, DWORD dwKeyState, LPDWORD pdwEffect) { DWORD dwEffect = *pdwEffect; _ICOM_THIS_From_IDropTarget(IGenericSFImpl,iface); *pdwEffect = DROPEFFECT_NONE; if (This->fAcceptFmt) { /* Does our interpretation of the keystate ... */ *pdwEffect = KeyStateToDropEffect(dwKeyState); /* ... matches the desired effect ? */ if (dwEffect & *pdwEffect) { return TRUE; } } return FALSE; } static HRESULT WINAPI ISFDropTarget_QueryInterface( IDropTarget *iface, REFIID riid, LPVOID *ppvObj) { _ICOM_THIS_From_IDropTarget(IGenericSFImpl,iface); TRACE("(%p)\n", This); return IUnknown_QueryInterface(This->pUnkOuter, riid, ppvObj); } static ULONG WINAPI ISFDropTarget_AddRef( IDropTarget *iface) { _ICOM_THIS_From_IDropTarget(IGenericSFImpl,iface); TRACE("(%p)\n", This); return IUnknown_AddRef(This->pUnkOuter); } static ULONG WINAPI ISFDropTarget_Release( IDropTarget *iface) { _ICOM_THIS_From_IDropTarget(IGenericSFImpl,iface); TRACE("(%p)\n", This); return IUnknown_Release(This->pUnkOuter); } static HRESULT WINAPI ISFDropTarget_DragEnter( IDropTarget *iface, IDataObject *pDataObject, DWORD dwKeyState, POINTL pt, DWORD *pdwEffect) { FORMATETC fmt; _ICOM_THIS_From_IDropTarget(IGenericSFImpl,iface); TRACE("(%p)->(DataObject=%p)\n",This,pDataObject); InitFormatEtc(fmt, This->cfShellIDList, TYMED_HGLOBAL); This->fAcceptFmt = (S_OK == IDataObject_QueryGetData(pDataObject, &fmt)) ? TRUE : FALSE; ISFDropTarget_QueryDrop(iface, dwKeyState, pdwEffect); return S_OK; } static HRESULT WINAPI ISFDropTarget_DragOver( IDropTarget *iface, DWORD dwKeyState, POINTL pt, DWORD *pdwEffect) { _ICOM_THIS_From_IDropTarget(IGenericSFImpl,iface); TRACE("(%p)\n",This); if(!pdwEffect) return E_INVALIDARG; ISFDropTarget_QueryDrop(iface, dwKeyState, pdwEffect); return S_OK; } static HRESULT WINAPI ISFDropTarget_DragLeave( IDropTarget *iface) { _ICOM_THIS_From_IDropTarget(IGenericSFImpl,iface); TRACE("(%p)\n",This); This->fAcceptFmt = FALSE; return S_OK; } static HRESULT WINAPI ISFDropTarget_Drop( IDropTarget *iface, IDataObject* pDataObject, DWORD dwKeyState, POINTL pt, DWORD *pdwEffect) { _ICOM_THIS_From_IDropTarget(IGenericSFImpl,iface); FIXME("(%p) object dropped\n",This); return E_NOTIMPL; } static struct ICOM_VTABLE(IDropTarget) dtvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE ISFDropTarget_QueryInterface, ISFDropTarget_AddRef, ISFDropTarget_Release, ISFDropTarget_DragEnter, ISFDropTarget_DragOver, ISFDropTarget_DragLeave, ISFDropTarget_Drop }; wine-20000526/dlls/shell32/shlmenu.c0100644000175000001440000005546507102371522016511 0ustar julliardusers/* * see www.geocities.com/SiliconValley/4942/filemenu.html */ #include #include "wine/obj_base.h" #include "wine/obj_enumidlist.h" #include "wine/obj_shellfolder.h" #include "wine/undocshell.h" #include "heap.h" #include "debugtools.h" #include "winversion.h" #include "shell32_main.h" #include "pidl.h" BOOL WINAPI FileMenu_DeleteAllItems (HMENU hMenu); BOOL WINAPI FileMenu_AppendItemA(HMENU hMenu, LPCSTR lpText, UINT uID, int icon, HMENU hMenuPopup, int nItemHeight); typedef struct { BOOL bInitialized; BOOL bFixedItems; /* create */ COLORREF crBorderColor; int nBorderWidth; HBITMAP hBorderBmp; /* insert using pidl */ LPITEMIDLIST pidl; UINT uID; UINT uFlags; UINT uEnumFlags; LPFNFMCALLBACK lpfnCallback; } FMINFO, *LPFMINFO; typedef struct { int cchItemText; int iIconIndex; HMENU hMenu; char szItemText[1]; } FMITEM, * LPFMITEM; static BOOL bAbortInit; #define CCH_MAXITEMTEXT 256 DEFAULT_DEBUG_CHANNEL(shell) LPFMINFO FM_GetMenuInfo(HMENU hmenu) { MENUINFO MenuInfo; LPFMINFO menudata; MenuInfo.cbSize = sizeof(MENUINFO); MenuInfo.fMask = MIM_MENUDATA; if (! GetMenuInfo(hmenu, &MenuInfo)) return NULL; menudata = (LPFMINFO)MenuInfo.dwMenuData; if ((menudata == 0) || (MenuInfo.cbSize != sizeof(MENUINFO))) { ERR("menudata corrupt: %p %lu\n", menudata, MenuInfo.cbSize); return 0; } return menudata; } /************************************************************************* * FM_SetMenuParameter [internal] * */ static LPFMINFO FM_SetMenuParameter( HMENU hmenu, UINT uID, LPCITEMIDLIST pidl, UINT uFlags, UINT uEnumFlags, LPFNFMCALLBACK lpfnCallback) { LPFMINFO menudata; TRACE("\n"); menudata = FM_GetMenuInfo(hmenu); if ( menudata->pidl) { SHFree(menudata->pidl); } menudata->uID = uID; menudata->pidl = ILClone(pidl); menudata->uFlags = uFlags; menudata->uEnumFlags = uEnumFlags; menudata->lpfnCallback = lpfnCallback; return menudata; } /************************************************************************* * FM_InitMenuPopup [internal] * */ static int FM_InitMenuPopup(HMENU hmenu, LPITEMIDLIST pAlternatePidl) { IShellFolder *lpsf, *lpsf2; ULONG ulItemAttr; UINT uID, uFlags, uEnumFlags; LPFNFMCALLBACK lpfnCallback; LPITEMIDLIST pidl; char sTemp[MAX_PATH]; int NumberOfItems = 0, iIcon; MENUINFO MenuInfo; LPFMINFO menudata; TRACE("0x%04x %p\n", hmenu, pAlternatePidl); MenuInfo.cbSize = sizeof(MENUINFO); MenuInfo.fMask = MIM_MENUDATA; if (! GetMenuInfo(hmenu, &MenuInfo)) return FALSE; menudata = (LPFMINFO)MenuInfo.dwMenuData; if ((menudata == 0) || (MenuInfo.cbSize != sizeof(MENUINFO))) { ERR("menudata corrupt: %p %lu\n", menudata, MenuInfo.cbSize); return 0; } if (menudata->bInitialized) return 0; pidl = ((pAlternatePidl) ? pAlternatePidl : menudata->pidl); if (!pidl) return 0; uID = menudata->uID; uFlags = menudata->uFlags; uEnumFlags = menudata->uEnumFlags; lpfnCallback = menudata->lpfnCallback; menudata->bInitialized = FALSE; SetMenuInfo(hmenu, &MenuInfo); if (SUCCEEDED (SHGetDesktopFolder(&lpsf))) { if (SUCCEEDED(IShellFolder_BindToObject(lpsf, pidl,0,(REFIID)&IID_IShellFolder,(LPVOID *)&lpsf2))) { IEnumIDList *lpe = NULL; if (SUCCEEDED (IShellFolder_EnumObjects(lpsf2, 0, uEnumFlags, &lpe ))) { LPITEMIDLIST pidlTemp = NULL; ULONG ulFetched; while ((!bAbortInit) && (NOERROR == IEnumIDList_Next(lpe,1,&pidlTemp,&ulFetched))) { if (SUCCEEDED (IShellFolder_GetAttributesOf(lpsf, 1, &pidlTemp, &ulItemAttr))) { ILGetDisplayName( pidlTemp, sTemp); if (! (PidlToSicIndex(lpsf, pidlTemp, FALSE, 0, &iIcon))) iIcon = FM_BLANK_ICON; if ( SFGAO_FOLDER & ulItemAttr) { LPFMINFO lpFmMi; MENUINFO MenuInfo; HMENU hMenuPopup = CreatePopupMenu(); lpFmMi = (LPFMINFO) HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(FMINFO)); lpFmMi->pidl = ILCombine(pidl, pidlTemp); lpFmMi->uEnumFlags = SHCONTF_FOLDERS | SHCONTF_NONFOLDERS; MenuInfo.cbSize = sizeof(MENUINFO); MenuInfo.fMask = MIM_MENUDATA; MenuInfo.dwMenuData = (DWORD) lpFmMi; SetMenuInfo (hMenuPopup, &MenuInfo); FileMenu_AppendItemA (hmenu, sTemp, uID, iIcon, hMenuPopup, FM_DEFAULT_HEIGHT); } else { ((LPSTR)PathFindExtensionA(sTemp))[0] = 0x00; FileMenu_AppendItemA (hmenu, sTemp, uID, iIcon, 0, FM_DEFAULT_HEIGHT); } } if (lpfnCallback) { TRACE("enter callback\n"); lpfnCallback ( pidl, pidlTemp); TRACE("leave callback\n"); } NumberOfItems++; } IEnumIDList_Release (lpe); } IShellFolder_Release(lpsf2); } IShellFolder_Release(lpsf); } if ( GetMenuItemCount (hmenu) == 0 ) { FileMenu_AppendItemA (hmenu, "(empty)", uID, FM_BLANK_ICON, 0, FM_DEFAULT_HEIGHT); NumberOfItems++; } menudata->bInitialized = TRUE; SetMenuInfo(hmenu, &MenuInfo); return NumberOfItems; } /************************************************************************* * FileMenu_Create [SHELL32.114] * * NOTES * for non-root menus values are * (ffffffff,00000000,00000000,00000000,00000000) */ HMENU WINAPI FileMenu_Create ( COLORREF crBorderColor, int nBorderWidth, HBITMAP hBorderBmp, int nSelHeight, UINT uFlags) { MENUINFO MenuInfo; LPFMINFO menudata; HMENU hMenu = CreatePopupMenu(); TRACE("0x%08lx 0x%08x 0x%08x 0x%08x 0x%08x hMenu=0x%08x\n", crBorderColor, nBorderWidth, hBorderBmp, nSelHeight, uFlags, hMenu); menudata = (LPFMINFO)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(FMINFO)); menudata->crBorderColor = crBorderColor; menudata->nBorderWidth = nBorderWidth; menudata->hBorderBmp = hBorderBmp; MenuInfo.cbSize = sizeof(MENUINFO); MenuInfo.fMask = MIM_MENUDATA; MenuInfo.dwMenuData = (DWORD) menudata; SetMenuInfo (hMenu, &MenuInfo); return hMenu; } /************************************************************************* * FileMenu_Destroy [SHELL32.118] * * NOTES * exported by name */ void WINAPI FileMenu_Destroy (HMENU hmenu) { LPFMINFO menudata; TRACE("0x%08x\n", hmenu); FileMenu_DeleteAllItems (hmenu); menudata = FM_GetMenuInfo(hmenu); if ( menudata->pidl) { SHFree( menudata->pidl); } HeapFree(GetProcessHeap(), 0, menudata); DestroyMenu (hmenu); } /************************************************************************* * FileMenu_AppendItemAW [SHELL32.115] * */ BOOL WINAPI FileMenu_AppendItemA( HMENU hMenu, LPCSTR lpText, UINT uID, int icon, HMENU hMenuPopup, int nItemHeight) { LPSTR lpszText = (LPSTR)lpText; MENUITEMINFOA mii; LPFMITEM myItem; LPFMINFO menudata; MENUINFO MenuInfo; TRACE("0x%08x %s 0x%08x 0x%08x 0x%08x 0x%08x\n", hMenu, (lpszText!=FM_SEPARATOR) ? lpText: NULL, uID, icon, hMenuPopup, nItemHeight); ZeroMemory (&mii, sizeof(MENUITEMINFOA)); mii.cbSize = sizeof(MENUITEMINFOA); if (lpText != FM_SEPARATOR) { int len = strlen (lpText); myItem = (LPFMITEM) SHAlloc( sizeof(FMITEM) + len); strcpy (myItem->szItemText, lpText); myItem->cchItemText = len; myItem->iIconIndex = icon; myItem->hMenu = hMenu; mii.fMask = MIIM_DATA; mii.dwItemData = (DWORD) myItem; } if ( hMenuPopup ) { /* sub menu */ mii.fMask |= MIIM_TYPE | MIIM_SUBMENU; mii.fType = MFT_OWNERDRAW; mii.hSubMenu = hMenuPopup; } else if (lpText == FM_SEPARATOR ) { mii.fMask |= MIIM_ID | MIIM_TYPE; mii.fType = MFT_SEPARATOR; } else { /* normal item */ mii.fMask |= MIIM_ID | MIIM_TYPE | MIIM_STATE; mii.fState = MFS_ENABLED | MFS_DEFAULT; mii.fType = MFT_OWNERDRAW; } mii.wID = uID; InsertMenuItemA (hMenu, (UINT)-1, TRUE, &mii); /* set bFixedItems to true */ MenuInfo.cbSize = sizeof(MENUINFO); MenuInfo.fMask = MIM_MENUDATA; if (! GetMenuInfo(hMenu, &MenuInfo)) return FALSE; menudata = (LPFMINFO)MenuInfo.dwMenuData; if ((menudata == 0) || (MenuInfo.cbSize != sizeof(MENUINFO))) { ERR("menudata corrupt: %p %lu\n", menudata, MenuInfo.cbSize); return 0; } menudata->bFixedItems = TRUE; SetMenuInfo(hMenu, &MenuInfo); return TRUE; } BOOL WINAPI FileMenu_AppendItemAW( HMENU hMenu, LPCVOID lpText, UINT uID, int icon, HMENU hMenuPopup, int nItemHeight) { BOOL ret; LPSTR lpszText=NULL; if (VERSION_OsIsUnicode() && (lpText!=FM_SEPARATOR)) lpszText = HEAP_strdupWtoA ( GetProcessHeap(),0, lpText); ret = FileMenu_AppendItemA(hMenu, (lpszText) ? lpszText : lpText, uID, icon, hMenuPopup, nItemHeight); if (lpszText) HeapFree( GetProcessHeap(), 0, lpszText ); return ret; } /************************************************************************* * FileMenu_InsertUsingPidl [SHELL32.110] * * NOTES * uEnumFlags any SHCONTF flag */ int WINAPI FileMenu_InsertUsingPidl ( HMENU hmenu, UINT uID, LPCITEMIDLIST pidl, UINT uFlags, UINT uEnumFlags, LPFNFMCALLBACK lpfnCallback) { TRACE("0x%08x 0x%08x %p 0x%08x 0x%08x %p\n", hmenu, uID, pidl, uFlags, uEnumFlags, lpfnCallback); pdump (pidl); bAbortInit = FALSE; FM_SetMenuParameter(hmenu, uID, pidl, uFlags, uEnumFlags, lpfnCallback); return FM_InitMenuPopup(hmenu, NULL); } /************************************************************************* * FileMenu_ReplaceUsingPidl [SHELL32.113] * * FIXME: the static items are deleted but wont be refreshed */ int WINAPI FileMenu_ReplaceUsingPidl( HMENU hmenu, UINT uID, LPCITEMIDLIST pidl, UINT uEnumFlags, LPFNFMCALLBACK lpfnCallback) { TRACE("0x%08x 0x%08x %p 0x%08x %p\n", hmenu, uID, pidl, uEnumFlags, lpfnCallback); FileMenu_DeleteAllItems (hmenu); FM_SetMenuParameter(hmenu, uID, pidl, 0, uEnumFlags, lpfnCallback); return FM_InitMenuPopup(hmenu, NULL); } /************************************************************************* * FileMenu_Invalidate [SHELL32.111] */ void WINAPI FileMenu_Invalidate (HMENU hMenu) { FIXME("0x%08x\n",hMenu); } /************************************************************************* * FileMenu_FindSubMenuByPidl [SHELL32.106] */ HMENU WINAPI FileMenu_FindSubMenuByPidl( HMENU hMenu, LPCITEMIDLIST pidl) { FIXME("0x%08x %p\n",hMenu, pidl); return 0; } /************************************************************************* * FileMenu_AppendFilesForPidl [SHELL32.124] */ int WINAPI FileMenu_AppendFilesForPidl( HMENU hmenu, LPCITEMIDLIST pidl, BOOL bAddSeperator) { LPFMINFO menudata; menudata = FM_GetMenuInfo(hmenu); menudata->bInitialized = FALSE; FM_InitMenuPopup(hmenu, pidl); if (bAddSeperator) FileMenu_AppendItemA (hmenu, FM_SEPARATOR, 0, 0, 0, FM_DEFAULT_HEIGHT); TRACE("0x%08x %p 0x%08x\n",hmenu, pidl,bAddSeperator); return 0; } /************************************************************************* * FileMenu_AddFilesForPidl [SHELL32.125] * * NOTES * uEnumFlags any SHCONTF flag */ int WINAPI FileMenu_AddFilesForPidl ( HMENU hmenu, UINT uReserved, UINT uID, LPCITEMIDLIST pidl, UINT uFlags, UINT uEnumFlags, LPFNFMCALLBACK lpfnCallback) { TRACE("0x%08x 0x%08x 0x%08x %p 0x%08x 0x%08x %p\n", hmenu, uReserved, uID, pidl, uFlags, uEnumFlags, lpfnCallback); return FileMenu_InsertUsingPidl ( hmenu, uID, pidl, uFlags, uEnumFlags, lpfnCallback); } /************************************************************************* * FileMenu_TrackPopupMenuEx [SHELL32.116] */ BOOL WINAPI FileMenu_TrackPopupMenuEx ( HMENU hMenu, UINT uFlags, int x, int y, HWND hWnd, LPTPMPARAMS lptpm) { TRACE("0x%08x 0x%08x 0x%x 0x%x 0x%08x %p\n", hMenu, uFlags, x, y, hWnd, lptpm); return TrackPopupMenuEx(hMenu, uFlags, x, y, hWnd, lptpm); } /************************************************************************* * FileMenu_GetLastSelectedItemPidls [SHELL32.107] */ BOOL WINAPI FileMenu_GetLastSelectedItemPidls( UINT uReserved, LPCITEMIDLIST *ppidlFolder, LPCITEMIDLIST *ppidlItem) { FIXME("0x%08x %p %p\n",uReserved, ppidlFolder, ppidlItem); return 0; } #define FM_ICON_SIZE 16 #define FM_Y_SPACE 4 #define FM_SPACE1 4 #define FM_SPACE2 2 #define FM_LEFTBORDER 2 #define FM_RIGHTBORDER 8 /************************************************************************* * FileMenu_MeasureItem [SHELL32.112] */ LRESULT WINAPI FileMenu_MeasureItem( HWND hWnd, LPMEASUREITEMSTRUCT lpmis) { LPFMITEM pMyItem = (LPFMITEM)(lpmis->itemData); HDC hdc = GetDC(hWnd); SIZE size; LPFMINFO menuinfo; TRACE("0x%08x %p %s\n", hWnd, lpmis, pMyItem->szItemText); GetTextExtentPoint32A(hdc, pMyItem->szItemText, pMyItem->cchItemText, &size); lpmis->itemWidth = size.cx + FM_LEFTBORDER + FM_ICON_SIZE + FM_SPACE1 + FM_SPACE2 + FM_RIGHTBORDER; lpmis->itemHeight = (size.cy > (FM_ICON_SIZE + FM_Y_SPACE)) ? size.cy : (FM_ICON_SIZE + FM_Y_SPACE); /* add the menubitmap */ menuinfo = FM_GetMenuInfo(pMyItem->hMenu); if (menuinfo->nBorderWidth) lpmis->itemWidth += menuinfo->nBorderWidth; TRACE("-- 0x%04x 0x%04x\n", lpmis->itemWidth, lpmis->itemHeight); ReleaseDC (hWnd, hdc); return 0; } /************************************************************************* * FileMenu_DrawItem [SHELL32.105] */ LRESULT WINAPI FileMenu_DrawItem( HWND hWnd, LPDRAWITEMSTRUCT lpdis) { LPFMITEM pMyItem = (LPFMITEM)(lpdis->itemData); COLORREF clrPrevText, clrPrevBkgnd; int xi,yi,xt,yt; HIMAGELIST hImageList; RECT TextRect, BorderRect; LPFMINFO menuinfo; TRACE("0x%08x %p %s\n", hWnd, lpdis, pMyItem->szItemText); if (lpdis->itemState & ODS_SELECTED) { clrPrevText = SetTextColor(lpdis->hDC, GetSysColor (COLOR_HIGHLIGHTTEXT)); clrPrevBkgnd = SetBkColor(lpdis->hDC, GetSysColor (COLOR_HIGHLIGHT)); } else { clrPrevText = SetTextColor(lpdis->hDC, GetSysColor (COLOR_MENUTEXT)); clrPrevBkgnd = SetBkColor(lpdis->hDC, GetSysColor (COLOR_MENU)); } CopyRect(&TextRect, &(lpdis->rcItem)); /* add the menubitmap */ menuinfo = FM_GetMenuInfo(pMyItem->hMenu); if (menuinfo->nBorderWidth) TextRect.left += menuinfo->nBorderWidth; BorderRect.right = menuinfo->nBorderWidth; /* FillRect(lpdis->hDC, &BorderRect, CreateSolidBrush( menuinfo->crBorderColor)); */ TextRect.left += FM_LEFTBORDER; xi = TextRect.left + FM_SPACE1; yi = TextRect.top + FM_Y_SPACE/2; TextRect.bottom -= FM_Y_SPACE/2; xt = xi + FM_ICON_SIZE + FM_SPACE2; yt = yi; ExtTextOutA (lpdis->hDC, xt , yt, ETO_OPAQUE, &TextRect, pMyItem->szItemText, pMyItem->cchItemText, NULL); Shell_GetImageList(0, &hImageList); pImageList_Draw(hImageList, pMyItem->iIconIndex, lpdis->hDC, xi, yi, ILD_NORMAL); TRACE("-- 0x%04x 0x%04x 0x%04x 0x%04x\n", TextRect.left, TextRect.top, TextRect.right, TextRect.bottom); SetTextColor(lpdis->hDC, clrPrevText); SetBkColor(lpdis->hDC, clrPrevBkgnd); return TRUE; } /************************************************************************* * FileMenu_InitMenuPopup [SHELL32.109] * * NOTES * The filemenu is a ownerdrawn menu. Call this function responding to * WM_INITPOPUPMENU * */ BOOL WINAPI FileMenu_InitMenuPopup (HMENU hmenu) { FM_InitMenuPopup(hmenu, NULL); return TRUE; } /************************************************************************* * FileMenu_HandleMenuChar [SHELL32.108] */ LRESULT WINAPI FileMenu_HandleMenuChar( HMENU hMenu, WPARAM wParam) { FIXME("0x%08x 0x%08x\n",hMenu,wParam); return 0; } /************************************************************************* * FileMenu_DeleteAllItems [SHELL32.104] * * NOTES * exported by name */ BOOL WINAPI FileMenu_DeleteAllItems (HMENU hmenu) { MENUITEMINFOA mii; LPFMINFO menudata; int i; TRACE("0x%08x\n", hmenu); ZeroMemory ( &mii, sizeof(MENUITEMINFOA)); mii.cbSize = sizeof(MENUITEMINFOA); mii.fMask = MIIM_SUBMENU|MIIM_DATA; for (i = 0; i < GetMenuItemCount( hmenu ); i++) { GetMenuItemInfoA(hmenu, i, TRUE, &mii ); if (mii.dwItemData) SHFree((LPFMINFO)mii.dwItemData); if (mii.hSubMenu) FileMenu_Destroy(mii.hSubMenu); } while (DeleteMenu (hmenu, 0, MF_BYPOSITION)){}; menudata = FM_GetMenuInfo(hmenu); menudata->bInitialized = FALSE; return TRUE; } /************************************************************************* * FileMenu_DeleteItemByCmd [SHELL32.] * */ BOOL WINAPI FileMenu_DeleteItemByCmd (HMENU hMenu, UINT uID) { MENUITEMINFOA mii; TRACE("0x%08x 0x%08x\n", hMenu, uID); ZeroMemory ( &mii, sizeof(MENUITEMINFOA)); mii.cbSize = sizeof(MENUITEMINFOA); mii.fMask = MIIM_SUBMENU; GetMenuItemInfoA(hMenu, uID, FALSE, &mii ); if ( mii.hSubMenu ); DeleteMenu(hMenu, MF_BYCOMMAND, uID); return TRUE; } /************************************************************************* * FileMenu_DeleteItemByIndex [SHELL32.140] */ BOOL WINAPI FileMenu_DeleteItemByIndex ( HMENU hMenu, UINT uPos) { MENUITEMINFOA mii; TRACE("0x%08x 0x%08x\n", hMenu, uPos); ZeroMemory ( &mii, sizeof(MENUITEMINFOA)); mii.cbSize = sizeof(MENUITEMINFOA); mii.fMask = MIIM_SUBMENU; GetMenuItemInfoA(hMenu, uPos, TRUE, &mii ); if ( mii.hSubMenu ); DeleteMenu(hMenu, MF_BYPOSITION, uPos); return TRUE; } /************************************************************************* * FileMenu_DeleteItemByFirstID [SHELL32.141] */ BOOL WINAPI FileMenu_DeleteItemByFirstID( HMENU hMenu, UINT uID) { TRACE("0x%08x 0x%08x\n", hMenu, uID); return 0; } /************************************************************************* * FileMenu_DeleteSeparator [SHELL32.142] */ BOOL WINAPI FileMenu_DeleteSeparator(HMENU hMenu) { TRACE("0x%08x\n", hMenu); return 0; } /************************************************************************* * FileMenu_EnableItemByCmd [SHELL32.143] */ BOOL WINAPI FileMenu_EnableItemByCmd( HMENU hMenu, UINT uID, BOOL bEnable) { TRACE("0x%08x 0x%08x 0x%08x\n", hMenu, uID,bEnable); return 0; } /************************************************************************* * FileMenu_GetItemExtent [SHELL32.144] * * NOTES * if the menu is to big, entrys are getting cut away!! */ DWORD WINAPI FileMenu_GetItemExtent (HMENU hMenu, UINT uPos) { RECT rect; FIXME("0x%08x 0x%08x\n", hMenu, uPos); if (GetMenuItemRect(0, hMenu, uPos, &rect)) { FIXME("0x%04x 0x%04x 0x%04x 0x%04x\n", rect.right, rect.left, rect.top, rect.bottom); return ((rect.right-rect.left)<<16) + (rect.top-rect.bottom); } return 0x00100010; /*fixme*/ } /************************************************************************* * FileMenu_AbortInitMenu [SHELL32.120] * */ void WINAPI FileMenu_AbortInitMenu (void) { TRACE("\n"); bAbortInit = TRUE; } /************************************************************************* * SHFind_InitMenuPopup [SHELL32.149] * * * PARAMETERS * hMenu [in] handle of menu previously created * hWndParent [in] parent window * w [in] no pointer (0x209 over here) perhaps menu IDs ??? * x [in] no pointer (0x226 over here) * * RETURNS * LPXXXXX pointer to struct containing a func addr at offset 8 * or NULL at failure. */ LPVOID WINAPI SHFind_InitMenuPopup (HMENU hMenu, HWND hWndParent, DWORD w, DWORD x) { FIXME("hmenu=0x%08x hwnd=0x%08x 0x%08lx 0x%08lx stub\n", hMenu,hWndParent,w,x); return NULL; /* this is supposed to be a pointer */ } /************************************************************************* * Shell_MergeMenus [SHELL32.67] * */ BOOL _SHIsMenuSeparator(HMENU hm, int i) { MENUITEMINFOA mii; mii.cbSize = sizeof(MENUITEMINFOA); mii.fMask = MIIM_TYPE; mii.cch = 0; /* WARNING: We MUST initialize it to 0*/ if (!GetMenuItemInfoA(hm, i, TRUE, &mii)) { return(FALSE); } if (mii.fType & MFT_SEPARATOR) { return(TRUE); } return(FALSE); } HRESULT WINAPI Shell_MergeMenus (HMENU hmDst, HMENU hmSrc, UINT uInsert, UINT uIDAdjust, UINT uIDAdjustMax, ULONG uFlags) { int nItem; HMENU hmSubMenu; BOOL bAlreadySeparated; MENUITEMINFOA miiSrc; char szName[256]; UINT uTemp, uIDMax = uIDAdjust; TRACE("hmenu1=0x%04x hmenu2=0x%04x 0x%04x 0x%04x 0x%04x 0x%04lx\n", hmDst, hmSrc, uInsert, uIDAdjust, uIDAdjustMax, uFlags); if (!hmDst || !hmSrc) { return uIDMax; } nItem = GetMenuItemCount(hmDst); if (uInsert >= (UINT)nItem) /* insert position inside menu? */ { uInsert = (UINT)nItem; /* append on the end */ bAlreadySeparated = TRUE; } else { bAlreadySeparated = _SHIsMenuSeparator(hmDst, uInsert);; } if ((uFlags & MM_ADDSEPARATOR) && !bAlreadySeparated) { /* Add a separator between the menus */ InsertMenuA(hmDst, uInsert, MF_BYPOSITION | MF_SEPARATOR, 0, NULL); bAlreadySeparated = TRUE; } /* Go through the menu items and clone them*/ for (nItem = GetMenuItemCount(hmSrc) - 1; nItem >= 0; nItem--) { miiSrc.cbSize = sizeof(MENUITEMINFOA); miiSrc.fMask = MIIM_STATE | MIIM_ID | MIIM_SUBMENU | MIIM_CHECKMARKS | MIIM_TYPE | MIIM_DATA; /* We need to reset this every time through the loop in case menus DON'T have IDs*/ miiSrc.fType = MFT_STRING; miiSrc.dwTypeData = szName; miiSrc.dwItemData = 0; miiSrc.cch = sizeof(szName); if (!GetMenuItemInfoA(hmSrc, nItem, TRUE, &miiSrc)) { continue; } /* TRACE("found menu=0x%04x %s id=0x%04x mask=0x%08x smenu=0x%04x\n", hmSrc, debugstr_a(miiSrc.dwTypeData), miiSrc.wID, miiSrc.fMask, miiSrc.hSubMenu); */ if (miiSrc.fType & MFT_SEPARATOR) { /* This is a separator; don't put two of them in a row */ if (bAlreadySeparated) continue; bAlreadySeparated = TRUE; } else if (miiSrc.hSubMenu) { if (uFlags & MM_SUBMENUSHAVEIDS) { miiSrc.wID += uIDAdjust; /* add uIDAdjust to the ID */ if (miiSrc.wID > uIDAdjustMax) /* skip ID's higher uIDAdjustMax */ continue; if (uIDMax <= miiSrc.wID) /* remember the highest ID */ uIDMax = miiSrc.wID + 1; } else { miiSrc.fMask &= ~MIIM_ID; /* Don't set IDs for submenus that didn't have them already */ } hmSubMenu = miiSrc.hSubMenu; miiSrc.hSubMenu = CreatePopupMenu(); if (!miiSrc.hSubMenu) return(uIDMax); uTemp = Shell_MergeMenus(miiSrc.hSubMenu, hmSubMenu, 0, uIDAdjust, uIDAdjustMax, uFlags & MM_SUBMENUSHAVEIDS); if (uIDMax <= uTemp) uIDMax = uTemp; bAlreadySeparated = FALSE; } else /* normal menu item */ { miiSrc.wID += uIDAdjust; /* add uIDAdjust to the ID */ if (miiSrc.wID > uIDAdjustMax) /* skip ID's higher uIDAdjustMax */ continue; if (uIDMax <= miiSrc.wID) /* remember the highest ID */ uIDMax = miiSrc.wID + 1; bAlreadySeparated = FALSE; } /* TRACE("inserting menu=0x%04x %s id=0x%04x mask=0x%08x smenu=0x%04x\n", hmDst, debugstr_a(miiSrc.dwTypeData), miiSrc.wID, miiSrc.fMask, miiSrc.hSubMenu); */ if (!InsertMenuItemA(hmDst, uInsert, TRUE, &miiSrc)) { return(uIDMax); } } /* Ensure the correct number of separators at the beginning of the inserted menu items*/ if (uInsert == 0) { if (bAlreadySeparated) { DeleteMenu(hmDst, uInsert, MF_BYPOSITION); } } else { if (_SHIsMenuSeparator(hmDst, uInsert-1)) { if (bAlreadySeparated) { DeleteMenu(hmDst, uInsert, MF_BYPOSITION); } } else { if ((uFlags & MM_ADDSEPARATOR) && !bAlreadySeparated) { /* Add a separator between the menus*/ InsertMenuA(hmDst, uInsert, MF_BYPOSITION | MF_SEPARATOR, 0, NULL); } } } return(uIDMax); } wine-20000526/dlls/shell32/shlview.c0100644000175000001440000016205707102370712016513 0ustar julliardusers/* * ShellView * * Copyright 1998,1999 * * This is the view visualizing the data provied by the shellfolder. * No direct access to data from pidls should be done from here. * * FIXME: The order by part of the background context menu should be * buily according to the columns shown. * * FIXME: Load/Save the view state from/into the stream provied by * the ShellBrowser * * FIXME: CheckToolbar: handle the "new folder" and "folder up" button * * FIXME: ShellView_FillList: consider sort orders * * FIXME: implement the drag and drop in the old (msg-based) way * * FIXME: when the ShellView_WndProc gets a WM_NCDESTROY should we do a * Release() ??? */ #include #include #include "servprov.h" #include "wine/obj_base.h" #include "wine/obj_shellfolder.h" #include "wine/obj_shellview.h" #include "wine/obj_oleview.h" #include "wine/obj_commdlgbrowser.h" #include "wine/obj_shellbrowser.h" #include "wine/obj_dockingwindowframe.h" #include "wine/obj_extracticon.h" #include "wine/obj_dragdrop.h" #include "wine/undocshell.h" #include "shresdef.h" #include "spy.h" #include "debugtools.h" #include "winerror.h" #include "wine/winestring.h" #include "docobj.h" #include "pidl.h" #include "shell32_main.h" DEFAULT_DEBUG_CHANNEL(shell) typedef struct { BOOL bIsAscending; INT nHeaderID; INT nLastHeaderID; }LISTVIEW_SORT_INFO, *LPLISTVIEW_SORT_INFO; typedef struct { ICOM_VFIELD(IShellView); DWORD ref; ICOM_VTABLE(IOleCommandTarget)* lpvtblOleCommandTarget; ICOM_VTABLE(IDropTarget)* lpvtblDropTarget; ICOM_VTABLE(IDropSource)* lpvtblDropSource; ICOM_VTABLE(IViewObject)* lpvtblViewObject; IShellFolder* pSFParent; IShellFolder2* pSF2Parent; IShellBrowser* pShellBrowser; ICommDlgBrowser* pCommDlgBrowser; HWND hWnd; /* SHELLDLL_DefView */ HWND hWndList; /* ListView control */ HWND hWndParent; FOLDERSETTINGS FolderSettings; HMENU hMenu; UINT uState; UINT cidl; LPITEMIDLIST *apidl; LISTVIEW_SORT_INFO ListViewSortInfo; HANDLE hNotify; /* change notification handle */ HANDLE hAccel; } IShellViewImpl; static struct ICOM_VTABLE(IShellView) svvt; static struct ICOM_VTABLE(IOleCommandTarget) ctvt; #define _IOleCommandTarget_Offset ((int)(&(((IShellViewImpl*)0)->lpvtblOleCommandTarget))) #define _ICOM_THIS_From_IOleCommandTarget(class, name) class* This = (class*)(((char*)name)-_IOleCommandTarget_Offset); static struct ICOM_VTABLE(IDropTarget) dtvt; #define _IDropTarget_Offset ((int)(&(((IShellViewImpl*)0)->lpvtblDropTarget))) #define _ICOM_THIS_From_IDropTarget(class, name) class* This = (class*)(((char*)name)-_IDropTarget_Offset); static struct ICOM_VTABLE(IDropSource) dsvt; #define _IDropSource_Offset ((int)(&(((IShellViewImpl*)0)->lpvtblDropSource))) #define _ICOM_THIS_From_IDropSource(class, name) class* This = (class*)(((char*)name)-_IDropSource_Offset); static struct ICOM_VTABLE(IViewObject) vovt; #define _IViewObject_Offset ((int)(&(((IShellViewImpl*)0)->lpvtblViewObject))) #define _ICOM_THIS_From_IViewObject(class, name) class* This = (class*)(((char*)name)-_IViewObject_Offset); /* ListView Header ID's */ #define LISTVIEW_COLUMN_NAME 0 #define LISTVIEW_COLUMN_SIZE 1 #define LISTVIEW_COLUMN_TYPE 2 #define LISTVIEW_COLUMN_TIME 3 #define LISTVIEW_COLUMN_ATTRIB 4 /*menu items */ #define IDM_VIEW_FILES (FCIDM_SHVIEWFIRST + 0x500) #define IDM_VIEW_IDW (FCIDM_SHVIEWFIRST + 0x501) #define IDM_MYFILEITEM (FCIDM_SHVIEWFIRST + 0x502) #define ID_LISTVIEW 2000 #define SHV_CHANGE_NOTIFY WM_USER + 0x1111 #define TOOLBAR_ID (L"SHELLDLL_DefView") /*windowsx.h */ #define GET_WM_COMMAND_ID(wp, lp) LOWORD(wp) #define GET_WM_COMMAND_HWND(wp, lp) (HWND)(lp) #define GET_WM_COMMAND_CMD(wp, lp) HIWORD(wp) /* winuser.h */ #define WM_SETTINGCHANGE WM_WININICHANGE extern void WINAPI _InsertMenuItem (HMENU hmenu, UINT indexMenu, BOOL fByPosition, UINT wID, UINT fType, LPSTR dwTypeData, UINT fState); /* Items merged into the toolbar and and the filemenu */ typedef struct { int idCommand; int iImage; int idButtonString; int idMenuString; BYTE bState; BYTE bStyle; } MYTOOLINFO, *LPMYTOOLINFO; MYTOOLINFO Tools[] = { { FCIDM_SHVIEW_BIGICON, 0, 0, IDS_VIEW_LARGE, TBSTATE_ENABLED, TBSTYLE_BUTTON }, { FCIDM_SHVIEW_SMALLICON, 0, 0, IDS_VIEW_SMALL, TBSTATE_ENABLED, TBSTYLE_BUTTON }, { FCIDM_SHVIEW_LISTVIEW, 0, 0, IDS_VIEW_LIST, TBSTATE_ENABLED, TBSTYLE_BUTTON }, { FCIDM_SHVIEW_REPORTVIEW, 0, 0, IDS_VIEW_DETAILS, TBSTATE_ENABLED, TBSTYLE_BUTTON }, { -1, 0, 0, 0, 0, 0} }; typedef void (CALLBACK *PFNSHGETSETTINGSPROC)(LPSHELLFLAGSTATE lpsfs, DWORD dwMask); /********************************************************** * IShellView_Constructor */ IShellView * IShellView_Constructor( IShellFolder * pFolder) { IShellViewImpl * sv; sv=(IShellViewImpl*)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IShellViewImpl)); sv->ref=1; ICOM_VTBL(sv)=&svvt; sv->lpvtblOleCommandTarget=&ctvt; sv->lpvtblDropTarget=&dtvt; sv->lpvtblDropSource=&dsvt; sv->lpvtblViewObject=&vovt; sv->pSFParent = pFolder; if(pFolder) IShellFolder_AddRef(pFolder); IShellFolder_QueryInterface(sv->pSFParent, &IID_IShellFolder2, (LPVOID*)&sv->pSF2Parent); TRACE("(%p)->(%p)\n",sv, pFolder); shell32_ObjCount++; return (IShellView *) sv; } /********************************************************** * * ##### helperfunctions for communication with ICommDlgBrowser ##### */ static BOOL IsInCommDlg(IShellViewImpl * This) { return(This->pCommDlgBrowser != NULL); } static HRESULT IncludeObject(IShellViewImpl * This, LPCITEMIDLIST pidl) { HRESULT ret = S_OK; if ( IsInCommDlg(This) ) { TRACE("ICommDlgBrowser::IncludeObject pidl=%p\n", pidl); ret = ICommDlgBrowser_IncludeObject(This->pCommDlgBrowser, (IShellView*)This, pidl); TRACE("--0x%08lx\n", ret); } return ret; } static HRESULT OnDefaultCommand(IShellViewImpl * This) { HRESULT ret = S_FALSE; if (IsInCommDlg(This)) { TRACE("ICommDlgBrowser::OnDefaultCommand\n"); ret = ICommDlgBrowser_OnDefaultCommand(This->pCommDlgBrowser, (IShellView*)This); TRACE("--\n"); } return ret; } static HRESULT OnStateChange(IShellViewImpl * This, UINT uFlags) { HRESULT ret = S_FALSE; if (IsInCommDlg(This)) { TRACE("ICommDlgBrowser::OnStateChange flags=%x\n", uFlags); ret = ICommDlgBrowser_OnStateChange(This->pCommDlgBrowser, (IShellView*)This, uFlags); TRACE("--\n"); } return ret; } /********************************************************** * set the toolbar of the filedialog buttons * * - activates the buttons from the shellbrowser according to * the view state */ static void CheckToolbar(IShellViewImpl * This) { LRESULT result; TRACE("\n"); if (IsInCommDlg(This)) { IShellBrowser_SendControlMsg(This->pShellBrowser, FCW_TOOLBAR, TB_CHECKBUTTON, FCIDM_TB_SMALLICON, (This->FolderSettings.ViewMode==FVM_LIST)? TRUE : FALSE, &result); IShellBrowser_SendControlMsg(This->pShellBrowser, FCW_TOOLBAR, TB_CHECKBUTTON, FCIDM_TB_REPORTVIEW, (This->FolderSettings.ViewMode==FVM_DETAILS)? TRUE : FALSE, &result); IShellBrowser_SendControlMsg(This->pShellBrowser, FCW_TOOLBAR, TB_ENABLEBUTTON, FCIDM_TB_SMALLICON, TRUE, &result); IShellBrowser_SendControlMsg(This->pShellBrowser, FCW_TOOLBAR, TB_ENABLEBUTTON, FCIDM_TB_REPORTVIEW, TRUE, &result); } } /********************************************************** * * ##### helperfunctions for initializing the view ##### */ /********************************************************** * change the style of the listview control */ static void SetStyle(IShellViewImpl * This, DWORD dwAdd, DWORD dwRemove) { DWORD tmpstyle; TRACE("(%p)\n", This); tmpstyle = GetWindowLongA(This->hWndList, GWL_STYLE); SetWindowLongA(This->hWndList, GWL_STYLE, dwAdd | (tmpstyle & ~dwRemove)); } /********************************************************** * ShellView_CreateList() * * - creates the list view window */ static BOOL ShellView_CreateList (IShellViewImpl * This) { DWORD dwStyle; TRACE("%p\n",This); dwStyle = WS_TABSTOP | WS_VISIBLE | WS_CHILDWINDOW | WS_CLIPSIBLINGS | WS_CLIPCHILDREN | LVS_SHAREIMAGELISTS | LVS_EDITLABELS | LVS_ALIGNLEFT | LVS_AUTOARRANGE; switch (This->FolderSettings.ViewMode) { case FVM_ICON: dwStyle |= LVS_ICON; break; case FVM_DETAILS: dwStyle |= LVS_REPORT; break; case FVM_SMALLICON: dwStyle |= LVS_SMALLICON; break; case FVM_LIST: dwStyle |= LVS_LIST; break; default: dwStyle |= LVS_LIST; break; } if (This->FolderSettings.fFlags & FWF_AUTOARRANGE) dwStyle |= LVS_AUTOARRANGE; /*if (This->FolderSettings.fFlags && FWF_DESKTOP); used from explorer*/ if (This->FolderSettings.fFlags & FWF_SINGLESEL) dwStyle |= LVS_SINGLESEL; This->hWndList=CreateWindowExA( WS_EX_CLIENTEDGE, WC_LISTVIEWA, NULL, dwStyle, 0,0,0,0, This->hWnd, (HMENU)ID_LISTVIEW, shell32_hInstance, NULL); if(!This->hWndList) return FALSE; This->ListViewSortInfo.bIsAscending = TRUE; This->ListViewSortInfo.nHeaderID = -1; This->ListViewSortInfo.nLastHeaderID = -1; /* UpdateShellSettings(); */ return TRUE; } /********************************************************** * ShellView_InitList() * * - adds all needed columns to the shellview */ static BOOL ShellView_InitList(IShellViewImpl * This) { LVCOLUMNA lvColumn; SHELLDETAILS sd; int i; char szTemp[50]; TRACE("%p\n",This); ListView_DeleteAllItems(This->hWndList); lvColumn.mask = LVCF_FMT | LVCF_WIDTH | LVCF_TEXT; lvColumn.pszText = szTemp; if (This->pSF2Parent) { for (i=0; 1; i++) { if (!SUCCEEDED(IShellFolder2_GetDetailsOf(This->pSF2Parent, NULL, i, &sd))) break; lvColumn.fmt = sd.fmt; lvColumn.cx = sd.cxChar*8; /* chars->pixel */ StrRetToStrNA( szTemp, 50, &sd.str, NULL); ListView_InsertColumnA(This->hWndList, i, &lvColumn); } } else { FIXME("no SF2\n"); } ListView_SetImageList(This->hWndList, ShellSmallIconList, LVSIL_SMALL); ListView_SetImageList(This->hWndList, ShellBigIconList, LVSIL_NORMAL); return TRUE; } /********************************************************** * ShellView_CompareItems() * * NOTES * internal, CALLBACK for DSA_Sort */ static INT CALLBACK ShellView_CompareItems(LPVOID lParam1, LPVOID lParam2, LPARAM lpData) { int ret; TRACE("pidl1=%p pidl2=%p lpsf=%p\n", lParam1, lParam2, (LPVOID) lpData); if(!lpData) return 0; ret = (SHORT) SCODE_CODE(IShellFolder_CompareIDs((LPSHELLFOLDER)lpData, 0, (LPITEMIDLIST)lParam1, (LPITEMIDLIST)lParam2)); TRACE("ret=%i\n",ret); return ret; } /************************************************************************* * ShellView_ListViewCompareItems * * Compare Function for the Listview (FileOpen Dialog) * * PARAMS * lParam1 [I] the first ItemIdList to compare with * lParam2 [I] the second ItemIdList to compare with * lpData [I] The column ID for the header Ctrl to process * * RETURNS * A negative value if the first item should precede the second, * a positive value if the first item should follow the second, * or zero if the two items are equivalent * * NOTES * FIXME: function does what ShellView_CompareItems is supposed to do. * unify it and figure out how to use the undocumented first parameter * of IShellFolder_CompareIDs to do the job this function does and * move this code to IShellFolder. * make LISTVIEW_SORT_INFO obsolete * the way this function works is only usable if we had only * filesystemfolders (25/10/99 jsch) */ static INT CALLBACK ShellView_ListViewCompareItems(LPVOID lParam1, LPVOID lParam2, LPARAM lpData) { INT nDiff=0; FILETIME fd1, fd2; char strName1[MAX_PATH], strName2[MAX_PATH]; BOOL bIsFolder1, bIsFolder2,bIsBothFolder; LPITEMIDLIST pItemIdList1 = (LPITEMIDLIST) lParam1; LPITEMIDLIST pItemIdList2 = (LPITEMIDLIST) lParam2; LISTVIEW_SORT_INFO *pSortInfo = (LPLISTVIEW_SORT_INFO) lpData; bIsFolder1 = _ILIsFolder(pItemIdList1); bIsFolder2 = _ILIsFolder(pItemIdList2); bIsBothFolder = bIsFolder1 && bIsFolder2; /* When sorting between a File and a Folder, the Folder gets sorted first */ if( (bIsFolder1 || bIsFolder2) && !bIsBothFolder) { nDiff = bIsFolder1 ? -1 : 1; } else { /* Sort by Time: Folders or Files can be sorted */ if(pSortInfo->nHeaderID == LISTVIEW_COLUMN_TIME) { _ILGetFileDateTime(pItemIdList1, &fd1); _ILGetFileDateTime(pItemIdList2, &fd2); nDiff = CompareFileTime(&fd2, &fd1); } /* Sort by Attribute: Folder or Files can be sorted */ else if(pSortInfo->nHeaderID == LISTVIEW_COLUMN_ATTRIB) { _ILGetFileAttributes(pItemIdList1, strName1, MAX_PATH); _ILGetFileAttributes(pItemIdList2, strName2, MAX_PATH); nDiff = strcasecmp(strName1, strName2); } /* Sort by FileName: Folder or Files can be sorted */ else if(pSortInfo->nHeaderID == LISTVIEW_COLUMN_NAME || bIsBothFolder) { /* Sort by Text */ _ILSimpleGetText(pItemIdList1, strName1, MAX_PATH); _ILSimpleGetText(pItemIdList2, strName2, MAX_PATH); nDiff = strcasecmp(strName1, strName2); } /* Sort by File Size, Only valid for Files */ else if(pSortInfo->nHeaderID == LISTVIEW_COLUMN_SIZE) { nDiff = (INT)(_ILGetFileSize(pItemIdList1, NULL, 0) - _ILGetFileSize(pItemIdList2, NULL, 0)); } /* Sort by File Type, Only valid for Files */ else if(pSortInfo->nHeaderID == LISTVIEW_COLUMN_TYPE) { /* Sort by Type */ _ILGetFileType(pItemIdList1, strName1, MAX_PATH); _ILGetFileType(pItemIdList2, strName2, MAX_PATH); nDiff = strcasecmp(strName1, strName2); } } /* If the Date, FileSize, FileType, Attrib was the same, sort by FileName */ if(nDiff == 0) { _ILSimpleGetText(pItemIdList1, strName1, MAX_PATH); _ILSimpleGetText(pItemIdList2, strName2, MAX_PATH); nDiff = strcasecmp(strName1, strName2); } if(!pSortInfo->bIsAscending) { nDiff = -nDiff; } return nDiff; } /********************************************************** * LV_FindItemByPidl() */ static int LV_FindItemByPidl( IShellViewImpl * This, LPCITEMIDLIST pidl) { LVITEMA lvItem; ZeroMemory(&lvItem, sizeof(LVITEMA)); lvItem.mask = LVIF_PARAM; for(lvItem.iItem = 0; ListView_GetItemA(This->hWndList, &lvItem); lvItem.iItem++) { LPITEMIDLIST currentpidl = (LPITEMIDLIST) lvItem.lParam; HRESULT hr = IShellFolder_CompareIDs(This->pSFParent, 0, pidl, currentpidl); if(SUCCEEDED(hr) && !HRESULT_CODE(hr)) { return lvItem.iItem; } } return -1; } /********************************************************** * LV_AddItem() */ static BOOLEAN LV_AddItem(IShellViewImpl * This, LPCITEMIDLIST pidl) { LVITEMA lvItem; TRACE("(%p)(pidl=%p)\n", This, pidl); ZeroMemory(&lvItem, sizeof(lvItem)); /* create the listview item*/ lvItem.mask = LVIF_TEXT | LVIF_IMAGE | LVIF_PARAM; /*set the mask*/ lvItem.iItem = ListView_GetItemCount(This->hWndList); /*add the item to the end of the list*/ lvItem.lParam = (LPARAM) ILClone(ILFindLastID(pidl)); /*set the item's data*/ lvItem.pszText = LPSTR_TEXTCALLBACKA; /*get text on a callback basis*/ lvItem.iImage = I_IMAGECALLBACK; /*get the image on a callback basis*/ return (-1==ListView_InsertItemA(This->hWndList, &lvItem))? FALSE: TRUE; } /********************************************************** * LV_DeleteItem() */ static BOOLEAN LV_DeleteItem(IShellViewImpl * This, LPCITEMIDLIST pidl) { int nIndex; TRACE("(%p)(pidl=%p)\n", This, pidl); nIndex = LV_FindItemByPidl(This, ILFindLastID(pidl)); return (-1==ListView_DeleteItem(This->hWndList, nIndex))? FALSE: TRUE; } /********************************************************** * LV_RenameItem() */ static BOOLEAN LV_RenameItem(IShellViewImpl * This, LPCITEMIDLIST pidlOld, LPCITEMIDLIST pidlNew ) { int nItem; LVITEMA lvItem; TRACE("(%p)(pidlold=%p pidlnew=%p)\n", This, pidlOld, pidlNew); nItem = LV_FindItemByPidl(This, ILFindLastID(pidlOld)); if ( -1 != nItem ) { ZeroMemory(&lvItem, sizeof(lvItem)); /* create the listview item*/ lvItem.mask = LVIF_PARAM; /* only the pidl */ lvItem.iItem = nItem; ListView_GetItemA(This->hWndList, &lvItem); SHFree((LPITEMIDLIST)lvItem.lParam); lvItem.mask = LVIF_PARAM; lvItem.iItem = nItem; lvItem.lParam = (LPARAM) ILClone(ILFindLastID(pidlNew)); /* set the item's data */ ListView_SetItemA(This->hWndList, &lvItem); ListView_Update(This->hWndList, nItem); return TRUE; /* fixme: better handling */ } return FALSE; } /********************************************************** * ShellView_FillList() * * - gets the objectlist from the shellfolder * - sorts the list * - fills the list into the view */ static HRESULT ShellView_FillList(IShellViewImpl * This) { LPENUMIDLIST pEnumIDList; LPITEMIDLIST pidl; DWORD dwFetched; UINT i; HRESULT hRes; HDPA hdpa; TRACE("%p\n",This); /* get the itemlist from the shfolder*/ hRes = IShellFolder_EnumObjects(This->pSFParent,This->hWnd, SHCONTF_NONFOLDERS | SHCONTF_FOLDERS, &pEnumIDList); if (hRes != S_OK) { if (hRes==S_FALSE) return(NOERROR); return(hRes); } /* create a pointer array */ hdpa = pDPA_Create(16); if (!hdpa) { return(E_OUTOFMEMORY); } /* copy the items into the array*/ while((S_OK == IEnumIDList_Next(pEnumIDList,1, &pidl, &dwFetched)) && dwFetched) { if (pDPA_InsertPtr(hdpa, 0x7fff, pidl) == -1) { SHFree(pidl); } } /* sort the array */ pDPA_Sort(hdpa, ShellView_CompareItems, (LPARAM)This->pSFParent); /*turn the listview's redrawing off*/ SendMessageA(This->hWndList, WM_SETREDRAW, FALSE, 0); for (i=0; i < DPA_GetPtrCount(hdpa); ++i) /* DPA_GetPtrCount is a macro*/ { pidl = (LPITEMIDLIST)pDPA_GetPtr(hdpa, i); /* in a commdlg This works as a filemask*/ if ( IncludeObject(This, pidl)==S_OK ) LV_AddItem(This, pidl); SHFree(pidl); } /*turn the listview's redrawing back on and force it to draw*/ SendMessageA(This->hWndList, WM_SETREDRAW, TRUE, 0); IEnumIDList_Release(pEnumIDList); /* destroy the list*/ pDPA_Destroy(hdpa); return S_OK; } /********************************************************** * ShellView_OnCreate() */ static LRESULT ShellView_OnCreate(IShellViewImpl * This) { IDropTarget* pdt; NOTIFYREGISTER ntreg; IPersistFolder2 * ppf2 = NULL; TRACE("%p\n",This); if(ShellView_CreateList(This)) { if(ShellView_InitList(This)) { ShellView_FillList(This); } } if(GetShellOle()) { if (SUCCEEDED(IShellFolder_CreateViewObject(This->pSFParent, This->hWnd, &IID_IDropTarget, (LPVOID*)&pdt))) { pRegisterDragDrop(This->hWnd, pdt); IDropTarget_Release(pdt); } } /* register for receiving notifications */ IShellFolder_QueryInterface(This->pSFParent, &IID_IPersistFolder2, (LPVOID*)&ppf2); if (ppf2) { IPersistFolder2_GetCurFolder(ppf2, &ntreg.pidlPath); ntreg.bWatchSubtree = FALSE; This->hNotify = SHChangeNotifyRegister(This->hWnd, SHCNF_IDLIST, SHCNE_ALLEVENTS, SHV_CHANGE_NOTIFY, 1, &ntreg); SHFree(ntreg.pidlPath); IPersistFolder2_Release(ppf2); } This->hAccel = LoadAcceleratorsA(shell32_hInstance, "shv_accel"); return S_OK; } /********************************************************** * #### Handling of the menus #### */ /********************************************************** * ShellView_BuildFileMenu() */ static HMENU ShellView_BuildFileMenu(IShellViewImpl * This) { CHAR szText[MAX_PATH]; MENUITEMINFOA mii; int nTools,i; HMENU hSubMenu; TRACE("(%p)\n",This); hSubMenu = CreatePopupMenu(); if(hSubMenu) { /*get the number of items in our global array*/ for(nTools = 0; Tools[nTools].idCommand != -1; nTools++){} /*add the menu items*/ for(i = 0; i < nTools; i++) { LoadStringA(shell32_hInstance, Tools[i].idMenuString, szText, MAX_PATH); ZeroMemory(&mii, sizeof(mii)); mii.cbSize = sizeof(mii); mii.fMask = MIIM_TYPE | MIIM_ID | MIIM_STATE; if(TBSTYLE_SEP != Tools[i].bStyle) /* no seperator*/ { mii.fType = MFT_STRING; mii.fState = MFS_ENABLED; mii.dwTypeData = szText; mii.wID = Tools[i].idCommand; } else { mii.fType = MFT_SEPARATOR; } /* tack This item onto the end of the menu */ InsertMenuItemA(hSubMenu, (UINT)-1, TRUE, &mii); } } TRACE("-- return (menu=0x%x)\n",hSubMenu); return hSubMenu; } /********************************************************** * ShellView_MergeFileMenu() */ static void ShellView_MergeFileMenu(IShellViewImpl * This, HMENU hSubMenu) { TRACE("(%p)->(submenu=0x%08x) stub\n",This,hSubMenu); if(hSubMenu) { /*insert This item at the beginning of the menu */ _InsertMenuItem(hSubMenu, 0, TRUE, 0, MFT_SEPARATOR, NULL, MFS_ENABLED); _InsertMenuItem(hSubMenu, 0, TRUE, IDM_MYFILEITEM, MFT_STRING, "dummy45", MFS_ENABLED); } TRACE("--\n"); } /********************************************************** * ShellView_MergeViewMenu() */ static void ShellView_MergeViewMenu(IShellViewImpl * This, HMENU hSubMenu) { MENUITEMINFOA mii; TRACE("(%p)->(submenu=0x%08x)\n",This,hSubMenu); if(hSubMenu) { /*add a separator at the correct position in the menu*/ _InsertMenuItem(hSubMenu, FCIDM_MENU_VIEW_SEP_OPTIONS, FALSE, 0, MFT_SEPARATOR, NULL, MFS_ENABLED); ZeroMemory(&mii, sizeof(mii)); mii.cbSize = sizeof(mii); mii.fMask = MIIM_SUBMENU | MIIM_TYPE | MIIM_DATA;; mii.fType = MFT_STRING; mii.dwTypeData = "View"; mii.hSubMenu = LoadMenuA(shell32_hInstance, "MENU_001"); InsertMenuItemA(hSubMenu, FCIDM_MENU_VIEW_SEP_OPTIONS, FALSE, &mii); } } /********************************************************** * ShellView_GetSelections() * * - fills the this->apidl list with the selected objects * * RETURNS * number of selected items */ static UINT ShellView_GetSelections(IShellViewImpl * This) { LVITEMA lvItem; UINT i = 0; if (This->apidl) { SHFree(This->apidl); } This->cidl = ListView_GetSelectedCount(This->hWndList); This->apidl = (LPITEMIDLIST*)SHAlloc(This->cidl * sizeof(LPITEMIDLIST)); TRACE("selected=%i\n", This->cidl); if(This->apidl) { TRACE("-- Items selected =%u\n", This->cidl); ZeroMemory(&lvItem, sizeof(lvItem)); lvItem.mask = LVIF_STATE | LVIF_PARAM; lvItem.stateMask = LVIS_SELECTED; while(ListView_GetItemA(This->hWndList, &lvItem) && (i < This->cidl)) { if(lvItem.state & LVIS_SELECTED) { This->apidl[i] = (LPITEMIDLIST)lvItem.lParam; i++; TRACE("-- selected Item found\n"); } lvItem.iItem++; } } return This->cidl; } /********************************************************** * ShellView_DoContextMenu() */ static void ShellView_DoContextMenu(IShellViewImpl * This, WORD x, WORD y, BOOL bDefault) { UINT uCommand; DWORD wFlags; HMENU hMenu; BOOL fExplore = FALSE; HWND hwndTree = 0; LPCONTEXTMENU pContextMenu = NULL; IContextMenu * pCM = NULL; CMINVOKECOMMANDINFO cmi; TRACE("(%p)->(0x%08x 0x%08x 0x%08x) stub\n",This, x, y, bDefault); /* look, what's selected and create a context menu object of it*/ if( ShellView_GetSelections(This) ) { IShellFolder_GetUIObjectOf( This->pSFParent, This->hWndParent, This->cidl, This->apidl, (REFIID)&IID_IContextMenu, NULL, (LPVOID *)&pContextMenu); if(pContextMenu) { TRACE("-- pContextMenu\n"); hMenu = CreatePopupMenu(); if( hMenu ) { /* See if we are in Explore or Open mode. If the browser's tree is present, we are in Explore mode.*/ if(SUCCEEDED(IShellBrowser_GetControlWindow(This->pShellBrowser,FCW_TREE, &hwndTree)) && hwndTree) { TRACE("-- explore mode\n"); fExplore = TRUE; } /* build the flags depending on what we can do with the selected item */ wFlags = CMF_NORMAL | (This->cidl != 1 ? 0 : CMF_CANRENAME) | (fExplore ? CMF_EXPLORE : 0); /* let the ContextMenu merge its items in */ if (SUCCEEDED(IContextMenu_QueryContextMenu( pContextMenu, hMenu, 0, FCIDM_SHVIEWFIRST, FCIDM_SHVIEWLAST, wFlags ))) { if( bDefault ) { TRACE("-- get menu default command\n"); uCommand = GetMenuDefaultItem(hMenu, FALSE, GMDI_GOINTOPOPUPS); } else { TRACE("-- track popup\n"); uCommand = TrackPopupMenu( hMenu,TPM_LEFTALIGN | TPM_RETURNCMD,x,y,0,This->hWnd,NULL); } if(uCommand > 0) { TRACE("-- uCommand=%u\n", uCommand); if (IsInCommDlg(This) && ((uCommand==FCIDM_SHVIEW_EXPLORE) || (uCommand==FCIDM_SHVIEW_OPEN))) { TRACE("-- dlg: OnDefaultCommand\n"); OnDefaultCommand(This); } else { TRACE("-- explore -- invoke command\n"); ZeroMemory(&cmi, sizeof(cmi)); cmi.cbSize = sizeof(cmi); cmi.hwnd = This->hWndParent; /* this window has to answer CWM_GETISHELLBROWSER */ cmi.lpVerb = (LPCSTR)MAKEINTRESOURCEA(uCommand); IContextMenu_InvokeCommand(pContextMenu, &cmi); } } DestroyMenu(hMenu); } } if (pContextMenu) IContextMenu_Release(pContextMenu); } } else /* background context menu */ { hMenu = CreatePopupMenu(); pCM = ISvBgCm_Constructor(This->pSFParent); IContextMenu_QueryContextMenu(pCM, hMenu, 0, FCIDM_SHVIEWFIRST, FCIDM_SHVIEWLAST, 0); uCommand = TrackPopupMenu( hMenu, TPM_LEFTALIGN | TPM_RETURNCMD,x,y,0,This->hWnd,NULL); DestroyMenu(hMenu); TRACE("-- (%p)->(uCommand=0x%08x )\n",This, uCommand); ZeroMemory(&cmi, sizeof(cmi)); cmi.cbSize = sizeof(cmi); cmi.lpVerb = (LPCSTR)MAKEINTRESOURCEA(uCommand); cmi.hwnd = This->hWndParent; IContextMenu_InvokeCommand(pCM, &cmi); IContextMenu_Release(pCM); } } /********************************************************** * ##### message handling ##### */ /********************************************************** * ShellView_OnSize() */ static LRESULT ShellView_OnSize(IShellViewImpl * This, WORD wWidth, WORD wHeight) { TRACE("%p width=%u height=%u\n",This, wWidth,wHeight); /*resize the ListView to fit our window*/ if(This->hWndList) { MoveWindow(This->hWndList, 0, 0, wWidth, wHeight, TRUE); } return S_OK; } /********************************************************** * ShellView_OnDeactivate() * * NOTES * internal */ static void ShellView_OnDeactivate(IShellViewImpl * This) { TRACE("%p\n",This); if(This->uState != SVUIA_DEACTIVATE) { if(This->hMenu) { IShellBrowser_SetMenuSB(This->pShellBrowser,0, 0, 0); IShellBrowser_RemoveMenusSB(This->pShellBrowser,This->hMenu); DestroyMenu(This->hMenu); This->hMenu = 0; } This->uState = SVUIA_DEACTIVATE; } } /********************************************************** * ShellView_OnActivate() */ static LRESULT ShellView_OnActivate(IShellViewImpl * This, UINT uState) { OLEMENUGROUPWIDTHS omw = { {0, 0, 0, 0, 0, 0} }; MENUITEMINFOA mii; CHAR szText[MAX_PATH]; TRACE("%p uState=%x\n",This,uState); /*don't do anything if the state isn't really changing */ if(This->uState == uState) { return S_OK; } ShellView_OnDeactivate(This); /*only do This if we are active */ if(uState != SVUIA_DEACTIVATE) { /*merge the menus */ This->hMenu = CreateMenu(); if(This->hMenu) { IShellBrowser_InsertMenusSB(This->pShellBrowser, This->hMenu, &omw); TRACE("-- after fnInsertMenusSB\n"); /*build the top level menu get the menu item's text*/ strcpy(szText,"dummy 31"); ZeroMemory(&mii, sizeof(mii)); mii.cbSize = sizeof(mii); mii.fMask = MIIM_SUBMENU | MIIM_TYPE | MIIM_STATE; mii.fType = MFT_STRING; mii.fState = MFS_ENABLED; mii.dwTypeData = szText; mii.hSubMenu = ShellView_BuildFileMenu(This); /*insert our menu into the menu bar*/ if(mii.hSubMenu) { InsertMenuItemA(This->hMenu, FCIDM_MENU_HELP, FALSE, &mii); } /*get the view menu so we can merge with it*/ ZeroMemory(&mii, sizeof(mii)); mii.cbSize = sizeof(mii); mii.fMask = MIIM_SUBMENU; if(GetMenuItemInfoA(This->hMenu, FCIDM_MENU_VIEW, FALSE, &mii)) { ShellView_MergeViewMenu(This, mii.hSubMenu); } /*add the items that should only be added if we have the focus*/ if(SVUIA_ACTIVATE_FOCUS == uState) { /*get the file menu so we can merge with it */ ZeroMemory(&mii, sizeof(mii)); mii.cbSize = sizeof(mii); mii.fMask = MIIM_SUBMENU; if(GetMenuItemInfoA(This->hMenu, FCIDM_MENU_FILE, FALSE, &mii)) { ShellView_MergeFileMenu(This, mii.hSubMenu); } } TRACE("-- before fnSetMenuSB\n"); IShellBrowser_SetMenuSB(This->pShellBrowser, This->hMenu, 0, This->hWnd); } } This->uState = uState; TRACE("--\n"); return S_OK; } /********************************************************** * ShellView_OnSetFocus() * */ static LRESULT ShellView_OnSetFocus(IShellViewImpl * This) { TRACE("%p\n",This); /* Tell the browser one of our windows has received the focus. This should always be done before merging menus (OnActivate merges the menus) if one of our windows has the focus.*/ IShellBrowser_OnViewWindowActive(This->pShellBrowser,(IShellView*) This); ShellView_OnActivate(This, SVUIA_ACTIVATE_FOCUS); /* Set the focus to the listview */ SetFocus(This->hWndList); /* Notify the ICommDlgBrowser interface */ OnStateChange(This,CDBOSC_SETFOCUS); return 0; } /********************************************************** * ShellView_OnKillFocus() */ static LRESULT ShellView_OnKillFocus(IShellViewImpl * This) { TRACE("(%p) stub\n",This); ShellView_OnActivate(This, SVUIA_ACTIVATE_NOFOCUS); /* Notify the ICommDlgBrowser */ OnStateChange(This,CDBOSC_KILLFOCUS); return 0; } /********************************************************** * ShellView_OnCommand() * * NOTES * the CmdID's are the ones from the context menu */ static LRESULT ShellView_OnCommand(IShellViewImpl * This,DWORD dwCmdID, DWORD dwCmd, HWND hwndCmd) { TRACE("(%p)->(0x%08lx 0x%08lx 0x%08x) stub\n",This, dwCmdID, dwCmd, hwndCmd); switch(dwCmdID) { case FCIDM_SHVIEW_SMALLICON: This->FolderSettings.ViewMode = FVM_SMALLICON; SetStyle (This, LVS_SMALLICON, LVS_TYPEMASK); CheckToolbar(This); break; case FCIDM_SHVIEW_BIGICON: This->FolderSettings.ViewMode = FVM_ICON; SetStyle (This, LVS_ICON, LVS_TYPEMASK); CheckToolbar(This); break; case FCIDM_SHVIEW_LISTVIEW: This->FolderSettings.ViewMode = FVM_LIST; SetStyle (This, LVS_LIST, LVS_TYPEMASK); CheckToolbar(This); break; case FCIDM_SHVIEW_REPORTVIEW: This->FolderSettings.ViewMode = FVM_DETAILS; SetStyle (This, LVS_REPORT, LVS_TYPEMASK); CheckToolbar(This); break; /* the menu-ID's for sorting are 0x30... see shrec.rc */ case 0x30: case 0x31: case 0x32: case 0x33: This->ListViewSortInfo.nHeaderID = (LPARAM) (dwCmdID - 0x30); This->ListViewSortInfo.bIsAscending = TRUE; This->ListViewSortInfo.nLastHeaderID = This->ListViewSortInfo.nHeaderID; ListView_SortItems(This->hWndList, ShellView_ListViewCompareItems, (LPARAM) (&(This->ListViewSortInfo))); break; default: TRACE("-- COMMAND 0x%04lx unhandled\n", dwCmdID); } return 0; } /********************************************************** * ShellView_OnNotify() */ static LRESULT ShellView_OnNotify(IShellViewImpl * This, UINT CtlID, LPNMHDR lpnmh) { LPNMLISTVIEW lpnmlv = (LPNMLISTVIEW)lpnmh; NMLVDISPINFOA *lpdi = (NMLVDISPINFOA *)lpnmh; LPITEMIDLIST pidl; TRACE("%p CtlID=%u lpnmh->code=%x\n",This,CtlID,lpnmh->code); switch(lpnmh->code) { case NM_SETFOCUS: TRACE("-- NM_SETFOCUS %p\n",This); ShellView_OnSetFocus(This); break; case NM_KILLFOCUS: TRACE("-- NM_KILLFOCUS %p\n",This); ShellView_OnDeactivate(This); /* Notify the ICommDlgBrowser interface */ OnStateChange(This,CDBOSC_KILLFOCUS); break; case HDN_ENDTRACKA: TRACE("-- HDN_ENDTRACKA %p\n",This); /*nColumn1 = ListView_GetColumnWidth(This->hWndList, 0); nColumn2 = ListView_GetColumnWidth(This->hWndList, 1);*/ break; case LVN_DELETEITEM: TRACE("-- LVN_DELETEITEM %p\n",This); SHFree((LPITEMIDLIST)lpnmlv->lParam); /*delete the pidl because we made a copy of it*/ break; case LVN_ITEMACTIVATE: TRACE("-- LVN_ITEMACTIVATE %p\n",This); OnStateChange(This, CDBOSC_SELCHANGE); /* the browser will get the IDataObject now */ ShellView_DoContextMenu(This, 0, 0, TRUE); break; case LVN_COLUMNCLICK: This->ListViewSortInfo.nHeaderID = lpnmlv->iSubItem; if(This->ListViewSortInfo.nLastHeaderID == This->ListViewSortInfo.nHeaderID) { This->ListViewSortInfo.bIsAscending = !This->ListViewSortInfo.bIsAscending; } else { This->ListViewSortInfo.bIsAscending = TRUE; } This->ListViewSortInfo.nLastHeaderID = This->ListViewSortInfo.nHeaderID; ListView_SortItems(lpnmlv->hdr.hwndFrom, ShellView_ListViewCompareItems, (LPARAM) (&(This->ListViewSortInfo))); break; case LVN_GETDISPINFOA: TRACE("-- LVN_GETDISPINFOA %p\n",This); pidl = (LPITEMIDLIST)lpdi->item.lParam; if(lpdi->item.mask & LVIF_TEXT) /* text requested */ { if (This->pSF2Parent) { SHELLDETAILS sd; IShellFolder2_GetDetailsOf(This->pSF2Parent, pidl, lpdi->item.iSubItem, &sd); StrRetToStrNA( lpdi->item.pszText, lpdi->item.cchTextMax, &sd.str, NULL); TRACE("-- text=%s\n",lpdi->item.pszText); } else { FIXME("no SF2\n"); } } if(lpdi->item.mask & LVIF_IMAGE) /* image requested */ { lpdi->item.iImage = SHMapPIDLToSystemImageListIndex(This->pSFParent, pidl, 0); } break; case LVN_ITEMCHANGED: TRACE("-- LVN_ITEMCHANGED %p\n",This); OnStateChange(This, CDBOSC_SELCHANGE); /* the browser will get the IDataObject now */ break; case LVN_BEGINDRAG: case LVN_BEGINRDRAG: TRACE("-- LVN_BEGINDRAG\n"); if (ShellView_GetSelections(This)) { IDataObject * pda; DWORD dwAttributes = SFGAO_CANLINK; DWORD dwEffect = DROPEFFECT_COPY | DROPEFFECT_MOVE; if(GetShellOle()) { if (SUCCEEDED(IShellFolder_GetUIObjectOf(This->pSFParent, This->hWnd, This->cidl, This->apidl, &IID_IDataObject,0,(LPVOID *)&pda))) { IDropSource * pds = (IDropSource*)&(This->lpvtblDropSource); /* own DropSource interface */ if (SUCCEEDED(IShellFolder_GetAttributesOf(This->pSFParent, This->cidl, This->apidl, &dwAttributes))) { if (dwAttributes & SFGAO_CANLINK) { dwEffect |= DROPEFFECT_LINK; } } if (pds) { DWORD dwEffect; pDoDragDrop(pda, pds, dwEffect, &dwEffect); } IDataObject_Release(pda); } } } break; case LVN_BEGINLABELEDITA: { DWORD dwAttr = SFGAO_CANRENAME; pidl = (LPITEMIDLIST)lpdi->item.lParam; TRACE("-- LVN_BEGINLABELEDITA %p\n",This); IShellFolder_GetAttributesOf(This->pSFParent, 1, &pidl, &dwAttr); if (SFGAO_CANRENAME & dwAttr) { return FALSE; } return TRUE; } break; case LVN_ENDLABELEDITA: { TRACE("-- LVN_ENDLABELEDITA %p\n",This); if (lpdi->item.pszText) { HRESULT hr; WCHAR wszNewName[MAX_PATH]; LVITEMA lvItem; ZeroMemory(&lvItem, sizeof(LVITEMA)); lvItem.iItem = lpdi->item.iItem; lvItem.mask = LVIF_PARAM; ListView_GetItemA(This->hWndList, &lvItem); pidl = (LPITEMIDLIST)lpdi->item.lParam; lstrcpynAtoW(wszNewName, lpdi->item.pszText, MAX_PATH); hr = IShellFolder_SetNameOf(This->pSFParent, 0, pidl, wszNewName, SHGDN_INFOLDER, &pidl); if(SUCCEEDED(hr) && pidl) { lvItem.mask = LVIF_PARAM; lvItem.lParam = (LPARAM)pidl; ListView_SetItemA(This->hWndList, &lvItem); return TRUE; } } return FALSE; } break; case LVN_KEYDOWN: { /* MSG msg; msg.hwnd = This->hWnd; msg.message = WM_KEYDOWN; msg.wParam = plvKeyDown->wVKey; msg.lParam = 0; msg.time = 0; msg.pt = 0;*/ LPNMLVKEYDOWN plvKeyDown = (LPNMLVKEYDOWN) lpnmh; #if 0 TranslateAccelerator(This->hWnd, This->hAccel, &msg) #endif FIXME("LVN_KEYDOWN key=0x%08x\n",plvKeyDown->wVKey); } break; default: TRACE("-- %p WM_COMMAND %s unhandled\n", This, SPY_GetMsgName(lpnmh->code)); break;; } return 0; } /********************************************************** * ShellView_OnChange() */ static LRESULT ShellView_OnChange(IShellViewImpl * This, LPITEMIDLIST * Pidls, LONG wEventId) { TRACE("(%p)(%p,%p,0x%08lx)\n", This, Pidls[0], Pidls[1], wEventId); switch(wEventId) { case SHCNE_MKDIR: case SHCNE_CREATE: LV_AddItem(This, Pidls[0]); break; case SHCNE_RMDIR: case SHCNE_DELETE: LV_DeleteItem(This, Pidls[0]); break; case SHCNE_RENAMEFOLDER: case SHCNE_RENAMEITEM: LV_RenameItem(This, Pidls[0], Pidls[1]); break; case SHCNE_UPDATEITEM: break; } return TRUE; } /********************************************************** * ShellView_WndProc */ static LRESULT CALLBACK ShellView_WndProc(HWND hWnd, UINT uMessage, WPARAM wParam, LPARAM lParam) { IShellViewImpl * pThis = (IShellViewImpl*)GetWindowLongA(hWnd, GWL_USERDATA); LPCREATESTRUCTA lpcs; TRACE("(hwnd=%x msg=%x wparm=%x lparm=%lx)\n",hWnd, uMessage, wParam, lParam); switch (uMessage) { case WM_NCCREATE: lpcs = (LPCREATESTRUCTA)lParam; pThis = (IShellViewImpl*)(lpcs->lpCreateParams); SetWindowLongA(hWnd, GWL_USERDATA, (LONG)pThis); pThis->hWnd = hWnd; /*set the window handle*/ break; case WM_SIZE: return ShellView_OnSize(pThis,LOWORD(lParam), HIWORD(lParam)); case WM_SETFOCUS: return ShellView_OnSetFocus(pThis); case WM_KILLFOCUS: return ShellView_OnKillFocus(pThis); case WM_CREATE: return ShellView_OnCreate(pThis); case WM_ACTIVATE: return ShellView_OnActivate(pThis, SVUIA_ACTIVATE_FOCUS); case WM_NOTIFY: return ShellView_OnNotify(pThis,(UINT)wParam, (LPNMHDR)lParam); case WM_COMMAND: return ShellView_OnCommand(pThis, GET_WM_COMMAND_ID(wParam, lParam), GET_WM_COMMAND_CMD(wParam, lParam), GET_WM_COMMAND_HWND(wParam, lParam)); case SHV_CHANGE_NOTIFY: return ShellView_OnChange(pThis, (LPITEMIDLIST*)wParam, (LONG)lParam); case WM_CONTEXTMENU: ShellView_DoContextMenu(pThis, LOWORD(lParam), HIWORD(lParam), FALSE); return 0; case WM_SHOWWINDOW: UpdateWindow(pThis->hWndList); break; case WM_GETDLGCODE: return SendMessageA(pThis->hWndList,uMessage,0,0); case WM_DESTROY: if(GetShellOle()) { pRevokeDragDrop(pThis->hWnd); } SHChangeNotifyDeregister(pThis->hNotify); break; } return DefWindowProcA (hWnd, uMessage, wParam, lParam); } /********************************************************** * * * The INTERFACE of the IShellView object * * ********************************************************** * IShellView_QueryInterface */ static HRESULT WINAPI IShellView_fnQueryInterface(IShellView * iface,REFIID riid, LPVOID *ppvObj) { ICOM_THIS(IShellViewImpl, iface); TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown)) { *ppvObj = This; } else if(IsEqualIID(riid, &IID_IShellView)) { *ppvObj = (IShellView*)This; } else if(IsEqualIID(riid, &IID_IOleCommandTarget)) { *ppvObj = (IOleCommandTarget*)&(This->lpvtblOleCommandTarget); } else if(IsEqualIID(riid, &IID_IDropTarget)) { *ppvObj = (IDropTarget*)&(This->lpvtblDropTarget); } else if(IsEqualIID(riid, &IID_IDropSource)) { *ppvObj = (IDropSource*)&(This->lpvtblDropSource); } else if(IsEqualIID(riid, &IID_IViewObject)) { *ppvObj = (IViewObject*)&(This->lpvtblViewObject); } if(*ppvObj) { IUnknown_AddRef( (IUnknown*)*ppvObj ); TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } /********************************************************** * IShellView_AddRef */ static ULONG WINAPI IShellView_fnAddRef(IShellView * iface) { ICOM_THIS(IShellViewImpl, iface); TRACE("(%p)->(count=%lu)\n",This,This->ref); shell32_ObjCount++; return ++(This->ref); } /********************************************************** * IShellView_Release */ static ULONG WINAPI IShellView_fnRelease(IShellView * iface) { ICOM_THIS(IShellViewImpl, iface); TRACE("(%p)->()\n",This); shell32_ObjCount--; if (!--(This->ref)) { TRACE(" destroying IShellView(%p)\n",This); if(This->pSFParent) IShellFolder_Release(This->pSFParent); if(This->pSF2Parent) IShellFolder2_Release(This->pSF2Parent); if (This->apidl) SHFree(This->apidl); if (This->pCommDlgBrowser) ICommDlgBrowser_Release(This->pCommDlgBrowser); HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } /********************************************************** * ShellView_GetWindow */ static HRESULT WINAPI IShellView_fnGetWindow(IShellView * iface,HWND * phWnd) { ICOM_THIS(IShellViewImpl, iface); TRACE("(%p)\n",This); *phWnd = This->hWnd; return S_OK; } static HRESULT WINAPI IShellView_fnContextSensitiveHelp(IShellView * iface,BOOL fEnterMode) { ICOM_THIS(IShellViewImpl, iface); FIXME("(%p) stub\n",This); return E_NOTIMPL; } /********************************************************** * IShellView_TranslateAccelerator * * FIXME: * use the accel functions */ static HRESULT WINAPI IShellView_fnTranslateAccelerator(IShellView * iface,LPMSG lpmsg) { #if 0 ICOM_THIS(IShellViewImpl, iface); FIXME("(%p)->(%p: hwnd=%x msg=%x lp=%lx wp=%x) stub\n",This,lpmsg, lpmsg->hwnd, lpmsg->message, lpmsg->lParam, lpmsg->wParam); #endif if ((lpmsg->message>=WM_KEYFIRST) && (lpmsg->message>=WM_KEYLAST)) { TRACE("-- key=0x04%x",lpmsg->wParam) ; } return S_FALSE; /* not handled */ } static HRESULT WINAPI IShellView_fnEnableModeless(IShellView * iface,BOOL fEnable) { ICOM_THIS(IShellViewImpl, iface); FIXME("(%p) stub\n",This); return E_NOTIMPL; } static HRESULT WINAPI IShellView_fnUIActivate(IShellView * iface,UINT uState) { ICOM_THIS(IShellViewImpl, iface); /* CHAR szName[MAX_PATH]; */ LRESULT lResult; int nPartArray[1] = {-1}; TRACE("(%p)->(state=%x) stub\n",This, uState); /*don't do anything if the state isn't really changing*/ if(This->uState == uState) { return S_OK; } /*OnActivate handles the menu merging and internal state*/ ShellView_OnActivate(This, uState); /*only do This if we are active*/ if(uState != SVUIA_DEACTIVATE) { /* GetFolderPath is not a method of IShellFolder IShellFolder_GetFolderPath( This->pSFParent, szName, sizeof(szName) ); */ /* set the number of parts */ IShellBrowser_SendControlMsg(This->pShellBrowser, FCW_STATUS, SB_SETPARTS, 1, (LPARAM)nPartArray, &lResult); /* set the text for the parts */ /* IShellBrowser_SendControlMsg(This->pShellBrowser, FCW_STATUS, SB_SETTEXTA, 0, (LPARAM)szName, &lResult); */ } return S_OK; } static HRESULT WINAPI IShellView_fnRefresh(IShellView * iface) { ICOM_THIS(IShellViewImpl, iface); TRACE("(%p)\n",This); ListView_DeleteAllItems(This->hWndList); ShellView_FillList(This); return S_OK; } static HRESULT WINAPI IShellView_fnCreateViewWindow( IShellView * iface, IShellView *lpPrevView, LPCFOLDERSETTINGS lpfs, IShellBrowser * psb, RECT * prcView, HWND *phWnd) { ICOM_THIS(IShellViewImpl, iface); WNDCLASSA wc; *phWnd = 0; TRACE("(%p)->(shlview=%p set=%p shlbrs=%p rec=%p hwnd=%p) incomplete\n",This, lpPrevView,lpfs, psb, prcView, phWnd); TRACE("-- vmode=%x flags=%x left=%i top=%i right=%i bottom=%i\n",lpfs->ViewMode, lpfs->fFlags ,prcView->left,prcView->top, prcView->right, prcView->bottom); /*set up the member variables*/ This->pShellBrowser = psb; This->FolderSettings = *lpfs; /*get our parent window*/ IShellBrowser_AddRef(This->pShellBrowser); IShellBrowser_GetWindow(This->pShellBrowser, &(This->hWndParent)); /* try to get the ICommDlgBrowserInterface, adds a reference !!! */ This->pCommDlgBrowser=NULL; if ( SUCCEEDED (IShellBrowser_QueryInterface( This->pShellBrowser, (REFIID)&IID_ICommDlgBrowser, (LPVOID*) &This->pCommDlgBrowser))) { TRACE("-- CommDlgBrowser\n"); } /*if our window class has not been registered, then do so*/ if(!GetClassInfoA(shell32_hInstance, SV_CLASS_NAME, &wc)) { ZeroMemory(&wc, sizeof(wc)); wc.style = CS_HREDRAW | CS_VREDRAW; wc.lpfnWndProc = (WNDPROC) ShellView_WndProc; wc.cbClsExtra = 0; wc.cbWndExtra = 0; wc.hInstance = shell32_hInstance; wc.hIcon = 0; wc.hCursor = LoadCursorA (0, IDC_ARROWA); wc.hbrBackground = (HBRUSH) (COLOR_WINDOW + 1); wc.lpszMenuName = NULL; wc.lpszClassName = SV_CLASS_NAME; if(!RegisterClassA(&wc)) return E_FAIL; } *phWnd = CreateWindowExA(0, SV_CLASS_NAME, NULL, WS_CHILD | WS_VISIBLE | WS_TABSTOP, prcView->left, prcView->top, prcView->right - prcView->left, prcView->bottom - prcView->top, This->hWndParent, 0, shell32_hInstance, (LPVOID)This); CheckToolbar(This); if(!*phWnd) return E_FAIL; return S_OK; } static HRESULT WINAPI IShellView_fnDestroyViewWindow(IShellView * iface) { ICOM_THIS(IShellViewImpl, iface); TRACE("(%p)\n",This); /*Make absolutely sure all our UI is cleaned up.*/ IShellView_UIActivate((IShellView*)This, SVUIA_DEACTIVATE); if(This->hMenu) { DestroyMenu(This->hMenu); } DestroyWindow(This->hWnd); IShellBrowser_Release(This->pShellBrowser); return S_OK; } static HRESULT WINAPI IShellView_fnGetCurrentInfo(IShellView * iface, LPFOLDERSETTINGS lpfs) { ICOM_THIS(IShellViewImpl, iface); TRACE("(%p)->(%p) vmode=%x flags=%x\n",This, lpfs, This->FolderSettings.ViewMode, This->FolderSettings.fFlags); if (!lpfs) return E_INVALIDARG; *lpfs = This->FolderSettings; return NOERROR; } static HRESULT WINAPI IShellView_fnAddPropertySheetPages(IShellView * iface, DWORD dwReserved,LPFNADDPROPSHEETPAGE lpfn, LPARAM lparam) { ICOM_THIS(IShellViewImpl, iface); FIXME("(%p) stub\n",This); return E_NOTIMPL; } static HRESULT WINAPI IShellView_fnSaveViewState(IShellView * iface) { ICOM_THIS(IShellViewImpl, iface); FIXME("(%p) stub\n",This); return S_OK; } static HRESULT WINAPI IShellView_fnSelectItem( IShellView * iface, LPCITEMIDLIST pidl, UINT uFlags) { ICOM_THIS(IShellViewImpl, iface); int i; TRACE("(%p)->(pidl=%p, 0x%08x) stub\n",This, pidl, uFlags); i = LV_FindItemByPidl(This, pidl); if (i != -1) { LVITEMA lvItem; if(uFlags & SVSI_ENSUREVISIBLE) ListView_EnsureVisible(This->hWndList, i, 0); ZeroMemory(&lvItem, sizeof(LVITEMA)); lvItem.mask = LVIF_STATE; lvItem.iItem = 0; while(ListView_GetItemA(This->hWndList, &lvItem)) { if (lvItem.iItem == i) { if (uFlags & SVSI_SELECT) lvItem.state |= LVIS_SELECTED; else lvItem.state &= ~LVIS_SELECTED; if(uFlags & SVSI_FOCUSED) lvItem.state &= ~LVIS_FOCUSED; } else { if (uFlags & SVSI_DESELECTOTHERS) lvItem.state &= ~LVIS_SELECTED; } ListView_SetItemA(This->hWndList, &lvItem); lvItem.iItem++; } if(uFlags & SVSI_EDIT) ListView_EditLabelA(This->hWndList, i); } return S_OK; } static HRESULT WINAPI IShellView_fnGetItemObject(IShellView * iface, UINT uItem, REFIID riid, LPVOID *ppvOut) { ICOM_THIS(IShellViewImpl, iface); TRACE("(%p)->(uItem=0x%08x,\n\tIID=%s, ppv=%p)\n",This, uItem, debugstr_guid(riid), ppvOut); *ppvOut = NULL; switch(uItem) { case SVGIO_BACKGROUND: *ppvOut = ISvBgCm_Constructor(This->pSFParent); break; case SVGIO_SELECTION: ShellView_GetSelections(This); IShellFolder_GetUIObjectOf(This->pSFParent, This->hWnd, This->cidl, This->apidl, riid, 0, ppvOut); break; } TRACE("-- (%p)->(interface=%p)\n",This, *ppvOut); if(!*ppvOut) return E_OUTOFMEMORY; return S_OK; } static HRESULT WINAPI IShellView_fnEditItem( IShellView * iface, LPITEMIDLIST pidl) { ICOM_THIS(IShellViewImpl, iface); int i; TRACE("(%p)->(pidl=%p)\n",This, pidl); i = LV_FindItemByPidl(This, pidl); if (i != -1) { SetFocus(This->hWndList); ListView_EditLabelA(This->hWndList, i); } return S_OK; } static struct ICOM_VTABLE(IShellView) svvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE IShellView_fnQueryInterface, IShellView_fnAddRef, IShellView_fnRelease, IShellView_fnGetWindow, IShellView_fnContextSensitiveHelp, IShellView_fnTranslateAccelerator, IShellView_fnEnableModeless, IShellView_fnUIActivate, IShellView_fnRefresh, IShellView_fnCreateViewWindow, IShellView_fnDestroyViewWindow, IShellView_fnGetCurrentInfo, IShellView_fnAddPropertySheetPages, IShellView_fnSaveViewState, IShellView_fnSelectItem, IShellView_fnGetItemObject, IShellView_fnEditItem }; /********************************************************** * ISVOleCmdTarget_QueryInterface (IUnknown) */ static HRESULT WINAPI ISVOleCmdTarget_QueryInterface( IOleCommandTarget * iface, REFIID iid, LPVOID* ppvObj) { _ICOM_THIS_From_IOleCommandTarget(IShellViewImpl, iface); return IShellFolder_QueryInterface((IShellFolder*)This, iid, ppvObj); } /********************************************************** * ISVOleCmdTarget_AddRef (IUnknown) */ static ULONG WINAPI ISVOleCmdTarget_AddRef( IOleCommandTarget * iface) { _ICOM_THIS_From_IOleCommandTarget(IShellFolder, iface); return IShellFolder_AddRef((IShellFolder*)This); } /********************************************************** * ISVOleCmdTarget_Release (IUnknown) */ static ULONG WINAPI ISVOleCmdTarget_Release( IOleCommandTarget * iface) { _ICOM_THIS_From_IOleCommandTarget(IShellViewImpl, iface); return IShellFolder_Release((IShellFolder*)This); } /********************************************************** * ISVOleCmdTarget_QueryStatus (IOleCommandTarget) */ static HRESULT WINAPI ISVOleCmdTarget_QueryStatus( IOleCommandTarget *iface, const GUID* pguidCmdGroup, ULONG cCmds, OLECMD * prgCmds, OLECMDTEXT* pCmdText) { _ICOM_THIS_From_IOleCommandTarget(IShellViewImpl, iface); FIXME("(%p)->(%p(%s) 0x%08lx %p %p\n", This, pguidCmdGroup, debugstr_guid(pguidCmdGroup), cCmds, prgCmds, pCmdText); return E_NOTIMPL; } /********************************************************** * ISVOleCmdTarget_Exec (IOleCommandTarget) * * nCmdID is the OLECMDID_* enumeration */ static HRESULT WINAPI ISVOleCmdTarget_Exec( IOleCommandTarget *iface, const GUID* pguidCmdGroup, DWORD nCmdID, DWORD nCmdexecopt, VARIANT* pvaIn, VARIANT* pvaOut) { _ICOM_THIS_From_IOleCommandTarget(IShellViewImpl, iface); FIXME("(%p)->(\n\tTarget GUID:%s Command:0x%08lx Opt:0x%08lx %p %p)\n", This, debugstr_guid(pguidCmdGroup), nCmdID, nCmdexecopt, pvaIn, pvaOut); return E_NOTIMPL; } static ICOM_VTABLE(IOleCommandTarget) ctvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE ISVOleCmdTarget_QueryInterface, ISVOleCmdTarget_AddRef, ISVOleCmdTarget_Release, ISVOleCmdTarget_QueryStatus, ISVOleCmdTarget_Exec }; /********************************************************** * ISVDropTarget implementation */ static HRESULT WINAPI ISVDropTarget_QueryInterface( IDropTarget *iface, REFIID riid, LPVOID *ppvObj) { _ICOM_THIS_From_IDropTarget(IShellViewImpl, iface); TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); return IShellFolder_QueryInterface((IShellFolder*)This, riid, ppvObj); } static ULONG WINAPI ISVDropTarget_AddRef( IDropTarget *iface) { _ICOM_THIS_From_IDropTarget(IShellViewImpl, iface); TRACE("(%p)->(count=%lu)\n",This,This->ref); return IShellFolder_AddRef((IShellFolder*)This); } static ULONG WINAPI ISVDropTarget_Release( IDropTarget *iface) { _ICOM_THIS_From_IDropTarget(IShellViewImpl, iface); TRACE("(%p)->(count=%lu)\n",This,This->ref); return IShellFolder_Release((IShellFolder*)This); } static HRESULT WINAPI ISVDropTarget_DragEnter( IDropTarget *iface, IDataObject *pDataObject, DWORD grfKeyState, POINTL pt, DWORD *pdwEffect) { _ICOM_THIS_From_IDropTarget(IShellViewImpl, iface); FIXME("Stub: This=%p, DataObject=%p\n",This,pDataObject); return E_NOTIMPL; } static HRESULT WINAPI ISVDropTarget_DragOver( IDropTarget *iface, DWORD grfKeyState, POINTL pt, DWORD *pdwEffect) { _ICOM_THIS_From_IDropTarget(IShellViewImpl, iface); FIXME("Stub: This=%p\n",This); return E_NOTIMPL; } static HRESULT WINAPI ISVDropTarget_DragLeave( IDropTarget *iface) { _ICOM_THIS_From_IDropTarget(IShellViewImpl, iface); FIXME("Stub: This=%p\n",This); return E_NOTIMPL; } static HRESULT WINAPI ISVDropTarget_Drop( IDropTarget *iface, IDataObject* pDataObject, DWORD grfKeyState, POINTL pt, DWORD *pdwEffect) { _ICOM_THIS_From_IDropTarget(IShellViewImpl, iface); FIXME("Stub: This=%p\n",This); return E_NOTIMPL; } static struct ICOM_VTABLE(IDropTarget) dtvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE ISVDropTarget_QueryInterface, ISVDropTarget_AddRef, ISVDropTarget_Release, ISVDropTarget_DragEnter, ISVDropTarget_DragOver, ISVDropTarget_DragLeave, ISVDropTarget_Drop }; /********************************************************** * ISVDropSource implementation */ static HRESULT WINAPI ISVDropSource_QueryInterface( IDropSource *iface, REFIID riid, LPVOID *ppvObj) { _ICOM_THIS_From_IDropSource(IShellViewImpl, iface); TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); return IShellFolder_QueryInterface((IShellFolder*)This, riid, ppvObj); } static ULONG WINAPI ISVDropSource_AddRef( IDropSource *iface) { _ICOM_THIS_From_IDropSource(IShellViewImpl, iface); TRACE("(%p)->(count=%lu)\n",This,This->ref); return IShellFolder_AddRef((IShellFolder*)This); } static ULONG WINAPI ISVDropSource_Release( IDropSource *iface) { _ICOM_THIS_From_IDropSource(IShellViewImpl, iface); TRACE("(%p)->(count=%lu)\n",This,This->ref); return IShellFolder_Release((IShellFolder*)This); } static HRESULT WINAPI ISVDropSource_QueryContinueDrag( IDropSource *iface, BOOL fEscapePressed, DWORD grfKeyState) { _ICOM_THIS_From_IDropSource(IShellViewImpl, iface); TRACE("(%p)\n",This); if (fEscapePressed) return DRAGDROP_S_CANCEL; else if (!(grfKeyState & MK_LBUTTON) && !(grfKeyState & MK_RBUTTON)) return DRAGDROP_S_DROP; else return NOERROR; } static HRESULT WINAPI ISVDropSource_GiveFeedback( IDropSource *iface, DWORD dwEffect) { _ICOM_THIS_From_IDropSource(IShellViewImpl, iface); TRACE("(%p)\n",This); return DRAGDROP_S_USEDEFAULTCURSORS; } static struct ICOM_VTABLE(IDropSource) dsvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE ISVDropSource_QueryInterface, ISVDropSource_AddRef, ISVDropSource_Release, ISVDropSource_QueryContinueDrag, ISVDropSource_GiveFeedback }; /********************************************************** * ISVViewObject implementation */ static HRESULT WINAPI ISVViewObject_QueryInterface( IViewObject *iface, REFIID riid, LPVOID *ppvObj) { _ICOM_THIS_From_IViewObject(IShellViewImpl, iface); TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); return IShellFolder_QueryInterface((IShellFolder*)This, riid, ppvObj); } static ULONG WINAPI ISVViewObject_AddRef( IViewObject *iface) { _ICOM_THIS_From_IViewObject(IShellViewImpl, iface); TRACE("(%p)->(count=%lu)\n",This,This->ref); return IShellFolder_AddRef((IShellFolder*)This); } static ULONG WINAPI ISVViewObject_Release( IViewObject *iface) { _ICOM_THIS_From_IViewObject(IShellViewImpl, iface); TRACE("(%p)->(count=%lu)\n",This,This->ref); return IShellFolder_Release((IShellFolder*)This); } static HRESULT WINAPI ISVViewObject_Draw( IViewObject *iface, DWORD dwDrawAspect, LONG lindex, void* pvAspect, DVTARGETDEVICE* ptd, HDC hdcTargetDev, HDC hdcDraw, LPCRECTL lprcBounds, LPCRECTL lprcWBounds, IVO_ContCallback pfnContinue, DWORD dwContinue) { _ICOM_THIS_From_IViewObject(IShellViewImpl, iface); FIXME("Stub: This=%p\n",This); return E_NOTIMPL; } static HRESULT WINAPI ISVViewObject_GetColorSet( IViewObject *iface, DWORD dwDrawAspect, LONG lindex, void *pvAspect, DVTARGETDEVICE* ptd, HDC hicTargetDevice, LOGPALETTE** ppColorSet) { _ICOM_THIS_From_IViewObject(IShellViewImpl, iface); FIXME("Stub: This=%p\n",This); return E_NOTIMPL; } static HRESULT WINAPI ISVViewObject_Freeze( IViewObject *iface, DWORD dwDrawAspect, LONG lindex, void* pvAspect, DWORD* pdwFreeze) { _ICOM_THIS_From_IViewObject(IShellViewImpl, iface); FIXME("Stub: This=%p\n",This); return E_NOTIMPL; } static HRESULT WINAPI ISVViewObject_Unfreeze( IViewObject *iface, DWORD dwFreeze) { _ICOM_THIS_From_IViewObject(IShellViewImpl, iface); FIXME("Stub: This=%p\n",This); return E_NOTIMPL; } static HRESULT WINAPI ISVViewObject_SetAdvise( IViewObject *iface, DWORD aspects, DWORD advf, IAdviseSink* pAdvSink) { _ICOM_THIS_From_IViewObject(IShellViewImpl, iface); FIXME("Stub: This=%p\n",This); return E_NOTIMPL; } static HRESULT WINAPI ISVViewObject_GetAdvise( IViewObject *iface, DWORD* pAspects, DWORD* pAdvf, IAdviseSink** ppAdvSink) { _ICOM_THIS_From_IViewObject(IShellViewImpl, iface); FIXME("Stub: This=%p\n",This); return E_NOTIMPL; } static struct ICOM_VTABLE(IViewObject) vovt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE ISVViewObject_QueryInterface, ISVViewObject_AddRef, ISVViewObject_Release, ISVViewObject_Draw, ISVViewObject_GetColorSet, ISVViewObject_Freeze, ISVViewObject_Unfreeze, ISVViewObject_SetAdvise, ISVViewObject_GetAdvise }; wine-20000526/dlls/shell32/shlwapi.spec0100644000175000001440000002277107104062375017214 0ustar julliardusersname shlwapi type win32 # ordinal exports 1 stub @ 2 stub @ 3 stub @ 4 stub @ 5 stub @ 6 stub @ 7 stub @ 8 stub @ 9 stub @ 10 stub @ 11 stub @ 12 stub @ 13 stub @ 14 stub @ 15 stub @ 16 stub @ 17 stub @ 18 stub @ 19 stub @ 20 stub @ 21 stub @ 22 stub @ 23 stub @ 24 stub @ 25 stub @ 26 stub @ 27 stub @ 28 stub @ 29 stub @ 30 stub @ 31 stub @ 32 stub @ 33 stub @ 34 stub @ 35 stub @ 36 stub @ 37 stub @ 38 stub @ 39 stub @ 40 stub @ 41 stub @ 42 stub @ 43 stub @ 44 stub @ 45 stub @ 46 stub @ 47 stub @ 48 stub @ 49 stub @ 50 stub @ 51 stub @ 52 stub @ 53 stub @ 54 stub @ 55 stub @ 56 stub @ 57 stub @ 58 stub @ 59 stub @ 60 stub @ 61 stub @ 62 stub @ 63 stub @ 64 stub @ 65 stub @ 66 stub @ 67 stub @ 68 stub @ 69 stub @ 70 stub @ 71 stub @ 72 stub @ 73 stub @ 74 stub @ 75 stub @ 76 stub @ 77 stub @ 78 stub @ 79 stub @ 80 stub @ 81 stub @ 82 stub @ 83 stub @ 84 stub @ 85 stub @ 86 stub @ 87 stub @ 88 stub @ 89 stub @ 90 stub @ 91 stub @ 92 stub @ 93 stub @ 94 stub @ 95 stub @ 96 stub @ 97 stub @ 98 stub @ 99 stub @ 100 stub @ 101 stub @ 102 stub @ 103 stub @ 104 stub @ 105 stub @ 106 stub @ 107 stub @ 108 stub @ 109 stub @ 110 stub @ 111 stub @ 112 stub @ 113 stub @ 114 stub @ 115 stub @ 116 stub @ 117 stub @ 118 stub @ 119 stub @ 120 stub @ 121 stub @ 122 stub @ 123 stub @ 124 stub @ 125 stub @ 126 stub @ 127 stub @ 128 stub @ 129 stub @ 130 stub @ 131 stub @ 132 stub @ 133 stub @ 134 stub @ 135 stub @ 136 stub @ 137 stub @ 138 stub @ 139 stub @ 140 stub @ 141 stub @ 142 stub @ 143 stub @ 144 stub @ 145 stub @ 146 stub @ 147 stub @ 148 stub @ 149 stub @ 150 stub @ 151 stub @ 152 stub @ 153 stub @ 154 stub @ 155 stub @ 156 stub @ 157 stub @ 158 stub @ 159 stub @ 160 stub @ 161 stub @ @ stub ChrCmpIA @ stub ChrCmpIW @ stub DllGetVersion @ stub GetMenuPosFromID @ stub HashData @ stub IntlStrEqWorkerA @ stub IntlStrEqWorkerW @ stdcall PathAddBackslashA (ptr) PathAddBackslashA @ stdcall PathAddBackslashW (ptr) PathAddBackslashW @ stub PathAddExtensionA @ stub PathAddExtensionW @ stdcall PathAppendA (str str) PathAppendA @ stdcall PathAppendW (str str) PathAppendW @ stdcall PathBuildRootA (ptr long) PathBuildRootA @ stdcall PathBuildRootW (ptr long) PathBuildRootW @ stdcall PathCanonicalizeA (ptr str) PathCanonicalizeA @ stdcall PathCanonicalizeW (ptr wstr) PathCanonicalizeW @ stdcall PathCombineA (ptr ptr ptr) PathCombineA @ stdcall PathCombineW (ptr ptr ptr) PathCombineW @ stub PathCommonPrefixA @ stub PathCommonPrefixW @ stub PathCompactPathA @ stub PathCompactPathExA @ stub PathCompactPathExW @ stub PathCompactPathW @ stub PathCreateFromUrlA @ stub PathCreateFromUrlW @ stdcall PathFileExistsA (str) PathFileExistsA @ stdcall PathFileExistsW (wstr) PathFileExistsW @ stdcall PathFindExtensionA (str) PathFindExtensionA @ stdcall PathFindExtensionW (wstr) PathFindExtensionW @ stdcall PathFindFileNameA (str) PathFindFileNameA @ stdcall PathFindFileNameW (wstr) PathFindFileNameW @ stdcall PathFindNextComponentA (str) PathFindNextComponentA @ stdcall PathFindNextComponentW (wstr) PathFindNextComponentW @ stdcall PathFindOnPathA (str ptr) PathFindOnPathA @ stdcall PathFindOnPathW (wstr ptr) PathFindOnPathW @ stdcall PathGetArgsA (str) PathGetArgsA @ stdcall PathGetArgsW (wstr) PathGetArgsW @ stub PathGetCharTypeA @ stub PathGetCharTypeW @ stdcall PathGetDriveNumberA (str) PathGetDriveNumberA @ stdcall PathGetDriveNumberW (wstr) PathGetDriveNumberW @ stub PathIsContentTypeA @ stub PathIsContentTypeW @ stdcall PathIsDirectoryA(str) PathIsDirectoryA @ stdcall PathIsDirectoryW(wstr) PathIsDirectoryW @ stub PathIsFileSpecA @ stub PathIsFileSpecW @ stub PathIsPrefixA @ stub PathIsPrefixW @ stdcall PathIsRelativeA (str) PathIsRelativeA @ stdcall PathIsRelativeW (wstr) PathIsRelativeW @ stdcall PathIsRootA(str) PathIsRootA @ stdcall PathIsRootW(wstr) PathIsRootW @ stdcall PathIsSameRootA(str str) PathIsSameRootA @ stdcall PathIsSameRootW(wstr wstr) PathIsSameRootW @ stub PathIsSystemFolderA @ stub PathIsSystemFolderW @ stdcall PathIsUNCA (str) PathIsUNCA @ stub PathIsUNCServerA @ stub PathIsUNCServerShareA @ stub PathIsUNCServerShareW @ stub PathIsUNCServerW @ stdcall PathIsUNCW(wstr) PathIsUNCW @ stdcall PathIsURLA(str) PathIsURLA @ stdcall PathIsURLW(wstr) PathIsURLW @ stub PathMakePrettyA @ stub PathMakePrettyW @ stub PathMakeSystemFolderA @ stub PathMakeSystemFolderW @ stdcall PathMatchSpecA (str str) PathMatchSpecA @ stdcall PathMatchSpecW (str str) PathMatchSpecW @ stdcall PathParseIconLocationA (str) PathParseIconLocationA @ stdcall PathParseIconLocationW (wstr) PathParseIconLocationW @ stdcall PathQuoteSpacesA (ptr) PathQuoteSpacesA @ stdcall PathQuoteSpacesW (ptr) PathQuoteSpacesW @ stub PathRelativePathToA @ stub PathRelativePathToW @ stdcall PathRemoveArgsA(str)PathRemoveArgsA @ stdcall PathRemoveArgsW(wstr)PathRemoveArgsW @ stdcall PathRemoveBackslashA (str) PathRemoveBackslashA @ stdcall PathRemoveBackslashW (wstr) PathRemoveBackslashW @ stdcall PathRemoveBlanksA(str) PathRemoveBlanksA @ stdcall PathRemoveBlanksW(wstr) PathRemoveBlanksW @ stdcall PathRemoveExtensionA(str)PathRemoveExtensionA @ stdcall PathRemoveExtensionW(wstr)PathRemoveExtensionW @ stdcall PathRemoveFileSpecA (str) PathRemoveFileSpecA @ stdcall PathRemoveFileSpecW (wstr) PathRemoveFileSpecW @ stub PathRenameExtensionA @ stub PathRenameExtensionW @ stub PathSearchAndQualifyA @ stub PathSearchAndQualifyW @ stdcall PathSetDlgItemPathA (long long ptr) PathSetDlgItemPathA @ stdcall PathSetDlgItemPathW (long long ptr) PathSetDlgItemPathW @ stub PathSkipRootA @ stub PathSkipRootW @ stdcall PathStripPathA(str)PathStripPathA @ stdcall PathStripPathW(wstr)PathStripPathW @ stdcall PathStripToRootA(str)PathStripToRootA @ stdcall PathStripToRootW(wstr)PathStripToRootW @ stub PathUnmakeSystemFolderA @ stub PathUnmakeSystemFolderW @ stdcall PathUnquoteSpacesA (str) PathUnquoteSpacesA @ stdcall PathUnquoteSpacesW (wstr) PathUnquoteSpacesW @ stub SHCreateShellPalette @ stub SHDeleteEmptyKeyA @ stub SHDeleteEmptyKeyW @ stdcall SHDeleteKeyA(long str)SHRegDeleteKeyA @ stdcall SHDeleteKeyW(long wstr)SHRegDeleteKeyW @ stub SHDeleteOrphanKeyA @ stub SHDeleteOrphanKeyW @ stub SHDeleteValueA @ stub SHDeleteValueW @ stub SHEnumKeyExA @ stub SHEnumKeyExW @ stub SHEnumValueA @ stub SHEnumValueW @ stub SHGetInverseCMAP @ stdcall SHGetValueA ( long ptr ptr ptr ptr ptr ) SHGetValueA @ stdcall SHGetValueW ( long ptr ptr ptr ptr ptr ) SHGetValueW @ stub SHIsLowMemoryMachine @ stub SHOpenRegStreamA @ stub SHOpenRegStreamW @ stub SHQueryInfoKeyA @ stub SHQueryInfoKeyW @ stub SHQueryValueExA @ stub SHQueryValueExW @ stub SHRegCloseUSKey @ stub SHRegCreateUSKeyA @ stub SHRegCreateUSKeyW @ stub SHRegDeleteEmptyUSKeyA @ stub SHRegDeleteEmptyUSKeyW @ stub SHRegDeleteUSValueA @ stub SHRegDeleteUSValueW @ stub SHRegEnumUSKeyA @ stub SHRegEnumUSKeyW @ stub SHRegEnumUSValueA @ stub SHRegEnumUSValueW @ stub SHRegGetBoolUSValueA @ stub SHRegGetBoolUSValueW @ stdcall SHRegGetUSValueA ( ptr ptr ptr ptr ptr long ptr long ) SHRegGetUSValueA @ stdcall SHRegGetUSValueW ( ptr ptr ptr ptr ptr long ptr long ) SHRegGetUSValueW @ stub SHRegOpenUSKeyA @ stub SHRegOpenUSKeyW @ stub SHRegQueryInfoUSKeyA @ stub SHRegQueryInfoUSKeyW @ stub SHRegQueryUSValueA @ stub SHRegQueryUSValueW @ stub SHRegSetUSValueA @ stub SHRegSetUSValueW @ stub SHRegWriteUSValueA @ stub SHRegWriteUSValueW @ stub SHSetValueA @ stub SHSetValueW @ stub StrCSpnA @ stub StrCSpnIA @ stub StrCSpnIW @ stub StrCSpnW @ stub StrCatW @ stdcall StrChrA (ptr long) strchr @ stub StrChrIA @ stub StrChrIW @ stdcall StrChrW (ptr long) StrChrW @ stub StrCmpIW @ stub StrCmpNA @ stub StrCmpNIA @ stdcall StrCmpNIW (wstr wstr long) StrCmpNIW @ stub StrCmpNW @ stub StrCmpW @ stub StrCpyNW @ stub StrCpyW @ stub StrDupA @ stub StrDupW @ stdcall StrFormatByteSizeA(long str long) StrFormatByteSizeA @ stdcall StrFormatByteSizeW(long wstr long) StrFormatByteSizeW @ stub StrFromTimeIntervalA @ stub StrFromTimeIntervalW @ stub StrIsIntlEqualA @ stub StrIsIntlEqualW @ stub StrNCatA @ stub StrNCatW @ stub StrPBrkA @ stub StrPBrkW @ stdcall StrRChrA (str str long) lstrrchr @ stub StrRChrIA @ stub StrRChrIW @ stdcall StrRChrW (wstr wstr long) lstrrchrw @ stub StrRStrIA @ stub StrRStrIW @ stub StrSpnA @ stub StrSpnW @ stub StrStrA @ stub StrStrIA @ stub StrStrIW @ stub StrStrW @ stub StrToIntA @ stub StrToIntExA @ stub StrToIntExW @ stub StrToIntW @ stub StrTrimA @ stub StrTrimW @ stub UrlApplySchemeA @ stub UrlApplySchemeW @ stub UrlCanonicalizeA @ stub UrlCanonicalizeW @ stub UrlCombineA @ stub UrlCombineW @ stub UrlCompareA @ stub UrlCompareW @ stub UrlCreateFromPathA @ stub UrlCreateFromPathW @ stub UrlEscapeA @ stub UrlEscapeW @ stub UrlGetLocationA @ stub UrlGetLocationW @ stub UrlGetPartA @ stub UrlGetPartW @ stub UrlHashA @ stub UrlHashW @ stub UrlIsA @ stub UrlIsNoHistoryA @ stub UrlIsNoHistoryW @ stub UrlIsOpaqueA @ stub UrlIsOpaqueW @ stub UrlIsW @ stub UrlUnescapeA @ stub UrlUnescapeW # exported in later versions @ stdcall StrRetToBufA (ptr ptr ptr long) StrRetToBufA @ stdcall StrRetToBufW (ptr ptr ptr long) StrRetToBufW #@ stdcall StrRetToStrA (ptr ptr ptr) StrRetToStrA #@ stdcall StrRetToStrW (ptr ptr ptr) StrRetToStrW wine-20000526/dlls/shell32/shpolicy.c0100644000175000001440000003057507102371335016665 0ustar julliardusers/* * shpolicy.c - Data for shell/system policies. * * Created 1999 by Ian Schmidt * * Some of these policies can be tweaked via the System Policy * Editor which came with the Win95 Migration Guide, although * there doesn't appear to be an updated Win98 version that * would handle the many new policies introduced since then. * You could easily write one with the information in * this file... * * Up to date as of SHELL32 v4.72 (Win98, Win95 with MSIE 5) */ #include #include #include "windef.h" #include "wingdi.h" #include "winerror.h" #include "winreg.h" #include "debugtools.h" #include "wine/winuser16.h" DEFAULT_DEBUG_CHANNEL(shell); #define SHELL_MAX_POLICIES 57 #define SHELL_NO_POLICY 0xffffffff typedef struct tagPOLICYDAT { DWORD polflags; /* flags value passed to SHRestricted */ LPSTR appstr; /* application str such as "Explorer" */ LPSTR keystr; /* name of the actual registry key / policy */ DWORD cache; /* cached value or 0xffffffff for invalid */ } POLICYDATA, *LPPOLICYDATA; //extern POLICYDATA sh32_policy_table[SHELL_MAX_POLICIES]; /* application strings */ static char strExplorer[] = {"Explorer"}; static char strActiveDesk[] = {"ActiveDesktop"}; static char strWinOldApp[] = {"WinOldApp"}; /* key strings */ static char strNoFileURL[] = {"NoFileUrl"}; static char strNoFolderOptions[] = {"NoFolderOptions"}; static char strNoChangeStartMenu[] = {"NoChangeStartMenu"}; static char strNoWindowsUpdate[] = {"NoWindowsUpdate"}; static char strNoSetActiveDesktop[] = {"NoSetActiveDesktop"}; static char strNoForgetSoftwareUpdate[] = {"NoForgetSoftwareUpdate"}; static char strNoMSAppLogo[] = {"NoMSAppLogo5ChannelNotify"}; static char strForceCopyACLW[] = {"ForceCopyACLWithFile"}; static char strNoResolveTrk[] = {"NoResolveTrack"}; static char strNoResolveSearch[] = {"NoResolveSearch"}; static char strNoEditComponent[] = {"NoEditingComponents"}; static char strNoMovingBand[] = {"NoMovingBands"}; static char strNoCloseDragDrop[] = {"NoCloseDragDropBands"}; static char strNoCloseComponent[] = {"NoClosingComponents"}; static char strNoDelComponent[] = {"NoDeletingComponents"}; static char strNoAddComponent[] = {"NoAddingComponents"}; static char strNoComponent[] = {"NoComponents"}; static char strNoChangeWallpaper[] = {"NoChangingWallpaper"}; static char strNoHTMLWallpaper[] = {"NoHTMLWallpaper"}; static char strNoCustomWebView[] = {"NoCustomizeWebView"}; static char strClassicShell[] = {"ClassicShell"}; static char strClearRecentDocs[] = {"ClearRecentDocsOnExit"}; static char strNoFavoritesMenu[] = {"NoFavoritesMenu"}; static char strNoActiveDesktopChanges[] = {"NoActiveDesktopChanges"}; static char strNoActiveDesktop[] = {"NoActiveDesktop"}; static char strNoRecentDocMenu[] = {"NoRecentDocsMenu"}; static char strNoRecentDocHistory[] = {"NoRecentDocsHistory"}; static char strNoInetIcon[] = {"NoInternetIcon"}; static char strNoStngsWizard[] = {"NoSettingsWizards"}; static char strNoLogoff[] = {"NoLogoff"}; static char strNoNetConDis[] = {"NoNetConnectDisconnect"}; static char strNoContextMenu[] = {"NoViewContextMenu"}; static char strNoTryContextMenu[] = {"NoTrayContextMenu"}; static char strNoWebMenu[] = {"NoWebMenu"}; static char strLnkResolveIgnoreLnkInfo[] = {"LinkResolveIgnoreLinkInfo"}; static char strNoCommonGroups[] = {"NoCommonGroups"}; static char strEnforceShlExtSecurity[] = {"EnforceShellExtensionSecurity"}; static char strNoRealMode[] = {"NoRealMode"}; static char strMyDocsOnNet[] = {"MyDocsOnNet"}; static char strNoStartMenuSubfolder[] = {"NoStartMenuSubFolders"}; static char strNoAddPrinters[] = {"NoAddPrinter"}; static char strNoDeletePrinters[] = {"NoDeletePrinter"}; static char strNoPrintTab[] = {"NoPrinterTabs"}; static char strRestrictRun[] = {"RestrictRun"}; static char strNoStartBanner[] = {"NoStartBanner"}; static char strNoNetworkNeighborhood[] = {"NoNetHood"}; static char strNoDriveTypeAtRun[] = {"NoDriveTypeAutoRun"}; static char strNoDrivesAutoRun[] = {"NoDriveAutoRun"}; static char strNoDrives[] = {"NoDrives"}; static char strNoFind[] = {"NoFind"}; static char strNoDesktop[] = {"NoDesktop"}; static char strNoSetTaskBar[] = {"NoSetTaskbar"}; static char strNoSetFld[] = {"NoSetFolders"}; static char strNoFileMenu[] = {"NoFileMenu"}; static char strNoSavSetng[] = {"NoSaveSettings"}; static char strNoClose[] = {"NoClose"}; static char strNoRun[] = {"NoRun"}; /* policy data array */ POLICYDATA sh32_policy_table[] = { { 0x1, strExplorer, strNoRun, SHELL_NO_POLICY }, { 0x2, strExplorer, strNoClose, SHELL_NO_POLICY }, { 0x4, strExplorer, strNoSavSetng, SHELL_NO_POLICY }, { 0x8, strExplorer, strNoFileMenu, SHELL_NO_POLICY }, { 0x10, strExplorer, strNoSetFld, SHELL_NO_POLICY }, { 0x20, strExplorer, strNoSetTaskBar, SHELL_NO_POLICY }, { 0x40, strExplorer, strNoDesktop, SHELL_NO_POLICY }, { 0x80, strExplorer, strNoFind, SHELL_NO_POLICY }, { 0x100, strExplorer, strNoDrives, SHELL_NO_POLICY }, { 0x200, strExplorer, strNoDrivesAutoRun, SHELL_NO_POLICY }, { 0x400, strExplorer, strNoDriveTypeAtRun, SHELL_NO_POLICY }, { 0x800, strExplorer, strNoNetworkNeighborhood, SHELL_NO_POLICY }, { 0x1000, strExplorer, strNoStartBanner, SHELL_NO_POLICY }, { 0x2000, strExplorer, strRestrictRun, SHELL_NO_POLICY }, { 0x4000, strExplorer, strNoPrintTab, SHELL_NO_POLICY }, { 0x8000, strExplorer, strNoDeletePrinters, SHELL_NO_POLICY }, { 0x10000, strExplorer, strNoAddPrinters, SHELL_NO_POLICY }, { 0x20000, strExplorer, strNoStartMenuSubfolder, SHELL_NO_POLICY }, { 0x40000, strExplorer, strMyDocsOnNet, SHELL_NO_POLICY }, { 0x80000, strWinOldApp, strNoRealMode, SHELL_NO_POLICY }, { 0x100000, strExplorer, strEnforceShlExtSecurity, SHELL_NO_POLICY }, { 0x200000, strExplorer, strLnkResolveIgnoreLnkInfo, SHELL_NO_POLICY }, { 0x400000, strExplorer, strNoCommonGroups, SHELL_NO_POLICY }, { 0x1000000, strExplorer, strNoWebMenu, SHELL_NO_POLICY }, { 0x2000000, strExplorer, strNoTryContextMenu, SHELL_NO_POLICY }, { 0x4000000, strExplorer, strNoContextMenu, SHELL_NO_POLICY }, { 0x8000000, strExplorer, strNoNetConDis, SHELL_NO_POLICY }, { 0x10000000, strExplorer, strNoLogoff, SHELL_NO_POLICY }, { 0x20000000, strExplorer, strNoStngsWizard, SHELL_NO_POLICY }, { 0x40000001, strExplorer, strNoInetIcon, SHELL_NO_POLICY }, { 0x40000002, strExplorer, strNoRecentDocHistory, SHELL_NO_POLICY }, { 0x40000003, strExplorer, strNoRecentDocMenu, SHELL_NO_POLICY }, { 0x40000004, strExplorer, strNoActiveDesktop, SHELL_NO_POLICY }, { 0x40000005, strExplorer, strNoActiveDesktopChanges, SHELL_NO_POLICY }, { 0x40000006, strExplorer, strNoFavoritesMenu, SHELL_NO_POLICY }, { 0x40000007, strExplorer, strClearRecentDocs, SHELL_NO_POLICY }, { 0x40000008, strExplorer, strClassicShell, SHELL_NO_POLICY }, { 0x40000009, strExplorer, strNoCustomWebView, SHELL_NO_POLICY }, { 0x40000010, strActiveDesk, strNoHTMLWallpaper, SHELL_NO_POLICY }, { 0x40000011, strActiveDesk, strNoChangeWallpaper, SHELL_NO_POLICY }, { 0x40000012, strActiveDesk, strNoComponent, SHELL_NO_POLICY }, { 0x40000013, strActiveDesk, strNoAddComponent, SHELL_NO_POLICY }, { 0x40000014, strActiveDesk, strNoDelComponent, SHELL_NO_POLICY }, { 0x40000015, strActiveDesk, strNoCloseComponent, SHELL_NO_POLICY }, { 0x40000016, strActiveDesk, strNoCloseDragDrop, SHELL_NO_POLICY }, { 0x40000017, strActiveDesk, strNoMovingBand, SHELL_NO_POLICY }, { 0x40000018, strActiveDesk, strNoEditComponent, SHELL_NO_POLICY }, { 0x40000019, strExplorer, strNoResolveSearch, SHELL_NO_POLICY }, { 0x4000001a, strExplorer, strNoResolveTrk, SHELL_NO_POLICY }, { 0x4000001b, strExplorer, strForceCopyACLW, SHELL_NO_POLICY }, { 0x4000001c, strExplorer, strNoMSAppLogo, SHELL_NO_POLICY }, { 0x4000001d, strExplorer, strNoForgetSoftwareUpdate, SHELL_NO_POLICY }, { 0x4000001e, strExplorer, strNoSetActiveDesktop, SHELL_NO_POLICY }, { 0x4000001f, strExplorer, strNoWindowsUpdate, SHELL_NO_POLICY }, { 0x40000020, strExplorer, strNoChangeStartMenu, SHELL_NO_POLICY }, { 0x40000021, strExplorer, strNoFolderOptions, SHELL_NO_POLICY }, { 0x50000024, strExplorer, strNoFileURL, SHELL_NO_POLICY } }; /************************************************************************* * SHRestricted [SHELL32.100] * * walks through policy table, queries key, value, returns * queried (DWORD) value, and caches it between called to SHInitRestricted * to prevent unnecessary registry access. * * NOTES * exported by ordinal * * REFERENCES: * MS System Policy Editor * 98Lite 2.0 (which uses many of these policy keys) http://www.98lite.net/ * "The Windows 95 Registry", by John Woram, 1996 MIS: Press */ DWORD WINAPI SHRestricted (DWORD pol) { char regstr[256]; HKEY xhkey; DWORD retval, polidx, i, datsize = 4; TRACE("(%08lx)\n",pol); polidx = -1; /* scan to see if we know this policy ID */ for (i = 0; i < SHELL_MAX_POLICIES; i++) { if (pol == sh32_policy_table[i].polflags) { polidx = i; break; } } if (polidx == -1) { /* we don't know this policy, return 0 */ TRACE("unknown policy: (%08lx)\n", pol); return 0; } /* we have a known policy */ lstrcpyA(regstr, "Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\"); lstrcatA(regstr, sh32_policy_table[polidx].appstr); /* first check if this policy has been cached, return it if so */ if (sh32_policy_table[polidx].cache != SHELL_NO_POLICY) { return sh32_policy_table[polidx].cache; } /* return 0 and don't set the cache if any registry errors occur */ retval = 0; if (RegOpenKeyA(HKEY_CURRENT_USER, regstr, &xhkey) == ERROR_SUCCESS) { if (RegQueryValueExA(xhkey, sh32_policy_table[polidx].keystr, NULL, NULL, (LPBYTE)&retval, &datsize) == ERROR_SUCCESS) { sh32_policy_table[polidx].cache = retval; } RegCloseKey(xhkey); } return retval; } /************************************************************************* * SHInitRestricted [SHELL32.244] * * Win98+ by-ordinal only routine called by Explorer and MSIE 4 and 5. * Inits the policy cache used by SHRestricted to avoid excess * registry access. * * INPUTS * Two inputs: one is a string or NULL. If non-NULL the pointer * should point to a string containing the following exact text: * "Software\Microsoft\Windows\CurrentVersion\Policies". * The other input is unused. * * NOTES * If the input is non-NULL and does not point to a string containing * that exact text the routine will do nothing. * * If the text does match or the pointer is NULL, then the routine * will init SHRestricted()'s policy cache to all 0xffffffff and * returns 0xffffffff as well. * * I haven't yet run into anything calling this with inputs other than * (NULL, NULL), so I may have the inputs reversed. */ BOOL WINAPI SHInitRestricted(LPSTR inpRegKey, LPSTR parm2) { int i; TRACE("(%p, %p)\n", inpRegKey, parm2); /* first check - if input is non-NULL and points to the secret key string, then pass. Otherwise return 0. */ if (inpRegKey != (LPSTR)NULL) { if (lstrcmpiA(inpRegKey, "Software\\Microsoft\\Windows\\CurrentVersion\\Policies")) { /* doesn't match, fail */ return 0; } } /* check passed, init all policy cache entries with SHELL_NO_POLICY */ for (i = 0; i < SHELL_MAX_POLICIES; i++) { sh32_policy_table[i].cache = SHELL_NO_POLICY; } return SHELL_NO_POLICY; } wine-20000526/dlls/shell32/shpolicy.h0100644000175000001440000000172007004345067016664 0ustar julliardusers/* * shpolicy.h - contains defs of policy data for SHRestricted * * Created 1999 by Ian Schmidt, * Up to date as of SHELL32 v4.72 (Win98, Win95 with MSIE 5) */ #ifndef __WINE_SHPOLICY_H #define __WINE_SHPOLICY_H #define SHELL_MAX_POLICIES 57 #define SHELL_NO_POLICY 0xffffffff /* * Note: we don't need pshpack1.h / poppack here because we don't * rely on structure packing and nothing outside SHRestricted * accesses this structure. */ typedef struct tagPOLICYDAT { DWORD polflags; /* flags value passed to SHRestricted */ LPSTR appstr; /* application str such as "Explorer" */ LPSTR keystr; /* name of the actual registry key / policy */ DWORD cache; /* cached value or 0xffffffff for invalid */ } POLICYDATA, *LPPOLICYDATA; extern POLICYDATA sh32_policy_table[SHELL_MAX_POLICIES]; /* policy functions */ BOOL WINAPI SHInitRestricted(LPSTR, LPSTR); #endif /* __WINE_SHPOLICY_H */ wine-20000526/dlls/shell32/shres.rc0100644000175000001440000016725007103361647016350 0ustar julliardusers/* * Top level resource file for Common Dialogs * */ #include "windef.h" #include "winuser.h" #include "winnls.h" #include "shlobj.h" #include "shresdef.h" /*--------------------- FIXME -------------------------- * * These must be seperated into the language files * and translated. The language 0,0 is a hack to get it * loaded properly for all languages by pretending that * they are neutral. * The menus are not jet properly implemented. * Don't localize it yet. (js) */ LANGUAGE 0,0 MENU_001 MENU DISCARDABLE BEGIN MENUITEM "Lar&ge Icons", FCIDM_SHVIEW_BIGICON MENUITEM "S&mall Icons", FCIDM_SHVIEW_SMALLICON MENUITEM "&List", FCIDM_SHVIEW_LISTVIEW MENUITEM "&Details", FCIDM_SHVIEW_REPORTVIEW END /* shellview background menu */ MENU_002 MENU DISCARDABLE BEGIN POPUP"" BEGIN POPUP "&View" BEGIN MENUITEM "Lar&ge Icons", FCIDM_SHVIEW_BIGICON MENUITEM "S&mall Icons", FCIDM_SHVIEW_SMALLICON MENUITEM "&List", FCIDM_SHVIEW_LISTVIEW MENUITEM "&Details", FCIDM_SHVIEW_REPORTVIEW END MENUITEM SEPARATOR POPUP "Arrange &Icons" BEGIN MENUITEM "By &Name", 0x30 /* column 0 */ MENUITEM "By &Type", 0x32 /* column 2 */ MENUITEM "By &Size", 0x31 /* ... */ MENUITEM "By &Date", 0x33 MENUITEM SEPARATOR MENUITEM "&Auto Arrange", FCIDM_SHVIEW_AUTOARRANGE END MENUITEM "Line up Icons", FCIDM_SHVIEW_SNAPTOGRID MENUITEM SEPARATOR MENUITEM "Refresh", FCIDM_SHVIEW_REFRESH MENUITEM SEPARATOR MENUITEM "Paste", FCIDM_SHVIEW_INSERT MENUITEM "Paste as Link", FCIDM_SHVIEW_INSERTLINK MENUITEM SEPARATOR POPUP "New" BEGIN MENUITEM "New &Folder", FCIDM_SHVIEW_NEWFOLDER MENUITEM "New &Link", FCIDM_SHVIEW_NEWLINK MENUITEM SEPARATOR END MENUITEM SEPARATOR MENUITEM "Properties", FCIDM_SHVIEW_PROPERTIES END END /* shellview item menu */ MENU_SHV_FILE MENU DISCARDABLE BEGIN POPUP"" BEGIN MENUITEM "E&xplore", FCIDM_SHVIEW_CUT MENUITEM "&Open", FCIDM_SHVIEW_COPY MENUITEM SEPARATOR MENUITEM "C&ut", FCIDM_SHVIEW_CUT MENUITEM "&Copy", FCIDM_SHVIEW_COPY MENUITEM SEPARATOR MENUITEM "&Create Link", FCIDM_SHVIEW_CREATELINK MENUITEM "&Delete", FCIDM_SHVIEW_DELETE MENUITEM "&Rename", FCIDM_SHVIEW_RENAME MENUITEM SEPARATOR MENUITEM "&Properties", FCIDM_SHVIEW_PROPERTIES END END SHBRSFORFOLDER_MSGBOX DIALOG 15, 40, 128, 152 STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU CAPTION "Choose a Directory:" FONT 8, "Helv" { DEFPUSHBUTTON "OK", 1, 4, 132, 50, 12 PUSHBUTTON "Cancel", 2, 58, 132, 50, 12 CONTROL "Tree1",99,"SysTreeView32", TVS_HASBUTTONS | TVS_HASLINES | TVS_LINESATROOT | WS_BORDER | WS_TABSTOP, 4, 4, 120, 120 } /* special folders */ STRINGTABLE DISCARDABLE { IDS_DESKTOP "Desktop" IDS_MYCOMPUTER "My Computer" } /* context menus */ STRINGTABLE DISCARDABLE { IDS_VIEW_LARGE "Lar&ge Icons" IDS_VIEW_SMALL "S&mall Icons" IDS_VIEW_LIST "&List" IDS_VIEW_DETAILS "&Details" IDS_SELECT "Select" IDS_OPEN "Open" } STRINGTABLE DISCARDABLE { IDS_CREATEFOLDER_DENIED "Can not create new Folder: Permission denied." IDS_CREATEFOLDER_CAPTION "Error during creating a new folder" IDS_DELETEFOLDER_TEXT "Are you sure you want to delete %1 and all it's subfolders?" IDS_DELETEFOLDER_CAPTION "Confirm file delete" } shv_accel ACCELERATORS BEGIN VK_F5, FCIDM_SHVIEW_REFRESH, VIRTKEY END /* BINRES 000.ico document */ 0 ICON { '00 00 01 00 04 00 10 10 10 00 00 00 00 00 28 01' '00 00 46 00 00 00 10 10 00 00 00 00 00 00 68 05' '00 00 6E 01 00 00 20 20 10 00 00 00 00 00 E8 02' '00 00 D6 06 00 00 20 20 00 00 00 00 00 00 A8 08' '00 00 BE 09 00 00 28 00 00 00 10 00 00 00 20 00' '00 00 01 00 04 00 00 00 00 00 C0 00 00 00 00 00' '00 00 00 00 00 00 10 00 00 00 00 00 00 00 00 00' '00 00 00 00 80 00 00 80 00 00 00 80 80 00 80 00' '00 00 80 00 80 00 80 80 00 00 C0 C0 C0 00 80 80' '80 00 00 00 FF 00 00 FF 00 00 00 FF FF 00 FF 00' '00 00 FF 00 FF 00 FF FF 00 00 FF FF FF 00 77 77' '77 77 77 77 77 77 77 77 77 88 88 88 88 77 77 77' '78 88 88 88 88 87 78 88 87 88 77 77 F8 88 78 88' '88 88 88 77 F8 88 7F 88 88 8F F8 88 F8 88 7F 87' '77 77 F8 77 F8 88 7F 88 88 88 F8 88 F8 88 7F 77' '77 7F F8 87 F8 88 7F 88 88 88 F8 88 F8 88 7F 77' '77 77 F8 77 F8 88 7F 88 88 87 F8 88 F8 88 7F 78' '77 77 F8 FF F8 88 7F 88 88 88 F8 FF FF 87 7F FF' 'FF FF F8 77 77 77 77 77 77 77 77 77 77 77 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 28 00' '00 00 10 00 00 00 20 00 00 00 01 00 08 00 00 00' '00 00 40 01 00 00 00 00 00 00 00 00 00 00 00 01' '00 00 00 00 00 00 00 00 00 00 00 00 33 00 00 00' '66 00 00 00 99 00 00 00 CC 00 00 00 FF 00 00 33' '00 00 00 33 33 00 00 33 66 00 00 33 99 00 00 33' 'CC 00 00 33 FF 00 00 66 00 00 00 66 33 00 00 66' '66 00 00 66 99 00 00 66 CC 00 00 66 FF 00 00 99' '00 00 00 99 33 00 00 99 66 00 00 99 99 00 00 99' 'CC 00 00 99 FF 00 00 CC 00 00 00 CC 33 00 00 CC' '66 00 00 CC 99 00 00 CC CC 00 00 CC FF 00 00 FF' '00 00 00 FF 33 00 00 FF 66 00 00 FF 99 00 00 FF' 'CC 00 00 FF FF 00 33 00 00 00 33 00 33 00 33 00' '66 00 33 00 99 00 33 00 CC 00 33 00 FF 00 33 33' '00 00 33 33 33 00 33 33 66 00 33 33 99 00 33 33' 'CC 00 33 33 FF 00 33 66 00 00 33 66 33 00 33 66' '66 00 33 66 99 00 33 66 CC 00 33 66 FF 00 33 99' '00 00 33 99 33 00 33 99 66 00 33 99 99 00 33 99' 'CC 00 33 99 FF 00 33 CC 00 00 33 CC 33 00 33 CC' '66 00 33 CC 99 00 33 CC CC 00 33 CC FF 00 33 FF' '00 00 33 FF 33 00 33 FF 66 00 33 FF 99 00 33 FF' 'CC 00 33 FF FF 00 66 00 00 00 66 00 33 00 66 00' '66 00 66 00 99 00 66 00 CC 00 66 00 FF 00 66 33' '00 00 66 33 33 00 66 33 66 00 66 33 99 00 66 33' 'CC 00 66 33 FF 00 66 66 00 00 66 66 33 00 66 66' '66 00 66 66 99 00 66 66 CC 00 66 66 FF 00 66 99' '00 00 66 99 33 00 66 99 66 00 66 99 99 00 66 99' 'CC 00 66 99 FF 00 66 CC 00 00 66 CC 33 00 66 CC' '66 00 66 CC 99 00 66 CC CC 00 66 CC FF 00 66 FF' '00 00 66 FF 33 00 66 FF 66 00 66 FF 99 00 66 FF' 'CC 00 66 FF FF 00 99 00 00 00 99 00 33 00 99 00' '66 00 99 00 99 00 99 00 CC 00 99 00 FF 00 99 33' '00 00 99 33 33 00 99 33 66 00 99 33 99 00 99 33' 'CC 00 99 33 FF 00 99 66 00 00 99 66 33 00 99 66' '66 00 99 66 99 00 99 66 CC 00 99 66 FF 00 99 99' '00 00 99 99 33 00 99 99 66 00 99 99 99 00 99 99' 'CC 00 99 99 FF 00 99 CC 00 00 99 CC 33 00 99 CC' '66 00 99 CC 99 00 99 CC CC 00 99 CC FF 00 99 FF' '00 00 99 FF 33 00 99 FF 66 00 99 FF 99 00 99 FF' 'CC 00 99 FF FF 00 CC 00 00 00 CC 00 33 00 CC 00' '66 00 CC 00 99 00 CC 00 CC 00 CC 00 FF 00 CC 33' '00 00 CC 33 33 00 CC 33 66 00 CC 33 99 00 CC 33' 'CC 00 CC 33 FF 00 CC 66 00 00 CC 66 33 00 CC 66' '66 00 CC 66 99 00 CC 66 CC 00 CC 66 FF 00 CC 99' '00 00 CC 99 33 00 CC 99 66 00 CC 99 99 00 CC 99' 'CC 00 CC 99 FF 00 CC CC 00 00 CC CC 33 00 CC CC' '66 00 CC CC 99 00 CC CC CC 00 CC CC FF 00 CC FF' '00 00 CC FF 33 00 CC FF 66 00 CC FF 99 00 CC FF' 'CC 00 CC FF FF 00 FF 00 00 00 FF 00 33 00 FF 00' '66 00 FF 00 99 00 FF 00 CC 00 FF 00 FF 00 FF 33' '00 00 FF 33 33 00 FF 33 66 00 FF 33 99 00 FF 33' 'CC 00 FF 33 FF 00 FF 66 00 00 FF 66 33 00 FF 66' '66 00 FF 66 99 00 FF 66 CC 00 FF 66 FF 00 FF 99' '00 00 FF 99 33 00 FF 99 66 00 FF 99 99 00 FF 99' 'CC 00 FF 99 FF 00 FF CC 00 00 FF CC 33 00 FF CC' '66 00 FF CC 99 00 FF CC CC 00 FF CC FF 00 FF FF' '00 00 FF FF 33 00 FF FF 66 00 FF FF 99 00 FF FF' 'CC 00 FF FF FF 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 AC AC AC AC AC AC AC AC AC AC' 'AC AC AC AC AC AC AC AC AC AC AC A5 81 81 81 81' '81 81 81 81 AC AC AC AC AC AC AC 81 81 81 81 81' '81 81 81 56 81 AB AC 56 56 56 81 AC 81 81 AC AC' 'AC AC D7 56 56 81 AB 81 81 81 81 81 81 81 81 56' 'AC AC D7 81 81 81 AC D7 81 81 81 81 81 D7 D7 56' '56 81 D7 81 81 81 AC D7 81 AC AC 88 AC AC D7 56' 'AC AC D7 81 81 81 AC D7 56 56 56 56 56 56 D7 56' '56 56 D7 81 81 81 AC D7 AC AC AC AC AC D7 D7 56' '81 AC D7 81 81 81 AC D7 56 56 56 56 81 56 D7 56' '56 56 D7 81 81 81 AC D7 AC AC AC AC AC AC D7 56' 'AC AC D7 7A 81 81 AC D7 56 56 81 56 81 A6 D7 56' '7B 81 D7 7A 81 81 AC D7 AC 81 AC AC AC AC D7 56' 'D7 D7 D7 81 81 81 AC D7 56 56 81 56 7B 81 D7 56' 'D7 AD AD D7 81 A5 AC D7 D7 D7 D7 D7 D7 D7 D7 81' 'AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC' 'AC AC AC AC AC AC 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 28 00 00 00 20 00 00 00 40 00' '00 00 01 00 04 00 00 00 00 00 80 02 00 00 00 00' '00 00 00 00 00 00 10 00 00 00 00 00 00 00 00 00' '00 00 00 00 80 00 00 80 00 00 00 80 80 00 80 00' '00 00 80 00 80 00 80 80 00 00 C0 C0 C0 00 80 80' '80 00 00 00 FF 00 00 FF 00 00 00 FF FF 00 FF 00' '00 00 FF 00 FF 00 FF FF 00 00 FF FF FF 00 77 77' '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77' '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77' '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77' '77 77 77 78 88 88 88 88 88 88 88 88 77 77 77 77' '77 77 78 88 88 88 88 88 88 88 88 00 77 77 77 77' '77 77 7F FF FF FF FF FF FF FF FF 80 88 87 77 88' '88 88 8F FF FF FF FF FF FF FF FF 80 80 87 77 00' '00 00 88 88 88 88 88 88 88 87 FF 88 F8 87 78 88' '88 88 88 88 88 88 88 00 87 7F FF 88 F8 87 77 FF' 'FF FF FF FF FF FF FF 80 87 7F FF 88 F8 87 77 FF' 'FF FF FF FF FF FF FF 80 88 87 FF 88 F8 87 77 FF' '88 88 88 88 88 FF FF 80 88 88 FF 88 F8 87 77 FF' '88 77 77 77 77 77 FF 80 77 7F FF 88 F8 87 77 FF' '88 77 77 77 77 77 FF 80 77 7F FF 88 F8 87 77 FF' '88 88 88 88 88 88 FF 80 88 88 FF 88 F8 87 77 FF' '88 88 88 88 88 88 FF 80 88 88 FF 88 F8 87 77 FF' '87 78 77 78 F7 7F FF 80 88 77 FF 88 F8 87 77 FF' '87 78 77 78 F7 7F FF 80 88 77 FF 88 F8 87 77 FF' '88 88 88 88 88 87 FF 80 88 88 FF 88 F8 87 77 FF' '88 88 88 88 88 88 FF 80 88 87 FF 88 F8 87 77 FF' '77 78 77 78 78 77 FF 80 77 87 FF 88 F8 87 77 FF' '77 78 77 78 78 77 FF 80 77 87 FF 88 F8 87 77 FF' '88 88 88 88 78 7F FF 80 88 88 FF 86 F8 87 77 FF' '88 88 88 88 88 87 FF 80 78 7F FF 86 F8 87 77 FF' '77 88 78 77 77 87 FF 80 FF FF FF 86 F8 87 77 FF' '77 88 78 77 77 87 FF 80 FF FF FF 88 F8 87 77 FF' '88 88 88 88 88 88 FF 84 F7 77 77 7F F8 87 77 FF' '88 88 88 88 78 7F FF 80 FF FF FF FF F8 77 77 FF' 'FF FF FF FF FF FF FF 88 77 77 77 77 77 77 77 FF' 'FF FF FF FF FF FF FF 88 77 77 77 77 77 77 77 77' '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77' '77 77 77 77 77 77 77 77 77 77 77 77 77 77 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 28 00' '00 00 20 00 00 00 40 00 00 00 01 00 08 00 00 00' '00 00 80 04 00 00 00 00 00 00 00 00 00 00 00 01' '00 00 00 00 00 00 00 00 00 00 00 00 33 00 00 00' '66 00 00 00 99 00 00 00 CC 00 00 00 FF 00 00 33' '00 00 00 33 33 00 00 33 66 00 00 33 99 00 00 33' 'CC 00 00 33 FF 00 00 66 00 00 00 66 33 00 00 66' '66 00 00 66 99 00 00 66 CC 00 00 66 FF 00 00 99' '00 00 00 99 33 00 00 99 66 00 00 99 99 00 00 99' 'CC 00 00 99 FF 00 00 CC 00 00 00 CC 33 00 00 CC' '66 00 00 CC 99 00 00 CC CC 00 00 CC FF 00 00 FF' '00 00 00 FF 33 00 00 FF 66 00 00 FF 99 00 00 FF' 'CC 00 00 FF FF 00 33 00 00 00 33 00 33 00 33 00' '66 00 33 00 99 00 33 00 CC 00 33 00 FF 00 33 33' '00 00 33 33 33 00 33 33 66 00 33 33 99 00 33 33' 'CC 00 33 33 FF 00 33 66 00 00 33 66 33 00 33 66' '66 00 33 66 99 00 33 66 CC 00 33 66 FF 00 33 99' '00 00 33 99 33 00 33 99 66 00 33 99 99 00 33 99' 'CC 00 33 99 FF 00 33 CC 00 00 33 CC 33 00 33 CC' '66 00 33 CC 99 00 33 CC CC 00 33 CC FF 00 33 FF' '00 00 33 FF 33 00 33 FF 66 00 33 FF 99 00 33 FF' 'CC 00 33 FF FF 00 66 00 00 00 66 00 33 00 66 00' '66 00 66 00 99 00 66 00 CC 00 66 00 FF 00 66 33' '00 00 66 33 33 00 66 33 66 00 66 33 99 00 66 33' 'CC 00 66 33 FF 00 66 66 00 00 66 66 33 00 66 66' '66 00 66 66 99 00 66 66 CC 00 66 66 FF 00 66 99' '00 00 66 99 33 00 66 99 66 00 66 99 99 00 66 99' 'CC 00 66 99 FF 00 66 CC 00 00 66 CC 33 00 66 CC' '66 00 66 CC 99 00 66 CC CC 00 66 CC FF 00 66 FF' '00 00 66 FF 33 00 66 FF 66 00 66 FF 99 00 66 FF' 'CC 00 66 FF FF 00 99 00 00 00 99 00 33 00 99 00' '66 00 99 00 99 00 99 00 CC 00 99 00 FF 00 99 33' '00 00 99 33 33 00 99 33 66 00 99 33 99 00 99 33' 'CC 00 99 33 FF 00 99 66 00 00 99 66 33 00 99 66' '66 00 99 66 99 00 99 66 CC 00 99 66 FF 00 99 99' '00 00 99 99 33 00 99 99 66 00 99 99 99 00 99 99' 'CC 00 99 99 FF 00 99 CC 00 00 99 CC 33 00 99 CC' '66 00 99 CC 99 00 99 CC CC 00 99 CC FF 00 99 FF' '00 00 99 FF 33 00 99 FF 66 00 99 FF 99 00 99 FF' 'CC 00 99 FF FF 00 CC 00 00 00 CC 00 33 00 CC 00' '66 00 CC 00 99 00 CC 00 CC 00 CC 00 FF 00 CC 33' '00 00 CC 33 33 00 CC 33 66 00 CC 33 99 00 CC 33' 'CC 00 CC 33 FF 00 CC 66 00 00 CC 66 33 00 CC 66' '66 00 CC 66 99 00 CC 66 CC 00 CC 66 FF 00 CC 99' '00 00 CC 99 33 00 CC 99 66 00 CC 99 99 00 CC 99' 'CC 00 CC 99 FF 00 CC CC 00 00 CC CC 33 00 CC CC' '66 00 DC C0 B2 00 CC CC CC 00 CC CC FF 00 CC FF' '00 00 CC FF 33 00 CC FF 66 00 CC FF 99 00 CC FF' 'CC 00 CC FF FF 00 FF 00 00 00 FF 00 33 00 FF 00' '66 00 FF 00 99 00 FF 00 CC 00 FF 00 FF 00 FF 33' '00 00 FF 33 33 00 FF 33 66 00 FF 33 99 00 FF 33' 'CC 00 FF 33 FF 00 FF 66 00 00 FF 66 33 00 FF 66' '66 00 FF 66 99 00 FF 66 CC 00 FF 66 FF 00 FF 99' '00 00 FF 99 33 00 FF 99 66 00 FF 99 99 00 FF 99' 'CC 00 FF 99 FF 00 FF CC 00 00 FF CC 33 00 FF CC' '66 00 FF CC 99 00 FF CC CC 00 FF CC FF 00 FF FF' '00 00 FF FF 33 00 FF FF 66 00 FF FF 99 00 FF FF' 'CC 00 FF FF FF 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 AC AC AC AC AC AC AC AC AC AC' 'AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC' 'AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC' 'AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC' 'AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC' 'AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC' 'AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC' 'A5 56 56 56 56 56 56 56 56 56 56 56 56 56 56 56' '56 56 AC AC AC AC AC AC AC AC AC AC AC AC AC 81' '56 56 56 56 56 56 56 56 56 56 56 56 56 56 56 56' '2B 2B AC AC AC AC AC AC AC AC AC AC AC AC AC D7' 'D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7' '81 2B 56 56 81 AC AC AC 81 81 81 81 81 81 81 D7' 'D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7' '81 2B 56 00 56 AC AC AC 2B 2B 2B 2B 2B 2B 56 81' '81 81 56 56 56 56 57 56 57 56 81 81 56 AC D7 D7' '81 56 D7 56 56 AC AC 81 56 56 56 56 56 56 56 56' '56 56 56 56 56 56 56 56 2B 2B 81 AC AC D7 D7 D7' '81 56 D7 56 56 AC AC AC D7 D7 D7 D7 D7 D7 D7 D7' 'D7 D7 D7 D7 D7 D7 D7 D7 81 2B 81 AC AC D7 D7 D7' '81 56 D7 56 56 AC AC AC D7 D7 D7 D7 D7 D7 D7 D7' 'D7 D7 D7 D7 D7 D7 D7 D7 81 2B 56 56 56 AC D7 D7' '81 56 D7 56 56 AC AC AC D7 D7 56 56 56 56 56 56' '56 56 56 56 D7 D7 D7 D7 81 2B 56 56 56 81 D7 D7' '81 56 D7 56 56 AC AC AC D7 D7 81 81 AC AC AC 88' '88 88 AC AC 88 AC D7 D7 81 2B AC AC AC D7 D7 D7' '81 56 D7 56 56 AC AC AC D7 D7 81 81 AC AC AC AC' 'AC AC AC AC AC AC D7 D7 81 2B AC AC AC D7 D7 D7' '81 56 D7 56 56 AC AC AC D7 D7 56 81 56 56 56 56' '56 81 56 81 56 56 D7 D7 81 00 56 56 56 81 D7 D7' '81 56 D7 56 56 AC AC AC D7 D7 56 56 56 56 56 56' '56 56 56 56 56 81 D7 D7 81 00 81 56 56 56 D7 D7' '81 56 D7 56 56 AC AC AC D7 D7 81 AC AC 81 AC AC' 'AC 81 AD AC AC D7 D7 D7 81 2B 81 81 AC AC D7 D7' '81 56 D7 56 56 AC AC AC D7 D7 81 AC AC 81 AC AC' 'AC 81 AD AC AC D7 D7 D7 81 2B 81 81 AC AC D7 D7' '81 56 D7 56 56 AC AC AC D7 D7 56 56 56 56 81 56' '56 56 81 56 56 82 D7 D7 81 2B 56 56 56 56 D7 D7' '81 56 D7 56 56 AC AC AC D7 D7 56 81 56 56 56 56' '56 81 56 81 56 56 D7 D7 81 00 81 56 56 82 D7 D7' '81 56 D7 56 56 AC AC AC D7 D7 AC AC AC 81 AC AC' 'AC 81 AC 81 AC AC D7 D7 81 2B AC AC 81 AC D7 D7' '81 56 D7 56 56 AC AC AC D7 D7 AC AC AC 81 AC AC' 'AC 81 AC 81 AC AC D7 D7 81 2B AC AC 81 AC D7 D7' '81 56 D7 56 56 AC AC AC D7 D7 56 56 56 56 81 81' '56 56 AC 56 A6 D7 D7 D7 81 00 56 56 56 81 D7 D7' '81 55 D7 56 56 AC AC AC D7 D7 56 56 56 56 81 56' '56 56 81 56 56 82 D7 D7 81 00 AC 56 A6 D7 D7 D7' '81 55 D7 56 56 AC AC AC D7 D7 AC AC 81 81 AC 81' 'AC AC AC AC 81 AC D7 D7 81 2B D7 D7 D7 D7 D7 D7' '81 55 D7 56 56 AC AC AC D7 D7 AC AC 81 81 AC 81' 'AC AC AC AC 81 AC D7 D7 81 2B D7 D7 D7 D7 D7 D7' '81 81 D7 56 56 AC AC AC D7 D7 56 56 56 56 56 56' '56 56 56 56 56 81 D7 D7 81 4F D7 AC AC AC AC AC' 'AC D7 D7 56 56 AC AC AC D7 D7 56 56 56 56 81 81' '56 56 AC 56 A6 D7 D7 D7 81 2B D7 D7 D7 D7 D7 D7' 'D7 D7 D7 56 A5 AC AC AC D7 D7 D7 D7 D7 D7 D7 D7' 'D7 D7 D7 D7 D7 D7 D7 D7 81 80 AC AC AC AC AC AC' 'AC AC AC AC AC AC AC AC D7 D7 D7 D7 D7 D7 D7 D7' 'D7 D7 D7 D7 D7 D7 D7 D7 81 80 AC AC AC AC AC AC' 'AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC' 'AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC' 'AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC' 'AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC' 'AC AC AC AC AC AC 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00' } /* BINRES 003.ico folder */ 3 ICON { '00 00 01 00 04 00 10 10 10 00 00 00 00 00 28 01' '00 00 46 00 00 00 10 10 00 00 00 00 00 00 68 05' '00 00 6E 01 00 00 20 20 10 00 00 00 00 00 E8 02' '00 00 D6 06 00 00 20 20 00 00 00 00 00 00 A8 08' '00 00 BE 09 00 00 28 00 00 00 10 00 00 00 20 00' '00 00 01 00 04 00 00 00 00 00 C0 00 00 00 00 00' '00 00 00 00 00 00 10 00 00 00 00 00 00 00 00 00' '00 00 00 00 80 00 00 80 00 00 00 80 80 00 80 00' '00 00 80 00 80 00 80 80 00 00 C0 C0 C0 00 80 80' '80 00 00 00 FF 00 00 FF 00 00 00 FF FF 00 FF 00' '00 00 FF 00 FF 00 FF FF 00 00 FF FF FF 00 FF FF' 'FF FF FF 80 08 FF FF FF FF FF 80 80 30 08 FF FF' 'FF 80 88 80 30 8F FF FF 80 88 88 80 3F FF FF 80' '88 88 88 80 3F FF 80 87 77 88 88 80 3F FF 87 77' '77 78 88 80 3F FF 87 77 77 77 88 80 3F FF 87 77' '77 77 78 80 3F FF 8F 77 77 77 77 81 3F FF 8F F7' '77 78 10 37 8F FF 8F FF 77 83 87 78 FF FF 8F FF' '78 37 77 88 FF FF 8F 78 37 88 88 8F FF FF 88 37' '88 FF FF FF FF FF F8 88 FF FF FF FF FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 28 00' '00 00 10 00 00 00 20 00 00 00 01 00 08 00 00 00' '00 00 40 01 00 00 00 00 00 00 00 00 00 00 00 01' '00 00 00 00 00 00 00 00 00 00 00 00 33 00 00 00' '66 00 00 00 99 00 00 00 CC 00 00 00 FF 00 00 33' '00 00 00 33 33 00 00 33 66 00 00 33 99 00 00 33' 'CC 00 00 33 FF 00 00 66 00 00 00 66 33 00 00 66' '66 00 00 66 99 00 00 66 CC 00 00 66 FF 00 00 99' '00 00 00 99 33 00 00 99 66 00 00 99 99 00 00 99' 'CC 00 00 99 FF 00 00 CC 00 00 00 CC 33 00 00 CC' '66 00 00 CC 99 00 00 CC CC 00 00 CC FF 00 00 FF' '00 00 00 FF 33 00 00 FF 66 00 00 FF 99 00 00 FF' 'CC 00 00 FF FF 00 33 00 00 00 33 00 33 00 33 00' '66 00 33 00 99 00 33 00 CC 00 33 00 FF 00 33 33' '00 00 33 33 33 00 33 33 66 00 33 33 99 00 33 33' 'CC 00 33 33 FF 00 33 66 00 00 33 66 33 00 33 66' '66 00 33 66 99 00 33 66 CC 00 33 66 FF 00 33 99' '00 00 33 99 33 00 33 99 66 00 33 99 99 00 33 99' 'CC 00 33 99 FF 00 33 CC 00 00 33 CC 33 00 33 CC' '66 00 33 CC 99 00 33 CC CC 00 33 CC FF 00 33 FF' '00 00 33 FF 33 00 33 FF 66 00 33 FF 99 00 33 FF' 'CC 00 33 FF FF 00 66 00 00 00 66 00 33 00 66 00' '66 00 66 00 99 00 66 00 CC 00 66 00 FF 00 66 33' '00 00 66 33 33 00 66 33 66 00 66 33 99 00 66 33' 'CC 00 66 33 FF 00 66 66 00 00 66 66 33 00 66 66' '66 00 66 66 99 00 66 66 CC 00 66 66 FF 00 66 99' '00 00 66 99 33 00 66 99 66 00 66 99 99 00 66 99' 'CC 00 66 99 FF 00 66 CC 00 00 66 CC 33 00 66 CC' '66 00 66 CC 99 00 66 CC CC 00 66 CC FF 00 66 FF' '00 00 66 FF 33 00 66 FF 66 00 66 FF 99 00 66 FF' 'CC 00 66 FF FF 00 99 00 00 00 99 00 33 00 99 00' '66 00 99 00 99 00 99 00 CC 00 99 00 FF 00 99 33' '00 00 99 33 33 00 99 33 66 00 99 33 99 00 99 33' 'CC 00 99 33 FF 00 99 66 00 00 99 66 33 00 99 66' '66 00 99 66 99 00 99 66 CC 00 99 66 FF 00 99 99' '00 00 99 99 33 00 99 99 66 00 99 99 99 00 99 99' 'CC 00 99 99 FF 00 99 CC 00 00 99 CC 33 00 99 CC' '66 00 99 CC 99 00 99 CC CC 00 99 CC FF 00 99 FF' '00 00 99 FF 33 00 99 FF 66 00 99 FF 99 00 99 FF' 'CC 00 99 FF FF 00 CC 00 00 00 CC 00 33 00 CC 00' '66 00 CC 00 99 00 CC 00 CC 00 CC 00 FF 00 CC 33' '00 00 CC 33 33 00 CC 33 66 00 CC 33 99 00 CC 33' 'CC 00 CC 33 FF 00 CC 66 00 00 CC 66 33 00 CC 66' '66 00 CC 66 99 00 CC 66 CC 00 CC 66 FF 00 CC 99' '00 00 CC 99 33 00 CC 99 66 00 CC 99 99 00 CC 99' 'CC 00 CC 99 FF 00 CC CC 00 00 CC CC 33 00 CC CC' '66 00 CC CC 99 00 CC CC CC 00 CC CC FF 00 CC FF' '00 00 CC FF 33 00 CC FF 66 00 CC FF 99 00 CC FF' 'CC 00 CC FF FF 00 FF 00 00 00 FF 00 33 00 FF 00' '66 00 FF 00 99 00 FF 00 CC 00 FF 00 FF 00 FF 33' '00 00 FF 33 33 00 FF 33 66 00 FF 33 99 00 FF 33' 'CC 00 FF 33 FF 00 FF 66 00 00 FF 66 33 00 FF 66' '66 00 FF 66 99 00 FF 66 CC 00 FF 66 FF 00 FF 99' '00 00 FF 99 33 00 FF 99 66 00 FF 99 99 00 FF 99' 'CC 00 FF 99 FF 00 FF CC 00 00 FF CC 33 00 FF CC' '66 00 FF CC 99 00 FF CC CC 00 FF CC FF 00 FF FF' '00 00 FF FF 33 00 FF FF 66 00 FF FF 99 00 FF FF' 'CC 00 FF FF FF 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7' '56 00 07 56 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 56 2B' '56 2B 32 00 00 81 D7 D7 D7 D7 D7 D7 56 2B 56 81' '81 2B 32 00 56 D7 D7 D7 D7 D7 56 2B 56 81 81 81' '81 2B 32 D7 D7 D7 D7 D7 56 2B 56 81 81 81 81 81' '81 2B 32 D7 D7 D7 81 2B 56 AC AC AC 81 81 81 81' '81 2B 32 D7 D7 D7 56 AC AC AC AC AC AC 81 81 81' '81 2B 32 D7 D7 D7 56 AC AC AC AC AC AC AC 81 81' '81 2B 32 D7 D7 D7 56 AC AC AC AC AC AC AC AC 81' '81 2B 32 D7 D7 D7 56 D7 AC AC AC AC AC AC AC AC' '81 2C 32 D7 D7 D7 56 D7 D7 AC AC AC AC 56 2C 2B' '32 89 56 D7 D7 D7 56 D7 D7 D7 AC AC 56 34 5F 89' '89 56 D7 D7 D7 D7 56 D7 D7 D7 AC 56 32 89 89 89' '5E 56 D7 D7 D7 D7 56 D7 AC 56 32 89 56 56 56 56' '81 D7 D7 D7 D7 D7 56 56 32 89 56 56 D7 D7 D7 D7' 'D7 D7 D7 D7 D7 D7 D7 56 56 56 D7 D7 D7 D7 D7 D7' 'D7 D7 D7 D7 D7 D7 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 28 00 00 00 20 00 00 00 40 00' '00 00 01 00 04 00 00 00 00 00 80 02 00 00 00 00' '00 00 00 00 00 00 10 00 00 00 00 00 00 00 00 00' '00 00 00 00 80 00 00 80 00 00 00 80 80 00 80 00' '00 00 80 00 80 00 80 80 00 00 C0 C0 C0 00 80 80' '80 00 00 00 FF 00 00 FF 00 00 00 FF FF 00 FF 00' '00 00 FF 00 FF 00 FF FF 00 00 FF FF FF 00 FF FF' 'FF FF FF FF FF FF FF FF FF 00 00 FF FF FF FF FF' 'FF FF FF FF FF FF FF FF 00 80 B0 00 FF FF FF FF' 'FF FF FF FF FF FF FF 00 88 80 B0 00 00 FF FF FF' 'FF FF FF FF FF FF 00 88 77 80 B0 00 00 0F FF FF' 'FF FF FF FF FF 00 88 77 77 80 B0 00 00 FF FF FF' 'FF FF FF FF 00 88 77 77 77 80 B0 00 FF FF FF FF' 'FF FF FF 00 88 77 77 77 77 80 B0 FF FF FF FF FF' 'FF FF 00 88 77 77 77 77 77 80 B0 FF FF FF FF FF' 'FF 00 88 77 77 77 77 77 77 80 B0 FF FF FF FF FF' '00 88 77 77 77 77 77 77 77 80 B0 FF FF FF FF 00' '88 77 77 77 77 77 77 77 77 80 B0 FF FF FF F0 88' '77 77 77 77 77 77 77 77 77 80 B0 FF FF FF F0 77' '77 77 77 77 77 77 77 77 77 80 B0 FF FF FF F0 77' '77 77 77 77 77 77 77 77 77 80 B0 FF FF FF F0 77' '77 77 77 77 77 77 77 77 77 80 B0 FF FF FF F0 F7' 'F7 77 77 77 77 77 77 77 77 80 B0 FF FF FF F0 7F' '77 77 77 77 77 77 77 77 77 80 B0 FF FF FF F0 F7' 'F7 F7 77 77 77 77 77 77 77 80 B0 FF FF FF F0 FF' '7F 77 77 77 77 77 77 77 77 80 B0 FF FF FF F0 F7' 'F7 F7 F7 77 77 77 77 77 78 0B B0 FF FF FF F0 FF' 'FF 7F 77 77 77 77 80 88 00 BF 0F FF FF FF F0 FF' 'F7 F7 F7 F7 77 80 0B 00 BB BF 0F FF FF FF F0 FF' 'FF FF 7F 77 78 0B BB BB BF F0 FF FF FF FF F0 FF' 'FF F7 F7 77 70 BB BB FF FF F0 FF FF FF FF F0 FF' 'FF FF FF F8 00 BF FF FF FF 0F FF FF FF FF F0 FF' 'FF FF F8 00 BF FF FF FF F0 0F FF FF FF FF F0 FF' 'FF F8 00 BF FF 00 FF F0 0F FF FF FF FF FF F0 FF' 'F8 00 BF FF 00 FF 00 0F FF FF FF FF FF FF F0 F8' '00 BF FF 00 FF FF FF FF FF FF FF FF FF FF F0 00' 'BF FF 00 FF FF FF FF FF FF FF FF FF FF FF FF F0' 'FF 00 FF FF FF FF FF FF FF FF FF FF FF FF FF F0' '00 FF FF FF FF FF FF FF FF FF FF FF FF FF 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 28 00' '00 00 20 00 00 00 40 00 00 00 01 00 08 00 00 00' '00 00 80 04 00 00 00 00 00 00 00 00 00 00 00 01' '00 00 00 00 00 00 FF FF FF 00 A8 DC FF 00 58 A8' 'FF 00 C0 C0 C0 00 A4 A0 A0 00 58 58 58 00 30 30' '30 00 00 00 40 00 00 00 00 00 DC C0 B2 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 08 08 08 08' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 08 08 05 08 02 08' '08 08 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 08 08 05 05 05 08 02 08' '08 08 08 08 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 08 08 05 05 04 04 05 08 02 08' '08 08 08 08 08 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 08 08 05 05 04 04 04 04 05 08 02 08' '08 08 08 08 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 08 08 05 05 04 04 04 04 04 04 05 08 02 08' '08 08 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '08 08 05 05 04 04 04 04 04 04 04 04 05 08 02 08' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 08 08' '05 05 04 04 04 04 04 04 04 04 04 04 05 08 02 08' '00 00 00 00 00 00 00 00 00 00 00 00 08 08 05 05' '04 04 04 04 04 04 04 04 04 04 04 04 05 08 02 08' '00 00 00 00 00 00 00 00 00 00 08 08 05 05 04 04' '04 03 04 04 04 04 04 04 04 04 04 04 05 08 02 08' '00 00 00 00 00 00 00 00 08 08 05 05 04 04 03 04' '03 04 04 04 04 04 04 04 04 04 04 04 05 08 02 08' '00 00 00 00 00 00 00 08 05 05 04 04 03 03 03 03' '04 03 04 03 04 04 04 04 04 04 04 04 05 08 02 08' '00 00 00 00 00 00 00 08 04 04 03 03 03 03 03 04' '03 04 03 04 04 04 04 04 04 04 04 04 05 08 02 08' '00 00 00 00 00 00 00 08 03 03 03 03 03 03 03 03' '03 03 04 03 04 03 04 04 04 04 04 04 05 08 02 08' '00 00 00 00 00 00 00 08 03 03 03 03 03 03 03 03' '03 04 03 04 03 04 04 04 04 04 04 04 05 07 02 08' '00 00 00 00 00 00 00 08 00 03 00 03 03 03 03 03' '03 03 03 03 04 03 04 03 04 04 04 04 05 08 02 08' '00 00 00 00 00 00 00 08 03 00 03 03 03 03 03 03' '03 03 03 04 03 04 03 04 04 04 04 04 05 08 02 08' '00 00 00 00 00 00 00 08 00 03 00 03 00 03 03 03' '03 03 03 03 03 03 04 03 04 03 04 04 05 08 02 08' '00 00 00 00 00 00 00 08 00 00 03 00 03 03 03 03' '03 03 03 03 03 04 03 04 03 04 03 04 05 08 02 08' '00 00 00 00 00 00 00 08 00 03 00 03 00 03 00 03' '03 03 03 03 03 03 03 03 04 03 04 05 08 02 02 08' '00 00 00 00 00 00 00 08 00 00 00 00 03 00 03 03' '03 03 03 03 03 04 05 08 05 05 08 08 02 01 08 00' '00 00 00 00 00 00 00 08 00 00 00 03 00 03 00 03' '00 03 03 04 05 08 08 02 07 08 02 02 02 01 08 00' '00 00 00 00 00 00 00 08 00 00 00 00 00 00 03 00' '03 03 03 05 08 02 02 02 02 02 02 01 01 08 00 00' '00 00 00 00 00 00 00 08 00 00 00 00 00 03 00 03' '03 04 04 08 02 02 02 02 01 01 01 01 01 08 00 00' '00 00 00 00 00 00 00 08 00 00 00 00 00 00 00 00' '00 05 08 08 02 01 01 01 01 01 01 01 08 00 00 00' '00 00 00 00 00 00 00 08 00 00 00 00 00 00 00 05' '08 08 02 01 01 01 01 01 01 01 01 08 08 00 00 00' '00 00 00 00 00 00 00 08 00 00 00 00 00 05 08 08' '02 01 01 01 08 08 01 01 01 08 08 00 00 00 00 00' '00 00 00 00 00 00 00 08 00 00 00 05 08 08 02 01' '01 01 08 08 00 00 08 08 06 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 08 00 05 08 08 02 01 01 01' '08 08 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 08 08 08 02 01 01 01 08 08' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 08 01 01 08 08 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 08 08 08 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00' } /* BINRES 004.ico folder */ 4 ICON { '00 00 01 00 01 00 10 10 10 00 00 00 00 00 68 05' '00 00 16 00 00 00 28 00 00 00 10 00 00 00 20 00' '00 00 01 00 08 00 00 00 00 00 00 01 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 80 00 00 80 00 00 00 80 80 00 80 00' '00 00 80 00 80 00 80 80 00 00 C0 C0 C0 00 C0 DC' 'C0 00 F0 CA A6 00 04 04 04 00 08 08 08 00 0C 0C' '0C 00 11 11 11 00 16 16 16 00 1C 1C 1C 00 22 22' '22 00 29 29 29 00 55 55 55 00 4D 4D 4D 00 42 42' '42 00 39 39 39 00 80 7C FF 00 50 50 FF 00 93 00' 'D6 00 FF EC CC 00 C6 D6 EF 00 D6 E7 E7 00 90 A9' 'AD 00 00 00 33 00 00 00 66 00 00 00 99 00 00 00' 'CC 00 00 33 00 00 00 33 33 00 00 33 66 00 00 33' '99 00 00 33 CC 00 00 33 FF 00 00 66 00 00 00 66' '33 00 00 66 66 00 00 66 99 00 00 66 CC 00 00 66' 'FF 00 00 99 00 00 00 99 33 00 00 99 66 00 00 99' '99 00 00 99 CC 00 00 99 FF 00 00 CC 00 00 00 CC' '33 00 00 CC 66 00 00 CC 99 00 00 CC CC 00 00 CC' 'FF 00 00 FF 66 00 00 FF 99 00 00 FF CC 00 33 00' '00 00 33 00 33 00 33 00 66 00 33 00 99 00 33 00' 'CC 00 33 00 FF 00 33 33 00 00 33 33 33 00 33 33' '66 00 33 33 99 00 33 33 CC 00 33 33 FF 00 33 66' '00 00 33 66 33 00 33 66 66 00 33 66 99 00 33 66' 'CC 00 33 66 FF 00 33 99 00 00 33 99 33 00 33 99' '66 00 33 99 99 00 33 99 CC 00 33 99 FF 00 33 CC' '00 00 33 CC 33 00 33 CC 66 00 33 CC 99 00 33 CC' 'CC 00 33 CC FF 00 33 FF 33 00 33 FF 66 00 33 FF' '99 00 33 FF CC 00 33 FF FF 00 66 00 00 00 66 00' '33 00 66 00 66 00 66 00 99 00 66 00 CC 00 66 00' 'FF 00 66 33 00 00 66 33 33 00 66 33 66 00 66 33' '99 00 66 33 CC 00 66 33 FF 00 66 66 00 00 66 66' '33 00 66 66 66 00 66 66 99 00 66 66 CC 00 66 99' '00 00 66 99 33 00 66 99 66 00 66 99 99 00 66 99' 'CC 00 66 99 FF 00 66 CC 00 00 66 CC 33 00 66 CC' '99 00 66 CC CC 00 66 CC FF 00 66 FF 00 00 66 FF' '33 00 66 FF 99 00 66 FF CC 00 CC 00 FF 00 FF 00' 'CC 00 99 99 00 00 99 33 99 00 99 00 99 00 99 00' 'CC 00 99 00 00 00 99 33 33 00 99 00 66 00 99 33' 'CC 00 99 00 FF 00 99 66 00 00 99 66 33 00 99 33' '66 00 99 66 99 00 99 66 CC 00 99 33 FF 00 99 99' '33 00 99 99 66 00 99 99 99 00 99 99 CC 00 99 99' 'FF 00 99 CC 00 00 99 CC 33 00 66 CC 66 00 99 CC' '99 00 99 CC CC 00 99 CC FF 00 99 FF 00 00 99 FF' '33 00 99 CC 66 00 99 FF 99 00 99 FF CC 00 99 FF' 'FF 00 CC 00 00 00 99 00 33 00 CC 00 66 00 CC 00' '99 00 CC 00 CC 00 99 33 00 00 CC 33 33 00 CC 33' '66 00 CC 33 99 00 CC 33 CC 00 CC 33 FF 00 CC 66' '00 00 CC 66 33 00 99 66 66 00 CC 66 99 00 CC 66' 'CC 00 99 66 FF 00 CC 99 00 00 CC 99 33 00 CC 99' '66 00 CC 99 99 00 CC 99 CC 00 CC 99 FF 00 CC CC' '00 00 CC CC 33 00 CC CC 66 00 CC CC 99 00 CC CC' 'CC 00 CC CC FF 00 CC FF 00 00 CC FF 33 00 99 FF' '66 00 CC FF 99 00 CC FF CC 00 CC FF FF 00 CC 00' '33 00 FF 00 66 00 FF 00 99 00 CC 33 00 00 FF 33' '33 00 FF 33 66 00 FF 33 99 00 FF 33 CC 00 FF 33' 'FF 00 FF 66 00 00 FF 66 33 00 CC 66 66 00 FF 66' '99 00 FF 66 CC 00 CC 66 FF 00 FF 99 00 00 FF 99' '33 00 FF 99 66 00 FF 99 99 00 FF 99 CC 00 FF 99' 'FF 00 FF CC 00 00 FF CC 33 00 FF CC 66 00 FF CC' '99 00 FF CC CC 00 FF CC FF 00 FF FF 33 00 CC FF' '66 00 FF FF 99 00 FF FF CC 00 66 66 FF 00 66 FF' '66 00 66 FF FF 00 FF 66 66 00 FF 66 FF 00 FF FF' '66 00 21 00 A5 00 5F 5F 5F 00 77 77 77 00 86 86' '86 00 96 96 96 00 CB CB CB 00 B2 B2 B2 00 D7 D7' 'D7 00 DD DD DD 00 E3 E3 E3 00 EA EA EA 00 F1 F1' 'F1 00 F8 F8 F8 00 F0 FB FF 00 A4 A0 A0 00 80 80' '80 00 00 00 FF 00 00 FF 00 00 00 FF FF 00 FF 00' '00 00 FF 00 FF 00 FF FF 00 00 FF FF FF 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '30 30 30 30 30 30 30 30 30 30 30 30 00 00 00 00' '30 F5 9A A0 9A A0 9A 9A 9A 9A 79 30 00 00 00 30' 'F5 A0 A0 9A A0 9A A0 9A 9A 9A 79 00 30 00 00 30' 'F5 A0 A0 A0 A0 A0 9A A0 9A 9A 30 00 30 00 30 F5' 'A0 A0 A0 A0 9A A0 A0 9A A0 79 00 79 79 00 30 F5' 'A0 A0 A0 A0 A0 A0 9A A0 9A 79 00 79 79 00 30 30' '30 30 30 30 30 30 30 30 30 30 79 A0 79 00 00 30' 'F5 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 79 00 00 30' 'F5 A0 A0 A0 A0 A0 A0 A0 F5 F5 F5 F5 79 00 00 30' 'F5 A0 A0 A0 A0 A0 F5 30 30 30 30 30 30 00 00 00' '30 F5 F5 F5 F5 F5 30 00 00 00 00 00 00 00 00 00' '00 30 30 30 30 30 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 FF FF' '00 00 FF FF 30 30 E0 00 00 00 C0 00 30 30 C0 00' '00 00 80 00 30 30 80 00 00 00 00 00 00 00 00 00' '00 00 00 00 A0 9A 80 00 00 00 80 00 A0 9A 80 01' '00 00 C0 7F A0 9A E0 FF 00 00 FF FF 9A A0' } /* BINRES 008.ico drive */ 8 ICON { '00 00 01 00 04 00 10 10 10 00 00 00 00 00 28 01' '00 00 46 00 00 00 10 10 00 00 00 00 00 00 68 05' '00 00 6E 01 00 00 20 20 10 00 00 00 00 00 E8 02' '00 00 D6 06 00 00 20 20 00 00 00 00 00 00 A8 08' '00 00 BE 09 00 00 28 00 00 00 10 00 00 00 20 00' '00 00 01 00 04 00 00 00 00 00 C0 00 00 00 00 00' '00 00 00 00 00 00 10 00 00 00 00 00 00 00 00 00' '00 00 00 00 80 00 00 80 00 00 00 80 80 00 80 00' '00 00 80 00 80 00 80 80 00 00 C0 C0 C0 00 80 80' '80 00 00 00 FF 00 00 FF 00 00 00 FF FF 00 FF 00' '00 00 FF 00 FF 00 FF FF 00 00 FF FF FF 00 FF FF' 'FF FF FF FF FF FF FF FF 78 88 FF FF FF FF FF 86' '07 78 8F FF FF FF F8 88 88 77 88 FF FF FF 88 88' '87 77 78 8F FF FF 88 88 77 77 77 88 FF FF 87 88' '87 77 77 78 8F FF F8 88 88 77 77 77 88 FF FF 88' '88 87 77 77 78 FF FF F8 88 87 77 77 78 FF FF FF' '87 77 77 77 88 FF FF FF F8 77 77 88 88 FF FF FF' 'FF 87 80 88 88 FF FF FF FF F8 F8 88 88 FF FF FF' 'FF FF FF FF 88 FF FF FF FF FF FF FF 78 FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 28 00' '00 00 10 00 00 00 20 00 00 00 01 00 08 00 00 00' '00 00 40 01 00 00 00 00 00 00 00 00 00 00 00 01' '00 00 00 00 00 00 00 00 00 00 00 00 33 00 00 00' '66 00 00 00 99 00 00 00 CC 00 00 00 FF 00 00 33' '00 00 00 33 33 00 00 33 66 00 00 33 99 00 00 33' 'CC 00 00 33 FF 00 00 66 00 00 00 66 33 00 00 66' '66 00 00 66 99 00 00 66 CC 00 00 66 FF 00 00 99' '00 00 00 99 33 00 00 99 66 00 00 99 99 00 00 99' 'CC 00 00 99 FF 00 00 CC 00 00 00 CC 33 00 00 CC' '66 00 00 CC 99 00 00 CC CC 00 00 CC FF 00 00 FF' '00 00 00 FF 33 00 00 FF 66 00 00 FF 99 00 00 FF' 'CC 00 00 FF FF 00 33 00 00 00 33 00 33 00 33 00' '66 00 33 00 99 00 33 00 CC 00 33 00 FF 00 33 33' '00 00 33 33 33 00 33 33 66 00 33 33 99 00 33 33' 'CC 00 33 33 FF 00 33 66 00 00 33 66 33 00 33 66' '66 00 33 66 99 00 33 66 CC 00 33 66 FF 00 33 99' '00 00 33 99 33 00 33 99 66 00 33 99 99 00 33 99' 'CC 00 33 99 FF 00 33 CC 00 00 33 CC 33 00 33 CC' '66 00 33 CC 99 00 33 CC CC 00 33 CC FF 00 33 FF' '00 00 33 FF 33 00 33 FF 66 00 33 FF 99 00 33 FF' 'CC 00 33 FF FF 00 66 00 00 00 66 00 33 00 66 00' '66 00 66 00 99 00 66 00 CC 00 66 00 FF 00 66 33' '00 00 66 33 33 00 66 33 66 00 66 33 99 00 66 33' 'CC 00 66 33 FF 00 66 66 00 00 66 66 33 00 66 66' '66 00 66 66 99 00 66 66 CC 00 66 66 FF 00 66 99' '00 00 66 99 33 00 66 99 66 00 66 99 99 00 66 99' 'CC 00 66 99 FF 00 66 CC 00 00 66 CC 33 00 66 CC' '66 00 66 CC 99 00 66 CC CC 00 66 CC FF 00 66 FF' '00 00 66 FF 33 00 66 FF 66 00 66 FF 99 00 66 FF' 'CC 00 66 FF FF 00 99 00 00 00 99 00 33 00 99 00' '66 00 99 00 99 00 99 00 CC 00 99 00 FF 00 99 33' '00 00 99 33 33 00 99 33 66 00 99 33 99 00 99 33' 'CC 00 99 33 FF 00 99 66 00 00 99 66 33 00 99 66' '66 00 99 66 99 00 99 66 CC 00 99 66 FF 00 99 99' '00 00 99 99 33 00 99 99 66 00 99 99 99 00 99 99' 'CC 00 99 99 FF 00 99 CC 00 00 99 CC 33 00 99 CC' '66 00 99 CC 99 00 99 CC CC 00 99 CC FF 00 99 FF' '00 00 99 FF 33 00 99 FF 66 00 99 FF 99 00 99 FF' 'CC 00 99 FF FF 00 CC 00 00 00 CC 00 33 00 CC 00' '66 00 CC 00 99 00 CC 00 CC 00 CC 00 FF 00 CC 33' '00 00 CC 33 33 00 CC 33 66 00 CC 33 99 00 CC 33' 'CC 00 CC 33 FF 00 CC 66 00 00 CC 66 33 00 CC 66' '66 00 CC 66 99 00 CC 66 CC 00 CC 66 FF 00 CC 99' '00 00 CC 99 33 00 CC 99 66 00 CC 99 99 00 CC 99' 'CC 00 CC 99 FF 00 CC CC 00 00 CC CC 33 00 CC CC' '66 00 CC CC 99 00 CC CC CC 00 CC CC FF 00 CC FF' '00 00 CC FF 33 00 CC FF 66 00 CC FF 99 00 CC FF' 'CC 00 CC FF FF 00 FF 00 00 00 FF 00 33 00 FF 00' '66 00 FF 00 99 00 FF 00 CC 00 FF 00 FF 00 FF 33' '00 00 FF 33 33 00 FF 33 66 00 FF 33 99 00 FF 33' 'CC 00 FF 33 FF 00 FF 66 00 00 FF 66 33 00 FF 66' '66 00 FF 66 99 00 FF 66 CC 00 FF 66 FF 00 FF 99' '00 00 FF 99 33 00 FF 99 66 00 FF 99 99 00 FF 99' 'CC 00 FF 99 FF 00 FF CC 00 00 FF CC 33 00 FF CC' '66 00 FF CC 99 00 FF CC CC 00 FF CC FF 00 FF FF' '00 00 FF FF 33 00 FF FF 66 00 FF FF 99 00 FF FF' 'CC 00 FF FF FF 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7' 'D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 A5 56 56 81 D7 D7' 'D7 D7 D7 D7 D7 D7 D7 D7 81 55 2B AC AC 81 81 D7' 'D7 D7 D7 D7 D7 D7 D7 56 56 81 56 58 AC AC 81 81' 'D7 D7 D7 D7 D7 D7 56 81 81 81 81 AC AC AC AC 81' '81 D7 D7 D7 D7 D7 56 81 81 81 AC AC AC AC AC AC' '81 81 D7 D7 D7 D7 56 AC 81 81 81 AC AC AC AC AC' 'AC 81 81 D7 D7 D7 D7 56 81 81 81 81 AC AC AC AC' 'AC AC 81 81 D7 D7 D7 D7 56 81 81 81 81 AC AC AC' 'AC AC AC 56 D7 D7 D7 D7 D7 56 81 81 81 AC AC AC' 'AC AC AC 56 D7 D7 D7 D7 D7 D7 56 AC AC AC AC AC' 'AC AC 56 81 D7 D7 D7 D7 D7 D7 D7 56 AC AC AC AC' '56 56 56 81 D7 D7 D7 D7 D7 D7 D7 D7 56 AC 56 2B' '81 81 56 81 D7 D7 D7 D7 D7 D7 D7 D7 D7 56 D7 81' '56 56 56 81 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7' 'D7 D7 56 56 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7' 'D7 D7 A5 56 D7 D7 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 28 00 00 00 20 00 00 00 40 00' '00 00 01 00 04 00 00 00 00 00 80 02 00 00 00 00' '00 00 00 00 00 00 10 00 00 00 00 00 00 00 00 00' '00 00 00 00 80 00 00 80 00 00 00 80 80 00 80 00' '00 00 80 00 80 00 80 80 00 00 C0 C0 C0 00 80 80' '80 00 00 00 FF 00 00 FF 00 00 00 FF FF 00 FF 00' '00 00 FF 00 FF 00 FF FF 00 00 FF FF FF 00 FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF F0 00 FF FF FF FF FF FF FF FF FF FF FF' 'FF FF F8 07 7F 0F FF FF FF FF FF FF FF FF FF FF' 'FF F0 08 77 7F 70 FF FF FF FF FF FF FF FF FF FF' 'F0 08 88 77 7F 77 0F FF FF FF FF FF FF FF FF F0' '07 88 88 79 7F 77 70 FF FF FF FF FF FF FF FF 07' '77 88 88 79 7F 77 77 0F FF FF FF FF FF FF F0 77' '77 88 88 7F F7 F7 77 70 FF FF FF FF FF FF F0 77' '77 88 87 77 77 7F 77 77 0F FF FF FF FF FF F0 77' '77 87 77 77 77 77 F7 77 70 FF FF FF FF FF F0 77' '77 77 77 77 77 77 7F 77 77 0F FF FF FF FF F0 77' '77 77 77 77 77 77 77 F7 77 70 FF FF FF FF F0 77' '77 77 77 77 77 77 77 7F 77 77 0F FF FF FF FF 07' '77 77 77 77 77 77 77 77 F7 77 70 FF FF FF FF F0' '77 77 77 77 77 77 77 77 7F 77 77 0F FF FF FF FF' '07 77 77 77 77 77 77 77 77 F7 77 0F FF FF FF FF' 'F0 77 77 77 77 77 77 77 77 7F 77 0F FF FF FF FF' 'FF 07 77 77 77 77 77 77 77 77 F7 0F FF FF FF FF' 'FF F0 77 77 77 FF 77 77 77 77 7F 0F FF FF FF FF' 'FF FF 07 77 FF 77 77 77 77 77 77 0F FF FF FF FF' 'FF FF F0 7F 77 77 77 77 77 77 00 FF FF FF FF FF' 'FF FF FF 07 77 77 77 77 77 00 70 FF FF FF FF FF' 'FF FF FF F0 77 77 77 77 00 7F 77 0F FF FF FF FF' 'FF FF FF FF 07 77 77 00 77 77 F7 0F FF FF FF FF' 'FF FF FF FF F0 77 00 07 77 77 00 FF FF FF FF FF' 'FF FF FF FF FF 00 FF F0 77 00 70 FF FF FF FF FF' 'FF FF FF FF FF FF FF FF 00 FF 07 0F FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF F0 70 FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF F0 70 FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF F8 70 FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF 8F FF FF 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 28 00' '00 00 20 00 00 00 40 00 00 00 01 00 08 00 00 00' '00 00 80 04 00 00 00 00 00 00 00 00 00 00 00 01' '00 00 00 00 00 00 00 00 00 00 FF FF FF 00 80 80' '80 00 C0 C0 C0 00 A4 A0 A0 00 58 58 58 00 00 00' 'FF 00 DC C0 B2 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 01 01 01 01 01 01 01 01 01 01' '01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01' '01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01' '01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01' '01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01' '01 00 00 00 01 01 01 01 01 01 01 01 01 01 01 01' '01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 05' '00 03 03 01 00 01 01 01 01 01 01 01 01 01 01 01' '01 01 01 01 01 01 01 01 01 01 01 01 01 00 00 05' '03 03 03 01 03 00 01 01 01 01 01 01 01 01 01 01' '01 01 01 01 01 01 01 01 01 01 01 00 00 02 02 05' '03 03 03 01 03 03 00 01 01 01 01 01 01 01 01 01' '01 01 01 01 01 01 01 01 01 00 00 04 02 02 02 05' '03 06 03 01 03 03 03 00 01 01 01 01 01 01 01 01' '01 01 01 01 01 01 01 01 00 04 04 04 02 02 02 05' '03 06 03 01 03 03 03 03 00 01 01 01 01 01 01 01' '01 01 01 01 01 01 01 00 04 04 04 04 02 02 02 05' '03 01 01 03 01 03 03 03 03 00 01 01 01 01 01 01' '01 01 01 01 01 01 01 00 04 04 04 04 02 02 02 03' '03 03 03 03 03 01 03 03 03 03 00 01 01 01 01 01' '01 01 01 01 01 01 01 00 04 04 04 04 02 03 03 03' '03 03 03 03 03 03 01 03 03 03 03 00 01 01 01 01' '01 01 01 01 01 01 01 00 04 04 04 03 03 04 04 03' '03 03 03 03 03 03 03 01 03 03 03 03 00 01 01 01' '01 01 01 01 01 01 01 00 04 03 03 04 04 04 04 04' '03 03 03 03 03 03 03 03 01 03 03 03 03 00 01 01' '01 01 01 01 01 01 01 00 03 04 04 04 04 04 04 04' '04 03 03 03 03 03 03 03 03 01 03 03 03 03 00 01' '01 01 01 01 01 01 01 01 00 04 04 04 04 04 04 04' '04 04 03 03 03 03 03 03 03 03 01 03 03 03 03 00' '01 01 01 01 01 01 01 01 01 00 04 04 04 04 04 04' '04 04 04 03 03 03 03 03 03 03 03 01 03 03 03 03' '00 01 01 01 01 01 01 01 01 01 00 04 04 04 04 04' '04 04 04 04 03 03 03 03 03 03 03 03 01 03 03 03' '00 01 01 01 01 01 01 01 01 01 01 00 04 04 04 04' '04 04 04 04 04 03 03 03 03 03 03 03 03 01 03 03' '00 01 01 01 01 01 01 01 01 01 01 01 00 04 04 04' '04 04 04 04 04 04 03 03 03 03 03 03 03 03 01 03' '00 01 01 01 01 01 01 01 01 01 01 01 01 00 04 04' '04 04 04 04 01 01 03 03 03 03 03 03 03 03 03 01' '00 01 01 01 01 01 01 01 01 01 01 01 01 01 00 04' '04 04 01 01 03 03 03 03 03 03 03 03 03 03 03 03' '00 01 01 01 01 01 01 01 01 01 01 01 01 01 01 00' '03 01 03 03 03 03 03 03 03 03 03 03 03 03 00 00' '01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01' '00 03 03 03 03 03 03 03 03 03 03 03 00 00 04 00' '01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01' '01 00 03 03 03 03 03 03 03 03 00 00 04 01 04 04' '00 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01' '01 01 00 03 03 03 03 03 00 00 04 04 04 04 01 04' '00 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01' '01 01 01 00 03 03 00 00 00 04 04 04 04 04 00 00' '01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01' '01 01 01 01 00 00 01 01 01 00 04 04 00 00 04 00' '01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01' '01 01 01 01 01 01 01 01 01 01 00 00 01 01 00 04' '00 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01' '01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 00' '04 00 01 01 01 01 01 01 01 01 01 01 01 01 01 01' '01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 00' '04 00 01 01 01 01 01 01 01 01 01 01 01 01 01 01' '01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 05' '04 00 01 01 01 01 01 01 01 01 01 01 01 01 01 01' '01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01' '05 01 01 01 01 01 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00' } /* BINRES 015.ico mycomputer */ 15 ICON { '00 00 01 00 02 00 10 10 10 00 00 00 00 00 28 01' '00 00 26 00 00 00 20 20 10 00 00 00 00 00 E8 02' '00 00 4E 01 00 00 28 00 00 00 10 00 00 00 20 00' '00 00 01 00 04 00 00 00 00 00 C0 00 00 00 00 00' '00 00 00 00 00 00 10 00 00 00 00 00 00 00 00 00' '00 00 00 00 80 00 00 80 00 00 00 80 80 00 80 00' '00 00 80 00 80 00 80 80 00 00 C0 C0 C0 00 80 80' '80 00 00 00 FF 00 00 FF 00 00 00 FF FF 00 FF 00' '00 00 FF 00 FF 00 FF FF 00 00 FF FF FF 00 00 00' '00 00 00 00 00 00 07 77 77 77 77 77 77 70 07 77' '77 77 77 77 77 70 00 00 00 00 00 00 00 00 F0 00' '00 00 00 00 00 0F F0 77 77 77 77 77 77 0F F0 70' '00 00 00 00 07 0F F0 70 CC CC CC CC 07 0F F0 70' 'CC CC CC CC 07 0F F0 70 CC CC CC CC 07 0F F0 70' 'CC CC CC CC 07 0F F0 70 CC CC CC CC 07 0F F0 70' 'CC CC CC CC 07 0F F0 70 00 00 00 00 07 0F F0 77' '77 77 77 77 77 0F F0 00 00 00 00 00 00 0F 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 28 00' '00 00 20 00 00 00 40 00 00 00 01 00 04 00 00 00' '00 00 80 02 00 00 00 00 00 00 00 00 00 00 10 00' '00 00 00 00 00 00 00 00 00 00 00 00 80 00 00 80' '00 00 00 80 80 00 80 00 00 00 80 00 80 00 80 80' '00 00 C0 C0 C0 00 80 80 80 00 00 00 FF 00 00 FF' '00 00 00 FF FF 00 FF 00 00 00 FF 00 FF 00 FF FF' '00 00 FF FF FF 00 FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF F0 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 0F F0 77 77 77 77 77 77 77 77 77' '77 77 77 77 77 0F F0 77 77 77 77 77 77 77 77 77' '77 77 77 77 77 0F F0 77 77 77 77 77 77 77 77 77' '77 77 77 77 77 0F F0 77 77 77 77 77 77 77 77 77' '77 77 77 77 77 0F F0 77 77 77 77 77 77 77 77 77' '77 77 77 77 77 0F F0 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 0F FF F0 00 00 00 00 00 00 00 00' '00 00 00 00 0F FF FF F0 77 77 77 77 77 77 77 77' '77 77 77 77 0F FF FF F0 77 77 77 77 77 77 77 77' '77 77 77 77 0F FF FF F0 77 00 00 00 00 00 00 00' '00 00 00 77 0F FF FF F0 77 0C CC CC CC CC CC CC' 'CC CC C0 77 0F FF FF F0 77 0C CC CC CC CC CC CC' 'CC CC C0 77 0F FF FF F0 77 0C CC CC CC CC CC CC' 'CC CC C0 77 0F FF FF F0 77 0C CC CC CC CC CC CC' 'CC CC C0 77 0F FF FF F0 77 0C CC CC CC CC CC CC' 'CC CC C0 77 0F FF FF F0 77 0C CC CC CC CC CC CC' 'CC CC C0 77 0F FF FF F0 77 0C CC CC CC CC CC CC' 'CC CC C0 77 0F FF FF F0 77 0C CC CC CC CC CC CC' 'CC CC C0 77 0F FF FF F0 77 0C CC CC CC CC CC CC' 'CC CC C0 77 0F FF FF F0 77 0C CC CC CC CC CC CC' 'CC CC C0 77 0F FF FF F0 77 0C CC CC CC CC CC CC' 'CC CC C0 77 0F FF FF F0 77 0C CC CC CC CC CC CC' 'CC CC C0 77 0F FF FF F0 77 0C CC CC CC CC CC CC' 'CC CC C0 77 0F FF FF F0 77 0C CC CC CC CC CC CC' 'CC CC C0 77 0F FF FF F0 77 00 00 00 00 00 00 00' '00 00 00 77 0F FF FF F0 77 77 77 77 77 77 77 77' '77 77 77 77 0F FF FF F0 77 77 77 77 77 77 77 77' '77 77 77 77 0F FF FF F0 00 00 00 00 00 00 00 00' '00 00 00 00 0F FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00' } /* BINRES 034.ico desktop */ 34 ICON { '00 00 01 00 02 00 10 10 10 00 00 00 00 00 28 01' '00 00 26 00 00 00 20 20 10 00 00 00 00 00 E8 02' '00 00 4E 01 00 00 28 00 00 00 10 00 00 00 20 00' '00 00 01 00 04 00 00 00 00 00 C0 00 00 00 00 00' '00 00 00 00 00 00 10 00 00 00 00 00 00 00 00 00' '00 00 00 00 80 00 00 80 00 00 00 80 80 00 80 00' '00 00 80 00 80 00 80 80 00 00 C0 C0 C0 00 80 80' '80 00 00 00 FF 00 00 FF 00 00 00 FF FF 00 FF 00' '00 00 FF 00 FF 00 FF FF 00 00 FF FF FF 00 FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF F0 00' '00 00 00 00 00 00 F0 99 00 AA 00 CC 0B B0 F0 99' '00 AA 00 CC 0B B0 F0 99 00 AA 00 CC 0B B0 F0 99' '00 AA 00 CC 0B B0 F0 99 00 AA 00 CC 0B B0 F0 99' '00 AA 00 CC 0B B0 F0 99 00 AA 00 CC 0B B0 F0 99' '00 00 00 CC 0B B0 F0 99 0F FF F0 CC 0B B0 F0 99' '0F FF F0 CC 00 00 F0 00 0F FF F0 CC 0F FF FF FF' 'FF FF F0 CC 0F FF FF FF FF FF F0 00 0F FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 00 00' 'FF FF 00 00 FF FF 00 00 FF FF 00 00 FF FF 28 00' '00 00 20 00 00 00 40 00 00 00 01 00 04 00 00 00' '00 00 80 02 00 00 00 00 00 00 00 00 00 00 10 00' '00 00 00 00 00 00 00 00 00 00 00 00 80 00 00 80' '00 00 00 80 80 00 80 00 00 00 80 00 80 00 80 80' '00 00 C0 C0 C0 00 80 80 80 00 00 00 FF 00 00 FF' '00 00 00 FF FF 00 FF 00 00 00 FF 00 FF 00 FF FF' '00 00 FF FF FF 00 FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF F0 00 00 00 00 00 00 00' '00 00 00 FF FF FF FF FF F0 CC C0 02 20 0B B0 0D' 'D0 0A A0 FF FF FF FF FF F0 C0 C0 02 20 0B B0 0D' 'D0 0A A0 FF FF FF FF FF F0 C0 C0 02 20 0B B0 0D' 'D0 0A A0 FF FF FF FF FF F0 C0 C0 02 20 0B B0 0D' 'D0 0A A0 FF FF FF FF FF F0 C0 C0 02 20 0B B0 0D' 'D0 0A A0 FF FF FF FF FF F0 C0 C0 02 20 0B B0 0D' 'D0 0A A0 FF FF FF FF FF F0 C0 C0 02 20 0B B0 0D' 'D0 0A A0 FF FF FF FF FF F0 C0 C0 02 20 0B B0 0D' 'D0 0A A0 FF FF FF FF FF F0 C0 C0 02 20 0B B0 0D' 'D0 0A A0 FF FF FF FF FF F0 CC C0 02 20 0B B0 0D' 'D0 0A A0 FF FF FF FF FF F0 CC C0 02 20 0B B0 0D' 'D0 0A A0 FF FF FF FF FF F0 CC C0 02 20 0B B0 0D' 'D0 0A A0 FF FF FF FF FF F0 CC C0 02 20 0B B0 0D' 'D0 0A A0 FF FF FF FF FF F0 CC C0 02 20 0B B0 0D' 'D0 0A A0 FF FF FF FF FF F0 CC C0 02 20 0B B0 0D' 'D0 00 00 FF FF FF FF FF F0 CC C0 02 20 0B B0 0D' 'D0 FF FF FF FF FF FF FF F0 CC C0 02 20 0B B0 0D' 'D0 FF FF FF FF FF FF FF F0 CC C0 02 20 0B B0 0D' 'D0 FF FF FF FF FF FF FF F0 CC C0 00 00 0B B0 0D' 'D0 FF FF FF FF FF FF FF F0 CC C0 FF FF 0B B0 0D' 'D0 FF FF FF FF FF FF FF F0 CC C0 FF FF 00 00 0D' 'D0 FF FF FF FF FF FF FF F0 00 00 FF FF FF FF 0D' 'D0 FF FF FF FF FF FF FF FF FF FF FF FF FF FF 0D' 'D0 FF FF FF FF FF FF FF FF FF FF FF FF FF FF 00' '00 FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF' 'FF FF FF FF FF FF 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00' '00 00 00 00 00 00' } /*--------------------- END FIXME ------------------------*/ /* * Everything that does not depend on language, * like textless bitmaps etc, go into the * neutral language. This will prevent them from * being duplicated for each language. */ #include "shell32_xx.rc" /* * Everything specific to any language goes * in one of the specific files. * Note that you can and may override resources * which also have a neutral version. This is to * get localized bitmaps for example. */ #include "shell32_Ca.rc" #include "shell32_Cs.rc" #include "shell32_Da.rc" #include "shell32_De.rc" #include "shell32_En.rc" #include "shell32_Eo.rc" #include "shell32_Es.rc" #include "shell32_Fi.rc" #include "shell32_Fr.rc" #include "shell32_Hu.rc" #include "shell32_It.rc" #include "shell32_Ko.rc" #include "shell32_Nl.rc" #include "shell32_No.rc" #include "shell32_Pl.rc" #include "shell32_Pt.rc" #include "shell32_Ru.rc" #include "shell32_Sk.rc" #include "shell32_Sv.rc" #include "shell32_Wa.rc" #include "shell32_Ja.rc" wine-20000526/dlls/shell32/shresdef.h0100644000175000001440000000117707102371522016635 0ustar julliardusers#ifndef __WINE_SHELL_RES_H #define __WINE_SHELL_RES_H /* columntitles for the shellview */ #define IDS_SHV_COLUMN1 7 #define IDS_SHV_COLUMN2 8 #define IDS_SHV_COLUMN3 9 #define IDS_SHV_COLUMN4 10 #define IDS_SHV_COLUMN5 11 #define IDS_SHV_COLUMN6 12 #define IDS_SHV_COLUMN7 13 #define IDS_DESKTOP 20 #define IDS_MYCOMPUTER 21 #define IDS_SELECT 22 #define IDS_OPEN 23 #define IDS_VIEW_LARGE 24 #define IDS_VIEW_SMALL 25 #define IDS_VIEW_LIST 26 #define IDS_VIEW_DETAILS 27 #define IDS_CREATEFOLDER_DENIED 30 #define IDS_CREATEFOLDER_CAPTION 31 #define IDS_DELETEFOLDER_TEXT 32 #define IDS_DELETEFOLDER_CAPTION 33 #endif wine-20000526/dlls/shell32/shv_bg_cmenu.c0100644000175000001440000002330307102371522017457 0ustar julliardusers/* * IContextMenu * ShellView Background Context Menu (shv_bg_cm) * * Copyright 1999 Juergen Schmied */ #include #include "debugtools.h" #include "pidl.h" #include "wine/obj_base.h" #include "wine/obj_contextmenu.h" #include "wine/obj_shellbrowser.h" #include "shell32_main.h" #include "shellfolder.h" #include "shell.h" /* DROPFILESTRUCT */ #include "wine/undocshell.h" DEFAULT_DEBUG_CHANNEL(shell) /************************************************************************** * IContextMenu Implementation */ typedef struct { ICOM_VFIELD(IContextMenu); IShellFolder* pSFParent; DWORD ref; } BgCmImpl; static struct ICOM_VTABLE(IContextMenu) cmvt; /************************************************************************** * ISVBgCm_Constructor() */ IContextMenu *ISvBgCm_Constructor(IShellFolder* pSFParent) { BgCmImpl* cm; cm = (BgCmImpl*)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(BgCmImpl)); ICOM_VTBL(cm)=&cmvt; cm->ref = 1; cm->pSFParent = pSFParent; if(pSFParent) IShellFolder_AddRef(pSFParent); TRACE("(%p)->()\n",cm); shell32_ObjCount++; return (IContextMenu*)cm; } /************************************************************************** * ISVBgCm_fnQueryInterface */ static HRESULT WINAPI ISVBgCm_fnQueryInterface(IContextMenu *iface, REFIID riid, LPVOID *ppvObj) { ICOM_THIS(BgCmImpl, iface); TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown)) /*IUnknown*/ { *ppvObj = This; } else if(IsEqualIID(riid, &IID_IContextMenu)) /*IContextMenu*/ { *ppvObj = This; } else if(IsEqualIID(riid, &IID_IShellExtInit)) /*IShellExtInit*/ { FIXME("-- LPSHELLEXTINIT pointer requested\n"); } if(*ppvObj) { IUnknown_AddRef((IUnknown*)*ppvObj); TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } /************************************************************************** * ISVBgCm_fnAddRef */ static ULONG WINAPI ISVBgCm_fnAddRef(IContextMenu *iface) { ICOM_THIS(BgCmImpl, iface); TRACE("(%p)->(count=%lu)\n",This, This->ref); shell32_ObjCount++; return ++(This->ref); } /************************************************************************** * ISVBgCm_fnRelease */ static ULONG WINAPI ISVBgCm_fnRelease(IContextMenu *iface) { ICOM_THIS(BgCmImpl, iface); TRACE("(%p)->()\n",This); if (!--(This->ref)) { TRACE(" destroying IContextMenu(%p)\n",This); if(This->pSFParent) IShellFolder_Release(This->pSFParent); HeapFree(GetProcessHeap(),0,This); return 0; } shell32_ObjCount--; return This->ref; } /************************************************************************** * ISVBgCm_fnQueryContextMenu() */ static HRESULT WINAPI ISVBgCm_fnQueryContextMenu( IContextMenu *iface, HMENU hMenu, UINT indexMenu, UINT idCmdFirst, UINT idCmdLast, UINT uFlags) { HMENU hMyMenu; UINT idMax; ICOM_THIS(BgCmImpl, iface); TRACE("(%p)->(hmenu=%x indexmenu=%x cmdfirst=%x cmdlast=%x flags=%x )\n",This, hMenu, indexMenu, idCmdFirst, idCmdLast, uFlags); hMyMenu = LoadMenuA(shell32_hInstance, "MENU_002"); idMax = Shell_MergeMenus (hMenu, GetSubMenu(hMyMenu,0), indexMenu, idCmdFirst, idCmdLast, MM_SUBMENUSHAVEIDS); DestroyMenu(hMyMenu); return ResultFromShort(idMax - idCmdFirst); } /************************************************************************** * DoNewFolder */ static void DoNewFolder( IContextMenu *iface, IShellView *psv) { ICOM_THIS(BgCmImpl, iface); ISFHelper * psfhlp; char szName[MAX_PATH]; IShellFolder_QueryInterface(This->pSFParent, &IID_ISFHelper, (LPVOID*)&psfhlp); if (psfhlp) { LPITEMIDLIST pidl; ISFHelper_GetUniqueName(psfhlp, szName, MAX_PATH); ISFHelper_AddFolder(psfhlp, 0, szName, &pidl); if(psv) { /* if we are in a shellview do labeledit */ IShellView_SelectItem(psv, pidl,(SVSI_DESELECTOTHERS | SVSI_EDIT | SVSI_ENSUREVISIBLE |SVSI_FOCUSED|SVSI_SELECT)); } SHFree(pidl); ISFHelper_Release(psfhlp); } } /************************************************************************** * DoPaste */ static BOOL DoPaste( IContextMenu *iface) { ICOM_THIS(BgCmImpl, iface); BOOL bSuccess = FALSE; IDataObject * pda; TRACE("\n"); if(SUCCEEDED(pOleGetClipboard(&pda))); { STGMEDIUM medium; FORMATETC formatetc; TRACE("pda=%p\n", pda); /* Set the FORMATETC structure*/ InitFormatEtc(formatetc, RegisterClipboardFormatA(CFSTR_SHELLIDLIST), TYMED_HGLOBAL); /* Get the pidls from IDataObject */ if(SUCCEEDED(IDataObject_GetData(pda,&formatetc,&medium))) { LPITEMIDLIST * apidl; LPITEMIDLIST pidl; IShellFolder *psfFrom = NULL, *psfDesktop; LPCIDA lpcida = GlobalLock(medium.u.hGlobal); TRACE("cida=%p\n", lpcida); apidl = _ILCopyCidaToaPidl(&pidl, lpcida); /* bind to the source shellfolder */ SHGetDesktopFolder(&psfDesktop); if(psfDesktop) { IShellFolder_BindToObject(psfDesktop, pidl, NULL, &IID_IShellFolder, (LPVOID*)&psfFrom); IShellFolder_Release(psfDesktop); } if (psfFrom) { /* get source and destination shellfolder */ ISFHelper *psfhlpdst, *psfhlpsrc; IShellFolder_QueryInterface(This->pSFParent, &IID_ISFHelper, (LPVOID*)&psfhlpdst); IShellFolder_QueryInterface(psfFrom, &IID_ISFHelper, (LPVOID*)&psfhlpsrc); /* do the copy/move */ if (psfhlpdst && psfhlpsrc) { ISFHelper_CopyItems(psfhlpdst, psfFrom, lpcida->cidl, apidl); /* fixme handle move ISFHelper_DeleteItems(psfhlpsrc, lpcida->cidl, apidl); */ } if(psfhlpdst) ISFHelper_Release(psfhlpdst); if(psfhlpsrc) ISFHelper_Release(psfhlpsrc); IShellFolder_Release(psfFrom); } _ILFreeaPidl(apidl, lpcida->cidl); SHFree(pidl); /* release the medium*/ pReleaseStgMedium(&medium); } IDataObject_Release(pda); } #if 0 HGLOBAL hMem; OpenClipboard(NULL); hMem = GetClipboardData(CF_HDROP); if(hMem) { char * pDropFiles = (char *)GlobalLock(hMem); if(pDropFiles) { int len, offset = sizeof(DROPFILESTRUCT); while( pDropFiles[offset] != 0) { len = strlen(pDropFiles + offset); TRACE("%s\n", pDropFiles + offset); offset += len+1; } } GlobalUnlock(hMem); } CloseClipboard(); #endif return bSuccess; } /************************************************************************** * ISVBgCm_fnInvokeCommand() */ static HRESULT WINAPI ISVBgCm_fnInvokeCommand( IContextMenu *iface, LPCMINVOKECOMMANDINFO lpcmi) { ICOM_THIS(BgCmImpl, iface); LPSHELLBROWSER lpSB; LPSHELLVIEW lpSV; HWND hWndSV; TRACE("(%p)->(invcom=%p verb=%p wnd=%x)\n",This,lpcmi,lpcmi->lpVerb, lpcmi->hwnd); /* get the active IShellView */ if((lpSB = (LPSHELLBROWSER)SendMessageA(lpcmi->hwnd, CWM_GETISHELLBROWSER,0,0))) { if(SUCCEEDED(IShellBrowser_QueryActiveShellView(lpSB, &lpSV))) { IShellView_GetWindow(lpSV, &hWndSV); } } if(lpSV) { if(HIWORD(lpcmi->lpVerb)) { TRACE("%s\n",lpcmi->lpVerb); if (! strcmp(lpcmi->lpVerb,CMDSTR_NEWFOLDERA)) { if(lpSV) DoNewFolder(iface, lpSV); } else if (! strcmp(lpcmi->lpVerb,CMDSTR_VIEWLISTA)) { if(hWndSV) SendMessageA(hWndSV, WM_COMMAND, MAKEWPARAM(FCIDM_SHVIEW_LISTVIEW,0),0 ); } else if (! strcmp(lpcmi->lpVerb,CMDSTR_VIEWDETAILSA)) { if(hWndSV) SendMessageA(hWndSV, WM_COMMAND, MAKEWPARAM(FCIDM_SHVIEW_REPORTVIEW,0),0 ); } else { FIXME("please report: unknown verb %s\n",lpcmi->lpVerb); } } else { switch(LOWORD(lpcmi->lpVerb)) { case FCIDM_SHVIEW_NEWFOLDER: DoNewFolder(iface, lpSV); break; case FCIDM_SHVIEW_INSERT: DoPaste(iface); break; default: /* if it's a id just pass it to the parent shv */ SendMessageA(hWndSV, WM_COMMAND, MAKEWPARAM(LOWORD(lpcmi->lpVerb), 0),0 ); break; } } IShellView_Release(lpSV); /* QueryActiveShellView does AddRef*/ } return NOERROR; } /************************************************************************** * ISVBgCm_fnGetCommandString() * */ static HRESULT WINAPI ISVBgCm_fnGetCommandString( IContextMenu *iface, UINT idCommand, UINT uFlags, LPUINT lpReserved, LPSTR lpszName, UINT uMaxNameLen) { ICOM_THIS(BgCmImpl, iface); TRACE("(%p)->(idcom=%x flags=%x %p name=%p len=%x)\n",This, idCommand, uFlags, lpReserved, lpszName, uMaxNameLen); /* test the existance of the menu items, the file dialog enables the buttons according to this */ if (uFlags == GCS_VALIDATEA) { if(HIWORD(idCommand)) { if (!strcmp((LPSTR)idCommand, CMDSTR_VIEWLISTA) || !strcmp((LPSTR)idCommand, CMDSTR_VIEWDETAILSA) || !strcmp((LPSTR)idCommand, CMDSTR_NEWFOLDERA)) { return NOERROR; } } } FIXME("unknown command string\n"); return E_FAIL; } /************************************************************************** * ISVBgCm_fnHandleMenuMsg() */ static HRESULT WINAPI ISVBgCm_fnHandleMenuMsg( IContextMenu *iface, UINT uMsg, WPARAM wParam, LPARAM lParam) { ICOM_THIS(BgCmImpl, iface); FIXME("(%p)->(msg=%x wp=%x lp=%lx)\n",This, uMsg, wParam, lParam); return E_NOTIMPL; } /************************************************************************** * IContextMenu VTable * */ static struct ICOM_VTABLE(IContextMenu) cmvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE ISVBgCm_fnQueryInterface, ISVBgCm_fnAddRef, ISVBgCm_fnRelease, ISVBgCm_fnQueryContextMenu, ISVBgCm_fnInvokeCommand, ISVBgCm_fnGetCommandString, ISVBgCm_fnHandleMenuMsg, (void *) 0xdeadbabe /* just paranoia (IContextMenu3) */ }; wine-20000526/dlls/shell32/shv_item_cmenu.c0100644000175000001440000003105607056017761020043 0ustar julliardusers/* * IContextMenu for items in the shellview * * 1998, 2000 Juergen Schmied */ #include #include "winerror.h" #include "debugtools.h" #include "pidl.h" #include "wine/obj_base.h" #include "wine/obj_contextmenu.h" #include "wine/obj_shellbrowser.h" #include "wine/obj_shellextinit.h" #include "wine/undocshell.h" #include "shell32_main.h" #include "shellfolder.h" #include "shell.h" /* DROPFILESTRUCT */ DEFAULT_DEBUG_CHANNEL(shell) /************************************************************************** * IContextMenu Implementation */ typedef struct { ICOM_VFIELD(IContextMenu); DWORD ref; IShellFolder* pSFParent; LPITEMIDLIST pidl; /* root pidl */ LPITEMIDLIST *apidl; /* array of child pidls */ UINT cidl; BOOL bAllValues; } ItemCmImpl; static struct ICOM_VTABLE(IContextMenu) cmvt; /************************************************************************** * ISvItemCm_CanRenameItems() */ static BOOL ISvItemCm_CanRenameItems(ItemCmImpl *This) { UINT i; DWORD dwAttributes; TRACE("(%p)->()\n",This); if(This->apidl) { for(i = 0; i < This->cidl; i++){} if(i > 1) return FALSE; /* can't rename more than one item at a time*/ dwAttributes = SFGAO_CANRENAME; IShellFolder_GetAttributesOf(This->pSFParent, 1, This->apidl, &dwAttributes); return dwAttributes & SFGAO_CANRENAME; } return FALSE; } /************************************************************************** * ISvItemCm_Constructor() */ IContextMenu *ISvItemCm_Constructor(LPSHELLFOLDER pSFParent, LPCITEMIDLIST pidl, LPCITEMIDLIST *apidl, UINT cidl) { ItemCmImpl* cm; UINT u; cm = (ItemCmImpl*)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,sizeof(ItemCmImpl)); ICOM_VTBL(cm)=&cmvt; cm->ref = 1; cm->pidl = ILClone(pidl); cm->pSFParent = pSFParent; if(pSFParent) IShellFolder_AddRef(pSFParent); cm->apidl = _ILCopyaPidl(apidl, cidl); cm->cidl = cidl; cm->bAllValues = 1; for(u = 0; u < cidl; u++) { cm->bAllValues &= (_ILIsValue(apidl[u]) ? 1 : 0); } TRACE("(%p)->()\n",cm); shell32_ObjCount++; return (IContextMenu*)cm; } /************************************************************************** * ISvItemCm_fnQueryInterface */ static HRESULT WINAPI ISvItemCm_fnQueryInterface(IContextMenu *iface, REFIID riid, LPVOID *ppvObj) { ICOM_THIS(ItemCmImpl, iface); TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj); *ppvObj = NULL; if(IsEqualIID(riid, &IID_IUnknown)) /*IUnknown*/ { *ppvObj = This; } else if(IsEqualIID(riid, &IID_IContextMenu)) /*IContextMenu*/ { *ppvObj = This; } else if(IsEqualIID(riid, &IID_IShellExtInit)) /*IShellExtInit*/ { FIXME("-- LPSHELLEXTINIT pointer requested\n"); } if(*ppvObj) { IUnknown_AddRef((IUnknown*)*ppvObj); TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } /************************************************************************** * ISvItemCm_fnAddRef */ static ULONG WINAPI ISvItemCm_fnAddRef(IContextMenu *iface) { ICOM_THIS(ItemCmImpl, iface); TRACE("(%p)->(count=%lu)\n",This, This->ref); shell32_ObjCount++; return ++(This->ref); } /************************************************************************** * ISvItemCm_fnRelease */ static ULONG WINAPI ISvItemCm_fnRelease(IContextMenu *iface) { ICOM_THIS(ItemCmImpl, iface); TRACE("(%p)->()\n",This); shell32_ObjCount--; if (!--(This->ref)) { TRACE(" destroying IContextMenu(%p)\n",This); if(This->pSFParent) IShellFolder_Release(This->pSFParent); if(This->pidl) SHFree(This->pidl); /*make sure the pidl is freed*/ _ILFreeaPidl(This->apidl, This->cidl); HeapFree(GetProcessHeap(),0,This); return 0; } return This->ref; } /************************************************************************** * ICM_InsertItem() */ void WINAPI _InsertMenuItem ( HMENU hmenu, UINT indexMenu, BOOL fByPosition, UINT wID, UINT fType, LPSTR dwTypeData, UINT fState) { MENUITEMINFOA mii; ZeroMemory(&mii, sizeof(mii)); mii.cbSize = sizeof(mii); if (fType == MFT_SEPARATOR) { mii.fMask = MIIM_ID | MIIM_TYPE; } else { mii.fMask = MIIM_ID | MIIM_TYPE | MIIM_STATE; mii.dwTypeData = dwTypeData; mii.fState = fState; } mii.wID = wID; mii.fType = fType; InsertMenuItemA( hmenu, indexMenu, fByPosition, &mii); } /************************************************************************** * ISvItemCm_fnQueryContextMenu() */ static HRESULT WINAPI ISvItemCm_fnQueryContextMenu( IContextMenu *iface, HMENU hmenu, UINT indexMenu, UINT idCmdFirst, UINT idCmdLast, UINT uFlags) { ICOM_THIS(ItemCmImpl, iface); TRACE("(%p)->(hmenu=%x indexmenu=%x cmdfirst=%x cmdlast=%x flags=%x )\n",This, hmenu, indexMenu, idCmdFirst, idCmdLast, uFlags); if(!(CMF_DEFAULTONLY & uFlags)) { if(uFlags & CMF_EXPLORE) { if(This->bAllValues) { _InsertMenuItem(hmenu, indexMenu++, TRUE, FCIDM_SHVIEW_OPEN, MFT_STRING, "&Open", MFS_ENABLED); _InsertMenuItem(hmenu, indexMenu++, TRUE, FCIDM_SHVIEW_EXPLORE, MFT_STRING, "&Explore", MFS_ENABLED|MFS_DEFAULT); } else { _InsertMenuItem(hmenu, indexMenu++, TRUE, FCIDM_SHVIEW_EXPLORE, MFT_STRING, "&Explore", MFS_ENABLED|MFS_DEFAULT); _InsertMenuItem(hmenu, indexMenu++, TRUE, FCIDM_SHVIEW_OPEN, MFT_STRING, "&Open", MFS_ENABLED); } } else { _InsertMenuItem(hmenu, indexMenu++, TRUE, FCIDM_SHVIEW_OPEN, MFT_STRING, "&Select", MFS_ENABLED|MFS_DEFAULT); } _InsertMenuItem(hmenu, indexMenu++, TRUE, 0, MFT_SEPARATOR, NULL, 0); _InsertMenuItem(hmenu, indexMenu++, TRUE, FCIDM_SHVIEW_COPY, MFT_STRING, "&Copy", MFS_ENABLED); _InsertMenuItem(hmenu, indexMenu++, TRUE, FCIDM_SHVIEW_CUT, MFT_STRING, "&Cut", MFS_ENABLED); _InsertMenuItem(hmenu, indexMenu++, TRUE, 0, MFT_SEPARATOR, NULL, 0); _InsertMenuItem(hmenu, indexMenu++, TRUE, FCIDM_SHVIEW_DELETE, MFT_STRING, "&Delete", MFS_ENABLED); if(uFlags & CMF_CANRENAME) _InsertMenuItem(hmenu, indexMenu++, TRUE, FCIDM_SHVIEW_RENAME, MFT_STRING, "&Rename", ISvItemCm_CanRenameItems(This) ? MFS_ENABLED : MFS_DISABLED); return MAKE_HRESULT(SEVERITY_SUCCESS, 0, (FCIDM_SHVIEWLAST)); } return MAKE_HRESULT(SEVERITY_SUCCESS, 0, 0); } /************************************************************************** * DoOpenExplore * * for folders only */ static void DoOpenExplore( IContextMenu *iface, HWND hwnd, LPCSTR verb) { ICOM_THIS(ItemCmImpl, iface); int i, bFolderFound = FALSE; LPITEMIDLIST pidlFQ; SHELLEXECUTEINFOA sei; /* Find the first item in the list that is not a value. These commands should never be invoked if there isn't at least one folder item in the list.*/ for(i = 0; icidl; i++) { if(!_ILIsValue(This->apidl[i])) { bFolderFound = TRUE; break; } } if (!bFolderFound) return; pidlFQ = ILCombine(This->pidl, This->apidl[i]); ZeroMemory(&sei, sizeof(sei)); sei.cbSize = sizeof(sei); sei.fMask = SEE_MASK_IDLIST | SEE_MASK_CLASSNAME; sei.lpIDList = pidlFQ; sei.lpClass = "folder"; sei.hwnd = hwnd; sei.nShow = SW_SHOWNORMAL; sei.lpVerb = verb; ShellExecuteExA(&sei); SHFree(pidlFQ); } /************************************************************************** * DoRename */ static void DoRename( IContextMenu *iface, HWND hwnd) { ICOM_THIS(ItemCmImpl, iface); LPSHELLBROWSER lpSB; LPSHELLVIEW lpSV; TRACE("(%p)->(wnd=%x)\n",This, hwnd); /* get the active IShellView */ if ((lpSB = (LPSHELLBROWSER)SendMessageA(hwnd, CWM_GETISHELLBROWSER,0,0))) { if(SUCCEEDED(IShellBrowser_QueryActiveShellView(lpSB, &lpSV))) { TRACE("(sv=%p)\n",lpSV); IShellView_SelectItem(lpSV, This->apidl[0], SVSI_DESELECTOTHERS|SVSI_EDIT|SVSI_ENSUREVISIBLE|SVSI_FOCUSED|SVSI_SELECT); IShellView_Release(lpSV); } } } /************************************************************************** * DoDelete * * deletes the currently selected items */ static void DoDelete(IContextMenu *iface) { ICOM_THIS(ItemCmImpl, iface); ISFHelper * psfhlp; IShellFolder_QueryInterface(This->pSFParent, &IID_ISFHelper, (LPVOID*)&psfhlp); if (psfhlp) { ISFHelper_DeleteItems(psfhlp, This->cidl, This->apidl); ISFHelper_Release(psfhlp); } } /************************************************************************** * DoCopyOrCut * * copys the currently selected items into the clipboard */ static BOOL DoCopyOrCut( IContextMenu *iface, HWND hwnd, BOOL bCut) { ICOM_THIS(ItemCmImpl, iface); LPSHELLBROWSER lpSB; LPSHELLVIEW lpSV; LPDATAOBJECT lpDo; TRACE("(%p)->(wnd=0x%04x,bCut=0x%08x)\n",This, hwnd, bCut); if(GetShellOle()) { /* get the active IShellView */ if ((lpSB = (LPSHELLBROWSER)SendMessageA(hwnd, CWM_GETISHELLBROWSER,0,0))) { if (SUCCEEDED(IShellBrowser_QueryActiveShellView(lpSB, &lpSV))) { if (SUCCEEDED(IShellView_GetItemObject(lpSV, SVGIO_SELECTION, &IID_IDataObject, (LPVOID*)&lpDo))) { pOleSetClipboard(lpDo); IDataObject_Release(lpDo); } IShellView_Release(lpSV); } } } return TRUE; #if 0 /* the following code does the copy operation witout ole32.dll we might need this possibility too (js) */ BOOL bSuccess = FALSE; TRACE("(%p)\n", iface); if(OpenClipboard(NULL)) { if(EmptyClipboard()) { IPersistFolder2 * ppf2; IShellFolder_QueryInterface(This->pSFParent, &IID_IPersistFolder2, (LPVOID*)&ppf2); if (ppf2) { LPITEMIDLIST pidl; IPersistFolder2_GetCurFolder(ppf2, &pidl); if(pidl) { HGLOBAL hMem; hMem = RenderHDROP(pidl, This->apidl, This->cidl); if(SetClipboardData(CF_HDROP, hMem)) { bSuccess = TRUE; } SHFree(pidl); } IPersistFolder2_Release(ppf2); } } CloseClipboard(); } return bSuccess; #endif } /************************************************************************** * ISvItemCm_fnInvokeCommand() */ static HRESULT WINAPI ISvItemCm_fnInvokeCommand( IContextMenu *iface, LPCMINVOKECOMMANDINFO lpcmi) { ICOM_THIS(ItemCmImpl, iface); TRACE("(%p)->(invcom=%p verb=%p wnd=%x)\n",This,lpcmi,lpcmi->lpVerb, lpcmi->hwnd); if(LOWORD(lpcmi->lpVerb) > FCIDM_SHVIEWLAST) return E_INVALIDARG; switch(LOWORD(lpcmi->lpVerb)) { case FCIDM_SHVIEW_EXPLORE: DoOpenExplore(iface, lpcmi->hwnd, "explore"); break; case FCIDM_SHVIEW_OPEN: DoOpenExplore(iface, lpcmi->hwnd, "open"); break; case FCIDM_SHVIEW_RENAME: DoRename(iface, lpcmi->hwnd); break; case FCIDM_SHVIEW_DELETE: DoDelete(iface); break; case FCIDM_SHVIEW_COPY: DoCopyOrCut(iface, lpcmi->hwnd, FALSE); break; case FCIDM_SHVIEW_CUT: DoCopyOrCut(iface, lpcmi->hwnd, TRUE); break; } return NOERROR; } /************************************************************************** * ISvItemCm_fnGetCommandString() */ static HRESULT WINAPI ISvItemCm_fnGetCommandString( IContextMenu *iface, UINT idCommand, UINT uFlags, LPUINT lpReserved, LPSTR lpszName, UINT uMaxNameLen) { ICOM_THIS(ItemCmImpl, iface); HRESULT hr = E_INVALIDARG; TRACE("(%p)->(idcom=%x flags=%x %p name=%p len=%x)\n",This, idCommand, uFlags, lpReserved, lpszName, uMaxNameLen); switch(uFlags) { case GCS_HELPTEXT: hr = E_NOTIMPL; break; case GCS_VERBA: switch(idCommand) { case FCIDM_SHVIEW_RENAME: strcpy((LPSTR)lpszName, "rename"); hr = NOERROR; break; } break; /* NT 4.0 with IE 3.0x or no IE will always call This with GCS_VERBW. In This case, you need to do the lstrcpyW to the pointer passed.*/ case GCS_VERBW: switch(idCommand) { case FCIDM_SHVIEW_RENAME: lstrcpyAtoW((LPWSTR)lpszName, "rename"); hr = NOERROR; break; } break; case GCS_VALIDATE: hr = NOERROR; break; } TRACE("-- (%p)->(name=%s)\n",This, lpszName); return hr; } /************************************************************************** * ISvItemCm_fnHandleMenuMsg() * NOTES * should be only in IContextMenu2 and IContextMenu3 * is nevertheless called from word95 */ static HRESULT WINAPI ISvItemCm_fnHandleMenuMsg( IContextMenu *iface, UINT uMsg, WPARAM wParam, LPARAM lParam) { ICOM_THIS(ItemCmImpl, iface); TRACE("(%p)->(msg=%x wp=%x lp=%lx)\n",This, uMsg, wParam, lParam); return E_NOTIMPL; } static struct ICOM_VTABLE(IContextMenu) cmvt = { ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE ISvItemCm_fnQueryInterface, ISvItemCm_fnAddRef, ISvItemCm_fnRelease, ISvItemCm_fnQueryContextMenu, ISvItemCm_fnInvokeCommand, ISvItemCm_fnGetCommandString, ISvItemCm_fnHandleMenuMsg, (void *) 0xdeadbabe /* just paranoia */ }; wine-20000526/dlls/shell32/systray.c0100644000175000001440000003225107066752016016552 0ustar julliardusers/* * Systray * * Copyright 1999 Kai Morich * * Manage the systray window. That it actually appears in the docking * area of KDE or GNOME is delegated to windows/x11drv/wnd.c, * X11DRV_WND_DockWindow. * */ #include #include #include #include "heap.h" #include "shellapi.h" #include "shell32_main.h" #include "windows.h" #include "commctrl.h" #include "debugtools.h" #include "config.h" DEFAULT_DEBUG_CHANNEL(shell) typedef struct SystrayData { HWND hWnd; HWND hWndToolTip; NOTIFYICONDATAA notifyIcon; int nitem; /* number of current element = tooltip id */ struct SystrayData *nextTrayItem; } SystrayData; typedef struct Systray { int hasCritSection; CRITICAL_SECTION critSection; SystrayData *systrayItemList; } Systray; static Systray systray; static int nNumberTrayElements; static BOOL SYSTRAY_Delete(PNOTIFYICONDATAA pnid); /************************************************************************** * internal systray * */ #define SMALL_ICON_SIZE GetSystemMetrics(SM_CXSMICON) /* space between icons and frame */ #define IBORDER 3 #define OBORDER 2 #define TBORDER (OBORDER+1+IBORDER) static LRESULT CALLBACK SYSTRAY_WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam) { HDC hdc; PAINTSTRUCT ps; switch (message) { case WM_PAINT: { RECT rc; SystrayData *ptrayItem = systray.systrayItemList; while (ptrayItem) { if (ptrayItem->hWnd == hWnd) { hdc = BeginPaint(hWnd, &ps); GetClientRect(hWnd, &rc); if (!DrawIconEx(hdc, rc.left, rc.top, ptrayItem->notifyIcon.hIcon, SMALL_ICON_SIZE, SMALL_ICON_SIZE, 0, 0, DI_DEFAULTSIZE|DI_NORMAL)) SYSTRAY_Delete(&ptrayItem->notifyIcon); } ptrayItem = ptrayItem->nextTrayItem; } EndPaint(hWnd, &ps); } break; case WM_MOUSEMOVE: case WM_LBUTTONDOWN: case WM_LBUTTONUP: case WM_RBUTTONDOWN: case WM_RBUTTONUP: case WM_MBUTTONDOWN: case WM_MBUTTONUP: { MSG msg; SystrayData *ptrayItem = systray.systrayItemList; while ( ptrayItem ) { if (ptrayItem->hWnd == hWnd) { msg.hwnd=hWnd; msg.message=message; msg.wParam=wParam; msg.lParam=lParam; msg.time = GetMessageTime (); msg.pt.x = LOWORD(GetMessagePos ()); msg.pt.y = HIWORD(GetMessagePos ()); SendMessageA(ptrayItem->hWndToolTip, TTM_RELAYEVENT, 0, (LPARAM)&msg); } ptrayItem = ptrayItem->nextTrayItem; } } case WM_LBUTTONDBLCLK: case WM_RBUTTONDBLCLK: case WM_MBUTTONDBLCLK: { int xPos; SystrayData *ptrayItem = systray.systrayItemList; while (ptrayItem) { if (ptrayItem->hWnd == hWnd) { xPos = LOWORD(lParam); if( (xPos >= TBORDER) && (xPos < (TBORDER+SMALL_ICON_SIZE)) ) { if (!PostMessageA(ptrayItem->notifyIcon.hWnd, ptrayItem->notifyIcon.uCallbackMessage, (WPARAM)ptrayItem->notifyIcon.uID, (LPARAM)message)) SYSTRAY_Delete(&ptrayItem->notifyIcon); break; } } ptrayItem = ptrayItem->nextTrayItem; } } break; default: return (DefWindowProcA(hWnd, message, wParam, lParam)); } return (0); } BOOL SYSTRAY_RegisterClass(void) { WNDCLASSA wc; wc.style = CS_SAVEBITS; wc.lpfnWndProc = (WNDPROC)SYSTRAY_WndProc; wc.cbClsExtra = 0; wc.cbWndExtra = 0; wc.hInstance = 0; wc.hIcon = 0; /* LoadIcon (NULL, IDI_EXCLAMATION); */ wc.hCursor = LoadCursorA(0, IDC_ARROWA); wc.hbrBackground = (HBRUSH)(COLOR_WINDOW); wc.lpszMenuName = NULL; wc.lpszClassName = "WineSystray"; if (!RegisterClassA(&wc)) { ERR("RegisterClass(WineSystray) failed\n"); return FALSE; } return TRUE; } BOOL SYSTRAY_Create(SystrayData *ptrayItem) { RECT rect; /* Register the class if this is our first tray item. */ if ( nNumberTrayElements == 1 ) { if ( !SYSTRAY_RegisterClass() ) { ERR( "RegisterClass(WineSystray) failed\n" ); return FALSE; } } /* Initialize the window size. */ rect.left = 0; rect.top = 0; rect.right = SMALL_ICON_SIZE+2*TBORDER; rect.bottom = SMALL_ICON_SIZE+2*TBORDER; /* Create tray window for icon. */ ptrayItem->hWnd = CreateWindowExA( WS_EX_TRAYWINDOW, "WineSystray", "Wine-Systray", WS_VISIBLE, CW_USEDEFAULT, CW_USEDEFAULT, rect.right-rect.left, rect.bottom-rect.top, 0, 0, 0, 0 ); if ( !ptrayItem->hWnd ) { ERR( "CreateWindow(WineSystray) failed\n" ); return FALSE; } /* Create tooltip for icon. */ ptrayItem->hWndToolTip = CreateWindowA( TOOLTIPS_CLASSA,NULL,TTS_ALWAYSTIP, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, ptrayItem->hWnd, 0, 0, 0 ); if ( ptrayItem->hWndToolTip==0 ) { ERR( "CreateWindow(TOOLTIP) failed\n" ); return FALSE; } return TRUE; } static void SYSTRAY_RepaintAll(void) { SystrayData *ptrayItem = systray.systrayItemList; while(ptrayItem) { InvalidateRect(ptrayItem->hWnd, NULL, TRUE); ptrayItem = ptrayItem->nextTrayItem; } } static void SYSTRAY_RepaintItem(int nitem) { SystrayData *ptrayItem = systray.systrayItemList; while(ptrayItem) { if (ptrayItem->nitem == nitem) InvalidateRect(ptrayItem->hWnd, NULL, TRUE); ptrayItem = ptrayItem->nextTrayItem; } } void SYSTRAY_InitItem(SystrayData *ptrayItem) { ptrayItem->nitem = nNumberTrayElements++; SYSTRAY_Create(ptrayItem); } void SYSTRAY_SetIcon(SystrayData *ptrayItem, HICON hIcon) { ptrayItem->notifyIcon.hIcon = hIcon; } void SYSTRAY_SetTip(SystrayData *ptrayItem, CHAR* szTip) { TTTOOLINFOA ti; strncpy(ptrayItem->notifyIcon.szTip, szTip, sizeof(ptrayItem->notifyIcon.szTip)); ptrayItem->notifyIcon.szTip[sizeof(ptrayItem->notifyIcon.szTip)-1]=0; ti.cbSize = sizeof(TTTOOLINFOA); ti.uFlags = 0; ti.hwnd = ptrayItem->hWnd; ti.hinst = 0; ti.uId = ptrayItem->nitem; ti.lpszText = ptrayItem->notifyIcon.szTip; ti.rect.left = 0; ti.rect.top = 0; ti.rect.right = SMALL_ICON_SIZE+2*TBORDER; ti.rect.bottom = SMALL_ICON_SIZE+2*TBORDER; SendMessageA(ptrayItem->hWndToolTip, TTM_ADDTOOLA, 0, (LPARAM)&ti); } static void SYSTRAY_ModifyTip(SystrayData *ptrayItem, CHAR* szTip) { TTTOOLINFOA ti; strncpy(ptrayItem->notifyIcon.szTip, szTip, sizeof(ptrayItem->notifyIcon.szTip)); ptrayItem->notifyIcon.szTip[sizeof(ptrayItem->notifyIcon.szTip)-1]=0; ti.cbSize = sizeof(TTTOOLINFOA); ti.uFlags = 0; ti.hwnd = ptrayItem->hWnd; ti.hinst = 0; ti.uId = ptrayItem->nitem; ti.lpszText = ptrayItem->notifyIcon.szTip; ti.rect.left = 0; ti.rect.top = 0; ti.rect.right = SMALL_ICON_SIZE+2*TBORDER; ti.rect.bottom = SMALL_ICON_SIZE+2*TBORDER; SendMessageA(ptrayItem->hWndToolTip, TTM_UPDATETIPTEXTA, 0, (LPARAM)&ti); } static void SYSTRAY_TermItem(SystrayData *removeItem) { int nitem; SystrayData **trayItem; TTTOOLINFOA ti; ti.cbSize = sizeof(TTTOOLINFOA); ti.uFlags = 0; ti.hinst = 0; /* delete all tooltips ...*/ trayItem = &systray.systrayItemList; while (*trayItem) { ti.uId = (*trayItem)->nitem; ti.hwnd = (*trayItem)->hWnd; SendMessageA((*trayItem)->hWndToolTip, TTM_DELTOOLA, 0, (LPARAM)&ti); trayItem = &((*trayItem)->nextTrayItem); } /* ... and add them again, because uID may shift */ nitem=0; trayItem = &systray.systrayItemList; while (*trayItem) { if (*trayItem != removeItem) { (*trayItem)->nitem = nitem; ti.uId = nitem; ti.hwnd = (*trayItem)->hWnd; ti.lpszText = (*trayItem)->notifyIcon.szTip; ti.rect.left = 0; ti.rect.top = 0; ti.rect.right = SMALL_ICON_SIZE+2*TBORDER; ti.rect.bottom = SMALL_ICON_SIZE+2*TBORDER; SendMessageA((*trayItem)->hWndToolTip, TTM_ADDTOOLA, 0, (LPARAM)&ti); nitem++; } trayItem = &((*trayItem)->nextTrayItem); } nNumberTrayElements--; } /************************************************************************** * helperfunctions * */ void SYSTRAY_SetMessage(SystrayData *ptrayItem, UINT uCallbackMessage) { ptrayItem->notifyIcon.uCallbackMessage = uCallbackMessage; } static BOOL SYSTRAY_IsEqual(PNOTIFYICONDATAA pnid1, PNOTIFYICONDATAA pnid2) { if (pnid1->hWnd != pnid2->hWnd) return FALSE; if (pnid1->uID != pnid2->uID) return FALSE; return TRUE; } static BOOL SYSTRAY_Add(PNOTIFYICONDATAA pnid) { SystrayData **ptrayItem = &systray.systrayItemList; /* Find empty space for new element. */ while( *ptrayItem ) { if ( SYSTRAY_IsEqual(pnid, &(*ptrayItem)->notifyIcon) ) return FALSE; ptrayItem = &((*ptrayItem)->nextTrayItem); } /* Allocate SystrayData for element and zero memory. */ (*ptrayItem) = ( SystrayData *)malloc( sizeof(SystrayData) ); ZeroMemory( (*ptrayItem), sizeof(SystrayData) ); /* Copy notification data */ memcpy( &(*ptrayItem)->notifyIcon, pnid, sizeof(NOTIFYICONDATAA) ); /* Initialize and set data for the tray element. */ SYSTRAY_InitItem( (*ptrayItem) ); SYSTRAY_SetIcon (*ptrayItem, (pnid->uFlags&NIF_ICON) ?pnid->hIcon :0); SYSTRAY_SetMessage(*ptrayItem, (pnid->uFlags&NIF_MESSAGE)?pnid->uCallbackMessage:0); SYSTRAY_SetTip (*ptrayItem, (pnid->uFlags&NIF_TIP) ?pnid->szTip :""); (*ptrayItem)->nextTrayItem = NULL; /* may be overkill after the ZeroMemory call. */ /* Repaint all system tray icons as we have added one. */ SYSTRAY_RepaintAll(); TRACE("%p: 0x%08x %d %s\n", (*ptrayItem), (*ptrayItem)->notifyIcon.hWnd, (*ptrayItem)->notifyIcon.uID, (*ptrayItem)->notifyIcon.szTip); return TRUE; } static BOOL SYSTRAY_Modify(PNOTIFYICONDATAA pnid) { SystrayData *ptrayItem = systray.systrayItemList; while ( ptrayItem ) { if ( SYSTRAY_IsEqual(pnid, &ptrayItem->notifyIcon) ) { if (pnid->uFlags & NIF_ICON) { SYSTRAY_SetIcon(ptrayItem, pnid->hIcon); SYSTRAY_RepaintItem(ptrayItem->nitem); } if (pnid->uFlags & NIF_MESSAGE) SYSTRAY_SetMessage(ptrayItem, pnid->uCallbackMessage); if (pnid->uFlags & NIF_TIP) SYSTRAY_ModifyTip(ptrayItem, pnid->szTip); TRACE("%p: 0x%08x %d %s\n", ptrayItem, ptrayItem->notifyIcon.hWnd, ptrayItem->notifyIcon.uID, ptrayItem->notifyIcon.szTip); return TRUE; } ptrayItem = ptrayItem->nextTrayItem; } return FALSE; /* not found */ } static BOOL SYSTRAY_Delete(PNOTIFYICONDATAA pnid) { SystrayData **ptrayItem = &systray.systrayItemList; while (*ptrayItem) { if (SYSTRAY_IsEqual(pnid, &(*ptrayItem)->notifyIcon)) { SystrayData *next = (*ptrayItem)->nextTrayItem; TRACE("%p: 0x%08x %d %s\n", *ptrayItem, (*ptrayItem)->notifyIcon.hWnd, (*ptrayItem)->notifyIcon.uID, (*ptrayItem)->notifyIcon.szTip); SYSTRAY_TermItem(*ptrayItem); DestroyWindow((*ptrayItem)->hWndToolTip); DestroyWindow((*ptrayItem)->hWnd); free(*ptrayItem); *ptrayItem = next; SYSTRAY_RepaintAll(); return TRUE; } ptrayItem = &((*ptrayItem)->nextTrayItem); } return FALSE; /* not found */ } /************************************************************************* * */ BOOL SYSTRAY_Init(void) { if (!systray.hasCritSection) { systray.hasCritSection=1; InitializeCriticalSection(&systray.critSection); MakeCriticalSectionGlobal(&systray.critSection); TRACE(" =%p\n", &systray.critSection); } return TRUE; } /************************************************************************* * Shell_NotifyIconA [SHELL32.297] */ BOOL WINAPI Shell_NotifyIconA(DWORD dwMessage, PNOTIFYICONDATAA pnid ) { BOOL flag=FALSE; TRACE("wait %d %d %ld\n", pnid->hWnd, pnid->uID, dwMessage); /* must be serialized because all apps access same systray */ EnterCriticalSection(&systray.critSection); TRACE("enter %d %d %ld\n", pnid->hWnd, pnid->uID, dwMessage); switch(dwMessage) { case NIM_ADD: TRACE("Calling systray add\n"); flag = SYSTRAY_Add(pnid); break; case NIM_MODIFY: flag = SYSTRAY_Modify(pnid); break; case NIM_DELETE: flag = SYSTRAY_Delete(pnid); break; } LeaveCriticalSection(&systray.critSection); TRACE("leave %d %d %ld\n", pnid->hWnd, pnid->uID, dwMessage); return flag; } /************************************************************************* * Shell_NotifyIconW [SHELL32.297] */ BOOL WINAPI Shell_NotifyIconW (DWORD dwMessage, PNOTIFYICONDATAW pnid ) { BOOL ret; PNOTIFYICONDATAA p = HeapAlloc(GetProcessHeap(),0,sizeof(NOTIFYICONDATAA)); memcpy(p, pnid, sizeof(NOTIFYICONDATAA)); if (*(pnid->szTip)) lstrcpynWtoA (p->szTip, pnid->szTip, 64 ); ret = Shell_NotifyIconA(dwMessage, p ); HeapFree(GetProcessHeap(),0,p); return ret; } /************************************************************************* * Shell_NotifyIcon [SHELL32.296] */ BOOL WINAPI Shell_NotifyIcon(DWORD dwMessage, PNOTIFYICONDATAA pnid) { return Shell_NotifyIconA(dwMessage, pnid); } wine-20000526/dlls/sound/0040755000175000001440000000000007113604211014526 5ustar julliarduserswine-20000526/dlls/sound/.cvsignore0100644000175000001440000000006007045213574016533 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libsound.so.1.0 wine-20000526/dlls/sound/Makefile.in0100644000175000001440000000031707060307302016573 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = sound SOVERSION = 1.0 SPEC_SRCS = sound.spec C_SRCS = \ sound_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/sound/sound.spec0100644000175000001440000000156106752006277016552 0ustar julliardusersname sound type win16 1 pascal16 OpenSound() OpenSound16 2 pascal16 CloseSound() CloseSound16 3 pascal16 SetVoiceQueueSize(word word) SetVoiceQueueSize16 4 pascal16 SetVoiceNote(word word word word) SetVoiceNote16 5 pascal16 SetVoiceAccent(word word word word word) SetVoiceAccent16 6 pascal16 SetVoiceEnvelope(word word word) SetVoiceEnvelope16 7 pascal16 SetSoundNoise(word word) SetSoundNoise16 8 pascal16 SetVoiceSound(word long word) SetVoiceSound16 9 pascal16 StartSound() StartSound16 10 pascal16 StopSound() StopSound16 11 pascal16 WaitSoundState(word) WaitSoundState16 12 pascal16 SyncAllVoices() SyncAllVoices16 13 pascal16 CountVoiceNotes(word) CountVoiceNotes16 14 pascal GetThresholdEvent() GetThresholdEvent16 15 pascal16 GetThresholdStatus() GetThresholdStatus16 16 pascal16 SetVoiceThreshold(word word) SetVoiceThreshold16 17 pascal16 DoBeep() DoBeep16 wine-20000526/dlls/sound/sound_main.c0100644000175000001440000001447307070212246017041 0ustar julliardusers/* * Copyright Robert J. Amstadt, 1993 */ #include #include "windef.h" #include "wine/winesound.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(sound); /*********************************************************************** * OpenSound16 */ INT16 WINAPI OpenSound16(void) { FIXME("(void): stub\n"); return -1; } /*********************************************************************** * OpenSound */ void WINAPI OpenSound(void) { FIXME("(void): stub\n"); } /*********************************************************************** * CloseSound16 */ void WINAPI CloseSound16(void) { FIXME("(void): stub\n"); } /*********************************************************************** * SetVoiceQueueSize16 */ INT16 WINAPI SetVoiceQueueSize16(INT16 nVoice, INT16 nBytes) { FIXME("(%d,%d): stub\n",nVoice,nBytes); return 0; } /*********************************************************************** * SetVoiceQueueSize */ DWORD WINAPI SetVoiceQueueSize(DWORD nVoice, DWORD nBytes) { FIXME("(%ld,%ld): stub\n",nVoice,nBytes); return 0; } /*********************************************************************** * SetVoiceNote16 */ INT16 WINAPI SetVoiceNote16(INT16 nVoice, INT16 nValue, INT16 nLength, INT16 nCdots) { FIXME("(%d,%d,%d,%d): stub\n",nVoice,nValue,nLength,nCdots); return 0; } /*********************************************************************** * SetVoiceNote */ DWORD WINAPI SetVoiceNote(DWORD nVoice, DWORD nValue, DWORD nLength, DWORD nCdots) { FIXME("(%ld,%ld,%ld,%ld): stub\n",nVoice,nValue,nLength,nCdots); return 0; } /*********************************************************************** * SetVoiceAccent16 */ INT16 WINAPI SetVoiceAccent16(INT16 nVoice, INT16 nTempo, INT16 nVolume, INT16 nMode, INT16 nPitch) { FIXME("(%d,%d,%d,%d,%d): stub\n", nVoice, nTempo, nVolume, nMode, nPitch); return 0; } /*********************************************************************** * SetVoiceAccent */ DWORD WINAPI SetVoiceAccent(DWORD nVoice, DWORD nTempo, DWORD nVolume, DWORD nMode, DWORD nPitch) { FIXME("(%ld,%ld,%ld,%ld,%ld): stub\n", nVoice, nTempo, nVolume, nMode, nPitch); return 0; } /*********************************************************************** * SetVoiceEnvelope16 */ INT16 WINAPI SetVoiceEnvelope16(INT16 nVoice, INT16 nShape, INT16 nRepeat) { FIXME("(%d,%d,%d): stub\n",nVoice,nShape,nRepeat); return 0; } /*********************************************************************** * SetVoiceEnvelope */ DWORD WINAPI SetVoiceEnvelope(DWORD nVoice, DWORD nShape, DWORD nRepeat) { FIXME("(%ld,%ld,%ld): stub\n",nVoice,nShape,nRepeat); return 0; } /*********************************************************************** * SetSoundNoise16 */ INT16 WINAPI SetSoundNoise16(INT16 nSource, INT16 nDuration) { FIXME("(%d,%d): stub\n",nSource,nDuration); return 0; } /*********************************************************************** * SetSoundNoise */ DWORD WINAPI SetSoundNoise(DWORD nSource, DWORD nDuration) { FIXME("(%ld,%ld): stub\n",nSource,nDuration); return 0; } /*********************************************************************** * SetVoiceSound16 */ INT16 WINAPI SetVoiceSound16(INT16 nVoice, DWORD lFrequency, INT16 nDuration) { FIXME("(%d, %ld, %d): stub\n",nVoice,lFrequency, nDuration); return 0; } /*********************************************************************** * SetVoiceSound */ DWORD WINAPI SetVoiceSound(DWORD nVoice, DWORD lFrequency, DWORD nDuration) { FIXME("(%ld, %ld, %ld): stub\n",nVoice,lFrequency, nDuration); return 0; } /*********************************************************************** * StartSound16 */ INT16 WINAPI StartSound16(void) { return 0; } /*********************************************************************** * StopSound16 */ INT16 WINAPI StopSound16(void) { return 0; } /*********************************************************************** * WaitSoundState16 */ INT16 WINAPI WaitSoundState16(INT16 x) { FIXME("(%d): stub\n", x); return 0; } /*********************************************************************** * WaitSoundState */ DWORD WINAPI WaitSoundState(DWORD x) { FIXME("(%ld): stub\n", x); return 0; } /*********************************************************************** * SyncAllVoices16 */ INT16 WINAPI SyncAllVoices16(void) { FIXME("(void): stub\n"); return 0; } /*********************************************************************** * SyncAllVoices */ DWORD WINAPI SyncAllVoices(void) { FIXME("(void): stub\n"); return 0; } /*********************************************************************** * CountVoiceNotes16 */ INT16 WINAPI CountVoiceNotes16(INT16 x) { FIXME("(%d): stub\n", x); return 0; } /*********************************************************************** * CountVoiceNotes */ DWORD WINAPI CountVoiceNotes(DWORD x) { FIXME("(%ld): stub\n", x); return 0; } /*********************************************************************** * GetThresholdEvent16 */ LPINT16 WINAPI GetThresholdEvent16(void) { FIXME("(void): stub\n"); return NULL; } /*********************************************************************** * GetThresholdEvent */ LPDWORD WINAPI GetThresholdEvent(void) { FIXME("(void): stub\n"); return NULL; } /*********************************************************************** * GetThresholdStatus16 */ INT16 WINAPI GetThresholdStatus16(void) { FIXME("(void): stub\n"); return 0; } /*********************************************************************** * GetThresholdStatus */ DWORD WINAPI GetThresholdStatus(void) { FIXME("(void): stub\n"); return 0; } /*********************************************************************** * SetVoiceThreshold16 */ INT16 WINAPI SetVoiceThreshold16(INT16 a, INT16 b) { FIXME("(%d,%d): stub\n", a, b); return 0; } /*********************************************************************** * SetVoiceThreshold */ DWORD WINAPI SetVoiceThreshold(DWORD a, DWORD b) { FIXME("(%ld,%ld): stub\n", a, b); return 0; } /*********************************************************************** * DoBeep16 */ void WINAPI DoBeep16(void) { FIXME("(void): stub!\n"); } wine-20000526/dlls/stress/0040755000175000001440000000000007113604211014721 5ustar julliarduserswine-20000526/dlls/stress/.cvsignore0100644000175000001440000000006107045213574016727 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libstress.so.1.0 wine-20000526/dlls/stress/Makefile.in0100644000175000001440000000032207060307302016762 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = stress SOVERSION = 1.0 SPEC_SRCS = stress.spec C_SRCS = \ stress_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/stress/stress.spec0100644000175000001440000000121206752006277017131 0ustar julliardusers# summary: resource modification dll # name stress type win16 2 pascal allocmem(long) AllocMem 3 pascal freeallmem() FreeAllMem 6 pascal allocfilehandles(word) AllocFileHandles 7 pascal unallocfilehandles() UnAllocFileHandles 8 pascal getfreefilehandles() GetFreeFileHandles 10 pascal allocdiskspace(long word) AllocDiskSpace 11 pascal unallocdiskspace(word) UnAllocDiskSpace 12 pascal allocusermem(word) AllocUserMem 13 pascal freeallusermem() FreeAllUserMem 14 pascal allocgdimem(word) AllocGDIMem 15 pascal freeallgdimem() FreeAllGDIMem 16 stub GETFREEHEAP32SPACE 17 stub ALLOCHEAP32MEM 18 stub FREEALLHEAP32MEM wine-20000526/dlls/stress/stress_main.c0100644000175000001440000000443307070212246017422 0ustar julliardusers#include #include "stress.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(stress); /*********************************************************************** * AllocDiskSpace */ INT16 WINAPI AllocDiskSpace(LONG lLeft, UINT16 uDrive) { FIXME("(%d, %ld) - stub\n", uDrive, lLeft); return 1; } /*********************************************************************** * AllocFileHandles */ INT16 WINAPI AllocFileHandles(INT16 Left) { TRACE("(%d) - stub\n", Left); if (Left < 0) return -1; else return 1; } /*********************************************************************** * AllocGDIMem */ BOOL16 WINAPI AllocGDIMem(UINT16 uLeft) { TRACE("(%d) - stub\n", uLeft); return 1; } /*********************************************************************** * AllocMem */ BOOL16 WINAPI AllocMem(DWORD dwLeft) { FIXME("(%ld) - stub\n", dwLeft); return 1; } /*********************************************************************** * AllocUserMem */ BOOL16 WINAPI AllocUserMem(UINT16 uContig) { TRACE("AllocUserMem %d\n", uContig); return 1; } /*********************************************************************** * FreeAllMem */ void WINAPI FreeAllMem(void) { TRACE("FreeAllMem\n"); } /*********************************************************************** * FreeAllGDIMem */ void WINAPI FreeAllGDIMem(void) { TRACE("FreeAllGDIMem\n"); } /*********************************************************************** * FreeAllUserMem */ void WINAPI FreeAllUserMem(void) { TRACE("FreeAllUserMem\n"); } /*********************************************************************** * */ void WINAPI GetFreeAllUserMem(void) { TRACE("GetFreeAllUserMem\n"); } /*********************************************************************** * GetFreeFileHandles */ INT16 WINAPI GetFreeFileHandles(void) { TRACE("GetFreeFileHandles\n"); #ifndef OPEN_MAX return _POSIX_OPEN_MAX; #else return OPEN_MAX; #endif } /*********************************************************************** * UnAllocDiskSpace */ void WINAPI UnAllocDiskSpace(UINT16 drive) { TRACE("UnAllocDiskSpace %d\n", drive); } /*********************************************************************** * UnAllocFileHandles */ void WINAPI UnAllocFileHandles(void) { TRACE("GetFreeAllUserMem\n"); } wine-20000526/dlls/tapi32/0040755000175000001440000000000007113604211014500 5ustar julliarduserswine-20000526/dlls/tapi32/.cvsignore0100644000175000001440000000004307045213574016506 0ustar julliardusers*.spec.c Makefile libtapi32.so.1.0 wine-20000526/dlls/tapi32/Makefile.in0100644000175000001440000000034407060307303016546 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = tapi32 SOVERSION = 1.0 SPEC_SRCS = tapi32.spec C_SRCS = \ assisted.c \ line.c \ phone.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/tapi32/assisted.c0100644000175000001440000000220207066752016016472 0ustar julliardusers/* * TAPI32 Assisted Telephony * * Copyright 1999 Andreas Mohr */ #include "winbase.h" #include "windef.h" #include "tapi.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(tapi); /*********************************************************************** * tapiGetLocationInfo (TAPI32.@) */ DWORD WINAPI tapiGetLocationInfo(LPSTR lpszCountryCode, LPSTR lpszCityCode) { char temp[30]; FIXME("(%s, %s): file sections ???\n", lpszCountryCode, lpszCityCode); if (!(GetPrivateProfileStringA("Locations", "CurrentLocation", "", temp, 30, "telephon.ini"))) return TAPIERR_REQUESTFAILED; if (!(GetPrivateProfileStringA("Locations", "FIXME_ENTRY", "", lpszCityCode, 8, "telephon.ini"))) return TAPIERR_REQUESTFAILED; return 0; } /*********************************************************************** * tapiRequestMakeCall (TAPI32.@) */ DWORD WINAPI tapiRequestMakeCall(LPCSTR lpszDestAddress, LPCSTR lpszAppName, LPCSTR lpszCalledParty, LPCSTR lpszComment) { FIXME("(%s, %s, %s, %s): stub.\n", lpszDestAddress, lpszAppName, lpszCalledParty, lpszComment); return 0; } wine-20000526/dlls/tapi32/line.c0100644000175000001440000006125607106625254015616 0ustar julliardusers/* * TAPI32 line services * * Copyright 1999 Andreas Mohr */ #include #include #include #include "winbase.h" #include "windef.h" #include "tapi.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(tapi); /*********************************************************************** * lineAccept (TAPI32.@) */ DWORD WINAPI lineAccept(HCALL hCall, LPCSTR lpsUserUserInfo, DWORD dwSize) { FIXME("(%04x, %s, %ld): stub.\n", hCall, lpsUserUserInfo, dwSize); return 1; } /*********************************************************************** * lineAddProvider (TAPI32.@) */ DWORD WINAPI lineAddProvider(LPCSTR lpszProviderName, HWND hwndOwner, LPDWORD lpdwPermanentProviderID) { FIXME("(%s, %04x, %p): stub.\n", lpszProviderName, hwndOwner, lpdwPermanentProviderID); return 1; } /*********************************************************************** * lineAddToConference (TAPI32.@) */ DWORD WINAPI lineAddToConference(HCALL hConfCall, HCALL hConsultCall) { FIXME("(%04x, %04x): stub.\n", hConfCall, hConsultCall); return 1; } /*********************************************************************** * lineAnswer (TAPI32.@) */ DWORD WINAPI lineAnswer(HCALL hCall, LPCSTR lpsUserUserInfo, DWORD dwSize) { FIXME("(%04x, %s, %ld): stub.\n", hCall, lpsUserUserInfo, dwSize); return 1; } /*********************************************************************** * lineBlindTransfer (TAPI32.@) */ DWORD WINAPI lineBlindTransfer(HCALL hCall, LPCSTR lpszDestAddress, DWORD dwCountryCode) { FIXME("(%04x, %s, %08lx): stub.\n", hCall, lpszDestAddress, dwCountryCode); return 1; } /*********************************************************************** * lineClose (TAPI32.@) */ DWORD WINAPI lineClose(HLINE hLine) { FIXME("(%04x): stub.\n", hLine); return 0; } /*********************************************************************** * lineCompleteCall (TAPI32.@) */ DWORD WINAPI lineCompleteCall(HCALL hCall, LPDWORD lpdwCompletionID, DWORD dwCompletionMode, DWORD dwMessageID) { FIXME("(%04x, %p, %08lx, %08lx): stub.\n", hCall, lpdwCompletionID, dwCompletionMode, dwMessageID); return 1; } /*********************************************************************** * lineCompleteTransfer (TAPI32.@) */ DWORD WINAPI lineCompleteTransfer(HCALL hCall, HCALL hConsultCall, LPHCALL lphConfCall, DWORD dwTransferMode) { FIXME("(%04x, %04x, %p, %08lx): stub.\n", hCall, hConsultCall, lphConfCall, dwTransferMode); return 1; } /*********************************************************************** * lineConfigDialog (TAPI32.@) */ DWORD WINAPI lineConfigDialog(DWORD dwDeviceID, HWND hwndOwner, LPCSTR lpszDeviceClass) { FIXME("(%08lx, %04x, %s): stub.\n", dwDeviceID, hwndOwner, lpszDeviceClass); return 0; } /*********************************************************************** * lineConfigDialogEdit (TAPI32.@) */ DWORD WINAPI lineConfigDialogEdit(DWORD dwDeviceID, HWND hwndOwner, LPCSTR lpszDeviceClass, LPVOID const lpDeviceConfigIn, DWORD dwSize, LPVARSTRING lpDeviceConfigOut) { FIXME("stub.\n"); return 0; } /*********************************************************************** * lineConfigProvider (TAPI32.@) */ DWORD WINAPI lineConfigProvider(HWND hwndOwner, DWORD dwPermanentProviderID) { FIXME("(%04x, %08lx): stub.\n", hwndOwner, dwPermanentProviderID); return 0; } /*********************************************************************** * lineDeallocateCall (TAPI32.@) */ DWORD WINAPI lineDeallocateCall(HCALL hCall) { FIXME("(%04x): stub.\n", hCall); return 0; } /*********************************************************************** * lineDevSpecific (TAPI32.@) */ DWORD WINAPI lineDevSpecific(HLINE hLine, DWORD dwAddressId, HCALL hCall, LPVOID lpParams, DWORD dwSize) { FIXME("(%04x, %08lx, %04x, %p, %ld): stub.\n", hLine, dwAddressId, hCall, lpParams, dwSize); return 1; } /*********************************************************************** * lineDevSpecificFeature (TAPI32.@) */ DWORD WINAPI lineDevSpecificFeature(HLINE hLine, DWORD dwFeature, LPVOID lpParams, DWORD dwSize) { FIXME("(%04x, %08lx, %p, %ld): stub.\n", hLine, dwFeature, lpParams, dwSize); return 1; } /*********************************************************************** * lineDial (TAPI32.@) */ DWORD WINAPI lineDial(HCALL hCall, LPCSTR lpszDestAddress, DWORD dwCountryCode) { FIXME("(%04x, %s, %08lx): stub.\n", hCall, lpszDestAddress, dwCountryCode); return 1; } /*********************************************************************** * lineDrop (TAPI32.@) */ DWORD WINAPI lineDrop(HCALL hCall, LPCSTR lpsUserUserInfo, DWORD dwSize) { FIXME("(%04x, %s, %08lx): stub.\n", hCall, lpsUserUserInfo, dwSize); return 1; } /*********************************************************************** * lineForward (TAPI32.@) */ DWORD WINAPI lineForward(HLINE hLine, DWORD bAllAddress, DWORD dwAdressID, LPLINEFORWARDLIST lpForwardList, DWORD dwNumRingsNoAnswer, LPHCALL lphConsultCall, LPLINECALLPARAMS lpCallParams) { FIXME("stub.\n"); return 1; } /*********************************************************************** * lineGatherDigits (TAPI32.@) */ DWORD WINAPI lineGatherDigits(HCALL hCall, DWORD dwDigitModes, LPSTR lpsDigits, DWORD dwNumDigits, LPCSTR lpszTerminationDigits, DWORD dwFirstDigitTimeout, DWORD dwInterDigitTimeout) { FIXME("stub.\n"); return 0; } /*********************************************************************** * lineGenerateDigits (TAPI32.@) */ DWORD WINAPI lineGenerateDigits(HCALL hCall, DWORD dwDigitModes, LPCSTR lpszDigits, DWORD dwDuration) { FIXME("(%04x, %08lx, %s, %ld): stub.\n", hCall, dwDigitModes, lpszDigits, dwDuration); return 0; } /*********************************************************************** * lineGenerateTone (TAPI32.@) */ DWORD WINAPI lineGenerateTone(HCALL hCall, DWORD dwToneMode, DWORD dwDuration, DWORD dwNumTones, LPLINEGENERATETONE lpTones) { FIXME("(%04x, %08lx, %ld, %ld, %p): stub.\n", hCall, dwToneMode, dwDuration, dwNumTones, lpTones); return 0; } /*********************************************************************** * lineGetAddressCaps (TAPI32.@) */ DWORD WINAPI lineGetAddressCaps(HLINEAPP hLineApp, DWORD dwDeviceID, DWORD dwAddressID, DWORD dwAPIVersion, DWORD dwExtVersion, LPLINEADDRESSCAPS lpAddressCaps) { FIXME("(%04x, %08lx, %08lx, %08lx, %08lx, %p): stub.\n", hLineApp, dwDeviceID, dwAddressID, dwAPIVersion, dwExtVersion, lpAddressCaps); return 0; } /*********************************************************************** * lineGetAddressID (TAPI32.@) */ DWORD WINAPI lineGetAddressID(HLINE hLine, LPDWORD lpdwAddressID, DWORD dwAddressMode, LPCSTR lpsAddress, DWORD dwSize) { FIXME("%04x, %p, %08lx, %s, %ld): stub.\n", hLine, lpdwAddressID, dwAddressMode, lpsAddress, dwSize); return 0; } /*********************************************************************** * lineGetAddressStatus (TAPI32.@) */ DWORD WINAPI lineGetAddressStatus(HLINE hLine, DWORD dwAddressID, LPLINEADDRESSSTATUS lpAddressStatus) { FIXME("(%04x, %08lx, %p): stub.\n", hLine, dwAddressID, lpAddressStatus); return 0; } /*********************************************************************** * lineGetAppPriority (TAPI32.@) */ DWORD WINAPI lineGetAppPriority(LPCSTR lpszAppFilename, DWORD dwMediaMode, LPLINEEXTENSIONID const lpExtensionID, DWORD dwRequestMode, LPVARSTRING lpExtensionName, LPDWORD lpdwPriority) { FIXME("(%s, %08lx, %p, %08lx, %p, %p): stub.\n", lpszAppFilename, dwMediaMode, lpExtensionID, dwRequestMode, lpExtensionName, lpdwPriority); return 0; } /*********************************************************************** * lineGetCallInfo (TAPI32.@) */ DWORD WINAPI lineGetCallInfo(HCALL hCall, LPLINECALLINFO lpCallInfo) { FIXME("(%04x, %p): stub.\n", hCall, lpCallInfo); return 0; } /*********************************************************************** * lineGetCallStatus (TAPI32.@) */ DWORD WINAPI lineGetCallStatus(HCALL hCall, LPLINECALLSTATUS lpCallStatus) { FIXME("(%04x, %p): stub.\n", hCall, lpCallStatus); return 0; } /*********************************************************************** * lineGetConfRelatedCalls (TAPI32.@) */ DWORD WINAPI lineGetConfRelatedCalls(HCALL hCall, LPLINECALLLIST lpCallList) { FIXME("(%04x, %p): stub.\n", hCall, lpCallList); return 0; } /*********************************************************************** * lineGetCountry (TAPI32.@) */ DWORD WINAPI lineGetCountry(DWORD dwCountryID, DWORD dwAPIVersion, LPLINECOUNTRYLIST lpLineCountryList) { FIXME("(%08lx, %08lx, %p): stub.\n", dwCountryID, dwAPIVersion, lpLineCountryList); return 0; } /*********************************************************************** * lineGetDevCaps (TAPI32.@) */ DWORD WINAPI lineGetDevCaps(HLINEAPP hLineApp, DWORD dwDeviceID, DWORD dwAPIVersion, DWORD dwExtVersion, LPLINEDEVCAPS lpLineDevCaps) { FIXME("(%04x, %08lx, %08lx, %08lx, %p): stub.\n", hLineApp, dwDeviceID, dwAPIVersion, dwExtVersion, lpLineDevCaps); return 0; } /*********************************************************************** * lineGetDevConfig (TAPI32.@) */ DWORD WINAPI lineGetDevConfig(DWORD dwDeviceID, LPVARSTRING lpDeviceConfig, LPCSTR lpszDeviceClass) { FIXME("(%08lx, %p, %s): stub.\n", dwDeviceID, lpDeviceConfig, lpszDeviceClass); return 0; } /*********************************************************************** * lineGetID (TAPI32.@) */ DWORD WINAPI lineGetID(HLINE hLine, DWORD dwAddressID, HCALL hCall, DWORD dwSelect, LPVARSTRING lpDeviceID, LPCSTR lpszDeviceClass) { FIXME("(%04x, %08lx, %04x, %08lx, %p, %s): stub.\n", hLine, dwAddressID, hCall, dwSelect, lpDeviceID, lpszDeviceClass); return 0; } /*********************************************************************** * lineGetIcon (TAPI32.@) */ DWORD WINAPI lineGetIcon(DWORD dwDeviceID, LPCSTR lpszDeviceClass, HICON *lphIcon) { FIXME("(%08lx, %s, %p): stub.\n", dwDeviceID, lpszDeviceClass, lphIcon); return 0; } /*********************************************************************** * lineGetLineDevStatus (TAPI32.@) */ DWORD WINAPI lineGetLineDevStatus(HLINE hLine, LPLINEDEVSTATUS lpLineDevStatus) { FIXME("(%04x, %p): stub.\n", hLine, lpLineDevStatus); return 0; } /*********************************************************************** * lineGetNewCalls (TAPI32.@) */ DWORD WINAPI lineGetNewCalls(HLINE hLine, DWORD dwAddressID, DWORD dwSelect, LPLINECALLLIST lpCallList) { FIXME("(%04x, %08lx, %08lx, %p): stub.\n", hLine, dwAddressID, dwSelect, lpCallList); return 0; } /*********************************************************************** * lineGetNumRings (TAPI32.@) */ DWORD WINAPI lineGetNumRings(HLINE hLine, DWORD dwAddressID, LPDWORD lpdwNumRings) { FIXME("(%04x, %08lx, %p): stub.\n", hLine, dwAddressID, lpdwNumRings); return 0; } /*********************************************************************** * lineGetProviderList (TAPI32.@) */ DWORD WINAPI lineGetProviderList(DWORD dwAPIVersion, LPLINEPROVIDERLIST lpProviderList) { FIXME("(%08lx, %p): stub.\n", dwAPIVersion, lpProviderList); return 0; } /*********************************************************************** * lineGetRequest (TAPI32.@) */ DWORD WINAPI lineGetRequest(HLINEAPP hLineApp, DWORD dwRequestMode, LPVOID lpRequestBuffer) { FIXME("%04x, %08lx, %p): stub.\n", hLineApp, dwRequestMode, lpRequestBuffer); return 0; } /*********************************************************************** * lineGetStatusMessages (TAPI32.@) */ DWORD WINAPI lineGetStatusMessages(HLINE hLine, LPDWORD lpdwLineStatus, LPDWORD lpdwAddressStates) { FIXME("(%04x, %p, %p): stub.\n", hLine, lpdwLineStatus, lpdwAddressStates); return 0; } /*********************************************************************** * lineGetTranslateCaps (TAPI32.@) */ DWORD WINAPI lineGetTranslateCaps(HLINEAPP hLineApp, DWORD dwAPIVersion, LPLINETRANSLATECAPS lpTranslateCaps) { FIXME("(%04x, %08lx, %p): stub.\n", hLineApp, dwAPIVersion, lpTranslateCaps); return 0; } /*********************************************************************** * lineHandoff (TAPI32.@) */ DWORD WINAPI lineHandoff(HCALL hCall, LPCSTR lpszFileName, DWORD dwMediaMode) { FIXME("(%04x, %s, %08lx): stub.\n", hCall, lpszFileName, dwMediaMode); return 0; } /*********************************************************************** * lineHold (TAPI32.@) */ DWORD WINAPI lineHold(HCALL hCall) { FIXME("(%04x): stub.\n", hCall); return 1; } /*********************************************************************** * lineInitialize (TAPI32.@) */ DWORD WINAPI lineInitialize( LPHLINEAPP lphLineApp, HINSTANCE hInstance, LINECALLBACK lpfnCallback, LPCSTR lpszAppName, LPDWORD lpdwNumDevs) { FIXME("(%p, %04x, %p, %s, %p): stub.\n", lphLineApp, hInstance, lpfnCallback, debugstr_a(lpszAppName), lpdwNumDevs); return 0; } /*********************************************************************** * lineMakeCall (TAPI32.@) */ DWORD WINAPI lineMakeCall(HLINE hLine, LPHCALL lphCall, LPCSTR lpszDestAddress, DWORD dwCountryCode, LPLINECALLPARAMS lpCallParams) { FIXME("(%04x, %p, %s, %08lx, %p): stub.\n", hLine, lphCall, lpszDestAddress, dwCountryCode, lpCallParams); return 1; } /*********************************************************************** * lineMonitorDigits (TAPI32.@) */ DWORD WINAPI lineMonitorDigits(HCALL hCall, DWORD dwDigitModes) { FIXME("(%04x, %08lx): stub.\n", hCall, dwDigitModes); return 0; } /*********************************************************************** * lineMonitorMedia (TAPI32.@) */ DWORD WINAPI lineMonitorMedia(HCALL hCall, DWORD dwMediaModes) { FIXME("(%04x, %08lx): stub.\n", hCall, dwMediaModes); return 0; } /*********************************************************************** * lineMonitorTones (TAPI32.@) */ DWORD WINAPI lineMonitorTones(HCALL hCall, LPLINEMONITORTONE lpToneList, DWORD dwNumEntries) { FIXME("(%04x, %p, %08lx): stub.\n", hCall, lpToneList, dwNumEntries); return 0; } /*********************************************************************** * lineNegotiateAPIVersion (TAPI32.@) */ DWORD WINAPI lineNegotiateAPIVersion( HLINEAPP hLineApp, DWORD dwDeviceID, DWORD dwAPILowVersion, DWORD dwAPIHighVersion, LPDWORD lpdwAPIVersion, LPLINEEXTENSIONID lpExtensionID ) { FIXME("(%04x, %ld, %ld, %ld, %p, %p): stub.\n", hLineApp, dwDeviceID, dwAPILowVersion, dwAPIHighVersion, lpdwAPIVersion, lpExtensionID); *lpdwAPIVersion = dwAPIHighVersion; return 0; } /*********************************************************************** * lineNegotiateExtVersion (TAPI32.@) */ DWORD WINAPI lineNegotiateExtVersion(HLINEAPP hLineApp, DWORD dwDeviceID, DWORD dwAPIVersion, DWORD dwExtLowVersion, DWORD dwExtHighVersion, LPDWORD lpdwExtVersion) { FIXME("stub.\n"); return 0; } /*********************************************************************** * lineOpen (TAPI32.@) */ DWORD WINAPI lineOpen(HLINEAPP hLineApp, DWORD dwDeviceID, LPHLINE lphLine, DWORD dwAPIVersion, DWORD dwExtVersion, DWORD dwCallbackInstance, DWORD dwPrivileges, DWORD dwMediaModes, LPLINECALLPARAMS lpCallParams) { FIXME("stub.\n"); return 0; } /*********************************************************************** * linePark (TAPI32.@) */ DWORD WINAPI linePark(HCALL hCall, DWORD dwParkMode, LPCSTR lpszDirAddress, LPVARSTRING lpNonDirAddress) { FIXME("(%04x, %08lx, %s, %p): stub.\n", hCall, dwParkMode, lpszDirAddress, lpNonDirAddress); return 1; } /*********************************************************************** * linePickup (TAPI32.@) */ DWORD WINAPI linePickup(HLINE hLine, DWORD dwAddressID, LPHCALL lphCall, LPCSTR lpszDestAddress, LPCSTR lpszGroupID) { FIXME("(%04x, %08lx, %p, %s, %s): stub.\n", hLine, dwAddressID, lphCall, lpszDestAddress, lpszGroupID); return 1; } /*********************************************************************** * linePrepareAddToConference (TAPI32.@) */ DWORD WINAPI linePrepareAddToConference(HCALL hConfCall, LPHCALL lphConsultCall, LPLINECALLPARAMS lpCallParams) { FIXME("(%04x, %p, %p): stub.\n", hConfCall, lphConsultCall, lpCallParams); return 1; } /*********************************************************************** * lineRedirect (TAPI32.@) */ DWORD WINAPI lineRedirect( HCALL hCall, LPCSTR lpszDestAddress, DWORD dwCountryCode) { FIXME(": stub.\n"); return 1; } /*********************************************************************** * lineRegisterRequestRecipient (TAPI32.@) */ DWORD WINAPI lineRegisterRequestRecipient(HLINEAPP hLineApp, DWORD dwRegistrationInstance, DWORD dwRequestMode, DWORD dwEnable) { FIXME("(%04x, %08lx, %08lx, %08lx): stub.\n", hLineApp, dwRegistrationInstance, dwRequestMode, dwEnable); return 1; } /*********************************************************************** * lineReleaseUserUserInfo (TAPI32.@) */ DWORD WINAPI lineReleaseUserUserInfo(HCALL hCall) { FIXME("(%04x): stub.\n", hCall); return 1; } /*********************************************************************** * lineRemoveFromConference (TAPI32.@) */ DWORD WINAPI lineRemoveFromConference(HCALL hCall) { FIXME("(%04x): stub.\n", hCall); return 1; } /*********************************************************************** * lineRemoveProvider (TAPI32.@) */ DWORD WINAPI lineRemoveProvider(DWORD dwPermanentProviderID, HWND hwndOwner) { FIXME("(%08lx, %04x): stub.\n", dwPermanentProviderID, hwndOwner); return 1; } /*********************************************************************** * lineSecureCall (TAPI32.@) */ DWORD WINAPI lineSecureCall(HCALL hCall) { FIXME("(%04x): stub.\n", hCall); return 1; } /*********************************************************************** * lineSendUserUserInfo (TAPI32.@) */ DWORD WINAPI lineSendUserUserInfo(HCALL hCall, LPCSTR lpsUserUserInfo, DWORD dwSize) { FIXME("(%04x, %s, %08lx): stub.\n", hCall, lpsUserUserInfo, dwSize); return 1; } /*********************************************************************** * lineSetAppPriority (TAPI32.@) */ DWORD WINAPI lineSetAppPriority(LPCSTR lpszAppFilename, DWORD dwMediaMode, LPLINEEXTENSIONID const lpExtensionID, DWORD dwRequestMode, LPCSTR lpszExtensionName, DWORD dwPriority) { FIXME("(%s, %08lx, %p, %08lx, %s, %08lx): stub.\n", lpszAppFilename, dwMediaMode, lpExtensionID, dwRequestMode, lpszExtensionName, dwPriority); return 0; } /*********************************************************************** * lineSetAppSpecific (TAPI32.@) */ DWORD WINAPI lineSetAppSpecific(HCALL hCall, DWORD dwAppSpecific) { FIXME("(%04x, %08lx): stub.\n", hCall, dwAppSpecific); return 0; } /*********************************************************************** * lineSetCallParams (TAPI32.@) */ DWORD WINAPI lineSetCallParams(HCALL hCall, DWORD dwBearerMode, DWORD dwMinRate, DWORD dwMaxRate, LPLINEDIALPARAMS lpDialParams) { FIXME("(%04x, %08lx, %08lx, %08lx, %p): stub.\n", hCall, dwBearerMode, dwMinRate, dwMaxRate, lpDialParams); return 1; } /*********************************************************************** * lineSetCallPrivilege (TAPI32.@) */ DWORD WINAPI lineSetCallPrivilege(HCALL hCall, DWORD dwCallPrivilege) { FIXME("(%04x, %08lx): stub.\n", hCall, dwCallPrivilege); return 0; } /*********************************************************************** * lineSetCurrentLocation (TAPI32.@) */ DWORD WINAPI lineSetCurrentLocation(HLINEAPP hLineApp, DWORD dwLocation) { FIXME("(%04x, %08lx): stub.\n", hLineApp, dwLocation); return 0; } /*********************************************************************** * lineSetDevConfig (TAPI32.@) */ DWORD WINAPI lineSetDevConfig(DWORD dwDeviceID, LPVOID lpDeviceConfig, DWORD dwSize, LPCSTR lpszDeviceClass) { FIXME("(%08lx, %p, %08lx, %s): stub.\n", dwDeviceID, lpDeviceConfig, dwSize, lpszDeviceClass); return 0; } /*********************************************************************** * lineSetMediaControl (TAPI32.@) */ DWORD WINAPI lineSetMediaControl( HLINE hLine, DWORD dwAddressID, HCALL hCall, DWORD dwSelect, LPLINEMEDIACONTROLDIGIT const lpDigitList, DWORD dwDigitNumEntries, LPLINEMEDIACONTROLMEDIA const lpMediaList, DWORD dwMediaNumEntries, LPLINEMEDIACONTROLTONE const lpToneList, DWORD dwToneNumEntries, LPLINEMEDIACONTROLCALLSTATE const lpCallStateList, DWORD dwCallStateNumEntries) { FIXME(": stub.\n"); return 0; } /*********************************************************************** * lineSetMediaMode (TAPI32.@) */ DWORD WINAPI lineSetMediaMode(HCALL hCall, DWORD dwMediaModes) { FIXME("(%04x, %08lx): stub.\n", hCall, dwMediaModes); return 0; } /*********************************************************************** * lineSetNumRings (TAPI32.@) */ DWORD WINAPI lineSetNumRings(HLINE hLine, DWORD dwAddressID, DWORD dwNumRings) { FIXME("(%04x, %08lx, %08lx): stub.\n", hLine, dwAddressID, dwNumRings); return 0; } /*********************************************************************** * lineSetStatusMessages (TAPI32.@) */ DWORD WINAPI lineSetStatusMessages(HLINE hLine, DWORD dwLineStates, DWORD dwAddressStates) { FIXME("(%04x, %08lx, %08lx): stub.\n", hLine, dwLineStates, dwAddressStates); return 0; } /*********************************************************************** * lineSetTerminal (TAPI32.@) */ DWORD WINAPI lineSetTerminal(HLINE hLine, DWORD dwAddressID, HCALL hCall, DWORD dwSelect, DWORD dwTerminalModes, DWORD dwTerminalID, DWORD bEnable) { FIXME("(%04x, %08lx, %04x, %08lx, %08lx, %08lx, %08lx): stub.\n", hLine, dwAddressID, hCall, dwSelect, dwTerminalModes, dwTerminalID, bEnable); return 1; } /*********************************************************************** * lineSetTollList (TAPI32.@) */ DWORD WINAPI lineSetTollList(HLINEAPP hLineApp, DWORD dwDeviceID, LPCSTR lpszAddressIn, DWORD dwTollListOption) { FIXME("(%04x, %08lx, %s, %08lx): stub.\n", hLineApp, dwDeviceID, lpszAddressIn, dwTollListOption); return 0; } /*********************************************************************** * lineSetupConference (TAPI32.@) */ DWORD WINAPI lineSetupConference(HCALL hCall, HLINE hLine, LPHCALL lphConfCall, LPHCALL lphConsultCall, DWORD dwNumParties, LPLINECALLPARAMS lpCallParams) { FIXME("(%04x, %04x, %p, %p, %08lx, %p): stub.\n", hCall, hLine, lphConfCall, lphConsultCall, dwNumParties, lpCallParams); return 1; } /*********************************************************************** * lineSetupTransfer (TAPI32.@) */ DWORD WINAPI lineSetupTransfer(HCALL hCall, LPHCALL lphConsultCall, LPLINECALLPARAMS lpCallParams) { FIXME("(%04x, %p, %p): stub.\n", hCall, lphConsultCall, lpCallParams); return 1; } /*********************************************************************** * lineShutdown (TAPI32.@) */ DWORD WINAPI lineShutdown(HLINEAPP hLineApp) { FIXME("(%04x): stub.\n", hLineApp); return 0; } /*********************************************************************** * lineSwapHold (TAPI32.@) */ DWORD WINAPI lineSwapHold(HCALL hActiveCall, HCALL hHeldCall) { FIXME("(active: %04x, held: %04x): stub.\n", hActiveCall, hHeldCall); return 1; } /*********************************************************************** * lineTranslateAddress (TAPI32.@) */ DWORD WINAPI lineTranslateAddress(HLINEAPP hLineApp, DWORD dwDeviceID, DWORD dwAPIVersion, LPCSTR lpszAddressIn, DWORD dwCard, DWORD dwTranslateOptions, LPLINETRANSLATEOUTPUT lpTranslateOutput) { FIXME("(%04x, %08lx, %08lx, %s, %08lx, %08lx, %p): stub.\n", hLineApp, dwDeviceID, dwAPIVersion, lpszAddressIn, dwCard, dwTranslateOptions, lpTranslateOutput); return 0; } /*********************************************************************** * lineTranslateDialog (TAPI32.@) */ DWORD WINAPI lineTranslateDialog(HLINEAPP hLineApp, DWORD dwDeviceID, DWORD dwAPIVersion, HWND hwndOwner, LPCSTR lpszAddressIn) { FIXME("(%04x, %08lx, %08lx, %04x, %s): stub.\n", hLineApp, dwDeviceID, dwAPIVersion, hwndOwner, lpszAddressIn); return 0; } /*********************************************************************** * lineUncompleteCall (TAPI32.@) */ DWORD WINAPI lineUncompleteCall(HLINE hLine, DWORD dwCompletionID) { FIXME("(%04x, %08lx): stub.\n", hLine, dwCompletionID); return 1; } /*********************************************************************** * lineUnhold (TAPI32.@) */ DWORD WINAPI lineUnhold(HCALL hCall) { FIXME("(%04x): stub.\n", hCall); return 1; } /*********************************************************************** * lineUnpark (TAPI32.@) */ DWORD WINAPI lineUnpark(HLINE hLine, DWORD dwAddressID, LPHCALL lphCall, LPCSTR lpszDestAddress) { FIXME("(%04x, %08lx, %p, %s): stub.\n", hLine, dwAddressID, lphCall, lpszDestAddress); return 1; } wine-20000526/dlls/tapi32/phone.c0100644000175000001440000002203407106625254015767 0ustar julliardusers/* * TAPI32 phone services * * Copyright 1999 Andreas Mohr */ #include "winbase.h" #include "windef.h" #include "tapi.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(tapi); /*********************************************************************** * phoneClose (TAPI32.@) */ DWORD WINAPI phoneClose(HPHONE hPhone) { FIXME("(%04x), stub.\n", hPhone); return 0; } /*********************************************************************** * phoneConfigDialog (TAPI32.@) */ DWORD WINAPI phoneConfigDialog(DWORD dwDeviceID, HWND hwndOwner, LPCSTR lpszDeviceClass) { FIXME("(%08lx, %04x, %s): stub.\n", dwDeviceID, hwndOwner, lpszDeviceClass); return 0; } /*********************************************************************** * phoneDevSpecific (TAPI32.@) */ DWORD WINAPI phoneDevSpecific(HPHONE hPhone, LPVOID lpParams, DWORD dwSize) { FIXME("(%04x, %p, %08ld): stub.\n", hPhone, lpParams, dwSize); return 1; } /*********************************************************************** * phoneGetButtonInfo (TAPI32.@) */ DWORD WINAPI phoneGetButtonInfo(HPHONE hPhone, DWORD dwButtonLampID, LPPHONEBUTTONINFO lpButtonInfo) { FIXME("(%04x, %08lx, %p): stub.\n", hPhone, dwButtonLampID, lpButtonInfo); return 0; } /*********************************************************************** * phoneGetData (TAPI32.@) */ DWORD WINAPI phoneGetData(HPHONE hPhone, DWORD dwDataID, LPVOID lpData, DWORD dwSize) { FIXME("(%04x, %08ld, %p, %08ld): stub.\n", hPhone, dwDataID, lpData, dwSize); return 0; } /*********************************************************************** * phoneGetDevCaps (TAPI32.@) */ DWORD WINAPI phoneGetDevCaps(HPHONEAPP hPhoneApp, DWORD dwDeviceID, DWORD dwAPIVersion, DWORD dwExtVersion, LPPHONECAPS lpPhoneCaps) { FIXME("(%04x, %08ld, %08lx, %08lx, %p): stub.\n", hPhoneApp, dwDeviceID, dwAPIVersion, dwExtVersion, lpPhoneCaps); return 0; } /*********************************************************************** * phoneGetDisplay (TAPI32.@) */ DWORD WINAPI phoneGetDisplay(HPHONE hPhone, LPVARSTRING lpDisplay) { FIXME("(%04x, %p): stub.\n", hPhone, lpDisplay); return 0; } /*********************************************************************** * phoneGetGain (TAPI32.@) */ DWORD WINAPI phoneGetGain(HPHONE hPhone, DWORD dwHookSwitchDev, LPDWORD lpdwGain) { FIXME("(%04x, %08lx, %p): stub.\n", hPhone, dwHookSwitchDev, lpdwGain); return 0; } /*********************************************************************** * phoneGetHookSwitch (TAPI32.@) */ DWORD WINAPI phoneGetHookSwitch(HPHONE hPhone, LPDWORD lpdwHookSwitchDevs) { FIXME("(%04x, %p): stub.\n", hPhone, lpdwHookSwitchDevs); return 0; } /*********************************************************************** * phoneGetID (TAPI32.@) */ DWORD WINAPI phoneGetID(HPHONE hPhone, LPVARSTRING lpDeviceID, LPCSTR lpszDeviceClass) { FIXME("(%04x, %p, %s): stub.\n", hPhone, lpDeviceID, lpszDeviceClass); return 0; } /*********************************************************************** * phoneGetIcon (TAPI32.@) */ DWORD WINAPI phoneGetIcon(DWORD dwDeviceID, LPCSTR lpszDeviceClass, HICON *lphIcon) { FIXME("(%08lx, %s, %p): stub.\n", dwDeviceID, lpszDeviceClass, lphIcon); return 0; } /*********************************************************************** * phoneGetLamp (TAPI32.@) */ DWORD WINAPI phoneGetLamp(HPHONE hPhone, DWORD dwButtonLampID, LPDWORD lpdwLampMode) { FIXME("(%04x, %08lx, %p): stub.\n", hPhone, dwButtonLampID, lpdwLampMode); return 0; } /*********************************************************************** * phoneGetRing (TAPI32.@) */ DWORD WINAPI phoneGetRing(HPHONE hPhone, LPDWORD lpdwRingMode, LPDWORD lpdwVolume) { FIXME("(%04x, %p, %p): stub.\n", hPhone, lpdwRingMode, lpdwVolume); return 0; } /*********************************************************************** * phoneGetStatus (TAPI32.@) */ DWORD WINAPI phoneGetStatus(HPHONE hPhone, LPPHONESTATUS lpPhoneStatus) { FIXME("(%04x, %p): stub.\n", hPhone, lpPhoneStatus); return 0; } /*********************************************************************** * phoneGetStatusMessages (TAPI32.@) */ DWORD WINAPI phoneGetStatusMessages(HPHONE hPhone, LPDWORD lpdwPhoneStates, LPDWORD lpdwButtonModes, LPDWORD lpdwButtonStates) { FIXME("(%04x, %p, %p, %p): stub.\n", hPhone, lpdwPhoneStates, lpdwButtonModes, lpdwButtonStates); return 0; } /*********************************************************************** * phoneGetVolume (TAPI32.@) */ DWORD WINAPI phoneGetVolume(HPHONE hPhone, DWORD dwHookSwitchDevs, LPDWORD lpdwVolume) { FIXME("(%04x, %08lx, %p): stub.\n", hPhone, dwHookSwitchDevs, lpdwVolume); return 0; } /*********************************************************************** * phoneInitialize (TAPI32.@) */ DWORD WINAPI phoneInitialize(LPHPHONEAPP lphPhoneApp, HINSTANCE hInstance, PHONECALLBACK lpfnCallback, LPCSTR lpszAppName, LPDWORD lpdwNumDevs) { FIXME("(%p, %04x, %p, %s, %p): stub.\n", lphPhoneApp, hInstance, lpfnCallback, lpszAppName, lpdwNumDevs); return 0; } /*********************************************************************** * phoneNegotiateAPIVersion (TAPI32.@) */ DWORD WINAPI phoneNegotiateAPIVersion(HPHONEAPP hPhoneApp, DWORD dwDeviceID, DWORD dwAPILowVersion, DWORD dwAPIHighVersion, LPDWORD lpdwAPIVersion, LPPHONEEXTENSIONID lpExtensionID) { FIXME("(): stub.\n"); return 0; } /*********************************************************************** * phoneNegotiateExtVersion (TAPI32.@) */ DWORD WINAPI phoneNegotiateExtVersion(HPHONEAPP hPhoneApp, DWORD dwDeviceID, DWORD dwAPIVersion, DWORD dwExtLowVersion, DWORD dwExtHighVersion, LPDWORD lpdwExtVersion) { FIXME("(): stub.\n"); return 0; } /*********************************************************************** * phoneOpen (TAPI32.@) */ DWORD WINAPI phoneOpen(HPHONEAPP hPhoneApp, DWORD dwDeviceID, LPHPHONE lphPhone, DWORD dwAPIVersion, DWORD dwExtVersion, DWORD dwCallbackInstance, DWORD dwPrivileges) { FIXME("(): stub.\n"); return 0; } /*********************************************************************** * phoneSetButtonInfo (TAPI32.@) */ DWORD WINAPI phoneSetButtonInfo(HPHONE hPhone, DWORD dwButtonLampID, LPPHONEBUTTONINFO lpButtonInfo) { FIXME("(%04x, %08lx, %p): stub.\n", hPhone, dwButtonLampID, lpButtonInfo); return 0; } /*********************************************************************** * phoneSetData (TAPI32.@) */ DWORD WINAPI phoneSetData(HPHONE hPhone, DWORD dwDataID, LPVOID lpData, DWORD dwSize) { FIXME("(%04x, %08lx, %p, %ld): stub.\n", hPhone, dwDataID, lpData, dwSize); return 1; } /*********************************************************************** * phoneSetDisplay (TAPI32.@) */ DWORD WINAPI phoneSetDisplay(HPHONE hPhone, DWORD dwRow, DWORD dwColumn, LPCSTR lpszDisplay, DWORD dwSize) { FIXME("(%04x, '%s' at %ld/%ld, len %ld): stub.\n", hPhone, lpszDisplay, dwRow, dwColumn, dwSize); return 1; } /*********************************************************************** * phoneSetGain (TAPI32.@) */ DWORD WINAPI phoneSetGain(HPHONE hPhone, DWORD dwHookSwitchDev, DWORD dwGain) { FIXME("(%04x, %08lx, %ld): stub.\n", hPhone, dwHookSwitchDev, dwGain); return 1; } /*********************************************************************** * phoneSetHookSwitch (TAPI32.@) */ DWORD WINAPI phoneSetHookSwitch(HPHONE hPhone, DWORD dwHookSwitchDevs, DWORD dwHookSwitchMode) { FIXME("(%04x, %08lx, %08lx): stub.\n", hPhone, dwHookSwitchDevs, dwHookSwitchMode); return 1; } /*********************************************************************** * phoneSetLamp (TAPI32.@) */ DWORD WINAPI phoneSetLamp(HPHONE hPhone, DWORD dwButtonLampID, DWORD lpdwLampMode) { FIXME("(%04x, %08lx, %08lx): stub.\n", hPhone, dwButtonLampID, lpdwLampMode); return 1; } /*********************************************************************** * phoneSetRing (TAPI32.@) */ DWORD WINAPI phoneSetRing(HPHONE hPhone, DWORD dwRingMode, DWORD dwVolume) { FIXME("(%04x, %08lx, %08lx): stub.\n", hPhone, dwRingMode, dwVolume); return 1; } /*********************************************************************** * phoneSetStatusMessages (TAPI32.@) */ DWORD WINAPI phoneSetStatusMessages(HPHONE hPhone, DWORD dwPhoneStates, DWORD dwButtonModes, DWORD dwButtonStates) { FIXME("(%04x, %08lx, %08lx, %08lx): stub.\n", hPhone, dwPhoneStates, dwButtonModes, dwButtonStates); return 0; /* FIXME ? */ } /*********************************************************************** * phoneSetVolume (TAPI32.@) */ DWORD WINAPI phoneSetVolume(HPHONE hPhone, DWORD dwHookSwitchDev, DWORD dwVolume) { FIXME("(%04x, %08lx, %08lx): stub.\n", hPhone, dwHookSwitchDev, dwVolume); return 1; } /*********************************************************************** * phoneShutdown (TAPI32.@) */ DWORD WINAPI phoneShutdown(HPHONEAPP hPhoneApp) { FIXME("(%04x): stub.\n", hPhoneApp); return 0; } wine-20000526/dlls/tapi32/tapi32.spec0100644000175000001440000001547707033475134016504 0ustar julliardusersname tapi32 type win32 @ stdcall lineAccept(long str long) lineAccept @ stdcall lineAddProvider(str long ptr) lineAddProvider @ stdcall lineAddToConference(long long) lineAddToConference @ stdcall lineAnswer(long str long) lineAnswer @ stdcall lineBlindTransfer(long str long) lineBlindTransfer @ stdcall lineClose(long) lineClose @ stdcall lineCompleteCall(long ptr long long) lineCompleteCall @ stdcall lineCompleteTransfer(long long ptr long) lineCompleteTransfer @ stdcall lineConfigDialog(long long str) lineConfigDialog @ stdcall lineConfigDialogEdit(long long str ptr long ptr) lineConfigDialogEdit @ stdcall lineConfigProvider(long long) lineConfigProvider @ stdcall lineDeallocateCall(long) lineDeallocateCall @ stdcall lineDevSpecific(long long long ptr long) lineDevSpecific @ stdcall lineDevSpecificFeature(long long ptr long) lineDevSpecificFeature @ stdcall lineDial(long str long) lineDial @ stdcall lineDrop(long str long) lineDrop @ stdcall lineForward(long long long ptr long ptr ptr) lineForward @ stdcall lineGatherDigits(long long str long str long long) lineGatherDigits @ stdcall lineGenerateDigits(long long str long) lineGenerateDigits @ stdcall lineGenerateTone(long long long long ptr) lineGenerateTone @ stdcall lineGetAddressCaps(long long long long long ptr) lineGetAddressCaps @ stdcall lineGetAddressID(long ptr long str long) lineGetAddressID @ stdcall lineGetAddressStatus(long long ptr) lineGetAddressStatus @ stdcall lineGetAppPriority(str long ptr long ptr ptr) lineGetAppPriority @ stdcall lineGetCallInfo(long ptr) lineGetCallInfo @ stdcall lineGetCallStatus(long ptr) lineGetCallStatus @ stdcall lineGetConfRelatedCalls(long ptr) lineGetConfRelatedCalls @ stdcall lineGetCountry(long long ptr) lineGetCountry @ stdcall lineGetDevCaps(long long long long ptr) lineGetDevCaps @ stdcall lineGetDevConfig(long ptr str) lineGetDevConfig @ stdcall lineGetID(long long long long ptr str) lineGetID @ stdcall lineGetIcon(long str ptr) lineGetIcon @ stdcall lineGetLineDevStatus(long ptr) lineGetLineDevStatus @ stdcall lineGetNewCalls(long long long ptr) lineGetNewCalls @ stdcall lineGetNumRings(long long ptr) lineGetNumRings @ stdcall lineGetProviderList(long ptr) lineGetProviderList @ stdcall lineGetRequest(long long ptr) lineGetRequest @ stdcall lineGetStatusMessages(long ptr ptr) lineGetStatusMessages @ stdcall lineGetTranslateCaps(long long ptr) lineGetTranslateCaps @ stdcall lineHandoff(long str long) lineHandoff @ stdcall lineHold(long) lineHold @ stdcall lineInitialize(ptr long ptr str ptr) lineInitialize @ stdcall lineMakeCall(long ptr str long ptr) lineMakeCall @ stdcall lineMonitorDigits(long long) lineMonitorDigits @ stdcall lineMonitorMedia(long long) lineMonitorMedia @ stdcall lineMonitorTones(long ptr long) lineMonitorTones @ stdcall lineNegotiateAPIVersion(long long long long ptr ptr) lineNegotiateAPIVersion @ stdcall lineNegotiateExtVersion(long long long long long ptr) lineNegotiateExtVersion @ stdcall lineOpen(long long ptr long long long long long ptr) lineOpen @ stdcall linePark(long long str ptr) linePark @ stdcall linePickup(long long ptr str str) linePickup @ stdcall linePrepareAddToConference(long ptr ptr) linePrepareAddToConference @ stdcall lineRedirect(long str long) lineRedirect @ stdcall lineRegisterRequestRecipient(long long long long) lineRegisterRequestRecipient @ stdcall lineReleaseUserUserInfo(long) lineReleaseUserUserInfo @ stdcall lineRemoveFromConference(long) lineRemoveFromConference @ stdcall lineRemoveProvider(long long) lineRemoveProvider @ stdcall lineSecureCall(long) lineSecureCall @ stdcall lineSendUserUserInfo(long str long) lineSendUserUserInfo @ stdcall lineSetAppPriority(str long ptr long str long) lineSetAppPriority @ stdcall lineSetAppSpecific(long long) lineSetAppSpecific @ stdcall lineSetCallParams(long long long long ptr) lineSetCallParams @ stdcall lineSetCallPrivilege(long long) lineSetCallPrivilege @ stdcall lineSetCurrentLocation(long long) lineSetCurrentLocation @ stdcall lineSetDevConfig(long ptr long str) lineSetDevConfig @ stdcall lineSetMediaControl(long long long long ptr long ptr long ptr long ptr long) lineSetMediaControl @ stdcall lineSetMediaMode(long long) lineSetMediaMode @ stdcall lineSetNumRings(long long long) lineSetNumRings @ stdcall lineSetStatusMessages(long long long) lineSetStatusMessages @ stdcall lineSetTerminal(long long long long long long long) lineSetTerminal @ stdcall lineSetTollList(long long str long) lineSetTollList @ stdcall lineSetupConference(long long ptr ptr long ptr) lineSetupConference @ stdcall lineSetupTransfer(long ptr ptr) lineSetupTransfer @ stdcall lineShutdown(long) lineShutdown @ stdcall lineSwapHold(long long) lineSwapHold @ stdcall lineTranslateAddress(long long long str long long ptr) lineTranslateAddress @ stdcall lineTranslateDialog(long long long long str) lineTranslateDialog @ stdcall lineUncompleteCall(long long) lineUncompleteCall @ stdcall lineUnhold(long) lineUnhold @ stdcall lineUnpark(long long ptr str) lineUnpark @ stdcall phoneClose(long) phoneClose @ stdcall phoneConfigDialog(long long str) phoneConfigDialog @ stdcall phoneDevSpecific(long ptr long) phoneDevSpecific @ stdcall phoneGetButtonInfo(long long ptr) phoneGetButtonInfo @ stdcall phoneGetData(long long ptr long) phoneGetData @ stdcall phoneGetDevCaps(long long long long ptr) phoneGetDevCaps @ stdcall phoneGetDisplay(long ptr) phoneGetDisplay @ stdcall phoneGetGain(long long ptr) phoneGetGain @ stdcall phoneGetHookSwitch(long ptr) phoneGetHookSwitch @ stdcall phoneGetID(long ptr str) phoneGetID @ stdcall phoneGetIcon(long str ptr) phoneGetIcon @ stdcall phoneGetLamp(long long ptr) phoneGetLamp @ stdcall phoneGetRing(long ptr ptr) phoneGetRing @ stdcall phoneGetStatus(long ptr) phoneGetStatus @ stdcall phoneGetStatusMessages(long ptr ptr ptr) phoneGetStatusMessages @ stdcall phoneGetVolume(long long ptr) phoneGetVolume @ stdcall phoneInitialize(ptr long ptr str ptr) phoneInitialize @ stdcall phoneNegotiateAPIVersion(long long long long ptr ptr) phoneNegotiateAPIVersion @ stdcall phoneNegotiateExtVersion(long long long long long ptr) phoneNegotiateExtVersion @ stdcall phoneOpen(long long ptr long long long long) phoneOpen @ stdcall phoneSetButtonInfo(long long ptr) phoneSetButtonInfo @ stdcall phoneSetData(long long ptr long) phoneSetData @ stdcall phoneSetDisplay(long long long str long) phoneSetDisplay @ stdcall phoneSetGain(long long long) phoneSetGain @ stdcall phoneSetHookSwitch(long long long) phoneSetHookSwitch @ stdcall phoneSetLamp(long long long) phoneSetLamp @ stdcall phoneSetRing(long long long) phoneSetRing @ stdcall phoneSetStatusMessages(long long long long) phoneSetStatusMessages @ stdcall phoneSetVolume(long long long) phoneSetVolume @ stdcall phoneShutdown(long) phoneShutdown @ stdcall tapiGetLocationInfo(str str) tapiGetLocationInfo @ stub tapiRequestDrop @ stdcall tapiRequestMakeCall(str str str str) tapiRequestMakeCall @ stub tapiRequestMediaCall wine-20000526/dlls/ttydrv/0040755000175000001440000000000007113604211014732 5ustar julliarduserswine-20000526/dlls/ttydrv/.cvsignore0100644000175000001440000000006107065141452016735 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libttydrv.so.1.0 wine-20000526/dlls/ttydrv/Makefile.in0100644000175000001440000000073707101374336017014 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = ttydrv SOVERSION = 1.0 EXTRALIBS = $(LIBS) SPEC_SRCS = ttydrv.spec C_SRCS = \ ttydrv_main.c EXTRA_OBJS = \ $(TOPOBJDIR)/graphics/ttydrv/ttydrv.o \ $(TOPOBJDIR)/windows/ttydrv/ttydrv.o SUBDIRS = \ $(TOPOBJDIR)/graphics/ttydrv \ $(TOPOBJDIR)/windows/ttydrv @MAKE_DLL_RULES@ $(EXTRA_OBJS): $(TOOLSUBDIRS) dummy @cd `dirname $@` && $(MAKE) `basename $@` ### Dependencies: wine-20000526/dlls/ttydrv/ttydrv.spec0100644000175000001440000000007307065466037017161 0ustar julliardusersname ttydrv type win32 init TTYDRV_Init import gdi32.dll wine-20000526/dlls/ttydrv/ttydrv_main.c0100644000175000001440000001007107070725164017447 0ustar julliardusers/* * TTYDRV initialization code */ #include "config.h" #include #include "winbase.h" #include "clipboard.h" #include "gdi.h" #include "message.h" #include "monitor.h" #include "mouse.h" #include "user.h" #include "win.h" #include "debugtools.h" #include "ttydrv.h" DEFAULT_DEBUG_CHANNEL(ttydrv); static USER_DRIVER user_driver = { /* event functions */ TTYDRV_EVENT_Synchronize, TTYDRV_EVENT_CheckFocus, TTYDRV_EVENT_UserRepaintDisable, /* keyboard functions */ TTYDRV_KEYBOARD_Init, TTYDRV_KEYBOARD_VkKeyScan, TTYDRV_KEYBOARD_MapVirtualKey, TTYDRV_KEYBOARD_GetKeyNameText, TTYDRV_KEYBOARD_ToAscii, TTYDRV_KEYBOARD_GetBeepActive, TTYDRV_KEYBOARD_SetBeepActive, TTYDRV_KEYBOARD_Beep, TTYDRV_KEYBOARD_GetDIState, TTYDRV_KEYBOARD_GetDIData, TTYDRV_KEYBOARD_GetKeyboardConfig, TTYDRV_KEYBOARD_SetKeyboardConfig, /* mouse functions */ TTYDRV_MOUSE_Init, TTYDRV_MOUSE_SetCursor, TTYDRV_MOUSE_MoveCursor, TTYDRV_MOUSE_EnableWarpPointer, /* screen saver functions */ TTYDRV_GetScreenSaveActive, TTYDRV_SetScreenSaveActive, TTYDRV_GetScreenSaveTimeout, TTYDRV_SetScreenSaveTimeout, /* windowing functions */ TTYDRV_IsSingleWindow }; int cell_width = 8; int cell_height = 8; WINDOW *root_window; /*********************************************************************** * TTYDRV process initialisation routine */ static void process_attach(void) { int rows, cols; USER_Driver = &user_driver; CLIPBOARD_Driver = &TTYDRV_CLIPBOARD_Driver; WND_Driver = &TTYDRV_WND_Driver; #ifdef WINE_CURSES if ((root_window = initscr())) { werase(root_window); wrefresh(root_window); } getmaxyx(root_window, rows, cols); #else /* WINE_CURSES */ rows = 60; /* FIXME: Hardcoded */ cols = 80; /* FIXME: Hardcoded */ #endif /* WINE_CURSES */ MONITOR_PrimaryMonitor.rect.left = 0; MONITOR_PrimaryMonitor.rect.top = 0; MONITOR_PrimaryMonitor.rect.right = cell_width * cols; MONITOR_PrimaryMonitor.rect.bottom = cell_height * rows; MONITOR_PrimaryMonitor.depth = 1; TTYDRV_GDI_Initialize(); } /*********************************************************************** * TTYDRV process termination routine */ static void process_detach(void) { TTYDRV_GDI_Finalize(); #ifdef WINE_CURSES if (root_window) endwin(); #endif /* WINE_CURSES */ USER_Driver = NULL; CLIPBOARD_Driver = NULL; WND_Driver = NULL; } /*********************************************************************** * TTYDRV initialisation routine */ BOOL WINAPI TTYDRV_Init( HINSTANCE hinst, DWORD reason, LPVOID reserved ) { static int process_count; switch(reason) { case DLL_PROCESS_ATTACH: if (!process_count++) process_attach(); break; case DLL_PROCESS_DETACH: if (!--process_count) process_detach(); break; } return TRUE; } /*********************************************************************** * TTYDRV_GetScreenSaveActive * * Returns the active status of the screen saver */ BOOL TTYDRV_GetScreenSaveActive(void) { return FALSE; } /*********************************************************************** * TTYDRV_SetScreenSaveActive * * Activate/Deactivate the screen saver */ void TTYDRV_SetScreenSaveActive(BOOL bActivate) { FIXME("(%d): stub\n", bActivate); } /*********************************************************************** * TTYDRV_GetScreenSaveTimeout * * Return the screen saver timeout */ int TTYDRV_GetScreenSaveTimeout(void) { return 0; } /*********************************************************************** * TTYDRV_SetScreenSaveTimeout * * Set the screen saver timeout */ void TTYDRV_SetScreenSaveTimeout(int nTimeout) { FIXME("(%d): stub\n", nTimeout); } /*********************************************************************** * TTYDRV_IsSingleWindow */ BOOL TTYDRV_IsSingleWindow(void) { return TRUE; } wine-20000526/dlls/urlmon/0040755000175000001440000000000007113604211014712 5ustar julliarduserswine-20000526/dlls/urlmon/.cvsignore0100644000175000001440000000005007074702744016722 0ustar julliardusersMakefile liburlmon.so.1.0 urlmon.spec.c wine-20000526/dlls/urlmon/Makefile.in0100644000175000001440000000041007101106212016742 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = urlmon SOVERSION = 1.0 IMPORTS = ole32 WRCEXTRA = -s -p$(MODULE) SPEC_SRCS = urlmon.spec C_SRCS = \ umon.c \ urlmon_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/urlmon/umon.c0100644000175000001440000000124007074702744016046 0ustar julliardusers/* * UrlMon * * Copyright 1999 Corel Corporation * * Ulrich Czekalla * */ #include "windows.h" #include "objbase.h" #include "debugtools.h" #include "urlmon.h" DEFAULT_DEBUG_CHANNEL(win32); /*********************************************************************** * CreateURLMoniker (URLMON.22) * * Create a url moniker * * RETURNS * S_OK success * E_OUTOFMEMORY out of memory * MK_E_SYNTAX not a valid url * */ HRESULT CreateURLMoniker(IMoniker *pmkContext, LPWSTR szURL, IMoniker **ppmk) { TRACE("\n"); if (NULL != pmkContext) FIXME("Non-null pmkContext not implemented\n"); return CreateFileMoniker(szURL, ppmk); } wine-20000526/dlls/urlmon/urlmon.spec0100755000175000001440000000437107102570405017114 0ustar julliardusersname urlmon type win32 import ole32.dll 1 stub CDLGetLongPathNameA 2 stub CDLGetLongPathNameW @ stub AsyncGetClassBits @ stub AsyncInstallDistributionUnit @ stub BindAsyncMoniker @ stub CoGetClassObjectFromURL @ stub CoInstall @ stub CoInternetCombineUrl @ stub CoInternetCompareUrl @ stub CoInternetCreateSecurityManager @ stub CoInternetCreateZoneManager @ stub CoInternetGetProtocolFlags @ stub CoInternetGetSecurityUrl @ stub CoInternetGetSession @ stub CoInternetParseUrl @ stub CoInternetQueryInfo @ stub CopyBindInfo @ stub CopyStgMedium @ stub CreateAsyncBindCtx @ stub CreateAsyncBindCtxEx @ stub CreateFormatEnumerator @ stdcall CreateURLMoniker(ptr str ptr) CreateURLMoniker @ stdcall DllCanUnloadNow() URLMON_DllCanUnloadNow @ stdcall DllGetClassObject(ptr ptr ptr) URLMON_DllGetClassObject @ stdcall DllInstall(long ptr) URLMON_DllInstall @ stdcall DllRegisterServer() URLMON_DllRegisterServer @ stdcall DllRegisterServerEx() URLMON_DllRegisterServerEx @ stdcall DllUnregisterServer() URLMON_DllUnregisterServer @ stub Extract @ stub FaultInIEFeature @ stub FindMediaType @ stub FindMediaTypeClass @ stub FindMimeFromData @ stub GetClassFileOrMime @ stub GetClassURL @ stub GetComponentIDFromCLSSPEC @ stub GetMarkOfTheWeb @ stub GetSoftwareUpdateInfo @ stub HlinkGoBack @ stub HlinkGoForward @ stub HlinkNavigateMoniker @ stub HlinkNavigateString @ stub HlinkSimpleNavigateToMoniker @ stub HlinkSimpleNavigateToString @ stub IsAsyncMoniker @ stub IsLoggingEnabledA @ stub IsLoggingEnabledW @ stub IsValidURL @ stub MkParseDisplayNameEx @ stub ObtainUserAgentString @ stub PrivateCoInstall @ stub RegisterBindStatusCallback @ stub RegisterFormatEnumerator @ stub RegisterMediaTypeClass @ stub RegisterMediaTypes @ stub ReleaseBindInfo @ stub RevokeBindStatusCallback @ stub RevokeFormatEnumerator @ stub SetSoftwareUpdateAdvertisementState @ stub URLDownloadA @ stub URLDownloadToCacheFileA @ stub URLDownloadToCacheFileW @ stub URLDownloadToFileA @ stub URLDownloadToFileW @ stub URLDownloadW @ stub URLOpenBlockingStreamA @ stub URLOpenBlockingStreamW @ stub URLOpenPullStreamA @ stub URLOpenPullStreamW @ stub URLOpenStreamA @ stub URLOpenStreamW @ stub UrlMkBuildVersion @ stub UrlMkGetSessionOption @ stub UrlMkSetSessionOption @ stub WriteHitLogging @ stub ZonesReInit wine-20000526/dlls/urlmon/urlmon_main.c0100644000175000001440000000313207102570405017377 0ustar julliardusers/* * UrlMon * * Copyright (c) 2000 Patrik Stridvall * */ #include "windef.h" #include "winerror.h" #include "wtypes.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(win32); /*********************************************************************** * URLMON_DllInstall (URLMON.@) */ HRESULT WINAPI URLMON_DllInstall(BOOL bInstall, LPCWSTR cmdline) { FIXME("(%s, %s): stub\n", bInstall?"TRUE":"FALSE", debugstr_w(cmdline)); return S_OK; } /*********************************************************************** * DllCanUnloadNow (URLMON.@) */ HRESULT WINAPI URLMON_DllCanUnloadNow(void) { FIXME("(void): stub\n"); return S_FALSE; } /*********************************************************************** * DllGetClassObject (URLMON.@) */ HRESULT WINAPI URLMON_DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID *ppv) { FIXME("(%p, %p, %p): stub\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv); return CLASS_E_CLASSNOTAVAILABLE; } /*********************************************************************** * DllRegisterServer (URLMON.@) */ HRESULT WINAPI URLMON_DllRegisterServer(void) { FIXME("(void): stub\n"); return S_OK; } /*********************************************************************** * DllRegisterServerEx (URLMON.@) */ HRESULT WINAPI URLMON_DllRegisterServerEx(void) { FIXME("(void): stub\n"); return E_FAIL; } /*********************************************************************** * DllUnregisterServer (URLMON.@) */ HRESULT WINAPI URLMON_DllUnregisterServer(void) { FIXME("(void): stub\n"); return S_OK; } wine-20000526/dlls/user/0040755000175000001440000000000007113604212014355 5ustar julliarduserswine-20000526/dlls/user/.cvsignore0100644000175000001440000000007607066760126016373 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libuser32.so.1.0 thunk.glue.c wine-20000526/dlls/user/Makefile.in0100644000175000001440000000047107107634021016425 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = user32 SOVERSION = 1.0 ALTNAMES = user keyboard ddeml SPEC_SRCS = user32.spec user.spec keyboard.spec ddeml.spec C_SRCS = \ ddeml.c \ user_main.c \ thunk.c GLUE = thunk.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/user/ddeml.c0100644000175000001440000017411007107634021015613 0ustar julliardusers/* * DDEML library * * Copyright 1997 Alexandre Julliard * Copyright 1997 Len White * Copyright 1999 Keith Matthews */ /* Only empty stubs for now */ #include #include #include "winbase.h" #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "ddeml.h" #include "winerror.h" #include "heap.h" #include "debugtools.h" #include "tchar.h" #include "winnt.h" DEFAULT_DEBUG_CHANNEL(ddeml) /* Has defined in atom.c file. */ #define MAX_ATOM_LEN 255 /* Maximum buffer size ( including the '\0' ). */ #define MAX_BUFFER_LEN (MAX_ATOM_LEN + 1) /* typedef struct { DWORD nLength; LPVOID lpSecurityDescriptor; BOOL bInheritHandle; } SECURITY_ATTRIBUTES; */ /* This is a simple list to keep track of the strings created * by DdeCreateStringHandle. The list is used to free * the strings whenever DdeUninitialize is called. * This mechanism is not complete and does not handle multiple instances. * Most of the DDE API use a DWORD parameter indicating which instance * of a given program is calling them. The API are supposed to * associate the data to the instance that created it. */ typedef struct tagHSZNode HSZNode; struct tagHSZNode { HSZNode* next; HSZ hsz; }; typedef struct tagServiceNode ServiceNode; struct tagServiceNode { ServiceNode* next; HSZ hsz; BOOL16 FilterOn; }; typedef struct DDE_HANDLE_ENTRY { BOOL16 Monitor; /* have these two as full Booleans cos they'll be tested frequently */ BOOL16 Client_only; /* bit wasteful of space but it will be faster */ BOOL16 Unicode; /* Flag to indicate Win32 API used to initialise */ BOOL16 Win16; /* flag to indicate Win16 API used to initialize */ DWORD Instance_id; /* needed to track monitor usage */ struct DDE_HANDLE_ENTRY *Next_Entry; HSZNode *Node_list; PFNCALLBACK CallBack; DWORD CBF_Flags; DWORD Monitor_flags; UINT Txn_count; /* count transactions open to simplify closure */ DWORD Last_Error; ServiceNode* ServiceNames; } DDE_HANDLE_ENTRY; static DDE_HANDLE_ENTRY *DDE_Handle_Table_Base = NULL; static DWORD DDE_Max_Assigned_Instance = 0; /* OK for present, may have to worry about wrap-around later */ static const char *DDEInstanceAccess = "DDEMaxInstance"; static const char *DDEHandleAccess = "DDEHandleAccess"; static HANDLE inst_count_mutex = 0; static HANDLE handle_mutex = 0; #define TRUE 1 #define FALSE 0 /****************************************************************************** * RemoveHSZNodes (INTERNAL) * * Remove a node from the list of HSZ nodes. * ****************************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 Dec 1998 Corel/Macadamian Initial version * 1.1 Mar 1999 Keith Matthews Added multiple instance handling * */ static void RemoveHSZNode( HSZ hsz, DDE_HANDLE_ENTRY * reference_inst ) { HSZNode* pPrev = NULL; HSZNode* pCurrent = NULL; /* Set the current node at the start of the list. */ pCurrent = reference_inst->Node_list; /* While we have more nodes. */ while( pCurrent != NULL ) { /* If we found the node we were looking for. */ if( pCurrent->hsz == hsz ) { /* Remove the node. */ /* If the first node in the list is to to be removed. * Set the global list pointer to the next node. */ if( pCurrent == reference_inst->Node_list ) { reference_inst->Node_list = pCurrent->next; } /* Just fix the pointers has to skip the current * node so we can delete it. */ else { pPrev->next = pCurrent->next; } /* Destroy this node. */ free( pCurrent ); break; } /* Save the previous node pointer. */ pPrev = pCurrent; /* Move on to the next node. */ pCurrent = pCurrent->next; } } /****************************************************************************** * FreeAndRemoveHSZNodes (INTERNAL) * * Frees up all the strings still allocated in the list and * remove all the nodes from the list of HSZ nodes. * ****************************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 Dec 1998 Corel/Macadamian Initial version * 1.1 Mar 1999 Keith Matthews Added multiple instance handling * */ static void FreeAndRemoveHSZNodes( DWORD idInst, DDE_HANDLE_ENTRY * reference_inst ) { /* Free any strings created in this instance. */ while( reference_inst->Node_list != NULL ) { DdeFreeStringHandle( idInst, reference_inst->Node_list->hsz ); } } /****************************************************************************** * InsertHSZNode (INTERNAL) * * Insert a node to the head of the list. * ****************************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 Dec 1998 Corel/Macadamian Initial version * 1.1 Mar 1999 Keith Matthews Added instance handling * 1.2 Jun 1999 Keith Matthews Added Usage count handling * */ static void InsertHSZNode( HSZ hsz, DDE_HANDLE_ENTRY * reference_inst ) { if( hsz != 0 ) { HSZNode* pNew = NULL; /* Create a new node for this HSZ. */ pNew = (HSZNode*) malloc( sizeof( HSZNode ) ); if( pNew != NULL ) { /* Set the handle value. */ pNew->hsz = hsz; /* Attach the node to the head of the list. i.e most recently added is first */ pNew->next = reference_inst->Node_list; /* The new node is now at the head of the list * so set the global list pointer to it. */ reference_inst->Node_list = pNew; TRACE("HSZ node list entry added\n"); } } } /***************************************************************************** * Find_Instance_Entry * * generic routine to return a pointer to the relevant DDE_HANDLE_ENTRY * for an instance Id, or NULL if the entry does not exist * * ASSUMES the mutex protecting the handle entry list is reserved before calling * ****************************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 March 1999 Keith Matthews 1st implementation */ DDE_HANDLE_ENTRY *Find_Instance_Entry (DWORD InstId) { DDE_HANDLE_ENTRY * reference_inst; reference_inst = DDE_Handle_Table_Base; while ( reference_inst != NULL ) { if ( reference_inst->Instance_id == InstId ) { TRACE("Instance entry found\n"); return reference_inst; } reference_inst = reference_inst->Next_Entry; } TRACE("Instance entry missing\n"); return NULL; } /***************************************************************************** * Find_Service_Name * * generic routine to return a pointer to the relevant ServiceNode * for a given service name, or NULL if the entry does not exist * * ASSUMES the mutex protecting the handle entry list is reserved before calling * ****************************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 May 1999 Keith Matthews 1st implementation */ ServiceNode *Find_Service_Name (HSZ Service_Name, DDE_HANDLE_ENTRY* this_instance) { ServiceNode * reference_name= this_instance->ServiceNames; while ( reference_name != NULL ) { if ( reference_name->hsz == Service_Name ) { TRACE("Service Name found\n"); return reference_name; } reference_name = reference_name->next; } TRACE("Service name missing\n"); return NULL; } /****************************************************************************** * Release_reserved_mutex * * generic routine to release a reserved mutex * * ****************************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 Jan 1999 Keith Matthews Initial version * 1.1 Mar 1999 Keith Matthews Corrected Heap handling. Corrected re-initialisation handling * 1.2 Aug 1999 Jürgen Schmied Corrected error handling * */ static DWORD Release_reserved_mutex (HANDLE mutex, LPSTR mutex_name, BOOL release_handle_m, BOOL release_this_i , DDE_HANDLE_ENTRY *this_instance) { if (!ReleaseMutex(mutex)) { ERR("ReleaseMutex failed - %s mutex %li\n",mutex_name,GetLastError()); HeapFree(GetProcessHeap(), 0, this_instance); if ( release_handle_m ) { ReleaseMutex(handle_mutex); } return DMLERR_SYS_ERROR; } if ( release_this_i ) { HeapFree(GetProcessHeap(), 0, this_instance); } return DMLERR_NO_ERROR; } /****************************************************************************** * WaitForMutex * * generic routine to wait for the mutex * * ****************************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 Aug 1999 Juergen Schmied Initial version * */ static BOOL WaitForMutex (HANDLE mutex) { DWORD result; result = WaitForSingleObject(mutex,1000); /* both errors should never occur */ if (WAIT_TIMEOUT == result) { ERR("WaitForSingleObject timed out\n"); return FALSE; } if (WAIT_FAILED == result) { ERR("WaitForSingleObject failed - error %li\n", GetLastError()); return FALSE; } return TRUE; } /****************************************************************************** * IncrementInstanceId * * generic routine to increment the max instance Id and allocate a new application instance * ****************************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 Jan 1999 Keith Matthews Initial version * */ DWORD IncrementInstanceId( DDE_HANDLE_ENTRY *this_instance) { SECURITY_ATTRIBUTES s_attrib; /* Need to set up Mutex in case it is not already present */ /* increment handle count & get value */ if ( !inst_count_mutex ) { s_attrib.bInheritHandle = TRUE; s_attrib.lpSecurityDescriptor = NULL; s_attrib.nLength = sizeof(s_attrib); inst_count_mutex = CreateMutexA(&s_attrib,1,DDEInstanceAccess); /* 1st time through */ inst_count_mutex = ConvertToGlobalHandle(inst_count_mutex); /* fixme when having seperate adresspaces*/ } else { if ( !WaitForMutex(inst_count_mutex) ) { return DMLERR_SYS_ERROR; } } if ( !inst_count_mutex ) { ERR("CreateMutex failed - inst_count %li\n",GetLastError()); Release_reserved_mutex (handle_mutex,"handle_mutex",0,1,this_instance); return DMLERR_SYS_ERROR; } DDE_Max_Assigned_Instance++; this_instance->Instance_id = DDE_Max_Assigned_Instance; TRACE("New instance id %ld allocated\n",DDE_Max_Assigned_Instance); if (Release_reserved_mutex(inst_count_mutex,"instance_count",1,0,this_instance)) return DMLERR_SYS_ERROR; return DMLERR_NO_ERROR; } /****************************************************************************** * FindNotifyMonitorCallbacks * * Routine to find instances that need to be notified via their callback * of some event they are monitoring * ****************************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 May 1999 Keith Matthews Initial Version * */ void FindNotifyMonitorCallbacks(DWORD ThisInstance, DWORD DdeEvent ) { DDE_HANDLE_ENTRY *InstanceHandle; InstanceHandle = DDE_Handle_Table_Base; while ( InstanceHandle != NULL ) { if ( (InstanceHandle->Monitor ) && InstanceHandle->Instance_id == ThisInstance ) { /* Found an instance registered as monitor and is not ourselves * use callback to notify where appropriate */ } InstanceHandle = InstanceHandle->Next_Entry; } } /****************************************************************************** * DdeReserveAtom * * Routine to make an extra Add on an atom to reserve it a bit longer * ****************************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 Jun 1999 Keith Matthews Initial Version * */ static void DdeReserveAtom( DDE_HANDLE_ENTRY * reference_inst,HSZ hsz) { if ( reference_inst->Unicode) { WCHAR SNameBuffer[MAX_BUFFER_LEN]; GlobalGetAtomNameW(hsz,SNameBuffer,MAX_BUFFER_LEN); GlobalAddAtomW(SNameBuffer); } else { CHAR SNameBuffer[MAX_BUFFER_LEN]; GlobalGetAtomNameA(hsz,SNameBuffer,MAX_BUFFER_LEN); GlobalAddAtomA(SNameBuffer); } } /****************************************************************************** * DdeReleaseAtom * * Routine to make a delete on an atom to release it a bit sooner * ****************************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 Jun 1999 Keith Matthews Initial Version * */ static void DdeReleaseAtom( DDE_HANDLE_ENTRY * reference_inst,HSZ hsz) { GlobalDeleteAtom( hsz ); } /****************************************************************************** * DdeInitialize16 (DDEML.2) */ UINT16 WINAPI DdeInitialize16( LPDWORD pidInst, PFNCALLBACK16 pfnCallback, DWORD afCmd, DWORD ulRes) { TRACE("DdeInitialize16 called - calling DdeInitializeA\n"); return (UINT16)DdeInitializeA(pidInst,(PFNCALLBACK)pfnCallback, afCmd, ulRes); } /****************************************************************************** * DdeInitializeA (USER32.106) */ UINT WINAPI DdeInitializeA( LPDWORD pidInst, PFNCALLBACK pfnCallback, DWORD afCmd, DWORD ulRes ) { TRACE("DdeInitializeA called - calling DdeInitializeW\n"); return DdeInitializeW(pidInst,pfnCallback,afCmd,ulRes); } /****************************************************************************** * DdeInitializeW [USER32.107] * Registers an application with the DDEML * * PARAMS * pidInst [I] Pointer to instance identifier * pfnCallback [I] Pointer to callback function * afCmd [I] Set of command and filter flags * ulRes [I] Reserved * * RETURNS * Success: DMLERR_NO_ERROR * Failure: DMLERR_DLL_USAGE, DMLERR_INVALIDPARAMETER, DMLERR_SYS_ERROR * ****************************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 Pre 1998 Alexandre/Len Initial Stub * 1.1 Jan 1999 Keith Matthews Initial (near-)complete version * 1.2 Mar 1999 Keith Matthews Corrected Heap handling, CreateMutex failure handling * */ UINT WINAPI DdeInitializeW( LPDWORD pidInst, PFNCALLBACK pfnCallback, DWORD afCmd, DWORD ulRes ) { /* probably not really capable of handling multiple processes, but should handle * multiple instances within one process */ SECURITY_ATTRIBUTES *s_att= NULL; SECURITY_ATTRIBUTES s_attrib; DWORD err_no = 0; DDE_HANDLE_ENTRY *this_instance; DDE_HANDLE_ENTRY *reference_inst; s_att = &s_attrib; if( ulRes ) { ERR("Reserved value not zero? What does this mean?\n"); FIXME("(%p,%p,0x%lx,%ld): stub\n", pidInst, pfnCallback, afCmd,ulRes); /* trap this and no more until we know more */ return DMLERR_NO_ERROR; } if (!pfnCallback ) { /* this one may be wrong - MS dll seems to accept the condition, leave this until we find out more !! */ /* can't set up the instance with nothing to act as a callback */ TRACE("No callback provided\n"); return DMLERR_INVALIDPARAMETER; /* might be DMLERR_DLL_USAGE */ } /* grab enough heap for one control struct - not really necessary for re-initialise * but allows us to use same validation routines */ this_instance= (DDE_HANDLE_ENTRY*)HeapAlloc( GetProcessHeap(), 0, sizeof(DDE_HANDLE_ENTRY) ); if ( this_instance == NULL ) { /* catastrophe !! warn user & abort */ ERR("Instance create failed - out of memory\n"); return DMLERR_SYS_ERROR; } this_instance->Next_Entry = NULL; this_instance->Monitor=(afCmd|APPCLASS_MONITOR); /* messy bit, spec implies that 'Client Only' can be set in 2 different ways, catch 1 here */ this_instance->Client_only=afCmd&APPCMD_CLIENTONLY; this_instance->Instance_id = *pidInst; /* May need to add calling proc Id */ this_instance->CallBack=*pfnCallback; this_instance->Txn_count=0; this_instance->Unicode = TRUE; this_instance->Win16 = FALSE; this_instance->Node_list = NULL; /* node will be added later */ this_instance->Monitor_flags = afCmd & MF_MASK; this_instance->ServiceNames = NULL; /* isolate CBF flags in one go, expect this will go the way of all attempts to be clever !! */ this_instance->CBF_Flags=afCmd^((afCmd&MF_MASK)|((afCmd&APPCMD_MASK)|(afCmd&APPCLASS_MASK))); if ( ! this_instance->Client_only ) { /* Check for other way of setting Client-only !! */ this_instance->Client_only=(this_instance->CBF_Flags&CBF_FAIL_ALLSVRXACTIONS) ==CBF_FAIL_ALLSVRXACTIONS; } TRACE("instance created - checking validity \n"); if( *pidInst == 0 ) { /* Initialisation of new Instance Identifier */ TRACE("new instance, callback %p flags %lX\n",pfnCallback,afCmd); if ( DDE_Max_Assigned_Instance == 0 ) { /* Nothing has been initialised - exit now ! can return TRUE since effect is the same */ /* Need to set up Mutex in case it is not already present */ s_att->bInheritHandle = TRUE; s_att->lpSecurityDescriptor = NULL; s_att->nLength = sizeof(s_att); handle_mutex = CreateMutexA(s_att,1,DDEHandleAccess); handle_mutex = ConvertToGlobalHandle(handle_mutex); /* fixme when having seperate adresspaces*/ if ( !handle_mutex ) { ERR("CreateMutex failed - handle list %li\n",GetLastError()); HeapFree(GetProcessHeap(), 0, this_instance); return DMLERR_SYS_ERROR; } } else { if ( !WaitForMutex(handle_mutex) ) { return DMLERR_SYS_ERROR; } } TRACE("Handle Mutex created/reserved\n"); if (DDE_Handle_Table_Base == NULL ) { /* can't be another instance in this case, assign to the base pointer */ DDE_Handle_Table_Base= this_instance; /* since first must force filter of XTYP_CONNECT and XTYP_WILDCONNECT for * present * ------------------------------- NOTE NOTE NOTE -------------------------- * * the manual is not clear if this condition * applies to the first call to DdeInitialize from an application, or the * first call for a given callback !!! */ this_instance->CBF_Flags=this_instance->CBF_Flags|APPCMD_FILTERINITS; TRACE("First application instance detected OK\n"); /* allocate new instance ID */ if ((err_no = IncrementInstanceId( this_instance)) ) return err_no; } else { /* really need to chain the new one in to the latest here, but after checking conditions * such as trying to start a conversation from an application trying to monitor */ reference_inst = DDE_Handle_Table_Base; TRACE("Subsequent application instance - starting checks\n"); while ( reference_inst->Next_Entry != NULL ) { /* * This set of tests will work if application uses same instance Id * at application level once allocated - which is what manual implies * should happen. If someone tries to be * clever (lazy ?) it will fail to pick up that later calls are for * the same application - should we trust them ? */ if ( this_instance->Instance_id == reference_inst->Instance_id) { /* Check 1 - must be same Client-only state */ if ( this_instance->Client_only != reference_inst->Client_only) { if ( Release_reserved_mutex(handle_mutex,"handle_mutex",0,1,this_instance)) return DMLERR_SYS_ERROR; return DMLERR_DLL_USAGE; } /* Check 2 - cannot use 'Monitor' with any non-monitor modes */ if ( this_instance->Monitor != reference_inst->Monitor) { if ( Release_reserved_mutex(handle_mutex,"handle_mutex",0,1,this_instance)) return DMLERR_SYS_ERROR; return DMLERR_INVALIDPARAMETER; } /* Check 3 - must supply different callback address */ if ( this_instance->CallBack == reference_inst->CallBack) { if ( Release_reserved_mutex(handle_mutex,"handle_mutex",0,1,this_instance)) return DMLERR_SYS_ERROR; return DMLERR_DLL_USAGE; } } reference_inst = reference_inst->Next_Entry; } /* All cleared, add to chain */ TRACE("Application Instance checks finished\n"); if ((err_no = IncrementInstanceId( this_instance)) ) return err_no; if ( Release_reserved_mutex(handle_mutex,"handle_mutex",0,0,this_instance)) return DMLERR_SYS_ERROR; reference_inst->Next_Entry = this_instance; } *pidInst = this_instance->Instance_id; TRACE("New application instance processing finished OK\n"); } else { /* Reinitialisation situation --- FIX */ TRACE("reinitialisation of (%p,%p,0x%lx,%ld): stub\n",pidInst,pfnCallback,afCmd,ulRes); if ( !WaitForMutex(handle_mutex) ) { HeapFree(GetProcessHeap(), 0, this_instance); return DMLERR_SYS_ERROR; } if (DDE_Handle_Table_Base == NULL ) { if ( Release_reserved_mutex(handle_mutex,"handle_mutex",0,1,this_instance)) return DMLERR_SYS_ERROR; return DMLERR_DLL_USAGE; } HeapFree(GetProcessHeap(), 0, this_instance); /* finished - release heap space used as work store */ /* can't reinitialise if we have initialised nothing !! */ reference_inst = DDE_Handle_Table_Base; /* must first check if we have been given a valid instance to re-initialise !! how do we do that ? */ /* * MS allows initialisation without specifying a callback, should we allow addition of the * callback by a later call to initialise ? - if so this lot will have to change */ while ( reference_inst->Next_Entry != NULL ) { if ( *pidInst == reference_inst->Instance_id && pfnCallback == reference_inst->CallBack ) { /* Check 1 - cannot change client-only mode if set via APPCMD_CLIENTONLY */ if ( reference_inst->Client_only ) { if ((reference_inst->CBF_Flags & CBF_FAIL_ALLSVRXACTIONS) != CBF_FAIL_ALLSVRXACTIONS) { /* i.e. Was set to Client-only and through APPCMD_CLIENTONLY */ if ( ! ( afCmd & APPCMD_CLIENTONLY)) { if ( Release_reserved_mutex(handle_mutex,"handle_mutex",0,1,this_instance)) return DMLERR_SYS_ERROR; return DMLERR_DLL_USAGE; } } } /* Check 2 - cannot change monitor modes */ if ( this_instance->Monitor != reference_inst->Monitor) { if ( Release_reserved_mutex(handle_mutex,"handle_mutex",0,1,this_instance)) return DMLERR_SYS_ERROR; return DMLERR_DLL_USAGE; } /* Check 3 - trying to set Client-only via APPCMD when not set so previously */ if (( afCmd&APPCMD_CLIENTONLY) && ! reference_inst->Client_only ) { if ( Release_reserved_mutex(handle_mutex,"handle_mutex",0,1,this_instance)) return DMLERR_SYS_ERROR; return DMLERR_DLL_USAGE; } break; } reference_inst = reference_inst->Next_Entry; } if ( reference_inst->Next_Entry == NULL ) { /* Crazy situation - trying to re-initialize something that has not beeen initialized !! * * Manual does not say what we do, cannot return DMLERR_NOT_INITIALIZED so what ? */ if ( Release_reserved_mutex(handle_mutex,"handle_mutex",0,1,this_instance)) return DMLERR_SYS_ERROR; return DMLERR_INVALIDPARAMETER; } /* All checked - change relevant flags */ reference_inst->CBF_Flags = this_instance->CBF_Flags; reference_inst->Client_only = this_instance->Client_only; reference_inst->Monitor_flags = this_instance->Monitor_flags; if ( Release_reserved_mutex(handle_mutex,"handle_mutex",0,1,this_instance)) return DMLERR_SYS_ERROR; } return DMLERR_NO_ERROR; } /***************************************************************** * DdeUninitialize16 (DDEML.3) */ BOOL16 WINAPI DdeUninitialize16( DWORD idInst ) { FIXME(" stub calling DdeUninitialize\n"); return (BOOL16)DdeUninitialize( idInst ); } /***************************************************************** * DdeUninitialize [USER32.119] Frees DDEML resources * * PARAMS * idInst [I] Instance identifier * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI DdeUninitialize( DWORD idInst ) { /* Stage one - check if we have a handle for this instance */ SECURITY_ATTRIBUTES *s_att= NULL; SECURITY_ATTRIBUTES s_attrib; DDE_HANDLE_ENTRY *this_instance; DDE_HANDLE_ENTRY *reference_inst; s_att = &s_attrib; if ( DDE_Max_Assigned_Instance == 0 ) { /* Nothing has been initialised - exit now ! can return TRUE since effect is the same */ return TRUE; } if ( !WaitForMutex(handle_mutex) ) { return DMLERR_SYS_ERROR; } TRACE("Handle Mutex created/reserved\n"); /* First check instance */ this_instance = Find_Instance_Entry(idInst); if ( this_instance == NULL ) { if ( Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,this_instance)) return FALSE; /* * Needs something here to record NOT_INITIALIZED ready for DdeGetLastError */ return FALSE; } FIXME("(%ld): partial stub\n", idInst); /* FIXME ++++++++++++++++++++++++++++++++++++++++++ * Needs to de-register all service names * */ /* Free the nodes that were not freed by this instance * and remove the nodes from the list of HSZ nodes. */ FreeAndRemoveHSZNodes( idInst, this_instance ); /* OK now delete the instance handle itself */ if ( DDE_Handle_Table_Base == this_instance ) { /* special case - the first/only entry */ DDE_Handle_Table_Base = this_instance->Next_Entry; } else { /* general case */ reference_inst = DDE_Handle_Table_Base; while ( reference_inst->Next_Entry != this_instance ) { reference_inst = this_instance->Next_Entry; } reference_inst->Next_Entry = this_instance->Next_Entry; } /* release the mutex and the heap entry */ if ( Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,TRUE,this_instance)) { /* should record something here, but nothing left to hang it from !! */ return FALSE; } return TRUE; } /***************************************************************** * DdeConnectList16 [DDEML.4] */ HCONVLIST WINAPI DdeConnectList16( DWORD idInst, HSZ hszService, HSZ hszTopic, HCONVLIST hConvList, LPCONVCONTEXT16 pCC ) { return DdeConnectList(idInst, hszService, hszTopic, hConvList, (LPCONVCONTEXT)pCC); } /****************************************************************************** * DdeConnectList [USER32.93] Establishes conversation with DDE servers * * PARAMS * idInst [I] Instance identifier * hszService [I] Handle to service name string * hszTopic [I] Handle to topic name string * hConvList [I] Handle to conversation list * pCC [I] Pointer to structure with context data * * RETURNS * Success: Handle to new conversation list * Failure: 0 */ HCONVLIST WINAPI DdeConnectList( DWORD idInst, HSZ hszService, HSZ hszTopic, HCONVLIST hConvList, LPCONVCONTEXT pCC ) { FIXME("(%ld,%d,%d,%d,%p): stub\n", idInst, hszService, hszTopic, hConvList,pCC); return 1; } /***************************************************************** * DdeQueryNextServer16 [DDEML.5] */ HCONV WINAPI DdeQueryNextServer16( HCONVLIST hConvList, HCONV hConvPrev ) { return DdeQueryNextServer(hConvList, hConvPrev); } /***************************************************************** * DdeQueryNextServer [USER32.112] */ HCONV WINAPI DdeQueryNextServer( HCONVLIST hConvList, HCONV hConvPrev ) { FIXME("(%d,%d): stub\n",hConvList,hConvPrev); return 0; } /***************************************************************** * DdeQueryStringA [USER32.113] * ***************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 Dec 1998 Corel/Macadamian Initial version * 1.1 Mar 1999 Keith Matthews Added links to instance table and related processing * */ DWORD WINAPI DdeQueryStringA(DWORD idInst, HSZ hsz, LPSTR psz, DWORD cchMax, INT iCodePage) { DWORD ret = 0; CHAR pString[MAX_BUFFER_LEN]; DDE_HANDLE_ENTRY *reference_inst; FIXME( "(%ld, 0x%x, %p, %ld, %d): partial stub\n", idInst, hsz, psz, cchMax, iCodePage); if ( DDE_Max_Assigned_Instance == 0 ) { /* Nothing has been initialised - exit now ! */ /* needs something for DdeGetLAstError even if the manual doesn't say so */ return FALSE; } if ( !WaitForMutex(handle_mutex) ) { return FALSE; } TRACE("Handle Mutex created/reserved\n"); /* First check instance */ reference_inst = Find_Instance_Entry(idInst); if ( reference_inst == NULL ) { if ( Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,reference_inst)) return FALSE; /* Needs something here to record NOT_INITIALIZED ready for DdeGetLastError */ return FALSE; } if( iCodePage == CP_WINANSI ) { /* If psz is null, we have to return only the length * of the string. */ if( psz == NULL ) { psz = pString; cchMax = MAX_BUFFER_LEN; } ret = GlobalGetAtomNameA( hsz, (LPSTR)psz, cchMax ); } else { Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,reference_inst); } TRACE("returning pointer\n"); return ret; } /***************************************************************** * DdeQueryStringW [USER32.114] * ***************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 Dec 1998 Corel/Macadamian Initial version * */ DWORD WINAPI DdeQueryStringW(DWORD idInst, HSZ hsz, LPWSTR psz, DWORD cchMax, INT iCodePage) { DWORD ret = 0; WCHAR pString[MAX_BUFFER_LEN]; int factor = 1; FIXME( "(%ld, 0x%x, %p, %ld, %d): stub\n", idInst, hsz, psz, cchMax, iCodePage); if( iCodePage == CP_WINUNICODE ) { /* If psz is null, we have to return only the length * of the string. */ if( psz == NULL ) { psz = pString; cchMax = MAX_BUFFER_LEN; /* Note: According to documentation if the psz parameter * was NULL this API must return the length of the string in bytes. */ factor = (int) sizeof(WCHAR)/sizeof(BYTE); } ret = GlobalGetAtomNameW( hsz, (LPWSTR)psz, cchMax ) * factor; } return ret; } /***************************************************************** * * DdeQueryString16 (DDEML.23) * ****************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 March 1999 K Matthews stub only */ DWORD WINAPI DdeQueryString16(DWORD idInst, HSZ hsz, LPSTR lpsz, DWORD cchMax, INT16 codepage) { FIXME("(%ld, 0x%x, %p, %ld, %d): stub \n", idInst, hsz, lpsz, cchMax, codepage); return 0; } /***************************************************************** * DdeDisconnectList (DDEML.6) */ BOOL16 WINAPI DdeDisconnectList16( HCONVLIST hConvList ) { return (BOOL16)DdeDisconnectList(hConvList); } /****************************************************************************** * DdeDisconnectList [USER32.98] Destroys list and terminates conversations * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI DdeDisconnectList( HCONVLIST hConvList) /* [in] Handle to conversation list */ { FIXME("(%d): stub\n", hConvList); return TRUE; } /***************************************************************** * DdeConnect16 (DDEML.7) */ HCONV WINAPI DdeConnect16( DWORD idInst, HSZ hszService, HSZ hszTopic, LPCONVCONTEXT16 pCC ) { FIXME("empty stub\n" ); return 0; } /***************************************************************** * DdeConnect (USER32.92) */ HCONV WINAPI DdeConnect( DWORD idInst, HSZ hszService, HSZ hszTopic, LPCONVCONTEXT pCC ) { FIXME("(0x%lx,%d,%d,%p): stub\n",idInst,hszService,hszTopic, pCC); return 0; } /***************************************************************** * DdeDisconnect16 (DDEML.8) */ BOOL16 WINAPI DdeDisconnect16( HCONV hConv ) { return (BOOL16)DdeDisconnect( hConv ); } /***************************************************************** * DdeSetUserHandle16 (DDEML.10) */ BOOL16 WINAPI DdeSetUserHandle16( HCONV hConv, DWORD id, DWORD hUser ) { FIXME("(%d,%ld,%ld): stub\n",hConv,id, hUser ); return 0; } /***************************************************************** * DdeCreateDataHandle16 (DDEML.14) */ HDDEDATA WINAPI DdeCreateDataHandle16( DWORD idInst, LPBYTE pSrc, DWORD cb, DWORD cbOff, HSZ hszItem, UINT16 wFmt, UINT16 afCmd ) { return DdeCreateDataHandle(idInst, pSrc, cb, cbOff, hszItem, wFmt, afCmd); } /***************************************************************** * DdeCreateDataHandle (USER32.94) */ HDDEDATA WINAPI DdeCreateDataHandle( DWORD idInst, LPBYTE pSrc, DWORD cb, DWORD cbOff, HSZ hszItem, UINT wFmt, UINT afCmd ) { FIXME( "(%ld,%p,%ld,%ld,0x%x,%d,%d): stub\n", idInst, pSrc, cb, cbOff, hszItem, wFmt, afCmd ); return 0; } /***************************************************************** * DdeDisconnect (USER32.97) */ BOOL WINAPI DdeDisconnect( HCONV hConv ) { FIXME("empty stub\n" ); return 0; } /***************************************************************** * DdeReconnect (DDEML.37) (USER32.115) */ HCONV WINAPI DdeReconnect( HCONV hConv ) { FIXME("empty stub\n" ); return 0; } /***************************************************************** * DdeCreateStringHandle16 (DDEML.21) * ***************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 ? ? basic stub * 1.1 June 1999 Keith Matthews amended onward call to supply default * code page if none supplied by caller */ HSZ WINAPI DdeCreateStringHandle16( DWORD idInst, LPCSTR str, INT16 codepage ) { if ( codepage ) { return DdeCreateStringHandleA( idInst, str, codepage ); } else { TRACE("Default codepage supplied\n"); return DdeCreateStringHandleA( idInst, str, CP_WINANSI); } } /***************************************************************** * DdeCreateStringHandleA [USER32.95] * * RETURNS * Success: String handle * Failure: 0 * ***************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 Dec 1998 Corel/Macadamian Initial version * 1.1 Mar 1999 Keith Matthews Added links to instance table and related processing * */ HSZ WINAPI DdeCreateStringHandleA( DWORD idInst, LPCSTR psz, INT codepage ) { HSZ hsz = 0; DDE_HANDLE_ENTRY *reference_inst; TRACE("(%ld,%s,%d): partial stub\n",idInst,debugstr_a(psz),codepage); if ( DDE_Max_Assigned_Instance == 0 ) { /* Nothing has been initialised - exit now ! can return FALSE since effect is the same */ return FALSE; } if ( !WaitForMutex(handle_mutex) ) { return DMLERR_SYS_ERROR; } TRACE("Handle Mutex created/reserved\n"); /* First check instance */ reference_inst = Find_Instance_Entry(idInst); if ( reference_inst == NULL ) { if ( Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,reference_inst)) return 0; /* Needs something here to record NOT_INITIALIZED ready for DdeGetLastError */ return 0; } if (codepage==CP_WINANSI) { hsz = GlobalAddAtomA (psz); /* Save the handle so we know to clean it when * uninitialize is called. */ TRACE("added atom %s with HSZ 0x%x, \n",debugstr_a(psz),hsz); InsertHSZNode( hsz, reference_inst ); if ( Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,reference_inst)) { reference_inst->Last_Error = DMLERR_SYS_ERROR; return 0; } TRACE("Returning pointer\n"); return hsz; } else { Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,reference_inst); } TRACE("Returning error\n"); return 0; } /****************************************************************************** * DdeCreateStringHandleW [USER32.96] Creates handle to identify string * * RETURNS * Success: String handle * Failure: 0 * ***************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 Dec 1998 Corel/Macadamian Initial version * 1.1 Mar 1999 Keith Matthews Added links to instance table and related processing * */ HSZ WINAPI DdeCreateStringHandleW( DWORD idInst, /* [in] Instance identifier */ LPCWSTR psz, /* [in] Pointer to string */ INT codepage) /* [in] Code page identifier */ { DDE_HANDLE_ENTRY *reference_inst; HSZ hsz = 0; TRACE("(%ld,%s,%d): partial stub\n",idInst,debugstr_w(psz),codepage); if ( DDE_Max_Assigned_Instance == 0 ) { /* Nothing has been initialised - exit now ! can return FALSE since effect is the same */ return FALSE; } if ( !WaitForMutex(handle_mutex) ) { return DMLERR_SYS_ERROR; } TRACE("CreateString - Handle Mutex created/reserved\n"); /* First check instance */ reference_inst = Find_Instance_Entry(idInst); if ( reference_inst == NULL ) { if ( Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,reference_inst)) return 0; /* Needs something here to record NOT_INITIALIZED ready for DdeGetLastError */ return 0; } FIXME("(%ld,%s,%d): partial stub\n",idInst,debugstr_w(psz),codepage); if (codepage==CP_WINUNICODE) /* Should we be checking this against the unicode/ascii nature of the call to DdeInitialize ? */ { hsz = GlobalAddAtomW (psz); /* Save the handle so we know to clean it when * uninitialize is called. */ InsertHSZNode( hsz, reference_inst ); if ( Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,reference_inst)) { reference_inst->Last_Error = DMLERR_SYS_ERROR; return 0; } TRACE("Returning pointer\n"); return hsz; } else { Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,reference_inst); } TRACE("Returning error\n"); return 0; } /***************************************************************** * DdeFreeStringHandle16 (DDEML.22) */ BOOL16 WINAPI DdeFreeStringHandle16( DWORD idInst, HSZ hsz ) { FIXME("idInst %ld hsz 0x%x\n",idInst,hsz); return (BOOL)DdeFreeStringHandle( idInst, hsz ); } /***************************************************************** * DdeFreeStringHandle (USER32.101) * RETURNS: success: nonzero * fail: zero * ***************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 Dec 1998 Corel/Macadamian Initial version * 1.1 Apr 1999 Keith Matthews Added links to instance table and related processing * */ BOOL WINAPI DdeFreeStringHandle( DWORD idInst, HSZ hsz ) { DDE_HANDLE_ENTRY *reference_inst; TRACE("(%ld,%d): \n",idInst,hsz); if ( DDE_Max_Assigned_Instance == 0 ) { /* Nothing has been initialised - exit now ! can return TRUE since effect is the same */ return TRUE; } if ( !WaitForMutex(handle_mutex) ) { return DMLERR_SYS_ERROR; } TRACE("Handle Mutex created/reserved\n"); /* First check instance */ reference_inst = Find_Instance_Entry(idInst); if ( (reference_inst == NULL) || (reference_inst->Node_list == NULL)) { if ( Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,reference_inst)) return TRUE; /* Nothing has been initialised - exit now ! can return TRUE since effect is the same */ return TRUE; } /* Remove the node associated with this HSZ. */ RemoveHSZNode( hsz , reference_inst); /* Free the string associated with this HSZ. */ Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,reference_inst); return GlobalDeleteAtom (hsz) ? 0 : hsz; } /***************************************************************** * DdeFreeDataHandle16 (DDEML.19) */ BOOL16 WINAPI DdeFreeDataHandle16( HDDEDATA hData ) { return (BOOL)DdeFreeDataHandle( hData ); } /***************************************************************** * DdeFreeDataHandle (USER32.100) */ BOOL WINAPI DdeFreeDataHandle( HDDEDATA hData ) { FIXME("empty stub\n" ); return TRUE; } /***************************************************************** * DdeKeepStringHandle16 (DDEML.24) */ BOOL16 WINAPI DdeKeepStringHandle16( DWORD idInst, HSZ hsz ) { return (BOOL)DdeKeepStringHandle( idInst, hsz ); } /***************************************************************** * DdeKeepStringHandle (USER32.108) * * RETURNS: success: nonzero * fail: zero * ***************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 ? ? Stub only * 1.1 Jun 1999 Keith Matthews First cut implementation * */ BOOL WINAPI DdeKeepStringHandle( DWORD idInst, HSZ hsz ) { DDE_HANDLE_ENTRY *reference_inst; TRACE("(%ld,%d): \n",idInst,hsz); if ( DDE_Max_Assigned_Instance == 0 ) { /* Nothing has been initialised - exit now ! can return FALSE since effect is the same */ return FALSE; } if ( !WaitForMutex(handle_mutex) ) { return FALSE; } TRACE("Handle Mutex created/reserved\n"); /* First check instance */ reference_inst = Find_Instance_Entry(idInst); if ( (reference_inst == NULL) || (reference_inst->Node_list == NULL)) { if ( Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,reference_inst)) return FALSE; /* Nothing has been initialised - exit now ! can return FALSE since effect is the same */ return FALSE; return FALSE; } DdeReserveAtom(reference_inst,hsz); Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,reference_inst); return TRUE; } /***************************************************************** * DdeClientTransaction16 (DDEML.11) */ HDDEDATA WINAPI DdeClientTransaction16( LPVOID pData, DWORD cbData, HCONV hConv, HSZ hszItem, UINT16 wFmt, UINT16 wType, DWORD dwTimeout, LPDWORD pdwResult ) { return DdeClientTransaction( (LPBYTE)pData, cbData, hConv, hszItem, wFmt, wType, dwTimeout, pdwResult ); } /***************************************************************** * DdeClientTransaction (USER32.90) */ HDDEDATA WINAPI DdeClientTransaction( LPBYTE pData, DWORD cbData, HCONV hConv, HSZ hszItem, UINT wFmt, UINT wType, DWORD dwTimeout, LPDWORD pdwResult ) { FIXME("empty stub\n" ); return 0; } /***************************************************************** * * DdeAbandonTransaction16 (DDEML.12) * */ BOOL16 WINAPI DdeAbandonTransaction16( DWORD idInst, HCONV hConv, DWORD idTransaction ) { FIXME("empty stub\n" ); return TRUE; } /***************************************************************** * * DdeAbandonTransaction (USER32.87) * ****************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 March 1999 K Matthews stub only */ BOOL WINAPI DdeAbandonTransaction( DWORD idInst, HCONV hConv, DWORD idTransaction ) { FIXME("empty stub\n" ); return TRUE; } /***************************************************************** * DdePostAdvise16 [DDEML.13] */ BOOL16 WINAPI DdePostAdvise16( DWORD idInst, HSZ hszTopic, HSZ hszItem ) { return (BOOL16)DdePostAdvise(idInst, hszTopic, hszItem); } /****************************************************************************** * DdePostAdvise [USER32.110] Send transaction to DDE callback function. * * RETURNS * Success: TRUE * Failure: FALSE */ BOOL WINAPI DdePostAdvise( DWORD idInst, /* [in] Instance identifier */ HSZ hszTopic, /* [in] Handle to topic name string */ HSZ hszItem) /* [in] Handle to item name string */ { FIXME("(%ld,%d,%d): stub\n",idInst,hszTopic,hszItem); return TRUE; } /***************************************************************** * DdeAddData16 (DDEML.15) */ HDDEDATA WINAPI DdeAddData16( HDDEDATA hData, LPBYTE pSrc, DWORD cb, DWORD cbOff ) { FIXME("empty stub\n" ); return 0; } /***************************************************************** * * DdeAddData (USER32.89) * ****************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 March 1999 K Matthews stub only */ HDDEDATA WINAPI DdeAddData( HDDEDATA hData, LPBYTE pSrc, DWORD cb, DWORD cbOff ) { FIXME("empty stub\n" ); return 0; } /***************************************************************** * * DdeImpersonateClient (USER32.105) * ****************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 March 1999 K Matthews stub only */ BOOL WINAPI DdeImpersonateClient( HCONV hConv) { FIXME("empty stub\n" ); return TRUE; } /***************************************************************** * * DdeSetQualityOfService (USER32.116) * ****************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 March 1999 K Matthews stub only */ BOOL WINAPI DdeSetQualityOfService( HWND hwndClient, CONST SECURITY_QUALITY_OF_SERVICE *pqosNew, PSECURITY_QUALITY_OF_SERVICE pqosPrev) { FIXME("empty stub\n" ); return TRUE; } /***************************************************************** * * DdeSetUserHandle (USER32.117) * ****************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 March 1999 K Matthews stub only */ BOOL WINAPI DdeSetUserHandle( HCONV hConv, DWORD id, DWORD hUser) { FIXME("empty stub\n" ); return TRUE; } /****************************************************************************** * DdeGetData [USER32.102] Copies data from DDE object ot local buffer * * RETURNS * Size of memory object associated with handle */ DWORD WINAPI DdeGetData( HDDEDATA hData, /* [in] Handle to DDE object */ LPBYTE pDst, /* [in] Pointer to destination buffer */ DWORD cbMax, /* [in] Amount of data to copy */ DWORD cbOff) /* [in] Offset to beginning of data */ { FIXME("(%d,%p,%ld,%ld): stub\n",hData,pDst,cbMax,cbOff); return cbMax; } /***************************************************************** * DdeGetData16 [DDEML.16] */ DWORD WINAPI DdeGetData16( HDDEDATA hData, LPBYTE pDst, DWORD cbMax, DWORD cbOff) { return DdeGetData(hData, pDst, cbMax, cbOff); } /***************************************************************** * DdeAccessData16 (DDEML.17) */ LPBYTE WINAPI DdeAccessData16( HDDEDATA hData, LPDWORD pcbDataSize ) { return DdeAccessData(hData, pcbDataSize); } /***************************************************************** * DdeAccessData (USER32.88) */ LPBYTE WINAPI DdeAccessData( HDDEDATA hData, LPDWORD pcbDataSize ) { FIXME("(%d,%p): stub\n", hData, pcbDataSize); return 0; } /***************************************************************** * DdeUnaccessData16 (DDEML.18) */ BOOL16 WINAPI DdeUnaccessData16( HDDEDATA hData ) { return DdeUnaccessData(hData); } /***************************************************************** * DdeUnaccessData (USER32.118) */ BOOL WINAPI DdeUnaccessData( HDDEDATA hData ) { FIXME("(0x%x): stub\n", hData); return 0; } /***************************************************************** * DdeEnableCallback16 (DDEML.26) */ BOOL16 WINAPI DdeEnableCallback16( DWORD idInst, HCONV hConv, UINT16 wCmd ) { return DdeEnableCallback(idInst, hConv, wCmd); } /***************************************************************** * DdeEnableCallback (USER32.99) */ BOOL WINAPI DdeEnableCallback( DWORD idInst, HCONV hConv, UINT wCmd ) { FIXME("(%ld, 0x%x, %d) stub\n", idInst, hConv, wCmd); return 0; } /***************************************************************** * DdeNameService16 (DDEML.27) */ HDDEDATA WINAPI DdeNameService16( DWORD idInst, HSZ hsz1, HSZ hsz2, UINT16 afCmd ) { return DdeNameService( idInst, hsz1, hsz2, afCmd ); } /****************************************************************************** * DdeNameService [USER32.109] {Un}registers service name of DDE server * * PARAMS * idInst [I] Instance identifier * hsz1 [I] Handle to service name string * hsz2 [I] Reserved * afCmd [I] Service name flags * * RETURNS * Success: Non-zero * Failure: 0 * ***************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 ? ? Stub * 1.1 Apr 1999 Keith Matthews Added trap for non-existent instance (uninitialised instance 0 * used by some MS programs for unfathomable reasons) * 1.2 May 1999 Keith Matthews Added parameter validation and basic service name handling. * Still needs callback parts * */ HDDEDATA WINAPI DdeNameService( DWORD idInst, HSZ hsz1, HSZ hsz2, UINT afCmd ) { ServiceNode* this_service, *reference_service ; DDE_HANDLE_ENTRY *this_instance; DDE_HANDLE_ENTRY *reference_inst; this_service = NULL; FIXME("(%ld,%d,%d,%d): stub\n",idInst,hsz1,hsz2,afCmd); if ( DDE_Max_Assigned_Instance == 0 ) { /* Nothing has been initialised - exit now ! * needs something for DdeGetLastError */ return 0L; } if ( !WaitForMutex(handle_mutex) ) { return DMLERR_SYS_ERROR; } TRACE("Handle Mutex created/reserved\n"); /* First check instance */ reference_inst = Find_Instance_Entry(idInst); this_instance = reference_inst; if (reference_inst == NULL) { TRACE("Instance not found as initialised\n"); if ( Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,this_instance)) return TRUE; /* Nothing has been initialised - exit now ! can return TRUE since effect is the same */ return FALSE; } if ( hsz2 != 0L ) { /* Illegal, reserved parameter */ reference_inst->Last_Error = DMLERR_INVALIDPARAMETER; Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,this_instance); FIXME("Reserved parameter no-zero !!\n"); return FALSE; } if ( hsz1 == 0L ) { /* * General unregister situation */ if ( afCmd != DNS_UNREGISTER ) { /* don't know if we should check this but it makes sense * why supply REGISTER or filter flags if de-registering all */ TRACE("General unregister unexpected flags\n"); reference_inst->Last_Error = DMLERR_DLL_USAGE; Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,this_instance); return FALSE; } /* Loop to find all registered service and de-register them */ if ( reference_inst->ServiceNames == NULL ) { /* None to unregister !! */ TRACE("General de-register - nothing registered\n"); reference_inst->Last_Error = DMLERR_DLL_USAGE; Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,this_instance); return FALSE; } else { this_service = reference_inst->ServiceNames; while ( this_service->next != NULL) { TRACE("general deregister - iteration\n"); reference_service = this_service; this_service = this_service->next; DdeReleaseAtom(reference_inst,reference_service->hsz); HeapFree(GetProcessHeap(), 0, reference_service); /* finished - release heap space used as work store */ } DdeReleaseAtom(reference_inst,this_service->hsz); HeapFree(GetProcessHeap(), 0, this_service); /* finished - release heap space used as work store */ reference_inst->ServiceNames = NULL; TRACE("General de-register - finished\n"); } Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,this_instance); return TRUE; } TRACE("Specific name action detected\n"); if ( afCmd & DNS_REGISTER ) { /* Register new service name */ this_service = Find_Service_Name( hsz1, reference_inst ); if ( this_service ) ERR("Trying to register already registered service!\n"); else { TRACE("Adding service name\n"); DdeReserveAtom(reference_inst, hsz1); this_service = (ServiceNode*)HeapAlloc( GetProcessHeap(), 0, sizeof(ServiceNode) ); this_service->hsz = hsz1; this_service->FilterOn = TRUE; this_service->next = reference_inst->ServiceNames; reference_inst->ServiceNames = this_service; } } if ( afCmd & DNS_UNREGISTER ) { /* De-register service name */ ServiceNode **pServiceNode = &reference_inst->ServiceNames; while ( *pServiceNode && (*pServiceNode)->hsz != hsz1 ) pServiceNode = &(*pServiceNode)->next; this_service = *pServiceNode; if ( !this_service ) ERR("Trying to de-register unregistered service!\n"); else { *pServiceNode = this_service->next; DdeReleaseAtom(reference_inst,this_service->hsz); HeapFree(GetProcessHeap(), 0, this_service); } } if ( afCmd & DNS_FILTERON ) { /* Set filter flags on to hold notifications of connection * * test coded this way as this is the default setting */ this_service = Find_Service_Name( hsz1, reference_inst ); if ( !this_service ) { /* trying to filter where no service names !! */ reference_inst->Last_Error = DMLERR_DLL_USAGE; Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,this_instance); return FALSE; } else { this_service->FilterOn = TRUE; } } if ( afCmd & DNS_FILTEROFF ) { /* Set filter flags on to hold notifications of connection */ this_service = Find_Service_Name( hsz1, reference_inst ); if ( !this_service ) { /* trying to filter where no service names !! */ reference_inst->Last_Error = DMLERR_DLL_USAGE; Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,this_instance); return FALSE; } else { this_service->FilterOn = FALSE; } } Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,this_instance); return TRUE; } /***************************************************************** * DdeGetLastError16 (DDEML.20) */ UINT16 WINAPI DdeGetLastError16( DWORD idInst ) { return (UINT16)DdeGetLastError( idInst ); } /****************************************************************************** * DdeGetLastError [USER32.103] Gets most recent error code * * PARAMS * idInst [I] Instance identifier * * RETURNS * Last error code * ***************************************************************** * * Change History * * Vn Date Author Comment * * 1.0 ? ? Stub * 1.1 Apr 1999 Keith Matthews Added response for non-existent instance (uninitialised instance 0 * used by some MS programs for unfathomable reasons) * 1.2 May 1999 Keith Matthews Added interrogation of Last_Error for instance handle where found. * */ UINT WINAPI DdeGetLastError( DWORD idInst ) { DWORD error_code; DDE_HANDLE_ENTRY *reference_inst; FIXME("(%ld): stub\n",idInst); if ( DDE_Max_Assigned_Instance == 0 ) { /* Nothing has been initialised - exit now ! */ return DMLERR_DLL_NOT_INITIALIZED; } if ( !WaitForMutex(handle_mutex) ) { return DMLERR_SYS_ERROR; } TRACE("Handle Mutex created/reserved\n"); /* First check instance */ reference_inst = Find_Instance_Entry(idInst); if (reference_inst == NULL) { if ( Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,reference_inst)) return TRUE; /* Nothing has been initialised - exit now ! can return TRUE since effect is the same */ return DMLERR_DLL_NOT_INITIALIZED; } error_code = reference_inst->Last_Error; reference_inst->Last_Error = 0; Release_reserved_mutex(handle_mutex,"handle_mutex",FALSE,FALSE,reference_inst); return error_code; } /***************************************************************** * DdeCmpStringHandles16 (DDEML.36) */ INT16 WINAPI DdeCmpStringHandles16( HSZ hsz1, HSZ hsz2 ) { return DdeCmpStringHandles(hsz1, hsz2); } /***************************************************************** * DdeCmpStringHandles (USER32.91) * * Compares the value of two string handles. This comparison is * not case sensitive. * * Returns: * -1 The value of hsz1 is zero or less than hsz2 * 0 The values of hsz 1 and 2 are the same or both zero. * 1 The value of hsz2 is zero of less than hsz1 */ INT WINAPI DdeCmpStringHandles( HSZ hsz1, HSZ hsz2 ) { CHAR psz1[MAX_BUFFER_LEN]; CHAR psz2[MAX_BUFFER_LEN]; int ret = 0; int ret1, ret2; TRACE("handle 1, handle 2\n" ); ret1 = GlobalGetAtomNameA( hsz1, psz1, MAX_BUFFER_LEN ); ret2 = GlobalGetAtomNameA( hsz2, psz2, MAX_BUFFER_LEN ); /* Make sure we found both strings. */ if( ret1 == 0 && ret2 == 0 ) { /* If both are not found, return both "zero strings". */ ret = 0; } else if( ret1 == 0 ) { /* If hsz1 is a not found, return hsz1 is "zero string". */ ret = -1; } else if( ret2 == 0 ) { /* If hsz2 is a not found, return hsz2 is "zero string". */ ret = 1; } else { /* Compare the two strings we got ( case insensitive ). */ ret = strcasecmp( psz1, psz2 ); /* Since strcmp returns any number smaller than * 0 when the first string is found to be less than * the second one we must make sure we are returning * the proper values. */ if( ret < 0 ) { ret = -1; } else if( ret > 0 ) { ret = 1; } } return ret; } /***************************************************************** * PackDDElParam (USER32.414) * * RETURNS * success: nonzero * failure: zero */ UINT WINAPI PackDDElParam(UINT msg, UINT uiLo, UINT uiHi) { FIXME("stub.\n"); return 0; } /***************************************************************** * UnpackDDElParam (USER32.562) * * RETURNS * success: nonzero * failure: zero */ UINT WINAPI UnpackDDElParam(UINT msg, UINT lParam, UINT *uiLo, UINT *uiHi) { FIXME("stub.\n"); return 0; } /***************************************************************** * FreeDDElParam (USER32.204) * * RETURNS * success: nonzero * failure: zero */ UINT WINAPI FreeDDElParam(UINT msg, UINT lParam) { FIXME("stub.\n"); return 0; } /***************************************************************** * ReuseDDElParam (USER32.446) * */ UINT WINAPI ReuseDDElParam(UINT lParam, UINT msgIn, UINT msgOut, UINT uiLi, UINT uiHi) { FIXME("stub.\n"); return 0; } /****************************************************************** * DdeQueryConvInfo16 (DDEML.9) * */ UINT16 WINAPI DdeQueryConvInfo16( HCONV hconv, DWORD idTransaction , LPCONVINFO16 lpConvInfo) { FIXME("stub.\n"); return 0; } /****************************************************************** * DdeQueryConvInfo (USER32.111) * */ UINT WINAPI DdeQueryConvInfo( HCONV hconv, DWORD idTransaction , LPCONVINFO lpConvInfo) { FIXME("stub.\n"); return 0; } wine-20000526/dlls/user/ddeml.spec0100644000175000001440000000324407107634021016322 0ustar julliardusersname ddeml type win16 2 pascal16 DdeInitialize(ptr segptr long long) DdeInitialize16 3 pascal16 DdeUninitialize(long) DdeUninitialize16 4 pascal DdeConnectList(long word word word ptr) DdeConnectList16 5 pascal DdeQueryNextServer(word word) DdeQueryNextServer16 6 pascal DdeDisconnectList(word) DdeDisconnectList16 7 pascal DdeConnect(long long long ptr) DdeConnect16 8 pascal16 DdeDisconnect(long) DdeDisconnect16 9 pascal16 DdeQueryConvInfo (word long ptr) DdeQueryConvInfo16 10 pascal DdeSetUserHandle(word long long) DdeSetUserHandle16 11 pascal DdeClientTransaction(ptr long long long s_word s_word long ptr) DdeClientTransaction16 12 pascal DdeAbandonTransaction(long word long) DdeAbandonTransaction16 13 pascal DdePostAdvise(long word word) DdePostAdvise16 14 pascal DdeCreateDataHandle(long ptr long long word word word) DdeCreateDataHandle16 15 pascal DdeAddData(word ptr long long) DdeAddData16 16 pascal DdeGetData(word ptr long long) DdeGetData16 17 pascal DdeAccessData(word ptr) DdeAccessData16 18 pascal DdeUnaccessData(word) DdeUnaccessData16 19 pascal16 DdeFreeDataHandle(long) DdeFreeDataHandle16 20 pascal16 DdeGetLastError(long) DdeGetLastError16 21 pascal DdeCreateStringHandle(long str s_word) DdeCreateStringHandle16 22 pascal16 DdeFreeStringHandle(long long) DdeFreeStringHandle16 23 pascal DdeQueryString (long word ptr long word) DdeQueryString16 24 pascal16 DdeKeepStringHandle(long long) DdeKeepStringHandle16 26 pascal DdeEnableCallback(long word word) DdeEnableCallback16 27 pascal DdeNameService(long long long s_word) DdeNameService16 36 pascal DdeCmpStringHandles(word word) DdeCmpStringHandles16 37 pascal DdeReconnect(long) DdeReconnect wine-20000526/dlls/user/keyboard.spec0100644000175000001440000000161607066760126017050 0ustar julliardusersname keyboard type win16 1 pascal16 Inquire(ptr) KEYBOARD_Inquire 2 pascal16 Enable(segptr ptr) WIN16_KEYBOARD_Enable 3 pascal16 Disable() KEYBOARD_Disable 4 pascal16 ToAscii(word word ptr ptr word) ToAscii16 5 pascal16 AnsiToOem(str ptr) AnsiToOem16 6 pascal16 OemToAnsi(str ptr) OemToAnsi16 7 pascal16 SetSpeed(word) SetSpeed16 100 pascal ScreenSwitchEnable(word) ScreenSwitchEnable16 #126 pascal GetTableSeg #127 pascal NewTable 128 pascal OemKeyScan(word) OemKeyScan 129 pascal16 VkKeyScan(word) VkKeyScan16 130 pascal16 GetKeyboardType(word) GetKeyboardType16 131 pascal16 MapVirtualKey(word word) MapVirtualKey16 132 pascal16 GetKBCodePage() GetKBCodePage16 133 pascal16 GetKeyNameText(long ptr word) GetKeyNameText16 134 pascal16 AnsiToOemBuff(ptr ptr word) AnsiToOemBuff16 135 pascal16 OemToAnsiBuff(ptr ptr word) OemToAnsiBuff16 #136 pascal EnableKbSysReq #137 pascal GetBiosKeyProc wine-20000526/dlls/user/thunk.c0100644000175000001440000000450607066760126015672 0ustar julliardusers/* * USER 16-bit thunks * * Copyright 1996, 1997 Alexandre Julliard * Copyright 1998 Ulrich Weigand */ #include "windef.h" #include "wingdi.h" #include "wine/winuser16.h" #include "callback.h" /* ### start build ### */ extern WORD CALLBACK THUNK_CallTo16_word_wl (FARPROC16,WORD,LONG); extern WORD CALLBACK THUNK_CallTo16_word_wlw (FARPROC16,WORD,LONG,WORD); /* ### stop build ### */ /******************************************************************* * EnumWindows16 (USER.54) */ BOOL16 WINAPI EnumWindows16( WNDENUMPROC16 func, LPARAM lParam ) { DECL_THUNK( thunk, func, THUNK_CallTo16_word_wl ); return EnumWindows( (WNDENUMPROC)&thunk, lParam ); } /********************************************************************** * EnumChildWindows16 (USER.55) */ BOOL16 WINAPI EnumChildWindows16( HWND16 parent, WNDENUMPROC16 func, LPARAM lParam ) { DECL_THUNK( thunk, func, THUNK_CallTo16_word_wl ); return EnumChildWindows( parent, (WNDENUMPROC)&thunk, lParam ); } /********************************************************************** * THUNK_EnumTaskWindows16 (USER.225) */ BOOL16 WINAPI THUNK_EnumTaskWindows16( HTASK16 hTask, WNDENUMPROC16 func, LPARAM lParam ) { DECL_THUNK( thunk, func, THUNK_CallTo16_word_wl ); return EnumTaskWindows16( hTask, (WNDENUMPROC16)&thunk, lParam ); } /*********************************************************************** * THUNK_EnumProps16 (USER.27) */ INT16 WINAPI THUNK_EnumProps16( HWND16 hwnd, PROPENUMPROC16 func ) { DECL_THUNK( thunk, func, THUNK_CallTo16_word_wlw ); return EnumProps16( hwnd, (PROPENUMPROC16)&thunk ); } /*********************************************************************** * THUNK_GrayString16 (USER.185) */ BOOL16 WINAPI THUNK_GrayString16( HDC16 hdc, HBRUSH16 hbr, GRAYSTRINGPROC16 func, LPARAM lParam, INT16 cch, INT16 x, INT16 y, INT16 cx, INT16 cy ) { DECL_THUNK( thunk, func, THUNK_CallTo16_word_wlw ); if (!func) return GrayString16( hdc, hbr, NULL, lParam, cch, x, y, cx, cy ); else return GrayString16( hdc, hbr, (GRAYSTRINGPROC16)&thunk, lParam, cch, x, y, cx, cy ); } wine-20000526/dlls/user/user.spec0100644000175000001440000007067207066760126016236 0ustar julliardusersname user type win16 heap 65520 file user.exe 1 pascal16 MessageBox(word str str word) MessageBox16 2 stub OldExitWindows 3 stub EnableOEMLayer 4 stub DisableOEMLayer 5 pascal16 InitApp(word) InitApp16 6 pascal16 PostQuitMessage(word) PostQuitMessage16 7 pascal16 ExitWindows(long word) ExitWindows16 10 pascal16 SetTimer(word word word segptr) SetTimer16 11 pascal16 SetSystemTimer(word word word segptr) SetSystemTimer16 # BEAR11 12 pascal16 KillTimer(word word) KillTimer16 13 pascal GetTickCount() GetTickCount 14 pascal GetTimerResolution() GetTimerResolution16 15 pascal GetCurrentTime() GetCurrentTime16 16 pascal16 ClipCursor(ptr) ClipCursor16 17 pascal16 GetCursorPos(ptr) GetCursorPos16 18 pascal16 SetCapture(word) SetCapture16 19 pascal16 ReleaseCapture() ReleaseCapture 20 pascal16 SetDoubleClickTime(word) SetDoubleClickTime16 21 pascal16 GetDoubleClickTime() GetDoubleClickTime16 22 pascal16 SetFocus(word) SetFocus16 23 pascal16 GetFocus() GetFocus16 24 pascal16 RemoveProp(word ptr) RemoveProp16 25 pascal16 GetProp(word ptr) GetProp16 26 pascal16 SetProp(word ptr word) SetProp16 27 pascal16 EnumProps(word segptr) THUNK_EnumProps16 28 pascal16 ClientToScreen(word ptr) ClientToScreen16 29 pascal16 ScreenToClient(word ptr) ScreenToClient16 30 pascal16 WindowFromPoint(long) WindowFromPoint16 31 pascal16 IsIconic(word) IsIconic16 32 pascal16 GetWindowRect(word ptr) GetWindowRect16 33 pascal16 GetClientRect(word ptr) GetClientRect16 34 pascal16 EnableWindow(word word) EnableWindow16 35 pascal16 IsWindowEnabled(word) IsWindowEnabled16 36 pascal16 GetWindowText(word segptr word) GetWindowText16 37 pascal16 SetWindowText(word segstr) SetWindowText16 38 pascal16 GetWindowTextLength(word) GetWindowTextLength16 39 pascal16 BeginPaint(word ptr) BeginPaint16 40 pascal16 EndPaint(word ptr) EndPaint16 41 pascal16 CreateWindow(str str long s_word s_word s_word s_word word word word segptr) CreateWindow16 42 pascal16 ShowWindow(word word) ShowWindow16 43 pascal16 CloseWindow(word) CloseWindow16 44 pascal16 OpenIcon(word) OpenIcon16 45 pascal16 BringWindowToTop(word) BringWindowToTop16 46 pascal16 GetParent(word) GetParent16 47 pascal16 IsWindow(word) IsWindow16 48 pascal16 IsChild(word word) IsChild16 49 pascal16 IsWindowVisible(word) IsWindowVisible16 50 pascal16 FindWindow(str str) FindWindow16 51 stub BEAR51 # IsTwoByteCharPrefix 52 pascal16 AnyPopup() AnyPopup16 53 pascal16 DestroyWindow(word) DestroyWindow16 54 pascal16 EnumWindows(segptr long) EnumWindows16 55 pascal16 EnumChildWindows(word segptr long) EnumChildWindows16 56 pascal16 MoveWindow(word word word word word word) MoveWindow16 57 pascal16 RegisterClass(ptr) RegisterClass16 58 pascal16 GetClassName(word ptr word) GetClassName16 59 pascal16 SetActiveWindow(word) SetActiveWindow16 60 pascal16 GetActiveWindow() GetActiveWindow16 61 pascal16 ScrollWindow(word s_word s_word ptr ptr) ScrollWindow16 62 pascal16 SetScrollPos(word word s_word word) SetScrollPos16 63 pascal16 GetScrollPos(word word) GetScrollPos16 64 pascal16 SetScrollRange(word word s_word s_word word) SetScrollRange16 65 pascal16 GetScrollRange(word word ptr ptr) GetScrollRange16 66 pascal16 GetDC(word) GetDC16 67 pascal16 GetWindowDC(word) GetWindowDC16 68 pascal16 ReleaseDC(word word) ReleaseDC16 69 pascal16 SetCursor(word) SetCursor16 70 pascal16 SetCursorPos(word word) SetCursorPos16 71 pascal16 ShowCursor(word) ShowCursor16 72 pascal16 SetRect(ptr s_word s_word s_word s_word) SetRect16 73 pascal16 SetRectEmpty(ptr) SetRectEmpty16 74 pascal16 CopyRect(ptr ptr) CopyRect16 75 pascal16 IsRectEmpty(ptr) IsRectEmpty16 76 pascal16 PtInRect(ptr long) PtInRect16 77 pascal16 OffsetRect(ptr s_word s_word) OffsetRect16 78 pascal16 InflateRect(ptr s_word s_word) InflateRect16 79 pascal16 IntersectRect(ptr ptr ptr) IntersectRect16 80 pascal16 UnionRect(ptr ptr ptr) UnionRect16 81 pascal16 FillRect(word ptr word) FillRect16 82 pascal16 InvertRect(word ptr) InvertRect16 83 pascal16 FrameRect(word ptr word) FrameRect16 84 pascal16 DrawIcon(word s_word s_word word) DrawIcon16 85 pascal16 DrawText(word str s_word ptr word) DrawText16 86 stub BEAR86 # IconSize 87 pascal16 DialogBox(word segstr word segptr) DialogBox16 88 pascal16 EndDialog(word s_word) EndDialog16 89 pascal16 CreateDialog(word segstr word segptr) CreateDialog16 90 pascal16 IsDialogMessage(word segptr) WIN16_IsDialogMessage16 91 pascal16 GetDlgItem(word word) GetDlgItem16 92 pascal16 SetDlgItemText(word word segstr) SetDlgItemText16 93 pascal16 GetDlgItemText(word word segptr word) GetDlgItemText16 94 pascal16 SetDlgItemInt(word word word word) SetDlgItemInt16 95 pascal16 GetDlgItemInt(word s_word ptr word) GetDlgItemInt16 96 pascal16 CheckRadioButton(word word word word) CheckRadioButton16 97 pascal16 CheckDlgButton(word word word) CheckDlgButton16 98 pascal16 IsDlgButtonChecked(word word) IsDlgButtonChecked16 99 pascal16 DlgDirSelect(word ptr word) DlgDirSelect16 100 pascal16 DlgDirList(word ptr word word word) DlgDirList16 101 pascal SendDlgItemMessage(word word word word long) SendDlgItemMessage16 102 pascal16 AdjustWindowRect(ptr long word) AdjustWindowRect16 103 pascal16 MapDialogRect(word ptr) MapDialogRect16 104 pascal16 MessageBeep(word) MessageBeep16 105 pascal16 FlashWindow(word word) FlashWindow16 106 pascal16 GetKeyState(word) GetKeyState16 107 pascal DefWindowProc(word word word long) DefWindowProc16 108 pascal16 GetMessage(segptr word word word) GetMessage16 109 pascal16 PeekMessage(ptr word word word word) PeekMessage16 110 pascal16 PostMessage(word word word long) PostMessage16 111 pascal SendMessage(word word word long) SendMessage16 112 pascal16 WaitMessage() WaitMessage 113 pascal16 TranslateMessage(ptr) TranslateMessage16 114 pascal DispatchMessage(ptr) DispatchMessage16 115 pascal16 ReplyMessage(long) ReplyMessage16 116 pascal16 PostAppMessage(word word word long) PostAppMessage16 117 pascal16 WindowFromDC(word) WindowFromDC16 118 pascal16 RegisterWindowMessage(str) RegisterWindowMessageA 119 pascal GetMessagePos() GetMessagePos 120 pascal GetMessageTime() GetMessageTime 121 pascal SetWindowsHook(s_word segptr) SetWindowsHook16 122 pascal CallWindowProc(segptr word word word long) CallWindowProc16 123 pascal16 CallMsgFilter(segptr s_word) CallMsgFilter16 124 pascal16 UpdateWindow(word) UpdateWindow16 125 pascal16 InvalidateRect(word ptr word) InvalidateRect16 126 pascal16 InvalidateRgn(word word word) InvalidateRgn16 127 pascal16 ValidateRect(word ptr) ValidateRect16 128 pascal16 ValidateRgn(word word) ValidateRgn16 129 pascal16 GetClassWord(word s_word) GetClassWord16 130 pascal16 SetClassWord(word s_word word) SetClassWord16 131 pascal GetClassLong(word s_word) GetClassLong16 132 pascal SetClassLong(word s_word long) SetClassLong16 133 pascal16 GetWindowWord(word s_word) GetWindowWord16 134 pascal16 SetWindowWord(word s_word word) SetWindowWord16 135 pascal GetWindowLong(word s_word) GetWindowLong16 136 pascal SetWindowLong(word s_word long) SetWindowLong16 137 pascal16 OpenClipboard(word) OpenClipboard16 138 pascal16 CloseClipboard() CloseClipboard16 139 pascal16 EmptyClipboard() EmptyClipboard16 140 pascal16 GetClipboardOwner() GetClipboardOwner16 141 pascal16 SetClipboardData(word word) SetClipboardData16 142 pascal16 GetClipboardData(word) GetClipboardData16 143 pascal16 CountClipboardFormats() CountClipboardFormats16 144 pascal16 EnumClipboardFormats(word) EnumClipboardFormats16 145 pascal16 RegisterClipboardFormat(ptr) RegisterClipboardFormat16 146 pascal16 GetClipboardFormatName(word ptr s_word) GetClipboardFormatName16 147 pascal16 SetClipboardViewer(word) SetClipboardViewer16 148 pascal16 GetClipboardViewer() GetClipboardViewer16 149 pascal16 ChangeClipboardChain(word word) ChangeClipboardChain16 150 pascal16 LoadMenu(word segstr) LoadMenu16 151 pascal16 CreateMenu() CreateMenu16 152 pascal16 DestroyMenu(word) DestroyMenu16 153 pascal16 ChangeMenu(word word segstr word word) ChangeMenu16 154 pascal16 CheckMenuItem(word word word) CheckMenuItem16 155 pascal16 EnableMenuItem(word word word) EnableMenuItem16 156 pascal16 GetSystemMenu(word word) GetSystemMenu16 157 pascal16 GetMenu(word) GetMenu16 158 pascal16 SetMenu(word word) SetMenu16 159 pascal16 GetSubMenu(word word) GetSubMenu16 160 pascal16 DrawMenuBar(word) DrawMenuBar16 161 pascal16 GetMenuString(word word ptr s_word word) GetMenuString16 162 pascal16 HiliteMenuItem(word word word word) HiliteMenuItem16 163 pascal16 CreateCaret(word word word word) CreateCaret16 164 pascal16 DestroyCaret() DestroyCaret16 165 pascal16 SetCaretPos(word word) SetCaretPos16 166 pascal16 HideCaret(word) HideCaret16 167 pascal16 ShowCaret(word) ShowCaret16 168 pascal16 SetCaretBlinkTime(word) SetCaretBlinkTime16 169 pascal16 GetCaretBlinkTime() GetCaretBlinkTime16 170 pascal16 ArrangeIconicWindows(word) ArrangeIconicWindows16 171 pascal16 WinHelp(word str word long) WinHelp16 172 pascal16 SwitchToThisWindow(word word) SwitchToThisWindow16 173 pascal16 LoadCursor(word segstr) LoadCursor16 174 pascal16 LoadIcon(word segstr) LoadIcon16 175 pascal16 LoadBitmap(word segstr) LoadBitmap16 176 pascal16 LoadString(word word ptr s_word) LoadString16 177 pascal16 LoadAccelerators(word segstr) LoadAccelerators16 178 pascal16 TranslateAccelerator(word word ptr) TranslateAccelerator16 179 pascal16 GetSystemMetrics(s_word) GetSystemMetrics16 180 pascal GetSysColor(word) GetSysColor16 181 pascal16 SetSysColors(word ptr ptr) SetSysColors16 182 pascal16 KillSystemTimer(word word) KillSystemTimer16 # BEAR182 183 pascal16 GetCaretPos(ptr) GetCaretPos16 184 stub QuerySendMessage 185 pascal16 GrayString(word word segptr segptr s_word s_word s_word s_word s_word) THUNK_GrayString16 186 pascal16 SwapMouseButton(word) SwapMouseButton16 187 pascal16 EndMenu() EndMenu 188 pascal16 SetSysModalWindow(word) SetSysModalWindow16 189 pascal16 GetSysModalWindow() GetSysModalWindow16 190 pascal16 GetUpdateRect(word ptr word) GetUpdateRect16 191 pascal16 ChildWindowFromPoint(word long) ChildWindowFromPoint16 192 pascal16 InSendMessage() InSendMessage16 193 pascal16 IsClipboardFormatAvailable(word) IsClipboardFormatAvailable16 194 pascal16 DlgDirSelectComboBox(word ptr word) DlgDirSelectComboBox16 195 pascal16 DlgDirListComboBox(word ptr word word word) DlgDirListComboBox16 196 pascal TabbedTextOut(word s_word s_word ptr s_word s_word ptr s_word) TabbedTextOut16 197 pascal GetTabbedTextExtent(word ptr word word ptr) GetTabbedTextExtent16 198 pascal16 CascadeChildWindows(word word) CascadeChildWindows16 199 pascal16 TileChildWindows(word word) TileChildWindows16 200 pascal16 OpenComm(str word word) OpenComm16 201 pascal16 SetCommState(ptr) SetCommState16 202 pascal16 GetCommState(word ptr) GetCommState16 203 pascal16 GetCommError(word ptr) GetCommError16 204 pascal16 ReadComm(word ptr word) ReadComm16 205 pascal16 WriteComm(word ptr word) WriteComm16 206 pascal16 TransmitCommChar(word word) TransmitCommChar16 207 pascal16 CloseComm(word) CloseComm16 208 pascal SetCommEventMask(word word) SetCommEventMask16 209 pascal16 GetCommEventMask(word word) GetCommEventMask16 210 pascal16 SetCommBreak(word) SetCommBreak16 211 pascal16 ClearCommBreak(word) ClearCommBreak16 212 pascal16 UngetCommChar(word word) UngetCommChar16 213 pascal16 BuildCommDCB(ptr ptr) BuildCommDCB16 214 pascal EscapeCommFunction(word word) EscapeCommFunction16 215 pascal16 FlushComm(word word) FlushComm16 216 pascal UserSeeUserDo(word word word word) UserSeeUserDo16 217 pascal16 LookupMenuHandle(word s_word) LookupMenuHandle16 218 pascal16 DialogBoxIndirect(word word word segptr) DialogBoxIndirect16 219 pascal16 CreateDialogIndirect(word ptr word segptr) CreateDialogIndirect16 220 pascal16 LoadMenuIndirect(ptr) LoadMenuIndirect16 221 pascal16 ScrollDC(word s_word s_word ptr ptr word ptr) ScrollDC16 222 pascal16 GetKeyboardState(ptr) GetKeyboardState 223 pascal16 SetKeyboardState(ptr) SetKeyboardState 224 pascal16 GetWindowTask(word) GetWindowTask16 225 pascal16 EnumTaskWindows(word segptr long) THUNK_EnumTaskWindows16 226 stub LockInput 227 pascal16 GetNextDlgGroupItem(word word word) GetNextDlgGroupItem16 228 pascal16 GetNextDlgTabItem(word word word) GetNextDlgTabItem16 229 pascal16 GetTopWindow(word) GetTopWindow16 230 pascal16 GetNextWindow(word word) GetNextWindow16 231 pascal16 GetSystemDebugState() GetSystemDebugState16 232 pascal16 SetWindowPos(word word word word word word word) SetWindowPos16 233 pascal16 SetParent(word word) SetParent16 234 pascal16 UnhookWindowsHook(s_word segptr) UnhookWindowsHook16 235 pascal DefHookProc(s_word word long ptr) DefHookProc16 236 pascal16 GetCapture() GetCapture16 237 pascal16 GetUpdateRgn(word word word) GetUpdateRgn16 238 pascal16 ExcludeUpdateRgn(word word) ExcludeUpdateRgn16 239 pascal16 DialogBoxParam(word segstr word segptr long) DialogBoxParam16 240 pascal16 DialogBoxIndirectParam(word word word segptr long) DialogBoxIndirectParam16 241 pascal16 CreateDialogParam(word segstr word segptr long) CreateDialogParam16 242 pascal16 CreateDialogIndirectParam(word ptr word segptr long) CreateDialogIndirectParam16 243 pascal GetDialogBaseUnits() GetDialogBaseUnits 244 pascal16 EqualRect(ptr ptr) EqualRect16 245 pascal16 EnableCommNotification(s_word word s_word s_word) EnableCommNotification16 246 pascal16 ExitWindowsExec(str str) ExitWindowsExec16 247 pascal16 GetCursor() GetCursor16 248 pascal16 GetOpenClipboardWindow() GetOpenClipboardWindow16 249 pascal16 GetAsyncKeyState(word) GetAsyncKeyState16 250 pascal16 GetMenuState(word word word) GetMenuState16 251 pascal SendDriverMessage(word word long long) SendDriverMessage16 252 pascal16 OpenDriver(str str long) OpenDriver16 253 pascal CloseDriver(word long long) CloseDriver16 254 pascal16 GetDriverModuleHandle(word) GetDriverModuleHandle16 255 pascal DefDriverProc(long word word long long) DefDriverProc16 256 pascal16 GetDriverInfo(word ptr) GetDriverInfo16 257 pascal16 GetNextDriver(word long) GetNextDriver16 258 pascal16 MapWindowPoints(word word ptr word) MapWindowPoints16 259 pascal16 BeginDeferWindowPos(s_word) BeginDeferWindowPos16 260 pascal16 DeferWindowPos(word word word s_word s_word s_word s_word word) DeferWindowPos16 261 pascal16 EndDeferWindowPos(word) EndDeferWindowPos16 262 pascal16 GetWindow(word word) GetWindow16 263 pascal16 GetMenuItemCount(word) GetMenuItemCount16 264 pascal16 GetMenuItemID(word word) GetMenuItemID16 265 pascal16 ShowOwnedPopups(word word) ShowOwnedPopups16 266 pascal16 SetMessageQueue(word) SetMessageQueue16 267 pascal16 ShowScrollBar(word word word) ShowScrollBar16 268 pascal16 GlobalAddAtom(str) GlobalAddAtomA 269 pascal16 GlobalDeleteAtom(word) GlobalDeleteAtom 270 pascal16 GlobalFindAtom(str) GlobalFindAtomA 271 pascal16 GlobalGetAtomName(word ptr s_word) GlobalGetAtomNameA 272 pascal16 IsZoomed(word) IsZoomed16 273 stub ControlPanelInfo 274 stub GetNextQueueWindow 275 stub RepaintScreen 276 stub LockMyTask 277 pascal16 GetDlgCtrlID(word) GetDlgCtrlID16 278 pascal16 GetDesktopHwnd() GetDesktopHwnd16 279 pascal16 OldSetDeskPattern() SetDeskPattern 280 pascal16 SetSystemMenu(word word) SetSystemMenu16 281 pascal16 GetSysColorBrush(word) GetSysColorBrush16 282 pascal16 SelectPalette(word word word) SelectPalette16 283 pascal16 RealizePalette(word) RealizePalette16 284 pascal16 GetFreeSystemResources(word) GetFreeSystemResources16 285 pascal16 SetDeskWallPaper(ptr) SetDeskWallPaper16 # BEAR285 286 pascal16 GetDesktopWindow() GetDesktopWindow16 287 pascal16 GetLastActivePopup(word) GetLastActivePopup16 288 pascal GetMessageExtraInfo() GetMessageExtraInfo 289 register keybd_event() WIN16_keybd_event 290 pascal16 RedrawWindow(word ptr word word) RedrawWindow16 291 pascal SetWindowsHookEx(s_word segptr word word) SetWindowsHookEx16 292 pascal16 UnhookWindowsHookEx(segptr) UnhookWindowsHookEx16 293 pascal CallNextHookEx(segptr s_word word long) CallNextHookEx16 294 pascal16 LockWindowUpdate(word) LockWindowUpdate16 299 register mouse_event() WIN16_mouse_event 300 stub UnloadInstalledDrivers #301 BOZOSLIVEHERE :-)) <- this is actually EditWndProc 302 stub STATICWNDPROC 303 stub BUTTONWNDPROC 304 stub SBWNDPROC 305 stub DESKTOPWNDPROC #306 BEAR306 307 stub LBOXCTLWNDPROC 308 pascal DefDlgProc(word word word long) DefDlgProc16 309 pascal16 GetClipCursor(ptr) GetClipCursor16 #310 ContScroll #312 SendMessage2 #313 PostMessage2 314 pascal16 SignalProc(word word word word word) USER_SignalProc #315 XCStoDS #316 CompUpdateRect #317 CompUpdateRgn #318 GetWC2 319 pascal16 ScrollWindowEx(word s_word s_word ptr ptr word ptr word) ScrollWindowEx16 320 stub SysErrorBox 321 pascal SetEventHook(segptr) SetEventHook16 322 stub WinOldAppHackOMatic 323 stub GetMessage2 324 pascal16 FillWindow(word word word word) FillWindow16 325 pascal16 PaintRect(word word word word ptr) PaintRect16 326 pascal16 GetControlBrush(word word word) GetControlBrush16 #327 KillTimer2 #328 SetTimer2 #330 SetGetKbdState 331 pascal16 EnableHardwareInput(word) EnableHardwareInput16 332 pascal16 UserYield() UserYield16 333 pascal16 IsUserIdle() IsUserIdle16 334 pascal GetQueueStatus(word) GetQueueStatus16 335 pascal16 GetInputState() GetInputState16 336 pascal16 LoadCursorIconHandler(word word word) LoadCursorIconHandler16 337 pascal GetMouseEventProc() GetMouseEventProc16 #340 WinFarFrame #341 _FFFE_FARFRAME 343 stub GetFilePortName 344 stub COMBOBOXCTLWNDPROC 345 stub BEAR345 #354 TabTheTextOutForWimps #355 BroadcastMessage 356 pascal16 LoadDIBCursorHandler(word word word) LoadDIBCursorHandler16 357 pascal16 LoadDIBIconHandler(word word word) LoadDIBIconHandler16 358 pascal16 IsMenu(word) IsMenu16 359 pascal16 GetDCEx(word word long) GetDCEx16 362 pascal16 DCHook(word word long long) DCHook16 364 pascal16 LookupIconIdFromDirectoryEx(ptr word word word word) LookupIconIdFromDirectoryEx16 368 pascal16 CopyIcon(word word) CopyIcon16 369 pascal16 CopyCursor(word word) CopyCursor16 370 pascal16 GetWindowPlacement(word ptr) GetWindowPlacement16 371 pascal16 SetWindowPlacement(word ptr) SetWindowPlacement16 372 stub GetInternalIconHeader 373 pascal16 SubtractRect(ptr ptr ptr) SubtractRect16 374 pascal DllEntryPoint(long word word word long word) USER_DllEntryPoint 375 stub DrawTextEx 376 stub SetMessageExtraInfo 378 stub SetPropEx 379 stub GetPropEx 380 stub RemovePropEx 381 stub UsrMPR_ThunkData16 382 stub SetWindowContextHelpID 383 stub GetWindowContextHelpID 384 pascal16 SetMenuContextHelpId(word word) SetMenuContextHelpId16 385 pascal16 GetMenuContextHelpId(word) GetMenuContextHelpId16 389 pascal LoadImage(word segstr word word word word) LoadImage16 390 pascal16 CopyImage(word word word word word) CopyImage16 391 pascal16 SignalProc32(long long long word) UserSignalProc 394 pascal16 DrawIconEx(word word word word word word word word word) DrawIconEx16 395 pascal16 GetIconInfo(word ptr) GetIconInfo16 397 pascal16 RegisterClassEx(ptr) RegisterClassEx16 398 pascal16 GetClassInfoEx(word str ptr) GetClassInfoEx16 399 pascal16 ChildWindowFromPointEx(word long word) ChildWindowFromPointEx16 400 pascal16 FinalUserInit() FinalUserInit16 402 pascal16 GetPriorityClipboardFormat(ptr s_word) GetPriorityClipboardFormat16 403 pascal16 UnregisterClass(str word) UnregisterClass16 404 pascal16 GetClassInfo(word str ptr) GetClassInfo16 406 pascal16 CreateCursor(word word word word word ptr ptr) CreateCursor16 407 pascal16 CreateIcon(word word word word word ptr ptr) CreateIcon16 408 pascal16 CreateCursorIconIndirect(word ptr ptr ptr) CreateCursorIconIndirect16 409 pascal16 InitThreadInput(word word) InitThreadInput16 410 pascal16 InsertMenu(word word word word segptr) InsertMenu16 411 pascal16 AppendMenu(word word word segptr) AppendMenu16 412 pascal16 RemoveMenu(word word word) RemoveMenu16 413 pascal16 DeleteMenu(word word word) DeleteMenu16 414 pascal16 ModifyMenu(word word word word segptr) ModifyMenu16 415 pascal16 CreatePopupMenu() CreatePopupMenu16 416 pascal16 TrackPopupMenu(word word s_word s_word s_word word ptr) TrackPopupMenu16 417 pascal GetMenuCheckMarkDimensions() GetMenuCheckMarkDimensions 418 pascal16 SetMenuItemBitmaps(word word word word word) SetMenuItemBitmaps16 420 pascal16 _wsprintf() WIN16_wsprintf16 421 pascal16 wvsprintf(ptr str ptr) wvsprintf16 422 pascal16 DlgDirSelectEx(word ptr word word) DlgDirSelectEx16 423 pascal16 DlgDirSelectComboBoxEx(word ptr word word) DlgDirSelectComboBoxEx16 427 pascal16 FindWindowEx(word word str str) FindWindowEx16 428 stub TileWindows 429 stub CascadeWindows 430 pascal16 lstrcmp(str str) lstrcmp16 431 pascal AnsiUpper(segstr) AnsiUpper16 432 pascal AnsiLower(segstr) AnsiLower16 433 pascal16 IsCharAlpha(word) IsCharAlpha16 434 pascal16 IsCharAlphaNumeric(word) IsCharAlphaNumeric16 435 pascal16 IsCharUpper(word) IsCharUpper16 436 pascal16 IsCharLower(word) IsCharLower16 437 pascal16 AnsiUpperBuff(str word) AnsiUpperBuff16 438 pascal16 AnsiLowerBuff(str word) AnsiLowerBuff16 441 pascal16 InsertMenuItem(word word word ptr) InsertMenuItem16 443 stub GetMenuItemInfo 445 pascal DefFrameProc(word word word word long) DefFrameProc16 446 stub SetMenuItemInfo 447 pascal DefMDIChildProc(word word word long) DefMDIChildProc16 448 pascal16 DrawAnimatedRects(word word ptr ptr) DrawAnimatedRects16 449 stub DrawState 450 pascal16 CreateIconFromResourceEx(ptr long word long word word word) CreateIconFromResourceEx16 451 pascal16 TranslateMDISysAccel(word ptr) TranslateMDISysAccel16 452 pascal16 CreateWindowEx(long str str long s_word s_word s_word s_word word word word segptr) CreateWindowEx16 454 pascal16 AdjustWindowRectEx(ptr long word long) AdjustWindowRectEx16 455 pascal16 GetIconID(word long) GetIconID16 456 pascal16 LoadIconHandler(word word) LoadIconHandler16 457 pascal16 DestroyIcon(word) DestroyIcon16 458 pascal16 DestroyCursor(word) DestroyCursor16 459 pascal DumpIcon(segptr ptr ptr ptr) DumpIcon16 460 pascal16 GetInternalWindowPos(word ptr ptr) GetInternalWindowPos16 461 pascal16 SetInternalWindowPos(word word ptr ptr) SetInternalWindowPos16 462 pascal16 CalcChildScroll(word word) CalcChildScroll16 463 pascal16 ScrollChildren(word word word long) ScrollChildren16 464 pascal DragObject(word word word word word word) DragObject16 465 pascal16 DragDetect(word long) DragDetect16 466 pascal16 DrawFocusRect(word ptr) DrawFocusRect16 470 stub StringFunc 471 pascal16 lstrcmpi(str str) lstrcmpi16 472 pascal AnsiNext(segptr) AnsiNext16 473 pascal AnsiPrev(segptr segptr) AnsiPrev16 475 pascal16 SetScrollInfo(word s_word ptr word) SetScrollInfo16 476 pascal16 GetScrollInfo(word s_word ptr) GetScrollInfo16 477 pascal16 GetKeyboardLayoutName(ptr) GetKeyboardLayoutName16 478 stub LoadKeyboardLayout 479 stub MenuItemFromPoint 480 stub GetUserLocalObjType #481 HARDWARE_EVENT 482 pascal16 EnableScrollBar(word word word) EnableScrollBar16 483 pascal16 SystemParametersInfo(word word ptr word) SystemParametersInfo16 #484 __GP # Stubs for Hebrew version 489 pascal16 USER_489() stub_USER_489 490 pascal16 USER_490() stub_USER_490 492 pascal16 USER_492() stub_USER_492 496 pascal16 USER_496() stub_USER_496 498 stub BEAR498 499 pascal16 WNetErrorText(word ptr word) WNetErrorText16 500 stub FARCALLNETDRIVER # Undocumented Windows 501 pascal16 WNetOpenJob(ptr ptr word ptr) WNetOpenJob16 502 pascal16 WNetCloseJob(word ptr ptr) WNetCloseJob16 503 pascal16 WNetAbortJob(ptr word) WNetAbortJob16 504 pascal16 WNetHoldJob(ptr word) WNetHoldJob16 505 pascal16 WNetReleaseJob(ptr word) WNetReleaseJob16 506 pascal16 WNetCancelJob(ptr word) WNetCancelJob16 507 pascal16 WNetSetJobCopies(ptr word word) WNetSetJobCopies16 508 pascal16 WNetWatchQueue(word ptr ptr word) WNetWatchQueue16 509 pascal16 WNetUnwatchQueue(str) WNetUnwatchQueue16 510 pascal16 WNetLockQueueData(ptr ptr ptr) WNetLockQueueData16 511 pascal16 WNetUnlockQueueData(ptr) WNetUnlockQueueData16 512 pascal16 WNetGetConnection(ptr ptr ptr) WNetGetConnection16 513 pascal16 WNetGetCaps(word) WNetGetCaps16 514 pascal16 WNetDeviceMode(word) WNetDeviceMode16 515 pascal16 WNetBrowseDialog(word word ptr) WNetBrowseDialog16 516 pascal16 WNetGetUser(ptr ptr ptr) WNetGetUser16 517 pascal16 WNetAddConnection(str str str) WNetAddConnection16 518 pascal16 WNetCancelConnection(str word) WNetCancelConnection16 519 pascal16 WNetGetError(ptr) WNetGetError16 520 pascal16 WNetGetErrorText(word ptr ptr) WNetGetErrorText16 521 stub WNetEnable 522 stub WNetDisable 523 pascal16 WNetRestoreConnection(word ptr) WNetRestoreConnection16 524 pascal16 WNetWriteJob(word ptr ptr) WNetWriteJob16 525 pascal16 WnetConnectDialog(word word) WNetConnectDialog 526 pascal16 WNetDisconnectDialog(word word) WNetDisconnectDialog16 527 pascal16 WNetConnectionDialog(word word) WNetConnectionDialog16 528 pascal16 WNetViewQueueDialog(word ptr) WNetViewQueueDialog16 529 pascal16 WNetPropertyDialog(word word word str word) WNetPropertyDialog16 530 pascal16 WNetGetDirectoryType(ptr ptr) WNetGetDirectoryType16 531 pascal16 WNetDirectoryNotify(word ptr word) WNetDirectoryNotify16 532 pascal16 WNetGetPropertyText(word word str str word word) WNetGetPropertyText16 533 stub WNetInitialize #533 stub NOTIFYWOW # ordinal conflict with WNetInitialize !! 534 stub WNetLogon #534 stub DEFDLGPROCTHUNK # ordinal conflict with WNetLogon !! 535 stub WOWWORDBREAKPROC 537 stub MOUSEEVENT 538 stub KEYBDEVENT 595 stub OLDEXITWINDOWS 600 pascal16 GetShellWindow() GetShellWindow16 601 stub DoHotkeyStuff 602 stub SetCheckCursorTimer 604 stub BroadcastSystemMessage 605 stub HackTaskMonitor 606 pascal16 FormatMessage(long segptr word word ptr word ptr) FormatMessage16 608 pascal16 GetForegroundWindow() GetForegroundWindow16 609 pascal16 SetForegroundWindow(word) SetForegroundWindow16 610 pascal16 DestroyIcon32(word word) CURSORICON_Destroy 620 stub ChangeDisplaySettings 621 stub EnumDisplaySettings 640 stub MsgWaitForMultipleObjects 650 stub ActivateKeyboardLayout 651 stub GetKeyboardLayout 652 stub GetKeyboardLayoutList 654 stub UnloadKeyboardLayout 655 stub PostPostedMessages 656 pascal16 DrawFrameControl(word ptr word word) DrawFrameControl16 657 pascal16 DrawCaptionTemp(word word ptr word word ptr word) DrawCaptionTemp16 658 stub DispatchInput 659 pascal16 DrawEdge(word ptr word word) DrawEdge16 660 pascal16 DrawCaption(word word ptr word) DrawCaption16 661 stub SetSysColorsTemp 662 stub DrawMenubarTemp 663 stub GetMenuDefaultItem 664 stub SetMenuDefaultItem 665 pascal16 GetMenuItemRect(word word word ptr) GetMenuItemRect16 666 stub CheckMenuRadioItem 667 stub TrackPopupMenuEx 668 pascal16 SetWindowRgn(word word word) SetWindowRgn16 669 stub GetWindowRgn 800 stub CHOOSEFONT_CALLBACK16 801 stub FINDREPLACE_CALLBACK16 802 stub OPENFILENAME_CALLBACK16 803 stub PRINTDLG_CALLBACK16 804 stub CHOOSECOLOR_CALLBACK16 819 pascal16 PeekMessage32(ptr word word word word word) PeekMessage32_16 820 pascal GetMessage32(segptr word word word word) GetMessage32_16 821 pascal16 TranslateMessage32(ptr word) TranslateMessage32_16 #821 stub IsDialogMessage32 # FIXME: two ordinal 821??? 822 pascal DispatchMessage32(ptr word) DispatchMessage32_16 823 pascal16 CallMsgFilter32(segptr word word) CallMsgFilter32_16 825 stub PostMessage32 826 stub PostThreadMessage32 827 pascal16 MessageBoxIndirect(ptr) MessageBoxIndirect16 851 stub MsgThkConnectionDataLS 853 stub FT_USRFTHKTHKCONNECTIONDATA 854 stub FT__USRF2THKTHKCONNECTIONDATA 855 stub Usr32ThkConnectionDataSL 890 stub InstallIMT 891 stub UninstallIMT # API for Hebrew version 902 pascal16 LoadSystemLanguageString(word word ptr word word) LoadSystemLanguageString16 905 pascal16 ChangeDialogTemplate() ChangeDialogTemplate16 906 pascal16 GetNumLanguages() GetNumLanguages16 907 pascal16 GetLanguageName(word word ptr word) GetLanguageName16 909 pascal16 SetWindowTextEx(word str word) SetWindowTextEx16 910 pascal16 BiDiMessageBoxEx() BiDiMessageBoxEx16 911 pascal16 SetDlgItemTextEx(word word str word) SetDlgItemTextEx16 912 pascal ChangeKeyboardLanguage(word word) ChangeKeyboardLanguage16 913 pascal16 GetCodePageSystemFont(word word) GetCodePageSystemFont16 914 pascal16 QueryCodePage(word word word long) QueryCodePage16 915 pascal GetAppCodePage(word) GetAppCodePage16 916 pascal16 CreateDialogIndirectParamML(word ptr word ptr long word word str word) CreateDialogIndirectParamML16 918 pascal16 DialogBoxIndirectParamML(word word word ptr long word word str word) DialogBoxIndirectParamML16 919 pascal16 LoadLanguageString(word word word ptr word) LoadLanguageString16 920 pascal SetAppCodePage(word word word word) SetAppCodePage16 922 pascal GetBaseCodePage() GetBaseCodePage16 923 pascal16 FindLanguageResource(word str str word) FindLanguageResource16 924 pascal ChangeKeyboardCodePage(word word) ChangeKeyboardCodePage16 930 pascal16 MessageBoxEx(word str str word word) MessageBoxEx16 1000 pascal16 SetProcessDefaultLayout(long) SetProcessDefaultLayout16 1001 pascal16 GetProcessDefaultLayout(ptr) GetProcessDefaultLayout16 wine-20000526/dlls/user/user32.spec0100644000175000001440000010330207070204206016351 0ustar julliardusersname user32 type win32 init USER_Init rsrc user32 1 stdcall ActivateKeyboardLayout(long long) ActivateKeyboardLayout 2 stdcall AdjustWindowRect(ptr long long) AdjustWindowRect 3 stdcall AdjustWindowRectEx(ptr long long long) AdjustWindowRectEx 4 stdcall AnyPopup() AnyPopup 5 stdcall AppendMenuA(long long long ptr) AppendMenuA 6 stdcall AppendMenuW(long long long ptr) AppendMenuW 7 stdcall ArrangeIconicWindows(long) ArrangeIconicWindows 8 stdcall AttachThreadInput(long long long) AttachThreadInput 9 stdcall BeginDeferWindowPos(long) BeginDeferWindowPos 10 stdcall BeginPaint(long ptr) BeginPaint 11 stdcall BringWindowToTop(long) BringWindowToTop 12 stdcall BroadcastSystemMessage(long ptr long long long) BroadcastSystemMessage 13 stub CalcChildScroll 14 stub CallMsgFilter 15 stdcall CallMsgFilterA(ptr long) CallMsgFilterA 16 stdcall CallMsgFilterW(ptr long) CallMsgFilterW 17 stdcall CallNextHookEx(long long long long) CallNextHookEx 18 stdcall CallWindowProcA(ptr long long long long) CallWindowProcA 19 stdcall CallWindowProcW(ptr long long long long) CallWindowProcW 20 stub CascadeChildWindows 21 stdcall CascadeWindows(long long ptr long ptr) CascadeWindows 22 stdcall ChangeClipboardChain(long long) ChangeClipboardChain 23 stdcall ChangeMenuA(long long ptr long long) ChangeMenuA 24 stdcall ChangeMenuW(long long ptr long long) ChangeMenuW 25 stdcall CharLowerA(str) CharLowerA 26 stdcall CharLowerBuffA(str long) CharLowerBuffA 27 stdcall CharLowerBuffW(wstr long) CharLowerBuffW 28 stdcall CharLowerW(wstr) CharLowerW 29 stdcall CharNextA(str) CharNextA 30 stdcall CharNextExA(long str long) CharNextExA 31 stdcall CharNextExW(long wstr long) CharNextExW 32 stdcall CharNextW(wstr) CharNextW 33 stdcall CharPrevA(str str) CharPrevA 34 stdcall CharPrevExA(long str str long) CharPrevExA 35 stdcall CharPrevExW(long wstr wstr long) CharPrevExW 36 stdcall CharPrevW(wstr wstr) CharPrevW 37 stdcall CharToOemA(str ptr) CharToOemA 38 stdcall CharToOemBuffA(str ptr long) CharToOemBuffA 39 stdcall CharToOemBuffW(wstr ptr long) CharToOemBuffW 40 stdcall CharToOemW(wstr ptr) CharToOemW 41 stdcall CharUpperA(str) CharUpperA 42 stdcall CharUpperBuffA(str long) CharUpperBuffA 43 stdcall CharUpperBuffW(wstr long) CharUpperBuffW 44 stdcall CharUpperW(wstr) CharUpperW 45 stdcall CheckDlgButton(long long long) CheckDlgButton 46 stdcall CheckMenuItem(long long long) CheckMenuItem 47 stdcall CheckMenuRadioItem(long long long long long) CheckMenuRadioItem 48 stdcall CheckRadioButton(long long long long) CheckRadioButton 49 stdcall ChildWindowFromPoint(long long long) ChildWindowFromPoint 50 stdcall ChildWindowFromPointEx(long long long long) ChildWindowFromPointEx 51 stub ClientThreadConnect 52 stdcall ClientToScreen(long ptr) ClientToScreen 53 stdcall ClipCursor(ptr) ClipCursor 54 stdcall CloseClipboard() CloseClipboard 55 stdcall CloseDesktop(long) CloseDesktop 56 stdcall CloseWindow(long) CloseWindow 57 stdcall CloseWindowStation(long) CloseWindowStation 58 stdcall CopyAcceleratorTableA(long ptr long) CopyAcceleratorTableA 59 stdcall CopyAcceleratorTableW(long ptr long) CopyAcceleratorTableW 60 stdcall CopyIcon(long) CopyIcon 61 stdcall CopyImage(long long long long long) CopyImage 62 stdcall CopyRect(ptr ptr) CopyRect 63 stdcall CountClipboardFormats() CountClipboardFormats 64 stdcall CreateAcceleratorTableA(ptr long) CreateAcceleratorTableA 65 stdcall CreateAcceleratorTableW(ptr long) CreateAcceleratorTableW 66 stdcall CreateCaret(long long long long) CreateCaret 67 stdcall CreateCursor(long long long long long ptr ptr) CreateCursor 68 stub CreateDesktopA 69 stdcall CreateDesktopW(wstr wstr ptr long long ptr) CreateDesktopW 70 stdcall CreateDialogIndirectParamA(long ptr long ptr long) CreateDialogIndirectParamA 71 stdcall CreateDialogIndirectParamAorW (long ptr long ptr long) CreateDialogIndirectParamAorW 72 stdcall CreateDialogIndirectParamW(long ptr long ptr long) CreateDialogIndirectParamW 73 stdcall CreateDialogParamA(long ptr long ptr long) CreateDialogParamA 74 stdcall CreateDialogParamW(long ptr long ptr long) CreateDialogParamW 75 stdcall CreateIcon(long long long long long ptr ptr) CreateIcon 76 stdcall CreateIconFromResource (ptr long long long) CreateIconFromResource 77 stdcall CreateIconFromResourceEx(ptr long long long long long long) CreateIconFromResourceEx 78 stdcall CreateIconIndirect(ptr) CreateIconIndirect 79 stdcall CreateMDIWindowA(ptr ptr long long long long long long long long) CreateMDIWindowA 80 stdcall CreateMDIWindowW(ptr ptr long long long long long long long long) CreateMDIWindowW 81 stdcall CreateMenu() CreateMenu 82 stdcall CreatePopupMenu() CreatePopupMenu 83 stdcall CreateWindowExA(long str str long long long long long long long long ptr) CreateWindowExA 84 stdcall CreateWindowExW(long wstr wstr long long long long long long long long ptr) CreateWindowExW 85 stub CreateWindowStationA 86 stdcall CreateWindowStationW(wstr long long ptr) CreateWindowStationW 87 stdcall DdeAbandonTransaction(long long long)DdeAbandonTransaction 88 stdcall DdeAccessData(long ptr) DdeAccessData 89 stdcall DdeAddData(long ptr long long) DdeAddData 90 stdcall DdeClientTransaction(ptr long long long long long long ptr) DdeClientTransaction 91 stdcall DdeCmpStringHandles(long long) DdeCmpStringHandles 92 stdcall DdeConnect(long long long ptr) DdeConnect 93 stdcall DdeConnectList(long long long long ptr) DdeConnectList 94 stdcall DdeCreateDataHandle(long ptr long long long long long) DdeCreateDataHandle 95 stdcall DdeCreateStringHandleA(long str long) DdeCreateStringHandleA 96 stdcall DdeCreateStringHandleW(long wstr long) DdeCreateStringHandleW 97 stdcall DdeDisconnect(long) DdeDisconnect 98 stdcall DdeDisconnectList(long) DdeDisconnectList 99 stdcall DdeEnableCallback(long long long) DdeEnableCallback 100 stdcall DdeFreeDataHandle(long) DdeFreeDataHandle 101 stdcall DdeFreeStringHandle(long long) DdeFreeStringHandle 102 stdcall DdeGetData(long ptr long long) DdeGetData 103 stdcall DdeGetLastError(long) DdeGetLastError 104 stub DdeGetQualityOfService 105 stdcall DdeImpersonateClient(long) DdeImpersonateClient 106 stdcall DdeInitializeA(ptr ptr long long) DdeInitializeA 107 stdcall DdeInitializeW(ptr ptr long long) DdeInitializeW 108 stdcall DdeKeepStringHandle(long long) DdeKeepStringHandle 109 stdcall DdeNameService(long long long long) DdeNameService 110 stdcall DdePostAdvise(long long long) DdePostAdvise 111 stdcall DdeQueryConvInfo(long long ptr) DdeQueryConvInfo 112 stdcall DdeQueryNextServer(long long) DdeQueryNextServer 113 stdcall DdeQueryStringA(long long ptr long long) DdeQueryStringA 114 stdcall DdeQueryStringW(long long ptr long long) DdeQueryStringW 115 stdcall DdeReconnect(long) DdeReconnect 116 stdcall DdeSetQualityOfService(long ptr ptr) DdeSetQualityOfService 117 stdcall DdeSetUserHandle (long long long) DdeSetUserHandle 118 stdcall DdeUnaccessData(long) DdeUnaccessData 119 stdcall DdeUninitialize(long) DdeUninitialize 120 stdcall DefDlgProcA(long long long long) DefDlgProcA 121 stdcall DefDlgProcW(long long long long) DefDlgProcW 122 stdcall DefFrameProcA(long long long long long) DefFrameProcA 123 stdcall DefFrameProcW(long long long long long) DefFrameProcW 124 stdcall DefMDIChildProcA(long long long long) DefMDIChildProcA 125 stdcall DefMDIChildProcW(long long long long) DefMDIChildProcW 126 stdcall DefWindowProcA(long long long long) DefWindowProcA 127 stdcall DefWindowProcW(long long long long) DefWindowProcW 128 stdcall DeferWindowPos(long long long long long long long long) DeferWindowPos 129 stdcall DeleteMenu(long long long) DeleteMenu 130 stdcall DestroyAcceleratorTable(long) DestroyAcceleratorTable 131 stdcall DestroyCaret() DestroyCaret 132 stdcall DestroyCursor(long) DestroyCursor 133 stdcall DestroyIcon(long) DestroyIcon 134 stdcall DestroyMenu(long) DestroyMenu 135 stdcall DestroyWindow(long) DestroyWindow 136 stdcall DialogBoxIndirectParamA(long ptr long ptr long) DialogBoxIndirectParamA 137 stdcall DialogBoxIndirectParamAorW(long ptr long ptr long long) DialogBoxIndirectParamAorW 138 stdcall DialogBoxIndirectParamW(long ptr long ptr long) DialogBoxIndirectParamW 139 stdcall DialogBoxParamA(long str long ptr long) DialogBoxParamA 140 stdcall DialogBoxParamW(long wstr long ptr long) DialogBoxParamW 141 stdcall DispatchMessageA(ptr) DispatchMessageA 142 stdcall DispatchMessageW(ptr) DispatchMessageW 143 stdcall DlgDirListA(long ptr long long long) DlgDirListA 144 stdcall DlgDirListComboBoxA(long ptr long long long) DlgDirListComboBoxA 145 stdcall DlgDirListComboBoxW(long ptr long long long) DlgDirListComboBoxW 146 stdcall DlgDirListW(long ptr long long long) DlgDirListW 147 stdcall DlgDirSelectComboBoxExA(long ptr long long) DlgDirSelectComboBoxExA 148 stdcall DlgDirSelectComboBoxExW(long ptr long long) DlgDirSelectComboBoxExW 149 stdcall DlgDirSelectExA(long ptr long long) DlgDirSelectExA 150 stdcall DlgDirSelectExW(long ptr long long) DlgDirSelectExW 151 stdcall DragDetect(long long long) DragDetect 152 stub DragObject 153 stdcall DrawAnimatedRects(long long ptr ptr) DrawAnimatedRects 154 stdcall DrawCaption(long long ptr long) DrawCaption 155 stdcall DrawEdge(long ptr long long) DrawEdge 156 stdcall DrawFocusRect(long ptr) DrawFocusRect 157 stub DrawFrame 158 stdcall DrawFrameControl(long ptr long long) DrawFrameControl 159 stdcall DrawIcon(long long long long) DrawIcon 160 stdcall DrawIconEx(long long long long long long long long long) DrawIconEx 161 stdcall DrawMenuBar(long) DrawMenuBar 162 stdcall DrawStateA(long long ptr long long long long long long long) DrawStateA 163 stdcall DrawStateW(long long ptr long long long long long long long) DrawStateW 164 stdcall DrawTextA(long str long ptr long) DrawTextA 165 stdcall DrawTextExA(long str long ptr long ptr) DrawTextExA 166 stdcall DrawTextExW(long wstr long ptr long ptr) DrawTextExW 167 stdcall DrawTextW(long wstr long ptr long) DrawTextW 168 stdcall EditWndProc(long long long long) EditWndProc 169 stdcall EmptyClipboard() EmptyClipboard 170 stdcall EnableMenuItem(long long long) EnableMenuItem 171 stdcall EnableScrollBar(long long long) EnableScrollBar 172 stdcall EnableWindow(long long) EnableWindow 173 stdcall EndDeferWindowPos(long) EndDeferWindowPos 174 stdcall EndDialog(long long) EndDialog 175 stdcall EndMenu() EndMenu 176 stdcall EndPaint(long ptr) EndPaint 177 stub EndTask 178 stdcall EnumChildWindows(long ptr long) EnumChildWindows 179 stdcall EnumClipboardFormats(long) EnumClipboardFormats 180 stub EnumDesktopsA 181 stub EnumDesktopsW 182 stub EnumDisplayDeviceModesA 183 stub EnumDisplayDeviceModesW 184 stdcall EnumDisplayDevicesA(ptr long ptr long) EnumDisplayDevicesA 185 stdcall EnumDisplayDevicesW(ptr long ptr long) EnumDisplayDevicesW 186 stdcall EnumPropsA(long ptr) EnumPropsA 187 stdcall EnumPropsExA(long ptr long) EnumPropsExA 188 stdcall EnumPropsExW(long ptr long) EnumPropsExW 189 stdcall EnumPropsW(long ptr) EnumPropsW 190 stdcall EnumThreadWindows(long ptr long) EnumThreadWindows 191 stub EnumWindowStationsA 192 stub EnumWindowStationsW 193 stdcall EnumWindows(ptr long) EnumWindows 194 stdcall EqualRect(ptr ptr) EqualRect 195 stdcall ExcludeUpdateRgn(long long) ExcludeUpdateRgn 196 stdcall ExitWindowsEx(long long) ExitWindowsEx 197 stdcall FillRect(long ptr long) FillRect 198 stdcall FindWindowA(str str) FindWindowA 199 stdcall FindWindowExA(long long str str) FindWindowExA 200 stdcall FindWindowExW(long long wstr wstr) FindWindowExW 201 stdcall FindWindowW(wstr wstr) FindWindowW 202 stdcall FlashWindow(long long) FlashWindow 203 stdcall FrameRect(long ptr long) FrameRect 204 stdcall FreeDDElParam(long long) FreeDDElParam 205 stdcall GetActiveWindow() GetActiveWindow 206 stdcall GetAppCompatFlags(long) GetAppCompatFlags 207 stdcall GetAsyncKeyState(long) GetAsyncKeyState 208 stdcall GetCapture() GetCapture 209 stdcall GetCaretBlinkTime() GetCaretBlinkTime 210 stdcall GetCaretPos(ptr) GetCaretPos 211 stdcall GetClassInfoA(long str ptr) GetClassInfoA 212 stdcall GetClassInfoExA(long str ptr) GetClassInfoExA 213 stdcall GetClassInfoExW(long wstr ptr) GetClassInfoExW 214 stdcall GetClassInfoW(long wstr ptr) GetClassInfoW 215 stdcall GetClassLongA(long long) GetClassLongA 216 stdcall GetClassLongW(long long) GetClassLongW 217 stdcall GetClassNameA(long ptr long) GetClassNameA 218 stdcall GetClassNameW(long ptr long) GetClassNameW 219 stdcall GetClassWord(long long) GetClassWord 220 stdcall GetClientRect(long long) GetClientRect 221 stdcall GetClipCursor(ptr) GetClipCursor 222 stdcall GetClipboardData(long) GetClipboardData 223 stdcall GetClipboardFormatNameA(long ptr long) GetClipboardFormatNameA 224 stdcall GetClipboardFormatNameW(long ptr long) GetClipboardFormatNameW 225 stdcall GetClipboardOwner() GetClipboardOwner 226 stdcall GetClipboardViewer() GetClipboardViewer 227 stdcall GetCursor() GetCursor 228 stub GetCursorInfo 229 stdcall GetCursorPos(ptr) GetCursorPos 230 stdcall GetDC(long) GetDC 231 stdcall GetDCEx(long long long) GetDCEx 232 stdcall GetDesktopWindow() GetDesktopWindow 233 stdcall GetDialogBaseUnits() GetDialogBaseUnits 234 stdcall GetDlgCtrlID(long) GetDlgCtrlID 235 stdcall GetDlgItem(long long) GetDlgItem 236 stdcall GetDlgItemInt(long long ptr long) GetDlgItemInt 237 stdcall GetDlgItemTextA(long long ptr long) GetDlgItemTextA 238 stdcall GetDlgItemTextW(long long ptr long) GetDlgItemTextW 239 stdcall GetDoubleClickTime() GetDoubleClickTime 240 stdcall GetFocus() GetFocus 241 stdcall GetForegroundWindow() GetForegroundWindow 242 stdcall GetIconInfo(long ptr) GetIconInfo 243 stub GetInputDesktop 244 stdcall GetInputState() GetInputState 245 stdcall GetInternalWindowPos(long ptr ptr) GetInternalWindowPos 246 stdcall GetKBCodePage() GetKBCodePage 247 stdcall GetKeyNameTextA(long ptr long) GetKeyNameTextA 248 stdcall GetKeyNameTextW(long ptr long) GetKeyNameTextW 249 stdcall GetKeyState(long) GetKeyState 250 stdcall GetKeyboardLayout(long) GetKeyboardLayout 251 stdcall GetKeyboardLayoutList(long ptr) GetKeyboardLayoutList 252 stdcall GetKeyboardLayoutNameA(ptr) GetKeyboardLayoutNameA 253 stdcall GetKeyboardLayoutNameW(ptr) GetKeyboardLayoutNameW 254 stdcall GetKeyboardState(ptr) GetKeyboardState 255 stdcall GetKeyboardType(long) GetKeyboardType 256 stdcall GetLastActivePopup(long) GetLastActivePopup 257 stdcall GetMenu(long) GetMenu 258 stdcall GetMenuCheckMarkDimensions() GetMenuCheckMarkDimensions 259 stdcall GetMenuContextHelpId(long) GetMenuContextHelpId 260 stdcall GetMenuDefaultItem(long long long) GetMenuDefaultItem 261 stub GetMenuIndex 262 stdcall GetMenuItemCount(long) GetMenuItemCount 263 stdcall GetMenuItemID(long long) GetMenuItemID 264 stdcall GetMenuItemInfoA(long long long ptr) GetMenuItemInfoA 265 stdcall GetMenuItemInfoW(long long long ptr) GetMenuItemInfoW 266 stdcall GetMenuItemRect(long long long ptr) GetMenuItemRect 267 stdcall GetMenuState(long long long) GetMenuState 268 stdcall GetMenuStringA(long long ptr long long) GetMenuStringA 269 stdcall GetMenuStringW(long long ptr long long) GetMenuStringW 270 stdcall GetMessageA(ptr long long long) GetMessageA 271 stdcall GetMessageExtraInfo() GetMessageExtraInfo 272 stdcall GetMessagePos() GetMessagePos 273 stdcall GetMessageTime() GetMessageTime 274 stdcall GetMessageW(ptr long long long) GetMessageW 275 stdcall GetNextDlgGroupItem(long long long) GetNextDlgGroupItem 276 stdcall GetNextDlgTabItem(long long long) GetNextDlgTabItem 277 stdcall GetOpenClipboardWindow() GetOpenClipboardWindow 278 stdcall GetParent(long) GetParent 279 stdcall GetPriorityClipboardFormat(ptr long) GetPriorityClipboardFormat 280 stdcall GetProcessWindowStation() GetProcessWindowStation 281 stdcall GetPropA(long ptr) GetPropA 282 stdcall GetPropW(long ptr) GetPropW 283 stdcall GetQueueStatus(long) GetQueueStatus 284 stdcall GetScrollInfo(long long ptr) GetScrollInfo 285 stdcall GetScrollPos(long long) GetScrollPos 286 stdcall GetScrollRange(long long ptr ptr) GetScrollRange 287 stdcall GetShellWindow() GetShellWindow 288 stdcall GetSubMenu(long long) GetSubMenu 289 stdcall GetSysColor(long) GetSysColor 290 stdcall GetSysColorBrush(long) GetSysColorBrush 291 stdcall GetSystemMenu(long long) GetSystemMenu 292 stdcall GetSystemMetrics(long) GetSystemMetrics 293 stdcall GetTabbedTextExtentA(long str long long ptr) GetTabbedTextExtentA 294 stdcall GetTabbedTextExtentW(long wstr long long ptr) GetTabbedTextExtentW 295 stdcall GetThreadDesktop(long) GetThreadDesktop 296 stdcall GetTopWindow(long) GetTopWindow 297 stdcall GetUpdateRect(long ptr long) GetUpdateRect 298 stdcall GetUpdateRgn(long long long) GetUpdateRgn 299 stdcall GetUserObjectInformationA (long long ptr long ptr) GetUserObjectInformationA 300 stdcall GetUserObjectInformationW (long long ptr long ptr) GetUserObjectInformationW 301 stdcall GetUserObjectSecurity (long ptr ptr long ptr) GetUserObjectSecurity 302 stdcall GetWindow(long long) GetWindow 303 stdcall GetWindowContextHelpId(long) GetWindowContextHelpId 304 stdcall GetWindowDC(long) GetWindowDC 305 stdcall GetWindowLongA(long long) GetWindowLongA 306 stdcall GetWindowLongW(long long) GetWindowLongW 307 stdcall GetWindowPlacement(long ptr) GetWindowPlacement 308 stdcall GetWindowRect(long ptr) GetWindowRect 309 stdcall GetWindowTextA(long ptr long) GetWindowTextA 310 stdcall GetWindowTextLengthA(long) GetWindowTextLengthA 311 stdcall GetWindowTextLengthW(long) GetWindowTextLengthW 312 stdcall GetWindowTextW(long ptr long) GetWindowTextW 313 stdcall GetWindowThreadProcessId(long ptr) GetWindowThreadProcessId 314 stdcall GetWindowWord(long long) GetWindowWord 315 stdcall GrayStringA(long long ptr long long long long long long) GrayStringA 316 stdcall GrayStringW(long long ptr long long long long long long) GrayStringW 317 stdcall HideCaret(long) HideCaret 318 stdcall HiliteMenuItem(long long long long) HiliteMenuItem 319 stub ImpersonateDdeClientWindow 320 stdcall InSendMessage() InSendMessage 321 stdcall InflateRect(ptr long long) InflateRect 322 stdcall InsertMenuA(long long long long ptr) InsertMenuA 323 stdcall InsertMenuItemA(long long long ptr) InsertMenuItemA 324 stdcall InsertMenuItemW(long long long ptr) InsertMenuItemW 325 stdcall InsertMenuW(long long long long ptr) InsertMenuW 326 stdcall InternalGetWindowText(long long long) InternalGetWindowText 327 stdcall IntersectRect(ptr ptr ptr) IntersectRect 328 stdcall InvalidateRect(long ptr long) InvalidateRect 329 stdcall InvalidateRgn(long long long) InvalidateRgn 330 stdcall InvertRect(long ptr) InvertRect 331 stdcall IsCharAlphaA(long) IsCharAlphaA 332 stdcall IsCharAlphaNumericA(long) IsCharAlphaNumericA 333 stdcall IsCharAlphaNumericW(long) IsCharAlphaNumericW 334 stdcall IsCharAlphaW(long) IsCharAlphaW 335 stdcall IsCharLowerA(long) IsCharLowerA 336 stdcall IsCharLowerW(long) IsCharLowerW 337 stdcall IsCharUpperA(long) IsCharUpperA 338 stdcall IsCharUpperW(long) IsCharUpperW 339 stdcall IsChild(long long) IsChild 340 stdcall IsClipboardFormatAvailable(long) IsClipboardFormatAvailable 341 stub IsDialogMessage 342 stdcall IsDialogMessageA(long ptr) IsDialogMessageA 343 stdcall IsDialogMessageW(long ptr) IsDialogMessageW 344 stdcall IsDlgButtonChecked(long long) IsDlgButtonChecked 345 stdcall IsIconic(long) IsIconic 346 stdcall IsMenu(long) IsMenu 347 stdcall IsRectEmpty(ptr) IsRectEmpty 348 stdcall IsWindow(long) IsWindow 349 stdcall IsWindowEnabled(long) IsWindowEnabled 350 stdcall IsWindowUnicode(long) IsWindowUnicode 351 stdcall IsWindowVisible(long) IsWindowVisible 352 stdcall IsZoomed(long) IsZoomed 353 stdcall KillSystemTimer(long long) KillSystemTimer 354 stdcall KillTimer(long long) KillTimer 355 stdcall LoadAcceleratorsA(long str) LoadAcceleratorsA 356 stdcall LoadAcceleratorsW(long wstr) LoadAcceleratorsW 357 stdcall LoadBitmapA(long str) LoadBitmapA 358 stdcall LoadBitmapW(long wstr) LoadBitmapW 359 stdcall LoadCursorA(long str) LoadCursorA 360 stdcall LoadCursorFromFileA(str) LoadCursorFromFileA 361 stdcall LoadCursorFromFileW(wstr) LoadCursorFromFileW 362 stdcall LoadCursorW(long wstr) LoadCursorW 363 stdcall LoadIconA(long str) LoadIconA 364 stdcall LoadIconW(long wstr) LoadIconW 365 stdcall LoadImageA(long str long long long long) LoadImageA 366 stdcall LoadImageW(long wstr long long long long) LoadImageW 367 stdcall LoadKeyboardLayoutA(str long) LoadKeyboardLayoutA 368 stdcall LoadKeyboardLayoutW(wstr long) LoadKeyboardLayoutW 369 stdcall LoadLocalFonts() LoadLocalFonts 370 stdcall LoadMenuA(long str) LoadMenuA 371 stdcall LoadMenuIndirectA(ptr) LoadMenuIndirectA 372 stdcall LoadMenuIndirectW(ptr) LoadMenuIndirectW 373 stdcall LoadMenuW(long wstr) LoadMenuW 374 stub LoadRemoteFonts 375 stdcall LoadStringA(long long ptr long) LoadStringA 376 stdcall LoadStringW(long long ptr long) LoadStringW 377 stub LockWindowStation 378 stdcall LockWindowUpdate(long) LockWindowUpdate 379 stdcall LookupIconIdFromDirectory(ptr long) LookupIconIdFromDirectory 380 stdcall LookupIconIdFromDirectoryEx(ptr long long long long) LookupIconIdFromDirectoryEx 381 stub MBToWCSEx 382 stdcall MapDialogRect(long ptr) MapDialogRect 383 stdcall MapVirtualKeyA(long long) MapVirtualKeyA 384 stdcall MapVirtualKeyExA(long long long) MapVirtualKeyExA 385 stdcall MapVirtualKeyW(long long) MapVirtualKeyA 386 stdcall MapWindowPoints(long long ptr long) MapWindowPoints 387 stdcall MenuItemFromPoint(long long long long) MenuItemFromPoint 388 stub MenuWindowProcA 389 stub MenuWindowProcW 390 stdcall MessageBeep(long) MessageBeep 391 stdcall MessageBoxA(long str str long) MessageBoxA 392 stdcall MessageBoxExA(long str str long long) MessageBoxExA 393 stdcall MessageBoxExW(long wstr wstr long long) MessageBoxExW 394 stdcall MessageBoxIndirectA(ptr) MessageBoxIndirectA 395 stdcall MessageBoxIndirectW(ptr) MessageBoxIndirectW 396 stdcall MessageBoxW(long wstr wstr long) MessageBoxW 397 stdcall ModifyMenuA(long long long long ptr) ModifyMenuA 398 stdcall ModifyMenuW(long long long long ptr) ModifyMenuW 399 stdcall MoveWindow(long long long long long long) MoveWindow 400 stdcall MsgWaitForMultipleObjects(long ptr long long long) MsgWaitForMultipleObjects 401 stdcall OemKeyScan(long) OemKeyScan 402 stdcall OemToCharA(ptr ptr) OemToCharA 403 stdcall OemToCharBuffA(ptr ptr long) OemToCharBuffA 404 stdcall OemToCharBuffW(ptr ptr long) OemToCharBuffW 405 stdcall OemToCharW(ptr ptr) OemToCharW 406 stdcall OffsetRect(ptr long long) OffsetRect 407 stdcall OpenClipboard(long) OpenClipboard 408 stdcall OpenDesktopA(str long long long) OpenDesktopA 409 stub OpenDesktopW 410 stdcall OpenIcon(long) OpenIcon 411 stub OpenInputDesktop 412 stub OpenWindowStationA 413 stub OpenWindowStationW 414 stdcall PackDDElParam(long long long) PackDDElParam 415 stdcall PaintDesktop(long) PaintDesktop 416 stdcall PeekMessageA(ptr long long long long) PeekMessageA 417 stdcall PeekMessageW(ptr long long long long) PeekMessageW 418 stub PlaySoundEvent 419 stdcall PostMessageA(long long long long) PostMessageA 420 stdcall PostMessageW(long long long long) PostMessageW 421 stdcall PostQuitMessage(long) PostQuitMessage 422 stdcall PostThreadMessageA(long long long long) PostThreadMessageA 423 stdcall PostThreadMessageW(long long long long) PostThreadMessageW 424 stdcall PtInRect(ptr long long) PtInRect 425 stub QuerySendMessage 426 stdcall RedrawWindow(long ptr long long) RedrawWindow 427 stdcall RegisterClassA(ptr) RegisterClassA 428 stdcall RegisterClassExA(ptr) RegisterClassExA 429 stdcall RegisterClassExW(ptr) RegisterClassExW 430 stdcall RegisterClassW(ptr) RegisterClassW 431 stdcall RegisterClipboardFormatA(str) RegisterClipboardFormatA 432 stdcall RegisterClipboardFormatW(wstr) RegisterClipboardFormatW 433 stdcall RegisterHotKey(long long long long) RegisterHotKey 434 stdcall RegisterLogonProcess(long long) RegisterLogonProcess 435 stdcall RegisterSystemThread(long long) RegisterSystemThread 436 stdcall RegisterTasklist (long) RegisterTaskList 437 stdcall RegisterWindowMessageA(str) RegisterWindowMessageA 438 stdcall RegisterWindowMessageW(wstr) RegisterWindowMessageW 439 stdcall ReleaseCapture() ReleaseCapture 440 stdcall ReleaseDC(long long) ReleaseDC 441 stdcall RemoveMenu(long long long) RemoveMenu 442 stdcall RemovePropA(long str) RemovePropA 443 stdcall RemovePropW(long wstr) RemovePropW 444 stdcall ReplyMessage(long) ReplyMessage 445 stub ResetDisplay 446 stdcall ReuseDDElParam(long long long long long) ReuseDDElParam 447 stdcall ScreenToClient(long ptr) ScreenToClient 448 stdcall ScrollChildren(long long long long) ScrollChildren 449 stdcall ScrollDC(long long long ptr ptr long ptr) ScrollDC 450 stdcall ScrollWindow(long long long ptr ptr) ScrollWindow 451 stdcall ScrollWindowEx(long long long ptr ptr long ptr long) ScrollWindowEx 452 stdcall SendDlgItemMessageA(long long long long long) SendDlgItemMessageA 453 stdcall SendDlgItemMessageW(long long long long long) SendDlgItemMessageW 454 stdcall SendMessageA(long long long long) SendMessageA 455 stdcall SendMessageCallbackA(long long long long ptr long) SendMessageCallbackA 456 stdcall SendMessageCallbackW(long long long long ptr long) SendMessageCallbackW 457 stdcall SendMessageTimeoutA(long long long long long long ptr) SendMessageTimeoutA 458 stdcall SendMessageTimeoutW(long long long long long long ptr) SendMessageTimeoutW 459 stdcall SendMessageW(long long long long) SendMessageW 460 stdcall SendNotifyMessageA(long long long long) SendNotifyMessageA 461 stdcall SendNotifyMessageW(long long long long) SendNotifyMessageW 462 stub ServerSetFunctionPointers 463 stdcall SetActiveWindow(long) SetActiveWindow 464 stdcall SetCapture(long) SetCapture 465 stdcall SetCaretBlinkTime(long) SetCaretBlinkTime 466 stdcall SetCaretPos(long long) SetCaretPos 467 stdcall SetClassLongA(long long long) SetClassLongA 468 stdcall SetClassLongW(long long long) SetClassLongW 469 stdcall SetClassWord(long long long) SetClassWord 470 stdcall SetClipboardData(long long) SetClipboardData 471 stdcall SetClipboardViewer(long) SetClipboardViewer 472 stdcall SetCursor(long) SetCursor 473 stub SetCursorContents 474 stdcall SetCursorPos(long long) SetCursorPos 475 stdcall SetDebugErrorLevel(long) SetDebugErrorLevel 476 stdcall SetDeskWallPaper(str) SetDeskWallPaper 477 stdcall SetDlgItemInt(long long long long) SetDlgItemInt 478 stdcall SetDlgItemTextA(long long str) SetDlgItemTextA 479 stdcall SetDlgItemTextW(long long wstr) SetDlgItemTextW 480 stdcall SetDoubleClickTime(long) SetDoubleClickTime 481 stdcall SetFocus(long) SetFocus 482 stdcall SetForegroundWindow(long) SetForegroundWindow 483 stdcall SetInternalWindowPos(long long ptr ptr) SetInternalWindowPos 484 stdcall SetKeyboardState(ptr) SetKeyboardState 485 stdcall SetLastErrorEx(long long) SetLastErrorEx 486 stdcall SetLogonNotifyWindow(long long) SetLogonNotifyWindow 487 stdcall SetMenu(long long) SetMenu 488 stdcall SetMenuContextHelpId(long long) SetMenuContextHelpId 489 stdcall SetMenuDefaultItem(long long long) SetMenuDefaultItem 490 stdcall SetMenuItemBitmaps(long long long long long) SetMenuItemBitmaps 491 stdcall SetMenuItemInfoA(long long long ptr) SetMenuItemInfoA 492 stdcall SetMenuItemInfoW(long long long ptr) SetMenuItemInfoW 493 stub SetMessageExtraInfo 494 stdcall SetMessageQueue(long) SetMessageQueue 495 stdcall SetParent(long long) SetParent 496 stdcall SetProcessWindowStation(long) SetProcessWindowStation 497 stdcall SetPropA(long str long) SetPropA 498 stdcall SetPropW(long wstr long) SetPropW 499 stdcall SetRect(ptr long long long long) SetRect 500 stdcall SetRectEmpty(ptr) SetRectEmpty 501 stdcall SetScrollInfo(long long ptr long) SetScrollInfo 502 stdcall SetScrollPos(long long long long) SetScrollPos 503 stdcall SetScrollRange(long long long long long) SetScrollRange 504 stdcall SetShellWindow(long) SetShellWindow 505 stdcall SetSysColors(long ptr ptr) SetSysColors 506 stub SetSysColorsTemp 507 stdcall SetSystemCursor(long long) SetSystemCursor 508 stdcall SetSystemMenu(long long) SetSystemMenu 509 stdcall SetSystemTimer(long long long ptr) SetSystemTimer 510 stdcall SetThreadDesktop(long) SetThreadDesktop 511 stdcall SetTimer(long long long ptr) SetTimer 512 stdcall SetUserObjectInformationA(long long long long) SetUserObjectInformationA 513 stub SetUserObjectInformationW 514 stdcall SetUserObjectSecurity(long ptr ptr) SetUserObjectSecurity 515 stdcall SetWindowContextHelpId(long long) SetWindowContextHelpId 516 stub SetWindowFullScreenState 517 stdcall SetWindowLongA(long long long) SetWindowLongA 518 stdcall SetWindowLongW(long long long) SetWindowLongW 519 stdcall SetWindowPlacement(long ptr) SetWindowPlacement 520 stdcall SetWindowPos(long long long long long long long) SetWindowPos 521 stdcall SetWindowStationUser(long long) SetWindowStationUser 522 stdcall SetWindowTextA(long str) SetWindowTextA 523 stdcall SetWindowTextW(long wstr) SetWindowTextW 524 stdcall SetWindowWord(long long long) SetWindowWord 525 stdcall SetWindowsHookA(long ptr) SetWindowsHookA 526 stdcall SetWindowsHookExA(long long long long) SetWindowsHookExA 527 stdcall SetWindowsHookExW(long long long long) SetWindowsHookExW 528 stdcall SetWindowsHookW(long ptr) SetWindowsHookW 529 stdcall ShowCaret(long) ShowCaret 530 stdcall ShowCursor(long) ShowCursor 531 stdcall ShowOwnedPopups(long long) ShowOwnedPopups 532 stdcall ShowScrollBar(long long long) ShowScrollBar 533 stub ShowStartGlass 534 stdcall ShowWindow(long long) ShowWindow 535 stdcall ShowWindowAsync(long long) ShowWindowAsync 536 stdcall SubtractRect(ptr ptr ptr) SubtractRect 537 stdcall SwapMouseButton(long) SwapMouseButton 538 stub SwitchDesktop 539 stdcall SwitchToThisWindow(long long) SwitchToThisWindow 540 stdcall SystemParametersInfoA(long long ptr long) SystemParametersInfoA 541 stdcall SystemParametersInfoW(long long ptr long) SystemParametersInfoW 542 stdcall TabbedTextOutA(long long long str long long ptr long) TabbedTextOutA 543 stdcall TabbedTextOutW(long long long wstr long long ptr long) TabbedTextOutW 544 stub TileChildWindows 545 stdcall TileWindows(long long ptr long ptr) TileWindows 546 stdcall ToAscii(long long ptr ptr long) ToAscii 547 stdcall ToAsciiEx(long long ptr ptr long long) ToAsciiEx 548 stdcall ToUnicode(long long ptr wstr long long) ToUnicode 549 stdcall TrackPopupMenu(long long long long long long ptr) TrackPopupMenu 550 stdcall TrackPopupMenuEx(long long long long long ptr) TrackPopupMenuEx 551 stdcall TranslateAccelerator(long long ptr) TranslateAccelerator 552 stdcall TranslateAcceleratorA(long long ptr) TranslateAccelerator 553 stdcall TranslateAcceleratorW(long long ptr) TranslateAccelerator 554 stdcall TranslateCharsetInfo(ptr ptr long) TranslateCharsetInfo 555 stdcall TranslateMDISysAccel(long ptr) TranslateMDISysAccel 556 stdcall TranslateMessage(ptr) TranslateMessage 557 stdcall UnhookWindowsHook(long ptr) UnhookWindowsHook 558 stdcall UnhookWindowsHookEx(long) UnhookWindowsHookEx 559 stdcall UnionRect(ptr ptr ptr) UnionRect 560 stub UnloadKeyboardLayout 561 stub UnlockWindowStation 562 stdcall UnpackDDElParam(long long ptr ptr) UnpackDDElParam 563 stdcall UnregisterClassA(str long) UnregisterClassA 564 stdcall UnregisterClassW(wstr long) UnregisterClassW 565 stdcall UnregisterHotKey(long long) UnregisterHotKey 566 stub UpdatePerUserSystemParameters 567 stdcall UpdateWindow(long) UpdateWindow 568 stub UserClientDllInitialize 569 stub UserRealizePalette 570 stub UserRegisterWowHandlers 571 stdcall ValidateRect(long ptr) ValidateRect 572 stdcall ValidateRgn(long long) ValidateRgn 573 stdcall VkKeyScanA(long) VkKeyScanA 574 stdcall VkKeyScanExA(long long) VkKeyScanExA 575 stdcall VkKeyScanExW(long long) VkKeyScanExW 576 stdcall VkKeyScanW(long) VkKeyScanW 577 stdcall WaitForInputIdle(long long) WaitForInputIdle 578 stdcall WaitMessage() WaitMessage 579 stdcall WinHelpA(long str long long) WinHelpA 580 stdcall WinHelpW(long wstr long long) WinHelpW 581 stdcall WindowFromDC(long) WindowFromDC 582 stdcall WindowFromPoint(long long) WindowFromPoint 583 stdcall keybd_event(long long long long) keybd_event 584 stdcall mouse_event(long long long long long) mouse_event 585 varargs wsprintfA(str str) wsprintfA 586 varargs wsprintfW(wstr wstr) wsprintfW 587 stdcall wvsprintfA(ptr str ptr) wvsprintfA 588 stdcall wvsprintfW(ptr wstr ptr) wvsprintfW #late additions 589 stdcall ChangeDisplaySettingsA(ptr long) ChangeDisplaySettingsA 590 stub ChangeDisplaySettingsW 591 stub EnumDesktopWindows 592 stdcall EnumDisplaySettingsA(str long ptr) EnumDisplaySettingsA 593 stdcall EnumDisplaySettingsW(wstr long ptr ) EnumDisplaySettingsW 594 stdcall GetWindowRgn(long long) GetWindowRgn 595 stub MapVirtualKeyExW 596 stub RegisterServicesProcess 597 stdcall SetWindowRgn(long long long) SetWindowRgn 598 stub ToUnicodeEx 599 stdcall DrawCaptionTempA(long long ptr long long str long) DrawCaptionTempA 600 stub RegisterNetworkCapabilities 601 stub WNDPROC_CALLBACK 602 stdcall DrawCaptionTempW(long long ptr long long wstr long) DrawCaptionTempW 603 stub IsHungAppWindow 604 stdcall ChangeDisplaySettingsExA(str ptr long long ptr) ChangeDisplaySettingsExA 605 stub ChangeDisplaySettingsExW 606 stdcall SetWindowText(long str) SetWindowTextA 607 stdcall GetMonitorInfoA(long ptr) GetMonitorInfoA 608 stdcall GetMonitorInfoW(long ptr) GetMonitorInfoW 609 stdcall MonitorFromWindow(long long) MonitorFromWindow 610 stdcall MonitorFromRect(ptr long) MonitorFromRect 611 stdcall MonitorFromPoint(long long long) MonitorFromPoint 612 stdcall EnumDisplayMonitors(long ptr ptr long) EnumDisplayMonitors 613 stdcall PrivateExtractIconExA (long long long long long) PrivateExtractIconExA 614 stdcall PrivateExtractIconExW (long long long long long) PrivateExtractIconExW 615 stdcall PrivateExtractIconsW (long long long long long long long long) PrivateExtractIconsW 616 stdcall RegisterShellHookWindow (long) RegisterShellHookWindow 617 stdcall DeregisterShellHookWindow (long) DeregisterShellHookWindow 618 stdcall SetShellWindowEx (long long) SetShellWindowEx 619 stdcall SetProgmanWindow (long) SetProgmanWindow 620 stdcall GetTaskmanWindow () GetTaskmanWindow 621 stdcall SetTaskmanWindow (long) SetTaskmanWindow 622 stdcall GetProgmanWindow () GetProgmanWindow 623 stdcall UserSignalProc(long long long long) UserSignalProc # win98 800 stdcall GetMenuInfo(long ptr)GetMenuInfo 801 stdcall SetMenuInfo(long ptr)SetMenuInfo 802 stdcall GetProcessDefaultLayout(ptr) GetProcessDefaultLayout 803 stdcall SetProcessDefaultLayout(long) SetProcessDefaultLayout wine-20000526/dlls/user/user_main.c0100644000175000001440000000422607105334313016507 0ustar julliardusers/* * USER initialization code */ #include "windef.h" #include "wingdi.h" #include "winuser.h" #include "wine/winbase16.h" #include "dce.h" #include "dialog.h" #include "display.h" #include "global.h" #include "input.h" #include "keyboard.h" #include "menu.h" #include "message.h" #include "mouse.h" #include "queue.h" #include "spy.h" #include "sysmetrics.h" #include "user.h" #include "win.h" /*********************************************************************** * USER initialisation routine */ BOOL WINAPI USER_Init(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved) { HINSTANCE16 instance; int queueSize; if ( USER_HeapSel ) return TRUE; /* Create USER heap */ if ((instance = LoadLibrary16( "USER.EXE" )) < 32) return FALSE; USER_HeapSel = GlobalHandleToSel16( instance ); /* Global atom table initialisation */ if (!ATOM_Init( USER_HeapSel )) return FALSE; /* Initialize window handling (critical section) */ WIN_Init(); /* Initialize system colors and metrics*/ SYSMETRICS_Init(); SYSCOLOR_Init(); /* Create the DCEs */ DCE_Init(); /* Initialize window procedures */ if (!WINPROC_Init()) return FALSE; /* Initialize built-in window classes */ if (!WIDGETS_Init()) return FALSE; /* Initialize dialog manager */ if (!DIALOG_Init()) return FALSE; /* Initialize menus */ if (!MENU_Init()) return FALSE; /* Initialize message spying */ if (!SPY_Init()) return FALSE; /* Create system message queue */ queueSize = GetProfileIntA( "windows", "TypeAhead", 120 ); if (!QUEUE_CreateSysMsgQueue( queueSize )) return FALSE; /* Set double click time */ SetDoubleClickTime( GetProfileIntA("windows","DoubleClickSpeed",452) ); /* Create message queue of initial thread */ InitThreadInput16( 0, 0 ); /* Create desktop window */ if (!WIN_CreateDesktopWindow()) return FALSE; /* Initialize keyboard driver */ KEYBOARD_Enable( keybd_event, InputKeyStateTable ); /* Initialize mouse driver */ MOUSE_Enable( mouse_event ); /* Start processing X events */ UserRepaintDisable16( FALSE ); return TRUE; } wine-20000526/dlls/version/0040755000175000001440000000000007113604212015064 5ustar julliarduserswine-20000526/dlls/version/.cvsignore0100644000175000001440000000006207045213574017072 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libversion.so.1.0 wine-20000526/dlls/version/Makefile.in0100644000175000001440000000043407060456112017134 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = version SOVERSION = 1.0 ALTNAMES = ver IMPORTS = lz32 SPEC_SRCS = ver.spec version.spec C_SRCS = \ info.c \ install.c \ resource.c \ ver16.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/version/info.c0100644000175000001440000003661207070212246016174 0ustar julliardusers/* * Implementation of VERSION.DLL - Version Info access * * Copyright 1996,1997 Marcus Meissner * Copyright 1997 David Cuthbert * Copyright 1999 Ulrich Weigand */ #include #include #include "winreg.h" #include "winver.h" #include "wine/winestring.h" #include "winerror.h" #include "heap.h" #include "crtdll.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ver) /****************************************************************************** * * This function will print via dprintf[_]ver to stddeb debug info regarding * the file info structure vffi. * 15-Feb-1998 Dimitrie Paun (dimi@cs.toronto.edu) * Added this function to clean up the code. * *****************************************************************************/ static void print_vffi_debug(VS_FIXEDFILEINFO *vffi) { TRACE(" structversion=%u.%u, fileversion=%u.%u.%u.%u, productversion=%u.%u.%u.%u, flagmask=0x%lx, flags=%s%s%s%s%s%s\n", HIWORD(vffi->dwStrucVersion),LOWORD(vffi->dwStrucVersion), HIWORD(vffi->dwFileVersionMS),LOWORD(vffi->dwFileVersionMS), HIWORD(vffi->dwFileVersionLS),LOWORD(vffi->dwFileVersionLS), HIWORD(vffi->dwProductVersionMS),LOWORD(vffi->dwProductVersionMS), HIWORD(vffi->dwProductVersionLS),LOWORD(vffi->dwProductVersionLS), vffi->dwFileFlagsMask, (vffi->dwFileFlags & VS_FF_DEBUG) ? "DEBUG," : "", (vffi->dwFileFlags & VS_FF_PRERELEASE) ? "PRERELEASE," : "", (vffi->dwFileFlags & VS_FF_PATCHED) ? "PATCHED," : "", (vffi->dwFileFlags & VS_FF_PRIVATEBUILD) ? "PRIVATEBUILD," : "", (vffi->dwFileFlags & VS_FF_INFOINFERRED) ? "INFOINFERRED," : "", (vffi->dwFileFlags & VS_FF_SPECIALBUILD) ? "SPECIALBUILD," : "" ); TRACE("("); DPRINTF(" OS=0x%x.0x%x ", HIWORD(vffi->dwFileOS), LOWORD(vffi->dwFileOS) ); switch (vffi->dwFileOS&0xFFFF0000) { case VOS_DOS:DPRINTF("DOS,");break; case VOS_OS216:DPRINTF("OS/2-16,");break; case VOS_OS232:DPRINTF("OS/2-32,");break; case VOS_NT:DPRINTF("NT,");break; case VOS_UNKNOWN: default: DPRINTF("UNKNOWN(0x%lx),",vffi->dwFileOS&0xFFFF0000);break; } switch (LOWORD(vffi->dwFileOS)) { case VOS__BASE:DPRINTF("BASE");break; case VOS__WINDOWS16:DPRINTF("WIN16");break; case VOS__WINDOWS32:DPRINTF("WIN32");break; case VOS__PM16:DPRINTF("PM16");break; case VOS__PM32:DPRINTF("PM32");break; default:DPRINTF("UNKNOWN(0x%x)",LOWORD(vffi->dwFileOS));break; } DPRINTF(")\n"); switch (vffi->dwFileType) { default: case VFT_UNKNOWN: TRACE("filetype=Unknown(0x%lx)",vffi->dwFileType); break; case VFT_APP:TRACE("filetype=APP,");break; case VFT_DLL:TRACE("filetype=DLL,");break; case VFT_DRV: TRACE("filetype=DRV,"); switch(vffi->dwFileSubtype) { default: case VFT2_UNKNOWN: DPRINTF("UNKNOWN(0x%lx)",vffi->dwFileSubtype); break; case VFT2_DRV_PRINTER: DPRINTF("PRINTER"); break; case VFT2_DRV_KEYBOARD: DPRINTF("KEYBOARD"); break; case VFT2_DRV_LANGUAGE: DPRINTF("LANGUAGE"); break; case VFT2_DRV_DISPLAY: DPRINTF("DISPLAY"); break; case VFT2_DRV_MOUSE: DPRINTF("MOUSE"); break; case VFT2_DRV_NETWORK: DPRINTF("NETWORK"); break; case VFT2_DRV_SYSTEM: DPRINTF("SYSTEM"); break; case VFT2_DRV_INSTALLABLE: DPRINTF("INSTALLABLE"); break; case VFT2_DRV_SOUND: DPRINTF("SOUND"); break; case VFT2_DRV_COMM: DPRINTF("COMM"); break; case VFT2_DRV_INPUTMETHOD: DPRINTF("INPUTMETHOD"); break; } break; case VFT_FONT: TRACE("filetype=FONT."); switch (vffi->dwFileSubtype) { default: DPRINTF("UNKNOWN(0x%lx)",vffi->dwFileSubtype); break; case VFT2_FONT_RASTER:DPRINTF("RASTER");break; case VFT2_FONT_VECTOR:DPRINTF("VECTOR");break; case VFT2_FONT_TRUETYPE:DPRINTF("TRUETYPE");break; } break; case VFT_VXD:TRACE("filetype=VXD");break; case VFT_STATIC_LIB:TRACE("filetype=STATIC_LIB");break; } DPRINTF("\n"); TRACE(" filedata=0x%lx.0x%lx\n", vffi->dwFileDateMS,vffi->dwFileDateLS); } /*********************************************************************** * Version Info Structure */ typedef struct { WORD wLength; WORD wValueLength; CHAR szKey[1]; #if 0 /* variable length structure */ /* DWORD aligned */ BYTE Value[]; /* DWORD aligned */ VS_VERSION_INFO_STRUCT16 Children[]; #endif } VS_VERSION_INFO_STRUCT16; typedef struct { WORD wLength; WORD wValueLength; WORD bText; WCHAR szKey[1]; #if 0 /* variable length structure */ /* DWORD aligned */ BYTE Value[]; /* DWORD aligned */ VS_VERSION_INFO_STRUCT32 Children[]; #endif } VS_VERSION_INFO_STRUCT32; #define VersionInfoIs16( ver ) \ ( ((VS_VERSION_INFO_STRUCT16 *)ver)->szKey[0] >= ' ' ) #define DWORD_ALIGN( base, ptr ) \ ( (LPBYTE)(base) + ((((LPBYTE)(ptr) - (LPBYTE)(base)) + 3) & ~3) ) #define VersionInfo16_Value( ver ) \ DWORD_ALIGN( (ver), (ver)->szKey + lstrlenA((ver)->szKey) + 1 ) #define VersionInfo32_Value( ver ) \ DWORD_ALIGN( (ver), (ver)->szKey + lstrlenW((ver)->szKey) + 1 ) #define VersionInfo16_Children( ver ) \ (VS_VERSION_INFO_STRUCT16 *)( VersionInfo16_Value( ver ) + \ ( ( (ver)->wValueLength + 3 ) & ~3 ) ) #define VersionInfo32_Children( ver ) \ (VS_VERSION_INFO_STRUCT32 *)( VersionInfo32_Value( ver ) + \ ( ( (ver)->wValueLength * \ ((ver)->bText? 2 : 1) + 3 ) & ~3 ) ) #define VersionInfo16_Next( ver ) \ (VS_VERSION_INFO_STRUCT16 *)( (LPBYTE)ver + (((ver)->wLength + 3) & ~3) ) #define VersionInfo32_Next( ver ) \ (VS_VERSION_INFO_STRUCT32 *)( (LPBYTE)ver + (((ver)->wLength + 3) & ~3) ) /*********************************************************************** * ConvertVersionInfo32To16 [internal] */ void ConvertVersionInfo32To16( VS_VERSION_INFO_STRUCT32 *info32, VS_VERSION_INFO_STRUCT16 *info16 ) { /* Copy data onto local stack to prevent overwrites */ WORD wLength = info32->wLength; WORD wValueLength = info32->wValueLength; WORD bText = info32->bText; LPBYTE lpValue = VersionInfo32_Value( info32 ); VS_VERSION_INFO_STRUCT32 *child32 = VersionInfo32_Children( info32 ); VS_VERSION_INFO_STRUCT16 *child16; TRACE("Converting %p to %p\n", info32, info16 ); TRACE("wLength %d, wValueLength %d, bText %d, value %p, child %p\n", wLength, wValueLength, bText, lpValue, child32 ); /* Convert key */ lstrcpyWtoA( info16->szKey, info32->szKey ); TRACE("Copied key from %p to %p: %s\n", info32->szKey, info16->szKey, debugstr_a(info16->szKey) ); /* Convert value */ if ( wValueLength == 0 ) { info16->wValueLength = 0; TRACE("No value present\n" ); } else if ( bText ) { info16->wValueLength = lstrlenW( (LPCWSTR)lpValue ) + 1; lstrcpyWtoA( VersionInfo16_Value( info16 ), (LPCWSTR)lpValue ); TRACE("Copied value from %p to %p: %s\n", lpValue, VersionInfo16_Value( info16 ), debugstr_a(VersionInfo16_Value( info16 )) ); } else { info16->wValueLength = wValueLength; memmove( VersionInfo16_Value( info16 ), lpValue, wValueLength ); TRACE("Copied value from %p to %p: %d bytes\n", lpValue, VersionInfo16_Value( info16 ), wValueLength ); } /* Convert children */ child16 = VersionInfo16_Children( info16 ); while ( (DWORD)child32 < (DWORD)info32 + wLength ) { VS_VERSION_INFO_STRUCT32 *nextChild = VersionInfo32_Next( child32 ); ConvertVersionInfo32To16( child32, child16 ); child16 = VersionInfo16_Next( child16 ); child32 = nextChild; } /* Fixup length */ info16->wLength = (DWORD)child16 - (DWORD)info16; TRACE("Finished, length is %d (%p - %p)\n", info16->wLength, info16, child16 ); } /*********************************************************************** * GetFileVersionInfoSizeA [VERSION.2] */ DWORD WINAPI GetFileVersionInfoSizeA( LPCSTR filename, LPDWORD handle ) { VS_FIXEDFILEINFO *vffi; DWORD len, ret, offset; BYTE buf[144]; TRACE("(%s,%p)\n", debugstr_a(filename), handle ); len = GetFileResourceSize( filename, MAKEINTRESOURCEA(VS_FILE_INFO), MAKEINTRESOURCEA(VS_VERSION_INFO), &offset ); if (!len) return 0; ret = GetFileResource( filename, MAKEINTRESOURCEA(VS_FILE_INFO), MAKEINTRESOURCEA(VS_VERSION_INFO), offset, sizeof( buf ), buf ); if (!ret) return 0; if ( handle ) *handle = offset; if ( VersionInfoIs16( buf ) ) vffi = (VS_FIXEDFILEINFO *)VersionInfo16_Value( (VS_VERSION_INFO_STRUCT16 *)buf ); else vffi = (VS_FIXEDFILEINFO *)VersionInfo32_Value( (VS_VERSION_INFO_STRUCT32 *)buf ); if ( vffi->dwSignature != VS_FFI_SIGNATURE ) { WARN("vffi->dwSignature is 0x%08lx, but not 0x%08lx!\n", vffi->dwSignature, VS_FFI_SIGNATURE ); return 0; } if ( ((VS_VERSION_INFO_STRUCT16 *)buf)->wLength < len ) len = ((VS_VERSION_INFO_STRUCT16 *)buf)->wLength; if ( TRACE_ON(ver) ) print_vffi_debug( vffi ); return len; } /*********************************************************************** * GetFileVersionInfoSizeW [VERSION.3] */ DWORD WINAPI GetFileVersionInfoSizeW( LPCWSTR filename, LPDWORD handle ) { LPSTR fn = HEAP_strdupWtoA( GetProcessHeap(), 0, filename ); DWORD ret = GetFileVersionInfoSizeA( fn, handle ); HeapFree( GetProcessHeap(), 0, fn ); return ret; } /*********************************************************************** * GetFileVersionInfoA [VERSION.1] */ DWORD WINAPI GetFileVersionInfoA( LPCSTR filename, DWORD handle, DWORD datasize, LPVOID data ) { TRACE("(%s,%ld,size=%ld,data=%p)\n", debugstr_a(filename), handle, datasize, data ); if ( !GetFileResource( filename, MAKEINTRESOURCEA(VS_FILE_INFO), MAKEINTRESOURCEA(VS_VERSION_INFO), handle, datasize, data ) ) return FALSE; if ( datasize >= sizeof(VS_VERSION_INFO_STRUCT16) && datasize >= ((VS_VERSION_INFO_STRUCT16 *)data)->wLength && !VersionInfoIs16( data ) ) { /* convert resource from PE format to NE format */ ConvertVersionInfo32To16( (VS_VERSION_INFO_STRUCT32 *)data, (VS_VERSION_INFO_STRUCT16 *)data ); } return TRUE; } /*********************************************************************** * GetFileVersionInfoW [VERSION.4] */ DWORD WINAPI GetFileVersionInfoW( LPCWSTR filename, DWORD handle, DWORD datasize, LPVOID data ) { LPSTR fn = HEAP_strdupWtoA( GetProcessHeap(), 0, filename ); DWORD retv = TRUE; TRACE("(%s,%ld,size=%ld,data=%p)\n", debugstr_a(fn), handle, datasize, data ); if ( !GetFileResource( fn, MAKEINTRESOURCEA(VS_FILE_INFO), MAKEINTRESOURCEA(VS_VERSION_INFO), handle, datasize, data ) ) retv = FALSE; else if ( datasize >= sizeof(VS_VERSION_INFO_STRUCT16) && datasize >= ((VS_VERSION_INFO_STRUCT16 *)data)->wLength && VersionInfoIs16( data ) ) { ERR("Cannot access NE resource in %s\n", debugstr_a(fn) ); retv = FALSE; } HeapFree( GetProcessHeap(), 0, fn ); return retv; } /*********************************************************************** * VersionInfo16_FindChild [internal] */ static VS_VERSION_INFO_STRUCT16 *VersionInfo16_FindChild( VS_VERSION_INFO_STRUCT16 *info, LPCSTR szKey, UINT cbKey ) { VS_VERSION_INFO_STRUCT16 *child = VersionInfo16_Children( info ); while ( (DWORD)child < (DWORD)info + info->wLength ) { if ( !lstrncmpiA( child->szKey, szKey, cbKey ) ) return child; if (!(child->wLength)) return NULL; child = VersionInfo16_Next( child ); } return NULL; } /*********************************************************************** * VersionInfo32_FindChild [internal] */ static VS_VERSION_INFO_STRUCT32 *VersionInfo32_FindChild( VS_VERSION_INFO_STRUCT32 *info, LPCWSTR szKey, UINT cbKey ) { VS_VERSION_INFO_STRUCT32 *child = VersionInfo32_Children( info ); while ( (DWORD)child < (DWORD)info + info->wLength ) { if ( !CRTDLL__wcsnicmp( child->szKey, szKey, cbKey ) ) return child; child = VersionInfo32_Next( child ); } return NULL; } /*********************************************************************** * VerQueryValueA [VERSION.12] */ DWORD WINAPI VerQueryValueA( LPVOID pBlock, LPCSTR lpSubBlock, LPVOID *lplpBuffer, UINT *puLen ) { VS_VERSION_INFO_STRUCT16 *info = (VS_VERSION_INFO_STRUCT16 *)pBlock; if ( !VersionInfoIs16( info ) ) { ERR("called on PE resource!\n" ); return FALSE; } TRACE("(%p,%s,%p,%p)\n", pBlock, debugstr_a(lpSubBlock), lplpBuffer, puLen ); while ( *lpSubBlock ) { /* Find next path component */ LPCSTR lpNextSlash; for ( lpNextSlash = lpSubBlock; *lpNextSlash; lpNextSlash++ ) if ( *lpNextSlash == '\\' ) break; /* Skip empty components */ if ( lpNextSlash == lpSubBlock ) { lpSubBlock++; continue; } /* We have a non-empty component: search info for key */ info = VersionInfo16_FindChild( info, lpSubBlock, lpNextSlash-lpSubBlock ); if ( !info ) return FALSE; /* Skip path component */ lpSubBlock = lpNextSlash; } /* Return value */ *lplpBuffer = VersionInfo16_Value( info ); *puLen = info->wValueLength; return TRUE; } /*********************************************************************** * VerQueryValueW [VERSION.13] */ DWORD WINAPI VerQueryValueW( LPVOID pBlock, LPCWSTR lpSubBlock, LPVOID *lplpBuffer, UINT *puLen ) { VS_VERSION_INFO_STRUCT32 *info = (VS_VERSION_INFO_STRUCT32 *)pBlock; if ( VersionInfoIs16( info ) ) { ERR("called on NE resource!\n" ); return FALSE; } TRACE("(%p,%s,%p,%p)\n", pBlock, debugstr_w(lpSubBlock), lplpBuffer, puLen ); while ( *lpSubBlock ) { /* Find next path component */ LPCWSTR lpNextSlash; for ( lpNextSlash = lpSubBlock; *lpNextSlash; lpNextSlash++ ) if ( *lpNextSlash == '\\' ) break; /* Skip empty components */ if ( lpNextSlash == lpSubBlock ) { lpSubBlock++; continue; } /* We have a non-empty component: search info for key */ info = VersionInfo32_FindChild( info, lpSubBlock, lpNextSlash-lpSubBlock ); if ( !info ) return FALSE; /* Skip path component */ lpSubBlock = lpNextSlash; } /* Return value */ *lplpBuffer = VersionInfo32_Value( info ); *puLen = info->wValueLength; return TRUE; } wine-20000526/dlls/version/install.c0100644000175000001440000004077407101102522016701 0ustar julliardusers/* * Implementation of VERSION.DLL - File Installer routines * * Copyright 1996,1997 Marcus Meissner * Copyright 1997 David Cuthbert */ #include #include #include #include "windef.h" #include "winver.h" #include "wine/winestring.h" #include "winerror.h" #include "heap.h" #include "lzexpand.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ver); /****************************************************************************** * * void ver_dstring( * char const * prologue, * char const * teststring, * char const * epilogue ) * * This function will print via dprintf[_]ver to stddeb the prologue string, * followed by the address of teststring and the string it contains if * teststring is non-null or "(null)" otherwise, and then the epilogue * string followed by a new line. * * Revision history * 30-May-1997 Dave Cuthbert (dacut@ece.cmu.edu) * Original implementation as dprintf[_]ver_string * 05-Jul-1997 Dave Cuthbert (dacut@ece.cmu.edu) * Fixed problem that caused bug with tools/make_debug -- renaming * this function should fix the problem. * 15-Feb-1998 Dimitrie Paun (dimi@cs.toronto.edu) * Modified it to make it print the message using only one * dprintf[_]ver call. * *****************************************************************************/ static void ver_dstring( char const * prologue, char const * teststring, char const * epilogue ) { TRACE("%s %p (\"%s\") %s\n", prologue, (void const *) teststring, teststring ? teststring : "(null)", epilogue); } /****************************************************************************** * * int testFileExistence( * char const * path, * char const * file ) * * Tests whether a given path/file combination exists. If the file does * not exist, the return value is zero. If it does exist, the return * value is non-zero. * * Revision history * 30-May-1997 Dave Cuthbert (dacut@ece.cmu.edu) * Original implementation * *****************************************************************************/ static int testFileExistence( char const * path, char const * file ) { char filename[1024]; int filenamelen; OFSTRUCT fileinfo; int retval; fileinfo.cBytes = sizeof(OFSTRUCT); strcpy(filename, path); filenamelen = strlen(filename); /* Add a trailing \ if necessary */ if(filenamelen) { if(filename[filenamelen - 1] != '\\') strcat(filename, "\\"); } else /* specify the current directory */ strcpy(filename, ".\\"); /* Create the full pathname */ strcat(filename, file); if(OpenFile(filename, &fileinfo, OF_EXIST) == HFILE_ERROR) retval = 0; else retval = 1; return retval; } /****************************************************************************** * * int testFileExclusiveExistence( * char const * path, * char const * file ) * * Tests whether a given path/file combination exists and ensures that no * other programs have handles to the given file. If the file does not * exist or is open, the return value is zero. If it does exist, the * return value is non-zero. * * Revision history * 30-May-1997 Dave Cuthbert (dacut@ece.cmu.edu) * Original implementation * *****************************************************************************/ static int testFileExclusiveExistence( char const * path, char const * file ) { char filename[1024]; int filenamelen; OFSTRUCT fileinfo; int retval; fileinfo.cBytes = sizeof(OFSTRUCT); strcpy(filename, path); filenamelen = strlen(filename); /* Add a trailing \ if necessary */ if(filenamelen) { if(filename[filenamelen - 1] != '\\') strcat(filename, "\\"); } else /* specify the current directory */ strcpy(filename, ".\\"); /* Create the full pathname */ strcat(filename, file); if(OpenFile(filename, &fileinfo, OF_EXIST | OF_SHARE_EXCLUSIVE) == HFILE_ERROR) retval = 0; else retval = 1; return retval; } /***************************************************************************** * * VerFindFileA() [VER.8] * Determines where to install a file based on whether it locates another * version of the file in the system. The values VerFindFile returns are * used in a subsequent call to the VerInstallFile function. * * Revision history: * 30-May-1997 Dave Cuthbert (dacut@ece.cmu.edu) * Reimplementation of VerFindFile from original stub. * ****************************************************************************/ /* VerFindFile32A [VERSION.5] */ DWORD WINAPI VerFindFileA( UINT flags, LPCSTR lpszFilename, LPCSTR lpszWinDir, LPCSTR lpszAppDir, LPSTR lpszCurDir, UINT *lpuCurDirLen, LPSTR lpszDestDir, UINT *lpuDestDirLen ) { DWORD retval; char curDir[256]; char destDir[256]; unsigned int curDirSizeReq; unsigned int destDirSizeReq; retval = 0; /* Print out debugging information */ TRACE("called with parameters:\n" "\tflags = %x", flags); if(flags & VFFF_ISSHAREDFILE) TRACE(" (VFFF_ISSHAREDFILE)\n"); else TRACE("\n"); ver_dstring("\tlpszFilename = ", lpszFilename, ""); ver_dstring("\tlpszWinDir = ", lpszWinDir, ""); ver_dstring("\tlpszAppDir = ", lpszAppDir, ""); TRACE("\tlpszCurDir = %p\n", lpszCurDir); if(lpuCurDirLen) TRACE("\tlpuCurDirLen = %p (%u)\n", lpuCurDirLen, *lpuCurDirLen); else TRACE("\tlpuCurDirLen = (null)\n"); TRACE("\tlpszDestDir = %p\n", lpszDestDir); if(lpuDestDirLen) TRACE("\tlpuDestDirLen = %p (%u)\n", lpuDestDirLen, *lpuDestDirLen); /* Figure out where the file should go; shared files default to the system directory */ strcpy(curDir, ""); strcpy(destDir, ""); if(flags & VFFF_ISSHAREDFILE) { GetSystemDirectoryA(destDir, 256); /* Were we given a filename? If so, try to find the file. */ if(lpszFilename) { if(testFileExistence(destDir, lpszFilename)) { strcpy(curDir, destDir); if(!testFileExclusiveExistence(destDir, lpszFilename)) retval |= VFF_FILEINUSE; } else if(lpszAppDir && testFileExistence(lpszAppDir, lpszFilename)) { strcpy(curDir, lpszAppDir); retval |= VFF_CURNEDEST; if(!testFileExclusiveExistence(lpszAppDir, lpszFilename)) retval |= VFF_FILEINUSE; } } } else if(!(flags & VFFF_ISSHAREDFILE)) { /* not a shared file */ if(lpszAppDir) { char systemDir[256]; GetSystemDirectoryA(systemDir, 256); strcpy(destDir, lpszAppDir); if(lpszFilename) { if(testFileExistence(lpszAppDir, lpszFilename)) { strcpy(curDir, lpszAppDir); if(!testFileExclusiveExistence(lpszAppDir, lpszFilename)) retval |= VFF_FILEINUSE; } else if(testFileExistence(systemDir, lpszFilename)) { strcpy(curDir, systemDir); retval |= VFF_CURNEDEST; if(!testFileExclusiveExistence(systemDir, lpszFilename)) retval |= VFF_FILEINUSE; } } } } curDirSizeReq = strlen(curDir) + 1; destDirSizeReq = strlen(destDir) + 1; /* Make sure that the pointers to the size of the buffers are valid; if not, do NOTHING with that buffer. If that pointer is valid, then make sure that the buffer pointer is valid, too! */ if(lpuDestDirLen && lpszDestDir) { if(*lpuDestDirLen < destDirSizeReq) { retval |= VFF_BUFFTOOSMALL; if (*lpuDestDirLen) { lstrcpynA(lpszDestDir, destDir, *lpuDestDirLen); } } else strcpy(lpszDestDir, destDir); *lpuDestDirLen = destDirSizeReq; } if(lpuCurDirLen && lpszCurDir) { if(*lpuCurDirLen < curDirSizeReq) { retval |= VFF_BUFFTOOSMALL; if (*lpuCurDirLen) { lstrcpynA(lpszCurDir, curDir, *lpuCurDirLen); } } else strcpy(lpszCurDir, curDir); *lpuCurDirLen = curDirSizeReq; } TRACE("ret = %lu (%s%s%s)\n", retval, (retval & VFF_CURNEDEST) ? "VFF_CURNEDEST " : "", (retval & VFF_FILEINUSE) ? "VFF_FILEINUSE " : "", (retval & VFF_BUFFTOOSMALL) ? "VFF_BUFFTOOSMALL " : ""); ver_dstring("\t(Exit) lpszCurDir = ", lpszCurDir, ""); if(lpuCurDirLen) TRACE("\t(Exit) lpuCurDirLen = %p (%u)\n", lpuCurDirLen, *lpuCurDirLen); else TRACE("\t(Exit) lpuCurDirLen = (null)\n"); ver_dstring("\t(Exit) lpszDestDir = ", lpszDestDir, ""); if(lpuDestDirLen) TRACE("\t(Exit) lpuDestDirLen = %p (%u)\n", lpuDestDirLen, *lpuDestDirLen); return retval; } /***************************************************************************** * VerFindFileW [VERSION.6] */ DWORD WINAPI VerFindFileW( UINT flags,LPCWSTR filename,LPCWSTR windir,LPCWSTR appdir, LPWSTR curdir,UINT *pcurdirlen,LPWSTR destdir,UINT *pdestdirlen ) { UINT curdirlen, destdirlen; LPSTR wfn,wwd,wad,wdd,wcd; DWORD ret; wfn = HEAP_strdupWtoA( GetProcessHeap(), 0, filename ); wwd = HEAP_strdupWtoA( GetProcessHeap(), 0, windir ); wad = HEAP_strdupWtoA( GetProcessHeap(), 0, appdir ); wcd = HeapAlloc( GetProcessHeap(), 0, *pcurdirlen ); wdd = HeapAlloc( GetProcessHeap(), 0, *pdestdirlen ); ret = VerFindFileA(flags,wfn,wwd,wad,wcd,&curdirlen,wdd,&destdirlen); lstrcpynAtoW(curdir,wcd,*pcurdirlen); lstrcpynAtoW(destdir,wdd,*pdestdirlen); *pcurdirlen = strlen(wcd); *pdestdirlen = strlen(wdd); HeapFree( GetProcessHeap(), 0, wfn ); HeapFree( GetProcessHeap(), 0, wwd ); HeapFree( GetProcessHeap(), 0, wad ); HeapFree( GetProcessHeap(), 0, wcd ); HeapFree( GetProcessHeap(), 0, wdd ); return ret; } static LPBYTE _fetch_versioninfo(LPSTR fn,VS_FIXEDFILEINFO **vffi) { DWORD alloclen; LPBYTE buf; DWORD ret; alloclen = 1000; buf=HeapAlloc(GetProcessHeap(), 0, alloclen); if(buf == NULL) { WARN("Memory exausted while fetching version info!"); return NULL; } while (1) { ret = GetFileVersionInfoA(fn,0,alloclen,buf); if (!ret) { HeapFree(GetProcessHeap(), 0, buf); return NULL; } if (alloclen<*(WORD*)buf) { alloclen = *(WORD*)buf; HeapFree(GetProcessHeap(), 0, buf); buf = HeapAlloc(GetProcessHeap(), 0, alloclen); if(buf == NULL) { WARN("Memory exausted while fetching version info!"); return NULL; } } else { *vffi = (VS_FIXEDFILEINFO*)(buf+0x14); if ((*vffi)->dwSignature == 0x004f0049) /* hack to detect unicode */ *vffi = (VS_FIXEDFILEINFO*)(buf+0x28); if ((*vffi)->dwSignature != VS_FFI_SIGNATURE) WARN("Bad VS_FIXEDFILEINFO signature 0x%08lx\n",(*vffi)->dwSignature); return buf; } } } static DWORD _error2vif(DWORD error) { switch (error) { case ERROR_ACCESS_DENIED: return VIF_ACCESSVIOLATION; case ERROR_SHARING_VIOLATION: return VIF_SHARINGVIOLATION; default: return 0; } } /****************************************************************************** * VerInstallFileA [VERSION.7] */ DWORD WINAPI VerInstallFileA( UINT flags,LPCSTR srcfilename,LPCSTR destfilename,LPCSTR srcdir, LPCSTR destdir,LPCSTR curdir,LPSTR tmpfile,UINT *tmpfilelen ) { LPCSTR pdest; char destfn[260],tmpfn[260],srcfn[260]; HFILE hfsrc,hfdst; DWORD attr,ret,xret,tmplast; LPBYTE buf1,buf2; OFSTRUCT ofs; TRACE("(%x,%s,%s,%s,%s,%s,%p,%d)\n", flags,srcfilename,destfilename,srcdir,destdir,curdir,tmpfile,*tmpfilelen ); xret = 0; sprintf(srcfn,"%s\\%s",srcdir,srcfilename); if (!destdir || !*destdir) pdest = srcdir; else pdest = destdir; sprintf(destfn,"%s\\%s",pdest,destfilename); hfsrc=LZOpenFileA(srcfn,&ofs,OF_READ); if (hfsrc==HFILE_ERROR) return VIF_CANNOTREADSRC; sprintf(tmpfn,"%s\\%s",pdest,destfilename); tmplast=strlen(pdest)+1; attr = GetFileAttributesA(tmpfn); if (attr!=-1) { if (attr & FILE_ATTRIBUTE_READONLY) { LZClose(hfsrc); return VIF_WRITEPROT; } /* FIXME: check if file currently in use and return VIF_FILEINUSE */ } attr = -1; if (flags & VIFF_FORCEINSTALL) { if (tmpfile[0]) { sprintf(tmpfn,"%s\\%s",pdest,tmpfile); tmplast = strlen(pdest)+1; attr = GetFileAttributesA(tmpfn); /* if it exists, it has been copied by the call before. * we jump over the copy part... */ } } if (attr == -1) { char *s; GetTempFileNameA(pdest,"ver",0,tmpfn); /* should not fail ... */ s=strrchr(tmpfn,'\\'); if (s) tmplast = s-tmpfn; else tmplast = 0; hfdst = OpenFile(tmpfn,&ofs,OF_CREATE); if (hfdst == HFILE_ERROR) { LZClose(hfsrc); return VIF_CANNOTCREATE; /* | translated dos error */ } ret = LZCopy(hfsrc,hfdst); _lclose(hfdst); if (((long) ret) < 0) { /* translate LZ errors into VIF_xxx */ switch (ret) { case LZERROR_BADINHANDLE: case LZERROR_READ: case LZERROR_BADVALUE: case LZERROR_UNKNOWNALG: ret = VIF_CANNOTREADSRC; break; case LZERROR_BADOUTHANDLE: case LZERROR_WRITE: ret = VIF_OUTOFMEMORY; /* FIXME: correct? */ break; case LZERROR_GLOBALLOC: case LZERROR_GLOBLOCK: ret = VIF_OUTOFSPACE; break; default: /* unknown error, should not happen */ ret = 0; break; } if (ret) { LZClose(hfsrc); return ret; } } } xret = 0; if (!(flags & VIFF_FORCEINSTALL)) { VS_FIXEDFILEINFO *destvffi,*tmpvffi; buf1 = _fetch_versioninfo(destfn,&destvffi); if (buf1) { buf2 = _fetch_versioninfo(tmpfn,&tmpvffi); if (buf2) { char *tbuf1,*tbuf2; UINT len1,len2; len1=len2=40; /* compare file versions */ if ((destvffi->dwFileVersionMS > tmpvffi->dwFileVersionMS)|| ((destvffi->dwFileVersionMS==tmpvffi->dwFileVersionMS)&& (destvffi->dwFileVersionLS > tmpvffi->dwFileVersionLS) ) ) xret |= VIF_MISMATCH|VIF_SRCOLD; /* compare filetypes and filesubtypes */ if ((destvffi->dwFileType!=tmpvffi->dwFileType) || (destvffi->dwFileSubtype!=tmpvffi->dwFileSubtype) ) xret |= VIF_MISMATCH|VIF_DIFFTYPE; if (VerQueryValueA(buf1,"\\VarFileInfo\\Translation",(LPVOID*)&tbuf1,&len1) && VerQueryValueA(buf2,"\\VarFileInfo\\Translation",(LPVOID*)&tbuf2,&len2) ) { /* irgendwas mit tbuf1 und tbuf2 machen * generiert DIFFLANG|MISMATCH */ } HeapFree(GetProcessHeap(), 0, buf2); } else xret=VIF_MISMATCH|VIF_SRCOLD; HeapFree(GetProcessHeap(), 0, buf1); } } if (xret) { if (*tmpfilelen #include #include #include #include "neexe.h" #include "module.h" #include "winver.h" #include "lzexpand.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ver); /*********************************************************************** * read_xx_header [internal] */ static int read_xx_header( HFILE lzfd ) { IMAGE_DOS_HEADER mzh; char magic[3]; LZSeek( lzfd, 0, SEEK_SET ); if ( sizeof(mzh) != LZRead( lzfd, &mzh, sizeof(mzh) ) ) return 0; if ( mzh.e_magic != IMAGE_DOS_SIGNATURE ) return 0; LZSeek( lzfd, mzh.e_lfanew, SEEK_SET ); if ( 2 != LZRead( lzfd, magic, 2 ) ) return 0; LZSeek( lzfd, mzh.e_lfanew, SEEK_SET ); if ( magic[0] == 'N' && magic[1] == 'E' ) return IMAGE_OS2_SIGNATURE; if ( magic[0] == 'P' && magic[1] == 'E' ) return IMAGE_NT_SIGNATURE; magic[2] = '\0'; WARN("Can't handle %s files.\n", magic ); return 0; } /*********************************************************************** * load_ne_resource [internal] */ static BOOL find_ne_resource( HFILE lzfd, LPCSTR typeid, LPCSTR resid, DWORD *resLen, DWORD *resOff ) { IMAGE_OS2_HEADER nehd; NE_TYPEINFO *typeInfo; NE_NAMEINFO *nameInfo; DWORD nehdoffset; LPBYTE resTab; DWORD resTabSize; /* Read in NE header */ nehdoffset = LZSeek( lzfd, 0, SEEK_CUR ); if ( sizeof(nehd) != LZRead( lzfd, &nehd, sizeof(nehd) ) ) return 0; resTabSize = nehd.ne_restab - nehd.ne_rsrctab; if ( !resTabSize ) { TRACE("No resources in NE dll\n" ); return FALSE; } /* Read in resource table */ resTab = HeapAlloc( GetProcessHeap(), 0, resTabSize ); if ( !resTab ) return FALSE; LZSeek( lzfd, nehd.ne_rsrctab + nehdoffset, SEEK_SET ); if ( resTabSize != LZRead( lzfd, resTab, resTabSize ) ) { HeapFree( GetProcessHeap(), 0, resTab ); return FALSE; } /* Find resource */ typeInfo = (NE_TYPEINFO *)(resTab + 2); typeInfo = NE_FindTypeSection( resTab, typeInfo, typeid ); if ( !typeInfo ) { TRACE("No typeid entry found for %p\n", typeid ); HeapFree( GetProcessHeap(), 0, resTab ); return FALSE; } nameInfo = NE_FindResourceFromType( resTab, typeInfo, resid ); if ( !nameInfo ) { TRACE("No resid entry found for %p\n", typeid ); HeapFree( GetProcessHeap(), 0, resTab ); return FALSE; } /* Return resource data */ if ( resLen ) *resLen = nameInfo->length << *(WORD *)resTab; if ( resOff ) *resOff = nameInfo->offset << *(WORD *)resTab; HeapFree( GetProcessHeap(), 0, resTab ); return TRUE; } /*********************************************************************** * load_pe_resource [internal] */ static BOOL find_pe_resource( HFILE lzfd, LPCSTR typeid, LPCSTR resid, DWORD *resLen, DWORD *resOff ) { IMAGE_NT_HEADERS pehd; DWORD pehdoffset; PIMAGE_DATA_DIRECTORY resDataDir; PIMAGE_SECTION_HEADER sections; LPBYTE resSection; DWORD resSectionSize; DWORD resDir; PIMAGE_RESOURCE_DIRECTORY resPtr; PIMAGE_RESOURCE_DATA_ENTRY resData; int i, nSections; /* Read in PE header */ pehdoffset = LZSeek( lzfd, 0, SEEK_CUR ); if ( sizeof(pehd) != LZRead( lzfd, &pehd, sizeof(pehd) ) ) return 0; resDataDir = pehd.OptionalHeader.DataDirectory+IMAGE_FILE_RESOURCE_DIRECTORY; if ( !resDataDir->Size ) { TRACE("No resources in PE dll\n" ); return FALSE; } /* Read in section table */ nSections = pehd.FileHeader.NumberOfSections; sections = HeapAlloc( GetProcessHeap(), 0, nSections * sizeof(IMAGE_SECTION_HEADER) ); if ( !sections ) return FALSE; LZSeek( lzfd, pehdoffset + sizeof(DWORD) + /* Signature */ sizeof(IMAGE_FILE_HEADER) + pehd.FileHeader.SizeOfOptionalHeader, SEEK_SET ); if ( nSections * sizeof(IMAGE_SECTION_HEADER) != LZRead( lzfd, sections, nSections * sizeof(IMAGE_SECTION_HEADER) ) ) { HeapFree( GetProcessHeap(), 0, sections ); return FALSE; } /* Find resource section */ for ( i = 0; i < nSections; i++ ) if ( resDataDir->VirtualAddress >= sections[i].VirtualAddress && resDataDir->VirtualAddress < sections[i].VirtualAddress + sections[i].SizeOfRawData ) break; if ( i == nSections ) { HeapFree( GetProcessHeap(), 0, sections ); TRACE("Couldn't find resource section\n" ); return FALSE; } /* Read in resource section */ resSectionSize = sections[i].SizeOfRawData; resSection = HeapAlloc( GetProcessHeap(), 0, resSectionSize ); if ( !resSection ) { HeapFree( GetProcessHeap(), 0, sections ); return FALSE; } LZSeek( lzfd, sections[i].PointerToRawData, SEEK_SET ); if ( resSectionSize != LZRead( lzfd, resSection, resSectionSize ) ) { HeapFree( GetProcessHeap(), 0, resSection ); HeapFree( GetProcessHeap(), 0, sections ); return FALSE; } /* Find resource */ resDir = (DWORD)resSection + (resDataDir->VirtualAddress - sections[i].VirtualAddress); resPtr = (PIMAGE_RESOURCE_DIRECTORY)resDir; resPtr = GetResDirEntryA( resPtr, typeid, resDir, FALSE ); if ( !resPtr ) { TRACE("No typeid entry found for %p\n", typeid ); HeapFree( GetProcessHeap(), 0, resSection ); HeapFree( GetProcessHeap(), 0, sections ); return FALSE; } resPtr = GetResDirEntryA( resPtr, resid, resDir, FALSE ); if ( !resPtr ) { TRACE("No resid entry found for %p\n", resid ); HeapFree( GetProcessHeap(), 0, resSection ); HeapFree( GetProcessHeap(), 0, sections ); return FALSE; } resPtr = GetResDirEntryA( resPtr, 0, resDir, TRUE ); if ( !resPtr ) { TRACE("No default language entry found for %p\n", resid ); HeapFree( GetProcessHeap(), 0, resSection ); HeapFree( GetProcessHeap(), 0, sections ); return FALSE; } /* Find resource data section */ resData = (PIMAGE_RESOURCE_DATA_ENTRY)resPtr; for ( i = 0; i < nSections; i++ ) if ( resData->OffsetToData >= sections[i].VirtualAddress && resData->OffsetToData < sections[i].VirtualAddress + sections[i].SizeOfRawData ) break; if ( i == nSections ) { TRACE("Couldn't find resource data section\n" ); HeapFree( GetProcessHeap(), 0, resSection ); HeapFree( GetProcessHeap(), 0, sections ); return FALSE; } /* Return resource data */ if ( resLen ) *resLen = resData->Size; if ( resOff ) *resOff = resData->OffsetToData - sections[i].VirtualAddress + sections[i].PointerToRawData; HeapFree( GetProcessHeap(), 0, resSection ); HeapFree( GetProcessHeap(), 0, sections ); return TRUE; } /*********************************************************************** * GetFileResourceSize32 [internal] */ DWORD WINAPI GetFileResourceSize( LPCSTR lpszFileName, LPCSTR lpszResType, LPCSTR lpszResId, LPDWORD lpdwFileOffset ) { BOOL retv = FALSE; HFILE lzfd; OFSTRUCT ofs; DWORD reslen; TRACE("(%s,type=0x%lx,id=0x%lx,off=%p)\n", debugstr_a(lpszFileName), (LONG)lpszResType, (LONG)lpszResId, lpszResId ); lzfd = LZOpenFileA( lpszFileName, &ofs, OF_READ ); if ( !lzfd ) return 0; switch ( read_xx_header( lzfd ) ) { case IMAGE_OS2_SIGNATURE: retv = find_ne_resource( lzfd, lpszResType, lpszResId, &reslen, lpdwFileOffset ); break; case IMAGE_NT_SIGNATURE: retv = find_pe_resource( lzfd, lpszResType, lpszResId, &reslen, lpdwFileOffset ); break; } LZClose( lzfd ); return retv? reslen : 0; } /*********************************************************************** * GetFileResource32 [internal] */ DWORD WINAPI GetFileResource( LPCSTR lpszFileName, LPCSTR lpszResType, LPCSTR lpszResId, DWORD dwFileOffset, DWORD dwResLen, LPVOID lpvData ) { BOOL retv = FALSE; HFILE lzfd; OFSTRUCT ofs; DWORD reslen = dwResLen; TRACE("(%s,type=0x%lx,id=0x%lx,off=%ld,len=%ld,data=%p)\n", debugstr_a(lpszFileName), (LONG)lpszResType, (LONG)lpszResId, dwFileOffset, dwResLen, lpvData ); lzfd = LZOpenFileA( lpszFileName, &ofs, OF_READ ); if ( lzfd == 0 ) return 0; if ( !dwFileOffset ) { switch ( read_xx_header( lzfd ) ) { case IMAGE_OS2_SIGNATURE: retv = find_ne_resource( lzfd, lpszResType, lpszResId, &reslen, &dwFileOffset ); break; case IMAGE_NT_SIGNATURE: retv = find_pe_resource( lzfd, lpszResType, lpszResId, &reslen, &dwFileOffset ); break; } if ( !retv ) { LZClose( lzfd ); return 0; } } LZSeek( lzfd, dwFileOffset, SEEK_SET ); reslen = LZRead( lzfd, lpvData, min( reslen, dwResLen ) ); LZClose( lzfd ); return reslen; } wine-20000526/dlls/version/ver.spec0100644000175000001440000000123107042703410016527 0ustar julliardusersname ver type win16 #1 DLLENTRYPOINT 2 pascal GetFileResourceSize(str segptr segptr ptr) GetFileResourceSize16 3 pascal GetFileResource(str segptr segptr long long ptr) GetFileResource16 6 pascal GetFileVersionInfoSize(str ptr) GetFileVersionInfoSize16 7 pascal GetFileVersionInfo(str long long ptr) GetFileVersionInfo16 8 pascal VerFindFile(word str str str ptr ptr ptr ptr) VerFindFile16 9 pascal VerInstallFile(word str str str str str ptr ptr) VerInstallFile16 10 pascal VerLanguageName(word ptr word) VerLanguageName16 11 pascal VerQueryValue(segptr str ptr ptr) VerQueryValue16 20 stub GETFILEVERSIONINFORAW #21 VERFTHK_THUNKDATA16 #22 VERTHKSL_THUNKDATA16 wine-20000526/dlls/version/ver16.c0100644000175000001440000001212107106374424016200 0ustar julliardusers/* * Implementation of VER.DLL * * Copyright 1999 Ulrich Weigand */ #include "winbase.h" #include "winver.h" #include "ldt.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(ver) /************************************************************************* * GetFileResourceSize16 [VER.2] */ DWORD WINAPI GetFileResourceSize16( LPCSTR lpszFileName, SEGPTR spszResType, SEGPTR spszResId, LPDWORD lpdwFileOffset ) { LPCSTR lpszResType = HIWORD( spszResType )? PTR_SEG_TO_LIN( spszResType ) : (LPCSTR)spszResType; LPCSTR lpszResId = HIWORD( spszResId )? PTR_SEG_TO_LIN( spszResId ) : (LPCSTR)spszResId; return GetFileResourceSize( lpszFileName, lpszResType, lpszResId, lpdwFileOffset ); } /************************************************************************* * GetFileResource16 [VER.3] */ DWORD WINAPI GetFileResource16( LPCSTR lpszFileName, SEGPTR spszResType, SEGPTR spszResId, DWORD dwFileOffset, DWORD dwResLen, LPVOID lpvData ) { LPCSTR lpszResType = HIWORD( spszResType )? PTR_SEG_TO_LIN( spszResType ) : (LPCSTR)spszResType; LPCSTR lpszResId = HIWORD( spszResId )? PTR_SEG_TO_LIN( spszResId ) : (LPCSTR)spszResId; return GetFileResource( lpszFileName, lpszResType, lpszResId, dwFileOffset, dwResLen, lpvData ); } /************************************************************************* * GetFileVersionInfoSize16 [VER.6] */ DWORD WINAPI GetFileVersionInfoSize16( LPCSTR lpszFileName, LPDWORD lpdwHandle ) { TRACE("(%s, %p)\n", debugstr_a(lpszFileName), lpdwHandle ); return GetFileVersionInfoSizeA( lpszFileName, lpdwHandle ); } /************************************************************************* * GetFileVersionInfo16 [VER.7] */ DWORD WINAPI GetFileVersionInfo16( LPCSTR lpszFileName, DWORD handle, DWORD cbBuf, LPVOID lpvData ) { TRACE("(%s, %08lx, %ld, %p)\n", debugstr_a(lpszFileName), handle, cbBuf, lpvData ); return GetFileVersionInfoA( lpszFileName, handle, cbBuf, lpvData ); } /************************************************************************* * VerFindFile16 [VER.8] */ DWORD WINAPI VerFindFile16( UINT16 flags, LPCSTR lpszFilename, LPCSTR lpszWinDir, LPCSTR lpszAppDir, LPSTR lpszCurDir, UINT16 *lpuCurDirLen, LPSTR lpszDestDir, UINT16 *lpuDestDirLen ) { UINT curDirLen, destDirLen; DWORD retv = VerFindFileA( flags, lpszFilename, lpszWinDir, lpszAppDir, lpszCurDir, &curDirLen, lpszDestDir, &destDirLen ); *lpuCurDirLen = (UINT16)curDirLen; *lpuDestDirLen = (UINT16)destDirLen; return retv; } /************************************************************************* * VerInstallFile16 [VER.9] */ DWORD WINAPI VerInstallFile16( UINT16 flags, LPCSTR lpszSrcFilename, LPCSTR lpszDestFilename, LPCSTR lpszSrcDir, LPCSTR lpszDestDir, LPCSTR lpszCurDir, LPSTR lpszTmpFile, UINT16 *lpwTmpFileLen ) { UINT filelen; DWORD retv = VerInstallFileA( flags, lpszSrcFilename, lpszDestFilename, lpszSrcDir, lpszDestDir, lpszCurDir, lpszTmpFile, &filelen); *lpwTmpFileLen = (UINT16)filelen; return retv; } /************************************************************************* * VerLanguageName16 [VER.10] */ DWORD WINAPI VerLanguageName16( UINT16 uLang, LPSTR lpszLang, UINT16 cbLang ) { return VerLanguageNameA( uLang, lpszLang, cbLang ); } /************************************************************************* * VerQueryValue16 [VER.11] */ DWORD WINAPI VerQueryValue16( SEGPTR spvBlock, LPCSTR lpszSubBlock, SEGPTR *lpspBuffer, UINT16 *lpcb ) { LPVOID lpvBlock = PTR_SEG_TO_LIN( spvBlock ); LPVOID buffer = lpvBlock; UINT buflen; DWORD retv; TRACE("(%p, %s, %p, %p)\n", lpvBlock, debugstr_a(lpszSubBlock), lpspBuffer, lpcb ); retv = VerQueryValueA( lpvBlock, lpszSubBlock, &buffer, &buflen ); if ( !retv ) return FALSE; if ( OFFSETOF( spvBlock ) + ((char *) buffer - (char *) lpvBlock) >= 0x10000 ) { FIXME("offset %08X too large relative to %04X:%04X\n", (char *) buffer - (char *) lpvBlock, SELECTOROF( spvBlock ), OFFSETOF( spvBlock ) ); return FALSE; } if (lpcb) *lpcb = buflen; *lpspBuffer = (SEGPTR) ((char *) spvBlock + ((char *) buffer - (char *) lpvBlock)); return retv; } wine-20000526/dlls/version/version.spec0100644000175000001440000000162007077362253017440 0ustar julliardusersname version type win32 import kernel32.dll import lz32.dll @ stdcall GetFileVersionInfoA(str long long ptr) GetFileVersionInfoA @ stdcall GetFileVersionInfoSizeA(str ptr) GetFileVersionInfoSizeA @ stdcall GetFileVersionInfoSizeW(wstr ptr) GetFileVersionInfoSizeW @ stdcall GetFileVersionInfoW(wstr long long ptr) GetFileVersionInfoW @ stub VerFThk_ThunkData32 @ stdcall VerFindFileA(long str str str ptr ptr ptr ptr) VerFindFileA @ stdcall VerFindFileW(long wstr wstr wstr ptr ptr ptr ptr) VerFindFileW @ stdcall VerInstallFileA(long str str str str str ptr ptr) VerInstallFileA @ stdcall VerInstallFileW(long wstr wstr wstr wstr wstr ptr ptr) VerInstallFileW @ forward VerLanguageNameA KERNEL32.VerLanguageNameA @ forward VerLanguageNameW KERNEL32.VerLanguageNameW @ stdcall VerQueryValueA(ptr str ptr ptr) VerQueryValueA @ stdcall VerQueryValueW(ptr wstr ptr ptr) VerQueryValueW @ stub VerThkSL_ThunkData32 wine-20000526/dlls/win32s/0040755000175000001440000000000007113604212014524 5ustar julliarduserswine-20000526/dlls/win32s/.cvsignore0100644000175000001440000000006307057042041016523 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libw32skrnl.so.1.0 wine-20000526/dlls/win32s/Makefile.in0100644000175000001440000000044507060456112016576 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = w32skrnl SOVERSION = 1.0 ALTNAMES = w32sys win32s16 SPEC_SRCS = w32sys.spec win32s16.spec w32skrnl.spec C_SRCS = \ w32skernel.c \ w32sys.c \ win32s16.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/win32s/w32skernel.c0100644000175000001440000000133007066752017016677 0ustar julliardusers/* * W32SKRNL * DLL for Win32s * * Copyright (c) 1997 Andreas Mohr */ #include #include "wine/w32skrnl.h" #include "winbase.h" /*********************************************************************** * GetWin32sDirectory */ LPSTR WINAPI GetWin32sDirectory(void) { static char sysdir[0x80]; LPSTR text; GetEnvironmentVariableA("winsysdir", sysdir, 0x80); if (!sysdir) return NULL; strcat(sysdir, "\\WIN32S"); text = HeapAlloc(GetProcessHeap(), 0, strlen(sysdir)+1); strcpy(text, sysdir); return text; } /*********************************************************************** * _GetThunkBuff * FIXME: ??? */ SEGPTR WINAPI _GetThunkBuff(void) { return (SEGPTR)NULL; } wine-20000526/dlls/win32s/w32skrnl.spec0100644000175000001440000000545707004675626017115 0ustar julliardusersname w32skrnl type win32 1 stub _kSetEnvironmentVariable@8 2 stub _SzFromImte@4 3 stdcall GetCurrentTask32() GetCurrentTask 4 stub _DebugPrintf 5 stub _NtCloseSection@8 6 stub _AllocKernelHeap@8 7 stub _SelToFlat 8 stub _kGetExeVersion@4 9 stub _ResizeKernelHeap@12 10 stub _DbgBackTo32 11 stub _kGethInstance@0 12 stub SelOffsetToLinear 13 stub DebugPrintf 14 stdcall _kGetWin32sDirectory@0() GetWin32sDirectory 15 stub _sprintf 16 stub _KIsDBCSLeadByte@4 17 forward W32S_BackTo32 KERNEL32.W32S_BackTo32 18 stub _KGetDbgFlags32 19 stub SelToFlat 20 stub _FreeKernelHeap@4 21 stub WIN32SYSDLL #22 23 stub _KSilentException@4 24 stub _NtCreateSection@28 #25 stub _W32sError32@12 26 stub _NtOpenSection@12 27 stub _NtDupSection@4 28 stub _GetSelModName@20 29 stub _FGetDscr@8 30 stdcall _RtlNtStatusToDosError@4(long) RtlNtStatusToDosError #FIXME: not sure 31 stub _NtFlushVirtualMemory@16 32 stub _snprintf 33 stub _NtUnmapViewOfSection@8 #34-149 153 stub _PvAllocVirtMem@16 154 stub SetVirtMemProcess 155 stub _FFreeVirtMem@12 156 stub _FSetVirtProtect@16 157 stub _QueryVirtMem@8 158 stub _FLockVirtMem@8 159 stub _FUnlockVirtMem@8 #160-170 171 stub _HHeapCreateHeap@12 #172 173 stub _FHeapDestroy@4 174 stub _PvAllocHeapMem@12 175 stub _PvResizeHeapMem@16 176 stub _FFreeHeapMem@8 #177-196 197 stub _PpdbGetProcess@0 198 stub _ErcGetError@0 199 stub _SetError@4 #200-223 224 stub _CbSearchPath@24 225 stub _CbSearchBinPath@16 #226-230 231 stub _FFindEnvVar@8 #232-251 252 stub _SzFileFromImte@4 253 stub _ImteFromFileSz@4 254 stub _ImteFromSz@4 255 stub _FGetProcAddr@12 256 stub _KLoadLibrary@8 257 stub _KFreeLibrary@4 #258-271 272 stub _lmaUserBase #273-325 326 stub _KrnOutputDebugString@4 #327-359 360 stub _RtlRaiseException 361 stub _RtlUnwind 362 stub _RtlUnwind4 #363-401 402 stub _DfhCreateFile@12 403 stub _FCloseFile@4 404 stub _CbWriteFile@12 405 stub _LfoSetFilePos@12 406 stub _CbReadFile@12 #407-499 500 stub _SelOffsetToLinear@4 501 stub _ImteFromHModule@4 502 stub _HModuleFromImte@4 503 stub _ExitPEApp #504 stdcall _GetThunkBuff@0() _GetThunkBuff 505 stub _Dos3Call@0 506 stub _GetPEInstanceData@0 507 stub _GetThreadTask@4 508 stub _BaseAddrFromImte@4 509 stub _GetTaskId@12 510 stub _KGetProcessDebugPort@4 511 stub _W32S_BackTo32 512 stub _KReadProcessMemory32@20 513 stub _KWriteProcessMemory32@20 514 stub _KGetThreadContext32@8 515 stub _KSetThreadContext32@8 516 stub _KQueryPerformanceCounter@8 #517 518 stub _KGetExitCodeThread32@8 519 stub _KGetExitCodeProcess32@8 520 stub _KGetTaskPpdb32@4 521 stub _KGetThreadPtdb32@4 #522-599 600 stub _GetCurProcFIOData@0 601 stub _KUseObject32@4 602 stub _KUnuseObject32@4 603 stub _KErcGetError32@0 604 stub _KCreateProcessHeap@4 605 stub _KGetSystemInfo@8 606 stub _KGlobalMemStat@4 607 stub _GetHandleFromAddr@4 608 stub _TlsNullSlot@4 609 stub _FWorkingSetSize@8 wine-20000526/dlls/win32s/w32sys.c0100644000175000001440000000236007073170675016060 0ustar julliardusers/* * W32SYS * helper DLL for Win32s * * Copyright (c) 1996 Anand Kumria */ #include "windef.h" #include "w32sys.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(dll) /*********************************************************************** * GetWin32sInfo (W32SYS.12) * RETURNS * 0 on success, 1 on failure */ WORD WINAPI GetWin32sInfo16( LPWIN32SINFO lpInfo /* [out] Win32S special information */ ) { lpInfo->bMajor = 1; lpInfo->bMinor = 3; lpInfo->wBuildNumber = 0; lpInfo->fDebug = FALSE; return 0; } /*********************************************************************** * GetW32SysVersion16 (W32SYS.5) */ WORD WINAPI GetW32SysVersion16(void) { return 0x100; } /*********************************************************************** * GetPEResourceTable (W32SYS.7) * retrieves the resourcetable from the passed filedescriptor * RETURNS * dunno what. */ WORD WINAPI GetPEResourceTable16( HFILE16 hf /* [in] filedescriptor to opened executeable */ ) { return 0; } /*********************************************************************** * LoadPeResource */ DWORD WINAPI LoadPeResource16(WORD x,SEGPTR y) { FIXME("(0x%04x,0x%08lx),stub!\n",x,y); return 0; } wine-20000526/dlls/win32s/w32sys.spec0100644000175000001440000000057606766206317016600 0ustar julliardusersname w32sys type win16 #1 WEP 2 pascal16 IsPeFormat(str word) IsPeFormat16 3 stub EXECPE 4 stub GETPEEXEINFO 5 pascal GetW32SysVersion() GetW32SysVersion16 6 stub LOADPERESOURCE 7 pascal16 GetPEResourceTable(word) GetPEResourceTable16 8 stub EXECPEEX 9 stub ITSME 10 stub W32SERROR 11 pascal LoadPeResource(word ptr) LoadPeResource16 12 pascal16 GetWin32sInfo(ptr) GetWin32sInfo16 wine-20000526/dlls/win32s/win32s16.c0100644000175000001440000000121707070212246016166 0ustar julliardusers/* * WIN32S16 * DLL for Win32s * * Copyright (c) 1997 Andreas Mohr */ #include #include #include "windef.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(dll); /*********************************************************************** * BootTask16 */ void WINAPI BootTask16() { MESSAGE("BootTask(): should only be used by WIN32S.EXE.\n"); } /*********************************************************************** * StackLinearToSegmented (WIN32S16.43) * * Written without any docu. */ SEGPTR WINAPI StackLinearToSegmented16(WORD w1, WORD w2) { FIXME("(%d,%d):stub.\n",w1,w2); return (SEGPTR)NULL; } wine-20000526/dlls/win32s/win32s16.spec0100644000175000001440000000321706752006277016713 0ustar julliardusersname win32s16 type win16 1 stub WEP 2 pascal16 BootTask() BootTask16 3 stub CREATEPROCESS 4 stub WAITFORDEBUGEVENT 5 pascal CONTINUEDEBUGEVENT(long long long) ContinueDebugEvent 6 pascal READPROCESSMEMORY(long ptr ptr long ptr) ReadProcessMemory 7 stub WRITEPROCESSMEMORY 8 stub GETTHREADCONTEXT 9 stub SETTHREADCONTEXT 10 pascal GETLASTERROR() GetLastError 11 pascal CLOSEHANDLE(long) CloseHandle 12 stub ALLOCCLBKTO32BDLL 13 pascal GETEXITCODETHREAD(long ptr) GetExitCodeThread 14 stub GETEXITCODEPROCESS 15 stub OPENPROCESS 16 stub OPENTHREAD 17 stub GETTHREADSELECTORENTRY 18 pascal VIRTUALQUERYEX(long ptr ptr long) VirtualQueryEx 19 pascal VIRTUALPROTECTEX(long ptr long long ptr) VirtualProtectEx 20 stub KGETTASKPPDB 21 stub KGETTHREADPTDB 22 stub FREECALLBACK 23 stub RELEASECSALIAS 24 stub EXCHANGEPFN32INSTUB 25 stub SELCBCS 26 stub DESTROYPEHEADER 27 stub SELCBDS 28 stub GETCSALIAS 29 stub SELFLATCODE 30 stub HUNITOANSIDBCS 31 stub ALLOCUTPROC32 32 stub FLATDATA 33 stub CODEDATA 34 stub MYGLOBALFREE 35 stub FREE32BDLLCBENTRIES 36 stub SETFS 37 stub PELOADRESOURCEHANDLER 38 stub CHECKDEBUG 39 stub REMOVEH32FROMWIN32S 40 stub RMEMCPY 41 stub INITRESLOADER 42 stub FREESELECTOROFFSET 43 pascal StackLinearToSegmented(word word) StackLinearToSegmented16 44 stub GETMODULEFILENAME32S 45 stub FAPILOG16 46 stub ALLOCCALLBACK 47 stub LINEARTOHUGESELECTOROFFSET 48 pascal UTSelectorOffsetToLinear(ptr) UTSelectorOffsetToLinear16 49 pascal UTLinearToSelectorOffset(ptr) UTLinearToSelectorOffset16 50 stub SELFOREIGNTIB 51 stub MYGLOBALREALLOC 52 stub CREATEPEHEADER 53 stub FINDGLOBALHANDLE #54-289 exist, but function names blanked out 143 equate win32s16_143 0x100 wine-20000526/dlls/win87em/0040755000175000001440000000000007113604212014675 5ustar julliarduserswine-20000526/dlls/win87em/.cvsignore0100644000175000001440000000006207045213575016704 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libwin87em.so.1.0 wine-20000526/dlls/win87em/Makefile.in0100644000175000001440000000031707060307303016742 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = win87em SOVERSION = 1.0 SPEC_SRCS = win87em.spec C_SRCS = \ emulate.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/win87em/emulate.c0100644000175000001440000001500307076152246016506 0ustar julliardusers#include #include "miscemu.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(int) struct Win87EmInfoStruct { unsigned short Version; unsigned short SizeSaveArea; unsigned short WinDataSeg; unsigned short WinCodeSeg; unsigned short Have80x87; unsigned short Unused; }; /* Implementing this is easy cause Linux and *BSD* ALWAYS have a numerical * coprocessor. (either real or emulated on kernellevel) */ /* win87em.dll also sets interrupt vectors: 2 (NMI), 0x34 - 0x3f (emulator * calls of standard libraries, see Ralph Browns interrupt list), 0x75 * (int13 error reporting of coprocessor) */ /* have a look at /usr/src/linux/arch/i386/math-emu/ *.[ch] for more info * especially control_w.h and status_w.h */ /* FIXME: Still rather skeletal implementation only */ static BOOL Installed = 0; static WORD RefCount = 0; static WORD CtrlWord_1 = 0; static WORD CtrlWord_2 = 0; static WORD CtrlWord_Internal = 0; static WORD StatusWord_1 = 0x000b; static WORD StatusWord_2 = 0; static WORD StatusWord_3 = 0; static WORD StackTop = 175; static WORD StackBottom = 0; static WORD Inthandler02hVar = 1; static void WIN87_ClearCtrlWord( CONTEXT86 *context ) { AX_reg(context) = 0; if (Installed) #ifdef __i386__ __asm__("fclex"); #else ; #endif StatusWord_3 = StatusWord_2 = 0; } static void WIN87_SetCtrlWord( CONTEXT86 *context ) { CtrlWord_1 = AX_reg(context); AX_reg(context) &= 0xff3c; if (Installed) { CtrlWord_Internal = AX_reg(context); #ifdef __i386__ __asm__("wait;fldcw %0" : : "m" (CtrlWord_Internal)); #endif } CtrlWord_2 = AX_reg(context); } void WIN87_Init( CONTEXT86 *context ) { if (Installed) { #ifdef __i386__ __asm__("fninit"); __asm__("fninit"); #endif } StackBottom = StackTop; AX_reg(context) = 0x1332; WIN87_SetCtrlWord(context); WIN87_ClearCtrlWord(context); } /*********************************************************************** * WIN87_fpmath */ void WINAPI WIN87_fpmath( CONTEXT86 *context ) { TRACE("(cs:eip=%x:%lx es=%x bx=%04x ax=%04x dx==%04x)\n", (WORD)CS_reg(context), EIP_reg(context), (WORD)ES_reg(context), BX_reg(context), AX_reg(context), DX_reg(context) ); switch(BX_reg(context)) { case 0: /* install (increase instanceref) emulator, install NMI vector */ RefCount++; if (Installed) /* InstallIntVecs02hAnd75h(); */ ; WIN87_Init(context); AX_reg(context) = 0; break; case 1: /* Init Emulator */ WIN87_Init(context); break; case 2: /* deinstall emulator (decrease instanceref), deinstall NMI vector * if zero. Every '0' call should have a matching '2' call. */ WIN87_Init(context); if (!(--RefCount) && (Installed)) /* RestoreInt02h() */ ; break; case 3: /*INT_SetHandler(0x3E,MAKELONG(AX,DX));*/ break; case 4: /* set control word (& ~(CW_Denormal|CW_Invalid)) */ /* OUT: newset control word in AX */ WIN87_SetCtrlWord(context); break; case 5: /* return internal control word in AX */ AX_reg(context) = CtrlWord_1; break; case 6: /* round top of stack to integer using method AX & 0x0C00 */ /* returns current controlword */ { DWORD dw=0; WORD save,mask; /* I don't know much about asm() programming. This could be * wrong. */ #ifdef __i386__ __asm__ __volatile__("fstcw %0;wait" : "=m" (save) : : "memory"); __asm__ __volatile__("fstcw %0;wait" : "=m" (mask) : : "memory"); __asm__ __volatile__("orw $0xC00,%0" : "=m" (mask) : : "memory"); __asm__ __volatile__("fldcw %0;wait" : : "m" (mask)); __asm__ __volatile__("frndint"); __asm__ __volatile__("fist %0;wait" : "=m" (dw) : : "memory"); __asm__ __volatile__("fldcw %0" : : "m" (save)); #endif TRACE("On top of stack is %ld\n",dw); } break; case 7: /* POP top of stack as integer into DX:AX */ /* IN: AX&0x0C00 rounding protocol */ /* OUT: DX:AX variable popped */ { DWORD dw=0; /* I don't know much about asm() programming. This could be * wrong. */ /* FIXME: could someone who really understands asm() fix this please? --AJ */ /* __asm__("fistp %0;wait" : "=m" (dw) : : "memory"); */ TRACE("On top of stack was %ld\n",dw); AX_reg(context) = LOWORD(dw); DX_reg(context) = HIWORD(dw); } break; case 8: /* restore internal status words from emulator status word */ AX_reg(context) = 0; if (Installed) { #ifdef __i386__ __asm__("fstsw %0;wait" : "=m" (StatusWord_1)); #endif AL_reg(context) = (BYTE)StatusWord_1 & 0x3f; } AX_reg(context) |= StatusWord_2; AX_reg(context) &= 0x1fff; StatusWord_2 = AX_reg(context); break; case 9: /* clear emu control word and some other things */ WIN87_ClearCtrlWord(context); break; case 10: /* dunno. but looks like returning nr. of things on stack in AX */ AX_reg(context) = 0; break; case 11: /* just returns the installed flag in DX:AX */ DX_reg(context) = 0; AX_reg(context) = Installed; break; case 12: /* save AX in some internal state var */ Inthandler02hVar = AX_reg(context); break; default: /* error. Say that loud and clear */ FIXME("unhandled switch %d\n",BX_reg(context)); AX_reg(context) = DX_reg(context) = 0xFFFF; break; } } /*********************************************************************** * WIN87_WinEm87Info */ void WINAPI WIN87_WinEm87Info(struct Win87EmInfoStruct *pWIS, int cbWin87EmInfoStruct) { FIXME("(%p,%d), stub !\n",pWIS,cbWin87EmInfoStruct); } /*********************************************************************** * WIN87_WinEm87Restore */ void WINAPI WIN87_WinEm87Restore(void *pWin87EmSaveArea, int cbWin87EmSaveArea) { FIXME("(%p,%d), stub !\n", pWin87EmSaveArea,cbWin87EmSaveArea); } /*********************************************************************** * WIN87_WinEm87Save */ void WINAPI WIN87_WinEm87Save(void *pWin87EmSaveArea, int cbWin87EmSaveArea) { FIXME("(%p,%d), stub !\n", pWin87EmSaveArea,cbWin87EmSaveArea); } wine-20000526/dlls/win87em/win87em.spec0100644000175000001440000000034006746606650017064 0ustar julliardusersname win87em type win16 1 register _fpMath() WIN87_fpmath 3 pascal16 __WinEm87Info(ptr word) WIN87_WinEm87Info 4 pascal16 __WinEm87Restore(ptr word) WIN87_WinEm87Restore 5 pascal16 __WinEm87Save(ptr word) WIN87_WinEm87Save wine-20000526/dlls/winaspi/0040755000175000001440000000000007113604213015052 5ustar julliarduserswine-20000526/dlls/winaspi/.cvsignore0100644000175000001440000000006307061526375017064 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libwnaspi32.so.1.0 wine-20000526/dlls/winaspi/Makefile.in0100644000175000001440000000041507061526375017132 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = wnaspi32 SOVERSION = 1.0 ALTNAMES = winaspi SPEC_SRCS = wnaspi32.spec winaspi.spec C_SRCS = \ aspi.c \ winaspi16.c \ winaspi32.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/winaspi/aspi.c0100644000175000001440000002025007065145467016167 0ustar julliardusers/************************************************************************** ASPI routines (C) 2000 David Elliott Licensed under the WINE (X11) license */ /* These routines are to be called from either WNASPI32 or WINASPI */ /* FIXME: * - Registry format is stupid for now.. fix that later * - No way to override automatic /proc detection, maybe provide an * HKEY_LOCAL_MACHINE\Software\Wine\Wine\Scsi regkey * - Somewhat debating an #ifdef linux... technically all this code will * run on another UNIX.. it will fail nicely. * - Please add support for mapping multiple channels on host adapters to * aspi controllers, e-mail me if you need help. */ /* Registry format is currently: HKEY_DYN_DATA WineScsi (default)=number of host adapters hHHcCCtTTdDD=linux device name */ #include #include #include #include #include #include #include #include "debugtools.h" #include "winreg.h" #include "winerror.h" #include "winescsi.h" #include "file.h" DEFAULT_DEBUG_CHANNEL(aspi); /* Internal function prototypes */ static void SCSI_GetProcinfo(); /* Exported functions */ void SCSI_Init() { /* For now we just call SCSI_GetProcinfo */ SCSI_GetProcinfo(); } int ASPI_GetNumControllers() { HKEY hkeyScsi; DWORD type = REG_DWORD; DWORD num_ha = 0; DWORD cbData = sizeof(num_ha); if( RegOpenKeyExA(HKEY_DYN_DATA, KEYNAME_SCSI, 0, KEY_ALL_ACCESS, &hkeyScsi ) != ERROR_SUCCESS ) { ERR("Could not open HEKY_DYN_DATA\\%s\n",KEYNAME_SCSI); return 0; } if( RegQueryValueExA(hkeyScsi, NULL, NULL, &type, (LPBYTE)&num_ha, &cbData ) != ERROR_SUCCESS ) { ERR("Could not query value HEKY_DYN_DATA\\%s\n",KEYNAME_SCSI); num_ha=0; } RegCloseKey(hkeyScsi); FIXME("Please fix to return number of controllers\n"); TRACE("Returning %ld host adapters\n", num_ha ); return num_ha; } BOOL SCSI_GetDeviceName( int h, int c, int t, int d, LPSTR devstr, LPDWORD lpcbData ) { char idstr[20]; HKEY hkeyScsi; DWORD type; if( RegOpenKeyExA(HKEY_DYN_DATA, KEYNAME_SCSI, 0, KEY_ALL_ACCESS, &hkeyScsi ) != ERROR_SUCCESS ) { ERR("Could not open HEKY_DYN_DATA\\%s\n",KEYNAME_SCSI); return FALSE; } sprintf(idstr, "h%02dc%02dt%02dd%02d", h, c, t, d); if( RegQueryValueExA(hkeyScsi, idstr, NULL, &type, devstr, lpcbData) != ERROR_SUCCESS ) { WARN("Could not query value HKEY_DYN_DATA\\%s\\%s\n",KEYNAME_SCSI, idstr); RegCloseKey(hkeyScsi); return FALSE; } RegCloseKey(hkeyScsi); TRACE("scsi %s: Device name: %s\n",idstr,devstr); return TRUE; } /* SCSI_GetHCforController * RETURNS * HIWORD: Host Adapter * LOWORD: Channel */ DWORD ASPI_GetHCforController( int controller ) { DWORD retval; FIXME("Please fix to map each channel of each host adapter to the proper ASPI controller number!\n"); retval = (controller << 16); return retval; }; int SCSI_OpenDevice( int h, int c, int t, int d ) { char devstr[20]; DWORD cbData = 20; int fd = -1; if(!SCSI_GetDeviceName( h, c, t, d, devstr, &cbData )) { WARN("Could not get device name for h%02dc%02dt%02dd%02d\n", h, c, t, d); return -1; } TRACE("Opening device %s mode O_RDWR\n",devstr); fd = open(devstr, O_RDWR); if( fd < 0 ) { TRACE("open failed\n"); FILE_SetDosError(); /* SetLastError() to errno */ TRACE("GetLastError: %ld\n", GetLastError()); } return fd; } #ifdef linux int SCSI_LinuxSetTimeout( int fd, int timeout ) { int retval; TRACE("Setting timeout to %d jiffies\n", timeout); retval=ioctl(fd,SG_SET_TIMEOUT,&timeout); if(retval) { WARN("Could not set timeout errno=%d!\n",errno); } return retval; } /* This function takes care of the write/read to the linux sg device. * It returns TRUE or FALSE and uses FILE_SetDosError() to convert * UNIX errno to Windows GetLastError(). The reason for that is that * several programs will check that error and we might as well set * it here. We also return the value of the read call in * lpcbBytesReturned. */ BOOL /* NOTE: This function SHOULD BLOCK */ SCSI_LinuxDeviceIo( int fd, struct sg_header * lpInBuffer, DWORD cbInBuffer, struct sg_header * lpOutBuffer, DWORD cbOutBuffer, LPDWORD lpcbBytesReturned ) { DWORD dwBytes; DWORD save_error; TRACE("Writing to Liunx sg device\n"); dwBytes = write( fd, lpInBuffer, cbInBuffer ); if( dwBytes != cbInBuffer ) { FILE_SetDosError(); save_error = GetLastError(); WARN("Not enough bytes written to scsi device. bytes=%ld .. %ld\n", cbInBuffer, dwBytes ); if( save_error == ERROR_NOT_ENOUGH_MEMORY ) MESSAGE("Your Linux kernel was not able to handle the amount of data sent to the scsi device. Try recompiling with a larger SG_BIG_BUFF value (kernel 2.0.x sg.h"); WARN("error= %ld\n", save_error ); *lpcbBytesReturned = 0; return FALSE; } TRACE("Reading reply from Linux sg device\n"); *lpcbBytesReturned = read( fd, lpOutBuffer, cbOutBuffer ); if( *lpcbBytesReturned != cbOutBuffer ) { FILE_SetDosError(); save_error = GetLastError(); WARN("Not enough bytes read from scsi device. bytes=%ld .. %ld\n", cbOutBuffer, *lpcbBytesReturned); WARN("error= %ld\n", save_error ); return FALSE; } return TRUE; } /* Internal functions */ struct LinuxProcScsiDevice { int host; int channel; int target; int lun; char vendor[9]; char model[17]; char rev[5]; char type[33]; int ansirev; }; static int SCSI_getprocentry( FILE * procfile, struct LinuxProcScsiDevice * dev ) { int result; result = fscanf( procfile, "Host: scsi%d Channel: %d Id: %d Lun: %d\n", &dev->host, &dev->channel, &dev->target, &dev->lun ); if( result == EOF ) return EOF; if( result != 4 ) return 0; result = fscanf( procfile, " Vendor: %8c Model: %16c Rev: %4c\n", dev->vendor, dev->model, dev->rev ); if( result != 3 ) return 0; result = fscanf( procfile, " Type: %32c ANSI SCSI revision: %d\n", dev->type, &dev->ansirev ); if( result != 2 ) return 0; /* Since we fscanf with %XXc instead of %s.. put a NULL at end */ dev->vendor[8] = 0; dev->model[16] = 0; dev->rev[4] = 0; dev->type[32] = 0; return 1; } static void SCSI_printprocentry( const struct LinuxProcScsiDevice * dev ) { TRACE( "Host: scsi%d Channel: %02d Id: %02d Lun: %02d\n", dev->host, dev->channel, dev->target, dev->lun ); TRACE( " Vendor: %s Model: %s Rev: %s\n", dev->vendor, dev->model, dev->rev ); TRACE( " Type: %s ANSI SCSI revision: %02d\n", dev->type, dev->ansirev ); } #endif static void SCSI_GetProcinfo() /* I'll admit, this function is somewhat of a mess... it was originally * designed to make some sort of linked list then I realized that * HKEY_DYN_DATA would be a lot less messy */ { #ifdef linux FILE * procfile = NULL; int result = 0; struct LinuxProcScsiDevice dev; char idstr[20]; char devstr[20]; int devnum=0; int num_ha = 0; HKEY hkeyScsi; DWORD disposition; procfile = fopen( "/proc/scsi/scsi", "r" ); if( !procfile ) { ERR("Could not open /proc/scsi/scsi\n"); return; } result = fscanf( procfile, "Attached devices: \n"); if( result != 0 ) { ERR("Incorrect /proc/scsi/scsi format"); return; } if( RegCreateKeyExA(HKEY_DYN_DATA, KEYNAME_SCSI, 0, NULL, REG_OPTION_VOLATILE, KEY_ALL_ACCESS, NULL, &hkeyScsi, &disposition ) != ERROR_SUCCESS ) { ERR("Could not create HEKY_DYN_DATA\\%s\n",KEYNAME_SCSI); return; } /* Read info for one device */ while( (result = SCSI_getprocentry(procfile, &dev)) > 0 ) { /* Add to registry */ sprintf(idstr, "h%02dc%02dt%02dd%02d", dev.host, dev.channel, dev.target, dev.lun); sprintf(devstr, "/dev/sg%c", 'a'+devnum); if( RegSetValueExA(hkeyScsi, idstr, 0, REG_SZ, devstr, strlen(devstr)+1 ) != ERROR_SUCCESS ) { ERR("Could not set value HEKY_DYN_DATA\\%s\\%s\n",KEYNAME_SCSI, idstr); } /* Debug output */ SCSI_printprocentry( &dev ); /* FIXME: We *REALLY* need number of controllers.. not ha */ /* num of hostadapters is highest ha + 1 */ if( dev.host >= num_ha ) num_ha = dev.host+1; devnum++; } /* while(1) */ if( result != EOF ) { ERR("Incorrect /proc/scsi/scsi format"); } fclose( procfile ); if( RegSetValueExA(hkeyScsi, NULL, 0, REG_DWORD, (LPBYTE)&num_ha, sizeof(num_ha) ) != ERROR_SUCCESS ) { ERR("Could not set value HEKY_DYN_DATA\\%s\n",KEYNAME_SCSI); } RegCloseKey(hkeyScsi); return; #endif } wine-20000526/dlls/winaspi/winaspi.spec0100644000175000001440000000041306746606650017415 0ustar julliardusersname winaspi type win16 1 pascal16 GetASPISupportInfo() GetASPISupportInfo16 2 pascal16 SendASPICommand(segptr) SendASPICommand16 3 pascal16 InsertInASPIChain(word segptr) InsertInASPIChain16 4 pascal GETASPIDLLVERSION() GetASPIDLLVersion16 5 stub ___EXPORTEDSTUB wine-20000526/dlls/winaspi/winaspi16.c0100644000175000001440000003136007070214713017043 0ustar julliardusers#include "config.h" #include #include #include #include #include #include #include #include #include #include "winbase.h" #include "aspi.h" #include "winescsi.h" #include "winaspi.h" #include "options.h" #include "heap.h" #include "debugtools.h" #include "selectors.h" #include "miscemu.h" #include "ldt.h" #include "callback.h" DEFAULT_DEBUG_CHANNEL(aspi) /* FIXME! * 1) Residual byte length reporting not handled * 2) Make this code re-entrant for multithreading * 3) Only linux supported so far */ #ifdef linux static ASPI_DEVICE_INFO *ASPI_open_devices = NULL; static FARPROC16 ASPIChainFunc = NULL; static WORD HA_Count = 1; /* host adapter count; FIXME: detect it */ static int ASPI_OpenDevice16(SRB_ExecSCSICmd16 *prb) { int fd; char idstr[20]; char device_str[50]; ASPI_DEVICE_INFO *curr; /* search list of devices to see if we've opened it already. * There is not an explicit open/close in ASPI land, so hopefully * keeping a device open won't be a problem. */ for (curr = ASPI_open_devices; curr; curr = curr->next) { if (curr->hostId == prb->SRB_HaId && curr->target == prb->SRB_Target && curr->lun == prb->SRB_Lun) { return curr->fd; } } /* device wasn't cached, go ahead and open it */ sprintf(idstr, "scsi c%1dt%1dd%1d", prb->SRB_HaId, prb->SRB_Target, prb->SRB_Lun); if (!PROFILE_GetWineIniString(idstr, "Device", "", device_str, sizeof(device_str))) { TRACE("Trying to open unlisted scsi device %s\n", idstr); return -1; } TRACE("Opening device %s=%s\n", idstr, device_str); fd = open(device_str, O_RDWR); if (fd == -1) { int save_error = errno; #ifdef HAVE_STRERROR ERR("Error opening device %s, error '%s'\n", device_str, strerror(save_error)); #else ERR("Error opening device %s, error %d\n", device_str, save_error); #endif return -1; } /* device is now open */ curr = HeapAlloc( GetProcessHeap(), 0, sizeof(ASPI_DEVICE_INFO) ); curr->fd = fd; curr->hostId = prb->SRB_HaId; curr->target = prb->SRB_Target; curr->lun = prb->SRB_Lun; /* insert new record at beginning of open device list */ curr->next = ASPI_open_devices; ASPI_open_devices = curr; return fd; } static void ASPI_DebugPrintCmd(SRB_ExecSCSICmd16 *prb, UINT16 mode) { BYTE cmd; int i; BYTE *cdb; BYTE *lpBuf = 0; switch (mode) { case ASPI_DOS: /* translate real mode address */ if (prb->SRB_BufPointer) lpBuf = (BYTE *)DOSMEM_MapRealToLinear((UINT)prb->SRB_BufPointer); break; case ASPI_WIN16: lpBuf = PTR_SEG_TO_LIN(prb->SRB_BufPointer); break; } switch (prb->CDBByte[0]) { case CMD_INQUIRY: TRACE("{\n"); TRACE("\tEVPD: %d\n", prb->CDBByte[1] & 1); TRACE("\tLUN: %d\n", (prb->CDBByte[1] & 0xc) >> 1); TRACE("\tPAGE CODE: %d\n", prb->CDBByte[2]); TRACE("\tALLOCATION LENGTH: %d\n", prb->CDBByte[4]); TRACE("\tCONTROL: %d\n", prb->CDBByte[5]); TRACE("}\n"); break; case CMD_SCAN_SCAN: TRACE("Transfer Length: %d\n", prb->CDBByte[4]); break; } TRACE("Host Adapter: %d\n", prb->SRB_HaId); TRACE("Flags: %d\n", prb->SRB_Flags); if (TARGET_TO_HOST(prb)) { TRACE("\tData transfer: Target to host. Length checked.\n"); } else if (HOST_TO_TARGET(prb)) { TRACE("\tData transfer: Host to target. Length checked.\n"); } else if (NO_DATA_TRANSFERED(prb)) { TRACE("\tData transfer: none\n"); } else { WARN("\tTransfer by scsi cmd. Length not checked\n"); } TRACE("\tResidual byte length reporting %s\n", prb->SRB_Flags & 0x4 ? "enabled" : "disabled"); TRACE("\tLinking %s\n", prb->SRB_Flags & 0x2 ? "enabled" : "disabled"); TRACE("\tPosting %s\n", prb->SRB_Flags & 0x1 ? "enabled" : "disabled"); TRACE("Target: %d\n", prb->SRB_Target); TRACE("Lun: %d\n", prb->SRB_Lun); TRACE("BufLen: %ld\n", prb->SRB_BufLen); TRACE("SenseLen: %d\n", prb->SRB_SenseLen); TRACE("BufPtr: %lx (%p)\n", prb->SRB_BufPointer, lpBuf); TRACE("LinkPointer %lx\n", prb->SRB_Rsvd1); TRACE("CDB Length: %d\n", prb->SRB_CDBLen); TRACE("POST Proc: %lx\n", (DWORD) prb->SRB_PostProc); cdb = &prb->CDBByte[0]; cmd = prb->CDBByte[0]; if (TRACE_ON(aspi)) { DPRINTF("CDB buffer["); for (i = 0; i < prb->SRB_CDBLen; i++) { if (i != 0) DPRINTF(","); DPRINTF("%02x", *cdb++); } DPRINTF("]\n"); } } static void ASPI_PrintSenseArea16(SRB_ExecSCSICmd16 *prb) { int i; BYTE *cdb; if (TRACE_ON(aspi)) { cdb = &prb->CDBByte[0]; DPRINTF("SenseArea["); for (i = 0; i < prb->SRB_SenseLen; i++) { if (i) DPRINTF(","); DPRINTF("%02x", *cdb++); } DPRINTF("]\n"); } } static void ASPI_DebugPrintResult(SRB_ExecSCSICmd16 *prb, UINT16 mode) { BYTE *lpBuf = 0; switch (mode) { case ASPI_DOS: /* translate real mode address */ if (prb->SRB_BufPointer) lpBuf = (BYTE *)DOSMEM_MapRealToLinear((UINT)prb->SRB_BufPointer); break; case ASPI_WIN16: lpBuf = PTR_SEG_TO_LIN(prb->SRB_BufPointer); break; } switch (prb->CDBByte[0]) { case CMD_INQUIRY: TRACE("Vendor: '%s'\n", lpBuf + INQUIRY_VENDOR); break; case CMD_TEST_UNIT_READY: ASPI_PrintSenseArea16(prb); break; } } static WORD ASPI_ExecScsiCmd(DWORD ptrPRB, UINT16 mode) { SRB_ExecSCSICmd16 *lpPRB = 0; struct sg_header *sg_hd, *sg_reply_hdr; int status; BYTE *lpBuf = 0; int in_len, out_len; int error_code = 0; int fd; switch (mode) { case ASPI_DOS: if (ptrPRB) lpPRB = (SRB_ExecSCSICmd16 *)DOSMEM_MapRealToLinear(ptrPRB); break; case ASPI_WIN16: lpPRB = PTR_SEG_TO_LIN(ptrPRB); break; } ASPI_DebugPrintCmd(lpPRB, mode); fd = ASPI_OpenDevice16(lpPRB); if (fd == -1) { WARN("Failed: could not open device. Device permissions !?\n"); lpPRB->SRB_Status = SS_ERR; return SS_ERR; } sg_hd = NULL; sg_reply_hdr = NULL; lpPRB->SRB_Status = SS_PENDING; switch (mode) { case ASPI_DOS: /* translate real mode address */ if (ptrPRB) lpBuf = (BYTE *)DOSMEM_MapRealToLinear((UINT)lpPRB->SRB_BufPointer); break; case ASPI_WIN16: lpBuf = PTR_SEG_TO_LIN(lpPRB->SRB_BufPointer); break; } if (!lpPRB->SRB_CDBLen) { WARN("Failed: lpPRB->SRB_CDBLen = 0.\n"); lpPRB->SRB_Status = SS_ERR; return SS_ERR; } /* build up sg_header + scsi cmd */ if (HOST_TO_TARGET(lpPRB)) { /* send header, command, and then data */ in_len = SCSI_OFF + lpPRB->SRB_CDBLen + lpPRB->SRB_BufLen; sg_hd = (struct sg_header *) malloc(in_len); memset(sg_hd, 0, SCSI_OFF); memcpy(sg_hd + 1, &lpPRB->CDBByte[0], lpPRB->SRB_CDBLen); if (lpPRB->SRB_BufLen) { memcpy(((BYTE *) sg_hd) + SCSI_OFF + lpPRB->SRB_CDBLen, lpBuf, lpPRB->SRB_BufLen); } } else { /* send header and command - no data */ in_len = SCSI_OFF + lpPRB->SRB_CDBLen; sg_hd = (struct sg_header *) malloc(in_len); memset(sg_hd, 0, SCSI_OFF); memcpy(sg_hd + 1, &lpPRB->CDBByte[0], lpPRB->SRB_CDBLen); } if (TARGET_TO_HOST(lpPRB)) { out_len = SCSI_OFF + lpPRB->SRB_BufLen; sg_reply_hdr = (struct sg_header *) malloc(out_len); memset(sg_reply_hdr, 0, SCSI_OFF); sg_hd->reply_len = out_len; } else { out_len = SCSI_OFF; sg_reply_hdr = (struct sg_header *) malloc(out_len); memset(sg_reply_hdr, 0, SCSI_OFF); sg_hd->reply_len = out_len; } status = write(fd, sg_hd, in_len); if (status < 0 || status != in_len) { int save_error = errno; WARN("Not enough bytes written to scsi device bytes=%d .. %d\n", in_len, status); if (status < 0) { if (save_error == ENOMEM) { MESSAGE("ASPI: Linux generic scsi driver\n You probably need to re-compile your kernel with a larger SG_BIG_BUFF value (sg.h)\n Suggest 130560\n"); } #ifdef HAVE_STRERROR WARN("error:= '%s'\n", strerror(save_error)); #else WARN("error:= %d\n", save_error); #endif } goto error_exit; } status = read(fd, sg_reply_hdr, out_len); if (status < 0 || status != out_len) { WARN("not enough bytes read from scsi device%d\n", status); goto error_exit; } if (sg_reply_hdr->result != 0) { error_code = sg_reply_hdr->result; WARN("reply header error (%d)\n", sg_reply_hdr->result); goto error_exit; } if (TARGET_TO_HOST(lpPRB) && lpPRB->SRB_BufLen) { memcpy(lpBuf, sg_reply_hdr + 1, lpPRB->SRB_BufLen); } /* copy in sense buffer to amount that is available in client */ if (lpPRB->SRB_SenseLen) { int sense_len = lpPRB->SRB_SenseLen; if (lpPRB->SRB_SenseLen > 16) sense_len = 16; memcpy(SENSE_BUFFER(lpPRB), &sg_reply_hdr->sense_buffer[0], sense_len); } lpPRB->SRB_Status = SS_COMP; lpPRB->SRB_HaStat = HASTAT_OK; lpPRB->SRB_TargStat = STATUS_GOOD; /* now do posting */ if (ASPI_POSTING(lpPRB) && lpPRB->SRB_PostProc) { TRACE("Post Routine (%lx) called\n", (DWORD) lpPRB->SRB_PostProc); switch (mode) { case ASPI_DOS: { SEGPTR spPRB = MapLS(lpPRB); Callbacks->CallASPIPostProc(lpPRB->SRB_PostProc, spPRB); UnMapLS(spPRB); break; } case ASPI_WIN16: Callbacks->CallASPIPostProc(lpPRB->SRB_PostProc, ptrPRB); break; } } free(sg_reply_hdr); free(sg_hd); ASPI_DebugPrintResult(lpPRB, mode); return SS_COMP; error_exit: if (error_code == EBUSY) { lpPRB->SRB_Status = SS_ASPI_IS_BUSY; TRACE("Device busy\n"); } else { WARN("Failed\n"); lpPRB->SRB_Status = SS_ERR; } /* I'm not sure exactly error codes work here * We probably should set lpPRB->SRB_TargStat, SRB_HaStat ? */ WARN("error_exit\n"); free(sg_reply_hdr); free(sg_hd); return lpPRB->SRB_Status; } #endif /*********************************************************************** * GetASPISupportInfo16 (WINASPI.1) */ WORD WINAPI GetASPISupportInfo16() { #ifdef linux TRACE("GETASPISupportInfo16\n"); /* high byte SS_COMP - low byte number of host adapters */ return ((SS_COMP << 8) | HA_Count); #else return ((SS_NO_ASPI << 8) | 0); #endif } DWORD ASPI_SendASPICommand(DWORD ptrSRB, UINT16 mode) { #ifdef linux LPSRB16 lpSRB = 0; switch (mode) { case ASPI_DOS: if (ptrSRB) lpSRB = (LPSRB16)DOSMEM_MapRealToLinear(ptrSRB); break; case ASPI_WIN16: lpSRB = PTR_SEG_TO_LIN(ptrSRB); if (ASPIChainFunc) { /* This is not the post proc, it's the chain proc this time */ DWORD ret = Callbacks->CallASPIPostProc(ASPIChainFunc, ptrSRB); if (ret) { lpSRB->inquiry.SRB_Status = SS_INVALID_SRB; return ret; } } break; } switch (lpSRB->common.SRB_Cmd) { case SC_HA_INQUIRY: lpSRB->inquiry.SRB_Status = SS_COMP; /* completed successfully */ if (lpSRB->inquiry.SRB_55AASignature == 0x55aa) { TRACE("Extended request detected (Adaptec's ASPIxDOS).\nWe don't support it at the moment.\n"); } lpSRB->inquiry.SRB_ExtBufferSize = 0x2000; /* bogus value */ lpSRB->inquiry.HA_Count = HA_Count; lpSRB->inquiry.HA_SCSI_ID = 7; /* not always ID 7 */ strcat(lpSRB->inquiry.HA_ManagerId, "Wine ASPI16"); /* max 15 chars */ strcat(lpSRB->inquiry.HA_Identifier, "Wine host"); /* FIXME: return host adapter name */ memset(lpSRB->inquiry.HA_Unique, 0, 16); /* default HA_Unique content */ lpSRB->inquiry.HA_Unique[6] = 0x02; /* Maximum Transfer Length (128K, Byte> 4-7) */ FIXME("ASPI: Partially implemented SC_HA_INQUIRY for adapter %d.\n", lpSRB->inquiry.SRB_HaId); return SS_COMP; case SC_GET_DEV_TYPE: FIXME("Not implemented SC_GET_DEV_TYPE\n"); break; case SC_EXEC_SCSI_CMD: return ASPI_ExecScsiCmd((DWORD)ptrSRB, mode); break; case SC_RESET_DEV: FIXME("Not implemented SC_RESET_DEV\n"); break; default: FIXME("Unknown command %d\n", lpSRB->common.SRB_Cmd); } #endif return SS_INVALID_SRB; } /*********************************************************************** * SendASPICommand16 (WINASPI.2) */ WORD WINAPI SendASPICommand16(SEGPTR segptr_srb) { #ifdef linux return ASPI_SendASPICommand(segptr_srb, ASPI_WIN16); #else return 0; #endif } /*********************************************************************** * InsertInASPIChain16 (WINASPI.3) */ WORD WINAPI InsertInASPIChain16(BOOL16 remove, FARPROC16 pASPIChainFunc) { #ifdef linux if (remove == TRUE) /* Remove */ { if (ASPIChainFunc == pASPIChainFunc) { ASPIChainFunc = NULL; return SS_COMP; } } else if (remove == FALSE) /* Insert */ { if (ASPIChainFunc == NULL) { ASPIChainFunc = pASPIChainFunc; return SS_COMP; } } #endif return SS_ERR; } /*********************************************************************** * GetASPIDLLVersion16 (WINASPI.4) */ DWORD WINAPI GetASPIDLLVersion16() { #ifdef linux return 2; #else return 0; #endif } wine-20000526/dlls/winaspi/winaspi32.c0100644000175000001440000003704307070212246017044 0ustar julliardusers#include "config.h" #include #include #include #include #include #include #include #include #include #include "winbase.h" #include "aspi.h" #include "wnaspi32.h" #include "winescsi.h" #include "options.h" #include "heap.h" #include "debugtools.h" #include "ldt.h" #include "callback.h" DEFAULT_DEBUG_CHANNEL(aspi); /* FIXME! * 1) Residual byte length reporting not handled * 2) Make this code re-entrant for multithreading * -- Added CriticalSection to OpenDevices function * 3) Only linux supported so far * 4) Leaves sg devices open. This may or may not be okay. A better solution * would be to close the file descriptors when the thread/process using * them no longer needs them. */ #ifdef linux static ASPI_DEVICE_INFO *ASPI_open_devices = NULL; static CRITICAL_SECTION ASPI_CritSection; #endif /* defined(linux) */ BOOL WINAPI WNASPI32_LibMain(HINSTANCE hInstDLL, DWORD fdwReason, LPVOID fImpLoad) { #ifdef linux static BOOL bInitDone=FALSE; #if 0 TRACE("0x%x 0x%1x %p\n", hInstDLL, fdwReason, fImpLoad); #endif switch( fdwReason ) { case DLL_PROCESS_ATTACH: /* Create instance data */ if(!bInitDone) { bInitDone=TRUE; /* Initialize global stuff just once */ InitializeCriticalSection(&ASPI_CritSection); SCSI_Init(); } break; case DLL_PROCESS_DETACH: /* Destroy instance data */ break; case DLL_THREAD_ATTACH: case DLL_THREAD_DETACH: break; } return TRUE; #else /* defined(linux) */ return TRUE; #endif /* defined(linux) */ } #ifdef linux static int ASPI_OpenDevice(SRB_ExecSCSICmd *prb) { int fd; DWORD hc; ASPI_DEVICE_INFO *curr; /* search list of devices to see if we've opened it already. * There is not an explicit open/close in ASPI land, so hopefully * keeping a device open won't be a problem. */ EnterCriticalSection(&ASPI_CritSection); for (curr = ASPI_open_devices; curr; curr = curr->next) { if (curr->hostId == prb->SRB_HaId && curr->target == prb->SRB_Target && curr->lun == prb->SRB_Lun) { LeaveCriticalSection(&ASPI_CritSection); return curr->fd; } } LeaveCriticalSection(&ASPI_CritSection); hc = ASPI_GetHCforController( prb->SRB_HaId ); fd = SCSI_OpenDevice( HIWORD(hc), LOWORD(hc), prb->SRB_Target, prb->SRB_Lun); if (fd == -1) { return -1; } /* device is now open */ /* FIXME: Let users specify SCSI timeout in registry */ SCSI_LinuxSetTimeout( fd, SCSI_DEFAULT_TIMEOUT ); curr = HeapAlloc( GetProcessHeap(), 0, sizeof(ASPI_DEVICE_INFO) ); curr->fd = fd; curr->hostId = prb->SRB_HaId; curr->target = prb->SRB_Target; curr->lun = prb->SRB_Lun; /* insert new record at beginning of open device list */ EnterCriticalSection(&ASPI_CritSection); curr->next = ASPI_open_devices; ASPI_open_devices = curr; LeaveCriticalSection(&ASPI_CritSection); return fd; } static void ASPI_DebugPrintCmd(SRB_ExecSCSICmd *prb) { BYTE cmd; int i; BYTE *cdb; switch (prb->CDBByte[0]) { case CMD_INQUIRY: TRACE("INQUIRY {\n"); TRACE("\tEVPD: %d\n", prb->CDBByte[1] & 1); TRACE("\tLUN: %d\n", (prb->CDBByte[1] & 0xc) >> 1); TRACE("\tPAGE CODE: %d\n", prb->CDBByte[2]); TRACE("\tALLOCATION LENGTH: %d\n", prb->CDBByte[4]); TRACE("\tCONTROL: %d\n", prb->CDBByte[5]); TRACE("}\n"); break; case CMD_SCAN_SCAN: TRACE("Transfer Length: %d\n", prb->CDBByte[4]); break; } TRACE("Host Adapter: %d\n", prb->SRB_HaId); TRACE("Flags: %d\n", prb->SRB_Flags); if (TARGET_TO_HOST(prb)) { TRACE("\tData transfer: Target to host. Length checked.\n"); } else if (HOST_TO_TARGET(prb)) { TRACE("\tData transfer: Host to target. Length checked.\n"); } else if (NO_DATA_TRANSFERED(prb)) { TRACE("\tData transfer: none\n"); } else { WARN("\tTransfer by scsi cmd. Length not checked.\n"); } TRACE("\tResidual byte length reporting %s\n", prb->SRB_Flags & 0x4 ? "enabled" : "disabled"); TRACE("\tLinking %s\n", prb->SRB_Flags & 0x2 ? "enabled" : "disabled"); TRACE("\tPosting %s\n", prb->SRB_Flags & 0x1 ? "enabled" : "disabled"); TRACE("Target: %d\n", prb->SRB_Target); TRACE("Lun: %d\n", prb->SRB_Lun); TRACE("BufLen: %ld\n", prb->SRB_BufLen); TRACE("SenseLen: %d\n", prb->SRB_SenseLen); TRACE("BufPtr: %p\n", prb->SRB_BufPointer); TRACE("CDB Length: %d\n", prb->SRB_CDBLen); TRACE("POST Proc: %lx\n", (DWORD) prb->SRB_PostProc); cdb = &prb->CDBByte[0]; cmd = prb->CDBByte[0]; if (TRACE_ON(aspi)) { DPRINTF("CDB buffer["); for (i = 0; i < prb->SRB_CDBLen; i++) { if (i != 0) DPRINTF(","); DPRINTF("%02x", *cdb++); } DPRINTF("]\n"); } } static void ASPI_PrintSenseArea(SRB_ExecSCSICmd *prb) { int i; BYTE *rqbuf = &prb->CDBByte[16]; if (TRACE_ON(aspi)) { DPRINTF("Request Sense reports:\n"); if ((rqbuf[0]&0x7f)!=0x70) { DPRINTF("\tInvalid sense header.\n"); return; } DPRINTF("\tCurrent command read filemark: %s\n",(rqbuf[2]&0x80)?"yes":"no"); DPRINTF("\tEarly warning passed: %s\n",(rqbuf[2]&0x40)?"yes":"no"); DPRINTF("\tIncorrect blocklengt: %s\n",(rqbuf[2]&0x20)?"yes":"no"); DPRINTF("\tSense Key: %d\n",rqbuf[2]&0xf); if (rqbuf[0]&0x80) DPRINTF("\tResidual Length: %d\n",rqbuf[3]*0x1000000+rqbuf[4]*0x10000+rqbuf[5]*0x100+rqbuf[6]); DPRINTF("\tAdditional Sense Length: %d\n",rqbuf[7]); DPRINTF("\tAdditional Sense Code: %d\n",rqbuf[12]); DPRINTF("\tAdditional Sense Code Qualifier: %d\n",rqbuf[13]); if (rqbuf[15]&0x80) { DPRINTF("\tIllegal Param is in %s\n",(rqbuf[15]&0x40)?"the CDB":"the Data Out Phase"); if (rqbuf[15]&0x8) { DPRINTF("Pointer at %d, bit %d\n",rqbuf[16]*256+rqbuf[17],rqbuf[15]&0x7); } } DPRINTF("SenseArea["); for (i = 0; i < prb->SRB_SenseLen; i++) { if (i) DPRINTF(","); DPRINTF("%02x", *rqbuf++); } DPRINTF("]\n"); } } static void ASPI_DebugPrintResult(SRB_ExecSCSICmd *prb) { TRACE("SRB_Status: %x\n", prb->SRB_Status); TRACE("SRB_HaStat: %x\n", prb->SRB_HaStat); TRACE("SRB_TargStat: %x\n", prb->SRB_TargStat); switch (prb->CDBByte[0]) { case CMD_INQUIRY: TRACE("Vendor: '%s'\n", prb->SRB_BufPointer + INQUIRY_VENDOR); break; case CMD_TEST_UNIT_READY: ASPI_PrintSenseArea(prb); break; } } /* Posting must be done in such a way that as soon as the SRB_Status is set * we don't touch the SRB anymore because it could possibly be freed * if the app is doing ASPI polling */ static DWORD WNASPI32_DoPosting( SRB_ExecSCSICmd *lpPRB, DWORD status ) { void (*SRB_PostProc)() = lpPRB->SRB_PostProc; BYTE SRB_Flags = lpPRB->SRB_Flags; if( status == SS_PENDING ) { WARN("Tried posting SS_PENDING\n"); return SS_PENDING; } lpPRB->SRB_Status = status; /* lpPRB is NOT safe, it could be freed in another thread */ if (SRB_PostProc) { if (SRB_Flags & 0x1) { TRACE("Post Routine (%lx) called\n", (DWORD) SRB_PostProc); /* Even though lpPRB could have been freed by * the program.. that's unlikely if it planned * to use it in the PostProc */ (*SRB_PostProc)(lpPRB); } else if (SRB_Flags & SRB_EVENT_NOTIFY) { TRACE("Setting event %04x\n", (HANDLE)SRB_PostProc); SetEvent((HANDLE)SRB_PostProc); } } return SS_PENDING; } static WORD ASPI_ExecScsiCmd(SRB_ExecSCSICmd *lpPRB) { struct sg_header *sg_hd, *sg_reply_hdr; DWORD status; int in_len, out_len; int error_code = 0; int fd; DWORD SRB_Status; /* FIXME: hackmode */ #define MAKE_TARGET_TO_HOST(lpPRB) \ if (!TARGET_TO_HOST(lpPRB)) { \ WARN("program was not sending target_to_host for cmd %x (flags=%x),correcting.\n",lpPRB->CDBByte[0],lpPRB->SRB_Flags); \ lpPRB->SRB_Flags |= 8; \ } #define MAKE_HOST_TO_TARGET(lpPRB) \ if (!HOST_TO_TARGET(lpPRB)) { \ WARN("program was not sending host_to_target for cmd %x (flags=%x),correcting.\n",lpPRB->CDBByte[0],lpPRB->SRB_Flags); \ lpPRB->SRB_Flags |= 0x10; \ } switch (lpPRB->CDBByte[0]) { case 0x12: /* INQUIRY */ case 0x5a: /* MODE_SENSE_10 */ case 0xa4: /* REPORT_KEY (DVD) MMC-2 */ case 0xad: /* READ DVD STRUCTURE MMC-2 */ MAKE_TARGET_TO_HOST(lpPRB) break; case 0xa3: /* SEND KEY (DVD) MMC-2 */ MAKE_HOST_TO_TARGET(lpPRB) break; default: if ((((lpPRB->SRB_Flags & 0x18) == 0x00) || ((lpPRB->SRB_Flags & 0x18) == 0x18) ) && lpPRB->SRB_BufLen ) { FIXME("command 0x%02x, no data transfer specified, but buflen is %ld!!!\n",lpPRB->CDBByte[0],lpPRB->SRB_BufLen); } break; } ASPI_DebugPrintCmd(lpPRB); fd = ASPI_OpenDevice(lpPRB); if (fd == -1) { TRACE("Failed: could not open device c%01dt%01dd%01d. Device permissions !?\n", lpPRB->SRB_HaId,lpPRB->SRB_Target,lpPRB->SRB_Lun); return WNASPI32_DoPosting( lpPRB, SS_NO_DEVICE ); } sg_hd = NULL; sg_reply_hdr = NULL; lpPRB->SRB_Status = SS_PENDING; if (!lpPRB->SRB_CDBLen) { ERR("Failed: lpPRB->SRB_CDBLen = 0.\n"); return WNASPI32_DoPosting( lpPRB, SS_INVALID_SRB ); } /* build up sg_header + scsi cmd */ if (HOST_TO_TARGET(lpPRB)) { /* send header, command, and then data */ in_len = SCSI_OFF + lpPRB->SRB_CDBLen + lpPRB->SRB_BufLen; sg_hd = (struct sg_header *) HeapAlloc(GetProcessHeap(), 0, in_len); memset(sg_hd, 0, SCSI_OFF); memcpy(sg_hd + 1, &lpPRB->CDBByte[0], lpPRB->SRB_CDBLen); if (lpPRB->SRB_BufLen) { memcpy(((BYTE *) sg_hd) + SCSI_OFF + lpPRB->SRB_CDBLen, lpPRB->SRB_BufPointer, lpPRB->SRB_BufLen); } } else { /* send header and command - no data */ in_len = SCSI_OFF + lpPRB->SRB_CDBLen; sg_hd = (struct sg_header *) HeapAlloc(GetProcessHeap(), 0, in_len); memset(sg_hd, 0, SCSI_OFF); memcpy(sg_hd + 1, &lpPRB->CDBByte[0], lpPRB->SRB_CDBLen); } if (TARGET_TO_HOST(lpPRB)) { out_len = SCSI_OFF + lpPRB->SRB_BufLen; sg_reply_hdr = (struct sg_header *) HeapAlloc(GetProcessHeap(), 0, out_len); memset(sg_reply_hdr, 0, SCSI_OFF); sg_hd->reply_len = out_len; } else { out_len = SCSI_OFF; sg_reply_hdr = (struct sg_header *) HeapAlloc(GetProcessHeap(), 0, out_len); memset(sg_reply_hdr, 0, SCSI_OFF); sg_hd->reply_len = out_len; } if(!SCSI_LinuxDeviceIo( fd, sg_hd, in_len, sg_reply_hdr, out_len, &status) ) { goto error_exit; } if (sg_reply_hdr->result != 0) { error_code = sg_reply_hdr->result; WARN("reply header error (%d)\n", sg_reply_hdr->result); goto error_exit; } if (TARGET_TO_HOST(lpPRB) && lpPRB->SRB_BufLen) { memcpy(lpPRB->SRB_BufPointer, sg_reply_hdr + 1, lpPRB->SRB_BufLen); } /* copy in sense buffer to amount that is available in client */ if (lpPRB->SRB_SenseLen) { int sense_len = lpPRB->SRB_SenseLen; if (lpPRB->SRB_SenseLen > 16) sense_len = 16; /* CDB is fixed in WNASPI32 */ memcpy(&lpPRB->CDBByte[16], &sg_reply_hdr->sense_buffer[0], sense_len); TRACE("CDB is %d bytes long\n", lpPRB->SRB_CDBLen ); ASPI_PrintSenseArea(lpPRB); } SRB_Status = SS_COMP; lpPRB->SRB_HaStat = HASTAT_OK; lpPRB->SRB_TargStat = sg_reply_hdr->target_status << 1; HeapFree(GetProcessHeap(), 0, sg_reply_hdr); HeapFree(GetProcessHeap(), 0, sg_hd); /* FIXME: Should this be != 0 maybe? */ if( lpPRB->SRB_TargStat == 2 ) { SRB_Status = SS_ERR; switch (lpPRB->CDBByte[0]) { case 0xa4: /* REPORT_KEY (DVD) MMC-2 */ case 0xa3: /* SEND KEY (DVD) MMC-2 */ SRB_Status = SS_COMP; lpPRB->SRB_TargStat = 0; FIXME("Program wants to do DVD Region switching, but fails (non compliant DVD drive). Ignoring....\n"); break; } } ASPI_DebugPrintResult(lpPRB); /* now do posting */ return WNASPI32_DoPosting( lpPRB, SRB_Status ); /* In real WNASPI32 stuff really is always pending because ASPI does things in the background, but we are not doing that (yet) */ error_exit: SRB_Status = SS_ERR; if (error_code == EBUSY) { WNASPI32_DoPosting( lpPRB, SS_ASPI_IS_BUSY ); TRACE("Device busy\n"); } else FIXME("Failed\n"); /* I'm not sure exactly error codes work here * We probably should set lpPRB->SRB_TargStat, SRB_HaStat ? */ WARN("error_exit\n"); HeapFree(GetProcessHeap(), 0, sg_reply_hdr); HeapFree(GetProcessHeap(), 0, sg_hd); WNASPI32_DoPosting( lpPRB, SRB_Status ); return SS_PENDING; } #endif /* defined(linux) */ /******************************************************************* * GetASPI32SupportInfo [WNASPI32.0] * * Checks if the ASPI subsystem is initialized correctly. * * RETURNS * HIWORD: 0. * HIBYTE of LOWORD: status (SS_COMP or SS_FAILED_INIT) * LOBYTE of LOWORD: # of host adapters. */ DWORD WINAPI GetASPI32SupportInfo() { return ((SS_COMP << 8) | 1); /* FIXME: get # of host adapters installed */ } /*********************************************************************** * SendASPI32Command (WNASPI32.1) */ DWORD __cdecl SendASPI32Command(LPSRB lpSRB) { #ifdef linux switch (lpSRB->common.SRB_Cmd) { case SC_HA_INQUIRY: lpSRB->inquiry.SRB_Status = SS_COMP; /* completed successfully */ lpSRB->inquiry.HA_Count = 1; /* not always */ lpSRB->inquiry.HA_SCSI_ID = 7; /* not always ID 7 */ strcat(lpSRB->inquiry.HA_ManagerId, "ASPI for WIN32"); /* max 15 chars, don't change */ strcat(lpSRB->inquiry.HA_Identifier, "Wine host"); /* FIXME: return host adapter name */ memset(lpSRB->inquiry.HA_Unique, 0, 16); /* default HA_Unique content */ lpSRB->inquiry.HA_Unique[6] = 0x02; /* Maximum Transfer Length (128K, Byte> 4-7) */ FIXME("ASPI: Partially implemented SC_HA_INQUIRY for adapter %d.\n", lpSRB->inquiry.SRB_HaId); return SS_COMP; case SC_GET_DEV_TYPE: { /* FIXME: We should return SS_NO_DEVICE if the device is not configured */ /* FIXME: We should return SS_INVALID_HA if HostAdapter!=0 */ SRB tmpsrb; char inqbuf[200]; DWORD ret; memset(&tmpsrb,0,sizeof(tmpsrb)); /* Copy header */ memcpy(&tmpsrb.common,&(lpSRB->common),sizeof(tmpsrb.common)); tmpsrb.cmd.SRB_Flags |= 8; /* target to host */ tmpsrb.cmd.SRB_Cmd = SC_EXEC_SCSI_CMD; tmpsrb.cmd.SRB_Target = lpSRB->devtype.SRB_Target; tmpsrb.cmd.SRB_Lun = lpSRB->devtype.SRB_Lun; tmpsrb.cmd.SRB_BufLen = sizeof(inqbuf); tmpsrb.cmd.SRB_BufPointer = inqbuf; tmpsrb.cmd.CDBByte[0] = 0x12; /* INQUIRY */ /* FIXME: handle lun */ tmpsrb.cmd.CDBByte[4] = sizeof(inqbuf); tmpsrb.cmd.SRB_CDBLen = 6; ret = ASPI_ExecScsiCmd(&tmpsrb.cmd); lpSRB->devtype.SRB_Status = tmpsrb.cmd.SRB_Status; lpSRB->devtype.SRB_DeviceType = inqbuf[0]&0x1f; TRACE("returning devicetype %d for target %d\n",inqbuf[0]&0x1f,tmpsrb.cmd.SRB_Target); if (ret!=SS_PENDING) /* Any error is passed down directly */ return ret; /* FIXME: knows that the command is finished already, pass final Status */ return tmpsrb.cmd.SRB_Status; } case SC_EXEC_SCSI_CMD: return ASPI_ExecScsiCmd(&lpSRB->cmd); case SC_ABORT_SRB: FIXME("Not implemented SC_ABORT_SRB\n"); break; case SC_RESET_DEV: FIXME("Not implemented SC_RESET_DEV\n"); break; #ifdef SC_GET_DISK_INFO case SC_GET_DISK_INFO: /* NT Doesn't implement this either.. so don't feel bad */ FIXME("Not implemented SC_GET_DISK_INFO\n"); break; #endif default: FIXME("Unknown command %d\n", lpSRB->common.SRB_Cmd); } return SS_INVALID_SRB; #else return SS_INVALID_SRB; #endif } /*********************************************************************** * GetASPI32DLLVersion (WNASPI32.3) */ DWORD WINAPI GetASPI32DLLVersion() { #ifdef linux return (DWORD)1; #else return (DWORD)0; #endif } wine-20000526/dlls/winaspi/winescsi.h0100644000175000001440000000601107062775713017063 0ustar julliardusers#ifndef __WINESCSI_H__ #define __WINESCSI_H__ #ifdef linux /* Copy of info from 2.2.x kernel */ #define SG_MAX_SENSE 16 /* too little, unlikely to change in 2.2.x */ struct sg_header { int pack_len; /* [o] reply_len (ie useless), ignored as input */ int reply_len; /* [i] max length of expected reply (inc. sg_header) */ int pack_id; /* [io] id number of packet (use ints >= 0) */ int result; /* [o] 0==ok, else (+ve) Unix errno (best ignored) */ unsigned int twelve_byte:1; /* [i] Force 12 byte command length for group 6 & 7 commands */ unsigned int target_status:5; /* [o] scsi status from target */ unsigned int host_status:8; /* [o] host status (see "DID" codes) */ unsigned int driver_status:8; /* [o] driver status+suggestion */ unsigned int other_flags:10; /* unused */ unsigned char sense_buffer[SG_MAX_SENSE]; /* [o] Output in 3 cases: when target_status is CHECK_CONDITION or when target_status is COMMAND_TERMINATED or when (driver_status & DRIVER_SENSE) is true. */ }; /* This structure is 36 bytes long on i386 */ #define SCSI_OFF sizeof(struct sg_header) #define SG_SET_TIMEOUT 0x2201 #define SG_GET_TIMEOUT 0x2202 #define SCSI_DEFAULT_TIMEOUT 6000*5 /* 5 minutes */ #endif /* RegKey used for SCSI info under HKEY_DYN_DATA */ #define KEYNAME_SCSI "WineScsi" /* Function prototypes from dlls/wnaspi32/aspi.c */ void SCSI_Init(); int ASPI_GetNumControllers(); int SCSI_OpenDevice( int h, int c, int t, int d ); int SCSI_LinuxSetTimeout( int fd, int timeout ); #ifdef linux BOOL SCSI_LinuxDeviceIo( int fd, struct sg_header * lpvInBuffer, DWORD cbInBuffer, struct sg_header * lpvOutBuffer, DWORD cbOutBuffer, LPDWORD lpcbBytesReturned ); #endif BOOL SCSI_GetDeviceName(int h, int c, int t, int d, LPSTR devstr, LPDWORD lpcbData); DWORD ASPI_GetHCforController( int controller ); /*** This is where we throw some miscellaneous crap ***/ #define ASPI_POSTING(prb) (prb->SRB_Flags & 0x1) /* WNASPI32/WINASPI defs */ #define HOST_TO_TARGET(prb) (((prb->SRB_Flags>>3) & 0x3) == 0x2) #define TARGET_TO_HOST(prb) (((prb->SRB_Flags>>3) & 0x3) == 0x1) #define NO_DATA_TRANSFERED(prb) (((prb->SRB_Flags>>3) & 0x3) == 0x3) #define INQUIRY_VENDOR 8 #define MUSTEK_SCSI_AREA_AND_WINDOWS 0x04 #define MUSTEK_SCSI_READ_SCANNED_DATA 0x08 #define MUSTEK_SCSI_GET_IMAGE_STATUS 0x0f #define MUSTEK_SCSI_ADF_AND_BACKTRACE 0x10 #define MUSTEK_SCSI_CCD_DISTANCE 0x11 #define MUSTEK_SCSI_START_STOP 0x1b #define INQURIY_CMDLEN 6 #define INQURIY_REPLY_LEN 96 #define INQUIRY_VENDOR 8 #define SENSE_BUFFER(prb) (&prb->CDBByte[prb->SRB_CDBLen]) /* Just a container for seeing what devices are open */ struct ASPI_DEVICE_INFO { struct ASPI_DEVICE_INFO * next; int fd; int hostId; int target; int lun; }; typedef struct ASPI_DEVICE_INFO ASPI_DEVICE_INFO; /*** End Miscellaneous crap ***/ #endif /* #ifndef __WINESCSI_H */ wine-20000526/dlls/winaspi/wnaspi32.spec0100644000175000001440000000034407061526375017410 0ustar julliardusersname wnaspi32 type win32 init WNASPI32_LibMain 1 stdcall GetASPI32SupportInfo() GetASPI32SupportInfo 2 cdecl SendASPI32Command(ptr) SendASPI32Command 4 stdcall GetASPI32DLLVersion() GetASPI32DLLVersion 7 stub OrdinalOnlyExport wine-20000526/dlls/windebug/0040755000175000001440000000000007113604213015204 5ustar julliarduserswine-20000526/dlls/windebug/.cvsignore0100644000175000001440000000006307045213575017213 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libwindebug.so.1.0 wine-20000526/dlls/windebug/Makefile.in0100644000175000001440000000033007060307303017243 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = windebug SOVERSION = 1.0 SPEC_SRCS = windebug.spec C_SRCS = \ windebug_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/windebug/windebug.spec0100644000175000001440000000014606752006277017700 0ustar julliardusersname windebug type win16 1 stub WINDEBUG 2 stub WEP 3 register WinNotify() WinNotify16 wine-20000526/dlls/windebug/windebug_main.c0100644000175000001440000000163606752006277020201 0ustar julliardusers/* * WINDEBUG.DLL * * Copyright (c) 1997 Andreas Mohr */ #include #include #include "windef.h" #include "module.h" #include "debugtools.h" DEFAULT_DEBUG_CHANNEL(dll) /*********************************************************************** * WinNotify (WINDEBUG.3) * written without _any_ docu */ void WINAPI WinNotify16(CONTEXT86 *context) { FIXME("(AX=%04x):stub.\n", AX_reg(context)); switch (AX_reg(context)) { case 0x000D: case 0x000E: case 0x0060: /* do nothing */ break; case 0x0062: break; case 0x0063: /* do something complicated */ break; case 0x0064: /* do something complicated */ break; case 0x0065: /* do something complicated */ break; case 0x0050: /* do something complicated, now just return error */ SET_CFLAG(context); break; case 0x0052: /* do something complicated */ break; default: break; } } wine-20000526/dlls/wing/0040755000175000001440000000000007113604213014344 5ustar julliarduserswine-20000526/dlls/wing/.cvsignore0100644000175000001440000000005707045213575016356 0ustar julliardusers*.spec.c *.spec.glue.s Makefile libwing.so.1.0 wine-20000526/dlls/wing/Makefile.in0100644000175000001440000000031407060307303016405 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = wing SOVERSION = 1.0 SPEC_SRCS = wing.spec C_SRCS = \ wing_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/wing/wing.spec0100644000175000001440000000160406752006277016200 0ustar julliardusersname wing type win16 1001 pascal16 WINGCREATEDC() WinGCreateDC16 1002 pascal16 WINGRECOMMENDDIBFORMAT(ptr) WinGRecommendDIBFormat16 1003 pascal16 WINGCREATEBITMAP(word ptr ptr) WinGCreateBitmap16 1004 pascal WINGGETDIBPOINTER(word ptr) WinGGetDIBPointer16 1005 pascal16 WINGGETDIBCOLORTABLE(word word word ptr) WinGGetDIBColorTable16 1006 pascal16 WINGSETDIBCOLORTABLE(word word word ptr) WinGSetDIBColorTable16 1007 pascal16 WINGCREATEHALFTONEPALETTE() WinGCreateHalfTonePalette16 1008 pascal16 WINGCREATEHALFTONEBRUSH(word word word) WinGCreateHalfToneBrush16 1009 pascal16 WINGSTRETCHBLT(word word word word word word word word word word) WinGStretchBlt16 1010 pascal16 WINGBITBLT(word word word word word word word word) WinGBitBlt16 # Seem that 1299 is the limit... weird... #1500 stub WINGINITIALIZETHUNK16 #1501 stub WINGTHUNK16 #2000 stub REGISTERWINGPAL #2001 stub EXCEPTIONHANDLER wine-20000526/dlls/wing/wing_main.c0100644000175000001440000001230607015652614016470 0ustar julliardusers/* * WinG support * * Started by Robert Pouliot */ #include "config.h" #ifndef X_DISPLAY_MISSING #include "x11drv.h" #endif /* !defined(X_DISPLAY_MISSING) */ #include "wine/winuser16.h" #include "bitmap.h" #include "debugtools.h" #include "ldt.h" #include "monitor.h" #include "palette.h" #include "windef.h" DEFAULT_DEBUG_CHANNEL(wing) typedef enum WING_DITHER_TYPE { WING_DISPERSED_4x4, WING_DISPERSED_8x8, WING_CLUSTERED_4x4 } WING_DITHER_TYPE; /* * WinG DIB bitmaps can be selected into DC and then scribbled upon * by GDI functions. They can also be changed directly. This gives us * three choices * - use original WinG 16-bit DLL * requires working 16-bit driver interface * - implement DIB graphics driver from scratch * see wing.zip size * - use shared pixmaps * won't work with some videocards and/or videomodes * 961208 - AK */ /*********************************************************************** * WinGCreateDC16 (WING.1001) */ HDC16 WINAPI WinGCreateDC16(void) { TRACE("(void)\n"); return CreateCompatibleDC16(0); } /*********************************************************************** * WinGRecommendDIBFormat16 (WING.1002) */ BOOL16 WINAPI WinGRecommendDIBFormat16(BITMAPINFO *bmpi) { TRACE("(%p)\n", bmpi); if (!bmpi) return FALSE; bmpi->bmiHeader.biSize = sizeof(BITMAPINFOHEADER); bmpi->bmiHeader.biWidth = 320; bmpi->bmiHeader.biHeight = -1; bmpi->bmiHeader.biPlanes = 1; bmpi->bmiHeader.biBitCount = MONITOR_GetDepth(&MONITOR_PrimaryMonitor); bmpi->bmiHeader.biCompression = BI_RGB; bmpi->bmiHeader.biSizeImage = 0; bmpi->bmiHeader.biXPelsPerMeter = 0; bmpi->bmiHeader.biYPelsPerMeter = 0; bmpi->bmiHeader.biClrUsed = 0; bmpi->bmiHeader.biClrImportant = 0; return TRUE; } /*********************************************************************** * WinGCreateBitmap16 (WING.1003) */ HBITMAP16 WINAPI WinGCreateBitmap16(HDC16 hdc, BITMAPINFO *bmpi, SEGPTR *bits) { TRACE("(%d,%p,%p)\n", hdc, bmpi, bits); TRACE(": create %ldx%ldx%d bitmap\n", bmpi->bmiHeader.biWidth, bmpi->bmiHeader.biHeight, bmpi->bmiHeader.biPlanes); return CreateDIBSection16(hdc, bmpi, 0, bits, 0, 0); } /*********************************************************************** * WinGGetDIBPointer (WING.1004) */ SEGPTR WINAPI WinGGetDIBPointer16(HBITMAP16 hWinGBitmap, BITMAPINFO* bmpi) { BITMAPOBJ* bmp = (BITMAPOBJ *) GDI_GetObjPtr( hWinGBitmap, BITMAP_MAGIC ); TRACE("(%d,%p)\n", hWinGBitmap, bmpi); if (!bmp) return (SEGPTR)NULL; if (bmpi) FIXME(": Todo - implement setting BITMAPINFO\n"); #ifndef X_DISPLAY_MISSING return PTR_SEG_OFF_TO_SEGPTR(((X11DRV_DIBSECTION *) bmp->dib)->selector, 0); #else /* !defined(X_DISPLAY_MISSING) */ return NULL; #endif /* !defined(X_DISPLAY_MISSING) */ } /*********************************************************************** * WinGSetDIBColorTable (WING.1004) */ UINT16 WINAPI WinGSetDIBColorTable16(HDC16 hdc, UINT16 start, UINT16 num, RGBQUAD *colors) { TRACE("(%d,%d,%d,%p)\n", hdc, start, num, colors); return SetDIBColorTable16(hdc, start, num, colors); } /*********************************************************************** * WinGGetDIBColorTable16 (WING.1005) */ UINT16 WINAPI WinGGetDIBColorTable16(HDC16 hdc, UINT16 start, UINT16 num, RGBQUAD *colors) { TRACE("(%d,%d,%d,%p)\n", hdc, start, num, colors); return GetDIBColorTable16(hdc, start, num, colors); } /*********************************************************************** * WinGCreateHalfTonePalette16 (WING.1007) */ HPALETTE16 WINAPI WinGCreateHalfTonePalette16(void) { TRACE("(void)\n"); return CreateHalftonePalette16(GetDC16(0)); } /*********************************************************************** * WinGCreateHalfToneBrush16 (WING.1008) */ HBRUSH16 WINAPI WinGCreateHalfToneBrush16(HDC16 winDC, COLORREF col, WING_DITHER_TYPE type) { TRACE("(%d,%ld,%d)\n", winDC, col, type); return CreateSolidBrush16(col); } /*********************************************************************** * WinGStretchBlt16 (WING.1009) */ BOOL16 WINAPI WinGStretchBlt16(HDC16 destDC, INT16 xDest, INT16 yDest, INT16 widDest, INT16 heiDest, HDC16 srcDC, INT16 xSrc, INT16 ySrc, INT16 widSrc, INT16 heiSrc) { BOOL16 retval; TRACE("(%d,%d,...)\n", destDC, srcDC); SetStretchBltMode16 ( destDC, COLORONCOLOR ); retval=StretchBlt16(destDC, xDest, yDest, widDest, heiDest, srcDC, xSrc, ySrc, widSrc, heiSrc, SRCCOPY); SetStretchBltMode16 ( destDC, BLACKONWHITE ); return retval; } /*********************************************************************** * WinGBitBlt16 (WING.1010) */ BOOL16 WINAPI WinGBitBlt16(HDC16 destDC, INT16 xDest, INT16 yDest, INT16 widDest, INT16 heiDest, HDC16 srcDC, INT16 xSrc, INT16 ySrc) { TRACE("(%d,%d,...)\n", destDC, srcDC); return BitBlt16(destDC, xDest, yDest, widDest, heiDest, srcDC, xSrc, ySrc, SRCCOPY); } wine-20000526/dlls/wininet/0040755000175000001440000000000007113604213015055 5ustar julliarduserswine-20000526/dlls/wininet/.cvsignore0100644000175000001440000000005207074702745017066 0ustar julliardusersMakefile libwininet.so.1.0 wininet.spec.c wine-20000526/dlls/wininet/Makefile.in0100644000175000001440000000037007101106213017111 0ustar julliardusersTOPSRCDIR = @top_srcdir@ TOPOBJDIR = ../.. SRCDIR = @srcdir@ VPATH = @srcdir@ MODULE = wininet SOVERSION = 1.0 SPEC_SRCS = wininet.spec C_SRCS = \ internet.c \ ftp.c \ utility.c \ wininet_main.c @MAKE_DLL_RULES@ ### Dependencies: wine-20000526/dlls/wininet/ftp.c0100644000175000001440000020416107102614160016013 0ustar julliardusers/* * WININET - Ftp implementation * * Copyright 1999 Corel Corporation * * Ulrich Czekalla * Noureddine Jemmali */ #include "config.h" #include #include #include #include #include #include #ifdef HAVE_SYS_SOCKET_H # include #endif #include #include #include "windows.h" #include "wininet.h" #include "winerror.h" #include "winsock.h" #include "debugtools.h" #include "internet.h" DEFAULT_DEBUG_CHANNEL(wininet); #define NOACCOUNT "noaccount" #define DATA_PACKET_SIZE 0x2000 #define szCRLF "\r\n" #define MAX_BACKLOG 5 #define RESPONSE_TIMEOUT 30 typedef enum { /* FTP commands with arguments. */ FTP_CMD_ACCT, FTP_CMD_CWD, FTP_CMD_DELE, FTP_CMD_MKD, FTP_CMD_PASS, FTP_CMD_PORT, FTP_CMD_RETR, FTP_CMD_RMD, FTP_CMD_RNFR, FTP_CMD_RNTO, FTP_CMD_STOR, FTP_CMD_TYPE, FTP_CMD_USER, /* FTP commands without arguments. */ FTP_CMD_ABOR, FTP_CMD_LIST, FTP_CMD_NLST, FTP_CMD_PWD, FTP_CMD_QUIT, } FTP_COMMAND; static const CHAR *szFtpCommands[] = { "ACCT", "CWD", "DELE", "MKD", "PASS", "PORT", "RETR", "RMD", "RNFR", "RNTO", "STOR", "TYPE", "USER", "ABOR", "LIST", "NLST", "PWD", "QUIT", }; static const CHAR szMonths[] = "JANFEBMARAPRMAYJUNJULAUGSEPOCTNOVDEC"; BOOL FTP_SendCommand(INT nSocket, FTP_COMMAND ftpCmd, LPCSTR lpszParam, INTERNET_STATUS_CALLBACK lpfnStatusCB, HINTERNET hHandle, DWORD dwContext); BOOL FTP_SendStore(LPWININETFTPSESSIONA lpwfs, LPCSTR lpszRemoteFile, DWORD dwType); BOOL FTP_InitDataSocket(LPWININETFTPSESSIONA lpwfs, LPINT nDataSocket); BOOL FTP_SendData(LPWININETFTPSESSIONA lpwfs, INT nDataSocket, HANDLE hFile); INT FTP_ReceiveResponse(INT nSocket, LPSTR lpszResponse, DWORD dwResponse, INTERNET_STATUS_CALLBACK lpfnStatusCB, HINTERNET hHandle, DWORD dwContext); DWORD FTP_SendRetrieve(LPWININETFTPSESSIONA lpwfs, LPCSTR lpszRemoteFile, DWORD dwType); BOOL FTP_RetrieveFileData(LPWININETFTPSESSIONA lpwfs, INT nDataSocket, DWORD nBytes, HANDLE hFile); BOOL FTP_InitListenSocket(LPWININETFTPSESSIONA lpwfs); BOOL FTP_ConnectToHost(LPWININETFTPSESSIONA lpwfs); BOOL FTP_SendPassword(LPWININETFTPSESSIONA lpwfs); BOOL FTP_SendAccount(LPWININETFTPSESSIONA lpwfs); BOOL FTP_SendType(LPWININETFTPSESSIONA lpwfs, DWORD dwType); BOOL FTP_SendPort(LPWININETFTPSESSIONA lpwfs); BOOL FTP_ParsePermission(LPCSTR lpszPermission, LPFILEPROPERTIESA lpfp); BOOL FTP_ParseDirectory(LPWININETFTPSESSIONA lpwfs, INT nSocket, LPFILEPROPERTIESA *lpafp, LPDWORD dwfp); HINTERNET FTP_ReceiveFileList(LPWININETFTPSESSIONA lpwfs, INT nSocket, LPWIN32_FIND_DATAA lpFindFileData, DWORD dwContext); LPSTR FTP_GetNextLine(INT nSocket, LPSTR lpszBuffer, LPDWORD dwBuffer); DWORD FTP_SetResponseError(DWORD dwResponse); /*********************************************************************** * FtpPutFileA (WININET.43) * * Uploads a file to the FTP server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL WINAPI FtpPutFileA(HINTERNET hConnect, LPCSTR lpszLocalFile, LPCSTR lpszNewRemoteFile, DWORD dwFlags, DWORD dwContext) { LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hConnect; LPWININETAPPINFOA hIC = NULL; if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC) { WORKREQUEST workRequest; workRequest.asyncall = FTPPUTFILEA; workRequest.HFTPSESSION = (DWORD)hConnect; workRequest.LPSZLOCALFILE = (DWORD)strdup(lpszLocalFile); workRequest.LPSZNEWREMOTEFILE = (DWORD)strdup(lpszNewRemoteFile); workRequest.DWFLAGS = dwFlags; workRequest.DWCONTEXT = dwContext; return INTERNET_AsyncCall(&workRequest); } else { return FTP_FtpPutFileA(hConnect, lpszLocalFile, lpszNewRemoteFile, dwFlags, dwContext); } } /*********************************************************************** * FTP_FtpPutFileA (Internal) * * Uploads a file to the FTP server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL WINAPI FTP_FtpPutFileA(HINTERNET hConnect, LPCSTR lpszLocalFile, LPCSTR lpszNewRemoteFile, DWORD dwFlags, DWORD dwContext) { HANDLE hFile = (HANDLE)NULL; BOOL bSuccess = FALSE; LPWININETAPPINFOA hIC = NULL; LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hConnect; TRACE(" lpszLocalFile(%s) lpszNewRemoteFile(%s)\n", lpszLocalFile, lpszNewRemoteFile); if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } /* Clear any error information */ INTERNET_SetLastError(0); /* Open file to be uploaded */ if (INVALID_HANDLE_VALUE == (hFile = CreateFileA(lpszLocalFile, GENERIC_READ, 0, 0, OPEN_EXISTING, 0, 0))) { INTERNET_SetLastError(ERROR_FILE_NOT_FOUND); goto lend; } hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->lpfnStatusCB) hIC->lpfnStatusCB(hConnect, lpwfs->hdr.dwContext, INTERNET_STATUS_SENDING_REQUEST, NULL, 0); if (FTP_SendStore(lpwfs, lpszNewRemoteFile, dwFlags)) { INT nDataSocket; /* Accept connection from ftp server */ if (FTP_InitDataSocket(lpwfs, &nDataSocket)) { FTP_SendData(lpwfs, nDataSocket, hFile); bSuccess = TRUE; close(nDataSocket); } } lend: if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC && hIC->lpfnStatusCB) { INTERNET_ASYNC_RESULT iar; iar.dwResult = (DWORD)bSuccess; iar.dwError = bSuccess ? ERROR_SUCCESS : INTERNET_GetLastError(); hIC->lpfnStatusCB(hConnect, lpwfs->hdr.dwContext, INTERNET_STATUS_REQUEST_COMPLETE, &iar, sizeof(INTERNET_ASYNC_RESULT)); } if (hFile) CloseHandle(hFile); return bSuccess; } /*********************************************************************** * FtpSetCurrentDirectoryA (WININET.49) * * Change the working directory on the FTP server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL WINAPI FtpSetCurrentDirectoryA(HINTERNET hConnect, LPCSTR lpszDirectory) { LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hConnect; LPWININETAPPINFOA hIC = NULL; if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } TRACE("lpszDirectory(%s)\n", lpszDirectory); hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC) { WORKREQUEST workRequest; workRequest.asyncall = FTPSETCURRENTDIRECTORYA; workRequest.HFTPSESSION = (DWORD)hConnect; workRequest.LPSZDIRECTORY = (DWORD)strdup(lpszDirectory); return INTERNET_AsyncCall(&workRequest); } else { return FTP_FtpSetCurrentDirectoryA(hConnect, lpszDirectory); } } /*********************************************************************** * FTP_FtpSetCurrentDirectoryA (Internal) * * Change the working directory on the FTP server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL WINAPI FTP_FtpSetCurrentDirectoryA(HINTERNET hConnect, LPCSTR lpszDirectory) { INT nResCode; LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hConnect; LPWININETAPPINFOA hIC = NULL; DWORD bSuccess = FALSE; TRACE("lpszDirectory(%s)\n", lpszDirectory); if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } /* Clear any error information */ INTERNET_SetLastError(0); hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (!FTP_SendCommand(lpwfs->sndSocket, FTP_CMD_CWD, lpszDirectory, hIC->lpfnStatusCB, hConnect, lpwfs->hdr.dwContext)) goto lend; nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, hIC->lpfnStatusCB, hConnect, lpwfs->hdr.dwContext); if (nResCode) { if (nResCode == 250) bSuccess = TRUE; else FTP_SetResponseError(nResCode); } lend: if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC && hIC->lpfnStatusCB) { INTERNET_ASYNC_RESULT iar; iar.dwResult = (DWORD)bSuccess; iar.dwError = bSuccess ? ERROR_SUCCESS : ERROR_INTERNET_EXTENDED_ERROR; hIC->lpfnStatusCB(hConnect, lpwfs->hdr.dwContext, INTERNET_STATUS_REQUEST_COMPLETE, &iar, sizeof(INTERNET_ASYNC_RESULT)); } return bSuccess; } /*********************************************************************** * FtpCreateDirectoryA (WININET.31) * * Create new directory on the FTP server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL WINAPI FtpCreateDirectoryA(HINTERNET hConnect, LPCSTR lpszDirectory) { LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hConnect; LPWININETAPPINFOA hIC = NULL; if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC) { WORKREQUEST workRequest; workRequest.asyncall = FTPCREATEDIRECTORYA; workRequest.HFTPSESSION = (DWORD)hConnect; workRequest.LPSZDIRECTORY = (DWORD)strdup(lpszDirectory); return INTERNET_AsyncCall(&workRequest); } else { return FTP_FtpCreateDirectoryA(hConnect, lpszDirectory); } } /*********************************************************************** * FTP_FtpCreateDirectoryA (Internal) * * Create new directory on the FTP server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL WINAPI FTP_FtpCreateDirectoryA(HINTERNET hConnect, LPCSTR lpszDirectory) { INT nResCode; BOOL bSuccess = FALSE; LPWININETAPPINFOA hIC = NULL; LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hConnect; TRACE("\n"); if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } /* Clear any error information */ INTERNET_SetLastError(0); if (!FTP_SendCommand(lpwfs->sndSocket, FTP_CMD_MKD, lpszDirectory, 0, 0, 0)) goto lend; nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, 0, 0, 0); if (nResCode) { if (nResCode == 257) bSuccess = TRUE; else FTP_SetResponseError(nResCode); } lend: hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC && hIC->lpfnStatusCB) { INTERNET_ASYNC_RESULT iar; iar.dwResult = (DWORD)bSuccess; iar.dwError = bSuccess ? ERROR_SUCCESS : INTERNET_GetLastError(); hIC->lpfnStatusCB(hConnect, lpwfs->hdr.dwContext, INTERNET_STATUS_REQUEST_COMPLETE, &iar, sizeof(INTERNET_ASYNC_RESULT)); } return bSuccess; } /*********************************************************************** * FtpFindFirstFileA (WININET.35) * * Search the specified directory * * RETURNS * HINTERNET on success * NULL on failure * */ INTERNETAPI HINTERNET WINAPI FtpFindFirstFileA(HINTERNET hConnect, LPCSTR lpszSearchFile, LPWIN32_FIND_DATAA lpFindFileData, DWORD dwFlags, DWORD dwContext) { LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hConnect; LPWININETAPPINFOA hIC = NULL; if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC) { WORKREQUEST workRequest; workRequest.asyncall = FTPFINDFIRSTFILEA; workRequest.HFTPSESSION = (DWORD)hConnect; workRequest.LPSZSEARCHFILE = (DWORD)strdup(lpszSearchFile); workRequest.LPFINDFILEDATA = (DWORD)lpFindFileData; workRequest.DWFLAGS = dwFlags; workRequest.DWCONTEXT= dwContext; INTERNET_AsyncCall(&workRequest); return NULL; } else { return FTP_FtpFindFirstFileA(hConnect, lpszSearchFile, lpFindFileData, dwFlags, dwContext); } } /*********************************************************************** * FTP_FtpFindFirstFileA (Internal) * * Search the specified directory * * RETURNS * HINTERNET on success * NULL on failure * */ INTERNETAPI HINTERNET WINAPI FTP_FtpFindFirstFileA(HINTERNET hConnect, LPCSTR lpszSearchFile, LPWIN32_FIND_DATAA lpFindFileData, DWORD dwFlags, DWORD dwContext) { INT nResCode; LPWININETAPPINFOA hIC = NULL; LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hConnect; LPWININETFINDNEXTA hFindNext = NULL; TRACE("\n"); if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } /* Clear any error information */ INTERNET_SetLastError(0); if (!FTP_InitListenSocket(lpwfs)) goto lend; if (!FTP_SendType(lpwfs, INTERNET_FLAG_TRANSFER_ASCII)) goto lend; if (!FTP_SendPort(lpwfs)) goto lend; hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (!FTP_SendCommand(lpwfs->sndSocket, FTP_CMD_LIST, lpszSearchFile, hIC->lpfnStatusCB, hConnect, lpwfs->hdr.dwContext)) goto lend; nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, hIC->lpfnStatusCB, hConnect, lpwfs->hdr.dwContext); if (nResCode) { if (nResCode == 125 || nResCode == 150) { INT nDataSocket; if (FTP_InitDataSocket(lpwfs, &nDataSocket)) { hFindNext = FTP_ReceiveFileList(lpwfs, nDataSocket, lpFindFileData, dwContext); nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, hIC->lpfnStatusCB, hConnect, lpwfs->hdr.dwContext); if (nResCode != 226 && nResCode != 250) INTERNET_SetLastError(ERROR_NO_MORE_FILES); close(nDataSocket); } } else FTP_SetResponseError(nResCode); } lend: if (lpwfs->lstnSocket != INVALID_SOCKET) close(lpwfs->lstnSocket); if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC && hIC->lpfnStatusCB) { INTERNET_ASYNC_RESULT iar; if (hFindNext) { iar.dwResult = (DWORD)hFindNext; iar.dwError = ERROR_SUCCESS; hIC->lpfnStatusCB(hConnect, lpwfs->hdr.dwContext, INTERNET_STATUS_HANDLE_CREATED, &iar, sizeof(INTERNET_ASYNC_RESULT)); } iar.dwResult = (DWORD)hFindNext; iar.dwError = hFindNext ? ERROR_SUCCESS : INTERNET_GetLastError(); hIC->lpfnStatusCB(hConnect, lpwfs->hdr.dwContext, INTERNET_STATUS_REQUEST_COMPLETE, &iar, sizeof(INTERNET_ASYNC_RESULT)); } return (HINTERNET)hFindNext; } /*********************************************************************** * FtpGetCurrentDirectoryA (WININET.37) * * Retrieves the current directory * * RETURNS * TRUE on success * FALSE on failure * */ BOOL WINAPI FtpGetCurrentDirectoryA(HINTERNET hFtpSession, LPSTR lpszCurrentDirectory, LPDWORD lpdwCurrentDirectory) { LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hFtpSession; LPWININETAPPINFOA hIC = NULL; TRACE("len(%ld)\n", *lpdwCurrentDirectory); if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC) { WORKREQUEST workRequest; workRequest.asyncall = FTPGETCURRENTDIRECTORYA; workRequest.HFTPSESSION = (DWORD)hFtpSession; workRequest.LPSZDIRECTORY = (DWORD)lpszCurrentDirectory; workRequest.LPDWDIRECTORY = (DWORD)lpdwCurrentDirectory; return INTERNET_AsyncCall(&workRequest); } else { return FTP_FtpGetCurrentDirectoryA(hFtpSession, lpszCurrentDirectory, lpdwCurrentDirectory); } } /*********************************************************************** * FTP_FtpGetCurrentDirectoryA (Internal) * * Retrieves the current directory * * RETURNS * TRUE on success * FALSE on failure * */ BOOL WINAPI FTP_FtpGetCurrentDirectoryA(HINTERNET hFtpSession, LPSTR lpszCurrentDirectory, LPDWORD lpdwCurrentDirectory) { INT nResCode; LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hFtpSession; LPWININETAPPINFOA hIC = NULL; DWORD bSuccess = FALSE; TRACE("len(%ld)\n", *lpdwCurrentDirectory); if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } /* Clear any error information */ INTERNET_SetLastError(0); ZeroMemory(lpszCurrentDirectory, *lpdwCurrentDirectory); hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (!FTP_SendCommand(lpwfs->sndSocket, FTP_CMD_PWD, NULL, hIC->lpfnStatusCB, hFtpSession, lpwfs->hdr.dwContext)) goto lend; nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, hIC->lpfnStatusCB, hFtpSession, lpwfs->hdr.dwContext); if (nResCode) { if (nResCode == 257) /* Extract directory name */ { INT firstpos, lastpos, len; LPSTR lpszResponseBuffer = INTERNET_GetResponseBuffer(); for (firstpos = 0, lastpos = 0; lpszResponseBuffer[lastpos]; lastpos++) { if ('"' == lpszResponseBuffer[lastpos]) { if (!firstpos) firstpos = lastpos; else break; } } len = lastpos - firstpos - 1; strncpy(lpszCurrentDirectory, &lpszResponseBuffer[firstpos+1], len < *lpdwCurrentDirectory ? len : *lpdwCurrentDirectory); *lpdwCurrentDirectory = len; bSuccess = TRUE; } else FTP_SetResponseError(nResCode); } lend: if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC && hIC->lpfnStatusCB) { INTERNET_ASYNC_RESULT iar; iar.dwResult = (DWORD)bSuccess; iar.dwError = bSuccess ? ERROR_SUCCESS : ERROR_INTERNET_EXTENDED_ERROR; hIC->lpfnStatusCB(hFtpSession, lpwfs->hdr.dwContext, INTERNET_STATUS_REQUEST_COMPLETE, &iar, sizeof(INTERNET_ASYNC_RESULT)); } return (DWORD) bSuccess; } /*********************************************************************** * FtpOpenFileA (WININET.41) * * Open a remote file for writing or reading * * RETURNS * HINTERNET handle on success * NULL on failure * */ INTERNETAPI HINTERNET WINAPI FtpOpenFileA(HINTERNET hFtpSession, LPCSTR lpszFileName, DWORD fdwAccess, DWORD dwFlags, DWORD dwContext) { LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hFtpSession; LPWININETAPPINFOA hIC = NULL; if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC) { WORKREQUEST workRequest; workRequest.asyncall = FTPOPENFILEA; workRequest.HFTPSESSION = (DWORD)hFtpSession; workRequest.LPSZFILENAME = (DWORD)strdup(lpszFileName); workRequest.FDWACCESS = fdwAccess; workRequest.DWFLAGS = dwFlags; workRequest.DWCONTEXT = dwContext; INTERNET_AsyncCall(&workRequest); return NULL; } else { return FTP_FtpOpenFileA(hFtpSession, lpszFileName, fdwAccess, dwFlags, dwContext); } } /*********************************************************************** * FTP_FtpOpenFileA (Internal) * * Open a remote file for writing or reading * * RETURNS * HINTERNET handle on success * NULL on failure * */ HINTERNET FTP_FtpOpenFileA(HINTERNET hFtpSession, LPCSTR lpszFileName, DWORD fdwAccess, DWORD dwFlags, DWORD dwContext) { INT nDataSocket; BOOL bSuccess = FALSE; LPWININETFILE hFile = NULL; LPWININETAPPINFOA hIC = NULL; LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hFtpSession; TRACE("\n"); if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } /* Clear any error information */ INTERNET_SetLastError(0); if (GENERIC_READ == fdwAccess) { /* Set up socket to retrieve data */ bSuccess = FTP_SendRetrieve(lpwfs, lpszFileName, dwFlags); } else if (GENERIC_WRITE == fdwAccess) { /* Set up socket to send data */ bSuccess = FTP_SendStore(lpwfs, lpszFileName, dwFlags); } /* Accept connection from server */ if (bSuccess && FTP_InitDataSocket(lpwfs, &nDataSocket)) { hFile = HeapAlloc(GetProcessHeap(), 0, sizeof(WININETFILE)); hFile->hdr.htype = WH_HFILE; hFile->hdr.dwFlags = dwFlags; hFile->hdr.dwContext = dwContext; hFile->hdr.lpwhparent = hFtpSession; hFile->nDataSocket = nDataSocket; } hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC && hIC->lpfnStatusCB) { INTERNET_ASYNC_RESULT iar; if (hFile) { iar.dwResult = (DWORD)hFile; iar.dwError = ERROR_SUCCESS; hIC->lpfnStatusCB(hFtpSession, lpwfs->hdr.dwContext, INTERNET_STATUS_HANDLE_CREATED, &iar, sizeof(INTERNET_ASYNC_RESULT)); } iar.dwResult = (DWORD)bSuccess; iar.dwError = bSuccess ? ERROR_SUCCESS : INTERNET_GetLastError(); hIC->lpfnStatusCB(hFtpSession, lpwfs->hdr.dwContext, INTERNET_STATUS_REQUEST_COMPLETE, &iar, sizeof(INTERNET_ASYNC_RESULT)); } return (HINTERNET)hFile; } /*********************************************************************** * FtpGetFileA (WININET.39) * * Retrieve file from the FTP server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL WINAPI FtpGetFileA(HINTERNET hInternet, LPCSTR lpszRemoteFile, LPCSTR lpszNewFile, BOOL fFailIfExists, DWORD dwLocalFlagsAttribute, DWORD dwInternetFlags, DWORD dwContext) { LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hInternet; LPWININETAPPINFOA hIC = NULL; if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC) { WORKREQUEST workRequest; workRequest.asyncall = FTPGETFILEA; workRequest.HFTPSESSION = (DWORD)hInternet; workRequest.LPSZREMOTEFILE = (DWORD)strdup(lpszRemoteFile); workRequest.LPSZNEWFILE = (DWORD)strdup(lpszNewFile); workRequest.DWLOCALFLAGSATTRIBUTE = dwLocalFlagsAttribute; workRequest.FFAILIFEXISTS = (DWORD)fFailIfExists; workRequest.DWFLAGS = dwInternetFlags; workRequest.DWCONTEXT = dwContext; return INTERNET_AsyncCall(&workRequest); } else { return FTP_FtpGetFileA(hInternet, lpszRemoteFile, lpszNewFile, fFailIfExists, dwLocalFlagsAttribute, dwInternetFlags, dwContext); } } /*********************************************************************** * FTP_FtpGetFileA (Internal) * * Retrieve file from the FTP server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL WINAPI FTP_FtpGetFileA(HINTERNET hInternet, LPCSTR lpszRemoteFile, LPCSTR lpszNewFile, BOOL fFailIfExists, DWORD dwLocalFlagsAttribute, DWORD dwInternetFlags, DWORD dwContext) { DWORD nBytes; BOOL bSuccess = FALSE; HANDLE hFile; LPWININETAPPINFOA hIC = NULL; LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hInternet; TRACE("lpszRemoteFile(%s) lpszNewFile(%s)\n", lpszRemoteFile, lpszNewFile); if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } /* Clear any error information */ INTERNET_SetLastError(0); /* Ensure we can write to lpszNewfile by opening it */ hFile = CreateFileA(lpszNewFile, GENERIC_WRITE, 0, 0, fFailIfExists ? CREATE_NEW : CREATE_ALWAYS, dwLocalFlagsAttribute, 0); if (INVALID_HANDLE_VALUE == hFile) goto lend; /* Set up socket to retrieve data */ nBytes = FTP_SendRetrieve(lpwfs, lpszRemoteFile, dwInternetFlags); if (nBytes > 0) { INT nDataSocket; /* Accept connection from ftp server */ if (FTP_InitDataSocket(lpwfs, &nDataSocket)) { INT nResCode; /* Receive data */ FTP_RetrieveFileData(lpwfs, nDataSocket, nBytes, hFile); nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, 0, 0, 0); if (nResCode) { if (nResCode == 226) bSuccess = TRUE; else FTP_SetResponseError(nResCode); } close(nDataSocket); } } lend: if (hFile) CloseHandle(hFile); hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC && hIC->lpfnStatusCB) { INTERNET_ASYNC_RESULT iar; iar.dwResult = (DWORD)bSuccess; iar.dwError = bSuccess ? ERROR_SUCCESS : INTERNET_GetLastError(); hIC->lpfnStatusCB(hInternet, lpwfs->hdr.dwContext, INTERNET_STATUS_REQUEST_COMPLETE, &iar, sizeof(INTERNET_ASYNC_RESULT)); } return bSuccess; } /*********************************************************************** * FtpDeleteFileA (WININET.33) * * Delete a file on the ftp server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL WINAPI FtpDeleteFileA(HINTERNET hFtpSession, LPCSTR lpszFileName) { LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hFtpSession; LPWININETAPPINFOA hIC = NULL; if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC) { WORKREQUEST workRequest; workRequest.asyncall = FTPRENAMEFILEA; workRequest.HFTPSESSION = (DWORD)hFtpSession; workRequest.LPSZFILENAME = (DWORD)strdup(lpszFileName); return INTERNET_AsyncCall(&workRequest); } else { return FTP_FtpDeleteFileA(hFtpSession, lpszFileName); } } /*********************************************************************** * FTP_FtpDeleteFileA (Internal) * * Delete a file on the ftp server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL FTP_FtpDeleteFileA(HINTERNET hFtpSession, LPCSTR lpszFileName) { INT nResCode; BOOL bSuccess = FALSE; LPWININETAPPINFOA hIC = NULL; LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hFtpSession; TRACE("0x%08lx\n", (ULONG) hFtpSession); if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } /* Clear any error information */ INTERNET_SetLastError(0); if (!FTP_SendCommand(lpwfs->sndSocket, FTP_CMD_DELE, lpszFileName, 0, 0, 0)) goto lend; nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, 0, 0, 0); if (nResCode) { if (nResCode == 250) bSuccess = TRUE; else FTP_SetResponseError(nResCode); } lend: hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC && hIC->lpfnStatusCB) { INTERNET_ASYNC_RESULT iar; iar.dwResult = (DWORD)bSuccess; iar.dwError = bSuccess ? ERROR_SUCCESS : INTERNET_GetLastError(); hIC->lpfnStatusCB(hFtpSession, lpwfs->hdr.dwContext, INTERNET_STATUS_REQUEST_COMPLETE, &iar, sizeof(INTERNET_ASYNC_RESULT)); } return bSuccess; } /*********************************************************************** * FtpRemoveDirectoryA (WININET.45) * * Remove a directory on the ftp server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL WINAPI FtpRemoveDirectoryA(HINTERNET hFtpSession, LPCSTR lpszDirectory) { LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hFtpSession; LPWININETAPPINFOA hIC = NULL; if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC) { WORKREQUEST workRequest; workRequest.asyncall = FTPREMOVEDIRECTORYA; workRequest.HFTPSESSION = (DWORD)hFtpSession; workRequest.LPSZDIRECTORY = (DWORD)strdup(lpszDirectory); return INTERNET_AsyncCall(&workRequest); } else { return FTP_FtpRemoveDirectoryA(hFtpSession, lpszDirectory); } } /*********************************************************************** * FTP_FtpRemoveDirectoryA (Internal) * * Remove a directory on the ftp server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL FTP_FtpRemoveDirectoryA(HINTERNET hFtpSession, LPCSTR lpszDirectory) { INT nResCode; BOOL bSuccess = FALSE; LPWININETAPPINFOA hIC = NULL; LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hFtpSession; TRACE("\n"); if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } /* Clear any error information */ INTERNET_SetLastError(0); if (!FTP_SendCommand(lpwfs->sndSocket, FTP_CMD_RMD, lpszDirectory, 0, 0, 0)) goto lend; nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, 0, 0, 0); if (nResCode) { if (nResCode == 250) bSuccess = TRUE; else FTP_SetResponseError(nResCode); } lend: hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC && hIC->lpfnStatusCB) { INTERNET_ASYNC_RESULT iar; iar.dwResult = (DWORD)bSuccess; iar.dwError = bSuccess ? ERROR_SUCCESS : INTERNET_GetLastError(); hIC->lpfnStatusCB(hFtpSession, lpwfs->hdr.dwContext, INTERNET_STATUS_REQUEST_COMPLETE, &iar, sizeof(INTERNET_ASYNC_RESULT)); } return bSuccess; } /*********************************************************************** * FtpRenameFileA (WININET.47) * * Rename a file on the ftp server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL WINAPI FtpRenameFileA(HINTERNET hFtpSession, LPCSTR lpszSrc, LPCSTR lpszDest) { LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hFtpSession; LPWININETAPPINFOA hIC = NULL; if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC) { WORKREQUEST workRequest; workRequest.asyncall = FTPRENAMEFILEA; workRequest.HFTPSESSION = (DWORD)hFtpSession; workRequest.LPSZSRCFILE = (DWORD)strdup(lpszSrc); workRequest.LPSZDESTFILE = (DWORD)strdup(lpszDest); return INTERNET_AsyncCall(&workRequest); } else { return FTP_FtpRenameFileA(hFtpSession, lpszSrc, lpszDest); } } /*********************************************************************** * FTP_FtpRenameFileA (Internal) * * Rename a file on the ftp server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL FTP_FtpRenameFileA(HINTERNET hFtpSession, LPCSTR lpszSrc, LPCSTR lpszDest) { INT nResCode; BOOL bSuccess = FALSE; LPWININETAPPINFOA hIC = NULL; LPWININETFTPSESSIONA lpwfs = (LPWININETFTPSESSIONA) hFtpSession; TRACE("\n"); if (NULL == lpwfs || WH_HFTPSESSION != lpwfs->hdr.htype) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_HANDLE_TYPE); return FALSE; } /* Clear any error information */ INTERNET_SetLastError(0); if (!FTP_SendCommand(lpwfs->sndSocket, FTP_CMD_RNFR, lpszSrc, 0, 0, 0)) goto lend; nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, 0, 0, 0); if (nResCode == 350) { if (!FTP_SendCommand(lpwfs->sndSocket, FTP_CMD_RNTO, lpszDest, 0, 0, 0)) goto lend; nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, 0, 0, 0); } if (nResCode == 250) bSuccess = TRUE; else FTP_SetResponseError(nResCode); lend: hIC = (LPWININETAPPINFOA) lpwfs->hdr.lpwhparent; if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC && hIC->lpfnStatusCB) { INTERNET_ASYNC_RESULT iar; iar.dwResult = (DWORD)bSuccess; iar.dwError = bSuccess ? ERROR_SUCCESS : INTERNET_GetLastError(); hIC->lpfnStatusCB(hFtpSession, lpwfs->hdr.dwContext, INTERNET_STATUS_REQUEST_COMPLETE, &iar, sizeof(INTERNET_ASYNC_RESULT)); } return bSuccess; } /*********************************************************************** * FTP_Connect (internal) * * Connect to a ftp server * * RETURNS * HINTERNET a session handle on success * NULL on failure * */ HINTERNET FTP_Connect(HINTERNET hInternet, LPCSTR lpszServerName, INTERNET_PORT nServerPort, LPCSTR lpszUserName, LPCSTR lpszPassword, DWORD dwFlags, DWORD dwContext) { struct sockaddr_in socketAddr; struct hostent *phe = NULL; INT nsocket = INVALID_SOCKET; LPWININETAPPINFOA hIC = NULL; BOOL bSuccess = FALSE; LPWININETFTPSESSIONA lpwfs = NULL; TRACE("0x%08lx Server(%s) Port(%d) User(%s) Paswd(%s)\n", (ULONG) hInternet, lpszServerName, nServerPort, lpszUserName, lpszPassword); if (((LPWININETHANDLEHEADER)hInternet)->htype != WH_HINIT) goto lerror; hIC = (LPWININETAPPINFOA) hInternet; if (NULL == lpszUserName && NULL != lpszPassword) { INTERNET_SetLastError(ERROR_INTERNET_INCORRECT_USER_NAME); goto lerror; } if (nServerPort == INTERNET_INVALID_PORT_NUMBER) nServerPort = INTERNET_DEFAULT_FTP_PORT; if (hIC->lpfnStatusCB) hIC->lpfnStatusCB(hInternet, dwContext, INTERNET_STATUS_RESOLVING_NAME, (LPSTR) lpszServerName, strlen(lpszServerName)); if (!GetAddress(lpszServerName, nServerPort, &phe, &socketAddr)) { INTERNET_SetLastError(ERROR_INTERNET_NAME_NOT_RESOLVED); goto lerror; } if (hIC->lpfnStatusCB) hIC->lpfnStatusCB(hInternet, dwContext, INTERNET_STATUS_NAME_RESOLVED, (LPSTR) lpszServerName, strlen(lpszServerName)); if (INVALID_SOCKET == (nsocket = socket(AF_INET,SOCK_STREAM,0))) { INTERNET_SetLastError(ERROR_INTERNET_CANNOT_CONNECT); goto lerror; } if (hIC->lpfnStatusCB) hIC->lpfnStatusCB(hInternet, dwContext, INTERNET_STATUS_CONNECTING_TO_SERVER, &socketAddr, sizeof(struct sockaddr_in)); if (connect(nsocket, (struct sockaddr *)&socketAddr, sizeof(socketAddr)) < 0) { ERR("Unable to connect: errno(%d)\n", errno); INTERNET_SetLastError(ERROR_INTERNET_CANNOT_CONNECT); } else { TRACE("Connected to server\n"); if (hIC->lpfnStatusCB) hIC->lpfnStatusCB(hInternet, dwContext, INTERNET_STATUS_CONNECTED_TO_SERVER, &socketAddr, sizeof(struct sockaddr_in)); lpwfs = HeapAlloc(GetProcessHeap(), 0, sizeof(WININETFTPSESSIONA)); if (NULL == lpwfs) { INTERNET_SetLastError(ERROR_OUTOFMEMORY); goto lerror; } lpwfs->hdr.htype = WH_HFTPSESSION; lpwfs->hdr.dwFlags = dwFlags; lpwfs->hdr.dwContext = dwContext; lpwfs->hdr.lpwhparent = (LPWININETHANDLEHEADER)hInternet; lpwfs->sndSocket = nsocket; memcpy(&lpwfs->socketAddress, &socketAddr, sizeof(socketAddr)); lpwfs->phostent = phe; if (NULL == lpszUserName) { lpwfs->lpszUserName = strdup("anonymous"); lpwfs->lpszPassword = strdup("user@server"); } else { lpwfs->lpszUserName = strdup(lpszUserName); lpwfs->lpszPassword = strdup(lpszPassword); } if (FTP_ConnectToHost(lpwfs)) { if (hIC->lpfnStatusCB) { INTERNET_ASYNC_RESULT iar; iar.dwResult = (DWORD)lpwfs; iar.dwError = ERROR_SUCCESS; hIC->lpfnStatusCB(hInternet, dwContext, INTERNET_STATUS_HANDLE_CREATED, &iar, sizeof(INTERNET_ASYNC_RESULT)); } TRACE("Successfully logged into server\n"); bSuccess = TRUE; } } lerror: if (!bSuccess && INVALID_SOCKET != nsocket) close(nsocket); if (!bSuccess && lpwfs) { HeapFree(GetProcessHeap(), 0, lpwfs); lpwfs = NULL; } if (hIC->hdr.dwFlags & INTERNET_FLAG_ASYNC && hIC->lpfnStatusCB) { INTERNET_ASYNC_RESULT iar; iar.dwResult = (DWORD)lpwfs; iar.dwError = bSuccess ? ERROR_SUCCESS : INTERNET_GetLastError(); hIC->lpfnStatusCB(hInternet, dwContext, INTERNET_STATUS_REQUEST_COMPLETE, &iar, sizeof(INTERNET_ASYNC_RESULT)); } return (HINTERNET) lpwfs; } /*********************************************************************** * FTP_ConnectHost (internal) * * Connect to a ftp server * * RETURNS * TRUE on success * NULL on failure * */ BOOL FTP_ConnectToHost(LPWININETFTPSESSIONA lpwfs) { INT nResCode; BOOL bSuccess = FALSE; TRACE("\n"); FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, 0, 0, 0); if (!FTP_SendCommand(lpwfs->sndSocket, FTP_CMD_USER, lpwfs->lpszUserName, 0, 0, 0)) goto lend; nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, 0, 0, 0); if (nResCode) { /* Login successful... */ if (nResCode == 230) bSuccess = TRUE; /* User name okay, need password... */ else if (nResCode == 331) bSuccess = FTP_SendPassword(lpwfs); /* Need account for login... */ else if (nResCode == 332) bSuccess = FTP_SendAccount(lpwfs); else FTP_SetResponseError(nResCode); } TRACE("Returning %d\n", bSuccess); lend: return bSuccess; } /*********************************************************************** * FTP_SendCommand (internal) * * Send command to server * * RETURNS * TRUE on success * NULL on failure * */ BOOL FTP_SendCommand(INT nSocket, FTP_COMMAND ftpCmd, LPCSTR lpszParam, INTERNET_STATUS_CALLBACK lpfnStatusCB, HINTERNET hHandle, DWORD dwContext) { DWORD len; CHAR *buf; DWORD nBytesSent = 0; DWORD nRC = 0; BOOL bParamHasLen; TRACE("%d: (%s) %d\n", ftpCmd, lpszParam, nSocket); if (lpfnStatusCB) lpfnStatusCB(hHandle, dwContext, INTERNET_STATUS_SENDING_REQUEST, NULL, 0); bParamHasLen = lpszParam && strlen(lpszParam) > 0; len = (bParamHasLen ? strlen(lpszParam) : -1) + strlen(szFtpCommands[ftpCmd]) + strlen(szCRLF)+ 1; if (NULL == (buf = HeapAlloc(GetProcessHeap(), 0, len+1))) { INTERNET_SetLastError(ERROR_OUTOFMEMORY); return FALSE; } sprintf(buf, "%s%s%s%s", szFtpCommands[ftpCmd], bParamHasLen ? " " : "", bParamHasLen ? lpszParam : "", szCRLF); TRACE("Sending (%s) len(%ld)\n", buf, len); while((nBytesSent < len) && (nRC != SOCKET_ERROR)) { nRC = send(nSocket, buf+nBytesSent, len - nBytesSent, 0); nBytesSent += nRC; } HeapFree(GetProcessHeap(), 0, (LPVOID)buf); if (lpfnStatusCB) lpfnStatusCB(hHandle, dwContext, INTERNET_STATUS_REQUEST_SENT, &nBytesSent, sizeof(DWORD)); TRACE("Sent %ld bytes\n", nBytesSent); return (nRC != SOCKET_ERROR); } /*********************************************************************** * FTP_ReceiveResponse (internal) * * Receive response from server * * RETURNS * Reply code on success * 0 on failure * */ INT FTP_ReceiveResponse(INT nSocket, LPSTR lpszResponse, DWORD dwResponse, INTERNET_STATUS_CALLBACK lpfnStatusCB, HINTERNET hHandle, DWORD dwContext) { DWORD nRecv; INT rc = 0; TRACE("socket(%d) \n", nSocket); if (lpfnStatusCB) lpfnStatusCB(hHandle, dwContext, INTERNET_STATUS_RECEIVING_RESPONSE, NULL, 0); while(1) { nRecv = dwResponse; if (!FTP_GetNextLine(nSocket, lpszResponse, &nRecv)) goto lerror; if (nRecv >= 3 && lpszResponse[3] != '-') break; } if (nRecv >= 3) { lpszResponse[nRecv] = '\0'; rc = atoi(lpszResponse); if (lpfnStatusCB) lpfnStatusCB(hHandle, dwContext, INTERNET_STATUS_RESPONSE_RECEIVED, &nRecv, sizeof(DWORD)); } lerror: TRACE("return %d\n", rc); return rc; } /*********************************************************************** * FTP_SendPassword (internal) * * Send password to ftp server * * RETURNS * TRUE on success * NULL on failure * */ BOOL FTP_SendPassword(LPWININETFTPSESSIONA lpwfs) { INT nResCode; BOOL bSuccess = FALSE; TRACE("\n"); if (!FTP_SendCommand(lpwfs->sndSocket, FTP_CMD_PASS, lpwfs->lpszPassword, 0, 0, 0)) goto lend; nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, 0, 0, 0); if (nResCode) { TRACE("Received reply code %d\n", nResCode); /* Login successful... */ if (nResCode == 230) bSuccess = TRUE; /* Command not implemented, superfluous at the server site... */ /* Need account for login... */ else if (nResCode == 332) bSuccess = FTP_SendAccount(lpwfs); else FTP_SetResponseError(nResCode); } lend: TRACE("Returning %d\n", bSuccess); return bSuccess; } /*********************************************************************** * FTP_SendAccount (internal) * * * * RETURNS * TRUE on success * FALSE on failure * */ BOOL FTP_SendAccount(LPWININETFTPSESSIONA lpwfs) { INT nResCode; BOOL bSuccess = FALSE; TRACE("\n"); if (!FTP_SendCommand(lpwfs->sndSocket, FTP_CMD_ACCT, NOACCOUNT, 0, 0, 0)) goto lend; nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, 0, 0, 0); if (nResCode) bSuccess = TRUE; else FTP_SetResponseError(nResCode); lend: return bSuccess; } /*********************************************************************** * FTP_SendStore (internal) * * Send request to upload file to ftp server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL FTP_SendStore(LPWININETFTPSESSIONA lpwfs, LPCSTR lpszRemoteFile, DWORD dwType) { INT nResCode; BOOL bSuccess = FALSE; TRACE("\n"); if (!FTP_InitListenSocket(lpwfs)) goto lend; if (!FTP_SendType(lpwfs, dwType)) goto lend; if (!FTP_SendPort(lpwfs)) goto lend; if (!FTP_SendCommand(lpwfs->sndSocket, FTP_CMD_STOR, lpszRemoteFile, 0, 0, 0)) goto lend; nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, 0, 0, 0); if (nResCode) { if (nResCode == 150) bSuccess = TRUE; else FTP_SetResponseError(nResCode); } lend: if (!bSuccess && INVALID_SOCKET != lpwfs->lstnSocket) { close(lpwfs->lstnSocket); lpwfs->lstnSocket = INVALID_SOCKET; } return bSuccess; } /*********************************************************************** * FTP_InitListenSocket (internal) * * Create a socket to listen for server response * * RETURNS * TRUE on success * FALSE on failure * */ BOOL FTP_InitListenSocket(LPWININETFTPSESSIONA lpwfs) { BOOL bSuccess = FALSE; size_t namelen = sizeof(struct sockaddr_in); TRACE("\n"); lpwfs->lstnSocket = socket(PF_INET, SOCK_STREAM, 0); if (INVALID_SOCKET == lpwfs->lstnSocket) { TRACE("Unable to create listening socket\n"); goto lend; } lpwfs->lstnSocketAddress.sin_family = AF_INET; lpwfs->lstnSocketAddress.sin_port = htons((u_short) 0); lpwfs->lstnSocketAddress.sin_addr.s_addr = htonl(INADDR_ANY); if (SOCKET_ERROR == bind(lpwfs->lstnSocket,(struct sockaddr *) &lpwfs->lstnSocketAddress, sizeof(struct sockaddr_in))) { TRACE("Unable to bind socket\n"); goto lend; } if (SOCKET_ERROR == listen(lpwfs->lstnSocket, MAX_BACKLOG)) { TRACE("listen failed\n"); goto lend; } if (SOCKET_ERROR != getsockname(lpwfs->lstnSocket, (struct sockaddr *) &lpwfs->lstnSocketAddress, &namelen)) bSuccess = TRUE; lend: if (!bSuccess && INVALID_SOCKET == lpwfs->lstnSocket) { close(lpwfs->lstnSocket); lpwfs->lstnSocket = INVALID_SOCKET; } return bSuccess; } /*********************************************************************** * FTP_SendType (internal) * * Tell server type of data being transfered * * RETURNS * TRUE on success * FALSE on failure * */ BOOL FTP_SendType(LPWININETFTPSESSIONA lpwfs, DWORD dwType) { INT nResCode; CHAR type[2] = { "I\0" }; BOOL bSuccess = FALSE; TRACE("\n"); if (dwType & INTERNET_FLAG_TRANSFER_ASCII) *type = 'A'; if (!FTP_SendCommand(lpwfs->sndSocket, FTP_CMD_TYPE, type, 0, 0, 0)) goto lend; nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, 0, 0, 0)/100; if (nResCode) { if (nResCode == 2) bSuccess = TRUE; else FTP_SetResponseError(nResCode); } lend: return bSuccess; } /*********************************************************************** * FTP_SendPort (internal) * * Tell server which port to use * * RETURNS * TRUE on success * FALSE on failure * */ BOOL FTP_SendPort(LPWININETFTPSESSIONA lpwfs) { INT nResCode; CHAR szIPAddress[64]; BOOL bSuccess = FALSE; TRACE("\n"); sprintf(szIPAddress, "%d,%d,%d,%d,%d,%d", lpwfs->socketAddress.sin_addr.s_addr&0x000000FF, (lpwfs->socketAddress.sin_addr.s_addr&0x0000FF00)>>8, (lpwfs->socketAddress.sin_addr.s_addr&0x00FF0000)>>16, (lpwfs->socketAddress.sin_addr.s_addr&0xFF000000)>>24, lpwfs->lstnSocketAddress.sin_port & 0xFF, (lpwfs->lstnSocketAddress.sin_port & 0xFF00)>>8); if (!FTP_SendCommand(lpwfs->sndSocket, FTP_CMD_PORT, szIPAddress, 0, 0, 0)) goto lend; nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN,0, 0, 0); if (nResCode) { if (nResCode == 200) bSuccess = TRUE; else FTP_SetResponseError(nResCode); } lend: return bSuccess; } /*********************************************************************** * FTP_InitDataSocket (internal) * * * * RETURNS * TRUE on success * FALSE on failure * */ BOOL FTP_InitDataSocket(LPWININETFTPSESSIONA lpwfs, LPINT nDataSocket) { struct sockaddr_in saddr; size_t addrlen = sizeof(struct sockaddr); TRACE("\n"); *nDataSocket = accept(lpwfs->lstnSocket, (struct sockaddr *) &saddr, &addrlen); close(lpwfs->lstnSocket); lpwfs->lstnSocket = INVALID_SOCKET; return *nDataSocket != INVALID_SOCKET; } /*********************************************************************** * FTP_SendData (internal) * * Send data to the server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL FTP_SendData(LPWININETFTPSESSIONA lpwfs, INT nDataSocket, HANDLE hFile) { BY_HANDLE_FILE_INFORMATION fi; DWORD nBytesRead = 0; DWORD nBytesSent = 0; DWORD nTotalSent = 0; DWORD nBytesToSend, nLen, nRC = 1; time_t s_long_time, e_long_time; LONG nSeconds; CHAR *lpszBuffer; TRACE("\n"); lpszBuffer = HeapAlloc(GetProcessHeap(), 0, sizeof(CHAR)*DATA_PACKET_SIZE); memset(lpszBuffer, 0, sizeof(CHAR)*DATA_PACKET_SIZE); /* Get the size of the file. */ GetFileInformationByHandle(hFile, &fi); time(&s_long_time); do { nBytesToSend = nBytesRead - nBytesSent; if (nBytesToSend <= 0) { /* Read data from file. */ nBytesSent = 0; if (!ReadFile(hFile, lpszBuffer, DATA_PACKET_SIZE, &nBytesRead, 0)) ERR("Failed reading from file\n"); if (nBytesRead > 0) nBytesToSend = nBytesRead; else break; } nLen = DATA_PACKET_SIZE < nBytesToSend ? DATA_PACKET_SIZE : nBytesToSend; nRC = send(nDataSocket, lpszBuffer, nLen, 0); if (nRC != SOCKET_ERROR) { nBytesSent += nRC; nTotalSent += nRC; } /* Do some computation to display the status. */ time(&e_long_time); nSeconds = e_long_time - s_long_time; if( nSeconds / 60 > 0 ) { TRACE( "%ld bytes of %d bytes (%ld%%) in %ld min %ld sec estimated remainig time %ld sec\t\t\r", nTotalSent, fi.nFileSizeLow, nTotalSent*100/fi.nFileSizeLow, nSeconds / 60, nSeconds % 60, (fi.nFileSizeLow - nTotalSent) * nSeconds / nTotalSent ); } else { TRACE( "%ld bytes of %d bytes (%ld%%) in %ld sec estimated remainig time %ld sec\t\t\r", nTotalSent, fi.nFileSizeLow, nTotalSent*100/fi.nFileSizeLow, nSeconds, (fi.nFileSizeLow - nTotalSent) * nSeconds / nTotalSent); } } while (nRC != SOCKET_ERROR); TRACE("file transfer complete!\n"); if(lpszBuffer != NULL) HeapFree(GetProcessHeap(), 0, lpszBuffer); return nTotalSent; } /*********************************************************************** * FTP_SendRetrieve (internal) * * Send request to retrieve a file * * RETURNS * Number of bytes to be received on success * 0 on failure * */ DWORD FTP_SendRetrieve(LPWININETFTPSESSIONA lpwfs, LPCSTR lpszRemoteFile, DWORD dwType) { INT nResCode; DWORD nResult = 0; TRACE("\n"); if (!FTP_InitListenSocket(lpwfs)) goto lend; if (!FTP_SendType(lpwfs, dwType)) goto lend; if (!FTP_SendPort(lpwfs)) goto lend; if (!FTP_SendCommand(lpwfs->sndSocket, FTP_CMD_RETR, lpszRemoteFile, 0, 0, 0)) goto lend; nResCode = FTP_ReceiveResponse(lpwfs->sndSocket, INTERNET_GetResponseBuffer(), MAX_REPLY_LEN, 0, 0, 0); if (nResCode) { if (nResCode == 125 || nResCode == 150) { /* Parse size of data to be retrieved */ INT i, sizepos = -1; LPSTR lpszResponseBuffer = INTERNET_GetResponseBuffer(); for (i = strlen(lpszResponseBuffer) - 1; i >= 0; i--) { if ('(' == lpszResponseBuffer[i]) { sizepos = i; break; } } if (sizepos >= 0) { nResult = atol(&lpszResponseBuffer[sizepos+1]); TRACE("Waiting to receive %ld bytes\n", nResult); } } } lend: if (0 == nResult && INVALID_SOCKET != lpwfs->lstnSocket) { close(lpwfs->lstnSocket); lpwfs->lstnSocket = INVALID_SOCKET; } return nResult; } /*********************************************************************** * FTP_RetrieveData (internal) * * Retrieve data from server * * RETURNS * TRUE on success * FALSE on failure * */ BOOL FTP_RetrieveFileData(LPWININETFTPSESSIONA lpwfs, INT nDataSocket, DWORD nBytes, HANDLE hFile) { DWORD nBytesWritten; DWORD nBytesReceived = 0; INT nRC = 0; CHAR *lpszBuffer; TRACE("\n"); if (INVALID_HANDLE_VALUE == hFile) return FALSE; lpszBuffer = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CHAR)*DATA_PACKET_SIZE); if (NULL == lpszBuffer) { INTERNET_SetLastError(ERROR_OUTOFMEMORY); return FALSE; } while (nBytesReceived < nBytes && nRC != SOCKET_ERROR) { nRC = recv(nDataSocket, lpszBuffer, DATA_PACKET_SIZE, 0); if (nRC != SOCKET_ERROR) { /* other side closed socket. */ if (nRC == 0) goto recv_end; WriteFile(hFile, lpszBuffer, nRC, &nBytesWritten, NULL); nBytesReceived += nRC; } TRACE("%ld bytes of %ld (%ld%%)\r", nBytesReceived, nBytes, nBytesReceived * 100 / nBytes); } TRACE("Data transfer complete\n"); if (NULL != lpszBuffer) HeapFree(GetProcessHeap(), 0, lpszBuffer); recv_end: return (nRC != SOCKET_ERROR); } /*********************************************************************** * FTP_CloseSessionHandle (internal) * * Deallocate session handle * * RETURNS * TRUE on success * FALSE on failure * */ BOOL FTP_CloseSessionHandle(LPWININETFTPSESSIONA lpwfs) { if (INVALID_SOCKET != lpwfs->sndSocket) close(lpwfs->sndSocket); if (INVALID_SOCKET != lpwfs->lstnSocket) close(lpwfs->lstnSocket); if (lpwfs->lpszPassword) HeapFree(GetProcessHeap(), 0, lpwfs->lpszPassword); if (lpwfs->lpszUserName) HeapFree(GetProcessHeap(), 0, lpwfs->lpszUserName); HeapFree(GetProcessHeap(), 0, lpwfs); return TRUE; } /*********************************************************************** * FTP_CloseSessionHandle (internal) * * Deallocate session handle * * RETURNS * TRUE on success * FALSE on failure * */ BOOL FTP_CloseFindNextHandle(LPWININETFINDNEXTA lpwfn) { INT i; TRACE("\n"); for (i = 0; i < lpwfn->size; i++) { if (NULL != lpwfn->lpafp[i].lpszName) HeapFree(GetProcessHeap(), 0, lpwfn->lpafp[i].lpszName); } HeapFree(GetProcessHeap(), 0, lpwfn->lpafp); HeapFree(GetProcessHeap(), 0, lpwfn); return TRUE; } /*********************************************************************** * FTP_ReceiveFileList (internal) * * Read file list from server * * RETURNS * Handle to file list on success * NULL on failure * */ HINTERNET FTP_ReceiveFileList(LPWININETFTPSESSIONA lpwfs, INT nSocket, LPWIN32_FIND_DATAA lpFindFileData, DWORD dwContext) { DWORD dwSize = 0; LPFILEPROPERTIESA lpafp = NULL; LPWININETFINDNEXTA lpwfn = NULL; TRACE("\n"); if (FTP_ParseDirectory(lpwfs, nSocket, &lpafp, &dwSize)) { FTP_ConvertFileProp(lpafp, lpFindFileData); lpwfn = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(WININETFINDNEXTA)); if (NULL != lpwfn) { lpwfn->hdr.htype = WH_HFINDNEXT; lpwfn->hdr.lpwhparent = (LPWININETHANDLEHEADER)lpwfs; lpwfn->hdr.dwContext = dwContext; lpwfn->index = 1; /* Next index is 1 since we return index 0 */ lpwfn->size = dwSize; lpwfn->lpafp = lpafp; } } TRACE("Matched %ld files\n", dwSize); return (HINTERNET)lpwfn; } /*********************************************************************** * FTP_ConvertFileProp (internal) * * Converts FILEPROPERTIESA struct to WIN32_FIND_DATAA * * RETURNS * TRUE on success * FALSE on failure * */ BOOL FTP_ConvertFileProp(LPFILEPROPERTIESA lpafp, LPWIN32_FIND_DATAA lpFindFileData) { BOOL bSuccess = FALSE; ZeroMemory(lpFindFileData, sizeof(WIN32_FIND_DATAA)); if (lpafp) { DWORD access = mktime(&lpafp->tmLastModified); /* Not all fields are filled in */ lpFindFileData->ftLastAccessTime.dwHighDateTime = HIWORD(access); lpFindFileData->ftLastAccessTime.dwLowDateTime = LOWORD(access); lpFindFileData->nFileSizeHigh = HIWORD(lpafp->nSize); lpFindFileData->nFileSizeLow = LOWORD(lpafp->nSize); if (lpafp->bIsDirectory) lpFindFileData->dwFileAttributes |= FILE_ATTRIBUTE_DIRECTORY; if (lpafp->lpszName) strncpy(lpFindFileData->cFileName, lpafp->lpszName, MAX_PATH); bSuccess = TRUE; } return bSuccess; } /*********************************************************************** * FTP_ParseDirectory (internal) * * Parse string of directory information * * RETURNS * TRUE on success * FALSE on failure * * FIXME: - This function needs serious clea-up * - We should consider both UNIX and NT list formats */ #define MAX_MONTH_LEN 10 #define MIN_LEN_DIR_ENTRY 15 BOOL FTP_ParseDirectory(LPWININETFTPSESSIONA lpwfs, INT nSocket, LPFILEPROPERTIESA *lpafp, LPDWORD dwfp) { /* *